2 * Copyright 2008-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
10 #include "internal/cryptlib.h"
11 #include <openssl/asn1t.h>
12 #include <openssl/pem.h>
13 #include <openssl/x509v3.h>
14 #include <openssl/err.h>
15 #include <openssl/cms.h>
16 #include <openssl/rand.h>
17 #include "crypto/evp.h"
18 #include "cms_local.h"
20 /* CMS EncryptedData Utilities */
22 /* Return BIO based on EncryptedContentInfo and key */
24 BIO
*cms_EncryptedContent_init_bio(CMS_EncryptedContentInfo
*ec
,
25 const CMS_CTX
*cms_ctx
)
29 EVP_CIPHER
*fetched_ciph
= NULL
;
30 const EVP_CIPHER
*cipher
= NULL
;
31 X509_ALGOR
*calg
= ec
->contentEncryptionAlgorithm
;
32 evp_cipher_aead_asn1_params aparams
;
33 unsigned char iv
[EVP_MAX_IV_LENGTH
], *piv
= NULL
;
34 unsigned char *tkey
= NULL
;
39 int enc
, keep_key
= 0;
41 enc
= ec
->cipher
? 1 : 0;
43 b
= BIO_new(BIO_f_cipher());
45 ERR_raise(ERR_LIB_CMS
, ERR_R_MALLOC_FAILURE
);
49 BIO_get_cipher_ctx(b
, &ctx
);
55 * If not keeping key set cipher to NULL so subsequent calls decrypt.
60 cipher
= EVP_get_cipherbyobj(calg
->algorithm
);
63 fetched_ciph
= EVP_CIPHER_fetch(cms_ctx
->libctx
, EVP_CIPHER_name(cipher
),
65 if (fetched_ciph
!= NULL
)
66 cipher
= fetched_ciph
;
69 (void)ERR_clear_last_mark();
70 ERR_raise(ERR_LIB_CMS
, CMS_R_UNKNOWN_CIPHER
);
73 (void)ERR_pop_to_mark();
75 if (EVP_CipherInit_ex(ctx
, cipher
, NULL
, NULL
, NULL
, enc
) <= 0) {
76 ERR_raise(ERR_LIB_CMS
, CMS_R_CIPHER_INITIALISATION_ERROR
);
81 calg
->algorithm
= OBJ_nid2obj(EVP_CIPHER_CTX_type(ctx
));
82 /* Generate a random IV if we need one */
83 ivlen
= EVP_CIPHER_CTX_iv_length(ctx
);
85 if (RAND_bytes_ex(cms_ctx
->libctx
, iv
, ivlen
) <= 0)
90 if (evp_cipher_asn1_to_param_ex(ctx
, calg
->parameter
, &aparams
) <= 0) {
91 ERR_raise(ERR_LIB_CMS
, CMS_R_CIPHER_PARAMETER_INITIALISATION_ERROR
);
94 if ((EVP_CIPHER_flags(cipher
) & EVP_CIPH_FLAG_AEAD_CIPHER
)) {
97 && EVP_CIPHER_CTX_ctrl(ctx
, EVP_CTRL_AEAD_SET_TAG
,
98 ec
->taglen
, ec
->tag
) <= 0) {
99 ERR_raise(ERR_LIB_CMS
, CMS_R_CIPHER_AEAD_SET_TAG_ERROR
);
104 len
= EVP_CIPHER_CTX_key_length(ctx
);
107 tkeylen
= (size_t)len
;
109 /* Generate random session key */
110 if (!enc
|| !ec
->key
) {
111 tkey
= OPENSSL_malloc(tkeylen
);
113 ERR_raise(ERR_LIB_CMS
, ERR_R_MALLOC_FAILURE
);
116 if (EVP_CIPHER_CTX_rand_key(ctx
, tkey
) <= 0)
122 ec
->keylen
= tkeylen
;
131 if (ec
->keylen
!= tkeylen
) {
132 /* If necessary set key length */
133 if (EVP_CIPHER_CTX_set_key_length(ctx
, ec
->keylen
) <= 0) {
135 * Only reveal failure if debugging so we don't leak information
136 * which may be useful in MMA.
138 if (enc
|| ec
->debug
) {
139 ERR_raise(ERR_LIB_CMS
, CMS_R_INVALID_KEY_LENGTH
);
143 OPENSSL_clear_free(ec
->key
, ec
->keylen
);
145 ec
->keylen
= tkeylen
;
152 if (EVP_CipherInit_ex(ctx
, NULL
, NULL
, ec
->key
, piv
, enc
) <= 0) {
153 ERR_raise(ERR_LIB_CMS
, CMS_R_CIPHER_INITIALISATION_ERROR
);
157 calg
->parameter
= ASN1_TYPE_new();
158 if (calg
->parameter
== NULL
) {
159 ERR_raise(ERR_LIB_CMS
, ERR_R_MALLOC_FAILURE
);
162 if ((EVP_CIPHER_flags(cipher
) & EVP_CIPH_FLAG_AEAD_CIPHER
)) {
163 memcpy(aparams
.iv
, piv
, ivlen
);
164 aparams
.iv_len
= ivlen
;
165 aparams
.tag_len
= EVP_CIPHER_CTX_tag_length(ctx
);
166 if (aparams
.tag_len
<= 0)
170 if (evp_cipher_param_to_asn1_ex(ctx
, calg
->parameter
, &aparams
) <= 0) {
171 ERR_raise(ERR_LIB_CMS
, CMS_R_CIPHER_PARAMETER_INITIALISATION_ERROR
);
174 /* If parameter type not set omit parameter */
175 if (calg
->parameter
->type
== V_ASN1_UNDEF
) {
176 ASN1_TYPE_free(calg
->parameter
);
177 calg
->parameter
= NULL
;
183 EVP_CIPHER_free(fetched_ciph
);
184 if (!keep_key
|| !ok
) {
185 OPENSSL_clear_free(ec
->key
, ec
->keylen
);
188 OPENSSL_clear_free(tkey
, tkeylen
);
195 int cms_EncryptedContent_init(CMS_EncryptedContentInfo
*ec
,
196 const EVP_CIPHER
*cipher
,
197 const unsigned char *key
, size_t keylen
,
198 const CMS_CTX
*cms_ctx
)
202 if ((ec
->key
= OPENSSL_malloc(keylen
)) == NULL
) {
203 ERR_raise(ERR_LIB_CMS
, ERR_R_MALLOC_FAILURE
);
206 memcpy(ec
->key
, key
, keylen
);
210 ec
->contentType
= OBJ_nid2obj(NID_pkcs7_data
);
214 int CMS_EncryptedData_set1_key(CMS_ContentInfo
*cms
, const EVP_CIPHER
*ciph
,
215 const unsigned char *key
, size_t keylen
)
217 CMS_EncryptedContentInfo
*ec
;
219 if (!key
|| !keylen
) {
220 ERR_raise(ERR_LIB_CMS
, CMS_R_NO_KEY
);
224 cms
->d
.encryptedData
= M_ASN1_new_of(CMS_EncryptedData
);
225 if (!cms
->d
.encryptedData
) {
226 ERR_raise(ERR_LIB_CMS
, ERR_R_MALLOC_FAILURE
);
229 cms
->contentType
= OBJ_nid2obj(NID_pkcs7_encrypted
);
230 cms
->d
.encryptedData
->version
= 0;
231 } else if (OBJ_obj2nid(cms
->contentType
) != NID_pkcs7_encrypted
) {
232 ERR_raise(ERR_LIB_CMS
, CMS_R_NOT_ENCRYPTED_DATA
);
235 ec
= cms
->d
.encryptedData
->encryptedContentInfo
;
236 return cms_EncryptedContent_init(ec
, ciph
, key
, keylen
, cms_get0_cmsctx(cms
));
239 BIO
*cms_EncryptedData_init_bio(const CMS_ContentInfo
*cms
)
241 CMS_EncryptedData
*enc
= cms
->d
.encryptedData
;
242 if (enc
->encryptedContentInfo
->cipher
&& enc
->unprotectedAttrs
)
244 return cms_EncryptedContent_init_bio(enc
->encryptedContentInfo
,
245 cms_get0_cmsctx(cms
));