tomriley-active_merchant 1.4.2.3

data/lib/active_merchant/billing/credit_card.rb

@@ -0,0 +1,159 @@
+require 'time'
+require 'date'
+require 'active_merchant/billing/expiry_date'
+
+module ActiveMerchant #:nodoc:
+  module Billing #:nodoc:
+    # == Description
+    # This credit card object can be used as a stand alone object. It acts just like an ActiveRecord object
+    # but doesn't support the .save method as its not backed by a database.
+    # 
+    # For testing purposes, use the 'bogus' credit card type. This card skips the vast majority of 
+    # validations. This allows you to focus on your core concerns until you're ready to be more concerned 
+    # with the details of particular creditcards or your gateway.
+    # 
+    # == Testing With CreditCard
+    # Often when testing we don't care about the particulars of a given card type. When using the 'test' 
+    # mode in your Gateway, there are six different valid card numbers: 1, 2, 3, 'success', 'fail', 
+    # and 'error'.
+    # 
+    #--
+    # For details, see CreditCardMethods#valid_number?
+    #++
+    # 
+    # == Example Usage
+    #   cc = CreditCard.new(
+    #     :first_name => 'Steve', 
+    #     :last_name  => 'Smith', 
+    #     :month      => '9', 
+    #     :year       => '2010', 
+    #     :type       => 'visa', 
+    #     :number     => '4242424242424242'
+    #   )
+    #   
+    #   cc.valid? # => true
+    #   cc.display_number # => XXXX-XXXX-XXXX-4242
+    #
+    class CreditCard
+      include CreditCardMethods
+      include Validateable
+      
+      ## Attributes
+      
+      cattr_accessor :require_verification_value
+      self.require_verification_value = true
+      
+      # Essential attributes for a valid, non-bogus creditcards
+      attr_accessor :number, :month, :year, :type, :first_name, :last_name
+      
+      # Required for Switch / Solo cards
+      attr_accessor :start_month, :start_year, :issue_number
+
+      # Optional verification_value (CVV, CVV2 etc). Gateways will try their best to 
+      # run validation on the passed in value if it is supplied
+      attr_accessor :verification_value
+
+      # Provides proxy access to an expiry date object
+      def expiry_date
+        ExpiryDate.new(@month, @year)
+      end
+
+      def expired?
+        expiry_date.expired?
+      end
+      
+      def name?
+        first_name? && last_name?
+      end
+      
+      def first_name?
+        !@first_name.blank?
+      end
+      
+      def last_name?
+        !@last_name.blank?
+      end
+            
+      def name
+        "#{@first_name} #{@last_name}"
+      end
+            
+      def verification_value?
+        !@verification_value.blank?
+      end
+
+      # Show the card number, with all but last 4 numbers replace with "X". (XXXX-XXXX-XXXX-4338)
+      def display_number
+        self.class.mask(number)
+      end
+      
+      def last_digits
+        self.class.last_digits(number)
+      end
+      
+      def validate
+        validate_essential_attributes
+
+        # Bogus card is pretty much for testing purposes. Lets just skip these extra tests if its used
+        return if type == 'bogus'
+
+        validate_card_type
+        validate_card_number
+        validate_verification_value
+        validate_switch_or_solo_attributes
+      end
+      
+      def self.requires_verification_value?
+        require_verification_value
+      end
+      
+      private
+      
+      def before_validate #:nodoc: 
+        self.month = month.to_i
+        self.year  = year.to_i
+        self.start_month = start_month.to_i unless start_month.nil?
+        self.start_year = start_year.to_i unless start_year.nil?
+        self.number = number.to_s.gsub(/[^\d]/, "")
+        self.type.downcase! if type.respond_to?(:downcase)
+        self.type = self.class.type?(number) if type.blank?
+      end
+      
+      def validate_card_number #:nodoc:
+        errors.add :number, "is not a valid credit card number" unless CreditCard.valid_number?(number)
+        unless errors.on(:number) || errors.on(:type)
+          errors.add :type, "is not the correct card type" unless CreditCard.matching_type?(number, type)
+        end
+      end
+      
+      def validate_card_type #:nodoc:
+        errors.add :type, "is required" if type.blank?
+        errors.add :type, "is invalid"  unless CreditCard.card_companies.keys.include?(type)
+      end
+      
+      def validate_essential_attributes #:nodoc:
+        errors.add :first_name, "cannot be empty"      if @first_name.blank?
+        errors.add :last_name,  "cannot be empty"      if @last_name.blank?
+        errors.add :month,      "is not a valid month" unless valid_month?(@month)
+        errors.add :year,       "expired"              if expired?
+        errors.add :year,       "is not a valid year"  unless valid_expiry_year?(@year)
+      end
+      
+      def validate_switch_or_solo_attributes #:nodoc:
+        if %w[switch solo].include?(type)
+          unless valid_month?(@start_month) && valid_start_year?(@start_year) || valid_issue_number?(@issue_number)
+            errors.add :start_month,  "is invalid"      unless valid_month?(@start_month)
+            errors.add :start_year,   "is invalid"      unless valid_start_year?(@start_year)
+            errors.add :issue_number, "cannot be empty" unless valid_issue_number?(@issue_number)
+          end
+        end
+      end
+      
+      def validate_verification_value #:nodoc:
+        if CreditCard.requires_verification_value?
+          errors.add :verification_value, "is required" unless verification_value? 
+        end
+      end
+    end
+  end
+end

