mailjet 0.0.1

data/Rakefile

@@ -0,0 +1,14 @@
+#!/usr/bin/env rake
+require 'rake/testtask'
+
+$:.push File.expand_path("../lib", __FILE__)
+
+Rake::TestTask.new(:test) do |t|
+  t.libs << 'lib'
+  t.libs << 'test'
+  t.pattern = 'test/**/*_test.rb'
+  t.verbose = true
+end
+
+
+task :default => :test

data/lib/mailjet.rb

@@ -0,0 +1,33 @@
+require 'active_support'
+require 'ostruct'
+require 'mailjet/core_extensions/ostruct'
+require 'mailjet/api'
+require 'mailjet/api_request'
+require 'mailjet/api_error'
+require 'mailjet/configuration'
+require 'mailjet/contact'
+require 'mailjet/list'
+require 'mailjet/campaign'
+require 'mailjet/template_category'
+require 'mailjet/template_model'
+require 'mailjet/reporting'
+require 'mailjet/click'
+require 'mailjet/email'
+
+
+module Mailjet
+  def self.configure
+    yield Mailjet::Configuration
+  end
+
+  def self.config
+    Mailjet::Configuration
+  end
+end
+
+if defined?(ActionMailer)
+  require 'action_mailer/version'
+  require 'mailjet/mailer' if 3 == ActionMailer::VERSION::MAJOR
+end
+
+require 'mailjet/rack/endpoint'

data/lib/mailjet/api.rb

@@ -0,0 +1,20 @@
+module Mailjet
+  class Api
+    def initialize(api_key = Mailjet.config.api_key, secret_key = Mailjet.config.secret_key)
+      @api_key = api_key
+      @secret_key = secret_key
+    end
+
+    def method_missing(method_name, *args, &block)
+      params, request_type = args
+      request = ApiRequest.new(method_name, params, request_type, @api_key, @secret_key)
+      request.response
+    end
+    
+    class << self
+      def singleton
+        @@singleton ||= self.new
+      end
+    end
+  end
+end

data/lib/mailjet/api_error.rb

@@ -0,0 +1,19 @@
+# encoding: utf-8
+require 'active_support'
+
+module Mailjet  
+  class ApiError < StandardError
+    def initialize(code, res, request, request_path, params)
+      # code is ugly, output is pretty
+      super("error #{code} while sending #{request.inspect} to #{request_path} with #{params.inspect}\n\n" + 
+        (res['errors'].present? ? 
+          (res['errors'] || []).map do |param, text|
+            [param, text].map(&:to_s).reject(&:blank?).join(': ')
+          end.join("\n") : 
+          res.inspect
+        ) +
+        "\n\nPlease see http://api.mailjet.com/0.1/HelpStatus for more informations on error numbers.\n\n"
+      )
+    end
+  end
+end

data/lib/mailjet/api_request.rb

@@ -0,0 +1,70 @@
+# encoding: utf-8
+require 'active_support/core_ext/string'
+require 'net/http'
+require "net/https"
+require 'json'
+require 'cgi'
+
+module Mailjet
+  class ApiRequest
+    MAILJET_HOST = 'api.mailjet.com'
+
+    def initialize(method_name, params = {}, request_type = nil, auth_user = Mailjet.config.api_key, auth_password = Mailjet.config.secret_key)
+      @method_name = method_name.to_s.camelize(:lower)
+      @params = (params || {}).merge(:output => 'json')
+      @request_type = (request_type || guess_request_type).camelize
+      @auth_user = auth_user
+      @auth_password = auth_password
+    end
+
+    def response
+      @response ||= begin
+        http = Net::HTTP.new(MAILJET_HOST, request_port)
+        http.use_ssl = Mailjet.config.use_https
+        res = http.request(request)
+        
+        case res
+          when Net::HTTPSuccess
+            JSON.parse(res.body || '{}')
+          when Net::HTTPNotModified
+            {"status" => "NotModified"}
+          else
+            raise ApiError.new(res.code, JSON.parse(res.body.presence || '{}'), request, request_path, @params)
+        end
+      end
+    end
+
+    private
+    def request
+      @request ||= begin
+        req = "Net::HTTP::#{@request_type}".constantize.new(request_path)
+        Net::HTTP::Get
+        req.basic_auth @auth_user, @auth_password
+        req.set_form_data(@params)
+        req
+      end
+    end
+
+    def request_path
+      @request_path ||= begin
+        path = "/#{Mailjet.config.api_version}/#{@method_name}"
+        if @request_type == 'Get'
+          path <<  '?' + @params.collect { |k,v| "#{k}=#{CGI::escape(v.to_s)}" }.join('&')
+        end
+        path
+      end
+    end
+
+    def request_port
+      Mailjet.config.use_https ? 443 : 80
+    end
+
+    def guess_request_type
+      if @method_name =~ /(?:Create|Add|Remove|Delete|Update)(?:[A-Z]|$)/
+        'Post'
+      else
+        'Get'
+      end
+    end
+  end
+end

