sps_king 0.1.0

data/spec/lib/sps_king/message_spec.rb

@@ -0,0 +1,128 @@
+# encoding: utf-8
+require 'spec_helper'
+
+class DummyTransaction < SPS::Transaction
+  def valid?; true end
+end
+
+class DummyMessage < SPS::Message
+  self.account_class = SPS::Account
+  self.transaction_class = DummyTransaction
+end
+
+describe SPS::Message do
+  describe :amount_total do
+    subject do
+      message = DummyMessage.new
+      message.add_transaction amount: 1.1
+      message.add_transaction amount: 2.2
+      message
+    end
+
+    it 'should sum up all transactions' do
+      expect(subject.amount_total).to eq(3.3)
+    end
+
+    it 'should sum up selected transactions' do
+      expect(subject.amount_total([subject.transactions[0]])).to eq(1.1)
+    end
+  end
+
+  describe 'validation' do
+    subject { DummyMessage.new }
+
+    it 'should fail with invalid account' do
+      expect(subject).not_to be_valid
+      expect(subject.errors_on(:account).size).to eq(2)
+    end
+
+    it 'should fail without transactions' do
+      expect(subject).not_to be_valid
+      expect(subject.errors_on(:transactions).size).to eq(1)
+    end
+  end
+
+  describe :message_identification do
+    subject { DummyMessage.new }
+
+    describe 'getter' do
+      it 'should return prefixed random hex string' do
+        expect(subject.message_identification).to match(/SPS-KING\/([a-f0-9]{2}){11}/)
+      end
+    end
+
+    describe 'setter' do
+      it 'should accept valid ID' do
+        [ 'gid://myMoneyApp/Payment/15108', # for example, Rails Global ID could be a candidate
+          Time.now.to_f.to_s                # or a time based string
+        ].each do |valid_msgid|
+          subject.message_identification = valid_msgid
+          expect(subject.message_identification).to eq(valid_msgid)
+        end
+      end
+
+      it 'should deny invalid string' do
+        [ 'my_MESSAGE_ID/123', # contains underscore
+          '',                  # blank string
+          'üöäß',              # non-ASCII chars
+          '1' * 36             # too long
+        ].each do |arg|
+          expect {
+            subject.message_identification = arg
+          }.to raise_error(ArgumentError)
+        end
+      end
+
+      it 'should deny argument other than String' do
+        [ 123,
+          nil,
+          :foo
+        ].each do |arg|
+          expect {
+            subject.message_identification = arg
+          }.to raise_error(ArgumentError)
+        end
+      end
+    end
+  end
+
+describe :creation_date_time do
+    subject { DummyMessage.new }
+
+    describe 'getter' do
+      it 'should return Time.now.iso8601' do
+        expect(subject.creation_date_time).to eq(Time.now.iso8601)
+      end
+    end
+
+    describe 'setter' do
+      it 'should accept date time strings' do
+        ['2017-01-05T12:28:52', '2017-01-05T12:28:52Z', '2017-01-05 12:28:52', '2017-01-05T12:28:52+01:00'].each do |valid_dt|
+          subject.creation_date_time = valid_dt
+          expect(subject.creation_date_time).to eq(valid_dt)
+        end
+      end
+
+      it 'should deny invalid string' do
+        [ 'an arbitrary string',
+          ''
+        ].each do |arg|
+          expect {
+            subject.creation_date_time = arg
+          }.to raise_error(ArgumentError)
+        end
+      end
+
+      it 'should deny argument other than String' do
+        [ 123,
+          nil,
+          :foo
+        ].each do |arg|
+          expect {
+            subject.creation_date_time = arg
+          }.to raise_error(ArgumentError)
+        end
+      end
+    end
+  end
+end

data/spec/lib/sps_king/structured_remittance_information_spec.rb

@@ -0,0 +1,32 @@
+# encoding: utf-8
+require 'spec_helper'
+
+describe SPS::StructuredRemittanceInformation do
+  describe :new do
+    it 'should not accept unknown keys' do
+      expect {
+        SPS::StructuredRemittanceInformation.new foo: 'bar'
+      }.to raise_error(NoMethodError)
+    end
+  end
+
+  describe :proprietary do
+    it 'should accept valid value' do
+      expect(SPS::StructuredRemittanceInformation).to accept('ESR', 'IPI', for: :proprietary)
+    end
+
+    it 'should not accept invalid value' do
+      expect(SPS::StructuredRemittanceInformation).not_to accept(nil, 'something_else', for: :proprietary)
+    end
+  end
+
+  describe :reference do
+    it 'should accept valid value' do
+      expect(SPS::StructuredRemittanceInformation).to accept('a' * 35 , for: :reference)
+    end
+
+    it 'should not accept invalid value' do
+      expect(SPS::StructuredRemittanceInformation).not_to accept('', 'a' * 36, for: :reference)
+    end
+  end
+end

