swiss-crm-activemerchant 1.0.12

data/lib/active_merchant/billing/gateways/merchant_partners.rb

@@ -0,0 +1,245 @@
+require 'nokogiri'
+
+module ActiveMerchant #:nodoc:
+  module Billing #:nodoc:
+    class MerchantPartnersGateway < Gateway
+      self.display_name = 'Merchant Partners'
+      self.homepage_url = 'http://www.merchantpartners.com/'
+
+      self.live_url = 'https://trans.merchantpartners.com/cgi-bin/ProcessXML.cgi'
+
+      self.supported_countries = ['US']
+      self.default_currency = 'USD'
+      self.money_format = :dollars
+      self.supported_cardtypes = %i[visa master american_express discover diners_club jcb]
+
+      def initialize(options = {})
+        requires!(options, :account_id, :merchant_pin)
+        super
+      end
+
+      def purchase(amount, payment_method, options = {})
+        post = {}
+        add_invoice(post, amount, options)
+        add_payment_method(post, payment_method)
+        add_customer_data(post, options)
+
+        commit(payment_method.is_a?(String) ? :stored_purchase : :purchase, post)
+      end
+
+      def authorize(amount, payment_method, options = {})
+        post = {}
+        add_invoice(post, amount, options)
+        add_payment_method(post, payment_method)
+        add_customer_data(post, options)
+
+        commit(:authorize, post)
+      end
+
+      def capture(amount, authorization, options = {})
+        post = {}
+        add_invoice(post, amount, options)
+        add_reference(post, authorization)
+        add_customer_data(post, options)
+
+        commit(:capture, post)
+      end
+
+      def void(authorization, options = {})
+        post = {}
+        add_reference(post, authorization)
+
+        commit(:void, post)
+      end
+
+      def refund(amount, authorization, options = {})
+        post = {}
+        add_invoice(post, amount, options)
+        add_reference(post, authorization)
+        add_customer_data(post, options)
+
+        commit(:refund, post)
+      end
+
+      def credit(amount, payment_method, options = {})
+        post = {}
+        add_invoice(post, amount, options)
+        add_payment_method(post, payment_method)
+
+        commit(payment_method.is_a?(String) ? :stored_credit : :credit, post)
+      end
+
+      def verify(credit_card, options = {})
+        MultiResponse.run(:use_first_response) do |r|
+          r.process { authorize(100, credit_card, options) }
+          r.process(:ignore_result) { void(r.authorization, options) }
+        end
+      end
+
+      def store(payment_method, options = {})
+        post = {}
+        add_payment_method(post, payment_method)
+        add_customer_data(post, options)
+
+        post[:profileactiontype] = options[:profileactiontype] || STORE_TX_TYPES[:store_only]
+
+        commit(:store, post)
+      end
+
+      def supports_scrubbing?
+        true
+      end
+
+      def scrub(transcript)
+        transcript.
+          gsub(%r((<ccnum>)[^<]+(<))i, '\1[FILTERED]\2').
+          gsub(%r((<cvv2>)[^<]+(<))i, '\1[FILTERED]\2').
+          gsub(%r((<merchantpin>)[^<]+(<))i, '\1[FILTERED]\2')
+      end
+
+      def test?
+        @options[:account_id].eql?('TEST0')
+      end
+
+      private
+
+      def add_invoice(post, money, options)
+        post[:amount] = amount(money)
+        post[:merchantordernumber] = options[:order_id]
+        post[:currency] = options[:currency] || currency(money)
+      end
+
+      def add_payment_method(post, payment_method)
+        if payment_method.is_a?(String)
+          user_profile_id, last4 = split_authorization(payment_method)
+          post[:userprofileid] = user_profile_id
+          post[:last4digits] = last4
+        else
+          post[:ccname] = payment_method.name
+          post[:ccnum] = payment_method.number
+          post[:cvv2] = payment_method.verification_value
+          post[:expmon] = format(payment_method.month, :two_digits)
+          post[:expyear] = format(payment_method.year, :four_digits)
+          post[:swipedata] = payment_method.track_data if payment_method.track_data
+        end
+      end
+
+      def add_customer_data(post, options)
+        post[:email] = options[:email] if options[:email]
+        post[:ipaddress] = options[:ip] if options[:ip]
+        if (billing_address = options[:billing_address])
+          post[:billaddr1] = billing_address[:address1]
+          post[:billaddr2] = billing_address[:address2]
+          post[:billcity] = billing_address[:city]
+          post[:billstate] = billing_address[:state]
+          post[:billcountry] = billing_address[:country]
+          post[:bilzip] = billing_address[:zip]
+          post[:phone] = billing_address[:phone]
+        end
+      end
+
+      def add_reference(post, authorization)
+        post[:historykeyid] = authorization
+      end
+
+      ACTIONS = {
+        purchase: '2',
+        authorize: '1',
+        capture: '3',
+        void: '5',
+        refund: '4',
+        credit: '6',
+        store: '7',
+        stored_purchase: '8',
+        stored_credit: '13'
+      }
+
+      STORE_TX_TYPES = {
+        store_only: '3'
+      }
+
+      def commit(action, post)
+        post[:acctid] = @options[:account_id]
+        post[:merchantpin] = @options[:merchant_pin]
+        post[:service] = ACTIONS[action] if ACTIONS[action]
+
+        data = build_request(post)
+        response_data = parse(ssl_post(live_url, data, headers))
+        succeeded = success_from(response_data)
+
+        Response.new(
+          succeeded,
+          message_from(succeeded, response_data),
+          response_data,
+          authorization: authorization_from(post, response_data),
+          avs_result: AVSResult.new(code: response_data['avs_response']),
+          cvv_result: CVVResult.new(response_data['cvv2_response']),
+          test: test?
+        )
+      end
+
+      def headers
+        {
+          'Content-Type' => 'application/xml'
+        }
+      end
+
+      def build_request(post)
+        Nokogiri::XML::Builder.new(encoding: 'utf-8') do |xml|
+          xml.interface_driver {
+            xml.trans_catalog {
+              xml.transaction(name: 'creditcard') {
+                xml.inputs {
+                  post.each do |field, value|
+                    xml.send(field, value)
+                  end
+                }
+              }
+            }
+          }
+        end.to_xml
+      end
+
+      def parse(body)
+        response = {}
+        Nokogiri::XML(CGI.unescapeHTML(body)).xpath('//trans_catalog/transaction/outputs').children.each do |node|
+          parse_element(response, node)
+        end
+        response
+      end
+
+      def parse_element(response, node)
+        if node.elements.size == 0
+          response[node.name.downcase.underscore.to_sym] = node.text
+        else
+          node.elements.each { |element| parse_element(response, element) }
+        end
+      end
+
+      def success_from(response)
+        response[:status] == 'Approved'
+      end
+
+      def message_from(succeeded, response)
+        succeeded ? 'Succeeded' : error_message_from(response)
+      end
+
+      def authorization_from(request, response)
+        request[:service] == ACTIONS[:store] ?
+          "#{response[:userprofileid]}|#{response[:last4digits]}" :
+          response[:historyid]
+      end
+
+      def split_authorization(authorization)
+        authorization.split('|')
+      end
+
+      def error_message_from(response)
+        if response[:status] == 'Declined'
+          match = response[:result].match(/DECLINED:\d{10}:(.+):/)
+          match[1] if match
+        end
+      end
+    end
+  end
+end

