edools_mymoip 0.8.1

data/lib/mymoip/instruction.rb

@@ -0,0 +1,134 @@
+require File.expand_path(File.dirname(__FILE__) + '/validators.rb')
+module MyMoip
+  class Instruction
+    include Validators
+    include ActiveModel::Validations
+
+    attr_accessor :id, :payment_reason, :values, :payer,
+                  :commissions, :fee_payer_login, :payment_receiver_login,
+                  :payment_receiver_name, :installments,
+                  :notification_url, :return_url,
+                  :payment_slip, :payment_methods
+
+    validates_presence_of :id, :payment_reason, :values, :payer
+    validate :commissions_value_must_be_lesser_than_values
+    validate :payment_receiver_presence_in_commissions
+    validate :url_format_validation
+
+    def initialize(attrs)
+      attrs.each do |attr, value|
+        public_send(:"#{attr}=", value)
+      end
+
+      self.commissions ||= []
+    end
+
+    def to_xml(root = nil)
+      raise InvalidPayer       if payer.invalid?
+      raise InvalidPaymentSlip if payment_slip and payment_slip.invalid?
+      raise InvalidInstruction if self.invalid?
+      if invalid_commission = commissions.detect { |c| c.invalid? }
+        raise InvalidComission, invalid_commission
+      end
+
+      xml = ""
+      root = Builder::XmlMarkup.new(target: xml)
+
+      root.EnviarInstrucao do |n1|
+        n1.InstrucaoUnica(TipoValidacao: "Transparente") do |n2|
+          n2.Razao(@payment_reason)
+          n2.Valores do |n3|
+            @values.each { |v| n3.Valor("%.2f" % v, moeda: "BRL") }
+          end
+          n2.IdProprio(@id)
+
+          if @installments
+            n2.Parcelamentos do |n4|
+              @installments.each do |installments|
+                n4.Parcelamento do |n5|
+                  n5.MinimoParcelas(installments[:min])
+                  n5.MaximoParcelas(installments[:max])
+                  if installments[:forward_taxes]
+                    n5.Repassar(installments[:forward_taxes])
+                  end
+                  if installments[:receive_in_installments]
+                    n5.Recebimento('Parcelado')
+                  end
+                  n5.Juros(installments[:fee])
+                end
+              end
+            end
+          end
+
+          commissions_to_xml(n2)      if commissions.any?
+          payment_receiver_to_xml(n2) if payment_receiver_login
+
+          n2.Pagador { |n3| @payer.to_xml(n3) }
+
+          unless @payment_methods.blank? or @payment_methods.using_all?
+            n2.FormasPagamento { |n3| @payment_methods.to_xml(n3) }
+          end
+          unless @payment_slip.blank?
+            n2.Boleto { |n3| @payment_slip.to_xml(n3) }
+          end
+          unless @notification_url.blank?
+            n2.URLNotificacao(@notification_url)
+          end
+          unless @return_url.blank?
+            n2.URLRetorno(@return_url)
+          end
+        end
+      end
+
+      xml
+    end
+
+    def commissions_sum
+      commissions.inject(0) do |sum, commission|
+        sum + commission.gross_amount(self)
+      end
+    end
+
+    def gross_amount
+      values ? values.reduce(0) { |sum, value| sum + value } : 0
+    end
+
+    protected
+
+    def commissions_value_must_be_lesser_than_values
+      if commissions_sum > gross_amount
+        errors.add(:commissions, "Commissions value sum is greater than instruction value sum")
+      end
+    end
+
+    def payment_receiver_presence_in_commissions
+      if commissions.find { |c| c.receiver_login == payment_receiver_login }
+        errors.add(:payment_receiver_login, "Payment receiver can't be commissioned")
+      end
+    end
+
+    def commissions_to_xml(node)
+      node.Comissoes do |n|
+        commissions.each { |c| c.to_xml(n) }
+        n.PagadorTaxa { |pt| pt.LoginMoIP(fee_payer_login) } if fee_payer_login
+      end
+    end
+
+    def payment_receiver_to_xml(node)
+      node.Recebedor do |n|
+        n.LoginMoIP(payment_receiver_login)
+        n.Apelido(payment_receiver_name)
+      end
+    end
+
+    def url_format_validation
+      if not notification_url.blank? and not valid_url?(notification_url)
+        errors.add(:notification_url, 'Invalid URL format')
+      end
+
+      if not return_url.blank? and not valid_url?(return_url)
+        errors.add(:return_url, 'Invalid URL format.')
+      end
+    end
+  end
+end

data/lib/mymoip/json_parser.rb

@@ -0,0 +1,11 @@
+module MyMoip
+  class JsonParser
+    def self.call(body, format)
+      if format == :json
+        JSON.parse body.match(/\?\((?<valid_json>.+)\)/)[:valid_json]
+      else
+        body
+      end
+    end
+  end
+end

data/lib/mymoip/payer.rb

