rsa
所属分类:CA认证
开发工具:Delphi
文件大小:146KB
下载次数:11
上传日期:2012-04-26 00:45:11
上 传 者:
mohsen.j
说明: RSA Encryption in Delphi
文件列表:
table.128 (10624, 1999-09-30)
table.192 (12672, 1999-09-30)
table.256 (14720, 1999-09-30)
boxes-ref.dat.pas (6219, 2000-11-17)
ecb_d_m.txt (115409, 2011-10-13)
ecb_e_m.txt (47029, 2012-01-25)
ecb_iv.txt (3710, 2012-01-25)
ecb_tbl.txt (53014, 2012-01-25)
ecb_vk.txt (59725, 2012-01-25)
ecb_vt.txt (32001, 2012-01-25)
rc_codecs.pas (1220, 2000-11-22)
rc_rijndael.dof (1494, 2000-11-22)
rc_rijndael.dpr (297, 2000-11-22)
rc_rijndael.res (876, 2000-11-15)
rc_rijndael_main.dfm (3696, 2000-11-22)
rc_rijndael_main.pas (1819, 2000-11-22)
rc_rndcrypt.pas (4849, 2000-11-23)
rijndael_alg_ref.pas (12575, 2000-11-22)
rijndael_api_ref.pas (15854, 2000-11-22)
rijndaeltest_ref.cfg (412, 2000-11-22)
rijndaeltest_ref.dof (1494, 2000-11-22)
rijndaeltest_ref.dpr (28160, 2000-11-22)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
DELPHI Rijndael algorithm implementation
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
The implementation is based on an original code.
The CBC-mode bug fixed.
As the example of API usage is complemented by simple functions:
{encode string}
function EnCryptString(const sMessage: string; sKeyMaterial: string): string;
{decode string}
function DeCryptString(const sMessage: string; sKeyMaterial: string): string;
{expand KeyMaterial up to iLength digits}
function ExpandKey(sKey: string; iLength: integer): string;
{randomize KeyMaterial - do not use it :)}
function RandomKeyMaterial: string;
{encrypt string}
function StoreCryptString(const sMessage: string; sKeyMaterial: string): string;
{decrypt string}
function ReadCryptString(const sMessage: string; sKeyMaterial: string): string;
---------------------------------------------
Sergey Kirichenko
e-mail: ksv@cheerful.com
Home Page: http://rcolonel.tripod.com
近期下载者:
相关文件:
收藏者: