sepafm 0.0.1

data/test/sepa/cert_application_request_test.rb

@@ -0,0 +1,99 @@
+require File.expand_path('../../test_helper.rb', __FILE__)
+
+class CertApplicationRequestTest < MiniTest::Test
+  def setup
+    @schemapath = File.expand_path('../../../lib/sepa/xml_schemas',__FILE__)
+    @templatepath = File.expand_path('../../../lib/sepa/xml_templates/application_request',__FILE__)
+    @keyspath = File.expand_path('../nordea_test_keys', __FILE__)
+
+  csrplain = "-----BEGIN CERTIFICATE REQUEST-----
+MIIBczCB3QIBADA0MRIwEAYDVQQDEwlEZXZsYWIgT3kxETAPBgNVBAUTCDExMTEx
+MTExMQswCQYDVQQGEwJGSTCBnzANBgkqhkiG9w0BAQEFAAOBjQAwgYkCgYEAo9wU
+c2Ys5hSso4nEanbc+RIhL71aS6GBGiWAegXjhlyb6dpwigrZBFPw4u6UZV/Vq7Y7
+Ku3uBq5rfZwk+lA+c/B634Eu0zWdI+EYfQxKVRrBrmhiGplKEtglHXbNmmMOn07e
+LPUaB0Ipx/6h/UczJGBINdtcuIbYVu0r7ZfyWbUCAwEAAaAAMA0GCSqGSIb3DQEB
+BQUAA4GBAIhh2o8mN4Byn+w1jdbhq6lxEXYqdqdh1F6GCajt2lQMUBgYP23I5cS/
+Z+SYNhu8vbj52cGQPAwEDN6mm5yLpcXu40wYzgWyfStLXV9d/b4hMy9qLMW00Dzb
+jo2ekdSDdw8qxKyxj1piv8oYzMd4fCjCpL+WDZtq7mdLErVZ92gH
+-----END CERTIFICATE REQUEST-----"
+
+  # The params hash is populated with the data that is needed for gem to function
+  @params = {
+    bank: :nordea,
+    command: :get_certificate,
+    customer_id: '11111111',
+    environment: 'TEST',
+    csr_plain: csrplain,
+    pin: '1234567890',
+    # Selected service (For testing: service, For real: ISSUER)
+    service: 'service'
+  }
+
+  @ar_cert = Sepa::SoapBuilder.new(@params).get_ar_as_base64
+  @xml = Nokogiri::XML(Base64.decode64(@ar_cert))
+  end
+
+  def test_that_xml_template_is_unmodified
+    sha1 = OpenSSL::Digest::SHA1.new
+
+    get_certificate_template = File.read("#{@templatepath}/get_certificate.xml")
+
+    digest = Base64.encode64(sha1.digest(get_certificate_template)).strip
+
+    assert_equal digest, "mpoY4dd4XW5HskkoRxqtVEM+Tts="
+  end
+
+  def test_schemas_are_unmodified
+    sha1 = OpenSSL::Digest::SHA1.new
+
+    cert_schema = File.read(
+    "#{@schemapath}/cert_application_request.xsd")
+
+    cert_digest = sha1.digest(cert_schema)
+
+    assert_equal Base64.encode64(cert_digest).strip,"sFwy9Tj+cERTdcmaGhm8WpmJBH4="
+  end
+
+  def test_should_initialize_with_only_get_certificate_params
+    assert Sepa::ApplicationRequest.new(@params)
+  end
+
+  def test_should_get_argument_errors_unless_command_is_get_certificate
+    assert_raises(ArgumentError) do
+      @params[:command] = :wrong_command
+      ar = Sepa::ApplicationRequest.new(@params)
+      xml = ar.get_as_base64
+    end
+  end
+
+  def test_should_have_customer_id_set
+    assert_equal @xml.at_css("CustomerId").content, @params[:customer_id]
+  end
+
+  def test_should_have_timestamp_set_properly
+    timestamp = Time.strptime(@xml.at_css("Timestamp").content,
+    '%Y-%m-%dT%H:%M:%S%z')
+
+    assert timestamp <= Time.now && timestamp > (Time.now - 60),
+    "Timestamp was not set correctly"
+  end
+
+  def test_should_have_command_set_when_get_certificate
+    assert_equal @xml.at_css("Command").content, "GetCertificate"
+  end
+
+  def test_should_have_environment_set
+    assert_equal @xml.at_css("Environment").content, @params[:environment]
+  end
+
+  def test_should_have_service_set
+    assert_equal @xml.at_css("Service").content, @params[:service]
+  end
+
+  def test_should_validate_against_schema
+    Dir.chdir(@schemapath) do
+      xsd = Nokogiri::XML::Schema(IO.read('cert_application_request.xsd'))
+      assert xsd.valid?(@xml)
+    end
+  end
+end

data/test/sepa/client_test.rb

