spree_mercado_pago_payment_method 0.0.2

data/app/assets/javascripts/admin/spree_mercado_pago_payment_method.js

@@ -0,0 +1 @@
+//= require admin/spree_core

data/app/assets/javascripts/store/spree_mercado_pago_payment_method.js

@@ -0,0 +1 @@
+//= require store/spree_core

data/app/assets/stylesheets/admin/spree_mercado_pago_payment_method.css

@@ -0,0 +1,3 @@
+/*
+ *= require admin/spree_core
+*/

data/app/assets/stylesheets/store/spree_mercado_pago_payment_method.css

@@ -0,0 +1,3 @@
+/*
+ *= require store/spree_core
+*/

data/app/controllers/spree/checkout_controller_decorator.rb

@@ -0,0 +1,29 @@
+# -*- encoding : utf-8 -*-
+Spree::CheckoutController.class_eval do
+  before_filter :redirect_to_mercado_pago_if_needed, :only => [:update]
+
+  def redirect_to_mercado_pago_if_needed
+    return unless params[:state] == "payment"
+
+    selected_method_id = params[:order][:payments_attributes].first[:payment_method_id]
+    @payment_method = Spree::PaymentMethod.find(selected_method_id)
+
+    if @payment_method && @payment_method.kind_of?(PaymentMethod::MercadoPago)
+      @order.update_attributes(object_params)
+
+      back_urls = {
+        success: spree.mercado_pago_success_url(order_number: @order.number),
+        pending: spree.mercado_pago_pending_url(order_number: @order.number),
+        failure: spree.mercado_pago_failure_url(order_number: @order.number)
+      }
+
+      m = SpreeMercadoPagoClient.new(@order, back_urls)
+      
+      if m.authenticate && m.send_data
+        redirect_to m.redirect_url
+      else
+        render :action => :mercado_pago_error
+      end
+    end
+  end
+end

data/app/controllers/spree/mercado_pago_controller.rb

@@ -0,0 +1,47 @@
+# -*- encoding : utf-8 -*-
+require 'rest_client'
+
+module Spree
+  class MercadoPagoController < Spree::BaseController
+    before_filter :get_order
+
+    def success
+      advance_state
+    end
+
+    def pending
+      advance_state
+    end
+
+    def failure
+    end
+
+    private
+    def correct_order_state
+      (@order.state == 'payment' || @order.state == 'complete') &&
+        @order.payment_method &&
+        (@order.payment_method.type == "PaymentMethod::MercadoPago")
+    end
+
+    def advance_state
+      @order.update_attributes( { :state => "complete", :completed_at => Time.now },
+                               :without_protection => true)
+    end
+
+    def get_order
+      user = spree_current_user
+      order_no = params[:order_number]
+      @order = Order.where(number: order_no).where(user_id: user.id).first
+
+      unless @order && correct_order_state
+        if @order.present?
+          redirect_to checkout_state_path(@order.state)
+        else
+          flash[:error] = I18n.t(:mp_invalid_order)
+          redirect_to root_path
+        end
+        return
+      end
+    end
+  end
+end

data/app/models/payment_method/mercado_pago.rb

@@ -0,0 +1,33 @@
+# -*- encoding : utf-8 -*-
+class PaymentMethod::MercadoPago < Spree::PaymentMethod
+  attr_accessible :preferred_client_id, :preferred_client_secret
+
+  preference :client_id,     :integer
+  preference :client_secret, :string
+
+  def payment_profiles_supported?
+    false
+  end
+
+  def actions
+    %w{capture void}
+  end
+
+  # Indicates whether its possible to capture the payment
+  def can_capture?(payment)
+    ['checkout', 'pending'].include?(payment.state)
+  end
+
+  # Indicates whether its possible to void the payment.
+  def can_void?(payment)
+    payment.state != 'void'
+  end
+
+  def capture(*args)
+    ActiveMerchant::Billing::Response.new(true, "", {}, {})
+  end
+
+  def void(*args)
+    ActiveMerchant::Billing::Response.new(true, "", {}, {})
+  end
+end

data/app/models/spree_mercado_pago_client.rb

