iso8583 0.1.1 → 0.1.3

data/test/test_seperate_msg.rb

@@ -0,0 +1,22 @@
+require 'lib/8583'
+require 'lib/8583/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

@@ -1,20 +1,25 @@
 --- !ruby/object:Gem::Specification 
 name: iso8583
 version: !ruby/object:Gem::Version 
-  version: 0.1.1
+  version: 0.1.3
 platform: ruby
 authors: 
 - Tim Becker
+- Slava Kravchenko
 autorequire: 
 bindir: bin
 cert_chain: []
 
-date: 2009-08-15 00:00:00 +02:00
+date: 2010-09-29 00:00:00 +02:00
 default_executable: 
 dependencies: []
 
-description: Ruby implementation of ISO 8583 financial messaging
-email: tim.becker@kuriositaet.de
+description: |
+  Ruby implementation of ISO 8583 financial messaging
+
+email: 
+- tim.becker@kuriositaet.de
+- cordawyn@gmail.com
 executables: []
 
 extensions: []
@@ -22,14 +27,16 @@ extensions: []
 extra_rdoc_files: []
 
 files: 
-- lib/berlin.rb
-- lib/bitmap.rb
-- lib/codec.rb
-- lib/exception.rb
-- lib/field.rb
-- lib/fields.rb
+- lib/8583/berlin.rb
+- lib/8583/bitmap.rb
+- lib/8583/codec.rb
+- lib/8583/exception.rb
+- lib/8583/field.rb
+- lib/8583/fields.rb
+- lib/8583/message.rb
+- lib/8583/util.rb
+- lib/8583.rb
 - lib/iso8583.rb
-- lib/message.rb
 - AUTHORS
 - CHANGELOG
 - LICENSE
@@ -40,8 +47,12 @@ files:
 - test/message_test.rb
 - test/test_codec.rb
 - test/test_fields.rb
+- test/test_seperate_msg.rb
+- test/test_util.rb
 has_rdoc: true
-homepage: http://iso8583.rubyforge.org/
+homepage: http://github.com/a2800276/8583/
+licenses: []
+
 post_install_message: 
 rdoc_options: []
 
@@ -62,9 +73,9 @@ required_rubygems_version: !ruby/object:Gem::Requirement
 requirements: 
 - none
 rubyforge_project: iso8583
-rubygems_version: 1.3.1
+rubygems_version: 1.3.5
 signing_key: 
-specification_version: 2
+specification_version: 3
 summary: "iso8583: Ruby implementation of ISO 8583 financial messaging"
 test_files: []
 

data/lib/berlin.rb