data/lib/active_merchant/billing/credit_card_formatting.rb

@@ -0,0 +1,21 @@
+module ActiveMerchant #:nodoc:
+  module Billing #:nodoc:
+    module CreditCardFormatting
+      
+      # This method is used to format numerical information pertaining to credit cards. 
+      # 
+      #   format(2005, :two_digits)  # => "05"
+      #   format(05,   :four_digits) # => "0005"
+      def format(number, option)
+        return '' if number.blank?
+        
+        case option
+          when :two_digits  ; sprintf("%.2i", number)[-2..-1]
+          when :four_digits ; sprintf("%.4i", number)[-4..-1]
+          else number
+        end
+      end
+      
+    end
+  end
+end

data/lib/active_merchant/billing/credit_card_methods.rb

@@ -0,0 +1,125 @@
+module ActiveMerchant #:nodoc:
+  module Billing #:nodoc:
+    # Convenience methods that can be included into a custom Credit Card object, such as an ActiveRecord based Credit Card object.
+    module CreditCardMethods
+      CARD_COMPANIES = { 
+        'visa'               => /^4\d{12}(\d{3})?$/,
+        'master'             => /^(5[1-5]\d{4}|677189)\d{10}$/,
+        'discover'           => /^(6011|65\d{2})\d{12}$/,
+        'american_express'   => /^3[47]\d{13}$/,
+        'diners_club'        => /^3(0[0-5]|[68]\d)\d{11}$/,
+        'jcb'                => /^3528\d{12}$/,
+        'switch'             => /^6759\d{12}(\d{2,3})?$/,  
+        'solo'               => /^6767\d{12}(\d{2,3})?$/,
+        'dankort'            => /^5019\d{12}$/,
+        'maestro'            => /^(5[06-8]|6\d)\d{10,17}$/,
+        'forbrugsforeningen' => /^600722\d{10}$/,
+        'laser'              => /^(6304[89]\d{11}(\d{2,3})?|670695\d{13})$/
+      }
+    
+      def self.included(base)
+        base.extend(ClassMethods)
+      end
+      
+      def valid_month?(month)
+        (1..12).include?(month)
+      end
+      
+      def valid_expiry_year?(year)
+        (Time.now.year..Time.now.year + 20).include?(year)
+      end
+      
+      def valid_start_year?(year)
+        year.to_s =~ /^\d{4}$/ && year.to_i > 1987
+      end
+      
+      def valid_issue_number?(number)
+        number.to_s =~ /^\d{1,2}$/
+      end
+      
+      module ClassMethods
+        # Returns true if it validates. Optionally, you can pass a card type as an argument and 
+        # make sure it is of the correct type.
+        #
+        # References:
+        # - http://perl.about.com/compute/perl/library/nosearch/P073000.htm
+        # - http://www.beachnet.com/~hstiles/cardtype.html
+        def valid_number?(number)
+          valid_test_mode_card_number?(number) || 
+            valid_card_number_length?(number) && 
+            valid_checksum?(number)
+        end
+        
+        # Regular expressions for the known card companies.
+        # 
+        # References: 
+        # - http://en.wikipedia.org/wiki/Credit_card_number 
+        # - http://www.barclaycardbusiness.co.uk/information_zone/processing/bin_rules.html 
+        def card_companies
+          CARD_COMPANIES
+        end
+        
+        # Returns a string containing the type of card from the list of known information below.
+        # Need to check the cards in a particular order, as there is some overlap of the allowable ranges
+        #--
+        # TODO Refactor this method. We basically need to tighten up the Maestro Regexp. 
+        # 
+        # Right now the Maestro regexp overlaps with the MasterCard regexp (IIRC). If we can tighten 
+        # things up, we can boil this whole thing down to something like... 
+        # 
+        #   def type?(number)
+        #     return 'visa' if valid_test_mode_card_number?(number)
+        #     card_companies.find([nil]) { |type, regexp| number =~ regexp }.first.dup
+        #   end
+        # 
+        def type?(number)
+          return 'bogus' if valid_test_mode_card_number?(number)
+
+          card_companies.reject { |c,p| c == 'maestro' }.each do |company, pattern|
+            return company.dup if number =~ pattern 
+          end
+          
+          return 'maestro' if number =~ card_companies['maestro']
+
+          return nil
+        end
+        
+        def last_digits(number)     
+          number.to_s.length <= 4 ? number : number.to_s.slice(-4..-1) 
+        end
+        
+        def mask(number)
+          "XXXX-XXXX-XXXX-#{last_digits(number)}"
+        end
+        
+        # Checks to see if the calculated type matches the specified type
+        def matching_type?(number, type)
+          type?(number) == type
+        end
+        
+        private
+        
+        def valid_card_number_length?(number) #:nodoc:
+          number.to_s.length >= 12
+        end
+        
+        def valid_test_mode_card_number?(number) #:nodoc:
+          ActiveMerchant::Billing::Base.test? && 
+            %w[1 2 3 success failure error].include?(number.to_s)
+        end
+        
+        # Checks the validity of a card number by use of the the Luhn Algorithm. 
+        # Please see http://en.wikipedia.org/wiki/Luhn_algorithm for details.
+        def valid_checksum?(number) #:nodoc:
+          sum = 0
+          for i in 0..number.length
+            weight = number[-1 * (i + 2), 1].to_i * (2 - (i % 2))
+            sum += (weight < 10) ? weight : weight - 9
+          end
+          
+          (number[-1,1].to_i == (10 - sum % 10) % 10)
+        end
+      end
+    end
+  end
+end