@@ -0,0 +1,75 @@
+module MyMoip
+  class Payer
+    include ActiveModel::Validations
+
+    attr_accessor :id, :name, :email,
+                  :address_street, :address_street_number,
+                  :address_street_extra, :address_neighbourhood,
+                  :address_city, :address_state, :address_country,
+                  :address_cep, :address_phone
+
+    validates_presence_of :id, :name, :email, :address_street,
+                          :address_street_number, :address_neighbourhood,
+                          :address_city, :address_state, :address_country,
+                          :address_cep, :address_phone
+    validates_length_of :address_state,   is: 2
+    validates_length_of :address_country, is: 3
+    validates_length_of :address_cep,     is: 8
+    validates_length_of :address_phone, within: 10..11
+
+    def initialize(attrs)
+      attrs.each do |attr, value|
+        public_send(:"#{attr}=", value)
+      end
+    end
+
+    def address_cep=(value)
+      value.gsub!(/\D*/, '') unless value.nil?
+      @address_cep = value
+    end
+
+    def address_state=(value)
+      value = value.upcase unless value.nil?
+      @address_state = value
+    end
+
+    def address_country=(value)
+      value = value.upcase unless value.nil?
+      @address_country = value
+    end
+
+    def address_phone=(value)
+      unless value.nil?
+        # Removes non-digits
+        value.gsub!(/\D*/, '')
+        # Removes zeros in the beginning
+        value.gsub!(/\A0*/, '')
+      end
+      @address_phone = value
+    end
+
+    def to_xml(root = nil, formatter = MyMoip::Formatter)
+      if root.nil?
+        xml  = ""
+        root ||= Builder::XmlMarkup.new(target: xml)
+      end
+
+      root.Nome(@name)
+      root.Email(@email)
+      root.IdPagador(@id)
+      root.EnderecoCobranca do |n1|
+        n1.Logradouro(@address_street)
+        n1.Numero(@address_street_number)
+        n1.Complemento(@address_street_extra)
+        n1.Bairro(@address_neighbourhood)
+        n1.Cidade(@address_city)
+        n1.Estado(@address_state)
+        n1.Pais(@address_country)
+        n1.CEP(formatter.cep(@address_cep))
+        n1.TelefoneFixo(formatter.phone(@address_phone))
+      end
+
+      xml
+    end
+  end
+end

data/lib/mymoip/payment.rb

@@ -0,0 +1,10 @@
+module MyMoip
+  class Payment
+    def self.payment_method
+      name.gsub(/^MyMoip::|Payment$/, '').gsub(/([a-z])([A-Z])/,'\1_\2').downcase.to_sym
+    end
+  end
+end
+
+payments = Dir[File.dirname(__FILE__) + "/payments/*.rb"]
+payments.each { |f| require f }

data/lib/mymoip/payment_methods.rb

@@ -0,0 +1,46 @@
+module MyMoip
+  class PaymentMethods
+    include ActiveModel::Validations
+
+    attr_accessor :payment_slip, :credit_card, :debit, :debit_card, :financing,
+                  :moip_wallet
+
+    validates_inclusion_of :payment_slip, :credit_card, :debit, :debit_card,
+                           :financing, :moip_wallet, in: [true, false]
+
+    def initialize(attrs = {})
+      self.payment_slip = true
+      self.credit_card  = true
+      self.debit        = true
+      self.debit_card   = true
+      self.financing    = true
+      self.moip_wallet  = true
+
+      attrs.each do |attr, value|
+        public_send(:"#{attr}=", value)
+      end
+    end
+
+    def to_xml(root = nil)
+      if root.nil?
+        xml = ""
+        root ||= Builder::XmlMarkup.new(target: xml)
+      end
+
+      if not using_all?
+        root.FormaPagamento('BoletoBancario')        if payment_slip
+        root.FormaPagamento('CartaoDeCredito')       if credit_card
+        root.FormaPagamento('DebitoBancario')        if debit
+        root.FormaPagamento('CartaoDeDebito')        if debit_card
+        root.FormaPagamento('FinanciamentoBancario') if financing
+        root.FormaPagamento('CarteiraMoIP')          if moip_wallet
+      end
+
+      xml
+    end
+
+    def using_all?
+      payment_slip and credit_card and debit and debit_card and financing and moip_wallet
+    end
+  end
+end

data/lib/mymoip/payment_slip.rb

