?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
cryptui: Show a cert's allowed usages in cert properties dialog.
[wine/wine64.git] / dlls / cryptui / main.c
blobf5e0a9af6dfc21a05c2c0287ae8050fca60278ed
1 /*
2 * Copyright 2008 Juan Lang
3 *
4 * This library is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU Lesser General Public
6 * License as published by the Free Software Foundation; either
7 * version 2.1 of the License, or (at your option) any later version.
8 *
9 * This library is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Lesser General Public License for more details.
13 *
14 * You should have received a copy of the GNU Lesser General Public
15 * License along with this library; if not, write to the Free Software
16 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
17 */
18
19 #include "config.h"
20
21 #include <stdarg.h>
22
23 #define COBJMACROS
24 #define NONAMELESSUNION
25
26 #include "windef.h"
27 #include "winbase.h"
28 #include "winnls.h"
29 #include "winuser.h"
30 #include "softpub.h"
31 #include "wingdi.h"
32 #include "richedit.h"
33 #include "ole2.h"
34 #include "richole.h"
35 #include "commctrl.h"
36 #include "cryptuiapi.h"
37 #include "cryptuires.h"
38 #include "urlmon.h"
39 #include "hlink.h"
40 #include "wine/debug.h"
41 #include "wine/unicode.h"
42
43 WINE_DEFAULT_DEBUG_CHANNEL(cryptui);
44
45 static HINSTANCE hInstance;
46
47 BOOL WINAPI DllMain(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved)
48 {
49 TRACE("(0x%p, %d, %p)\n", hinstDLL, fdwReason, lpvReserved);
50
51 switch (fdwReason)
52 {
53 case DLL_WINE_PREATTACH:
54 return FALSE; /* prefer native version */
55 case DLL_PROCESS_ATTACH:
56 hInstance = hinstDLL;
57 DisableThreadLibraryCalls(hinstDLL);
58 break;
59 case DLL_PROCESS_DETACH:
60 break;
61 default:
62 break;
63 }
64 return TRUE;
65 }
66
67 /***********************************************************************
68 * CryptUIDlgCertMgr (CRYPTUI.@)
69 */
70 BOOL WINAPI CryptUIDlgCertMgr(PCCRYPTUI_CERT_MGR_STRUCT pCryptUICertMgr)
71 {
72 FIXME("(%p): stub\n", pCryptUICertMgr);
73 return FALSE;
74 }
75
76 /***********************************************************************
77 * CryptUIDlgViewCertificateA (CRYPTUI.@)
78 */
79 BOOL WINAPI CryptUIDlgViewCertificateA(
80 PCCRYPTUI_VIEWCERTIFICATE_STRUCTA pCertViewInfo, BOOL *pfPropertiesChanged)
81 {
82 CRYPTUI_VIEWCERTIFICATE_STRUCTW viewInfo;
83 LPWSTR title = NULL;
84 BOOL ret;
85
86 TRACE("(%p, %p)\n", pCertViewInfo, pfPropertiesChanged);
87
88 memcpy(&viewInfo, pCertViewInfo, sizeof(viewInfo));
89 if (pCertViewInfo->szTitle)
90 {
91 int len = MultiByteToWideChar(CP_ACP, 0, pCertViewInfo->szTitle, -1,
92 NULL, 0);
93
94 title = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
95 if (title)
96 {
97 MultiByteToWideChar(CP_ACP, 0, pCertViewInfo->szTitle, -1, title,
98 len);
99 viewInfo.szTitle = title;
100 }
101 else
102 {
103 ret = FALSE;
104 goto error;
105 }
106 }
107 if (pCertViewInfo->cPropSheetPages)
108 {
109 FIXME("ignoring additional prop sheet pages\n");
110 viewInfo.cPropSheetPages = 0;
111 }
112 ret = CryptUIDlgViewCertificateW(&viewInfo, pfPropertiesChanged);
113 HeapFree(GetProcessHeap(), 0, title);
114 error:
115 return ret;
116 }
117
118 struct ReadStringStruct
119 {
120 LPCWSTR buf;
121 LONG pos;
122 LONG len;
123 };
124
125 static DWORD CALLBACK read_text_callback(DWORD_PTR dwCookie, LPBYTE buf,
126 LONG cb, LONG *pcb)
127 {
128 struct ReadStringStruct *string = (struct ReadStringStruct *)dwCookie;
129 LONG cch = min(cb / sizeof(WCHAR), string->len - string->pos);
130
131 TRACE("(%p, %p, %d, %p)\n", string, buf, cb, pcb);
132
133 memmove(buf, string->buf + string->pos, cch * sizeof(WCHAR));
134 string->pos += cch;
135 *pcb = cch * sizeof(WCHAR);
136 return 0;
137 }
138
139 static void add_unformatted_text_to_control(HWND hwnd, LPCWSTR text, LONG len)
140 {
141 struct ReadStringStruct string;
142 EDITSTREAM editstream;
143
144 TRACE("(%p, %s)\n", hwnd, debugstr_wn(text, len));
145
146 string.buf = text;
147 string.pos = 0;
148 string.len = len;
149 editstream.dwCookie = (DWORD_PTR)&string;
150 editstream.dwError = 0;
151 editstream.pfnCallback = read_text_callback;
152 SendMessageW(hwnd, EM_STREAMIN, SF_TEXT | SFF_SELECTION | SF_UNICODE,
153 (LPARAM)&editstream);
154 }
155
156 static void add_string_resource_to_control(HWND hwnd, int id)
157 {
158 LPWSTR str;
159 LONG len;
160
161 len = LoadStringW(hInstance, id, (LPWSTR)&str, 0);
162 add_unformatted_text_to_control(hwnd, str, len);
163 }
164
165 static void add_text_with_paraformat_to_control(HWND hwnd, LPCWSTR text,
166 LONG len, const PARAFORMAT2 *fmt)
167 {
168 add_unformatted_text_to_control(hwnd, text, len);
169 SendMessageW(hwnd, EM_SETPARAFORMAT, 0, (LPARAM)fmt);
170 }
171
172 static void add_string_resource_with_paraformat_to_control(HWND hwnd, int id,
173 const PARAFORMAT2 *fmt)
174 {
175 LPWSTR str;
176 LONG len;
177
178 len = LoadStringW(hInstance, id, (LPWSTR)&str, 0);
179 add_text_with_paraformat_to_control(hwnd, str, len, fmt);
180 }
181
182 static LPWSTR get_cert_name_string(PCCERT_CONTEXT pCertContext, DWORD dwType,
183 DWORD dwFlags)
184 {
185 LPWSTR buf = NULL;
186 DWORD len;
187
188 len = CertGetNameStringW(pCertContext, dwType, dwFlags, NULL, NULL, 0);
189 if (len)
190 {
191 buf = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
192 if (buf)
193 CertGetNameStringW(pCertContext, dwType, dwFlags, NULL, buf, len);
194 }
195 return buf;
196 }
197
198 static void add_cert_string_to_control(HWND hwnd, PCCERT_CONTEXT pCertContext,
199 DWORD dwType, DWORD dwFlags)
200 {
201 LPWSTR name = get_cert_name_string(pCertContext, dwType, dwFlags);
202
203 if (name)
204 {
205 /* Don't include NULL-terminator in output */
206 DWORD len = lstrlenW(name);
207
208 add_unformatted_text_to_control(hwnd, name, len);
209 HeapFree(GetProcessHeap(), 0, name);
210 }
211 }
212
213 static void add_icon_to_control(HWND hwnd, int id)
214 {
215 HRESULT hr;
216 LPRICHEDITOLE richEditOle = NULL;
217 LPOLEOBJECT object = NULL;
218 CLSID clsid;
219 LPOLECACHE oleCache = NULL;
220 FORMATETC formatEtc;
221 DWORD conn;
222 LPDATAOBJECT dataObject = NULL;
223 HBITMAP bitmap = NULL;
224 RECT rect;
225 STGMEDIUM stgm;
226 REOBJECT reObject;
227
228 TRACE("(%p, %d)\n", hwnd, id);
229
230 SendMessageW(hwnd, EM_GETOLEINTERFACE, 0, (LPARAM)&richEditOle);
231 if (!richEditOle)
232 goto end;
233 hr = OleCreateDefaultHandler(&CLSID_NULL, NULL, &IID_IOleObject,
234 (void**)&object);
235 if (FAILED(hr))
236 goto end;
237 hr = IOleObject_GetUserClassID(object, &clsid);
238 if (FAILED(hr))
239 goto end;
240 hr = IOleObject_QueryInterface(object, &IID_IOleCache, (void**)&oleCache);
241 if (FAILED(hr))
242 goto end;
243 formatEtc.cfFormat = CF_BITMAP;
244 formatEtc.ptd = NULL;
245 formatEtc.dwAspect = DVASPECT_CONTENT;
246 formatEtc.lindex = -1;
247 formatEtc.tymed = TYMED_GDI;
248 hr = IOleCache_Cache(oleCache, &formatEtc, 0, &conn);
249 if (FAILED(hr))
250 goto end;
251 hr = IOleObject_QueryInterface(object, &IID_IDataObject,
252 (void**)&dataObject);
253 if (FAILED(hr))
254 goto end;
255 bitmap = LoadImageW(hInstance, MAKEINTRESOURCEW(id), IMAGE_BITMAP, 0, 0,
256 LR_DEFAULTSIZE | LR_LOADTRANSPARENT);
257 if (!bitmap)
258 goto end;
259 rect.left = rect.top = 0;
260 rect.right = GetSystemMetrics(SM_CXICON);
261 rect.bottom = GetSystemMetrics(SM_CYICON);
262 stgm.tymed = TYMED_GDI;
263 stgm.u.hBitmap = bitmap;
264 stgm.pUnkForRelease = NULL;
265 hr = IDataObject_SetData(dataObject, &formatEtc, &stgm, TRUE);
266 if (FAILED(hr))
267 goto end;
268
269 reObject.cbStruct = sizeof(reObject);
270 reObject.cp = REO_CP_SELECTION;
271 reObject.clsid = clsid;
272 reObject.poleobj = object;
273 reObject.pstg = NULL;
274 reObject.polesite = NULL;
275 reObject.sizel.cx = reObject.sizel.cy = 0;
276 reObject.dvaspect = DVASPECT_CONTENT;
277 reObject.dwFlags = 0;
278 reObject.dwUser = 0;
279
280 IRichEditOle_InsertObject(richEditOle, &reObject);
281
282 end:
283 if (dataObject)
284 IDataObject_Release(dataObject);
285 if (oleCache)
286 IOleCache_Release(oleCache);
287 if (object)
288 IOleObject_Release(object);
289 if (richEditOle)
290 IRichEditOle_Release(richEditOle);
291 }
292
293 #define MY_INDENT 200
294
295 static void add_oid_text_to_control(HWND hwnd, char *oid)
296 {
297 WCHAR nl = '\n';
298 PCCRYPT_OID_INFO oidInfo = CryptFindOIDInfo(CRYPT_OID_INFO_OID_KEY, oid, 0);
299 PARAFORMAT2 parFmt;
300
301 parFmt.cbSize = sizeof(parFmt);
302 parFmt.dwMask = PFM_STARTINDENT;
303 parFmt.dxStartIndent = MY_INDENT * 3;
304 if (oidInfo)
305 {
306 add_text_with_paraformat_to_control(hwnd, oidInfo->pwszName,
307 lstrlenW(oidInfo->pwszName), &parFmt);
308 add_unformatted_text_to_control(hwnd, &nl, 1);
309 }
310 }
311
312 #define MAX_STRING_LEN 512
313
314 struct OIDToString
315 {
316 LPCSTR oid;
317 int id;
318 };
319
320 /* The following list MUST be lexicographically sorted by OID */
321 static struct OIDToString oidMap[] = {
322 /* 1.3.6.1.4.1.311.10.3.1 */
323 { szOID_KP_CTL_USAGE_SIGNING, IDS_PURPOSE_CTL_USAGE_SIGNING },
324 /* 1.3.6.1.4.1.311.10.3.4 */
325 { szOID_KP_EFS, IDS_PURPOSE_EFS },
326 /* 1.3.6.1.4.1.311.10.3.4.1 */
327 { szOID_EFS_RECOVERY, IDS_PURPOSE_EFS_RECOVERY },
328 /* 1.3.6.1.4.1.311.10.3.5 */
329 { szOID_WHQL_CRYPTO, IDS_PURPOSE_WHQL },
330 /* 1.3.6.1.4.1.311.10.3.6 */
331 { szOID_NT5_CRYPTO, IDS_PURPOSE_NT5 },
332 /* 1.3.6.1.4.1.311.10.3.7 */
333 { szOID_OEM_WHQL_CRYPTO, IDS_PURPOSE_OEM_WHQL },
334 /* 1.3.6.1.4.1.311.10.3.8 */
335 { szOID_EMBEDDED_NT_CRYPTO, IDS_PURPOSE_EMBEDDED_NT },
336 /* 1.3.6.1.4.1.311.10.3.9 */
337 { szOID_ROOT_LIST_SIGNER, IDS_PURPOSE_ROOT_LIST_SIGNER },
338 /* 1.3.6.1.4.1.311.10.3.10 */
339 { szOID_KP_QUALIFIED_SUBORDINATION, IDS_PURPOSE_QUALIFIED_SUBORDINATION },
340 /* 1.3.6.1.4.1.311.10.3.11 */
341 { szOID_KP_KEY_RECOVERY, IDS_PURPOSE_KEY_RECOVERY },
342 /* 1.3.6.1.4.1.311.10.3.12 */
343 { szOID_KP_DOCUMENT_SIGNING, IDS_PURPOSE_DOCUMENT_SIGNING },
344 /* 1.3.6.1.4.1.311.10.3.13 */
345 { szOID_KP_LIFETIME_SIGNING, IDS_PURPOSE_LIFETIME_SIGNING },
346 /* 1.3.6.1.4.1.311.10.5.1 */
347 { szOID_DRM, IDS_PURPOSE_DRM },
348 /* 1.3.6.1.4.1.311.10.6.1 */
349 { szOID_LICENSES, IDS_PURPOSE_LICENSES },
350 /* 1.3.6.1.4.1.311.10.6.2 */
351 { szOID_LICENSE_SERVER, IDS_PURPOSE_LICENSE_SERVER },
352 /* 1.3.6.1.4.1.311.20.2.1 */
353 { szOID_ENROLLMENT_AGENT, IDS_PURPOSE_ENROLLMENT_AGENT },
354 /* 1.3.6.1.4.1.311.20.2.2 */
355 { szOID_KP_SMARTCARD_LOGON, IDS_PURPOSE_SMARTCARD_LOGON },
356 /* 1.3.6.1.4.1.311.21.5 */
357 { szOID_KP_CA_EXCHANGE, IDS_PURPOSE_CA_EXCHANGE },
358 /* 1.3.6.1.4.1.311.21.6 */
359 { szOID_KP_KEY_RECOVERY_AGENT, IDS_PURPOSE_KEY_RECOVERY_AGENT },
360 /* 1.3.6.1.4.1.311.21.19 */
361 { szOID_DS_EMAIL_REPLICATION, IDS_PURPOSE_DS_EMAIL_REPLICATION },
362 /* 1.3.6.1.5.5.7.3.1 */
363 { szOID_PKIX_KP_SERVER_AUTH, IDS_PURPOSE_SERVER_AUTH },
364 /* 1.3.6.1.5.5.7.3.2 */
365 { szOID_PKIX_KP_CLIENT_AUTH, IDS_PURPOSE_CLIENT_AUTH },
366 /* 1.3.6.1.5.5.7.3.3 */
367 { szOID_PKIX_KP_CODE_SIGNING, IDS_PURPOSE_CODE_SIGNING },
368 /* 1.3.6.1.5.5.7.3.4 */
369 { szOID_PKIX_KP_EMAIL_PROTECTION, IDS_PURPOSE_EMAIL_PROTECTION },
370 /* 1.3.6.1.5.5.7.3.5 */
371 { szOID_PKIX_KP_IPSEC_END_SYSTEM, IDS_PURPOSE_IPSEC },
372 /* 1.3.6.1.5.5.7.3.6 */
373 { szOID_PKIX_KP_IPSEC_TUNNEL, IDS_PURPOSE_IPSEC },
374 /* 1.3.6.1.5.5.7.3.7 */
375 { szOID_PKIX_KP_IPSEC_USER, IDS_PURPOSE_IPSEC },
376 /* 1.3.6.1.5.5.7.3.8 */
377 { szOID_PKIX_KP_TIMESTAMP_SIGNING, IDS_PURPOSE_TIMESTAMP_SIGNING },
378 };
379
380 static struct OIDToString *findSupportedOID(LPCSTR oid)
381 {
382 int indexHigh = sizeof(oidMap) / sizeof(oidMap[0]) - 1, indexLow = 0, i;
383 struct OIDToString *ret = NULL;
384
385 for (i = (indexLow + indexHigh) / 2; !ret && indexLow <= indexHigh;
386 i = (indexLow + indexHigh) / 2)
387 {
388 int cmp;
389
390 cmp = strcmp(oid, oidMap[i].oid);
391 if (!cmp)
392 ret = &oidMap[i];
393 else if (cmp > 0)
394 indexLow = i + 1;
395 else
396 indexHigh = i - 1;
397 }
398 return ret;
399 }
400
401 static void add_local_oid_text_to_control(HWND text, LPCSTR oid)
402 {
403 struct OIDToString *entry;
404 WCHAR nl = '\n';
405 PARAFORMAT2 parFmt;
406
407 parFmt.cbSize = sizeof(parFmt);
408 parFmt.dwMask = PFM_STARTINDENT;
409 parFmt.dxStartIndent = MY_INDENT * 3;
410 if ((entry = findSupportedOID(oid)))
411 {
412 WCHAR *str, *linebreak, *ptr;
413 BOOL multiline = FALSE;
414 int len;
415
416 len = LoadStringW(hInstance, entry->id, (LPWSTR)&str, 0);
417 ptr = str;
418 do {
419 if ((linebreak = memchrW(ptr, '\n', len)))
420 {
421 WCHAR copy[MAX_STRING_LEN];
422
423 multiline = TRUE;
424 /* The source string contains a newline, which the richedit
425 * control won't find since it's interpreted as a paragraph
426 * break. Therefore copy up to the newline. lstrcpynW always
427 * NULL-terminates, so pass one more than the length of the
428 * source line so the copy includes the entire line and the
429 * NULL-terminator.
430 */
431 lstrcpynW(copy, ptr, linebreak - ptr + 1);
432 add_text_with_paraformat_to_control(text, copy,
433 linebreak - ptr, &parFmt);
434 ptr = linebreak + 1;
435 add_unformatted_text_to_control(text, &nl, 1);
436 }
437 else if (multiline && *ptr)
438 {
439 /* Add the last line */
440 add_text_with_paraformat_to_control(text, ptr,
441 len - (ptr - str), &parFmt);
442 add_unformatted_text_to_control(text, &nl, 1);
443 }
444 } while (linebreak);
445 if (!multiline)
446 {
447 add_text_with_paraformat_to_control(text, str, len, &parFmt);
448 add_unformatted_text_to_control(text, &nl, 1);
449 }
450 }
451 else
452 {
453 WCHAR *oidW = HeapAlloc(GetProcessHeap(), 0,
454 (strlen(oid) + 1) * sizeof(WCHAR));
455
456 if (oidW)
457 {
458 LPCSTR src;
459 WCHAR *dst;
460
461 for (src = oid, dst = oidW; *src; src++, dst++)
462 *dst = *src;
463 *dst = 0;
464 add_text_with_paraformat_to_control(text, oidW, lstrlenW(oidW),
465 &parFmt);
466 add_unformatted_text_to_control(text, &nl, 1);
467 HeapFree(GetProcessHeap(), 0, oidW);
468 }
469 }
470 }
471
472 static void display_app_usages(HWND text, PCCERT_CONTEXT cert,
473 BOOL *anyUsageAdded)
474 {
475 static char any_app_policy[] = szOID_ANY_APPLICATION_POLICY;
476 WCHAR nl = '\n';
477 CHARFORMATW charFmt;
478 PCERT_EXTENSION policyExt;
479 if (!*anyUsageAdded)
480 {
481 PARAFORMAT2 parFmt;
482
483 parFmt.cbSize = sizeof(parFmt);
484 parFmt.dwMask = PFM_STARTINDENT;
485 parFmt.dxStartIndent = MY_INDENT;
486 add_string_resource_with_paraformat_to_control(text,
487 IDS_CERT_INFO_PURPOSES, &parFmt);
488 add_unformatted_text_to_control(text, &nl, 1);
489 *anyUsageAdded = TRUE;
490 }
491 memset(&charFmt, 0, sizeof(charFmt));
492 charFmt.cbSize = sizeof(charFmt);
493 charFmt.dwMask = CFM_BOLD;
494 charFmt.dwEffects = 0;
495 SendMessageW(text, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&charFmt);
496 if ((policyExt = CertFindExtension(szOID_APPLICATION_CERT_POLICIES,
497 cert->pCertInfo->cExtension, cert->pCertInfo->rgExtension)))
498 {
499 CERT_POLICIES_INFO *policies;
500 DWORD size;
501
502 if (CryptDecodeObjectEx(X509_ASN_ENCODING, X509_CERT_POLICIES,
503 policyExt->Value.pbData, policyExt->Value.cbData,
504 CRYPT_DECODE_ALLOC_FLAG, NULL, &policies, &size))
505 {
506 DWORD i;
507
508 for (i = 0; i < policies->cPolicyInfo; i++)
509 {
510 DWORD j;
511
512 for (j = 0; j < policies->rgPolicyInfo[i].cPolicyQualifier; j++)
513 add_local_oid_text_to_control(text,
514 policies->rgPolicyInfo[i].rgPolicyQualifier[j].
515 pszPolicyQualifierId);
516 }
517 LocalFree(policies);
518 }
519 }
520 else
521 add_oid_text_to_control(text, any_app_policy);
522 }
523
524 static BOOL display_cert_usages(HWND text, PCCERT_CONTEXT cert,
525 BOOL *anyUsageAdded)
526 {
527 WCHAR nl = '\n';
528 DWORD size;
529 BOOL badUsages = FALSE;
530
531 if (CertGetEnhancedKeyUsage(cert, 0, NULL, &size))
532 {
533 CHARFORMATW charFmt;
534 static char any_cert_policy[] = szOID_ANY_CERT_POLICY;
535 PCERT_ENHKEY_USAGE usage = HeapAlloc(GetProcessHeap(), 0, size);
536
537 if (usage)
538 {
539 if (CertGetEnhancedKeyUsage(cert, 0, usage, &size))
540 {
541 DWORD i;
542
543 if (!*anyUsageAdded)
544 {
545 PARAFORMAT2 parFmt;
546
547 parFmt.cbSize = sizeof(parFmt);
548 parFmt.dwMask = PFM_STARTINDENT;
549 parFmt.dxStartIndent = MY_INDENT;
550 add_string_resource_with_paraformat_to_control(text,
551 IDS_CERT_INFO_PURPOSES, &parFmt);
552 add_unformatted_text_to_control(text, &nl, 1);
553 *anyUsageAdded = TRUE;
554 }
555 memset(&charFmt, 0, sizeof(charFmt));
556 charFmt.cbSize = sizeof(charFmt);
557 charFmt.dwMask = CFM_BOLD;
558 charFmt.dwEffects = 0;
559 SendMessageW(text, EM_SETCHARFORMAT, SCF_SELECTION,
560 (LPARAM)&charFmt);
561 if (!usage->cUsageIdentifier)
562 add_oid_text_to_control(text, any_cert_policy);
563 else
564 for (i = 0; i < usage->cUsageIdentifier; i++)
565 add_local_oid_text_to_control(text,
566 usage->rgpszUsageIdentifier[i]);
567 }
568 else
569 badUsages = TRUE;
570 HeapFree(GetProcessHeap(), 0, usage);
571 }
572 else
573 badUsages = TRUE;
574 }
575 else
576 badUsages = TRUE;
577 return badUsages;
578 }
579
580 static void set_policy_text(HWND text,
581 PCCRYPTUI_VIEWCERTIFICATE_STRUCTW pCertViewInfo)
582 {
583 BOOL includeCertUsages = FALSE, includeAppUsages = FALSE;
584 BOOL badUsages = FALSE, anyUsageAdded = FALSE;
585
586 if (pCertViewInfo->cPurposes)
587 {
588 DWORD i;
589
590 for (i = 0; i < pCertViewInfo->cPurposes; i++)
591 {
592 if (!strcmp(pCertViewInfo->rgszPurposes[i], szOID_ANY_CERT_POLICY))
593 includeCertUsages = TRUE;
594 else if (!strcmp(pCertViewInfo->rgszPurposes[i],
595 szOID_ANY_APPLICATION_POLICY))
596 includeAppUsages = TRUE;
597 else
598 badUsages = TRUE;
599 }
600 }
601 else
602 includeAppUsages = includeCertUsages = TRUE;
603 if (includeAppUsages)
604 display_app_usages(text, pCertViewInfo->pCertContext, &anyUsageAdded);
605 if (includeCertUsages)
606 badUsages = display_cert_usages(text, pCertViewInfo->pCertContext,
607 &anyUsageAdded);
608 if (badUsages)
609 {
610 PARAFORMAT2 parFmt;
611
612 parFmt.cbSize = sizeof(parFmt);
613 parFmt.dwMask = PFM_STARTINDENT;
614 parFmt.dxStartIndent = MY_INDENT;
615 add_string_resource_with_paraformat_to_control(text,
616 IDS_CERT_INFO_BAD_PURPOSES, &parFmt);
617 }
618 }
619
620 static CRYPT_OBJID_BLOB *find_policy_qualifier(CERT_POLICIES_INFO *policies,
621 LPCSTR policyOid)
622 {
623 CRYPT_OBJID_BLOB *ret = NULL;
624 DWORD i;
625
626 for (i = 0; !ret && i < policies->cPolicyInfo; i++)
627 {
628 DWORD j;
629
630 for (j = 0; !ret && j < policies->rgPolicyInfo[i].cPolicyQualifier; j++)
631 if (!strcmp(policies->rgPolicyInfo[i].rgPolicyQualifier[j].
632 pszPolicyQualifierId, policyOid))
633 ret = &policies->rgPolicyInfo[i].rgPolicyQualifier[j].
634 Qualifier;
635 }
636 return ret;
637 }
638
639 static WCHAR *get_cps_str_from_qualifier(CRYPT_OBJID_BLOB *qualifier)
640 {
641 LPWSTR qualifierStr = NULL;
642 CERT_NAME_VALUE *qualifierValue;
643 DWORD size;
644
645 if (CryptDecodeObjectEx(X509_ASN_ENCODING, X509_NAME_VALUE,
646 qualifier->pbData, qualifier->cbData, CRYPT_DECODE_ALLOC_FLAG, NULL,
647 &qualifierValue, &size))
648 {
649 size = CertRDNValueToStrW(qualifierValue->dwValueType,
650 &qualifierValue->Value, NULL, 0);
651 qualifierStr = HeapAlloc(GetProcessHeap(), 0, size * sizeof(WCHAR));
652 if (qualifierStr)
653 CertRDNValueToStrW(qualifierValue->dwValueType,
654 &qualifierValue->Value, qualifierStr, size);
655 LocalFree(qualifierValue);
656 }
657 return qualifierStr;
658 }
659
660 static WCHAR *get_user_notice_from_qualifier(CRYPT_OBJID_BLOB *qualifier)
661 {
662 LPWSTR str = NULL;
663 CERT_POLICY_QUALIFIER_USER_NOTICE *qualifierValue;
664 DWORD size;
665
666 if (CryptDecodeObjectEx(X509_ASN_ENCODING,
667 X509_PKIX_POLICY_QUALIFIER_USERNOTICE,
668 qualifier->pbData, qualifier->cbData, CRYPT_DECODE_ALLOC_FLAG, NULL,
669 &qualifierValue, &size))
670 {
671 str = HeapAlloc(GetProcessHeap(), 0,
672 (strlenW(qualifierValue->pszDisplayText) + 1) * sizeof(WCHAR));
673 if (str)
674 strcpyW(str, qualifierValue->pszDisplayText);
675 LocalFree(qualifierValue);
676 }
677 return str;
678 }
679
680 struct IssuerStatement
681 {
682 LPWSTR cps;
683 LPWSTR userNotice;
684 };
685
686 static void set_issuer_statement(HWND hwnd,
687 PCCRYPTUI_VIEWCERTIFICATE_STRUCTW pCertViewInfo)
688 {
689 PCERT_EXTENSION policyExt;
690
691 if (!(pCertViewInfo->dwFlags & CRYPTUI_DISABLE_ISSUERSTATEMENT) &&
692 (policyExt = CertFindExtension(szOID_CERT_POLICIES,
693 pCertViewInfo->pCertContext->pCertInfo->cExtension,
694 pCertViewInfo->pCertContext->pCertInfo->rgExtension)))
695 {
696 CERT_POLICIES_INFO *policies;
697 DWORD size;
698
699 if (CryptDecodeObjectEx(X509_ASN_ENCODING, policyExt->pszObjId,
700 policyExt->Value.pbData, policyExt->Value.cbData,
701 CRYPT_DECODE_ALLOC_FLAG, NULL, &policies, &size))
702 {
703 CRYPT_OBJID_BLOB *qualifier;
704 LPWSTR cps = NULL, userNotice = NULL;
705
706 if ((qualifier = find_policy_qualifier(policies,
707 szOID_PKIX_POLICY_QUALIFIER_CPS)))
708 cps = get_cps_str_from_qualifier(qualifier);
709 if ((qualifier = find_policy_qualifier(policies,
710 szOID_PKIX_POLICY_QUALIFIER_USERNOTICE)))
711 userNotice = get_user_notice_from_qualifier(qualifier);
712 if (cps || userNotice)
713 {
714 struct IssuerStatement *issuerStatement =
715 HeapAlloc(GetProcessHeap(), 0, sizeof(struct IssuerStatement));
716
717 if (issuerStatement)
718 {
719 issuerStatement->cps = cps;
720 issuerStatement->userNotice = userNotice;
721 EnableWindow(GetDlgItem(hwnd, IDC_ISSUERSTATEMENT), TRUE);
722 SetWindowLongPtrW(hwnd, DWLP_USER,
723 (ULONG_PTR)issuerStatement);
724 }
725 }
726 LocalFree(policies);
727 }
728 }
729 }
730
731 static void set_cert_info(HWND hwnd,
732 PCCRYPTUI_VIEWCERTIFICATE_STRUCTW pCertViewInfo)
733 {
734 CHARFORMATW charFmt;
735 PARAFORMAT2 parFmt;
736 HWND icon = GetDlgItem(hwnd, IDC_CERTIFICATE_ICON);
737 HWND text = GetDlgItem(hwnd, IDC_CERTIFICATE_INFO);
738 CRYPT_PROVIDER_SGNR *provSigner = WTHelperGetProvSignerFromChain(
739 (CRYPT_PROVIDER_DATA *)pCertViewInfo->u.pCryptProviderData,
740 pCertViewInfo->idxSigner, pCertViewInfo->fCounterSigner,
741 pCertViewInfo->idxCounterSigner);
742 CRYPT_PROVIDER_CERT *root =
743 &provSigner->pasCertChain[provSigner->csCertChain - 1];
744
745 if (provSigner->pChainContext->TrustStatus.dwErrorStatus &
746 CERT_TRUST_IS_PARTIAL_CHAIN)
747 add_icon_to_control(icon, IDB_CERT_WARNING);
748 else if (!root->fTrustedRoot)
749 add_icon_to_control(icon, IDB_CERT_ERROR);
750 else
751 add_icon_to_control(icon, IDB_CERT);
752
753 memset(&charFmt, 0, sizeof(charFmt));
754 charFmt.cbSize = sizeof(charFmt);
755 charFmt.dwMask = CFM_BOLD;
756 charFmt.dwEffects = CFE_BOLD;
757 SendMessageW(text, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&charFmt);
758 /* FIXME: vertically center text */
759 parFmt.cbSize = sizeof(parFmt);
760 parFmt.dwMask = PFM_STARTINDENT;
761 parFmt.dxStartIndent = MY_INDENT;
762 add_string_resource_with_paraformat_to_control(text,
763 IDS_CERTIFICATEINFORMATION, &parFmt);
764
765 text = GetDlgItem(hwnd, IDC_CERTIFICATE_STATUS);
766 SendMessageW(text, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&charFmt);
767 if (provSigner->dwError == TRUST_E_CERT_SIGNATURE)
768 add_string_resource_with_paraformat_to_control(text,
769 IDS_CERT_INFO_BAD_SIG, &parFmt);
770 else if (provSigner->pChainContext->TrustStatus.dwErrorStatus &
771 CERT_TRUST_IS_PARTIAL_CHAIN)
772 add_string_resource_with_paraformat_to_control(text,
773 IDS_CERT_INFO_PARTIAL_CHAIN, &parFmt);
774 else if (!root->fTrustedRoot)
775 {
776 if (provSigner->csCertChain == 1 && root->fSelfSigned)
777 add_string_resource_with_paraformat_to_control(text,
778 IDS_CERT_INFO_UNTRUSTED_CA, &parFmt);
779 else
780 add_string_resource_with_paraformat_to_control(text,
781 IDS_CERT_INFO_UNTRUSTED_ROOT, &parFmt);
782 }
783 else
784 {
785 set_policy_text(text, pCertViewInfo);
786 set_issuer_statement(hwnd, pCertViewInfo);
787 }
788 }
789
790 static void set_cert_name_string(HWND hwnd, PCCERT_CONTEXT cert,
791 DWORD nameFlags, int heading)
792 {
793 WCHAR nl = '\n';
794 HWND text = GetDlgItem(hwnd, IDC_CERTIFICATE_NAMES);
795 CHARFORMATW charFmt;
796 PARAFORMAT2 parFmt;
797
798 memset(&charFmt, 0, sizeof(charFmt));
799 charFmt.cbSize = sizeof(charFmt);
800 charFmt.dwMask = CFM_BOLD;
801 charFmt.dwEffects = CFE_BOLD;
802 SendMessageW(text, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&charFmt);
803 parFmt.cbSize = sizeof(parFmt);
804 parFmt.dwMask = PFM_STARTINDENT;
805 parFmt.dxStartIndent = MY_INDENT * 3;
806 add_string_resource_with_paraformat_to_control(text, heading, &parFmt);
807 charFmt.dwEffects = 0;
808 SendMessageW(text, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&charFmt);
809 add_cert_string_to_control(text, cert, CERT_NAME_SIMPLE_DISPLAY_TYPE,
810 nameFlags);
811 add_unformatted_text_to_control(text, &nl, 1);
812 add_unformatted_text_to_control(text, &nl, 1);
813 add_unformatted_text_to_control(text, &nl, 1);
814
815 }
816
817 static void add_date_string_to_control(HWND hwnd, const FILETIME *fileTime)
818 {
819 WCHAR dateFmt[80]; /* sufficient for all versions of LOCALE_SSHORTDATE */
820 WCHAR date[80];
821 SYSTEMTIME sysTime;
822
823 GetLocaleInfoW(LOCALE_SYSTEM_DEFAULT, LOCALE_SSHORTDATE, dateFmt,
824 sizeof(dateFmt) / sizeof(dateFmt[0]));
825 FileTimeToSystemTime(fileTime, &sysTime);
826 GetDateFormatW(LOCALE_SYSTEM_DEFAULT, 0, &sysTime, dateFmt, date,
827 sizeof(date) / sizeof(date[0]));
828 add_unformatted_text_to_control(hwnd, date, lstrlenW(date));
829 }
830
831 static void set_cert_validity_period(HWND hwnd, PCCERT_CONTEXT cert)
832 {
833 WCHAR nl = '\n';
834 HWND text = GetDlgItem(hwnd, IDC_CERTIFICATE_NAMES);
835 CHARFORMATW charFmt;
836 PARAFORMAT2 parFmt;
837
838 memset(&charFmt, 0, sizeof(charFmt));
839 charFmt.cbSize = sizeof(charFmt);
840 charFmt.dwMask = CFM_BOLD;
841 charFmt.dwEffects = CFE_BOLD;
842 SendMessageW(text, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&charFmt);
843 parFmt.cbSize = sizeof(parFmt);
844 parFmt.dwMask = PFM_STARTINDENT;
845 parFmt.dxStartIndent = MY_INDENT * 3;
846 add_string_resource_with_paraformat_to_control(text, IDS_VALID_FROM,
847 &parFmt);
848 charFmt.dwEffects = 0;
849 SendMessageW(text, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&charFmt);
850 add_date_string_to_control(text, &cert->pCertInfo->NotBefore);
851 charFmt.dwEffects = CFE_BOLD;
852 SendMessageW(text, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&charFmt);
853 add_string_resource_to_control(text, IDS_VALID_TO);
854 charFmt.dwEffects = 0;
855 SendMessageW(text, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&charFmt);
856 add_date_string_to_control(text, &cert->pCertInfo->NotAfter);
857 add_unformatted_text_to_control(text, &nl, 1);
858 }
859
860 static void set_general_info(HWND hwnd,
861 PCCRYPTUI_VIEWCERTIFICATE_STRUCTW pCertViewInfo)
862 {
863 set_cert_info(hwnd, pCertViewInfo);
864 set_cert_name_string(hwnd, pCertViewInfo->pCertContext, 0,
865 IDS_SUBJECT_HEADING);
866 set_cert_name_string(hwnd, pCertViewInfo->pCertContext,
867 CERT_NAME_ISSUER_FLAG, IDS_ISSUER_HEADING);
868 set_cert_validity_period(hwnd, pCertViewInfo->pCertContext);
869 }
870
871 static LRESULT CALLBACK user_notice_dlg_proc(HWND hwnd, UINT msg, WPARAM wp,
872 LPARAM lp)
873 {
874 LRESULT ret = 0;
875 HWND text;
876 struct IssuerStatement *issuerStatement;
877
878 switch (msg)
879 {
880 case WM_INITDIALOG:
881 text = GetDlgItem(hwnd, IDC_USERNOTICE);
882 issuerStatement = (struct IssuerStatement *)lp;
883 add_unformatted_text_to_control(text, issuerStatement->userNotice,
884 strlenW(issuerStatement->userNotice));
885 if (issuerStatement->cps)
886 SetWindowLongPtrW(hwnd, DWLP_USER, (LPARAM)issuerStatement->cps);
887 else
888 EnableWindow(GetDlgItem(hwnd, IDC_CPS), FALSE);
889 break;
890 case WM_COMMAND:
891 switch (wp)
892 {
893 case IDOK:
894 EndDialog(hwnd, IDOK);
895 ret = TRUE;
896 break;
897 case IDC_CPS:
898 {
899 IBindCtx *bctx = NULL;
900 LPWSTR cps;
901
902 CreateBindCtx(0, &bctx);
903 cps = (LPWSTR)GetWindowLongPtrW(hwnd, DWLP_USER);
904 HlinkSimpleNavigateToString(cps, NULL, NULL, NULL, bctx, NULL,
905 HLNF_OPENINNEWWINDOW, 0);
906 IBindCtx_Release(bctx);
907 break;
908 }
909 }
910 }
911 return ret;
912 }
913
914 static void show_user_notice(HWND hwnd, struct IssuerStatement *issuerStatement)
915 {
916 DialogBoxParamW(hInstance, MAKEINTRESOURCEW(IDD_USERNOTICE), hwnd,
917 user_notice_dlg_proc, (LPARAM)issuerStatement);
918 }
919
920 static LRESULT CALLBACK general_dlg_proc(HWND hwnd, UINT msg, WPARAM wp,
921 LPARAM lp)
922 {
923 PROPSHEETPAGEW *page;
924 PCCRYPTUI_VIEWCERTIFICATE_STRUCTW pCertViewInfo;
925
926 TRACE("(%p, %08x, %08lx, %08lx)\n", hwnd, msg, wp, lp);
927
928 switch (msg)
929 {
930 case WM_INITDIALOG:
931 page = (PROPSHEETPAGEW *)lp;
932 pCertViewInfo = (PCCRYPTUI_VIEWCERTIFICATE_STRUCTW)page->lParam;
933 if (pCertViewInfo->dwFlags & CRYPTUI_DISABLE_ADDTOSTORE)
934 ShowWindow(GetDlgItem(hwnd, IDC_ADDTOSTORE), FALSE);
935 EnableWindow(GetDlgItem(hwnd, IDC_ISSUERSTATEMENT), FALSE);
936 set_general_info(hwnd, pCertViewInfo);
937 break;
938 case WM_COMMAND:
939 switch (wp)
940 {
941 case IDC_ADDTOSTORE:
942 FIXME("call CryptUIWizImport\n");
943 break;
944 case IDC_ISSUERSTATEMENT:
945 {
946 struct IssuerStatement *issuerStatement =
947 (struct IssuerStatement *)GetWindowLongPtrW(hwnd, DWLP_USER);
948
949 if (issuerStatement)
950 {
951 if (issuerStatement->userNotice)
952 show_user_notice(hwnd, issuerStatement);
953 else if (issuerStatement->cps)
954 {
955 IBindCtx *bctx = NULL;
956
957 CreateBindCtx(0, &bctx);
958 HlinkSimpleNavigateToString(issuerStatement->cps, NULL,
959 NULL, NULL, bctx, NULL, HLNF_OPENINNEWWINDOW, 0);
960 IBindCtx_Release(bctx);
961 }
962 }
963 break;
964 }
965 }
966 break;
967 }
968 return 0;
969 }
970
971 static UINT CALLBACK general_callback_proc(HWND hwnd, UINT msg,
972 PROPSHEETPAGEW *page)
973 {
974 struct IssuerStatement *issuerStatement;
975
976 switch (msg)
977 {
978 case PSPCB_RELEASE:
979 issuerStatement =
980 (struct IssuerStatement *)GetWindowLongPtrW(hwnd, DWLP_USER);
981 if (issuerStatement)
982 {
983 HeapFree(GetProcessHeap(), 0, issuerStatement->cps);
984 HeapFree(GetProcessHeap(), 0, issuerStatement->userNotice);
985 HeapFree(GetProcessHeap(), 0, issuerStatement);
986 }
987 break;
988 }
989 return 1;
990 }
991
992 static void init_general_page(PCCRYPTUI_VIEWCERTIFICATE_STRUCTW pCertViewInfo,
993 PROPSHEETPAGEW *page)
994 {
995 memset(page, 0, sizeof(PROPSHEETPAGEW));
996 page->dwSize = sizeof(PROPSHEETPAGEW);
997 page->dwFlags = PSP_USECALLBACK;
998 page->pfnCallback = general_callback_proc;
999 page->hInstance = hInstance;
1000 page->u.pszTemplate = MAKEINTRESOURCEW(IDD_GENERAL);
1001 page->pfnDlgProc = general_dlg_proc;
1002 page->lParam = (LPARAM)pCertViewInfo;
1003 }
1004
1005 typedef WCHAR * (*field_format_func)(PCCERT_CONTEXT cert);
1006
1007 static WCHAR *field_format_version(PCCERT_CONTEXT cert)
1008 {
1009 static const WCHAR fmt[] = { 'V','%','d',0 };
1010 WCHAR *buf = HeapAlloc(GetProcessHeap(), 0, 12 * sizeof(WCHAR));
1011
1012 if (buf)
1013 sprintfW(buf, fmt, cert->pCertInfo->dwVersion);
1014 return buf;
1015 }
1016
1017 static WCHAR *format_hex_string(void *pb, DWORD cb)
1018 {
1019 WCHAR *buf = HeapAlloc(GetProcessHeap(), 0, (cb * 3 + 1) * sizeof(WCHAR));
1020
1021 if (buf)
1022 {
1023 static const WCHAR fmt[] = { '%','0','2','x',' ',0 };
1024 DWORD i;
1025 WCHAR *ptr;
1026
1027 for (i = 0, ptr = buf; i < cb; i++, ptr += 3)
1028 sprintfW(ptr, fmt, ((BYTE *)pb)[i]);
1029 }
1030 return buf;
1031 }
1032
1033 static WCHAR *field_format_serial_number(PCCERT_CONTEXT cert)
1034 {
1035 return format_hex_string(cert->pCertInfo->SerialNumber.pbData,
1036 cert->pCertInfo->SerialNumber.cbData);
1037 }
1038
1039 static WCHAR *field_format_issuer(PCCERT_CONTEXT cert)
1040 {
1041 return get_cert_name_string(cert, CERT_NAME_SIMPLE_DISPLAY_TYPE,
1042 CERT_NAME_ISSUER_FLAG);
1043 }
1044
1045 static WCHAR *field_format_detailed_cert_name(PCERT_NAME_BLOB name)
1046 {
1047 WCHAR *str = NULL;
1048 DWORD len = CertNameToStrW(X509_ASN_ENCODING, name,
1049 CERT_X500_NAME_STR | CERT_NAME_STR_CRLF_FLAG, NULL, 0);
1050
1051 if (len)
1052 {
1053 str = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
1054 if (str)
1055 CertNameToStrW(X509_ASN_ENCODING, name,
1056 CERT_X500_NAME_STR | CERT_NAME_STR_CRLF_FLAG, str, len);
1057 }
1058 return str;
1059 }
1060
1061 static WCHAR *field_format_detailed_issuer(PCCERT_CONTEXT cert, void *param)
1062 {
1063 return field_format_detailed_cert_name(&cert->pCertInfo->Issuer);
1064 }
1065
1066 static WCHAR *field_format_subject(PCCERT_CONTEXT cert)
1067 {
1068 return get_cert_name_string(cert, CERT_NAME_SIMPLE_DISPLAY_TYPE, 0);
1069 }
1070
1071 static WCHAR *field_format_detailed_subject(PCCERT_CONTEXT cert, void *param)
1072 {
1073 return field_format_detailed_cert_name(&cert->pCertInfo->Subject);
1074 }
1075
1076 static WCHAR *format_long_date(const FILETIME *fileTime)
1077 {
1078 WCHAR dateFmt[80]; /* long enough for LOCALE_SLONGDATE */
1079 DWORD len;
1080 WCHAR *buf = NULL;
1081 SYSTEMTIME sysTime;
1082
1083 /* FIXME: format isn't quite right, want time too */
1084 GetLocaleInfoW(LOCALE_SYSTEM_DEFAULT, LOCALE_SLONGDATE, dateFmt,
1085 sizeof(dateFmt) / sizeof(dateFmt[0]));
1086 FileTimeToSystemTime(fileTime, &sysTime);
1087 len = GetDateFormatW(LOCALE_SYSTEM_DEFAULT, 0, &sysTime, dateFmt, NULL, 0);
1088 if (len)
1089 {
1090 buf = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
1091 if (buf)
1092 GetDateFormatW(LOCALE_SYSTEM_DEFAULT, 0, &sysTime, dateFmt, buf,
1093 len);
1094 }
1095 return buf;
1096 }
1097
1098 static WCHAR *field_format_from_date(PCCERT_CONTEXT cert)
1099 {
1100 return format_long_date(&cert->pCertInfo->NotBefore);
1101 }
1102
1103 static WCHAR *field_format_to_date(PCCERT_CONTEXT cert)
1104 {
1105 return format_long_date(&cert->pCertInfo->NotAfter);
1106 }
1107
1108 static WCHAR *field_format_public_key(PCCERT_CONTEXT cert)
1109 {
1110 PCCRYPT_OID_INFO oidInfo;
1111 WCHAR *buf = NULL;
1112
1113 oidInfo = CryptFindOIDInfo(CRYPT_OID_INFO_OID_KEY,
1114 cert->pCertInfo->SubjectPublicKeyInfo.Algorithm.pszObjId, 0);
1115 if (oidInfo)
1116 {
1117 WCHAR fmt[MAX_STRING_LEN];
1118
1119 if (LoadStringW(hInstance, IDS_FIELD_PUBLIC_KEY_FORMAT, fmt,
1120 sizeof(fmt) / sizeof(fmt[0])))
1121 {
1122 /* Allocate the output buffer. Use the number of bytes in the
1123 * public key as a conservative (high) estimate for the number of
1124 * digits in its output.
1125 * The output is of the form (in English)
1126 * "<public key algorithm> (<public key bit length> bits)".
1127 * Ordinarily having two positional parameters in a string is not a
1128 * good idea, but as this isn't a sentence fragment, it shouldn't
1129 * be word-order dependent.
1130 */
1131 buf = HeapAlloc(GetProcessHeap(), 0,
1132 (strlenW(fmt) + strlenW(oidInfo->pwszName) +
1133 cert->pCertInfo->SubjectPublicKeyInfo.PublicKey.cbData * 8)
1134 * sizeof(WCHAR));
1135 if (buf)
1136 sprintfW(buf, fmt, oidInfo->pwszName,
1137 CertGetPublicKeyLength(X509_ASN_ENCODING,
1138 &cert->pCertInfo->SubjectPublicKeyInfo));
1139 }
1140 }
1141 return buf;
1142 }
1143
1144 static WCHAR *field_format_detailed_public_key(PCCERT_CONTEXT cert, void *param)
1145 {
1146 return format_hex_string(
1147 cert->pCertInfo->SubjectPublicKeyInfo.PublicKey.pbData,
1148 cert->pCertInfo->SubjectPublicKeyInfo.PublicKey.cbData);
1149 }
1150
1151 struct field_value_data;
1152 struct detail_data
1153 {
1154 PCCRYPTUI_VIEWCERTIFICATE_STRUCTW pCertViewInfo;
1155 BOOL *pfPropertiesChanged;
1156 int cFields;
1157 struct field_value_data *fields;
1158 HIMAGELIST imageList;
1159 };
1160
1161 typedef void (*add_fields_func)(HWND hwnd, struct detail_data *data);
1162
1163 typedef WCHAR *(*create_detailed_value_func)(PCCERT_CONTEXT cert, void *param);
1164
1165 struct field_value_data
1166 {
1167 create_detailed_value_func create;
1168 LPWSTR detailed_value;
1169 void *param;
1170 };
1171
1172 static void add_field_value_data(struct detail_data *data,
1173 create_detailed_value_func create, void *param)
1174 {
1175 if (data->cFields)
1176 data->fields = HeapReAlloc(GetProcessHeap(), 0, data->fields,
1177 (data->cFields + 1) * sizeof(struct field_value_data));
1178 else
1179 data->fields = HeapAlloc(GetProcessHeap(), 0,
1180 sizeof(struct field_value_data));
1181 if (data->fields)
1182 {
1183 data->fields[data->cFields].create = create;
1184 data->fields[data->cFields].detailed_value = NULL;
1185 data->fields[data->cFields].param = param;
1186 data->cFields++;
1187 }
1188 }
1189
1190 static void add_field_and_value_to_list(HWND hwnd, struct detail_data *data,
1191 LPWSTR field, LPWSTR value, create_detailed_value_func create, void *param)
1192 {
1193 LVITEMW item;
1194 int iItem = SendMessageW(hwnd, LVM_GETITEMCOUNT, 0, 0);
1195
1196 item.mask = LVIF_TEXT | LVIF_PARAM;
1197 item.iItem = iItem;
1198 item.iSubItem = 0;
1199 item.pszText = field;
1200 item.lParam = (LPARAM)data;
1201 SendMessageW(hwnd, LVM_INSERTITEMW, 0, (LPARAM)&item);
1202 if (value)
1203 {
1204 item.pszText = value;
1205 item.iSubItem = 1;
1206 SendMessageW(hwnd, LVM_SETITEMTEXTW, iItem, (LPARAM)&item);
1207 }
1208 add_field_value_data(data, create, param);
1209 }
1210
1211 static void add_string_id_and_value_to_list(HWND hwnd, struct detail_data *data,
1212 int id, LPWSTR value, create_detailed_value_func create, void *param)
1213 {
1214 WCHAR buf[MAX_STRING_LEN];
1215
1216 LoadStringW(hInstance, id, buf, sizeof(buf) / sizeof(buf[0]));
1217 add_field_and_value_to_list(hwnd, data, buf, value, create, param);
1218 }
1219
1220 struct v1_field
1221 {
1222 int id;
1223 field_format_func format;
1224 create_detailed_value_func create_detailed_value;
1225 };
1226
1227 static void add_v1_field(HWND hwnd, struct detail_data *data,
1228 const struct v1_field *field)
1229 {
1230 WCHAR *val = field->format(data->pCertViewInfo->pCertContext);
1231
1232 if (val)
1233 {
1234 add_string_id_and_value_to_list(hwnd, data, field->id, val,
1235 field->create_detailed_value, NULL);
1236 HeapFree(GetProcessHeap(), 0, val);
1237 }
1238 }
1239
1240 static const struct v1_field v1_fields[] = {
1241 { IDS_FIELD_VERSION, field_format_version, NULL },
1242 { IDS_FIELD_SERIAL_NUMBER, field_format_serial_number, NULL },
1243 { IDS_FIELD_ISSUER, field_format_issuer, field_format_detailed_issuer },
1244 { IDS_FIELD_VALID_FROM, field_format_from_date, NULL },
1245 { IDS_FIELD_VALID_TO, field_format_to_date, NULL },
1246 { IDS_FIELD_SUBJECT, field_format_subject, field_format_detailed_subject },
1247 { IDS_FIELD_PUBLIC_KEY, field_format_public_key,
1248 field_format_detailed_public_key }
1249 };
1250
1251 static void add_v1_fields(HWND hwnd, struct detail_data *data)
1252 {
1253 int i;
1254 PCCERT_CONTEXT cert = data->pCertViewInfo->pCertContext;
1255
1256 /* The last item in v1_fields is the public key, which is not in the loop
1257 * because it's a special case.
1258 */
1259 for (i = 0; i < sizeof(v1_fields) / sizeof(v1_fields[0]) - 1; i++)
1260 add_v1_field(hwnd, data, &v1_fields[i]);
1261 if (cert->pCertInfo->SubjectPublicKeyInfo.PublicKey.cbData)
1262 add_v1_field(hwnd, data, &v1_fields[i]);
1263 }
1264
1265 static WCHAR *crypt_format_extension(PCERT_EXTENSION ext, DWORD formatStrType)
1266 {
1267 WCHAR *str = NULL;
1268 DWORD size;
1269
1270 if (CryptFormatObject(X509_ASN_ENCODING, 0, formatStrType, NULL,
1271 ext->pszObjId, ext->Value.pbData, ext->Value.cbData, NULL, &size))
1272 {
1273 str = HeapAlloc(GetProcessHeap(), 0, size);
1274 CryptFormatObject(X509_ASN_ENCODING, 0, formatStrType, NULL,
1275 ext->pszObjId, ext->Value.pbData, ext->Value.cbData, str, &size);
1276 }
1277 return str;
1278 }
1279
1280 static WCHAR *field_format_extension_hex_with_ascii(PCERT_EXTENSION ext)
1281 {
1282 WCHAR *str = NULL;
1283
1284 if (ext->Value.cbData)
1285 {
1286 /* The output is formatted as:
1287 * <hex bytes> <ascii bytes>\n
1288 * where <hex bytes> is a string of up to 8 bytes, output as %02x,
1289 * and <ascii bytes> is the ASCII equivalent of each byte, or '.' if
1290 * the byte is not printable.
1291 * So, for example, the extension value consisting of the following
1292 * bytes:
1293 * 0x30,0x14,0x31,0x12,0x30,0x10,0x06,0x03,0x55,0x04,0x03,
1294 * 0x13,0x09,0x4a,0x75,0x61,0x6e,0x20,0x4c,0x61,0x6e,0x67
1295 * is output as:
1296 * 30 14 31 12 30 10 06 03 0.1.0...
1297 * 55 04 03 13 09 4a 75 61 U....Jua
1298 * 6e 20 4c 61 6e 67 n Lang
1299 * The allocation size therefore requires:
1300 * - 4 characters per character in an 8-byte line
1301 * (2 for the hex format, one for the space, one for the ASCII value)
1302 * - 3 more characters per 8-byte line (two spaces and a newline)
1303 * - 1 character for the terminating nul
1304 * FIXME: should use a fixed-width font for this
1305 */
1306 DWORD lines = (ext->Value.cbData + 7) / 8;
1307
1308 str = HeapAlloc(GetProcessHeap(), 0,
1309 (lines * 8 * 4 + lines * 3 + 1) * sizeof(WCHAR));
1310 if (str)
1311 {
1312 static const WCHAR fmt[] = { '%','0','2','x',' ',0 };
1313 DWORD i, j;
1314 WCHAR *ptr;
1315
1316 for (i = 0, ptr = str; i < ext->Value.cbData; i += 8)
1317 {
1318 /* Output as hex bytes first */
1319 for (j = i; j < min(i + 8, ext->Value.cbData); j++, ptr += 3)
1320 sprintfW(ptr, fmt, ext->Value.pbData[j]);
1321 /* Pad the hex output with spaces for alignment */
1322 if (j == ext->Value.cbData && j % 8)
1323 {
1324 static const WCHAR pad[] = { ' ',' ',' ' };
1325
1326 for (; j % 8; j++, ptr += sizeof(pad) / sizeof(pad[0]))
1327 memcpy(ptr, pad, sizeof(pad));
1328 }
1329 /* The last sprintfW included a space, so just insert one
1330 * more space between the hex bytes and the ASCII output
1331 */
1332 *ptr++ = ' ';
1333 /* Output as ASCII bytes */
1334 for (j = i; j < min(i + 8, ext->Value.cbData); j++, ptr++)
1335 {
1336 if (isprintW(ext->Value.pbData[j]) &&
1337 !isspaceW(ext->Value.pbData[j]))
1338 *ptr = ext->Value.pbData[j];
1339 else
1340 *ptr = '.';
1341 }
1342 *ptr++ = '\n';
1343 }
1344 *ptr++ = '\0';
1345 }
1346 }
1347 return str;
1348 }
1349
1350 static WCHAR *field_format_detailed_extension(PCCERT_CONTEXT cert, void *param)
1351 {
1352 PCERT_EXTENSION ext = param;
1353 LPWSTR str = crypt_format_extension(ext,
1354 CRYPT_FORMAT_STR_MULTI_LINE | CRYPT_FORMAT_STR_NO_HEX);
1355
1356 if (!str)
1357 str = field_format_extension_hex_with_ascii(ext);
1358 return str;
1359 }
1360
1361 static void add_cert_extension_detail(HWND hwnd, struct detail_data *data,
1362 PCERT_EXTENSION ext)
1363 {
1364 PCCRYPT_OID_INFO oidInfo = CryptFindOIDInfo(CRYPT_OID_INFO_OID_KEY,
1365 ext->pszObjId, 0);
1366 LPWSTR val = crypt_format_extension(ext, 0);
1367
1368 if (oidInfo)
1369 add_field_and_value_to_list(hwnd, data, (LPWSTR)oidInfo->pwszName,
1370 val, field_format_detailed_extension, ext);
1371 else
1372 {
1373 DWORD len = strlen(ext->pszObjId);
1374 LPWSTR oidW = HeapAlloc(GetProcessHeap(), 0, (len + 1) * sizeof(WCHAR));
1375
1376 if (oidW)
1377 {
1378 DWORD i;
1379
1380 for (i = 0; i <= len; i++)
1381 oidW[i] = ext->pszObjId[i];
1382 add_field_and_value_to_list(hwnd, data, oidW, val,
1383 field_format_detailed_extension, ext);
1384 HeapFree(GetProcessHeap(), 0, oidW);
1385 }
1386 }
1387 HeapFree(GetProcessHeap(), 0, val);
1388 }
1389
1390 static void add_all_extensions(HWND hwnd, struct detail_data *data)
1391 {
1392 DWORD i;
1393 PCCERT_CONTEXT cert = data->pCertViewInfo->pCertContext;
1394
1395 for (i = 0; i < cert->pCertInfo->cExtension; i++)
1396 add_cert_extension_detail(hwnd, data, &cert->pCertInfo->rgExtension[i]);
1397 }
1398
1399 static void add_critical_extensions(HWND hwnd, struct detail_data *data)
1400 {
1401 DWORD i;
1402 PCCERT_CONTEXT cert = data->pCertViewInfo->pCertContext;
1403
1404 for (i = 0; i < cert->pCertInfo->cExtension; i++)
1405 if (cert->pCertInfo->rgExtension[i].fCritical)
1406 add_cert_extension_detail(hwnd, data,
1407 &cert->pCertInfo->rgExtension[i]);
1408 }
1409
1410 typedef WCHAR * (*prop_to_value_func)(void *pb, DWORD cb);
1411
1412 struct prop_id_to_string_id
1413 {
1414 DWORD prop;
1415 int id;
1416 BOOL prop_is_string;
1417 prop_to_value_func prop_to_value;
1418 };
1419
1420 static WCHAR *format_enhanced_key_usage_value(void *pb, DWORD cb)
1421 {
1422 CERT_EXTENSION ext;
1423
1424 ext.pszObjId = (LPSTR)X509_ENHANCED_KEY_USAGE;
1425 ext.fCritical = FALSE;
1426 ext.Value.pbData = pb;
1427 ext.Value.cbData = cb;
1428 return crypt_format_extension(&ext, 0);
1429 }
1430
1431 /* Logically the access state should also be checked, and IDC_EDITPROPERTIES
1432 * disabled for read-only certificates, but native doesn't appear to do that.
1433 */
1434 static const struct prop_id_to_string_id prop_id_map[] = {
1435 { CERT_HASH_PROP_ID, IDS_PROP_HASH, FALSE, format_hex_string },
1436 { CERT_FRIENDLY_NAME_PROP_ID, IDS_PROP_FRIENDLY_NAME, TRUE, NULL },
1437 { CERT_DESCRIPTION_PROP_ID, IDS_PROP_DESCRIPTION, TRUE, NULL },
1438 { CERT_ENHKEY_USAGE_PROP_ID, IDS_PROP_ENHKEY_USAGE, FALSE,
1439 format_enhanced_key_usage_value },
1440 };
1441
1442 static void add_properties(HWND hwnd, struct detail_data *data)
1443 {
1444 DWORD i;
1445 PCCERT_CONTEXT cert = data->pCertViewInfo->pCertContext;
1446
1447 for (i = 0; i < sizeof(prop_id_map) / sizeof(prop_id_map[0]); i++)
1448 {
1449 DWORD cb;
1450
1451 if (CertGetCertificateContextProperty(cert, prop_id_map[i].prop, NULL,
1452 &cb))
1453 {
1454 BYTE *pb;
1455 WCHAR *val = NULL;
1456
1457 /* FIXME: MS adds a separate value for the signature hash
1458 * algorithm.
1459 */
1460 pb = HeapAlloc(GetProcessHeap(), 0, cb);
1461 if (pb)
1462 {
1463 if (CertGetCertificateContextProperty(cert,
1464 prop_id_map[i].prop, pb, &cb))
1465 {
1466 if (prop_id_map[i].prop_is_string)
1467 {
1468 val = (LPWSTR)pb;
1469 /* Don't double-free pb */
1470 pb = NULL;
1471 }
1472 else
1473 val = prop_id_map[i].prop_to_value(pb, cb);
1474 }
1475 HeapFree(GetProcessHeap(), 0, pb);
1476 }
1477 add_string_id_and_value_to_list(hwnd, data, prop_id_map[i].id, val,
1478 NULL, NULL);
1479 }
1480 }
1481 }
1482
1483 static void add_all_fields(HWND hwnd, struct detail_data *data)
1484 {
1485 add_v1_fields(hwnd, data);
1486 add_all_extensions(hwnd, data);
1487 add_properties(hwnd, data);
1488 }
1489
1490 struct selection_list_item
1491 {
1492 int id;
1493 add_fields_func add;
1494 };
1495
1496 const struct selection_list_item listItems[] = {
1497 { IDS_FIELDS_ALL, add_all_fields },
1498 { IDS_FIELDS_V1, add_v1_fields },
1499 { IDS_FIELDS_EXTENSIONS, add_all_extensions },
1500 { IDS_FIELDS_CRITICAL_EXTENSIONS, add_critical_extensions },
1501 { IDS_FIELDS_PROPERTIES, add_properties },
1502 };
1503
1504 static void create_show_list(HWND hwnd, struct detail_data *data)
1505 {
1506 HWND cb = GetDlgItem(hwnd, IDC_DETAIL_SELECT);
1507 WCHAR buf[MAX_STRING_LEN];
1508 int i;
1509
1510 for (i = 0; i < sizeof(listItems) / sizeof(listItems[0]); i++)
1511 {
1512 int index;
1513
1514 LoadStringW(hInstance, listItems[i].id, buf,
1515 sizeof(buf) / sizeof(buf[0]));
1516 index = SendMessageW(cb, CB_INSERTSTRING, -1, (LPARAM)buf);
1517 SendMessageW(cb, CB_SETITEMDATA, index, (LPARAM)data);
1518 }
1519 SendMessageW(cb, CB_SETCURSEL, 0, 0);
1520 }
1521
1522 static void create_listview_columns(HWND hwnd)
1523 {
1524 HWND lv = GetDlgItem(hwnd, IDC_DETAIL_LIST);
1525 RECT rc;
1526 WCHAR buf[MAX_STRING_LEN];
1527 LVCOLUMNW column;
1528
1529 SendMessageW(lv, LVM_SETEXTENDEDLISTVIEWSTYLE, 0, LVS_EX_FULLROWSELECT);
1530 GetWindowRect(lv, &rc);
1531 LoadStringW(hInstance, IDS_FIELD, buf, sizeof(buf) / sizeof(buf[0]));
1532 column.mask = LVCF_WIDTH | LVCF_TEXT;
1533 column.cx = (rc.right - rc.left) / 2 - 2;
1534 column.pszText = buf;
1535 SendMessageW(lv, LVM_INSERTCOLUMNW, 0, (LPARAM)&column);
1536 LoadStringW(hInstance, IDS_VALUE, buf, sizeof(buf) / sizeof(buf[0]));
1537 SendMessageW(lv, LVM_INSERTCOLUMNW, 1, (LPARAM)&column);
1538 }
1539
1540 static void set_fields_selection(HWND hwnd, struct detail_data *data, int sel)
1541 {
1542 HWND list = GetDlgItem(hwnd, IDC_DETAIL_LIST);
1543
1544 if (sel >= 0 && sel < sizeof(listItems) / sizeof(listItems[0]))
1545 {
1546 SendMessageW(list, LVM_DELETEALLITEMS, 0, 0);
1547 listItems[sel].add(list, data);
1548 }
1549 }
1550
1551 static void create_cert_details_list(HWND hwnd, struct detail_data *data)
1552 {
1553 create_show_list(hwnd, data);
1554 create_listview_columns(hwnd);
1555 set_fields_selection(hwnd, data, 0);
1556 }
1557
1558 typedef enum {
1559 CheckBitmapIndexUnchecked = 1,
1560 CheckBitmapIndexChecked = 2,
1561 CheckBitmapIndexDisabledUnchecked = 3,
1562 CheckBitmapIndexDisabledChecked = 4
1563 } CheckBitmapIndex;
1564
1565 static void add_purpose(HWND hwnd, LPCSTR oid)
1566 {
1567 HWND lv = GetDlgItem(hwnd, IDC_CERTIFICATE_USAGES);
1568 PCRYPT_OID_INFO info = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
1569 sizeof(CRYPT_OID_INFO));
1570
1571 if (info)
1572 {
1573 char *oidCopy = HeapAlloc(GetProcessHeap(), 0, strlen(oid) + 1);
1574
1575 if (oidCopy)
1576 {
1577 LVITEMA item;
1578
1579 strcpy(oidCopy, oid);
1580 info->cbSize = sizeof(CRYPT_OID_INFO);
1581 info->pszOID = oidCopy;
1582 item.mask = LVIF_TEXT | LVIF_STATE | LVIF_PARAM;
1583 item.state = INDEXTOSTATEIMAGEMASK(CheckBitmapIndexChecked);
1584 item.stateMask = LVIS_STATEIMAGEMASK;
1585 item.iItem = SendMessageW(lv, LVM_GETITEMCOUNT, 0, 0);
1586 item.iSubItem = 0;
1587 item.lParam = (LPARAM)info;
1588 item.pszText = oidCopy;
1589 SendMessageA(lv, LVM_INSERTITEMA, 0, (LPARAM)&item);
1590 }
1591 else
1592 HeapFree(GetProcessHeap(), 0, info);
1593 }
1594 }
1595
1596 static WCHAR *get_cert_property_as_string(PCCERT_CONTEXT cert, DWORD prop)
1597 {
1598 WCHAR *name = NULL;
1599 DWORD cb;
1600
1601 if (CertGetCertificateContextProperty(cert, prop, NULL, &cb))
1602 {
1603 name = HeapAlloc(GetProcessHeap(), 0, cb);
1604 if (name)
1605 {
1606 if (!CertGetCertificateContextProperty(cert, prop, (LPBYTE)name,
1607 &cb))
1608 {
1609 HeapFree(GetProcessHeap(), 0, name);
1610 name = NULL;
1611 }
1612 }
1613 }
1614 return name;
1615 }
1616
1617 static void redraw_states(HWND list, BOOL enabled)
1618 {
1619 int items = SendMessageW(list, LVM_GETITEMCOUNT, 0, 0), i;
1620
1621 for (i = 0; i < items; i++)
1622 {
1623 BOOL change = FALSE;
1624 int state;
1625
1626 state = SendMessageW(list, LVM_GETITEMSTATE, i, LVIS_STATEIMAGEMASK);
1627 /* This reverses the INDEXTOSTATEIMAGEMASK shift. There doesn't appear
1628 * to be a handy macro for it.
1629 */
1630 state >>= 12;
1631 if (enabled)
1632 {
1633 if (state == CheckBitmapIndexDisabledChecked)
1634 {
1635 state = CheckBitmapIndexChecked;
1636 change = TRUE;
1637 }
1638 if (state == CheckBitmapIndexDisabledUnchecked)
1639 {
1640 state = CheckBitmapIndexUnchecked;
1641 change = TRUE;
1642 }
1643 }
1644 else
1645 {
1646 if (state == CheckBitmapIndexChecked)
1647 {
1648 state = CheckBitmapIndexDisabledChecked;
1649 change = TRUE;
1650 }
1651 if (state == CheckBitmapIndexUnchecked)
1652 {
1653 state = CheckBitmapIndexDisabledUnchecked;
1654 change = TRUE;
1655 }
1656 }
1657 if (change)
1658 {
1659 LVITEMW item;
1660
1661 item.state = INDEXTOSTATEIMAGEMASK(state);
1662 item.stateMask = LVIS_STATEIMAGEMASK;
1663 SendMessageW(list, LVM_SETITEMSTATE, i, (LPARAM)&item);
1664 }
1665 }
1666 }
1667
1668 extern BOOL WINAPI WTHelperGetKnownUsages(DWORD action,
1669 PCCRYPT_OID_INFO **usages);
1670
1671 static void add_known_usage(HWND lv, PCCRYPT_OID_INFO info)
1672 {
1673 LVITEMW item;
1674
1675 item.mask = LVIF_TEXT | LVIF_STATE | LVIF_PARAM;
1676 item.state = INDEXTOSTATEIMAGEMASK(CheckBitmapIndexDisabledChecked);
1677 item.stateMask = LVIS_STATEIMAGEMASK;
1678 item.iItem = SendMessageW(lv, LVM_GETITEMCOUNT, 0, 0);
1679 item.iSubItem = 0;
1680 item.lParam = (LPARAM)info;
1681 item.pszText = (LPWSTR)info->pwszName;
1682 SendMessageW(lv, LVM_INSERTITEMW, 0, (LPARAM)&item);
1683 }
1684
1685 static void show_cert_usages(HWND hwnd, struct detail_data *data)
1686 {
1687 PCCERT_CONTEXT cert = data->pCertViewInfo->pCertContext;
1688 HWND lv = GetDlgItem(hwnd, IDC_CERTIFICATE_USAGES);
1689 PCERT_ENHKEY_USAGE usage;
1690 DWORD size;
1691 PCCRYPT_OID_INFO *usages;
1692 RECT rc;
1693 LVCOLUMNW column;
1694
1695 GetWindowRect(lv, &rc);
1696 column.mask = LVCF_WIDTH;
1697 column.cx = rc.right - rc.left;
1698 SendMessageW(lv, LVM_INSERTCOLUMNW, 0, (LPARAM)&column);
1699 SendMessageW(lv, LVM_SETIMAGELIST, LVSIL_STATE, (LPARAM)data->imageList);
1700
1701 /* Get enhanced key usage. Have to check for a property and an extension
1702 * separately, because CertGetEnhancedKeyUsage will succeed and return an
1703 * empty usage if neither is set. Unfortunately an empty usage implies
1704 * no usage is allowed, so we have to distinguish between the two cases.
1705 */
1706 if (CertGetEnhancedKeyUsage(cert, CERT_FIND_PROP_ONLY_ENHKEY_USAGE_FLAG,
1707 NULL, &size))
1708 {
1709 usage = HeapAlloc(GetProcessHeap(), 0, size);
1710 if (!CertGetEnhancedKeyUsage(cert,
1711 CERT_FIND_PROP_ONLY_ENHKEY_USAGE_FLAG, usage, &size))
1712 {
1713 HeapFree(GetProcessHeap(), 0, usage);
1714 usage = NULL;
1715 }
1716 }
1717 else if (CertGetEnhancedKeyUsage(cert, CERT_FIND_EXT_ONLY_ENHKEY_USAGE_FLAG,
1718 NULL, &size))
1719 {
1720 usage = HeapAlloc(GetProcessHeap(), 0, size);
1721 if (!CertGetEnhancedKeyUsage(cert,
1722 CERT_FIND_EXT_ONLY_ENHKEY_USAGE_FLAG, usage, &size))
1723 {
1724 HeapFree(GetProcessHeap(), 0, usage);
1725 usage = NULL;
1726 }
1727 }
1728 else
1729 usage = NULL;
1730 if (usage)
1731 {
1732 DWORD i;
1733
1734 for (i = 0; i < usage->cUsageIdentifier; i++)
1735 {
1736 PCCRYPT_OID_INFO info = CryptFindOIDInfo(CRYPT_OID_INFO_OID_KEY,
1737 usage->rgpszUsageIdentifier[i], CRYPT_ENHKEY_USAGE_OID_GROUP_ID);
1738
1739 if (info)
1740 add_known_usage(lv, info);
1741 else
1742 add_purpose(hwnd, usage->rgpszUsageIdentifier[i]);
1743 }
1744 HeapFree(GetProcessHeap(), 0, usage);
1745 }
1746 else
1747 {
1748 if (WTHelperGetKnownUsages(1, &usages))
1749 {
1750 PCCRYPT_OID_INFO *ptr;
1751
1752 for (ptr = usages; *ptr; ptr++)
1753 add_known_usage(lv, *ptr);
1754 WTHelperGetKnownUsages(2, &usages);
1755 }
1756 }
1757 EnableWindow(lv, FALSE);
1758 redraw_states(lv, FALSE);
1759 }
1760
1761 static void set_general_cert_properties(HWND hwnd, struct detail_data *data)
1762 {
1763 PCCERT_CONTEXT cert = data->pCertViewInfo->pCertContext;
1764 WCHAR *str;
1765
1766 if ((str = get_cert_property_as_string(cert, CERT_FRIENDLY_NAME_PROP_ID)))
1767 {
1768 SendMessageW(GetDlgItem(hwnd, IDC_FRIENDLY_NAME), WM_SETTEXT, 0,
1769 (LPARAM)str);
1770 HeapFree(GetProcessHeap(), 0, str);
1771 }
1772 if ((str = get_cert_property_as_string(cert, CERT_DESCRIPTION_PROP_ID)))
1773 {
1774 SendMessageW(GetDlgItem(hwnd, IDC_DESCRIPTION), WM_SETTEXT, 0,
1775 (LPARAM)str);
1776 HeapFree(GetProcessHeap(), 0, str);
1777 }
1778 show_cert_usages(hwnd, data);
1779 EnableWindow(GetDlgItem(hwnd, IDC_ADD_PURPOSE), FALSE);
1780 SendMessageW(GetDlgItem(hwnd, IDC_ENABLE_ALL_PURPOSES), BM_CLICK, 0, 0);
1781 }
1782
1783 #define MAX_FRIENDLY_NAME 40
1784 #define MAX_DESCRIPTION 255
1785
1786 static LRESULT CALLBACK cert_properties_general_dlg_proc(HWND hwnd, UINT msg,
1787 WPARAM wp, LPARAM lp)
1788 {
1789 PROPSHEETPAGEW *page;
1790 struct detail_data *data;
1791
1792 TRACE("(%p, %08x, %08lx, %08lx)\n", hwnd, msg, wp, lp);
1793
1794 switch (msg)
1795 {
1796 case WM_INITDIALOG:
1797 {
1798 HWND description = GetDlgItem(hwnd, IDC_DESCRIPTION);
1799
1800 page = (PROPSHEETPAGEW *)lp;
1801 data = (struct detail_data *)page->lParam;
1802 SendMessageW(GetDlgItem(hwnd, IDC_FRIENDLY_NAME), EM_SETLIMITTEXT,
1803 MAX_FRIENDLY_NAME, 0);
1804 SendMessageW(description, EM_SETLIMITTEXT, MAX_DESCRIPTION, 0);
1805 ShowScrollBar(description, SB_VERT, FALSE);
1806 set_general_cert_properties(hwnd, data);
1807 SetWindowLongPtrW(hwnd, DWLP_USER, (LPARAM)data);
1808 break;
1809 }
1810 case WM_COMMAND:
1811 switch (HIWORD(wp))
1812 {
1813 case EN_CHANGE:
1814 SendMessageW(GetParent(hwnd), PSM_CHANGED, (WPARAM)hwnd, 0);
1815 if (LOWORD(wp) == IDC_DESCRIPTION)
1816 {
1817 /* Show/hide scroll bar on description depending on how much
1818 * text it has.
1819 */
1820 HWND description = GetDlgItem(hwnd, IDC_DESCRIPTION);
1821 int lines = SendMessageW(description, EM_GETLINECOUNT, 0, 0);
1822
1823 ShowScrollBar(description, SB_VERT, lines > 1);
1824 }
1825 break;
1826 }
1827 break;
1828 }
1829 return 0;
1830 }
1831
1832 static UINT CALLBACK cert_properties_general_callback(HWND hwnd, UINT msg,
1833 PROPSHEETPAGEW *page)
1834 {
1835 HWND lv;
1836 int cItem, i;
1837
1838 switch (msg)
1839 {
1840 case PSPCB_RELEASE:
1841 lv = GetDlgItem(hwnd, IDC_CERTIFICATE_USAGES);
1842 cItem = SendMessageW(lv, LVM_GETITEMCOUNT, 0, 0);
1843 for (i = 0; i < cItem; i++)
1844 {
1845 LVITEMW item;
1846
1847 item.mask = LVIF_PARAM;
1848 item.iItem = i;
1849 item.iSubItem = 0;
1850 if (SendMessageW(lv, LVM_GETITEMW, 0, (LPARAM)&item) && item.lParam)
1851 {
1852 PCRYPT_OID_INFO info = (PCRYPT_OID_INFO)item.lParam;
1853
1854 if (info->cbSize == sizeof(CRYPT_OID_INFO) && !info->dwGroupId)
1855 {
1856 HeapFree(GetProcessHeap(), 0, (LPSTR)info->pszOID);
1857 HeapFree(GetProcessHeap(), 0, info);
1858 }
1859 }
1860 }
1861 break;
1862 }
1863 return 1;
1864 }
1865
1866 static void show_edit_cert_properties_dialog(HWND parent,
1867 struct detail_data *data)
1868 {
1869 PROPSHEETHEADERW hdr;
1870 PROPSHEETPAGEW page; /* FIXME: need to add a cross-certificate page */
1871
1872 TRACE("(%p)\n", data);
1873
1874 memset(&page, 0, sizeof(PROPSHEETPAGEW));
1875 page.dwSize = sizeof(page);
1876 page.dwFlags = PSP_USECALLBACK;
1877 page.pfnCallback = cert_properties_general_callback;
1878 page.hInstance = hInstance;
1879 page.u.pszTemplate = MAKEINTRESOURCEW(IDD_CERT_PROPERTIES_GENERAL);
1880 page.pfnDlgProc = cert_properties_general_dlg_proc;
1881 page.lParam = (LPARAM)data;
1882
1883 memset(&hdr, 0, sizeof(hdr));
1884 hdr.dwSize = sizeof(hdr);
1885 hdr.hwndParent = parent;
1886 hdr.dwFlags = PSH_PROPSHEETPAGE;
1887 hdr.hInstance = hInstance;
1888 hdr.pszCaption = MAKEINTRESOURCEW(IDS_CERTIFICATE_PROPERTIES);
1889 hdr.u3.ppsp = &page;
1890 hdr.nPages = 1;
1891 PropertySheetW(&hdr);
1892 }
1893
1894 static void free_detail_fields(struct detail_data *data)
1895 {
1896 DWORD i;
1897
1898 for (i = 0; i < data->cFields; i++)
1899 HeapFree(GetProcessHeap(), 0, data->fields[i].detailed_value);
1900 HeapFree(GetProcessHeap(), 0, data->fields);
1901 data->fields = NULL;
1902 data->cFields = 0;
1903 }
1904
1905 static void refresh_details_view(HWND hwnd)
1906 {
1907 HWND cb = GetDlgItem(hwnd, IDC_DETAIL_SELECT);
1908 int curSel;
1909 struct detail_data *data;
1910
1911 curSel = SendMessageW(cb, CB_GETCURSEL, 0, 0);
1912 /* Actually, any index will do, since they all store the same data value */
1913 data = (struct detail_data *)SendMessageW(cb, CB_GETITEMDATA, curSel, 0);
1914 free_detail_fields(data);
1915 set_fields_selection(hwnd, data, curSel);
1916 }
1917
1918 static LRESULT CALLBACK detail_dlg_proc(HWND hwnd, UINT msg, WPARAM wp,
1919 LPARAM lp)
1920 {
1921 PROPSHEETPAGEW *page;
1922 struct detail_data *data;
1923
1924 TRACE("(%p, %08x, %08lx, %08lx)\n", hwnd, msg, wp, lp);
1925
1926 switch (msg)
1927 {
1928 case WM_INITDIALOG:
1929 page = (PROPSHEETPAGEW *)lp;
1930 data = (struct detail_data *)page->lParam;
1931 create_cert_details_list(hwnd, data);
1932 if (!(data->pCertViewInfo->dwFlags & CRYPTUI_ENABLE_EDITPROPERTIES))
1933 EnableWindow(GetDlgItem(hwnd, IDC_EDITPROPERTIES), FALSE);
1934 if (data->pCertViewInfo->dwFlags & CRYPTUI_DISABLE_EXPORT)
1935 EnableWindow(GetDlgItem(hwnd, IDC_EXPORT), FALSE);
1936 break;
1937 case WM_NOTIFY:
1938 {
1939 NMITEMACTIVATE *nm;
1940 HWND list = GetDlgItem(hwnd, IDC_DETAIL_LIST);
1941
1942 nm = (NMITEMACTIVATE*)lp;
1943 if (nm->hdr.hwndFrom == list && nm->uNewState & LVN_ITEMACTIVATE
1944 && nm->hdr.code == LVN_ITEMCHANGED)
1945 {
1946 data = (struct detail_data *)nm->lParam;
1947 if (nm->iItem >= 0 && data && nm->iItem < data->cFields)
1948 {
1949 WCHAR buf[MAX_STRING_LEN], *val = NULL;
1950 HWND valueCtl = GetDlgItem(hwnd, IDC_DETAIL_VALUE);
1951
1952 if (data->fields[nm->iItem].create)
1953 val = data->fields[nm->iItem].create(
1954 data->pCertViewInfo->pCertContext,
1955 data->fields[nm->iItem].param);
1956 else
1957 {
1958 LVITEMW item;
1959 int res;
1960
1961 item.cchTextMax = sizeof(buf) / sizeof(buf[0]);
1962 item.mask = LVIF_TEXT;
1963 item.pszText = buf;
1964 item.iItem = nm->iItem;
1965 item.iSubItem = 1;
1966 res = SendMessageW(list, LVM_GETITEMW, 0, (LPARAM)&item);
1967 if (res)
1968 val = buf;
1969 }
1970 /* Select all the text in the control, the next update will
1971 * replace it
1972 */
1973 SendMessageW(valueCtl, EM_SETSEL, 0, -1);
1974 add_unformatted_text_to_control(valueCtl, val,
1975 val ? strlenW(val) : 0);
1976 if (val != buf)
1977 HeapFree(GetProcessHeap(), 0, val);
1978 }
1979 }
1980 break;
1981 }
1982 case WM_COMMAND:
1983 switch (wp)
1984 {
1985 case IDC_EXPORT:
1986 FIXME("call CryptUIWizExport\n");
1987 break;
1988 case IDC_EDITPROPERTIES:
1989 {
1990 HWND cb = GetDlgItem(hwnd, IDC_DETAIL_SELECT);
1991 int curSel;
1992
1993 curSel = SendMessageW(cb, CB_GETCURSEL, 0, 0);
1994 /* Actually, any index will do, since they all store the same
1995 * data value
1996 */
1997 data = (struct detail_data *)SendMessageW(cb, CB_GETITEMDATA,
1998 curSel, 0);
1999 show_edit_cert_properties_dialog(GetParent(hwnd), data);
2000 break;
2001 }
2002 case ((CBN_SELCHANGE << 16) | IDC_DETAIL_SELECT):
2003 refresh_details_view(hwnd);
2004 break;
2005 }
2006 break;
2007 }
2008 return 0;
2009 }
2010
2011 static UINT CALLBACK detail_callback(HWND hwnd, UINT msg,
2012 PROPSHEETPAGEW *page)
2013 {
2014 struct detail_data *data;
2015
2016 switch (msg)
2017 {
2018 case PSPCB_RELEASE:
2019 data = (struct detail_data *)page->lParam;
2020 free_detail_fields(data);
2021 ImageList_Destroy(data->imageList);
2022 HeapFree(GetProcessHeap(), 0, data);
2023 break;
2024 }
2025 return 0;
2026 }
2027
2028 static BOOL init_detail_page(PCCRYPTUI_VIEWCERTIFICATE_STRUCTW pCertViewInfo,
2029 BOOL *pfPropertiesChanged, PROPSHEETPAGEW *page)
2030 {
2031 BOOL ret;
2032 struct detail_data *data = HeapAlloc(GetProcessHeap(), 0,
2033 sizeof(struct detail_data));
2034
2035 if (data)
2036 {
2037 data->pCertViewInfo = pCertViewInfo;
2038 data->pfPropertiesChanged = pfPropertiesChanged;
2039 data->cFields = 0;
2040 data->fields = NULL;
2041 data->imageList = ImageList_Create(16, 16, ILC_COLOR4 | ILC_MASK, 4, 0);
2042 if (data->imageList)
2043 {
2044 HBITMAP bmp;
2045 COLORREF backColor = RGB(255, 0, 255);
2046
2047 bmp = LoadBitmapW(hInstance, MAKEINTRESOURCEW(IDB_CHECKS));
2048 ImageList_AddMasked(data->imageList, bmp, backColor);
2049 DeleteObject(bmp);
2050 ImageList_SetBkColor(data->imageList, CLR_NONE);
2051 }
2052 memset(page, 0, sizeof(PROPSHEETPAGEW));
2053 page->dwSize = sizeof(PROPSHEETPAGEW);
2054 page->dwFlags = PSP_USECALLBACK;
2055 page->pfnCallback = detail_callback;
2056 page->hInstance = hInstance;
2057 page->u.pszTemplate = MAKEINTRESOURCEW(IDD_DETAIL);
2058 page->pfnDlgProc = detail_dlg_proc;
2059 page->lParam = (LPARAM)data;
2060 ret = TRUE;
2061 }
2062 else
2063 ret = FALSE;
2064 return ret;
2065 }
2066
2067 struct hierarchy_data
2068 {
2069 PCCRYPTUI_VIEWCERTIFICATE_STRUCTW pCertViewInfo;
2070 HIMAGELIST imageList;
2071 DWORD selectedCert;
2072 };
2073
2074 static LPARAM index_to_lparam(struct hierarchy_data *data, DWORD index)
2075 {
2076 CRYPT_PROVIDER_SGNR *provSigner = WTHelperGetProvSignerFromChain(
2077 (CRYPT_PROVIDER_DATA *)data->pCertViewInfo->u.pCryptProviderData,
2078 data->pCertViewInfo->idxSigner, data->pCertViewInfo->fCounterSigner,
2079 data->pCertViewInfo->idxCounterSigner);
2080
2081 /* Takes advantage of the fact that a pointer is 32-bit aligned, and
2082 * therefore always even.
2083 */
2084 if (index == provSigner->csCertChain - 1)
2085 return (LPARAM)data;
2086 return index << 1 | 1;
2087 }
2088
2089 static inline DWORD lparam_to_index(struct hierarchy_data *data, LPARAM lp)
2090 {
2091 CRYPT_PROVIDER_SGNR *provSigner = WTHelperGetProvSignerFromChain(
2092 (CRYPT_PROVIDER_DATA *)data->pCertViewInfo->u.pCryptProviderData,
2093 data->pCertViewInfo->idxSigner, data->pCertViewInfo->fCounterSigner,
2094 data->pCertViewInfo->idxCounterSigner);
2095
2096 if (!(lp & 1))
2097 return provSigner->csCertChain - 1;
2098 return lp >> 1;
2099 }
2100
2101 static struct hierarchy_data *get_hierarchy_data_from_tree_item(HWND tree,
2102 HTREEITEM hItem)
2103 {
2104 struct hierarchy_data *data = NULL;
2105 HTREEITEM root = NULL;
2106
2107 do {
2108 HTREEITEM parent = (HTREEITEM)SendMessageW(tree, TVM_GETNEXTITEM,
2109 TVGN_PARENT, (LPARAM)hItem);
2110
2111 if (!parent)
2112 root = hItem;
2113 hItem = parent;
2114 } while (hItem);
2115 if (root)
2116 {
2117 TVITEMW item;
2118
2119 item.mask = TVIF_PARAM;
2120 item.hItem = root;
2121 SendMessageW(tree, TVM_GETITEMW, 0, (LPARAM)&item);
2122 data = (struct hierarchy_data *)item.lParam;
2123 }
2124 return data;
2125 }
2126
2127 static WCHAR *get_cert_display_name(PCCERT_CONTEXT cert)
2128 {
2129 WCHAR *name = get_cert_property_as_string(cert, CERT_FRIENDLY_NAME_PROP_ID);
2130
2131 if (!name)
2132 name = get_cert_name_string(cert, CERT_NAME_SIMPLE_DISPLAY_TYPE, 0);
2133 return name;
2134 }
2135
2136 static void show_cert_chain(HWND hwnd, struct hierarchy_data *data)
2137 {
2138 HWND tree = GetDlgItem(hwnd, IDC_CERTPATH);
2139 CRYPT_PROVIDER_SGNR *provSigner = WTHelperGetProvSignerFromChain(
2140 (CRYPT_PROVIDER_DATA *)data->pCertViewInfo->u.pCryptProviderData,
2141 data->pCertViewInfo->idxSigner, data->pCertViewInfo->fCounterSigner,
2142 data->pCertViewInfo->idxCounterSigner);
2143 DWORD i;
2144 HTREEITEM parent = NULL;
2145
2146 SendMessageW(tree, TVM_SETIMAGELIST, TVSIL_NORMAL, (LPARAM)data->imageList);
2147 for (i = provSigner->csCertChain; i; i--)
2148 {
2149 LPWSTR name;
2150
2151 name = get_cert_display_name(provSigner->pasCertChain[i - 1].pCert);
2152 if (name)
2153 {
2154 TVINSERTSTRUCTW tvis;
2155
2156 tvis.hParent = parent;
2157 tvis.hInsertAfter = TVI_LAST;
2158 tvis.u.item.mask = TVIF_TEXT | TVIF_STATE | TVIF_IMAGE |
2159 TVIF_SELECTEDIMAGE | TVIF_PARAM;
2160 tvis.u.item.pszText = name;
2161 tvis.u.item.state = TVIS_EXPANDED;
2162 tvis.u.item.stateMask = TVIS_EXPANDED;
2163 if (i == 1 &&
2164 (provSigner->pChainContext->TrustStatus.dwErrorStatus &
2165 CERT_TRUST_IS_PARTIAL_CHAIN))
2166 {
2167 /* The root of the chain has a special case: if the chain is
2168 * a partial chain, the icon is a warning icon rather than an
2169 * error icon.
2170 */
2171 tvis.u.item.iImage = 2;
2172 }
2173 else if (provSigner->pasCertChain[i - 1].pChainElement->TrustStatus.
2174 dwErrorStatus == 0)
2175 tvis.u.item.iImage = 0;
2176 else
2177 tvis.u.item.iImage = 1;
2178 tvis.u.item.iSelectedImage = tvis.u.item.iImage;
2179 tvis.u.item.lParam = index_to_lparam(data, i - 1);
2180 parent = (HTREEITEM)SendMessageW(tree, TVM_INSERTITEMW, 0,
2181 (LPARAM)&tvis);
2182 HeapFree(GetProcessHeap(), 0, name);
2183 }
2184 }
2185 }
2186
2187 static void set_certificate_status(HWND hwnd, CRYPT_PROVIDER_CERT *cert)
2188 {
2189 /* Select all the text in the control, the next update will replace it */
2190 SendMessageW(hwnd, EM_SETSEL, 0, -1);
2191 /* Set the highest priority error messages first. */
2192 if (!(cert->dwConfidence & CERT_CONFIDENCE_SIG))
2193 add_string_resource_to_control(hwnd, IDS_CERTIFICATE_BAD_SIGNATURE);
2194 else if (!(cert->dwConfidence & CERT_CONFIDENCE_TIME))
2195 add_string_resource_to_control(hwnd, IDS_CERTIFICATE_BAD_TIME);
2196 else if (!(cert->dwConfidence & CERT_CONFIDENCE_TIMENEST))
2197 add_string_resource_to_control(hwnd, IDS_CERTIFICATE_BAD_TIMENEST);
2198 else if (cert->dwRevokedReason)
2199 add_string_resource_to_control(hwnd, IDS_CERTIFICATE_REVOKED);
2200 else
2201 add_string_resource_to_control(hwnd, IDS_CERTIFICATE_VALID);
2202 }
2203
2204 static void set_certificate_status_for_end_cert(HWND hwnd,
2205 PCCRYPTUI_VIEWCERTIFICATE_STRUCTW pCertViewInfo)
2206 {
2207 HWND status = GetDlgItem(hwnd, IDC_CERTIFICATESTATUSTEXT);
2208 CRYPT_PROVIDER_SGNR *provSigner = WTHelperGetProvSignerFromChain(
2209 (CRYPT_PROVIDER_DATA *)pCertViewInfo->u.pCryptProviderData,
2210 pCertViewInfo->idxSigner, pCertViewInfo->fCounterSigner,
2211 pCertViewInfo->idxCounterSigner);
2212 CRYPT_PROVIDER_CERT *provCert = WTHelperGetProvCertFromChain(provSigner,
2213 pCertViewInfo->idxCert);
2214
2215 set_certificate_status(status, provCert);
2216 }
2217
2218 static void show_cert_hierarchy(HWND hwnd, struct hierarchy_data *data)
2219 {
2220 /* Disable view certificate button until a certificate is selected */
2221 EnableWindow(GetDlgItem(hwnd, IDC_VIEWCERTIFICATE), FALSE);
2222 show_cert_chain(hwnd, data);
2223 set_certificate_status_for_end_cert(hwnd, data->pCertViewInfo);
2224 }
2225
2226 static void show_dialog_for_selected_cert(HWND hwnd)
2227 {
2228 HWND tree = GetDlgItem(hwnd, IDC_CERTPATH);
2229 TVITEMW item;
2230 struct hierarchy_data *data;
2231 DWORD selection;
2232
2233 memset(&item, 0, sizeof(item));
2234 item.mask = TVIF_HANDLE | TVIF_PARAM;
2235 item.hItem = (HTREEITEM)SendMessageW(tree, TVM_GETNEXTITEM, TVGN_CARET,
2236 (LPARAM)NULL);
2237 SendMessageW(tree, TVM_GETITEMW, 0, (LPARAM)&item);
2238 data = get_hierarchy_data_from_tree_item(tree, item.hItem);
2239 selection = lparam_to_index(data, item.lParam);
2240 if (selection != 0)
2241 {
2242 CRYPT_PROVIDER_SGNR *provSigner;
2243 CRYPTUI_VIEWCERTIFICATE_STRUCTW viewInfo;
2244 BOOL changed = FALSE;
2245
2246 provSigner = WTHelperGetProvSignerFromChain(
2247 (CRYPT_PROVIDER_DATA *)data->pCertViewInfo->u.pCryptProviderData,
2248 data->pCertViewInfo->idxSigner,
2249 data->pCertViewInfo->fCounterSigner,
2250 data->pCertViewInfo->idxCounterSigner);
2251 memset(&viewInfo, 0, sizeof(viewInfo));
2252 viewInfo.dwSize = sizeof(viewInfo);
2253 viewInfo.dwFlags = data->pCertViewInfo->dwFlags;
2254 viewInfo.szTitle = data->pCertViewInfo->szTitle;
2255 viewInfo.pCertContext = provSigner->pasCertChain[selection].pCert;
2256 viewInfo.cStores = data->pCertViewInfo->cStores;
2257 viewInfo.rghStores = data->pCertViewInfo->rghStores;
2258 viewInfo.cPropSheetPages = data->pCertViewInfo->cPropSheetPages;
2259 viewInfo.rgPropSheetPages = data->pCertViewInfo->rgPropSheetPages;
2260 viewInfo.nStartPage = data->pCertViewInfo->nStartPage;
2261 CryptUIDlgViewCertificateW(&viewInfo, &changed);
2262 if (changed)
2263 {
2264 /* Delete the contents of the tree */
2265 SendMessageW(tree, TVM_DELETEITEM, 0, (LPARAM)TVI_ROOT);
2266 /* Reinitialize the tree */
2267 show_cert_hierarchy(hwnd, data);
2268 }
2269 }
2270 }
2271
2272 static LRESULT CALLBACK hierarchy_dlg_proc(HWND hwnd, UINT msg, WPARAM wp,
2273 LPARAM lp)
2274 {
2275 PROPSHEETPAGEW *page;
2276 struct hierarchy_data *data;
2277 LRESULT ret = 0;
2278
2279 TRACE("(%p, %08x, %08lx, %08lx)\n", hwnd, msg, wp, lp);
2280
2281 switch (msg)
2282 {
2283 case WM_INITDIALOG:
2284 page = (PROPSHEETPAGEW *)lp;
2285 data = (struct hierarchy_data *)page->lParam;
2286 show_cert_hierarchy(hwnd, data);
2287 break;
2288 case WM_NOTIFY:
2289 {
2290 NMHDR *hdr;
2291
2292 hdr = (NMHDR *)lp;
2293 switch (hdr->code)
2294 {
2295 case TVN_SELCHANGEDW:
2296 {
2297 NMTREEVIEWW *nm = (NMTREEVIEWW*)lp;
2298 HWND tree = GetDlgItem(hwnd, IDC_CERTPATH);
2299 DWORD selection;
2300 CRYPT_PROVIDER_SGNR *provSigner;
2301
2302 data = get_hierarchy_data_from_tree_item(tree, nm->itemNew.hItem);
2303 selection = lparam_to_index(data, nm->itemNew.lParam);
2304 provSigner = WTHelperGetProvSignerFromChain(
2305 (CRYPT_PROVIDER_DATA *)data->pCertViewInfo->u.pCryptProviderData,
2306 data->pCertViewInfo->idxSigner,
2307 data->pCertViewInfo->fCounterSigner,
2308 data->pCertViewInfo->idxCounterSigner);
2309 EnableWindow(GetDlgItem(hwnd, IDC_VIEWCERTIFICATE), selection != 0);
2310 set_certificate_status(GetDlgItem(hwnd, IDC_CERTIFICATESTATUSTEXT),
2311 &provSigner->pasCertChain[selection]);
2312 break;
2313 }
2314 case NM_DBLCLK:
2315 show_dialog_for_selected_cert(hwnd);
2316 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, 1);
2317 ret = 1;
2318 break;
2319 }
2320 break;
2321 }
2322 case WM_COMMAND:
2323 switch (wp)
2324 {
2325 case IDC_VIEWCERTIFICATE:
2326 show_dialog_for_selected_cert(hwnd);
2327 break;
2328 }
2329 break;
2330 }
2331 return ret;
2332 }
2333
2334 static UINT CALLBACK hierarchy_callback(HWND hwnd, UINT msg,
2335 PROPSHEETPAGEW *page)
2336 {
2337 struct hierarchy_data *data;
2338
2339 switch (msg)
2340 {
2341 case PSPCB_RELEASE:
2342 data = (struct hierarchy_data *)page->lParam;
2343 ImageList_Destroy(data->imageList);
2344 HeapFree(GetProcessHeap(), 0, data);
2345 break;
2346 }
2347 return 0;
2348 }
2349
2350 static BOOL init_hierarchy_page(PCCRYPTUI_VIEWCERTIFICATE_STRUCTW pCertViewInfo,
2351 PROPSHEETPAGEW *page)
2352 {
2353 struct hierarchy_data *data = HeapAlloc(GetProcessHeap(), 0,
2354 sizeof(struct hierarchy_data));
2355 BOOL ret = FALSE;
2356
2357 if (data)
2358 {
2359 data->imageList = ImageList_Create(16, 16, ILC_COLOR4 | ILC_MASK, 2, 0);
2360 if (data->imageList)
2361 {
2362 HBITMAP bmp;
2363 COLORREF backColor = RGB(255, 0, 255);
2364
2365 data->pCertViewInfo = pCertViewInfo;
2366 data->selectedCert = 0xffffffff;
2367
2368 bmp = LoadBitmapW(hInstance, MAKEINTRESOURCEW(IDB_SMALL_ICONS));
2369 ImageList_AddMasked(data->imageList, bmp, backColor);
2370 DeleteObject(bmp);
2371 ImageList_SetBkColor(data->imageList, CLR_NONE);
2372
2373 memset(page, 0, sizeof(PROPSHEETPAGEW));
2374 page->dwSize = sizeof(PROPSHEETPAGEW);
2375 page->dwFlags = PSP_USECALLBACK;
2376 page->hInstance = hInstance;
2377 page->u.pszTemplate = MAKEINTRESOURCEW(IDD_HIERARCHY);
2378 page->pfnDlgProc = hierarchy_dlg_proc;
2379 page->lParam = (LPARAM)data;
2380 page->pfnCallback = hierarchy_callback;
2381 ret = TRUE;
2382 }
2383 else
2384 HeapFree(GetProcessHeap(), 0, data);
2385 }
2386 return ret;
2387 }
2388
2389 static int CALLBACK cert_prop_sheet_proc(HWND hwnd, UINT msg, LPARAM lp)
2390 {
2391 RECT rc;
2392 POINT topLeft;
2393
2394 TRACE("(%p, %08x, %08lx)\n", hwnd, msg, lp);
2395
2396 switch (msg)
2397 {
2398 case PSCB_INITIALIZED:
2399 /* Get cancel button's position.. */
2400 GetWindowRect(GetDlgItem(hwnd, IDCANCEL), &rc);
2401 topLeft.x = rc.left;
2402 topLeft.y = rc.top;
2403 ScreenToClient(hwnd, &topLeft);
2404 /* hide the cancel button.. */
2405 ShowWindow(GetDlgItem(hwnd, IDCANCEL), FALSE);
2406 /* get the OK button's size.. */
2407 GetWindowRect(GetDlgItem(hwnd, IDOK), &rc);
2408 /* and move the OK button to the cancel button's original position. */
2409 MoveWindow(GetDlgItem(hwnd, IDOK), topLeft.x, topLeft.y,
2410 rc.right - rc.left, rc.bottom - rc.top, FALSE);
2411 GetWindowRect(GetDlgItem(hwnd, IDOK), &rc);
2412 break;
2413 }
2414 return 0;
2415 }
2416
2417 static BOOL show_cert_dialog(PCCRYPTUI_VIEWCERTIFICATE_STRUCTW pCertViewInfo,
2418 CRYPT_PROVIDER_CERT *provCert, BOOL *pfPropertiesChanged)
2419 {
2420 static const WCHAR riched[] = { 'r','i','c','h','e','d','2','0',0 };
2421 DWORD nPages;
2422 PROPSHEETPAGEW *pages;
2423 BOOL ret = FALSE;
2424 HMODULE lib = LoadLibraryW(riched);
2425
2426 nPages = pCertViewInfo->cPropSheetPages + 1; /* one for the General tab */
2427 if (!(pCertViewInfo->dwFlags & CRYPTUI_HIDE_DETAILPAGE))
2428 nPages++;
2429 if (!(pCertViewInfo->dwFlags & CRYPTUI_HIDE_HIERARCHYPAGE))
2430 nPages++;
2431 pages = HeapAlloc(GetProcessHeap(), 0, nPages * sizeof(PROPSHEETPAGEW));
2432 if (pages)
2433 {
2434 PROPSHEETHEADERW hdr;
2435 CRYPTUI_INITDIALOG_STRUCT *init = NULL;
2436 DWORD i;
2437
2438 memset(&hdr, 0, sizeof(hdr));
2439 hdr.dwSize = sizeof(hdr);
2440 hdr.dwFlags = PSH_NOAPPLYNOW | PSH_PROPSHEETPAGE | PSH_USECALLBACK;
2441 hdr.hInstance = hInstance;
2442 if (pCertViewInfo->szTitle)
2443 hdr.pszCaption = pCertViewInfo->szTitle;
2444 else
2445 hdr.pszCaption = MAKEINTRESOURCEW(IDS_CERTIFICATE);
2446 init_general_page(pCertViewInfo, &pages[hdr.nPages++]);
2447 if (!(pCertViewInfo->dwFlags & CRYPTUI_HIDE_DETAILPAGE))
2448 {
2449 if (init_detail_page(pCertViewInfo, pfPropertiesChanged,
2450 &pages[hdr.nPages]))
2451 hdr.nPages++;
2452 }
2453 if (!(pCertViewInfo->dwFlags & CRYPTUI_HIDE_HIERARCHYPAGE))
2454 {
2455 if (init_hierarchy_page(pCertViewInfo, &pages[hdr.nPages]))
2456 hdr.nPages++;
2457 }
2458 /* Copy each additional page, and create the init dialog struct for it
2459 */
2460 if (pCertViewInfo->cPropSheetPages)
2461 {
2462 init = HeapAlloc(GetProcessHeap(), 0,
2463 pCertViewInfo->cPropSheetPages *
2464 sizeof(CRYPTUI_INITDIALOG_STRUCT));
2465 if (init)
2466 {
2467 for (i = 0; i < pCertViewInfo->cPropSheetPages; i++)
2468 {
2469 memcpy(&pages[hdr.nPages + i],
2470 &pCertViewInfo->rgPropSheetPages[i],
2471 sizeof(PROPSHEETPAGEW));
2472 init[i].lParam = pCertViewInfo->rgPropSheetPages[i].lParam;
2473 init[i].pCertContext = pCertViewInfo->pCertContext;
2474 pages[hdr.nPages + i].lParam = (LPARAM)&init[i];
2475 }
2476 if (pCertViewInfo->nStartPage & 0x8000)
2477 {
2478 /* Start page index is relative to the number of default
2479 * pages
2480 */
2481 hdr.u2.nStartPage = pCertViewInfo->nStartPage + hdr.nPages;
2482 }
2483 else
2484 hdr.u2.nStartPage = pCertViewInfo->nStartPage;
2485 hdr.nPages = nPages;
2486 ret = TRUE;
2487 }
2488 else
2489 SetLastError(ERROR_OUTOFMEMORY);
2490 }
2491 else
2492 {
2493 /* Ignore the relative flag if there aren't any additional pages */
2494 hdr.u2.nStartPage = pCertViewInfo->nStartPage & 0x7fff;
2495 ret = TRUE;
2496 }
2497 if (ret)
2498 {
2499 INT_PTR l;
2500
2501 hdr.u3.ppsp = pages;
2502 hdr.pfnCallback = cert_prop_sheet_proc;
2503 l = PropertySheetW(&hdr);
2504 if (l == 0)
2505 {
2506 SetLastError(ERROR_CANCELLED);
2507 ret = FALSE;
2508 }
2509 }
2510 HeapFree(GetProcessHeap(), 0, init);
2511 HeapFree(GetProcessHeap(), 0, pages);
2512 }
2513 else
2514 SetLastError(ERROR_OUTOFMEMORY);
2515 FreeLibrary(lib);
2516 return ret;
2517 }
2518
2519 /***********************************************************************
2520 * CryptUIDlgViewCertificateW (CRYPTUI.@)
2521 */
2522 BOOL WINAPI CryptUIDlgViewCertificateW(
2523 PCCRYPTUI_VIEWCERTIFICATE_STRUCTW pCertViewInfo, BOOL *pfPropertiesChanged)
2524 {
2525 static GUID generic_cert_verify = WINTRUST_ACTION_GENERIC_CERT_VERIFY;
2526 CRYPTUI_VIEWCERTIFICATE_STRUCTW viewInfo;
2527 WINTRUST_DATA wvt;
2528 WINTRUST_CERT_INFO cert;
2529 BOOL ret = FALSE;
2530 CRYPT_PROVIDER_SGNR *signer;
2531 CRYPT_PROVIDER_CERT *provCert = NULL;
2532
2533 TRACE("(%p, %p)\n", pCertViewInfo, pfPropertiesChanged);
2534
2535 if (pCertViewInfo->dwSize != sizeof(CRYPTUI_VIEWCERTIFICATE_STRUCTW))
2536 {
2537 SetLastError(ERROR_INVALID_PARAMETER);
2538 return FALSE;
2539 }
2540 /* Make a local copy in case we have to call WinVerifyTrust ourselves */
2541 memcpy(&viewInfo, pCertViewInfo, sizeof(viewInfo));
2542 if (!viewInfo.u.hWVTStateData)
2543 {
2544 memset(&wvt, 0, sizeof(wvt));
2545 wvt.cbStruct = sizeof(wvt);
2546 wvt.dwUIChoice = WTD_UI_NONE;
2547 if (viewInfo.dwFlags &
2548 CRYPTUI_ENABLE_REVOCATION_CHECK_CHAIN_EXCLUDE_ROOT)
2549 wvt.fdwRevocationChecks |= WTD_REVOCATION_CHECK_CHAIN_EXCLUDE_ROOT;
2550 if (viewInfo.dwFlags & CRYPTUI_ENABLE_REVOCATION_CHECK_END_CERT)
2551 wvt.fdwRevocationChecks |= WTD_REVOCATION_CHECK_END_CERT;
2552 if (viewInfo.dwFlags & CRYPTUI_ENABLE_REVOCATION_CHECK_CHAIN)
2553 wvt.fdwRevocationChecks |= WTD_REVOCATION_CHECK_CHAIN;
2554 wvt.dwUnionChoice = WTD_CHOICE_CERT;
2555 memset(&cert, 0, sizeof(cert));
2556 cert.cbStruct = sizeof(cert);
2557 cert.psCertContext = (CERT_CONTEXT *)viewInfo.pCertContext;
2558 cert.chStores = viewInfo.cStores;
2559 cert.pahStores = viewInfo.rghStores;
2560 wvt.u.pCert = &cert;
2561 wvt.dwStateAction = WTD_STATEACTION_VERIFY;
2562 WinVerifyTrust(NULL, &generic_cert_verify, &wvt);
2563 viewInfo.u.pCryptProviderData =
2564 WTHelperProvDataFromStateData(wvt.hWVTStateData);
2565 signer = WTHelperGetProvSignerFromChain(
2566 (CRYPT_PROVIDER_DATA *)viewInfo.u.pCryptProviderData, 0, FALSE, 0);
2567 provCert = WTHelperGetProvCertFromChain(signer, 0);
2568 ret = TRUE;
2569 }
2570 else
2571 {
2572 viewInfo.u.pCryptProviderData =
2573 WTHelperProvDataFromStateData(viewInfo.u.hWVTStateData);
2574 signer = WTHelperGetProvSignerFromChain(
2575 (CRYPT_PROVIDER_DATA *)viewInfo.u.pCryptProviderData,
2576 viewInfo.idxSigner, viewInfo.fCounterSigner,
2577 viewInfo.idxCounterSigner);
2578 provCert = WTHelperGetProvCertFromChain(signer, viewInfo.idxCert);
2579 ret = TRUE;
2580 }
2581 if (ret)
2582 {
2583 ret = show_cert_dialog(&viewInfo, provCert, pfPropertiesChanged);
2584 if (!viewInfo.u.hWVTStateData)
2585 {
2586 wvt.dwStateAction = WTD_STATEACTION_CLOSE;
2587 WinVerifyTrust(NULL, &generic_cert_verify, &wvt);
2588 }
2589 }
2590 return ret;
2591 }
2592
2593 static PCCERT_CONTEXT make_cert_from_file(LPCWSTR fileName)
2594 {
2595 HANDLE file;
2596 DWORD size, encoding = X509_ASN_ENCODING | PKCS_7_ASN_ENCODING;
2597 BYTE *buffer;
2598 PCCERT_CONTEXT cert;
2599
2600 file = CreateFileW(fileName, GENERIC_READ, FILE_SHARE_READ, NULL,
2601 OPEN_EXISTING, 0, NULL);
2602 if (file == INVALID_HANDLE_VALUE)
2603 {
2604 WARN("can't open certificate file %s\n", debugstr_w(fileName));
2605 return NULL;
2606 }
2607 if ((size = GetFileSize(file, NULL)))
2608 {
2609 if ((buffer = HeapAlloc(GetProcessHeap(), 0, size)))
2610 {
2611 DWORD read;
2612 if (!ReadFile(file, buffer, size, &read, NULL) || read != size)
2613 {
2614 WARN("can't read certificate file %s\n", debugstr_w(fileName));
2615 HeapFree(GetProcessHeap(), 0, buffer);
2616 CloseHandle(file);
2617 return NULL;
2618 }
2619 }
2620 }
2621 else
2622 {
2623 WARN("empty file %s\n", debugstr_w(fileName));
2624 CloseHandle(file);
2625 return NULL;
2626 }
2627 CloseHandle(file);
2628 cert = CertCreateCertificateContext(encoding, buffer, size);
2629 HeapFree(GetProcessHeap(), 0, buffer);
2630 return cert;
2631 }
2632
2633 /* Decodes a cert's basic constraints extension (either szOID_BASIC_CONSTRAINTS
2634 * or szOID_BASIC_CONSTRAINTS2, whichever is present) to determine if it
2635 * should be a CA. If neither extension is present, returns
2636 * defaultIfNotSpecified.
2637 */
2638 static BOOL is_ca_cert(PCCERT_CONTEXT cert, BOOL defaultIfNotSpecified)
2639 {
2640 BOOL isCA = defaultIfNotSpecified;
2641 PCERT_EXTENSION ext = CertFindExtension(szOID_BASIC_CONSTRAINTS,
2642 cert->pCertInfo->cExtension, cert->pCertInfo->rgExtension);
2643
2644 if (ext)
2645 {
2646 CERT_BASIC_CONSTRAINTS_INFO *info;
2647 DWORD size = 0;
2648
2649 if (CryptDecodeObjectEx(X509_ASN_ENCODING, szOID_BASIC_CONSTRAINTS,
2650 ext->Value.pbData, ext->Value.cbData, CRYPT_DECODE_ALLOC_FLAG,
2651 NULL, (LPBYTE)&info, &size))
2652 {
2653 if (info->SubjectType.cbData == 1)
2654 isCA = info->SubjectType.pbData[0] & CERT_CA_SUBJECT_FLAG;
2655 LocalFree(info);
2656 }
2657 }
2658 else
2659 {
2660 ext = CertFindExtension(szOID_BASIC_CONSTRAINTS2,
2661 cert->pCertInfo->cExtension, cert->pCertInfo->rgExtension);
2662 if (ext)
2663 {
2664 CERT_BASIC_CONSTRAINTS2_INFO info;
2665 DWORD size = sizeof(CERT_BASIC_CONSTRAINTS2_INFO);
2666
2667 if (CryptDecodeObjectEx(X509_ASN_ENCODING,
2668 szOID_BASIC_CONSTRAINTS2, ext->Value.pbData, ext->Value.cbData,
2669 0, NULL, &info, &size))
2670 isCA = info.fCA;
2671 }
2672 }
2673 return isCA;
2674 }
2675
2676 static HCERTSTORE choose_store_for_cert(PCCERT_CONTEXT cert)
2677 {
2678 static const WCHAR AddressBook[] = { 'A','d','d','r','e','s','s',
2679 'B','o','o','k',0 };
2680 static const WCHAR CA[] = { 'C','A',0 };
2681 LPCWSTR storeName;
2682
2683 if (is_ca_cert(cert, TRUE))
2684 storeName = CA;
2685 else
2686 storeName = AddressBook;
2687 return CertOpenStore(CERT_STORE_PROV_SYSTEM_W, 0, 0,
2688 CERT_SYSTEM_STORE_CURRENT_USER, storeName);
2689 }
2690
2691 BOOL WINAPI CryptUIWizImport(DWORD dwFlags, HWND hwndParent, LPCWSTR pwszWizardTitle,
2692 PCCRYPTUI_WIZ_IMPORT_SRC_INFO pImportSrc, HCERTSTORE hDestCertStore)
2693 {
2694 BOOL ret;
2695 HCERTSTORE store;
2696 const CERT_CONTEXT *cert;
2697 BOOL freeCert = FALSE;
2698
2699 TRACE("(0x%08x, %p, %s, %p, %p)\n", dwFlags, hwndParent, debugstr_w(pwszWizardTitle),
2700 pImportSrc, hDestCertStore);
2701
2702 if (!(dwFlags & CRYPTUI_WIZ_NO_UI)) FIXME("UI not implemented\n");
2703
2704 if (!pImportSrc ||
2705 pImportSrc->dwSize != sizeof(CRYPTUI_WIZ_IMPORT_SRC_INFO))
2706 {
2707 SetLastError(E_INVALIDARG);
2708 return FALSE;
2709 }
2710
2711 switch (pImportSrc->dwSubjectChoice)
2712 {
2713 case CRYPTUI_WIZ_IMPORT_SUBJECT_FILE:
2714 if (!(cert = make_cert_from_file(pImportSrc->u.pwszFileName)))
2715 {
2716 WARN("unable to create certificate context\n");
2717 return FALSE;
2718 }
2719 else
2720 freeCert = TRUE;
2721 break;
2722 case CRYPTUI_WIZ_IMPORT_SUBJECT_CERT_CONTEXT:
2723 cert = pImportSrc->u.pCertContext;
2724 if (!cert)
2725 {
2726 SetLastError(E_INVALIDARG);
2727 return FALSE;
2728 }
2729 break;
2730 default:
2731 FIXME("source type not implemented: %u\n", pImportSrc->dwSubjectChoice);
2732 SetLastError(E_INVALIDARG);
2733 return FALSE;
2734 }
2735 if (hDestCertStore) store = hDestCertStore;
2736 else
2737 {
2738 if (!(store = choose_store_for_cert(cert)))
2739 {
2740 WARN("unable to open certificate store\n");
2741 CertFreeCertificateContext(cert);
2742 return FALSE;
2743 }
2744 }
2745 ret = CertAddCertificateContextToStore(store, cert, CERT_STORE_ADD_REPLACE_EXISTING, NULL);
2746
2747 if (!hDestCertStore) CertCloseStore(store, 0);
2748 if (freeCert)
2749 CertFreeCertificateContext(cert);
2750 return ret;
2751 }