npn47_iso8583 0.1.5.a

data/test/message_test.rb

@@ -0,0 +1,163 @@
+require 'lib/iso8583'
+require 'lib/iso8583/berlin'
+require 'test/unit'
+
+include ISO8583
+
+class MessageTest < Test::Unit::TestCase
+  def test_create_empty
+    mes = BerlinMessage.new
+    mes.mti = 1100
+    pan = 474747474747
+    mes.pan = pan
+    assert_equal pan, mes.pan
+    assert_equal pan, mes[2]
+    assert_equal pan, mes["Primary Account Number (PAN)"]
+    assert_equal "1100@\000\000\000\000\000\000\00012474747474747", mes.to_b
+
+    mes = BerlinMessage.new
+    mes.mti = "Authorization Request Response Issuer Gateway"
+    pan = 474747474747
+    mes[2] = pan
+    assert_equal pan, mes.pan
+    assert_equal pan, mes[2]
+    assert_equal pan, mes["Primary Account Number (PAN)"]
+    assert_equal "1110@\000\000\000\000\000\000\00012474747474747", mes.to_b
+
+    mes = BerlinMessage.new
+    mes.mti = 1420
+    pan = 474747474747
+    mes["Primary Account Number (PAN)"] = pan
+    assert_equal pan, mes.pan
+    assert_equal pan, mes[2]
+    assert_equal pan, mes["Primary Account Number (PAN)"]
+    assert_equal "1420@\000\000\000\000\000\000\00012474747474747", mes.to_b
+  end
+
+  def test_parse
+    pan = 474747474747
+
+    assert_raises(ISO8583Exception) {
+      mes = BerlinMessage.parse "@\000\000\000\000\000\000\00012474747474747"
+    }
+    mes = BerlinMessage.parse "1430@\000\000\000\000\000\000\00012474747474747"
+    assert_equal pan, mes.pan
+    assert_equal 1430, mes.mti
+  end
+
+  def test_to_s
+    mes     = BerlinMessage.new
+    mes.mti = "Network Management Request Response Issuer Gateway or Acquirer Gateway" 
+    mes[2]  = 12341234
+    mes[3]  = 1111
+    mes[4]  = 100
+    mes[6]  = 101
+    mes[7]  = "0808120000"
+    mes[10] = 100
+    mes[11] = 0
+    mes[12] = "740808120000"
+    mes[14] = "1010"
+    mes[22] = "POSDATACODE"
+    mes[23] = 0
+    mes[24] = 1
+    mes[25] = 90
+    mes[26] = 4444
+    mes[30] = 150
+    mes[32] = 321321
+    mes[35] = ";123123123=123?5"
+    mes[37] = "123 123"
+    mes[38] = "90"
+    mes[39] = 90
+    mes[41] = "TermLoc!"
+    mes[42] = "ID Code!"
+    mes[43] = "Card Acceptor Name Location"
+    mes[49] = "840"
+    mes[51] = 978
+    mes[52] = '\x00\x01\x02\x03'
+    mes[53] = '\x07\x06\x05\x04'
+    mes[54] = "No additional amount"
+    mes[55] = '\x07\x06\x05\x04'
+    mes[56] = 88888888888
+    mes[59] = "I'm you're private data, data for money..."
+    mes[64] = "\xF0\xF0\xF0\xF0"
+    
+    expected = <<-END
+MTI:1814 (Network Management Request Response Issuer Gateway or Acquirer Gateway)
+
+002                      Primary Account Number (PAN) : 12341234
+003                                   Processing Code : 1111
+004                              Amount (Transaction) : 100
+006                        Amount, Cardholder Billing : 101
+007                       Date and Time, Transmission : 0808120000
+010               Conversion Rate, Cardholder Billing : 100
+011                  System Trace Audit Number (STAN) : 0
+012                  Date and Time, Local Transaction : 740808120000
+014                                  Date, Expiration : 1010
+022                                     POS Data Code : POSDATACODE
+023                              Card Sequence Number : 0
+024                                     Function Code : 1
+025                               Message Reason Code : 90
+026                       Card Acceptor Business Code : 4444
+030                                 Amounts, Original : 150
+032         Acquiring Institution Identification Code : 321321
+035                                      Track 2 Data : ;123123123=123?5
+037                        Retrieval Reference Number : 123 123
+038                                     Approval Code : 90
+039                                       Action Code : 90
+041             Card Acceptor Terminal Identification : TermLoc!
+042                 Card Acceptor Identification Code : ID Code!
+043                       Card Acceptor Name/Location : Card Acceptor Name Location
+049                        Currency Code, Transaction : 840
+051                 Currency Code, Cardholder Billing : 978
+052         Personal Identification Number (PIN) Data : \\x00\\x01\\x02\\x03
+053              Security Related Control Information : \\x07\\x06\\x05\\x04
+054                               Amounts, Additional : No additional amount
+055 Integrated Circuit Card (ICC) System Related Data : \\x07\\x06\\x05\\x04
+056                            Original Data Elements : 88888888888
+059                         Additional Data - Private : I'm you're private data, data for money...
+064           Message Authentication Code (MAC) Field : \360\360\360\360
+END
+    assert_equal expected, mes.to_s
+  end
+
+  def test_round_trip
+    mes     = BerlinMessage.new
+    mes.mti = "Network Management Request Response Issuer Gateway or Acquirer Gateway" 
+    mes[2]  = 12341234
+    mes[3]  = 1111
+    mes[4]  = 100
+    mes[6]  = 101
+    mes[7]  = "0808120000"
+    mes[10] = 100
+    mes[11] = 0
+    mes[12] = "740808120000"
+    mes[14] = "1010"
+    mes[22] = "POSDATACODE"
+    mes[23] = 0
+    mes[24] = 1
+    mes[25] = 90
+    mes[26] = 4444
+    mes[30] = 150
+    mes[32] = 321321
+    mes[35] = ";123123123=123?5"
+    mes[37] = "123 123"
+    mes[38] = "90"
+    mes[39] = 90
+    mes[41] = "TermLoc!"
+    mes[42] = "ID Code!"
+    mes[43] = "Card Acceptor Name Location"
+    mes[49] = "840"
+    mes[51] = 978
+    mes[52] = "\x00\x01\x02\x03"
+    mes[53] = "\x07\x06\x05\x04"
+    mes[54] = "No additional amount"
+    mes[55] = '\x07\x06\x05\x04'
+    mes[56] = 88888888888
+    mes[59] = "I'm you're private data, data for money..."
+    mes[64] = "\xF0\xF0\xF0\xF0"
+
+    bytes = mes.to_b
+    mes2 = BerlinMessage.parse(mes.to_b)
+    assert_equal(mes.to_b, mes2.to_b)
+  end
+end

