payable 0.0.1

data/MIT-LICENSE

@@ -0,0 +1,20 @@
+Copyright 2012 YOURNAME
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+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 OR COPYRIGHT HOLDERS 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.

data/README.rdoc

@@ -0,0 +1,3 @@
+= Payable
+
+This project rocks and uses MIT-LICENSE.

data/Rakefile

@@ -0,0 +1,40 @@
+#!/usr/bin/env rake
+begin
+  require 'bundler/setup'
+rescue LoadError
+  puts 'You must `gem install bundler` and `bundle install` to run rake tasks'
+end
+begin
+  require 'rdoc/task'
+rescue LoadError
+  require 'rdoc/rdoc'
+  require 'rake/rdoctask'
+  RDoc::Task = Rake::RDocTask
+end
+
+RDoc::Task.new(:rdoc) do |rdoc|
+  rdoc.rdoc_dir = 'rdoc'
+  rdoc.title    = 'Payable'
+  rdoc.options << '--line-numbers'
+  rdoc.rdoc_files.include('README.rdoc')
+  rdoc.rdoc_files.include('lib/**/*.rb')
+end
+
+APP_RAKEFILE = File.expand_path("../test/dummy/Rakefile", __FILE__)
+load 'rails/tasks/engine.rake'
+
+
+
+Bundler::GemHelper.install_tasks
+
+require 'rake/testtask'
+
+Rake::TestTask.new(:test) do |t|
+  t.libs << 'lib'
+  t.libs << 'test'
+  t.pattern = 'test/**/*_test.rb'
+  t.verbose = false
+end
+
+
+task :default => :test

data/app/assets/javascripts/payable/application.js

@@ -0,0 +1,15 @@
+// This is a manifest file that'll be compiled into application.js, which will include all the files
+// listed below.
+//
+// Any JavaScript/Coffee file within this directory, lib/assets/javascripts, vendor/assets/javascripts,
+// or vendor/assets/javascripts of plugins, if any, can be referenced here using a relative path.
+//
+// It's not advisable to add code directly here, but if you do, it'll appear at the bottom of the
+// the compiled file.
+//
+// WARNING: THE FIRST BLANK LINE MARKS THE END OF WHAT'S TO BE PROCESSED, ANY BLANK LINE SHOULD
+// GO AFTER THE REQUIRES BELOW.
+//
+//= require jquery
+//= require jquery_ujs
+//= require_tree .

data/app/assets/stylesheets/payable/application.css

@@ -0,0 +1,13 @@
+/*
+ * This is a manifest file that'll be compiled into application.css, which will include all the files
+ * listed below.
+ *
+ * Any CSS and SCSS file within this directory, lib/assets/stylesheets, vendor/assets/stylesheets,
+ * or vendor/assets/stylesheets of plugins, if any, can be referenced here using a relative path.
+ *
+ * You're free to add application-wide styles to this file and they'll appear at the top of the
+ * compiled file, but it's generally better to create a new file per style scope.
+ *
+ *= require_self
+ *= require_tree .
+ */

data/app/controllers/payable/application_controller.rb

@@ -0,0 +1,4 @@
+module Payable
+  class ApplicationController < ActionController::Base
+  end
+end

data/app/controllers/payable/welcome_controller.rb

@@ -0,0 +1,25 @@
+module Payable 
+  class WelcomeController < ApplicationController
+    def index
+      Order.create(:value => rand(100) * 1.234, :bill_status => 'open') if Order.open.size.zero?
+      @orders = Order.order('id DESC').all
+    end
+  
+    def checkout
+      @order = Order.find(params[:id])
+
+      begin
+        @order.checkout_bill
+        redirect_to :controller => "welcome", :action => "json_form", :id => @order.id
+      rescue
+        flash[:error] = $!.message
+        redirect_to root_url
+      end
+    end
+  
+    def json_form
+      @order = Order.find(params[:id])
+    end
+  
+  end
+end

data/app/helpers/payable/application_helper.rb

@@ -0,0 +1,4 @@
+module Payable
+  module ApplicationHelper
+  end
+end

data/app/models/payable/gateway_payment.rb

@@ -0,0 +1,115 @@
+# coding: utf-8
+module Payable
+  class GatewayPayment < ActiveRecord::Base
+    attr_accessible :payable_type, :payable_id, :config
+    serialize :config
+
+    state_machine :status, :initial => :open do
+      state :open
+      state :waiting
+      state :payed
+      state :canceled
+
+      after_transition :on => :pay do |gate, transition|
+        return unless gate.payable.present?
+        gate.payable.pay_bill
+        gate.payable.try(:payable_callback)
+      end
+
+      after_transition :on => :cancel do |gate, transition|
+        gateway_payment = gate.payable.try(:verify_gateway_payment)
+        gateway_payment.save if gateway_payment.present?
+      end
+
+      before_transition :on => :checkout do |gate, transition|
+        gate.payable_checkout
+        
+        if gate.config[:response]["Status"] == "Sucesso"
+          gate.config.delete(:response).each { |k,v| gate.config[k.to_s.downcase] = v }
+          gate.config.symbolize_keys!
+        else
+          #TODO: Como tratar esta exception handling
+          raise "Erro no envio da requisição: #{gate.config[:response]['Erro']['__content__']}"
+        end
+      end
+
+      after_transition :on => :checkout do |gate, transition|
+        gate.payable.try(:checkout_bill)
+        gate.update_attribute :expires_at, 15.minutes.from_now
+      end
+
+      event :cancel do
+        transition :open => :canceled
+      end
+
+      event :checkout do
+        transition :open => :waiting
+      end
+
+      event :pay do
+        transition [:waiting, :open] => :payed
+      end
+    end
+
+    scope :active, :conditions => "status <> 'canceled'", :limit => 1
+
+    belongs_to :payable, :polymorphic => true
+
+    before_validation :ensure_config_is_a_hash
+    def ensure_config_is_a_hash
+      self.config = {} unless self.config.is_a?(Hash)
+    end
+
+    def payable_checkout
+      builder = Nokogiri::XML::Builder.new(:encoding => "UTF-8") do |xml|
+        # Identificador do tipo de instrução
+        xml.EnviarInstrucao {
+          xml.InstrucaoUnica(:TipoValidacao => "Transparente") {
+            xml.Razao{xml.text "Pagamento #{payable.payable_name} ##{self.id}"}
+            xml.Valores{
+              xml.Valor(:moeda => "BRL"){ xml.text payable.payable_value.to_f }
+            }
+            xml.IdProprio{ xml.text "#{('aa'..'zz').to_a.sample}-#{self.id}-#{rand(1000)}" }
+
+            #dados do pagador
+            xml.Pagador{
+              xml.IdPagador { xml.text payable.payable_user.id }
+              xml.Nome      { xml.text payable.payable_user.name }
+              xml.Email     { xml.text payable.payable_user.email }
+              xml.EnderecoCobranca {
+                addr = payable.payable_user.billing_address
+                xml.Logradouro  { xml.text addr.address}
+                xml.Numero      { xml.text addr.number}
+                xml.Complemento { xml.text addr.complement}
+                xml.Bairro      { xml.text addr.district}
+                xml.Cidade      { xml.text addr.city_name}
+                xml.Estado      { xml.text addr.state_name}
+                xml.Pais        { xml.text addr.country_name}
+                xml.CEP         { xml.text addr.zip}
+                xml.TelefoneFixo{ xml.text addr.phone}
+              }
+            }
+
+            #dados do parcelamento
+            xml.Parcelamentos{
+              xml.Parcelamento{
+                xml.MinimoParcelas{ xml.text 2}
+                xml.MaximoParcelas{ xml.text 99}
+                xml.Repassar{ xml.text 'true' }
+              }
+            }
+
+            #dados de comissões
+          }
+        }
+      end
+
+      response = HTTParty.post('https://desenvolvedor.moip.com.br/sandbox/ws/alpha/EnviarInstrucao/Unica', 
+                                :body => builder.to_xml,
+                                :basic_auth => {:username => 'E6T1EBOPOMQ62CXJI4PGKPETAPROIEJD', 
+                                                :password => 'FELWDIWMPL7QPFABGZHH0OFF24BGL2ZGDSDYCS3A'}).parsed_response
+      self.config ||= {}
+      self.config[:response] = response["EnviarInstrucaoUnicaResponse"]["Resposta"]
+    end
+  end
+end

