monkey-mailer 0.0.2

checksums.yaml

@@ -0,0 +1,15 @@
+---
+!binary "U0hBMQ==":
+  metadata.gz: !binary |-
+    NGY5ZDE2MGNhZDNlYzcyYzcxNzFjNjk4MTQxMTliNmQ5MGIyZWViMQ==
+  data.tar.gz: !binary |-
+    MDUzZmUxMGY3YzZjZGFkYjMwNmZjNWMxNGVjODdiODcyMjdhMzYxNw==
+SHA512:
+  metadata.gz: !binary |-
+    ZGJlNjY4ZmQ5ODA1Y2UxNGU2NGU4ZDQ4ZDExYzYxNzA3NDY4MTIyMjVhNGYy
+    ZWYwYTAyYmE2ZTQ4YTY1OTMyMjk0NGJkYzk0YWFjZDdmMmE0ZWI1ZWY2NDc3
+    ODgxNGMyNjA3NGJmOWNjNmZhMzFjMTIzN2EyYTc0ZTRkYWU1NDQ=
+  data.tar.gz: !binary |-
+    MTg1NzAxZTUwOTRiZjllM2NmNzU0ODMzYTg2MTkzMmVkZjYxMDFhMzJiOWFk
+    MzJlYWZiYjEzYzQxYzdkMDg1ODA4YzEyZDQzZWNkYTYxNDdmNjg1MzIxOWQ2
+    OWY2MDNmNDRmNzFiOGE1ODc1Mjk1ZmM2OWVmMDVlNWVlMmY1N2Q=

data/.gitignore

@@ -0,0 +1 @@
+Gemfile.lock

data/Gemfile

@@ -0,0 +1,3 @@
+source 'https://rubygems.org'
+
+gemspec

data/README.md

