iso8583-mkb 0.0.1

data/.gitignore

@@ -0,0 +1,18 @@
+*.gem
+*.rbc
+.bundle
+.config
+.yardoc
+Gemfile.lock
+InstalledFiles
+_yardoc
+coverage
+doc/
+lib/bundler/man
+pkg
+rdoc
+spec/reports
+test/tmp
+test/version_tmp
+tmp
+.*.kate-swp

data/Gemfile

@@ -0,0 +1,4 @@
+source 'https://rubygems.org'
+
+# Specify your gem's dependencies in iso8583-mkb.gemspec
+gemspec

data/LICENSE

@@ -0,0 +1,22 @@
+Copyright (c) 2013 Sergey Gridassov
+
+MIT License
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.md

@@ -0,0 +1,29 @@
+# Iso8583::Mkb
+
+TODO: Write a gem description
+
+## Installation
+
+Add this line to your application's Gemfile:
+
+    gem 'iso8583-mkb'
+
+And then execute:
+
+    $ bundle
+
+Or install it yourself as:
+
+    $ gem install iso8583-mkb
+
+## Usage
+
+TODO: Write usage instructions here
+
+## Contributing
+
+1. Fork it
+2. Create your feature branch (`git checkout -b my-new-feature`)
+3. Commit your changes (`git commit -am 'Added some feature'`)
+4. Push to the branch (`git push origin my-new-feature`)
+5. Create new Pull Request

data/Rakefile

@@ -0,0 +1,2 @@
+#!/usr/bin/env rake
+require "bundler/gem_tasks"

data/iso8583-mkb.gemspec

@@ -0,0 +1,20 @@
+# -*- encoding: utf-8 -*-
+require File.expand_path('../lib/iso8583-mkb/version', __FILE__)
+
+Gem::Specification.new do |gem|
+  gem.authors       = ["Sergey Gridasov"]
+  gem.email         = ["grindars@gmail.com"]
+  gem.description   = %q{ISO8583 implementation for Credit Bank of Moscow}
+  gem.summary       = %q{ISO8583 implementation for MKB}
+  gem.homepage      = "https://github.com/smartkiosk/iso8583-mkb"
+
+  gem.files         = `git ls-files`.split($\)
+  gem.executables   = gem.files.grep(%r{^bin/}).map{ |f| File.basename(f) }
+  gem.test_files    = gem.files.grep(%r{^(test|spec|features)/})
+  gem.name          = "iso8583-mkb"
+  gem.require_paths = ["lib"]
+  gem.version       = ISO8583::MKB::VERSION
+
+  gem.add_dependency 'iso8583'
+  gem.add_dependency 'eventmachine'
+end

data/lib/iso8583-mkb/authorization.rb

@@ -0,0 +1,63 @@
+module ISO8583::MKB
+  class Authorization < Request
+    MTI = "Authorization Request"
+    REPEAT_MTI = "Authorization Repeat"
+
+    MANDATORY = {
+      "pan"              => "Primary Account Number (PAN)",
+      "processing_code"  => "Processing Code",
+      "amount"           => "Amount, Transaction",
+      "expiry"           => "Date, Expiration",
+      "merchant_type"    => "Merchant's Type",
+      "acquirer_country" => "Acquiring Country Code",
+      "entry_mode"       => "Point of Service Entry Mode Code",
+      "condition_code"   => "Point of Service Condition Code",
+      "acquirer"         => "Acquiring Institution ID code",
+      "track2"           => "Track 2 data",
+      "currency"         => "Currency Code, Transaction",
+    }
+
+    OPTIONAL = {
+      "conversion_date"     => "Date, Conversion",
+
+      "billing_amount"      => "Amount, Cardholder Billing",
+      "billing_convrate"    => "Conversion, Cardholder Billing",
+      "billing_currency"    => "Currency Code, Cardholder Billing",
+
+      "terminal_id"      => "Card Acceptor Terminal ID",
+      "acceptor_id"      => "Card Acceptor ID Code",
+      "acceptor_name"    => "Card Acceptor Name/Location",
+
+      "additional" => "Additional Information"
+    }
+
+    RESPONSE = {
+      "Authorization Identification Response" => "auth_id",
+      "Additional Response Data" => "additional_resp"
+    }
+
+    build_class
+
+    def reverse
+      reversal = Reversal.new
+
+      [
+        :pan, :processing_code, :amount, :expiry, :merchant_type,
+        :acquirer_country, :entry_mode, :condition_code, :acquirer,
+        :currency
+      ].each do |key|
+        reversal.send :"#{key}=", instance_variable_get(:"@#{key}")
+      end
+
+      reversal.auth_id = @auth_id
+      reversal.response_code = @status
+      reversal.original_data = sprintf("%04d%06d%10s%011d%011d",
+                                       @request.request.mti,
+                                       @transaction.trace,
+                                       @request.request["Transmission Date and Time"].strftime("%m%d%H%M%S"),
+                                       @acquirer, @acquirer).to_i
+
+      reversal
+    end
+  end
+end