data/lib/active_merchant/billing/cvv_result.rb

@@ -0,0 +1,38 @@
+module ActiveMerchant
+  module Billing
+    # Result of the Card Verification Value check
+    # http://www.bbbonline.org/eExport/doc/MerchantGuide_cvv2.pdf
+    # Check additional codes from cybersource website
+    class CVVResult
+      
+      MESSAGES = {
+        'D'  =>  'Suspicious transaction',
+        'I'  =>  'Failed data validation check',
+        'M'  =>  'Match',
+        'N'  =>  'No Match',
+        'P'  =>  'Not Processed',
+        'S'  =>  'Should have been present',
+        'U'  =>  'Issuer unable to process request',
+        'X'  =>  'Card does not support verification'
+      }
+      
+      def self.messages
+        MESSAGES
+      end
+      
+      attr_reader :code, :message
+      
+      def initialize(code)
+        @code = code.upcase unless code.blank?
+        @message = MESSAGES[@code]
+      end
+      
+      def to_hash
+        {
+          'code' => code,
+          'message' => message
+        }
+      end
+    end
+  end
+end

data/lib/active_merchant/billing/expiry_date.rb

@@ -0,0 +1,28 @@
+module ActiveMerchant
+  module Billing
+    class CreditCard
+      class ExpiryDate #:nodoc:
+        attr_reader :month, :year
+        def initialize(month, year)
+          @month = month
+          @year = year
+        end
+        
+        def expired? #:nodoc:
+          Time.now > expiration rescue true
+        end
+        
+        def expiration #:nodoc:
+          Time.parse("#{month}/#{month_days}/#{year} 23:59:59") rescue Time.at(0)
+        end
+        
+        private
+        def month_days
+          mdays = [nil,31,28,31,30,31,30,31,31,30,31,30,31]
+          mdays[2] = 29 if Date.leap?(year)
+          mdays[month]
+        end
+      end
+    end
+  end
+end

data/lib/active_merchant/billing/gateway.rb