data/app/views/layouts/payable/application.html.erb

@@ -0,0 +1,14 @@
+<!DOCTYPE html>
+<html>
+<head>
+  <title>Payable</title>
+  <%= stylesheet_link_tag    "payable/application", :media => "all" %>
+  <%= javascript_include_tag "payable/application" %>
+  <%= csrf_meta_tags %>
+</head>
+<body>
+
+<%= yield %>
+
+</body>
+</html>

data/app/views/payable/welcome/index.html.erb

@@ -0,0 +1,10 @@
+<h1>Welcome</h1>
+<% @orders.each do |order| %>
+  <p>
+    <% if order.bill_canceled? || order.bill_payed? %>
+    <%= "Pedido ##{order.id}, R$ #{order.value} - #{order.bill_status}" %>
+    <% else %>
+    <%= button_to("Pagar Pedido ##{order.id}, R$ #{order.value} - #{order.bill_status}", :action => :checkout, :id => order.id) %>
+    <% end %>
+  </p>
+<% end %>

data/app/views/payable/welcome/json_form.html.erb

@@ -0,0 +1,44 @@
+
+<% @order.gateway_payment.config.each do |k, v| %>
+<p>
+  <%= k %>: <%= v %>
+</p>
+<% end %>
+
+
+<fieldset>
+  <legend>Campos Crédito</legend>
+  
+  <p class="operadora">
+    <span><label for="operadora_AmericanExpress"><%= radio_button_tag 'operadora', 'AmericanExpress' %> AmericanExpress</label></span>
+    <span><label for="operadora_Diners"><%= radio_button_tag 'operadora', 'Diners' %> Diners</label></span>
+    <span><label for="operadora_Hipercard"><%= radio_button_tag 'operadora', 'Hipercard' %> Hipercard</label></span>
+    <span><label for="operadora_Mastercard"><%= radio_button_tag 'operadora', 'Mastercard' %> Mastercard</label></span>
+    <span><label for="operadora_Visa"><%= radio_button_tag 'operadora', 'Visa' %> Visa</label></span>
+  </p>
+  
+  <p>
+    <label for="credit_number">Número</label>: <%= text_field_tag "credit_number" %>
+  </p>
+
+  <p>
+    <label for="expires_date">Validade</label>: <%= text_field_tag "expires_date" %> MM/AA
+  </p>
+
+  <p>
+    <label for="security_code">Cód. Segurança</label>: <%= text_field_tag "security_code" %>
+  </p>
+   
+   <%= button_to_function "Pagar", "alert('pagando')" %>
+</fieldset>
+
+
+
+
+<%= content_tag(:div, nil, 'id' => 'MoipWidget',
+                           'data-token' => @order.payable_token,
+                           'callback-method-success' => 'func1',
+                           'callback-method-error' => 'func2' ) %>
+
+
+<%= link_to "Voltar", root_url %>

data/config/routes.rb

@@ -0,0 +1,7 @@
+Payable::Engine.routes.draw do
+
+  root :to => "welcome#index"
+  post "welcome/checkout", :controller => "welcome", :action => "checkout"
+  get "welcome/json_form", :controller => "welcome", :action => "json_form"
+
+end

data/db/migrate/20120607044142_create_payable_gateway_payments.rb