@@ -1,79 +0,0 @@
-# Copyright 2009 by Tim Becker (tim.becker@kuriostaet.de)
-# MIT License, for details, see the LICENSE file accompaning
-# this distribution
-
-require 'lib/iso8583'
-
-
-# Example of a protocol specification based on:
-# http://www.berlin-group.org/documents/BG_Authorisation_3.0.pdf
-# The Berlin Groups Authorisation Interface specification.
-# No gurantees are made that this is an accurate implemenation.
-# It currently serves as an example only.
-
-
-class BerlinMessage < Message
-  mti_format N, :length=>4
-  mti 1100, "Authorization Request Acquirer Gateway"
-  mti 1110, "Authorization Request Response Issuer Gateway"
-  mti 1420, "Reversal Advice Acquirer Gateway" 
-  mti 1421, "Reversal Advice Repeat Acquirer Gateway" 
-  mti 1430, "Reversal Advice Response Issuer Gateway" 
-  mti 1804, "Network Management Request Acquirer Gateway or Issuer Gateway"
-  mti 1814, "Network Management Request Response Issuer Gateway or Acquirer Gateway"
-
-  bmp  2, "Primary Account Number (PAN)",               LLVAR_N,   :max    => 19
-  bmp  3,  "Processing Code",                           N,         :length =>  6
-  bmp  4,  "Amount (Transaction)",                      N,         :length => 12
-  bmp  6,  "Amount, Cardholder Billing" ,               N,         :length => 12
-  bmp  7,  "Date and Time, Transmission"  ,             MMDDhhmmss
-  bmp 10, "Conversion Rate, Cardholder Billing",        N,         :length =>  8
-  bmp 11, "System Trace Audit Number (STAN)",           N,         :length =>  6
-  bmp 12, "Date and Time, Local Transaction",           YYMMDDhhmmss
-  bmp 14, "Date, Expiration",                           YYMM
-  bmp 22, "POS Data Code",                              AN,        :length => 12
-  bmp 23, "Card Sequence Number",                       N,         :length =>  3
-  bmp 24, "Function Code",                              N,         :length =>  3
-  bmp 25, "Message Reason Code",                        N,         :length =>  4
-  bmp 26, "Card Acceptor Business Code",                N,         :length =>  4
-  bmp 30, "Amounts, Original",                          N,         :length => 24
-  bmp 32, "Acquiring Institution Identification Code",  LLVAR_N,   :max    => 11
-  bmp 35, "Track 2 Data",                               LLVAR_Z,   :max    => 37
-  bmp 37, "Retrieval Reference Number",                 ANP,       :length => 12
-  bmp 38, "Approval Code",                              ANP,       :length =>  6
-  bmp 39, "Action Code",                                N,         :length =>  3
-  bmp 41, "Card Acceptor Terminal Identification",      ANS,       :length =>  8
-  bmp 42, "Card Acceptor Identification Code",          ANS,       :length => 15
-  bmp 43, "Card Acceptor Name/Location",                LLVAR_ANS, :max    => 56
-  bmp 49, "Currency Code, Transaction",                 N,         :length =>  3
-  bmp 51, "Currency Code, Cardholder Billing",          N,         :length =>  3
-  bmp 52, "Personal Identification Number (PIN) Data",  B,         :length =>  8
-  bmp 53, "Security Related Control Information",       LLVAR_B,   :max    => 48
-  bmp 54, "Amounts, Additional",                        LLLVAR_ANS,:max    => 40
-
-  bmp 55, "Integrated Circuit Card (ICC) System Related Data", LLLVAR_B,   :max    => 255
-  bmp 56, "Original Data Elements",                            LLVAR_N,    :max    =>  35
-  bmp 58, "Authorizing Agent Institution Identification Code", LLVAR_N,    :max    =>  11
-  bmp 59, "Additional Data - Private",                         LLLVAR_ANS, :max    =>  67
-  bmp 64, "Message Authentication Code (MAC) Field",           B,          :length =>   8
-  
-  bmp_alias  2, :pan
-  bmp_alias  3, :proc_code
-  bmp_alias  4, :amount
-  bmp_alias 12, :exp_date
-end
-
-if __FILE__==$0
-mes = BerlinMessage.new
-mes.mti = 1110
-mes[2] = 474747474747
-mes["Processing Code"] = "123456"
-
-pan = mes["Primary Account Number (PAN)"]
-#mes.pan = 47474747474747
-
-#puts mes.pan
-puts mes.to_b
-puts mes.to_s
-#mes2 = BerlinMessage.parse input
-end

data/lib/bitmap.rb

