clearsale 0.1.0

data/.gitignore

@@ -0,0 +1 @@
+*.sw*

data/.rspec

@@ -0,0 +1 @@
+--color

data/Gemfile

@@ -0,0 +1,3 @@
+source "http://rubygems.org"
+
+gemspec

data/Gemfile.lock

@@ -0,0 +1,98 @@
+PATH
+  remote: .
+  specs:
+    clearsale (0.0.1)
+      builder
+      savon
+
+GEM
+  remote: http://rubygems.org/
+  specs:
+    active_support (3.0.0)
+      activesupport (= 3.0.0)
+    activesupport (3.0.0)
+    addressable (2.2.8)
+    akami (1.2.0)
+      gyoku (>= 0.4.0)
+      nokogiri (>= 1.4.0)
+    builder (3.0.0)
+    columnize (0.3.6)
+    crack (0.3.1)
+    curb (0.8.1)
+    debugger (1.2.0)
+      columnize (>= 0.3.1)
+      debugger-linecache (~> 1.1.1)
+      debugger-ruby_core_source (~> 1.1.3)
+    debugger-linecache (1.1.2)
+      debugger-ruby_core_source (>= 1.1.1)
+    debugger-ruby_core_source (1.1.3)
+    diff-lcs (1.1.3)
+    ffi (1.0.11)
+    guard (1.2.3)
+      listen (>= 0.4.2)
+      thor (>= 0.14.6)
+    guard-bundler (1.0.0)
+      bundler (~> 1.0)
+      guard (~> 1.1)
+    guard-rspec (1.2.0)
+      guard (>= 1.1)
+    gyoku (0.4.6)
+      builder (>= 2.1.2)
+    httpi (1.1.1)
+      rack
+    i18n (0.6.0)
+    listen (0.4.7)
+      rb-fchange (~> 0.0.5)
+      rb-fsevent (~> 0.9.1)
+      rb-inotify (~> 0.8.8)
+    nokogiri (1.5.5)
+    nori (1.1.3)
+    rack (1.4.1)
+    rake (0.9.2.2)
+    rb-fchange (0.0.5)
+      ffi
+    rb-fsevent (0.9.1)
+    rb-inotify (0.8.8)
+      ffi (>= 0.5.0)
+    rspec (2.10.0)
+      rspec-core (~> 2.10.0)
+      rspec-expectations (~> 2.10.0)
+      rspec-mocks (~> 2.10.0)
+    rspec-core (2.10.1)
+    rspec-expectations (2.10.0)
+      diff-lcs (~> 1.1.3)
+    rspec-mocks (2.10.1)
+    savon (1.1.0)
+      akami (~> 1.2.0)
+      builder (>= 2.1.2)
+      gyoku (~> 0.4.5)
+      httpi (~> 1.1.0)
+      nokogiri (>= 1.4.0)
+      nori (~> 1.1.0)
+      wasabi (~> 2.5.0)
+    thor (0.15.4)
+    timecop (0.4.1)
+    vcr (1.11.3)
+    wasabi (2.5.0)
+      httpi (~> 1.0)
+      nokogiri (>= 1.4.0)
+    webmock (1.7.10)
+      addressable (~> 2.2, > 2.2.5)
+      crack (>= 0.1.7)
+
+PLATFORMS
+  ruby
+
+DEPENDENCIES
+  active_support
+  clearsale!
+  curb
+  debugger
+  guard-bundler
+  guard-rspec
+  i18n
+  rake
+  rspec
+  timecop
+  vcr (~> 1.11.3)
+  webmock (~> 1.7.0)

data/Guardfile

@@ -0,0 +1,10 @@
+guard 'bundler' do
+  watch('Gemfile')
+end
+
+guard 'rspec', :version => 2, :bundler => false do
+  watch(%r{^spec/(.*)_spec\.rb$})
+  watch(%r{^lib/clearsale.rb$})                       { "spec" }
+  watch(%r{^lib/clearsale/(.*)\.rb$})                 { |m| "spec/#{m[1]}_spec.rb" }
+  watch('spec/spec_helper.rb')                       { "spec" }
+end

data/README.rdoc

