RubyGems - mail_manager - Versions diffs - 0.0.1 - Mend

mail_manager 0.0.1

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.

Files changed (197) hide show

checksums.yaml +15 -0
data/.DS_Store +0 -0
data/.gitignore +20 -0
data/.rspec +1 -0
data/.ruby-gemset +1 -0
data/.ruby-version +1 -0
data/Gemfile +27 -0
data/Guardfile +24 -0
data/LICENSE.txt +22 -0
data/MIT-LICENSE +20 -0
data/Manifest.txt +141 -0
data/Procfile +4 -0
data/README +243 -0
data/README.md +29 -0
data/README.rdoc +3 -0
data/Rakefile +33 -0
data/app/.DS_Store +0 -0
data/app/assets/javascripts/mail_manager/application.js +15 -0
data/app/assets/stylesheets/mail_manager/application.css +13 -0
data/app/controllers/mail_manager/application_controller.rb +4 -0
data/app/controllers/mail_manager/base_controller.rb +22 -0
data/app/controllers/mail_manager/bounces_controller.rb +32 -0
data/app/controllers/mail_manager/contacts_controller.rb +75 -0
data/app/controllers/mail_manager/mailing_lists_controller.rb +49 -0
data/app/controllers/mail_manager/mailings_controller.rb +102 -0
data/app/controllers/mail_manager/messages_controller.rb +30 -0
data/app/controllers/mail_manager/subscriptions_controller.rb +104 -0
data/app/helpers/mail_manager/application_helper.rb +4 -0
data/app/helpers/mail_manager/subscriptions_helper.rb +8 -0
data/app/models/.DS_Store +0 -0
data/app/models/mail_manager.rb +12 -0
data/app/models/mail_manager/bounce.rb +133 -0
data/app/models/mail_manager/contact.rb +91 -0
data/app/models/mail_manager/contactable_registry.rb +190 -0
data/app/models/mail_manager/mailable_registry.rb +127 -0
data/app/models/mail_manager/mailer.rb +267 -0
data/app/models/mail_manager/mailing.rb +266 -0
data/app/models/mail_manager/mailing_list.rb +36 -0
data/app/models/mail_manager/message.rb +127 -0
data/app/models/mail_manager/subscription.rb +126 -0
data/app/models/mail_manager/test_message.rb +175 -0
data/app/models/status_history.rb +60 -0
data/app/views/layouts/mail_manager/application.html.erb +14 -0
data/app/views/mail_manager/bounces/_email_parts.html.erb +30 -0
data/app/views/mail_manager/bounces/index.html.erb +32 -0
data/app/views/mail_manager/bounces/show.html.erb +38 -0
data/app/views/mail_manager/contacts/_form.html.erb +27 -0
data/app/views/mail_manager/contacts/double_opt_in.html.erb +1 -0
data/app/views/mail_manager/contacts/edit.html.erb +12 -0
data/app/views/mail_manager/contacts/index.html.erb +86 -0
data/app/views/mail_manager/contacts/new.html.erb +9 -0
data/app/views/mail_manager/contacts/show.html.erb +22 -0
data/app/views/mail_manager/contacts/subscribe.html.erb +2 -0
data/app/views/mail_manager/contacts/thank_you.html.erb +12 -0
data/app/views/mail_manager/help/_available_email_substitutions.html.erb +5 -0
data/app/views/mail_manager/mailer/double_opt_in.erb +6 -0
data/app/views/mail_manager/mailer/unsubscribed.erb +5 -0
data/app/views/mail_manager/mailer/unsubscribed.html.erb +5 -0
data/app/views/mail_manager/mailing_lists/_form.html.erb +20 -0
data/app/views/mail_manager/mailing_lists/edit.html.erb +13 -0
data/app/views/mail_manager/mailing_lists/index.html.erb +39 -0
data/app/views/mail_manager/mailing_lists/new.html.erb +9 -0
data/app/views/mail_manager/mailing_lists/show.html.erb +13 -0
data/app/views/mail_manager/mailings/_form.html.erb +81 -0
data/app/views/mail_manager/mailings/edit.html.erb +12 -0
data/app/views/mail_manager/mailings/index.html.erb +52 -0
data/app/views/mail_manager/mailings/new.html.erb +9 -0
data/app/views/mail_manager/mailings/show.html.erb +28 -0
data/app/views/mail_manager/mailings/test.html.erb +12 -0
data/app/views/mail_manager/messages/index.html.erb +37 -0
data/app/views/mail_manager/subscriptions/_form.html.erb +37 -0
data/app/views/mail_manager/subscriptions/_subscriptions.html.erb +13 -0
data/app/views/mail_manager/subscriptions/edit.html.erb +11 -0
data/app/views/mail_manager/subscriptions/index.html.erb +32 -0
data/app/views/mail_manager/subscriptions/new.html.erb +9 -0
data/app/views/mail_manager/subscriptions/show.html.erb +8 -0
data/app/views/mail_manager/subscriptions/unsubscribe.html.erb +2 -0
data/app/views/mail_manager/subscriptions/unsubscribe_by_email_address.html.erb +13 -0
data/config/daemons.yml +5 -0
data/config/routes.rb +43 -0
data/db/migrate/001_mail_mgr_initial.rb +84 -0
data/db/migrate/002_mail_mgr_create_contact.rb +60 -0
data/db/migrate/003_mail_mgr_test_message.rb +23 -0
data/db/migrate/004_add_deleted_at_to_mailing_lists.rb +15 -0
data/db/migrate/005_contacts_deleted_at.rb +15 -0
data/db/migrate/006_mail_mgr_mailing_list_add_defaults_to_active.rb +15 -0
data/db/migrate/007_mail_mgr_message_add_from_email_address.rb +15 -0
data/db/mlm_migrate/001_mlm_initial.rb +67 -0
data/db/mlm_migrate/002_mailable_as_polymorphic.rb +27 -0
data/db/mlm_migrate/003_contact_as_polymorphic.rb +64 -0
data/db/mlm_migrate/004_bounce_mlm_mailing_id.rb +26 -0
data/db/mlm_migrate/005_mlm_to_mail_mgr_scoped.rb +29 -0
data/engine_plan.rb +13 -0
data/features/bounce_management.feature +0 -0
data/features/contact_management.feature +24 -0
data/features/mailable.feature +23 -0
data/features/mailing_management.feature +78 -0
data/features/message.feature +11 -0
data/features/step_definitions/email_steps.rb +50 -0
data/features/step_definitions/mlm_steps.rb +11 -0
data/features/step_definitions/pickle_steps.rb +41 -0
data/features/step_definitions/webrat_steps.rb +115 -0
data/features/subscription_management.feature +17 -0
data/features/support/env.rb +31 -0
data/features/support/paths.rb +44 -0
data/lib/daemons/mail_manager.rb +38 -0
data/lib/daemons/mail_manager_ctl +15 -0
data/lib/deleteable.rb +50 -0
data/lib/lock.rb +36 -0
data/lib/mail_manager.rb +5 -0
data/lib/mail_manager/config.rb +50 -0
data/lib/mail_manager/engine.rb +43 -0
data/lib/mail_manager/version.rb +3 -0
data/lib/tasks/mail_manager.rake +143 -0
data/lib/tasks/mail_manager_tasks.rake +4 -0
data/lib/tasks/rspec.rake +165 -0
data/lib/workers/mail_manager/bounce_job.rb +52 -0
data/lib/workers/mail_manager/mailing_job.rb +30 -0
data/lib/workers/mail_manager/message_job.rb +38 -0
data/lib/workers/mail_manager/test_message_job.rb +37 -0
data/mail_manager.gemspec +29 -0
data/script/rails +8 -0
data/spec/rcov.opts +2 -0
data/spec/spec.opts +4 -0
data/spec/spec_helper.rb +47 -0
data/spec/test_app/README.rdoc +261 -0
data/spec/test_app/Rakefile +7 -0
data/spec/test_app/app/assets/javascripts/application.js +15 -0
data/spec/test_app/app/assets/javascripts/users.js +2 -0
data/spec/test_app/app/assets/stylesheets/application.css +13 -0
data/spec/test_app/app/assets/stylesheets/scaffold.css +56 -0
data/spec/test_app/app/assets/stylesheets/users.css +4 -0
data/spec/test_app/app/controllers/application_controller.rb +3 -0
data/spec/test_app/app/controllers/users_controller.rb +83 -0
data/spec/test_app/app/helpers/application_helper.rb +2 -0
data/spec/test_app/app/helpers/users_helper.rb +2 -0
data/spec/test_app/app/models/user.rb +13 -0
data/spec/test_app/app/views/layouts/application.html.erb +14 -0
data/spec/test_app/app/views/users/_form.html.erb +33 -0
data/spec/test_app/app/views/users/edit.html.erb +6 -0
data/spec/test_app/app/views/users/index.html.erb +29 -0
data/spec/test_app/app/views/users/new.html.erb +5 -0
data/spec/test_app/app/views/users/show.html.erb +25 -0
data/spec/test_app/config.ru +4 -0
data/spec/test_app/config/application.rb +65 -0
data/spec/test_app/config/boot.rb +10 -0
data/spec/test_app/config/database.yml +25 -0
data/spec/test_app/config/environment.rb +14 -0
data/spec/test_app/config/environments/development.rb +37 -0
data/spec/test_app/config/environments/production.rb +67 -0
data/spec/test_app/config/environments/test.rb +37 -0
data/spec/test_app/config/initializers/backtrace_silencers.rb +7 -0
data/spec/test_app/config/initializers/inflections.rb +15 -0
data/spec/test_app/config/initializers/mime_types.rb +5 -0
data/spec/test_app/config/initializers/secret_token.rb +7 -0
data/spec/test_app/config/initializers/session_store.rb +8 -0
data/spec/test_app/config/initializers/wrap_parameters.rb +14 -0
data/spec/test_app/config/locales/en.yml +5 -0
data/spec/test_app/config/lockable.yml +3 -0
data/spec/test_app/config/mail_manager.yml +21 -0
data/spec/test_app/config/routes.rb +7 -0
data/spec/test_app/db/migrate/20131217101010_create_users.rb +13 -0
data/spec/test_app/db/migrate/20131221064151_mail_mgr_initial.rb +84 -0
data/spec/test_app/db/migrate/20131221064152_mail_mgr_create_contact.rb +60 -0
data/spec/test_app/db/migrate/20131221064153_mail_mgr_test_message.rb +23 -0
data/spec/test_app/db/migrate/20131221064154_add_deleted_at_to_mailing_lists.rb +15 -0
data/spec/test_app/db/migrate/20131221064155_contacts_deleted_at.rb +15 -0
data/spec/test_app/db/migrate/20131221064156_mail_mgr_mailing_list_add_defaults_to_active.rb +15 -0
data/spec/test_app/db/migrate/20131221064157_mail_mgr_message_add_from_email_address.rb +15 -0
data/spec/test_app/db/migrate/20131221072600_create_delayed_jobs.rb +22 -0
data/spec/test_app/db/schema.rb +131 -0
data/spec/test_app/db/structure.sql +31 -0
data/spec/test_app/public/404.html +26 -0
data/spec/test_app/public/422.html +26 -0
data/spec/test_app/public/500.html +25 -0
data/spec/test_app/public/favicon.ico +0 -0
data/spec/test_app/script/delayed_job +5 -0
data/spec/test_app/script/lockable +36 -0
data/spec/test_app/script/rails +6 -0
data/spec/test_app/spec/controllers/users_controller_spec.rb +160 -0
data/spec/test_app/spec/factories/mailing_lists.rb +7 -0
data/spec/test_app/spec/factories/mailings.rb +6 -0
data/spec/test_app/spec/factories/original_factories.rb.txt +107 -0
data/spec/test_app/spec/factories/users.rb +10 -0
data/spec/test_app/spec/models/mail_manager/bounce_spec.rb +17 -0
data/spec/test_app/spec/models/mail_manager/mailing_list_spec.rb +15 -0
data/spec/test_app/spec/models/user_spec.rb +37 -0
data/spec/test_app/spec/requests/users_spec.rb +11 -0
data/spec/test_app/spec/routing/users_routing_spec.rb +35 -0
data/spec/test_app/spec/support/database_cleaner.rb +23 -0
data/spec/test_app/spec/support/files/bad_utf8_chars.eml +32 -0
data/spec/test_app/spec/views/users/edit.html.erb_spec.rb +24 -0
data/spec/test_app/spec/views/users/index.html.erb_spec.rb +29 -0
data/spec/test_app/spec/views/users/new.html.erb_spec.rb +24 -0
data/spec/test_app/spec/views/users/show.html.erb_spec.rb +21 -0
data/zeus.json +22 -0
metadata +424 -0

