peterSZW
peterSZW

ISO8583.lua

-- ISO8583 parser  
-- Author: Dale Steele
require 'amd'

-- script name --
function script_name()
  print('ISO8583Parser')
  return "ISO8583Parser"
end

function string.tohex(str)
    return (str:gsub('.', function (c)
        return string.format('%02X', string.byte(c))
    end))
end

function MTI_Name(wrkstr)
  operName = ''
  if wrkstr == "0100" then operName = "Authorization Request - "..wrkstr    
  elseif wrkstr == "0110" then operName = "Request Response - "..wrkstr   
  elseif wrkstr == "0120" then operName = "Authorization Advice - "..wrkstr
  elseif wrkstr == "0121" then operName = "Authorization Advice Repeat - "..wrkstr
  elseif wrkstr == "0130" then operName = "Issuer Response to Authorization Advice - "..wrkstr
  elseif wrkstr == "0200" then operName = "Acquirer Financial Request - "..wrkstr
  elseif wrkstr == "0210" then operName = "Issuer Response to Financial Request - "..wrkstr
  elseif wrkstr == "0220" then operName = "Acquirer Financial Advice - "..wrkstr
  elseif wrkstr == "0221" then operName = "Acquirer Financial Advice repeat - "..wrkstr
  elseif wrkstr == "0230" then operName = "Issuer Response to Financial Advice - "..wrkstr
  elseif wrkstr == "0320" then operName = "Batch Upload - "..wrkstr
  elseif wrkstr == "0330" then operName = "Batch Upload Response - "..wrkstr
  elseif wrkstr == "0400" then operName = "Acquirer Reversal Request - "..wrkstr
  elseif wrkstr == "0420" then operName = "Acquirer Reversal Advice - "..wrkstr
  elseif wrkstr == "0421" then operName = "Acquirer Reversal Advice Repeat Message - "..wrkstr
  elseif wrkstr == "0500" then operName = "Batch Settlement request - "..wrkstr
  elseif wrkstr == "0510" then operName = "Batch Settlement response - "..wrkstr
  elseif wrkstr == "0800" then operName = "Network Management Request - "..wrkstr
  elseif wrkstr == "0810" then operName = "Network Management Response - "..wrkstr
  elseif wrkstr == "0820" then operName = "Keychange - "..wrkstr
  else operName = "??????? - " ..wrkstr
  end
end

function Log_It(logstr)
  if LogFlag > 0 then 
    print('Logging: '..logstr)
  end
end

local function unpack_number(pstr, offset, size)
  local number = 0
  local max = size - 1
  
  for i = 0, max do
    number = number * 256
    number = (number + pstr:byte(offset + i))
  end
  return number
end

local function unpack_length(pstr, offset, size)
  local number = 0
  local offset2 = offset + size -1
  local max = size - 1
  for i = 0, max do
    number = number * 256
    number = (number + pstr:byte(offset2 - i))
  end
  return number
end

function case_2(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  offSet = offSet + 2 + x
  return 0
end

function case_3(pstr, offset)
  Log_It('03 -- Procesing Code: ' .. string.sub(pstr, offset, offset+5))
  offSet = offSet + 6
  return 0
end

function case_4(pstr, offset)
  Log_It('04 -- Amount - Transaction: ' .. string.sub(pstr, offset, offset+11))
  offSet = offSet + 12
  return 0
end

function case_5(pstr, offset)
  Log_It('05 -- Amount - Settlement: ' .. string.sub(pstr, offset, offset+11))
  offSet = offSet + 12
  return 0
end

function case_6(pstr, offset)
  Log_It('06 -- Amount - Cardholder Billing: ' .. string.sub(pstr, offset, offset+11))
  offSet = offSet + 12
  return 0
end

function case_7(pstr, offset)
  Log_It('07 -- Transmission date& time: ' .. string.sub(pstr, offset, offset+9))
  offSet = offSet + 10
  return 0
end
function case_8(pstr, offset)
  Log_It('08 -- Amount - Cardholder Billing Fee: ' .. string.sub(pstr, offset, offset+7))
  offSet = offSet + 8
  return 0
end

function case_9(pstr, offset)
  Log_It('09 -- Conversion rate, Settlement: ' .. string.sub(pstr, offset, offset+7))
  offSet = offSet + 8
  return 0
end

function case_10(pstr, offset)
  Log_It('10 -- Conversion rate, cardholder billing: ' .. string.sub(pstr, offset, offset+7))
  offSet = offSet + 8
  return 0
end

function case_11(pstr, offset)
  Log_It('11 -- System rtrace audit number: ' .. string.sub(pstr, offset, offset+5))
  offSet = offSet + 6
  return 0
end

function case_12(pstr, offset)
  Log_It('12 -- Time, local transcaton (hhmmss) ' .. string.sub(pstr, offset, offset+5))
  offSet = offSet + 6
  return 0
end

function case_13(pstr, offset)
  Log_It('13 -- Date, local transaction (MMDD): ' .. string.sub(pstr, offset, offset+3))
  offSet = offSet + 4
  return 0
end

function case_14(pstr, offset)
  Log_It('14 -- Date, expiration: ' .. string.sub(pstr, offset, offset+3))
  offSet = offSet + 4
  return 0
end

function case_15(pstr, offset)
  Log_It('15 -- Date, settlement: ' .. string.sub(pstr, offset, offset+3))
  offSet = offSet + 4
  return 0
end

function case_16(pstr, offset)
  Log_It('16 -- Date, conversion: ' .. string.sub(pstr, offset, offset+3))
  offSet = offSet + 4
  return 0
end

function case_17(pstr, offset)
  Log_It('17 -- Date, capute: ' .. string.sub(pstr, offset, offset+3))
  offSet = offSet + 4
  return 0
end

function case_18(pstr, offset)
  Log_It('18 -- Merchant type: ' .. string.sub(pstr, offset, offset+3))
  offSet = offSet + 4
  return 0
end

function case_19(pstr, offset)
  Log_It('19 -- Aquiring Country code: ' .. string.sub(pstr, offset, offset+2))
  offSet = offSet + 3
  return 0
end

function case_20(pstr, offset)
  Log_It('20 -- PAN extended country code: ' .. string.sub(pstr, offset, offset+2))
  offSet = offSet + 3
  return 0
end

function case_21(pstr, offset)
  Log_It('21 -- Forwarding institution country code: ' .. string.sub(pstr, offset, offset+2))
  offSet = offSet + 3
  return 0
end

function case_22(pstr, offset)
  Log_It('22 -- Point of service entry mode: ' .. string.sub(pstr, offset, offset+2))
  offSet = offSet + 3
  return 0
end

function case_23(pstr, offset)
  Log_It('23 -- Application PAN sequence number: ' .. string.sub(pstr, offset, offset+2))
  offSet = offSet + 3
  return 0
end

function case_24(pstr, offset)
  Log_It('24 -- Function Code : ' .. string.sub(pstr, offset, offset+2))
  offSet = offSet + 3
  return 0
end

function case_25(pstr, offset)
  Log_It('25 -- Point of service condition code: ' .. string.sub(pstr, offset, offset+1))
  offSet = offSet + 2
  return 0
end

function case_26(pstr, offset)
  Log_It('26 -- Point of service capture code: ' .. string.sub(pstr, offset, offset+1))
  offSet = offSet + 2
  return 0
end

function case_27(pstr, offset)
  Log_It('27 -- Authorizing ID responce length: ' .. string.sub(pstr, offset, offset))
  offSet = offSet + 1
  return 0
end

function case_28(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('28 -- Len: '.. x ..' Amount Transaction fee: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_29(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('29 -- Len: '.. x ..' Amount Settlement fee: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_30(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('30 -- Len: '.. x ..' Amount Transaction Processing fee: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_31(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('31 -- Len: '.. x ..' Amount settlement Processing fee: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_32(pstr, offset) 
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('32 -- Len: '.. x ..' Acquiring Institution ID code: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end
function case_33(pstr, offset) 
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('33 -- Len: '.. x ..' Forwarding Institution ID code: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_34(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('34 -- Len: '.. x ..' Primary account number extended: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_35(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('35 -- Len: '.. x ..' Track 2 Data: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_36(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('36 -- Len: '.. x ..' Track 3 Data: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_37(pstr, offset)
  Log_It('37 -- Retrieval reference number: ' .. string.sub(pstr, offset, offset+11))
  offSet = offSet + 12
  return 0
end

function case_38(pstr, offset)
  Log_It('38 -- Authorization identification responce: ' .. string.sub(pstr, offset, offset+5))
  offSet = offSet + 6 
  return 0
end

function case_39(pstr, offset)
  Log_It('39 -- Response Code: ' .. string.sub(pstr, offset, offset+1))
  retCode = pstr:sub(offset, offset+1)
  offSet = offSet + 2
  return 0
end

function case_40(pstr, offset)
  Log_It('40 -- Service Restriction code: ' .. string.sub(pstr, offset, offset+2))
  offSet = offSet + 3
  return 0
end

function case_41(pstr, offset)
  Log_It('41 -- Card acceptor terminal ID: ' .. string.sub(pstr, offset, offset+7))
  offSet = offSet + 8
  return 0
end

function case_42(pstr, offset) 
  Log_It('42 -- Card acceptor ID code: ' .. string.sub(pstr, offset, offset+14))
  uname = pstr:sub(offset, offset+14)
  uname = uname:gsub("%s+", "")
  Log_It('---uname:'.. uname);
  offSet = offSet + 15
  return 0
end
function case_43(pstr, offset)
  Log_It('43 -- Card acceptor name/location: ' .. string.sub(pstr, offset, offset+39))
  offSet = offSet + 40
  return 0
end

function case_44(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('44 -- Len: '.. x ..' Additional responce data: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_45(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('45 -- Len: '.. x ..' Track 1 Data: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_46(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('46 -- Len: '.. x ..' Additional Data ISO: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_47(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('47 -- Len: '.. x ..' Additional Data national: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_48(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('48 -- Len: '.. x ..' Additional Data private: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_49(pstr, offset)
  Log_It('49 -- Currency code transcation: ' .. string.sub(pstr, offset, offset+2))
  offSet = offSet + 3 
  return 0
end

function case_50(pstr, offset)
  Log_It('50 -- Currency code settlement: ' .. string.sub(pstr, offset, offset+2))
  offSet = offSet + 3
  return 0
end

function case_51(pstr, offset)  
  Log_It('51 -- Currency code cardholder: ' .. string.sub(pstr, offset, offset+2))
  offSet = offSet + 3 
  return 0
end

function case_52(pstr, offset)
  Log_It('52 hex-:'.. string.tohex(string.sub(pstr, offset, offset+15))) 
  Log_It('52 -- Personal ID number data: ' .. string.sub(pstr, offset, offset+15))
  offSet = offSet + 16
  return 0
end

function case_53(pstr, offset)
  Log_It('53 -- Security related control infomation: ' .. string.sub(pstr, offset, offset+15))
  offSet = offSet + 14; 
  return 0
end

function case_54(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('54 -- Len: '.. x ..' Additional amounts: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_55(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('55 -- Len: '.. x ..' Reserved ISO: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_56(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('56 -- Len: '.. x ..' Reserved ISO: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_57(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('57 -- Len: '.. x ..' Reserved national: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_58(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('58 -- Len: '.. x ..' Reserved national: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_59(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('59 -- Len: '.. x ..' Reserved national: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_60(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('60 -- Len: '.. x ..' Reserved national: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_61(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('61 -- Len: '.. x ..' Reserved private: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_62(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('62 -- Len: '.. x ..' Reserved private: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_63(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('63 -- Len: '.. x ..' Reserved private: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_64(psrt, offset)
   Log_It('64 -- MAC: ' .. string.sub(pstr, offset, offset+3))
  offSet = offSet + 4
  return 0
  end

function case_65(pstr, offset)
  Log_It('65 -- Bitmap: ' .. string.sub(pstr, offset, offset))
  offSet = offSet + 1
  return 0
end

function case_66(pstr, offset)
  Log_It('66 -- Settlement Code: ' .. string.sub(pstr, offset, offset))
  offSet = offSet + 1
  return 0
end

function case_67(pstr, offset)
  Log_It('67 -- Extend payment Code: ' .. string.sub(pstr, offset, offset+1))
  offSet = offSet + 2
  return 0
end

function case_68(pstr, offset)
  Log_It('68 -- receiving country Code: ' .. string.sub(pstr, offset, offset+2))
  offSet = offSet + 3
  return 0
end

function case_69(pstr, offset)
  Log_It('69 -- settlement country Code: ' .. string.sub(pstr, offset, offset+2))
  offSet = offSet + 3
  return 0
end

function case_70(pstr, offset)
  Log_It('70 -- network management information code: ' .. string.sub(pstr, offset, offset+2))
  offSet = offSet + 3
  return 0
end

function case_71(pstr, offset)
  Log_It('71 -- Message number: ' .. string.sub(pstr, offset, offset+3))
  offSet = offSet + 4
  return 0
end

function case_72(pstr, offset)
  Log_It('72 -- message number last: ' .. string.sub(pstr, offset, offset+3))
  offSet = offSet + 4
  return 0
end

function case_73(pstr, offset)
  Log_It('73 -- Date: ' .. string.sub(pstr, offset, offset+5))
  offSet = offSet + 6
  return 0
end

function case_74(pstr, offset)
  Log_It('74 -- Credits number: ' .. string.sub(pstr, offset, offset+9))
  offSet = offSet + 10
  return 0
end

function case_75(pstr, offset)
  Log_It('75 -- Credits recersal number: ' .. string.sub(pstr, offset, offset+9))
  offSet = offSet + 10
  return 0
end

function case_76(pstr, offset)
  Log_It('76 -- Debits number: ' .. string.sub(pstr, offset, offset+9))
  offSet = offSet + 10 
  return 0
end

function case_77(pstr, offset)
  Log_It('77 -- Debits reveral number: ' .. string.sub(pstr, offset, offset+9))
  offSet = offSet + 10 
  return 0
end

function case_78(pstr, offset)
  Log_It('78 -- Transfer Number: ' .. string.sub(pstr, offset, offset+9))
  offSet = offSet + 10 
  return 0
end

function case_79(pstr, offset)
  Log_It('78 -- Transfer Reversal Number: ' .. string.sub(pstr, offset, offset+9))
  offSet = offSet + 10 
  return 0
end

function case_80(pstr, offset)
  Log_It('80 -- Inquiries Number: ' .. string.sub(pstr, offset, offset+9))
  offSet = offSet + 10 
  return 0
end

function case_81(pstr, offset)
  Log_It('81 -- Authorizations Number: ' .. string.sub(pstr, offset, offset+9))
  offSet = offSet + 10 
  return 0
end

function case_82(pstr, offset)
  Log_It('82 -- Credit Proessing fee amount: ' .. string.sub(pstr, offset, offset+11))
  offSet = offSet + 12 
  return 0
end

function case_83(pstr, offset)
  Log_It('83 -- Credit transaction fee amount: ' .. string.sub(pstr, offset, offset+11))
  offSet = offSet + 12
  return 0
end

function case_84(pstr, offset)
  Log_It('84 -- Debits Proessing fee amount: ' .. string.sub(pstr, offset, offset+11))
  offSet = offSet + 12
  return 0
end

function case_85(pstr, offset)
  Log_It('85 -- Debits Transaction fee amount: ' .. string.sub(pstr, offset, offset+11))
  offSet = offSet + 12
  return 0
end

function case_86(pstr, offset)
  Log_It('86 -- Credits  amount: ' .. string.sub(pstr, offset, offset+15))
  offSet = offSet + 16
  return 0
end

function case_87(pstr, offset)
  Log_It('87 -- Credits reversal amount: ' .. string.sub(pstr, offset, offset+15))
  offSet = offSet + 16
  return 0
end

function case_88(pstr, offset)
  Log_It('88 -- Debits  amount: ' .. string.sub(pstr, offset, offset+15))
  offSet = offSet + 16
  return 0
end

function case_89(pstr, offset)
  Log_It('89 -- Debits reversal amount: ' .. string.sub(pstr, offset, offset+15))
  offSet = offSet + 16
  return 0
end

function case_90(pstr, offset)
  Log_It('90 -- Original data elements ' .. string.sub(pstr, offset, offset+41))
  offSet = offSet + 42
  return 0
end

function case_91(pstr, offset)
  Log_It('91 -- File update code: ' .. string.sub(pstr, offset, offset))
  offSet = offSet + 1
  return 0
end

function case_92(pstr, offset)
  Log_It('92 -- File security code: ' .. string.sub(pstr, offset, offset+1))
  offSet = offSet + 2
  return 0
end
function case_93(pstr, offset)
  Log_It('93 -- Responce indicator: ' .. string.sub(pstr, offset, offset+4))
  offSet = offSet + 5
  return 0
end

function case_94(pstr, offset)
  Log_It('94 -- Service indicator: ' .. string.sub(pstr, offset, offset+6))
  offSet = offSet + 7
  return 0
end

function case_95(pstr, offset)
  Log_It('95 -- replacement amounts: ' .. string.sub(pstr, offset, offset+41))
  offSet = offSet + 42
  return 0
end

function case_96(pstr, offset)
  Log_It('------ special check data --------')
  Log_It('96 -- Message security code: ' .. string.sub(pstr, offset, offset+7))
  offSet = offSet + 8
  return 0
end

function case_97(pstr, offset)
  Log_It('97 -- Amount net settlement: ' .. string.sub(pstr, offset, offset+15))
  offSet = offSet + 16
  return 0
end

function case_98(pstr, offset)
  Log_It('98 -- Payee: ' .. string.sub(pstr, offset, offset+24))
  offSet = offSet + 25
  return 0
end

function case_99(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('99 -- Len: '.. x ..' Settlement ID code: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_100(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('100 -- Len: '.. x ..' Receiving ID code: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_101(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('101 -- Len: '.. x ..' File name: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_102(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('102 -- Len: '.. x ..' Account ID 1 '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_103(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('103 -- Len: '.. x ..' Account ID 2 '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_104(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('104 -- Len: '.. x ..' Transaction Description '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_105(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('105 -- Len: '.. x ..'Reserved for ISO '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_106(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('106 -- Len: '.. x ..'Reserved for ISO '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
end

function case_107(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('107 -- Len: '.. x ..'Reserved for ISO '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_108(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('108 -- Len: '.. x ..'Reserved for ISO '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_109(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('109 -- Len: '.. x ..'Reserved for ISO '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_110(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('110-- Len: '.. x ..'Reserved for ISO '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_111(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('111 -- Len: '.. x ..'Reserved for ISO '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_112(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('112 -- Len: '.. x ..'Reserved for national '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_113(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('113 -- Len: '.. x ..'Reserved for national '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_114(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('114 -- Len: '.. x ..'Reserved for national '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_115(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('115 -- Len: '.. x ..'Reserved for national '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_116(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('116 -- Len: '.. x ..'Reserved for national '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_117(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('117 -- Len: '.. x ..'Reserved for national '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_118(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('118 -- Len: '.. x ..'Reserved for national '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_119(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('119 -- Len: '.. x ..'Reserved for national '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_120(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('120 -- Len: '.. x ..'Reserved for private: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_121(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('121 -- Len: '.. x ..'Reserved for private: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_122(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('122 -- Len: '.. x ..'Reserved for private: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_123(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('123 -- Len: '.. x ..'Reserved for private: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_124(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('124 -- Len: '.. x ..'Reserved for private: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_125(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('125 -- Len: '.. x ..'Reserved for private: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_126(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('126 -- Len: '.. x ..'Reserved for private: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_127(pstr, offset)
  local x = tonumber(string.sub(pstr, offset, offset+1))
  Log_It('127 -- Len: '.. x ..'Reserved for private: '..string.sub(pstr, offset+2, offset+1+x))
  offSet = offSet + 2 + x
  return 0
end

function case_128(pstr, offset)
  Log_It('------ special check data --------')
  Log_It('128 -- Message auth code: ' .. string.sub(pstr, offset, offset+7))
  offSet = offSet + 8
  return 0
end

function findfunction(x)
  assert(type(x) == "string")
  local f=_G
  for v in x:gmatch("[^%.]+") do
    if type(f) ~= "table" then
       Log_It('---nil one')
       return nil, "looking for '"..v.."' expected table, not "..type(f)
    end
    f=f[v]
  end
  if type(f) == "function" then
    return f
  else
    Log_It('---nil TWO')
    return nil, "expected function, not "..type(f)
  end
end

  LogFlag = 1
  hexChar = 0
  hexLen = 0
  hexStr = ''
  bitStr = ''
  bitLen = 0
  offSet = 0
  uname = ''
  IDcode = ''
  operName = ''
  MTIstr  = ''
  ClientType = ''
  ClientTypeStr= ''
  MsgClass = ''
  retCode = ''
  
 function parse_request(payload, stats)

  Log_It('Parse Request')
  if payload:len() == 0 then
    return 1
  end
  
  uname = ''
  ClientType = ''
  ClientTypeStr = ''
  MsgClass = ''
  MsgClassStr = ''
  bitStr = ''
  pgmStr =''
  xstr = ''
  
  Log_It('------------------------------------------------------------------------------------------------------') 
  Log_It('FF------:'.. string.tohex(string.sub(payload, 1, 1)))
  Log_It('Len hex-:'.. string.tohex(string.sub(payload, 2, 3))) 
  Log_It('Len-----:'.. unpack_length(payload, 2, 2) )
  MTIstr = string.sub(payload, 4, 7)
  MTI_Name(MTIstr)

  Log_It('MTI-----:'..operName) 
  stats:setOperationName(operName, operName:len())
  
  ClientType =  string.sub(payload, 7, 7)
  
  if ClientType == "0" then ClientTypeStr = "Acquirer"   
    elseif ClientType == "1" then ClientTypeStr = "Acquirer Repeat"   
    elseif ClientType == "2" then ClientTypeStr = "Issuer" 
    elseif ClientType == "3" then ClientTypeStr = "Issuer Repeat"  
    elseif ClientType == "4" then ClientTypeStr = "Other"    
    elseif ClientType == "5" then ClientTypeStr = "Other Repeat"  
    else ClientTypeStr = "Unknown"  
  end
  stats:setBrowserOsHardware(ClientTypeStr, "", "", "")
  
  
  MsgClass   =  string.sub(payload, 5, 5)
  if MsgClass == "1" then MsgClassStr = "Authorization Message"  
    elseif MsgClass == "2" then MsgClassStr = "Financial Message"  
    elseif MsgClass == "3" then MsgClassStr = "File Actions Message"   
    elseif MsgClass == "4" then MsgClassStr = "Reversal and Chargeback Message"   
    elseif MsgClass == "5" then MsgClassStr = "Reconciliation Message"   
    elseif MsgClass == "6" then MsgClassStr = "Administrative Message"
    elseif MsgClass == "7" then MsgClassStr = "Fee Collection Message"
    elseif MsgClass == "8" then MsgClassStr = "Network Management Message" 
    elseif MsgClass == "9" then MsgClassStr = "Reserved By ISO" 
    else MsgClassStr = "Unknown"
  end
 stats:setParameter(4, MsgClassStr) 
  
  Log_It('PL len--:'.. payload:len()) 
  Log_It('payload-:'.. string.tohex(payload:sub(0, payload:len())))

  if payload:byte(8) < 128 then
    hexStr = string.tohex(string.sub(payload, 8, 15))
    hexLen = 16  
    bitLen = 64 
    offSet = 16
    Log_It ('8 byte mask: '.. hexStr) 
  else 
    hexStr = string.tohex(string.sub(payload, 8, 23))
    hexLen = 32
    bitLen = 128
    offSet = 24
    Log_It ('16 byte mask: '.. hexStr)
  end
 
   for j = 1, hexLen do
    hexChar = hexStr:byte(j) 
         
    if hexChar == 48 then  bitStr = bitStr .. "0000"
    elseif hexChar == 49 then bitStr = bitStr .. "0001"
    elseif hexChar == 50 then bitStr = bitStr .. "0010"
    elseif hexChar == 51 then bitStr = bitStr .. "0011"
    elseif hexChar == 52 then bitStr = bitStr .. "0100"
    elseif hexChar == 53 then bitStr = bitStr .. "0101"
    elseif hexChar == 54 then bitStr = bitStr .. "0110"
    elseif hexChar == 55 then bitStr = bitStr .. "0111"
    elseif hexChar == 56 then bitStr = bitStr .. "1000"
    elseif hexChar == 57 then bitStr = bitStr .. "1001"
    elseif hexChar == 65 then bitStr = bitStr .. "1010"
    elseif hexChar == 66 then bitStr = bitStr .. "1011"
    elseif hexChar == 67 then bitStr = bitStr .. "1100"
    elseif hexChar == 68 then bitStr = bitStr .. "1101"
    elseif hexChar == 69 then bitStr = bitStr .. "1110"
    else                    bitStr = bitStr .. "1111"
    end
  end
  
  Log_It('BitStr: '.. bitStr)
    
  for j=1, bitLen do
    hexChar = bitStr:byte(j) 
    if hexChar == 49 then
      if j > 1 then 
        xstr = xstr .. ", "
      end
      xstr = xstr .. j     
    end     
  end  
 
  Log_It('codes to process: '.. xstr) 
 
  if MTIstr == "0800" or MTIstr == "0810" then
    bitLen = 75
  else 
    bitLen = 49
  end
  
  for j=2, bitLen do
    hexChar = bitStr:byte(j) 
    if hexChar == 49 then
      pgmStr = 'case_' .. j
      fun = findfunction(pgmStr)
      if (fun == nil) then
        Log_It('error no function for:'..j)
      else
        fun(payload, offSet)
      end
    end     
  end  
  Log_It('---uname:'.. uname);
  stats:setUserName(uname)
  Log_It('------------------------------------------------------------------------------------------------------') 
  return 0
end

 
function parse_response(payload, stats)
  Log_It('Parse_Response')
  if payload:len() == 0 then
    return 1
  end

  uname = ''
  bitStr = ''
  pgmStr =''
  xstr = '' 
  retCode = ''
  
  Log_It('######################################################################################################') 
  Log_It('FF------:'.. string.tohex(string.sub(payload, 1, 1)))
  Log_It('Len hex-:'.. string.tohex(string.sub(payload, 2, 3))) 
  Log_It('Len-----:'.. unpack_length(payload, 2, 2) )
  MTIstr = string.sub(payload, 4, 7)
  Log_It('MTI-----:'.. MTIstr)
  MTI_Name(MTIstr)
  Log_It('MTI-----:'..operName)
  
  Log_It('PL len--:'.. payload:len()) 
  Log_It('payload-:'.. string.tohex(payload:sub(0, payload:len())))

  if payload:byte(8) < 128 then
    hexStr = string.tohex(string.sub(payload, 8, 15))
    hexLen = 16  
    bitLen = 64 
    offSet = 16
    Log_It ('8 byte mask: '.. hexStr) 
  else 
    hexStr = string.tohex(string.sub(payload, 8, 23))
    hexLen = 32
    bitLen = 128
    offSet = 24
    Log_It ('16 byte mask: '.. hexStr)
  end
 
  for j = 1, hexLen do
    hexChar = hexStr:byte(j) 
         
    if hexChar == 48 then  bitStr = bitStr .. "0000"
    elseif hexChar == 49 then bitStr = bitStr .. "0001"
    elseif hexChar == 50 then bitStr = bitStr .. "0010"
    elseif hexChar == 51 then bitStr = bitStr .. "0011"
    elseif hexChar == 52 then bitStr = bitStr .. "0100"
    elseif hexChar == 53 then bitStr = bitStr .. "0101"
    elseif hexChar == 54 then bitStr = bitStr .. "0110"
    elseif hexChar == 55 then bitStr = bitStr .. "0111"
    elseif hexChar == 56 then bitStr = bitStr .. "1000"
    elseif hexChar == 57 then bitStr = bitStr .. "1001"
    elseif hexChar == 65 then bitStr = bitStr .. "1010"
    elseif hexChar == 66 then bitStr = bitStr .. "1011"
    elseif hexChar == 67 then bitStr = bitStr .. "1100"
    elseif hexChar == 68 then bitStr = bitStr .. "1101"
    elseif hexChar == 69 then bitStr = bitStr .. "1110"
    else                    bitStr = bitStr .. "1111"
    end
  end
  
  Log_It('BitStr: '.. bitStr)
  xstr = ''
  
  for j=1, bitLen do
    hexChar = bitStr:byte(j) 
    if hexChar == 49 then
      if j > 1 then 
        xstr = xstr .. ", "
      end
      xstr = xstr .. j     
    end     
  end  
 
  Log_It('codes to process: '.. xstr) 

  pgmStr ="" 
  
  if MTIstr == "0800" or MTIstr == "0810" then
    bitLen = 75
  else 
    bitLen = 49
  end
  
  for j=2, bitLen do
    hexChar = bitStr:byte(j) 
    if hexChar == 49 then
      pgmStr = 'case_' .. j
      fun = findfunction(pgmStr)
      if (fun == nil) then
        Log_It('error no function for:'..j)
      else
        fun(payload, offSet)
      end
    end     
  end  
    
  Log_It('---uname:'.. uname);
  stats:setUserName(uname)
  if retCode ~= "00" then
    err = 'Error Return Code (' ..retCode.. ')'
    stats:setAttribute(0, err)
  end
  
  Log_It('######################################################################################################') 
  return 0
end

local the_module = {}
the_module.parse_request = parse_request
the_module.parse_response = parse_response
return the_module

你可能感兴趣的:(ISO8583.lua)

  • ISO8583.lua peterSZW
    --ISO8583parser--Author:DaleSteelerequire'amd'--scriptname--functionscript_name()print('ISO8583Parser')return"ISO8583Parser"endfunctionstring.tohex(str)return(str:gsub('.',function(c)returnstring.form
  • xml解析 小猪猪08 xml
    1、DOM解析的步奏 准备工作：    1.创建DocumentBuilderFactory的对象    2.创建DocumentBuilder对象    3.通过DocumentBuilder对象的parse(String fileName)方法解析xml文件    4.通过Document的getElem
  • 每个开发人员都需要了解的一个SQL技巧 brotherlamp linuxlinux视频linux教程linux自学linux资料
      对于数据过滤而言CHECK约束已经算是相当不错了。然而它仍存在一些缺陷，比如说它们是应用到表上面的，但有的时候你可能希望指定一条约束，而它只在特定条件下才生效。 使用SQL标准的WITH CHECK OPTION子句就能完成这点，至少Oracle和SQL Server都实现了这个功能。下面是实现方式： CREATE TABLE books (   id &
  • Quartz——CronTrigger触发器 eksliang quartzCronTrigger
    转载请出自出处：http://eksliang.iteye.com/blog/2208295 一.概述 CronTrigger 能够提供比 SimpleTrigger 更有具体实际意义的调度方案，调度规则基于 Cron 表达式，CronTrigger 支持日历相关的重复时间间隔（比如每月第一个周一执行），而不是简单的周期时间间隔。 二.Cron表达式介绍 1）Cron表达式规则表 Quartz
  • Informatica基础 18289753290 InformaticaMonitormanagerworkflowDesigner
    1. 1）PowerCenter Designer：设计开发环境，定义源及目标数据结构；设计转换规则，生成ETL映射。 2）Workflow  Manager：合理地实现复杂的ETL工作流，基于时间，事件的作业调度 3）Workflow  Monitor：监控Workflow和Session运行情况，生成日志和报告 4）Repository  Manager：
  • linux下为程序创建启动和关闭的的sh文件，scrapyd为例 酷的飞上天空 scrapy
    对于一些未提供service管理的程序  每次启动和关闭都要加上全部路径，想到可以做一个简单的启动和关闭控制的文件   下面以scrapy启动server为例，文件名为run.sh：   #端口号，根据此端口号确定PID PORT=6800 #启动命令所在目录 HOME='/home/jmscra/scrapy/' #查询出监听了PORT端口
  • 人--自私与无私 永夜-极光
                今天上毛概课,老师提出一个问题--人是自私的还是无私的,根源是什么?               从客观的角度来看,人有自私的行为,也有无私的
  • Ubuntu安装NS-3 环境脚本 随便小屋 ubuntu
      将附件下载下来之后解压，将解压后的文件ns3environment.sh复制到下载目录下（其实放在哪里都可以，就是为了和我下面的命令相统一）。输入命令：   sudo ./ns3environment.sh >>result   这样系统就自动安装ns3的环境，运行的结果在result文件中，如果提示     com
  • 创业的简单感受 aijuans 创业的简单感受
           2009年11月9日我进入a公司实习，2012年4月26日，我离开a公司，开始自己的创业之旅。      今天是2012年5月30日，我忽然很想谈谈自己创业一个月的感受。 当初离开边锋时，我就对自己说：“自己选择的路，就是跪着也要把他走完”，我也做好了心理准备，准备迎接一次次的困难。我这次走出来，不管成败
  • 如何经营自己的独立人脉 aoyouzi 如何经营自己的独立人脉
    独立人脉不是父母、亲戚的人脉，而是自己主动投入构造的人脉圈。“放长线，钓大鱼”，先行投入才能产生后续产出。   现在几乎做所有的事情都需要人脉。以银行柜员为例，需要拉储户，而其本质就是社会人脉，就是社交！很多人都说，人脉我不行，因为我爸不行、我妈不行、我姨不行、我舅不行……我谁谁谁都不行，怎么能建立人脉？我这里说的人脉，是你的独立人脉。   以一个普通的银行柜员
  • JSP基础 百合不是茶 jsp注释隐式对象
      1,JSP语句的声明 <%! 声明 %> 　　 声明：这个就是提供java代码声明变量、方法等的场所。 表达式 <%= 表达式 %> 　　 这个相当于赋值，可以在页面上显示表达式的结果， 程序代码段/小型指令　<% 程序代码片段 %>   2,JSP的注释   <!-- -->
  • web.xml之session-config、mime-mapping bijian1013 javaweb.xmlservletsession-configmime-mapping
    session-config 1.定义： <session-config> <session-timeout>20</session-timeout> </session-config> 2.作用：用于定义整个WEB站点session的有效期限，单位是分钟。   mime-mapping 1.定义： <mime-m
  • 互联网开放平台（1） Bill_chen 互联网qq新浪微博百度腾讯
    现在各互联网公司都推出了自己的开放平台供用户创造自己的应用，互联网的开放技术欣欣向荣，自己总结如下： 1.淘宝开放平台(TOP) 网址：http://open.taobao.com/ 依赖淘宝强大的电子商务数据，将淘宝内部业务数据作为API开放出去，同时将外部ISV的应用引入进来。 目前TOP的三条主线： TOP访问网站：open.taobao.com ISV后台：my.open.ta
  • 【MongoDB学习笔记九】MongoDB索引 bit1129 mongodb
    索引 可以在任意列上建立索引 索引的构造和使用与传统关系型数据库几乎一样,适用于Oracle的索引优化技巧也适用于Mongodb 使用索引可以加快查询,但同时会降低修改,插入等的性能 内嵌文档照样可以建立使用索引 测试数据     var p1 = { "name":"Jack", "age&q
  • JDBC常用API之外的总结 白糖_ jdbc
    做JAVA的人玩JDBC肯定已经很熟练了，像DriverManager、Connection、ResultSet、Statement这些基本类大家肯定很常用啦，我不赘述那些诸如注册JDBC驱动、创建连接、获取数据集的API了，在这我介绍一些写框架时常用的API，大家共同学习吧。     ResultSetMetaData获取ResultSet对象的元数据信息
  • apache VelocityEngine使用记录 bozch VelocityEngine
    VelocityEngine是一个模板引擎，能够基于模板生成指定的文件代码。   使用方法如下：     VelocityEngine engine = new VelocityEngine();// 定义模板引擎     Properties properties = new Properties();// 模板引擎属
  • 编程之美-快速找出故障机器 bylijinnan 编程之美
    package beautyOfCoding; import java.util.Arrays; public class TheLostID { /*编程之美 假设一个机器仅存储一个标号为ID的记录，假设机器总量在10亿以下且ID是小于10亿的整数，假设每份数据保存两个备份，这样就有两个机器存储了同样的数据。 1.假设在某个时间得到一个数据文件ID的列表，是
  • 关于Java中redirect与forward的区别 chenbowen00 javaservlet
    在Servlet中两种实现： forward方式：request.getRequestDispatcher(“/somePage.jsp”).forward(request, response); redirect方式：response.sendRedirect(“/somePage.jsp”); forward是服务器内部重定向，程序收到请求后重新定向到另一个程序，客户机并不知
  • [信号与系统]人体最关键的两个信号节点 comsci 系统
            如果把人体看做是一个带生物磁场的导体,那么这个导体有两个很重要的节点,第一个在头部,中医的名称叫做 百汇穴, 另外一个节点在腰部,中医的名称叫做 命门         如果要保护自己的脑部磁场不受到外界有害信号的攻击,最简单的
  • oracle 存储过程执行权限 daizj oracle存储过程权限执行者调用者
    在数据库系统中存储过程是必不可少的利器，存储过程是预先编译好的为实现一个复杂功能的一段Sql语句集合。它的优点我就不多说了，说一下我碰到的问题吧。我在项目开发的过程中需要用存储过程来实现一个功能，其中涉及到判断一张表是否已经建立，没有建立就由存储过程来建立这张表。 CREATE OR REPLACE PROCEDURE TestProc  IS    fla
  • 为mysql数据库建立索引 dengkane mysql性能索引
    前些时候，一位颇高级的程序员居然问我什么叫做索引，令我感到十分的惊奇，我想这绝不会是沧海一粟，因为有成千上万的开发者（可能大部分是使用MySQL的）都没有受过有关数据库的正规培训，尽管他们都为客户做过一些开发，但却对如何为数据库建立适当的索引所知较少，因此我起了写一篇相关文章的念头。  最普通的情况，是为出现在where子句的字段建一个索引。为方便讲述，我们先建立一个如下的表。
  • 学习C语言常见误区 如何看懂一个程序 如何掌握一个程序以及几个小题目示例 dcj3sjt126com c算法
    如果看懂一个程序，分三步   1、流程   2、每个语句的功能   3、试数   如何学习一些小算法的程序 尝试自己去编程解决它，大部分人都自己无法解决 如果解决不了就看答案 关键是把答案看懂，这个是要花很大的精力，也是我们学习的重点 看懂之后尝试自己去修改程序，并且知道修改之后程序的不同输出结果的含义 照着答案去敲 调试错误
  • centos6.3安装php5.4报错 dcj3sjt126com centos6
    报错内容如下: Resolving Dependencies --> Running transaction check ---> Package php54w.x86_64 0:5.4.38-1.w6 will be installed --> Processing Dependency: php54w-common(x86-64) = 5.4.38-1.w6 for
  • JSONP请求 flyer0126 jsonp
          使用jsonp不能发起POST请求。 It is not possible to make a JSONP POST request. JSONP works by creating a <script> tag that executes Javascript from a different domain; it is not pos
  • Spring Security（03）——核心类简介 234390216 Authentication
    核心类简介 目录 1.1     Authentication 1.2     SecurityContextHolder 1.3     AuthenticationManager和AuthenticationProvider 1.3.1  &nb
  • 在CentOS上部署JAVA服务 java--hhf javajdkcentosJava服务
        本文将介绍如何在CentOS上运行Java Web服务，其中将包括如何搭建JAVA运行环境、如何开启端口号、如何使得服务在命令执行窗口关闭后依旧运行     第一步：卸载旧Linux自带的JDK ①查看本机JDK版本 java -version    结果如下 java version "1.6.0"
  • oracle、sqlserver、mysql常用函数对比[to_char、to_number、to_date] ldzyz007 oraclemysqlSQL Server
    oracle                                &n
  • 记Protocol Oriented Programming in Swift of WWDC 2015 ningandjin protocolWWDC 2015Swift2.0
    其实最先朋友让我就这个题目写篇文章的时候，我是拒绝的，因为觉得苹果就是在炒冷饭， 把已经流行了数十年的OOP中的“面向接口编程”还拿来讲，看完整个Session之后呢，虽然还是觉得在炒冷饭，但是毕竟还是加了蛋的，有些东西还是值得说说的。 通常谈到面向接口编程，其主要作用是把系统设计和具体实现分离开，让系统的每个部分都可以在不影响别的部分的情况下，改变自身的具体实现。接口的设计就反映了系统
  • 搭建 CentOS 6 服务器(15) - Keepalived、HAProxy、LVS rensanning keepalived
    （一）Keepalived （1）安装 # cd /usr/local/src # wget http://www.keepalived.org/software/keepalived-1.2.15.tar.gz # tar zxvf keepalived-1.2.15.tar.gz # cd keepalived-1.2.15 # ./configure # make &a
  • ORACLE数据库SCN和时间的互相转换 tomcat_oracle oraclesql
    SCN（System Change Number 简称 SCN）是当Oracle数据库更新后，由DBMS自动维护去累积递增的一个数字，可以理解成ORACLE数据库的时间戳，从ORACLE 10G开始，提供了函数可以实现SCN和时间进行相互转换； 　　 用途：在进行数据库的还原和利用数据库的闪回功能时，进行SCN和时间的转换就变的非常必要了； 　 　操作方法： 　　1、通过dbms_f
  • Spring MVC 方法注解拦截器 xp9802 spring mvc
    应用场景，在方法级别对本次调用进行鉴权，如api接口中有个用户唯一标示accessToken,对于有accessToken的每次请求可以在方法加一个拦截器，获得本次请求的用户，存放到request或者session域。 python中，之前在python flask中可以使用装饰器来对方法进行预处理，进行权限处理 先看一个实例,使用@access_required拦截： ?
按字母分类： ABCDEFGHIJKLMNOPQRSTUVWXYZ其他