@@ -0,0 +1,107 @@
+= Clearsale
+
+== Instalação
+Defina a variavél de ambiente CLEARSALE_ENTITYCODE
+  export CLEARSALE_ENTITYCODE=03524C82-F434-4A32-8D34-EFFF2023341B
+
+Adicione no seu Gemfile
+  gem 'clearsale', :github => 'Baby-com-br/clearsale'
+
+Execute
+  bundle install
+
+== Uso
+  require 'clearsale'
+
+  order = {
+    :id => 1234,
+    :paid_at => 2.seconds.ago,
+    :billing_address => {
+      :street_name => 'Bla St',
+      :number => '123',
+      :complement => '',
+      :neighborhood => 'Rhode Island',
+      :city => 'Mayland',
+      :state => 'Maryland',
+      :postal_code => '00100-011'
+    },
+    :shipping_address => {
+      :street_name => 'Bla St',
+      :number => '123',
+      :complement => '',
+      :neighborhood => 'Rhode Island',
+      :city => 'Mayland',
+      :state => 'Maryland',
+      :postal_code => '00100-011'
+    },
+    :installments => 3,
+    :total_items => 20.00,
+    :total_order => 25.00,
+    :items_count => 3,
+    :created_at => Time.current,
+    :order_items => [
+       {
+          :product => {
+           :id => 5555,
+           :name => 'Pogobol',
+           :category => { :id => 7777, :name => 'Disney' }
+           },
+         :price => 5.00,
+         :quantity => 2,
+       },
+       {
+          :product => {
+           :id => 5555,
+           :name => 'Pogobol',
+           :category => { :id => 7777, :name => 'Disney' }
+           },
+         :price => 5.00,
+         :quantity => 2,
+       },
+    ],
+  }
+
+  payment = {
+    :card_holder => 'Petter L Griffin',
+    :card_number => '1234432111112222',
+    :card_expiration => '05/2012',
+    :card_security_code => '123',
+    :acquirer => 'visa',
+    :amount => 50.00,
+  }
+
+  user = {
+    :email     => 'petergriffin@abc.com',
+    :id        => 8888,
+    :cpf       => '248.783.463-37',
+    :full_name => 'Peter Löwenbräu Griffin',
+    :birthdate => 40.years.ago,
+    :phone     => '11 8001 1002',
+    :gender    => 'm',
+    :last_sign_in_ip => '127.0.0.1',
+  }
+
+  #Solicitando a analise
+  response = Clearsale::Analysis.send_order(order, payment, user)
+
+  #consultando a analise
+  order_id = '1234'
+  response = Clearsale::Analysis.get_order_status(order_id)
+
+  response.order_id
+  # => 1234
+
+  response.score
+  # => (0.01..21.11)
+
+  response.status
+  # => :automatic_approval
+  # => :manual_approval
+  # => :rejected_without_suspicion
+  # => :manual_analysis
+  # => :error
+  # => :waiting
+  # => :manual_rejection
+  # => :cancelled
+  # => :fraud
+

data/Rakefile

@@ -0,0 +1,6 @@
+require 'bundler/gem_tasks'
+require 'rspec/core/rake_task'
+
+RSpec::Core::RakeTask.new(:spec)
+
+task :default => :spec

data/clearsale.gemspec

@@ -0,0 +1,34 @@
+# -*- encoding: utf-8 -*-
+$:.push File.expand_path("../lib", __FILE__)
+require "clearsale/version"
+
+Gem::Specification.new do |s|
+  s.name        = "clearsale"
+  s.version     = Clearsale::VERSION
+  s.authors     = ["Daniel Konishi"]
+  s.email       = %w[dkonishi@gmail.com]
+  s.homepage    = "http://github.com/Baby-com-br/clearsale"
+  s.summary     = "clearsale gem to use Clearsale service"
+  s.description = "clearsale gem to use Clearsale service"
+
+  s.rubyforge_project = "clearsale"
+
+  s.files         = `git ls-files`.split("\n")
+  s.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  s.require_paths = ["lib"]
+  s.add_dependency "builder"
+  s.add_dependency "savon"
+
+  s.add_development_dependency "rake"
+  s.add_development_dependency "rspec"
+  s.add_development_dependency "webmock", "~> 1.7.0"
+  s.add_development_dependency "vcr", "~> 1.11.3"
+  s.add_development_dependency "guard-rspec"
+  s.add_development_dependency "guard-bundler"
+  s.add_development_dependency "debugger"
+  s.add_development_dependency "active_support"
+  s.add_development_dependency "i18n"
+  s.add_development_dependency "curb"
+  s.add_development_dependency "timecop"
+end

data/lib/clearsale.rb