@@ -1,117 +0,0 @@
-# Copyright 2009 by Tim Becker (tim.becker@kuriostaet.de)
-# MIT License, for details, see the LICENSE file accompaning
-# this distribution
-
-# This class constructs an object for handling bitmaps
-# with which ISO8583 messages typically begin.
-# Bitmaps are either 8 or 16 bytes long, an extended length
-# bitmap is indicated by the first bit being set.
-# In all likelyhood, you won't be using this class much, it's used
-# transparently by the Message class. 
-class Bitmap
-
-	
-	# create a new Bitmap object. In case an iso message
-	# is passed in, that messages bitmap will be parsed. If
-	# not, this initializes and empty bitmap.
-
-	def initialize message=nil
-		@bmp = Array.new(128,false)
-		if !message
-
-		else
-			initialize_from_message message
-		end
-	end
-	
-	# yield once with the number of each set field.
-	def each #:yields: each bit set in the bitmap.
-		@bmp.each_with_index {|set,i| yield i+i if set}
-	end
-	
-	# Returns whether the bit is set or not.
-	def [] i
-		@bmp[i-1]
-	end
-
-	# Set the bit to the indicated value. Only `true` sets the
-	# bit, any other value unsets it.
-	def []= i,value
-		if i > 128 
-			raise ISO8583Exception.new("Bits > 128  are not permitted.")
-		elsif i < 2
-			raise ISO8583Exception.new("Bits < 2 are not permitted (continutation bit is set automatically)")
-		end
-		@bmp[i-1]=(value==true)
-	end
-
-	# Sets bit #i
-	def set i
-		self[i]=true
-	end
-	
-	# Unsets bit #i
-	def unset i
-		self[i]=false
-	end
-
-	# Generate the bytes representing this bitmap.
-	def to_bytes
-		arr=[self.to_s]
-		# tricky and ugly, setting bit[1] only when generating to_s...
-		count = self[1] ? 128 : 64
-		arr.pack("B#{count}")
-	end
-  alias_method :to_b, :to_bytes
-
-	# Generate a String representation of this bitmap in the form:
-	#	01001100110000011010110110010100100110011000001101011011001010
-	def to_s
-		#check whether any `high` bits are set
-		@bmp[0]=false
-		65.upto(128) { |i| 
-			if self[i]
-		# if so, set continuation bit
-				@bmp[0]=true
-				break
-			end
-		}
-		str = ""
-		1.upto(self[1] ? 128 : 64) {|i|
-			str << (self[i] ? "1" : "0")
-		}
-		str		
-	end
-
-private
-	def initialize_from_message message
-		bmp = message.unpack("B64")[0]
-		if bmp[0,1] == "1"
-			bmp = message.unpack("B128")[0]
-		end
-		
-		0.upto(bmp.length-1) do |i|
-			@bmp[i] = bmp[i,1]=="1"
-		end
-
-	
-	end
-  
-  class << self
-    # Parse the bytes in string and return the Bitmap and bytes remaining in `str`
-    # after the bitmap is taken away.
-    def parse str
-      bmp  = Bitmap.new(str)
-      rest = bmp[1] ? str[16,str.length] : str[8,str.length]
-      return [bmp,rest]
-    end
-  end
-	
-end
-
-if __FILE__==$0
-
-	mp = ISO8583::Bitmap.new 
-	20.step(128,7) {|i| mp.set(i)}
-	print mp.to_bytes
-end

data/lib/codec.rb

@@ -1,173 +0,0 @@
-# Copyright 2009 by Tim Becker (tim.becker@kuriostaet.de)
-# MIT License, for details, see the LICENSE file accompaning
-# this distribution
-
-require 'date'
-
-# Codec provides functionality to encode and decode values, codecs are
-# used internally by Field instances in order to do character conversions
-# and checking for proper values.
-# Although they are used internally, you will probably need to write
-# your own Codec sooner or later. The codecs used by Field instances are
-# typically instances of Codec, it may or may not be usefull to subclass
-# Codec.
-# 
-# Say, for example, a text field needs to be encoded in EBCDIC in the
-# message, this is how a corresponding codec would be constructed:
-#
-#    EBCDIC_Codec = Codec.new
-#    EBCDIC_Codec.encoder = lambda {|ascii_str|
-#       raise ISO8583Exception.new("String (#{ascii_str})not valid!") unless =~ /someregexp/
-#       ascii2ebcdic ascii_str  # implementing ascii_str is left as an excercise
-#    }
-#    EBCDIC_Codec.decode = lambda {|ebcdic_str|
-#       # you may or may not want to raise exceptions at this point ....
-#       # strip removes any padding...
-#       ebcdic2ascii(ebcdic_str).strip
-#    }
-#
-# This instance of Codec would then be used be the corresponding Field
-# encoder/decoder, which may look similar to this:
-#
-#    EBCDIC         = Field.new
-#    EBCDIC.codec   = EBCDIC_Codec
-#    EBCDIC.padding = PADDING_LEFT_JUSTIFIED_SPACES
-#
-# Notice there is a bit of inconsistancy: the padding is added by the
-# field, but removed by the codec. I would like to find a better
-# solution to this...
-#
-# See also: Field, link:files/lib/fields_rb.html
-#
-# The following codecs are already implemented:
-# [+ASCII_Number+]      encodes either a Number or String representation of 
-#                       a number to the ASCII represenation of the number, 
-#                       decodes ASCII  numerals to a number
-# [+AN_Codec+]          passes through ASCII string checking they conform to [A-Za-z0-9]
-#                       during encoding, no validity check during decoding. 
-# [+ANP_Codec+]         passes through ASCII string checking they conform to [A-Za-z0-9 ] 
-#                       during encoding, no validity check during decoding. 
-# [+ANS_Codec+]         passes through ASCII string checking they conform to [\x20-\x7E]
-#                       during encoding, no validity check during decoding.
-# [+Null_Codec+]        passes anything along untouched.
-# [<tt>Track2</tt>]     rudimentary check that string conforms to Track2
-# [+MMDDhhmmssCodec+]   encodes Time, Datetime or String to the described date format, checking 
-#                       that it is a valid date. Decodes to a DateTime instance, decoding and 
-#                       encoding perform validity checks!
-# [+YYMMDDhhmmssCodec+] encodes Time, Datetime or String to the described date format, checking 
-#                       that it is a valid date. Decodes to a DateTime instance, decoding and 
-#                       encoding perform validity checks!
-# [+YYMMCodec+]         encodes Time, Datetime or String to the described date format (exp date), 
-#                       checking that it is a valid date. Decodes to a DateTime instance, decoding
-#                       and encoding perform validity checks!
-#    
-class Codec
-  attr_accessor :encoder
-  attr_accessor :decoder
-
-  def decode raw
-    return decoder.call(raw)
-  end
-
-  # length is either a fixnum or a lenth encoder.
-  def encode value
-    return encoder.call(value)
-  end
-end
-
-# ASCII_Number
-ASCII_Number = Codec.new
-ASCII_Number.encoder= lambda{|num|
-  enc = num.to_s
-  raise ISO8583Exception.new("Invalid value: #{enc} must be numeric!") unless enc =~ /^[0-9]*$/
-  enc
-}
-
-ASCII_Number.decoder= lambda{|raw|
-  raw.to_i
-}
-
-PASS_THROUGH_DECODER = lambda{|str|
-  str.strip # remove padding
-}
-
-AN_Codec = Codec.new
-AN_Codec.encoder = lambda{|str|
-  raise ISO8583Exception.new("Invalid value: #{str} must be [A-Za-y0-9]") unless str =~ /^[A-Za-z0-9]*$/
-  str
-}
-AN_Codec.decoder = PASS_THROUGH_DECODER
-
-ANP_Codec = Codec.new
-ANP_Codec.encoder = lambda{|str|
-  raise ISO8583Exception.new("Invalid value: #{str} must be [A-Za-y0-9 ]") unless str =~ /^[A-Za-z0-9 ]*$/
-  str
-}
-ANP_Codec.decoder = PASS_THROUGH_DECODER
-
-ANS_Codec = Codec.new
-ANS_Codec.encoder = lambda{|str|
-  raise ISO8583Exception.new("Invalid value: #{str} must be [\x20-\x7E]") unless str =~ /^[\x20-\x7E]*$/
-  str
-}
-ANS_Codec.decoder = PASS_THROUGH_DECODER
-
-Null_Codec = Codec.new
-Null_Codec.encoder = lambda {|str|
-  str
-}
-Null_Codec.decoder = lambda {|str|
-  str.gsub(/\000*$/,'')
-} 
-
-Track2 = Codec.new
-Track2.encoder = lambda{|track2|
-   #SS | PAN | FS | Expiration Date | Service Code | Discretionary Data | ES | LRC
-   # SS = ;
-   # PAN = up to 19 digits (at least 9?)
-   # FS = '='
-   # Exp Date = YYMM
-   # SC: 3 digits or =
-   # ES = ?
-   # lrc : 1byte
-   raise ISO8583Exception.new("Invalid Track2 data: #{track2}") unless track2 =~ /^;*(\d{9,19})=(.*)\?.$/
-   track2
-}
-Track2.decoder = PASS_THROUGH_DECODER
-
-def _date_codec(fmt) 
-  c = Codec.new
-  c.encoder =  lambda {|date|
-    enc = case date
-        when Time
-        when DateTime
-          date.strftime(fmt)
-        when String
-          begin
-            dt = DateTime.strptime date, fmt 
-            dt.strftime(fmt)
-          rescue
-            raise ISO8583Exception.new("Invalid format encoding: #{date}, must be #{fmt}.")
-          end
-        else  
-          raise ISO8583Exception.new("Don't know how to encode: #{date.class} to a time.")
-        end
-    return enc
-  }
-  c.decoder = lambda {|str|
-    dt =  begin
-            DateTime.strptime str, fmt
-          rescue
-            raise ISO8583Exception.new("Invalid format decoding: #{str}, must be MMDDhhmmss.")
-          end
-    return dt
-  }
-
-  return c
-end
-
-MMDDhhmmssCodec   = _date_codec("%m%d%H%M%S") 
-YYMMDDhhmmssCodec = _date_codec("%y%m%d%H%M%S")
-YYMMCodec = _date_codec("%y%m")
-
-