data/lib/mailjet/campaign.rb

@@ -0,0 +1,62 @@
+require 'mailjet/api'
+require 'mailjet/list'
+require 'mailjet/contact'
+
+module Mailjet
+  class Campaign < OpenStruct
+
+    def update(options = {})
+      (options.delete(:api) || Mailjet::Api.singleton).messageUpdatecampaign(options.reverse_merge(:id => self.id), 'Post')["status"]
+    end
+
+    def contacts(options = {})
+      ((options.delete(:api) || Mailjet::Api.singleton).messageContacts(options.reverse_merge(:id => self.stats_campaign_id))["result"] || []).map do |contact|
+        Mailjet::Contact.new(contact)
+      end
+    end
+
+    def send!(options = {})
+      (options.delete(:api) || Mailjet::Api.singleton).messageSendcampaign(options.reverse_merge(:id => self.id), 'Post')["status"]
+    end
+
+    def test(*params)
+      options = params.last.is_a?(Hash) ? params.pop : {}
+      email = params.first
+      (options.delete(:api) || Mailjet::Api.singleton).messageTestcampaign(options.reverse_merge(:id => self.id, :email => email), 'Post')["status"]
+    end
+
+    def statistics(options = {})
+      (options.delete(:api) || Mailjet::Api.singleton).messageStatistics(options.reverse_merge(:id => self.stats_campaign_id))["result"]
+    end
+
+    def html(options = {})
+      (options.delete(:api) || Mailjet::Api.singleton).messageHtmlcampaign(options.reverse_merge(:id => self.id))["html"]
+    end
+
+    def duplicate(options = {})
+      new_id = (options.delete(:api) || Mailjet::Api.singleton).messageDuplicatecampaign(options.reverse_merge(:id => self.id), 'Post')['new_id']
+      self.class.new(:id => new_id)
+    end
+
+    class << self
+      def create(options = {})
+        campaign_attr = (options.delete(:api) || Mailjet::Api.singleton).messageCreatecampaign(options, 'Post')["campaign"]
+        campaign = find(campaign_attr["id"]).tap{ |c| campaign_attr.each{ |k, v| c.send("#{k}=", v) } }
+        puts campaign.inspect
+        campaign
+      end
+
+      def all(options = {})
+        (options.delete(:api) || Mailjet::Api.singleton).messageCampaigns(options)["result"].map do |result_hash|
+          self.new(result_hash)
+        end
+      end
+
+      def find(*params)
+        options = params.last.is_a?(Hash) ? params.pop : {}
+        ids = params.flatten.map(&:to_s).reject(&:blank?)
+        self.all(options).find{|c| c.id.to_s.in?(ids)}
+      end
+    end
+  end
+end

data/lib/mailjet/click.rb

