flipstone-ar_mailer 3.0.0

data/share/linux/ar_sendmail.conf

@@ -0,0 +1,30 @@
+# This is a configuration file for ar_sendmail daemon init.d script
+#
+# Define the settings for each app which has a mailer that you want start 
+# automatically on startup.
+#
+# You can define an optional defaults section which will apply to all 
+# applications unless the setting is specified under the applications specific 
+# config.
+#
+# Settings not specified in either the defaults or app config section will
+# be implied by the gem binary defaults. The option names are the same as the 
+# long format binary option switches. Run 'ar_sendmail -h' to see option switches
+# and default values.
+#
+# Copy this file to /etc/ar_sendmail.conf and it will be read by the init.d
+# script.
+#
+
+## Demo app config
+#
+#defaults:
+#  batch-size: 10
+#  max-age: 0
+#  delay: 60
+#
+#app_name:
+#  chdir: /var/www/apps/app_name
+#  environment: production
+#  pidfile: ./log/ar_sendmail.pid
+

data/test/resources/action_mailer.rb

@@ -0,0 +1,218 @@
+require 'net/smtp'
+require 'smtp_tls' unless Net::SMTP.instance_methods.include?("enable_starttls_auto")
+require 'time'
+
+class Net::SMTP
+
+  @reset_called = 0
+
+  @deliveries = []
+
+  @send_message_block = nil
+
+  @start_block = nil
+
+  class << self
+
+    attr_reader :deliveries
+    attr_reader :send_message_block
+    attr_accessor :reset_called
+
+    # send :remove_method, :start
+  end
+
+  def self.on_send_message(&block)
+    @send_message_block = block
+  end
+
+  def self.on_start(&block)
+    if block_given?
+      @start_block = block
+    else
+      @start_block
+    end
+  end
+
+  def self.clear_on_start
+    @start_block = nil
+  end
+
+  def self.reset
+    deliveries.clear
+    on_start
+    on_send_message
+    @reset_called = 0
+  end
+
+  def start(*args)
+    self.class.on_start.call if self.class.on_start
+    yield self
+  end
+
+  alias test_old_reset reset if instance_methods.include? 'reset'
+
+  def reset
+    self.class.reset_called += 1
+  end
+
+  alias test_old_send_message send_message
+
+  def send_message(mail, to, from)
+    return self.class.send_message_block.call(mail, to, from) unless
+      self.class.send_message_block.nil?
+    self.class.deliveries << [mail, to, from]
+    return "queued"
+  end
+
+end
+
+##
+# Stub for ActionMailer::Base
+
+module ActionMailer; end
+
+class ActionMailer::Base
+
+  @server_settings = {}
+
+  class << self
+    cattr_accessor :email_class
+    attr_accessor :delivery_method
+  end
+
+  def self.logger
+    o = Object.new
+    def o.info(arg) end
+    return o
+  end
+
+  def self.method_missing(meth, *args)
+    meth.to_s =~ /deliver_(.*)/
+    super unless $1
+    new($1, *args).deliver!
+  end
+
+  def self.reset
+    server_settings.clear
+    self.email_class = Email
+  end
+
+  def self.server_settings
+    @server_settings
+  end
+
+  def initialize(meth = nil)
+    send meth if meth
+  end
+
+  def deliver!
+    ArMailer::ActiveRecord.new.deliver!(@mail)
+  end
+
+  def self.add_delivery_method(*args)
+
+  end
+
+end
+
+module Mail
+  class Message
+
+  end
+end
+
+##
+# Stub for an ActiveRecord model
+
+class Email
+
+  START = Time.parse 'Thu Aug 10 2006 11:19:48'
+
+  attr_accessor :from, :to, :mail, :last_send_attempt, :created_on, :id,
+                :failed_at, :failure_message
+
+  @records = []
+  @id = 0
+
+  class << self; attr_accessor :records, :id; end
+
+  def self.create(record)
+    record = new record[:from], record[:to], record[:mail],
+                 record[:last_send_attempt],
+                 record[:failed_at],
+                 record[:failure_message]
+
+    records << record
+    return record
+  end
+
+  def self.destroy_all(conditions)
+    timeout = conditions.last
+    found = []
+
+    records.each do |record|
+      next if record.last_send_attempt == 0
+      next if record.created_on == 0
+      next unless record.created_on < timeout
+      record.destroy
+      found << record
+    end
+
+    found
+  end
+
+  def self.find(_, options = nil)
+    return records if options.nil?
+    if options[:conditions] &&
+       options[:conditions].first == 'failed_at IS NULL AND last_send_attempt < ?'
+      now = options[:conditions].last
+      return records.select do |r|
+        r.failed_at.nil? && r.last_send_attempt < now
+      end
+    else
+      raise "Query not handled by mock :#{options.inspect}.  Beware that your sql is not actually tested"
+    end
+  end
+
+  def self.reset
+    @id = 0
+    records.clear
+  end
+
+  def initialize(from, to, mail, last_send_attempt = nil, failed_at = nil, failure_message = nil)
+    @from = from
+    @to = to
+    @mail = mail
+    @id = self.class.id += 1
+    @created_on = START + @id
+    @last_send_attempt = last_send_attempt || 0
+    @failed_at = failed_at
+    @failure_message = failure_message
+  end
+
+  def destroy
+    self.class.records.delete self
+    self.freeze
+  end
+
+  def ==(other)
+    other.id == id
+  end
+
+  def save
+  end
+
+end
+
+Newsletter = Email
+
+class String
+  def classify
+    self
+  end
+
+  def tableize
+    self.downcase
+  end
+
+end

data/test/test_armailer.rb

@@ -0,0 +1,58 @@
+require File.expand_path(File.dirname(__FILE__) + '/test_helper')
+
+class Mailer < ActionMailer::Base
+  self.delivery_method = :activerecord
+
+  def mail
+    @mail = Mail::Message.new
+    def @mail.encoded() 'email' end
+    def @mail.from() ['nobody@example.com'] end
+    def @mail.[](key) {'return-path' => $return_path, 'from' => 'nobody@example.com'}[key] end
+    def @mail.destinations() %w[user1@example.com user2@example.com] end
+    def @mail.ready_to_send() end
+  end
+
+end
+
+class TestARMailer < Test::Unit::TestCase
+
+  def setup
+    $return_path = nil
+    Mailer.email_class = Email
+
+    Email.records.clear
+    Newsletter.records.clear
+  end
+
+  def test_self_email_class_equals
+    Mailer.email_class = Newsletter
+
+    Mailer.deliver_mail
+
+    assert_equal 2, Newsletter.records.length
+  end
+
+  def test_perform_delivery_activerecord_when_return_path_is_present
+    $return_path = stub(:spec => 'return-path@example.com')
+    Mailer.deliver_mail
+
+    assert_equal 2, Email.records.length
+    record = Email.records.first
+    assert_equal 'return-path@example.com', record.from
+  end
+
+  def test_perform_delivery_activerecord
+    Mailer.deliver_mail
+
+    assert_equal 2, Email.records.length
+
+    record = Email.records.first
+    assert_equal 'email', record.mail
+    assert_equal 'user1@example.com', record.to
+    assert_equal 'nobody@example.com', record.from
+
+    assert_equal 'user2@example.com', Email.records.last.to
+  end
+
+end
+