data/lib/iso8583-mkb/errors.rb

@@ -0,0 +1,108 @@
+module ISO8583::MKB
+  module Errors
+    ERRORS = {
+      "00" => "Approved",
+      "01" => "Refer to issuer",
+      "02" => "Refer to issuer (special)",
+      "03" => "Invalid merchant",
+      "04" => "Pick up card",
+      "05" => "Do not honor",
+      "06" => "Error",
+      "07" => "Pick up card (special)",
+      "08" => "Honor with identification",
+      "09" => "Request in progress",
+      "10" => "Approved for partial amount",
+      "11" => "VIP Approval",
+      "12" => "Invalid transaction",
+      "13" => "Invalid amount",
+      "14" => "Card number does not exist",
+      "15" => "No such issuer",
+      "16" => "Approved, update track 3",
+      "17" => "Customer cancellation",
+      "18" => "Customer dispute",
+      "19" => "Re-enter transaction",
+      "20" => "Invalid response",
+      "21" => "No action taken (no match)",
+      "22" => "Suspected malfunction",
+      "23" => "Unacceptable transaction fee",
+      "24" => "File update not supported by receiver",
+      "25" => "Unable to locate record",
+      "26" => "Duplicate file update record",
+      "27" => "File update field edit error",
+      "28" => "File temporarily unavailable",
+      "29" => "File update not successful",
+      "30" => "Format error",
+      "31" => "Issuer sign-off",
+      "32" => "Completed partially",
+      "33" => "Expired card",
+      "34" => "Suspected fraud",
+      "35" => "Card acceptor contact acquirer",
+      "36" => "Restricted card",
+      "37" => "Card acceptor call acquirer",
+      "38" => "Allowable PIN tries exceeded",
+      "39" => "No credit account",
+      "40" => "Function not supported",
+      "41" => "Pick up card (lost card)",
+      "42" => "No universal account",
+      "43" => "Pick up card (stolen card)",
+      "44" => "No investment account",
+      "51" => "Not sufficient funds",
+      "52" => "No checking account",
+      "53" => "No savings account",
+      "54" => "Expired card",
+      "55" => "Incorrect PIN",
+      "56" => "No card record",
+      "57" => "Transaction not permitted to card",
+      "58" => "Transaction not permitted to card",
+      "59" => "Suspected fraud",
+      "60" => "Card acceptor contact acquirer",
+      "61" => "Exceeds withdrawal limit",
+      "62" => "Restricted card",
+      "63" => "Security violation",
+      "64" => "Original amount incorrect",
+      "65" => "Activity count exceeded",
+      "66" => "Card acceptor call acquirer",
+      "67" => "Card pick up at ATM",
+      "68" => "Response received too late",
+      "75" => "Too many wrong PIN tries",
+      "76" => "Previous message not found",
+      "77" => "Data does not match original message",
+      "80" => "Invalid date",
+      "81" => "Cryptographic error in PIN",
+      "82" => "Incorrect CVV",
+      "83" => "Unable to verify PIN",
+      "84" => "Invalid authorization life cycle",
+      "85" => "No reason to decline",
+      "86" => "PIN validation not possible",
+      "88" => "Cryptographic failure",
+      "89" => "Authentication failure",
+      "90" => "Cutoff is in process",
+      "91" => "Issuer or switch inoperative",
+      "92" => "No routing path",
+      "93" => "Violation of law",
+      "94" => "Duplicate transmission",
+      "95" => "Reconcile error",
+      "96" => "System malfunction",
+      "XA" => "Forward to issuer",
+      "XD" => "Forward to issuer",
+
+      # ISO8583::MKB-generated errors
+      "C0" => "Request timed out",
+    }
+
+    def self.success?(status)
+      # TODO: FIXME
+
+      status == "00"
+    end
+
+    def self.error(status)
+      if ERRORS.include? status
+        ERRORS[status]
+      else
+        "(unknown error #{status})"
+      end
+    end
+
+  end
+end