data/lib/active_merchant/billing/gateways/merchant_ware.rb

@@ -0,0 +1,313 @@
+module ActiveMerchant #:nodoc:
+  module Billing #:nodoc:
+    class MerchantWareGateway < Gateway
+      class_attribute :v4_live_url
+
+      self.live_url = self.test_url = 'https://ps1.merchantware.net/MerchantWARE/ws/RetailTransaction/TXRetail.asmx'
+      self.v4_live_url = 'https://ps1.merchantware.net/Merchantware/ws/RetailTransaction/v4/Credit.asmx'
+
+      self.supported_countries = ['US']
+      self.supported_cardtypes = %i[visa master american_express discover]
+      self.homepage_url = 'http://merchantwarehouse.com/merchantware'
+      self.display_name = 'MerchantWARE'
+
+      ENV_NAMESPACES = { 'xmlns:xsi'  => 'http://www.w3.org/2001/XMLSchema-instance',
+                         'xmlns:xsd'  => 'http://www.w3.org/2001/XMLSchema',
+                         'xmlns:env' => 'http://schemas.xmlsoap.org/soap/envelope/' }
+      ENV_NAMESPACES_V4 = { 'xmlns:xsi'  => 'http://www.w3.org/2001/XMLSchema-instance',
+                            'xmlns:xsd'  => 'http://www.w3.org/2001/XMLSchema',
+                            'xmlns:soap' => 'http://schemas.xmlsoap.org/soap/envelope/' }
+
+      TX_NAMESPACE = 'http://merchantwarehouse.com/MerchantWARE/Client/TransactionRetail'
+      TX_NAMESPACE_V4 = 'http://schemas.merchantwarehouse.com/merchantware/40/Credit/'
+
+      ACTIONS = {
+        purchase: 'IssueKeyedSale',
+        authorize: 'IssueKeyedPreAuth',
+        capture: 'IssuePostAuth',
+        void: 'VoidPreAuthorization',
+        credit: 'IssueKeyedRefund',
+        reference_credit: 'IssueRefundByReference'
+      }
+
+      # Creates a new MerchantWareGateway
+      #
+      # The gateway requires that a valid login, password, and name be passed
+      # in the +options+ hash.
+      #
+      # ==== Options
+      #
+      # * <tt>:login</tt> - The MerchantWARE SiteID.
+      # * <tt>:password</tt> - The MerchantWARE Key.
+      # * <tt>:name</tt> - The MerchantWARE Name.
+      def initialize(options = {})
+        requires!(options, :login, :password, :name)
+        super
+      end
+
+      # Authorize a credit card for a given amount.
+      #
+      # ==== Parameters
+      # * <tt>money</tt> - The amount to be authorized as an Integer value in cents.
+      # * <tt>credit_card</tt> - The CreditCard details for the transaction.
+      # * <tt>options</tt>
+      #   * <tt>:order_id</tt> - A unique reference for this order (required).
+      #   * <tt>:billing_address</tt> - The billing address for the cardholder.
+      def authorize(money, credit_card, options = {})
+        request = build_purchase_request(:authorize, money, credit_card, options)
+        commit(:authorize, request)
+      end
+
+      # Authorize and immediately capture funds from a credit card.
+      #
+      # ==== Parameters
+      # * <tt>money</tt> - The amount to be authorized as anInteger value in cents.
+      # * <tt>credit_card</tt> - The CreditCard details for the transaction.
+      # * <tt>options</tt>
+      #   * <tt>:order_id</tt> - A unique reference for this order (required).
+      #   * <tt>:billing_address</tt> - The billing address for the cardholder.
+      def purchase(money, credit_card, options = {})
+        request = build_purchase_request(:purchase, money, credit_card, options)
+        commit(:purchase, request)
+      end
+
+      # Capture authorized funds from a credit card.
+      #
+      # ==== Parameters
+      # * <tt>money</tt> - The amount to be captured as anInteger value in cents.
+      # * <tt>authorization</tt> - The authorization string returned from the initial authorization.
+      def capture(money, authorization, options = {})
+        request = build_capture_request(:capture, money, authorization, options)
+        commit(:capture, request)
+      end
+
+      # Void a transaction.
+      #
+      # ==== Parameters
+      # * <tt>authorization</tt> - The authorization string returned from the initial authorization or purchase.
+      def void(authorization, options = {})
+        reference, options[:order_id] = split_reference(authorization)
+        request = v4_soap_request(:void) do |xml|
+          add_reference_token(xml, reference)
+        end
+        commit(:void, request, true)
+      end
+
+      # Refund an amount back a cardholder
+      #
+      # ==== Parameters
+      #
+      # * <tt>money</tt> - The amount to be refunded as an Integer value in cents.
+      # * <tt>identification</tt> - The credit card you want to refund or the authorization for the existing transaction you are refunding.
+      # * <tt>options</tt>
+      #   * <tt>:order_id</tt> - A unique reference for this order (required when performing a non-referenced credit)
+      def credit(money, identification, options = {})
+        if identification.is_a?(String)
+          ActiveMerchant.deprecated CREDIT_DEPRECATION_MESSAGE
+          refund(money, identification, options)
+        else
+          perform_credit(money, identification, options)
+        end
+      end
+
+      def refund(money, reference, options = {})
+        perform_reference_credit(money, reference, options)
+      end
+
+      private
+
+      def soap_request(action)
+        xml = Builder::XmlMarkup.new indent: 2
+        xml.instruct!
+        xml.tag! 'env:Envelope', ENV_NAMESPACES do
+          xml.tag! 'env:Body' do
+            xml.tag! ACTIONS[action], 'xmlns' => TX_NAMESPACE do
+              add_credentials(xml)
+              yield xml
+            end
+          end
+        end
+        xml.target!
+      end
+
+      def v4_soap_request(action)
+        xml = Builder::XmlMarkup.new indent: 2
+        xml.instruct!
+        xml.tag! 'soap:Envelope', ENV_NAMESPACES_V4 do
+          xml.tag! 'soap:Body' do
+            xml.tag! ACTIONS[:void], 'xmlns' => TX_NAMESPACE_V4 do
+              xml.tag! 'merchantName', @options[:name]
+              xml.tag! 'merchantSiteId', @options[:login]
+              xml.tag! 'merchantKey', @options[:password]
+              yield xml
+            end
+          end
+        end
+        xml.target!
+      end
+
+      def build_purchase_request(action, money, credit_card, options)
+        requires!(options, :order_id)
+
+        soap_request(action) do |xml|
+          add_invoice(xml, options)
+          add_amount(xml, money)
+          add_credit_card(xml, credit_card)
+          add_address(xml, options)
+        end
+      end
+
+      def build_capture_request(action, money, identification, options)
+        reference, options[:order_id] = split_reference(identification)
+
+        soap_request(action) do |xml|
+          add_reference(xml, reference)
+          add_invoice(xml, options)
+          add_amount(xml, money)
+        end
+      end
+
+      def perform_reference_credit(money, identification, options)
+        reference, options[:order_id] = split_reference(identification)
+
+        request = soap_request(:reference_credit) do |xml|
+          add_reference(xml, reference)
+          add_invoice(xml, options)
+          add_amount(xml, money, 'strOverrideAmount')
+        end
+
+        commit(:reference_credit, request)
+      end
+
+      def perform_credit(money, credit_card, options)
+        requires!(options, :order_id)
+
+        request = soap_request(:credit) do |xml|
+          add_invoice(xml, options)
+          add_amount(xml, money)
+          add_credit_card(xml, credit_card)
+        end
+
+        commit(:credit, request)
+      end
+
+      def add_credentials(xml)
+        xml.tag! 'strSiteId', @options[:login]
+        xml.tag! 'strKey', @options[:password]
+        xml.tag! 'strName', @options[:name]
+      end
+
+      def add_invoice(xml, options)
+        xml.tag! 'strOrderNumber', options[:order_id].to_s.gsub(/[^\w]/, '').slice(0, 25)
+      end
+
+      def add_amount(xml, money, tag = 'strAmount')
+        xml.tag! tag, amount(money)
+      end
+
+      def add_reference(xml, reference)
+        xml.tag! 'strReferenceCode', reference
+      end
+
+      def add_reference_token(xml, reference)
+        xml.tag! 'token', reference
+      end
+
+      def add_address(xml, options)
+        if address = options[:billing_address] || options[:address]
+          xml.tag! 'strAVSStreetAddress', address[:address1]
+          xml.tag! 'strAVSZipCode', address[:zip]
+        end
+      end
+
+      def add_credit_card(xml, credit_card)
+        if credit_card.respond_to?(:track_data) && credit_card.track_data.present?
+          xml.tag! 'trackData', credit_card.track_data
+        else
+          xml.tag! 'strPAN', credit_card.number
+          xml.tag! 'strExpDate', expdate(credit_card)
+          xml.tag! 'strCardHolder', credit_card.name
+          xml.tag! 'strCVCode', credit_card.verification_value if credit_card.verification_value?
+        end
+      end
+
+      def split_reference(reference)
+        reference.to_s.split(';')
+      end
+
+      def parse(action, data)
+        response = {}
+        xml = REXML::Document.new(data)
+
+        root = REXML::XPath.first(xml, "//#{ACTIONS[action]}Response/#{ACTIONS[action]}Result")
+
+        root.elements.each do |element|
+          response[element.name] = element.text
+        end
+
+        status, code, message = response['ApprovalStatus'].split(';')
+        response[:status] = status
+
+        if response[:success] = status == 'APPROVED'
+          response[:message] = status
+        else
+          response[:message] = message
+          response[:failure_code] = code
+        end
+
+        response
+      end
+
+      def parse_error(http_response)
+        response = {}
+        response[:http_code] = http_response.code
+        response[:http_message] = http_response.message
+        response[:success] = false
+
+        document = REXML::Document.new(http_response.body)
+
+        node     = REXML::XPath.first(document, '//soap:Fault')
+
+        node.elements.each do |element|
+          response[element.name] = element.text
+        end
+
+        response[:message] = response['faultstring'].to_s.tr("\n", ' ')
+        response
+      rescue REXML::ParseException
+        response[:http_body]        = http_response.body
+        response[:message]          = 'Failed to parse the failed response'
+        response
+      end
+
+      def soap_action(action, v4 = false)
+        v4 ? "#{TX_NAMESPACE_V4}#{ACTIONS[action]}" : "#{TX_NAMESPACE}/#{ACTIONS[action]}"
+      end
+
+      def url(v4 = false)
+        v4 ? v4_live_url : live_url
+      end
+
+      def commit(action, request, v4 = false)
+        begin
+          data = ssl_post(url(v4), request,
+            'Content-Type' => 'text/xml; charset=utf-8',
+            'SOAPAction'   => soap_action(action, v4))
+          response = parse(action, data)
+        rescue ActiveMerchant::ResponseError => e
+          response = parse_error(e.response)
+        end
+
+        Response.new(response[:success], response[:message], response,
+          test: test?,
+          authorization: authorization_from(response),
+          avs_result: { code: response['AVSResponse'] },
+          cvv_result: response['CVResponse'])
+      end
+
+      def authorization_from(response)
+        [response['ReferenceID'], response['OrderNumber']].join(';') if response[:success]
+      end
+    end
+  end
+end