spree 0.0.9 → 0.2.0

data/vendor/plugins/active_merchant/lib/active_merchant/billing/gateways/paypal_express.rb

@@ -0,0 +1,130 @@
+require File.dirname(__FILE__) + '/paypal/paypal_common_api'
+require File.dirname(__FILE__) + '/paypal/paypal_express_response'
+require File.dirname(__FILE__) + '/paypal_express_common'
+
+module ActiveMerchant #:nodoc:
+  module Billing #:nodoc:
+    class PaypalExpressGateway < Gateway
+      include PaypalCommonAPI
+      include PaypalExpressCommon
+      
+      self.test_redirect_url = 'https://www.sandbox.paypal.com/cgi-bin/webscr?cmd=_express-checkout&token='
+      self.supported_countries = ['US']
+      self.homepage_url = 'https://www.paypal.com/cgi-bin/webscr?cmd=xpt/merchant/ExpressCheckoutIntro-outside'
+      self.display_name = 'PayPal Express Checkout'
+      
+      def setup_authorization(money, options = {})
+        requires!(options, :return_url, :cancel_return_url)
+        
+        commit 'SetExpressCheckout', build_setup_request('Authorization', money, options)
+      end
+      
+      def setup_purchase(money, options = {})
+        requires!(options, :return_url, :cancel_return_url)
+        
+        commit 'SetExpressCheckout', build_setup_request('Sale', money, options)
+      end
+
+      def details_for(token)
+        commit 'GetExpressCheckoutDetails', build_get_details_request(token)
+      end
+
+      def authorize(money, options = {})
+        requires!(options, :token, :payer_id)
+      
+        commit 'DoExpressCheckoutPayment', build_sale_or_authorization_request('Authorization', money, options)
+      end
+
+      def purchase(money, options = {})
+        requires!(options, :token, :payer_id)
+        
+        commit 'DoExpressCheckoutPayment', build_sale_or_authorization_request('Sale', money, options)
+      end
+
+      private
+      def build_get_details_request(token)
+        xml = Builder::XmlMarkup.new :indent => 2
+        xml.tag! 'GetExpressCheckoutDetailsReq', 'xmlns' => PAYPAL_NAMESPACE do
+          xml.tag! 'GetExpressCheckoutDetailsRequest', 'xmlns:n2' => EBAY_NAMESPACE do
+            xml.tag! 'n2:Version', API_VERSION
+            xml.tag! 'Token', token
+          end
+        end
+
+        xml.target!
+      end
+      
+      def build_sale_or_authorization_request(action, money, options)
+        currency_code = options[:currency] || currency(money)
+        
+        xml = Builder::XmlMarkup.new :indent => 2
+        xml.tag! 'DoExpressCheckoutPaymentReq', 'xmlns' => PAYPAL_NAMESPACE do
+          xml.tag! 'DoExpressCheckoutPaymentRequest', 'xmlns:n2' => EBAY_NAMESPACE do
+            xml.tag! 'n2:Version', API_VERSION
+            xml.tag! 'n2:DoExpressCheckoutPaymentRequestDetails' do
+              xml.tag! 'n2:PaymentAction', action
+              xml.tag! 'n2:Token', options[:token]
+              xml.tag! 'n2:PayerID', options[:payer_id]
+              xml.tag! 'n2:PaymentDetails' do
+                xml.tag! 'n2:OrderTotal', amount(money), 'currencyID' => currency_code
+                
+                # All of the values must be included together and add up to the order total
+                if [:subtotal, :shipping, :handling, :tax].all?{ |o| options.has_key?(o) }
+                  xml.tag! 'n2:ItemTotal', amount(options[:subtotal]), 'currencyID' => currency_code
+                  xml.tag! 'n2:ShippingTotal', amount(options[:shipping]),'currencyID' => currency_code
+                  xml.tag! 'n2:HandlingTotal', amount(options[:handling]),'currencyID' => currency_code
+                  xml.tag! 'n2:TaxTotal', amount(options[:tax]), 'currencyID' => currency_code
+                end
+                
+                xml.tag! 'n2:NotifyURL', options[:notify_url]
+                xml.tag! 'n2:ButtonSource', application_id.to_s.slice(0,32) unless application_id.blank?
+              end
+            end
+          end
+        end
+
+        xml.target!
+      end
+
+      def build_setup_request(action, money, options)
+        xml = Builder::XmlMarkup.new :indent => 2
+        xml.tag! 'SetExpressCheckoutReq', 'xmlns' => PAYPAL_NAMESPACE do
+          xml.tag! 'SetExpressCheckoutRequest', 'xmlns:n2' => EBAY_NAMESPACE do
+            xml.tag! 'n2:Version', API_VERSION
+            xml.tag! 'n2:SetExpressCheckoutRequestDetails' do
+              xml.tag! 'n2:PaymentAction', action
+              xml.tag! 'n2:OrderTotal', amount(money).to_f.zero? ? amount(100) : amount(money), 'currencyID' => options[:currency] || currency(money)
+              if options[:max_amount]
+                xml.tag! 'n2:MaxAmount', amount(options[:max_amount]), 'currencyID' => options[:currency] || currency(options[:max_amount])
+              end
+              add_address(xml, 'n2:Address', options[:shipping_address] || options[:address])
+              xml.tag! 'n2:AddressOverride', options[:address_override] ? '1' : '0'
+              xml.tag! 'n2:NoShipping', options[:no_shipping] ? '1' : '0'
+              xml.tag! 'n2:ReturnURL', options[:return_url]
+              xml.tag! 'n2:CancelURL', options[:cancel_return_url]
+              xml.tag! 'n2:IPAddress', options[:ip]
+              xml.tag! 'n2:OrderDescription', options[:description]
+              xml.tag! 'n2:BuyerEmail', options[:email] unless options[:email].blank?
+              xml.tag! 'n2:InvoiceID', options[:order_id]
+        
+              # Customization of the payment page
+              xml.tag! 'n2:PageStyle', options[:page_style] unless options[:page_style].blank?
+              xml.tag! 'n2:cpp-image-header', options[:header_image] unless options[:header_image].blank?
+              xml.tag! 'n2:cpp-header-back-color', options[:header_background_color] unless options[:header_background_color].blank?
+              xml.tag! 'n2:cpp-header-border-color', options[:header_border_color] unless options[:header_border_color].blank?
+              xml.tag! 'n2:cpp-payflow-color', options[:background_color] unless options[:background_color].blank?
+              
+              xml.tag! 'n2:LocaleCode', options[:locale] unless options[:locale].blank?
+            end
+          end
+        end
+
+        xml.target!
+      end
+      
+      def build_response(success, message, response, options = {})
+        PaypalExpressResponse.new(success, message, response, options)
+      end
+    end
+  end
+end