data/lib/iso8583-mkb/gateway.rb

@@ -0,0 +1,84 @@
+module ISO8583::MKB
+  class Gateway
+    def initialize(config)
+      uri = URI(config[:dhi])
+
+      raise "expected tcp scheme for DHI" if uri.scheme != "tcp"
+      @dhi_host = uri.host
+      @dhi_port = uri.port
+      @dhi_open = false
+      @reopen_timer = nil
+
+      @deferred = []
+      Logging.logger.info "Gateway started"
+    end
+
+    def run
+      EventMachine.run do
+        reopen_dhi
+      end
+    end
+
+    def stop
+      if !@reopen_timer.nil?
+        EventMachine.cancel_timer @reopen_timer
+        @reopen_timer = nil
+      end
+
+      if !@dhi.nil?
+        @dhi_open = false
+        @dhi.closed = ->() {}
+
+        @dhi.close_connection
+        @dhi = nil
+      end
+
+      @deferred.clear
+    end
+
+    def new_transaction
+      ISO8583Transaction.new self
+    end
+
+    def post_request(request)
+
+      if @dhi_open ||
+         ((request.request.mti == 800 || request.request.mti == 810) && !@dhi.nil?)
+        @dhi.request request
+      else
+        @deferred << request
+      end
+    end
+
+    private
+
+    def dhi_open
+      @dhi_open = true
+
+      @deferred.each do |request|
+        @dhi.request request
+      end
+
+      @deferred.clear
+    end
+
+    def dhi_closed
+      @dhi_open = false
+      @dhi = nil
+
+      @reopen_timer = EventMachine.add_timer 15, method(:reopen_dhi)
+    end
+
+    def reopen_dhi
+      @reopen_timer = nil
+
+      Logging.logger.debug "Opening connection to DHI"
+
+      @dhi = EventMachine.connect @dhi_host, @dhi_port, ISO8583Connection, self
+      @dhi.open = method :dhi_open
+      @dhi.closed = method :dhi_closed
+      @dhi.sign_in
+    end
+
+  end
+end

data/lib/iso8583-mkb/iso8583_connection.rb