@@ -0,0 +1,425 @@
+require File.expand_path('../../test_helper.rb', __FILE__)
+
+class ClientTest < MiniTest::Test
+  def setup
+    @schemas_path = File.expand_path('../../../lib/sepa/xml_schemas',__FILE__)
+
+    wsdl_path = File.expand_path('../../../lib/sepa/wsdl/wsdl_nordea.xml',
+                                 __FILE__)
+
+    keys_path = File.expand_path('../nordea_test_keys', __FILE__)
+
+    danske_keys_path = File.expand_path('../danske_test_keys', __FILE__)
+
+    private_key = OpenSSL::PKey::RSA.new File.read "#{keys_path}/nordea.key"
+    cert = OpenSSL::X509::Certificate.new File.read "#{keys_path}/nordea.crt"
+    certplain = "-----BEGIN CERTIFICATE-----
+MIIDwTCCAqmgAwIBAgIEAX1JuTANBgkqhkiG9w0BAQUFADBkMQswCQYDVQQGEwJT
+RTEeMBwGA1UEChMVTm9yZGVhIEJhbmsgQUIgKHB1YmwpMR8wHQYDVQQDExZOb3Jk
+ZWEgQ29ycG9yYXRlIENBIDAxMRQwEgYDVQQFEws1MTY0MDYtMDEyMDAeFw0xMzA1
+MDIxMjI2MzRaFw0xNTA1MDIxMjI2MzRaMEQxCzAJBgNVBAYTAkZJMSAwHgYDVQQD
+DBdOb3JkZWEgRGVtbyBDZXJ0aWZpY2F0ZTETMBEGA1UEBRMKNTc4MDg2MDIzODCB
+nzANBgkqhkiG9w0BAQEFAAOBjQAwgYkCgYEAwtFEfAtbJuGzQwwRumZkvYh2BjGY
+VsAMUeiKtOne3bZSeisfCq+TXqL1gI9LofyeAQ9I/sDm6tL80yrD5iaSUqVm6A73
+9MsmpW/iyZcVf7ms8xAN51ESUgN6akwZCU9pH62ngJDj2gUsktY0fpsoVsARdrvO
+Fk0fTSUXKWd6LbcCAwEAAaOCAR0wggEZMAkGA1UdEwQCMAAwEQYDVR0OBAoECEBw
+2cj7+XMAMBMGA1UdIAQMMAowCAYGKoVwRwEDMBMGA1UdIwQMMAqACEALddbbzwun
+MDcGCCsGAQUFBwEBBCswKTAnBggrBgEFBQcwAYYbaHR0cDovL29jc3Aubm9yZGVh
+LnNlL0NDQTAxMA4GA1UdDwEB/wQEAwIFoDCBhQYDVR0fBH4wfDB6oHigdoZ0bGRh
+cCUzQS8vbGRhcC5uYi5zZS9jbiUzRE5vcmRlYStDb3Jwb3JhdGUrQ0ErMDElMkNv
+JTNETm9yZGVhK0JhbmsrQUIrJTI4cHVibCUyOSUyQ2MlM0RTRSUzRmNlcnRpZmlj
+YXRlcmV2b2NhdGlvbmxpc3QwDQYJKoZIhvcNAQEFBQADggEBACLUPB1Gmq6286/s
+ROADo7N+w3eViGJ2fuOTLMy4R0UHOznKZNsuk4zAbS2KycbZsE5py4L8o+IYoaS8
+8YHtEeckr2oqHnPpz/0Eg7wItj8Ad+AFWJqzbn6Hu/LQhlnl5JEzXzl3eZj9oiiJ
+1q/2CGXvFomY7S4tgpWRmYULtCK6jode0NhgNnAgOI9uy76pSS16aDoiQWUJqQgV
+ydowAnqS9h9aQ6gedwbOdtkWmwKMDVXU6aRz9Gvk+JeYJhtpuP3OPNGbbC5L7NVd
+no+B6AtwxmG3ozd+mPcMeVuz6kKLAmQyIiBSrRNa5OrTkq/CUzxO9WUgTnm/Sri7
+zReR6mU=
+-----END CERTIFICATE-----"
+    pkeyplain = "-----BEGIN PRIVATE KEY-----
+MIICdwIBADANBgkqhkiG9w0BAQEFAASCAmEwggJdAgEAAoGBAMLRRHwLWybhs0MM
+EbpmZL2IdgYxmFbADFHoirTp3t22UnorHwqvk16i9YCPS6H8ngEPSP7A5urS/NMq
+w+YmklKlZugO9/TLJqVv4smXFX+5rPMQDedRElIDempMGQlPaR+tp4CQ49oFLJLW
+NH6bKFbAEXa7zhZNH00lFylnei23AgMBAAECgYEAqt912/7x4jaQTrxlSELLFVp9
+eo1BesVTiPwXvPpsGbbyvGjZ/ztkXNs9zZbh1aCGzZMkiR2U7F5GlsiprlIif4cF
+6Xz7rCjaAs7iDRt9PjhjVuqNGR2I+VIIlbQ9XWFJ3lJFW3v7TIZ8JbLnn0XOFz+Z
+BBSSGTK1zTNh4TBQtjECQQDe5M3uu9m4RwSw9R6GaDw/IFQZgr0oWSv0WIjRwvwW
+nFnSX2lbkNAjulP0daGsmn7vxIpqZxPxwcrU4wFqTF5dAkEA38DnbCm3YfogzwLH
+Nre2hBmGqjWarhtxqtRarrkgnmOd8W0Z1Hb1dSHrliUSVSrINbK5ZdEV15Rpu7VD
+OePzIwJAPMslS+8alANyyR0iJUC65fDYX1jkZOPldDDNqIDJJxWf/hwd7WaTDpuc
+mHmZDi3ZX2Y45oqUywSzYNtFoIuR1QJAZYUZuyqmSK77SdGB36K1DfSi9AFEQDC1
+fwPAbTwTv6mFFPAiYxLiRZXxVPtW+QtjMXH4ymh2V4y/+GnCqbZyLwJBAJQSDAME
+Sn4Uz7Zjk3UrBIbMYEv0u2mcCypwsb0nGE5/gzDPjGE9cxWW+rXARIs+sNQVClnh
+45nhdfYxOjgYff0=
+-----END PRIVATE KEY-----"
+csrplain = "-----BEGIN CERTIFICATE REQUEST-----
+MIIBczCB3QIBADA0MRIwEAYDVQQDEwlEZXZsYWIgT3kxETAPBgNVBAUTCDExMTEx
+MTExMQswCQYDVQQGEwJGSTCBnzANBgkqhkiG9w0BAQEFAAOBjQAwgYkCgYEAo9wU
+c2Ys5hSso4nEanbc+RIhL71aS6GBGiWAegXjhlyb6dpwigrZBFPw4u6UZV/Vq7Y7
+Ku3uBq5rfZwk+lA+c/B634Eu0zWdI+EYfQxKVRrBrmhiGplKEtglHXbNmmMOn07e
+LPUaB0Ipx/6h/UczJGBINdtcuIbYVu0r7ZfyWbUCAwEAAaAAMA0GCSqGSIb3DQEB
+BQUAA4GBAIhh2o8mN4Byn+w1jdbhq6lxEXYqdqdh1F6GCajt2lQMUBgYP23I5cS/
+Z+SYNhu8vbj52cGQPAwEDN6mm5yLpcXu40wYzgWyfStLXV9d/b4hMy9qLMW00Dzb
+jo2ekdSDdw8qxKyxj1piv8oYzMd4fCjCpL+WDZtq7mdLErVZ92gH
+-----END CERTIFICATE REQUEST-----"
+    @params = {
+      bank: :nordea,
+      private_key_plain: pkeyplain,
+      cert_plain: certplain,
+      command: :get_user_info,
+      customer_id: '11111111',
+      environment: 'PRODUCTION',
+      status: 'NEW',
+      target_id: '11111111A1',
+      language: 'FI',
+      file_type: 'TITO',
+      content: Base64.encode64("Kurppa"),
+      file_reference: "11111111A12006030329501800000014"
+    }
+
+    @certparams = {
+      bank: :nordea,
+      command: :get_certificate,
+      customer_id: '11111111',
+      environment: 'TEST',
+      pin: '1234567890',
+      csr_plain: csrplain,
+      service: 'service'
+    }
+
+    encryptpkcsplain = "-----BEGIN CERTIFICATE REQUEST-----
+MIICZjCCAU4CAQAwITESMBAGA1UEAxMJRGV2bGFiIE95MQswCQYDVQQGEwJGSTCC
+ASIwDQYJKoZIhvcNAQEBBQADggEPADCCAQoCggEBAKN2ceFGw+i4wAyg6WApu7/h
+5Rpl8tp+QRX1eLbmftYpf6bbzj+JwspWNST/s8p8enGBRrK+HkNT8ayj7ZSubJwx
+g/bAn+ewxk64A984hiMqd0GMJgwFcWhGpHhwH9QiqA5CAQYXY0T1fs2UXf1mIJ1Z
+675yGRhU03ZyQgyIjhdTmXLznCluSLeIGypXPi7DCfHP5w0a6Dfpy31fowqi7n9A
+gyoQ6JZuuXHAdEoQpNmxgpp9gBwxs9U+yBmDaBAvvB0DY3+0kMRFCn2oyCuQw5C4
+mRo+0eOO+kA8Svd2bLXmcbe6js/5SgjvkHvvCgIqi9J6aPiJo0XCrLsB6BjQbpsC
+AwEAAaAAMA0GCSqGSIb3DQEBBQUAA4IBAQAXepnKWQWTCiTKXhuT+e52n0/x5YHd
+bLB8nelPpyMf0hiNeoUdzNTZoMM2OArtzvOhh5HWZ32GbjR/RDCy+kMfAGDm/tlB
+/4uJNcDotMFF+MUsEAHVrAUpZh5n00mBeYDl7m098VnAEayxUxJHbQMYY1J1QdTl
+M62i5c2v3sNJlDlT4GidRtoGW9KAID2oCdOL94krWpwLAZDP4wLwG7ACCbOx3rST
+f9gDE6jFUn7ONuiiYvOBAqjwckDpyOH+vx3WkZH4cwdcp4KVeLnjJzlJZaw7yTIo
+z8BKfQ26LmOO/S4CFe3Vzq6FRNKl3D4nvCu06WoMi5tAAEi57tk05B32
+-----END CERTIFICATE REQUEST-----"
+    signingpkcsplain = "-----BEGIN CERTIFICATE REQUEST-----
+MIICZjCCAU4CAQAwITESMBAGA1UEAxMJRGV2bGFiIE95MQswCQYDVQQGEwJGSTCC
+ASIwDQYJKoZIhvcNAQEBBQADggEPADCCAQoCggEBAK3yym5CztvmJCxbzhy6tOph
+wzamimFKlJt88cG0VLzwAh0EiAhFz9Yj/39n1HywL+4xOLizIAup794MzLBDs3TH
+OAZe7iZSrb5y4PMh5l9jwhXLPu7/tkqswcvMtstI5HZGqEqdw0kAT0BuKJBXdo+e
+8nOCVsiMPhrtk5ovLY54vWMzwfAQJeBkxbr1LH6Ib4k7IlsysKpQt7+VqQcTc/lL
+IC+MnVfmKDA0qTXFKQsZC2hO353cu9ZfjdrnKpo5gutcPJRu+TBNS8HJNkI+3pNM
+MTGPvweeY461tzgOpeSzL+FkmRFSWksOmPol1Q4DDZryYHaLDv7q6lELNDxEwQ8C
+AwEAAaAAMA0GCSqGSIb3DQEBBQUAA4IBAQAIw3tbNWTsayBm4bUzugNKCFreayTo
+5npG3JUiA+n5jIdj3egqSXwxkXSJ5tdXcv0xqsFkV0wq3l5wEaeG7Jd7vLD6FX2y
+MbtE49PHHcLwcY0U94qBj6qEleRwebGfyKwpMb2M90cAf3V/5IjZUJfvYyjOBQUT
+H6Xhm3JG9g7AScHhFcM8r6PhmzcL1FubYBPTcUBuotDBYc4lbql7sbww/u8OyWvl
+aIFd+oiwXGSYB7L8Fqg469jeIf0QtOZUtUEGOJWjM4JjTy+NnVmsj0jszMbuBZBW
+7wOrp+GMBUZ9/vaY/zr7nvJTfvKz7CJQOgADeh/0imZqhIYfVKIpJxR5
+-----END CERTIFICATE REQUEST-----"
+  danskebankencryptplain = "-----BEGIN CERTIFICATE-----
+MIIEATCCAumgAwIBAgIFAQjv8bMwDQYJKoZIhvcNAQELBQAwgZgxEDAOBgNVBAMT
+B0RCR1JPT1QxCzAJBgNVBAYTAkRLMRMwEQYDVQQHEwpDb3BlbmhhZ2VuMRAwDgYD
+VQQIEwdEZW5tYXJrMRowGAYDVQQKExFEYW5za2UgQmFuayBHcm91cDEaMBgGA1UE
+CxMRRGFuc2tlIEJhbmsgR3JvdXAxGDAWBgNVBAUTDzYxMTI2MjI4MTExMDAwMjAe
+Fw0xMjA4MDEwMDAwMDBaFw0xNDEwMzEwMDAwMDBaMIGYMRAwDgYDVQQDEwdEUENS
+WVBUMQswCQYDVQQGEwJESzETMBEGA1UEBxMKQ29wZW5oYWdlbjEQMA4GA1UECBMH
+RGVubWFyazEaMBgGA1UEChMRRGFuc2tlIEJhbmsgR3JvdXAxGjAYBgNVBAsTEURh
+bnNrZSBCYW5rIEdyb3VwMRgwFgYDVQQFEw82MTEyNjIyODQ5MTAwMDMwggEgMA0G
+CSqGSIb3DQEBAQUAA4IBDQAwggEIAoIBAQC/kHrOvHOueBsit9drxIHpaD7mXINy
+pXS/l9PbbOZ0lZKVEfW9gtG8xk9XggsPXHJMF/PXpG6mveXvPu9WW/XpryAUqGfv
+YsC7Px3ixaJb2EMOL+2mJYd0v5HKg5RuYkQ82k3K01hMNEGYs0OotjNVAimQcTLt
+VPDGBjK5BUAiwady9LpI6afo7roJWnRmsvSvinDgBqswnfCvUfSfM8cZyhnLLC2u
+j1kBHAD/5xpllmS3aq1M8LqFkBYcCE5PdPmFWhGUumZ/Y5qLjDgcPMAPvUaKLqOs
+h22jvPCZ0pm17eV0bSQzWe5e0zkgCYAepuFRazSlkJQYBdS47Mp68dY5AgEDo1Iw
+UDAfBgNVHSMEGDAWgBSE+uW/3pFJZt/FilLDs7ezIBzHbTAdBgNVHQ4EFgQUP6wH
+VNOmznu212c08M3oeYjeXW4wDgYDVR0PAQH/BAQDAgQwMA0GCSqGSIb3DQEBCwUA
+A4IBAQAvJBfPug+ixGL/zWUnKMweV80atZXMjHJEn4mOE+iUkCNONLImMMt6MXJy
+snJViL1gL5xMrka6A62PLLsVkl79kxDDbzXMPfGt5/mB9L7CMpyzaID0acDii3rs
+ZwT3Wxpnate6wowN4zpmXgpCpTDGbxjuVRiOArsjQblerhfxnD/UAieZ1IWozIAN
+s6SVms/TuOB+bODUr06ITxBkDJhizOJxjsXRIAtwZvvrH4qGjJz5qFcPb3nz4Txw
+swU8X6yvbtqF+q4aAKPA6ZydnGZFQSoSzNJtcF28T1ItxEHN3+xyQqXpTgFviiuL
+277LaAl9YUFFnSgeh7GiFitWJPfD
+-----END CERTIFICATE-----"
+    @danskecertparams = {
+      bank: :danske,
+      command: :create_certificate,
+      customer_id: 'ABC123',
+      environment: 'customertest',
+      key_generator_type: 'software',
+      encryption_cert_pkcs10_plain: encryptpkcsplain,
+      signing_cert_pkcs10_plain: signingpkcsplain,
+      cert_plain: danskebankencryptplain,
+      pin: '1234'
+    }
+
+    observer = Class.new {
+      def notify(operation_name, builder, globals, locals)
+        @operation_name = operation_name
+        @builder = builder
+        @globals = globals
+        @locals  = locals
+
+        HTTPI::Response.new(200,
+                            { "Reponse is actually" => "the request, w0000t" },
+                            locals[:xml])
+      end
+    }.new
+
+    Savon.observers << observer
+  end
+
+  def test_should_get_error_if_key_gen_type_missing
+    @danskecertparams.delete(:key_generator_type)
+
+    assert_raises(ArgumentError) { Sepa::Client.new(@danskecertparams) }
+  end
+
+  def test_should_raise_error_with_wrong_bank
+    @params[:bank] = :royal_bank_of_skopje
+    assert_raises(ArgumentError) { Sepa::Client.new(@params) }
+  end
+
+  def test_should_raise_error_with_wrong_command_when_bank_doesnt_support_the_command
+    @certparams[:bank] = :danske
+    @certparams[:command] = :get_certificate
+    assert_raises(ArgumentError) { Sepa::Client.new(@certparams) }
+  end
+
+  def test_should_not_initialize_with_unsupported_danske_params
+    assert_raises(ArgumentError) { Sepa::Client.new(@danskecertparams) }
+  end
+
+  def test_should_initialize_with_proper_params
+    assert Sepa::Client.new(@params)
+  end
+
+  def test_should_give_proper_error_if_initialized_with_something_not_hash_like
+    not_hashes = ['Merihevonsenkenka', 1, :verhokangas]
+
+    not_hashes.each do |not_hash|
+      assert_raises(ArgumentError) { Sepa::Client.new(not_hash) }
+    end
+  end
+
+  def test_should_raise_error_if_private_key_plain_is_wrong
+    wrong_pks = ['Im not a key', :leppakerttu, nil]
+
+    wrong_pks.each do |wrong_pk|
+      @params[:private_key_plain] = wrong_pk
+      assert_raises(ArgumentError) { Sepa::Client.new(@params) }
+    end
+  end
+
+  def test_should_raise_error_if_cert_plain_file_is_wrong
+    wrong_certs = ['Im not a cert', 99, :leppakerttu, nil]
+
+    wrong_certs.each do |wrong_cert|
+      @params[:cert_plain] = wrong_cert
+      assert_raises(ArgumentError) { Sepa::Client.new(@params) }
+    end
+  end
+
+  def test_should_raise_error_if_command_wrong_or_missing
+    wrong_commands = ['string is not a command', 1337, :symbol_but_not_proper,
+                      nil]
+
+    wrong_commands.each do |wrong_command|
+      @params[:command] = wrong_command
+
+      assert_raises(ArgumentError) { Sepa::Client.new(@params) }
+    end
+  end
+
+  def test_should_raise_error_if_customer_id_wrong_or_missing
+    wrong_ids = ["I'm a way too long a string and probably also not valid", nil]
+
+    wrong_ids.each do |wrong_id|
+      @params[:customer_id] = wrong_id
+
+      assert_raises(ArgumentError) { Sepa::Client.new(@params) }
+    end
+  end
+
+  def test_should_raise_error_if_environment_wrong_or_missing
+    wrong_envs = ["not proper", 5, :protuction, nil]
+
+    wrong_envs.each do |wrong_env|
+      @params[:environment] = wrong_env
+
+      assert_raises(ArgumentError) { Sepa::Client.new(@params) }
+    end
+  end
+
+  def test_should_raise_error_if_status_wrong
+    commands = [:download_file, :download_file_list]
+
+    commands.each do |command|
+      @params[:command] = command
+
+      wrong_statuses = ["ready", 'steady', 5, :nipsu]
+
+      wrong_statuses.each do |wrong_status|
+        @params[:status] = wrong_status
+
+        assert_raises(ArgumentError) { Sepa::Client.new(@params) }
+      end
+    end
+  end
+
+  def test_should_raise_error_if_target_id_wrong
+    commands = [:download_file, :download_file_list, :upload_file]
+
+    commands.each do |command|
+      @params[:command] = command
+
+      wrong_ids = ["ready"*81, nil]
+
+      wrong_ids.each do |wrong_id|
+        @params[:target_id] = wrong_id
+
+        assert_raises(ArgumentError) { Sepa::Client.new(@params) }
+      end
+    end
+  end
+
+  def test_should_raise_error_if_language_wrong
+    wrong_langs = ["Joo", 7, :protuction]
+
+    wrong_langs.each do |wrong_lang|
+      @params[:language] = wrong_lang
+
+      assert_raises(ArgumentError) { Sepa::Client.new(@params) }
+    end
+  end
+
+  def test_should_raise_error_if_file_type_wrong_or_missing
+    commands = [:download_file, :download_file_list, :upload_file]
+
+    commands.each do |command|
+      @params[:command] = command
+
+      wrong_types = ["kalle"*41, nil]
+
+      wrong_types.each do |wrong_type|
+        @params[:file_type] = wrong_type
+
+        assert_raises(ArgumentError) { Sepa::Client.new(@params) }
+      end
+    end
+  end
+
+  def test_should_raise_error_if_content_missing
+    @params[:command] = :upload_file
+    @params.delete(:content)
+
+    assert_raises(ArgumentError) { Sepa::Client.new(@params) }
+  end
+
+  # The response from savon will be the request to check that a proper request
+  # was made in the following four tests
+  def test_should_send_proper_request_with_get_user_info
+    client = Sepa::Client.new(@params)
+    response = client.send
+
+    assert_equal response.body.keys[0], :get_user_infoin
+
+    Dir.chdir(@schemas_path) do
+      xsd = Nokogiri::XML::Schema(IO.read('soap.xsd'))
+      assert xsd.valid?(Nokogiri::XML(response.to_xml))
+    end
+  end
+
+  def test_should_send_proper_request_with_download_file_list
+    @params[:command] = :download_file_list
+    client = Sepa::Client.new(@params)
+    response = client.send
+
+    assert_equal response.body.keys[0], :download_file_listin
+
+    Dir.chdir(@schemas_path) do
+      xsd = Nokogiri::XML::Schema(IO.read('soap.xsd'))
+      assert xsd.valid?(Nokogiri::XML(response.to_xml))
+    end
+  end
+
+  def test_should_send_proper_request_with_download_file
+    @params[:command] = :download_file
+    client = Sepa::Client.new(@params)
+    response = client.send
+
+    assert_equal response.body.keys[0], :download_filein
+
+    Dir.chdir(@schemas_path) do
+      xsd = Nokogiri::XML::Schema(IO.read('soap.xsd'))
+      assert xsd.valid?(Nokogiri::XML(response.to_xml))
+    end
+  end
+
+  def test_should_send_proper_request_with_upload_file
+    @params[:command] = :upload_file
+    client = Sepa::Client.new(@params)
+    response = client.send
+
+    assert_equal response.body.keys[0], :upload_filein
+
+    Dir.chdir(@schemas_path) do
+      xsd = Nokogiri::XML::Schema(IO.read('soap.xsd'))
+      assert xsd.valid?(Nokogiri::XML(response.to_xml))
+    end
+  end
+
+  def test_should_initialize_with_proper_cert_params
+    assert Sepa::Client.new(@certparams)
+  end
+
+  def test_should_send_proper_request_with_get_certificate
+    client = Sepa::Client.new(@certparams)
+    response = client.send
+
+    assert_equal response.body.keys[0], :get_certificatein
+
+    Dir.chdir(@schemas_path) do
+      xsd = Nokogiri::XML::Schema(IO.read('soap.xsd'))
+      assert xsd.valid?(Nokogiri::XML(response.to_xml))
+    end
+  end
+
+  def test_should_raise_error_if_cert_service_missing
+    @certparams[:command] = :get_certificate
+    @certparams.delete(:service)
+
+    assert_raises(ArgumentError) { Sepa::Client.new(@certparams) }
+  end
+
+  def test_should_raise_error_if_signing_pkcs_plain_and_path_missing_with_create_certificate
+    @danskecertparams[:command] = :create_certificate
+    @danskecertparams.delete(:signing_cert_pkcs10_plain)
+    @danskecertparams.delete(:signing_cert_pkcs10_path)
+
+    assert_raises(ArgumentError) { Sepa::Client.new(@danskecertparams) }
+  end
+
+  def test_should_raise_error_if_encryption_pkcs_plain_and_path_missing_with_create_certificate
+    @danskecertparams[:command] = :create_certificate
+    @danskecertparams.delete(:encryption_cert_pkcs10_plain)
+    @danskecertparams.delete(:encryption_cert_pkcs10_path)
+
+    assert_raises(ArgumentError) { Sepa::Client.new(@danskecertparams) }
+  end
+
+  def test_should_raise_error_if_pin_missing_with_create_certificate
+    @danskecertparams[:command] = :create_certificate
+    @danskecertparams.delete(:pin)
+
+    assert_raises(ArgumentError) { Sepa::Client.new(@danskecertparams) }
+  end
+
+  def test_should_raise_error_if_cert_plain_and_cert_path_missing_with_create_certificate
+    @danskecertparams[:command] = :create_certificate
+    @danskecertparams.delete(:cert_plain)
+    @danskecertparams.delete(:cert_path)
+
+    assert_raises(ArgumentError) { Sepa::Client.new(@danskecertparams) }
+  end
+end