@@ -0,0 +1,102 @@
+# -*- encoding : utf-8 -*-
+require 'rest_client'
+
+class SpreeMercadoPagoClient
+  # These three includes are because of the user of line_item_description from
+  # ProductsHelper
+  include ActionView::Helpers::TextHelper
+  include ActionView::Helpers::SanitizeHelper
+  include Spree::ProductsHelper
+
+  attr_reader :errors
+  attr_reader :auth_response
+  attr_reader :preferences_response
+
+  def initialize(order, callbacks)
+    unless callbacks[:success] && callbacks[:pending] && callbacks[:failure]
+      raise "Url callbacks where not specified"
+    end
+
+    @order = order
+    @callbacks = callbacks
+    @errors = []
+    config_options
+  end
+
+  def authenticate
+    response = send_authentication_request
+
+    if response.code != 200
+      @auth_response = nil
+      @errors << I18n.t(:mp_authentication_error) 
+    else
+      @errors = []
+      @auth_response = ActiveSupport::JSON.decode(response)
+    end
+
+    @auth_response
+  end
+
+  def send_data
+    response = send_preferences_request
+
+    if response.code != 201
+      @preferences_response = nil
+      @errors << I18n.t(:mp_preferences_setup_error)
+    else
+      @errors = []
+      @preferences_response = ActiveSupport::JSON.decode(response)
+    end
+
+    @preferences_response
+  end
+
+  def redirect_url
+    @preferences_response["init_point"] if @preferences_response.present?
+  end
+
+  private
+  def send_authentication_request
+    client_id     = @order.payment_method.preferred_client_id
+    client_secret = @order.payment_method.preferred_client_secret
+
+    response = RestClient.post(
+      'https://api.mercadolibre.com/oauth/token',
+      {:grant_type => 'client_credentials', :client_id => client_id, :client_secret => client_secret},
+      :content_type=> "application/x-www-form-urlencoded", :accept => 'application/json'
+    )
+  end
+
+  def send_preferences_request
+    RestClient.post(
+      mp_preferences_url(@auth_response["access_token"]),
+      @options.to_json,
+      :content_type=> 'application/json', :accept => 'application/json'
+    )
+  end
+
+  def mp_preferences_url(token)
+    "https://api.mercadolibre.com/checkout/preferences?access_token=#{token}"
+  end
+  
+  def config_options
+    @options = Hash.new
+    @options[:external_reference] = @order.number
+    @options[:back_urls] = {
+      :success => @callbacks[:success],
+      :pending => @callbacks[:pending],
+      :failure => @callbacks[:failure]
+    }
+    @options[:items] = Array.new
+
+    @order.line_items.each do |li| 
+      h = {
+        :title => line_item_description(li.variant),
+        :unit_price => li.price.to_f,
+        :quantity => li.quantity,
+        :currency_id => "ARS"
+      }
+      @options[:items] << h
+    end
+  end
+end

data/app/views/spree/admin/payments/source_forms/_mercadopago.html.erb

@@ -0,0 +1 @@
+<!-- Source form -->

data/app/views/spree/admin/payments/source_views/_mercadopago.html.erb

@@ -0,0 +1 @@
+<!-- Source view -->

data/app/views/spree/checkout/payment/_mercadopago.html.erb

@@ -0,0 +1 @@
+<img src="http://imgmp.mlstatic.com/org-img/banners/ar/medios/575X40.jpg" title="MercadoPago - Medios de pago" alt="MercadoPago - Medios de pago" width="575" height="40"/>

data/app/views/spree/mercado_pago/failure.html.erb

@@ -0,0 +1 @@
+<%= simple_format(I18n.t(:mp_payment_failure)) %>

data/app/views/spree/mercado_pago/pending.html.erb

@@ -0,0 +1 @@
+<%= simple_format(I18n.t(:mp_payment_pending)) %>

data/app/views/spree/mercado_pago/success.html.erb

@@ -0,0 +1 @@
+<%= simple_format(I18n.t(:mp_payment_success)) %>

data/config/locales/en.yml

@@ -0,0 +1,13 @@
+en:
+  mp_authentication_error: "It was not possible to authenticate with Mercado Pago"
+  mp_preferences_setup_error: "Couldn't send order preferences to Mercado Pago"
+  mp_payment_success: 
+    Your payent with Mercado Pago was successful.
+
+    Please take into account that this payment may take some hours to reflect
+    on this site.
+  mp_payment_failure: "Your payment could not be processed by Mercado Pago"
+  mp_payment_pending: 
+    Your order has been placed but your payment is still pending we will ship
+    your order and contact you as soon as the payment is processed"
+  mp_invalid_order: "The specified order is invalid"

data/config/locales/es.yml