data/spec/lib/sps_king/transaction/credit_transfer_transaction_spec.rb

@@ -0,0 +1,53 @@
+# encoding: utf-8
+require 'spec_helper'
+
+describe SPS::CreditTransferTransaction do
+  describe :initialize do
+    it 'should initialize a valid transaction' do
+      expect(
+        SPS::CreditTransferTransaction.new(
+          name:                   'Contoso AG',
+          iban:                   'CH5481230000001998736',
+          bic:                    'RAIFCH22',
+          amount:                 102.50,
+          reference:              'XYZ-1234/123',
+          remittance_information: 'Rechnung 123 vom 22.08.2013'
+        )
+      ).to be_valid
+    end
+  end
+
+  describe :schema_compatible? do
+    context 'for pain.001.001.03.ch.02' do
+      it 'should succeed for valid attributes' do
+        expect(SPS::CreditTransferTransaction.new(bic: 'RAIFCH22', currency: 'CHF'))
+          .to be_schema_compatible('pain.001.001.03.ch.02')
+      end
+
+      it 'should fail for invalid attributes' do
+        expect(SPS::CreditTransferTransaction.new(bic: nil))
+          .not_to be_schema_compatible('pain.001.001.03.ch.02')
+      end
+    end
+  end
+
+  context 'Requested date' do
+    it 'should allow valid value' do
+      expect(SPS::CreditTransferTransaction).to accept(nil, Date.new(1999, 1, 1), Date.today, Date.today.next, Date.today + 2, for: :requested_date)
+    end
+
+    it 'should not allow invalid value' do
+      expect(SPS::CreditTransferTransaction).not_to accept(Date.new(1995,12,21), Date.today - 1, for: :requested_date)
+    end
+  end
+
+  context 'Category Purpose' do
+    it 'should allow valid value' do
+      expect(SPS::CreditTransferTransaction).to accept(nil, 'SALA', 'X' * 4, for: :category_purpose)
+    end
+
+    it 'should not allow invalid value' do
+      expect(SPS::CreditTransferTransaction).not_to accept('', 'X' * 5, for: :category_purpose)
+    end
+  end
+end

data/spec/lib/sps_king/transaction/direct_debit_transaction_spec.rb

@@ -0,0 +1,56 @@
+# encoding: utf-8
+require 'spec_helper'
+
+describe SPS::DirectDebitTransaction do
+  let(:structured_remittance_information) do
+    SPS::StructuredRemittanceInformation.new(
+      proprietary: 'ESR',
+      reference:   '609323234234234353453423423'
+    )
+  end
+
+  describe :initialize do
+    it 'should create a valid transaction' do
+      expect(
+        SPS::DirectDebitTransaction.new(
+          name:                      'Zahlemann & Söhne Gbr',
+          iban:                      'CH7081232000001998736',
+          amount:                    39.99,
+          reference:                 'XYZ-1234/123',
+          instruction:               '123',
+          remittance_information:    'Vielen Dank für Ihren Einkauf!',
+          structured_remittance_information: structured_remittance_information
+        )
+      ).to be_valid
+    end
+  end
+
+  describe :schema_compatible? do
+    context 'for pain.008.001.02.ch.03' do
+      it 'should succeed for valid attributes' do
+        expect(
+          SPS::DirectDebitTransaction.new(
+            structured_remittance_information: structured_remittance_information
+          )
+        ).to be_schema_compatible('pain.008.001.02.ch.03')
+      end
+
+      it 'should fail for invalid attributes' do
+        expect(SPS::DirectDebitTransaction.new())
+          .not_to be_schema_compatible('pain.008.001.02.ch.03')
+      end
+    end
+  end
+
+  context 'Requested date' do
+    it 'should allow valid value' do
+      expect(SPS::DirectDebitTransaction)
+        .to accept(nil, Date.new(1999, 1, 1), Date.today.next, Date.today + 2, for: :requested_date)
+    end
+
+    it 'should not allow invalid value' do
+      expect(SPS::DirectDebitTransaction)
+        .not_to accept(Date.new(1995,12,21), Date.today - 1, Date.today, for: :requested_date)
+    end
+  end
+end