data/app/models/mail_manager/mailable_registry.rb ADDED Viewed

@@ -0,0 +1,127 @@
+=begin rdoc
+Author::    Chris Hauboldt (mailto:biz@lnstar.com)
+Copyright:: 2009 Lone Star Internet Inc.
+This class supplies the method for things to be "mailable" from the mailing list manager. Mailable things
+need to be able to be found, have a distinguishable name, have "parts" which contain content for the email and
+register themselves in initialization code. Below is a sample model class and its initialization code.
+NOTE!!! you should order the parts in the order you would like them to be placed in the email... the last one seems to be the prefered type of many email clients, although some will have preference settings. In general put the one you want them to see last.
+  class Mailable < ActiveRecord::Base
+    named_scope :active, :conditions => ['deleted_at is null and published_at<?',Time.now.utc]
+    def name
+      name + created_at
+    end
+    def email_html
+      "<html><body>Hello World!</body></html>"
+    end
+    def email_text
+      "Hello World!"
+    end
+  end
+  begin
+    require 'mailable'
+    MailableRegistry.register(MyMailable,{
+      :find_mailables => :active,
+      :name => :name,
+      :parts => [
+        ['text/plain' => :email_text],
+        ['text/html' => :email_html]
+      ]
+    })
+    Rails.logger.warn "Registered Newsletter Mailable"
+  rescue => e
+    Rails.logger.warn "Couldn't register Newsletter Mailable #{e.message}"
+  end
+--
+=end
+module MailManager
+  class MailableRegistry
+    attr_reader :mailable_things
+=begin rdoc
+    Registers a class as a "mailable" item.
+    Parameters::
+      klass => Class constant to be registered
+      methods => a hash which maps :find, :name, and mime type to methods; :parts {'mime-type' => :method}
+    Example Useage:
+      you may want to wrap your register in a rescue block if you don't know whether or not the
+      mailing list manager exists in your current project.
+      begin
+        require 'mail_manager/mailable_registry'
+        MailableRegistry.register(MyMailable,{
+          :find_mailables => :active,
+          :name => :name,
+          :parts => [
+            ['text/plain' => :email_text],
+            ['text/html' => :email_html]
+          ]
+        })
+        Rails.logger.debug "Registered Newsletter Mailable"
+      rescue => e
+        Rails.logger.debug "Couldn't register Newsletter Mailable #{e.message}"
+      end
+=end
+    def self.register(klass,methods={})
+      Rails.logger.warn "Registered Mailable: #{klass.inspect} - #{methods.inspect}"
+      @@mailable_things.merge!({klass => methods})
+    end
+=begin rdoc
+    Finds available mailable items by searching through all registered mailables, calling their finders and sorting by name.
+=end
+    def self.find
+      mailable_items = []
+      @@mailable_things.each_pair do |thing,methods|
+        Rails.logger.debug "Gathering #{thing} mailables with #{methods[:find_mailables]}"
+        mailable_items += thing.constantize.send(methods[:find_mailables])
+      end
+      mailable_items.sort{|a,b| a.name <=> b.name}
+    end
+    protected
+    # -- holds registrations of mailables
+    @@mailable_things = Hash.new
+    def self.mailable_things
+      @@mailable_things
+    end
+    module Mailable
+      def mailable_initialize_parts
+        @mailable_parts = []
+        MailableRegistry.mailable_things[self.class.name][:parts].each{|part,method|
+          @mailable_parts << [part, send(method)]
+        }
+        @mailable_parts
+      end
+      def mailable_value(method)
+        return send(method) unless MailableRegistry.mailable_things[self.class.name] and
+          MailableRegistry.mailable_things[self.class.name][method]
+        send(MailableRegistry.mailable_things[self.class.name][method])
+      end
+      def mailable_parts
+        return @mailable_parts unless @mailable_parts.nil?
+        mailable_initialize_parts
+      end
+      def self.included(base)
+        base.class_eval do
+          has_many :mailings, :as => :mailable, :class_name => "MailManager::Mailing"
+        end
+      end
+    end
+  end
+end