@@ -0,0 +1,15 @@
+require 'mailjet/api'
+require 'mailjet/contact'
+require 'mailjet/email'
+
+module Mailjet
+  class Click < OpenStruct    
+    def contact
+      Mailjet::Contact.new(:email => self.by_email, :id => self.by_id)
+    end
+    
+    def email
+      Mailjet::Email.new(:id => self.email_id)
+    end
+  end
+end

data/lib/mailjet/configuration.rb

@@ -0,0 +1,16 @@
+require 'active_support/core_ext/module/attribute_accessors'
+
+module Mailjet
+  module Configuration
+    mattr_accessor :api_version
+    mattr_accessor :api_key
+    mattr_accessor :secret_key
+    mattr_accessor :use_https
+    mattr_accessor :domain
+    mattr_accessor :default_from
+    
+    @@use_https = true
+    @@api_version = 0.1
+    @@domain = ''
+  end
+end

data/lib/mailjet/contact.rb

@@ -0,0 +1,18 @@
+require 'mailjet/api'
+
+module Mailjet
+  class Contact < OpenStruct
+    def infos(options = {})
+      (options.delete(:api) || Mailjet::Api.singleton).contactInfos(options.reverse_merge(:contact => (self.id || self.email)))["contact"]
+    end
+    
+    class << self
+      def all(options = {})
+        verb = options.delete(:openers) ? 'contactOpeners' : 'contactList'
+        (options.delete(:api) || Mailjet::Api.singleton).send(verb, options)["result"].map do |result_hash|
+          self.new(result_hash)
+        end
+      end
+    end
+  end
+end

data/lib/mailjet/core_extensions/ostruct.rb

@@ -0,0 +1,9 @@
+class OpenStruct
+  
+  # when asked for id, ruby 1.8.7's implementation of OpenStruct returns object's inner id instead of table's value if present. Evilishish infamous Monkey-Patch.
+  if RUBY_VERSION =~ /1\.8\./
+    def id
+      send(:eval, "@table[:id]")
+    end
+  end
+end

data/lib/mailjet/email.rb

@@ -0,0 +1,4 @@
+module Mailjet
+  class Email < OpenStruct    
+  end
+end

data/lib/mailjet/list.rb

@@ -0,0 +1,52 @@
+require 'mailjet/api'
+require 'mailjet/contact'
+
+module Mailjet
+  class List < OpenStruct
+    def update(options = {})
+      (options.delete(:api) || Mailjet::Api.singleton).listsUpdate(options.reverse_merge(:id => self.id), 'Post')["status"]
+    end
+    
+    def add_contacts(*params)
+      options = params.last.is_a?(Hash) ? params.pop : {}
+      contacts = params.map{|p| p.is_a?(Mailjet::Contact) ? p.email.to_s : p.to_s }.reject(&:blank?)
+      (options.delete(:api) || Mailjet::Api.singleton).listsAddmanycontacts(options.reverse_merge(:contacts => contacts.to_json, :id => self.id), 'Post')["status"]
+    end
+    
+    def remove_contacts(*params)
+      options = params.last.is_a?(Hash) ? params.pop : {}
+      contacts = params.map{|p| p.is_a?(Mailjet::Contact) ? p.email.to_s : p.to_s }.reject(&:blank?)
+      (options.delete(:api) || Mailjet::Api.singleton).listsRemovemanycontacts(options.reverse_merge(:contacts => contacts.to_json, :id => self.id), 'Post')["status"]
+    end
+    
+    def contacts(options = {})
+      (options.delete(:api) || Mailjet::Api.singleton).listsContacts(options.reverse_merge(:id => self.id))["result"].map do |contact|
+        Mailjet::Contact.new(contact)
+      end
+    end
+    
+    def email(options = {})
+      (options.delete(:api) || Mailjet::Api.singleton).listsEmail(options.reverse_merge(:id => self.id))["email"]
+    end
+    
+    def statistics(options = {})
+      (options.delete(:api) || Mailjet::Api.singleton).listsStatistics(options.reverse_merge(:id => self.id))["statistics"]
+    end
+    
+    def delete(options = {})
+      (options.delete(:api) || Mailjet::Api.singleton).listsDelete(options.reverse_merge(:id => self.id))["status"]
+    end
+        
+    class << self
+      def create(options = {})
+        self.new(options.merge(:id => (options.delete(:api) || Mailjet::Api.singleton).listsCreate(options)["list_id"].to_s))
+      end
+      
+      def all(options = {})
+        ((options.delete(:api) || Mailjet::Api.singleton).listsAll(options)["lists"] || []).map do |result_hash|
+          self.new(result_hash)
+        end
+      end
+    end
+  end
+end