data/vendor/plugins/active_merchant/lib/active_merchant/billing/gateways/paypal_express_common.rb

@@ -0,0 +1,20 @@
+module ActiveMerchant
+  module Billing
+    module PaypalExpressCommon
+      def self.included(base)
+        base.cattr_accessor :test_redirect_url
+        base.cattr_accessor :live_redirect_url
+        base.live_redirect_url = 'https://www.paypal.com/cgibin/webscr?cmd=_express-checkout&token='
+      end
+      
+      def redirect_url
+        test? ? test_redirect_url : live_redirect_url
+      end
+      
+      def redirect_url_for(token, options = {})
+        options = {:review => true}.update(options)
+        options[:review] ? "#{redirect_url}#{token}" : "#{redirect_url}#{token}&useraction=commit"
+      end
+    end
+  end
+end

data/vendor/plugins/active_merchant/lib/active_merchant/billing/gateways/plugnpay.rb

@@ -0,0 +1,292 @@
+module ActiveMerchant
+  module Billing
+        
+    class PlugnpayGateway < Gateway
+      class PlugnpayPostData < PostData
+        # Fields that will be sent even if they are blank
+        self.required_fields = [ :publisher_name, :publisher_password, 
+          :card_amount, :card_name, :card_number, :card_exp, :orderID ]
+      end                                                  
+                                                           
+      URL = 'https://pay1.plugnpay.com/payment/pnpremote.cgi'
+                                                        
+      CARD_CODE_MESSAGES = {
+        "M" => "Card verification number matched",
+        "N" => "Card verification number didn't match",
+        "P" => "Card verification number was not processed",
+        "S" => "Card verification number should be on card but was not indicated",
+        "U" => "Issuer was not certified for card verification"
+      }
+
+      CARD_CODE_ERRORS = %w( N S )
+      
+      AVS_MESSAGES = {
+        "A" => "Street address matches billing information, zip/postal code does not",
+        "B" => "Address information not provided for address verification check",
+        "E" => "Address verification service error",
+        "G" => "Non-U.S. card-issuing bank",
+        "N" => "Neither street address nor zip/postal match billing information",
+        "P" => "Address verification not applicable for this transaction",
+        "R" => "Payment gateway was unavailable or timed out",
+        "S" => "Address verification service not supported by issuer",
+        "U" => "Address information is unavailable",
+        "W" => "9-digit zip/postal code matches billing information, street address does not",
+        "X" => "Street address and 9-digit zip/postal code matches billing information",
+        "Y" => "Street address and 5-digit zip/postal code matches billing information",
+        "Z" => "5-digit zip/postal code matches billing information, street address does not",
+      }
+      
+      AVS_ERRORS = %w( A E N R W Z )
+      
+      PAYMENT_GATEWAY_RESPONSES = {
+        "P01" => "AVS Mismatch Failure",
+        "P02" => "CVV2 Mismatch Failure",
+        "P21" => "Transaction may not be marked",
+        "P30" => "Test Tran. Bad Card",
+        "P35" => "Test Tran. Problem",
+        "P40" => "Username already exists",
+        "P41" => "Username is blank",
+        "P50" => "Fraud Screen Failure",
+        "P51" => "Missing PIN Code",
+        "P52" => "Invalid Bank Acct. No.",
+        "P53" => "Invalid Bank Routing No.",
+        "P54" => "Invalid/Missing Check No.",
+        "P55" => "Invalid Credit Card No.",
+        "P56" => "Invalid CVV2/CVC2 No.",
+        "P57" => "Expired. CC Exp. Date",
+        "P58" => "Missing Data",
+        "P59" => "Missing Email Address",
+        "P60" => "Zip Code does not match Billing State.",
+        "P61" => "Invalid Billing Zip Code",
+        "P62" => "Zip Code does not match Shipping State.",
+        "P63" => "Invalid Shipping Zip Code",
+        "P64" => "Invalid Credit Card CVV2/CVC2 Format.",
+        "P65" => "Maximum number of attempts has been exceeded.",
+        "P66" => "Credit Card number has been flagged and can not be used to access this service.",
+        "P67" => "IP Address is on Blocked List.",
+        "P68" => "Billing country does not match ipaddress country.",
+        "P69" => "US based ipaddresses are currently blocked.",
+        "P70" => "Credit Cards issued from this bank are currently not being accepted.",
+        "P71" => "Credit Cards issued from this bank are currently not being accepted.",
+        "P72" => "Daily volume exceeded.",
+        "P73" => "Too many transactions within allotted time.",
+        "P91" => "Missing/incorrect password",
+        "P92" => "Account not configured for mobil administration",
+        "P93" => "IP Not registered to username.",
+        "P94" => "Mode not permitted for this account.",
+        "P95" => "Currently Blank",
+        "P96" => "Currently Blank",
+        "P97" => "Processor not responding",
+        "P98" => "Missing merchant/publisher name",
+        "P99" => "Currently Blank"
+      }
+      
+      TRANSACTIONS = {
+        :authorization => 'auth',
+        :purchase => 'auth',
+        :capture => 'mark',
+        :void => 'void',
+        :refund => 'return',
+        :credit => 'newreturn'
+      }
+     
+      SUCCESS_CODES = [ 'pending', 'success' ]
+      FAILURE_CODES = [ 'badcard', 'fraud' ]
+     
+      self.default_currency = 'USD'
+      self.supported_countries = ['US']
+      self.supported_cardtypes = [:visa, :master, :american_express, :discover]
+      self.homepage_url = 'http://www.plugnpay.com/'
+      self.display_name = "Plug'n Pay"
+
+      def initialize(options = {})
+        requires!(options, :login, :password)
+        @options = options
+        super
+      end
+      
+      def purchase(money, creditcard, options = {})
+        post = PlugnpayPostData.new
+        
+        add_amount(post, money, options)
+        add_creditcard(post, creditcard)
+        add_addresses(post, options)
+        add_invoice_data(post, options)
+        add_customer_data(post, options)
+         
+        post[:authtype] = 'authpostauth'
+        commit(:authorization, post)
+      end  
+      
+      def authorize(money, creditcard, options = {})
+        post = PlugnpayPostData.new
+        
+        add_amount(post, money, options)
+        add_creditcard(post, creditcard)        
+        add_addresses(post, options)
+        add_invoice_data(post, options)        
+        add_customer_data(post, options)
+        
+        post[:authtype] = 'authonly'
+        commit(:authorization, post)
+      end                  
+
+      def capture(money, authorization, options = {})
+        post = PlugnpayPostData.new
+        
+        post[:orderID] = authorization
+        
+        add_amount(post, money, options)
+        add_customer_data(post, options)
+         
+        commit(:capture, post)
+      end
+      
+      def void(authorization, options = {})
+        post = PlugnpayPostData.new
+        
+        post[:orderID] = authorization
+        post[:txn_type] = 'auth'
+        
+        commit(:void, post)
+      end
+      
+      def credit(money, identification_or_creditcard, options = {})
+        post = PlugnpayPostData.new
+        add_amount(post, money, options)
+       
+        if identification_or_creditcard.is_a?(String)
+          post[:orderID] = identification_or_creditcard
+          
+          commit(:refund, post)
+        else
+          add_creditcard(post, identification_or_creditcard)        
+          add_addresses(post, options)   
+          add_customer_data(post, options) 
+          
+          commit(:credit, post)
+        end
+      end
+      
+      private                                 
+      def commit(action, post)
+        response = parse( ssl_post(URL, post_data(action, post)) )
+        
+        success = SUCCESS_CODES.include?(response[:finalstatus])
+        message = success ? 'Success' : message_from(response)
+            
+        Response.new(success, message, response, 
+          :test => test?, 
+          :authorization => response[:orderid],
+          :avs_result => { :code => response[:avs_code] },
+          :cvv_result => response[:cvvresp]
+        )
+      end
+                                               
+      def parse(body)
+        body = CGI.unescape(body)
+        results = {}
+        body.split('&').collect { |e| e.split('=') }.each do |key,value|
+          results[key.downcase.to_sym] = normalize(value.to_s.strip)
+        end
+        
+        results.delete(:publisher_password)
+        results[:avs_message] = AVS_MESSAGES[results[:avs_code]] if results[:avs_code]
+        results[:card_code_message] = CARD_CODE_MESSAGES[results[:cvvresp]] if results[:cvvresp]
+        
+        results
+      end     
+
+      def post_data(action, post)
+        post[:mode]               = TRANSACTIONS[action]
+        post[:convert]            = 'underscores'
+        post[:app_level]          = 0
+        post[:publisher_name]     = @options[:login]
+        post[:publisher_password] = @options[:password]
+      
+        post.to_s
+      end
+      
+      def add_creditcard(post, creditcard)      
+        post[:card_number]  = creditcard.number
+        post[:card_cvv]     = creditcard.verification_value
+        post[:card_exp]     = expdate(creditcard)
+        post[:card_name]    = creditcard.name.slice(0..38)
+      end
+      
+      def add_customer_data(post, options)
+        post[:email] = options[:email]
+        post[:dontsndmail]        = 'yes' unless options[:send_email_confirmation]
+        post[:ipaddress] = options[:ip]
+      end
+      
+      def add_invoice_data(post, options)
+        post[:shipping] = amount(options[:shipping]) unless options[:shipping].blank?
+        post[:tax] = amount(options[:tax]) unless options[:tax].blank?  
+      end
+
+      def add_addresses(post, options)      
+        if address = options[:billing_address] || options[:address]
+          post[:card_address1] = address[:address1]
+          post[:card_zip]      = address[:zip]     
+          post[:card_city]     = address[:city]    
+          post[:card_country]  = address[:country]
+          post[:phone]         = address[:phone]
+
+          case address[:country]
+          when 'US', 'CA'
+            post[:card_state] = address[:state]
+          else
+            post[:card_state] = 'ZZ' 
+            post[:card_prov]  = address[:state]
+          end
+        end
+        
+        if shipping_address = options[:shipping_address] || address
+          post[:shipname] = shipping_address[:name]
+          post[:address1] = shipping_address[:address1]
+          post[:address2] = shipping_address[:address2]
+          post[:city] = shipping_address[:city]
+          
+          case shipping_address[:country]
+          when 'US', 'CA'
+            post[:state] = shipping_address[:state]
+          else
+            post[:state] = 'ZZ' 
+            post[:province]  = shipping_address[:state]
+          end
+          
+          post[:country] = shipping_address[:country]
+          post[:zip] = shipping_address[:zip]
+        end        
+      end
+      
+      def add_amount(post, money, options)
+        post[:card_amount] = amount(money)
+        post[:currency] = options[:currency] || currency(money)
+      end
+    
+      # Make a ruby type out of the response string
+      def normalize(field)
+        case field
+        when "true"   then true
+        when "false"  then false
+        when ""       then nil
+        when "null"   then nil
+        else field
+        end        
+      end          
+      
+      def message_from(results)
+        PAYMENT_GATEWAY_RESPONSES[results[:resp_code]]
+      end
+        
+      def expdate(creditcard)
+        year  = sprintf("%.4i", creditcard.year)
+        month = sprintf("%.2i", creditcard.month)
+
+        "#{month}/#{year[-2..-1]}"
+      end
+    end
+  end
+end