data/app/models/mail_manager/mailer.rb ADDED Viewed

@@ -0,0 +1,267 @@
+=begin rdoc
+Author::    Chris Hauboldt (mailto:biz@lnstar.com)
+Copyright:: 2009 Lone Star Internet Inc.
+This class is responsible for actually sending email messages... its mostly just an ActionMailer, but also has the added functionality to send messages with inline images.
+Messages:
+unsubscribed - sends an email to notify the user that they have been removed
+message - sends and Message
+test_mailing - sends a test message for a mailing
+mail - knows how to send any message based on the different "mime" parts its given
+=end
+require 'net/http'
+require 'uri'
+require "base64"
+begin
+  require "mini_magick"
+rescue => e
+  require 'rmagick' rescue nil
+end
+module MailManager
+  class Mailer < ActionMailer::Base
+    def unsubscribed(message,subscriptions)
+      @contact = message.contact
+      @recipients = @contact.email_address
+      @from = message.from_email_address
+      @message = message
+      @mailing_lists = subscriptions.reject{|subscription| subscription.mailing_list.nil?}.
+        collect{|subscription| subscription.mailing_list.name}
+      @subject = "Unsubscribed from #{@mailing_lists.join(',')} at #{MailManager.site_url}"
+      Rails.logger.debug "Really Sending Unsubscribed from #{@mailing_lists.first} to #{@contact.email_address}"
+      mail(to: @recipients, from: @from, subject: @subject)
+    end
+    # we do special junk ... so lets make them class methods
+    class << self
+      def deliver_message(message)
+        self.send_mail(message.subject,message.email_address_with_name,message.from_email_address,
+          message.parts,message.guid,message.mailing.include_images?)
+      end
+      def multipart_with_inline_images(subject,to_email_address,from_email_address,the_parts,message_id=nil,include_images=true)
+        text_source = the_parts.first[1];nil
+        original_html_source = the_parts.last[1];nil
+        mail = Mail.new do
+          to            to_email_address
+          from          from_email_address
+          subject       subject
+          part :content_type => "multipart/alternative", :content_disposition => "inline" do |main|
+            main.part :content_type => "text/plain", :body => text_source
+            if include_images
+              main.part :content_type => "multipart/related" do |related|
+                (html_source,images) = MailManager::Mailer::inline_html_with_images(original_html_source)
+                images.each_with_index do |image,index|
+                  related.attachments.inline[image[:filename]] = {
+                    :content_id => image[:cid],
+                    :content => image[:content]
+                  }
+                  html_source.gsub!(image[:cid],related.attachments[index].cid)
+                end
+                related.part :content_type => "text/html; charset=UTF-8", :body => html_source
+              end
+            else
+              main.part :content_type => "text/html; charset=UTF-8", :body => original_html_source
+            end
+          end
+        end
+        mail
+      end
+      def multipart_alternative_without_images(subject,to_email_address,from_email_address,the_parts,message_id=nil,include_images=true)
+        text_source = the_parts.first[1];nil
+        original_html_source = the_parts.last[1];nil
+        mail = Mail.new do
+          to            to_email_address
+          from          from_email_address
+          subject       subject
+          text_part do
+            body text_source
+          end
+          html_part do
+            content_type 'text/html; charset=UTF-8'
+            body original_html_source
+          end
+        end
+        mail
+      end
+      def send_mail(subject,to_email_address,from_email_address,the_parts,message_id=nil,include_images=true)
+        include_images = (include_images and !MailManager.dont_include_images_domains.detect{|domain|
+          to_email_address.strip =~ /#{domain}>?$/})
+        mail = if include_images
+          multipart_with_inline_images(subject,to_email_address,from_email_address,the_parts,message_id,include_images)
+        else
+          multipart_alternative_without_images(subject,to_email_address,from_email_address,the_parts,message_id,include_images)
+        end
+        mail.header['Return-Path'] = MailManager.bounce['email_address']
+        mail.header['X-Bounce-Guid'] = message_id if message_id
+        set_mail_settings(mail)
+        mail.deliver!
+        Rails.logger.info "Sent mail to: #{to_email_address}"
+        Rails.logger.debug mail.to_s
+      end
+      def set_mail_settings(mail)
+        mail.delivery_method ActionMailer::Base.delivery_method.eql?(:letter_opener) ? :test : ActionMailer::Base.delivery_method
+        # letter opener blows up!
+        # Ex set options!
+        #         mail.delivery_method.settings.merge!( {
+        #   user_name: 'bobo',
+        #   password: 'Secret1!',
+        #   address: 'mail.lnstar.com',
+        #   domain: 'mail.lnstar.com',
+        #   enable_starttls_auto: true,
+        #   authentication: :plain,
+        #   port: 587
+        # } )
+        mail.delivery_method.settings.merge!(
+          (case method
+           when :smtp then ActionMailer::Base.smtp_settings
+           when :sendmail then ActionMailer::Base.sendmail_settings
+           else
+             {}
+           end rescue {})
+        )
+      end
+      def inline_attachment(params, &block)
+        params = { :content_type => params } if String === params
+        params = { :disposition => "inline",
+                   :transfer_encoding => "base64" }.merge(params)
+        params[:headers] ||= {}
+        params[:headers]['Content-ID'] = params[:cid]
+        params
+      end
+      def image_mime_types(extension)
+        case extension.downcase
+          when 'bmp' then 'image/bmp'
+          when 'cod' then 'image/cis-cod'
+          when 'gif' then 'image/gif'
+          when 'ief' then 'image/ief'
+          when 'jpe' then 'image/jpeg'
+          when 'jpeg' then 'image/jpeg'
+          when 'jpg' then 'image/jpeg'
+          when 'png' then 'image/png'
+          when 'jfif' then 'image/pipeg'
+          when 'svg' then 'image/svg+xml'
+          when 'tif' then 'image/tiff'
+          when 'tiff' then 'image/tiff'
+        end
+      end
+      def get_extension_from_data(image_data)
+        if defined?(MiniMagick)
+          MiniMagick::Image.read(image_data)[:format] || ''
+        elsif defined?(Magick)
+          Magick::Image.from_blob(image_data).first.format || ''
+        else
+          ''
+        end
+      rescue => e
+        ''
+      end
+      def inline_html_with_images(html_source)
+        parsed_data = html_source.split(/(<\s*img[^>]+src\s*=\s*["'])([^"']*)(["'])/i)
+        images = Array.new
+        final_html = ''
+        image_errors = ''
+        parsed_data.each_with_index do |data,index|
+          if(index % 4 == 2)
+            image = Hash.new()
+            image[:cid] = Base64.encode64(data).gsub(/\s*/,'').reverse[0..59]
+            final_html << "cid:#{image[:cid]}"
+            #only attach new images!
+            next if images.detect{|this_image| this_image[:cid].eql?(image[:cid])}
+            begin
+              image[:content] = fetch(data)
+            rescue => e
+              image_errors += "Couldn't fetch url '#{data}'<!--, #{e.message} - #{e.backtrace.join("\n")}-->\n"
+            end
+            image[:filename] = filename = File.basename(data)
+            extension = filename.gsub(/^.*\./,'').downcase
+            Rails.logger.debug "Fetching Image for: #{filename} #{image[:content].to_s[0..30]}"
+            extension = get_extension_from_data(image[:content]) if image_mime_types(extension).blank?
+            image_errors += "Couldn't find mime type for #{extension} on #{data}" if image_mime_types(extension).blank?
+            image[:content_type] = image_mime_types(extension)
+            images << image
+          else
+            final_html << data
+          end
+        end
+        raise image_errors unless image_errors.eql?('')
+        [final_html,images]
+        # related_part = Mail::Part.new do
+        #   body final_html
+        # end
+        # images.each do |image|
+        #   related_part.part inline_attachment(image)
+        # end
+        # related_part.content_type = 'multipart/related'
+        # related_part
+        # related_part = Mail::Part.new do
+        #   content_type 'multipart/related'
+        #   # content_type 'text/html; charset=UTF-8'
+        #   # body final_html
+        # end
+        # related_part.parts << Mail::Part.new do
+        #   content_type 'text/html; charset=UTF-8'
+        #   body final_html
+        # end
+        # images.each do |image|
+        #   related_part.attachments[image[:filename]] = image[:body]
+        # end
+        # related_part.content_type = 'multipart/related'
+        # related_part.parts.first.content_type = 'text/html; charset=UTF-8'
+        # related_part.parts.first.header['Content-Disposition'] = 'inline'
+      end
+      def local_ips
+        `/sbin/ifconfig`
+      end
+      def request_local?(uri_str)
+        uri = URI.parse(uri_str)
+        ip_address = `host #{uri.host}`.gsub(/.*has address ([\d\.]+)\s.*/m,"\\1")
+        local_ips.include?(ip_address)
+      rescue => e
+        false
+      end
+      def fetch(uri_str, limit = 10)
+        # You should choose better exception.
+        # raise ArgumentError, 'HTTP redirect too deep' if limit == 0
+        # response = Net::HTTP.get_response(URI.parse(uri_str))
+        # case response
+        # when Net::HTTPSuccess     then response.body
+        # when Net::HTTPRedirection then fetch(response['location'], limit - 1)
+        # else
+        #   response.error!
+        # end
+        body = ''
+        Curl.get(uri_str) do |http|
+          http.follow_location = true
+          http.interface = '127.0.0.1' if request_local?(uri_str)
+          http.on_success{|response| body = response.body}
+        end
+        raise Exception.new("Couldn't fetch URL: #{uri_str}") unless body.present?
+        body
+      end
+    end
+  end
+end

data/app/models/mail_manager/mailing.rb ADDED Viewed

@@ -0,0 +1,266 @@
+# encoding: utf-8
+=begin rdoc
+Author::    Chris Hauboldt (mailto:biz@lnstar.com)
+Copyright:: 2009 Lone Star Internet Inc.
+Mailing is used to send a Mailable object to an MailingList. It is 'ready' to send when its status is 'scheduled' and 'shcheduled_at' is in the past. MailingJob will poll for 'ready' Mailings and send them.
+Statuses
+pending - initial state - mailing is waiting to be tested and scheduled - will not send
+scheduled - mailing will be sent when it is 'ready' (its status is 'scheduled' and 'shcheduled_at' is in the past)
+processing - MailingJob is sending the messages for the mailing
+completed - Mailing has been sent
+=end
+module MailManager
+  class Mailing < ActiveRecord::Base
+    self.table_name =  "#{MailManager.table_prefix}mailings"
+    has_many :messages, :class_name => 'MailManager::Message'
+    has_many :test_messages, :class_name => 'MailManager::TestMessage'
+    has_many :bounces, :class_name => 'MailManager::Bounce'
+    has_and_belongs_to_many :mailing_lists, :class_name => 'MailManager::MailingList',
+      :join_table => "#{MailManager.table_prefix}mailing_lists_#{MailManager.table_prefix}mailings"
+    #FIXME why does this break?
+    belongs_to :mailable, :polymorphic => true
+    accepts_nested_attributes_for :mailable
+    attr_accessor :bounce_count
+    validates_presence_of :subject
+    #validates_presence_of :mailable
+    scope :ready, lambda {{:conditions => ["(status='scheduled' AND scheduled_at < ?) OR status='resumed'",Time.now.utc]}}
+    scope :by_statuses, lambda {|*statuses| {:conditions => ["status in (#{statuses.collect{|bindings,status| '?'}.join(",")})",statuses].flatten}}
+    def self.with_bounces(bounce_status=nil)
+      bounce_status_condition = bounce_status.present? ? ActiveRecord::Base.send(:sanitize_sql_array,[" WHERE status=?", bounce_status]) : ''
+      bounce_query = "SELECT mailing_id, COUNT(id) AS count from #{MailManager.table_prefix}bounces #{bounce_status_condition} group by mailing_id"
+      bounce_data = Bounce.connection.execute(bounce_query).inject({}){|hash,(mailing_id,count)| hash.merge(mailing_id => count)}
+      mailings = scoped
+      mailings = mailings.where("id in (#{bounce_data.keys.select(&:present?).join(',')})") if bounce_data.keys.select(&:present?).present?
+      mailings.order("created_at desc").map{|mailing| mailing.bounce_count = bounce_data[mailing.id]; mailing}
+    end
+    include StatusHistory
+    override_statuses(['pending','scheduled','processing','paused','resumed','cancelled','completed'],'pending')
+    before_create :set_default_status
+    attr_protected :id
+    def send_one_off_message(contact)
+      message = Message.new
+      message.contact_id = contact.id
+      message.mailing_id = self.id
+      message.change_status(:ready)
+      message.delay.deliver
+    end
+    def deliver
+      Rails.logger.info "Starting to Process Mailing '#{subject}' ID:#{id}"
+      Lock.with_lock("mail_mgr_mailing_send[#{id}]") do |lock|
+        unless status.to_s.eql?('scheduled')
+          raise Exception.new("Mailing was not scheduled when job tried to run!")
+        end
+        unless scheduled_at <= Time.now
+          Rails.logger.info "Mailing is not scheduled to run until #{scheduled_at} rescheduling job!"
+          self.delay(run_at: scheduled_at).deliver
+          return true
+        end
+        change_status(:processing)
+        initialize_messages
+        messages.pending.each do |message|
+          if reload.status.to_s != 'processing'
+            Rails.logger.warn "Mailing #{id} is no longer in processing status it was changed to #{status} while running"
+            return false
+          end
+	        begin
+            # use the cached mailing parts, set messages mailing to self
+            message.mailing=self
+	          message.change_status(:processing)
+            message.deliver
+	          message.change_status(:sent)
+	        rescue => e
+	          message.result = "Error: #{e.message} - #{e.backtrace.join("\n")}"
+	          message.change_status(:failed)
+	        end
+          Rails.logger.debug "Sleeping #{MailManager.sleep_time_between_messages} before next message"
+          sleep MailManager.sleep_time_between_messages
+        end
+        change_status(:completed) if status.to_s.eql?('processing')
+      end
+    end
+    def mailable
+      return @mailable if @mailable
+      return self unless mailable_type and mailable_id
+      @mailable = mailable_type.constantize.find(mailable_id)
+    end
+    def self.cleanse_source(source)
+      require 'iconv' unless String.method_defined?(:encode)
+      if String.method_defined?(:encode)
+        source.encode!('UTF-16', 'UTF-8', :invalid => :replace, :replace => '')
+        source.encode!('UTF-8', 'UTF-16')
+      else
+        ic = Iconv.new('UTF-8', 'UTF-8//IGNORE')
+        source = ic.iconv(source)
+      end
+    end
+    def self.substitute_values(source,substitutions)
+      substitutions.each_pair do |substitution,value|
+        if value.blank?
+          source.gsub!(/##{substitution}#([^#]*)#/,'\1') rescue source = self.cleanse_source(source).gsub(/##{substitution}#([^#]*)#/,'\1')
+        else
+          source.gsub!(/##{substitution}#[^#]*#/,value.to_s) rescue source = self.cleanse_source(source).gsub(/##{substitution}#[^#]*#/,value.to_s)
+        end
+      end
+      if defined? MailManager::ContactableRegistry.respond_to?(:valid_contactable_substitutions)
+        MailManager::ContactableRegistry.valid_contactable_substitutions.
+          reject{|key| substitutions.keys.include?(key)}.each do |substitution|
+          source.gsub!(/##{substitution}#([^#]*)#/,'\1') rescue source = self.cleanse_source(source).gsub(/##{substitution}#([^#]*)#/,'\1')
+        end
+      end
+      source
+    end
+    def raw_parts
+      @raw_parts ||= mailable.mailable_parts
+    end
+    def parts(substitutions={})
+      parts = []
+      raw_parts.each do |type,source|
+        parts << [type, Mailing.substitute_values(source.dup,substitutions)]
+      end
+      parts
+    end
+    def mailable=(value)
+      return if value.nil?
+      self[:mailable_type] = value.class.name
+      self[:mailable_id] = value.id
+    end
+    def mailable_class_and_id=(value)
+      return if value.nil?
+      parts = value.split(/_/)
+      self[:mailable_id] = parts.pop
+      self[:mailable_type] = parts.join('_')
+    end
+    #def mailable_attributes=(mailable_attributes={})
+    #  mailable_attributes.each_pair do |key,value|
+    #  end
+    #end
+    # creates all of the Messages that will be sent for this mailing
+    def initialize_messages
+      unless messages.length > 0
+        Rails.logger.info "Building mailing messages for mailing(#{id})"
+        transaction do
+          emails_hash = messages.select{|m| m.type.eql?('MailManager::Message')}.inject(Hash.new){|emails_hash,message| emails_hash.merge(Mailing.clean_email_address(message.email_address)=>1)}
+          mailing_lists.each do |mailing_list|
+            mailing_list.subscriptions.active.each do |subscription|
+              contact = subscription.contact
+              next if contact.nil? or contact.deleted?
+              email_address = Mailing.clean_email_address(contact.email_address)
+              if emails_hash.has_key?(email_address)
+                Rails.logger.info "Skipping duplicate address: #{email_address}"
+              else
+                Rails.logger.info "Adding #{email_address} to mailing #{subject}"
+                emails_hash[email_address] = 1
+                message = Message.new
+                message.subscription = subscription
+                message.contact = contact
+                message.mailing = self
+                message.save
+              end
+            end
+          end
+        end
+        save
+      end
+    end
+    # clean up an email address for sending FIXME - maybe do a bit more
+    def self.clean_email_address(email_address)
+      email_address.downcase.strip
+    end
+    # sends a test message for this mailing to the given address
+    def send_test_message(test_email_addresses)
+      test_email_addresses.split(/,/).each do |test_email_address|
+        puts "Creating test message for #{test_email_address}"
+        test_message = TestMessage.new(:test_email_address => test_email_address.strip)
+        test_message.mailing_id = self.id
+        test_message.save
+        test_message.delay.deliver
+      end
+    end
+    # used in select helpers to identify this Mailing's Mailable
+    def mailable_thing_and_id
+      return '' if mailable.nil?
+      return "#{mailable.class.name}_#{mailable.id}"
+    end
+    def mailing_list_ids=(mailing_list_ids)
+      mailing_list_ids.delete('')
+      self.mailing_lists = mailing_list_ids.collect{|mailing_list_id| MailingList.find_by_id(mailing_list_id)}
+    end
+    def can_pause?
+      ['processing'].include?(status.to_s)
+    end
+    def can_edit?
+      ['pending','scheduled','paused'].include?(status.to_s)
+    end
+    def can_cancel?
+       ['pending','scheduled','processing','paused','resumed'].include?(status.to_s)
+    end
+    def can_resume?
+      ['paused'].include?(status.to_s)
+    end
+    def can_schedule?
+      ['pending'].include?(status.to_s)
+    end
+    def schedule
+      raise "Unable to schedule" unless can_schedule?
+      change_status('scheduled')
+      delay(run_at: scheduled_at).deliver
+    end
+    def cancel
+      raise "Unable to cancel" unless can_cancel?
+      change_status('pending')
+      # Delayed::Job.active.find(:all, :conditions => ["handler like ?","MailMgr::Mailing"])
+      #Changing this to return only the jobs that match the id so I don't have to parse with YAML ... seems logical
+      mailing_jobs = Delayed::Job.find(:all, :conditions => ["handler like ?","%MailMgr::Mailing%"] || ["handler like ?", "%id: {job_mailing_id.to_i}\n%"])
+      #mailing_jobs = Delayed::Job.active.find(:all, :conditions => ["handler like ?","%MailMgr::Mailing%"])
+      mailing_jobs.each do |job|
+        #job_mailing_id = YAML::load(job.handler).object.split(':').last
+        #logger.debug "Job mailing id: #{job_mailing_id} - This mailing id: #{self.id} - do they match: #{job_mailing_id.to_i == self.id.to_i}"
+        job.destroy #if job_mailing_id.to_i == self.id.to_i
+      end
+    end
+    def resume
+      raise "Unable to resume" unless can_resume?
+      change_status('resumed')
+    end
+    def pause
+      raise "Unable to pause" unless can_pause?
+      change_status('paused')
+    end
+  end
+end