@@ -0,0 +1,158 @@
+require 'net/http'
+require 'net/https'
+require 'active_merchant/billing/response'
+
+module ActiveMerchant #:nodoc:
+  module Billing #:nodoc:
+    # 
+    # == Description
+    # The Gateway class is the base class for all ActiveMerchant gateway implementations. 
+    # 
+    # The standard list of gateway functions that most concrete gateway subclasses implement is:
+    # 
+    # * <tt>purchase(money, creditcard, options = {})</tt>
+    # * <tt>authorize(money, creditcard, options = {})</tt>
+    # * <tt>capture(money, authorization, options = {})</tt>
+    # * <tt>void(identification, options = {})</tt>
+    # * <tt>credit(money, identification, options = {})</tt>
+    #
+    # Some gateways include features for recurring billing
+    #
+    # * <tt>recurring(money, creditcard, options = {})</tt>
+    #
+    # Some gateways also support features for storing credit cards:
+    #
+    # * <tt>store(creditcard, options = {})</tt>
+    # * <tt>unstore(identification, options = {})</tt>
+    # 
+    # === Gateway Options
+    # The options hash consists of the following options:
+    #
+    # * <tt>:order_id</tt> - The order number
+    # * <tt>:ip</tt> - The IP address of the customer making the purchase
+    # * <tt>:customer</tt> - The name, customer number, or other information that identifies the customer
+    # * <tt>:invoice</tt> - The invoice number
+    # * <tt>:merchant</tt> - The name or description of the merchant offering the product
+    # * <tt>:description</tt> - A description of the transaction
+    # * <tt>:email</tt> - The email address of the customer
+    # * <tt>:currency</tt> - The currency of the transaction.  Only important when you are using a currency that is not the default with a gateway that supports multiple currencies.
+    # * <tt>:billing_address</tt> - A hash containing the billing address of the customer.
+    # * <tt>:shipping_address</tt> - A hash containing the shipping address of the customer.
+    # 
+    # The <tt>:billing_address</tt>, and <tt>:shipping_address</tt> hashes can have the following keys:
+    # 
+    # * <tt>:name</tt> - The full name of the customer.
+    # * <tt>:company</tt> - The company name of the customer.
+    # * <tt>:address1</tt> - The primary street address of the customer.
+    # * <tt>:address2</tt> - Additional line of address information.
+    # * <tt>:city</tt> - The city of the customer.
+    # * <tt>:state</tt> - The state of the customer.  The 2 digit code for US and Canadian addresses. The full name of the state or province for foreign addresses.
+    # * <tt>:country</tt> - The [ISO 3166-1-alpha-2 code](http://www.iso.org/iso/country_codes/iso_3166_code_lists/english_country_names_and_code_elements.htm) for the customer.
+    # * <tt>:zip</tt> - The zip or postal code of the customer.
+    # * <tt>:phone</tt> - The phone number of the customer.
+    #
+    # == Implmenting new gateways
+    #
+    # See the {ActiveMerchant Guide to Contributing}[http://code.google.com/p/activemerchant/wiki/Contributing]
+    #
+    class Gateway
+      include PostsData
+      include RequiresParameters
+      include CreditCardFormatting
+      include Utils
+      
+      DEBIT_CARDS = [ :switch, :solo ]
+      
+      cattr_reader :implementations
+      @@implementations = []
+      
+      def self.inherited(subclass)
+        super
+        @@implementations << subclass
+      end
+    
+      # The format of the amounts used by the gateway
+      # :dollars => '12.50'
+      # :cents => '1250'
+      class_inheritable_accessor :money_format
+      self.money_format = :dollars
+      
+      # The default currency for the transactions if no currency is provided
+      class_inheritable_accessor :default_currency
+      
+      # The countries of merchants the gateway supports
+      class_inheritable_accessor :supported_countries
+      self.supported_countries = []
+      
+      # The supported card types for the gateway
+      class_inheritable_accessor :supported_cardtypes
+      self.supported_cardtypes = []
+      
+      class_inheritable_accessor :homepage_url
+      class_inheritable_accessor :display_name
+      
+      # The application making the calls to the gateway
+      # Useful for things like the PayPal build notation (BN) id fields
+      superclass_delegating_accessor :application_id
+      self.application_id = 'ActiveMerchant'
+      
+      attr_reader :options
+      
+      # Use this method to check if your gateway of interest supports a credit card of some type
+      def self.supports?(card_type)
+        supported_cardtypes.include?(card_type.to_sym)
+      end
+      
+      def self.card_brand(source)
+        result = source.respond_to?(:brand) ? source.brand : source.type
+        result.to_s.downcase
+      end
+    
+      def card_brand(source)
+        self.class.card_brand(source)
+      end
+    
+      # Initialize a new gateway.
+      # 
+      # See the documentation for the gateway you will be using to make sure there are no other 
+      # required options.
+      def initialize(options = {})
+      end
+                                     
+      # Are we running in test mode?
+      def test?
+        Base.gateway_mode == :test
+      end
+            
+      private # :nodoc: all
+
+      def name 
+        self.class.name.scan(/\:\:(\w+)Gateway/).flatten.first
+      end
+      
+      def amount(money)
+        return nil if money.nil?
+        cents = money.respond_to?(:cents) ? money.cents : money 
+
+        if money.is_a?(String) or cents.to_i < 0
+          raise ArgumentError, 'money amount must be either a Money object or a positive integer in cents.' 
+        end
+
+        if self.money_format == :cents
+          cents.to_s
+        else
+          sprintf("%.2f", cents.to_f / 100)
+        end
+      end
+      
+      def currency(money)
+        money.respond_to?(:currency) ? money.currency : self.default_currency
+      end
+      
+      def requires_start_date_or_issue_number?(credit_card)
+        return false if card_brand(credit_card).blank?
+        DEBIT_CARDS.include?(card_brand(credit_card).to_sym)
+      end
+    end
+  end
+end