@@ -0,0 +1,20 @@
+class CreatePayableGatewayPayments < ActiveRecord::Migration
+  def up
+    create_table :payable_gateway_payments do |t|
+      t.string :payable_type
+      t.integer :payable_id
+      t.datetime :expires_at
+      t.string :status
+      t.string :config
+      t.timestamps
+    end
+    
+    begin
+    execute "CREATE UNIQUE INDEX un_index_payable_gateway_payments ON payable_gateway_payments USING btree (payable_id, payable_type) WHERE status <> 'canceled';"
+    rescue; end
+  end
+
+  def down
+    drop_table :payable_gateway_payments
+  end
+end

data/lib/model_extensions.rb

@@ -0,0 +1,97 @@
+module Payable
+  module ModelExtensions
+
+    # Eager loading (applies to all models)
+    def self.included(base)
+      base.extend ClassMethods
+      base.send(:include, InstanceMethods)
+    end
+
+    module ClassMethods
+      def payable?; false end
+      
+      def payable(*args)
+        
+        class_eval "def self.payable?; true end"
+        
+        config = {:name => nil,
+                  :user => :user,
+                  :value => :value, 
+                  :callback => nil,
+                  :bill_status => :bill_status}
+        config.update(args.extract_options!)
+
+        has_many :gateway_payments, :as => :payable, :class_name => "Payable::GatewayPayment"
+        has_one :gateway_payment, :as => :payable, :class_name => "Payable::GatewayPayment", :conditions => "status <> 'canceled'"
+        
+        state_machine config[:bill_status], :namespace => "bill", :initial => :open do
+          state :open
+          state :waiting
+          state :payed
+          state :canceled
+
+          after_transition :on => :cancel do |payable, transition|
+            payable.gateway_payment.cancel
+          end
+
+          after_transition :on => :checkout do |payable, transition|
+            payable.gateway_payment.checkout        
+          end
+
+          after_transition :on => :pay do |payable, transition|
+            payable.gateway_payment.pay
+          end
+
+          event :cancel do
+            transition :open => :canceled
+          end
+
+          event :checkout do
+            transition :open => :waiting
+          end
+
+          event :pay do
+            transition [:waiting, :open] => :payed
+          end
+        end
+
+        before_save :verify_gateway_payment
+        define_method :verify_gateway_payment do
+          self.gateway_payments.build if !self.bill_canceled? && (self.gateway_payments.size.zero? || self.gateway_payments.all?(&:canceled?))
+        end
+        
+        define_method :payable_value do
+          get_config_param(config[:value])
+        end
+
+        define_method :payable_user do
+          get_config_param(config[:user])
+        end
+
+        define_method :payable_name do
+          get_config_param(config[:user]) || self.class.name
+        end
+
+        define_method :payable_callback do
+          get_config_param(config[:callback])
+        end
+        
+        define_method :payable_token do
+          return unless self.gateway_payment.present?
+          
+          self.gateway_payment.config ||= {}
+          self.gateway_payment.config[:token]
+        end
+      end
+    end
+
+    module InstanceMethods
+      def get_config_param(proc); return if proc.blank?; proc.is_a?(Proc) ? (proc.arity.zero? ? proc.call : proc.call(self)) : self.send(proc) end
+      def payable?; self.class.payable? end
+    end
+
+  end
+end
+
+ActiveRecord::Base.send(:include, Payable::ModelExtensions)
+

data/lib/payable/engine.rb

@@ -0,0 +1,5 @@
+module Payable
+  class Engine < ::Rails::Engine
+    isolate_namespace Payable
+  end
+end

data/lib/payable/version.rb

@@ -0,0 +1,3 @@
+module Payable
+  VERSION = "0.0.1"
+end

data/lib/payable.rb

@@ -0,0 +1,6 @@
+require "payable/engine"
+
+module Payable
+
+  require "model_extensions"
+end

data/lib/tasks/payable_tasks.rake

@@ -0,0 +1,4 @@
+# desc "Explaining what the task does"
+# task :payable do
+#   # Task goes here
+# end