@@ -0,0 +1,11 @@
+require 'active_support/all'
+
+module Clearsale
+  extend ActiveSupport::Autoload
+
+  autoload :Object,        'clearsale/object'
+  autoload :Order,         'clearsale/order'
+  autoload :OrderResponse, 'clearsale/order_response'
+  autoload :Connector,     'clearsale/connector'
+  autoload :Analysis,      'clearsale/analysis'
+end

data/lib/clearsale/analysis.rb

@@ -0,0 +1,27 @@
+ module Clearsale
+  class Analysis
+    def self.connector
+      @connector ||= Clearsale::Connector.build
+    end
+
+    def self.send_order(order_hash, payment_hash, user_hash)
+      order = Object.new(order_hash)
+      payment = Object.new(payment_hash)
+      user = Object.new(user_hash)
+
+      order_xml = Clearsale::Order.to_xml(order, payment, user)
+      request = {"xml" => order_xml}
+
+      OrderResponse.build_from_send_order(connector.do_request('SendOrders', request))
+    end
+
+    def self.clear_connector
+      @connector = nil
+    end
+
+    def self.get_order_status(order_id)
+      request = {'orderID' => order_id}
+      OrderResponse.build_from_update(connector.do_request('GetOrderStatus', request))
+    end
+  end
+end

data/lib/clearsale/connector.rb

@@ -0,0 +1,63 @@
+require 'savon'
+require 'nori'
+
+Nori.parser = :nokogiri
+
+module Clearsale
+  class Connector
+    NAMESPACE =  "http://www.clearsale.com.br/integration"
+
+    URLs = {
+      :homolog    => 'http://homologacao.clearsale.com.br/Integracaov2/Service.asmx',
+      :production => 'https://www.clearsale.com.br/integracaov2/service.asmx'
+    }
+
+    def self.build(env = ENV['CLEARSALE_ENV'])
+      if env == "production"
+        new(URLs[:production])
+      else
+        new(URLs[:homolog])
+      end
+    end
+
+    def initialize(endpoint_url)
+      @token = ENV['CLEARSALE_ENTITYCODE']
+      @client = Savon::Client.new do |wsdl|
+        wsdl.endpoint = endpoint_url
+        wsdl.namespace = NAMESPACE
+      end
+    end
+
+    def do_request(method, request)
+      namespaced_request = append_namespace('int', request)
+      arguments = namespaced_request.merge({'int:entityCode' => @token})
+
+      response = @client.request(:int, method) do |soap, _, http, _|
+        soap.namespaces = {
+          'xmlns:soap' => "http://www.w3.org/2003/05/soap-envelope",
+          'xmlns:xsd'  => "http://www.w3.org/2001/XMLSchema" ,
+          'xmlns:xsi'  => "http://www.w3.org/2001/XMLSchema-instance" ,
+          'xmlns:int'  => "http://www.clearsale.com.br/integration",
+        }
+
+        soap.env_namespace = :soap
+
+        soap.body = arguments
+        http.headers['SOAPAction'] = "#{NAMESPACE}/#{method}"
+      end
+
+      extract_response_xml(method, response.to_hash)
+    end
+
+    def extract_response_xml(method, response)
+      results = response.fetch(:"#{method.snakecase}_response", {})
+      response_xml = results.fetch(:"#{method.snakecase}_result", {}).to_s
+
+      Nori.parse(response_xml.gsub(/^<\?xml.*\?>/, ''))
+    end
+
+    def append_namespace(namespace, hash)
+      Hash[hash.map {|key, value| ["#{namespace}:#{key}", value]}]
+    end
+  end
+end

data/lib/clearsale/object.rb

@@ -0,0 +1,27 @@
+require 'ostruct'
+
+module Clearsale
+  class Object < OpenStruct
+    def new_ostruct_member(name)
+      name = name.to_sym
+      unless self.respond_to?(name)
+        class << self; self; end.class_eval do
+          define_method(name) {
+            v = @table[name]
+            case v
+              when Hash
+                Object.new(v)
+              when Array
+                v.each_with_index { |item, index| v[index] = Object.new(item) }
+              else
+                v
+              end
+          }
+          define_method("#{name}=") { |x| modifiable[name] = x }
+          define_method("#{name}_as_a_hash") { @table[name] }
+        end
+      end
+      name
+    end
+  end
+end

data/lib/clearsale/order.rb