@@ -0,0 +1,225 @@
+module ISO8583::MKB
+  class ISO8583Connection < EventMachine::Connection
+    attr_reader :gateway
+    attr_accessor :open, :closed
+
+    def initialize(gateway)
+      super
+
+      @gateway = gateway
+      @in_air = {}
+      @buffer = ""
+      @state = :connecting
+      @post_sign_on = []
+      @ping_timer = nil
+      @open = nil
+      @closed = nil
+    end
+
+    def post_init
+      Logging.logger.debug "Connected to DHI"
+    end
+
+    def sign_in
+
+      transaction = @gateway.new_transaction
+      request = transaction.request do |m|
+        m.mti = "Network Management Request"
+        m["Network Management Information Code"] = 1
+      end
+
+      @state = :ready
+
+      request.start(30) do |response|
+
+        transaction.complete
+
+        if response.nil?
+          Logging.logger.error "No response to Sign On"
+
+          close_connection_after_writing
+        else
+          if Errors.success? response.response_code
+
+            @state = :ready
+
+            @post_sign_on.each do |request|
+              self.request request
+            end
+
+            @post_sign_on.clear
+
+            send_ping
+
+            @open.call
+          else
+            Logging.logger.error "Sign On failed: #{Errors.error response.response_code}"
+
+            close_connection_after_writing
+          end
+        end
+      end
+
+      @state = :connecting
+    end
+
+    def receive_data(data)
+      @buffer << data
+
+      until @buffer.empty?
+        marker = @buffer.index "\xFF"
+
+        if marker.nil?
+          @buffer.clear
+          break
+        end
+
+        if marker != 0
+          @buffer.slice! 0, marker
+        end
+
+        break if @buffer.length < 6
+
+        data_length = @buffer[1..5].to_i
+
+        break if @buffer.length < 6 + data_length
+
+        @buffer.slice! 0, 6
+        msg = @buffer.slice! 0, data_length
+        begin
+          receive_message MKBMessage.parse(msg)
+        rescue => e
+          Logging.logger.error "receive_message failed: #{e}"
+          e.backtrace.each { |line| Logging.logger.error line }
+        end
+      end
+    end
+
+    def unbind
+      Logging.logger.debug "Disconnected from DHI"
+
+      @state = :disconnecting
+
+      @closed.call
+
+      EventMachine.cancel_timer @ping_timer unless @ping_timer.nil?
+
+      @in_air.each do |key, (request, timer)|
+        Logging.logger.debug "Request #{request.request.reference} dropped"
+
+        EventMachine.cancel_timer timer unless timer.nil?
+        request.complete nil
+      end
+
+      @post_sign_on.each do |request|
+        @gateway.post_request request
+      end
+
+      @in_air.clear
+      @post_sign_on.clear
+    end
+
+    def request(request)
+      if @state == :connecting
+        @post_sign_on << request
+      else
+
+        id = request.request.reference.to_i
+
+        Logging.logger.debug "Request #{id}: started"
+
+        raise "duplicate request #{id}" if @in_air.include? id
+
+        if request.timeout.nil?
+          timer = nil
+        else
+          timer = EventMachine.add_timer(request.timeout) do
+            @in_air[id][1] = nil
+            forget_request id
+            request.complete nil
+          end
+        end
+
+        @in_air[id] = [ request, timer ]
+
+        send_message request.request
+      end
+    end
+
+    private
+
+    def send_ping
+      Logging.logger.debug "Ping"
+
+      @ping_timer = nil
+
+      transaction = @gateway.new_transaction
+      request = transaction.request do |m|
+        m.mti = "Network Management Request"
+        m["Network Management Information Code"] = 301
+      end
+
+      request.start(60) do |resp|
+        transaction.complete
+
+        if resp.nil?
+          Logging.logger.error "Ping timeout"
+
+          close_connection_after_writing
+        elsif !Errors.success?(resp.response_code)
+          Logging.logger.error "Ping failed: #{Errors.error resp.response_code}"
+
+          close_connection_after_writing
+        else
+          Logging.logger.debug "Pong"
+
+          @ping_timer = EventMachine.add_timer(60, method(:send_ping))
+        end
+      end
+    end
+
+    def forget_request(id)
+      Logging.logger.debug "Request #{id}: completed"
+
+      request, timer = @in_air[id]
+      EventMachine.cancel_timer timer unless timer.nil?
+
+      @in_air.delete id
+    end
+
+    def send_message(message)
+      Logging.message message
+
+      msg = message.to_b
+      msg.prepend sprintf("\xFF%05u", msg.length)
+
+      send_data msg
+    end
+
+    def receive_message(message)
+      Logging.message message
+
+      type = (message.mti / 10) % 10
+      case type
+      when 0, 2, 4
+        Logging.logger.warn "cannot handle type #{type} yet"
+
+      when 1, 3
+        id = message.reference.to_i
+
+        if !@in_air.include?(id)
+          Logging.logger.warn "message #{id} not in air - already timed out?"
+        else
+          request, = @in_air[id]
+
+          forget_request id
+
+          request.complete message
+        end
+
+      else
+        Logging.logger.warn "unknown type in MTI: #{type}"
+      end
+    end
+  end
+end

data/lib/iso8583-mkb/iso8583_patches.rb

@@ -0,0 +1,39 @@
+module ISO8583
+  MMDDCodec      = _date_codec("%m%d")
+  FhhmmssCodec   = _date_codec("%H%M%S")
+
+  MMDD           = Field.new
+  MMDD.codec     = MMDDCodec
+  MMDD.length    = 4
+
+  Fhhmmss        = Field.new
+  Fhhmmss.codec  = FhhmmssCodec
+  Fhhmmss.length = 6
+
+  F63Length = Field.new
+  F63Length.name = "F63"
+  F63Length.length = 6
+  F63Length.codec = ASCII_Number
+  F63Length.padding = ->(value) do
+    sprintf("\x20\x00\x00%03d", value)
+  end
+
+  F63 = Field.new
+  F63.length = F63Length
+  F63.codec = ASCII_Number
+
+  class Message
+    def self.parse(str)
+      message = self.new
+      message.mti, rest = _mti_format.parse(str)
+      bmp,rest = Bitmap.parse(rest)
+      bmp.each {|bit|
+               next if bit < 2
+               bmp_def = _definitions[bit]
+               value, rest = bmp_def.field.parse(rest)
+               message[bit] = value
+      }
+      message
+    end
+  end
+end