data/test/sepa/danske_test_keys/danskeroot.pem

@@ -0,0 +1,25 @@
+-----BEGIN CERTIFICATE-----
+MIIEPzCCAyegAwIBAgIEQjoxcjANBgkqhkiG9w0BAQsFADCBmDEQMA4GA1UEAxMH
+REJHUk9PVDELMAkGA1UEBhMCREsxEzARBgNVBAcTCkNvcGVuaGFnZW4xEDAOBgNV
+BAgTB0Rlbm1hcmsxGjAYBgNVBAoTEURhbnNrZSBCYW5rIEdyb3VwMRowGAYDVQQL
+ExFEYW5za2UgQmFuayBHcm91cDEYMBYGA1UEBRMPNjExMjYyMjgxMTEwMDAyMB4X
+DTEwMTAyNzAwMDAwMFoXDTIwMTAyNzAwMDAwMFowgZgxEDAOBgNVBAMTB0RCR1JP
+T1QxCzAJBgNVBAYTAkRLMRMwEQYDVQQHEwpDb3BlbmhhZ2VuMRAwDgYDVQQIEwdE
+ZW5tYXJrMRowGAYDVQQKExFEYW5za2UgQmFuayBHcm91cDEaMBgGA1UECxMRRGFu
+c2tlIEJhbmsgR3JvdXAxGDAWBgNVBAUTDzYxMTI2MjI4MTExMDAwMjCCASAwDQYJ
+KoZIhvcNAQEBBQADggENADCCAQgCggEBAKWRtTRCXNEn5Hj+tA0vVg8VKUi/HnFg
+ioZW/eyaF4gWvR4PNXXJJOS31VNHnb2SQHPLt3ac+5icH7vLu/OtS5rvnDiDFMg+
+TomVDrur6RtlsZNLnihZiaSaooI49+ERTz6vcCjST7xbfhmC03LUhE8eBKI1U70c
+x/lQ55UQKZvIAIbCVaZEks95VS4uJpwnU4M8glNIVGSvJhIUj/LIkSIcqBiryq/t
+9FRVtRl1gVhwKdi8A5O9hp4t3dBIdOanaup2UEL4lp7izzgt2rkMeuyQ1ZjHsN7L
+mDsfjoFcYx/8CID9LBwRCN2p+YCuoWUjuorrdU/2eit2lNh6ypiF6WECAQOjgZAw
+gY0wHQYDVR0OBBYEFIT65b/ekUlm38WKUsOzt7MgHMdtMA4GA1UdDwEB/wQEAwIB
+BjASBgNVHRMBAf8ECDAGAQH/AgEBMEgGA1UdHwRBMD8wPaA7oDmGN2h0dHA6Ly9v
+bmxpbmUuZGFuc2tlYmFuay5jb20vcGtpL0RCR1JPT1RfMTExMTExMDAwMi5jcmww
+DQYJKoZIhvcNAQELBQADggEBAFjnBPCos7jMMLc3FqyQUMt/HJGKgJDrhYiPZBo9
+njGkH52Urryqw1sbT3wXA1NuzbjHE3xTUD+5jNPCncYqML9xqQjSQkBcb9eJfHZ+
+asiclsO38cSn2qriJPIrCREPOpRVqrGQRbZQhmDiB198hpAdLp38khJon/gXbR7u
+9e0rN8MIM4sXn+lFuQIWiPuv+3llGSoLlIxJnjiQQ9FDjhwN5U+N1N2aHaLc5AHu
+4X/qRutLCy7AYUJZMPBoakPLscYceW2Ztvx4VAyOXgHDdvmz0Bd58XWOs1A9bNMZ
+FeYAB14D9yQRCkXYLhr6sm8HuyqaIkGChFpNb+Gf8gcPvtw=
+-----END CERTIFICATE-----

data/test/sepa/danske_test_keys/signing_key.pem

@@ -0,0 +1,27 @@
+-----BEGIN RSA PRIVATE KEY-----
+MIIEowIBAAKCAQEAvTnADLhlBL5Rdh7ckCeVueT+a77DwLymGO/PQJAUnOiCOA3h
+dEPzg2ruKk9VgC5+ADTXDD4HIxYO0LB0l1hNTr0GhIbjGI4HLgBSlE1lS/v9rWy8
+kQvFVBBysh3oo3aW27AqSGIUSZzHdOaf0vVmCM69aoHZ3rNHR4RoXA0nqisxBYKb
+SepKSJ+BdIEthbgzOz5ybHY6CCIEU+TIbCEkhACXFk52hmId2ODmjnK9pF6EOyJ3
+CMD8jOksjrb4E9ylChsX135jVqBWoyv49mkzCW7abhkgEB8Ap2nBp27Cm+nFGElW
+co5gKwdEKjrkA2B/Hz6KoceR6OydaaZnUI7T5QIDAQABAoIBADNUoSZSNwUMY6i5
+QnfQZStiVSoBO7Ti9+O32e7Xpt/RqtFt4oTZkgtKTIUptDXrZr7Dlrp5cRIxf59Y
+3qfXilEbsdLtjFky3fu6lqwoOpxcJTqQTq7CFKtzMsnilyMQnmfF6BJumLZHU0wA
+68YcT6t/+Z4Uz3c8Bs/9uRmPb/0W9qkWhH35JKtlFyN2g6nyKMCpYoll+FNun3nr
+e6gqZ9lNbqWOAnf2hfZWIKXLHxh9Eko/kQQYzo1Y0bwJ9v5nbqpxpXn77Ys9eL63
+Z7gQDVoYhaOVBzWWvp7bDQ0RlJ5dliWwfqSy7l5/u7/yuzcuozsE4/zsuGQEcgve
+b721MhkCgYEA69tYh6QdlQtRq9SRmEe16X2UoWLN+tLNvAqdQxDqbwE0R8JxlW4z
+gMpmM58L49aNQA50485jLZJaGwmK6vRpb9IBKB6iB94q20DtB4t1VNNQU3RtzbMQ
+cdvJ+ocftflqaRMgAtKDbdeDtYxaG27g6Jz+yw8fq6krWaSIwoChHFcCgYEAzWLh
+9+9yEPVlEW8CodIvhbCdeRnklgw/TZs6tg/B+99mN0QDeG/c2jbxBcOZ0DgksAn5
+/bvhh1oRSOsZLDE9+ILjtTThbs6c4U2QyQxgvTRzX/NEHwid8rxk04mBOQtpYMD0
+Y1yDg+qnJl3Zev6+DGQB9WbthJuOX/XWfEn/LCMCgYAxYhnlPK2c+WO+UKGzesBS
+BSNLrz5lmCHPj4Fh+3a6i0wBAmt52DscakR/5ns81z13/g7na91EO3J2Wsclbsts
+yFHJrrBKaXAbvDpk7ARDIIOfFa+v9CArVtOxiv1OwsxO99wp+x3dr9Q5/QsY11xs
+GAMZTS9aZ+9Vs6eW4gvZvQKBgQCOEalHTJ01d9mKfqRudSqkKnAzNaL129DqCMdK
+6ol/hZ95+RUBeTdmxnxgRVYfPsa58py3VAAEFVxBeUY3WHSKc1e5n7OUZ10DSBkv
+yN0d46svIuHrKZXAM2r3HHWDlQ42fCJQnMzoMiefFWn7dzzU61SjgKgpg0Svwii0
+XqcgywKBgAuj8hccUY5e5yRUGAqXrBfFCJN53ftkBaVtV0nqxJ2jXwIEqYCVohuM
+gnUi1U8K+UAVu7JQJG1VUBEDcKFN2p/47KdpBx3calcurRmNL8Ual2ANPMC55RUD
+11qQJynyu37oWB74v3VByP38tYy6tWmHUg55fMbjUtKW2AHdIXV5
+-----END RSA PRIVATE KEY-----

