jscript: Added String.match implementation for non-regexp arguments.
[wine] / dlls / wintrust / softpub.c
1 /*
2  * Copyright 2007 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 #include <stdarg.h>
19
20 #define NONAMELESSUNION
21
22 #include "windef.h"
23 #include "winbase.h"
24 #include "wintrust.h"
25 #include "mssip.h"
26 #include "softpub.h"
27 #include "wine/debug.h"
28
29 WINE_DEFAULT_DEBUG_CHANNEL(wintrust);
30
31 HRESULT WINAPI SoftpubDefCertInit(CRYPT_PROVIDER_DATA *data)
32 {
33     HRESULT ret = S_FALSE;
34
35     TRACE("(%p)\n", data);
36
37     if (data->padwTrustStepErrors &&
38      !data->padwTrustStepErrors[TRUSTERROR_STEP_FINAL_WVTINIT])
39         ret = S_OK;
40     TRACE("returning %08x\n", ret);
41     return ret;
42 }
43
44 HRESULT WINAPI SoftpubInitialize(CRYPT_PROVIDER_DATA *data)
45 {
46     HRESULT ret = S_FALSE;
47
48     TRACE("(%p)\n", data);
49
50     if (data->padwTrustStepErrors &&
51      !data->padwTrustStepErrors[TRUSTERROR_STEP_FINAL_WVTINIT])
52         ret = S_OK;
53     TRACE("returning %08x\n", ret);
54     return ret;
55 }
56
57 /* Assumes data->pWintrustData->u.pFile exists.  Makes sure a file handle is
58  * open for the file.
59  */
60 static BOOL SOFTPUB_OpenFile(CRYPT_PROVIDER_DATA *data)
61 {
62     BOOL ret = TRUE;
63
64     /* PSDK implies that all values should be initialized to NULL, so callers
65      * typically have hFile as NULL rather than INVALID_HANDLE_VALUE.  Check
66      * for both.
67      */
68     if (!data->pWintrustData->u.pFile->hFile ||
69      data->pWintrustData->u.pFile->hFile == INVALID_HANDLE_VALUE)
70     {
71         data->pWintrustData->u.pFile->hFile =
72             CreateFileW(data->pWintrustData->u.pFile->pcwszFilePath, GENERIC_READ,
73           FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
74         if (data->pWintrustData->u.pFile->hFile != INVALID_HANDLE_VALUE)
75             data->fOpenedFile = TRUE;
76         else
77             ret = FALSE;
78     }
79     if (ret)
80         GetFileTime(data->pWintrustData->u.pFile->hFile, &data->sftSystemTime,
81          NULL, NULL);
82     TRACE("returning %d\n", ret);
83     return ret;
84 }
85
86 /* Assumes data->pWintrustData->u.pFile exists.  Sets data->pPDSip->gSubject to
87  * the file's subject GUID.
88  */
89 static BOOL SOFTPUB_GetFileSubject(CRYPT_PROVIDER_DATA *data)
90 {
91     BOOL ret;
92
93     if (!data->pWintrustData->u.pFile->pgKnownSubject)
94     {
95         ret = CryptSIPRetrieveSubjectGuid(
96          data->pWintrustData->u.pFile->pcwszFilePath,
97          data->pWintrustData->u.pFile->hFile,
98          &data->u.pPDSip->gSubject);
99     }
100     else
101     {
102         data->u.pPDSip->gSubject = *data->pWintrustData->u.pFile->pgKnownSubject;
103         ret = TRUE;
104     }
105     TRACE("returning %d\n", ret);
106     return ret;
107 }
108
109 /* Assumes data->u.pPDSip exists, and its gSubject member set.
110  * Allocates data->u.pPDSip->pSip and loads it, if possible.
111  */
112 static BOOL SOFTPUB_GetSIP(CRYPT_PROVIDER_DATA *data)
113 {
114     BOOL ret;
115
116     data->u.pPDSip->pSip = data->psPfns->pfnAlloc(sizeof(SIP_DISPATCH_INFO));
117     if (data->u.pPDSip->pSip)
118         ret = CryptSIPLoad(&data->u.pPDSip->gSubject, 0, data->u.pPDSip->pSip);
119     else
120     {
121         SetLastError(ERROR_OUTOFMEMORY);
122         ret = FALSE;
123     }
124     TRACE("returning %d\n", ret);
125     return ret;
126 }
127
128 /* Assumes data->u.pPDSip has been loaded, and data->u.pPDSip->pSip allocated.
129  * Calls data->u.pPDSip->pSip->pfGet to construct data->hMsg.
130  */
131 static BOOL SOFTPUB_GetMessageFromFile(CRYPT_PROVIDER_DATA *data)
132 {
133     BOOL ret;
134     LPBYTE buf = NULL;
135     DWORD size = 0;
136
137     data->u.pPDSip->psSipSubjectInfo =
138      data->psPfns->pfnAlloc(sizeof(SIP_SUBJECTINFO));
139     if (!data->u.pPDSip->psSipSubjectInfo)
140     {
141         SetLastError(ERROR_OUTOFMEMORY);
142         return FALSE;
143     }
144
145     data->u.pPDSip->psSipSubjectInfo->cbSize = sizeof(SIP_SUBJECTINFO);
146     data->u.pPDSip->psSipSubjectInfo->pgSubjectType = &data->u.pPDSip->gSubject;
147     data->u.pPDSip->psSipSubjectInfo->hFile = data->pWintrustData->u.pFile->hFile;
148     data->u.pPDSip->psSipSubjectInfo->pwsFileName =
149      data->pWintrustData->u.pFile->pcwszFilePath;
150     data->u.pPDSip->psSipSubjectInfo->hProv = data->hProv;
151     ret = data->u.pPDSip->pSip->pfGet(data->u.pPDSip->psSipSubjectInfo,
152      &data->dwEncoding, 0, &size, 0);
153     if (!ret)
154     {
155         SetLastError(TRUST_E_NOSIGNATURE);
156         return FALSE;
157     }
158
159     buf = data->psPfns->pfnAlloc(size);
160     if (!buf)
161     {
162         SetLastError(ERROR_OUTOFMEMORY);
163         return FALSE;
164     }
165
166     ret = data->u.pPDSip->pSip->pfGet(data->u.pPDSip->psSipSubjectInfo,
167      &data->dwEncoding, 0, &size, buf);
168     if (ret)
169     {
170         data->hMsg = CryptMsgOpenToDecode(data->dwEncoding, 0, 0, data->hProv,
171          NULL, NULL);
172         if (data->hMsg)
173             ret = CryptMsgUpdate(data->hMsg, buf, size, TRUE);
174     }
175
176     data->psPfns->pfnFree(buf);
177     TRACE("returning %d\n", ret);
178     return ret;
179 }
180
181 static BOOL SOFTPUB_CreateStoreFromMessage(CRYPT_PROVIDER_DATA *data)
182 {
183     BOOL ret = FALSE;
184     HCERTSTORE store;
185
186     store = CertOpenStore(CERT_STORE_PROV_MSG, data->dwEncoding,
187      data->hProv, CERT_STORE_NO_CRYPT_RELEASE_FLAG, data->hMsg);
188     if (store)
189     {
190         ret = data->psPfns->pfnAddStore2Chain(data, store);
191         CertCloseStore(store, 0);
192     }
193     TRACE("returning %d\n", ret);
194     return ret;
195 }
196
197 static DWORD SOFTPUB_DecodeInnerContent(CRYPT_PROVIDER_DATA *data)
198 {
199     BOOL ret;
200     DWORD size;
201     LPBYTE buf = NULL;
202
203     ret = CryptMsgGetParam(data->hMsg, CMSG_INNER_CONTENT_TYPE_PARAM, 0, NULL,
204      &size);
205     if (!ret)
206         goto error;
207     buf = data->psPfns->pfnAlloc(size);
208     if (!buf)
209     {
210         SetLastError(ERROR_OUTOFMEMORY);
211         ret = FALSE;
212         goto error;
213     }
214     ret = CryptMsgGetParam(data->hMsg, CMSG_INNER_CONTENT_TYPE_PARAM, 0, buf,
215      &size);
216     if (!ret)
217         goto error;
218     if (!strcmp((LPCSTR)buf, SPC_INDIRECT_DATA_OBJID))
219     {
220         data->psPfns->pfnFree(buf);
221         buf = NULL;
222         ret = CryptMsgGetParam(data->hMsg, CMSG_CONTENT_PARAM, 0, NULL, &size);
223         if (!ret)
224             goto error;
225         buf = data->psPfns->pfnAlloc(size);
226         if (!buf)
227         {
228             SetLastError(ERROR_OUTOFMEMORY);
229             ret = FALSE;
230             goto error;
231         }
232         ret = CryptMsgGetParam(data->hMsg, CMSG_CONTENT_PARAM, 0, buf, &size);
233         if (!ret)
234             goto error;
235         ret = CryptDecodeObject(data->dwEncoding,
236          SPC_INDIRECT_DATA_CONTENT_STRUCT, buf, size, 0, NULL, &size);
237         if (!ret)
238             goto error;
239         data->u.pPDSip->psIndirectData = data->psPfns->pfnAlloc(size);
240         if (!data->u.pPDSip->psIndirectData)
241         {
242             SetLastError(ERROR_OUTOFMEMORY);
243             ret = FALSE;
244             goto error;
245         }
246         ret = CryptDecodeObject(data->dwEncoding,
247          SPC_INDIRECT_DATA_CONTENT_STRUCT, buf, size, 0,
248          data->u.pPDSip->psIndirectData, &size);
249     }
250     else
251     {
252         FIXME("unimplemented for OID %s\n", (LPCSTR)buf);
253         SetLastError(TRUST_E_SUBJECT_FORM_UNKNOWN);
254         ret = FALSE;
255     }
256
257 error:
258     TRACE("returning %d\n", ret);
259     return ret;
260 }
261
262 HRESULT WINAPI SoftpubLoadMessage(CRYPT_PROVIDER_DATA *data)
263 {
264     BOOL ret;
265
266     TRACE("(%p)\n", data);
267
268     if (!data->padwTrustStepErrors)
269         return S_FALSE;
270
271     switch (data->pWintrustData->dwUnionChoice)
272     {
273     case WTD_CHOICE_CERT:
274         if (data->pWintrustData->u.pCert &&
275          data->pWintrustData->u.pCert->cbStruct == sizeof(WINTRUST_CERT_INFO))
276         {
277             if (data->psPfns)
278             {
279                 CRYPT_PROVIDER_SGNR signer = { sizeof(signer), { 0 } };
280                 DWORD i;
281
282                 /* Add a signer with nothing but the time to verify, so we can
283                  * add a cert to it
284                  */
285                 if (data->pWintrustData->u.pCert->psftVerifyAsOf)
286                     data->sftSystemTime = signer.sftVerifyAsOf;
287                 else
288                 {
289                     SYSTEMTIME sysTime;
290
291                     GetSystemTime(&sysTime);
292                     SystemTimeToFileTime(&sysTime, &signer.sftVerifyAsOf);
293                 }
294                 ret = data->psPfns->pfnAddSgnr2Chain(data, FALSE, 0, &signer);
295                 if (!ret)
296                     goto error;
297                 ret = data->psPfns->pfnAddCert2Chain(data, 0, FALSE, 0,
298                  data->pWintrustData->u.pCert->psCertContext);
299                 if (!ret)
300                     goto error;
301                 for (i = 0; ret && i < data->pWintrustData->u.pCert->chStores;
302                  i++)
303                     ret = data->psPfns->pfnAddStore2Chain(data,
304                      data->pWintrustData->u.pCert->pahStores[i]);
305             }
306             else
307             {
308                 /* Do nothing!?  See the tests */
309                 ret = TRUE;
310             }
311         }
312         else
313         {
314             SetLastError(ERROR_INVALID_PARAMETER);
315             ret = FALSE;
316         }
317         break;
318     case WTD_CHOICE_FILE:
319         if (!data->pWintrustData->u.pFile)
320         {
321             SetLastError(ERROR_INVALID_PARAMETER);
322             ret = FALSE;
323             goto error;
324         }
325         ret = SOFTPUB_OpenFile(data);
326         if (!ret)
327             goto error;
328         ret = SOFTPUB_GetFileSubject(data);
329         if (!ret)
330             goto error;
331         ret = SOFTPUB_GetSIP(data);
332         if (!ret)
333             goto error;
334         ret = SOFTPUB_GetMessageFromFile(data);
335         if (!ret)
336             goto error;
337         ret = SOFTPUB_CreateStoreFromMessage(data);
338         if (!ret)
339             goto error;
340         ret = SOFTPUB_DecodeInnerContent(data);
341         break;
342     default:
343         FIXME("unimplemented for %d\n", data->pWintrustData->dwUnionChoice);
344         SetLastError(ERROR_INVALID_PARAMETER);
345         ret = FALSE;
346     }
347
348 error:
349     if (!ret)
350         data->padwTrustStepErrors[TRUSTERROR_STEP_FINAL_OBJPROV] =
351          GetLastError();
352     TRACE("returning %d (%08x)\n", ret ? S_OK : S_FALSE,
353      data->padwTrustStepErrors[TRUSTERROR_STEP_FINAL_OBJPROV]);
354     return ret ? S_OK : S_FALSE;
355 }
356
357 static CMSG_SIGNER_INFO *WINTRUST_GetSigner(CRYPT_PROVIDER_DATA *data,
358  DWORD signerIdx)
359 {
360     BOOL ret;
361     CMSG_SIGNER_INFO *signerInfo = NULL;
362     DWORD size;
363
364     ret = CryptMsgGetParam(data->hMsg, CMSG_SIGNER_INFO_PARAM, signerIdx,
365      NULL, &size);
366     if (ret)
367     {
368         signerInfo = data->psPfns->pfnAlloc(size);
369         if (signerInfo)
370         {
371             ret = CryptMsgGetParam(data->hMsg, CMSG_SIGNER_INFO_PARAM,
372              signerIdx, signerInfo, &size);
373             if (!ret)
374             {
375                 data->psPfns->pfnFree(signerInfo);
376                 signerInfo = NULL;
377             }
378         }
379         else
380             SetLastError(ERROR_OUTOFMEMORY);
381     }
382     return signerInfo;
383 }
384
385 static BOOL WINTRUST_SaveSigner(CRYPT_PROVIDER_DATA *data, DWORD signerIdx)
386 {
387     BOOL ret;
388     CMSG_SIGNER_INFO *signerInfo = WINTRUST_GetSigner(data, signerIdx);
389
390     if (signerInfo)
391     {
392         CRYPT_PROVIDER_SGNR sgnr = { sizeof(sgnr), { 0 } };
393
394         sgnr.psSigner = signerInfo;
395         sgnr.sftVerifyAsOf = data->sftSystemTime;
396         ret = data->psPfns->pfnAddSgnr2Chain(data, FALSE, signerIdx, &sgnr);
397     }
398     else
399         ret = FALSE;
400     return ret;
401 }
402
403 static CERT_INFO *WINTRUST_GetSignerCertInfo(CRYPT_PROVIDER_DATA *data,
404  DWORD signerIdx)
405 {
406     BOOL ret;
407     CERT_INFO *certInfo = NULL;
408     DWORD size;
409
410     ret = CryptMsgGetParam(data->hMsg, CMSG_SIGNER_CERT_INFO_PARAM, signerIdx,
411      NULL, &size);
412     if (ret)
413     {
414         certInfo = data->psPfns->pfnAlloc(size);
415         if (certInfo)
416         {
417             ret = CryptMsgGetParam(data->hMsg, CMSG_SIGNER_CERT_INFO_PARAM,
418              signerIdx, certInfo, &size);
419             if (!ret)
420             {
421                 data->psPfns->pfnFree(certInfo);
422                 certInfo = NULL;
423             }
424         }
425         else
426             SetLastError(ERROR_OUTOFMEMORY);
427     }
428     return certInfo;
429 }
430
431 static BOOL WINTRUST_VerifySigner(CRYPT_PROVIDER_DATA *data, DWORD signerIdx)
432 {
433     BOOL ret;
434     CERT_INFO *certInfo = WINTRUST_GetSignerCertInfo(data, signerIdx);
435
436     if (certInfo)
437     {
438         PCCERT_CONTEXT subject = CertGetSubjectCertificateFromStore(
439          data->pahStores[0], data->dwEncoding, certInfo);
440
441         if (subject)
442         {
443             CMSG_CTRL_VERIFY_SIGNATURE_EX_PARA para = { sizeof(para), 0,
444              signerIdx, CMSG_VERIFY_SIGNER_CERT, (LPVOID)subject };
445
446             ret = CryptMsgControl(data->hMsg, 0, CMSG_CTRL_VERIFY_SIGNATURE_EX,
447              &para);
448             if (!ret)
449                 SetLastError(TRUST_E_CERT_SIGNATURE);
450             else
451                 data->psPfns->pfnAddCert2Chain(data, signerIdx, FALSE, 0,
452                  subject);
453             CertFreeCertificateContext(subject);
454         }
455         else
456         {
457             SetLastError(TRUST_E_NO_SIGNER_CERT);
458             ret = FALSE;
459         }
460         data->psPfns->pfnFree(certInfo);
461     }
462     else
463         ret = FALSE;
464     return ret;
465 }
466
467 HRESULT WINAPI SoftpubLoadSignature(CRYPT_PROVIDER_DATA *data)
468 {
469     BOOL ret;
470
471     TRACE("(%p)\n", data);
472
473     if (!data->padwTrustStepErrors)
474         return S_FALSE;
475
476     if (data->hMsg)
477     {
478         DWORD signerCount, size;
479
480         size = sizeof(signerCount);
481         ret = CryptMsgGetParam(data->hMsg, CMSG_SIGNER_COUNT_PARAM, 0,
482          &signerCount, &size);
483         if (ret)
484         {
485             DWORD i;
486
487             for (i = 0; ret && i < signerCount; i++)
488             {
489                 if ((ret = WINTRUST_SaveSigner(data, i)))
490                     ret = WINTRUST_VerifySigner(data, i);
491             }
492         }
493         else
494             SetLastError(TRUST_E_NOSIGNATURE);
495     }
496     else
497         ret = TRUE;
498     if (!ret)
499         data->padwTrustStepErrors[TRUSTERROR_STEP_FINAL_SIGPROV] =
500          GetLastError();
501     return ret ? S_OK : S_FALSE;
502 }
503
504 BOOL WINAPI SoftpubCheckCert(CRYPT_PROVIDER_DATA *data, DWORD idxSigner,
505  BOOL fCounterSignerChain, DWORD idxCounterSigner)
506 {
507     BOOL ret;
508
509     TRACE("(%p, %d, %d, %d)\n", data, idxSigner, fCounterSignerChain,
510      idxCounterSigner);
511
512     if (fCounterSignerChain)
513     {
514         FIXME("unimplemented for counter signers\n");
515         ret = FALSE;
516     }
517     else
518     {
519         PCERT_SIMPLE_CHAIN simpleChain =
520          data->pasSigners[idxSigner].pChainContext->rgpChain[0];
521         DWORD i;
522
523         ret = TRUE;
524         for (i = 0; i < simpleChain->cElement; i++)
525         {
526             /* Set confidence */
527             data->pasSigners[idxSigner].pasCertChain[i].dwConfidence = 0;
528             if (!(simpleChain->rgpElement[i]->TrustStatus.dwErrorStatus &
529              CERT_TRUST_IS_NOT_TIME_VALID))
530                 data->pasSigners[idxSigner].pasCertChain[i].dwConfidence
531                  |= CERT_CONFIDENCE_TIME;
532             if (!(simpleChain->rgpElement[i]->TrustStatus.dwErrorStatus &
533              CERT_TRUST_IS_NOT_TIME_NESTED))
534                 data->pasSigners[idxSigner].pasCertChain[i].dwConfidence
535                  |= CERT_CONFIDENCE_TIMENEST;
536             if (!(simpleChain->rgpElement[i]->TrustStatus.dwErrorStatus &
537              CERT_TRUST_IS_NOT_SIGNATURE_VALID))
538                 data->pasSigners[idxSigner].pasCertChain[i].dwConfidence
539                  |= CERT_CONFIDENCE_SIG;
540             /* Set additional flags */
541             if (!(simpleChain->rgpElement[i]->TrustStatus.dwErrorStatus &
542              CERT_TRUST_IS_UNTRUSTED_ROOT))
543                 data->pasSigners[idxSigner].pasCertChain[i].fTrustedRoot = TRUE;
544             if (simpleChain->rgpElement[i]->TrustStatus.dwInfoStatus &
545              CERT_TRUST_IS_SELF_SIGNED)
546                 data->pasSigners[idxSigner].pasCertChain[i].fSelfSigned = TRUE;
547             if (simpleChain->rgpElement[i]->TrustStatus.dwErrorStatus &
548              CERT_TRUST_IS_CYCLIC)
549                 data->pasSigners[idxSigner].pasCertChain[i].fIsCyclic = TRUE;
550         }
551     }
552     return ret;
553 }
554
555 static DWORD WINTRUST_TrustStatusToConfidence(DWORD errorStatus)
556 {
557     DWORD confidence = 0;
558
559     confidence = 0;
560     if (!(errorStatus & CERT_TRUST_IS_NOT_SIGNATURE_VALID))
561         confidence |= CERT_CONFIDENCE_SIG;
562     if (!(errorStatus & CERT_TRUST_IS_NOT_TIME_VALID))
563         confidence |= CERT_CONFIDENCE_TIME;
564     if (!(errorStatus & CERT_TRUST_IS_NOT_TIME_NESTED))
565         confidence |= CERT_CONFIDENCE_TIMENEST;
566     return confidence;
567 }
568
569 static BOOL WINTRUST_CopyChain(CRYPT_PROVIDER_DATA *data, DWORD signerIdx)
570 {
571     BOOL ret;
572     PCERT_SIMPLE_CHAIN simpleChain =
573      data->pasSigners[signerIdx].pChainContext->rgpChain[0];
574     DWORD i;
575
576     data->pasSigners[signerIdx].pasCertChain[0].dwConfidence =
577      WINTRUST_TrustStatusToConfidence(
578      simpleChain->rgpElement[0]->TrustStatus.dwErrorStatus);
579     data->pasSigners[signerIdx].pasCertChain[0].dwError =
580      simpleChain->rgpElement[0]->TrustStatus.dwErrorStatus;
581     data->pasSigners[signerIdx].pasCertChain[0].pChainElement =
582      simpleChain->rgpElement[0];
583     ret = TRUE;
584     for (i = 1; ret && i < simpleChain->cElement; i++)
585     {
586         ret = data->psPfns->pfnAddCert2Chain(data, signerIdx, FALSE, 0,
587          simpleChain->rgpElement[i]->pCertContext);
588         if (ret)
589         {
590             data->pasSigners[signerIdx].pasCertChain[i].pChainElement =
591              simpleChain->rgpElement[i];
592             data->pasSigners[signerIdx].pasCertChain[i].dwConfidence =
593              WINTRUST_TrustStatusToConfidence(
594              simpleChain->rgpElement[i]->TrustStatus.dwErrorStatus);
595             data->pasSigners[signerIdx].pasCertChain[i].dwError =
596              simpleChain->rgpElement[i]->TrustStatus.dwErrorStatus;
597         }
598     }
599     return ret;
600 }
601
602 static void WINTRUST_CreateChainPolicyCreateInfo(
603  const CRYPT_PROVIDER_DATA *data, PWTD_GENERIC_CHAIN_POLICY_CREATE_INFO info,
604  PCERT_CHAIN_PARA chainPara)
605 {
606     chainPara->cbSize = sizeof(CERT_CHAIN_PARA);
607     if (data->pRequestUsage)
608         chainPara->RequestedUsage = *data->pRequestUsage;
609     else
610     {
611         chainPara->RequestedUsage.dwType = 0;
612         chainPara->RequestedUsage.Usage.cUsageIdentifier = 0;
613     }
614     info->u.cbSize = sizeof(WTD_GENERIC_CHAIN_POLICY_CREATE_INFO);
615     info->hChainEngine = NULL;
616     info->pChainPara = chainPara;
617     if (data->dwProvFlags & CPD_REVOCATION_CHECK_END_CERT)
618         info->dwFlags = CERT_CHAIN_REVOCATION_CHECK_END_CERT;
619     else if (data->dwProvFlags & CPD_REVOCATION_CHECK_CHAIN)
620         info->dwFlags = CERT_CHAIN_REVOCATION_CHECK_CHAIN;
621     else if (data->dwProvFlags & CPD_REVOCATION_CHECK_CHAIN_EXCLUDE_ROOT)
622         info->dwFlags = CERT_CHAIN_REVOCATION_CHECK_CHAIN_EXCLUDE_ROOT;
623     else
624         info->dwFlags = 0;
625     info->pvReserved = NULL;
626 }
627
628 static BOOL WINTRUST_CreateChainForSigner(CRYPT_PROVIDER_DATA *data,
629  DWORD signer, PWTD_GENERIC_CHAIN_POLICY_CREATE_INFO createInfo,
630  PCERT_CHAIN_PARA chainPara)
631 {
632     BOOL ret = TRUE;
633     HCERTSTORE store = NULL;
634
635     if (data->chStores)
636     {
637         store = CertOpenStore(CERT_STORE_PROV_COLLECTION, 0, 0,
638          CERT_STORE_CREATE_NEW_FLAG, NULL);
639         if (store)
640         {
641             DWORD i;
642
643             for (i = 0; i < data->chStores; i++)
644                 CertAddStoreToCollection(store, data->pahStores[i], 0, 0);
645         }
646     }
647     /* Expect the end certificate for each signer to be the only cert in the
648      * chain:
649      */
650     if (data->pasSigners[signer].csCertChain)
651     {
652         /* Create a certificate chain for each signer */
653         ret = CertGetCertificateChain(createInfo->hChainEngine,
654          data->pasSigners[signer].pasCertChain[0].pCert,
655          &data->pasSigners[signer].sftVerifyAsOf, store,
656          chainPara, createInfo->dwFlags, createInfo->pvReserved,
657          &data->pasSigners[signer].pChainContext);
658         if (ret)
659         {
660             if (data->pasSigners[signer].pChainContext->cChain != 1)
661             {
662                 FIXME("unimplemented for more than 1 simple chain\n");
663                 ret = FALSE;
664             }
665             else
666             {
667                 if ((ret = WINTRUST_CopyChain(data, signer)))
668                 {
669                     if (data->psPfns->pfnCertCheckPolicy)
670                         ret = data->psPfns->pfnCertCheckPolicy(data, signer,
671                          FALSE, 0);
672                     else
673                         TRACE("no cert check policy, skipping policy check\n");
674                 }
675             }
676         }
677     }
678     CertCloseStore(store, 0);
679     return ret;
680 }
681
682 HRESULT WINAPI WintrustCertificateTrust(CRYPT_PROVIDER_DATA *data)
683 {
684     BOOL ret;
685
686     TRACE("(%p)\n", data);
687
688     if (!data->csSigners)
689     {
690         ret = FALSE;
691         SetLastError(TRUST_E_NOSIGNATURE);
692     }
693     else
694     {
695         DWORD i;
696         WTD_GENERIC_CHAIN_POLICY_CREATE_INFO createInfo;
697         CERT_CHAIN_PARA chainPara;
698
699         WINTRUST_CreateChainPolicyCreateInfo(data, &createInfo, &chainPara);
700         ret = TRUE;
701         for (i = 0; i < data->csSigners; i++)
702             ret = WINTRUST_CreateChainForSigner(data, i, &createInfo,
703              &chainPara);
704     }
705     if (!ret)
706         data->padwTrustStepErrors[TRUSTERROR_STEP_FINAL_CERTPROV] =
707          GetLastError();
708     TRACE("returning %d (%08x)\n", ret ? S_OK : S_FALSE,
709      data->padwTrustStepErrors[TRUSTERROR_STEP_FINAL_CERTPROV]);
710     return ret ? S_OK : S_FALSE;
711 }
712
713 HRESULT WINAPI GenericChainCertificateTrust(CRYPT_PROVIDER_DATA *data)
714 {
715     BOOL ret;
716     WTD_GENERIC_CHAIN_POLICY_DATA *policyData =
717      (WTD_GENERIC_CHAIN_POLICY_DATA *)data->pWintrustData->pPolicyCallbackData;
718
719     TRACE("(%p)\n", data);
720
721     if (policyData && policyData->u.cbSize !=
722      sizeof(WTD_GENERIC_CHAIN_POLICY_CREATE_INFO))
723     {
724         SetLastError(ERROR_INVALID_PARAMETER);
725         ret = FALSE;
726         goto end;
727     }
728     if (!data->csSigners)
729     {
730         ret = FALSE;
731         SetLastError(TRUST_E_NOSIGNATURE);
732     }
733     else
734     {
735         DWORD i;
736         WTD_GENERIC_CHAIN_POLICY_CREATE_INFO createInfo, *pCreateInfo;
737         CERT_CHAIN_PARA chainPara, *pChainPara;
738
739         if (policyData)
740         {
741             pCreateInfo = policyData->pSignerChainInfo;
742             pChainPara = pCreateInfo->pChainPara;
743         }
744         else
745         {
746             WINTRUST_CreateChainPolicyCreateInfo(data, &createInfo, &chainPara);
747             pChainPara = &chainPara;
748             pCreateInfo = &createInfo;
749         }
750         ret = TRUE;
751         for (i = 0; i < data->csSigners; i++)
752             ret = WINTRUST_CreateChainForSigner(data, i, pCreateInfo,
753              pChainPara);
754     }
755
756 end:
757     if (!ret)
758         data->padwTrustStepErrors[TRUSTERROR_STEP_FINAL_CERTPROV] =
759          GetLastError();
760     TRACE("returning %d (%08x)\n", ret ? S_OK : S_FALSE,
761      data->padwTrustStepErrors[TRUSTERROR_STEP_FINAL_CERTPROV]);
762     return ret ? S_OK : S_FALSE;
763 }
764
765 HRESULT WINAPI SoftpubAuthenticode(CRYPT_PROVIDER_DATA *data)
766 {
767     BOOL ret;
768     CERT_CHAIN_POLICY_STATUS policyStatus = { sizeof(policyStatus), 0 };
769
770     TRACE("(%p)\n", data);
771
772     if (data->pWintrustData->dwUIChoice != WTD_UI_NONE)
773         FIXME("unimplemented for UI choice %d\n",
774          data->pWintrustData->dwUIChoice);
775     if (!data->csSigners)
776     {
777         ret = FALSE;
778         policyStatus.dwError = TRUST_E_NOSIGNATURE;
779     }
780     else
781     {
782         DWORD i;
783
784         ret = TRUE;
785         for (i = 0; ret && i < data->csSigners; i++)
786         {
787             BYTE hash[20];
788             DWORD size = sizeof(hash);
789
790             /* First make sure cert isn't disallowed */
791             if ((ret = CertGetCertificateContextProperty(
792              data->pasSigners[i].pasCertChain[0].pCert,
793              CERT_SIGNATURE_HASH_PROP_ID, hash, &size)))
794             {
795                 static const WCHAR disallowedW[] =
796                  { 'D','i','s','a','l','l','o','w','e','d',0 };
797                 HCERTSTORE disallowed = CertOpenStore(CERT_STORE_PROV_SYSTEM_W,
798                  X509_ASN_ENCODING, 0, CERT_SYSTEM_STORE_CURRENT_USER,
799                  disallowedW);
800
801                 if (disallowed)
802                 {
803                     PCCERT_CONTEXT found = CertFindCertificateInStore(
804                      disallowed, X509_ASN_ENCODING, 0, CERT_FIND_SIGNATURE_HASH,
805                      hash, NULL);
806
807                     if (found)
808                     {
809                         /* Disallowed!  Can't verify it. */
810                         policyStatus.dwError = TRUST_E_SUBJECT_NOT_TRUSTED;
811                         ret = FALSE;
812                         CertFreeCertificateContext(found);
813                     }
814                     CertCloseStore(disallowed, 0);
815                 }
816             }
817             if (ret)
818             {
819                 CERT_CHAIN_POLICY_PARA policyPara = { sizeof(policyPara), 0 };
820
821                 if (data->dwRegPolicySettings & WTPF_TRUSTTEST)
822                     policyPara.dwFlags |= CERT_CHAIN_POLICY_TRUST_TESTROOT_FLAG;
823                 if (data->dwRegPolicySettings & WTPF_TESTCANBEVALID)
824                     policyPara.dwFlags |= CERT_CHAIN_POLICY_ALLOW_TESTROOT_FLAG;
825                 if (data->dwRegPolicySettings & WTPF_IGNOREEXPIRATION)
826                     policyPara.dwFlags |=
827                      CERT_CHAIN_POLICY_IGNORE_NOT_TIME_VALID_FLAG |
828                      CERT_CHAIN_POLICY_IGNORE_CTL_NOT_TIME_VALID_FLAG |
829                      CERT_CHAIN_POLICY_IGNORE_NOT_TIME_NESTED_FLAG;
830                 if (data->dwRegPolicySettings & WTPF_IGNOREREVOKATION)
831                     policyPara.dwFlags |=
832                      CERT_CHAIN_POLICY_IGNORE_END_REV_UNKNOWN_FLAG |
833                      CERT_CHAIN_POLICY_IGNORE_CTL_SIGNER_REV_UNKNOWN_FLAG |
834                      CERT_CHAIN_POLICY_IGNORE_CA_REV_UNKNOWN_FLAG |
835                      CERT_CHAIN_POLICY_IGNORE_ROOT_REV_UNKNOWN_FLAG;
836                 CertVerifyCertificateChainPolicy(CERT_CHAIN_POLICY_AUTHENTICODE,
837                  data->pasSigners[i].pChainContext, &policyPara, &policyStatus);
838                 if (policyStatus.dwError != NO_ERROR)
839                     ret = FALSE;
840             }
841         }
842     }
843     if (!ret)
844         data->padwTrustStepErrors[TRUSTERROR_STEP_FINAL_POLICYPROV] =
845          policyStatus.dwError;
846     TRACE("returning %d (%08x)\n", ret ? S_OK : S_FALSE,
847      data->padwTrustStepErrors[TRUSTERROR_STEP_FINAL_POLICYPROV]);
848     return ret ? S_OK : S_FALSE;
849 }
850
851 static HRESULT WINAPI WINTRUST_DefaultPolicy(CRYPT_PROVIDER_DATA *pProvData,
852  DWORD dwStepError, DWORD dwRegPolicySettings, DWORD cSigner,
853  PWTD_GENERIC_CHAIN_POLICY_SIGNER_INFO rgpSigner, void *pvPolicyArg)
854 {
855     DWORD i;
856     CERT_CHAIN_POLICY_STATUS policyStatus = { sizeof(policyStatus), 0 };
857
858     for (i = 0; !policyStatus.dwError && i < cSigner; i++)
859     {
860         CERT_CHAIN_POLICY_PARA policyPara = { sizeof(policyPara), 0 };
861
862         if (dwRegPolicySettings & WTPF_IGNOREEXPIRATION)
863             policyPara.dwFlags |=
864              CERT_CHAIN_POLICY_IGNORE_NOT_TIME_VALID_FLAG |
865              CERT_CHAIN_POLICY_IGNORE_CTL_NOT_TIME_VALID_FLAG |
866              CERT_CHAIN_POLICY_IGNORE_NOT_TIME_NESTED_FLAG;
867         if (dwRegPolicySettings & WTPF_IGNOREREVOKATION)
868             policyPara.dwFlags |=
869              CERT_CHAIN_POLICY_IGNORE_END_REV_UNKNOWN_FLAG |
870              CERT_CHAIN_POLICY_IGNORE_CTL_SIGNER_REV_UNKNOWN_FLAG |
871              CERT_CHAIN_POLICY_IGNORE_CA_REV_UNKNOWN_FLAG |
872              CERT_CHAIN_POLICY_IGNORE_ROOT_REV_UNKNOWN_FLAG;
873         CertVerifyCertificateChainPolicy(CERT_CHAIN_POLICY_BASE,
874          rgpSigner[i].pChainContext, &policyPara, &policyStatus);
875     }
876     return policyStatus.dwError;
877 }
878
879 HRESULT WINAPI GenericChainFinalProv(CRYPT_PROVIDER_DATA *data)
880 {
881     HRESULT err = NO_ERROR; /* not a typo, MS confused the types */
882     WTD_GENERIC_CHAIN_POLICY_DATA *policyData =
883      (WTD_GENERIC_CHAIN_POLICY_DATA *)data->pWintrustData->pPolicyCallbackData;
884
885     TRACE("(%p)\n", data);
886
887     if (data->pWintrustData->dwUIChoice != WTD_UI_NONE)
888         FIXME("unimplemented for UI choice %d\n",
889          data->pWintrustData->dwUIChoice);
890     if (!data->csSigners)
891         err = TRUST_E_NOSIGNATURE;
892     else
893     {
894         PFN_WTD_GENERIC_CHAIN_POLICY_CALLBACK policyCallback;
895         void *policyArg;
896         WTD_GENERIC_CHAIN_POLICY_SIGNER_INFO *signers = NULL;
897
898         if (policyData)
899         {
900             policyCallback = policyData->pfnPolicyCallback;
901             policyArg = policyData->pvPolicyArg;
902         }
903         else
904         {
905             policyCallback = WINTRUST_DefaultPolicy;
906             policyArg = NULL;
907         }
908         if (data->csSigners)
909         {
910             DWORD i;
911
912             signers = data->psPfns->pfnAlloc(
913              data->csSigners * sizeof(WTD_GENERIC_CHAIN_POLICY_SIGNER_INFO));
914             if (signers)
915             {
916                 for (i = 0; i < data->csSigners; i++)
917                 {
918                     signers[i].u.cbSize =
919                      sizeof(WTD_GENERIC_CHAIN_POLICY_SIGNER_INFO);
920                     signers[i].pChainContext =
921                      data->pasSigners[i].pChainContext;
922                     signers[i].dwSignerType = data->pasSigners[i].dwSignerType;
923                     signers[i].pMsgSignerInfo = data->pasSigners[i].psSigner;
924                     signers[i].dwError = data->pasSigners[i].dwError;
925                     if (data->pasSigners[i].csCounterSigners)
926                         FIXME("unimplemented for counter signers\n");
927                     signers[i].cCounterSigner = 0;
928                     signers[i].rgpCounterSigner = NULL;
929                 }
930             }
931             else
932                 err = ERROR_OUTOFMEMORY;
933         }
934         if (err == NO_ERROR)
935             err = policyCallback(data, TRUSTERROR_STEP_FINAL_POLICYPROV,
936              data->dwRegPolicySettings, data->csSigners, signers, policyArg);
937         data->psPfns->pfnFree(signers);
938     }
939     if (err != NO_ERROR)
940         data->padwTrustStepErrors[TRUSTERROR_STEP_FINAL_POLICYPROV] = err;
941     TRACE("returning %d (%08x)\n", err == NO_ERROR ? S_OK : S_FALSE,
942      data->padwTrustStepErrors[TRUSTERROR_STEP_FINAL_POLICYPROV]);
943     return err == NO_ERROR ? S_OK : S_FALSE;
944 }
945
946 HRESULT WINAPI SoftpubCleanup(CRYPT_PROVIDER_DATA *data)
947 {
948     DWORD i, j;
949
950     for (i = 0; i < data->csSigners; i++)
951     {
952         for (j = 0; j < data->pasSigners[i].csCertChain; j++)
953             CertFreeCertificateContext(data->pasSigners[i].pasCertChain[j].pCert);
954         data->psPfns->pfnFree(data->pasSigners[i].pasCertChain);
955         data->psPfns->pfnFree(data->pasSigners[i].psSigner);
956         CertFreeCertificateChain(data->pasSigners[i].pChainContext);
957     }
958     data->psPfns->pfnFree(data->pasSigners);
959
960     for (i = 0; i < data->chStores; i++)
961         CertCloseStore(data->pahStores[i], 0);
962     data->psPfns->pfnFree(data->pahStores);
963
964     if (data->u.pPDSip)
965     {
966         data->psPfns->pfnFree(data->u.pPDSip->pSip);
967         data->psPfns->pfnFree(data->u.pPDSip->pCATSip);
968         data->psPfns->pfnFree(data->u.pPDSip->psSipSubjectInfo);
969         data->psPfns->pfnFree(data->u.pPDSip->psSipCATSubjectInfo);
970         data->psPfns->pfnFree(data->u.pPDSip->psIndirectData);
971     }
972
973     CryptMsgClose(data->hMsg);
974
975     if (data->fOpenedFile)
976         CloseHandle(data->pWintrustData->u.pFile->hFile);
977
978     return S_OK;
979 }