data/lib/iso8583-mkb/iso8583_request.rb

@@ -0,0 +1,26 @@
+module ISO8583::MKB
+  class ISO8583Request
+    attr_reader :transaction, :request, :timeout
+
+    def initialize(transaction, request)
+      @transaction = transaction
+      @request = request
+      @timeout = nil
+      @completion = nil
+    end
+
+    def start(timeout = nil, &completion)
+      @completion = completion
+      @timeout = timeout
+
+      @transaction.gateway.post_request self
+    end
+
+    def complete(result)
+      block = @completion
+      @completion = nil
+
+      block.call result
+    end
+  end
+end

data/lib/iso8583-mkb/iso8583_transaction.rb

@@ -0,0 +1,43 @@
+module ISO8583::MKB
+  class ISO8583Transaction
+    attr_reader :id, :trace, :gateway
+
+    @@trace_counter = 0
+
+    def initialize(gateway)
+      @gateway = gateway
+
+      now = Time.now
+      @id = (now.year % 100) * 1_00_0000_0000 +
+            (now.mday)       *    1_0000_0000 +
+            now.hour         *       3600_000 +
+            now.min          *         60_000 +
+            now.sec          *          1_000 +
+            now.usec         /          1_000
+
+      @trace = @@trace_counter += 1
+      @started_at = now
+
+      Logging.logger.debug "Transaction #{id} started"
+    end
+
+    def request(&block)
+      message = MKBMessage.new
+      message["Transmission Date and Time"] = Time.now.utc
+      message["Systems Trace Audit Number"] = @trace
+      message["Time, Local Transaction"] = @started_at
+      message["Date, Local Transaction"] = @started_at
+      message.reference = @id.to_s
+
+      yield message
+
+      ISO8583Request.new self, message
+    end
+
+    def complete
+      # TODO: track transactions
+
+      Logging.logger.debug "Transaction #{@id} completed"
+    end
+  end
+end

data/lib/iso8583-mkb/logging.rb

@@ -0,0 +1,29 @@
+module ISO8583::MKB
+  module Logging
+    class << self
+      def started?
+        !@logger.nil?
+      end
+
+      def start(logfile = nil)
+        logfile = STDERR if logfile.nil?
+
+        if logfile.kind_of?(Logger)
+          @logger = logfile
+        else
+          @logger = Logger.new logfile, :daily
+        end
+      end
+
+      def stop
+        @logger = nil
+      end
+
+      def message(message)
+        message.to_s.split("\n").each(&@logger.method(:debug))
+      end
+
+      attr_reader :logger
+    end
+  end
+end

data/lib/iso8583-mkb/mkb_message.rb

