epay 0.0.4

data/lib/epay/subscription.rb

@@ -0,0 +1,132 @@
+module Epay
+  class Subscription
+    include Model
+    
+    attr_accessor :card_no
+    
+    def self.inspectable_attributes
+      %w(id created_at description)
+    end
+    
+    def created_at
+      Time.parse(data['created'])
+    end
+    
+    def card
+      # The card number can be derived from last transaction
+      if transactions.any?
+        transactions.last.card
+      else
+        Card.new({
+          :exp_year   => data['expyear'].to_i,
+          :exp_month  => data['expmonth'].to_i,
+          :kind       => data['cardtypeid'].downcase.to_sym,
+          :number     => card_no
+        })
+      end
+    end
+    
+    def error
+      data['error']
+    end
+    
+    def valid?
+      data['error'].nil?
+    end
+    
+    def description
+      data['description']
+    end
+    
+    def transactions
+      return [] unless data['transactionList'].present?
+      
+      # transactionList can be a hash or an array
+      Array.wrap(data['transactionList']['TransactionInformationType']).collect do |transaction_data|
+        Transaction.new(transaction_data['transactionid'].to_i, transaction_data)
+      end
+    end
+    
+    # Actions
+    def reload
+      response = Epay::Api.request(SUBSCRIPTION_SOAP_URL, 'getsubscriptions', :subscriptionid => id) do |response|
+        # API returns a list of subscriptions
+        if response.success?
+          @data = response.data['subscriptionAry']['SubscriptionInformationType']
+          self
+        else
+          raise(SubscriptionNotFound, "Couldn't find subscription with ID=#{id}")
+        end
+      end
+    end
+    
+    def authorize(params = {})
+      post = Api.default_post_for_params(params)
+      
+      post[:subscriptionid] = id
+      
+      Epay::Api.request(SUBSCRIPTION_SOAP_URL, 'authorize', post) do |response|
+        if response.success?
+          Transaction.find(response.data['transactionid'])
+        else
+          Transaction.new(nil, 'error' => response.data['pbsresponse'], 'failed' => true)
+        end
+      end
+    end
+    
+    def delete
+      Epay::Api.request(SUBSCRIPTION_SOAP_URL, 'delete', :subscriptionid => id).success?
+    end
+    
+    class << self
+      # Epay::Subscription.find(1234)
+      def find(id)
+        Subscription.new(id).reload
+      end
+      
+      # Epay::Subscription.create(:card_no => '...', :)
+      def create(params)
+        params.merge!(
+          :order_no => (Time.now.to_f * 10000).to_i.to_s, # Produce a unique order_no - it's not used anywhere, but ePay needs this
+          :amount   => 0
+        )
+        
+        post = Api.default_post_for_params(params).merge({
+          :subscription       => 1,
+          :subscriptionname   => params[:description]
+        })
+        
+        query = Api.authorize(post)
+        
+        if query['accept']
+          # Return the new subscriber
+          subscription = new(query["subscriptionid"].to_i).reload
+          
+          # Set (obfuscated) card number:
+          subscription.card_no = query["tcardno"]
+          
+          subscription
+        else
+          new(nil, 'error' => query["error"])
+        end
+      end
+      
+      def all
+        Epay::Api.request(SUBSCRIPTION_SOAP_URL, 'getsubscriptions') do |response|
+          if response.success?
+            collection = []
+            response.data['subscriptionAry']['SubscriptionInformationType'].each do |subscription|
+              collection << new_from_data(subscription)
+            end
+            
+            collection
+          end
+        end
+      end
+      
+      def new_from_data(data)
+        new(data['subscriptionid'].to_i, data)
+      end
+    end
+  end
+end

data/lib/epay/transaction.rb