@@ -0,0 +1,122 @@
+require 'builder'
+require 'ostruct'
+
+module Clearsale
+  class Order
+    CARD_TYPE_MAP = {
+      :visa       => 3,
+      :mastercard => 2,
+      :amex       => 5,
+    }
+    def self.to_xml(order, payment, user)
+      builder = Builder::XmlMarkup.new
+      xml = builder.tag!("ClearSale") do |b|
+        b.tag!('Orders') do |b|
+          b.tag!('Order') do |b|
+            build_order(b, order, payment, user)
+          end
+        end
+      end.to_s
+      xml
+    end
+
+    def self.build_order(builder, order, payment, user)
+      builder.tag!('ID', order.id)
+      builder.tag!('Date', order.created_at.strftime("%Y-%m-%dT%H:%M:%S"))
+      builder.tag!('Email', user.email)
+      builder.tag!('TotalItens', order.total_items)
+      builder.tag!('TotalOrder', order.total_order)
+      builder.tag!('QtyInstallments', order.installments)
+      builder.tag!('QtyItems', order.items_count)
+      builder.tag!('IP', user.last_sign_in_ip)
+      builder.tag!('CollectionData') do |b|
+        build_user_data(b, user, order.billing_address)
+      end
+      builder.tag!('ShippingData') do |b|
+        build_user_data(b, user, order.shipping_address)
+      end
+
+      builder.tag!('Payments') do |b|
+        build_payment_data(b, order, payment, user)
+      end
+
+      builder.tag!('Items') do |b|
+        order.order_items.each do |order_item|
+          build_item(b, order_item)
+        end
+      end
+    end
+
+    def self.build_user_data(builder, user, billing_address)
+      builder.tag!('ID', user.id)
+      builder.tag!('Type', 1) # Pessoa Física
+      builder.tag!('LegalDocument1', user.cpf.gsub(/[\.\-]*/, '').strip)
+      builder.tag!('Name', user.full_name)
+      builder.tag!('BirthDate', user.birthdate.to_time.strftime("%Y-%m-%dT%H:%M:%S"))
+      builder.tag!('Email', user.email)
+      builder.tag!('Genre', user.gender.downcase)
+      build_address(builder, billing_address)
+      builder.tag!('Phones') do |b|
+        build_phone(b, user)
+      end
+    end
+
+    def self.build_address(builder, address)
+      builder.tag!('Address') do |b|
+        builder.tag!('Street', address.street_name)
+        builder.tag!('Number', address.number)
+        builder.tag!('Comp', address.complement)
+        builder.tag!('County', address.neighborhood)
+        builder.tag!('City', address.city)
+        builder.tag!('State', address.state)
+        builder.tag!('ZipCode', address.postal_code)
+      end
+    end
+
+    def self.build_phone(builder, user)
+      if user.phone.present?
+        stripped_phone = user.phone.gsub(/\(*\)*\s*\-*/, '')
+
+        builder.tag!('Phone') do |b|
+          b.tag!('Type', 0) # Undefined
+          b.tag!('DDD', stripped_phone[0..1])
+          b.tag!('Number', stripped_phone[2..-1])
+        end
+      end
+    end
+
+    def self.build_payment_data(builder, order, payment, user)
+      builder.tag!('Payment') do |b|
+        paid_at = order.paid_at || Time.current
+
+        b.tag!('Date', paid_at.strftime("%Y-%m-%dT%H:%M:%S"))
+        b.tag!('Amount', payment.amount)
+
+        #is_credit_card
+        b.tag!('PaymentTypeID', 1)
+
+        b.tag!('QtyInstallments', order.installments)
+
+        b.tag!('CardNumber', payment.card_number)
+        b.tag!('CardBin', payment.card_number[0..5])
+        b.tag!('CardType', CARD_TYPE_MAP.fetch(payment.acquirer, 4)) # Failover is 'outros'
+        b.tag!('CardExpirationDate', payment.card_expiration)
+        b.tag!('Name', payment.customer_name)
+        b.tag!('LegalDocument', user.cpf.gsub(/[\.\-]*/, '').strip)
+
+        build_address(b, order.billing_address)
+      end
+    end
+
+    def self.build_item(builder, order_item)
+      builder.tag!('Item') do |b|
+        b.tag!('ID', order_item.product.id)
+        b.tag!('Name', order_item.product.name)
+        b.tag!('ItemValue', order_item.price)
+        b.tag!('Qty', order_item.quantity)
+        b.tag!('CategoryID', order_item.product.category.id) if order_item.product.category.try(:id).present?
+        b.tag!('CategoryName', order_item.product.category.name) if order_item.product.category.try(:name).present?
+      end
+    end
+  end
+end