?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Add a basic GDI LOGFONT test, fix a couple of failures.
[wine/testsucceed.git] / dlls / advapi32 / crypt.c
blobef70ef6d910fa5d7de20f767253900642fc94eec
1 /*
2 * Copyright 1999 Ian Schmidt
3 * Copyright 2001 Travis Michielsen
4 *
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.
9 *
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.
14 *
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
18 */
19
20 /***********************************************************************
21 *
22 * TODO:
23 * - Reference counting
24 * - Thread-safing
25 * - Signature checking
26 */
27
28 #include <time.h>
29 #include <stdlib.h>
30 #include <stdio.h>
31
32 #include "wine/unicode.h"
33 #include "crypt.h"
34 #include "winnls.h"
35 #include "wincrypt.h"
36 #include "windef.h"
37 #include "winerror.h"
38 #include "winreg.h"
39 #include "winbase.h"
40 #include "winuser.h"
41 #include "wine/debug.h"
42 #include "winternl.h"
43 #include "ntstatus.h"
44
45 WINE_DEFAULT_DEBUG_CHANNEL(crypt);
46
47 HWND crypt_hWindow = 0;
48
49 #define CRYPT_ReturnLastError(err) {SetLastError(err); return FALSE;}
50
51 #define CRYPT_Alloc(size) ((LPVOID)LocalAlloc(LMEM_ZEROINIT, size))
52 #define CRYPT_Free(buffer) (LocalFree((HLOCAL)buffer))
53
54 static inline PSTR CRYPT_GetProvKeyName(PCSTR pProvName)
55 {
56 PCSTR KEYSTR = "Software\\Microsoft\\Cryptography\\Defaults\\Provider\\";
57 PSTR keyname;
58
59 keyname = CRYPT_Alloc(strlen(KEYSTR) + strlen(pProvName) +1);
60 if (keyname)
61 {
62 strcpy(keyname, KEYSTR);
63 strcpy(keyname + strlen(KEYSTR), pProvName);
64 } else
65 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
66 return keyname;
67 }
68
69 static inline PSTR CRYPT_GetTypeKeyName(DWORD dwType, BOOL user)
70 {
71 PCSTR MACHINESTR = "Software\\Microsoft\\Cryptography\\Defaults\\Provider Types\\Type XXX";
72 PCSTR USERSTR = "Software\\Microsoft\\Cryptography\\Provider Type XXX";
73 PSTR keyname;
74 PSTR ptr;
75
76 keyname = CRYPT_Alloc( (user ? strlen(USERSTR) : strlen(MACHINESTR)) +1);
77 if (keyname)
78 {
79 user ? strcpy(keyname, USERSTR) : strcpy(keyname, MACHINESTR);
80 ptr = keyname + strlen(keyname);
81 *(--ptr) = (dwType % 10) + '0';
82 *(--ptr) = ((dwType / 10) % 10) + '0';
83 *(--ptr) = (dwType / 100) + '0';
84 } else
85 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
86 return keyname;
87 }
88
89 /* CRYPT_UnicodeTOANSI
90 * wstr - unicode string
91 * str - pointer to ANSI string
92 * strsize - size of buffer pointed to by str or -1 if we have to do the allocation
93 *
94 * returns TRUE if unsuccessfull, FALSE otherwise.
95 * if wstr is NULL, returns TRUE and sets str to NULL! Value of str should be checked after call
96 */
97 static inline BOOL CRYPT_UnicodeToANSI(LPCWSTR wstr, LPSTR* str, int strsize)
98 {
99 int count;
100
101 if (!wstr)
102 {
103 *str = NULL;
104 return TRUE;
105 }
106 count = WideCharToMultiByte(CP_ACP, 0, wstr, -1, NULL, 0, NULL, NULL);
107 count = count < strsize ? count : strsize;
108 if (strsize == -1)
109 *str = CRYPT_Alloc(count * sizeof(CHAR));
110 if (*str)
111 {
112 WideCharToMultiByte(CP_ACP, 0, wstr, -1, *str, count, NULL, NULL);
113 return TRUE;
114 }
115 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
116 return FALSE;
117 }
118
119 /* CRYPT_ANSITOUnicode
120 * str - ANSI string
121 * wstr - pointer to unicode string
122 * wstrsize - size of buffer pointed to by wstr or -1 if we have to do the allocation
123 */
124 static inline BOOL CRYPT_ANSIToUnicode(LPCSTR str, LPWSTR* wstr, int wstrsize)
125 {
126 int wcount;
127
128 if (!str)
129 {
130 *wstr = NULL;
131 return TRUE;
132 }
133 wcount = MultiByteToWideChar(CP_ACP, 0, str, -1, NULL, 0);
134 wcount = wcount < wstrsize/sizeof(WCHAR) ? wcount : wstrsize/sizeof(WCHAR);
135 if (wstrsize == -1)
136 *wstr = CRYPT_Alloc(wcount * sizeof(WCHAR));
137 if (*wstr)
138 {
139 MultiByteToWideChar(CP_ACP, 0, str, -1, *wstr, wcount);
140 return TRUE;
141 }
142 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
143 return FALSE;
144 }
145
146 /* These next 2 functions are used by the VTableProvStruc structure */
147 static BOOL CALLBACK CRYPT_VerifyImage(LPCSTR lpszImage, BYTE* pData)
148 {
149 if (!lpszImage || !pData)
150 {
151 SetLastError(ERROR_INVALID_PARAMETER);
152 return FALSE;
153 }
154
155 FIXME("(%s, %p): not verifying image\n", lpszImage, pData);
156
157 return TRUE;
158 }
159
160 static BOOL CALLBACK CRYPT_ReturnhWnd(HWND *phWnd)
161 {
162 if (!phWnd)
163 return FALSE;
164 *phWnd = crypt_hWindow;
165 return TRUE;
166 }
167
168 #define CRYPT_GetProvFunc(name) \
169 if ( !(provider->pFuncs->p##name = (void*)GetProcAddress(provider->hModule, #name)) ) goto error
170 #define CRYPT_GetProvFuncOpt(name) \
171 provider->pFuncs->p##name = (void*)GetProcAddress(provider->hModule, #name)
172 PCRYPTPROV CRYPT_LoadProvider(PSTR pImage)
173 {
174 PCRYPTPROV provider;
175 DWORD errorcode = ERROR_NOT_ENOUGH_MEMORY;
176
177 if ( !(provider = CRYPT_Alloc(sizeof(CRYPTPROV))) ) goto error;
178 if ( !(provider->pFuncs = CRYPT_Alloc(sizeof(PROVFUNCS))) ) goto error;
179 if ( !(provider->pVTable = CRYPT_Alloc(sizeof(VTableProvStruc))) ) goto error;
180 if ( !(provider->hModule = LoadLibraryA(pImage)) )
181 {
182 errorcode = (GetLastError() == ERROR_FILE_NOT_FOUND) ? NTE_PROV_DLL_NOT_FOUND : NTE_PROVIDER_DLL_FAIL;
183 FIXME("Failed to load dll %s\n", debugstr_a(pImage));
184 goto error;
185 }
186 provider->refcount = 1;
187
188 errorcode = NTE_PROVIDER_DLL_FAIL;
189 CRYPT_GetProvFunc(CPAcquireContext);
190 CRYPT_GetProvFunc(CPCreateHash);
191 CRYPT_GetProvFunc(CPDecrypt);
192 CRYPT_GetProvFunc(CPDeriveKey);
193 CRYPT_GetProvFunc(CPDestroyHash);
194 CRYPT_GetProvFunc(CPDestroyKey);
195 CRYPT_GetProvFuncOpt(CPDuplicateHash);
196 CRYPT_GetProvFuncOpt(CPDuplicateKey);
197 CRYPT_GetProvFunc(CPEncrypt);
198 CRYPT_GetProvFunc(CPExportKey);
199 CRYPT_GetProvFunc(CPGenKey);
200 CRYPT_GetProvFunc(CPGenRandom);
201 CRYPT_GetProvFunc(CPGetHashParam);
202 CRYPT_GetProvFunc(CPGetKeyParam);
203 CRYPT_GetProvFunc(CPGetProvParam);
204 CRYPT_GetProvFunc(CPGetUserKey);
205 CRYPT_GetProvFunc(CPHashData);
206 CRYPT_GetProvFunc(CPHashSessionKey);
207 CRYPT_GetProvFunc(CPImportKey);
208 CRYPT_GetProvFunc(CPReleaseContext);
209 CRYPT_GetProvFunc(CPSetHashParam);
210 CRYPT_GetProvFunc(CPSetKeyParam);
211 CRYPT_GetProvFunc(CPSetProvParam);
212 CRYPT_GetProvFunc(CPSignHash);
213 CRYPT_GetProvFunc(CPVerifySignature);
214
215 /* FIXME: Not sure what the pbContextInfo field is for.
216 * Does it need memory allocation?
217 */
218 provider->pVTable->Version = 3;
219 provider->pVTable->pFuncVerifyImage = (FARPROC)CRYPT_VerifyImage;
220 provider->pVTable->pFuncReturnhWnd = (FARPROC)CRYPT_ReturnhWnd;
221 provider->pVTable->dwProvType = 0;
222 provider->pVTable->pbContextInfo = NULL;
223 provider->pVTable->cbContextInfo = 0;
224 provider->pVTable->pszProvName = NULL;
225 return provider;
226
227 error:
228 SetLastError(errorcode);
229 if (provider)
230 {
231 if (provider->hModule)
232 FreeLibrary(provider->hModule);
233 CRYPT_Free(provider->pVTable);
234 CRYPT_Free(provider->pFuncs);
235 CRYPT_Free(provider);
236 }
237 return NULL;
238 }
239 #undef CRYPT_GetProvFunc
240 #undef CRYPT_GetProvFuncOpt
241
242
243 /******************************************************************************
244 * CryptAcquireContextA (ADVAPI32.@)
245 * Acquire a crypto provider context handle.
246 *
247 * PARAMS
248 * phProv: Pointer to HCRYPTPROV for the output.
249 * pszContainer: Key Container Name
250 * pszProvider: Cryptographic Service Provider Name
251 * dwProvType: Crypto provider type to get a handle.
252 * dwFlags: flags for the operation
253 *
254 * RETURNS TRUE on success, FALSE on failure.
255 */
256 BOOL WINAPI CryptAcquireContextA (HCRYPTPROV *phProv, LPCSTR pszContainer,
257 LPCSTR pszProvider, DWORD dwProvType, DWORD dwFlags)
258 {
259 PCRYPTPROV pProv = NULL;
260 HKEY key;
261 PSTR imagepath = NULL, keyname = NULL, provname = NULL, temp = NULL;
262 BYTE* signature;
263 DWORD keytype, type, len;
264 ULONG r;
265
266 TRACE("(%p, %s, %s, %ld, %08lx)\n", phProv, pszContainer,
267 pszProvider, dwProvType, dwFlags);
268
269 if (dwProvType < 1 || dwProvType > MAXPROVTYPES)
270 {
271 SetLastError(NTE_BAD_PROV_TYPE);
272 return FALSE;
273 }
274
275 if (!phProv)
276 {
277 SetLastError(ERROR_INVALID_PARAMETER);
278 return FALSE;
279 }
280
281 if (!pszProvider || !*pszProvider)
282 {
283 /* No CSP name specified so try the user default CSP first
284 * then try the machine default CSP
285 */
286 if ( !(keyname = CRYPT_GetTypeKeyName(dwProvType, TRUE)) ) {
287 TRACE("No provider registered for crypto provider type %ld.\n", dwProvType);
288 SetLastError(NTE_PROV_TYPE_NOT_DEF);
289 return FALSE;
290 }
291 if (RegOpenKeyA(HKEY_CURRENT_USER, keyname, &key))
292 {
293 CRYPT_Free(keyname);
294 if ( !(keyname = CRYPT_GetTypeKeyName(dwProvType, FALSE)) ) {
295 TRACE("No type registered for crypto provider type %ld.\n", dwProvType);
296 RegCloseKey(key);
297 SetLastError(NTE_PROV_TYPE_NOT_DEF);
298 goto error;
299 }
300 if (RegOpenKeyA(HKEY_LOCAL_MACHINE, keyname, &key)) {
301 TRACE("Did not find registry entry of crypto provider for %s.\n", debugstr_a(keyname));
302 CRYPT_Free(keyname);
303 RegCloseKey(key);
304 SetLastError(NTE_PROV_TYPE_NOT_DEF);
305 goto error;
306 }
307 }
308 CRYPT_Free(keyname);
309 r = RegQueryValueExA(key, "Name", NULL, &keytype, NULL, &len);
310 if( r != ERROR_SUCCESS || !len || keytype != REG_SZ)
311 {
312 TRACE("error %ld reading size of 'Name' from registry\n", r );
313 RegCloseKey(key);
314 SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
315 goto error;
316 }
317 if(!(provname = CRYPT_Alloc(len)))
318 {
319 RegCloseKey(key);
320 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
321 goto error;
322 }
323 r = RegQueryValueExA(key, "Name", NULL, NULL, provname, &len);
324 if( r != ERROR_SUCCESS )
325 {
326 TRACE("error %ld reading 'Name' from registry\n", r );
327 RegCloseKey(key);
328 SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
329 goto error;
330 }
331 RegCloseKey(key);
332 } else {
333 if ( !(provname = CRYPT_Alloc(strlen(pszProvider) +1)) )
334 {
335 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
336 goto error;
337 }
338 strcpy(provname, pszProvider);
339 }
340
341 keyname = CRYPT_GetProvKeyName(provname);
342 r = RegOpenKeyA(HKEY_LOCAL_MACHINE, keyname, &key);
343 CRYPT_Free(keyname);
344 if (r != ERROR_SUCCESS)
345 {
346 SetLastError(NTE_KEYSET_NOT_DEF);
347 goto error;
348 }
349 len = sizeof(DWORD);
350 r = RegQueryValueExA(key, "Type", NULL, NULL, (BYTE*)&type, &len);
351 if (r != ERROR_SUCCESS)
352 {
353 SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
354 goto error;
355 }
356 if (type != dwProvType)
357 {
358 TRACE("Crypto provider has wrong type (%ld vs expected %ld).\n", type, dwProvType);
359 SetLastError(NTE_PROV_TYPE_NO_MATCH);
360 goto error;
361 }
362
363 r = RegQueryValueExA(key, "Image Path", NULL, &keytype, NULL, &len);
364 if ( r != ERROR_SUCCESS || keytype != REG_SZ)
365 {
366 TRACE("error %ld reading size of 'Image Path' from registry\n", r );
367 RegCloseKey(key);
368 SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
369 goto error;
370 }
371 if (!(temp = CRYPT_Alloc(len)))
372 {
373 RegCloseKey(key);
374 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
375 goto error;
376 }
377 r = RegQueryValueExA(key, "Image Path", NULL, NULL, temp, &len);
378 if( r != ERROR_SUCCESS )
379 {
380 TRACE("error %ld reading 'Image Path' from registry\n", r );
381 RegCloseKey(key);
382 SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
383 goto error;
384 }
385
386 r = RegQueryValueExA(key, "Signature", NULL, &keytype, NULL, &len);
387 if ( r == ERROR_SUCCESS && keytype == REG_BINARY )
388 {
389 if (!(signature = CRYPT_Alloc(len)))
390 {
391 RegCloseKey(key);
392 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
393 goto error;
394 }
395 r = RegQueryValueExA(key, "Signature", NULL, NULL, signature, &len);
396 if ( r != ERROR_SUCCESS )
397 {
398 TRACE("error %ld reading 'Signature'\n", r );
399 RegCloseKey(key);
400 SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
401 goto error;
402 }
403 }
404 else
405 {
406 r = RegQueryValueExA(key, "SigInFile", NULL, &keytype, NULL, &len);
407 if (r != ERROR_SUCCESS)
408 {
409 TRACE("error %ld reading size of 'SigInFile'\n", r );
410 RegCloseKey(key);
411 SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
412 goto error;
413 }
414 else
415 {
416 /* FIXME: The presence of the SigInFile value indicates the
417 * provider's signature is in its resources, so need to read it.
418 * But since CRYPT_VerifyImage is stubbed, provide any old thing
419 * for now.
420 */
421 if (!(signature = CRYPT_Alloc(1)))
422 {
423 RegCloseKey(key);
424 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
425 goto error;
426 }
427 }
428 }
429 RegCloseKey(key);
430 len = ExpandEnvironmentStringsA(temp, NULL, 0);
431 if ( !(imagepath = CRYPT_Alloc(len)) )
432 {
433 CRYPT_Free(signature);
434 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
435 goto error;
436 }
437 if (!ExpandEnvironmentStringsA(temp, imagepath, len))
438 {
439 CRYPT_Free(signature);
440 /* ExpandEnvironmentStrings will call SetLastError */
441 goto error;
442 }
443
444 if (!CRYPT_VerifyImage(imagepath, signature))
445 {
446 CRYPT_Free(signature);
447 SetLastError(NTE_SIGNATURE_FILE_BAD);
448 goto error;
449 }
450 pProv = CRYPT_LoadProvider(imagepath);
451 CRYPT_Free(signature);
452 if (!pProv) {
453 /* CRYPT_LoadProvider calls SetLastError */
454 goto error;
455 }
456 pProv->pVTable->dwProvType = dwProvType;
457 pProv->pVTable->pszProvName = provname;
458 if (pProv->pFuncs->pCPAcquireContext(&pProv->hPrivate, (CHAR*)pszContainer, dwFlags, pProv->pVTable))
459 {
460 /* MSDN: When this flag is set, the value returned in phProv is undefined,
461 * and thus, the CryptReleaseContext function need not be called afterwards.
462 * Therefore, we must clean up everything now.
463 */
464 if (dwFlags & CRYPT_DELETEKEYSET)
465 {
466 FreeLibrary(pProv->hModule);
467 CRYPT_Free(provname);
468 CRYPT_Free(pProv->pFuncs);
469 CRYPT_Free(pProv);
470 } else {
471 *phProv = (HCRYPTPROV)pProv;
472 }
473 CRYPT_Free(temp);
474 CRYPT_Free(imagepath);
475 return TRUE;
476 }
477 /* FALLTHROUGH TO ERROR IF FALSE - CSP internal error! */
478 error:
479 if (pProv)
480 {
481 FreeLibrary(pProv->hModule);
482 CRYPT_Free(pProv->pVTable);
483 CRYPT_Free(pProv->pFuncs);
484 CRYPT_Free(pProv);
485 }
486 CRYPT_Free(provname);
487 CRYPT_Free(temp);
488 CRYPT_Free(imagepath);
489 return FALSE;
490 }
491
492 /******************************************************************************
493 * CryptAcquireContextW (ADVAPI32.@)
494 *
495 * see CryptAcquireContextA
496 */
497 BOOL WINAPI CryptAcquireContextW (HCRYPTPROV *phProv, LPCWSTR pszContainer,
498 LPCWSTR pszProvider, DWORD dwProvType, DWORD dwFlags)
499 {
500 PSTR pProvider = NULL, pContainer = NULL;
501 BOOL ret = FALSE;
502
503 TRACE("(%p, %s, %s, %ld, %08lx)\n", phProv, debugstr_w(pszContainer),
504 debugstr_w(pszProvider), dwProvType, dwFlags);
505
506 if ( !CRYPT_UnicodeToANSI(pszContainer, &pContainer, -1) )
507 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
508 if ( !CRYPT_UnicodeToANSI(pszProvider, &pProvider, -1) )
509 {
510 CRYPT_Free(pContainer);
511 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
512 }
513
514 ret = CryptAcquireContextA(phProv, pContainer, pProvider, dwProvType, dwFlags);
515
516 if (pContainer)
517 CRYPT_Free(pContainer);
518 if (pProvider)
519 CRYPT_Free(pProvider);
520
521 return ret;
522 }
523
524 /******************************************************************************
525 * CryptContextAddRef (ADVAPI32.@)
526 *
527 * Increases reference count of a cryptographic service provider handle
528 * by one.
529 *
530 * PARAMS
531 * hProv [I] Handle to the CSP whose reference is being incremented.
532 * pdwReserved [IN] Reserved for future use and must be NULL.
533 * dwFlags [I] Reserved for future use and must be NULL.
534 *
535 * RETURNS
536 * Success: TRUE
537 * Failure: FALSE
538 */
539 BOOL WINAPI CryptContextAddRef (HCRYPTPROV hProv, DWORD *pdwReserved, DWORD dwFlags)
540 {
541 PCRYPTPROV pProv = (PCRYPTPROV)hProv;
542
543 TRACE("(0x%lx, %p, %08lx)\n", hProv, pdwReserved, dwFlags);
544
545 if (!pProv)
546 {
547 SetLastError(NTE_BAD_UID);
548 return FALSE;
549 }
550
551 pProv->refcount++;
552 return TRUE;
553 }
554
555 /******************************************************************************
556 * CryptReleaseContext (ADVAPI32.@)
557 *
558 * Releases the handle of a CSP. Reference count is decreased.
559 *
560 * PARAMS
561 * hProv [I] Handle of a CSP.
562 * dwFlags [I] Reserved for future use and must be NULL.
563 *
564 * RETURNS
565 * Success: TRUE
566 * Failure: FALSE
567 */
568 BOOL WINAPI CryptReleaseContext (HCRYPTPROV hProv, DWORD dwFlags)
569 {
570 PCRYPTPROV pProv = (PCRYPTPROV)hProv;
571 BOOL ret = TRUE;
572
573 TRACE("(0x%lx, %08ld)\n", hProv, dwFlags);
574
575 if (!pProv)
576 {
577 SetLastError(NTE_BAD_UID);
578 return FALSE;
579 }
580
581 pProv->refcount--;
582 if (pProv->refcount <= 0)
583 {
584 ret = pProv->pFuncs->pCPReleaseContext(pProv->hPrivate, dwFlags);
585 FreeLibrary(pProv->hModule);
586 #if 0
587 CRYPT_Free(pProv->pVTable->pContextInfo);
588 #endif
589 CRYPT_Free(pProv->pVTable->pszProvName);
590 CRYPT_Free(pProv->pVTable);
591 CRYPT_Free(pProv->pFuncs);
592 CRYPT_Free(pProv);
593 }
594 return ret;
595 }
596
597 /******************************************************************************
598 * CryptGenRandom (ADVAPI32.@)
599 *
600 * Fills a buffer with cryptographically random bytes.
601 *
602 * PARAMS
603 * hProv [I] Handle of a CSP.
604 * dwLen [I] Number of bytes to generate.
605 * pbBuffer [I/O] Buffer to contain random bytes.
606 *
607 * RETURNS
608 * Success: TRUE
609 * Failure: FALSE
610 *
611 * NOTES
612 * pdBuffer must be at least dwLen bytes long.
613 */
614 BOOL WINAPI CryptGenRandom (HCRYPTPROV hProv, DWORD dwLen, BYTE *pbBuffer)
615 {
616 PCRYPTPROV prov = (PCRYPTPROV)hProv;
617
618 TRACE("(0x%lx, %ld, %p)\n", hProv, dwLen, pbBuffer);
619
620 if (!hProv)
621 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
622
623 return prov->pFuncs->pCPGenRandom(prov->hPrivate, dwLen, pbBuffer);
624 }
625
626 /******************************************************************************
627 * CryptCreateHash (ADVAPI32.@)
628 *
629 * Initiates the hashing of a stream of data.
630 *
631 * PARAMS
632 * hProv [I] Handle of a CSP.
633 * Algid [I] Identifies the hash algorithm to use.
634 * hKey [I] Key for the hash (if required).
635 * dwFlags [I] Reserved for future use and must be NULL.
636 * phHash [O] Address of the future handle to the new hash object.
637 *
638 * RETURNS
639 * Success: TRUE
640 * Failure: FALSE
641 *
642 * NOTES
643 * If the algorithm is a keyed hash, hKey is the key.
644 */
645 BOOL WINAPI CryptCreateHash (HCRYPTPROV hProv, ALG_ID Algid, HCRYPTKEY hKey,
646 DWORD dwFlags, HCRYPTHASH *phHash)
647 {
648 PCRYPTPROV prov = (PCRYPTPROV)hProv;
649 PCRYPTKEY key = (PCRYPTKEY)hKey;
650 PCRYPTHASH hash;
651
652 TRACE("(0x%lx, 0x%x, 0x%lx, %08lx, %p)\n", hProv, Algid, hKey, dwFlags, phHash);
653
654 if (!prov)
655 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
656 if (!phHash)
657 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
658 if (dwFlags)
659 CRYPT_ReturnLastError(NTE_BAD_FLAGS);
660 if ( !(hash = CRYPT_Alloc(sizeof(CRYPTHASH))) )
661 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
662
663 hash->pProvider = prov;
664
665 if (prov->pFuncs->pCPCreateHash(prov->hPrivate, Algid,
666 key ? key->hPrivate : 0, 0, &hash->hPrivate))
667 {
668 *phHash = (HCRYPTHASH)hash;
669 return TRUE;
670 }
671
672 /* CSP error! */
673 CRYPT_Free(hash);
674 return FALSE;
675 }
676
677 /******************************************************************************
678 * CryptDecrypt (ADVAPI32.@)
679 *
680 * Decrypts data encrypted by CryptEncrypt.
681 *
682 * PARAMS
683 * hKey [I] Handle to the decryption key.
684 * hHash [I] Handle to a hash object.
685 * Final [I] TRUE if this is the last section to be decrypted.
686 * dwFlags [I] Reserved for future use. Can be CRYPT_OAEP.
687 * pbData [I/O] Buffer that holds the encrypted data. Holds decrypted
688 * data on return
689 * pdwDataLen [I/O] Length of pbData before and after the call.
690 *
691 * RETURNS
692 * Success: TRUE
693 * Failure: FALSE
694 */
695 BOOL WINAPI CryptDecrypt (HCRYPTKEY hKey, HCRYPTHASH hHash, BOOL Final,
696 DWORD dwFlags, BYTE *pbData, DWORD *pdwDataLen)
697 {
698 PCRYPTPROV prov;
699 PCRYPTKEY key = (PCRYPTKEY)hKey;
700 PCRYPTHASH hash = (PCRYPTHASH)hHash;
701
702 TRACE("(0x%lx, 0x%lx, %d, %08lx, %p, %p)\n", hKey, hHash, Final, dwFlags, pbData, pdwDataLen);
703
704 if (!key || !pbData || !pdwDataLen)
705 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
706
707 prov = key->pProvider;
708 return prov->pFuncs->pCPDecrypt(prov->hPrivate, key->hPrivate, hash ? hash->hPrivate : 0,
709 Final, dwFlags, pbData, pdwDataLen);
710 }
711
712 /******************************************************************************
713 * CryptDeriveKey (ADVAPI32.@)
714 *
715 * Generates session keys derived from a base data value.
716 *
717 * PARAMS
718 * hProv [I] Handle to a CSP.
719 * Algid [I] Identifies the symmetric encryption algorithm to use.
720 * hBaseData [I] Handle to a hash object.
721 * dwFlags [I] Type of key to generate.
722 * phKey [I/O] Address of the newly generated key.
723 *
724 * RETURNS
725 * Success: TRUE
726 * Failure: FALSE
727 */
728 BOOL WINAPI CryptDeriveKey (HCRYPTPROV hProv, ALG_ID Algid, HCRYPTHASH hBaseData,
729 DWORD dwFlags, HCRYPTKEY *phKey)
730 {
731 PCRYPTPROV prov = (PCRYPTPROV)hProv;
732 PCRYPTHASH hash = (PCRYPTHASH)hBaseData;
733 PCRYPTKEY key;
734
735 TRACE("(0x%lx, 0x%08x, 0x%lx, 0x%08lx, %p)\n", hProv, Algid, hBaseData, dwFlags, phKey);
736
737 if (!prov || !hash)
738 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
739 if (!phKey)
740 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
741 if ( !(key = CRYPT_Alloc(sizeof(CRYPTKEY))) )
742 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
743
744 key->pProvider = prov;
745 if (prov->pFuncs->pCPDeriveKey(prov->hPrivate, Algid, hash->hPrivate, dwFlags, &key->hPrivate))
746 {
747 *phKey = (HCRYPTKEY)key;
748 return TRUE;
749 }
750
751 /* CSP error! */
752 CRYPT_Free(key);
753 return FALSE;
754 }
755
756 /******************************************************************************
757 * CryptDestroyHash (ADVAPI32.@)
758 *
759 * Destroys the hash object referenced by hHash.
760 *
761 * PARAMS
762 * hHash [I] Handle of the hash object to be destroyed.
763 *
764 * RETURNS
765 * Success: TRUE
766 * Failure: FALSE
767 */
768 BOOL WINAPI CryptDestroyHash (HCRYPTHASH hHash)
769 {
770 PCRYPTHASH hash = (PCRYPTHASH)hHash;
771 PCRYPTPROV prov;
772 BOOL ret;
773
774 TRACE("(0x%lx)\n", hHash);
775
776 if (!hash)
777 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
778
779 prov = hash->pProvider;
780 ret = prov->pFuncs->pCPDestroyHash(prov->hPrivate, hash->hPrivate);
781 CRYPT_Free(hash);
782 return ret;
783 }
784
785 /******************************************************************************
786 * CryptDestroyKey (ADVAPI32.@)
787 *
788 * Releases the handle referenced by hKey.
789 *
790 * PARAMS
791 * hKey [I] Handle of the key to be destroyed.
792 *
793 * RETURNS
794 * Success: TRUE
795 * Failure: FALSE
796 */
797 BOOL WINAPI CryptDestroyKey (HCRYPTKEY hKey)
798 {
799 PCRYPTKEY key = (PCRYPTKEY)hKey;
800 PCRYPTPROV prov;
801 BOOL ret;
802
803 TRACE("(0x%lx)\n", hKey);
804
805 if (!key)
806 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
807
808 prov = key->pProvider;
809 ret = prov->pFuncs->pCPDestroyKey(prov->hPrivate, key->hPrivate);
810 CRYPT_Free(key);
811 return ret;
812 }
813
814 /******************************************************************************
815 * CryptDuplicateHash (ADVAPI32.@)
816 *
817 * Duplicates a hash.
818 *
819 * PARAMS
820 * hHash [I] Handle to the hash to be copied.
821 * pdwReserved [I] Reserved for future use and must be zero.
822 * dwFlags [I] Reserved for future use and must be zero.
823 * phHash [O] Address of the handle to receive the copy.
824 *
825 * RETURNS
826 * Success: TRUE
827 * Failure: FALSE
828 */
829 BOOL WINAPI CryptDuplicateHash (HCRYPTHASH hHash, DWORD *pdwReserved,
830 DWORD dwFlags, HCRYPTHASH *phHash)
831 {
832 PCRYPTPROV prov;
833 PCRYPTHASH orghash, newhash;
834
835 TRACE("(0x%lx, %p, %08ld, %p)\n", hHash, pdwReserved, dwFlags, phHash);
836
837 orghash = (PCRYPTHASH)hHash;
838 if (!orghash || pdwReserved || !phHash)
839 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
840
841 prov = orghash->pProvider;
842 if (!prov->pFuncs->pCPDuplicateHash)
843 CRYPT_ReturnLastError(ERROR_CALL_NOT_IMPLEMENTED);
844
845 if ( !(newhash = CRYPT_Alloc(sizeof(CRYPTHASH))) )
846 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
847
848 newhash->pProvider = prov;
849 if (prov->pFuncs->pCPDuplicateHash(prov->hPrivate, orghash->hPrivate, pdwReserved, dwFlags, &newhash->hPrivate))
850 {
851 *phHash = (HCRYPTHASH)newhash;
852 return TRUE;
853 }
854 CRYPT_Free(newhash);
855 return FALSE;
856 }
857
858 /******************************************************************************
859 * CryptDuplicateKey (ADVAPI32.@)
860 *
861 * Duplicate a key and the key's state.
862 *
863 * PARAMS
864 * hKey [I] Handle of the key to copy.
865 * pdwReserved [I] Reserved for future use and must be NULL.
866 * dwFlags [I] Reserved for future use and must be zero.
867 * phKey [I] Address of the handle to the duplicated key.
868 *
869 * RETURNS
870 * Success: TRUE
871 * Failure: FALSE
872 */
873 BOOL WINAPI CryptDuplicateKey (HCRYPTKEY hKey, DWORD *pdwReserved, DWORD dwFlags, HCRYPTKEY *phKey)
874 {
875 PCRYPTPROV prov;
876 PCRYPTKEY orgkey, newkey;
877
878 TRACE("(0x%lx, %p, %08ld, %p)\n", hKey, pdwReserved, dwFlags, phKey);
879
880 orgkey = (PCRYPTKEY)hKey;
881 if (!orgkey || pdwReserved || !phKey)
882 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
883
884 prov = orgkey->pProvider;
885 if (!prov->pFuncs->pCPDuplicateKey)
886 CRYPT_ReturnLastError(ERROR_CALL_NOT_IMPLEMENTED);
887
888 if ( !(newkey = CRYPT_Alloc(sizeof(CRYPTKEY))) )
889 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
890
891 newkey->pProvider = prov;
892 if (prov->pFuncs->pCPDuplicateKey(prov->hPrivate, orgkey->hPrivate, pdwReserved, dwFlags, &newkey->hPrivate))
893 {
894 *phKey = (HCRYPTKEY)newkey;
895 return TRUE;
896 }
897 CRYPT_Free(newkey);
898 return FALSE;
899 }
900
901 /******************************************************************************
902 * CryptEncrypt (ADVAPI32.@)
903 *
904 * Encrypts data.
905 *
906 * PARAMS
907 * hKey [I] Handle to the enryption key.
908 * hHash [I] Handle to a hash object.
909 * Final [I] TRUE if this is the last section to encrypt.
910 * dwFlags [I] Can be CRYPT_OAEP.
911 * pbData [I/O] Data to be encrypted. Contains encrypted data after call.
912 * pdwDataLen [I/O] Length of the data to encrypt. Contains the length of the
913 * encrypted data after call.
914 * dwBufLen [I] Length of the input pbData buffer.
915 *
916 * RETURNS
917 * Success: TRUE
918 * Failure: FALSE
919 *
920 * NOTES
921 * If pbData is NULL, CryptEncrypt determines stores the number of bytes
922 * required for the returned data in pdwDataLen.
923 */
924 BOOL WINAPI CryptEncrypt (HCRYPTKEY hKey, HCRYPTHASH hHash, BOOL Final,
925 DWORD dwFlags, BYTE *pbData, DWORD *pdwDataLen, DWORD dwBufLen)
926 {
927 PCRYPTPROV prov;
928 PCRYPTKEY key = (PCRYPTKEY)hKey;
929 PCRYPTHASH hash = (PCRYPTHASH)hHash;
930
931 TRACE("(0x%lx, 0x%lx, %d, %08ld, %p, %p, %ld)\n", hKey, hHash, Final, dwFlags, pbData, pdwDataLen, dwBufLen);
932
933 if (!key || !pdwDataLen)
934 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
935
936 prov = key->pProvider;
937 return prov->pFuncs->pCPEncrypt(prov->hPrivate, key->hPrivate, hash ? hash->hPrivate : 0,
938 Final, dwFlags, pbData, pdwDataLen, dwBufLen);
939 }
940
941 /******************************************************************************
942 * CryptEnumProvidersW (ADVAPI32.@)
943 *
944 * Returns the next availabe CSP.
945 *
946 * PARAMS
947 * dwIndex [I] Index of the next provider to be enumerated.
948 * pdwReserved [I] Reserved for future use and must be NULL.
949 * dwFlags [I] Reserved for future use and must be zero.
950 * pdwProvType [O] DWORD designating the type of the provider.
951 * pszProvName [O] Buffer that receives data from the provider.
952 * pcbProvName [I/O] Specifies the size of pszProvName. Contains the number
953 * of bytes stored in the buffer on return.
954 *
955 * RETURNS
956 * Success: TRUE
957 * Failure: FALSE
958 *
959 * NOTES
960 * If pszProvName is NULL, CryptEnumProvidersW sets the size of the name
961 * for memory allocation purposes.
962 */
963 BOOL WINAPI CryptEnumProvidersW (DWORD dwIndex, DWORD *pdwReserved,
964 DWORD dwFlags, DWORD *pdwProvType, LPWSTR pszProvName, DWORD *pcbProvName)
965 {
966 HKEY hKey;
967
968 static const WCHAR providerW[] = {
969 'S','o','f','t','w','a','r','e','\\',
970 'M','i','c','r','o','s','o','f','t','\\',
971 'C','r','y','p','t','o','g','r','a','p','h','y','\\',
972 'D','e','f','a','u','l','t','s','\\',
973 'P','r','o','v','i','d','e','r',0
974 };
975
976 static const WCHAR typeW[] = {'T','y','p','e',0};
977
978 TRACE("(%ld, %p, %ld, %p, %p, %p)\n", dwIndex, pdwReserved, dwFlags,
979 pdwProvType, pszProvName, pcbProvName);
980
981 if (pdwReserved || !pcbProvName) CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
982 if (dwFlags) CRYPT_ReturnLastError(NTE_BAD_FLAGS);
983
984 if (RegOpenKeyW(HKEY_LOCAL_MACHINE, providerW, &hKey))
985 CRYPT_ReturnLastError(NTE_FAIL);
986
987 if (!pszProvName)
988 {
989 DWORD numkeys;
990 WCHAR *provNameW;
991
992 RegQueryInfoKeyW(hKey, NULL, NULL, NULL, &numkeys, pcbProvName,
993 NULL, NULL, NULL, NULL, NULL, NULL);
994
995 if (!(provNameW = CRYPT_Alloc(*pcbProvName * sizeof(WCHAR))))
996 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
997
998 RegEnumKeyExW(hKey, dwIndex, provNameW, pcbProvName, NULL, NULL, NULL, NULL);
999 (*pcbProvName)++;
1000 *pcbProvName *= sizeof(WCHAR);
1001
1002 CRYPT_Free(provNameW);
1003
1004 if (dwIndex >= numkeys)
1005 CRYPT_ReturnLastError(ERROR_NO_MORE_ITEMS);
1006 } else {
1007 DWORD size = sizeof(DWORD);
1008 DWORD result;
1009 HKEY subkey;
1010
1011 result = RegEnumKeyW(hKey, dwIndex, pszProvName, *pcbProvName / sizeof(WCHAR));
1012 if (result)
1013 CRYPT_ReturnLastError(result);
1014 if (RegOpenKeyW(hKey, pszProvName, &subkey))
1015 return FALSE;
1016 if (RegQueryValueExW(subkey, typeW, NULL, NULL, (BYTE*)pdwProvType, &size))
1017 return FALSE;
1018 RegCloseKey(subkey);
1019 }
1020 RegCloseKey(hKey);
1021 return TRUE;
1022 }
1023
1024 /******************************************************************************
1025 * CryptEnumProvidersA (ADVAPI32.@)
1026 *
1027 * see CryptEnumProvidersW
1028 */
1029 BOOL WINAPI CryptEnumProvidersA (DWORD dwIndex, DWORD *pdwReserved,
1030 DWORD dwFlags, DWORD *pdwProvType, LPSTR pszProvName, DWORD *pcbProvName)
1031 {
1032 PWSTR str = NULL;
1033 DWORD strlen;
1034 BOOL ret; /* = FALSE; */
1035
1036 TRACE("(%ld, %p, %08ld, %p, %p, %p)\n", dwIndex, pdwReserved, dwFlags,
1037 pdwProvType, pszProvName, pcbProvName);
1038
1039 strlen = *pcbProvName * sizeof(WCHAR);
1040 if ( pszProvName && !(str = CRYPT_Alloc(strlen)) )
1041 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
1042 ret = CryptEnumProvidersW(dwIndex, pdwReserved, dwFlags, pdwProvType, str, &strlen);
1043 if (str)
1044 {
1045 CRYPT_UnicodeToANSI(str, &pszProvName, *pcbProvName);
1046 CRYPT_Free(str);
1047 }
1048 *pcbProvName = strlen / sizeof(WCHAR); /* FIXME: not correct */
1049 return ret;
1050 }
1051
1052 /******************************************************************************
1053 * CryptEnumProviderTypesA (ADVAPI32i.@)
1054 *
1055 * Retrieves the next type of CSP supported.
1056 *
1057 * PARAMS
1058 * dwIndex [I] Index of the next provider to be enumerated.
1059 * pdwReserved [I] Reserved for future use and must be NULL.
1060 * dwFlags [I] Reserved for future use and must be zero.
1061 * pdwProvType [O] DWORD designating the type of the provider.
1062 * pszTypeName [O] Buffer that receives data from the provider type.
1063 * pcbTypeName [I/O] Specifies the size of pszTypeName. Contains the number
1064 * of bytes stored in the buffer on return.
1065 *
1066 * RETURNS
1067 * Success: TRUE
1068 * Failure: FALSE
1069 *
1070 * NOTES
1071 * If pszTypeName is NULL, CryptEnumProviderTypesA sets the size of the name
1072 * for memory allocation purposes.
1073 */
1074 BOOL WINAPI CryptEnumProviderTypesA (DWORD dwIndex, DWORD *pdwReserved,
1075 DWORD dwFlags, DWORD *pdwProvType, LPSTR pszTypeName, DWORD *pcbTypeName)
1076 {
1077 HKEY hKey, hSubkey;
1078 DWORD keylen, numkeys, dwType;
1079 PSTR keyname, ch;
1080 DWORD result;
1081
1082 TRACE("(%ld, %p, %08ld, %p, %p, %p)\n", dwIndex, pdwReserved,
1083 dwFlags, pdwProvType, pszTypeName, pcbTypeName);
1084
1085 if (pdwReserved || !pdwProvType || !pcbTypeName)
1086 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1087 if (dwFlags) CRYPT_ReturnLastError(NTE_BAD_FLAGS);
1088
1089 if (RegOpenKeyA(HKEY_LOCAL_MACHINE, "Software\\Microsoft\\Cryptography\\Defaults\\Provider Types", &hKey))
1090 return FALSE;
1091
1092 RegQueryInfoKeyA(hKey, NULL, NULL, NULL, &numkeys, &keylen, NULL, NULL, NULL, NULL, NULL, NULL);
1093 if (dwIndex >= numkeys)
1094 CRYPT_ReturnLastError(ERROR_NO_MORE_ITEMS);
1095 keylen++;
1096 if ( !(keyname = CRYPT_Alloc(keylen)) )
1097 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
1098 if ( RegEnumKeyA(hKey, dwIndex, keyname, keylen) ) {
1099 CRYPT_Free(keyname);
1100 return FALSE;
1101 }
1102 RegOpenKeyA(hKey, keyname, &hSubkey);
1103 ch = keyname + strlen(keyname);
1104 /* Convert "Type 000" to 0, etc/ */
1105 *pdwProvType = *(--ch) - '0';
1106 *pdwProvType += (*(--ch) - '0') * 10;
1107 *pdwProvType += (*(--ch) - '0') * 100;
1108 CRYPT_Free(keyname);
1109
1110 result = RegQueryValueExA(hSubkey, "TypeName", NULL, &dwType, pszTypeName, pcbTypeName);
1111 if (result)
1112 CRYPT_ReturnLastError(result);
1113
1114 RegCloseKey(hSubkey);
1115 RegCloseKey(hKey);
1116 return TRUE;
1117 }
1118
1119 /******************************************************************************
1120 * CryptEnumProviderTypesW (ADVAPI32.@)
1121 *
1122 * see CryptEnumProviderTypesA
1123 */
1124 BOOL WINAPI CryptEnumProviderTypesW (DWORD dwIndex, DWORD *pdwReserved,
1125 DWORD dwFlags, DWORD *pdwProvType, LPWSTR pszTypeName, DWORD *pcbTypeName)
1126 {
1127 PSTR str = NULL;
1128 DWORD strlen;
1129 BOOL ret;
1130
1131 TRACE("(%ld, %p, %08ld, %p, %p, %p)\n", dwIndex, pdwReserved, dwFlags,
1132 pdwProvType, pszTypeName, pcbTypeName);
1133 strlen = *pcbTypeName / sizeof(WCHAR);
1134 if ( pszTypeName && !(str = CRYPT_Alloc(strlen)) )
1135 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
1136 ret = CryptEnumProviderTypesA(dwIndex, pdwReserved, dwFlags, pdwProvType, str, &strlen);
1137 if (str)
1138 {
1139 CRYPT_ANSIToUnicode(str, &pszTypeName, *pcbTypeName);
1140 CRYPT_Free(str);
1141 }
1142 *pcbTypeName = strlen * sizeof(WCHAR);
1143 return ret;
1144 }
1145
1146 /******************************************************************************
1147 * CryptExportKey (ADVAPI32.@)
1148 *
1149 * Exports a cryptographic key from a CSP.
1150 *
1151 * PARAMS
1152 * hKey [I] Handle to the key to export.
1153 * hExpKey [I] Handle to a cryptographic key of the end user.
1154 * dwBlobType [I] Type of BLOB to be exported.
1155 * dwFlags [I] CRYPT_DESTROYKEY/SSL2_FALLBACK/OAEP.
1156 * pbData [O] Buffer to receive BLOB data.
1157 * pdwDataLen [I/O] Specifies the size of pbData.
1158 *
1159 * RETURNS
1160 * Success: TRUE
1161 * Failure: FALSE
1162 *
1163 * NOTES
1164 * if pbData is NULL, CryptExportKey sets pdwDataLen as the size of the
1165 * buffer needed to hold the BLOB.
1166 */
1167 BOOL WINAPI CryptExportKey (HCRYPTKEY hKey, HCRYPTKEY hExpKey, DWORD dwBlobType,
1168 DWORD dwFlags, BYTE *pbData, DWORD *pdwDataLen)
1169 {
1170 PCRYPTPROV prov;
1171 PCRYPTKEY key = (PCRYPTKEY)hKey, expkey = (PCRYPTKEY)hExpKey;
1172
1173 TRACE("(0x%lx, 0x%lx, %ld, %08ld, %p, %p)\n", hKey, hExpKey, dwBlobType, dwFlags, pbData, pdwDataLen);
1174
1175 if (!key || pdwDataLen)
1176 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1177
1178 prov = key->pProvider;
1179 return prov->pFuncs->pCPExportKey(prov->hPrivate, key->hPrivate, expkey ? expkey->hPrivate : 0,
1180 dwBlobType, dwFlags, pbData, pdwDataLen);
1181 }
1182
1183 /******************************************************************************
1184 * CryptGenKey (ADVAPI32.@)
1185 *
1186 * Generates a random cryptographic session key or a pub/priv key pair.
1187 *
1188 * PARAMS
1189 * hProv [I] Handle to a CSP.
1190 * Algid [I] Algorithm to use to make key.
1191 * dwFlags [I] Specifies type of key to make.
1192 * phKey [I] Address of the handle to which the new key is copied.
1193 *
1194 * RETURNS
1195 * Success: TRUE
1196 * Failure: FALSE
1197 */
1198 BOOL WINAPI CryptGenKey (HCRYPTPROV hProv, ALG_ID Algid, DWORD dwFlags, HCRYPTKEY *phKey)
1199 {
1200 PCRYPTPROV prov = (PCRYPTPROV)hProv;
1201 PCRYPTKEY key;
1202
1203 TRACE("(0x%lx, %d, %08ld, %p)\n", hProv, Algid, dwFlags, phKey);
1204
1205 if (!prov)
1206 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
1207 if (!phKey)
1208 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1209 if ( !(key = CRYPT_Alloc(sizeof(CRYPTKEY))) )
1210 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
1211
1212 key->pProvider = prov;
1213
1214 if (prov->pFuncs->pCPGenKey(prov->hPrivate, Algid, dwFlags, &key->hPrivate))
1215 {
1216 *phKey = (HCRYPTKEY)key;
1217 return TRUE;
1218 }
1219
1220 /* CSP error! */
1221 CRYPT_Free(key);
1222 return FALSE;
1223 }
1224
1225 /******************************************************************************
1226 * CryptGetDefaultProviderA (ADVAPI32.@)
1227 *
1228 * Finds the default CSP of a certain provider type.
1229 *
1230 * PARAMS
1231 * dwProvType [I] Provider type to look for.
1232 * pdwReserved [I] Reserved for future use and must be NULL.
1233 * dwFlags [I] CRYPT_MACHINE_DEFAULT/USER_DEFAULT
1234 * pszProvName [O] Name of the default CSP.
1235 * pcbProvName [I/O] Size of pszProvName
1236 *
1237 * RETURNS
1238 * Success: TRUE
1239 * Failure: FALSE
1240 *
1241 * NOTES
1242 * If pszProvName is NULL, pcbProvName will hold the size of the buffer for
1243 * memory allocation purposes on return.
1244 */
1245 BOOL WINAPI CryptGetDefaultProviderA (DWORD dwProvType, DWORD *pdwReserved,
1246 DWORD dwFlags, LPSTR pszProvName, DWORD *pcbProvName)
1247 {
1248 HKEY hKey;
1249 PSTR keyname;
1250 DWORD result;
1251
1252 if (pdwReserved || !pcbProvName)
1253 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1254 if (dwFlags & ~(CRYPT_USER_DEFAULT | CRYPT_MACHINE_DEFAULT))
1255 CRYPT_ReturnLastError(NTE_BAD_FLAGS);
1256 if (dwProvType > 999)
1257 CRYPT_ReturnLastError(NTE_BAD_PROV_TYPE);
1258 if ( !(keyname = CRYPT_GetTypeKeyName(dwProvType, dwFlags & CRYPT_USER_DEFAULT)) )
1259 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
1260 if (RegOpenKeyA((dwFlags & CRYPT_USER_DEFAULT) ? HKEY_CURRENT_USER : HKEY_LOCAL_MACHINE ,keyname, &hKey))
1261 {
1262 CRYPT_Free(keyname);
1263 CRYPT_ReturnLastError(NTE_PROV_TYPE_NOT_DEF);
1264 }
1265 CRYPT_Free(keyname);
1266
1267 result = RegQueryValueExA(hKey, "Name", NULL, NULL, pszProvName, pcbProvName);
1268 if (result)
1269 {
1270 if (result != ERROR_MORE_DATA)
1271 SetLastError(NTE_PROV_TYPE_ENTRY_BAD);
1272 else
1273 SetLastError(result);
1274
1275 return FALSE;
1276 }
1277
1278 RegCloseKey(hKey);
1279 return TRUE;
1280 }
1281
1282 /******************************************************************************
1283 * CryptGetDefaultProviderW (ADVAPI32.@)
1284 *
1285 * see CryptGetDefaultProviderA
1286 */
1287 BOOL WINAPI CryptGetDefaultProviderW (DWORD dwProvType, DWORD *pdwReserved,
1288 DWORD dwFlags, LPWSTR pszProvName, DWORD *pcbProvName)
1289 {
1290 PSTR str = NULL;
1291 DWORD strlen;
1292 BOOL ret = FALSE;
1293
1294 TRACE("(%ld, %p, %08ld, %p, %p)\n", dwProvType, pdwReserved, dwFlags, pszProvName, pcbProvName);
1295
1296 strlen = *pcbProvName / sizeof(WCHAR);
1297 if ( pszProvName && !(str = CRYPT_Alloc(strlen)) )
1298 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
1299 ret = CryptGetDefaultProviderA(dwProvType, pdwReserved, dwFlags, str, &strlen);
1300 if (str)
1301 {
1302 CRYPT_ANSIToUnicode(str, &pszProvName, *pcbProvName);
1303 CRYPT_Free(str);
1304 }
1305 *pcbProvName = strlen * sizeof(WCHAR);
1306 return ret;
1307 }
1308
1309 /******************************************************************************
1310 * CryptGetHashParam (ADVAPI32.@)
1311 *
1312 * Retrieves data that controls the operations of a hash object.
1313 *
1314 * PARAMS
1315 * hHash [I] Handle of the hash object to question.
1316 * dwParam [I] Query type.
1317 * pbData [O] Buffer that receives the value data.
1318 * pdwDataLen [I/O] Size of the pbData buffer.
1319 * dwFlags [I] Reserved for future use and must be zero.
1320 *
1321 * RETURNS
1322 * Success: TRUE
1323 * Failure: FALSE
1324 *
1325 * NOTES
1326 * If pbData is NULL, pdwDataLen will contain the length required.
1327 */
1328 BOOL WINAPI CryptGetHashParam (HCRYPTHASH hHash, DWORD dwParam, BYTE *pbData,
1329 DWORD *pdwDataLen, DWORD dwFlags)
1330 {
1331 PCRYPTPROV prov;
1332 PCRYPTHASH hash = (PCRYPTHASH)hHash;
1333
1334 TRACE("(0x%lx, %ld, %p, %p, %08ld)\n", hHash, dwParam, pbData, pdwDataLen, dwFlags);
1335
1336 if (!hash || !pdwDataLen)
1337 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1338
1339 prov = hash->pProvider;
1340 return prov->pFuncs->pCPGetHashParam(prov->hPrivate, hash->hPrivate, dwParam,
1341 pbData, pdwDataLen, dwFlags);
1342 }
1343
1344 /******************************************************************************
1345 * CryptGetKeyParam (ADVAPI32.@)
1346 *
1347 * Retrieves data that controls the operations of a key.
1348 *
1349 * PARAMS
1350 * hKey [I] Handle to they key in question.
1351 * dwParam [I] Specifies query type.
1352 * pbData [O] Sequence of bytes to receive data.
1353 * pdwDataLen [I/O] Size of pbData.
1354 * dwFlags [I] Reserved for future use and must be zero.
1355 *
1356 * RETURNS
1357 * Success: TRUE
1358 * Failure: FALSE
1359 *
1360 * NOTES
1361 * If pbData is NULL, pdwDataLen is set to the needed length of the buffer.
1362 */
1363 BOOL WINAPI CryptGetKeyParam (HCRYPTKEY hKey, DWORD dwParam, BYTE *pbData,
1364 DWORD *pdwDataLen, DWORD dwFlags)
1365 {
1366 PCRYPTPROV prov;
1367 PCRYPTKEY key = (PCRYPTKEY)hKey;
1368
1369 TRACE("(0x%lx, %ld, %p, %p, %08ld)\n", hKey, dwParam, pbData, pdwDataLen, dwFlags);
1370
1371 if (!key || !pdwDataLen)
1372 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1373
1374 prov = key->pProvider;
1375 return prov->pFuncs->pCPGetKeyParam(prov->hPrivate, key->hPrivate, dwParam,
1376 pbData, pdwDataLen, dwFlags);
1377 }
1378
1379 /******************************************************************************
1380 * CryptGetProvParam (ADVAPI32.@)
1381 *
1382 * Retrieves parameters that control the operations of a CSP.
1383 *
1384 * PARAMS
1385 * hProv [I] Handle of the CSP in question.
1386 * dwParam [I] Specifies query type.
1387 * pbData [O] Buffer to receive the data.
1388 * pdwDataLen [I/O] Size of pbData.
1389 * dwFlags [I] see MSDN Docs.
1390 *
1391 * RETURNS
1392 * Success: TRUE
1393 * Failure: FALSE
1394 *
1395 * NOTES
1396 * If pbData is NULL, pdwDataLen is set to the needed buffer length.
1397 */
1398 BOOL WINAPI CryptGetProvParam (HCRYPTPROV hProv, DWORD dwParam, BYTE *pbData,
1399 DWORD *pdwDataLen, DWORD dwFlags)
1400 {
1401 PCRYPTPROV prov = (PCRYPTPROV)hProv;
1402
1403 TRACE("(0x%lx, %ld, %p, %p, %08ld)\n", hProv, dwParam, pbData, pdwDataLen, dwFlags);
1404
1405 return prov->pFuncs->pCPGetProvParam(prov->hPrivate, dwParam, pbData, pdwDataLen, dwFlags);
1406 }
1407
1408 /******************************************************************************
1409 * CryptGetUserKey (ADVAPI32.@)
1410 *
1411 * Gets a handle of one of a user's two public/private key pairs.
1412 *
1413 * PARAMS
1414 * hProv [I] Handle of a CSP.
1415 * dwKeySpec [I] Private key to use.
1416 * phUserKey [O] Pointer to the handle of the retrieved keys.
1417 *
1418 * RETURNS
1419 * Success: TRUE
1420 * Failure: FALSE
1421 */
1422 BOOL WINAPI CryptGetUserKey (HCRYPTPROV hProv, DWORD dwKeySpec, HCRYPTKEY *phUserKey)
1423 {
1424 PCRYPTPROV prov = (PCRYPTPROV)hProv;
1425 PCRYPTKEY key;
1426
1427 TRACE("(0x%lx, %ld, %p)\n", hProv, dwKeySpec, phUserKey);
1428
1429 if (!prov)
1430 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
1431 if (!phUserKey)
1432 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1433 if ( !(key = CRYPT_Alloc(sizeof(CRYPTKEY))) )
1434 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
1435
1436 key->pProvider = prov;
1437
1438 if (prov->pFuncs->pCPGetUserKey(prov->hPrivate, dwKeySpec, &key->hPrivate))
1439 {
1440 *phUserKey = (HCRYPTKEY)key;
1441 return TRUE;
1442 }
1443
1444 /* CSP Error */
1445 CRYPT_Free(key);
1446 return FALSE;
1447 }
1448
1449 /******************************************************************************
1450 * CryptHashData (ADVAPI32.@)
1451 *
1452 * Adds data to a hash object.
1453 *
1454 * PARAMS
1455 * hHash [I] Handle of the hash object.
1456 * pbData [I] Buffer of data to be hashed.
1457 * dwDataLen [I] Number of bytes to add.
1458 * dwFlags [I] Can be CRYPT_USERDATA
1459 *
1460 * RETURNS
1461 * Success: TRUE
1462 * Failure: FALSE
1463 */
1464 BOOL WINAPI CryptHashData (HCRYPTHASH hHash, BYTE *pbData, DWORD dwDataLen, DWORD dwFlags)
1465 {
1466 PCRYPTHASH hash = (PCRYPTHASH)hHash;
1467 PCRYPTPROV prov;
1468
1469 TRACE("(0x%lx, %p, %ld, %08ld)\n", hHash, pbData, dwDataLen, dwFlags);
1470
1471 if (!hash)
1472 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
1473 if (!pbData || !dwDataLen)
1474 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1475
1476 prov = hash->pProvider;
1477 return prov->pFuncs->pCPHashData(prov->hPrivate, hash->hPrivate, pbData, dwDataLen, dwFlags);
1478 }
1479
1480 /******************************************************************************
1481 * CryptHashSessionKey (ADVAPI32.@)
1482 *
1483 * PARAMS
1484 * hHash [I] Handle to the hash object.
1485 * hKey [I] Handle to the key to be hashed.
1486 * dwFlags [I] Can be CRYPT_LITTLE_ENDIAN.
1487 *
1488 * RETURNS
1489 * Success: TRUE
1490 * Failure: FALSE
1491 */
1492 BOOL WINAPI CryptHashSessionKey (HCRYPTHASH hHash, HCRYPTKEY hKey, DWORD dwFlags)
1493 {
1494 PCRYPTHASH hash = (PCRYPTHASH)hHash;
1495 PCRYPTKEY key = (PCRYPTKEY)hKey;
1496 PCRYPTPROV prov;
1497
1498 TRACE("(0x%lx, 0x%lx, %08ld)\n", hHash, hKey, dwFlags);
1499
1500 if (!hash || !key)
1501 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
1502
1503 prov = hash->pProvider;
1504 return prov->pFuncs->pCPHashSessionKey(prov->hPrivate, hash->hPrivate, key->hPrivate, dwFlags);
1505 }
1506
1507 /******************************************************************************
1508 * CryptImportKey (ADVAPI32.@)
1509 *
1510 * PARAMS
1511 * hProv [I] Handle of a CSP.
1512 * pbData [I] Contains the key to be imported.
1513 * dwDataLen [I] Length of the key.
1514 * hPubKey [I] Cryptographic key that decrypts pdData
1515 * dwFlags [I] Used only with a public/private key pair.
1516 * phKey [O] Imported key.
1517 *
1518 * RETURNS
1519 * Success: TRUE
1520 * Failure: FALSE
1521 */
1522 BOOL WINAPI CryptImportKey (HCRYPTPROV hProv, BYTE *pbData, DWORD dwDataLen,
1523 HCRYPTKEY hPubKey, DWORD dwFlags, HCRYPTKEY *phKey)
1524 {
1525 PCRYPTPROV prov = (PCRYPTPROV)hProv;
1526 PCRYPTKEY pubkey = (PCRYPTKEY)hPubKey, importkey;
1527
1528 TRACE("(0x%lx, %p, %ld, 0x%lx, %08ld, %p)\n", hProv, pbData, dwDataLen, hPubKey, dwFlags, phKey);
1529
1530 if (!prov || !pbData || !dwDataLen || !phKey)
1531 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1532
1533 if ( !(importkey = CRYPT_Alloc(sizeof(CRYPTKEY))) )
1534 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
1535
1536 importkey->pProvider = prov;
1537 if (prov->pFuncs->pCPImportKey(prov->hPrivate, pbData, dwDataLen,
1538 pubkey ? pubkey->hPrivate : 0, dwFlags, &importkey->hPrivate))
1539 {
1540 *phKey = (HCRYPTKEY)importkey;
1541 return TRUE;
1542 }
1543
1544 CRYPT_Free(importkey);
1545 return FALSE;
1546 }
1547
1548 /******************************************************************************
1549 * CryptSignHashA
1550 *
1551 * Note: Since the sDesciption (string) is supposed to be NULL and
1552 * is only retained for compatibility no string conversions are required
1553 * and only one implementation is required for both ANSI and Unicode.
1554 * We still need to export both:
1555 *
1556 * CryptSignHashA (ADVAPI32.@)
1557 * CryptSignHashW (ADVAPI32.@)
1558 *
1559 * Signs data.
1560 *
1561 * PARAMS
1562 * hHash [I] Handle of the hash object to be signed.
1563 * dwKeySpec [I] Private key to use.
1564 * sDescription [I] Must be NULL.
1565 * dwFlags [I] CRYPT_NOHASHOID/X931_FORMAT.
1566 * pbSignature [O] Buffer of the signature data.
1567 * pdwSigLen [I/O] Size of the pbSignature buffer.
1568 *
1569 * RETURNS
1570 * Success: TRUE
1571 * Failure: FALSE
1572 */
1573 BOOL WINAPI CryptSignHashA (HCRYPTHASH hHash, DWORD dwKeySpec, LPCSTR sDescription,
1574 DWORD dwFlags, BYTE *pbSignature, DWORD *pdwSigLen)
1575 {
1576 PCRYPTHASH hash = (PCRYPTHASH)hHash;
1577 PCRYPTPROV prov;
1578
1579 TRACE("(0x%lx, %ld, %08ld, %p, %p)\n", hHash, dwKeySpec, dwFlags, pbSignature, pdwSigLen);
1580 if (sDescription)
1581 WARN("The sDescription parameter is not supported (and no longer used). Ignoring.\n");
1582
1583 if (!hash)
1584 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
1585 if (!pdwSigLen)
1586 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1587
1588 prov = hash->pProvider;
1589 return prov->pFuncs->pCPSignHash(prov->hPrivate, hash->hPrivate, dwKeySpec, NULL,
1590 dwFlags, pbSignature, pdwSigLen);
1591 }
1592
1593 /******************************************************************************
1594 * CryptSetHashParam (ADVAPI32.@)
1595 *
1596 * Customizes the operations of a hash object.
1597 *
1598 * PARAMS
1599 * hHash [I] Handle of the hash object to set parameters.
1600 * dwParam [I] HP_HMAC_INFO/HASHVAL.
1601 * pbData [I] Value data buffer.
1602 * dwFlags [I] Reserved for future use and must be zero.
1603 *
1604 * RETURNS
1605 * Success: TRUE
1606 * Failure: FALSE
1607 */
1608 BOOL WINAPI CryptSetHashParam (HCRYPTHASH hHash, DWORD dwParam, BYTE *pbData, DWORD dwFlags)
1609 {
1610 PCRYPTPROV prov;
1611 PCRYPTHASH hash = (PCRYPTHASH)hHash;
1612
1613 TRACE("(0x%lx, %ld, %p, %08ld)\n", hHash, dwParam, pbData, dwFlags);
1614
1615 if (!hash || !pbData)
1616 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1617
1618 prov = hash->pProvider;
1619 return prov->pFuncs->pCPSetHashParam(prov->hPrivate, hash->hPrivate,
1620 dwParam, pbData, dwFlags);
1621 }
1622
1623 /******************************************************************************
1624 * CryptSetKeyParam (ADVAPI32.@)
1625 *
1626 * Customizes a session key's operations.
1627 *
1628 * PARAMS
1629 * hKey [I] Handle to the key to set values.
1630 * dwParam [I] See MSDN Doc.
1631 * pbData [I] Buffer of values to set.
1632 * dwFlags [I] Only used when dwParam == KP_ALGID.
1633 *
1634 * RETURNS
1635 * Success: TRUE
1636 * Failure: FALSE
1637 */
1638 BOOL WINAPI CryptSetKeyParam (HCRYPTKEY hKey, DWORD dwParam, BYTE *pbData, DWORD dwFlags)
1639 {
1640 PCRYPTPROV prov;
1641 PCRYPTKEY key = (PCRYPTKEY)hKey;
1642
1643 TRACE("(0x%lx, %ld, %p, %08ld)\n", hKey, dwParam, pbData, dwFlags);
1644
1645 if (!key || !pbData)
1646 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1647
1648 prov = key->pProvider;
1649 return prov->pFuncs->pCPSetKeyParam(prov->hPrivate, key->hPrivate,
1650 dwParam, pbData, dwFlags);
1651 }
1652
1653 /******************************************************************************
1654 * CryptSetProviderA (ADVAPI32.@)
1655 *
1656 * Specifies the current user's default CSP.
1657 *
1658 * PARAMS
1659 * pszProvName [I] Name of the new default CSP.
1660 * dwProvType [I] Provider type of the CSP.
1661 *
1662 * RETURNS
1663 * Success: TRUE
1664 * Failure: FALSE
1665 */
1666 BOOL WINAPI CryptSetProviderA (LPCSTR pszProvName, DWORD dwProvType)
1667 {
1668 TRACE("(%s, %ld)\n", pszProvName, dwProvType);
1669 return CryptSetProviderExA(pszProvName, dwProvType, NULL, CRYPT_USER_DEFAULT);
1670 }
1671
1672 /******************************************************************************
1673 * CryptSetProviderW (ADVAPI32.@)
1674 *
1675 * See CryptSetProviderA
1676 */
1677 BOOL WINAPI CryptSetProviderW (LPCWSTR pszProvName, DWORD dwProvType)
1678 {
1679 TRACE("(%s, %ld)\n", debugstr_w(pszProvName), dwProvType);
1680 return CryptSetProviderExW(pszProvName, dwProvType, NULL, CRYPT_USER_DEFAULT);
1681 }
1682
1683 /******************************************************************************
1684 * CryptSetProviderExA (ADVAPI32.@)
1685 *
1686 * Specifies the default CSP.
1687 *
1688 * PARAMS
1689 * pszProvName [I] Name of the new default CSP.
1690 * dwProvType [I] Provider type of the CSP.
1691 * pdwReserved [I] Reserved for future use and must be NULL.
1692 * dwFlags [I] See MSDN Doc.
1693 *
1694 * RETURNS
1695 * Success: TRUE
1696 * Failure: FALSE
1697 */
1698 BOOL WINAPI CryptSetProviderExA (LPCSTR pszProvName, DWORD dwProvType, DWORD *pdwReserved, DWORD dwFlags)
1699 {
1700 HKEY hProvKey, hTypeKey;
1701 PSTR keyname;
1702
1703 TRACE("(%s, %ld, %p, %08ld)\n", pszProvName, dwProvType, pdwReserved, dwFlags);
1704
1705 if (!pszProvName || pdwReserved)
1706 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1707 if (dwProvType > MAXPROVTYPES)
1708 CRYPT_ReturnLastError(NTE_BAD_PROV_TYPE);
1709 if (dwFlags & ~(CRYPT_MACHINE_DEFAULT | CRYPT_USER_DEFAULT | CRYPT_DELETE_DEFAULT)
1710 || dwFlags == CRYPT_DELETE_DEFAULT)
1711 CRYPT_ReturnLastError(NTE_BAD_FLAGS);
1712
1713 if (!(keyname = CRYPT_GetTypeKeyName(dwProvType, dwFlags & CRYPT_USER_DEFAULT)))
1714 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
1715 if (RegOpenKeyA((dwFlags & CRYPT_USER_DEFAULT) ? HKEY_CURRENT_USER : HKEY_LOCAL_MACHINE,
1716 keyname, &hTypeKey))
1717 {
1718 CRYPT_Free(keyname);
1719 CRYPT_ReturnLastError(NTE_BAD_PROVIDER);
1720 }
1721 CRYPT_Free(keyname);
1722
1723 if (dwFlags & CRYPT_DELETE_DEFAULT)
1724 {
1725 RegDeleteValueA(hTypeKey, "Name");
1726 }
1727 else
1728 {
1729 if (!(keyname = CRYPT_GetProvKeyName(pszProvName)))
1730 {
1731 RegCloseKey(hTypeKey);
1732 CRYPT_ReturnLastError(ERROR_NOT_ENOUGH_MEMORY);
1733 }
1734 if (RegOpenKeyA((dwFlags & CRYPT_USER_DEFAULT) ? HKEY_CURRENT_USER : HKEY_LOCAL_MACHINE,
1735 keyname, &hProvKey))
1736 {
1737 CRYPT_Free(keyname);
1738 RegCloseKey(hTypeKey);
1739 CRYPT_ReturnLastError(NTE_BAD_PROVIDER);
1740 }
1741 CRYPT_Free(keyname);
1742
1743 if (RegSetValueExA(hTypeKey, "Name", 0, REG_SZ, pszProvName, strlen(pszProvName) + 1))
1744 {
1745 RegCloseKey(hTypeKey);
1746 RegCloseKey(hProvKey);
1747 return FALSE;
1748 }
1749
1750 RegCloseKey(hProvKey);
1751 }
1752 RegCloseKey(hTypeKey);
1753
1754 return TRUE;
1755 }
1756
1757 /******************************************************************************
1758 * CryptSetProviderExW (ADVAPI32.@)
1759 *
1760 * See CryptSetProviderExA
1761 */
1762 BOOL WINAPI CryptSetProviderExW (LPCWSTR pszProvName, DWORD dwProvType, DWORD *pdwReserved, DWORD dwFlags)
1763 {
1764 BOOL ret = FALSE;
1765 PSTR str = NULL;
1766
1767 TRACE("(%s, %ld, %p, %08ld)\n", debugstr_w(pszProvName), dwProvType, pdwReserved, dwFlags);
1768
1769 if (CRYPT_UnicodeToANSI(pszProvName, &str, -1))
1770 {
1771 ret = CryptSetProviderExA(str, dwProvType, pdwReserved, dwFlags);
1772 CRYPT_Free(str);
1773 }
1774 return ret;
1775 }
1776
1777 /******************************************************************************
1778 * CryptSetProvParam (ADVAPI32.@)
1779 *
1780 * Customizes the operations of a CSP.
1781 *
1782 * PARAMS
1783 * hProv [I] Handle of a CSP.
1784 * dwParam [I] See MSDN Doc.
1785 * pbData [I] Buffer that contains a value to set as a parameter.
1786 * dwFlags [I] if dwParam is PP_USE_HARDWARE_RNG, dwFlags must be zero.
1787 *
1788 * RETURNS
1789 * Success: TRUE
1790 * Failure: FALSE
1791 */
1792 BOOL WINAPI CryptSetProvParam (HCRYPTPROV hProv, DWORD dwParam, BYTE *pbData, DWORD dwFlags)
1793 {
1794 PCRYPTPROV prov = (PCRYPTPROV)hProv;
1795
1796 TRACE("(0x%lx, %ld, %p, %08ld)\n", hProv, dwParam, pbData, dwFlags);
1797
1798 if (!prov)
1799 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
1800 if (dwFlags & PP_USE_HARDWARE_RNG)
1801 {
1802 FIXME("PP_USE_HARDWARE_RNG: What do I do with this?\n");
1803 FIXME("\tLetting the CSP decide.\n");
1804 }
1805 if (dwFlags & PP_CLIENT_HWND)
1806 {
1807 /* FIXME: Should verify the parameter */
1808 if (pbData /* && IsWindow((HWND)pbData) */)
1809 {
1810 crypt_hWindow = (HWND)(pbData);
1811 return TRUE;
1812 } else {
1813 SetLastError(ERROR_INVALID_PARAMETER);
1814 return FALSE;
1815 }
1816 }
1817 /* All other flags go to the CSP */
1818 return prov->pFuncs->pCPSetProvParam(prov->hPrivate, dwParam, pbData, dwFlags);
1819 }
1820
1821 /******************************************************************************
1822 * CryptVerifySignatureA
1823 *
1824 * Note: Since the sDesciption (string) is supposed to be NULL and
1825 * is only retained for compatibility no string conversions are required
1826 * and only one implementation is required for both ANSI and Unicode.
1827 * We still need to export both:
1828 *
1829 * CryptVerifySignatureA (ADVAPI32.@)
1830 * CryptVerifySignatureW (ADVAPI32.@)
1831 *
1832 * Verifies the signature of a hash object.
1833 *
1834 * PARAMS
1835 * hHash [I] Handle of the hash object to verify.
1836 * pbSignature [I] Signature data to verify.
1837 * dwSigLen [I] Size of pbSignature.
1838 * hPubKey [I] Handle to the public key to authenticate signature.
1839 * sDescription [I] Must be set to NULL.
1840 * dwFlags [I] See MSDN doc.
1841 *
1842 * RETURNS
1843 * Success: TRUE
1844 * Failure: FALSE
1845 */
1846 BOOL WINAPI CryptVerifySignatureA (HCRYPTHASH hHash, BYTE *pbSignature, DWORD dwSigLen,
1847 HCRYPTKEY hPubKey, LPCSTR sDescription, DWORD dwFlags)
1848 {
1849 PCRYPTHASH hash = (PCRYPTHASH)hHash;
1850 PCRYPTKEY key = (PCRYPTKEY)hPubKey;
1851 PCRYPTPROV prov;
1852
1853 TRACE("(0x%lx, %p, %ld, 0x%lx, %08ld)\n", hHash, pbSignature,
1854 dwSigLen, hPubKey, dwFlags);
1855 if (sDescription)
1856 WARN("The sDescription parameter is not supported (and no longer used). Ignoring.\n");
1857
1858 if (!hash || !key)
1859 CRYPT_ReturnLastError(ERROR_INVALID_HANDLE);
1860 if (!pbSignature || !dwSigLen)
1861 CRYPT_ReturnLastError(ERROR_INVALID_PARAMETER);
1862
1863 prov = hash->pProvider;
1864 return prov->pFuncs->pCPVerifySignature(prov->hPrivate, hash->hPrivate, pbSignature, dwSigLen,
1865 key->hPrivate, NULL, dwFlags);
1866 }
1867
1868
1869 /*
1870 These functions have nearly identical prototypes to CryptProtectMemory and CryptUnprotectMemory,
1871 in crypt32.dll.
1872 */
1873
1874 /******************************************************************************
1875 * SystemFunction040 (ADVAPI32.@)
1876 *
1877 * PARAMS:
1878 * memory : pointer to memory to encrypt
1879 * length : length of region to encrypt, in bytes. must be multiple of RTL_ENCRYPT_MEMORY_SIZE
1880 * flags : RTL_ENCRYPT_OPTION_SAME_PROCESS | RTL_ENCRYPT_OPTION_CROSS_PROCESS, | RTL_ENCRYPT_OPTION_SAME_LOGON
1881 * control whether other processes are able to decrypt the memory. The same value must be given
1882 * when decrypting the memory.
1883 */
1884 NTSTATUS WINAPI SystemFunction040(PVOID memory, ULONG length, ULONG flags) /* RtlEncryptMemory */
1885 {
1886 FIXME("(%p, %lx, %lx): stub [RtlEncryptMemory]\n", memory, length, flags);
1887 return STATUS_SUCCESS;
1888 }
1889
1890 /******************************************************************************
1891 * SystemFunction041 (ADVAPI32.@)
1892 *
1893 * PARAMS:
1894 * memory : pointer to memory to decrypt
1895 * length : length of region to decrypt, in bytes. must be multiple of RTL_ENCRYPT_MEMORY_SIZE
1896 * flags : RTL_ENCRYPT_OPTION_SAME_PROCESS | RTL_ENCRYPT_OPTION_CROSS_PROCESS, | RTL_ENCRYPT_OPTION_SAME_LOGON
1897 * control whether other processes are able to decrypt the memory. The same value must be given
1898 * when encrypting the memory.
1899 */
1900 NTSTATUS WINAPI SystemFunction041(PVOID memory, ULONG length, ULONG flags) /* RtlDecryptMemory */
1901 {
1902 FIXME("(%p, %lx, %lx): stub [RtlDecryptMemory]\n", memory, length, flags);
1903 return STATUS_SUCCESS;
1904 }
Quick hack tree for wine patches julliard doesn't want to commit