@@ -0,0 +1,100 @@
+module ISO8583::MKB
+  class MKBMessage < ISO8583::Message
+    include ISO8583
+
+    mti_format N, length: 4
+
+    mti 100, "Authorization Request"
+    mti 101, "Authorization Repeat"
+    mti 102, "ATM Confirmation"
+    mti 110, "Authorization Response"
+    mti 120, "Advice Authorization Request"
+    mti 121, "Advice Repeat"
+    mti 130, "Authorization Advice Response"
+    mti 200, "Financial Transaction Request"  # to host only
+    mti 210, "Financial Transaction Response" # from host only
+    mti 220, "Financial Transaction Advice"   # to host only
+    mti 230, "Financial Transaction Response" # from host only
+    mti 302, "Interface Exception Request"
+    mti 312, "Host Exception Response"
+    mti 322, "Host Exception Advice Request"
+    mti 332, "Interface Exception Advice Response"
+    mti 400, "Reversal Request"
+    mti 401, "Reversal Repeat"
+    mti 410, "Reversal Response"
+    mti 420, "Reversal Advice" # to host only
+    mti 430, "Reversal Advice" # from host only
+    mti 522, "Issuer Reconciliation Advice" # to host only (for future use)
+    mti 532, "Issuer Reconciliation Advice" # from host only
+    mti 800, "Network Management Request"
+    mti 810, "Network Management Response"
+
+    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  5,  "Amount, Settlement",                    N,          length: 12
+    bmp  6,  "Amount, Cardholder Billing",            N,          length: 12
+    bmp  7,  "Transmission Date and Time",            MMDDhhmmss
+    bmp  9,  "Conversion Rate, Settlement",           N,          length: 8
+    bmp  10, "Conversion, Cardholder Billing",        N,          length: 8
+    bmp  11, "Systems Trace Audit Number",            N,          length: 6
+    bmp  12, "Time, Local Transaction",               Fhhmmss
+    bmp  13, "Date, Local Transaction",               MMDD
+    bmp  14, "Date, Expiration",                      YYMM
+    bmp  15, "Date, Settlement",                      MMDD
+    bmp  16, "Date, Conversion",                      MMDD
+    bmp  18, "Merchant's Type",                       N,          length: 4
+    bmp  19, "Acquiring Country Code",                N,          length: 3
+    bmp  22, "Point of Service Entry Mode Code",      N,          length: 4
+    bmp  24, "Network International Identifier",      AN,         length: 3
+    bmp  25, "Point of Service Condition Code",       N,          length: 2
+    bmp  28, "Amount, Fee",                           N,          length: 9
+    bmp  32, "Acquiring Institution ID code",         LLVAR_N,    max: 11
+    bmp  33, "Forwarding Institution ID code",        LLVAR_N,    max: 11
+    bmp  35, "Track 2 data",                          LLVAR_B,    max: 37
+    bmp  37, "Retrieval Reference Number",            AN,         length: 12
+    bmp  38, "Authorization Identification Response", ANP,        length: 6
+    bmp  39, "Response Code",                         AN,         length: 2
+    bmp  41, "Card Acceptor Terminal ID",             ANS,        length: 8
+    bmp  42, "Card Acceptor ID Code",                 ANS,        length: 15
+    bmp  43, "Card Acceptor Name/Location",           ANS,        length: 40
+    bmp  44, "Additional Response Data",              LLVAR_ANS,  max: 25
+    bmp  45, "Track 1 data",                          LLVAR_ANS,  max: 80
+    bmp  48, "Additional Data-Private",               LLVAR_ANS,  max: 99
+    bmp  49, "Currency Code, Transaction",            N,          length: 3
+    bmp  50, "Currency Code, Settlement",             N,          length: 3
+    bmp  51, "Currency Code, Cardholder Billing",     N,          length: 3
+    bmp  52, "Personal Identification Number Data",   B,          length: 8
+    bmp  53, "Security Related Control Information",  N,          length: 16
+    bmp  54, "Additional Amounts",                    LLLVAR_ANS, max: 120
+    bmp  55, "ICC Related Data",                      LLLVAR_B,   max: 255
+    bmp  60, "Additional POS Information",            LLVAR_N,    max: 6
+    bmp  61, "Other Amounts",                         LLVAR_N,    max: 36
+    bmp  63, "Message Reason Code",                   F63,        max: 4
+    bmp  66, "Settlement Code",                       A,          length: 1
+    bmp  70, "Network Management Information Code",   N,          length: 3
+    bmp  73, "Date, Action",                          N,          length: 6
+    bmp  74, "Credits, Number",                       N,          length: 10
+    bmp  75, "Credits, Reversal Number",              N,          length: 10
+    bmp  76, "Debits, Number",                        N,          length: 10
+    bmp  77, "Debits, Reversal Number",               N,          length: 10
+    bmp  86, "Credits, Amount",                       N,          length: 16
+    bmp  87, "Credits, Reversal Amount",              N,          length: 16
+    bmp  88, "Debits, Amount",                        N,          length: 16
+    bmp  89, "Debits, Reversal Amount",               N,          length: 16
+    bmp  90, "Original Data Elements",                N,          length: 42
+    bmp  91, "File Update Code",                      AN,         length: 1
+    bmp  95, "Replacement Amounts",                   AN,         length: 42
+    bmp 101, "File Name",                             LLVAR_AN,   max: 17
+    bmp 102, "Account From",                          LLVAR_AN,   max: 28
+    bmp 103, "Account To",                            LLVAR_AN,   max: 28
+    bmp 118, "Intra Country",                         LLVAR_AN,   max: 99
+    bmp 120, "Additional Information",                LLLVAR_ANS, max: 990
+    bmp 122, "Remaining Open-To-Use",                 LLVAR_ANS,  max: 25
+
+    # TODO: fields 126, 127 (non-ISO encoding)
+
+    bmp_alias 37, :reference
+    bmp_alias 39, :response_code
+  end
+end