@@ -0,0 +1,100 @@
+Monkey Mailer
+======
+
+## Description
+Monkey Mailer is a gem that allows handling a mailing queue, it supports email priority (urgent, normal and low priorities) and is higly customizable.  
+Emails can be loaded from different data sources using Loader gems (See below), feel free to contribute a loader with your preferred datastore!  
+Once loaded, emails can be sent using either SMTP or [Mailchimp's Mandril API](http://mandrill.com/)  
+After setup, Monkey Mailer can be configured to run and process your emails in a infinite loop until you stop it, it uses the [fallen](https://github.com/inkel/fallen/) gem, to run as a daemon in your server
+
+## Instalation
+    gem install monkey-mailer
+
+### or on your gemfile
+    gem 'monkey-mailer'
+
+## About Loaders
+Loaders are plugin gems that can be attached to Monkey Mailer in order to support different data storage methods. This gem does not ship with any usable loader out of the box because they usually have a lot of dependencies and we are trying to keep it simple for  everyone, so just choose an existent loader (or build and contribute your own if you may, it's easy!).  
+One you've chosen your preferred loader, just add it to the configuration options and you're good to go!  
+To set up a loader all you need is doing something like this:
+```ruby
+  MonkeyMailer.configuration.loader = MonkeyMailer::Loaders::Dummy # Set up your loader of choice
+  MonkeyMailer.configuration.loder_options = {} #Loader's specific options
+```
+
+## Adapters
+Adapters are classes that send your emails using different providers. MonkeyMailer provides two usable adapters that you can use, more loaders can be easily added:
+
+* `MonkeyMailer::Adapters::MandrilAPI`
+* `MonkeyMailer::Adapters::Smtp`
+
+Any adapter receives its settings by setting up MonkeyMailer.configuration.adapter_options, check out each loader for specific options
+
+##Dummy loader and adapter
+Test adapter and loader are provided within MonkeyMailer so you can play with them for testing purposes:  
+
+* Dummy loader: `MonkeyMailer::Loaders::Dummy` # It generates random emails for adapters to consume  
+* Dummy adapter: `MonkeyMailer::Adapters::Dummy` # It just displays the email content on stdout  
+
+## Usage Example
+```ruby
+  require 'monkey-mailer'
+  require 'mm-data_mapper' # Or any other loader of your choice
+
+  module MyPostman
+    extend MonkeyMailer
+
+    MonkeyMailer.configure do |config|
+      config.adapter = MonkeyMailer::Adapters::MandrilAPI, # Method used to send emails
+      config.adapter_options = {:mandril_api_key => 'YOUR_API_KEY'}
+      config.loader = MonkeyMailer::Loaders::DataMapper #Uses the loader on mm-data_mapper gem to load emails from a database
+      config.loader_options = {
+        'default' => {
+        :adapter => 'mysql',
+        :user => 'monkey-mailer',
+        :password => 'monkey_mailer_dev',
+        :database => 'monkey_mailer_test'
+        }
+      }
+      config.urgent_quota = 100 # How many urgent mails to send on each iteration
+      config.normal_quota = 50 # How many normal priority emails to send on each iteration
+      config.low_quota = 2 # How many low priority emails to send on each iteration
+      config.normal_sleep = 1 # How many iterations to skip when sending normal priority emails
+      config.low_sleep = 2 # How many iterations to skip when sending low priority emails
+      config.sleep = 5 # How many seconds between iterations Monkey Mailer should sleep
+    end
+  end
+
+  MyPostman.start! # You can also call MyPostman.daemonize! to dettach the process and let it run on background
+```
+Check out [fallen's readme](https://github.com/inkel/fallen#control-your-daemon) for more info on how to control the daemon behaviour
+
+## CLI support
+MonkeyMailer can use [`Fallen::CLI`](https://github.com/inkel/fallen#cli-support) in order to support command line arguments (and work like a real daemon!), just extend your Module from `Fallen::CLI` and do something like this:
+
+```ruby
+
+case Clap.run(ARGV, MyPostman.cli).first
+
+when "start"
+  MyPostman.start!
+when "stop"
+  MyPostman.stop!
+when "usage", "help"
+  puts MyPostman.fallen_usage
+end
+```
+
+## Contributions
+Contributions are very welcome using the well known fork -> hack -> test -> push -> pull request  
+You can also build your own loader gem, we have thought of some ideas about loaders that many people will find usefull:  
+
+* mm-activerecord  
+* mm-json  
+* mm-yaml  
+* mm-redis  
+* mm-your-storage-of-choice  
+
+## License
+See the `UNLICENSE` file included with this gem distribution.
+

data/UNLICENSE

@@ -0,0 +1,24 @@
+This is free and unencumbered software released into the public domain.
+
+Anyone is free to copy, modify, publish, use, compile, sell, or
+distribute this software, either in source code form or as a compiled
+binary, for any purpose, commercial or non-commercial, and by any
+means.
+
+In jurisdictions that recognize copyright laws, the author or authors
+of this software dedicate any and all copyright interest in the
+software to the public domain. We make this dedication for the benefit
+of the public at large and to the detriment of our heirs and
+successors. We intend this dedication to be an overt act of
+relinquishment in perpetuity of all present and future rights to this
+software under copyright law.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+OTHER DEALINGS IN THE SOFTWARE.
+
+For more information, please refer to <http://unlicense.org/>

data/examples/dummy_postman.rb

@@ -0,0 +1,25 @@
+require 'monkey-mailer'
+
+module DummyPostman
+  extend MonkeyMailer
+  extend Fallen::CLI
+
+  MonkeyMailer.configure do |config|
+      config.sleep = 2
+      config.adapter = MonkeyMailer::Adapters::Dummy
+      config.loader = MonkeyMailer::Loaders::Dummy
+      config.urgent_quota = 1
+      config.normal_quota = 1
+      config.low_quota = 1
+  end
+end
+
+case Clap.run(ARGV, DummyPostman.cli).first
+
+when "start"
+  DummyPostman.start!
+when "stop"
+  DummyPostman.stop!
+when "usage", "help"
+  puts DummyPostman.fallen_usage
+end

data/lib/monkey-mailer.rb

@@ -0,0 +1,49 @@
+require 'bundler/setup'
+require 'fallen'
+require 'fallen/cli'
+require 'yaml'
+require 'monkey-mailer/email'
+require 'monkey-mailer/adapter'
+require 'monkey-mailer/loader'
+require 'monkey-mailer/config'
+
+module MonkeyMailer
+  extend Fallen
+
+  def self.extended(base)
+    base.extend(Fallen)
+  end
+
+  @@normal_sleep = 0
+  @@low_sleep = 0
+
+  def self.find_and_deliver
+    emails = []
+
+    #Urgent emails
+    emails.concat loader.find_emails(:urgent, MonkeyMailer.configuration.urgent_quota)
+
+    if(@@normal_sleep == configuration.normal_sleep)
+      emails.concat loader.find_emails(:normal, MonkeyMailer.configuration.normal_quota)
+      @@normal_sleep = 0
+    else
+      @@normal_sleep += 1
+    end
+
+    if(@@low_sleep == configuration.low_sleep)
+      emails.concat loader.find_emails(:low, MonkeyMailer.configuration.low_quota)
+      @@low_sleep = 0
+    else
+      @@low_sleep += 1
+    end
+
+    send_emails(emails)
+  end
+
+  def run
+    while running?
+      MonkeyMailer.find_and_deliver
+      sleep MonkeyMailer.configuration.sleep
+    end
+  end
+end

data/lib/monkey-mailer/adapter.rb

@@ -0,0 +1,33 @@
+require 'monkey-mailer/adapters/dummy'
+require 'monkey-mailer/adapters/mandrilapi'
+require 'monkey-mailer/adapters/smtp'
+
+module MonkeyMailer
+
+  def self.adapter
+    @@adapter ||= register_adapter
+  end
+
+  def self.reset_adapter
+    @@adapter = nil
+  end
+
+  def self.send_emails(emails)
+    emails.each do |email|
+      begin
+        adapter.send_email(email)
+        loader.delete_email(email)
+      rescue DeliverError => e
+        puts e.message
+        puts e.backtrace
+      end
+    end
+  end
+
+  class DeliverError < StandardError; end
+
+  private
+  def self.register_adapter
+    @@adapter = MonkeyMailer.configuration.adapter.new(MonkeyMailer.configuration.adapter_options)
+  end
+end

data/lib/monkey-mailer/adapters/dummy.rb

@@ -0,0 +1,13 @@
+module MonkeyMailer
+  module Adapters
+    class Dummy
+
+      def initialize(options)
+      end
+
+      def send_email(email)
+        puts email.inspect
+      end
+    end
+  end
+end

data/lib/monkey-mailer/adapters/mandrilapi.rb

@@ -0,0 +1,61 @@
+require "net/http"
+require "uri"
+require "json"
+
+module MonkeyMailer
+  module Adapters
+    class MandrilAPI
+      @key = ''
+      @request = {}
+      @uri = ''
+
+      ENDPOINT = 'https://mandrillapp.com/api/1.0'
+
+      def initialize(options)
+        @key = options[:mandril_api_key]
+        @request = Hash.new
+        @uri = URI.parse(URI.encode(ENDPOINT))
+      end
+
+      def send_email(email)
+
+        @request = {
+          :key => '',
+          :message => {
+            :html => '',
+            :text => '',
+            :subject => '',
+            :from_email => '',
+            :from_name => '',
+            :to => [],
+            :headers => {},
+            :track_opens => true,
+            :track_clicks => true,
+            :auto_text => true,
+            :url_strip_qs => true,
+            :preserve_recipients => false,
+            :bcc_address => '',
+          },
+          :async => true
+        }
+
+        @request[:key] = @key
+        @request[:message][:to] << { :email => email.to_email, :name => email.to_name}
+        @request[:message][:from_name] = email.from_name
+        @request[:message][:from_email] = email.from_email
+        @request[:message][:html] = email.body
+        @request[:message][:text] = email.body.gsub(/<\/?[^>]*>/, "")
+        @request[:message][:subject] = email.subject
+
+        req = Net::HTTP::Post.new('/api/1.0/messages/send.json', initheader = {'Content-Type' =>'application/json'})
+        req.body = @request.to_json
+
+        http = Net::HTTP.new(@uri.host, @uri.port)
+        http.use_ssl = true
+        response = http.start {|http| http.request(req)}
+        raise MonkeyMailer::DeliverError.new("Mandril response.code not equal to 200") unless response.code.to_i == 200
+        puts "Response #{response.code} #{response.message}: #{response.body}"
+      end
+    end
+  end
+end

data/lib/monkey-mailer/adapters/smtp.rb

@@ -0,0 +1,39 @@
+require 'mail'
+
+module MonkeyMailer
+  module Adapters
+    class Smtp
+
+      # Options
+      # :address => 'smtp.mandrillapp.com',
+      # :port => 587,
+      # :domain => 'example.com',
+      # :user_name => 'user',
+      # :password => 'password',
+      # :authentication => 'plain',
+      # :enable_starttls_auto => true
+      def initialize(options)
+        Mail.defaults do
+          delivery_method :smtp, options.inject({}){|memo,(k,v)| memo[k.to_sym] = v; memo}
+        end
+      end
+
+      def send_email(email)
+        Mail.deliver do
+          to "#{email.to_name} <#{email.to_email}>"
+          from "#{email.from_name} <#{email.from_email}>"
+          subject email.subject
+
+          html_part do
+            content_type 'text/html; charset=UTF-8'
+            body email.body
+          end
+
+          text_part do
+            body email.body.gsub(/<\/?[^>]*>/, "")
+          end
+        end
+      end
+    end
+  end
+end

data/lib/monkey-mailer/config.rb

@@ -0,0 +1,34 @@
+module MonkeyMailer
+
+  def self.configuration
+    @@configuration ||= Configuration.new
+  end
+
+  def self.configure
+    yield configuration
+  end
+
+  class Configuration
+
+    attr_accessor :urgent_quota, :normal_quota, :low_quota, :normal_sleep,
+    :low_sleep, :sleep, :loader, :loader_options, :adapter, :adapter_options
+
+    @@defaults = {
+      :urgent_quota => 100,
+      :normal_quota => 100,
+      :low_quota => 100,
+      :low_quota => 1,
+      :normal_sleep => 12,
+      :low_sleep => 54,
+      :sleep => 5,
+      :loader => MonkeyMailer::Loaders::Dummy,
+      :loader_options => {},
+      :adapter => MonkeyMailer::Adapters::Dummy,
+      :adapter_options => {}
+    }
+
+    def initialize
+      @@defaults.each_pair{|key, value| self.send("#{key}=".to_sym,value)}
+    end
+  end
+end

data/lib/monkey-mailer/email.rb

@@ -0,0 +1,12 @@
+module MonkeyMailer
+  class Email
+
+    attr_accessor :priority, :to_email, :to_name, :from_email, :from_name, :body, :subject
+
+    def initialize(hash=nil)
+      unless hash.nil?
+        hash.each_pair{|key, value| self.send("#{key}=", value)}
+      end
+    end
+  end
+end

data/lib/monkey-mailer/loader.rb

@@ -0,0 +1,17 @@
+require 'monkey-mailer/loaders/dummy'
+
+module MonkeyMailer
+
+  def self.loader
+    @@loader ||= register_loader
+  end
+
+  def self.reset_loader
+    @@loader = nil
+  end
+
+  private
+  def self.register_loader
+    @@loader = MonkeyMailer.configuration.loader.new(MonkeyMailer.configuration.loader_options)
+  end
+end

data/lib/monkey-mailer/loaders/dummy.rb

@@ -0,0 +1,20 @@
+module MonkeyMailer::Loaders
+  class Dummy
+
+    def initialize(opts)
+    end
+
+    def find_emails(priority, quota)
+      emails = []
+      quota.times do
+        emails << MonkeyMailer::Email.new(:priority => priority, :to_email => 'info@example.com', :to_name => 'Example user',
+          :from_email => 'noreply@example.com', :from_name => 'No reply', :subject => 'Lorem ipsum', :body => '')
+      end
+      emails
+    end
+
+    def delete_email(email)
+      email = nil
+    end
+  end
+end

data/lib/monkey-mailer/version.rb

@@ -0,0 +1,3 @@
+module MonkeyMailer
+  VERSION = "0.0.2"
+end

data/monkey-mailer.gemspec

@@ -0,0 +1,23 @@
+# encoding: utf-8
+$:.push File.expand_path("../lib", __FILE__)
+require "monkey-mailer/version"
+
+Gem::Specification.new do |spec|
+  spec.name          = "monkey-mailer"
+  spec.authors       = ["Lautaro Orazi", "Federico Saravia Barrantes"]
+  spec.email         = ["fedesaravia+monkey-mailer@gmail.com"]
+  spec.description   = %q{Ruby email queueing system with priority handling}
+  spec.summary       = %q{Ruby email queueing system with priority handling}
+  spec.homepage      = "https://github.com/fsaravia/monkey-mailer/"
+  spec.version       = MonkeyMailer::VERSION
+  spec.license       = "UNLICENSE"
+
+  spec.files         = `git ls-files`.split("\n")
+  spec.test_files    = `git ls-files -- spec/*`.split("\n")
+  spec.require_paths = ["lib"]
+
+  spec.add_dependency 'clap', '>= 1.0.0'
+  spec.add_dependency 'fallen', '>= 0.0.2'
+  spec.add_dependency 'mail', '>= 2.4.4'
+  spec.add_development_dependency 'rspec', '>= 2.12.0'
+end

data/spec/adapter_spec.rb

@@ -0,0 +1,29 @@
+require_relative 'spec_helper'
+
+describe MonkeyMailer do
+  describe 'Adapter' do
+
+    before :all do
+      MonkeyMailer.configure do |config|
+        config.adapter = MonkeyMailer::Adapters::Dummy
+      end
+    end
+
+    after :each do
+      MonkeyMailer.reset_adapter
+    end
+
+    it 'should register a new adapter when called' do
+      MonkeyMailer.reset_adapter
+      MonkeyMailer.stub(:adapter, {})
+      MonkeyMailer.adapter.should be_nil
+      MonkeyMailer.unstub(:adapter)
+      MonkeyMailer.adapter.respond_to?(:send_email).should be_true
+    end
+
+    it 'should not register the adapter if one has been already registered' do
+      MonkeyMailer.class_variable_set(:@@adapter, MonkeyMailer::Adapters::TestAdapter.new)
+      MonkeyMailer.adapter.should be_an_instance_of MonkeyMailer::Adapters::TestAdapter
+    end
+  end
+end

data/spec/loader_spec.rb

@@ -0,0 +1,33 @@
+require_relative 'spec_helper'
+
+describe MonkeyMailer do
+  describe 'loader' do
+
+    before :all do
+      @current_loader = MonkeyMailer.loader
+    end
+
+    after :each do
+      MonkeyMailer.reset_loader
+    end
+
+    after :all do
+      # Other tests may be using the previous set up loader and databasecleaner will drop the db objects
+      # If tests get executed with a certain seed
+      MonkeyMailer.class_variable_set(:@@loader, @current_loader)
+    end
+
+    it 'should register a new loader when called' do
+      MonkeyMailer.reset_loader
+      MonkeyMailer.stub(:loader, {})
+      MonkeyMailer.loader.should be_nil
+      MonkeyMailer.unstub(:loader)
+      MonkeyMailer.loader.should be_an_instance_of MonkeyMailer::Loaders::Dummy
+    end
+
+    it 'should not register the loader if one has been already registered' do
+      MonkeyMailer.class_variable_set(:@@loader, MonkeyMailer::Loaders::FakeLoader.new({}))
+      MonkeyMailer.loader.should be_an_instance_of MonkeyMailer::Loaders::FakeLoader
+    end
+  end
+end

data/spec/postman_spec.rb

@@ -0,0 +1,132 @@
+require_relative 'spec_helper'
+
+describe MonkeyMailer do
+
+  before :all do
+    MonkeyMailer.configure do |config|
+      config.urgent_quota = 10
+      config.normal_quota = 1
+      config.low_quota = 2
+      config.normal_sleep = 1
+      config.low_sleep = 2
+      config.loader = MonkeyMailer::Loaders::FakeLoader
+    end
+  end
+
+  after :all do
+    MonkeyMailer.class_variable_set(:@@configuration, nil)
+  end
+
+  before :each do
+    MonkeyMailer.reset_loader
+    MonkeyMailer.configuration.loader_options = {:urgent => [], :normal => [], :low => []}
+    @adapter = MonkeyMailer::Adapters::TestAdapter.new
+    MonkeyMailer.class_variable_set(:@@adapter, @adapter)
+    MonkeyMailer.class_variable_set(:@@normal_sleep, 0)
+    MonkeyMailer.class_variable_set(:@@low_sleep, 0)
+  end
+
+  it 'should send urgent emails' do
+    5.times do
+      MonkeyMailer.loader.queue[:urgent] << MonkeyMailer::Email.fake(:urgent)
+    end
+    MonkeyMailer.find_and_deliver
+    @adapter.sent_emails.size.should eq 5
+    MonkeyMailer.loader.queue[:urgent].size.should eq 0
+  end
+
+  it 'should respect the quota for urgent emails' do
+    11.times do
+      MonkeyMailer.loader.queue[:urgent] << MonkeyMailer::Email.fake(:urgent)
+    end
+    MonkeyMailer.find_and_deliver
+    @adapter.sent_emails.size.should eq 10
+    MonkeyMailer.loader.queue_count.should eq 1
+  end
+
+  it 'should send normal priority emails after sleeping once respecting their quota' do
+    4.times do
+      MonkeyMailer.loader.queue[:normal] << MonkeyMailer::Email.fake(:normal)
+    end
+    MonkeyMailer.find_and_deliver
+    @adapter.sent_emails.size.should eq 0
+    MonkeyMailer.find_and_deliver
+    @adapter.sent_emails.size.should eq 1
+    MonkeyMailer.find_and_deliver
+    @adapter.sent_emails.size.should eq 1
+    MonkeyMailer.find_and_deliver
+    @adapter.sent_emails.size.should eq 2
+    MonkeyMailer.loader.queue_count.should eq 2
+  end
+
+  it 'should send low priority emails after sleeping twice respecting their quota' do
+    5.times do
+      MonkeyMailer.loader.queue[:low] << MonkeyMailer::Email.fake(:low)
+    end
+    MonkeyMailer.find_and_deliver
+    @adapter.sent_emails.size.should eq 0
+    MonkeyMailer.find_and_deliver
+    @adapter.sent_emails.size.should eq 0
+    MonkeyMailer.find_and_deliver
+    @adapter.sent_emails.size.should eq 2
+    MonkeyMailer.find_and_deliver
+    @adapter.sent_emails.size.should eq 2
+    MonkeyMailer.find_and_deliver
+    @adapter.sent_emails.size.should eq 2
+    MonkeyMailer.find_and_deliver
+    @adapter.sent_emails.size.should eq 4
+    MonkeyMailer.find_and_deliver
+    @adapter.sent_emails.size.should eq 4
+    MonkeyMailer.find_and_deliver
+    @adapter.sent_emails.size.should eq 4
+    MonkeyMailer.find_and_deliver
+    @adapter.sent_emails.size.should eq 5
+    MonkeyMailer.loader.queue_count.should eq 0
+  end
+
+  it 'should send emails respecting sleep times and priorities' do
+    50.times do
+      MonkeyMailer.loader.queue[:urgent] << MonkeyMailer::Email.fake(:urgent)
+    end
+    30.times do
+      MonkeyMailer.loader.queue[:normal] << MonkeyMailer::Email.fake(:normal)
+    end
+    15.times do
+      MonkeyMailer.loader.queue[:low] << MonkeyMailer::Email.fake(:low)
+    end
+    MonkeyMailer.loader.queue_count.should eq 95
+    MonkeyMailer.find_and_deliver #Should send only 10 urgent emails
+    @adapter.sent_emails.size.should eq 10
+    MonkeyMailer.loader.queue[:urgent].size.should eq 40
+    MonkeyMailer.find_and_deliver #Should send 10 urgent emails and 1 normal email
+    @adapter.sent_emails.size.should eq 21
+    MonkeyMailer.loader.queue[:urgent].size.should eq 30
+    MonkeyMailer.loader.queue[:normal].size.should eq 29
+    MonkeyMailer.find_and_deliver #Should send 10 urgent emails and 2 low emails
+    @adapter.sent_emails.size.should eq 33
+    MonkeyMailer.loader.queue[:urgent].size.should eq 20
+    MonkeyMailer.loader.queue[:low].size.should eq 13
+    MonkeyMailer.find_and_deliver #Should send 10 urgent emails and 1 normal email
+    @adapter.sent_emails.size.should eq 44
+    MonkeyMailer.loader.queue[:urgent].size.should eq 10
+    MonkeyMailer.loader.queue[:normal].size.should eq 28
+    MonkeyMailer.find_and_deliver #Should send only 10 urgent emails
+    @adapter.sent_emails.size.should eq 54
+    MonkeyMailer.loader.queue[:urgent].size.should eq 0
+    MonkeyMailer.find_and_deliver #Should send 1 normal email and 2 low emails
+    @adapter.sent_emails.size.should eq 57
+    MonkeyMailer.loader.queue[:normal].size.should eq 27
+    MonkeyMailer.loader.queue[:low].size.should eq 11
+    MonkeyMailer.loader.queue_count.should eq 38
+  end
+
+  it 'should not delete the email if delivery failed' do
+    MonkeyMailer.reset_adapter
+    MonkeyMailer.configuration.adapter = MonkeyMailer::Adapters::AngryAdapter
+    MonkeyMailer.loader.queue[:urgent] << MonkeyMailer::Email.fake(:urgent)
+    previous_stdout, $stdout = $stdout, StringIO.new #Redirect stdout to avoid seeing backtrace on console
+    MonkeyMailer.find_and_deliver
+    $stdout = previous_stdout
+    MonkeyMailer.loader.queue_count.should eq 1
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,12 @@
+require 'monkey-mailer'
+
+Dir[::File.join(File.dirname(__FILE__), "support/**/*.rb")].each { |f| require f }
+
+RSpec.configure do |config|
+
+  config.order = "random"
+
+  config.before(:suite) do
+    MonkeyMailer.loader
+  end
+end

data/spec/support/angry_adapter.rb

@@ -0,0 +1,11 @@
+module MonkeyMailer::Adapters
+  class AngryAdapter
+
+    def initialize(args=nil)
+    end
+
+    def send_email(email)
+      raise MonkeyMailer::DeliverError, "Just testing, don't panic"
+    end
+  end
+end

data/spec/support/email_faker.rb

@@ -0,0 +1,9 @@
+module MonkeyMailer
+  class Email
+
+    def self.fake(priority = nil)
+      priority ||= [:urgent, :normal, :low].sample
+      Email.new({:priority => priority})
+    end
+  end
+end

data/spec/support/fake_loader.rb

@@ -0,0 +1,22 @@
+module MonkeyMailer::Loaders
+  class FakeLoader
+
+    attr_accessor :queue
+
+    def initialize(initial_queue)
+      @queue = initial_queue
+    end
+
+    def find_emails(priority, quota)
+      @queue[priority].sample(quota)
+    end
+
+    def delete_email(email)
+      @queue[email.priority].delete(email)
+    end
+
+    def queue_count
+      @queue.values.flatten.size
+    end
+  end
+end

data/spec/support/test_adapter.rb

@@ -0,0 +1,14 @@
+module MonkeyMailer::Adapters
+  class TestAdapter
+
+    attr_accessor :sent_emails
+
+    def initialize(args=nil)
+      @sent_emails = []
+    end
+
+    def send_email(email)
+      @sent_emails << email
+    end
+  end
+end

metadata

@@ -0,0 +1,133 @@
+--- !ruby/object:Gem::Specification
+name: monkey-mailer
+version: !ruby/object:Gem::Version
+  version: 0.0.2
+platform: ruby
+authors:
+- Lautaro Orazi
+- Federico Saravia Barrantes
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2013-12-12 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: clap
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 1.0.0
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 1.0.0
+- !ruby/object:Gem::Dependency
+  name: fallen
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 0.0.2
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 0.0.2
+- !ruby/object:Gem::Dependency
+  name: mail
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 2.4.4
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 2.4.4
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 2.12.0
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 2.12.0
+description: Ruby email queueing system with priority handling
+email:
+- fedesaravia+monkey-mailer@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- .gitignore
+- Gemfile
+- README.md
+- UNLICENSE
+- examples/dummy_postman.rb
+- lib/monkey-mailer.rb
+- lib/monkey-mailer/adapter.rb
+- lib/monkey-mailer/adapters/dummy.rb
+- lib/monkey-mailer/adapters/mandrilapi.rb
+- lib/monkey-mailer/adapters/smtp.rb
+- lib/monkey-mailer/config.rb
+- lib/monkey-mailer/email.rb
+- lib/monkey-mailer/loader.rb
+- lib/monkey-mailer/loaders/dummy.rb
+- lib/monkey-mailer/version.rb
+- monkey-mailer.gemspec
+- spec/adapter_spec.rb
+- spec/loader_spec.rb
+- spec/postman_spec.rb
+- spec/spec_helper.rb
+- spec/support/angry_adapter.rb
+- spec/support/email_faker.rb
+- spec/support/fake_loader.rb
+- spec/support/test_adapter.rb
+homepage: https://github.com/fsaravia/monkey-mailer/
+licenses:
+- UNLICENSE
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.1.11
+signing_key: 
+specification_version: 4
+summary: Ruby email queueing system with priority handling
+test_files:
+- spec/adapter_spec.rb
+- spec/loader_spec.rb
+- spec/postman_spec.rb
+- spec/spec_helper.rb
+- spec/support/angry_adapter.rb
+- spec/support/email_faker.rb
+- spec/support/fake_loader.rb
+- spec/support/test_adapter.rb