data/vendor/plugins/active_merchant/lib/active_merchant/billing/gateways/protx.rb

@@ -0,0 +1,284 @@
+module ActiveMerchant #:nodoc:
+  module Billing #:nodoc:
+    class ProtxGateway < Gateway  
+      cattr_accessor :simulate
+      self.simulate = false
+      
+      TEST_URL = 'https://ukvpstest.protx.com/vspgateway/service'
+      LIVE_URL = 'https://ukvps.protx.com/vspgateway/service'
+      SIMULATOR_URL = 'https://ukvpstest.protx.com/VSPSimulator'
+    
+      APPROVED = 'OK'
+    
+      TRANSACTIONS = {
+        :purchase => 'PAYMENT',
+        :credit => 'REFUND',
+        :authorization => 'DEFERRED',
+        :capture => 'RELEASE',
+        :void => 'VOID'
+      }
+      
+      CREDIT_CARDS = {
+        :visa => "VISA",
+        :master => "MC",
+        :delta => "DELTA",
+        :solo => "SOLO",
+        :switch => "MAESTRO",
+        :maestro => "MAESTRO",
+        :american_express => "AMEX",
+        :electron => "UKE",
+        :diners_club => "DC",
+        :jcb => "JCB"
+      }
+      
+      ELECTRON = /^(424519|42496[23]|450875|48440[6-8]|4844[1-5][1-5]|4917[3-5][0-9]|491880)\d{10}(\d{3})?$/
+      
+      AVS_CVV_CODE = {
+        "NOTPROVIDED" => nil, 
+        "NOTCHECKED" => 'X',
+        "MATCHED" => 'Y',
+        "NOTMATCHED" => 'N'
+      }
+    
+      self.supported_cardtypes = [:visa, :master, :american_express, :discover, :jcb, :switch, :solo, :maestro, :diners_club]
+      self.supported_countries = ['GB']
+      self.default_currency = 'GBP'
+      
+      self.homepage_url = 'http://www.protx.com'
+      self.display_name = 'Protx'
+
+      def initialize(options = {})
+        requires!(options, :login)
+        @options = options
+        super
+      end
+      
+      def test?
+        @options[:test] || super
+      end
+      
+      def purchase(money, credit_card, options = {})
+        requires!(options, :order_id)
+        
+        post = {}
+        
+        add_amount(post, money, options)
+        add_invoice(post, options)
+        add_credit_card(post, credit_card)
+        add_address(post, options)
+        add_customer_data(post, options)
+
+        commit(:purchase, post)
+      end
+      
+      def authorize(money, credit_card, options = {})
+        requires!(options, :order_id)
+        
+        post = {}
+        
+        add_amount(post, money, options)
+        add_invoice(post, options)
+        add_credit_card(post, credit_card)
+        add_address(post, options)
+        add_customer_data(post, options)
+
+        commit(:authorization, post)
+      end
+      
+      # You can only capture a transaction once, even if you didn't capture the full amount the first time.
+      def capture(money, identification, options = {})
+        post = {}
+        
+        add_reference(post, identification)
+        add_release_amount(post, money, options)
+        
+        commit(:capture, post)
+      end
+      
+      def void(identification, options = {})
+        post = {}
+        
+        add_reference(post, identification)
+        commit(:void, post)
+      end
+      
+      # Crediting requires a new order_id to passed in, as well as a description
+      def credit(money, identification, options = {})
+        requires!(options, :order_id, :description)
+        
+        post = {}
+        
+        add_credit_reference(post, identification)
+        add_amount(post, money, options)
+        add_invoice(post, options)
+        
+        commit(:credit, post)
+      end
+      
+      private
+      def add_reference(post, identification)
+        order_id, transaction_id, authorization, security_key = identification.split(';') 
+        
+        add_pair(post, :VendorTxCode, order_id)
+        add_pair(post, :VPSTxId, transaction_id)
+        add_pair(post, :TxAuthNo, authorization)
+        add_pair(post, :SecurityKey, security_key)
+      end
+      
+      def add_credit_reference(post, identification)
+        order_id, transaction_id, authorization, security_key = identification.split(';') 
+        
+        add_pair(post, :RelatedVendorTxCode, order_id)
+        add_pair(post, :RelatedVPSTxId, transaction_id)
+        add_pair(post, :RelatedTxAuthNo, authorization)
+        add_pair(post, :RelatedSecurityKey, security_key)
+      end
+      
+      def add_amount(post, money, options)
+        add_pair(post, :Amount, amount(money), :required => true)
+        add_pair(post, :Currency, options[:currency] || currency(money), :required => true)
+      end
+
+      # doesn't actually use the currency -- dodgy!
+      def add_release_amount(post, money, options)
+        add_pair(post, :ReleaseAmount, amount(money), :required => true)
+      end
+
+      def add_customer_data(post, options)
+        add_pair(post, :BillingEmail, options[:email][0,255]) unless options[:email].blank?
+        add_pair(post, :ContactNumber, options[:phone].gsub(/[^0-9+]/, '')[0,20]) unless options[:phone].blank?
+        add_pair(post, :ContactFax, options[:fax].gsub(/[^0-9+]/, '')[0,20]) unless options[:fax].blank?
+        add_pair(post, :ClientIPAddress, options[:ip])
+      end
+
+      def add_address(post, options)
+        address = options[:billing_address] || options[:address]
+        shipping_address = options[:shipping_address] || ''
+        
+        return if address.blank?
+
+        billing = "#{address[:address1]}\n#{address[:address2]}\n#{address[:city]}\n#{address[:state]}"
+
+        add_pair(post, :BillingAddress, billing)
+        add_pair(post, :BillingPostcode, address[:zip])
+
+        return if shipping_address.blank?
+
+        shipping = "#{shipping_address[:address1]}\n#{shipping_address[:address2]}\n#{shipping_address[:city]}\n#{shipping_address[:state]}"
+
+        add_pair(post, :DeliveryAddress, shipping)
+        add_pair(post, :DeliveryPostcode, shipping_address[:zip])
+      end
+
+      def add_invoice(post, options)
+        add_pair(post, :VendorTxCode, sanitize_order_id(options[:order_id]), :required => true)
+        add_pair(post, :Description, options[:description] || options[:order_id])
+      end
+
+      def add_credit_card(post, credit_card)
+        add_pair(post, :CardHolder, credit_card.name, :required => true)
+        add_pair(post, :CardNumber, credit_card.number, :required => true)
+         
+        add_pair(post, :ExpiryDate, format_date(credit_card.month, credit_card.year), :required => true)
+         
+        if requires_start_date_or_issue_number?(credit_card)
+          add_pair(post, :StartDate, format_date(credit_card.start_month, credit_card.start_year))
+          add_pair(post, :IssueNumber, credit_card.issue_number)
+        end
+        add_pair(post, :CardType, map_card_type(credit_card))
+        
+        add_pair(post, :CV2, credit_card.verification_value)
+      end
+      
+      def sanitize_order_id(order_id)
+        order_id.to_s.gsub(/[^-a-zA-Z0-9._]/, '')
+      end
+      
+      def map_card_type(credit_card)
+        raise ArgumentError, "The credit card type must be provided" if card_brand(credit_card).blank?
+        
+        card_type = card_brand(credit_card).to_sym
+        
+        # Check if it is an electron card
+        if card_type == :visa && credit_card.number =~ ELECTRON 
+          CREDIT_CARDS[:electron]
+        else  
+          CREDIT_CARDS[card_type]
+        end
+      end
+      
+      # MMYY format
+      def format_date(month, year)
+        return nil if year.blank? || month.blank?
+        
+        year  = sprintf("%.4i", year)
+        month = sprintf("%.2i", month)
+
+        "#{month}#{year[-2..-1]}"
+      end
+      
+      def commit(action, parameters)
+        response = parse( ssl_post(url_for(action), post_data(action, parameters)) )
+          
+        Response.new(response["Status"] == APPROVED, message_from(response), response,
+          :test => test?,
+          :authorization => authorization_from(response, parameters),
+          :avs_result => { 
+            :street_match => AVS_CVV_CODE[ response["AddressResult"] ],
+            :postal_match => AVS_CVV_CODE[ response["PostCodeResult"] ],
+          },
+          :cvv_result => AVS_CVV_CODE[ response["CV2Result"] ]
+        )
+      end
+      
+      def authorization_from(response, params)
+         [ params[:VendorTxCode],
+           response["VPSTxId"],
+           response["TxAuthNo"],
+           response["SecurityKey"] ].join(";")
+      end
+      
+      def url_for(action)
+        simulate ? build_simulator_url(action) : build_url(action)
+      end
+      
+      def build_url(action)
+        endpoint = [ :purchase, :authorization ].include?(action) ? "vspdirect-register" : TRANSACTIONS[action].downcase
+        "#{test? ? TEST_URL : LIVE_URL}/#{endpoint}.vsp"
+      end
+      
+      def build_simulator_url(action)
+        endpoint = [ :purchase, :authorization ].include?(action) ? "VSPDirectGateway.asp" : "VSPServerGateway.asp?Service=Vendor#{TRANSACTIONS[action].capitalize}Tx"
+        "#{SIMULATOR_URL}/#{endpoint}"
+      end
+
+      def message_from(response)
+        response['Status'] == APPROVED ? 'Success' : (response['StatusDetail'] || 'Unspecified error')    # simonr 20080207 can't actually get non-nil blanks, so this is shorter
+      end
+
+      def post_data(action, parameters = {})
+        parameters.update(
+          :Vendor => @options[:login],
+          :TxType => TRANSACTIONS[action],
+          :VPSProtocol => "2.22"
+        )
+        
+        parameters.collect { |key, value| "#{key}=#{CGI.escape(value.to_s)}" }.join("&")
+      end
+      
+      # Protx returns data in the following format
+      # Key1=value1
+      # Key2=value2
+      def parse(body)
+        result = {}
+        body.to_a.each { |pair| result[$1] = $2 if pair.strip =~ /\A([^=]+)=(.+)\Z/im }
+        result
+      end
+
+      def add_pair(post, key, value, options = {})
+        post[key] = value if !value.blank? || options[:required]
+      end
+    end
+  end
+end
+