2 * Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL
5 /* ====================================================================
6 * Copyright (c) 2008 The OpenSSL Project. All rights reserved.
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
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
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/)"
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.
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.
34 * 6. Redistributions of any form whatsoever must retain the following
36 * "This product includes software developed by the OpenSSL Project
37 * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
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 * ====================================================================
54 #include <openssl/asn1t.h>
55 #include <openssl/x509v3.h>
56 #include <openssl/err.h>
57 #include <openssl/pem.h>
58 #include <openssl/bio.h>
59 #include <openssl/asn1.h>
60 #include <openssl/cms.h>
63 IMPLEMENT_ASN1_FUNCTIONS(CMS_ContentInfo
)
64 IMPLEMENT_ASN1_PRINT_FUNCTION(CMS_ContentInfo
)
66 const ASN1_OBJECT
*CMS_get0_type(CMS_ContentInfo
*cms
)
68 return cms
->contentType
;
71 CMS_ContentInfo
*cms_Data_create(void)
74 cms
= CMS_ContentInfo_new();
76 cms
->contentType
= OBJ_nid2obj(NID_pkcs7_data
);
78 CMS_set_detached(cms
, 0);
83 BIO
*cms_content_bio(CMS_ContentInfo
*cms
)
85 ASN1_OCTET_STRING
**pos
= CMS_get0_content(cms
);
88 /* If content detached data goes nowhere: create NULL BIO */
90 return BIO_new(BIO_s_null());
92 * If content not detached and created return memory BIO
94 if (!*pos
|| ((*pos
)->flags
== ASN1_STRING_FLAG_CONT
))
95 return BIO_new(BIO_s_mem());
96 /* Else content was read in: return read only BIO for it */
97 return BIO_new_mem_buf((*pos
)->data
, (*pos
)->length
);
100 BIO
*CMS_dataInit(CMS_ContentInfo
*cms
, BIO
*icont
)
106 cont
= cms_content_bio(cms
);
108 CMSerr(CMS_F_CMS_DATAINIT
, CMS_R_NO_CONTENT
);
111 switch (OBJ_obj2nid(cms
->contentType
)) {
116 case NID_pkcs7_signed
:
117 cmsbio
= cms_SignedData_init_bio(cms
);
120 case NID_pkcs7_digest
:
121 cmsbio
= cms_DigestedData_init_bio(cms
);
124 case NID_id_smime_ct_compressedData
:
125 cmsbio
= cms_CompressedData_init_bio(cms
);
129 case NID_pkcs7_encrypted
:
130 cmsbio
= cms_EncryptedData_init_bio(cms
);
133 case NID_pkcs7_enveloped
:
134 cmsbio
= cms_EnvelopedData_init_bio(cms
);
138 CMSerr(CMS_F_CMS_DATAINIT
, CMS_R_UNSUPPORTED_TYPE
);
143 return BIO_push(cmsbio
, cont
);
151 int CMS_dataFinal(CMS_ContentInfo
*cms
, BIO
*cmsbio
)
153 ASN1_OCTET_STRING
**pos
= CMS_get0_content(cms
);
156 /* If ebmedded content find memory BIO and set content */
157 if (*pos
&& ((*pos
)->flags
& ASN1_STRING_FLAG_CONT
)) {
161 mbio
= BIO_find_type(cmsbio
, BIO_TYPE_MEM
);
163 CMSerr(CMS_F_CMS_DATAFINAL
, CMS_R_CONTENT_NOT_FOUND
);
166 contlen
= BIO_get_mem_data(mbio
, &cont
);
167 /* Set bio as read only so its content can't be clobbered */
168 BIO_set_flags(mbio
, BIO_FLAGS_MEM_RDONLY
);
169 BIO_set_mem_eof_return(mbio
, 0);
170 ASN1_STRING_set0(*pos
, cont
, contlen
);
171 (*pos
)->flags
&= ~ASN1_STRING_FLAG_CONT
;
174 switch (OBJ_obj2nid(cms
->contentType
)) {
177 case NID_pkcs7_enveloped
:
178 case NID_pkcs7_encrypted
:
179 case NID_id_smime_ct_compressedData
:
183 case NID_pkcs7_signed
:
184 return cms_SignedData_final(cms
, cmsbio
);
186 case NID_pkcs7_digest
:
187 return cms_DigestedData_do_final(cms
, cmsbio
, 0);
190 CMSerr(CMS_F_CMS_DATAFINAL
, CMS_R_UNSUPPORTED_TYPE
);
196 * Return an OCTET STRING pointer to content. This allows it to be accessed
200 ASN1_OCTET_STRING
**CMS_get0_content(CMS_ContentInfo
*cms
)
202 switch (OBJ_obj2nid(cms
->contentType
)) {
207 case NID_pkcs7_signed
:
208 return &cms
->d
.signedData
->encapContentInfo
->eContent
;
210 case NID_pkcs7_enveloped
:
211 return &cms
->d
.envelopedData
->encryptedContentInfo
->encryptedContent
;
213 case NID_pkcs7_digest
:
214 return &cms
->d
.digestedData
->encapContentInfo
->eContent
;
216 case NID_pkcs7_encrypted
:
217 return &cms
->d
.encryptedData
->encryptedContentInfo
->encryptedContent
;
219 case NID_id_smime_ct_authData
:
220 return &cms
->d
.authenticatedData
->encapContentInfo
->eContent
;
222 case NID_id_smime_ct_compressedData
:
223 return &cms
->d
.compressedData
->encapContentInfo
->eContent
;
226 if (cms
->d
.other
->type
== V_ASN1_OCTET_STRING
)
227 return &cms
->d
.other
->value
.octet_string
;
228 CMSerr(CMS_F_CMS_GET0_CONTENT
, CMS_R_UNSUPPORTED_CONTENT_TYPE
);
235 * Return an ASN1_OBJECT pointer to content type. This allows it to be
236 * accessed or set later.
239 static ASN1_OBJECT
**cms_get0_econtent_type(CMS_ContentInfo
*cms
)
241 switch (OBJ_obj2nid(cms
->contentType
)) {
243 case NID_pkcs7_signed
:
244 return &cms
->d
.signedData
->encapContentInfo
->eContentType
;
246 case NID_pkcs7_enveloped
:
247 return &cms
->d
.envelopedData
->encryptedContentInfo
->contentType
;
249 case NID_pkcs7_digest
:
250 return &cms
->d
.digestedData
->encapContentInfo
->eContentType
;
252 case NID_pkcs7_encrypted
:
253 return &cms
->d
.encryptedData
->encryptedContentInfo
->contentType
;
255 case NID_id_smime_ct_authData
:
256 return &cms
->d
.authenticatedData
->encapContentInfo
->eContentType
;
258 case NID_id_smime_ct_compressedData
:
259 return &cms
->d
.compressedData
->encapContentInfo
->eContentType
;
262 CMSerr(CMS_F_CMS_GET0_ECONTENT_TYPE
, CMS_R_UNSUPPORTED_CONTENT_TYPE
);
268 const ASN1_OBJECT
*CMS_get0_eContentType(CMS_ContentInfo
*cms
)
270 ASN1_OBJECT
**petype
;
271 petype
= cms_get0_econtent_type(cms
);
277 int CMS_set1_eContentType(CMS_ContentInfo
*cms
, const ASN1_OBJECT
*oid
)
279 ASN1_OBJECT
**petype
, *etype
;
280 petype
= cms_get0_econtent_type(cms
);
285 etype
= OBJ_dup(oid
);
288 ASN1_OBJECT_free(*petype
);
293 int CMS_is_detached(CMS_ContentInfo
*cms
)
295 ASN1_OCTET_STRING
**pos
;
296 pos
= CMS_get0_content(cms
);
304 int CMS_set_detached(CMS_ContentInfo
*cms
, int detached
)
306 ASN1_OCTET_STRING
**pos
;
307 pos
= CMS_get0_content(cms
);
311 ASN1_OCTET_STRING_free(*pos
);
316 *pos
= ASN1_OCTET_STRING_new();
319 * NB: special flag to show content is created and not read in.
321 (*pos
)->flags
|= ASN1_STRING_FLAG_CONT
;
324 CMSerr(CMS_F_CMS_SET_DETACHED
, ERR_R_MALLOC_FAILURE
);
328 /* Create a digest BIO from an X509_ALGOR structure */
330 BIO
*cms_DigestAlgorithm_init_bio(X509_ALGOR
*digestAlgorithm
)
333 ASN1_OBJECT
*digestoid
;
334 const EVP_MD
*digest
;
335 X509_ALGOR_get0(&digestoid
, NULL
, NULL
, digestAlgorithm
);
336 digest
= EVP_get_digestbyobj(digestoid
);
338 CMSerr(CMS_F_CMS_DIGESTALGORITHM_INIT_BIO
,
339 CMS_R_UNKNOWN_DIGEST_ALGORIHM
);
342 mdbio
= BIO_new(BIO_f_md());
343 if (mdbio
== NULL
|| !BIO_set_md(mdbio
, digest
)) {
344 CMSerr(CMS_F_CMS_DIGESTALGORITHM_INIT_BIO
, CMS_R_MD_BIO_INIT_ERROR
);
353 /* Locate a message digest content from a BIO chain based on SignerInfo */
355 int cms_DigestAlgorithm_find_ctx(EVP_MD_CTX
*mctx
, BIO
*chain
,
360 X509_ALGOR_get0(&mdoid
, NULL
, NULL
, mdalg
);
361 nid
= OBJ_obj2nid(mdoid
);
362 /* Look for digest type to match signature */
365 chain
= BIO_find_type(chain
, BIO_TYPE_MD
);
367 CMSerr(CMS_F_CMS_DIGESTALGORITHM_FIND_CTX
,
368 CMS_R_NO_MATCHING_DIGEST
);
371 BIO_get_md_ctx(chain
, &mtmp
);
372 if (EVP_MD_CTX_type(mtmp
) == nid
374 * Workaround for broken implementations that use signature
375 * algorithm OID instead of digest.
377 || EVP_MD_pkey_type(EVP_MD_CTX_md(mtmp
)) == nid
)
378 return EVP_MD_CTX_copy_ex(mctx
, mtmp
);
379 chain
= BIO_next(chain
);
383 static STACK_OF(CMS_CertificateChoices
)
384 **cms_get0_certificate_choices(CMS_ContentInfo
*cms
)
386 switch (OBJ_obj2nid(cms
->contentType
)) {
388 case NID_pkcs7_signed
:
389 return &cms
->d
.signedData
->certificates
;
391 case NID_pkcs7_enveloped
:
392 return &cms
->d
.envelopedData
->originatorInfo
->certificates
;
395 CMSerr(CMS_F_CMS_GET0_CERTIFICATE_CHOICES
,
396 CMS_R_UNSUPPORTED_CONTENT_TYPE
);
402 CMS_CertificateChoices
*CMS_add0_CertificateChoices(CMS_ContentInfo
*cms
)
404 STACK_OF(CMS_CertificateChoices
) **pcerts
;
405 CMS_CertificateChoices
*cch
;
406 pcerts
= cms_get0_certificate_choices(cms
);
410 *pcerts
= sk_CMS_CertificateChoices_new_null();
413 cch
= M_ASN1_new_of(CMS_CertificateChoices
);
416 if (!sk_CMS_CertificateChoices_push(*pcerts
, cch
)) {
417 M_ASN1_free_of(cch
, CMS_CertificateChoices
);
423 int CMS_add0_cert(CMS_ContentInfo
*cms
, X509
*cert
)
425 CMS_CertificateChoices
*cch
;
426 STACK_OF(CMS_CertificateChoices
) **pcerts
;
428 pcerts
= cms_get0_certificate_choices(cms
);
431 for (i
= 0; i
< sk_CMS_CertificateChoices_num(*pcerts
); i
++) {
432 cch
= sk_CMS_CertificateChoices_value(*pcerts
, i
);
433 if (cch
->type
== CMS_CERTCHOICE_CERT
) {
434 if (!X509_cmp(cch
->d
.certificate
, cert
)) {
435 CMSerr(CMS_F_CMS_ADD0_CERT
,
436 CMS_R_CERTIFICATE_ALREADY_PRESENT
);
441 cch
= CMS_add0_CertificateChoices(cms
);
444 cch
->type
= CMS_CERTCHOICE_CERT
;
445 cch
->d
.certificate
= cert
;
449 int CMS_add1_cert(CMS_ContentInfo
*cms
, X509
*cert
)
452 r
= CMS_add0_cert(cms
, cert
);
458 static STACK_OF(CMS_RevocationInfoChoice
)
459 **cms_get0_revocation_choices(CMS_ContentInfo
*cms
)
461 switch (OBJ_obj2nid(cms
->contentType
)) {
463 case NID_pkcs7_signed
:
464 return &cms
->d
.signedData
->crls
;
466 case NID_pkcs7_enveloped
:
467 return &cms
->d
.envelopedData
->originatorInfo
->crls
;
470 CMSerr(CMS_F_CMS_GET0_REVOCATION_CHOICES
,
471 CMS_R_UNSUPPORTED_CONTENT_TYPE
);
477 CMS_RevocationInfoChoice
*CMS_add0_RevocationInfoChoice(CMS_ContentInfo
*cms
)
479 STACK_OF(CMS_RevocationInfoChoice
) **pcrls
;
480 CMS_RevocationInfoChoice
*rch
;
481 pcrls
= cms_get0_revocation_choices(cms
);
485 *pcrls
= sk_CMS_RevocationInfoChoice_new_null();
488 rch
= M_ASN1_new_of(CMS_RevocationInfoChoice
);
491 if (!sk_CMS_RevocationInfoChoice_push(*pcrls
, rch
)) {
492 M_ASN1_free_of(rch
, CMS_RevocationInfoChoice
);
498 int CMS_add0_crl(CMS_ContentInfo
*cms
, X509_CRL
*crl
)
500 CMS_RevocationInfoChoice
*rch
;
501 rch
= CMS_add0_RevocationInfoChoice(cms
);
504 rch
->type
= CMS_REVCHOICE_CRL
;
509 int CMS_add1_crl(CMS_ContentInfo
*cms
, X509_CRL
*crl
)
512 r
= CMS_add0_crl(cms
, crl
);
514 X509_CRL_up_ref(crl
);
518 STACK_OF(X509
) *CMS_get1_certs(CMS_ContentInfo
*cms
)
520 STACK_OF(X509
) *certs
= NULL
;
521 CMS_CertificateChoices
*cch
;
522 STACK_OF(CMS_CertificateChoices
) **pcerts
;
524 pcerts
= cms_get0_certificate_choices(cms
);
527 for (i
= 0; i
< sk_CMS_CertificateChoices_num(*pcerts
); i
++) {
528 cch
= sk_CMS_CertificateChoices_value(*pcerts
, i
);
529 if (cch
->type
== 0) {
531 certs
= sk_X509_new_null();
535 if (!sk_X509_push(certs
, cch
->d
.certificate
)) {
536 sk_X509_pop_free(certs
, X509_free
);
539 X509_up_ref(cch
->d
.certificate
);
546 STACK_OF(X509_CRL
) *CMS_get1_crls(CMS_ContentInfo
*cms
)
548 STACK_OF(X509_CRL
) *crls
= NULL
;
549 STACK_OF(CMS_RevocationInfoChoice
) **pcrls
;
550 CMS_RevocationInfoChoice
*rch
;
552 pcrls
= cms_get0_revocation_choices(cms
);
555 for (i
= 0; i
< sk_CMS_RevocationInfoChoice_num(*pcrls
); i
++) {
556 rch
= sk_CMS_RevocationInfoChoice_value(*pcrls
, i
);
557 if (rch
->type
== 0) {
559 crls
= sk_X509_CRL_new_null();
563 if (!sk_X509_CRL_push(crls
, rch
->d
.crl
)) {
564 sk_X509_CRL_pop_free(crls
, X509_CRL_free
);
567 X509_CRL_up_ref(rch
->d
.crl
);
573 int cms_ias_cert_cmp(CMS_IssuerAndSerialNumber
*ias
, X509
*cert
)
576 ret
= X509_NAME_cmp(ias
->issuer
, X509_get_issuer_name(cert
));
579 return ASN1_INTEGER_cmp(ias
->serialNumber
, X509_get_serialNumber(cert
));
582 int cms_keyid_cert_cmp(ASN1_OCTET_STRING
*keyid
, X509
*cert
)
584 const ASN1_OCTET_STRING
*cert_keyid
= X509_get0_subject_key_id(cert
);
586 if (cert_keyid
== NULL
)
588 return ASN1_OCTET_STRING_cmp(keyid
, cert_keyid
);
591 int cms_set1_ias(CMS_IssuerAndSerialNumber
**pias
, X509
*cert
)
593 CMS_IssuerAndSerialNumber
*ias
;
594 ias
= M_ASN1_new_of(CMS_IssuerAndSerialNumber
);
597 if (!X509_NAME_set(&ias
->issuer
, X509_get_issuer_name(cert
)))
599 if (!ASN1_STRING_copy(ias
->serialNumber
, X509_get_serialNumber(cert
)))
601 M_ASN1_free_of(*pias
, CMS_IssuerAndSerialNumber
);
605 M_ASN1_free_of(ias
, CMS_IssuerAndSerialNumber
);
606 CMSerr(CMS_F_CMS_SET1_IAS
, ERR_R_MALLOC_FAILURE
);
610 int cms_set1_keyid(ASN1_OCTET_STRING
**pkeyid
, X509
*cert
)
612 ASN1_OCTET_STRING
*keyid
= NULL
;
613 const ASN1_OCTET_STRING
*cert_keyid
;
614 cert_keyid
= X509_get0_subject_key_id(cert
);
615 if (cert_keyid
== NULL
) {
616 CMSerr(CMS_F_CMS_SET1_KEYID
, CMS_R_CERTIFICATE_HAS_NO_KEYID
);
619 keyid
= ASN1_STRING_dup(cert_keyid
);
621 CMSerr(CMS_F_CMS_SET1_KEYID
, ERR_R_MALLOC_FAILURE
);
624 ASN1_OCTET_STRING_free(*pkeyid
);