data/lib/iso8583-mkb/request.rb

@@ -0,0 +1,121 @@
+module ISO8583::MKB
+  class Request
+    class << self
+      def build_class
+        [ const_get(:MANDATORY), const_get(:OPTIONAL) ].each do |hash|
+          hash.each do |key, iso8583_name|
+            attr_accessor key.intern
+          end
+        end
+
+        const_get(:RESPONSE).each do |iso8583_name, key|
+          attr_reader key.intern
+        end
+      end
+    end
+
+    attr_reader :request, :status
+
+    attr_accessor :retries
+    attr_accessor :timeout
+
+    def initialize
+      @retries = 4
+      @timeout = 60
+      @retry_with = nil
+      @complete = nil
+      @request = nil
+    end
+
+    def success?
+      Errors.success? @status
+    end
+
+    def status_description
+      Errors.error @status
+    end
+
+    def submit(gateway, &complete)
+      @transaction = gateway.new_transaction
+
+      translated_fields = {}
+
+      self.class.const_get(:MANDATORY).each do |key, iso8583_name|
+        value = instance_variable_get :"@#{key}"
+        if value.nil?
+          raise "required attribute #{key} (#{iso8583_name}) is not specified"
+        end
+
+        translated_fields[iso8583_name] = value
+      end
+
+
+      self.class.const_get(:OPTIONAL).each do |key, iso8583_name|
+        value = instance_variable_get :"@#{key}"
+        unless value.nil?
+          translated_fields[iso8583_name] = value
+        end
+      end
+
+      @request = @transaction.request do |message|
+        message.mti = self.class.const_get(:MTI)
+
+        translated_fields.each do |key, value|
+          message[key] = value
+        end
+
+        message.to_b # to validate encoding of the fields
+      end
+
+      @retry_with = [
+        self.class.const_get(:REPEAT_MTI),
+        translated_fields
+      ]
+
+      @complete = complete
+      @request.start @timeout, &method(:request_completed)
+    end
+
+    private
+
+    def request_completed(response)
+      if response.nil?
+        Logging.logger.warn "Request timed out"
+
+        if @retries == 0
+          Logging.logger.warn "Out of retries"
+
+          complete_request 'C0'
+        else
+          @retries -= 1
+
+          Logging.logger.warn "Repeating, #{@retries} more tries"
+
+          @request = @transaction.request do |message|
+            message.mti, fields = @retry_with
+
+            fields.each do |key, value|
+              message[key] = value
+            end
+
+            @request.start @timeout, &method(:request_completed)
+          end
+        end
+      else
+        self.class.const_get(:RESPONSE).each do |iso8583_name, key|
+          instance_variable_set :"@#{key}", response[iso8583_name]
+        end
+
+        complete_request response.response_code
+      end
+    end
+
+    def complete_request(status)
+      @status = status
+      @transaction.complete
+
+      complete, @complete = @complete, nil
+      complete.call self
+    end
+  end
+end

data/lib/iso8583-mkb/reversal.rb

@@ -0,0 +1,42 @@
+module ISO8583::MKB
+  class Reversal < Request
+    MTI = "Reversal Request"
+    REPEAT_MTI = "Reversal Repeat"
+
+    MANDATORY = {
+      "pan"              => "Primary Account Number (PAN)",
+      "processing_code"  => "Processing Code",
+      "amount"           => "Amount, Transaction",
+      "expiry"           => "Date, Expiration",
+      "merchant_type"    => "Merchant's Type",
+      "acquirer_country" => "Acquiring Country Code",
+      "entry_mode"       => "Point of Service Entry Mode Code",
+      "condition_code"   => "Point of Service Condition Code",
+      "acquirer"         => "Acquiring Institution ID code",
+      "currency"         => "Currency Code, Transaction",
+      "auth_id"          => "Authorization Identification Response",
+      "response_code"    => "Response Code",
+      "reason"           => "Message Reason Code",
+      "original_data"    => "Original Data Elements"
+    }
+
+    OPTIONAL = {
+      "billing_amount"      => "Amount, Cardholder Billing",
+      "billing_convrate"    => "Conversion, Cardholder Billing",
+      "billing_currency"    => "Currency Code, Cardholder Billing",
+
+      "terminal_id"      => "Card Acceptor Terminal ID",
+      "acceptor_id"      => "Card Acceptor ID Code",
+      "acceptor_name"    => "Card Acceptor Name/Location",
+
+      "replacement_amount" => "Replacement Amounts",
+      "additional" => "Additional Information"
+    }
+
+    RESPONSE = {
+
+    }
+
+    build_class
+  end
+end

