CnPack Forum - Powered by Discuz! Board

Subject: 谁能帮忙写个hmac-sha1的算法 [Print This Page]

Author: lu_wakin Time: 2014-10-18 10:06 Subject: 谁能帮忙写个hmac-sha1的算法

vcl组件包里有sha1的算法，是否有高手提供下hmac-sha1的算法，主要是开发环境是delphi7+自带的indy，而且又不能随便改控件，indy10里倒是有这个算法

[ 本帖最后由 lu_wakin 于 2014-10-18 10:08 编辑 ]

Author: Passion Time: 2014-10-22 19:47

GIT上我在CnSHA1.pas中加了个方法：

procedure SHA1Hmac(Key: PAnsiChar; KeyLength: Integer; Input: PAnsiChar; Length: LongWord; var Output: TSHA1Digest);

可以更新一下看看是否满足需求？可能有Bug。

GIT地址：

http://github.com/cnpack

里头有俩库。

Welcome to CnPack Forum (http://bbs.cnpack.org/)