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"
20 DEFINE_STACK_OF(X509_CRL)
21 DEFINE_STACK_OF(X509_ALGOR)
22 DEFINE_STACK_OF(PKCS7_RECIP_INFO)
23 DEFINE_STACK_OF(PKCS7_SIGNER_INFO)
25 long PKCS7_ctrl(PKCS7 *p7, int cmd, long larg, char *parg)
30 nid = OBJ_obj2nid(p7->type);
33 /* NOTE(emilia): does not support detached digested data. */
34 case PKCS7_OP_SET_DETACHED_SIGNATURE:
35 if (nid == NID_pkcs7_signed) {
36 ret = p7->detached = (int)larg;
37 if (ret && PKCS7_type_is_data(p7->d.sign->contents)) {
38 ASN1_OCTET_STRING *os;
39 os = p7->d.sign->contents->d.data;
40 ASN1_OCTET_STRING_free(os);
41 p7->d.sign->contents->d.data = NULL;
44 PKCS7err(PKCS7_F_PKCS7_CTRL,
45 PKCS7_R_OPERATION_NOT_SUPPORTED_ON_THIS_TYPE);
49 case PKCS7_OP_GET_DETACHED_SIGNATURE:
50 if (nid == NID_pkcs7_signed) {
51 if (p7->d.sign == NULL || p7->d.sign->contents->d.ptr == NULL)
58 PKCS7err(PKCS7_F_PKCS7_CTRL,
59 PKCS7_R_OPERATION_NOT_SUPPORTED_ON_THIS_TYPE);
65 PKCS7err(PKCS7_F_PKCS7_CTRL, PKCS7_R_UNKNOWN_OPERATION);
71 int PKCS7_content_new(PKCS7 *p7, int type)
75 if ((ret = PKCS7_new()) == NULL)
77 if (!PKCS7_set_type(ret, type))
79 if (!PKCS7_set_content(p7, ret))
88 int PKCS7_set_content(PKCS7 *p7, PKCS7 *p7_data)
92 i = OBJ_obj2nid(p7->type);
94 case NID_pkcs7_signed:
95 PKCS7_free(p7->d.sign->contents);
96 p7->d.sign->contents = p7_data;
98 case NID_pkcs7_digest:
99 PKCS7_free(p7->d.digest->contents);
100 p7->d.digest->contents = p7_data;
103 case NID_pkcs7_enveloped:
104 case NID_pkcs7_signedAndEnveloped:
105 case NID_pkcs7_encrypted:
107 PKCS7err(PKCS7_F_PKCS7_SET_CONTENT, PKCS7_R_UNSUPPORTED_CONTENT_TYPE);
115 int PKCS7_set_type(PKCS7 *p7, int type)
120 * PKCS7_content_free(p7);
122 obj = OBJ_nid2obj(type); /* will not fail */
125 case NID_pkcs7_signed:
127 if ((p7->d.sign = PKCS7_SIGNED_new()) == NULL)
129 if (!ASN1_INTEGER_set(p7->d.sign->version, 1)) {
130 PKCS7_SIGNED_free(p7->d.sign);
137 if ((p7->d.data = ASN1_OCTET_STRING_new()) == NULL)
140 case NID_pkcs7_signedAndEnveloped:
142 if ((p7->d.signed_and_enveloped = PKCS7_SIGN_ENVELOPE_new())
145 if (!ASN1_INTEGER_set(p7->d.signed_and_enveloped->version, 1))
147 p7->d.signed_and_enveloped->enc_data->content_type
148 = OBJ_nid2obj(NID_pkcs7_data);
150 case NID_pkcs7_enveloped:
152 if ((p7->d.enveloped = PKCS7_ENVELOPE_new())
155 if (!ASN1_INTEGER_set(p7->d.enveloped->version, 0))
157 p7->d.enveloped->enc_data->content_type = OBJ_nid2obj(NID_pkcs7_data);
159 case NID_pkcs7_encrypted:
161 if ((p7->d.encrypted = PKCS7_ENCRYPT_new())
164 if (!ASN1_INTEGER_set(p7->d.encrypted->version, 0))
166 p7->d.encrypted->enc_data->content_type = OBJ_nid2obj(NID_pkcs7_data);
169 case NID_pkcs7_digest:
171 if ((p7->d.digest = PKCS7_DIGEST_new())
174 if (!ASN1_INTEGER_set(p7->d.digest->version, 0))
178 PKCS7err(PKCS7_F_PKCS7_SET_TYPE, PKCS7_R_UNSUPPORTED_CONTENT_TYPE);
186 int PKCS7_set0_type_other(PKCS7 *p7, int type, ASN1_TYPE *other)
188 p7->type = OBJ_nid2obj(type);
193 int PKCS7_add_signer(PKCS7 *p7, PKCS7_SIGNER_INFO *psi)
197 STACK_OF(PKCS7_SIGNER_INFO) *signer_sk;
198 STACK_OF(X509_ALGOR) *md_sk;
200 i = OBJ_obj2nid(p7->type);
202 case NID_pkcs7_signed:
203 signer_sk = p7->d.sign->signer_info;
204 md_sk = p7->d.sign->md_algs;
206 case NID_pkcs7_signedAndEnveloped:
207 signer_sk = p7->d.signed_and_enveloped->signer_info;
208 md_sk = p7->d.signed_and_enveloped->md_algs;
211 PKCS7err(PKCS7_F_PKCS7_ADD_SIGNER, PKCS7_R_WRONG_CONTENT_TYPE);
215 nid = OBJ_obj2nid(psi->digest_alg->algorithm);
217 /* If the digest is not currently listed, add it */
219 for (i = 0; i < sk_X509_ALGOR_num(md_sk); i++) {
220 alg = sk_X509_ALGOR_value(md_sk, i);
221 if (OBJ_obj2nid(alg->algorithm) == nid) {
226 if (!j) { /* we need to add another algorithm */
227 if ((alg = X509_ALGOR_new()) == NULL
228 || (alg->parameter = ASN1_TYPE_new()) == NULL) {
229 X509_ALGOR_free(alg);
230 PKCS7err(PKCS7_F_PKCS7_ADD_SIGNER, ERR_R_MALLOC_FAILURE);
233 alg->algorithm = OBJ_nid2obj(nid);
234 alg->parameter->type = V_ASN1_NULL;
235 if (!sk_X509_ALGOR_push(md_sk, alg)) {
236 X509_ALGOR_free(alg);
241 psi->ctx = pkcs7_get0_ctx(p7);
242 if (!sk_PKCS7_SIGNER_INFO_push(signer_sk, psi))
247 int PKCS7_add_certificate(PKCS7 *p7, X509 *x509)
252 i = OBJ_obj2nid(p7->type);
254 case NID_pkcs7_signed:
255 sk = &(p7->d.sign->cert);
257 case NID_pkcs7_signedAndEnveloped:
258 sk = &(p7->d.signed_and_enveloped->cert);
261 PKCS7err(PKCS7_F_PKCS7_ADD_CERTIFICATE, PKCS7_R_WRONG_CONTENT_TYPE);
265 return X509_add_cert_new(sk, x509, X509_ADD_FLAG_UP_REF);
268 int PKCS7_add_crl(PKCS7 *p7, X509_CRL *crl)
271 STACK_OF(X509_CRL) **sk;
273 i = OBJ_obj2nid(p7->type);
275 case NID_pkcs7_signed:
276 sk = &(p7->d.sign->crl);
278 case NID_pkcs7_signedAndEnveloped:
279 sk = &(p7->d.signed_and_enveloped->crl);
282 PKCS7err(PKCS7_F_PKCS7_ADD_CRL, PKCS7_R_WRONG_CONTENT_TYPE);
287 *sk = sk_X509_CRL_new_null();
289 PKCS7err(PKCS7_F_PKCS7_ADD_CRL, ERR_R_MALLOC_FAILURE);
293 X509_CRL_up_ref(crl);
294 if (!sk_X509_CRL_push(*sk, crl)) {
301 int PKCS7_SIGNER_INFO_set(PKCS7_SIGNER_INFO *p7i, X509 *x509, EVP_PKEY *pkey,
306 /* We now need to add another PKCS7_SIGNER_INFO entry */
307 if (!ASN1_INTEGER_set(p7i->version, 1))
309 if (!X509_NAME_set(&p7i->issuer_and_serial->issuer,
310 X509_get_issuer_name(x509)))
314 * because ASN1_INTEGER_set is used to set a 'long' we will do things the
317 ASN1_INTEGER_free(p7i->issuer_and_serial->serial);
318 if (!(p7i->issuer_and_serial->serial =
319 ASN1_INTEGER_dup(X509_get0_serialNumber(x509))))
322 /* lets keep the pkey around for a while */
323 EVP_PKEY_up_ref(pkey);
326 /* Set the algorithms */
328 X509_ALGOR_set0(p7i->digest_alg, OBJ_nid2obj(EVP_MD_type(dgst)),
331 if (pkey->ameth && pkey->ameth->pkey_ctrl) {
332 ret = pkey->ameth->pkey_ctrl(pkey, ASN1_PKEY_CTRL_PKCS7_SIGN, 0, p7i);
336 PKCS7err(PKCS7_F_PKCS7_SIGNER_INFO_SET,
337 PKCS7_R_SIGNING_CTRL_FAILURE);
341 PKCS7err(PKCS7_F_PKCS7_SIGNER_INFO_SET,
342 PKCS7_R_SIGNING_NOT_SUPPORTED_FOR_THIS_KEY_TYPE);
347 PKCS7_SIGNER_INFO *PKCS7_add_signature(PKCS7 *p7, X509 *x509, EVP_PKEY *pkey,
350 PKCS7_SIGNER_INFO *si = NULL;
354 if (EVP_PKEY_get_default_digest_nid(pkey, &def_nid) <= 0)
356 dgst = EVP_get_digestbynid(def_nid);
358 PKCS7err(PKCS7_F_PKCS7_ADD_SIGNATURE, PKCS7_R_NO_DEFAULT_DIGEST);
363 if ((si = PKCS7_SIGNER_INFO_new()) == NULL)
365 if (!PKCS7_SIGNER_INFO_set(si, x509, pkey, dgst))
367 if (!PKCS7_add_signer(p7, si))
371 PKCS7_SIGNER_INFO_free(si);
375 static STACK_OF(X509) *pkcs7_get_signer_certs(const PKCS7 *p7)
377 if (PKCS7_type_is_signed(p7))
378 return p7->d.sign->cert;
379 if (PKCS7_type_is_signedAndEnveloped(p7))
380 return p7->d.signed_and_enveloped->cert;
384 static STACK_OF(PKCS7_RECIP_INFO) *pkcs7_get_recipient_info(const PKCS7 *p7)
386 if (PKCS7_type_is_signedAndEnveloped(p7))
387 return p7->d.signed_and_enveloped->recipientinfo;
388 if (PKCS7_type_is_enveloped(p7))
389 return p7->d.enveloped->recipientinfo;
394 * Set up the library context into any loaded structure that needs it.
395 * i.e loaded X509 objects.
397 void pkcs7_resolve_libctx(PKCS7 *p7)
400 const PKCS7_CTX *ctx = pkcs7_get0_ctx(p7);
401 STACK_OF(PKCS7_RECIP_INFO) *rinfos = pkcs7_get_recipient_info(p7);
402 STACK_OF(PKCS7_SIGNER_INFO) *sinfos = PKCS7_get_signer_info(p7);
403 STACK_OF(X509) *certs = pkcs7_get_signer_certs(p7);
408 for (i = 0; i < sk_X509_num(certs); i++)
409 x509_set0_libctx(sk_X509_value(certs, i), ctx->libctx, ctx->propq);
411 for (i = 0; i < sk_PKCS7_RECIP_INFO_num(rinfos); i++) {
412 PKCS7_RECIP_INFO *ri = sk_PKCS7_RECIP_INFO_value(rinfos, i);
414 x509_set0_libctx(ri->cert, ctx->libctx, ctx->propq);
417 for (i = 0; i < sk_PKCS7_SIGNER_INFO_num(sinfos); i++) {
418 PKCS7_SIGNER_INFO *si = sk_PKCS7_SIGNER_INFO_value(sinfos, i);
425 const PKCS7_CTX *pkcs7_get0_ctx(const PKCS7 *p7)
427 return p7 != NULL ? &p7->ctx : NULL;
430 OPENSSL_CTX *pkcs7_ctx_get0_libctx(const PKCS7_CTX *ctx)
432 return ctx != NULL ? ctx->libctx : NULL;
434 const char *pkcs7_ctx_get0_propq(const PKCS7_CTX *ctx)
436 return ctx != NULL ? ctx->propq : NULL;
439 int PKCS7_set_digest(PKCS7 *p7, const EVP_MD *md)
441 if (PKCS7_type_is_digest(p7)) {
442 if ((p7->d.digest->md->parameter = ASN1_TYPE_new()) == NULL) {
443 PKCS7err(PKCS7_F_PKCS7_SET_DIGEST, ERR_R_MALLOC_FAILURE);
446 p7->d.digest->md->parameter->type = V_ASN1_NULL;
447 p7->d.digest->md->algorithm = OBJ_nid2obj(EVP_MD_nid(md));
451 PKCS7err(PKCS7_F_PKCS7_SET_DIGEST, PKCS7_R_WRONG_CONTENT_TYPE);
455 STACK_OF(PKCS7_SIGNER_INFO) *PKCS7_get_signer_info(PKCS7 *p7)
457 if (p7 == NULL || p7->d.ptr == NULL)
459 if (PKCS7_type_is_signed(p7)) {
460 return p7->d.sign->signer_info;
461 } else if (PKCS7_type_is_signedAndEnveloped(p7)) {
462 return p7->d.signed_and_enveloped->signer_info;
467 void PKCS7_SIGNER_INFO_get0_algs(PKCS7_SIGNER_INFO *si, EVP_PKEY **pk,
468 X509_ALGOR **pdig, X509_ALGOR **psig)
473 *pdig = si->digest_alg;
475 *psig = si->digest_enc_alg;
478 void PKCS7_RECIP_INFO_get0_alg(PKCS7_RECIP_INFO *ri, X509_ALGOR **penc)
481 *penc = ri->key_enc_algor;
484 PKCS7_RECIP_INFO *PKCS7_add_recipient(PKCS7 *p7, X509 *x509)
486 PKCS7_RECIP_INFO *ri;
488 if ((ri = PKCS7_RECIP_INFO_new()) == NULL)
490 if (!PKCS7_RECIP_INFO_set(ri, x509))
492 if (!PKCS7_add_recipient_info(p7, ri))
494 ri->ctx = pkcs7_get0_ctx(p7);
497 PKCS7_RECIP_INFO_free(ri);
501 int PKCS7_add_recipient_info(PKCS7 *p7, PKCS7_RECIP_INFO *ri)
504 STACK_OF(PKCS7_RECIP_INFO) *sk;
506 i = OBJ_obj2nid(p7->type);
508 case NID_pkcs7_signedAndEnveloped:
509 sk = p7->d.signed_and_enveloped->recipientinfo;
511 case NID_pkcs7_enveloped:
512 sk = p7->d.enveloped->recipientinfo;
515 PKCS7err(PKCS7_F_PKCS7_ADD_RECIPIENT_INFO,
516 PKCS7_R_WRONG_CONTENT_TYPE);
520 if (!sk_PKCS7_RECIP_INFO_push(sk, ri))
525 int PKCS7_RECIP_INFO_set(PKCS7_RECIP_INFO *p7i, X509 *x509)
528 EVP_PKEY *pkey = NULL;
529 if (!ASN1_INTEGER_set(p7i->version, 0))
531 if (!X509_NAME_set(&p7i->issuer_and_serial->issuer,
532 X509_get_issuer_name(x509)))
535 ASN1_INTEGER_free(p7i->issuer_and_serial->serial);
536 if (!(p7i->issuer_and_serial->serial =
537 ASN1_INTEGER_dup(X509_get0_serialNumber(x509))))
540 pkey = X509_get0_pubkey(x509);
542 if (!pkey || !pkey->ameth || !pkey->ameth->pkey_ctrl) {
543 PKCS7err(PKCS7_F_PKCS7_RECIP_INFO_SET,
544 PKCS7_R_ENCRYPTION_NOT_SUPPORTED_FOR_THIS_KEY_TYPE);
548 ret = pkey->ameth->pkey_ctrl(pkey, ASN1_PKEY_CTRL_PKCS7_ENCRYPT, 0, p7i);
550 PKCS7err(PKCS7_F_PKCS7_RECIP_INFO_SET,
551 PKCS7_R_ENCRYPTION_NOT_SUPPORTED_FOR_THIS_KEY_TYPE);
555 PKCS7err(PKCS7_F_PKCS7_RECIP_INFO_SET,
556 PKCS7_R_ENCRYPTION_CTRL_FAILURE);
569 X509 *PKCS7_cert_from_signer_info(PKCS7 *p7, PKCS7_SIGNER_INFO *si)
571 if (PKCS7_type_is_signed(p7))
572 return (X509_find_by_issuer_and_serial(p7->d.sign->cert,
573 si->issuer_and_serial->issuer,
575 issuer_and_serial->serial));
580 int PKCS7_set_cipher(PKCS7 *p7, const EVP_CIPHER *cipher)
583 PKCS7_ENC_CONTENT *ec;
585 i = OBJ_obj2nid(p7->type);
587 case NID_pkcs7_signedAndEnveloped:
588 ec = p7->d.signed_and_enveloped->enc_data;
590 case NID_pkcs7_enveloped:
591 ec = p7->d.enveloped->enc_data;
594 PKCS7err(PKCS7_F_PKCS7_SET_CIPHER, PKCS7_R_WRONG_CONTENT_TYPE);
598 /* Check cipher OID exists and has data in it */
599 i = EVP_CIPHER_type(cipher);
600 if (i == NID_undef) {
601 PKCS7err(PKCS7_F_PKCS7_SET_CIPHER,
602 PKCS7_R_CIPHER_HAS_NO_OBJECT_IDENTIFIER);
607 ec->ctx = pkcs7_get0_ctx(p7);
611 /* unfortunately cannot constify BIO_new_NDEF() due to this and CMS_stream() */
612 int PKCS7_stream(unsigned char ***boundary, PKCS7 *p7)
614 ASN1_OCTET_STRING *os = NULL;
616 switch (OBJ_obj2nid(p7->type)) {
621 case NID_pkcs7_signedAndEnveloped:
622 os = p7->d.signed_and_enveloped->enc_data->enc_data;
624 os = ASN1_OCTET_STRING_new();
625 p7->d.signed_and_enveloped->enc_data->enc_data = os;
629 case NID_pkcs7_enveloped:
630 os = p7->d.enveloped->enc_data->enc_data;
632 os = ASN1_OCTET_STRING_new();
633 p7->d.enveloped->enc_data->enc_data = os;
637 case NID_pkcs7_signed:
638 os = p7->d.sign->contents->d.data;
649 os->flags |= ASN1_STRING_FLAG_NDEF;
650 *boundary = &os->data;