data/test/test_codec.rb

@@ -0,0 +1,124 @@
+require 'test/unit'
+require 'lib/iso8583'
+
+include ISO8583
+
+class FieldTest < Test::Unit::TestCase
+  def test_hhmmssCodec
+    dt = HhmmssCodec.decode "121212"
+    assert_equal DateTime, dt.class
+    assert_equal 12, dt.hour
+    assert_equal 12, dt.min
+    assert_equal 12, dt.sec
+    assert_equal DateTime, dt.class
+    
+    assert_raise(ISO8583Exception) {
+      dt = HhmmssCodec.decode "261212"
+    }
+    assert_raise(ISO8583Exception) {
+      dt = HhmmssCodec.encode "121261"
+    }
+    t = Time.new(2002, 10, 31, 2, 2, 2, "+02:00")
+    assert_equal "020202", HhmmssCodec.encode(t)
+
+  end
+  def test_MMDDhhmmssCodec
+    dt = MMDDhhmmssCodec.decode "1212121212"
+    assert_equal DateTime, dt.class
+    assert_equal 12, dt.month
+    assert_equal 12, dt.day
+    assert_equal 12, dt.hour
+    assert_equal 12, dt.min
+    assert_equal 12, dt.sec
+    assert_equal DateTime, dt.class
+
+    assert_raise(ISO8583Exception) {
+      dt = MMDDhhmmssCodec.decode "1312121212"
+    }
+    
+    assert_raise(ISO8583Exception) {
+      dt = MMDDhhmmssCodec.encode "1312121212"
+    }
+
+    assert_equal "1212121212", MMDDhhmmssCodec.encode("1212121212")
+  end
+
+  def test_YYMMDDhhmmssCodec
+    dt = YYMMDDhhmmssCodec.decode "081212121212"
+    assert_equal DateTime, dt.class
+    assert_equal 2008, dt.year
+    assert_equal 12, dt.month
+    assert_equal 12, dt.day
+    assert_equal 12, dt.hour
+    assert_equal 12, dt.min
+    assert_equal 12, dt.sec
+
+    assert_raise(ISO8583Exception) {
+      dt = YYMMDDhhmmssCodec.decode "091312121212"
+    }
+    
+    assert_raise(ISO8583Exception) {
+      dt = YYMMDDhhmmssCodec.encode "091312121212"
+    }
+
+    assert_equal "091212121212", YYMMDDhhmmssCodec.encode("091212121212")
+  end
+
+  def test_YYMMCodec
+    dt = YYMMCodec.decode "0812"
+    assert_equal DateTime, dt.class
+    assert_equal 2008, dt.year
+    assert_equal 12, dt.month
+
+    assert_raise(ISO8583Exception) {
+      dt = YYMMCodec.decode "0913"
+    }
+    
+    assert_raise(ISO8583Exception) {
+      dt = YYMMCodec.encode "0913"
+    }
+
+    assert_equal "0912", YYMMCodec.encode("0912")
+  end
+
+  def test_A_Codec
+    assert_raise(ISO8583Exception) {
+      dt = A_Codec.encode "!!!"
+    }
+    assert_equal "bla", AN_Codec.encode("bla")
+    assert_equal "bla", AN_Codec.decode("bla")
+  end
+
+  def test_AN_Codec
+    assert_raise(ISO8583Exception) {
+      dt = AN_Codec.encode "!!!"
+    }
+    assert_equal "bla", AN_Codec.encode("bla")
+    assert_equal "bla", AN_Codec.decode("bla")
+  end
+
+  def test_Track2_Codec
+    assert_raise(ISO8583Exception) {
+      dt = Track2.encode "!!!"
+    }
+    assert_raise(ISO8583Exception) {
+      dt = Track2.encode ";12312312=123?5"
+    }
+    assert_equal ";123123123=123?5", Track2.encode(";123123123=123?5")
+    assert_equal ";123123123=123?5", Track2.decode(";123123123=123?5")
+  end
+
+  def test_packed_codec
+    assert_equal "\x12", Packed_Number.encode(12)
+    assert_equal "\x12", Packed_Number.encode("12")
+    assert_equal "\x02", Packed_Number.encode("2")
+    assert_equal "\x02", Packed_Number.encode(2)
+    assert_equal "\x02\x55", Packed_Number.encode(0xff)
+    assert_raise(ISO8583Exception) {
+      dt = Packed_Number.encode ";12312312=123?5"
+    }
+    assert_raise(ISO8583Exception) {
+      dt = Packed_Number.encode "F"
+    }
+  end
+end