data/spec/lib/sps_king/transaction_spec.rb

@@ -0,0 +1,133 @@
+# encoding: utf-8
+require 'spec_helper'
+
+describe SPS::Transaction do
+  describe :new do
+    it 'should have default for reference' do
+      expect(SPS::Transaction.new.reference).to eq('NOTPROVIDED')
+    end
+
+    it 'should have default for requested_date' do
+      expect(SPS::Transaction.new.requested_date).to eq(Date.new(1999, 1, 1))
+    end
+
+    it 'should have default for batch_booking' do
+      expect(SPS::Transaction.new.batch_booking).to eq(true)
+    end
+  end
+
+  context 'Name' do
+    it 'should accept valid value' do
+      expect(SPS::Transaction).to accept('Manfred Mustermann III.', 'Zahlemann & Söhne GbR', 'X' * 70, for: :name)
+    end
+
+    it 'should not accept invalid value' do
+      expect(SPS::Transaction).not_to accept(nil, '', 'X' * 71, for: :name)
+    end
+  end
+
+  context 'Adress' do
+    context 'with address_line' do
+      it 'should accept valid value' do
+        expect(SPS::Transaction).to accept(SPS::DebtorAddress.new(
+          country_code: "CH",
+          address_line1: "Musterstrasse 123",
+          address_line2: "1234 Musterstadt"
+        ), for: :debtor_address)
+      end
+
+      it 'should accept valid value' do
+        expect(SPS::Transaction).to accept(SPS::CreditorAddress.new(
+          country_code: "CH",
+          address_line1: "Musterstrasse 123",
+          address_line2: "1234 Musterstadt"
+        ), for: :creditor_address)
+      end
+    end
+
+    context 'with individual address fields' do
+      it 'should accept valid value' do
+        expect(SPS::Transaction).to accept(SPS::DebtorAddress.new(
+          country_code: "CH",
+          street_name:     'Mustergasse',
+          post_code:       '1234',
+          town_name:       'Musterstadt'
+        ), for: :debtor_address)
+      end
+
+      it 'should accept valid value' do
+        expect(SPS::Transaction).to accept(SPS::CreditorAddress.new(
+          country_code: "CH",
+          street_name:     'Mustergasse',
+          building_number: '123',
+          post_code:       '1234',
+          town_name:       'Musterstadt'
+        ), for: :creditor_address)
+      end
+    end
+
+    it 'should not accept invalid value' do
+      expect(SPS::Transaction).not_to accept('', {} , for: :name)
+    end
+  end
+
+  context 'IBAN' do
+    it 'should accept valid value' do
+      expect(SPS::Transaction).to accept('DE21500500009876543210', 'PL61109010140000071219812874', for: :iban)
+    end
+
+    it 'should not accept invalid value' do
+      expect(SPS::Transaction).not_to accept(nil, '', 'invalid', for: :iban)
+    end
+  end
+
+  context 'BIC' do
+    it 'should accept valid value' do
+      expect(SPS::Transaction).to accept('DEUTDEFF', 'DEUTDEFF500', 'SPUEDE2UXXX', for: :bic)
+    end
+
+    it 'should not accept invalid value' do
+      expect(SPS::Transaction).not_to accept('', 'invalid', for: :bic)
+    end
+  end
+
+  context 'Amount' do
+    it 'should accept valid value' do
+      expect(SPS::Transaction).to accept(0.01, 1, 100, 100.00, 99.99, 1234567890.12, BigDecimal('10'), '42', '42.51', '42.512', 1.23456, for: :amount)
+    end
+
+    it 'should not accept invalid value' do
+      expect(SPS::Transaction).not_to accept(nil, 0, -3, 'xz', for: :amount)
+    end
+  end
+
+  context 'Reference' do
+    it 'should accept valid value' do
+      expect(SPS::Transaction).to accept(nil, 'ABC-1234/78.0', 'X' * 35, for: :reference)
+    end
+
+    it 'should not accept invalid value' do
+      expect(SPS::Transaction).not_to accept('', 'X' * 36, for: :reference)
+    end
+  end
+
+  context 'Remittance information' do
+    it 'should allow valid value' do
+      expect(SPS::Transaction).to accept(nil, 'Bonus', 'X' * 140, for: :remittance_information)
+    end
+
+    it 'should not allow invalid value' do
+      expect(SPS::Transaction).not_to accept('', 'X' * 141, for: :remittance_information)
+    end
+  end
+
+  context 'Currency' do
+    it 'should allow valid values' do
+      expect(SPS::Transaction).to accept('EUR', 'CHF', 'SEK', for: :currency)
+    end
+
+    it 'should not allow invalid values' do
+      expect(SPS::Transaction).not_to accept('', 'EURO', 'ABCDEF', for: :currency)
+    end
+  end
+end