data/lib/iso8583-mkb/synchronous_gateway.rb

@@ -0,0 +1,74 @@
+module ISO8583::MKB
+  class SynchronousGateway
+    def initialize(config)
+      if EventMachine.reactor_running?
+        @loop_is_mine = false
+        @gateway = Gateway.new config
+        @gateway.run
+      else
+        @loop_is_mine = true
+        @ready = Queue.new
+        @thread = Thread.new(config, &method(:thread))
+        e = @ready.pop
+        @ready = nil
+
+        raise e unless e.nil?
+      end
+    end
+
+    def stop
+      EventMachine.schedule do
+        @gateway.stop
+        EventMachine.stop_event_loop if @loop_is_mine
+      end
+
+      if @loop_is_mine
+        @thread.join
+        @thread = nil
+      end
+    end
+
+    def execute(request)
+      queue = Queue.new
+
+      EventMachine.schedule do
+        request.submit(@gateway) { queue.push nil }
+      end
+
+      queue.pop
+    end
+
+    private
+
+    def thread(config)
+      begin
+        @gateway = Gateway.new config
+
+        @ready.push nil
+
+        EventMachine.epoll
+        EventMachine.run do
+          EventMachine.error_handler do
+            Logging.logger.error "Uncaught exception in EventMachine:"
+            Logging.logger.error e.to_s
+            e.backtrace.each do |line|
+              Logging.logger.error line
+            end
+          end
+
+          @gateway.run
+        end
+
+      rescue => e
+        Logging.logger.error e.to_s
+        e.backtrace.each do |line|
+          Logging.logger.error line
+        end
+
+        if !@ready.nil?
+          @ready.push e
+        end
+      end
+    end
+  end
+end

data/lib/iso8583-mkb/version.rb

@@ -0,0 +1,5 @@
+module ISO8583
+  module MKB
+    VERSION = "0.0.1"
+  end
+end

data/lib/iso8583-mkb.rb

@@ -0,0 +1,18 @@
+require "logger"
+
+require "eventmachine"
+require "iso8583"
+
+require "iso8583-mkb/version"
+require "iso8583-mkb/iso8583_patches"
+require "iso8583-mkb/logging"
+require "iso8583-mkb/gateway"
+require "iso8583-mkb/iso8583_connection"
+require "iso8583-mkb/iso8583_transaction"
+require "iso8583-mkb/iso8583_request"
+require "iso8583-mkb/mkb_message"
+require "iso8583-mkb/errors"
+require "iso8583-mkb/request"
+require "iso8583-mkb/authorization"
+require "iso8583-mkb/reversal"
+require "iso8583-mkb/synchronous_gateway"

metadata

@@ -0,0 +1,97 @@
+--- !ruby/object:Gem::Specification
+name: iso8583-mkb
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+  prerelease: 
+platform: ruby
+authors:
+- Sergey Gridasov
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2013-02-04 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: iso8583
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: eventmachine
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+description: ISO8583 implementation for Credit Bank of Moscow
+email:
+- grindars@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- .gitignore
+- Gemfile
+- LICENSE
+- README.md
+- Rakefile
+- iso8583-mkb.gemspec
+- lib/iso8583-mkb.rb
+- lib/iso8583-mkb/authorization.rb
+- lib/iso8583-mkb/errors.rb
+- lib/iso8583-mkb/gateway.rb
+- lib/iso8583-mkb/iso8583_connection.rb
+- lib/iso8583-mkb/iso8583_patches.rb
+- lib/iso8583-mkb/iso8583_request.rb
+- lib/iso8583-mkb/iso8583_transaction.rb
+- lib/iso8583-mkb/logging.rb
+- lib/iso8583-mkb/mkb_message.rb
+- lib/iso8583-mkb/request.rb
+- lib/iso8583-mkb/reversal.rb
+- lib/iso8583-mkb/synchronous_gateway.rb
+- lib/iso8583-mkb/version.rb
+homepage: https://github.com/smartkiosk/iso8583-mkb
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.24
+signing_key: 
+specification_version: 3
+summary: ISO8583 implementation for MKB
+test_files: []