catarse_moip 0.1.1 → 1.0.0

data/config/locales/pt.yml

@@ -1,6 +1,25 @@
 pt:
   projects:
     backers:
+      review:
+        moip: 'Pagamento nacional'
+        form:
+          labels:
+            payment_account: 'Debito em Conta'
+            document: 'CPF/CNPJ (somente números)'
+            payment_card: 'Pagamento com Cartão'
+            owner_card: "Dados do titular do cartão"
+            number_card: "Dados do cartão"
+            payment_boleto: "Pagamento com Boleto"
+            payment_boleto_subtitle: "Clique no link abaixo para ver o boleto:"
+            select_boleto: "Para prosseguir, por favor selecione:"
+            select_account: "Para prosseguir, por favor selecione o banco:"
+            payment_account: "Pagamento com Débito em Conta"
+            select_account: "Você será redirecionado para o site do seu banco:"
+            you_are_about_html: "Você está prestes a fazer parte do grupo que faz de tudo para o %{link} acontecer."
+            pay_with: "Pagar com"
+            submit: "Efetuar pagamento"
+            build_boleto: 'Gerar boleto'
       checkout:
         moip_error: "Ooops. Ocorreu um erro ao enviar seu pagamento para o MoIP. Por favor, tente novamente."
         success: "Seu apoio foi realizado com sucesso. Muito obrigado!"

data/config/routes.rb

@@ -1,9 +1,13 @@
 CatarseMoip::Engine.routes.draw do
-  namespace :payment do
-    resources :moip, only: [] do
-      member do
-        match :pay
-      end
+  resources :moip, only: [], path: 'payment/moip' do
+    collection do
+      post 'notifications' => "moip#create_notification"
+      get 'js'
+    end
+    member do
+      match :moip_response
+      match :review
+      match :get_moip_token
     end
   end
 end

data/lib/catarse_moip/engine.rb

@@ -1,5 +1,12 @@
 module CatarseMoip
   class Engine < ::Rails::Engine
     isolate_namespace CatarseMoip
+    initializer "pandemic.asset_addition", :group => :all do |app|
+      # Enabling assets precompiling under rails 3.1
+      if Rails.version >= '3.1'
+        app.config.assets.precompile += %w( catarse_moip.js )
+      end
+    end
+  
   end
 end

data/lib/catarse_moip/version.rb

@@ -1,3 +1,3 @@
 module CatarseMoip
-  VERSION = "0.1.1"
+  VERSION = "1.0.0"
 end

data/lib/catarse_moip.rb

@@ -1,5 +1,5 @@
 require "catarse_moip/engine"
-require "moip"
+#require "moip"
 
 module CatarseMoip
 end

data/lib/moip_transparente/checkout.rb

@@ -0,0 +1,218 @@
+require 'xml'
+require 'base64'
+
+class MoipTransparente::Checkout
+  
+  def javascript_tag
+    "<script type='text/javascript' src='#{get_javascript_url}' charset='ISO-8859-1'></script>"
+  end
+  
+  def widget_tag(success, fail)
+    "<div id='MoipWidget'
+          data-token='#{@token}'
+          callback-method-success='#{success}' 
+          callback-method-error='#{fail}'>
+    </div>"
+  end
+
+  def get_token(invoice)
+    doc = XML::Document.new
+    doc.root = XML::Node.new('EnviarInstrucao')    
+
+    unica = XML::Node.new('InstrucaoUnica')
+    unica['TipoValidacao'] = 'Transparente'
+
+    
+    description = XML::Node.new('Razao')
+    description << invoice[:razao]
+    unica << description
+    
+    id_invoice = XML::Node.new('IdProprio')
+    id_invoice << invoice[:id]  
+    unica << id_invoice
+
+    valores = XML::Node.new('Valores')
+
+    valor = XML::Node.new('Valor')
+    valor['moeda'] = 'BRL'
+    valor << invoice[:total]
+
+    valores << valor
+
+        
+    valor = XML::Node.new('Acrescimo')
+    valor['moeda'] = 'BRL'
+    valores << invoice[:acrescimo]  || '0.00'    
+    
+    
+    valor = XML::Node.new('Deducao')
+    valor['moeda'] = 'BRL'
+    valores << invoice[:desconto]  || '0.00'    
+
+    unica << valores    
+    
+    pagador = XML::Node.new('Pagador')
+    nome = XML::Node.new('Nome')
+    nome << invoice[:cliente][:nome]    
+    pagador << nome
+    
+    email = XML::Node.new('Email')
+    email << invoice[:cliente][:email]    
+    pagador << email
+
+    id = XML::Node.new('IdPagador')
+    id << invoice[:cliente][:id]   
+    pagador << id     
+    
+    endereco = XML::Node.new('EnderecoCobranca')
+
+    logradouro = XML::Node.new('Logradouro')
+    logradouro << invoice[:cliente][:logradouro]
+    endereco << logradouro
+    
+    numero = XML::Node.new('Numero')
+    numero_or_default = invoice[:cliente][:numero] || '0'
+    numero << numero_or_default
+    endereco << numero
+    
+    complemento = XML::Node.new('Complemento')
+    complemento << invoice[:cliente][:complemento]
+    endereco << complemento
+        
+    bairro = XML::Node.new('Bairro')
+    bairro << invoice[:cliente][:bairro]    
+    endereco << bairro
+
+    cidade = XML::Node.new('Cidade')
+    cidade << invoice[:cliente][:cidade]        
+    endereco << cidade
+
+    estado = XML::Node.new('Estado')                        
+    estado << invoice[:cliente][:uf]        
+    endereco << estado
+
+    pais = XML::Node.new('Pais')
+    pais_or_default = invoice[:cliente][:pais] || 'BRA'
+    pais << pais_or_default
+    endereco << pais
+
+    cep = XML::Node.new('CEP')
+    cep << invoice[:cliente][:cep]    
+    endereco << cep
+
+    telefone = XML::Node.new('TelefoneFixo')
+    telefone << invoice[:cliente][:telefone]      
+    endereco << telefone
+    
+    pagador << endereco
+    unica << pagador    
+    
+    if invoice[:parcelamentos]
+      parcelamentos = XML::Node.new('Parcelamentos')
+      invoice[:parcelamentos].each do |parcelamento_item|
+        parcelamento = XML::Node.new('Parcelamento')                
+        minimo = XML::Node.new('MinimoParcelas')
+        minimo << parcelamento_item[:minimo]
+        parcelamento << minimo
+
+        maximo = XML::Node.new('MaximoParcelas')
+        maximo << parcelamento_item[:maximo]
+        parcelamento << maximo
+
+        if parcelamento_item[:repassar]
+          repassar = XML::Node.new('Repassar')
+          repassar << '1'
+          parcelamento << repassar
+        else
+          juros = XML::Node.new('Juros')
+          juros <<  parcelamento_item[:juros]        
+          parcelamento << juros
+        end  
+        parcelamentos << parcelamento          
+      end
+
+      unica << parcelamentos
+    end
+    
+    comissoes = XML::Node.new('Comissoes')                
+    if invoice[:comissoes]
+      invoice[:comissoes].each do |comissao_item|
+        comissionamento = XML::Node.new('Comissionamento')
+        razao = XML::Node.new('Razao')
+        razao << comissao_item[:razao] || invoice[:razao]
+        comissionamento << razao
+      
+        comissionado = XML::Node.new("Comissionado")
+        login_moip = XML::Node.new("LoginMoIP")
+        login_moip << comissao_item[:login_moip]
+        comissionado << login_moip
+        comissionamento << comissionado
+      
+        valor = XML::Node.new("ValorFixo")
+        valor << comissao_item[:valor]
+        comissionamento << valor
+        comissoes << comissionamento
+      end    
+    end
+    
+    if invoice[:pagador_taxas]
+      taxas = XML::Node.new('PagadorTaxa')      
+      login_moip = XML::Node.new("LoginMoIP")
+      login_moip <<  invoice[:pagador_taxas]
+      taxas << login_moip
+      comissoes << taxas
+    end
+    
+    unica << comissoes    
+    
+    doc.root << unica    
+    begin
+      response = post_data(doc.to_s(:encoding => XML::Encoding::ISO_8859_1))
+      parser = XML::Parser.string(response)
+      dom = parser.parse 
+    rescue LibXML::XML::Error => e
+      puts response.inspect
+      puts parser.inspect
+      Rails.logger.info response.inspect
+      Rails.logger.info parser.inspect
+    end
+    resposta = dom.find('./Resposta').first
+    if resposta.find('Status')[0].content  == 'Sucesso'
+      @token = resposta.find('Token')[0].content
+      return {:status => :ok, :token => resposta.find('Token')[0].content, :id => resposta.find('ID')[0].content}
+    elsif resposta.find('Status')[0].content  == 'Falha'
+      return {:status => :fail, :code => resposta.find('Erro')[0]['Codigo'], :message => resposta.find('Erro')[0].content, :id => resposta.find('ID')[0].content }
+    end    
+  end
+  
+  def get_token_url
+    if ::MoipTransparente::Config.test?
+      return "https://desenvolvedor.moip.com.br/sandbox/ws/alpha/EnviarInstrucao/Unica"
+    else
+      return "https://www.moip.com.br/ws/alpha/EnviarInstrucao/Unica"
+    end
+  end
+
+  def get_javascript_url
+    if ::MoipTransparente::Config.test?
+      return "https://desenvolvedor.moip.com.br/sandbox/transparente/MoipWidget-v2.js"
+    else
+      return "https://www.moip.com.br/transparente/MoipWidget-v2.js"
+    end
+  end  
+  
+  def post_data(xml)
+    uri = URI.parse(get_token_url)
+    http = Net::HTTP.new(uri.host, uri.port)
+    http.use_ssl = true
+    http.verify_mode = OpenSSL::SSL::VERIFY_NONE
+    #http.set_debug_output $stderr if Moip::Config.test?
+    
+    request = Net::HTTP::Post.new(uri.path)
+    request.basic_auth ::MoipTransparente::Config.access_token, ::MoipTransparente::Config.access_key
+    
+    request.body = xml
+    response = http.start {|r| r.request request }
+    response.body
+  end      
+end