@@ -0,0 +1,14 @@
+es:
+  mp_authentication_error: "Hubo un error al realizar la autenticación con Mercado Pago"
+  mp_preferences_setup_error: "Hubo un error al enviar sus pedido a Mercado Pago"
+  mp_payment_success: 
+    Su pago con Mercado Pago se ha efectuado con éxito. 
+
+    Por  favor tenga  en cuenta  que  el estado  de su  pago puede  tardar
+    algunas  horas en reflejarse en este sitio.
+  mp_payment_failure: "Su pago no pudo ser procesado por Mercado Pago"
+  mp_payment_pending: 
+    Su orden fue procesada con éxito aunque su pago aún se encuentra pendiente.
+
+    En cuanto su pago se concrete su pedido será finalizado.
+  mp_invalid_order: "La órden especificada es inválida"

data/config/routes.rb

@@ -0,0 +1,8 @@
+# -*- encoding : utf-8 -*-
+Spree::Core::Engine.routes.draw do
+  scope "/mercado_pago", controller: :mercado_pago do
+    get :success, as: :mercado_pago_success 
+    get :pending, as: :mercado_pago_pending 
+    get :failure, as: :mercado_pago_failure 
+  end
+end

data/lib/generators/spree_mercado_pago_payment_method/install/install_generator.rb

@@ -0,0 +1,29 @@
+module SpreeMercadoPagoPaymentMethod
+  module Generators
+    class InstallGenerator < Rails::Generators::Base
+
+      def add_javascripts
+        append_file 'app/assets/javascripts/store/all.js', "//= require store/spree_mercado_pago_payment_method\n"
+        append_file 'app/assets/javascripts/admin/all.js', "//= require admin/spree_mercado_pago_payment_method\n"
+      end
+
+      def add_stylesheets
+        inject_into_file 'app/assets/stylesheets/store/all.css', " *= require store/spree_mercado_pago_payment_method\n", :before => /\*\//, :verbose => true
+        inject_into_file 'app/assets/stylesheets/admin/all.css', " *= require admin/spree_mercado_pago_payment_method\n", :before => /\*\//, :verbose => true
+      end
+
+      def add_migrations
+        run 'bundle exec rake railties:install:migrations FROM=spree_mercado_pago_payment_method'
+      end
+
+      def run_migrations
+         res = ask 'Would you like to run the migrations now? [Y/n]'
+         if res == '' || res.downcase == 'y'
+           run 'bundle exec rake db:migrate'
+         else
+           puts 'Skipping rake db:migrate, don\'t forget to run it!'
+         end
+      end
+    end
+  end
+end

data/lib/spree_mercado_pago_payment_method.rb

@@ -0,0 +1,3 @@
+# -*- encoding : utf-8 -*-
+require 'spree_core'
+require 'spree_mercado_pago_payment_method/engine'

data/lib/spree_mercado_pago_payment_method/engine.rb

@@ -0,0 +1,23 @@
+# -*- encoding : utf-8 -*-
+require 'spree_core'
+
+module SpreeMercadoPagoPaymentMethod
+  class Engine < Rails::Engine
+
+    def self.activate
+      Dir.glob(File.join(File.dirname(__FILE__), "../../app/**/*_decorator*.rb")) do |c|
+        Rails.application.config.cache_classes ? require(c) : load(c)
+      end
+
+      Dir.glob(File.join(File.dirname(__FILE__), "../../app/overrides/*.rb")) do |c|
+        Rails.application.config.cache_classes ? require(c) : load(c)
+      end
+    end
+
+    initializer "spree_payment_network.register.payment_methods" do |app|
+      app.config.spree.payment_methods += [PaymentMethod::MercadoPago]
+    end
+
+    config.to_prepare &method(:activate).to_proc
+  end
+end

data/lib/tasks/mercado_user.rake

@@ -0,0 +1,6 @@
+# -*- encoding : utf-8 -*-
+namespace :mercado_pago do
+  desc "Creates test user using MP API"
+  task :test_user => :environment do
+  end
+end

data/spec/controllers/spree/checkout_controller_spec.rb

