--- vendor/wine/dlls/advapi32/crypt.c 2005-02-20 11:11:20 UTC (rev 13675)
+++ vendor/wine/dlls/advapi32/crypt.c 2005-02-20 11:19:28 UTC (rev 13676)
@@ -0,0 +1,1954 @@
+/*
+ * Copyright 1999 Ian Schmidt
+ * Copyright 2001 Travis Michielsen
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2.1 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+ */
+
+/***********************************************************************
+ *
+ * TODO:
+ * - Reference counting
+ * - Thread-safing
+ * - Signature checking
+ */
+
+#include <time.h>
+#include <stdlib.h>
+#include <stdio.h>
+
+#include "crypt.h"
+#include "winnls.h"
+#include "winreg.h"
+#include "wine/debug.h"
+#include "winternl.h"
+#include "ntstatus.h"
+
+WINE_DEFAULT_DEBUG_CHANNEL(crypt);
+
+HWND crypt_hWindow = 0;
+
+#define CRYPT_ReturnLastError(err) {SetLastError(err); return FALSE;}
+
+#define CRYPT_Alloc(size) ((LPVOID)LocalAlloc(LMEM_ZEROINIT, size))
+#define CRYPT_Free(buffer) (LocalFree((HLOCAL)buffer))
+
+static inline PSTR CRYPT_GetProvKeyName(PCSTR pProvName)
+{
+ PCSTR KEYSTR = "Software\\Microsoft\\Cryptography\\Defaults\\Provider\\";
+ PSTR keyname;
+
+ keyname = CRYPT_Alloc(strlen(KEYSTR) + strlen(pProvName) +1);
+ if (keyname)
+ {
+ strcpy(keyname, KEYSTR);
+ strcpy(keyname + strlen(KEYSTR), pProvName);
+ } else
+ SetLastError(ERROR_NOT_ENOUGH_MEMORY);
+ return keyname;
+}
+
+static inline PSTR CRYPT_GetTypeKeyName(DWORD dwType, BOOL user)
+{
+ PCSTR MACHINESTR = "Software\\Microsoft\\Cryptography\\Defaults\\Provider Types\\Type XXX";
+ PCSTR USERSTR = "Software\\Microsoft\\Cryptography\\Provider Type XXX";
+ PSTR keyname;
+ PSTR ptr;
+
+ keyname = CRYPT_Alloc( (user ? strlen(USERSTR) : strlen(MACHINESTR)) +1);
+ if (keyname)
+ {
+ user ? strcpy(keyname, USERSTR) : strcpy(keyname, MACHINESTR);
+ ptr = keyname + strlen(keyname);
+ *(--ptr) = (dwType % 10) + '0';
+ *(--ptr) = ((dwType / 10) % 10) + '0';
+ *(--ptr) = (dwType / 100) + '0';
+ } else
+ SetLastError(ERROR_NOT_ENOUGH_MEMORY);
+ return keyname;
+}
+
+/* CRYPT_UnicodeTOANSI
+ * wstr - unicode string
+ * str - pointer to ANSI string
+ * strsize - size of buffer pointed to by str or -1 if we have to do the allocation
+ *
+ * returns TRUE if unsuccessfull, FALSE otherwise.
+ * if wstr is NULL, returns TRUE and sets str to NULL! Value of str should be checked after call
+ */
+static inline BOOL CRYPT_UnicodeToANSI(LPCWSTR wstr, LPSTR* str, int strsize)
+{
+ int count;
+
+ if (!wstr)
+ {
+ *str = NULL;
+ return TRUE;
+ }
+ count = WideCharToMultiByte(CP_ACP, 0, wstr, -1, NULL, 0, NULL, NULL);
+ if (strsize == -1)
+ *str = CRYPT_Alloc(count * sizeof(CHAR));
+ else
+ count = min( count, strsize );
+ if (*str)
+ {
+ WideCharToMultiByte(CP_ACP, 0, wstr, -1, *str, count, NULL, NULL);
+ return TRUE;
+ }
+ SetLastError(ERROR_NOT_ENOUGH_MEMORY);
+ return FALSE;
+}
+
+/* CRYPT_ANSITOUnicode
+ * str - ANSI string
+ * wstr - pointer to unicode string
+ * wstrsize - size of buffer pointed to by wstr or -1 if we have to do the allocation
+ */
+static inline BOOL CRYPT_ANSIToUnicode(LPCSTR str, LPWSTR* wstr, int wstrsize)
+{
+ int wcount;
+
+ if (!str)
+ {
+ *wstr = NULL;
+ return TRUE;
+ }
+ wcount = MultiByteToWideChar(CP_ACP, 0, str, -1, NULL, 0);
+ if (wstrsize == -1)
+ *wstr = CRYPT_Alloc(wcount * sizeof(WCHAR));
+ else
+ wcount = min( wcount, wstrsize/sizeof(WCHAR) );
+ if (*wstr)
+ {
+ MultiByteToWideChar(CP_ACP, 0, str, -1, *wstr, wcount);
+ return TRUE;
+ }
+ SetLastError(ERROR_NOT_ENOUGH_MEMORY);
+ return FALSE;
+}
+
+/* These next 2 functions are used by the VTableProvStruc structure */
+static BOOL CALLBACK CRYPT_VerifyImage(LPCSTR lpszImage, BYTE* pData)
+{
+ if (!lpszImage || !pData)
+ {
+ SetLastError(ERROR_INVALID_PARAMETER);
+ return FALSE;
+ }
+
+ FIXME("(%s, %p): not verifying image\n", lpszImage, pData);
+
+ return TRUE;
+}
+
+static BOOL CALLBACK CRYPT_ReturnhWnd(HWND *phWnd)
+{
+ if (!phWnd)
+ return FALSE;
+ *phWnd = crypt_hWindow;
+ return TRUE;
+}
+
+#define CRYPT_GetProvFunc(name) \
+ if ( !(provider->pFuncs->p##name = (void*)GetProcAddress(provider->hModule, #name)) ) goto error
+#define CRYPT_GetProvFuncOpt(name) \
+ provider->pFuncs->p##name = (void*)GetProcAddress(provider->hModule, #name)
+PCRYPTPROV CRYPT_LoadProvider(PSTR pImage)
+{
+ PCRYPTPROV provider;
+ DWORD errorcode = ERROR_NOT_ENOUGH_MEMORY;
+
+ if ( !(provider = CRYPT_Alloc(sizeof(CRYPTPROV))) ) goto error;
+ if ( !(provider->pFuncs = CRYPT_Alloc(sizeof(PROVFUNCS))) ) goto error;
+ if ( !(provider->pVTable = CRYPT_Alloc(sizeof(VTableProvStruc))) ) goto error;
+ if ( !(provider->hModule = LoadLibraryA(pImage)) )
+ {
+ errorcode = (GetLastError() == ERROR_FILE_NOT_FOUND) ? NTE_PROV_DLL_NOT_FOUND : NTE_PROVIDER_DLL_FAIL;
+ FIXME("Failed to load dll %s\n", debugstr_a(pImage));
+ goto error;
+ }
+ provider->refcount = 1;
+
+ errorcode = NTE_PROVIDER_DLL_FAIL;
+ CRYPT_GetProvFunc(CPAcquireContext);
+ CRYPT_GetProvFunc(CPCreateHash);
+ CRYPT_GetProvFunc(CPDecrypt);
+ CRYPT_GetProvFunc(CPDeriveKey);
+ CRYPT_GetProvFunc(CPDestroyHash);
+ CRYPT_GetProvFunc(CPDestroyKey);
+ CRYPT_GetProvFuncOpt(CPDuplicateHash);
+ CRYPT_GetProvFuncOpt(CPDuplicateKey);
+ CRYPT_GetProvFunc(CPEncrypt);
+ CRYPT_GetProvFunc(CPExportKey);
+ CRYPT_GetProvFunc(CPGenKey);
+ CRYPT_GetProvFunc(CPGenRandom);
+ CRYPT_GetProvFunc(CPGetHashParam);
+ CRYPT_GetProvFunc(CPGetKeyParam);
+ CRYPT_GetProvFunc(CPGetProvParam);
+ CRYPT_GetProvFunc(CPGetUserKey);
+ CRYPT_GetProvFunc(CPHashData);
+ CRYPT_GetProvFunc(CPHashSessionKey);
+ CRYPT_GetProvFunc(CPImportKey);
+ CRYPT_GetProvFunc(CPReleaseContext);
+ CRYPT_GetProvFunc(CPSetHashParam);
+ CRYPT_GetProvFunc(CPSetKeyParam);
+ CRYPT_GetProvFunc(CPSetProvParam);
+ CRYPT_GetProvFunc(CPSignHash);
+ CRYPT_GetProvFunc(CPVerifySignature);
+
+ /* FIXME: Not sure what the pbContextInfo field is for.
+ * Does it need memory allocation?
+ */
+ provider->pVTable->Version = 3;
+ provider->pVTable->pFuncVerifyImage = (FARPROC)CRYPT_VerifyImage;
+ provider->pVTable->pFuncReturnhWnd = (FARPROC)CRYPT_ReturnhWnd;
+ provider->pVTable->dwProvType = 0;
+ provider->pVTable->pbContextInfo = NULL;
+ provider->pVTable->cbContextInfo = 0;
+ provider->pVTable->pszProvName = NULL;
+ return provider;
+
+error:
+ SetLastError(errorcode);
+ if (provider)
+ {
+ if (provider->hModule)
+ FreeLibrary(provider->hModule);
+ CRYPT_Free(provider->pVTable);
+ CRYPT_Free(provider->pFuncs);
+ CRYPT_Free(provider);
+ }
+ return NULL;
+}
+#undef CRYPT_GetProvFunc
+#undef CRYPT_GetProvFuncOpt
+
+
+/******************************************************************************
+ * CryptAcquireContextA (ADVAPI32.@)
+ * Acquire a crypto provider context handle.
+ *
+ * PARAMS
+ * phProv: Pointer to HCRYPTPROV for the output.
+ * pszContainer: Key Container Name
+ * pszProvider: Cryptographic Service Provider Name
+ * dwProvType: Crypto provider type to get a handle.
+ * dwFlags: flags for the operation
+ *
+ * RETURNS TRUE on success, FALSE on failure.
+ */
+BOOL WINAPI CryptAcquireContextA (HCRYPTPROV *phProv, LPCSTR pszContainer,
+ LPCSTR pszProvider, DWORD dwProvType, DWORD dwFlags)
+{
+ PCRYPTPROV pProv = NULL;
+ HKEY key;
+ PSTR imagepath = NULL, keyname = NULL, provname = NULL, temp = NULL;
+ BYTE* signature;
+ DWORD keytype, type, len;
+ ULONG r;
+
+ TRACE("(%p, %s, %s, %ld, %08lx)\n", phProv, pszContainer,
+ pszProvider, dwProvType, dwFlags);
+
+ if (dwProvType < 1 || dwProvType > MAXPROVTYPES)
+ {
+ SetLastError(NTE_BAD_PROV_TYPE);
+ return FALSE;
+ }
+
+ if (!phProv)
+ {
+ SetLastError(ERROR_INVALID_PARAMETER);
+ return FALSE;
+ }
+
+ if (!pszProvider || !*pszProvider)
+ {
+ /* No CSP name specified so try the user default CSP first
+ * then try the machine default CSP
+ */
+ if ( !(keyname = CRYPT_GetTypeKeyName(dwProvType, TRUE)) ) {
+ TRACE("No provider registered for crypto provider type %ld.\n", dwProvType);
+ SetLastError(NTE_PROV_TYPE_NOT_DEF);
+ return FALSE;
+ }
+ if (RegOpenKeyA(HKEY_CURRENT_USER, keyname, &key))
+ {
+ CRYPT_Free(keyname);
+ if ( !(keyname = CRYPT_GetTypeKeyName(dwProvType, FALSE)) ) {
+ TRACE("No type registered for crypto provider type %ld.\n", dwProvType);
+ RegCloseKey(key);
+ SetLastError(NTE_PROV_TYPE_NOT_DEF);
+ goto error;
+ }
+ if (RegOpenKeyA(HKEY_LOCAL_MACHINE, keyname, &key)) {
+ TRACE("Did not find registry entry of crypto provider for %s.\n", debugstr_a(keyname));
+ CRYPT_Free(keyname);
+ RegCloseKey(key);
+ SetLastError(NTE_PROV_TYPE_NOT_DEF);
+ goto error;
+ }
+ }
+ CRYPT_Free(keyname);
+ r = RegQueryValueExA(key, "Name", NULL, &keytype, NULL, &len);
+ if( r != ERROR_SUCCESS || !len || keytype != REG_SZ)
+ {
+ TRACE("error %ld reading size of 'Name' from registry\n", r );
+ RegCloseKey(key);
+ SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
+ goto error;
+ }
+ if(!(provname = CRYPT_Alloc(len)))
+ {
+ RegCloseKey(key);
+ SetLastError(ERROR_NOT_ENOUGH_MEMORY);
+ goto error;
+ }
+ r = RegQueryValueExA(key, "Name", NULL, NULL, provname, &len);
+ if( r != ERROR_SUCCESS )
+ {
+ TRACE("error %ld reading 'Name' from registry\n", r );
+ RegCloseKey(key);
+ SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
+ goto error;
+ }
+ RegCloseKey(key);
+ } else {
+ if ( !(provname = CRYPT_Alloc(strlen(pszProvider) +1)) )
+ {
+ SetLastError(ERROR_NOT_ENOUGH_MEMORY);
+ goto error;
+ }
+ strcpy(provname, pszProvider);
+ }
+
+ keyname = CRYPT_GetProvKeyName(provname);
+ r = RegOpenKeyA(HKEY_LOCAL_MACHINE, keyname, &key);
+ CRYPT_Free(keyname);
+ if (r != ERROR_SUCCESS)
+ {
+ SetLastError(NTE_KEYSET_NOT_DEF);
+ goto error;
+ }
+ len = sizeof(DWORD);
+ r = RegQueryValueExA(key, "Type", NULL, NULL, (BYTE*)&type, &len);
+ if (r != ERROR_SUCCESS)
+ {
+ SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
+ goto error;
+ }
+ if (type != dwProvType)
+ {
+ TRACE("Crypto provider has wrong type (%ld vs expected %ld).\n", type, dwProvType);
+ SetLastError(NTE_PROV_TYPE_NO_MATCH);
+ goto error;
+ }
+
+ r = RegQueryValueExA(key, "Image Path", NULL, &keytype, NULL, &len);
+ if ( r != ERROR_SUCCESS || keytype != REG_SZ)
+ {
+ TRACE("error %ld reading size of 'Image Path' from registry\n", r );
+ RegCloseKey(key);
+ SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
+ goto error;
+ }
+ if (!(temp = CRYPT_Alloc(len)))
+ {
+ RegCloseKey(key);
+ SetLastError(ERROR_NOT_ENOUGH_MEMORY);
+ goto error;
+ }
+ r = RegQueryValueExA(key, "Image Path", NULL, NULL, temp, &len);
+ if( r != ERROR_SUCCESS )
+ {
+ TRACE("error %ld reading 'Image Path' from registry\n", r );
+ RegCloseKey(key);
+ SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
+ goto error;
+ }
+
+ r = RegQueryValueExA(key, "Signature", NULL, &keytype, NULL, &len);
+ if ( r == ERROR_SUCCESS && keytype == REG_BINARY )
+ {
+ if (!(signature = CRYPT_Alloc(len)))
+ {
+ RegCloseKey(key);
+ SetLastError(ERROR_NOT_ENOUGH_MEMORY);
+ goto error;
+ }
+ r = RegQueryValueExA(key, "Signature", NULL, NULL, signature, &len);
+ if ( r != ERROR_SUCCESS )
+ {
+ TRACE("error %ld reading 'Signature'\n", r );
+ CRYPT_Free(signature);
+ RegCloseKey(key);
+ SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
+ goto error;
+ }
+ }
+ else
+ {
+ r = RegQueryValueExA(key, "SigInFile", NULL, &keytype, NULL, &len);
+ if (r != ERROR_SUCCESS)
+ {
+ TRACE("error %ld reading size of 'SigInFile'\n", r );
+ RegCloseKey(key);
+ SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
+ goto error;
+ }
+ else
+ {
+ /* FIXME: The presence of the SigInFile value indicates the
+ * provider's signature is in its resources, so need to read it.
+ * But since CRYPT_VerifyImage is stubbed, provide any old thing
+ * for now.
+ */
+ if (!(signature = CRYPT_Alloc(1)))
+ {
+ RegCloseKey(key);
+ SetLastError(ERROR_NOT_ENOUGH_MEMORY);
+ goto error;
+ }
+ }
+ }
+ RegCloseKey(key);
+ len = ExpandEnvironmentStringsA(temp, NULL, 0);
+ if ( !(imagepath = CRYPT_Alloc(len)) )
+ {
+ CRYPT_Free(signature);
+ SetLastError(ERROR_NOT_ENOUGH_MEMORY);
+ goto error;
+ }
+ if (!ExpandEnvironmentStringsA(temp, imagepath, len))
+ {
+ CRYPT_Free(signature);
+ /* ExpandEnvironmentStrings will call SetLastError */
+ goto error;
+ }
+
+ if (!CRYPT_VerifyImage(imagepath, signature))
+ {
+ CRYPT_Free(signature);
+ SetLastError(NTE_SIGNATURE_FILE_BAD);
+ goto error;
+ }
+ pProv = CRYPT_LoadProvider(imagepath);
+ CRYPT_Free(signature);
+ if (!pProv) {
+ /* CRYPT_LoadProvider calls SetLastError */
+ goto error;
+ }
+ pProv->pVTable->dwProvType = dwProvType;
+ pProv->pVTable->pszProvName = provname;
+ if (pProv->pFuncs->pCPAcquireContext(&pProv->hPrivate, (CHAR*)pszContainer, dwFlags, pProv->pVTable))
+ {
+ /* MSDN: When this flag is set, the value returned in phProv is undefined,
+ * and thus, the CryptReleaseContext function need not be called afterwards.
+ * Therefore, we must clean up everything now.
+ */
+ if (dwFlags & CRYPT_DELETEKEYSET)
+ {
+ FreeLibrary(pProv->hModule);
+ CRYPT_Free(provname);
+ CRYPT_Free(pProv->pFuncs);
+ CRYPT_Free(pProv);
+ } else {
+ *phProv = (HCRYPTPROV)pProv;
+ }
+ CRYPT_Free(temp);
+ CRYPT_Free(imagepath);
+ return TRUE;
+ }
+ /* FALLTHROUGH TO ERROR IF FALSE - CSP internal error! */
+error:
+ if (pProv)
+ {
+ if (pProv->hModule)
+ FreeLibrary(pProv->hModule);
+ if (pProv->pVTable)
+ CRYPT_Free(pProv->pVTable);
+ if (pProv->pFuncs)
+ CRYPT_Free(pProv->pFuncs);
+ CRYPT_Free(pProv);
+ }
+ if (provname)
+ CRYPT_Free(provname);
+ if (temp)
+ CRYPT_Free(temp);
+ if (imagepath)
+ CRYPT_Free(imagepath);
+ return FALSE;
+}
+
+/******************************************************************************
+ * CryptAcquireContextW (ADVAPI32.@)
+ *
+ * see CryptAcquireContextA
+ */
+BOOL WINAPI CryptAcquireContextW (HCRYPTPROV *phProv, LPCWSTR pszContainer,
+ LPCWSTR pszProvider, DWORD dwProvType, DWORD dwFlags)
+{
+ PSTR pProvider = NULL, pContainer = NULL;
+ BOOL ret = FALSE;
+
+ TRACE("(%p, %s, %s, %ld, %08lx)\n", phProv, debugstr_w(pszContainer),
+ debugstr_w(pszProvider), dwProvType, dwFlags);
+
+ if ( !CRYPT_UnicodeToANSI(pszContainer, &pContainer, -1) )
+ CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
+ if ( !CRYPT_UnicodeToANSI(pszProvider, &pProvider, -1) )
+ {
+ CRYPT_Free(pContainer);
+ CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
+ }
+
+ ret = CryptAcquireContextA(phProv, pContainer, pProvider, dwProvType, dwFlags);
+
+ if (pContainer)
+ CRYPT_Free(pContainer);
+ if (pProvider)
+ CRYPT_Free(pProvider);
+
+ return ret;
+}
+
+/******************************************************************************
+ * CryptContextAddRef (ADVAPI32.@)
+ *
+ * Increases reference count of a cryptographic service provider handle
+ * by one.
+ *
+ * PARAMS
+ * hProv [I] Handle to the CSP whose reference is being incremented.
+ * pdwReserved [IN] Reserved for future use and must be NULL.
+ * dwFlags [I] Reserved for future use and must be NULL.
+ *
+ * RETURNS
+ * Success: TRUE
+ * Failure: FALSE
+ */
+BOOL WINAPI CryptContextAddRef (HCRYPTPROV hProv, DWORD *pdwReserved, DWORD dwFlags)
+{
+ PCRYPTPROV pProv = (PCRYPTPROV)hProv;
+
+ TRACE("(0x%lx, %p, %08lx)\n", hProv, pdwReserved, dwFlags);
+
+ if (!pProv)
+ {
+ SetLastError(NTE_BAD_UID);
+ return FALSE;
+ }
+
+ pProv->refcount++;
+ return TRUE;
+}
+
+/******************************************************************************
+ * CryptReleaseContext (ADVAPI32.@)
+ *
+ * Releases the handle of a CSP. Reference count is decreased.
+ *
+ * PARAMS
+ * hProv [I] Handle of a CSP.
+ * dwFlags [I] Reserved for future use and must be NULL.
+ *
+ * RETURNS
+ * Success: TRUE
+ * Failure: FALSE
+ */
+BOOL WINAPI CryptReleaseContext (HCRYPTPROV hProv, DWORD dwFlags)
+{
+ PCRYPTPROV pProv = (PCRYPTPROV)hProv;
+ BOOL ret = TRUE;
+
+ TRACE("(0x%lx, %08ld)\n", hProv, dwFlags);
+
+ if (!pProv)
+ {
+ SetLastError(NTE_BAD_UID);
+ return FALSE;
+ }
+
+ pProv->refcount--;
+ if (pProv->refcount <= 0)
+ {
+ ret = pProv->pFuncs->pCPReleaseContext(pProv->hPrivate, dwFlags);
+ FreeLibrary(pProv->hModule);
+#if 0
+ CRYPT_Free(pProv->pVTable->pContextInfo);
+#endif
+ CRYPT_Free(pProv->pVTable->pszProvName);
+ CRYPT_Free(pProv->pVTable);
+ CRYPT_Free(pProv->pFuncs);
+ CRYPT_Free(pProv);
+ }
+ return ret;
+}
+
+/******************************************************************************
+ * CryptGenRandom (ADVAPI32.@)
+ *
+ * Fills a buffer with cryptographically random bytes.
+ *
+ * PARAMS
+ * hProv [I] Handle of a CSP.
+ * dwLen [I] Number of bytes to generate.
+ * pbBuffer [I/O] Buffer to contain random bytes.
+ *
+ * RETURNS
+ * Success: TRUE
+ * Failure: FALSE
+ *
+ * NOTES
+ * pdBuffer must be at least dwLen bytes long.
+ */
+BOOL WINAPI CryptGenRandom (HCRYPTPROV hProv, DWORD dwLen, BYTE *pbBuffer)
+{
+ PCRYPTPROV prov = (PCRYPTPROV)hProv;
+
+ TRACE("(0x%lx, %ld, %p)\n", hProv, dwLen, pbBuffer);
+
+ if (!hProv)
+ CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
+
+ return prov->pFuncs->pCPGenRandom(prov->hPrivate, dwLen, pbBuffer);
+}
+
+/******************************************************************************
+ * CryptCreateHash (ADVAPI32.@)
+ *
+ * Initiates the hashing of a stream of data.
+ *
+ * PARAMS
+ * hProv [I] Handle of a CSP.
+ * Algid [I] Identifies the hash algorithm to use.
+ * hKey [I] Key for the hash (if required).
+ * dwFlags [I] Reserved for future use and must be NULL.
+ * phHash [O] Address of the future handle to the new hash object.
+ *
+ * RETURNS
+ * Success: TRUE
+ * Failure: FALSE
+ *
+ * NOTES
+ * If the algorithm is a keyed hash, hKey is the key.
+ */
+BOOL WINAPI CryptCreateHash (HCRYPTPROV hProv, ALG_ID Algid, HCRYPTKEY hKey,
+ DWORD dwFlags, HCRYPTHASH *phHash)
+{
+ PCRYPTPROV prov = (PCRYPTPROV)hProv;
+ PCRYPTKEY key = (PCRYPTKEY)hKey;
+ PCRYPTHASH hash;
+
+ TRACE("(0x%lx, 0x%x, 0x%lx, %08lx, %p)\n", hProv, Algid, hKey, dwFlags, phHash);
+
+ if (!prov)
+ CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
+ if (!phHash)
+ CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
+ if (dwFlags)
+ CRYPT_ReturnLastError(NTE_BAD_FLAGS);
+ if ( !(hash = CRYPT_Alloc(sizeof(CRYPTHASH))) )
+ CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
+
+ hash->pProvider = prov;
+
+ if (prov->pFuncs->pCPCreateHash(prov->hPrivate, Algid,
+ key ? key->hPrivate : 0, 0, &hash->hPrivate))
+ {
+ *phHash = (HCRYPTHASH)hash;
+ return TRUE;
+ }
+
+ /* CSP error! */
+ CRYPT_Free(hash);
+ *phHash = 0;
+ return FALSE;
+}
+
+/******************************************************************************
+ * CryptDecrypt (ADVAPI32.@)
+ *
+ * Decrypts data encrypted by CryptEncrypt.
+ *
+ * PARAMS
+ * hKey [I] Handle to the decryption key.
+ * hHash [I] Handle to a hash object.
+ * Final [I] TRUE if this is the last section to be decrypted.
+ * dwFlags [I] Reserved for future use. Can be CRYPT_OAEP.
+ * pbData [I/O] Buffer that holds the encrypted data. Holds decrypted
+ * data on return
+ * pdwDataLen [I/O] Length of pbData before and after the call.
+ *
+ * RETURNS
+ * Success: TRUE
+ * Failure: FALSE
+ */
+BOOL WINAPI CryptDecrypt (HCRYPTKEY hKey, HCRYPTHASH hHash, BOOL Final,
+ DWORD dwFlags, BYTE *pbData, DWORD *pdwDataLen)
+{
+ PCRYPTPROV prov;
+ PCRYPTKEY key = (PCRYPTKEY)hKey;
+ PCRYPTHASH hash = (PCRYPTHASH)hHash;
+
+ TRACE("(0x%lx, 0x%lx, %d, %08lx, %p, %p)\n", hKey, hHash, Final, dwFlags, pbData, pdwDataLen);
+
+ if (!key || !pbData || !pdwDataLen)
+ CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
+
+ prov = key->pProvider;
+ return prov->pFuncs->pCPDecrypt(prov->hPrivate, key->hPrivate, hash ? hash->hPrivate : 0,
+ Final, dwFlags, pbData, pdwDataLen);
+}
+
+/******************************************************************************
+ * CryptDeriveKey (ADVAPI32.@)
+ *
+ * Generates session keys derived from a base data value.
+ *
+ * PARAMS
+ * hProv [I] Handle to a CSP.
+ * Algid [I] Identifies the symmetric encryption algorithm to use.
+ * hBaseData [I] Handle to a hash object.
+ * dwFlags [I] Type of key to generate.
+ * phKey [I/O] Address of the newly generated key.
+ *
+ * RETURNS
+ * Success: TRUE
+ * Failure: FALSE
+ */
+BOOL WINAPI CryptDeriveKey (HCRYPTPROV hProv, ALG_ID Algid, HCRYPTHASH hBaseData,
+ DWORD dwFlags, HCRYPTKEY *phKey)
+{
+ PCRYPTPROV prov = (PCRYPTPROV)hProv;
+ PCRYPTHASH hash = (PCRYPTHASH)hBaseData;
+ PCRYPTKEY key;
+
+ TRACE("(0x%lx, 0x%08x, 0x%lx, 0x%08lx, %p)\n", hProv, Algid, hBaseData, dwFlags, phKey);
+
+ if (!prov || !hash)
+ CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
+ if (!phKey)
+ CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
+ if ( !(key = CRYPT_Alloc(sizeof(CRYPTKEY))) )
+ CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
+
+ key->pProvider = prov;
+ if (prov->pFuncs->pCPDeriveKey(prov->hPrivate, Algid, hash->hPrivate, dwFlags, &key->hPrivate))
+ {
+ *phKey = (HCRYPTKEY)key;
+ return TRUE;
+ }
+
+ /* CSP error! */
+ CRYPT_Free(key);
+ *phKey = 0;
+ return FALSE;
+}
+
+/******************************************************************************
+ * CryptDestroyHash (ADVAPI32.@)
+ *
+ * Destroys the hash object referenced by hHash.
+ *
+ * PARAMS
+ * hHash [I] Handle of the hash object to be destroyed.
+ *
+ * RETURNS
+ * Success: TRUE
+ * Failure: FALSE
+ */
+BOOL WINAPI CryptDestroyHash (HCRYPTHASH hHash)
+{
+ PCRYPTHASH hash = (PCRYPTHASH)hHash;
+ PCRYPTPROV prov;
+ BOOL ret;
+
+ TRACE("(0x%lx)\n", hHash);
+
+ if (!hash)
+ CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
+
+ prov = hash->pProvider;
+ ret = prov->pFuncs->pCPDestroyHash(prov->hPrivate, hash->hPrivate);
+ CRYPT_Free(hash);
+ return ret;
+}
+
+/******************************************************************************
+ * CryptDestroyKey (ADVAPI32.@)
+ *
+ * Releases the handle referenced by hKey.
+ *
+ * PARAMS
+ * hKey [I] Handle of the key to be destroyed.
+ *
+ * RETURNS
+ * Success: TRUE
+ * Failure: FALSE
+ */
+BOOL WINAPI CryptDestroyKey (HCRYPTKEY hKey)
+{
+ PCRYPTKEY key = (PCRYPTKEY)hKey;
+ PCRYPTPROV prov;
+ BOOL ret;
+
+ TRACE("(0x%lx)\n", hKey);
+
+ if (!key)
+ CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
+
+ prov = key->pProvider;
+ ret = prov->pFuncs->pCPDestroyKey(prov->hPrivate, key->hPrivate);
+ CRYPT_Free(key);
+ return ret;
+}
+
+/******************************************************************************
+ * CryptDuplicateHash (ADVAPI32.@)
+ *
+ * Duplicates a hash.
+ *
+ * PARAMS
+ * hHash [I] Handle to the hash to be copied.
+ * pdwReserved [I] Reserved for future use and must be zero.
+ * dwFlags [I] Reserved for future use and must be zero.
+ * phHash [O] Address of the handle to receive the copy.
+ *
+ * RETURNS
+ * Success: TRUE
+ * Failure: FALSE
+ */
+BOOL WINAPI CryptDuplicateHash (HCRYPTHASH hHash, DWORD *pdwReserved,
+ DWORD dwFlags, HCRYPTHASH *phHash)
+{
+ PCRYPTPROV prov;
+ PCRYPTHASH orghash, newhash;
+
+ TRACE("(0x%lx, %p, %08ld, %p)\n", hHash, pdwReserved, dwFlags, phHash);
+
+ orghash = (PCRYPTHASH)hHash;
+ if (!orghash || pdwReserved || !phHash)
+ CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
+
+ prov = orghash->pProvider;
+ if (!prov->pFuncs->pCPDuplicateHash)
+ CRYPT_ReturnLastError(ERROR_CALL_NOT_IMPLEMENTED);
+
+ if ( !(newhash = CRYPT_Alloc(sizeof(CRYPTHASH))) )
+ CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
+
+ newhash->pProvider = prov;
+ if (prov->pFuncs->pCPDuplicateHash(prov->hPrivate, orghash->hPrivate, pdwReserved, dwFlags, &newhash->hPrivate))
+ {
+ *phHash = (HCRYPTHASH)newhash;
+ return TRUE;
+ }
+ CRYPT_Free(newhash);
+ return FALSE;
+}
+
+/******************************************************************************
+ * CryptDuplicateKey (ADVAPI32.@)
+ *
+ * Duplicate a key and the key's state.
+ *
+ * PARAMS
+ * hKey [I] Handle of the key to copy.
+ * pdwReserved [I] Reserved for future use and must be NULL.
+ * dwFlags [I] Reserved for future use and must be zero.
+ * phKey [I] Address of the handle to the duplicated key.
+ *
+ * RETURNS
+ * Success: TRUE
+ * Failure: FALSE
+ */
+BOOL WINAPI CryptDuplicateKey (HCRYPTKEY hKey, DWORD *pdwReserved, DWORD dwFlags, HCRYPTKEY *phKey)
+{
+ PCRYPTPROV prov;
+ PCRYPTKEY orgkey, newkey;
+
+ TRACE("(0x%lx, %p, %08ld, %p)\n", hKey, pdwReserved, dwFlags, phKey);
+
+ orgkey = (PCRYPTKEY)hKey;
+ if (!orgkey || pdwReserved || !phKey)
+ CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
+
+ prov = orgkey->pProvider;
+ if (!prov->pFuncs->pCPDuplicateKey)
+ CRYPT_ReturnLastError(ERROR_CALL_NOT_IMPLEMENTED);
+
+ if ( !(newkey = CRYPT_Alloc(sizeof(CRYPTKEY))) )
+ CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
+
+ newkey->pProvider = prov;
+ if (prov->pFuncs->pCPDuplicateKey(prov->hPrivate, orgkey->hPrivate, pdwReserved, dwFlags, &newkey->hPrivate))
+ {
+ *phKey = (HCRYPTKEY)newkey;
+ return TRUE;
+ }
+ CRYPT_Free(newkey);
+ return FALSE;
+}
+
+/******************************************************************************
+ * CryptEncrypt (ADVAPI32.@)
+ *
+ * Encrypts data.
+ *
+ * PARAMS
+ * hKey [I] Handle to the enryption key.
+ * hHash [I] Handle to a hash object.
+ * Final [I] TRUE if this is the last section to encrypt.
+ * dwFlags [I] Can be CRYPT_OAEP.
+ * pbData [I/O] Data to be encrypted. Contains encrypted data after call.
+ * pdwDataLen [I/O] Length of the data to encrypt. Contains the length of the
+ * encrypted data after call.
+ * dwBufLen [I] Length of the input pbData buffer.
+ *
+ * RETURNS
+ * Success: TRUE
+ * Failure: FALSE
+ *
+ * NOTES
+ * If pbData is NULL, CryptEncrypt determines stores the number of bytes
+ * required for the returned data in pdwDataLen.
+ */
+BOOL WINAPI CryptEncrypt (HCRYPTKEY hKey, HCRYPTHASH hHash, BOOL Final,
+ DWORD dwFlags, BYTE *pbData, DWORD *pdwDataLen, DWORD dwBufLen)
+{
+ PCRYPTPROV prov;
+ PCRYPTKEY key = (PCRYPTKEY)hKey;
+ PCRYPTHASH hash = (PCRYPTHASH)hHash;
+
+ TRACE("(0x%lx, 0x%lx, %d, %08ld, %p, %p, %ld)\n", hKey, hHash, Final, dwFlags, pbData, pdwDataLen, dwBufLen);
+
+ if (!key || !pdwDataLen)
+ CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
+
+ prov = key->pProvider;
+ return prov->pFuncs->pCPEncrypt(prov->hPrivate, key->hPrivate, hash ? hash->hPrivate : 0,
+ Final, dwFlags, pbData, pdwDataLen, dwBufLen);
+}
+
+/******************************************************************************
+ * CryptEnumProvidersW (ADVAPI32.@)
+ *
+ * Returns the next availabe CSP.
+ *
+ * PARAMS
+ * dwIndex [I] Index of the next provider to be enumerated.
+ * pdwReserved [I] Reserved for future use and must be NULL.
+ * dwFlags [I] Reserved for future use and must be zero.
+ * pdwProvType [O] DWORD designating the type of the provider.
+ * pszProvName [O] Buffer that receives data from the provider.
+ * pcbProvName [I/O] Specifies the size of pszProvName. Contains the number
+ * of bytes stored in the buffer on return.
+ *
+ * RETURNS
+ * Success: TRUE
+ * Failure: FALSE
+ *
+ * NOTES
+ * If pszProvName is NULL, CryptEnumProvidersW sets the size of the name
+ * for memory allocation purposes.
+ */
+BOOL WINAPI CryptEnumProvidersW (DWORD dwIndex, DWORD *pdwReserved,
+ DWORD dwFlags, DWORD *pdwProvType, LPWSTR pszProvName, DWORD *pcbProvName)
+{
+ HKEY hKey;
+
+ static const WCHAR providerW[] = {
+ 'S','o','f','t','w','a','r','e','\\',
+ 'M','i','c','r','o','s','o','f','t','\\',
+ 'C','r','y','p','t','o','g','r','a','p','h','y','\\',
+ 'D','e','f','a','u','l','t','s','\\',
+ 'P','r','o','v','i','d','e','r',0
+ };
+
+ static const WCHAR typeW[] = {'T','y','p','e',0};
+
+ TRACE("(%ld, %p, %ld, %p, %p, %p)\n", dwIndex, pdwReserved, dwFlags,
+ pdwProvType, pszProvName, pcbProvName);
+
+ if (pdwReserved || !pcbProvName) CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
+ if (dwFlags) CRYPT_ReturnLastError(NTE_BAD_FLAGS);
+
+ if (RegOpenKeyW(HKEY_LOCAL_MACHINE, providerW, &hKey))
+ CRYPT_ReturnLastError(NTE_FAIL);
+
+ if (!pszProvName)
+ {
+ DWORD numkeys;
+ WCHAR *provNameW;
[truncated at 1000 lines; 2100 more skipped]