data/lib/mailjet/mailer.rb

@@ -0,0 +1,19 @@
+require 'action_mailer'
+require 'mail'
+
+class Mailjet::Mailer < ::Mail::SMTP
+  def initialize options = {}
+    ActionMailer::Base.default(:from => Mailjet.config.default_from) if Mailjet.config.default_from.present?
+    super({
+      :address  => "in.mailjet.com",
+      :port  => 587,
+      :authentication  => 'plain',
+      :user_name => Mailjet.config.api_key,
+      :password  => Mailjet.config.secret_key,
+      :domain => Mailjet.config.domain,
+      :enable_starttls_auto => true
+    }.merge(options))
+  end
+end
+
+ActionMailer::Base.add_delivery_method :mailjet, Mailjet::Mailer

data/lib/mailjet/rack/endpoint.rb

@@ -0,0 +1,24 @@
+require 'active_support'
+require 'rack/request'
+
+
+module Mailjet
+  module Rack
+    class Endpoint
+      def initialize(app, path, &block)
+        @app = app
+        @path = path
+        @block = block
+      end
+
+      def call(env)
+        if env['PATH_INFO'] == @path && (content = env['rack.input'].read)
+          @block.call(ActiveSupport::JSON.decode(content))
+          [200, { 'Content-Type' => 'text/html', 'Content-Length' => '0' }, []]
+        else
+          @app.call(env)
+        end
+      end
+    end
+  end
+end

data/lib/mailjet/reporting.rb

@@ -0,0 +1,41 @@
+require 'mailjet/api'
+require 'mailjet/click'
+
+module Mailjet
+  class Reporting
+    class << self
+      def clicks(options = {})
+        ((options.delete(:api) || Mailjet::Api.singleton).reportClick(options)["clicks"] || []).map do |click|
+          Mailjet::Click.new(click)
+        end
+      end
+      
+      def domains(options = {})
+        (options.delete(:api) || Mailjet::Api.singleton).reportDomain(options)["domains"] || []
+      end
+      
+      def clients(options = {})
+        (options.delete(:api) || Mailjet::Api.singleton).reportEmailclients(options)["email_clients"] || []
+      end
+      
+      def emails(options = {})
+        ((options.delete(:api) || Mailjet::Api.singleton).reportEmailsent(options)["emails"] || []).map do |email|
+          Mailjet::Email.new(email)
+        end
+      end
+      
+      def statistics(options = {})
+        (options.delete(:api) || Mailjet::Api.singleton).reportEmailstatistics(options)["stats"]
+      end
+      
+      def geolocation(options = {})
+        (options.delete(:api) || Mailjet::Api.singleton).reportGeoip(options)["geos"]
+      end
+      
+      def agents(options = {})
+        (options.delete(:api) || Mailjet::Api.singleton).reportUseragents(options)["user_agents"] || []
+      end
+    end
+  end
+end
+  

data/lib/mailjet/template_category.rb

@@ -0,0 +1,13 @@
+require 'mailjet/api'
+
+module Mailjet
+  class TemplateCategory < OpenStruct
+    class << self      
+      def all(options = {})
+        (options.delete(:api) || Mailjet::Api.singleton).messageTplcategories(options)["categories"].map do |result_hash|
+          self.new(result_hash)
+        end
+      end
+    end
+  end
+end