data/lib/moip_transparente/version.rb

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

data/lib/moip_transparente.rb

@@ -0,0 +1,32 @@
+require "net/https"
+require "uri"
+require "moip_transparente/version"
+require "moip_transparente/checkout"
+
+module MoipTransparente
+  class Config
+    def self.access_token
+      @access_token
+    end
+    
+    def self.access_token=(value)
+      @access_token = value
+    end
+    
+    def self.access_key
+      @access_key
+    end
+    
+    def self.access_key=(value)
+      @access_key = value
+    end    
+    
+    def self.test?
+      @test || false
+    end
+
+    def self.test=(test)
+      @test = test
+    end    
+  end
+end

data/spec/controllers/catarse_moip/moip_controller_spec.rb

@@ -0,0 +1,230 @@
+# encoding: utf-8
+require 'spec_helper'
+
+describe CatarseMoip::MoipController do
+  subject{ response }
+
+  let(:get_token_response){{:status=>:fail, :code=>"171", :message=>"TelefoneFixo do endereço deverá ser enviado obrigatorio", :id=>"201210192052439150000024698931"}}
+  let(:backer){ double('backer', {
+    id: 1, 
+    key: 'backer key', 
+    payment_id: 'payment id', 
+    project: project, 
+    pending?: false, 
+    value: 10, 
+    user: user, 
+    payer_name: 'foo',
+    payer_email: 'foo@bar.com',
+    address_street: 'test',
+    address_number: '123',
+    address_complement: '123',
+    address_neighbourhood: '123',
+    address_city: '123',
+    address_state: '123',
+    address_zip_code: '123',
+    address_phone_number: '123'
+  }) }
+
+  let(:user){ double('user', id: 1) }
+  let(:project){ double('project', id: 1, name: 'test project') }
+  let(:extra_data){ {"id_transacao"=>backer.key, "valor"=>"2190", "cod_moip"=>"12345123", "forma_pagamento"=>"1", "tipo_pagamento"=>"CartaoDeCredito", "email_consumidor"=>"some@email.com", "controller"=>"catarse_moip/payment/notifications", "action"=>"create"} }
+
+  before do
+    controller.stub(:current_user).and_return(user)
+    ::MoipTransparente::Checkout.any_instance.stub(:get_token).and_return(get_token_response)
+    ::MoipTransparente::Checkout.any_instance.stub(:moip_widget_tag).and_return('<div>')
+    ::MoipTransparente::Checkout.any_instance.stub(:moip_javascript_tag).and_return('<script>')
+    ::MoipTransparente::Checkout.any_instance.stub(:as_json).and_return('{}')
+    PaymentEngines.stub(:find_payment).and_return(backer)
+    PaymentEngines.stub(:create_payment_notification)
+    backer.stub(:with_lock).and_yield
+  end
+
+  describe "POST create_notification" do
+    context "when we search for a non-existant backer" do
+      before do
+        PaymentEngines.should_receive(:find_payment).with(key: "non-existant backer key").and_raise('error')
+        post :create_notification, {:id_transacao => "non-existant backer key", :use_route => 'catarse_moip'}
+      end
+
+      its(:status){ should == 422 }
+      its(:body){ should == "#<RuntimeError: error>: error recebemos: {\"id_transacao\"=>\"non-existant backer key\", \"controller\"=>\"catarse_moip/moip\", \"action\"=>\"create_notification\"}" }
+    end
+
+    context "when we seach for an existing backer" do
+      before do
+        PaymentEngines.should_receive(:find_payment).with(key: backer.key).and_return(backer)
+        controller.should_receive(:process_moip_message).with({"id_transacao"=>backer.key, "controller"=>"catarse_moip/moip", "action"=>"create_notification"})
+        post :create_notification, {:id_transacao => backer.key, :use_route => 'catarse_moip'}
+      end
+
+      its(:body){ should == ' ' }
+      its(:status){ should == 200 }
+      it("should assign backer"){ assigns(:backer).should == backer }
+    end
+  end
+
+  describe "GET js" do
+    let(:file){ double('js_file') }
+
+    context "when the content of get_javascript_url raises an error" do
+      before do
+        controller.should_receive(:open).at_least(3).times.and_raise('error') 
+        ->{
+          get :js, locale: :pt, use_route: 'catarse_moip'
+        }.should raise_error('error')
+      end
+      its(:status){ should == 200 }
+    end
+
+    context "when the content of get_javascript_url is read without errors" do
+      before do
+        controller.should_receive(:open).and_return(file) 
+        file.should_receive(:set_encoding).and_return(file)
+        file.should_receive(:read).and_return(file)
+        file.should_receive(:encode).and_return('js content')
+        get :js, locale: :pt, use_route: 'catarse_moip'
+      end
+      its(:status){ should == 200 }
+      its(:body){ should == 'js content' }
+    end
+  end
+
+  describe "POST moip_response" do
+    let(:processor){ double('moip processor') }
+    before do
+      controller.should_receive(:process_moip_message)
+      post :moip_response, id: backer.id, response: {StatusPagamento: 'Sucesso'}, use_route: 'catarse_moip'
+    end
+
+    its(:status){ should == 200 }
+  end
+
+  describe "POST get_moip_token" do
+    before do
+      post :get_moip_token, :id => backer.id, :use_route => 'catarse_moip'
+    end
+
+    its(:status){ should == 200 }
+    its(:body){ should == "{\"get_token_response\":{\"status\":\"fail\",\"code\":\"171\",\"message\":\"TelefoneFixo do endereço deverá ser enviado obrigatorio\",\"id\":\"201210192052439150000024698931\"},\"moip\":\"{}\",\"widget_tag\":\"<div id='MoipWidget'\\n          data-token=''\\n          callback-method-success='checkoutSuccessful' \\n          callback-method-error='checkoutFailure'>\\n    </div>\",\"javascript_tag\":\"<script type='text/javascript' src='https://www.moip.com.br/transparente/MoipWidget-v2.js' charset='ISO-8859-1'></script>\"}" }
+  end
+
+  describe "#update_backer" do
+    before do
+      controller.stub(:backer).and_return(backer)
+      backer.stub(:payment_token).and_return('token')
+    end
+
+    context "with parameters containing CodigoMoIP and TaxaMoIP" do
+      let(:payment){ {"Status" => "Autorizado","Codigo" => "0","CodigoRetorno" => "0","TaxaMoIP" => "1.54","StatusPagamento" => "Sucesso","CodigoMoIP" => "18093844","Mensagem" => "Requisição processada com sucesso","TotalPago" => "25.00","url" => "https => //www.moip.com.br/Instrucao.do?token=R2W0N123E005F2A911V6O2I0Y3S7M4J853H0S0F0T0D044T8F4H4E9G0I3W8"} }
+      before do
+        MoIP.should_not_receive(:query)
+        backer.should_receive(:update_attributes).with({
+          payment_id: payment["CodigoMoIP"],
+          payment_choice: payment["FormaPagamento"],
+          payment_service_fee: payment["TaxaMoIP"]
+        })
+      end
+      it("should call update attributes but not call MoIP.query"){ controller.update_backer payment }
+    end
+
+    context "with no response from moip" do
+      let(:moip_query_response) { nil }
+      before do
+        MoIP.should_receive(:query).with(backer.payment_token).and_return(moip_query_response)
+        backer.should_not_receive(:update_attributes)
+      end
+      it("should never call update attributes"){ controller.update_backer }
+    end
+
+    context "with an incomplete transaction" do
+      let(:moip_query_response) do
+        {"ID"=>"201210191926185570000024694351", "Status"=>"Sucesso"}
+      end
+      before do
+        MoIP.should_receive(:query).with(backer.payment_token).and_return(moip_query_response)
+        backer.should_not_receive(:update_attributes)
+      end
+      it("should never call update attributes"){ controller.update_backer }
+    end
+
+    context "with a real data set that works for some cases" do
+      let(:moip_query_response) do
+        {"ID"=>"201210191926185570000024694351", "Status"=>"Sucesso", "Autorizacao"=>{"Pagador"=>{"Nome"=>"juliana.giopato@hotmail.com", "Email"=>"juliana.giopato@hotmail.com"}, "EnderecoCobranca"=>{"Logradouro"=>"Rua sócrates abraão ", "Numero"=>"16.0", "Complemento"=>"casa 19", "Bairro"=>"Campo Limpo", "CEP"=>"05782-470", "Cidade"=>"São Paulo", "Estado"=>"SP", "Pais"=>"BRA", "TelefoneFixo"=>"1184719963"}, "Recebedor"=>{"Nome"=>"Catarse", "Email"=>"financeiro@catarse.me"}, "Pagamento"=>[{"Data"=>"2012-10-17T13:06:07.000-03:00", "DataCredito"=>"2012-10-19T00:00:00.000-03:00", "TotalPago"=>"50.00", "TaxaParaPagador"=>"0.00", "TaxaMoIP"=>"1.34", "ValorLiquido"=>"48.66", "FormaPagamento"=>"BoletoBancario", "InstituicaoPagamento"=>"Bradesco", "Status"=>"Autorizado", "Parcela"=>{"TotalParcelas"=>"1"}, "CodigoMoIP"=>"0000.1325.5258"}, {"Data"=>"2012-10-17T13:05:49.000-03:00", "TotalPago"=>"50.00", "TaxaParaPagador"=>"0.00", "TaxaMoIP"=>"3.09", "ValorLiquido"=>"46.91", "FormaPagamento"=>"CartaoDebito", "InstituicaoPagamento"=>"Visa", "Status"=>"Iniciado", "Parcela"=>{"TotalParcelas"=>"1"}, "CodigoMoIP"=>"0000.1325.5248"}]}}
+      end
+      before do
+        MoIP.should_receive(:query).with(backer.payment_token).and_return(moip_query_response)
+        payment = moip_query_response["Autorizacao"]["Pagamento"].first
+        backer.should_receive(:update_attributes).with({
+          payment_id: payment["CodigoMoIP"],
+          payment_choice: payment["FormaPagamento"],
+          payment_service_fee: payment["TaxaMoIP"]
+        })
+      end
+      it("should call update attributes"){ controller.update_backer }
+    end
+  end
+
+  describe "#process_moip_message" do
+    before do
+      controller.stub(:backer).and_return(backer)
+      backer.stub(:confirmed?).and_return(false)
+      backer.stub(:confirm!)
+      controller.stub(:update_backer)
+    end
+
+    context "when we already have the payment_id in backers table" do
+      before do
+        backer.stub(:payment_id).and_return('test')
+        controller.should_not_receive(:update_backer)
+      end
+
+      it 'should never call update_backer' do
+        controller.process_moip_message post_moip_params.merge!({:id_transacao => backer.key, :status_pagamento => CatarseMoip::MoipController::TransactionStatus::AUTHORIZED})
+      end
+    end
+
+    context "when we still do not have the payment_id in backers table" do
+      before do
+        backer.stub(:payment_id).and_return(nil)
+        controller.should_receive(:update_backer)
+      end
+
+      it 'should call update_backer on the processor' do
+        controller.process_moip_message post_moip_params.merge!({:id_transacao => backer.key, :status_pagamento => CatarseMoip::MoipController::TransactionStatus::AUTHORIZED})
+      end
+    end
+
+    context "when there is a written back request and backer is not refunded" do
+      before do
+        backer.stub(:refunded?).and_return(false)
+        backer.should_receive(:refund!)
+      end
+
+      it 'should call refund!' do
+        controller.process_moip_message post_moip_params.merge!({:id_transacao => backer.key, :status_pagamento => CatarseMoip::MoipController::TransactionStatus::WRITTEN_BACK})
+      end
+    end
+
+    context "when there is an authorized request" do
+      before do
+        backer.should_receive(:confirm!)
+      end
+
+      it 'should call confirm!' do
+        controller.process_moip_message post_moip_params.merge!({:id_transacao => backer.key, :status_pagamento => CatarseMoip::MoipController::TransactionStatus::AUTHORIZED})
+      end
+    end
+
+    context "when there is a refund request" do
+      before do
+        backer.stub(:refunded?).and_return(false)
+        backer.should_receive(:refund!)
+      end
+
+      it 'should mark refunded to true' do
+        controller.process_moip_message post_moip_params.merge!({:id_transacao => backer.key, :status_pagamento => CatarseMoip::MoipController::TransactionStatus::REFUNDED})
+      end
+    end
+  end
+end

