module MailManager
  class TestMessage  < ActiveRecord::Base
    self.table_name =  "#{MailManager.table_prefix}messages"
    belongs_to :mailing, :class_name => 'MailManager::Mailing'
    belongs_to :subscription, :class_name => 'MailManager::Subscription'
    has_many :bounces, :class_name => 'MailManager::Bounce'
    belongs_to :contact, :class_name => 'MailManager::Contact'
    #FIXME: if we add more types ... change the base message to be MailingMessage or something and don't use
    #me as a message type
    default_scope :conditions => {:type => "MailManager::#{(self.class.name.eql?('Class') ? self.name : self.class.name).gsub(/^MailManager::/,'')}" } 
  
    scope :pending, {:conditions => {:status => 'pending'}}
    scope :ready, :conditions => ["status=?", 'ready']

    def initialize(*args)
      super
      set_type
    end

    include StatusHistory
    override_statuses(['pending','processing','sent','failed','ready'], 'pending')

    attr_protected :id

    scope :search, lambda{|params| 
      conditions = ["1"]
      if params[:mailing_id]
        conditions[0] += " AND #{MailManager.table_prefix}messages.mailing_id=?"
        conditions << params[:mailing_id]
      end
      if params[:status]
        conditions[0] += " AND #{MailManager.table_prefix}messages.status=?"
        conditions << params[:status]
      end
      {
        :conditions => conditions, 
        :order => "#{MailManager.table_prefix}contacts.last_name, #{MailManager.table_prefix}contacts.first_name, #{MailManager.table_prefix}contacts.email_address",
        :joins => " INNER JOIN #{MailManager.table_prefix}contacts on #{MailManager.table_prefix}messages.contact_id=#{MailManager.table_prefix}contacts.id"
      }}
  
    before_create :set_default_status
    after_create :generate_guid

    def email_address_with_name
      return %Q|"#{full_name}" <#{email_address}>|.gsub(/\s+/,' ') unless full_name.eql?('')
      email_address
    end

    # sends the message through Mailer
    def deliver
      MailManager::Mailer.deliver_message(self)
      change_status(:sent)
    end
  
    def full_name
      contact.full_name
    end

    def email_address
      contact.email_address
    end

    def subject
      mailing.subject
    end

    def from_email_address
      return self[:from_email_address] if self[:from_email_address].present?
      self.update_attribute(:from_email_address,mailing.from_email_address)
      self[:from_email_address]
    end

    # returns the separate mime parts of the message's Mailable
    def parts
      @parts ||= mailing.parts(substitutions)
    end
    
    def contactable
      contact.try(:contactable)
    end

    def substitutions
      substitutions_hash = {}
      MailManager::ContactableRegistry.registered_methods.each do |method|
        method_key = method.to_s.upcase
        if contact.respond_to?(method)
          substitutions_hash[method_key] = contact.send(method)
        elsif contactable.respond_to?(method)
          substitutions_hash[method_key] = contactable.send(method)
        else
          substitutions_hash[method_key] = ''
        end
      end
      substitutions_hash.merge('UNSUBSCRIBE_URL' => unsubscribe_url)
    end

    def unsubscribe_url
      "#{MailManager.site_url}#{MailManager.unsubscribe_path}/#{guid}"
    end
  
    def self.valid_statuses
      ['pending','processing','sent','failed','ready']
    end

    def valid_statuses
      ['pending','processing','sent','failed','ready']
    end
  
    # generated the guid for which the message is identified by in transit
    def generate_guid
      update_attribute(:guid,       
        "#{contact.id}-#{subscription.try(:id)}-#{self.id}-#{Digest::SHA1.hexdigest("#{contact.id}-#{subscription.try(:id)}-#{self.id}-#{MailManager.secret}")}")
    end
  
    def default_status
      'pending'
    end

    default_scope :conditions => {:type => "MailManager::#{(self.class.name.eql?('Class') ? self.name : self.class.name).gsub(/^MailManager::/,'')}" } 

    scope :ready, :conditions => ["status=?", 'ready']
    def email_address
      self[:test_email_address]
    end

    def email_address_with_name
      "\"Test Guy\" <#{email_address}>" 
    end

    def default_status
      'ready'
    end
    def generate_guid
      update_attribute(:guid,       
        "test-#{self.id}-#{Digest::SHA1.hexdigest("test-#{self.id}-#{MailManager.secret}")}")
    end
        
    def subscription
      Subscription.new(self)
    end
        
    def valid_statuses
      ['ready'] + super
    end
    class Subscription
      def initialize(test_message)
        @test_message = test_message
      end
      def contact
        Contact.new(@test_message)
      end
    end
    class Contact
      def initialize(test_message)
        @test_message = test_message
      end
      def full_name
        "#{first_name} #{last_name}".strip
      end
      def first_name
        'Test'
      end
      def last_name
        'Guy'
      end
      def email_address
        @test_message.email_address
      end
    end
    protected
    def set_type
      self[:type] = self.class.name
    end
  end
end