@@ -0,0 +1,57 @@
+require 'spec_helper'
+
+describe Spree::CheckoutController do
+
+  let(:order) do
+    mock_model(
+      Spree::Order,
+      :checkout_allowed? => true,
+      :user => nil,
+      :email => nil,
+      :completed? => false,
+      :update_attributes => true,
+      :payment? => false,
+      :insufficient_stock_lines => [],
+      :coupon_code => nil
+    ).as_null_object
+  end
+
+  before(:each) do
+    user = double("User", :last_incomplete_spree_order => nil)
+    order.stub(:user => user)
+    controller.stub :current_order => order 
+    controller.stub(:spree_current_user => user)
+  end
+
+  context "Using Mercado Pago payment method" do
+    let(:order_attributes) { { payments_attributes: [{payment_method_id: "fake_id"}] } }
+
+    before(:each) do
+      payment_method = double("PaymentMethod::MercadoPago")
+      payment_method.should_receive(:kind_of?).with(PaymentMethod::MercadoPago) { true }
+      Spree::PaymentMethod.should_receive(:find) { payment_method }
+    end
+
+    it "redirects to m.redirect_url on success" do
+      client = double("client")
+      client.should_receive(:authenticate) { true }
+      client.should_receive(:send_data) { true }
+      client.should_receive(:redirect_url) { "http://www.example.com" }
+      SpreeMercadoPagoClient.should_receive(:new) { client }
+
+      spree_post :update, {state: "payment", order: order_attributes }
+      response.should redirect_to("http://www.example.com")
+    end
+
+    it "renders mercado_pago_error.html.erb on error" do
+      client = double("client")
+      client.should_receive(:authenticate) { false }
+      client.stub(:send_data) { true }
+      client.stub(:redirect_url) { "http://www.example.com" }
+      SpreeMercadoPagoClient.should_receive(:new) { client }
+
+      spree_post :update, {state: "payment", order: order_attributes }
+      response.should render_template("mercado_pago_error")
+    end
+  end
+end

data/spec/controllers/spree/mercado_pago_controller_spec.rb

@@ -0,0 +1,90 @@
+# -*- encoding : utf-8 -*-
+require 'spec_helper'
+
+describe Spree::MercadoPagoController do
+  it "doesn't affect current order if there is one (session[:order_id])"
+
+  context "Logged out user" do
+    it "redirects to login and back again"
+  end
+
+  context "Logged in user" do
+    let(:user)           { create(:user) }
+    let(:payment_method) { create(:payment_method, type: "PaymentMethod::MercadoPago") }
+    let(:order)          do
+      order = create(:order, user: user, state: "payment")
+      create(:payment, payment_method: payment_method, order: order)
+      order
+    end
+
+    before { controller.stub(:spree_current_user => user) }
+    before do
+      order.payment.should_not be_nil
+      order.payment_method.should_not be_nil
+      order.payment_method.type.should eq("PaymentMethod::MercadoPago")
+    end
+
+    describe "#success" do
+      context "with valid order" do
+        before do
+          spree_get :success, { order_number: order.number }
+        end
+
+        it { response.should be_success }
+        it { assigns(:order).should_not be_nil }
+        it { assigns(:order).state.should eq("complete") }
+        it { assigns(:order).id.should eq(order.id)}
+        it { assigns(:order).payment.state.should eq("pending") }
+      end
+
+      context "with invalid order" do
+        before { spree_get :success }
+
+        it { response.should redirect_to(spree.root_path) }
+        it { flash[:error].should eq(I18n.t(:mp_invalid_order)) }
+      end
+    end
+
+    describe "#pending" do
+      context "with valid order" do
+        before do
+          spree_get :pending, { order_number: order.number }
+        end
+
+        it { response.should be_success }
+        it { assigns(:order).should_not be_nil }
+        it { assigns(:order).state.should eq("complete") }
+        it { assigns(:order).id.should eq(order.id)}
+        it { assigns(:order).payment.state.should eq("pending") }
+      end
+
+      context "with invalid order" do
+        before { spree_get :pending }
+
+        it { response.should redirect_to(spree.root_path) }
+        it { flash[:error].should eq(I18n.t(:mp_invalid_order)) }
+      end
+    end
+
+    describe "#failure" do
+      context "with valid order" do
+        before do
+          spree_get :failure, { order_number: order.number }
+        end
+
+        it { response.should be_success }
+        it { assigns(:order).should_not be_nil }
+        it { assigns(:order).state.should eq("payment") }
+        it { assigns(:order).id.should eq(order.id)}
+        it { assigns(:order).payment.state.should eq("pending") }
+      end
+
+      context "with invalid order" do
+        before { spree_get :failure }
+
+        it { response.should redirect_to(spree.root_path) }
+        it { flash[:error].should eq(I18n.t(:mp_invalid_order)) }
+      end
+    end
+  end
+end