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"
18 DEFINE_STACK_OF(X509_CRL)
19 DEFINE_STACK_OF(X509_ALGOR)
20 DEFINE_STACK_OF(PKCS7_RECIP_INFO)
21 DEFINE_STACK_OF(PKCS7_SIGNER_INFO)
23 long PKCS7_ctrl(PKCS7 *p7, int cmd, long larg, char *parg)
28 nid = OBJ_obj2nid(p7->type);
31 /* NOTE(emilia): does not support detached digested data. */
32 case PKCS7_OP_SET_DETACHED_SIGNATURE:
33 if (nid == NID_pkcs7_signed) {
34 ret = p7->detached = (int)larg;
35 if (ret && PKCS7_type_is_data(p7->d.sign->contents)) {
36 ASN1_OCTET_STRING *os;
37 os = p7->d.sign->contents->d.data;
38 ASN1_OCTET_STRING_free(os);
39 p7->d.sign->contents->d.data = NULL;
42 PKCS7err(PKCS7_F_PKCS7_CTRL,
43 PKCS7_R_OPERATION_NOT_SUPPORTED_ON_THIS_TYPE);
47 case PKCS7_OP_GET_DETACHED_SIGNATURE:
48 if (nid == NID_pkcs7_signed) {
49 if (p7->d.sign == NULL || p7->d.sign->contents->d.ptr == NULL)
56 PKCS7err(PKCS7_F_PKCS7_CTRL,
57 PKCS7_R_OPERATION_NOT_SUPPORTED_ON_THIS_TYPE);
63 PKCS7err(PKCS7_F_PKCS7_CTRL, PKCS7_R_UNKNOWN_OPERATION);
69 int PKCS7_content_new(PKCS7 *p7, int type)
73 if ((ret = PKCS7_new()) == NULL)
75 if (!PKCS7_set_type(ret, type))
77 if (!PKCS7_set_content(p7, ret))
86 int PKCS7_set_content(PKCS7 *p7, PKCS7 *p7_data)
90 i = OBJ_obj2nid(p7->type);
92 case NID_pkcs7_signed:
93 PKCS7_free(p7->d.sign->contents);
94 p7->d.sign->contents = p7_data;
96 case NID_pkcs7_digest:
97 PKCS7_free(p7->d.digest->contents);
98 p7->d.digest->contents = p7_data;
101 case NID_pkcs7_enveloped:
102 case NID_pkcs7_signedAndEnveloped:
103 case NID_pkcs7_encrypted:
105 PKCS7err(PKCS7_F_PKCS7_SET_CONTENT, PKCS7_R_UNSUPPORTED_CONTENT_TYPE);
113 int PKCS7_set_type(PKCS7 *p7, int type)
118 * PKCS7_content_free(p7);
120 obj = OBJ_nid2obj(type); /* will not fail */
123 case NID_pkcs7_signed:
125 if ((p7->d.sign = PKCS7_SIGNED_new()) == NULL)
127 if (!ASN1_INTEGER_set(p7->d.sign->version, 1)) {
128 PKCS7_SIGNED_free(p7->d.sign);
135 if ((p7->d.data = ASN1_OCTET_STRING_new()) == NULL)
138 case NID_pkcs7_signedAndEnveloped:
140 if ((p7->d.signed_and_enveloped = PKCS7_SIGN_ENVELOPE_new())
143 if (!ASN1_INTEGER_set(p7->d.signed_and_enveloped->version, 1))
145 p7->d.signed_and_enveloped->enc_data->content_type
146 = OBJ_nid2obj(NID_pkcs7_data);
148 case NID_pkcs7_enveloped:
150 if ((p7->d.enveloped = PKCS7_ENVELOPE_new())
153 if (!ASN1_INTEGER_set(p7->d.enveloped->version, 0))
155 p7->d.enveloped->enc_data->content_type = OBJ_nid2obj(NID_pkcs7_data);
157 case NID_pkcs7_encrypted:
159 if ((p7->d.encrypted = PKCS7_ENCRYPT_new())
162 if (!ASN1_INTEGER_set(p7->d.encrypted->version, 0))
164 p7->d.encrypted->enc_data->content_type = OBJ_nid2obj(NID_pkcs7_data);
167 case NID_pkcs7_digest:
169 if ((p7->d.digest = PKCS7_DIGEST_new())
172 if (!ASN1_INTEGER_set(p7->d.digest->version, 0))
176 PKCS7err(PKCS7_F_PKCS7_SET_TYPE, PKCS7_R_UNSUPPORTED_CONTENT_TYPE);
184 int PKCS7_set0_type_other(PKCS7 *p7, int type, ASN1_TYPE *other)
186 p7->type = OBJ_nid2obj(type);
191 int PKCS7_add_signer(PKCS7 *p7, PKCS7_SIGNER_INFO *psi)
195 STACK_OF(PKCS7_SIGNER_INFO) *signer_sk;
196 STACK_OF(X509_ALGOR) *md_sk;
198 i = OBJ_obj2nid(p7->type);
200 case NID_pkcs7_signed:
201 signer_sk = p7->d.sign->signer_info;
202 md_sk = p7->d.sign->md_algs;
204 case NID_pkcs7_signedAndEnveloped:
205 signer_sk = p7->d.signed_and_enveloped->signer_info;
206 md_sk = p7->d.signed_and_enveloped->md_algs;
209 PKCS7err(PKCS7_F_PKCS7_ADD_SIGNER, PKCS7_R_WRONG_CONTENT_TYPE);
213 nid = OBJ_obj2nid(psi->digest_alg->algorithm);
215 /* If the digest is not currently listed, add it */
217 for (i = 0; i < sk_X509_ALGOR_num(md_sk); i++) {
218 alg = sk_X509_ALGOR_value(md_sk, i);
219 if (OBJ_obj2nid(alg->algorithm) == nid) {
224 if (!j) { /* we need to add another algorithm */
225 if ((alg = X509_ALGOR_new()) == NULL
226 || (alg->parameter = ASN1_TYPE_new()) == NULL) {
227 X509_ALGOR_free(alg);
228 PKCS7err(PKCS7_F_PKCS7_ADD_SIGNER, ERR_R_MALLOC_FAILURE);
231 alg->algorithm = OBJ_nid2obj(nid);
232 alg->parameter->type = V_ASN1_NULL;
233 if (!sk_X509_ALGOR_push(md_sk, alg)) {
234 X509_ALGOR_free(alg);
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);
263 *sk = sk_X509_new_null();
265 PKCS7err(PKCS7_F_PKCS7_ADD_CERTIFICATE, ERR_R_MALLOC_FAILURE);
269 if (!sk_X509_push(*sk, x509)) {
276 int PKCS7_add_crl(PKCS7 *p7, X509_CRL *crl)
279 STACK_OF(X509_CRL) **sk;
281 i = OBJ_obj2nid(p7->type);
283 case NID_pkcs7_signed:
284 sk = &(p7->d.sign->crl);
286 case NID_pkcs7_signedAndEnveloped:
287 sk = &(p7->d.signed_and_enveloped->crl);
290 PKCS7err(PKCS7_F_PKCS7_ADD_CRL, PKCS7_R_WRONG_CONTENT_TYPE);
295 *sk = sk_X509_CRL_new_null();
297 PKCS7err(PKCS7_F_PKCS7_ADD_CRL, ERR_R_MALLOC_FAILURE);
301 X509_CRL_up_ref(crl);
302 if (!sk_X509_CRL_push(*sk, crl)) {
309 int PKCS7_SIGNER_INFO_set(PKCS7_SIGNER_INFO *p7i, X509 *x509, EVP_PKEY *pkey,
314 /* We now need to add another PKCS7_SIGNER_INFO entry */
315 if (!ASN1_INTEGER_set(p7i->version, 1))
317 if (!X509_NAME_set(&p7i->issuer_and_serial->issuer,
318 X509_get_issuer_name(x509)))
322 * because ASN1_INTEGER_set is used to set a 'long' we will do things the
325 ASN1_INTEGER_free(p7i->issuer_and_serial->serial);
326 if (!(p7i->issuer_and_serial->serial =
327 ASN1_INTEGER_dup(X509_get_serialNumber(x509))))
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 int PKCS7_set_digest(PKCS7 *p7, const EVP_MD *md)
385 if (PKCS7_type_is_digest(p7)) {
386 if ((p7->d.digest->md->parameter = ASN1_TYPE_new()) == NULL) {
387 PKCS7err(PKCS7_F_PKCS7_SET_DIGEST, ERR_R_MALLOC_FAILURE);
390 p7->d.digest->md->parameter->type = V_ASN1_NULL;
391 p7->d.digest->md->algorithm = OBJ_nid2obj(EVP_MD_nid(md));
395 PKCS7err(PKCS7_F_PKCS7_SET_DIGEST, PKCS7_R_WRONG_CONTENT_TYPE);
399 STACK_OF(PKCS7_SIGNER_INFO) *PKCS7_get_signer_info(PKCS7 *p7)
401 if (p7 == NULL || p7->d.ptr == NULL)
403 if (PKCS7_type_is_signed(p7)) {
404 return p7->d.sign->signer_info;
405 } else if (PKCS7_type_is_signedAndEnveloped(p7)) {
406 return p7->d.signed_and_enveloped->signer_info;
411 void PKCS7_SIGNER_INFO_get0_algs(PKCS7_SIGNER_INFO *si, EVP_PKEY **pk,
412 X509_ALGOR **pdig, X509_ALGOR **psig)
417 *pdig = si->digest_alg;
419 *psig = si->digest_enc_alg;
422 void PKCS7_RECIP_INFO_get0_alg(PKCS7_RECIP_INFO *ri, X509_ALGOR **penc)
425 *penc = ri->key_enc_algor;
428 PKCS7_RECIP_INFO *PKCS7_add_recipient(PKCS7 *p7, X509 *x509)
430 PKCS7_RECIP_INFO *ri;
432 if ((ri = PKCS7_RECIP_INFO_new()) == NULL)
434 if (!PKCS7_RECIP_INFO_set(ri, x509))
436 if (!PKCS7_add_recipient_info(p7, ri))
440 PKCS7_RECIP_INFO_free(ri);
444 int PKCS7_add_recipient_info(PKCS7 *p7, PKCS7_RECIP_INFO *ri)
447 STACK_OF(PKCS7_RECIP_INFO) *sk;
449 i = OBJ_obj2nid(p7->type);
451 case NID_pkcs7_signedAndEnveloped:
452 sk = p7->d.signed_and_enveloped->recipientinfo;
454 case NID_pkcs7_enveloped:
455 sk = p7->d.enveloped->recipientinfo;
458 PKCS7err(PKCS7_F_PKCS7_ADD_RECIPIENT_INFO,
459 PKCS7_R_WRONG_CONTENT_TYPE);
463 if (!sk_PKCS7_RECIP_INFO_push(sk, ri))
468 int PKCS7_RECIP_INFO_set(PKCS7_RECIP_INFO *p7i, X509 *x509)
471 EVP_PKEY *pkey = NULL;
472 if (!ASN1_INTEGER_set(p7i->version, 0))
474 if (!X509_NAME_set(&p7i->issuer_and_serial->issuer,
475 X509_get_issuer_name(x509)))
478 ASN1_INTEGER_free(p7i->issuer_and_serial->serial);
479 if (!(p7i->issuer_and_serial->serial =
480 ASN1_INTEGER_dup(X509_get_serialNumber(x509))))
483 pkey = X509_get0_pubkey(x509);
485 if (!pkey || !pkey->ameth || !pkey->ameth->pkey_ctrl) {
486 PKCS7err(PKCS7_F_PKCS7_RECIP_INFO_SET,
487 PKCS7_R_ENCRYPTION_NOT_SUPPORTED_FOR_THIS_KEY_TYPE);
491 ret = pkey->ameth->pkey_ctrl(pkey, ASN1_PKEY_CTRL_PKCS7_ENCRYPT, 0, p7i);
493 PKCS7err(PKCS7_F_PKCS7_RECIP_INFO_SET,
494 PKCS7_R_ENCRYPTION_NOT_SUPPORTED_FOR_THIS_KEY_TYPE);
498 PKCS7err(PKCS7_F_PKCS7_RECIP_INFO_SET,
499 PKCS7_R_ENCRYPTION_CTRL_FAILURE);
512 X509 *PKCS7_cert_from_signer_info(PKCS7 *p7, PKCS7_SIGNER_INFO *si)
514 if (PKCS7_type_is_signed(p7))
515 return (X509_find_by_issuer_and_serial(p7->d.sign->cert,
516 si->issuer_and_serial->issuer,
518 issuer_and_serial->serial));
523 int PKCS7_set_cipher(PKCS7 *p7, const EVP_CIPHER *cipher)
526 PKCS7_ENC_CONTENT *ec;
528 i = OBJ_obj2nid(p7->type);
530 case NID_pkcs7_signedAndEnveloped:
531 ec = p7->d.signed_and_enveloped->enc_data;
533 case NID_pkcs7_enveloped:
534 ec = p7->d.enveloped->enc_data;
537 PKCS7err(PKCS7_F_PKCS7_SET_CIPHER, PKCS7_R_WRONG_CONTENT_TYPE);
541 /* Check cipher OID exists and has data in it */
542 i = EVP_CIPHER_type(cipher);
543 if (i == NID_undef) {
544 PKCS7err(PKCS7_F_PKCS7_SET_CIPHER,
545 PKCS7_R_CIPHER_HAS_NO_OBJECT_IDENTIFIER);
553 /* unfortunately cannot constify BIO_new_NDEF() due to this and CMS_stream() */
554 int PKCS7_stream(unsigned char ***boundary, PKCS7 *p7)
556 ASN1_OCTET_STRING *os = NULL;
558 switch (OBJ_obj2nid(p7->type)) {
563 case NID_pkcs7_signedAndEnveloped:
564 os = p7->d.signed_and_enveloped->enc_data->enc_data;
566 os = ASN1_OCTET_STRING_new();
567 p7->d.signed_and_enveloped->enc_data->enc_data = os;
571 case NID_pkcs7_enveloped:
572 os = p7->d.enveloped->enc_data->enc_data;
574 os = ASN1_OCTET_STRING_new();
575 p7->d.enveloped->enc_data->enc_data = os;
579 case NID_pkcs7_signed:
580 os = p7->d.sign->contents->d.data;
591 os->flags |= ASN1_STRING_FLAG_NDEF;
592 *boundary = &os->data;