@@ -0,0 +1,74 @@
+module MyMoip
+  class PaymentSlip
+    include Validators
+    include ActiveModel::Validations
+
+    attr_accessor :expiration_date, :expiration_days, :expiration_days_type,
+                  :instruction_line_1, :instruction_line_2,
+                  :instruction_line_3, :logo_url
+
+    validates_length_of :instruction_line_1, maximum: 63, allow_nil: true
+    validates_length_of :instruction_line_2, maximum: 63, allow_nil: true
+    validates_length_of :instruction_line_3, maximum: 63, allow_nil: true
+
+    validates_numericality_of :expiration_days, less_than_or_equal_to: 99,
+                              allow_nil: true
+    validates_inclusion_of :expiration_days_type,
+                           in: [:business_day, :calendar_day], allow_nil: true
+
+    validate :logo_url_format
+    validate :expiration_date_format
+
+    def initialize(attrs)
+      attrs.each do |attr, value|
+        public_send(:"#{attr}=", value)
+      end
+    end
+
+    def to_xml(root = nil)
+      raise InvalidPaymentSlip if invalid?
+
+      if root.nil?
+        xml = ""
+        root ||= Builder::XmlMarkup.new(target: xml)
+      end
+
+      root.DataVencimento(expiration_date.strftime('%Y-%m-%dT%H:%M:%S.%L%:z')) unless expiration_date.blank?
+
+      if expiration_days
+        type = nil
+        if expiration_days_type
+          if expiration_days_type == :business_day
+            type = {'Tipo' => 'Uteis'}
+          elsif expiration_days_type == :calendar_day
+            type = {'Tipo' => 'Corridos'}
+          end
+        end
+
+        root.DiasExpiracao(expiration_days, type)
+      end
+
+      root.Instrucao1(instruction_line_1) unless instruction_line_1.blank?
+      root.Instrucao2(instruction_line_2) unless instruction_line_2.blank?
+      root.Instrucao3(instruction_line_3) unless instruction_line_3.blank?
+
+      root.URLLogo(logo_url) unless logo_url.blank?
+
+      xml
+    end
+
+    private
+
+    def logo_url_format
+      if not logo_url.blank? and not valid_url?(logo_url)
+        errors.add(:logo_url, 'Invalid URL format.')
+      end
+    end
+
+    def expiration_date_format
+      if not expiration_date.blank? and not expiration_date.instance_of?(DateTime)
+        errors.add(:expiration_date, 'Expiration date must be a DateTime object.')
+      end
+    end
+  end
+end

data/lib/mymoip/payments/bank_debit_payment.rb

@@ -0,0 +1,27 @@
+module MyMoip
+  class BankDebitPayment < Payment
+    attr_accessor :bank_debit
+
+    def initialize(bank_debit)
+      @bank_debit = bank_debit
+    end
+
+    def to_json
+      raise InvalidBankDebit, "No bank debit information provided." if @bank_debit.nil?
+      raise InvalidBankDebit if @bank_debit.invalid?
+
+      json = {
+        Forma: "DebitoBancario",
+      }
+
+      json[:Instituicao] = {
+        banco_do_brasil: "BancoDoBrasil",
+        bradesco: "Bradesco",
+        banrisul: "Banrisul",
+        itau: "Itau"
+      }.fetch(@bank_debit.bank)
+
+      json
+    end
+  end
+end

data/lib/mymoip/payments/credit_card_payment.rb

@@ -0,0 +1,53 @@
+module MyMoip
+  class CreditCardPayment < Payment
+    attr_accessor :credit_card, :installments
+
+    def initialize(credit_card, opts = {})
+      self.credit_card  = credit_card
+      self.installments = opts[:installments] || 1
+    end
+
+    def to_json(formatter = MyMoip::Formatter)
+      raise InvalidCreditCard, 'No credit card provided.' if credit_card.nil?
+      raise InvalidCreditCard                             if credit_card.invalid?
+
+      json = {
+        Forma:        "CartaoCredito",
+        Parcelas:     @installments,
+        CartaoCredito: {
+          Numero:           credit_card.card_number,
+          Expiracao:        credit_card.expiration_date,
+          CodigoSeguranca:  credit_card.security_code
+        }
+      }
+
+      json[:CartaoCredito][:Portador] = {
+        Nome: credit_card.owner_name,
+        DataNascimento: (credit_card.owner_birthday and
+                         formatter.date(credit_card.owner_birthday)),
+        Telefone: (credit_card.owner_phone and
+                   formatter.phone(credit_card.owner_phone)),
+        Identidade: (credit_card.owner_cpf and
+                     formatter.cpf(credit_card.owner_cpf))
+      }
+
+      json[:Instituicao] = {
+        american_express: "AmericanExpress",
+        diners:           "Diners",
+        hipercard:        "Hipercard",
+        mastercard:       "Mastercard",
+        visa:             "Visa"
+      }.fetch(credit_card.logo)
+
+      if cash?
+        json[:Recebimento] = "AVista"
+      end
+
+      json
+    end
+
+    def cash?
+      @installments == 1
+    end
+  end
+end

data/lib/mymoip/payments/payment_slip_payment.rb

@@ -0,0 +1,12 @@
+module MyMoip
+  class PaymentSlipPayment < Payment
+
+    def to_json
+      json = {
+        Forma: 'BoletoBancario'
+      }
+
+      json
+    end
+  end
+end