2 * Copyright 1999 Ian Schmidt
3 * Copyright 2001 Travis Michielsen
5 * This library is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU Lesser General Public
7 * License as published by the Free Software Foundation; either
8 * version 2.1 of the License, or (at your option) any later version.
10 * This library is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * Lesser General Public License for more details.
15 * You should have received a copy of the GNU Lesser General Public
16 * License along with this library; if not, write to the Free Software
17 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 /***********************************************************************
23 * - Reference counting
34 #include "wine/debug.h"
38 WINE_DEFAULT_DEBUG_CHANNEL(crypt);
40 HWND crypt_hWindow = 0;
42 #define CRYPT_ReturnLastError(err) {SetLastError(err); return FALSE;}
44 #define CRYPT_Alloc(size) ((LPVOID)LocalAlloc(LMEM_ZEROINIT, size))
45 #define CRYPT_Free(buffer) (LocalFree((HLOCAL)buffer))
47 static inline PSTR CRYPT_GetProvKeyName(PCSTR pProvName)
49 PCSTR KEYSTR = "Software\\Microsoft\\Cryptography\\Defaults\\Provider\\";
52 keyname = CRYPT_Alloc(strlen(KEYSTR) + strlen(pProvName) +1);
55 strcpy(keyname, KEYSTR);
56 strcpy(keyname + strlen(KEYSTR), pProvName);
58 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
62 static inline PSTR CRYPT_GetTypeKeyName(DWORD dwType, BOOL user)
64 PCSTR MACHINESTR = "Software\\Microsoft\\Cryptography\\Defaults\\Provider Types\\Type XXX";
65 PCSTR USERSTR = "Software\\Microsoft\\Cryptography\\Provider Type XXX";
69 keyname = CRYPT_Alloc( (user ? strlen(USERSTR) : strlen(MACHINESTR)) +1);
72 user ? strcpy(keyname, USERSTR) : strcpy(keyname, MACHINESTR);
73 ptr = keyname + strlen(keyname);
74 *(--ptr) = (dwType % 10) + '0';
75 *(--ptr) = ((dwType / 10) % 10) + '0';
76 *(--ptr) = (dwType / 100) + '0';
78 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
82 /* CRYPT_UnicodeTOANSI
83 * wstr - unicode string
84 * str - pointer to ANSI string
85 * strsize - size of buffer pointed to by str or -1 if we have to do the allocation
87 * returns TRUE if unsuccessfull, FALSE otherwise.
88 * if wstr is NULL, returns TRUE and sets str to NULL! Value of str should be checked after call
90 static inline BOOL CRYPT_UnicodeToANSI(LPCWSTR wstr, LPSTR* str, int strsize)
99 count = WideCharToMultiByte(CP_ACP, 0, wstr, -1, NULL, 0, NULL, NULL);
101 *str = CRYPT_Alloc(count * sizeof(CHAR));
103 count = min( count, strsize );
106 WideCharToMultiByte(CP_ACP, 0, wstr, -1, *str, count, NULL, NULL);
109 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
113 /* CRYPT_ANSITOUnicode
115 * wstr - pointer to unicode string
116 * wstrsize - size of buffer pointed to by wstr or -1 if we have to do the allocation
118 static inline BOOL CRYPT_ANSIToUnicode(LPCSTR str, LPWSTR* wstr, int wstrsize)
127 wcount = MultiByteToWideChar(CP_ACP, 0, str, -1, NULL, 0);
129 *wstr = CRYPT_Alloc(wcount * sizeof(WCHAR));
131 wcount = min( wcount, wstrsize/sizeof(WCHAR) );
134 MultiByteToWideChar(CP_ACP, 0, str, -1, *wstr, wcount);
137 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
141 /* These next 2 functions are used by the VTableProvStruc structure */
142 static BOOL CALLBACK CRYPT_VerifyImage(LPCSTR lpszImage, BYTE* pData)
144 if (!lpszImage || !pData)
146 SetLastError(ERROR_INVALID_PARAMETER);
150 FIXME("(%s, %p): not verifying image\n", lpszImage, pData);
155 static BOOL CALLBACK CRYPT_ReturnhWnd(HWND *phWnd)
159 *phWnd = crypt_hWindow;
163 #define CRYPT_GetProvFunc(name) \
164 if ( !(provider->pFuncs->p##name = (void*)GetProcAddress(provider->hModule, #name)) ) goto error
165 #define CRYPT_GetProvFuncOpt(name) \
166 provider->pFuncs->p##name = (void*)GetProcAddress(provider->hModule, #name)
167 PCRYPTPROV CRYPT_LoadProvider(PSTR pImage)
170 DWORD errorcode = ERROR_NOT_ENOUGH_MEMORY;
172 if ( !(provider = CRYPT_Alloc(sizeof(CRYPTPROV))) ) goto error;
173 if ( !(provider->pFuncs = CRYPT_Alloc(sizeof(PROVFUNCS))) ) goto error;
174 if ( !(provider->pVTable = CRYPT_Alloc(sizeof(VTableProvStruc))) ) goto error;
175 if ( !(provider->hModule = LoadLibraryA(pImage)) )
177 errorcode = (GetLastError() == ERROR_FILE_NOT_FOUND) ? NTE_PROV_DLL_NOT_FOUND : NTE_PROVIDER_DLL_FAIL;
178 FIXME("Failed to load dll %s\n", debugstr_a(pImage));
181 provider->dwMagic = MAGIC_CRYPTPROV;
182 provider->refcount = 1;
184 errorcode = NTE_PROVIDER_DLL_FAIL;
185 CRYPT_GetProvFunc(CPAcquireContext);
186 CRYPT_GetProvFunc(CPCreateHash);
187 CRYPT_GetProvFunc(CPDecrypt);
188 CRYPT_GetProvFunc(CPDeriveKey);
189 CRYPT_GetProvFunc(CPDestroyHash);
190 CRYPT_GetProvFunc(CPDestroyKey);
191 CRYPT_GetProvFuncOpt(CPDuplicateHash);
192 CRYPT_GetProvFuncOpt(CPDuplicateKey);
193 CRYPT_GetProvFunc(CPEncrypt);
194 CRYPT_GetProvFunc(CPExportKey);
195 CRYPT_GetProvFunc(CPGenKey);
196 CRYPT_GetProvFunc(CPGenRandom);
197 CRYPT_GetProvFunc(CPGetHashParam);
198 CRYPT_GetProvFunc(CPGetKeyParam);
199 CRYPT_GetProvFunc(CPGetProvParam);
200 CRYPT_GetProvFunc(CPGetUserKey);
201 CRYPT_GetProvFunc(CPHashData);
202 CRYPT_GetProvFunc(CPHashSessionKey);
203 CRYPT_GetProvFunc(CPImportKey);
204 CRYPT_GetProvFunc(CPReleaseContext);
205 CRYPT_GetProvFunc(CPSetHashParam);
206 CRYPT_GetProvFunc(CPSetKeyParam);
207 CRYPT_GetProvFunc(CPSetProvParam);
208 CRYPT_GetProvFunc(CPSignHash);
209 CRYPT_GetProvFunc(CPVerifySignature);
211 /* FIXME: Not sure what the pbContextInfo field is for.
212 * Does it need memory allocation?
214 provider->pVTable->Version = 3;
215 provider->pVTable->pFuncVerifyImage = (FARPROC)CRYPT_VerifyImage;
216 provider->pVTable->pFuncReturnhWnd = (FARPROC)CRYPT_ReturnhWnd;
217 provider->pVTable->dwProvType = 0;
218 provider->pVTable->pbContextInfo = NULL;
219 provider->pVTable->cbContextInfo = 0;
220 provider->pVTable->pszProvName = NULL;
224 SetLastError(errorcode);
227 provider->dwMagic = 0;
228 if (provider->hModule)
229 FreeLibrary(provider->hModule);
230 CRYPT_Free(provider->pVTable);
231 CRYPT_Free(provider->pFuncs);
232 CRYPT_Free(provider);
236 #undef CRYPT_GetProvFunc
237 #undef CRYPT_GetProvFuncOpt
240 /******************************************************************************
241 * CryptAcquireContextA (ADVAPI32.@)
242 * Acquire a crypto provider context handle.
245 * phProv: Pointer to HCRYPTPROV for the output.
246 * pszContainer: Key Container Name
247 * pszProvider: Cryptographic Service Provider Name
248 * dwProvType: Crypto provider type to get a handle.
249 * dwFlags: flags for the operation
251 * RETURNS TRUE on success, FALSE on failure.
253 BOOL WINAPI CryptAcquireContextA (HCRYPTPROV *phProv, LPCSTR pszContainer,
254 LPCSTR pszProvider, DWORD dwProvType, DWORD dwFlags)
256 PCRYPTPROV pProv = NULL;
258 PSTR imagepath = NULL, keyname = NULL, provname = NULL, temp = NULL;
259 DWORD keytype, type, len;
262 TRACE("(%p, %s, %s, %ld, %08lx)\n", phProv, pszContainer,
263 pszProvider, dwProvType, dwFlags);
265 if (dwProvType < 1 || dwProvType > MAXPROVTYPES)
267 SetLastError(NTE_BAD_PROV_TYPE);
273 SetLastError(ERROR_INVALID_PARAMETER);
277 if (!pszProvider || !*pszProvider)
279 /* No CSP name specified so try the user default CSP first
280 * then try the machine default CSP
282 if ( !(keyname = CRYPT_GetTypeKeyName(dwProvType, TRUE)) ) {
283 TRACE("No provider registered for crypto provider type %ld.\n", dwProvType);
284 SetLastError(NTE_PROV_TYPE_NOT_DEF);
287 if (RegOpenKeyA(HKEY_CURRENT_USER, keyname, &key))
290 if ( !(keyname = CRYPT_GetTypeKeyName(dwProvType, FALSE)) ) {
291 TRACE("No type registered for crypto provider type %ld.\n", dwProvType);
293 SetLastError(NTE_PROV_TYPE_NOT_DEF);
296 if (RegOpenKeyA(HKEY_LOCAL_MACHINE, keyname, &key)) {
297 TRACE("Did not find registry entry of crypto provider for %s.\n", debugstr_a(keyname));
300 SetLastError(NTE_PROV_TYPE_NOT_DEF);
305 r = RegQueryValueExA(key, "Name", NULL, &keytype, NULL, &len);
306 if( r != ERROR_SUCCESS || !len || keytype != REG_SZ)
308 TRACE("error %ld reading size of 'Name' from registry\n", r );
310 SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
313 if(!(provname = CRYPT_Alloc(len)))
316 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
319 r = RegQueryValueExA(key, "Name", NULL, NULL, provname, &len);
320 if( r != ERROR_SUCCESS )
322 TRACE("error %ld reading 'Name' from registry\n", r );
324 SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
329 if ( !(provname = CRYPT_Alloc(strlen(pszProvider) +1)) )
331 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
334 strcpy(provname, pszProvider);
337 keyname = CRYPT_GetProvKeyName(provname);
338 r = RegOpenKeyA(HKEY_LOCAL_MACHINE, keyname, &key);
340 if (r != ERROR_SUCCESS)
342 SetLastError(NTE_KEYSET_NOT_DEF);
346 r = RegQueryValueExA(key, "Type", NULL, NULL, (BYTE*)&type, &len);
347 if (r != ERROR_SUCCESS)
349 SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
352 if (type != dwProvType)
354 TRACE("Crypto provider has wrong type (%ld vs expected %ld).\n", type, dwProvType);
355 SetLastError(NTE_PROV_TYPE_NO_MATCH);
359 r = RegQueryValueExA(key, "Image Path", NULL, &keytype, NULL, &len);
360 if ( r != ERROR_SUCCESS || keytype != REG_SZ)
362 TRACE("error %ld reading size of 'Image Path' from registry\n", r );
364 SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
367 if (!(temp = CRYPT_Alloc(len)))
370 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
373 r = RegQueryValueExA(key, "Image Path", NULL, NULL, temp, &len);
374 if( r != ERROR_SUCCESS )
376 TRACE("error %ld reading 'Image Path' from registry\n", r );
378 SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
382 len = ExpandEnvironmentStringsA(temp, NULL, 0);
383 if ( !(imagepath = CRYPT_Alloc(len)) )
385 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
388 if (!ExpandEnvironmentStringsA(temp, imagepath, len))
390 /* ExpandEnvironmentStrings will call SetLastError */
393 pProv = CRYPT_LoadProvider(imagepath);
395 /* CRYPT_LoadProvider calls SetLastError */
398 pProv->pVTable->dwProvType = dwProvType;
399 pProv->pVTable->pszProvName = provname;
400 if (pProv->pFuncs->pCPAcquireContext(&pProv->hPrivate, (CHAR*)pszContainer, dwFlags, pProv->pVTable))
402 /* MSDN: When this flag is set, the value returned in phProv is undefined,
403 * and thus, the CryptReleaseContext function need not be called afterwards.
404 * Therefore, we must clean up everything now.
406 if (dwFlags & CRYPT_DELETEKEYSET)
409 FreeLibrary(pProv->hModule);
410 CRYPT_Free(provname);
411 CRYPT_Free(pProv->pFuncs);
414 *phProv = (HCRYPTPROV)pProv;
417 CRYPT_Free(imagepath);
420 /* FALLTHROUGH TO ERROR IF FALSE - CSP internal error! */
426 FreeLibrary(pProv->hModule);
428 CRYPT_Free(pProv->pVTable);
430 CRYPT_Free(pProv->pFuncs);
434 CRYPT_Free(provname);
438 CRYPT_Free(imagepath);
442 /******************************************************************************
443 * CryptAcquireContextW (ADVAPI32.@)
445 * see CryptAcquireContextA
447 BOOL WINAPI CryptAcquireContextW (HCRYPTPROV *phProv, LPCWSTR pszContainer,
448 LPCWSTR pszProvider, DWORD dwProvType, DWORD dwFlags)
450 PSTR pProvider = NULL, pContainer = NULL;
453 TRACE("(%p, %s, %s, %ld, %08lx)\n", phProv, debugstr_w(pszContainer),
454 debugstr_w(pszProvider), dwProvType, dwFlags);
456 if ( !CRYPT_UnicodeToANSI(pszContainer, &pContainer, -1) )
457 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
458 if ( !CRYPT_UnicodeToANSI(pszProvider, &pProvider, -1) )
460 CRYPT_Free(pContainer);
461 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
464 ret = CryptAcquireContextA(phProv, pContainer, pProvider, dwProvType, dwFlags);
467 CRYPT_Free(pContainer);
469 CRYPT_Free(pProvider);
474 /******************************************************************************
475 * CryptContextAddRef (ADVAPI32.@)
477 * Increases reference count of a cryptographic service provider handle
481 * hProv [I] Handle to the CSP whose reference is being incremented.
482 * pdwReserved [IN] Reserved for future use and must be NULL.
483 * dwFlags [I] Reserved for future use and must be NULL.
489 BOOL WINAPI CryptContextAddRef (HCRYPTPROV hProv, DWORD *pdwReserved, DWORD dwFlags)
491 PCRYPTPROV pProv = (PCRYPTPROV)hProv;
493 TRACE("(0x%lx, %p, %08lx)\n", hProv, pdwReserved, dwFlags);
497 SetLastError(NTE_BAD_UID);
501 if (pProv->dwMagic != MAGIC_CRYPTPROV)
503 SetLastError(ERROR_INVALID_PARAMETER);
511 /******************************************************************************
512 * CryptReleaseContext (ADVAPI32.@)
514 * Releases the handle of a CSP. Reference count is decreased.
517 * hProv [I] Handle of a CSP.
518 * dwFlags [I] Reserved for future use and must be NULL.
524 BOOL WINAPI CryptReleaseContext (HCRYPTPROV hProv, DWORD dwFlags)
526 PCRYPTPROV pProv = (PCRYPTPROV)hProv;
529 TRACE("(0x%lx, %08ld)\n", hProv, dwFlags);
533 SetLastError(NTE_BAD_UID);
537 if (pProv->dwMagic != MAGIC_CRYPTPROV)
539 SetLastError(ERROR_INVALID_PARAMETER);
544 if (pProv->refcount <= 0)
546 ret = pProv->pFuncs->pCPReleaseContext(pProv->hPrivate, dwFlags);
548 FreeLibrary(pProv->hModule);
550 CRYPT_Free(pProv->pVTable->pContextInfo);
552 CRYPT_Free(pProv->pVTable->pszProvName);
553 CRYPT_Free(pProv->pVTable);
554 CRYPT_Free(pProv->pFuncs);
560 /******************************************************************************
561 * CryptGenRandom (ADVAPI32.@)
563 * Fills a buffer with cryptographically random bytes.
566 * hProv [I] Handle of a CSP.
567 * dwLen [I] Number of bytes to generate.
568 * pbBuffer [I/O] Buffer to contain random bytes.
575 * pdBuffer must be at least dwLen bytes long.
577 BOOL WINAPI CryptGenRandom (HCRYPTPROV hProv, DWORD dwLen, BYTE *pbBuffer)
579 PCRYPTPROV prov = (PCRYPTPROV)hProv;
581 TRACE("(0x%lx, %ld, %p)\n", hProv, dwLen, pbBuffer);
584 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
586 if (prov->dwMagic != MAGIC_CRYPTPROV)
587 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
589 return prov->pFuncs->pCPGenRandom(prov->hPrivate, dwLen, pbBuffer);
592 /******************************************************************************
593 * CryptCreateHash (ADVAPI32.@)
595 * Initiates the hashing of a stream of data.
598 * hProv [I] Handle of a CSP.
599 * Algid [I] Identifies the hash algorithm to use.
600 * hKey [I] Key for the hash (if required).
601 * dwFlags [I] Reserved for future use and must be NULL.
602 * phHash [O] Address of the future handle to the new hash object.
609 * If the algorithm is a keyed hash, hKey is the key.
611 BOOL WINAPI CryptCreateHash (HCRYPTPROV hProv, ALG_ID Algid, HCRYPTKEY hKey,
612 DWORD dwFlags, HCRYPTHASH *phHash)
614 PCRYPTPROV prov = (PCRYPTPROV)hProv;
615 PCRYPTKEY key = (PCRYPTKEY)hKey;
618 TRACE("(0x%lx, 0x%x, 0x%lx, %08lx, %p)\n", hProv, Algid, hKey, dwFlags, phHash);
621 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
622 if (!phHash || prov->dwMagic != MAGIC_CRYPTPROV)
623 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
625 CRYPT_ReturnLastError(NTE_BAD_FLAGS);
626 if ( !(hash = CRYPT_Alloc(sizeof(CRYPTHASH))) )
627 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
629 hash->pProvider = prov;
631 if (prov->pFuncs->pCPCreateHash(prov->hPrivate, Algid,
632 key ? key->hPrivate : 0, 0, &hash->hPrivate))
634 *phHash = (HCRYPTHASH)hash;
644 /******************************************************************************
645 * CryptDecrypt (ADVAPI32.@)
647 * Decrypts data encrypted by CryptEncrypt.
650 * hKey [I] Handle to the decryption key.
651 * hHash [I] Handle to a hash object.
652 * Final [I] TRUE if this is the last section to be decrypted.
653 * dwFlags [I] Reserved for future use. Can be CRYPT_OAEP.
654 * pbData [I/O] Buffer that holds the encrypted data. Holds decrypted
656 * pdwDataLen [I/O] Length of pbData before and after the call.
662 BOOL WINAPI CryptDecrypt (HCRYPTKEY hKey, HCRYPTHASH hHash, BOOL Final,
663 DWORD dwFlags, BYTE *pbData, DWORD *pdwDataLen)
666 PCRYPTKEY key = (PCRYPTKEY)hKey;
667 PCRYPTHASH hash = (PCRYPTHASH)hHash;
669 TRACE("(0x%lx, 0x%lx, %d, %08lx, %p, %p)\n", hKey, hHash, Final, dwFlags, pbData, pdwDataLen);
671 if (!key || !pbData || !pdwDataLen || !key->pProvider || key->pProvider->dwMagic != MAGIC_CRYPTPROV)
672 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
674 prov = key->pProvider;
675 return prov->pFuncs->pCPDecrypt(prov->hPrivate, key->hPrivate, hash ? hash->hPrivate : 0,
676 Final, dwFlags, pbData, pdwDataLen);
679 /******************************************************************************
680 * CryptDeriveKey (ADVAPI32.@)
682 * Generates session keys derived from a base data value.
685 * hProv [I] Handle to a CSP.
686 * Algid [I] Identifies the symmetric encryption algorithm to use.
687 * hBaseData [I] Handle to a hash object.
688 * dwFlags [I] Type of key to generate.
689 * phKey [I/O] Address of the newly generated key.
695 BOOL WINAPI CryptDeriveKey (HCRYPTPROV hProv, ALG_ID Algid, HCRYPTHASH hBaseData,
696 DWORD dwFlags, HCRYPTKEY *phKey)
698 PCRYPTPROV prov = (PCRYPTPROV)hProv;
699 PCRYPTHASH hash = (PCRYPTHASH)hBaseData;
702 TRACE("(0x%lx, 0x%08x, 0x%lx, 0x%08lx, %p)\n", hProv, Algid, hBaseData, dwFlags, phKey);
705 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
706 if (!phKey || prov->dwMagic != MAGIC_CRYPTPROV)
707 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
708 if ( !(key = CRYPT_Alloc(sizeof(CRYPTKEY))) )
709 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
711 key->pProvider = prov;
712 if (prov->pFuncs->pCPDeriveKey(prov->hPrivate, Algid, hash->hPrivate, dwFlags, &key->hPrivate))
714 *phKey = (HCRYPTKEY)key;
724 /******************************************************************************
725 * CryptDestroyHash (ADVAPI32.@)
727 * Destroys the hash object referenced by hHash.
730 * hHash [I] Handle of the hash object to be destroyed.
736 BOOL WINAPI CryptDestroyHash (HCRYPTHASH hHash)
738 PCRYPTHASH hash = (PCRYPTHASH)hHash;
742 TRACE("(0x%lx)\n", hHash);
745 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
747 if (!hash->pProvider || hash->pProvider->dwMagic != MAGIC_CRYPTPROV)
748 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
750 prov = hash->pProvider;
751 ret = prov->pFuncs->pCPDestroyHash(prov->hPrivate, hash->hPrivate);
756 /******************************************************************************
757 * CryptDestroyKey (ADVAPI32.@)
759 * Releases the handle referenced by hKey.
762 * hKey [I] Handle of the key to be destroyed.
768 BOOL WINAPI CryptDestroyKey (HCRYPTKEY hKey)
770 PCRYPTKEY key = (PCRYPTKEY)hKey;
774 TRACE("(0x%lx)\n", hKey);
777 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
779 if (!key->pProvider || key->pProvider->dwMagic != MAGIC_CRYPTPROV)
780 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
782 prov = key->pProvider;
783 ret = prov->pFuncs->pCPDestroyKey(prov->hPrivate, key->hPrivate);
788 /******************************************************************************
789 * CryptDuplicateHash (ADVAPI32.@)
794 * hHash [I] Handle to the hash to be copied.
795 * pdwReserved [I] Reserved for future use and must be zero.
796 * dwFlags [I] Reserved for future use and must be zero.
797 * phHash [O] Address of the handle to receive the copy.
803 BOOL WINAPI CryptDuplicateHash (HCRYPTHASH hHash, DWORD *pdwReserved,
804 DWORD dwFlags, HCRYPTHASH *phHash)
807 PCRYPTHASH orghash, newhash;
809 TRACE("(0x%lx, %p, %08ld, %p)\n", hHash, pdwReserved, dwFlags, phHash);
811 orghash = (PCRYPTHASH)hHash;
812 if (!orghash || pdwReserved || !phHash || !orghash->pProvider ||
813 orghash->pProvider->dwMagic != MAGIC_CRYPTPROV)
815 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
818 prov = orghash->pProvider;
819 if (!prov->pFuncs->pCPDuplicateHash)
820 CRYPT_ReturnLastError(ERROR_CALL_NOT_IMPLEMENTED);
822 if ( !(newhash = CRYPT_Alloc(sizeof(CRYPTHASH))) )
823 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
825 newhash->pProvider = prov;
826 if (prov->pFuncs->pCPDuplicateHash(prov->hPrivate, orghash->hPrivate, pdwReserved, dwFlags, &newhash->hPrivate))
828 *phHash = (HCRYPTHASH)newhash;
835 /******************************************************************************
836 * CryptDuplicateKey (ADVAPI32.@)
838 * Duplicate a key and the key's state.
841 * hKey [I] Handle of the key to copy.
842 * pdwReserved [I] Reserved for future use and must be NULL.
843 * dwFlags [I] Reserved for future use and must be zero.
844 * phKey [I] Address of the handle to the duplicated key.
850 BOOL WINAPI CryptDuplicateKey (HCRYPTKEY hKey, DWORD *pdwReserved, DWORD dwFlags, HCRYPTKEY *phKey)
853 PCRYPTKEY orgkey, newkey;
855 TRACE("(0x%lx, %p, %08ld, %p)\n", hKey, pdwReserved, dwFlags, phKey);
857 orgkey = (PCRYPTKEY)hKey;
858 if (!orgkey || pdwReserved || !phKey || !orgkey->pProvider ||
859 orgkey->pProvider->dwMagic != MAGIC_CRYPTPROV)
861 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
864 prov = orgkey->pProvider;
865 if (!prov->pFuncs->pCPDuplicateKey)
866 CRYPT_ReturnLastError(ERROR_CALL_NOT_IMPLEMENTED);
868 if ( !(newkey = CRYPT_Alloc(sizeof(CRYPTKEY))) )
869 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
871 newkey->pProvider = prov;
872 if (prov->pFuncs->pCPDuplicateKey(prov->hPrivate, orgkey->hPrivate, pdwReserved, dwFlags, &newkey->hPrivate))
874 *phKey = (HCRYPTKEY)newkey;
881 /******************************************************************************
882 * CryptEncrypt (ADVAPI32.@)
887 * hKey [I] Handle to the enryption key.
888 * hHash [I] Handle to a hash object.
889 * Final [I] TRUE if this is the last section to encrypt.
890 * dwFlags [I] Can be CRYPT_OAEP.
891 * pbData [I/O] Data to be encrypted. Contains encrypted data after call.
892 * pdwDataLen [I/O] Length of the data to encrypt. Contains the length of the
893 * encrypted data after call.
894 * dwBufLen [I] Length of the input pbData buffer.
901 * If pbData is NULL, CryptEncrypt determines stores the number of bytes
902 * required for the returned data in pdwDataLen.
904 BOOL WINAPI CryptEncrypt (HCRYPTKEY hKey, HCRYPTHASH hHash, BOOL Final,
905 DWORD dwFlags, BYTE *pbData, DWORD *pdwDataLen, DWORD dwBufLen)
908 PCRYPTKEY key = (PCRYPTKEY)hKey;
909 PCRYPTHASH hash = (PCRYPTHASH)hHash;
911 TRACE("(0x%lx, 0x%lx, %d, %08ld, %p, %p, %ld)\n", hKey, hHash, Final, dwFlags, pbData, pdwDataLen, dwBufLen);
913 if (!key || !pdwDataLen || !key->pProvider || key->pProvider->dwMagic != MAGIC_CRYPTPROV)
914 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
916 prov = key->pProvider;
917 return prov->pFuncs->pCPEncrypt(prov->hPrivate, key->hPrivate, hash ? hash->hPrivate : 0,
918 Final, dwFlags, pbData, pdwDataLen, dwBufLen);
921 /******************************************************************************
922 * CryptEnumProvidersW (ADVAPI32.@)
924 * Returns the next availabe CSP.
927 * dwIndex [I] Index of the next provider to be enumerated.
928 * pdwReserved [I] Reserved for future use and must be NULL.
929 * dwFlags [I] Reserved for future use and must be zero.
930 * pdwProvType [O] DWORD designating the type of the provider.
931 * pszProvName [O] Buffer that receives data from the provider.
932 * pcbProvName [I/O] Specifies the size of pszProvName. Contains the number
933 * of bytes stored in the buffer on return.
940 * If pszProvName is NULL, CryptEnumProvidersW sets the size of the name
941 * for memory allocation purposes.
943 BOOL WINAPI CryptEnumProvidersW (DWORD dwIndex, DWORD *pdwReserved,
944 DWORD dwFlags, DWORD *pdwProvType, LPWSTR pszProvName, DWORD *pcbProvName)
948 static const WCHAR providerW[] = {
949 'S','o','f','t','w','a','r','e','\\',
950 'M','i','c','r','o','s','o','f','t','\\',
951 'C','r','y','p','t','o','g','r','a','p','h','y','\\',
952 'D','e','f','a','u','l','t','s','\\',
953 'P','r','o','v','i','d','e','r',0
956 static const WCHAR typeW[] = {'T','y','p','e',0};
958 TRACE("(%ld, %p, %ld, %p, %p, %p)\n", dwIndex, pdwReserved, dwFlags,
959 pdwProvType, pszProvName, pcbProvName);
961 if (pdwReserved || !pcbProvName) CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
962 if (dwFlags) CRYPT_ReturnLastError(NTE_BAD_FLAGS);
964 if (RegOpenKeyW(HKEY_LOCAL_MACHINE, providerW, &hKey))
965 CRYPT_ReturnLastError(NTE_FAIL);
972 RegQueryInfoKeyW(hKey, NULL, NULL, NULL, &numkeys, pcbProvName,
973 NULL, NULL, NULL, NULL, NULL, NULL);
975 if (!(provNameW = CRYPT_Alloc(*pcbProvName * sizeof(WCHAR))))
976 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
978 RegEnumKeyExW(hKey, dwIndex, provNameW, pcbProvName, NULL, NULL, NULL, NULL);
980 *pcbProvName *= sizeof(WCHAR);
982 CRYPT_Free(provNameW);
984 if (dwIndex >= numkeys)
985 CRYPT_ReturnLastError(ERROR_NO_MORE_ITEMS);
987 DWORD size = sizeof(DWORD);
991 result = RegEnumKeyW(hKey, dwIndex, pszProvName, *pcbProvName / sizeof(WCHAR));
993 CRYPT_ReturnLastError(result);
994 if (RegOpenKeyW(hKey, pszProvName, &subkey))
996 if (RegQueryValueExW(subkey, typeW, NULL, NULL, (BYTE*)pdwProvType, &size))
1004 /******************************************************************************
1005 * CryptEnumProvidersA (ADVAPI32.@)
1007 * see CryptEnumProvidersW
1009 BOOL WINAPI CryptEnumProvidersA (DWORD dwIndex, DWORD *pdwReserved,
1010 DWORD dwFlags, DWORD *pdwProvType, LPSTR pszProvName, DWORD *pcbProvName)
1014 BOOL ret; /* = FALSE; */
1016 TRACE("(%ld, %p, %08ld, %p, %p, %p)\n", dwIndex, pdwReserved, dwFlags,
1017 pdwProvType, pszProvName, pcbProvName);
1019 strlen = *pcbProvName * sizeof(WCHAR);
1020 if ( pszProvName && !(str = CRYPT_Alloc(strlen)) )
1021 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
1022 ret = CryptEnumProvidersW(dwIndex, pdwReserved, dwFlags, pdwProvType, str, &strlen);
1025 CRYPT_UnicodeToANSI(str, &pszProvName, *pcbProvName);
1028 *pcbProvName = strlen / sizeof(WCHAR); /* FIXME: not correct */
1032 /******************************************************************************
1033 * CryptEnumProviderTypesA (ADVAPI32i.@)
1035 * Retrieves the next type of CSP supported.
1038 * dwIndex [I] Index of the next provider to be enumerated.
1039 * pdwReserved [I] Reserved for future use and must be NULL.
1040 * dwFlags [I] Reserved for future use and must be zero.
1041 * pdwProvType [O] DWORD designating the type of the provider.
1042 * pszTypeName [O] Buffer that receives data from the provider type.
1043 * pcbTypeName [I/O] Specifies the size of pszTypeName. Contains the number
1044 * of bytes stored in the buffer on return.
1051 * If pszTypeName is NULL, CryptEnumProviderTypesA sets the size of the name
1052 * for memory allocation purposes.
1054 BOOL WINAPI CryptEnumProviderTypesA (DWORD dwIndex, DWORD *pdwReserved,
1055 DWORD dwFlags, DWORD *pdwProvType, LPSTR pszTypeName, DWORD *pcbTypeName)
1058 DWORD keylen, numkeys, dwType;
1062 TRACE("(%ld, %p, %08ld, %p, %p, %p)\n", dwIndex, pdwReserved,
1063 dwFlags, pdwProvType, pszTypeName, pcbTypeName);
1065 if (pdwReserved || !pdwProvType || !pcbTypeName)
1066 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1067 if (dwFlags) CRYPT_ReturnLastError(NTE_BAD_FLAGS);
1069 if (RegOpenKeyA(HKEY_LOCAL_MACHINE, "Software\\Microsoft\\Cryptography\\Defaults\\Provider Types", &hKey))
1072 RegQueryInfoKeyA(hKey, NULL, NULL, NULL, &numkeys, &keylen, NULL, NULL, NULL, NULL, NULL, NULL);
1073 if (dwIndex >= numkeys)
1074 CRYPT_ReturnLastError(ERROR_NO_MORE_ITEMS);
1076 if ( !(keyname = CRYPT_Alloc(keylen)) )
1077 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
1078 if ( RegEnumKeyA(hKey, dwIndex, keyname, keylen) ) {
1079 CRYPT_Free(keyname);
1082 RegOpenKeyA(hKey, keyname, &hSubkey);
1083 ch = keyname + strlen(keyname);
1084 /* Convert "Type 000" to 0, etc/ */
1085 *pdwProvType = *(--ch) - '0';
1086 *pdwProvType += (*(--ch) - '0') * 10;
1087 *pdwProvType += (*(--ch) - '0') * 100;
1088 CRYPT_Free(keyname);
1090 result = RegQueryValueExA(hSubkey, "TypeName", NULL, &dwType, pszTypeName, pcbTypeName);
1092 CRYPT_ReturnLastError(result);
1094 RegCloseKey(hSubkey);
1099 /******************************************************************************
1100 * CryptEnumProviderTypesW (ADVAPI32.@)
1102 * see CryptEnumProviderTypesA
1104 BOOL WINAPI CryptEnumProviderTypesW (DWORD dwIndex, DWORD *pdwReserved,
1105 DWORD dwFlags, DWORD *pdwProvType, LPWSTR pszTypeName, DWORD *pcbTypeName)
1111 TRACE("(%ld, %p, %08ld, %p, %p, %p)\n", dwIndex, pdwReserved, dwFlags,
1112 pdwProvType, pszTypeName, pcbTypeName);
1113 strlen = *pcbTypeName / sizeof(WCHAR);
1114 if ( pszTypeName && !(str = CRYPT_Alloc(strlen)) )
1115 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
1116 ret = CryptEnumProviderTypesA(dwIndex, pdwReserved, dwFlags, pdwProvType, str, &strlen);
1119 CRYPT_ANSIToUnicode(str, &pszTypeName, *pcbTypeName);
1122 *pcbTypeName = strlen * sizeof(WCHAR);
1126 /******************************************************************************
1127 * CryptExportKey (ADVAPI32.@)
1129 * Exports a cryptographic key from a CSP.
1132 * hKey [I] Handle to the key to export.
1133 * hExpKey [I] Handle to a cryptographic key of the end user.
1134 * dwBlobType [I] Type of BLOB to be exported.
1135 * dwFlags [I] CRYPT_DESTROYKEY/SSL2_FALLBACK/OAEP.
1136 * pbData [O] Buffer to receive BLOB data.
1137 * pdwDataLen [I/O] Specifies the size of pbData.
1144 * if pbData is NULL, CryptExportKey sets pdwDataLen as the size of the
1145 * buffer needed to hold the BLOB.
1147 BOOL WINAPI CryptExportKey (HCRYPTKEY hKey, HCRYPTKEY hExpKey, DWORD dwBlobType,
1148 DWORD dwFlags, BYTE *pbData, DWORD *pdwDataLen)
1151 PCRYPTKEY key = (PCRYPTKEY)hKey, expkey = (PCRYPTKEY)hExpKey;
1153 TRACE("(0x%lx, 0x%lx, %ld, %08ld, %p, %p)\n", hKey, hExpKey, dwBlobType, dwFlags, pbData, pdwDataLen);
1155 if (!key || !pdwDataLen || !key->pProvider || key->pProvider->dwMagic != MAGIC_CRYPTPROV)
1156 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1158 prov = key->pProvider;
1159 return prov->pFuncs->pCPExportKey(prov->hPrivate, key->hPrivate, expkey ? expkey->hPrivate : 0,
1160 dwBlobType, dwFlags, pbData, pdwDataLen);
1163 /******************************************************************************
1164 * CryptGenKey (ADVAPI32.@)
1166 * Generates a random cryptographic session key or a pub/priv key pair.
1169 * hProv [I] Handle to a CSP.
1170 * Algid [I] Algorithm to use to make key.
1171 * dwFlags [I] Specifies type of key to make.
1172 * phKey [I] Address of the handle to which the new key is copied.
1178 BOOL WINAPI CryptGenKey (HCRYPTPROV hProv, ALG_ID Algid, DWORD dwFlags, HCRYPTKEY *phKey)
1180 PCRYPTPROV prov = (PCRYPTPROV)hProv;
1183 TRACE("(0x%lx, %d, %08ld, %p)\n", hProv, Algid, dwFlags, phKey);
1186 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
1187 if (!phKey || !prov || prov->dwMagic != MAGIC_CRYPTPROV)
1188 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1189 if ( !(key = CRYPT_Alloc(sizeof(CRYPTKEY))) )
1190 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
1192 key->pProvider = prov;
1194 if (prov->pFuncs->pCPGenKey(prov->hPrivate, Algid, dwFlags, &key->hPrivate))
1196 *phKey = (HCRYPTKEY)key;
1205 /******************************************************************************
1206 * CryptGetDefaultProviderA (ADVAPI32.@)
1208 * Finds the default CSP of a certain provider type.
1211 * dwProvType [I] Provider type to look for.
1212 * pdwReserved [I] Reserved for future use and must be NULL.
1213 * dwFlags [I] CRYPT_MACHINE_DEFAULT/USER_DEFAULT
1214 * pszProvName [O] Name of the default CSP.
1215 * pcbProvName [I/O] Size of pszProvName
1222 * If pszProvName is NULL, pcbProvName will hold the size of the buffer for
1223 * memory allocation purposes on return.
1225 BOOL WINAPI CryptGetDefaultProviderA (DWORD dwProvType, DWORD *pdwReserved,
1226 DWORD dwFlags, LPSTR pszProvName, DWORD *pcbProvName)
1232 if (pdwReserved || !pcbProvName)
1233 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1234 if (dwFlags & ~(CRYPT_USER_DEFAULT | CRYPT_MACHINE_DEFAULT))
1235 CRYPT_ReturnLastError(NTE_BAD_FLAGS);
1236 if (dwProvType > 999)
1237 CRYPT_ReturnLastError(NTE_BAD_PROV_TYPE);
1238 if ( !(keyname = CRYPT_GetTypeKeyName(dwProvType, dwFlags & CRYPT_USER_DEFAULT)) )
1239 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
1240 if (RegOpenKeyA((dwFlags & CRYPT_USER_DEFAULT) ? HKEY_CURRENT_USER : HKEY_LOCAL_MACHINE ,keyname, &hKey))
1242 CRYPT_Free(keyname);
1243 CRYPT_ReturnLastError(NTE_PROV_TYPE_NOT_DEF);
1245 CRYPT_Free(keyname);
1247 result = RegQueryValueExA(hKey, "Name", NULL, NULL, pszProvName, pcbProvName);
1250 if (result != ERROR_MORE_DATA)
1251 SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
1253 SetLastError(result);
1262 /******************************************************************************
1263 * CryptGetDefaultProviderW (ADVAPI32.@)
1265 * see CryptGetDefaultProviderA
1267 BOOL WINAPI CryptGetDefaultProviderW (DWORD dwProvType, DWORD *pdwReserved,
1268 DWORD dwFlags, LPWSTR pszProvName, DWORD *pcbProvName)
1274 TRACE("(%ld, %p, %08ld, %p, %p)\n", dwProvType, pdwReserved, dwFlags, pszProvName, pcbProvName);
1276 strlen = *pcbProvName / sizeof(WCHAR);
1277 if ( pszProvName && !(str = CRYPT_Alloc(strlen)) )
1278 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
1279 ret = CryptGetDefaultProviderA(dwProvType, pdwReserved, dwFlags, str, &strlen);
1282 CRYPT_ANSIToUnicode(str, &pszProvName, *pcbProvName);
1285 *pcbProvName = strlen * sizeof(WCHAR);
1289 /******************************************************************************
1290 * CryptGetHashParam (ADVAPI32.@)
1292 * Retrieves data that controls the operations of a hash object.
1295 * hHash [I] Handle of the hash object to question.
1296 * dwParam [I] Query type.
1297 * pbData [O] Buffer that receives the value data.
1298 * pdwDataLen [I/O] Size of the pbData buffer.
1299 * dwFlags [I] Reserved for future use and must be zero.
1306 * If pbData is NULL, pdwDataLen will contain the length required.
1308 BOOL WINAPI CryptGetHashParam (HCRYPTHASH hHash, DWORD dwParam, BYTE *pbData,
1309 DWORD *pdwDataLen, DWORD dwFlags)
1312 PCRYPTHASH hash = (PCRYPTHASH)hHash;
1314 TRACE("(0x%lx, %ld, %p, %p, %08ld)\n", hHash, dwParam, pbData, pdwDataLen, dwFlags);
1316 if (!hash || !pdwDataLen || !hash->pProvider || hash->pProvider->dwMagic != MAGIC_CRYPTPROV)
1317 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1319 prov = hash->pProvider;
1320 return prov->pFuncs->pCPGetHashParam(prov->hPrivate, hash->hPrivate, dwParam,
1321 pbData, pdwDataLen, dwFlags);
1324 /******************************************************************************
1325 * CryptGetKeyParam (ADVAPI32.@)
1327 * Retrieves data that controls the operations of a key.
1330 * hKey [I] Handle to they key in question.
1331 * dwParam [I] Specifies query type.
1332 * pbData [O] Sequence of bytes to receive data.
1333 * pdwDataLen [I/O] Size of pbData.
1334 * dwFlags [I] Reserved for future use and must be zero.
1341 * If pbData is NULL, pdwDataLen is set to the needed length of the buffer.
1343 BOOL WINAPI CryptGetKeyParam (HCRYPTKEY hKey, DWORD dwParam, BYTE *pbData,
1344 DWORD *pdwDataLen, DWORD dwFlags)
1347 PCRYPTKEY key = (PCRYPTKEY)hKey;
1349 TRACE("(0x%lx, %ld, %p, %p, %08ld)\n", hKey, dwParam, pbData, pdwDataLen, dwFlags);
1351 if (!key || !pdwDataLen || !key->pProvider || key->pProvider->dwMagic != MAGIC_CRYPTPROV)
1352 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1354 prov = key->pProvider;
1355 return prov->pFuncs->pCPGetKeyParam(prov->hPrivate, key->hPrivate, dwParam,
1356 pbData, pdwDataLen, dwFlags);
1359 /******************************************************************************
1360 * CryptGetProvParam (ADVAPI32.@)
1362 * Retrieves parameters that control the operations of a CSP.
1365 * hProv [I] Handle of the CSP in question.
1366 * dwParam [I] Specifies query type.
1367 * pbData [O] Buffer to receive the data.
1368 * pdwDataLen [I/O] Size of pbData.
1369 * dwFlags [I] see MSDN Docs.
1376 * If pbData is NULL, pdwDataLen is set to the needed buffer length.
1378 BOOL WINAPI CryptGetProvParam (HCRYPTPROV hProv, DWORD dwParam, BYTE *pbData,
1379 DWORD *pdwDataLen, DWORD dwFlags)
1381 PCRYPTPROV prov = (PCRYPTPROV)hProv;
1383 TRACE("(0x%lx, %ld, %p, %p, %08ld)\n", hProv, dwParam, pbData, pdwDataLen, dwFlags);
1385 if (!prov || prov->dwMagic != MAGIC_CRYPTPROV)
1386 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1388 return prov->pFuncs->pCPGetProvParam(prov->hPrivate, dwParam, pbData, pdwDataLen, dwFlags);
1391 /******************************************************************************
1392 * CryptGetUserKey (ADVAPI32.@)
1394 * Gets a handle of one of a user's two public/private key pairs.
1397 * hProv [I] Handle of a CSP.
1398 * dwKeySpec [I] Private key to use.
1399 * phUserKey [O] Pointer to the handle of the retrieved keys.
1405 BOOL WINAPI CryptGetUserKey (HCRYPTPROV hProv, DWORD dwKeySpec, HCRYPTKEY *phUserKey)
1407 PCRYPTPROV prov = (PCRYPTPROV)hProv;
1410 TRACE("(0x%lx, %ld, %p)\n", hProv, dwKeySpec, phUserKey);
1413 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
1414 if (!phUserKey || prov->dwMagic != MAGIC_CRYPTPROV)
1415 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1416 if ( !(key = CRYPT_Alloc(sizeof(CRYPTKEY))) )
1417 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
1419 key->pProvider = prov;
1421 if (prov->pFuncs->pCPGetUserKey(prov->hPrivate, dwKeySpec, &key->hPrivate))
1423 *phUserKey = (HCRYPTKEY)key;
1433 /******************************************************************************
1434 * CryptHashData (ADVAPI32.@)
1436 * Adds data to a hash object.
1439 * hHash [I] Handle of the hash object.
1440 * pbData [I] Buffer of data to be hashed.
1441 * dwDataLen [I] Number of bytes to add.
1442 * dwFlags [I] Can be CRYPT_USERDATA
1448 BOOL WINAPI CryptHashData (HCRYPTHASH hHash, BYTE *pbData, DWORD dwDataLen, DWORD dwFlags)
1450 PCRYPTHASH hash = (PCRYPTHASH)hHash;
1453 TRACE("(0x%lx, %p, %ld, %08ld)\n", hHash, pbData, dwDataLen, dwFlags);
1456 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
1457 if (!pbData || !dwDataLen || !hash->pProvider || hash->pProvider->dwMagic != MAGIC_CRYPTPROV)
1458 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1460 prov = hash->pProvider;
1461 return prov->pFuncs->pCPHashData(prov->hPrivate, hash->hPrivate, pbData, dwDataLen, dwFlags);
1464 /******************************************************************************
1465 * CryptHashSessionKey (ADVAPI32.@)
1468 * hHash [I] Handle to the hash object.
1469 * hKey [I] Handle to the key to be hashed.
1470 * dwFlags [I] Can be CRYPT_LITTLE_ENDIAN.
1476 BOOL WINAPI CryptHashSessionKey (HCRYPTHASH hHash, HCRYPTKEY hKey, DWORD dwFlags)
1478 PCRYPTHASH hash = (PCRYPTHASH)hHash;
1479 PCRYPTKEY key = (PCRYPTKEY)hKey;
1482 TRACE("(0x%lx, 0x%lx, %08ld)\n", hHash, hKey, dwFlags);
1485 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
1487 if (!hash->pProvider || hash->pProvider->dwMagic != MAGIC_CRYPTPROV)
1488 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1490 prov = hash->pProvider;
1491 return prov->pFuncs->pCPHashSessionKey(prov->hPrivate, hash->hPrivate, key->hPrivate, dwFlags);
1494 /******************************************************************************
1495 * CryptImportKey (ADVAPI32.@)
1498 * hProv [I] Handle of a CSP.
1499 * pbData [I] Contains the key to be imported.
1500 * dwDataLen [I] Length of the key.
1501 * hPubKey [I] Cryptographic key that decrypts pdData
1502 * dwFlags [I] Used only with a public/private key pair.
1503 * phKey [O] Imported key.
1509 BOOL WINAPI CryptImportKey (HCRYPTPROV hProv, BYTE *pbData, DWORD dwDataLen,
1510 HCRYPTKEY hPubKey, DWORD dwFlags, HCRYPTKEY *phKey)
1512 PCRYPTPROV prov = (PCRYPTPROV)hProv;
1513 PCRYPTKEY pubkey = (PCRYPTKEY)hPubKey, importkey;
1515 TRACE("(0x%lx, %p, %ld, 0x%lx, %08ld, %p)\n", hProv, pbData, dwDataLen, hPubKey, dwFlags, phKey);
1517 if (!prov || !pbData || !dwDataLen || !phKey || prov->dwMagic != MAGIC_CRYPTPROV)
1518 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1520 if ( !(importkey = CRYPT_Alloc(sizeof(CRYPTKEY))) )
1521 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
1523 importkey->pProvider = prov;
1524 if (prov->pFuncs->pCPImportKey(prov->hPrivate, pbData, dwDataLen,
1525 pubkey ? pubkey->hPrivate : 0, dwFlags, &importkey->hPrivate))
1527 *phKey = (HCRYPTKEY)importkey;
1531 CRYPT_Free(importkey);
1535 /******************************************************************************
1536 * CryptSignHashW (ADVAPI32.@)
1541 * hHash [I] Handle of the hash object to be signed.
1542 * dwKeySpec [I] Private key to use.
1543 * sDescription [I] Should be NULL.
1544 * dwFlags [I] CRYPT_NOHASHOID/X931_FORMAT.
1545 * pbSignature [O] Buffer of the signature data.
1546 * pdwSigLen [I/O] Size of the pbSignature buffer.
1553 * Because of security flaws sDescription should not be used and should thus be
1554 * NULL. It is supported only for compatibility with Microsoft's Cryptographic
1557 BOOL WINAPI CryptSignHashW (HCRYPTHASH hHash, DWORD dwKeySpec, LPCWSTR sDescription,
1558 DWORD dwFlags, BYTE *pbSignature, DWORD *pdwSigLen)
1560 PCRYPTHASH hash = (PCRYPTHASH)hHash;
1563 TRACE("(0x%lx, %ld, %s, %08ld, %p, %p)\n",
1564 hHash, dwKeySpec, debugstr_w(sDescription), dwFlags, pbSignature, pdwSigLen);
1567 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
1568 if (!pdwSigLen || !hash->pProvider || hash->pProvider->dwMagic != MAGIC_CRYPTPROV)
1569 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1571 prov = hash->pProvider;
1572 return prov->pFuncs->pCPSignHash(prov->hPrivate, hash->hPrivate, dwKeySpec, sDescription,
1573 dwFlags, pbSignature, pdwSigLen);
1576 /******************************************************************************
1577 * CryptSignHashA (ADVAPI32.@)
1579 * ASCII version of CryptSignHashW
1581 BOOL WINAPI CryptSignHashA (HCRYPTHASH hHash, DWORD dwKeySpec, LPCSTR sDescription,
1582 DWORD dwFlags, BYTE *pbSignature, DWORD *pdwSigLen)
1584 LPWSTR wsDescription;
1587 TRACE("(0x%lx, %ld, %s, %08ld, %p, %p)\n",
1588 hHash, dwKeySpec, debugstr_a(sDescription), dwFlags, pbSignature, pdwSigLen);
1590 CRYPT_ANSIToUnicode(sDescription, &wsDescription, -1);
1591 result = CryptSignHashW(hHash, dwKeySpec, wsDescription, dwFlags, pbSignature, pdwSigLen);
1592 if (wsDescription) CRYPT_Free(wsDescription);
1597 /******************************************************************************
1598 * CryptSetHashParam (ADVAPI32.@)
1600 * Customizes the operations of a hash object.
1603 * hHash [I] Handle of the hash object to set parameters.
1604 * dwParam [I] HP_HMAC_INFO/HASHVAL.
1605 * pbData [I] Value data buffer.
1606 * dwFlags [I] Reserved for future use and must be zero.
1612 BOOL WINAPI CryptSetHashParam (HCRYPTHASH hHash, DWORD dwParam, BYTE *pbData, DWORD dwFlags)
1615 PCRYPTHASH hash = (PCRYPTHASH)hHash;
1617 TRACE("(0x%lx, %ld, %p, %08ld)\n", hHash, dwParam, pbData, dwFlags);
1619 if (!hash || !pbData || !hash->pProvider || hash->pProvider->dwMagic != MAGIC_CRYPTPROV)
1620 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1622 prov = hash->pProvider;
1623 return prov->pFuncs->pCPSetHashParam(prov->hPrivate, hash->hPrivate,
1624 dwParam, pbData, dwFlags);
1627 /******************************************************************************
1628 * CryptSetKeyParam (ADVAPI32.@)
1630 * Customizes a session key's operations.
1633 * hKey [I] Handle to the key to set values.
1634 * dwParam [I] See MSDN Doc.
1635 * pbData [I] Buffer of values to set.
1636 * dwFlags [I] Only used when dwParam == KP_ALGID.
1642 BOOL WINAPI CryptSetKeyParam (HCRYPTKEY hKey, DWORD dwParam, BYTE *pbData, DWORD dwFlags)
1645 PCRYPTKEY key = (PCRYPTKEY)hKey;
1647 TRACE("(0x%lx, %ld, %p, %08ld)\n", hKey, dwParam, pbData, dwFlags);
1649 if (!key || !pbData || !key->pProvider || key->pProvider->dwMagic != MAGIC_CRYPTPROV)
1650 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1652 prov = key->pProvider;
1653 return prov->pFuncs->pCPSetKeyParam(prov->hPrivate, key->hPrivate,
1654 dwParam, pbData, dwFlags);
1657 /******************************************************************************
1658 * CryptSetProviderA (ADVAPI32.@)
1660 * Specifies the current user's default CSP.
1663 * pszProvName [I] Name of the new default CSP.
1664 * dwProvType [I] Provider type of the CSP.
1670 BOOL WINAPI CryptSetProviderA (LPCSTR pszProvName, DWORD dwProvType)
1672 TRACE("(%s, %ld)\n", pszProvName, dwProvType);
1673 return CryptSetProviderExA(pszProvName, dwProvType, NULL, CRYPT_USER_DEFAULT);
1676 /******************************************************************************
1677 * CryptSetProviderW (ADVAPI32.@)
1679 * See CryptSetProviderA
1681 BOOL WINAPI CryptSetProviderW (LPCWSTR pszProvName, DWORD dwProvType)
1683 TRACE("(%s, %ld)\n", debugstr_w(pszProvName), dwProvType);
1684 return CryptSetProviderExW(pszProvName, dwProvType, NULL, CRYPT_USER_DEFAULT);
1687 /******************************************************************************
1688 * CryptSetProviderExA (ADVAPI32.@)
1690 * Specifies the default CSP.
1693 * pszProvName [I] Name of the new default CSP.
1694 * dwProvType [I] Provider type of the CSP.
1695 * pdwReserved [I] Reserved for future use and must be NULL.
1696 * dwFlags [I] See MSDN Doc.
1702 BOOL WINAPI CryptSetProviderExA (LPCSTR pszProvName, DWORD dwProvType, DWORD *pdwReserved, DWORD dwFlags)
1704 HKEY hProvKey, hTypeKey;
1707 TRACE("(%s, %ld, %p, %08ld)\n", pszProvName, dwProvType, pdwReserved, dwFlags);
1709 if (!pszProvName || pdwReserved)
1710 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1711 if (dwProvType > MAXPROVTYPES)
1712 CRYPT_ReturnLastError(NTE_BAD_PROV_TYPE);
1713 if (dwFlags & ~(CRYPT_MACHINE_DEFAULT | CRYPT_USER_DEFAULT | CRYPT_DELETE_DEFAULT)
1714 || dwFlags == CRYPT_DELETE_DEFAULT)
1715 CRYPT_ReturnLastError(NTE_BAD_FLAGS);
1717 if (!(keyname = CRYPT_GetTypeKeyName(dwProvType, dwFlags & CRYPT_USER_DEFAULT)))
1718 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
1719 if (RegOpenKeyA((dwFlags & CRYPT_USER_DEFAULT) ? HKEY_CURRENT_USER : HKEY_LOCAL_MACHINE,
1720 keyname, &hTypeKey))
1722 CRYPT_Free(keyname);
1723 CRYPT_ReturnLastError(NTE_BAD_PROVIDER);
1725 CRYPT_Free(keyname);
1727 if (dwFlags & CRYPT_DELETE_DEFAULT)
1729 RegDeleteValueA(hTypeKey, "Name");
1733 if (!(keyname = CRYPT_GetProvKeyName(pszProvName)))
1735 RegCloseKey(hTypeKey);
1736 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
1738 if (RegOpenKeyA((dwFlags & CRYPT_USER_DEFAULT) ? HKEY_CURRENT_USER : HKEY_LOCAL_MACHINE,
1739 keyname, &hProvKey))
1741 CRYPT_Free(keyname);
1742 RegCloseKey(hTypeKey);
1743 CRYPT_ReturnLastError(NTE_BAD_PROVIDER);
1745 CRYPT_Free(keyname);
1747 if (RegSetValueExA(hTypeKey, "Name", 0, REG_SZ, pszProvName, strlen(pszProvName) + 1))
1749 RegCloseKey(hTypeKey);
1750 RegCloseKey(hProvKey);
1754 RegCloseKey(hProvKey);
1756 RegCloseKey(hTypeKey);
1761 /******************************************************************************
1762 * CryptSetProviderExW (ADVAPI32.@)
1764 * See CryptSetProviderExA
1766 BOOL WINAPI CryptSetProviderExW (LPCWSTR pszProvName, DWORD dwProvType, DWORD *pdwReserved, DWORD dwFlags)
1771 TRACE("(%s, %ld, %p, %08ld)\n", debugstr_w(pszProvName), dwProvType, pdwReserved, dwFlags);
1773 if (CRYPT_UnicodeToANSI(pszProvName, &str, -1))
1775 ret = CryptSetProviderExA(str, dwProvType, pdwReserved, dwFlags);
1781 /******************************************************************************
1782 * CryptSetProvParam (ADVAPI32.@)
1784 * Customizes the operations of a CSP.
1787 * hProv [I] Handle of a CSP.
1788 * dwParam [I] See MSDN Doc.
1789 * pbData [I] Buffer that contains a value to set as a parameter.
1790 * dwFlags [I] if dwParam is PP_USE_HARDWARE_RNG, dwFlags must be zero.
1796 BOOL WINAPI CryptSetProvParam (HCRYPTPROV hProv, DWORD dwParam, BYTE *pbData, DWORD dwFlags)
1798 PCRYPTPROV prov = (PCRYPTPROV)hProv;
1800 TRACE("(0x%lx, %ld, %p, %08ld)\n", hProv, dwParam, pbData, dwFlags);
1803 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
1804 if (prov->dwMagic != MAGIC_CRYPTPROV)
1805 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1806 if (dwFlags & PP_USE_HARDWARE_RNG)
1808 FIXME("PP_USE_HARDWARE_RNG: What do I do with this?\n");
1809 FIXME("\tLetting the CSP decide.\n");
1811 if (dwFlags & PP_CLIENT_HWND)
1813 /* FIXME: Should verify the parameter */
1814 if (pbData /* && IsWindow((HWND)pbData) */)
1816 crypt_hWindow = (HWND)(pbData);
1819 SetLastError(ERROR_INVALID_PARAMETER);
1823 /* All other flags go to the CSP */
1824 return prov->pFuncs->pCPSetProvParam(prov->hPrivate, dwParam, pbData, dwFlags);
1827 /******************************************************************************
1828 * CryptVerifySignatureW (ADVAPI32.@)
1830 * Verifies the signature of a hash object.
1833 * hHash [I] Handle of the hash object to verify.
1834 * pbSignature [I] Signature data to verify.
1835 * dwSigLen [I] Size of pbSignature.
1836 * hPubKey [I] Handle to the public key to authenticate signature.
1837 * sDescription [I] Should be NULL.
1838 * dwFlags [I] See MSDN doc.
1845 * Because of security flaws sDescription should not be used and should thus be
1846 * NULL. It is supported only for compatibility with Microsoft's Cryptographic
1849 BOOL WINAPI CryptVerifySignatureW (HCRYPTHASH hHash, BYTE *pbSignature, DWORD dwSigLen,
1850 HCRYPTKEY hPubKey, LPCWSTR sDescription, DWORD dwFlags)
1852 PCRYPTHASH hash = (PCRYPTHASH)hHash;
1853 PCRYPTKEY key = (PCRYPTKEY)hPubKey;
1856 TRACE("(0x%lx, %p, %ld, 0x%lx, %s, %08ld)\n", hHash, pbSignature,
1857 dwSigLen, hPubKey, debugstr_w(sDescription), dwFlags);
1860 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
1861 if (!pbSignature || !dwSigLen ||
1862 !hash->pProvider || hash->pProvider->dwMagic != MAGIC_CRYPTPROV ||
1863 !key->pProvider || key->pProvider->dwMagic != MAGIC_CRYPTPROV)
1865 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1868 prov = hash->pProvider;
1869 return prov->pFuncs->pCPVerifySignature(prov->hPrivate, hash->hPrivate, pbSignature, dwSigLen,
1870 key->hPrivate, sDescription, dwFlags);
1873 /******************************************************************************
1874 * CryptVerifySignatureA (ADVAPI32.@)
1876 * ASCII version of CryptVerifySignatureW
1878 BOOL WINAPI CryptVerifySignatureA (HCRYPTHASH hHash, BYTE *pbSignature, DWORD dwSigLen,
1879 HCRYPTKEY hPubKey, LPCSTR sDescription, DWORD dwFlags)
1881 LPWSTR wsDescription;
1884 TRACE("(0x%lx, %p, %ld, 0x%lx, %s, %08ld)\n", hHash, pbSignature,
1885 dwSigLen, hPubKey, debugstr_a(sDescription), dwFlags);
1887 CRYPT_ANSIToUnicode(sDescription, &wsDescription, -1);
1888 result = CryptVerifySignatureW(hHash, pbSignature, dwSigLen, hPubKey, wsDescription, dwFlags);
1889 if (wsDescription) CRYPT_Free(wsDescription);
1895 These functions have nearly identical prototypes to CryptProtectMemory and CryptUnprotectMemory,
1899 /******************************************************************************
1900 * SystemFunction040 (ADVAPI32.@)
1903 * memory [I/O] Pointer to memory to encrypt.
1904 * length [I] Length of region to encrypt in bytes.
1905 * flags [I] Control whether other processes are able to decrypt the memory.
1906 * RTL_ENCRYPT_OPTION_SAME_PROCESS
1907 * RTL_ENCRYPT_OPTION_CROSS_PROCESS
1908 * RTL_ENCRYPT_OPTION_SAME_LOGON
1911 * length must be a multiple of RTL_ENCRYPT_MEMORY_SIZE.
1912 * If flags are specified when encrypting, the same flag value must be given
1913 * when decrypting the memory.
1915 NTSTATUS WINAPI SystemFunction040(PVOID memory, ULONG length, ULONG flags) /* RtlEncryptMemory */
1917 FIXME("(%p, %lx, %lx): stub [RtlEncryptMemory]\n", memory, length, flags);
1918 return STATUS_SUCCESS;
1921 /******************************************************************************
1922 * SystemFunction041 (ADVAPI32.@)
1925 * memory [I/O] Pointer to memory to decrypt.
1926 * length [I] Length of region to decrypt in bytes.
1927 * flags [I] Control whether other processes are able to decrypt the memory.
1928 * RTL_ENCRYPT_OPTION_SAME_PROCESS
1929 * RTL_ENCRYPT_OPTION_CROSS_PROCESS
1930 * RTL_ENCRYPT_OPTION_SAME_LOGON
1933 * length must be a multiple of RTL_ENCRYPT_MEMORY_SIZE.
1934 * If flags are specified when encrypting, the same flag value must be given
1935 * when decrypting the memory.
1937 NTSTATUS WINAPI SystemFunction041(PVOID memory, ULONG length, ULONG flags) /* RtlDecryptMemory */
1939 FIXME("(%p, %lx, %lx): stub [RtlDecryptMemory]\n", memory, length, flags);
1940 return STATUS_SUCCESS;