1/* crypto/cms/cms_sd.c */
2/* Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL
3 * project.
4 */
5/* ====================================================================
6 * Copyright (c) 2008 The OpenSSL Project.  All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 *
12 * 1. Redistributions of source code must retain the above copyright
13 *    notice, this list of conditions and the following disclaimer.
14 *
15 * 2. Redistributions in binary form must reproduce the above copyright
16 *    notice, this list of conditions and the following disclaimer in
17 *    the documentation and/or other materials provided with the
18 *    distribution.
19 *
20 * 3. All advertising materials mentioning features or use of this
21 *    software must display the following acknowledgment:
22 *    "This product includes software developed by the OpenSSL Project
23 *    for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
24 *
25 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
26 *    endorse or promote products derived from this software without
27 *    prior written permission. For written permission, please contact
28 *    licensing@OpenSSL.org.
29 *
30 * 5. Products derived from this software may not be called "OpenSSL"
31 *    nor may "OpenSSL" appear in their names without prior written
32 *    permission of the OpenSSL Project.
33 *
34 * 6. Redistributions of any form whatsoever must retain the following
35 *    acknowledgment:
36 *    "This product includes software developed by the OpenSSL Project
37 *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
38 *
39 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
40 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
41 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
42 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
43 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
44 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
45 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
46 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
48 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
49 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
50 * OF THE POSSIBILITY OF SUCH DAMAGE.
51 * ====================================================================
52 */
53
54#include <openssl/local/cryptlib.h>
55#include <openssl/asn1t.h>
56#include <openssl/pem.h>
57#include <openssl/x509v3.h>
58#include <openssl/err.h>
59#include <openssl/cms.h>
60#include "cms_lcl.h"
61#include <openssl/local/asn1_locl.h>
62
63/* CMS SignedData Utilities */
64
65DECLARE_ASN1_ITEM(CMS_SignedData)
66
67static CMS_SignedData *cms_get0_signed(CMS_ContentInfo *cms)
68	{
69	if (OBJ_obj2nid(cms->contentType) != NID_pkcs7_signed)
70		{
71		CMSerr(CMS_F_CMS_GET0_SIGNED, CMS_R_CONTENT_TYPE_NOT_SIGNED_DATA);
72		return NULL;
73		}
74	return cms->d.signedData;
75	}
76
77static CMS_SignedData *cms_signed_data_init(CMS_ContentInfo *cms)
78	{
79	if (cms->d.other == NULL)
80		{
81		cms->d.signedData = M_ASN1_new_of(CMS_SignedData);
82		if (!cms->d.signedData)
83			{
84			CMSerr(CMS_F_CMS_SIGNED_DATA_INIT, ERR_R_MALLOC_FAILURE);
85			return NULL;
86			}
87		cms->d.signedData->version = 1;
88		cms->d.signedData->encapContentInfo->eContentType =
89						OBJ_nid2obj(NID_pkcs7_data);
90		cms->d.signedData->encapContentInfo->partial = 1;
91		ASN1_OBJECT_free(cms->contentType);
92		cms->contentType = OBJ_nid2obj(NID_pkcs7_signed);
93		return cms->d.signedData;
94		}
95	return cms_get0_signed(cms);
96	}
97
98/* Just initialize SignedData e.g. for certs only structure */
99
100int CMS_SignedData_init(CMS_ContentInfo *cms)
101	{
102	if (cms_signed_data_init(cms))
103		return 1;
104	else
105		return 0;
106	}
107
108/* Check structures and fixup version numbers (if necessary) */
109
110static void cms_sd_set_version(CMS_SignedData *sd)
111	{
112	int i;
113	CMS_CertificateChoices *cch;
114	CMS_RevocationInfoChoice *rch;
115	CMS_SignerInfo *si;
116
117	for (i = 0; i < sk_CMS_CertificateChoices_num(sd->certificates); i++)
118		{
119		cch = sk_CMS_CertificateChoices_value(sd->certificates, i);
120		if (cch->type == CMS_CERTCHOICE_OTHER)
121			{
122			if (sd->version < 5)
123				sd->version = 5;
124			}
125		else if (cch->type == CMS_CERTCHOICE_V2ACERT)
126			{
127			if (sd->version < 4)
128				sd->version = 4;
129			}
130		else if (cch->type == CMS_CERTCHOICE_V1ACERT)
131			{
132			if (sd->version < 3)
133				sd->version = 3;
134			}
135		}
136
137	for (i = 0; i < sk_CMS_RevocationInfoChoice_num(sd->crls); i++)
138		{
139		rch = sk_CMS_RevocationInfoChoice_value(sd->crls, i);
140		if (rch->type == CMS_REVCHOICE_OTHER)
141			{
142			if (sd->version < 5)
143				sd->version = 5;
144			}
145		}
146
147	if ((OBJ_obj2nid(sd->encapContentInfo->eContentType) != NID_pkcs7_data)
148			&& (sd->version < 3))
149		sd->version = 3;
150
151	for (i = 0; i < sk_CMS_SignerInfo_num(sd->signerInfos); i++)
152		{
153		si = sk_CMS_SignerInfo_value(sd->signerInfos, i);
154		if (si->sid->type == CMS_SIGNERINFO_KEYIDENTIFIER)
155			{
156			if (si->version < 3)
157				si->version = 3;
158			if (sd->version < 3)
159				sd->version = 3;
160			}
161		else
162			sd->version = 1;
163		}
164
165	if (sd->version < 1)
166		sd->version = 1;
167
168	}
169
170/* Copy an existing messageDigest value */
171
172static int cms_copy_messageDigest(CMS_ContentInfo *cms, CMS_SignerInfo *si)
173	{
174	STACK_OF(CMS_SignerInfo) *sinfos;
175	CMS_SignerInfo *sitmp;
176	int i;
177	sinfos = CMS_get0_SignerInfos(cms);
178	for (i = 0; i < sk_CMS_SignerInfo_num(sinfos); i++)
179		{
180		ASN1_OCTET_STRING *messageDigest;
181		sitmp = sk_CMS_SignerInfo_value(sinfos, i);
182		if (sitmp == si)
183			continue;
184		if (CMS_signed_get_attr_count(sitmp) < 0)
185			continue;
186		if (OBJ_cmp(si->digestAlgorithm->algorithm,
187				sitmp->digestAlgorithm->algorithm))
188			continue;
189		messageDigest = CMS_signed_get0_data_by_OBJ(sitmp,
190					OBJ_nid2obj(NID_pkcs9_messageDigest),
191					-3, V_ASN1_OCTET_STRING);
192		if (!messageDigest)
193			{
194			CMSerr(CMS_F_CMS_COPY_MESSAGEDIGEST,
195				CMS_R_ERROR_READING_MESSAGEDIGEST_ATTRIBUTE);
196			return 0;
197			}
198
199		if (CMS_signed_add1_attr_by_NID(si, NID_pkcs9_messageDigest,
200						V_ASN1_OCTET_STRING,
201						messageDigest, -1))
202			return 1;
203		else
204			return 0;
205		}
206		CMSerr(CMS_F_CMS_COPY_MESSAGEDIGEST, CMS_R_NO_MATCHING_DIGEST);
207		return 0;
208	}
209
210int cms_set1_SignerIdentifier(CMS_SignerIdentifier *sid, X509 *cert, int type)
211	{
212	switch(type)
213		{
214		case CMS_SIGNERINFO_ISSUER_SERIAL:
215		sid->d.issuerAndSerialNumber =
216			M_ASN1_new_of(CMS_IssuerAndSerialNumber);
217		if (!sid->d.issuerAndSerialNumber)
218			goto merr;
219		if (!X509_NAME_set(&sid->d.issuerAndSerialNumber->issuer,
220					X509_get_issuer_name(cert)))
221			goto merr;
222		if (!ASN1_STRING_copy(
223			sid->d.issuerAndSerialNumber->serialNumber,
224				X509_get_serialNumber(cert)))
225			goto merr;
226		break;
227
228		case CMS_SIGNERINFO_KEYIDENTIFIER:
229		if (!cert->skid)
230			{
231			CMSerr(CMS_F_CMS_SET1_SIGNERIDENTIFIER,
232					CMS_R_CERTIFICATE_HAS_NO_KEYID);
233			return 0;
234			}
235		sid->d.subjectKeyIdentifier = ASN1_STRING_dup(cert->skid);
236		if (!sid->d.subjectKeyIdentifier)
237			goto merr;
238		break;
239
240		default:
241		CMSerr(CMS_F_CMS_SET1_SIGNERIDENTIFIER, CMS_R_UNKNOWN_ID);
242		return 0;
243		}
244
245	sid->type = type;
246
247	return 1;
248
249	merr:
250	CMSerr(CMS_F_CMS_SET1_SIGNERIDENTIFIER, ERR_R_MALLOC_FAILURE);
251	return 0;
252
253	}
254
255int cms_SignerIdentifier_get0_signer_id(CMS_SignerIdentifier *sid,
256					ASN1_OCTET_STRING **keyid,
257					X509_NAME **issuer, ASN1_INTEGER **sno)
258	{
259	if (sid->type == CMS_SIGNERINFO_ISSUER_SERIAL)
260		{
261		if (issuer)
262			*issuer = sid->d.issuerAndSerialNumber->issuer;
263		if (sno)
264			*sno = sid->d.issuerAndSerialNumber->serialNumber;
265		}
266	else if (sid->type == CMS_SIGNERINFO_KEYIDENTIFIER)
267		{
268		if (keyid)
269			*keyid = sid->d.subjectKeyIdentifier;
270		}
271	else
272		return 0;
273	return 1;
274	}
275
276int cms_SignerIdentifier_cert_cmp(CMS_SignerIdentifier *sid, X509 *cert)
277	{
278	int ret;
279	if (sid->type == CMS_SIGNERINFO_ISSUER_SERIAL)
280		{
281		ret = X509_NAME_cmp(sid->d.issuerAndSerialNumber->issuer,
282					X509_get_issuer_name(cert));
283		if (ret)
284			return ret;
285		return ASN1_INTEGER_cmp(sid->d.issuerAndSerialNumber->serialNumber,
286					X509_get_serialNumber(cert));
287		}
288	else if (sid->type == CMS_SIGNERINFO_KEYIDENTIFIER)
289		{
290		X509_check_purpose(cert, -1, -1);
291		if (!cert->skid)
292			return -1;
293		return ASN1_OCTET_STRING_cmp(sid->d.subjectKeyIdentifier,
294							cert->skid);
295		}
296	else
297		return -1;
298	}
299
300CMS_SignerInfo *CMS_add1_signer(CMS_ContentInfo *cms,
301			X509 *signer, EVP_PKEY *pk, const EVP_MD *md,
302			unsigned int flags)
303	{
304	CMS_SignedData *sd;
305	CMS_SignerInfo *si = NULL;
306	X509_ALGOR *alg;
307	int i, type;
308	if(!X509_check_private_key(signer, pk))
309		{
310		CMSerr(CMS_F_CMS_ADD1_SIGNER,
311			CMS_R_PRIVATE_KEY_DOES_NOT_MATCH_CERTIFICATE);
312                return NULL;
313		}
314	sd = cms_signed_data_init(cms);
315	if (!sd)
316		goto err;
317	si = M_ASN1_new_of(CMS_SignerInfo);
318	if (!si)
319		goto merr;
320	X509_check_purpose(signer, -1, -1);
321
322	CRYPTO_add(&pk->references, 1, CRYPTO_LOCK_EVP_PKEY);
323	CRYPTO_add(&signer->references, 1, CRYPTO_LOCK_X509);
324
325	si->pkey = pk;
326	si->signer = signer;
327
328	if (flags & CMS_USE_KEYID)
329		{
330		si->version = 3;
331		if (sd->version < 3)
332			sd->version = 3;
333		type = CMS_SIGNERINFO_KEYIDENTIFIER;
334		}
335	else
336		{
337		type = CMS_SIGNERINFO_ISSUER_SERIAL;
338		si->version = 1;
339		}
340
341	if (!cms_set1_SignerIdentifier(si->sid, signer, type))
342		goto err;
343
344	if (md == NULL)
345		{
346		int def_nid;
347		if (EVP_PKEY_get_default_digest_nid(pk, &def_nid) <= 0)
348			goto err;
349		md = EVP_get_digestbynid(def_nid);
350		if (md == NULL)
351			{
352			CMSerr(CMS_F_CMS_ADD1_SIGNER, CMS_R_NO_DEFAULT_DIGEST);
353			goto err;
354			}
355		}
356
357	if (!md)
358		{
359		CMSerr(CMS_F_CMS_ADD1_SIGNER, CMS_R_NO_DIGEST_SET);
360		goto err;
361		}
362
363	cms_DigestAlgorithm_set(si->digestAlgorithm, md);
364
365	/* See if digest is present in digestAlgorithms */
366	for (i = 0; i < sk_X509_ALGOR_num(sd->digestAlgorithms); i++)
367		{
368		ASN1_OBJECT *aoid;
369		alg = sk_X509_ALGOR_value(sd->digestAlgorithms, i);
370		X509_ALGOR_get0(&aoid, NULL, NULL, alg);
371		if (OBJ_obj2nid(aoid) == EVP_MD_type(md))
372			break;
373		}
374
375	if (i == sk_X509_ALGOR_num(sd->digestAlgorithms))
376		{
377		alg = X509_ALGOR_new();
378		if (!alg)
379			goto merr;
380		cms_DigestAlgorithm_set(alg, md);
381		if (!sk_X509_ALGOR_push(sd->digestAlgorithms, alg))
382			{
383			X509_ALGOR_free(alg);
384			goto merr;
385			}
386		}
387
388	if (pk->ameth && pk->ameth->pkey_ctrl)
389		{
390		i = pk->ameth->pkey_ctrl(pk, ASN1_PKEY_CTRL_CMS_SIGN,
391						0, si);
392		if (i == -2)
393			{
394			CMSerr(CMS_F_CMS_ADD1_SIGNER,
395				CMS_R_NOT_SUPPORTED_FOR_THIS_KEY_TYPE);
396			goto err;
397			}
398		if (i <= 0)
399			{
400			CMSerr(CMS_F_CMS_ADD1_SIGNER, CMS_R_CTRL_FAILURE);
401			goto err;
402			}
403		}
404
405	if (!(flags & CMS_NOATTR))
406		{
407		/* Initialialize signed attributes strutucture so other
408		 * attributes such as signing time etc are added later
409		 * even if we add none here.
410		 */
411		if (!si->signedAttrs)
412			{
413			si->signedAttrs = sk_X509_ATTRIBUTE_new_null();
414			if (!si->signedAttrs)
415				goto merr;
416			}
417
418		if (!(flags & CMS_NOSMIMECAP))
419			{
420			STACK_OF(X509_ALGOR) *smcap = NULL;
421			i = CMS_add_standard_smimecap(&smcap);
422			if (i)
423				i = CMS_add_smimecap(si, smcap);
424			sk_X509_ALGOR_pop_free(smcap, X509_ALGOR_free);
425			if (!i)
426				goto merr;
427			}
428		if (flags & CMS_REUSE_DIGEST)
429			{
430			if (!cms_copy_messageDigest(cms, si))
431				goto err;
432			if (!(flags & CMS_PARTIAL) &&
433					!CMS_SignerInfo_sign(si))
434				goto err;
435			}
436		}
437
438	if (!(flags & CMS_NOCERTS))
439		{
440		/* NB ignore -1 return for duplicate cert */
441		if (!CMS_add1_cert(cms, signer))
442			goto merr;
443		}
444
445	if (!sd->signerInfos)
446		sd->signerInfos = sk_CMS_SignerInfo_new_null();
447	if (!sd->signerInfos ||
448		!sk_CMS_SignerInfo_push(sd->signerInfos, si))
449		goto merr;
450
451	return si;
452
453	merr:
454	CMSerr(CMS_F_CMS_ADD1_SIGNER, ERR_R_MALLOC_FAILURE);
455	err:
456	if (si)
457		M_ASN1_free_of(si, CMS_SignerInfo);
458	return NULL;
459
460	}
461
462static int cms_add1_signingTime(CMS_SignerInfo *si, ASN1_TIME *t)
463	{
464	ASN1_TIME *tt;
465	int r = 0;
466	if (t)
467		tt = t;
468	else
469		tt = X509_gmtime_adj(NULL, 0);
470
471	if (!tt)
472		goto merr;
473
474	if (CMS_signed_add1_attr_by_NID(si, NID_pkcs9_signingTime,
475						tt->type, tt, -1) <= 0)
476		goto merr;
477
478	r = 1;
479
480	merr:
481
482	if (!t)
483		ASN1_TIME_free(tt);
484
485	if (!r)
486		CMSerr(CMS_F_CMS_ADD1_SIGNINGTIME, ERR_R_MALLOC_FAILURE);
487
488	return r;
489
490	}
491
492STACK_OF(CMS_SignerInfo) *CMS_get0_SignerInfos(CMS_ContentInfo *cms)
493	{
494	CMS_SignedData *sd;
495	sd = cms_get0_signed(cms);
496	if (!sd)
497		return NULL;
498	return sd->signerInfos;
499	}
500
501STACK_OF(X509) *CMS_get0_signers(CMS_ContentInfo *cms)
502	{
503	STACK_OF(X509) *signers = NULL;
504	STACK_OF(CMS_SignerInfo) *sinfos;
505	CMS_SignerInfo *si;
506	int i;
507	sinfos = CMS_get0_SignerInfos(cms);
508	for (i = 0; i < sk_CMS_SignerInfo_num(sinfos); i++)
509		{
510		si = sk_CMS_SignerInfo_value(sinfos, i);
511		if (si->signer)
512			{
513			if (!signers)
514				{
515				signers = sk_X509_new_null();
516				if (!signers)
517					return NULL;
518				}
519			if (!sk_X509_push(signers, si->signer))
520				{
521				sk_X509_free(signers);
522				return NULL;
523				}
524			}
525		}
526	return signers;
527	}
528
529void CMS_SignerInfo_set1_signer_cert(CMS_SignerInfo *si, X509 *signer)
530	{
531	if (signer)
532		{
533		CRYPTO_add(&signer->references, 1, CRYPTO_LOCK_X509);
534		if (si->pkey)
535			EVP_PKEY_free(si->pkey);
536		si->pkey = X509_get_pubkey(signer);
537		}
538	if (si->signer)
539		X509_free(si->signer);
540	si->signer = signer;
541	}
542
543int CMS_SignerInfo_get0_signer_id(CMS_SignerInfo *si,
544					ASN1_OCTET_STRING **keyid,
545					X509_NAME **issuer, ASN1_INTEGER **sno)
546	{
547	return cms_SignerIdentifier_get0_signer_id(si->sid, keyid, issuer, sno);
548	}
549
550int CMS_SignerInfo_cert_cmp(CMS_SignerInfo *si, X509 *cert)
551	{
552	return cms_SignerIdentifier_cert_cmp(si->sid, cert);
553	}
554
555int CMS_set1_signers_certs(CMS_ContentInfo *cms, STACK_OF(X509) *scerts,
556				unsigned int flags)
557	{
558	CMS_SignedData *sd;
559	CMS_SignerInfo *si;
560	CMS_CertificateChoices *cch;
561	STACK_OF(CMS_CertificateChoices) *certs;
562	X509 *x;
563	int i, j;
564	int ret = 0;
565	sd = cms_get0_signed(cms);
566	if (!sd)
567		return -1;
568	certs = sd->certificates;
569	for (i = 0; i < sk_CMS_SignerInfo_num(sd->signerInfos); i++)
570		{
571		si = sk_CMS_SignerInfo_value(sd->signerInfos, i);
572		if (si->signer)
573			continue;
574
575		for (j = 0; j < sk_X509_num(scerts); j++)
576			{
577			x = sk_X509_value(scerts, j);
578			if (CMS_SignerInfo_cert_cmp(si, x) == 0)
579				{
580				CMS_SignerInfo_set1_signer_cert(si, x);
581				ret++;
582				break;
583				}
584			}
585
586		if (si->signer || (flags & CMS_NOINTERN))
587			continue;
588
589		for (j = 0; j < sk_CMS_CertificateChoices_num(certs); j++)
590			{
591			cch = sk_CMS_CertificateChoices_value(certs, j);
592			if (cch->type != 0)
593				continue;
594			x = cch->d.certificate;
595			if (CMS_SignerInfo_cert_cmp(si, x) == 0)
596				{
597				CMS_SignerInfo_set1_signer_cert(si, x);
598				ret++;
599				break;
600				}
601			}
602		}
603	return ret;
604	}
605
606void CMS_SignerInfo_get0_algs(CMS_SignerInfo *si, EVP_PKEY **pk, X509 **signer,
607					X509_ALGOR **pdig, X509_ALGOR **psig)
608	{
609	if (pk)
610		*pk = si->pkey;
611	if (signer)
612		*signer = si->signer;
613	if (pdig)
614		*pdig = si->digestAlgorithm;
615	if (psig)
616		*psig = si->signatureAlgorithm;
617	}
618
619static int cms_SignerInfo_content_sign(CMS_ContentInfo *cms,
620					CMS_SignerInfo *si, BIO *chain)
621	{
622	EVP_MD_CTX mctx;
623	int r = 0;
624	EVP_MD_CTX_init(&mctx);
625
626
627	if (!si->pkey)
628		{
629		CMSerr(CMS_F_CMS_SIGNERINFO_CONTENT_SIGN, CMS_R_NO_PRIVATE_KEY);
630		return 0;
631		}
632
633	if (!cms_DigestAlgorithm_find_ctx(&mctx, chain, si->digestAlgorithm))
634		goto err;
635
636	/* If any signed attributes calculate and add messageDigest attribute */
637
638	if (CMS_signed_get_attr_count(si) >= 0)
639		{
640		ASN1_OBJECT *ctype =
641			cms->d.signedData->encapContentInfo->eContentType;
642		unsigned char md[EVP_MAX_MD_SIZE];
643		unsigned int mdlen;
644		EVP_DigestFinal_ex(&mctx, md, &mdlen);
645		if (!CMS_signed_add1_attr_by_NID(si, NID_pkcs9_messageDigest,
646						V_ASN1_OCTET_STRING,
647						md, mdlen))
648			goto err;
649		/* Copy content type across */
650		if (CMS_signed_add1_attr_by_NID(si, NID_pkcs9_contentType,
651					V_ASN1_OBJECT, ctype, -1) <= 0)
652			goto err;
653		if (!CMS_SignerInfo_sign(si))
654			goto err;
655		}
656	else
657		{
658		unsigned char *sig;
659		unsigned int siglen;
660		sig = OPENSSL_malloc(EVP_PKEY_size(si->pkey));
661		if (!sig)
662			{
663			CMSerr(CMS_F_CMS_SIGNERINFO_CONTENT_SIGN,
664					ERR_R_MALLOC_FAILURE);
665			goto err;
666			}
667		if (!EVP_SignFinal(&mctx, sig, &siglen, si->pkey))
668			{
669			CMSerr(CMS_F_CMS_SIGNERINFO_CONTENT_SIGN,
670					CMS_R_SIGNFINAL_ERROR);
671			OPENSSL_free(sig);
672			goto err;
673			}
674		ASN1_STRING_set0(si->signature, sig, siglen);
675		}
676
677	r = 1;
678
679	err:
680	EVP_MD_CTX_cleanup(&mctx);
681	return r;
682
683	}
684
685int cms_SignedData_final(CMS_ContentInfo *cms, BIO *chain)
686	{
687	STACK_OF(CMS_SignerInfo) *sinfos;
688	CMS_SignerInfo *si;
689	int i;
690	sinfos = CMS_get0_SignerInfos(cms);
691	for (i = 0; i < sk_CMS_SignerInfo_num(sinfos); i++)
692		{
693		si = sk_CMS_SignerInfo_value(sinfos, i);
694		if (!cms_SignerInfo_content_sign(cms, si, chain))
695			return 0;
696		}
697	cms->d.signedData->encapContentInfo->partial = 0;
698	return 1;
699	}
700
701int CMS_SignerInfo_sign(CMS_SignerInfo *si)
702	{
703	EVP_MD_CTX mctx;
704	EVP_PKEY_CTX *pctx;
705	unsigned char *abuf = NULL;
706	int alen;
707	size_t siglen;
708	const EVP_MD *md = NULL;
709
710	md = EVP_get_digestbyobj(si->digestAlgorithm->algorithm);
711	if (md == NULL)
712		return 0;
713
714	EVP_MD_CTX_init(&mctx);
715
716	if (CMS_signed_get_attr_by_NID(si, NID_pkcs9_signingTime, -1) < 0)
717		{
718		if (!cms_add1_signingTime(si, NULL))
719			goto err;
720		}
721
722	if (EVP_DigestSignInit(&mctx, &pctx, md, NULL, si->pkey) <= 0)
723		goto err;
724
725	if (EVP_PKEY_CTX_ctrl(pctx, -1, EVP_PKEY_OP_SIGN,
726				EVP_PKEY_CTRL_CMS_SIGN, 0, si) <= 0)
727		{
728		CMSerr(CMS_F_CMS_SIGNERINFO_SIGN, CMS_R_CTRL_ERROR);
729		goto err;
730		}
731
732	alen = ASN1_item_i2d((ASN1_VALUE *)si->signedAttrs,&abuf,
733				ASN1_ITEM_rptr(CMS_Attributes_Sign));
734	if(!abuf)
735		goto err;
736	if (EVP_DigestSignUpdate(&mctx, abuf, alen) <= 0)
737		goto err;
738	if (EVP_DigestSignFinal(&mctx, NULL, &siglen) <= 0)
739		goto err;
740	OPENSSL_free(abuf);
741	abuf = OPENSSL_malloc(siglen);
742	if(!abuf)
743		goto err;
744	if (EVP_DigestSignFinal(&mctx, abuf, &siglen) <= 0)
745		goto err;
746
747	if (EVP_PKEY_CTX_ctrl(pctx, -1, EVP_PKEY_OP_SIGN,
748				EVP_PKEY_CTRL_CMS_SIGN, 1, si) <= 0)
749		{
750		CMSerr(CMS_F_CMS_SIGNERINFO_SIGN, CMS_R_CTRL_ERROR);
751		goto err;
752		}
753
754	EVP_MD_CTX_cleanup(&mctx);
755
756	ASN1_STRING_set0(si->signature, abuf, siglen);
757
758	return 1;
759
760	err:
761	if (abuf)
762		OPENSSL_free(abuf);
763	EVP_MD_CTX_cleanup(&mctx);
764	return 0;
765
766	}
767
768int CMS_SignerInfo_verify(CMS_SignerInfo *si)
769	{
770	EVP_MD_CTX mctx;
771	EVP_PKEY_CTX *pctx;
772	unsigned char *abuf = NULL;
773	int alen, r = -1;
774	const EVP_MD *md = NULL;
775
776	if (!si->pkey)
777		{
778		CMSerr(CMS_F_CMS_SIGNERINFO_VERIFY, CMS_R_NO_PUBLIC_KEY);
779		return -1;
780		}
781
782	md = EVP_get_digestbyobj(si->digestAlgorithm->algorithm);
783	if (md == NULL)
784		return -1;
785	EVP_MD_CTX_init(&mctx);
786	if (EVP_DigestVerifyInit(&mctx, &pctx, md, NULL, si->pkey) <= 0)
787		goto err;
788
789	alen = ASN1_item_i2d((ASN1_VALUE *)si->signedAttrs,&abuf,
790				ASN1_ITEM_rptr(CMS_Attributes_Verify));
791	if(!abuf)
792		goto err;
793	r = EVP_DigestVerifyUpdate(&mctx, abuf, alen);
794	OPENSSL_free(abuf);
795	if (r <= 0)
796		{
797		r = -1;
798		goto err;
799		}
800	r = EVP_DigestVerifyFinal(&mctx,
801			si->signature->data, si->signature->length);
802	if (r <= 0)
803		CMSerr(CMS_F_CMS_SIGNERINFO_VERIFY, CMS_R_VERIFICATION_FAILURE);
804	err:
805	EVP_MD_CTX_cleanup(&mctx);
806	return r;
807	}
808
809/* Create a chain of digest BIOs from a CMS ContentInfo */
810
811BIO *cms_SignedData_init_bio(CMS_ContentInfo *cms)
812	{
813	int i;
814	CMS_SignedData *sd;
815	BIO *chain = NULL;
816	sd = cms_get0_signed(cms);
817	if (!sd)
818		return NULL;
819	if (cms->d.signedData->encapContentInfo->partial)
820		cms_sd_set_version(sd);
821	for (i = 0; i < sk_X509_ALGOR_num(sd->digestAlgorithms); i++)
822		{
823		X509_ALGOR *digestAlgorithm;
824		BIO *mdbio;
825		digestAlgorithm = sk_X509_ALGOR_value(sd->digestAlgorithms, i);
826		mdbio = cms_DigestAlgorithm_init_bio(digestAlgorithm);
827		if (!mdbio)
828			goto err;
829		if (chain)
830			 BIO_push(chain, mdbio);
831		else
832			chain = mdbio;
833		}
834	return chain;
835	err:
836	if (chain)
837		BIO_free_all(chain);
838	return NULL;
839	}
840
841int CMS_SignerInfo_verify_content(CMS_SignerInfo *si, BIO *chain)
842	{
843	ASN1_OCTET_STRING *os = NULL;
844	EVP_MD_CTX mctx;
845	int r = -1;
846	EVP_MD_CTX_init(&mctx);
847	/* If we have any signed attributes look for messageDigest value */
848	if (CMS_signed_get_attr_count(si) >= 0)
849		{
850		os = CMS_signed_get0_data_by_OBJ(si,
851					OBJ_nid2obj(NID_pkcs9_messageDigest),
852					-3, V_ASN1_OCTET_STRING);
853		if (!os)
854			{
855			CMSerr(CMS_F_CMS_SIGNERINFO_VERIFY_CONTENT,
856				CMS_R_ERROR_READING_MESSAGEDIGEST_ATTRIBUTE);
857			goto err;
858			}
859		}
860
861	if (!cms_DigestAlgorithm_find_ctx(&mctx, chain, si->digestAlgorithm))
862		goto err;
863
864	/* If messageDigest found compare it */
865
866	if (os)
867		{
868		unsigned char mval[EVP_MAX_MD_SIZE];
869		unsigned int mlen;
870		if (EVP_DigestFinal_ex(&mctx, mval, &mlen) <= 0)
871			{
872			CMSerr(CMS_F_CMS_SIGNERINFO_VERIFY_CONTENT,
873				CMS_R_UNABLE_TO_FINALIZE_CONTEXT);
874			goto err;
875			}
876		if (mlen != (unsigned int)os->length)
877			{
878			CMSerr(CMS_F_CMS_SIGNERINFO_VERIFY_CONTENT,
879				CMS_R_MESSAGEDIGEST_ATTRIBUTE_WRONG_LENGTH);
880			goto err;
881			}
882
883		if (memcmp(mval, os->data, mlen))
884			{
885			CMSerr(CMS_F_CMS_SIGNERINFO_VERIFY_CONTENT,
886				CMS_R_VERIFICATION_FAILURE);
887			r = 0;
888			}
889		else
890			r = 1;
891		}
892	else
893		{
894		r = EVP_VerifyFinal(&mctx, si->signature->data,
895					si->signature->length, si->pkey);
896		if (r <= 0)
897			{
898			CMSerr(CMS_F_CMS_SIGNERINFO_VERIFY_CONTENT,
899				CMS_R_VERIFICATION_FAILURE);
900			r = 0;
901			}
902		}
903
904	err:
905	EVP_MD_CTX_cleanup(&mctx);
906	return r;
907
908	}
909
910int CMS_add_smimecap(CMS_SignerInfo *si, STACK_OF(X509_ALGOR) *algs)
911	{
912	unsigned char *smder = NULL;
913	int smderlen, r;
914	smderlen = i2d_X509_ALGORS(algs, &smder);
915	if (smderlen <= 0)
916		return 0;
917	r = CMS_signed_add1_attr_by_NID(si, NID_SMIMECapabilities,
918					V_ASN1_SEQUENCE, smder, smderlen);
919	OPENSSL_free(smder);
920	return r;
921	}
922
923int CMS_add_simple_smimecap(STACK_OF(X509_ALGOR) **algs,
924				int algnid, int keysize)
925	{
926	X509_ALGOR *alg;
927	ASN1_INTEGER *key = NULL;
928	if (keysize > 0)
929		{
930		key = ASN1_INTEGER_new();
931		if (!key || !ASN1_INTEGER_set(key, keysize))
932			return 0;
933		}
934	alg = X509_ALGOR_new();
935	if (!alg)
936		{
937		if (key)
938			ASN1_INTEGER_free(key);
939		return 0;
940		}
941
942	X509_ALGOR_set0(alg, OBJ_nid2obj(algnid),
943				key ? V_ASN1_INTEGER : V_ASN1_UNDEF, key);
944	if (!*algs)
945		*algs = sk_X509_ALGOR_new_null();
946	if (!*algs || !sk_X509_ALGOR_push(*algs, alg))
947		{
948		X509_ALGOR_free(alg);
949		return 0;
950		}
951	return 1;
952	}
953
954/* Check to see if a cipher exists and if so add S/MIME capabilities */
955
956static int cms_add_cipher_smcap(STACK_OF(X509_ALGOR) **sk, int nid, int arg)
957	{
958	if (EVP_get_cipherbynid(nid))
959		return CMS_add_simple_smimecap(sk, nid, arg);
960	return 1;
961	}
962
963static int cms_add_digest_smcap(STACK_OF(X509_ALGOR) **sk, int nid, int arg)
964	{
965	if (EVP_get_digestbynid(nid))
966		return CMS_add_simple_smimecap(sk, nid, arg);
967	return 1;
968	}
969
970int CMS_add_standard_smimecap(STACK_OF(X509_ALGOR) **smcap)
971	{
972	if (!cms_add_cipher_smcap(smcap, NID_aes_256_cbc, -1)
973		|| !cms_add_digest_smcap(smcap, NID_id_GostR3411_94, -1)
974		|| !cms_add_cipher_smcap(smcap, NID_id_Gost28147_89, -1)
975		|| !cms_add_cipher_smcap(smcap, NID_aes_192_cbc, -1)
976		|| !cms_add_cipher_smcap(smcap, NID_aes_128_cbc, -1)
977		|| !cms_add_cipher_smcap(smcap, NID_des_ede3_cbc, -1)
978		|| !cms_add_cipher_smcap(smcap, NID_rc2_cbc, 128)
979		|| !cms_add_cipher_smcap(smcap, NID_rc2_cbc, 64)
980		|| !cms_add_cipher_smcap(smcap, NID_des_cbc, -1)
981		|| !cms_add_cipher_smcap(smcap, NID_rc2_cbc, 40))
982		return 0;
983	return 1;
984	}
985