data/spec/lib/sps_king/validation_spec.rb

@@ -0,0 +1,23 @@
+require 'spec_helper'
+
+describe 'Credit Transfer Initiation' do
+  it "should validate example file" do
+    expect(File.read('spec/examples/pain.001.001.03.ch.02.xml'))
+      .to validate_against('pain.001.001.03.ch.02.xsd')
+  end
+
+  it 'should not validate dummy string' do
+    expect('foo').not_to validate_against('pain.001.001.03.ch.02.xsd')
+  end
+end
+
+describe 'Direct Debit Initiation' do
+  it 'should validate example file' do
+    expect(File.read('spec/examples/pain.008.001.02.ch.03.xml'))
+      .to validate_against('pain.008.001.02.ch.03.xsd')
+  end
+
+  it 'should not validate dummy string' do
+    expect('foo').not_to validate_against('pain.008.001.02.ch.03.xsd')
+  end
+end

data/spec/lib/sps_king/validator_spec.rb

@@ -0,0 +1,78 @@
+# encoding: utf-8
+require 'spec_helper'
+
+describe SPS::IBANValidator do
+  class Validatable
+    include ActiveModel::Model
+    attr_accessor :iban, :iban_the_terrible
+    validates_with SPS::IBANValidator, message: "%{value} seems wrong"
+    validates_with SPS::IBANValidator, field_name: :iban_the_terrible
+  end
+
+  it 'should accept valid IBAN' do
+    expect(Validatable)
+      .to accept('DE21500500009876543210', 'DE87200500001234567890', for: [:iban, :iban_the_terrible])
+  end
+
+  it 'should not accept an invalid IBAN' do
+    expect(Validatable).not_to accept('', 'xxx',                     # Oviously no IBAN
+                                      'DE22500500009876543210',      # wrong checksum
+                                      'DE2150050000987654321',       # too short
+                                      'de87200500001234567890',      # downcase characters
+                                      'DE87 2005 0000 1234 5678 90', # spaces included
+                               for: [:iban, :iban_the_terrible])
+  end
+
+  it "should customize error message" do
+    v = Validatable.new(:iban => 'xxx')
+    v.valid?
+    expect(v.errors[:iban]).to eq(['xxx seems wrong'])
+  end
+end
+
+describe SPS::BICValidator do
+  class Validatable
+    include ActiveModel::Model
+    attr_accessor :bic, :custom_bic
+    validates_with SPS::BICValidator, message: "%{value} seems wrong"
+    validates_with SPS::BICValidator, field_name: :custom_bic
+  end
+
+  it 'should accept valid BICs' do
+    expect(Validatable).to accept('DEUTDEDBDUE', 'DUSSDEDDXXX', for: [:bic, :custom_bic])
+  end
+
+  it 'should not accept an invalid BIC' do
+    expect(Validatable)
+      .not_to accept('', 'GENODE61HR', 'DEUTDEDBDUEDEUTDEDBDUE', for: [:bic, :custom_bic])
+  end
+
+  it "should customize error message" do
+    v = Validatable.new(:bic => 'xxx')
+    v.valid?
+    expect(v.errors[:bic]).to eq(['xxx seems wrong'])
+  end
+end
+
+describe SPS::CreditorIdentifierValidator do
+  class Validatable
+    include ActiveModel::Model
+    attr_accessor :creditor_identifier, :crid
+    validates_with SPS::CreditorIdentifierValidator, message: "%{value} seems wrong"
+    validates_with SPS::CreditorIdentifierValidator, field_name: :crid
+  end
+
+  it 'should accept valid creditor_identifier' do
+    expect(Validatable).to accept('DE98ZZZ09999999999', 'AT12ZZZ00000000001', 'FR12ZZZ123456', 'NL97ZZZ123456780001', 'ABC1W', for: [:creditor_identifier, :crid])
+  end
+
+  it 'should not accept an invalid creditor_identifier' do
+    expect(Validatable).not_to accept('', 'xxx', 'DE98ZZZ099999999990', for: [:creditor_identifier, :crid])
+  end
+
+  it "should customize error message" do
+    v = Validatable.new(:creditor_identifier => 'xxx')
+    v.valid?
+    expect(v.errors[:creditor_identifier]).to eq(['xxx seems wrong'])
+  end
+end