blowfishunit.pas

BlowFish加密算法.封装过程按照标准的API形式进行

{*******************************************************}
{                                                       }
{                      BlowFish算法                     }
{                                                       }
{         版权所有(C) BieEncrypt安全实验室 2006         }
{                  版本：V1.0                           }
{            主页：http://www.bitencrypt.com            }
{            邮件：[e-mail]                   }
{                                                       }
{*******************************************************}
unit BlowFishUnit;

interface

function BlowFishStrEncrypt(lpInStr:PChar;lpKey:PChar;lpOutStr:PChar):Boolean;stdcall;external 'BlowFish.dll';
function BlowFishStrDecrypt(lpInStr:PChar;lpKey:PChar;lpOutStr:PChar):Boolean;stdcall;external 'BlowFish.dll';
function BlowFishFileEncrypt(lpInFile:PChar;lpKey:PChar;lpOutFile:PChar):Boolean;stdcall;external 'BlowFish.dll';
function BlowFishFileDecrypt(lpInFile:PChar;lpKey:PChar;lpOutFile:PChar):Boolean;stdcall;external 'BlowFish.dll';
function GetVersion(lpVersion:PChar):Boolean;stdcall;external 'BlowFish.dll';

implementation

end.