ISO8583包简介和源代码

来源:互联网 发布:mac 装安卓 编辑:程序博客网 时间:2024/06/01 09:30


 

本文主要包括ISO8583包简介和源代码,下面是简介:

 

简介
ISO8583
包(简称8583包)是一个国际标准的包格式,最多由128个字段域组成,每个域都有统一的规定,并有定长与变长之分。8583包前面一段为位图,用来确定包的字段域组成情况。 
其中位图是8583包的灵魂,它是打包解包确定字段域的关键, 而了解每个字段域的属性则是填写数据的基础, 
1
、 位图描述如下: 
位图位置:
格式:定长 
类型:B16(二进制16位,16*8=128bit 
描述: 
如将位图的第一位设为'1',表示使用扩展位图(128个域),否则表示只使用基本位图(64个域)。 
如使用某数据域,应在位图中将相应的位设位'1',如使用41域,需将位图的41位设为'1' 
选用条件:如使用65128域,需设位图域第一位为'1' 
2
、变长,定长域说明 
如第二域:域名为主帐号, 
数据类型为string 
长度为22(是长长度不得超过此数) 
是个2位变长域 
由于是2位变长,在打包时需在数据域前加上数据的实际长度,如为19位,则表示为: 
19+数据值(即前两位为长度)

 

如第三域:域名为处理码, 
数据类型为string 
长度为6 
是个定长域 
必须填满6位。

 


A:ISO8583各域段的说明 
1
,信息类型(message type)定义 
位图位置:- 
格式:定长 
类型:N4 
描述: 
数据包的第一部分,定义数据包的类型。 
数据类型由数据包的发起者设定,应遵循以下要求: 
数据包开始部分必须是信息类型; 
对不支持的信息类型能给出拒绝应答。 
0100
授权交易 
0110
授权交易答复 
0200
金融交易 
0210
金融交易答复 
0240
查询交易 
0250
查询交易答复 
0400
冲正交易 
0410
冲正交易答复 
0800
管理交易 
0810
管理交易答复

 

2,位图(Bit Map) - 基本位图和扩展位图 
位图位置:
格式:定长 
类型:B16 
描述: 
如将位图的第一位设为'1',表示使用扩展位图,否则表示只使用基本位图。 
如使用某数据域,应在位图中将相应的位设位'1',如使用41域,需将位图的41位设为'1' 
选用条件:如使用65128域,需设位图域为'1'

 

3Bit02主帐号(PrimaryAccount Number ) 
位图位置:02 
格式:变长,LLVAR 
类型:N..22 
描述: 
唯一的确认一个用户交易的基本帐号。 
由于银行电子服务系统涉及多个应用系统,而帐号长度最多为22位,故将原标准的19长度改为22位。

 

Bit03 处理代码 (Processing Code ) 
位图位置:03 
格式:定长 
类型:N6 
描述:用于描述交易对客户帐户造成何种影响的代码。 
处理代码和信息码一起可唯一定义一种交易的类型。 
处理代码由以下三部分组成: 
位置描述 
1
2交易动作码 
3
4付出帐户类型,用于借记类,如查询、代收费、转场交易。 
5
6收入帐户类型,用于代收费、转帐等。

 


其中: 
ff : 
付出帐户 
tt
: 收入帐户 
视主机而定

 

 

 

5Bit04 交易金额 (Amount, Transaction) 
位图位置:04 
格式:定长 
类型:N12 
描述:帐户人要求交易的交易金额,不含任何处理和交易费用。 
金额的表示和货币代码有关,应能表示相应货币的最小单位。参ISO4217有关货币代码定义。 
“000000000100”用于表示美元,表示1.00元;如用于表示意大利货币,则表示100里拉。 
对于查询等交易,应设交易金额为“000000000000”

 

6Bit07交易日期和时间TransmissionDate and Time 
位图位置:07 
格式:定长,MMDDhhmmss 
类型:N10 
描述:本地交易日期和时间

 

7Bit11系统跟踪号(SystemsTrace Audit Number) 
位图位置:11 
格式:定长 
类型:N6 
描述:终端交易的跟踪号码。 
交易发起终端填写,和交易日期、时间、信息类型等合在一起可唯一定义某一个终端的唯一一笔交易。即是说,在同一天,对一终端,同一类交易的系统跟踪号应保证不同。系统跟踪号在交易过程中不能修改。使用此域来匹配请求和通知类交易的返回。 
应用系统使用此域来检查收到的授权、金融、自动冲正、结算、管理和网管等类交易的应答包是否是其请求包的应答。 
系统跟踪号不用于匹配自动冲正交易,也不用于在预授权消费时匹配前面的预授权交易。参90域。 
对于银行电子服务系统,其系统跟踪号是交易流水号。

 

8Bit12本地交易时间(Time,Local Transaction 
位图位置:12 
格式:定长,hhmmss 
类型:N6 
描述:交易在终端上发生的时间。 
本地交易时间在交易处理过程中不能改变。在自动冲正,存贮转发时,本地交易时间不能改变。

 

9Bit13本地交易日期(Date,Local Transaction) 
位图位置:13 
格式:定长,MMDD 
类型:N4 
描述:交易在终端上发生的时间。 
本地交易时间不能改变,在自动冲正、存储转发交易时,本地交易时间也不能改变。

 

10Bit14有效期(Date,Expiration) 
位图位置:14 
格式:定长,YYMM 
类型:N4 
描述:卡的有效期,年年月月 
由于卡类写磁格式不同,收单行可能提不出卡的有效期,授权机构从卡的二磁道中提取卡的有效期。如卡,无二磁道,收单行应要求手工录入卡的有效期。 
选用条件:100200400等交易如没有23磁道时,一定要有此域。

 

11Bit15结算日期(Date,Settlement) 
位图位置:15 
格式:定长,MMDD 
类型:N4 
描述: 
银行电子服务系统和主机结算的时间,格式月月日日。 
结帐日期前发生的交易参加当天结算。 
在结算时,结帐日期也用于计算处理、交易费用。

 

12Bit17获取日期(Date,Capture) 
位图位置:17 
格式:定长,MMDD 
类型:N4 
描述:从主机获取交易的记帐日期。通常用于主机和商户清算。

 

13Bit18商户类型(Merchant'sType) 
位图位置:18 
格式:定长 
类型:N4 
描述:定义商户产品和服务类型的代码 
商户类型用于金融、授权交易,用于指定服务点的类型。它主要有以下用途: 
决定预授权交易得到确认的最长时间; 
控制合法限额; 
为交易授权处理,控制网络操作规则; 
欺诈检测; 
用于商户分类报表; 
交易费用处理。 
根据ISO8583标准,应使用相应的国家标准。 
商户类型代码表如下: 
商户类型代码行业类型说明 
4215
邮递服务 
4511
民航 
4722
旅游 
4782
过桥费 
4789
其他运输服务 
4614
电信服务 
5542
加油站 
5812
餐馆 
5999
购物 
6010
金融机构-人工现金支付 
6011
金融机构-自动现金支付 
6012
金融机构-各类服务 
7011
酒店、旅馆 
7299
各类个人服务:洗衣、美容、 
7399
各类商业服务:停车场、租车、广告、其他服务 
7699
各类维修服务:维修、洗车、拖车 
7996
娱乐:电影、剧院、体育、游戏 
8099
医疗服务 
8111
法律服务 
8999
各类专业服务:会计、教育、装修、工程

 

选用条件:服务点终端发起的交易一定要有此域。

 

14Bit22服务点输入方式(Point-of-ServiceEntry Mode) 
位图位置:22 
格式:定长 
类型:N3 
描述:在服务终端上定义PINPAN的输入方式。 
服务点输入方式包含以下两个方面组合而成: 
位置描述 
1
2在服务终端上PAN有效期输入方式 
3
3在服务终端上PIN的输入方式 
PAN
的输入方式编码如下: 
PAN
输入方式描述 
00
不知 
01
手工 
02
读磁卡 
03
条码扫描仪(BAR 
04
光学符号阅读器(OCR 
05
集成电路卡(IC卡)

 

PIN的输入方式编码如下: 
PIN
输入方式描述 
0
不知 
1
终端能接收PIN 
2
终端不能接收PIN

 

选用条件:服务点终端发起的交易一定要有此域。

 

15Bit25服务点条件代码(Point-of-ServiceCondition Code) 
位图位置:25 
格式:定长 
类型:N2 
描述:定义交易发生的服务点类型 
用法说明:下面是CYBERBANK支持的服务点条件代码。 
服务点条件代码服务点终端类型 
2
自动柜员机(ATM 
10
银行终端(10 
14POS 
20
电话银行

 

16Bit32收单机构标识码(Acquirerinstitution Identification) 
位图位置:32 
格式:LLVAR 
类型:N..11 
描述:在金融交易中此域表示交易发生的银行机构的标识码 
应答数据包必须和请求数据包此域相同。

 

17Bit33向前机构标识码(ForwardingInstitution Identification Code) 
位图位置:33 
格式:LLVAR 
类型:N..11 
描述:在金融交易中此域表示帐户所在的银行机构的标识码 
在网管交易800/810中,本域含有交易发起机构的代码。 
应答数据包必须和请求数据包此域相同。

 

18Bit35二磁道数据(Track2 Data) 
位图位置:35 
格式:LLVAR 
类型:Z..37 
描述:写在卡二磁道的数据。数据组成遵循ISO78111985标准,数据中包含域分隔符,但不包含卡启始、结束符、LRC等。 
收卡行应检测卡的二磁道是否符合国际标准。 
为支持国际交换收单行应将二磁道中的分隔符换为。除此外不能对二磁道数据进行任何修改,如修改PAN的校验字、有效期、服务码等。

 

19Bit36三磁道数据(Track3 Data) 
位图位置:36 
格式:LLLVAR 
类型:Z...104 
描述:写在卡三磁道的数据。数据应组成遵循ISO4909标准,数据中包含域分隔符,但不包含卡启始、结束符、LRC等。 
注意:长度说明为3位数字长。

 

20Bit37检索索引号(RetrievalReference Number) 
位图位置:37 
格式:定长 
类型:AN12 
描述:检索索引号用来在任何时间标识一个金融、授权、自动冲正交易。 
检索索引号不要求打印在持卡人的帐单上。它的主要目的是在收单行和授权行之间定义一个数据项用于跟踪和检索交易。授权机构可以将检索索引号打印在客户的对帐单上。 
检索索引号由收单行分配。 
选用条件:可包含在收单机构的交易请求中。如在交易请求中有,则应答数据中一定应原样返回。

 

21Bit38授权码(AuthorizationIdentification) 
位图位置:38 
格式:定长 
类型:AN6 
描述:交易授权机构返回的返回代码。 
授权码用于在服务点终端上信用卡授权; 
授权机构按网络操作规定,可选使用本域。

 

22Bit39返回码(ResponseCode) 
位图位置:39 
格式:定长 
类型:AN2 
描述:对一交易定义其处理结果的编码。 
返回码用于说明授权机构对金融(授权)交易的处理状态;也用来指明自动冲正交易的冲正原因;还用来指出目标主机已接收到文件修改、结算、管理、网管等交易请求。 
返回码应尽可能准确,应尽可能描述清楚所遇到的问题和状态。网络交换主机、收单行主机有可能会按不同的返回码收取不同的交易处理费用,并执行不同的处理过程。

 


23
Bit41收卡单位终端标识码(Card Acceptor Terminal Identification) 
位图位置:41 
格式:定长 
类型:ANS8 
描述:定义在收单单位中定义一个服务终端的标识码,在同一商户中服务终端标识码应唯一。

 

24Bit42收卡商户定义码(CardAcceptor Identification Code) 
位图位置:42 
格式:定长 
类型:ANS15 
描述:在本地和网络中定义交易单位(商户)的编码。

 

25Bit43收卡商户位置(CardAcceptor Location) 
位图位置:43 
格式:定长 
类型:ANS40 
描述:在本地和网络中定义收卡单位(商户)的国家、省。城市等。 
选用条件:如对外卡网络,一定要包含此域。

 

26Bit44附加返回数据(AdditionalResponseData) 
位图位置:44 
格式:LLVAR 
类型:ANS..25 
描述:在金融(授权)交易中授权机构返回的其他信息。

 

27Bit48附加数据-私用(Additional Data-Private) 
位图位置:48 
格式:LLLVAR 
类型:ANS...999 
描述:银行电子服务系统使用此域作以下用途 
存放批量查询的返回数据 
其格式与输出格式表对应

 

28Bit49交易货币代码(CurrencyCode,Transaction) 
位图位置:49 
格式:定长 
类型:AN3 
描述:按ISO4217定义的交易货币代码,用来表示交易金额field04)所用的货币种类。 
交易货币代码是指在收单单位进行交易所用的交易种类。

 

29Bit50结算货币代码(CurrencyCode,Settlement) 
位图位置:50 
格式:定长 
类型:AN3 
描述:按ISO4217定义的结算货币代码,用来表示结算金额、结算处理费、结算交易费等所用的货币种类。 
结算货币代码是指在进行结算和清算过程中所用的货币种类。

 

30Bit52用户密码(PIN)数据(PIN Data) 
位图位置:52 
格式:定长 
类型:B16 
描述:用户在服务终端上交易用于识别用户合法性的一些数字。 
PIN
在分行主机用分行主机密钥按ANSIX9.8标准加密,形成密文块。 
选用条件:如果在终端上输入了密码,就需要此域。

 

31Bit53密码相关控制信息(SecurityRelated Control) 
位图位置:53 
格式:定长 
类型:AN16 
描述:本域提供有关密码块的附加信息,用于指出用于PIN计算的PINkey,用于MAC计算的MAC key 
本域格式如下表所示: 
0
1格式代码2N“20” 
2
3PIN加密算法2N“01”:DES 
4
5密文块格式2N“01”:ANSI 
6PIN
密钥索引1N‘1’‘2’ 
7MAC
密钥索引1N‘1’‘2’ 
8
11MAC检查数据4B 
12
15填充4N

 

BOC信用卡网络中PINMAC各使用两个密钥---'1'号和'2'密钥,交易中计算PINMAC时只能各用某一个KEY,同时需将所用的KEY索引号填写此域。 
选用条件:如果有PIN域或MAC域,一定需有此域。

 

32Bit54附加金额(AdditionalAmounts) 
位图位置:54 
格式:LLLVAR 
类型:ANS...120 
描述:此域由授权行主机将客户的余额返回给收单终端,以显示或打印在客户回单上。 
在此域中最多可有6个余额返回,每个余额返回格式如下: 
位置描述 
0
1处理码3456位定义的帐号类型 
2
3金额类型:01-帐户金额 
02
-可用金额 
03
-拥有金额 
04
-应付金额 
40
-可用取款限额 
56
-可用转帐限额 
4
6金额的货币代码 
7‘D’
-借记金额,’C’-贷记金额 
8
19余额数目

 

六个余额中必须返回可用余额,在ATMPOS上显示可用余额

 

33Bit64信息确认码(MAC) 
位图位置:64 
格式:定长 
类型:B16 
描述:数据包的最后一个域,用于验证信息来源的合法性,以及数据包中数据是否未被篡改。 
MAC
的计算参ANSIX.99,(最后八字节未满八位者左补零,右补零?
为提高效率,在发送者和接收者之间,只有以下一些重要的域参加MAC的计算。数据包中如果存在以下数据域,它们将参加MAC的计算。

 

位图域名 
2
基本帐号 
3
处理代码 
4
交易金额 
11
系统跟踪号 
12
本地交易时间 
13
本地交易日期 
32
收单机构代码 
38
授权码 
39
返回码 
41
收单终端代码 
49
交易货币代码 
95
替换金额 
选用条件:只使用了164域的数据包使用此域。

 


34
Bit70管理信息码(System Management Indormation Code) 
位图位置:70 
格式:定长 
类型:N3 
描述:

 

用于定义和维护银行电子服务系统内部通讯网络状态和应用工作状态。 
网络管理信息代码用于管理清算日期"cutoff",通讯"sign on/sign off""keyexchange"等。 
支持以下一些网络管理信息码 
NMIC
网络管理信息码动作 
001
签到(Sign on) 
002
签退(Sign off) 
101
交换密钥(Key exchange) 
201
结帐日期切换(Cutoff) 
202
结帐日期切换完成 
301
测试(Echo test)

 

35Bit74贷记交易笔数(TransactionNumber) 
位图位置:74 
格式:定长 
类型:N10 
描述:贷记金融交易总的成功交易次数 
CYBERBANK
软件在收到如下一个处理代码时会增加贷记交易次数。 
交易码交易服务 
00
贷记,购物与服务 
01
贷记,取现 
02
贷记,调整(客户调整)

 

36Bit75贷记自动冲正交易笔数(Credits,ReversalNumber) 
位图位置:75 
格式:定长 
类型:N10 
描述:贷记收单行自动冲正、“ChargeBack"等交易总的交易次数 
CYBERBANK
软件在收到如下一个处理代码时会增加贷记自动冲正交易笔数 
交易码交易服务 
20
贷记,退货 
21
贷记,存款 
22
贷记,调整(客户修改)

 

37Bit76借记交易笔数(Debits,Number) 
位图位置:76 
格式:定长 
类型:N10 
描述:借记金融交易总的成功交易次数 
CYBERBANK
软件在收到如下一个处理代码时会增加借记交易次数。 
交易码交易服务 
00
借记,购物与服务 
01
借记,取现 
02
借记,调整(客户调整)

 

38Bit77借记自动冲正交易笔数(Debits,ReversalNumber) 
位图位置:77 
格式:定长 
类型:N10 
描述:借记收单行自动冲正、“ChargeBack"等交易总的交易次数 
CYBERBANK
软件在收到如下一个处理代码时会增加借记重发交易次数,并在清算表报中反映。 
交易码交易服务 
20
借记(!!!),退货 
21
借记,存款 
22
借记,调整(客户修改)

 

39Bit78转帐交易笔数(Transfers,Number) 
位图位置:78 
格式:定长 
类型:N10 
描述:转帐的交易总次数。 
系统在收到如下一个处理代码的金融交易时会增加转帐交易的次数。 
交易码交易服务 
40
客户相关帐户间转帐

 


40
Bit79转帐自动冲正交易笔数(Transfers,Reversal Number) 
位图位置:79 
格式:定长 
类型:N10 
描述:转帐的自动冲正交易总次数。 
系统在收到如下一个处理代码的自动冲正交易时会增加转帐自动冲正交易的次数。 
交易码交易服务 
40
客户相关帐户间转帐

 

41Bit80查询交易笔数(Inquiries,Number) 
位图位置:80 
格式:定长 
类型:N10 
描述:成功的查询交易次数。 
系统软件在收到如下一个处理代码时会增加查询交易次数。 
交易码交易服务 
30
查询可用金额

 

42Bit81授权交易笔数(Authorization,Number) 
位图位置:81 
格式:定长 
类型:N10 
描述:成功的授权交易总额 
在收到一个授权交易时系统将授权交易笔数加一。

 

43Bit83贷记交易费金额(Credits,TransactionFeeAmount) 
位图位置:83 
格式:定长 
类型:N12 
描述:净交易费用,如交易金额为正。

 

44Bit85借记交易费金额(Debits,TransactionFeeAmount) 
位图位置:85 
格式:定长 
类型:N12 
描述:净交易费用,如交易金额为负。

 

45Bit86贷记交易金额(Credits,Amount) 
位图位置:86 
格式:定长 
类型:N16 
描述:贷记金融交易总的交易金额,不含任何费用。 
系统在收到如下一个处理代码时会增加贷记交易金额,并在清算表报中反映。 
交易码交易服务 
20
贷记,退货 
21
贷记,存款 
22
贷记,调整(客户修改)

 

46Bit87贷记自动冲正金额(Credits,ReversalAmount) 
位图位置:87 
格式:定长 
类型:N16 
描述:信用卡自动冲正交易的总金额,不含任何费用。

 

47Bit88借记交易金额(Debits,Amount) 
位图位置:88 
格式:定长 
类型:N16 
描述:借记金融交易总的交易金额,不含任何费用。 
系统在收到如下一个处理代码时会增加借记交易金额,并在清算表报中反映。 
交易码交易服务 
00
借记,购物与服务 
01
借记,取现 
02
借记,调整(客户调整)

 

48Bit89借记自动冲正交易金额(Debits,ReversalAmount) 
位图位置:89 
格式:定长 
类型:N16 
描述:借记自动冲正交易的总金额,不含任何费用。

 

49Bit90原交易的数据元素(OriginalData Elements) 
位图位置:90 
格式:定长 
类型:N42 
描述:存放原交易的一些数据,用于修改或自动冲正。 
数据由以下五部分组成: 
位置描述 
1
4信息类型码 
设为原交易的信息类型代码 
5
10系统跟踪号 
原交易系统跟踪号 
11
20交易日期和时间 
原交易的交易日期和时间 
21
31原收单机构 
原交易的收单机构 
不足11位的机构代码,左补‘0’ 
32
42原向前机构 
原交易的收单机构 
不足11位的机构代码,左补‘0’

 

50Bit91文件修改编码(FileUpdate Code) 
位图位置:91 
格式:定长 
类型:AN1 
描述:用此域指示某文件怎样维护。 
CYBERBANK
支持以下一些修改代码: 
1
增加记录 
2
改变记录 
3
删除记录 
5
查询 
7
增加文件

 

选用条件:

 

51Bit94服务指示码(ServiceIndicator) 
位图位置:94 
格式:定长 
类型:AN7 
描述:指示文件修改服务。

 

选用条件:

 

52Bit95代替金额(ReplacementAmounts) 
位图位置:95 
格式:定长 
类型:N42!!! 
描述:客户修改或部分取消已完成的交易,最后实际发生的交易金额, 
交易的原交易金额存放在90域。 
本域由以下4部分组成 
Sub-ElementAmountAttribute 
交易实际金额N12 
结算实际金额N12 
实际交易费用XN8 
实际结算费用XN8

 

53Bit97净结算金额(NetSettlement Amount) 
位图位置:97 
格式:定长 
类型:X+N16 
描述:此域为净结帐金额。 
502
交易中用于发送当天的净结算金额 
例:“C0000000020000000”,表示贷方(''?)200000.00元。 
“D0000000020000000”
,表示借方(''?)200000.00元。

 


54
Bit99结算机构码(Settlement Institution Identification) 
位图位置:99 
格式:LLVAR 
类型:N..11 
描述:此域存放接收清算信息的机构代码。 
返回数据包此域必须和请求数据包一致。

 

55Bit100接收机构码(ReceivingInstitution Identification) 
位图位置:100 
格式:LLVAR 
类型:N..11 
描述:金融交易此域存放授权机构代码。 
网管类交易,800/820交易,此域存放请求的目的机构代码。 
返回数据包此域必须和请求数据包一致。

 

56Bit101文件名(FileName) 
位图位置:101 
格式:LLVAR 
类型:ANS..17 
描述:发送机构设置的文件名。

 

57Bit102帐号1(AccountIdentification1) 
位图位置:102 
格式:LLVAR 
类型:ANS..28 
描述:一个特定的客户帐号。帐号1用来描述受借记、转出、支付等交易影响的帐户。 
选用条件:转帐时使用。

 

58Bit103帐号2(AccountIdentiication2) 
位图位置:103 
格式:LLVAR 
类型:ANS..28 
描述:交易的补充信息,如:第二货币号、利率代码、起止日期等。 
定义如下表 
0000000000000000000000000000000000000000000000000 
位置长度描述 
00
2122帐户 
22
276发卡机构号

 

如果此域存在,将按此机构代码作为路由信息。 
选用条件:机构间转帐时使用。

 


60
Bit123新密码数据(New PIN Data) 
位图位置:123 
格式:LLLVAR 
类型:B...16 
描述:修改密码交易时存放新密码。 
格式参考52 
选用条件:修改密码交易时必须有此域。

 

61Bit128信息确认码(MAC) 
位图位置:128 
格式:定长 
类型:B16 
描述:数据包的最后一个域,用于验证信息来源的合法性,以及数据包中数据是否未被篡改。 
MAC
的计算参ANSIX.99 
为提高效率,在发送者和接收者之间,只有以下一些重要的域参加MAC的计算。数据包中如果存在以下数据域,它们将参加MAC的计算。

 

位图域名 
2
基本帐号 
3
处理代码 
4
交易金额 
11
系统跟踪号 
12
本地交易时间 
13
本地交易日期 
32
收单机构代码 
38
授权码 
39
返回码 
41
收单终端代码 
49
交易货币代码 
95
替换金额

 

选用条件:使用65128数据域的数据包需使用此域。

 

 

 

源代码

 

下面是本人所写的关于iso8583协议的源代码,有不好的地方还请指出,以便完善:

 

(配合前面给的ASCIIBCD转化一起使用)

 

/*****************************iso8583.h******************************/

 

#ifndef _ISO8583_H
#define _ISO8583_H

 

#include <stdio.h>

 

#ifdef MY_DEBUG
#define MY_TRACE(x,args)  fprintf(stderr, x, args)
#else
#define MY_TRACE(x,args)
#endif

 

#defineMY_BITGET(p,n) ((p)[(n-1)/8]&(0x80>>((n-1)%8)))      //bit
#define MY_BITSET(p,n) ((p)[(n-1)/8]|=(0x80>>((n-1)%8)))      //
bit
#define MY_BITCLR(p,n) ((p)[(n-1)/8]&=(~(0x80>>((n-1)%8))))   //
bit

 


/*
 * ISO8583
版本信息,不同版本,ISO_DEF变量g_isodef定义就不同,0时自定义
 */
#define ISO8583_VERSION  0

 

/*
 * 
数据域个数,正常标准为128,如有需要可以为64
 */
#define ISO_FLDS 64

 

#define TYP_BIT 0
#define TYP_BCD  1
#define TYP_ASC  2
#define TYP_BIN  3

 

#define FMT_FIXED 0
#define FMT_LLVAR 2
#define FMT_LLLVAR 3

 

/*
 * ISO
定义域结构定义
 */
typedef struct tagISO_DEF {
 short typ;
 short fmt;
 int   len;
#if ISO8583_VERSION==93
 const char *dsc;
#endif
} ISO_DEF;

 

/*
 * ISO
数据域结构定义
 */
typedef struct tagISO_MSG {
 struct tagISO_FLD {
  int len;
  unsigned char *buf;
 } fld[ISO_FLDS+1];
} ISO_MSG;

 

/*
 * 
ISO_MSG变量m进行初始化,最开始必须先调用此函数
 */
void iso8583_init(ISO_MSG *m);

 

/*
 * 
设置ISO_MSG变量m中第idx位的值为data, data长度为len.
 */
int iso8583_set(ISO_MSG *m, int idx, const unsigned char *data, int len);

 

/*
 * 
取得ISO_MSG变量m中第idx位的值到data, 希望最大长度为len.
 */
int iso8583_get(const ISO_MSG *m, int idx, unsigned char *data, int len);

 

/*
 * 
ISO_MSG变量m中数据按定义好的格式组包到buf中。
 */
int iso8583_pack(const ISO_MSG *m, char *buf);

 

/*
 * 
buf中数据按定义好的格式解包到ISO_MSG变量m中。
 */
int iso8583_unpack(ISO_MSG *m, const char *buf);

 

/*
 * 
ISO_MSG变量m中数据按定义好的格式保存到FILE中。
 */
void iso8583_dump(FILE *fp, ISO_MSG *m);

 

/*
 * 
释放ISO_MSG变量m中数据及占用空间,unpack之前也需要free.
 */
void iso8583_free(ISO_MSG *m);

 

#endif /* iso8583.h */

 


/************************************iso8583.c******************************/

 

#include<stdlib.h>
#include <string.h>
#include "stdfunc.h"
#include "iso8583.h"

 

/*
 * 
组包解包是否压缩数据,通常在POS中需压缩
 */
static int s_iCompress = 1;

 

static ISO_DEFs_isodef[] = {

 

#ifISO8583_VERSION==93

 

   /*000*/ {TYP_BCD, 0, 4, "Message Type Indicator"},
    /*001*/ {TYP_BIT, 0, 16, "Bitmap"},
    /*002*/ {TYP_BCD, 2, 19, "Primary Accountnumber"},
    /*003*/ {TYP_BCD, 0, 6, "Processing Code"},
    /*004*/ {TYP_BCD, 0, 12, "Amount, Transaction"},
    /*005*/ {TYP_BCD, 0, 12, "Amount,Reconciliation"},
    /*006*/ {TYP_BCD, 0, 12, "Amount, Cardholderbilling"},
    /*007*/ {TYP_BCD, 0, 10, "Date and time, transmission"},
    /*008*/ {TYP_BCD, 0, 8, "Amount, Cardholder billingfee"},
    /*009*/ {TYP_BCD, 0, 8, "Conversion rate,Reconciliation"},
    /*010*/ {TYP_BCD, 0, 8, "Conversion rate, Cardholderbilling"},
    /*011*/ {TYP_BCD, 0, 6, "Systems trace auditnumber"},
    /*012*/ {TYP_BCD, 0, 12, "Date and time, Localtransaction"},
    /*013*/ {TYP_BCD, 0, 4, "Date, Effective"},
    /*014*/ {TYP_BCD, 0, 4, "Date, Expiration"},
    /*015*/ {TYP_BCD, 0, 6, "Date, Settlement"},
    /*016*/ {TYP_BCD, 0, 4, "Date, Conversion"},
    /*017*/ {TYP_BCD, 0, 4, "Date, Capture"},
    /*018*/ {TYP_BCD, 0, 4, "Merchant type"},
    /*019*/ {TYP_BCD, 0, 3, "Country code, Acquiringinstitution"},
    /*020*/ {TYP_BCD, 0, 3, "Country code, Primary accountnumber"},
    /*021*/ {TYP_BCD, 0, 3, "Country code, Forwardinginstitution"},
    /*022*/ {TYP_ASC, 0, 12, "Point of service datacode"},
    /*023*/ {TYP_BCD, 0, 3, "Card sequence number"},
    /*024*/ {TYP_BCD, 0, 3, "Function code"},
    /*025*/ {TYP_BCD, 0, 4, "Message reason code"},
    /*026*/ {TYP_BCD, 0, 4, "Card acceptor businesscode"},
    /*027*/ {TYP_BCD, 0, 1, "Approval code length"},
    /*028*/ {TYP_BCD, 0, 6, "Date, Reconciliation"},
    /*029*/ {TYP_BCD, 0, 3, "Reconciliationindicator"},
    /*030*/ {TYP_BCD, 0, 24, "Amounts, original"},
    /*031*/ {TYP_ASC, 2, 99, "Acquirer referencedata"},
    /*032*/ {TYP_BCD, 2, 11, "Acquirer institutionidentification code"},
    /*033*/ {TYP_BCD, 2, 11, "Forwarding institutionidentification code"},
    /*034*/ {TYP_ASC, 2, 28, "Primary account number,extended"},
    /*035*/ {TYP_ASC, 2, 37, "Track 2 data"},
    /*036*/ {TYP_ASC, 3, 104, "Track 3 data"},
    /*037*/ {TYP_ASC, 0, 12, "Retrieval referencenumber"},
    /*038*/ {TYP_ASC, 0, 6, "Approval code"},
    /*039*/ {TYP_BCD, 0, 3, "Action code"},
    /*040*/ {TYP_BCD, 0, 3, "Service code"},
    /*041*/ {TYP_ASC, 0, 8, "Card acceptor terminalidentification"},
    /*042*/ {TYP_ASC, 0, 15, "Card acceptor identificationcode"},
    /*043*/ {TYP_ASC, 2, 99, "Card acceptor name/location"},
    /*044*/ {TYP_ASC, 2, 99, "Additional responsedata"},
    /*045*/ {TYP_ASC, 2, 76, "Track 1 data"},
    /*046*/ {TYP_ASC, 3, 204, "Amounts, Fees"},
    /*047*/ {TYP_ASC, 3, 999, "Additional data -national"},
    /*048*/ {TYP_ASC, 3, 999, "Additional data -private"},
    /*049*/ {TYP_ASC, 0, 3, "Currency code,Transaction"},
    /*050*/ {TYP_ASC, 0, 3, "Currency code,Reconciliation"},
    /*051*/ {TYP_ASC, 0, 3, "Currency code, Cardholderbilling"},
    /*052*/ {TYP_BIN, 0, 8, "Personal identificationnumber, PIN) data"},
    /*053*/ {TYP_BIN, 2, 48, "Security related controlinformation"},
    /*054*/ {TYP_ASC, 3, 120, "Amounts, additional"},
    /*055*/ {TYP_BIN, 3, 255, "IC card system relateddata"},
    /*056*/ {TYP_BIN, 3, 255, "Original dataelements"},
    /*057*/ {TYP_BCD, 0, 3, "Authorization life cyclecode"},
    /*058*/ {TYP_BCD, 2, 11, "Authorizing agent institutionId Code"},
    /*059*/ {TYP_ASC, 3, 999, "Transport data"},
    /*060*/ {TYP_ASC, 3, 999, "Reserved for nationaluse"},
    /*061*/ {TYP_ASC, 3, 999, "Reserved for nationaluse"},
    /*062*/ {TYP_ASC, 3, 999, "Reserved for privateuse"},
    /*063*/ {TYP_ASC, 3, 999, "Reserved for privateuse"},
    /*064*/ {TYP_BIN, 0, 8, "Message authentication codefield"}

 

#if ISO_FLDS==128 
 ,
 /*065*/ {TYP_BIN, 0, 8, "Reserved for ISO use"},
    /*066*/ {TYP_ASC, 3, 204, "Amounts, originalfees"},
    /*067*/ {TYP_BCD, 0, 2, "Extended payment data"},
    /*068*/ {TYP_BCD, 0, 3, "Country code, receivinginstitution"},
    /*069*/ {TYP_BCD, 0, 3, "Country code, settlementinstitution"},
    /*070*/ {TYP_BCD, 0, 3, "Country code, authorizingagent Inst."},
    /*071*/ {TYP_BCD, 0, 8, "Message number"},
    /*072*/ {TYP_ASC, 3, 999, "Data record"},
    /*073*/ {TYP_BCD, 0, 6, "Date, action"},
    /*074*/ {TYP_BCD, 0, 10, "Credits, number"},
    /*075*/ {TYP_BCD, 0, 10, "Credits, reversalnumber"},
    /*076*/ {TYP_BCD, 0, 10, "Debits, number"},
    /*077*/ {TYP_BCD, 0, 10, "Debits, reversalnumber"},
    /*078*/ {TYP_BCD, 0, 10, "Transfer, number"},
    /*079*/ {TYP_BCD, 0, 10, "Transfer, reversalnumber"},
    /*080*/ {TYP_BCD, 0, 10, "Inquiries, number"},
    /*081*/ {TYP_BCD, 0, 10, "Authorizations,number"},
    /*082*/ {TYP_BCD, 0, 10, "Inquiries, reversalnumber"},
    /*083*/ {TYP_BCD, 0, 10, "Payments, number"},
    /*084*/ {TYP_BCD, 0, 10, "Payments, reversalnumber"},
    /*085*/ {TYP_BCD, 0, 10, "Fee collections,number"},
    /*086*/ {TYP_BCD, 0, 16, "Credits, amount"},
    /*087*/ {TYP_BCD, 0, 16, "Credits, reversal amount"},
    /*088*/ {TYP_BCD, 0, 16, "Debits, amount"},
    /*089*/ {TYP_BCD, 0, 16, "Debits, reversalamount"},
    /*090*/ {TYP_BCD, 0, 10, "Authorizations, reversalnumber"},
    /*091*/ {TYP_BCD, 0, 3, "Country code, transactionDest. Inst."},
    /*092*/ {TYP_BCD, 0, 3, "Country code, transactionOrig. Inst."},
    /*093*/ {TYP_BCD, 2, 11, "Transaction Dest. Inst. Idcode"},
    /*094*/ {TYP_BCD, 2, 11, "Transaction Orig. Inst. Idcode"},
    /*095*/ {TYP_ASC, 2, 99, "Card issuer referencedata"},
    /*096*/ {TYP_BIN, 3, 999, "Key management data"},
    /*097*/ {TYP_BCD, 0, 1+16, "Amount, Netreconciliation"}, /* was ISO_AMOUNT */
    /*098*/ {TYP_ASC, 0, 25, "Payee"},
    /*099*/ {TYP_ASC, 2, 11, "Settlement institution Idcode"},
    /*100*/ {TYP_BCD, 2, 11, "Receiving institution Idcode"},
    /*101*/ {TYP_ASC, 2, 17, "File name"},
    /*102*/ {TYP_ASC, 2, 28, "Account identification1"},
    /*103*/ {TYP_ASC, 2, 28, "Account identification2"},
    /*104*/ {TYP_ASC, 3, 100, "Transactiondescription"},
    /*105*/ {TYP_BCD, 0, 16, "Credits, Chargebackamount"},
    /*106*/ {TYP_BCD, 0, 16, "Debits, Chargebackamount"},
    /*107*/ {TYP_BCD, 0, 10, "Credits, Chargebacknumber"},
    /*108*/ {TYP_BCD, 0, 10, "Debits, Chargebacknumber"},
    /*109*/ {TYP_ASC, 2, 84, "Credits, Fee amounts"},
    /*110*/ {TYP_ASC, 2, 84, "Debits, Fee amounts"},
    /*111*/ {TYP_ASC, 3, 999, "Reserved for ISO use"},
    /*112*/ {TYP_ASC, 3, 999, "Reserved for ISO use"},
    /*113*/ {TYP_ASC, 3, 999, "Reserved for ISO use"},
    /*114*/ {TYP_ASC, 3, 999, "Reserved for ISO use"},
    /*115*/ {TYP_ASC, 3, 999, "Reserved for ISO use"},
    /*116*/ {TYP_ASC, 3, 999, "Reserved for nationaluse"},
    /*117*/ {TYP_ASC, 3, 999, "Reserved for nationaluse"},
    /*118*/ {TYP_ASC, 3, 999, "Reserved for nationaluse"},
    /*119*/ {TYP_ASC, 3, 999, "Reserved for nationaluse"},
    /*120*/ {TYP_ASC, 3, 999, "Reserved for nationaluse"},
    /*121*/ {TYP_ASC, 3, 999, "Reserved for nationaluse"},
    /*122*/ {TYP_ASC, 3, 999, "Reserved for nationaluse"},
    /*123*/ {TYP_ASC, 3, 999, "Reserved for privateuse"},
    /*124*/ {TYP_ASC, 3, 999, "Reserved for privateuse"},
    /*125*/ {TYP_ASC, 3, 999, "Reserved for privateuse"},
    /*126*/ {TYP_ASC, 3, 999, "Reserved for privateuse"},
    /*127*/ {TYP_ASC, 3, 999, "Reserved for privateuse"},
    /*128*/ {TYP_BIN, 0, 8, "Message authentication codefield"}
#endif /*ISO_FLDS==128*/

 

#else/*ISO8583_VERSION*/

 

   /*000*/ {TYP_BCD, 0, 4}, // "Message Type Indicator"
    /*001*/ {TYP_BIT, 0, 16}, // "Bitmap"
    /*002*/ {TYP_BCD, 2, 22}, // "Primary Accountnumber"
    /*003*/ {TYP_BCD, 0, 6}, // "Processing Code"
    /*004*/ {TYP_BCD, 0, 12}, // "Amount, Transaction"
    /*005*/ {TYP_BCD, 0, 12}, // "Amount,Reconciliation"
    /*006*/ {TYP_BCD, 0, 12}, // "Amount, Cardholderbilling"
    /*007*/ {TYP_BCD, 0, 10}, // "Date and time,transmission"
    /*008*/ {TYP_BCD, 0, 8}, // "Amount, Cardholder billingfee"
    /*009*/ {TYP_BCD, 0, 8}, // "Conversion rate,Reconciliation"
    /*010*/ {TYP_BCD, 0, 8}, // "Conversion rate,Cardholder billing"
    /*011*/ {TYP_BCD, 0, 6}, // "Systems trace auditnumber"
    /*012*/ {TYP_BCD, 0, 12}, // "Date and time, Localtransaction"
    /*013*/ {TYP_BCD, 0, 4}, // "Date, Effective"
    /*014*/ {TYP_BCD, 0, 4}, // "Date, Expiration"
    /*015*/ {TYP_BCD, 0, 6}, // "Date, Settlement"
    /*016*/ {TYP_BCD, 0, 4}, // "Date, Conversion"
    /*017*/ {TYP_BCD, 0, 4}, // "Date, Capture"
    /*018*/ {TYP_BCD, 0, 4}, // "Merchant type"
    /*019*/ {TYP_BCD, 0, 3}, // "Country code, Acquiringinstitution"
    /*020*/ {TYP_BCD, 0, 3}, // "Country code, Primaryaccount number"
    /*021*/ {TYP_BCD, 0, 3}, // "Country code, Forwardinginstitution"
    /*022*/ {TYP_ASC, 0, 12}, // "Point of service datacode"
    /*023*/ {TYP_BCD, 0, 3}, // "Card sequence number"
    /*024*/ {TYP_BCD, 0, 3}, // "Function code"
    /*025*/ {TYP_BCD, 0, 4}, // "Message reason code"
    /*026*/ {TYP_BCD, 0, 4}, // "Card acceptor businesscode"
    /*027*/ {TYP_BCD, 0, 1}, // "Approval code length"
    /*028*/ {TYP_BCD, 0, 6}, // "Date, Reconciliation"
    /*029*/ {TYP_BCD, 0, 3}, // "Reconciliationindicator"
    /*030*/ {TYP_BCD, 0, 24}, // "Amounts, original"
    /*031*/ {TYP_ASC, 2, 99}, // "Acquirer referencedata"
    /*032*/ {TYP_BCD, 2, 11}, // "Acquirer institutionidentification code"
    /*033*/ {TYP_BCD, 2, 11}, // "Forwarding institutionidentification code"
    /*034*/ {TYP_ASC, 2, 28}, // "Primary account number,extended"
    /*035*/ {TYP_ASC, 2, 37}, // "Track 2 data"
    /*036*/ {TYP_ASC, 3, 104}, // "Track 3 data"
    /*037*/ {TYP_ASC, 0, 12}, // "Retrieval referencenumber"
    /*038*/ {TYP_ASC, 0, 6}, // "Approval code"
    /*039*/ {TYP_BCD, 0, 3}, // "Action code"
    /*040*/ {TYP_BCD, 0, 3}, // "Service code"
    /*041*/ {TYP_ASC, 0, 8}, // "Card acceptor terminalidentification"
    /*042*/ {TYP_ASC, 0, 15}, // "Card acceptoridentification code"
    /*043*/ {TYP_ASC, 2, 99}, // "Card acceptorname/location"
    /*044*/ {TYP_ASC, 2, 99}, // "Additional responsedata"
    /*045*/ {TYP_ASC, 2, 76}, // "Track 1 data"
    /*046*/ {TYP_ASC, 3, 204}, // "Amounts, Fees"
    /*047*/ {TYP_ASC, 3, 999}, // "Additional data -national"
    /*048*/ {TYP_ASC, 3, 999}, // "Additional data -private"
    /*049*/ {TYP_ASC, 0, 3}, // "Currency code,Transaction"
    /*050*/ {TYP_ASC, 0, 3}, // "Currency code,Reconciliation"
    /*051*/ {TYP_ASC, 0, 3}, // "Currency code, Cardholderbilling"
    /*052*/ {TYP_BIN, 0, 8}, // "Personal identificationnumber, PIN) data"
    /*053*/ {TYP_BIN, 2, 48}, // "Security related controlinformation"
    /*054*/ {TYP_ASC, 3, 120}, // "Amounts,additional"
    /*055*/ {TYP_BIN, 3, 255}, // "IC card system relateddata"
    /*056*/ {TYP_BIN, 3, 255}, // "Original dataelements"
    /*057*/ {TYP_BCD, 0, 3}, // "Authorization life cyclecode"
    /*058*/ {TYP_BCD, 2, 11}, // "Authorizing agentinstitution Id Code"
    /*059*/ {TYP_ASC, 3, 999}, // "Transport data"
    /*060*/ {TYP_ASC, 3, 999}, // "Reserved for nationaluse"
    /*061*/ {TYP_ASC, 3, 999}, // "Reserved for nationaluse"
    /*062*/ {TYP_ASC, 3, 999}, // "Reserved for privateuse"
    /*063*/ {TYP_ASC, 3, 999}, // "Reserved for privateuse"
    /*064*/ {TYP_BIN, 0, 8}  // "Messageauthentication code field"

 

#if ISO_FLDS==128
 ,
 /*065*/ {TYP_BIN, 0, 8}, // "Reserved for ISO use"
    /*066*/ {TYP_ASC, 3, 204}, // "Amounts, originalfees"
    /*067*/ {TYP_BCD, 0, 2}, // "Extended paymentdata"
    /*068*/ {TYP_BCD, 0, 3}, // "Country code, receivinginstitution"
    /*069*/ {TYP_BCD, 0, 3}, // "Country code, settlementinstitution"
    /*070*/ {TYP_BCD, 0, 3}, // "Country code, authorizingagent Inst."
    /*071*/ {TYP_BCD, 0, 8}, // "Message number"
    /*072*/ {TYP_ASC, 3, 999}, // "Data record"
    /*073*/ {TYP_BCD, 0, 6}, // "Date, action"
    /*074*/ {TYP_BCD, 0, 10}, // "Credits, number"
    /*075*/ {TYP_BCD, 0, 10}, // "Credits, reversalnumber"
    /*076*/ {TYP_BCD, 0, 10}, // "Debits, number"
    /*077*/ {TYP_BCD, 0, 10}, // "Debits, reversalnumber"
    /*078*/ {TYP_BCD, 0, 10}, // "Transfer, number"
    /*079*/ {TYP_BCD, 0, 10}, // "Transfer, reversalnumber"
    /*080*/ {TYP_BCD, 0, 10}, // "Inquiries, number"
    /*081*/ {TYP_BCD, 0, 10}, // "Authorizations,number"
    /*082*/ {TYP_BCD, 0, 10}, // "Inquiries, reversalnumber"
    /*083*/ {TYP_BCD, 0, 10}, // "Payments, number"
    /*084*/ {TYP_BCD, 0, 10}, // "Payments, reversalnumber"
    /*085*/ {TYP_BCD, 0, 10}, // "Fee collections,number"
    /*086*/ {TYP_BCD, 0, 16}, // "Credits, amount"
    /*087*/ {TYP_BCD, 0, 16}, // "Credits, reversalamount"
    /*088*/ {TYP_BCD, 0, 16}, // "Debits, amount"
    /*089*/ {TYP_BCD, 0, 16}, // "Debits, reversalamount"
    /*090*/ {TYP_BCD, 0, 10}, // "Authorizations, reversalnumber"
    /*091*/ {TYP_BCD, 0, 3}, // "Country code, transactionDest. Inst."
    /*092*/ {TYP_BCD, 0, 3}, // "Country code, transactionOrig. Inst."
    /*093*/ {TYP_BCD, 2, 11}, // "Transaction Dest. Inst.Id code"
    /*094*/ {TYP_BCD, 2, 11}, // "Transaction Orig. Inst.Id code"
    /*095*/ {TYP_ASC, 2, 99}, // "Card issuer referencedata"
    /*096*/ {TYP_BIN, 3, 999}, // "Key managementdata"
    /*097*/ {TYP_BCD, 0, 1+16}, // "Amount, Netreconciliation"/* was ISO_AMOUNT */
    /*098*/ {TYP_ASC, 0, 25}, // "Payee"
    /*099*/ {TYP_ASC, 2, 11}, // "Settlement institution Idcode"
    /*100*/ {TYP_BCD, 2, 11}, // "Receiving institution Idcode"
    /*101*/ {TYP_ASC, 2, 17}, // "File name"
    /*102*/ {TYP_ASC, 2, 28}, // "Account identification1"
    /*103*/ {TYP_ASC, 2, 28}, // "Account identification2"
    /*104*/ {TYP_ASC, 3, 100}, // "Transactiondescription"
    /*105*/ {TYP_BCD, 0, 16}, // "Credits, Chargebackamount"
    /*106*/ {TYP_BCD, 0, 16}, // "Debits, Chargebackamount"
    /*107*/ {TYP_BCD, 0, 10}, // "Credits, Chargebacknumber"
    /*108*/ {TYP_BCD, 0, 10}, // "Debits, Chargebacknumber"
    /*109*/ {TYP_ASC, 2, 84}, // "Credits, Feeamounts"
    /*110*/ {TYP_ASC, 2, 84}, // "Debits, Fee amounts"
    /*111*/ {TYP_ASC, 3, 999}, // "Reserved for ISOuse"
    /*112*/ {TYP_ASC, 3, 999}, // "Reserved for ISO use"
    /*113*/ {TYP_ASC, 3, 999}, // "Reserved for ISOuse"
    /*114*/ {TYP_ASC, 3, 999}, // "Reserved for ISOuse"
    /*115*/ {TYP_ASC, 3, 999}, // "Reserved for ISOuse"
    /*116*/ {TYP_ASC, 3, 999}, // "Reserved for nationaluse"
    /*117*/ {TYP_ASC, 3, 999}, // "Reserved for nationaluse"
    /*118*/ {TYP_ASC, 3, 999}, // "Reserved for nationaluse"
    /*119*/ {TYP_ASC, 3, 999}, // "Reserved for nationaluse"
    /*120*/ {TYP_ASC, 3, 999}, // "Reserved for nationaluse"
    /*121*/ {TYP_ASC, 3, 999}, // "Reserved for nationaluse"
    /*122*/ {TYP_ASC, 3, 999}, // "Reserved for nationaluse"
    /*123*/ {TYP_ASC, 3, 999}, // "Reserved for privateuse"
    /*124*/ {TYP_ASC, 3, 999}, // "Reserved for privateuse"
    /*125*/ {TYP_ASC, 3, 999}, // "Reserved for privateuse"
    /*126*/ {TYP_ASC, 3, 999}, // "Reserved for privateuse"
    /*127*/ {TYP_ASC, 3, 999}, // "Reserved for privateuse"
    /*128*/ {TYP_BIN, 0, 8}  // "Messageauthentication code field"

 

#endif/*ISO_FLDS==128*/

 

#endif/*ISO8583_VERSION*/
};

 


void iso8583_compress(int c)
{
 s_iCompress = c;
}

 

/* Initialize an ISOmessage struct - i.e. set all entries to NULL */
void iso8583_init(ISO_MSG *m)
{
 int i;

 

 for (i=0;i<=ISO_FLDS; i++) {
  m->fld[i].buf = NULL;
  m->fld[i].len = 0;
 }
}

 

intiso8583_set(ISO_MSG *m, int idx, const unsigned char *data, int len)
{
 if (m->fld[idx].buf != NULL) {
  free(m->fld[idx].buf);
  m->fld[idx].buf = NULL;
  m->fld[idx].len = 0;
 }

 

 if (len >s_isodef[idx].len)
  return 0;
 
 m->fld[idx].len = len;
 m->fld[idx].buf = (unsigned char*)malloc(m->fld[idx].len *sizeof(char));
 if (m->fld[idx].buf == NULL)
  return 0;

 

 memcpy(m->fld[idx].buf,data, m->fld[idx].len);

 

 return len;
}

 

int iso8583_get(constISO_MSG *m, int idx, unsigned char *data, int len)
{
 if (m == NULL || data == NULL || m->fld[idx].buf == NULL)
  return 0;
 
 if (m->fld[idx].len > len)
  return 0;
  
 memcpy(data, m->fld[idx].buf, m->fld[idx].len);
 
 return m->fld[idx].len;
}

 


/*
 * Using the definition d, pack the content of the ISO message m into 
 * buf. NOTE: buf must be large enough to contain the packed message.
 * Returns the length of the data written to buf.
 */
int iso8583_pack(const ISO_MSG *m, char *buf)
{
 char *start = buf;
 int flds, i;
 char fmt[8], tmp[8]={0};

 

 /* Field 0 ismandatory and fixed length. */
 if (m->fld[0].len != s_isodef[0].len || s_isodef[0].fmt != FMT_FIXED){
  MY_TRACE("flds = %d", 0);
  return -1;
 }

 

 if(s_iCompress) 
 {
  buf += ASC2BCD(buf, m->fld[0].buf, s_isodef[0].len, s_isodef[0].fmt);
 }
 else
 {
  memcpy(buf, m->fld[0].buf, s_isodef[0].len);
  buf += s_isodef[0].len;  
 }

 

 /*
  * The bitmap contains either 64 or 128 fields - flds is the 
  * number of allowed fields, i.e. either 64 or 128.
  */
 if (m->fld[1].buf == NULL || s_isodef[1].len != 16) {
  MY_TRACE("flds = %d", 1);
  return -1;
 }
 
#if ISO_FLDS==128
 if ((m->fld[1].len == s_isodef[1].len) && (m->fld[1].buf[0]& 0x80))
 {
  memcpy(buf, m->fld[1].buf, s_isodef[0].len);
  buf += s_isodef[1].len;
  flds = 128;
 }
 else
 {
  if ((m->fld[1].len == 8) && !(m->fld[1].buf[0] &0x80))
  {
   memcpy(buf, m->fld[1].buf, 8);
   buf += 8;
   flds = 64;
  }
  else
  {
   MY_TRACE("flds = %d", 1);
   return -1;
  }
 }
#else /*ISO_FLDS==128*/
 if ((m->fld[1].len != 8) || (m->fld[1].buf[0] & 0x80)) {
  MY_TRACE("flds = %d", 1);
  return -1;
 }
 
 memcpy(buf, m->fld[1].buf, m->fld[1].len);
 buf += m->fld[1].len;
 flds = 64;
#endif /*ISO_FLDS==128*/

 

 for (i = 2; i<= flds; i++) 
 {
  if (MY_BITGET(m->fld[1].buf, i)) 
  { /* i'th bit != 0 */
   if (m->fld[i].buf == NULL || m->fld[i].len <= 0 ||m->fld[i].len > s_isodef[i].len)
   {
    MY_TRACE("flds = %d", i);
    return -1;
   }

 

   if(s_isodef[i].fmt) 
   { /* Variable length */
    if (s_iCompress)
    {
     sprintf(fmt, "%%0%dd", s_isodef[i].fmt);
     sprintf(tmp, fmt, m->fld[i].len);
     buf += ASC2BCD(buf, tmp, s_isodef[i].fmt, 0);
    }
    else
    {
     sprintf(fmt, "%%0%dd", s_isodef[i].fmt);
     sprintf(buf, fmt, m->fld[i].len);
     buf += s_isodef[i].fmt;
    }   
   }

 

   switch(s_isodef[i].typ) {
   case TYP_BCD: /* Fallthrough */
    if (s_iCompress)
    {
     buf += ASC2BCD(buf, m->fld[i].buf,m->fld[i].len, s_isodef[i].fmt); 
     break;
    }
   case TYP_ASC:
   case TYP_BIN:
    memcpy(buf, m->fld[i].buf, m->fld[i].len);
    buf += m->fld[i].len;
    break;
   default:
    MY_TRACE("flds = %d", i);
    return -1;
    break;
   }
     }
 }

 

 return(buf-start);
}

 


/*
 * Using the definition d, unpack the content of buf into the ISO 
 * message struct m.
 * Returns 0. FIXME: Should be something different.
 */
int iso8583_unpack(ISO_MSG *m, const char *buf)
{
 const char *start = buf;
 int flds, i;
    char fmt[8];

 

 memset(fmt, 0,sizeof(fmt));

 

 /* Field 0 ismandatory and fixed length. */
 if (m->fld[0].buf != NULL || s_isodef[0].fmt != FMT_FIXED) {
  MY_TRACE("flds = %d", 0);
  return -1;
 }

 

 m->fld[0].len= s_isodef[0].len;
 m->fld[0].buf = (char *) malloc((m->fld[0].len) * sizeof(char));
 if(s_iCompress)
 {
  buf += BCD2ASC(m->fld[0].buf, buf, m->fld[0].len,s_isodef[0].fmt);
 }
 else
 {
  memcpy(m->fld[0].buf, buf, m->fld[0].len);
  buf += m->fld[0].len;
 }

 


 /*
  * First bit in the bitmap (field 1) defines if the message is 
  * extended or not.
  * 0: not exteded - i.e. only (some of) the fields 0 to 64 are 
  *    used
  * 1: extended - i.e. (some of) the fields 0 to 128 are used
  * I.e. if one or more of the fields 65 to 128 is used, the 
  * bit is 1.
  */
#if ISO_FLDS==128
 if(buf[0] & 0x80) {
  flds = 128;
 } else {
  flds = 64;
 }
#else /*ISO_FLDS==128*/
 if(buf[0] & 0x80) {
  MY_TRACE("flds = %d", 1);
  return -1;
 }
 flds = 64;
#endif /*ISO_FLDS==128*/

 

 m->fld[1].len= flds/8;
 m->fld[1].buf = (char *) calloc((m->fld[1].len), sizeof(char));
 memcpy(m->fld[1].buf, buf, m->fld[1].len);
 buf += m->fld[1].len;

 

 for (i = 2; i<= flds; i++) 
 {
  if (MY_BITGET(m->fld[1].buf, i)) 
  { /* i'th bit != 0 */
   if ( s_isodef[i].fmt)
   { /* Variable length */
    if(s_iCompress) 
    {
     buf += BCD2INT(&(m->fld[i].len), buf,s_isodef[i].fmt, 0);
    }
    else
    {
     sprintf(fmt, "%%0%dd", s_isodef[i].fmt);
     sscanf(buf, fmt, &(m->fld[i].len));
     buf += s_isodef[i].fmt;     
    }   

 

    if(m->fld[i].len > s_isodef[i].len) {
     MY_TRACE("flds = %d", i);
     return -1;
    }
   }
   else
   {
    m->fld[i].len = s_isodef[i].len;
   }

 

  m->fld[i].buf = (char *) malloc((m->fld[i].len) * sizeof(char));
   
   switch (s_isodef[i].typ) {
   case TYP_BCD: /* Fallthrough */
    if(s_iCompress)
    {
     buf += BCD2ASC(m->fld[i].buf, buf,m->fld[i].len, s_isodef[i].fmt); 
     break;
    }
   case TYP_ASC:
   case TYP_BIN:
    memcpy(m->fld[i].buf, buf, m->fld[i].len);
    buf += m->fld[i].len;
    break;
   default:
    MY_TRACE("flds = %d", i);
    return -1;
    break;
   }
  }
 }

 

 return(buf-start);
}

 


/* Dump the content of the ISO message m into a file */
void iso8583_dump(FILE *fp, ISO_MSG *m)
{
 int i, j;

 

 for (i=0;i<=ISO_FLDS; i++) 
 {
  if (m->fld[i].buf != NULL) 
  {
   fprintf(fp, "/nfield #%02d %03d:", i, m->fld[i].len);
   for (j=0; j<m->fld[i].len; j++) {
    fprintf(fp, " %02X", m->fld[i].buf[j]);
   }
  }
 }
}

 


/* Free memory used by the ISO message struct m. */
void iso8583_free(ISO_MSG *m)
{
 int i;

 

 for (i=0;i<=ISO_FLDS; i++) {
  if (m->fld[i].buf != NULL) {
   free(m->fld[i].buf);
   m->fld[i].buf = NULL;
   m->fld[i].len = 0;
  }
 }
}

 

 

 


本文来自CSDN博客,转载请标明出处:http://blog.csdn.net/xpzhang/archive/2006/04/28/695059.aspx

 

原创粉丝点击