@@ -0,0 +1,171 @@
+module Epay
+  class Transaction
+    include Model
+    
+    def self.inspectable_attributes
+      %w(id amount created_at order_no description cardholder acquirer currency group captured)
+    end
+    
+    def amount
+      data['authamount'].to_f / 100
+    end
+    
+    def created_at
+      return nil if failed?
+      Time.parse(data['authdate'])
+    end
+    
+    def order_no
+      data['orderid']
+    end
+    
+    def currency
+      Epay::CURRENCY_CODES.key(data['currency'])
+    end
+    
+    def description
+      data['description']
+    end
+    
+    def cardholder
+      data['cardholder']
+    end
+    
+    def acquirer
+      data['acquirer']
+    end
+    
+    def group
+      data['group']
+    end
+    
+    def card
+      # We can find some card data in the history:
+      @card ||= Card.new(:kind => CARD_KINDS[data['cardtypeid'].to_i], :number => data['tcardno'], :exp_year => data['expyear'].to_i, :exp_month => data['expmonth'].to_i)
+    end
+    
+    def credited_amount
+      data['creditedamount'].to_f / 100
+    end
+    
+    def captured_amount
+      data['capturedamount'].to_f / 100
+    end
+    
+    def captured_at
+      return nil if failed?
+      
+      time = Time.parse(data['captureddate'].to_s)
+      time < created_at ? nil : time
+    end
+    
+    def captured
+      !captured_at.nil?
+    end
+    alias_method :captured?, :captured
+    
+    def success?
+      !failed?
+    end
+    
+    def failed?
+      !!data['failed']
+    end
+    
+    def error
+      data['error']
+    end
+    
+    def temporary_error?
+      failed? && TEMPORARY_ERROR_CODES.include?(error)
+    end
+    
+    def permanent_error?
+      failed? && !temporary_error?
+    end
+    
+    def test?
+      data['mode'] == 'MODE_EPAY' || data['mode'] == 'MODE_TEST'
+    end
+    
+    def production?
+      !test?
+    end
+    
+    # Actions
+    def reload
+      response = Epay::Api.request(PAYMENT_SOAP_URL, 'gettransaction', :transactionid => id)
+      @data = response.data['transactionInformation']
+      self
+    end
+    
+    def capture
+      response = Epay::Api.request(PAYMENT_SOAP_URL, 'capture', :transactionid => id, :amount => (amount * 100).to_i)
+      if response.success?
+        reload
+        true
+      else
+        false
+      end
+    end
+    
+    def credit(amount_to_be_credited = nil)
+      amount_to_be_credited ||= amount - credited_amount
+      
+      Epay::Api.request(PAYMENT_SOAP_URL, 'credit', :transactionid => id, :amount => amount_to_be_credited * 100) do |response|
+        if response.success?
+          true
+        else
+          raise TransactionInGracePeriod if response.data['epayresponse'] == "-1021"
+          
+          false
+        end
+      end
+    end
+    
+    def delete
+      Epay::Api.request(PAYMENT_SOAP_URL, 'delete', :transactionid => id).success?
+    end
+    
+    # ClassMethods
+    class << self
+      def find(id)
+        transaction = new(id)
+        transaction.reload
+      end
+      
+      # Epay::Transaction.create(:card_no => '1234...', :cvc => '123', :exp_month => '11', :exp_year => '12', :amount => '119', :order_no => 'ND-TEST')
+      
+      def create(params)
+        post = Api.default_post_for_params(params).merge({
+          :orderid        => params[:order_no],
+          :amount         => params[:amount]*100,
+          :currency       => Epay::CURRENCY_CODES[(params[:currency] || Epay.default_currency).to_sym],
+          :description    => params[:description],
+          :cardholder     => params[:cardholder],
+          :group          => params[:group],
+          :instantcapture => params[:instant_capture] ? '1' : '0'
+        })
+        
+        query = Api.authorize(post)
+        
+        if query['accept']
+          # Find the transaction
+          transaction = Transaction.find(query["tid"].to_i)
+        else
+          # Return a new transaction with error code filled
+          new(nil, {
+            'failed'      => true,
+            'error'       => query["error"],
+            'orderid'     => post[:orderid],
+            'authamount'  => post[:amount],
+            'description' => post[:description],
+            'cardholder'  => post[:cardholder],
+            'group'       => post[:group],
+            'currency'    => post[:currency]
+          })
+        end
+      end
+    end
+  end
+end

data/lib/epay/version.rb

@@ -0,0 +1,3 @@
+module Epay
+  VERSION = "0.0.4"
+end

data/lib/extensions/hash.rb

@@ -0,0 +1,4 @@
+class Hash
+  # Alias for 1.8.7
+  alias_method :key, :index unless method_defined?(:key)
+end

data/spec/api/response_spec.rb

@@ -0,0 +1,71 @@
+require 'spec_helper'
+
+module Epay
+  module Api
+    describe Response do
+      def soap_response(&block)
+        xml = Builder::XmlMarkup.new(:indent => 2)
+        xml.instruct!
+        xml.tag! 'soap:Envelope', { 'xmlns:xsi' => 'http://schemas.xmlsoap.org/soap/envelope/',
+                                    'xmlns:xsd' => 'http://www.w3.org/2001/XMLSchema',
+                                    'xmlns:soap' => 'http://schemas.xmlsoap.org/soap/envelope/' } do
+
+          xml.tag! 'soap:Body' do
+            xml.tag! 'actionResponse' do
+              yield xml
+            end
+          end
+        end
+        
+        xml
+      end
+      
+      let(:response) do
+        xml = soap_response do |x|
+          x.tag! 'actionResult', 'true'
+        end
+        
+        raw_response = mock('response', :to_s => xml.target!, :code => 200, :headers => {:content_type => 'text/xml'})
+        Response.new(raw_response, 'action')
+      end
+      
+      describe "#data" do
+        it "returns hash if successful response" do
+          response.data.should == {'actionResult' => 'true'}
+        end
+        
+        it "returns string if content-type isn't xml" do
+          response.stub(:headers) { {:content_type => 'text/html' }}
+          response.data.should be_a String
+        end
+        
+        it "returns string if status code isn't 200" do
+          response.stub(:code) { 404 }
+          response.data.should be_a String
+        end
+      end
+      
+      describe "#success?" do
+        it "is true if SOAP action was success" do
+          response.success?.should be_true
+        end
+        
+        it "is false when raw_response status code isn't 200" do
+          response.raw_response.stub(:code) { 500 }
+          response.success?.should be_false
+        end
+        
+        it "is false when soap response is false" do
+          xml = soap_response do |x|
+            x.tag! 'actionResult', 'false'
+          end
+
+          raw_response = mock('response', :to_s => xml.target!, :code => 200, :headers => {:content_type => 'text/xml'})
+          response = Response.new(raw_response, 'action')
+          
+          response.success?.should be_false
+        end
+      end
+    end
+  end
+end

data/spec/api_spec.rb

@@ -0,0 +1,58 @@
+require 'spec_helper'
+require 'nokogiri'
+
+module Epay
+  describe Api do
+    describe ".authorize" do
+      it "hits the authorize endpoint" do
+        RestClient.should_receive(:post).with(Epay::AUTHORIZE_URL, anything)
+        Api.authorize(:amount => 10)
+      end
+    end
+    
+    describe ".request" do
+      before do
+        RestClient.stub(:post) { |url, body, headers| @url = url; @body = body; @headers = headers }
+        Api.request('https://ssl.ditonlinebetalingssystem.dk/remote/payment', 'gettransaction', :transactionid => 42)
+      end
+      
+      describe "the request" do
+        it "has content-type xml" do
+          @headers['Content-Type'].should =~ /text\/xml/
+        end
+      
+        it "has SOAPAction header" do
+          @headers['SOAPAction'].should == 'https://ssl.ditonlinebetalingssystem.dk/remote/payment/gettransaction'
+        end
+        
+        context "body" do
+          def body_to_xml(body)
+            Nokogiri::XML(body).remove_namespaces!
+          end
+          
+          it "has merchant number" do
+            body_to_xml(@body).xpath('//merchantnumber/child::text()').to_s.should == Epay.merchant_number.to_s
+          end
+          
+          it "is adds parameters" do
+            xml = body_to_xml(@body)
+            xml.xpath('//Envelope/Body/gettransaction/transactionid/child::text()').to_s.should == "42"
+          end
+          
+          context "if password is set" do
+            it "adds pwd field" do
+              Epay.password = 'password_for_api'
+              Api.request('https://ssl.ditonlinebetalingssystem.dk/remote/payment', 'gettransaction', :transactionid => 42)
+              body_to_xml(@body).xpath('//pwd/child::text()').to_s.should == 'password_for_api'
+            end
+          end
+        end
+      end
+      
+      it "posts to endpoint" do
+        RestClient.should_receive(:post).with('https://ssl.ditonlinebetalingssystem.dk/remote/payment.asmx', anything, anything)
+        Api.request('https://ssl.ditonlinebetalingssystem.dk/remote/payment', 'gettransaction', :transactionid => 42)
+      end
+    end
+  end
+end

data/spec/card_spec.rb

@@ -0,0 +1,21 @@
+require 'spec_helper'
+
+module Epay
+  describe Card do
+    let(:card) do
+      Card.new(:number => '333333XXXXXX3000', :exp_year => 15, :exp_month => 10, :kind => :visa)
+    end
+    
+    it "generates a hash" do
+      card.hash.should == '333333XXXXXX30001510'
+    end
+    
+    it "has expires_at" do
+      card.expires_at.should == Date.new(2015, 10, 31)
+    end
+    
+    it "has last_digits" do
+      card.last_digits.should == '3000'
+    end
+  end
+end