data/test/sepa/nordea_cert_request_soap_builder_test.rb

@@ -0,0 +1,112 @@
+require File.expand_path('../../test_helper.rb', __FILE__)
+
+class NordeaCertRequestSoapBuilderTest < MiniTest::Test
+  def setup
+    @schemapath = File.expand_path('../../../lib/sepa/xml_schemas',__FILE__)
+    @templatepath = File.expand_path('../../../lib/sepa/xml_templates/soap',__FILE__)
+    @keyspath = File.expand_path('../nordea_test_keys', __FILE__)
+
+  csrplain = "-----BEGIN CERTIFICATE REQUEST-----
+MIIBczCB3QIBADA0MRIwEAYDVQQDEwlEZXZsYWIgT3kxETAPBgNVBAUTCDExMTEx
+MTExMQswCQYDVQQGEwJGSTCBnzANBgkqhkiG9w0BAQEFAAOBjQAwgYkCgYEAo9wU
+c2Ys5hSso4nEanbc+RIhL71aS6GBGiWAegXjhlyb6dpwigrZBFPw4u6UZV/Vq7Y7
+Ku3uBq5rfZwk+lA+c/B634Eu0zWdI+EYfQxKVRrBrmhiGplKEtglHXbNmmMOn07e
+LPUaB0Ipx/6h/UczJGBINdtcuIbYVu0r7ZfyWbUCAwEAAaAAMA0GCSqGSIb3DQEB
+BQUAA4GBAIhh2o8mN4Byn+w1jdbhq6lxEXYqdqdh1F6GCajt2lQMUBgYP23I5cS/
+Z+SYNhu8vbj52cGQPAwEDN6mm5yLpcXu40wYzgWyfStLXV9d/b4hMy9qLMW00Dzb
+jo2ekdSDdw8qxKyxj1piv8oYzMd4fCjCpL+WDZtq7mdLErVZ92gH
+-----END CERTIFICATE REQUEST-----"
+
+  # The params hash is populated with the data that is needed for gem to function
+  @params = {
+    bank: :nordea,
+    command: :get_certificate,
+    pin: '1234567890',
+    customer_id: '11111111',
+    environment: 'TEST',
+    csr_plain: csrplain,
+    # Selected service (For testing: service, For real: ISSUER)
+    service: 'service'
+  }
+
+  @certrequest = Sepa::SoapBuilder.new(@params)
+
+  @xml = Nokogiri::XML(@certrequest.to_xml)
+  end
+
+  def test_should_fail_if_bank_doesnt_support_command
+    @params[:command] = :create_certificate
+
+    assert_raises(ArgumentError) { Sepa::SoapBuilder.new(@params) }
+  end
+
+  def test_that_get_certificate_soap_template_is_unmodified
+    sha1 = OpenSSL::Digest::SHA1.new
+    template = File.read("#{@templatepath}/get_certificate.xml")
+    digest = Base64.encode64(sha1.digest(template)).strip
+
+    assert_equal digest, "iYJcoQAlXZj5Pp9vLlSROXxY3+k="
+  end
+
+  def test_should_initialize_with_proper_params
+    assert Sepa::SoapBuilder.new(@params)
+  end
+
+  def test_should_get_error_if_command_missing
+    @params.delete(:command)
+
+    assert_raises(ArgumentError) do
+      Sepa::SoapBuilder.new(@params)
+    end
+  end
+
+  def test_should_get_error_if_customer_id_missing
+    @params.delete(:customer_id)
+
+    assert_raises(ArgumentError) do
+      Sepa::SoapBuilder.new(@params)
+    end
+  end
+
+  def test_should_load_correct_template_with_get_certificate
+    @params[:command] = :get_certificate
+    xml = Nokogiri::XML(Sepa::SoapBuilder.new(@params).to_xml)
+
+    assert xml.xpath('//cer:getCertificatein', 'cer' => 'http://bxd.fi/CertificateService').first
+  end
+
+  def test_should_raise_error_if_command_not_correct
+    @params[:command] = :wrong_command
+    assert_raises(ArgumentError) do
+      soap = Sepa::SoapBuilder.new(@params).to_xml
+    end
+  end
+
+  def test_timestamp_is_set_correctly
+    timestamp_node = @xml.xpath(
+      "//cer:Timestamp", 'cer' => 'http://bxd.fi/CertificateService'
+    ).first
+
+    timestamp = Time.strptime(timestamp_node.content, '%Y-%m-%dT%H:%M:%S%z')
+
+    assert timestamp <= Time.now && timestamp > (Time.now - 60)
+  end
+
+  def test_application_request_should_be_inserted_properly
+    ar_node = @xml.xpath(
+      "//cer:ApplicationRequest", 'cer' => 'http://bxd.fi/CertificateService'
+    ).first
+
+    ar_doc = Nokogiri::XML(Base64.decode64(ar_node.content))
+
+    assert ar_doc.respond_to?(:canonicalize)
+    assert_equal ar_doc.at_css("CustomerId").content, @params[:customer_id]
+  end
+
+  def test_should_validate_against_schema
+    Dir.chdir(@schemapath) do
+      xsd = Nokogiri::XML::Schema(IO.read('soap.xsd'))
+      assert xsd.valid?(@xml)
+    end
+  end
+end