2 * Copyright 1995-2020 The OpenSSL Project Authors. All Rights Reserved.
4 * Licensed under the Apache License 2.0 (the "License"). You may not use
5 * this file except in compliance with the License. You can obtain a copy
6 * in the file LICENSE in the source distribution or at
7 * https://www.openssl.org/source/license.html
11 #include "internal/cryptlib.h"
12 #include <openssl/objects.h>
13 #include <openssl/x509.h>
14 #include "crypto/asn1.h"
15 #include "crypto/evp.h"
16 #include "crypto/x509.h" /* for sk_X509_add1_cert() */
17 #include "pk7_local.h"
19 DEFINE_STACK_OF(PKCS7_RECIP_INFO)
20 DEFINE_STACK_OF(PKCS7_SIGNER_INFO)
22 long PKCS7_ctrl(PKCS7 *p7, int cmd, long larg, char *parg)
27 nid = OBJ_obj2nid(p7->type);
30 /* NOTE(emilia): does not support detached digested data. */
31 case PKCS7_OP_SET_DETACHED_SIGNATURE:
32 if (nid == NID_pkcs7_signed) {
33 ret = p7->detached = (int)larg;
34 if (ret && PKCS7_type_is_data(p7->d.sign->contents)) {
35 ASN1_OCTET_STRING *os;
36 os = p7->d.sign->contents->d.data;
37 ASN1_OCTET_STRING_free(os);
38 p7->d.sign->contents->d.data = NULL;
41 PKCS7err(PKCS7_F_PKCS7_CTRL,
42 PKCS7_R_OPERATION_NOT_SUPPORTED_ON_THIS_TYPE);
46 case PKCS7_OP_GET_DETACHED_SIGNATURE:
47 if (nid == NID_pkcs7_signed) {
48 if (p7->d.sign == NULL || p7->d.sign->contents->d.ptr == NULL)
55 PKCS7err(PKCS7_F_PKCS7_CTRL,
56 PKCS7_R_OPERATION_NOT_SUPPORTED_ON_THIS_TYPE);
62 PKCS7err(PKCS7_F_PKCS7_CTRL, PKCS7_R_UNKNOWN_OPERATION);
68 int PKCS7_content_new(PKCS7 *p7, int type)
72 if ((ret = PKCS7_new()) == NULL)
74 if (!PKCS7_set_type(ret, type))
76 if (!PKCS7_set_content(p7, ret))
85 int PKCS7_set_content(PKCS7 *p7, PKCS7 *p7_data)
89 i = OBJ_obj2nid(p7->type);
91 case NID_pkcs7_signed:
92 PKCS7_free(p7->d.sign->contents);
93 p7->d.sign->contents = p7_data;
95 case NID_pkcs7_digest:
96 PKCS7_free(p7->d.digest->contents);
97 p7->d.digest->contents = p7_data;
100 case NID_pkcs7_enveloped:
101 case NID_pkcs7_signedAndEnveloped:
102 case NID_pkcs7_encrypted:
104 PKCS7err(PKCS7_F_PKCS7_SET_CONTENT, PKCS7_R_UNSUPPORTED_CONTENT_TYPE);
112 int PKCS7_set_type(PKCS7 *p7, int type)
117 * PKCS7_content_free(p7);
119 obj = OBJ_nid2obj(type); /* will not fail */
122 case NID_pkcs7_signed:
124 if ((p7->d.sign = PKCS7_SIGNED_new()) == NULL)
126 if (!ASN1_INTEGER_set(p7->d.sign->version, 1)) {
127 PKCS7_SIGNED_free(p7->d.sign);
134 if ((p7->d.data = ASN1_OCTET_STRING_new()) == NULL)
137 case NID_pkcs7_signedAndEnveloped:
139 if ((p7->d.signed_and_enveloped = PKCS7_SIGN_ENVELOPE_new())
142 if (!ASN1_INTEGER_set(p7->d.signed_and_enveloped->version, 1))
144 p7->d.signed_and_enveloped->enc_data->content_type
145 = OBJ_nid2obj(NID_pkcs7_data);
147 case NID_pkcs7_enveloped:
149 if ((p7->d.enveloped = PKCS7_ENVELOPE_new())
152 if (!ASN1_INTEGER_set(p7->d.enveloped->version, 0))
154 p7->d.enveloped->enc_data->content_type = OBJ_nid2obj(NID_pkcs7_data);
156 case NID_pkcs7_encrypted:
158 if ((p7->d.encrypted = PKCS7_ENCRYPT_new())
161 if (!ASN1_INTEGER_set(p7->d.encrypted->version, 0))
163 p7->d.encrypted->enc_data->content_type = OBJ_nid2obj(NID_pkcs7_data);
166 case NID_pkcs7_digest:
168 if ((p7->d.digest = PKCS7_DIGEST_new())
171 if (!ASN1_INTEGER_set(p7->d.digest->version, 0))
175 PKCS7err(PKCS7_F_PKCS7_SET_TYPE, PKCS7_R_UNSUPPORTED_CONTENT_TYPE);
183 int PKCS7_set0_type_other(PKCS7 *p7, int type, ASN1_TYPE *other)
185 p7->type = OBJ_nid2obj(type);
190 int PKCS7_add_signer(PKCS7 *p7, PKCS7_SIGNER_INFO *psi)
194 STACK_OF(PKCS7_SIGNER_INFO) *signer_sk;
195 STACK_OF(X509_ALGOR) *md_sk;
197 i = OBJ_obj2nid(p7->type);
199 case NID_pkcs7_signed:
200 signer_sk = p7->d.sign->signer_info;
201 md_sk = p7->d.sign->md_algs;
203 case NID_pkcs7_signedAndEnveloped:
204 signer_sk = p7->d.signed_and_enveloped->signer_info;
205 md_sk = p7->d.signed_and_enveloped->md_algs;
208 PKCS7err(PKCS7_F_PKCS7_ADD_SIGNER, PKCS7_R_WRONG_CONTENT_TYPE);
212 nid = OBJ_obj2nid(psi->digest_alg->algorithm);
214 /* If the digest is not currently listed, add it */
216 for (i = 0; i < sk_X509_ALGOR_num(md_sk); i++) {
217 alg = sk_X509_ALGOR_value(md_sk, i);
218 if (OBJ_obj2nid(alg->algorithm) == nid) {
223 if (!j) { /* we need to add another algorithm */
224 if ((alg = X509_ALGOR_new()) == NULL
225 || (alg->parameter = ASN1_TYPE_new()) == NULL) {
226 X509_ALGOR_free(alg);
227 PKCS7err(PKCS7_F_PKCS7_ADD_SIGNER, ERR_R_MALLOC_FAILURE);
230 alg->algorithm = OBJ_nid2obj(nid);
231 alg->parameter->type = V_ASN1_NULL;
232 if (!sk_X509_ALGOR_push(md_sk, alg)) {
233 X509_ALGOR_free(alg);
238 psi->ctx = pkcs7_get0_ctx(p7);
239 if (!sk_PKCS7_SIGNER_INFO_push(signer_sk, psi))
244 int PKCS7_add_certificate(PKCS7 *p7, X509 *x509)
249 i = OBJ_obj2nid(p7->type);
251 case NID_pkcs7_signed:
252 sk = &(p7->d.sign->cert);
254 case NID_pkcs7_signedAndEnveloped:
255 sk = &(p7->d.signed_and_enveloped->cert);
258 PKCS7err(PKCS7_F_PKCS7_ADD_CERTIFICATE, PKCS7_R_WRONG_CONTENT_TYPE);
262 return X509_add_cert_new(sk, x509, X509_ADD_FLAG_UP_REF);
265 int PKCS7_add_crl(PKCS7 *p7, X509_CRL *crl)
268 STACK_OF(X509_CRL) **sk;
270 i = OBJ_obj2nid(p7->type);
272 case NID_pkcs7_signed:
273 sk = &(p7->d.sign->crl);
275 case NID_pkcs7_signedAndEnveloped:
276 sk = &(p7->d.signed_and_enveloped->crl);
279 PKCS7err(PKCS7_F_PKCS7_ADD_CRL, PKCS7_R_WRONG_CONTENT_TYPE);
284 *sk = sk_X509_CRL_new_null();
286 PKCS7err(PKCS7_F_PKCS7_ADD_CRL, ERR_R_MALLOC_FAILURE);
290 X509_CRL_up_ref(crl);
291 if (!sk_X509_CRL_push(*sk, crl)) {
298 int PKCS7_SIGNER_INFO_set(PKCS7_SIGNER_INFO *p7i, X509 *x509, EVP_PKEY *pkey,
303 /* We now need to add another PKCS7_SIGNER_INFO entry */
304 if (!ASN1_INTEGER_set(p7i->version, 1))
306 if (!X509_NAME_set(&p7i->issuer_and_serial->issuer,
307 X509_get_issuer_name(x509)))
311 * because ASN1_INTEGER_set is used to set a 'long' we will do things the
314 ASN1_INTEGER_free(p7i->issuer_and_serial->serial);
315 if (!(p7i->issuer_and_serial->serial =
316 ASN1_INTEGER_dup(X509_get0_serialNumber(x509))))
320 * TODO(3.0) Adapt for provider-native keys
321 * Meanwhile, we downgrade the key.
324 if (!evp_pkey_downgrade(pkey)) {
325 PKCS7err(PKCS7_F_PKCS7_SIGNER_INFO_SET,
326 PKCS7_R_SIGNING_NOT_SUPPORTED_FOR_THIS_KEY_TYPE);
330 /* lets keep the pkey around for a while */
331 EVP_PKEY_up_ref(pkey);
334 /* Set the algorithms */
336 X509_ALGOR_set0(p7i->digest_alg, OBJ_nid2obj(EVP_MD_type(dgst)),
339 if (pkey->ameth && pkey->ameth->pkey_ctrl) {
340 ret = pkey->ameth->pkey_ctrl(pkey, ASN1_PKEY_CTRL_PKCS7_SIGN, 0, p7i);
344 PKCS7err(PKCS7_F_PKCS7_SIGNER_INFO_SET,
345 PKCS7_R_SIGNING_CTRL_FAILURE);
349 PKCS7err(PKCS7_F_PKCS7_SIGNER_INFO_SET,
350 PKCS7_R_SIGNING_NOT_SUPPORTED_FOR_THIS_KEY_TYPE);
355 PKCS7_SIGNER_INFO *PKCS7_add_signature(PKCS7 *p7, X509 *x509, EVP_PKEY *pkey,
358 PKCS7_SIGNER_INFO *si = NULL;
362 if (EVP_PKEY_get_default_digest_nid(pkey, &def_nid) <= 0)
364 dgst = EVP_get_digestbynid(def_nid);
366 PKCS7err(PKCS7_F_PKCS7_ADD_SIGNATURE, PKCS7_R_NO_DEFAULT_DIGEST);
371 if ((si = PKCS7_SIGNER_INFO_new()) == NULL)
373 if (!PKCS7_SIGNER_INFO_set(si, x509, pkey, dgst))
375 if (!PKCS7_add_signer(p7, si))
379 PKCS7_SIGNER_INFO_free(si);
383 static STACK_OF(X509) *pkcs7_get_signer_certs(const PKCS7 *p7)
385 if (PKCS7_type_is_signed(p7))
386 return p7->d.sign->cert;
387 if (PKCS7_type_is_signedAndEnveloped(p7))
388 return p7->d.signed_and_enveloped->cert;
392 static STACK_OF(PKCS7_RECIP_INFO) *pkcs7_get_recipient_info(const PKCS7 *p7)
394 if (PKCS7_type_is_signedAndEnveloped(p7))
395 return p7->d.signed_and_enveloped->recipientinfo;
396 if (PKCS7_type_is_enveloped(p7))
397 return p7->d.enveloped->recipientinfo;
402 * Set up the library context into any loaded structure that needs it.
403 * i.e loaded X509 objects.
405 void pkcs7_resolve_libctx(PKCS7 *p7)
408 const PKCS7_CTX *ctx = pkcs7_get0_ctx(p7);
409 STACK_OF(PKCS7_RECIP_INFO) *rinfos = pkcs7_get_recipient_info(p7);
410 STACK_OF(PKCS7_SIGNER_INFO) *sinfos = PKCS7_get_signer_info(p7);
411 STACK_OF(X509) *certs = pkcs7_get_signer_certs(p7);
416 for (i = 0; i < sk_X509_num(certs); i++)
417 x509_set0_libctx(sk_X509_value(certs, i), ctx->libctx, ctx->propq);
419 for (i = 0; i < sk_PKCS7_RECIP_INFO_num(rinfos); i++) {
420 PKCS7_RECIP_INFO *ri = sk_PKCS7_RECIP_INFO_value(rinfos, i);
422 x509_set0_libctx(ri->cert, ctx->libctx, ctx->propq);
425 for (i = 0; i < sk_PKCS7_SIGNER_INFO_num(sinfos); i++) {
426 PKCS7_SIGNER_INFO *si = sk_PKCS7_SIGNER_INFO_value(sinfos, i);
433 const PKCS7_CTX *pkcs7_get0_ctx(const PKCS7 *p7)
435 return p7 != NULL ? &p7->ctx : NULL;
438 OPENSSL_CTX *pkcs7_ctx_get0_libctx(const PKCS7_CTX *ctx)
440 return ctx != NULL ? ctx->libctx : NULL;
442 const char *pkcs7_ctx_get0_propq(const PKCS7_CTX *ctx)
444 return ctx != NULL ? ctx->propq : NULL;
447 int PKCS7_set_digest(PKCS7 *p7, const EVP_MD *md)
449 if (PKCS7_type_is_digest(p7)) {
450 if ((p7->d.digest->md->parameter = ASN1_TYPE_new()) == NULL) {
451 PKCS7err(PKCS7_F_PKCS7_SET_DIGEST, ERR_R_MALLOC_FAILURE);
454 p7->d.digest->md->parameter->type = V_ASN1_NULL;
455 p7->d.digest->md->algorithm = OBJ_nid2obj(EVP_MD_nid(md));
459 PKCS7err(PKCS7_F_PKCS7_SET_DIGEST, PKCS7_R_WRONG_CONTENT_TYPE);
463 STACK_OF(PKCS7_SIGNER_INFO) *PKCS7_get_signer_info(PKCS7 *p7)
465 if (p7 == NULL || p7->d.ptr == NULL)
467 if (PKCS7_type_is_signed(p7)) {
468 return p7->d.sign->signer_info;
469 } else if (PKCS7_type_is_signedAndEnveloped(p7)) {
470 return p7->d.signed_and_enveloped->signer_info;
475 void PKCS7_SIGNER_INFO_get0_algs(PKCS7_SIGNER_INFO *si, EVP_PKEY **pk,
476 X509_ALGOR **pdig, X509_ALGOR **psig)
481 *pdig = si->digest_alg;
483 *psig = si->digest_enc_alg;
486 void PKCS7_RECIP_INFO_get0_alg(PKCS7_RECIP_INFO *ri, X509_ALGOR **penc)
489 *penc = ri->key_enc_algor;
492 PKCS7_RECIP_INFO *PKCS7_add_recipient(PKCS7 *p7, X509 *x509)
494 PKCS7_RECIP_INFO *ri;
496 if ((ri = PKCS7_RECIP_INFO_new()) == NULL)
498 if (!PKCS7_RECIP_INFO_set(ri, x509))
500 if (!PKCS7_add_recipient_info(p7, ri))
502 ri->ctx = pkcs7_get0_ctx(p7);
505 PKCS7_RECIP_INFO_free(ri);
509 int PKCS7_add_recipient_info(PKCS7 *p7, PKCS7_RECIP_INFO *ri)
512 STACK_OF(PKCS7_RECIP_INFO) *sk;
514 i = OBJ_obj2nid(p7->type);
516 case NID_pkcs7_signedAndEnveloped:
517 sk = p7->d.signed_and_enveloped->recipientinfo;
519 case NID_pkcs7_enveloped:
520 sk = p7->d.enveloped->recipientinfo;
523 PKCS7err(PKCS7_F_PKCS7_ADD_RECIPIENT_INFO,
524 PKCS7_R_WRONG_CONTENT_TYPE);
528 if (!sk_PKCS7_RECIP_INFO_push(sk, ri))
533 int PKCS7_RECIP_INFO_set(PKCS7_RECIP_INFO *p7i, X509 *x509)
536 EVP_PKEY *pkey = NULL;
537 if (!ASN1_INTEGER_set(p7i->version, 0))
539 if (!X509_NAME_set(&p7i->issuer_and_serial->issuer,
540 X509_get_issuer_name(x509)))
543 ASN1_INTEGER_free(p7i->issuer_and_serial->serial);
544 if (!(p7i->issuer_and_serial->serial =
545 ASN1_INTEGER_dup(X509_get0_serialNumber(x509))))
548 pkey = X509_get0_pubkey(x509);
550 if (!pkey || !pkey->ameth || !pkey->ameth->pkey_ctrl) {
551 PKCS7err(PKCS7_F_PKCS7_RECIP_INFO_SET,
552 PKCS7_R_ENCRYPTION_NOT_SUPPORTED_FOR_THIS_KEY_TYPE);
556 ret = pkey->ameth->pkey_ctrl(pkey, ASN1_PKEY_CTRL_PKCS7_ENCRYPT, 0, p7i);
558 PKCS7err(PKCS7_F_PKCS7_RECIP_INFO_SET,
559 PKCS7_R_ENCRYPTION_NOT_SUPPORTED_FOR_THIS_KEY_TYPE);
563 PKCS7err(PKCS7_F_PKCS7_RECIP_INFO_SET,
564 PKCS7_R_ENCRYPTION_CTRL_FAILURE);
577 X509 *PKCS7_cert_from_signer_info(PKCS7 *p7, PKCS7_SIGNER_INFO *si)
579 if (PKCS7_type_is_signed(p7))
580 return (X509_find_by_issuer_and_serial(p7->d.sign->cert,
581 si->issuer_and_serial->issuer,
583 issuer_and_serial->serial));
588 int PKCS7_set_cipher(PKCS7 *p7, const EVP_CIPHER *cipher)
591 PKCS7_ENC_CONTENT *ec;
593 i = OBJ_obj2nid(p7->type);
595 case NID_pkcs7_signedAndEnveloped:
596 ec = p7->d.signed_and_enveloped->enc_data;
598 case NID_pkcs7_enveloped:
599 ec = p7->d.enveloped->enc_data;
602 PKCS7err(PKCS7_F_PKCS7_SET_CIPHER, PKCS7_R_WRONG_CONTENT_TYPE);
606 /* Check cipher OID exists and has data in it */
607 i = EVP_CIPHER_type(cipher);
608 if (i == NID_undef) {
609 PKCS7err(PKCS7_F_PKCS7_SET_CIPHER,
610 PKCS7_R_CIPHER_HAS_NO_OBJECT_IDENTIFIER);
615 ec->ctx = pkcs7_get0_ctx(p7);
619 /* unfortunately cannot constify BIO_new_NDEF() due to this and CMS_stream() */
620 int PKCS7_stream(unsigned char ***boundary, PKCS7 *p7)
622 ASN1_OCTET_STRING *os = NULL;
624 switch (OBJ_obj2nid(p7->type)) {
629 case NID_pkcs7_signedAndEnveloped:
630 os = p7->d.signed_and_enveloped->enc_data->enc_data;
632 os = ASN1_OCTET_STRING_new();
633 p7->d.signed_and_enveloped->enc_data->enc_data = os;
637 case NID_pkcs7_enveloped:
638 os = p7->d.enveloped->enc_data->enc_data;
640 os = ASN1_OCTET_STRING_new();
641 p7->d.enveloped->enc_data->enc_data = os;
645 case NID_pkcs7_signed:
646 os = p7->d.sign->contents->d.data;
657 os->flags |= ASN1_STRING_FLAG_NDEF;
658 *boundary = &os->data;