[ActiveLock-Development] CVS: activelock/src modActiveLock.bas,1.1,1.2
Brought to you by:
ialkan
From: Thanh H. T. <th...@us...> - 2003-10-05 08:40:22
|
Update of /cvsroot/activelock/activelock/src In directory sc8-pr-cvs1:/tmp/cvs-serv27540 Modified Files: modActiveLock.bas Log Message: Minor change - declare statements to use alcrypto.dll (all lowercase) Index: modActiveLock.bas =================================================================== RCS file: /cvsroot/activelock/activelock/src/modActiveLock.bas,v retrieving revision 1.1 retrieving revision 1.2 diff -u -d -r1.1 -r1.2 --- modActiveLock.bas 7 Aug 2003 17:30:59 -0000 1.1 +++ modActiveLock.bas 5 Oct 2003 08:40:18 -0000 1.2 @@ -89,21 +89,21 @@ ' @param bits key length in bits ' @param pfn TBD ' @param pfnparam TBD -Public Declare Function rsa_generate Lib "ALCrypto" (ptrKey As RSAKey, ByVal bits As Long, ByVal pfn As Long, ByVal pfnparam As Long) As Long +Public Declare Function rsa_generate Lib "alcrypto" (ptrKey As RSAKey, ByVal bits As Long, ByVal pfn As Long, ByVal pfnparam As Long) As Long '' ' Returns the public key blob fro the specified key. ' @param ptrKey RSA key structure ' @param blob [Output] Key bob to be returned ' @param blobLen Length of the key blob, in bytes -Public Declare Function rsa_public_key_blob Lib "ALCrypto" (ptrKey As RSAKey, ByVal blob As String, blobLen As Long) As Long +Public Declare Function rsa_public_key_blob Lib "alcrypto" (ptrKey As RSAKey, ByVal blob As String, blobLen As Long) As Long '' ' Returns the private key blob fro the specified key. ' @param ptrKey RSA key structure ' @param blob [Output] Key bob to be returned ' @param blobLen Length of the key blob, in bytes -Public Declare Function rsa_private_key_blob Lib "ALCrypto" (ptrKey As RSAKey, ByVal blob As String, blobLen As Long) As Long +Public Declare Function rsa_private_key_blob Lib "alcrypto" (ptrKey As RSAKey, ByVal blob As String, blobLen As Long) As Long '' ' Creates a new RSAKey from the specified key blobs. @@ -113,11 +113,11 @@ ' @param priv_len Length of private key blob, in bytes ' @param ptrKey [out] RSA key to be returned. ' -Public Declare Function rsa_createkey Lib "ALCrypto" (ByVal pub_blob As String, ByVal pub_len As Long, ByVal priv_blob As String, ByVal priv_len As Long, ptrKey As RSAKey) As Long +Public Declare Function rsa_createkey Lib "alcrypto" (ByVal pub_blob As String, ByVal pub_len As Long, ByVal priv_blob As String, ByVal priv_len As Long, ptrKey As RSAKey) As Long '' ' Release memory allocated by rsa_createkey() to store the key. ' @param ptrKey RSA key -Public Declare Function rsa_freekey Lib "ALCrypto" (ptrKey As RSAKey) As Long +Public Declare Function rsa_freekey Lib "alcrypto" (ptrKey As RSAKey) As Long '' ' RSA encrypts the data. @@ -126,7 +126,7 @@ ' @param dLen [in/out] Length of data, in bytes. This parameter will contain length of encrypted data when returned. ' @param ptrKey Key to be used for encryption ' -Public Declare Function rsa_encrypt Lib "ALCrypto" (ByVal CryptType As Long, ByVal data As String, dLen As Long, ptrKey As RSAKey) As Long +Public Declare Function rsa_encrypt Lib "alcrypto" (ByVal CryptType As Long, ByVal data As String, dLen As Long, ptrKey As RSAKey) As Long '' ' RSA decrypts the data. @@ -135,7 +135,7 @@ ' @param dLen [in/out] Length of data, in bytes. This parameter will contain length of encrypted data when returned. ' @param ptrKey Key to be used for encryption ' -Public Declare Function rsa_decrypt Lib "ALCrypto" (ByVal CryptType As Long, ByVal data As String, dLen As Long, ptrKey As RSAKey) As Long +Public Declare Function rsa_decrypt Lib "alcrypto" (ByVal CryptType As Long, ByVal data As String, dLen As Long, ptrKey As RSAKey) As Long '' ' Signs the data using the specified RSA private key. @@ -144,7 +144,7 @@ ' @param dLen Data length ' @param sig [out] Signature ' @param sLen Signature length -Public Declare Function rsa_sign Lib "ALCrypto" (ByRef ptrKey As RSAKey, ByVal data As String, ByVal dLen As Long, ByVal sig As String, ByRef sLen As Long) As Long +Public Declare Function rsa_sign Lib "alcrypto" (ByRef ptrKey As RSAKey, ByVal data As String, ByVal dLen As Long, ByVal sig As String, ByRef sLen As Long) As Long '' ' Verifies an RSA signature. @@ -153,14 +153,14 @@ ' @param sLen Signature length ' @param data Data with which to verify ' @param dLen Data length -Public Declare Function rsa_verifysig Lib "ALCrypto" (ByRef ptrKey As RSAKey, ByVal sig As String, ByVal sLen As Long, ByVal data As String, ByVal dLen As Long) As Long +Public Declare Function rsa_verifysig Lib "alcrypto" (ByRef ptrKey As RSAKey, ByVal sig As String, ByVal sLen As Long, ByVal data As String, ByVal dLen As Long) As Long '' ' Computers an MD5 hash from the data. ' @param inData Data to be hashed ' @param nDataLen Length of inData ' @param outData [out] 32-byte Computed hash code -Public Declare Function md5_hash Lib "ALCrypto" (ByVal inData As String, ByVal nDataLen As Long, ByVal outData As String) As Long +Public Declare Function md5_hash Lib "alcrypto" (ByVal inData As String, ByVal nDataLen As Long, ByVal outData As String) As Long Type PhaseType exponential As Byte |