data/test/test_fields.rb

@@ -0,0 +1,246 @@
+require 'test/unit'
+require 'lib/iso8583'
+
+include ISO8583
+
+class FieldTest < Test::Unit::TestCase
+  def test_LLL
+    value, rest = LLL.parse "123456"
+    assert_equal 123, value
+    assert_equal "456", rest
+
+    assert_raise(ISO8583ParseException) {
+      l,rest = LLL.parse "12"
+    }
+
+    enc = LLL.encode 123
+    assert_equal "\x31\x32\x33", enc
+    
+    enc = LLL.encode "123"
+    assert_equal "\x31\x32\x33", enc
+    
+    enc = LLL.encode 12
+    assert_equal "\x30\x31\x32", enc
+    
+    #enc = LLL.encode "012"
+    #assert_equal "\x30\x31\x32", enc
+
+    
+    assert_raise(ISO8583Exception) {
+      enc = LLL.encode 1234
+    }
+    
+    assert_raise(ISO8583Exception) {
+      enc = LLL.encode "1234"
+    }
+  end
+
+  def test_LL_BCD
+    value, rest = LL_BCD.parse "\x123456"
+    assert_equal 12, value
+    assert_equal "3456", rest    
+  end
+
+  def test_LLVAR_AN
+    value, rest = LLVAR_AN.parse "03123ABC"
+    assert_equal "123", value
+    assert_equal "ABC", rest
+
+    value, rest = LLLVAR_AN.parse "006123ABC"
+    assert_equal "123ABC", value
+    assert_equal "", rest
+    assert_raise(ISO8583ParseException) {
+      l,rest = LLLVAR_AN.parse "12"
+    }
+    assert_raise(ISO8583ParseException) {
+      l,rest = LLVAR_AN.parse "12123"
+    }
+
+    enc = LLVAR_AN.encode "123A"
+    assert_equal "04123A", enc
+    
+    enc = LLVAR_AN.encode "123ABC123ABC"
+    assert_equal "12123ABC123ABC", enc
+    
+    assert_raise(ISO8583Exception) {
+      enc = LLVAR_AN.encode "1234 ABCD"
+    }
+    
+    enc = LLLVAR_AN.encode "123ABC123ABC"
+    assert_equal "012123ABC123ABC", enc
+    
+    assert_raise(ISO8583Exception) {
+      enc = LLLVAR_AN.encode "1234 ABCD"
+    }
+  end
+
+  def test_LLVAR_N
+    value, rest = LLVAR_N.parse "021234"
+    assert_equal 12, value
+    assert_equal "34", rest
+
+    value, rest = LLLVAR_N.parse "0041234"
+    assert_equal 1234, value
+    assert_equal "", rest
+    assert_raise(ISO8583ParseException) {
+      l,rest = LLLVAR_N.parse "12"
+    }
+    assert_raise(ISO8583ParseException) {
+      l,rest = LLVAR_N.parse "12123"
+    }
+
+    enc = LLVAR_N.encode 1234
+    assert_equal "041234", enc
+    
+    enc = LLVAR_N.encode 123412341234
+    assert_equal "12123412341234", enc
+    
+    assert_raise(ISO8583Exception) {
+      enc = LLVAR_N.encode "1234ABCD"
+    }
+    
+    enc = LLLVAR_N.encode "123412341234"
+    assert_equal "012123412341234", enc
+    
+    assert_raise(ISO8583Exception) {
+      enc = LLLVAR_N.encode "1234ABCD"
+    }
+  end
+
+  def test_LLVAR_Z
+    value, rest = LLVAR_Z.parse "16;123123123=123?5"+"021234"
+    assert_equal ";123123123=123?5", value
+    assert_equal "021234", rest
+
+    value, rest = LLVAR_Z.parse "16;123123123=123?5" 
+    assert_equal ";123123123=123?5", value
+    assert_equal "", rest
+    assert_raise(ISO8583ParseException) {
+      l,rest = LLVAR_Z.parse "12"
+    }
+    assert_raise(ISO8583ParseException) {
+      l,rest = LLVAR_Z.parse "17;123123123=123?5"
+    }
+
+    enc = LLVAR_Z.encode ";123123123=123?5"
+    assert_equal "16;123123123=123?5", enc
+    
+    
+    assert_raise(ISO8583Exception) {
+      enc = LLVAR_Z.encode "1234ABCD"
+    }
+  end
+
+  def test_A
+    fld = A.dup
+    fld.length = 3
+    value, rest = fld.parse "abcd"
+    assert_equal "abc", value
+    assert_equal "d", rest
+    
+    assert_raise(ISO8583ParseException) {
+      fld.parse "ab"
+    }
+
+    assert_raise(ISO8583Exception) {
+      fld.encode "abcdef"
+    }
+  end
+
+  def test_AN
+    fld = AN.dup
+    fld.length = 3
+    value, rest = fld.parse "1234"
+    assert_equal "123", value
+    assert_equal "4", rest
+    
+    assert_raise(ISO8583ParseException) {
+      fld.parse "12"
+    }
+
+    assert_raise(ISO8583Exception) {
+      fld.encode "888810"
+    }
+  end
+
+  def test_ANP
+    fld = ANP.dup
+    fld.length = 3
+    value, rest = fld.parse "1234"
+    assert_equal "123", value
+    assert_equal "4", rest
+    
+    assert_raise(ISO8583ParseException) {
+      fld.parse "12"
+    }
+
+    assert_equal "10 ", fld.encode("10")
+  end
+
+  def test_ANS
+    fld = ANS.dup
+    fld.length = 3
+    value, rest = fld.parse "1234"
+    assert_equal "123", value
+    assert_equal "4", rest
+    
+    assert_raise(ISO8583ParseException) {
+      fld.parse "12"
+    }
+
+    assert_equal "10 ", fld.encode("10")
+    assert_equal ["1!", "a"], fld.parse("1! a")
+  end
+
+  def test_B
+    fld = B.dup
+    fld.length = 3
+    value, rest = fld.parse "\000234"
+    assert_equal "\00023", value
+    assert_equal "4", rest
+    
+    assert_raise(ISO8583ParseException) {
+      fld.parse "12"
+    }
+
+    assert_equal "10\000", fld.encode("10")
+    assert_equal ["1! ", "a"], fld.parse("1! a")
+    assert_equal ["1!", ""], fld.parse("1!\000")
+  end
+
+  def test_N_BCD
+    fld = N_BCD.dup
+    fld.length=3
+    value, rest = fld.parse "\x01\x23\x45"
+    assert_equal 123, value
+
+    assert_equal "\x01\x23", fld.encode(123)
+    assert_equal "\x01\x23", fld.encode("123")
+    assert_equal "\x01\x23", fld.encode("0123")
+
+    assert_raise(ISO8583Exception) {
+      fld.encode 12345
+    }
+
+    # There's a bug here. A 4 digit value encodes to 2 digits encoded, 
+    # which passes the test for length ... This test doesn't pass:
+
+    #asssert_raise (ISO8583Exception) {
+    #  fld.encode 1234
+    #}
+  end
+
+  def test_YYMMDDhhmmss
+    fld = YYMMDDhhmmss
+    assert_equal "740808120000", fld.encode("740808120000")
+  end
+  def test_Hhmmss
+    fld = Hhmmss
+    assert_equal "123456", fld.encode("123456")
+    dt, rest = fld.parse("123456")
+    assert_equal 12, dt.hour
+    assert_equal 34, dt.min
+    assert_equal 56, dt.sec
+
+  end
+end

data/test/test_seperate_msg.rb

@@ -0,0 +1,22 @@
+require 'lib/iso8583'
+require 'lib/iso8583/berlin'
+require 'test/unit'
+
+include ISO8583
+
+class SeperateTest < Test::Unit::TestCase
+
+
+
+def test_test_separate_messages
+       mes1=BerlinMessage.new
+       mes1[2]="1234567890"
+       assert_equal(mes1[2], "1234567890")
+       mes2=BerlinMessage.new
+       mes2[2]="0987654321"
+       assert_equal(mes2[2], "0987654321")
+       # test that the original value of field 2 in mes1 hasn't changed
+       assert_equal(mes1[2], "1234567890") # this will fail, as the field 2 in mes1 has changed value too!!
+end
+
+end

data/test/test_util.rb

@@ -0,0 +1,32 @@
+require 'lib/iso8583'
+require 'test/unit'
+
+include ISO8583
+
+class UtilTest < Test::Unit::TestCase
+  def test_hex2b
+    assert_equal "\xab\xcd\x12", hex2b("abcd12")
+    assert_equal "\xab\xcd\x12", hex2b("a b c d 1 2")
+    assert_equal "\xab\xcd\x12", hex2b("ABCD12")
+    assert_raise(ISO8583Exception){
+      # non hex
+      hex2b("ABCDEFGH")
+    }
+    assert_raise(ISO8583Exception){
+      # odd num digits
+      hex2b("ABCDEF0")
+    }
+  end
+
+  def test_b2hex
+    assert_equal "abcd12", b2hex("\xab\xcd\x12")
+  end
+
+  def test_ebcdic2ascii
+    assert_equal "0123456789", ebcdic2ascii("\xf0\xf1\xf2\xf3\xf4\xf5\xf6\xf7\xf8\xf9")
+  end
+
+  def test_ascii2ebcdic
+    assert_equal "\xf0\xf1\xf2\xf3\xf4\xf5\xf6\xf7\xf8\xf9", ascii2ebcdic("0123456789")
+  end
+end

metadata

@@ -0,0 +1,66 @@
+--- !ruby/object:Gem::Specification
+name: npn47_iso8583
+version: !ruby/object:Gem::Version
+  version: 0.1.5.a
+platform: ruby
+authors:
+- Tim Becker
+- Slava Kravchenko
+- Neeraj PN
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2014-06-16 00:00:00.000000000 Z
+dependencies: []
+description: Ruby implementation of ISO 8583 financial messaging
+email:
+- tim.becker@kuriositaet.de
+- cordawyn@gmail.com
+- neerajpn47@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- lib/8583.rb
+- lib/iso8583.rb
+- lib/iso8583/berlin.rb
+- lib/iso8583/bitmap.rb
+- lib/iso8583/codec.rb
+- lib/iso8583/exception.rb
+- lib/iso8583/field.rb
+- lib/iso8583/fields.rb
+- lib/iso8583/message.rb
+- lib/iso8583/util.rb
+- lib/iso8583/version.rb
+- test/BitmapTests.rb
+- test/message_test.rb
+- test/test_codec.rb
+- test/test_fields.rb
+- test/test_seperate_msg.rb
+- test/test_util.rb
+homepage: http://github.com/neerajpn47/8583/
+licenses: []
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: 1.3.6
+requirements:
+- none
+rubyforge_project: iso8583
+rubygems_version: 2.2.2
+signing_key: 
+specification_version: 4
+summary: Ruby implementation of ISO 8583 financial messaging
+test_files: []
+has_rdoc: true