data/spec/fixtures/ipn_data.txt

@@ -0,0 +1 @@
+id_transacao=928a335e1756249b5e3bee2d3cdf9942&valor=4000&status_pagamento=2&cod_moip=13847342&forma_pagamento=5&tipo_pagamento=CartaoDeCredito&parcelas=1&recebedor_login=softa&email_consumidor=murilo.morelli@gmail.com&cartao_bin=539028&cartao_final=0004&cartao_bandeira=Mastercard&cofre=cec1b177-102d-4320-a9ee-8f523ed1a310&classificacao=Falha na comunica��o com o Banco Emissor&action=create&controller=catarse_moip/payment/notifications

data/spec/javascripts/moip_form_spec.js

@@ -0,0 +1,25 @@
+global.window = require("jsdom")
+                .jsdom()
+                .createWindow();
+global.jQuery = global.$ = require("jquery");
+
+global._ = global.underscore = require("./support/underscore");
+global.Backbone = require("./support/backbone");
+Backbone.$ = $;
+
+global.Skull = require('./support/skull');
+require('./support/app');
+require("../../app/assets/javascripts/catarse_moip/moip_form");
+
+describe("MoipForm", function() {
+  var view;
+
+  beforeEach(function() {
+    view = new App.views.MoipForm();
+  });
+
+  it("should be true", function() {
+    expect(true).toEqual(true);
+  });
+});  
+

data/spec/javascripts/support/app.js

@@ -0,0 +1 @@
+global.App = window.App = Skull.View.extend({});