]> git.ipfire.org Git - thirdparty/openssl.git/blame - crypto/cms/cms_env.c
Fix error codes.
[thirdparty/openssl.git] / crypto / cms / cms_env.c
CommitLineData
8931b30d
DSH
1/* crypto/cms/cms_env.c */
2/* Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL
3 * project.
4 */
5/* ====================================================================
6 * Copyright (c) 2008 The OpenSSL Project. All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 *
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 *
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
18 * distribution.
19 *
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/)"
24 *
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.
29 *
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.
33 *
34 * 6. Redistributions of any form whatsoever must retain the following
35 * acknowledgment:
36 * "This product includes software developed by the OpenSSL Project
37 * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
38 *
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 * ====================================================================
52 */
53
54#include "cryptlib.h"
55#include <openssl/asn1t.h>
56#include <openssl/pem.h>
57#include <openssl/x509v3.h>
58#include <openssl/err.h>
59#include <openssl/cms.h>
5c4436c9 60#include <openssl/rand.h>
6e3bc4f0 61#include <openssl/aes.h>
8931b30d
DSH
62#include "cms_lcl.h"
63#include "asn1_locl.h"
64
65/* CMS EnvelopedData Utilities */
66
67DECLARE_ASN1_ITEM(CMS_EnvelopedData)
8931b30d 68DECLARE_ASN1_ITEM(CMS_KeyTransRecipientInfo)
c36e936b
DSH
69DECLARE_ASN1_ITEM(CMS_KEKRecipientInfo)
70DECLARE_ASN1_ITEM(CMS_OtherKeyAttribute)
8931b30d 71
8931b30d
DSH
72DECLARE_STACK_OF(CMS_RecipientInfo)
73
d2a53c22 74CMS_EnvelopedData *cms_get0_enveloped(CMS_ContentInfo *cms)
8931b30d
DSH
75 {
76 if (OBJ_obj2nid(cms->contentType) != NID_pkcs7_enveloped)
77 {
78 CMSerr(CMS_F_CMS_GET0_ENVELOPED,
79 CMS_R_CONTENT_TYPE_NOT_ENVELOPED_DATA);
80 return NULL;
81 }
82 return cms->d.envelopedData;
83 }
84
85static CMS_EnvelopedData *cms_enveloped_data_init(CMS_ContentInfo *cms)
86 {
87 if (cms->d.other == NULL)
88 {
89 cms->d.envelopedData = M_ASN1_new_of(CMS_EnvelopedData);
90 if (!cms->d.envelopedData)
91 {
92 CMSerr(CMS_F_CMS_ENVELOPED_DATA_INIT,
93 ERR_R_MALLOC_FAILURE);
94 return NULL;
95 }
96 cms->d.envelopedData->version = 0;
97 cms->d.envelopedData->encryptedContentInfo->contentType =
98 OBJ_nid2obj(NID_pkcs7_data);
99 ASN1_OBJECT_free(cms->contentType);
100 cms->contentType = OBJ_nid2obj(NID_pkcs7_enveloped);
101 return cms->d.envelopedData;
102 }
103 return cms_get0_enveloped(cms);
104 }
105
4f1aa191
DSH
106STACK_OF(CMS_RecipientInfo) *CMS_get0_RecipientInfos(CMS_ContentInfo *cms)
107 {
108 CMS_EnvelopedData *env;
761ffa72 109 env = cms_get0_enveloped(cms);
4f1aa191
DSH
110 if (!env)
111 return NULL;
112 return env->recipientInfos;
113 }
114
115int CMS_RecipientInfo_type(CMS_RecipientInfo *ri)
116 {
117 return ri->type;
118 }
119
761ffa72
DSH
120CMS_ContentInfo *CMS_EnvelopedData_create(const EVP_CIPHER *cipher)
121 {
122 CMS_ContentInfo *cms;
123 CMS_EnvelopedData *env;
124 cms = CMS_ContentInfo_new();
125 if (!cms)
126 goto merr;
127 env = cms_enveloped_data_init(cms);
128 if (!env)
129 goto merr;
130 if (!cms_EncryptedContent_init(env->encryptedContentInfo,
131 cipher, NULL, 0))
132 goto merr;
133 return cms;
134 merr:
135 if (cms)
136 CMS_ContentInfo_free(cms);
137 CMSerr(CMS_F_CMS_ENVELOPEDDATA_CREATE, ERR_R_MALLOC_FAILURE);
138 return NULL;
139 }
140
ab124380
DSH
141/* Key Transport Recipient Info (KTRI) routines */
142
8931b30d
DSH
143/* Add a recipient certificate. For now only handle key transport.
144 * If we ever handle key agreement will need updating.
145 */
ab124380 146
8931b30d
DSH
147CMS_RecipientInfo *CMS_add1_recipient_cert(CMS_ContentInfo *cms,
148 X509 *recip, unsigned int flags)
149 {
150 CMS_RecipientInfo *ri = NULL;
151 CMS_KeyTransRecipientInfo *ktri;
152 CMS_EnvelopedData *env;
153 EVP_PKEY *pk = NULL;
154 int i, type;
761ffa72 155 env = cms_get0_enveloped(cms);
8931b30d
DSH
156 if (!env)
157 goto err;
158
761ffa72 159 /* Initialize recipient info */
8931b30d
DSH
160 ri = M_ASN1_new_of(CMS_RecipientInfo);
161 if (!ri)
162 goto merr;
163
761ffa72 164 /* Initialize and add key transport recipient info */
8931b30d
DSH
165
166 ri->d.ktri = M_ASN1_new_of(CMS_KeyTransRecipientInfo);
167 if (!ri->d.ktri)
168 goto merr;
169 ri->type = CMS_RECIPINFO_TRANS;
170
171 ktri = ri->d.ktri;
172
173 X509_check_purpose(recip, -1, -1);
174 pk = X509_get_pubkey(recip);
175 if (!pk)
176 {
177 CMSerr(CMS_F_CMS_ADD1_RECIPIENT_CERT,
178 CMS_R_ERROR_GETTING_PUBLIC_KEY);
179 goto err;
180 }
181 CRYPTO_add(&recip->references, 1, CRYPTO_LOCK_X509);
8931b30d
DSH
182 ktri->pkey = pk;
183 ktri->recip = recip;
184
185 if (flags & CMS_USE_KEYID)
186 {
187 ktri->version = 2;
188 type = CMS_RECIPINFO_KEYIDENTIFIER;
189 }
190 else
191 {
192 ktri->version = 0;
193 type = CMS_RECIPINFO_ISSUER_SERIAL;
194 }
195
196 /* Not a typo: RecipientIdentifier and SignerIdentifier are the
197 * same structure.
198 */
199
200 if (!cms_set1_SignerIdentifier(ktri->rid, recip, type))
201 goto err;
202
203 if (pk->ameth && pk->ameth->pkey_ctrl)
204 {
205 i = pk->ameth->pkey_ctrl(pk, ASN1_PKEY_CTRL_CMS_ENVELOPE,
206 0, ri);
207 if (i == -2)
208 {
209 CMSerr(CMS_F_CMS_ADD1_RECIPIENT_CERT,
210 CMS_R_NOT_SUPPORTED_FOR_THIS_KEY_TYPE);
211 goto err;
212 }
213 if (i <= 0)
214 {
215 CMSerr(CMS_F_CMS_ADD1_RECIPIENT_CERT,
216 CMS_R_CTRL_FAILURE);
217 goto err;
218 }
219 }
220
221 if (!sk_CMS_RecipientInfo_push(env->recipientInfos, ri))
222 goto merr;
223
224 return ri;
225
226 merr:
227 CMSerr(CMS_F_CMS_ADD1_RECIPIENT_CERT, ERR_R_MALLOC_FAILURE);
228 err:
229 if (ri)
230 M_ASN1_free_of(ri, CMS_RecipientInfo);
231 return NULL;
232
233 }
234
235int CMS_RecipientInfo_ktri_get0_algs(CMS_RecipientInfo *ri,
236 EVP_PKEY **pk, X509 **recip,
237 X509_ALGOR **palg)
238 {
239 CMS_KeyTransRecipientInfo *ktri;
240 if (ri->type != CMS_RECIPINFO_TRANS)
241 {
242 CMSerr(CMS_F_CMS_RECIPIENTINFO_KTRI_GET0_ALGS,
243 CMS_R_NOT_KEY_TRANSPORT);
244 return 0;
245 }
246
247 ktri = ri->d.ktri;
248
249 if (pk)
250 *pk = ktri->pkey;
251 if (recip)
252 *recip = ktri->recip;
253 if (palg)
254 *palg = ktri->keyEncryptionAlgorithm;
255 return 1;
256 }
257
258int CMS_RecipientInfo_ktri_get0_signer_id(CMS_RecipientInfo *ri,
259 ASN1_OCTET_STRING **keyid,
260 X509_NAME **issuer, ASN1_INTEGER **sno)
261 {
262 CMS_KeyTransRecipientInfo *ktri;
263 if (ri->type != CMS_RECIPINFO_TRANS)
264 {
265 CMSerr(CMS_F_CMS_RECIPIENTINFO_KTRI_GET0_SIGNER_ID,
266 CMS_R_NOT_KEY_TRANSPORT);
267 return 0;
268 }
4f1aa191 269 ktri = ri->d.ktri;
8931b30d
DSH
270
271 return cms_SignerIdentifier_get0_signer_id(ktri->rid,
272 keyid, issuer, sno);
273 }
274
275int CMS_RecipientInfo_ktri_cert_cmp(CMS_RecipientInfo *ri, X509 *cert)
276 {
8931b30d
DSH
277 if (ri->type != CMS_RECIPINFO_TRANS)
278 {
279 CMSerr(CMS_F_CMS_RECIPIENTINFO_KTRI_CERT_CMP,
280 CMS_R_NOT_KEY_TRANSPORT);
4f1aa191
DSH
281 return -2;
282 }
4f1aa191
DSH
283 return cms_SignerIdentifier_cert_cmp(ri->d.ktri->rid, cert);
284 }
285
6e3bc4f0
DSH
286int CMS_RecipientInfo_set0_pkey(CMS_RecipientInfo *ri, EVP_PKEY *pkey)
287 {
288 if (ri->type != CMS_RECIPINFO_TRANS)
289 {
290 CMSerr(CMS_F_CMS_RECIPIENTINFO_SET0_PKEY,
291 CMS_R_NOT_KEY_TRANSPORT);
292 return 0;
293 }
294 ri->d.ktri->pkey = pkey;
295 return 1;
296 }
297
761ffa72
DSH
298/* Encrypt content key in key transport recipient info */
299
300static int cms_RecipientInfo_ktri_encrypt(CMS_ContentInfo *cms,
301 CMS_RecipientInfo *ri)
302 {
303 CMS_KeyTransRecipientInfo *ktri;
304 CMS_EncryptedContentInfo *ec;
305 EVP_PKEY_CTX *pctx = NULL;
306 unsigned char *ek = NULL;
307 size_t eklen;
308
309 int ret = 0;
310
311 if (ri->type != CMS_RECIPINFO_TRANS)
312 {
313 CMSerr(CMS_F_CMS_RECIPIENTINFO_KTRI_ENCRYPT,
314 CMS_R_NOT_KEY_TRANSPORT);
315 return 0;
316 }
317 ktri = ri->d.ktri;
318 ec = cms->d.envelopedData->encryptedContentInfo;
319
320 pctx = EVP_PKEY_CTX_new(ktri->pkey, NULL);
321 if (!pctx)
322 return 0;
323
324 if (EVP_PKEY_encrypt_init(pctx) <= 0)
325 goto err;
326
327 if (EVP_PKEY_CTX_ctrl(pctx, -1, EVP_PKEY_OP_ENCRYPT,
328 EVP_PKEY_CTRL_CMS_ENCRYPT, 0, ri) <= 0)
329 {
330 CMSerr(CMS_F_CMS_RECIPIENTINFO_KTRI_ENCRYPT, CMS_R_CTRL_ERROR);
331 goto err;
332 }
333
334 if (EVP_PKEY_encrypt(pctx, NULL, &eklen, ec->key, ec->keylen) <= 0)
335 goto err;
336
337 ek = OPENSSL_malloc(eklen);
338
339 if (ek == NULL)
340 {
341 CMSerr(CMS_F_CMS_RECIPIENTINFO_KTRI_ENCRYPT,
342 ERR_R_MALLOC_FAILURE);
343 goto err;
344 }
345
346 if (EVP_PKEY_encrypt(pctx, ek, &eklen, ec->key, ec->keylen) <= 0)
347 goto err;
348
349 ASN1_STRING_set0(ktri->encryptedKey, ek, eklen);
350 ek = NULL;
351
352 ret = 1;
353
354 err:
355 if (pctx)
356 EVP_PKEY_CTX_free(pctx);
357 if (ek)
358 OPENSSL_free(ek);
359 return ret;
360
361 }
362
ab124380
DSH
363/* Decrypt content key from KTRI */
364
6e3bc4f0
DSH
365static int cms_RecipientInfo_ktri_decrypt(CMS_ContentInfo *cms,
366 CMS_RecipientInfo *ri)
4f1aa191 367 {
6e3bc4f0 368 CMS_KeyTransRecipientInfo *ktri = ri->d.ktri;
4f1aa191
DSH
369 EVP_PKEY_CTX *pctx = NULL;
370 unsigned char *ek = NULL;
371 size_t eklen;
f7e85c37 372 int ret = 0;
146b52ed
DSH
373 CMS_EncryptedContentInfo *ec;
374 ec = cms->d.envelopedData->encryptedContentInfo;
4f1aa191 375
6e3bc4f0 376 if (ktri->pkey == NULL)
4f1aa191 377 {
6e3bc4f0
DSH
378 CMSerr(CMS_F_CMS_RECIPIENTINFO_KTRI_DECRYPT,
379 CMS_R_NO_PRIVATE_KEY);
4f1aa191
DSH
380 return 0;
381 }
4f1aa191 382
6e3bc4f0 383 pctx = EVP_PKEY_CTX_new(ktri->pkey, NULL);
4f1aa191 384 if (!pctx)
8931b30d 385 return 0;
4f1aa191
DSH
386
387 if (EVP_PKEY_decrypt_init(pctx) <= 0)
388 goto err;
389
390 if (EVP_PKEY_CTX_ctrl(pctx, -1, EVP_PKEY_OP_DECRYPT,
391 EVP_PKEY_CTRL_CMS_DECRYPT, 0, ri) <= 0)
392 {
6e3bc4f0 393 CMSerr(CMS_F_CMS_RECIPIENTINFO_KTRI_DECRYPT, CMS_R_CTRL_ERROR);
4f1aa191 394 goto err;
8931b30d
DSH
395 }
396
4f1aa191
DSH
397 if (EVP_PKEY_decrypt(pctx, NULL, &eklen,
398 ktri->encryptedKey->data,
399 ktri->encryptedKey->length) <= 0)
400 goto err;
401
402 ek = OPENSSL_malloc(eklen);
403
404 if (ek == NULL)
405 {
6e3bc4f0
DSH
406 CMSerr(CMS_F_CMS_RECIPIENTINFO_KTRI_DECRYPT,
407 ERR_R_MALLOC_FAILURE);
4f1aa191
DSH
408 goto err;
409 }
410
411 if (EVP_PKEY_decrypt(pctx, ek, &eklen,
412 ktri->encryptedKey->data,
413 ktri->encryptedKey->length) <= 0)
414 {
6e3bc4f0 415 CMSerr(CMS_F_CMS_RECIPIENTINFO_KTRI_DECRYPT, CMS_R_CMS_LIB);
4f1aa191
DSH
416 goto err;
417 }
418
419 ret = 1;
420
146b52ed
DSH
421 if (ec->key)
422 {
423 OPENSSL_cleanse(ec->key, ec->keylen);
424 OPENSSL_free(ec->key);
425 }
426
427 ec->key = ek;
428 ec->keylen = eklen;
4f1aa191
DSH
429
430 err:
431 if (pctx)
432 EVP_PKEY_CTX_free(pctx);
433 if (!ret && ek)
434 OPENSSL_free(ek);
435
436 return ret;
437 }
438
ab124380
DSH
439/* Key Encrypted Key (KEK) RecipientInfo routines */
440
eeb9cdfc
DSH
441int CMS_RecipientInfo_kekri_id_cmp(CMS_RecipientInfo *ri,
442 const unsigned char *id, size_t idlen)
443 {
444 ASN1_OCTET_STRING tmp_os;
445 CMS_KEKRecipientInfo *kekri;
446 if (ri->type != CMS_RECIPINFO_KEK)
447 {
448 CMSerr(CMS_F_CMS_RECIPIENTINFO_KEKRI_ID_CMP, CMS_R_NOT_KEK);
449 return -2;
450 }
451 kekri = ri->d.kekri;
452 tmp_os.type = V_ASN1_OCTET_STRING;
453 tmp_os.flags = 0;
454 tmp_os.data = (unsigned char *)id;
455 tmp_os.length = (int)idlen;
456 return ASN1_OCTET_STRING_cmp(&tmp_os, kekri->kekid->keyIdentifier);
457 }
458
ab124380
DSH
459/* For now hard code AES key wrap info */
460
461static size_t aes_wrap_keylen(int nid)
462 {
463 switch (nid)
464 {
465 case NID_id_aes128_wrap:
466 return 16;
467
468 case NID_id_aes192_wrap:
469 return 24;
470
471 case NID_id_aes256_wrap:
472 return 32;
473
474 default:
475 return 0;
476 }
477 }
478
479CMS_RecipientInfo *CMS_add0_recipient_key(CMS_ContentInfo *cms, int nid,
480 unsigned char *key, size_t keylen,
481 unsigned char *id, size_t idlen,
482 ASN1_GENERALIZEDTIME *date,
483 ASN1_OBJECT *otherTypeId,
484 ASN1_TYPE *otherType)
485 {
486 CMS_RecipientInfo *ri = NULL;
487 CMS_EnvelopedData *env;
488 CMS_KEKRecipientInfo *kekri;
489 env = cms_get0_enveloped(cms);
490 if (!env)
491 goto err;
492
493 if (nid == NID_undef)
494 {
495 switch (keylen)
496 {
497 case 16:
498 nid = NID_id_aes128_wrap;
499 break;
500
501 case 24:
502 nid = NID_id_aes192_wrap;
503 break;
504
505 case 32:
506 nid = NID_id_aes256_wrap;
507 break;
508
509 default:
510 CMSerr(CMS_F_CMS_ADD0_RECIPIENT_KEY,
511 CMS_R_INVALID_KEY_LENGTH);
512 goto err;
513 }
514
515 }
516 else
517 {
518
519 size_t exp_keylen = aes_wrap_keylen(nid);
520
521 if (!exp_keylen)
522 {
523 CMSerr(CMS_F_CMS_ADD0_RECIPIENT_KEY,
524 CMS_R_UNSUPPORTED_KEK_ALGORITHM);
525 goto err;
526 }
527
528 if (keylen != exp_keylen)
529 {
530 CMSerr(CMS_F_CMS_ADD0_RECIPIENT_KEY,
531 CMS_R_INVALID_KEY_LENGTH);
532 goto err;
533 }
534
535 }
536
537 /* Initialize recipient info */
538 ri = M_ASN1_new_of(CMS_RecipientInfo);
539 if (!ri)
540 goto merr;
541
542 ri->d.kekri = M_ASN1_new_of(CMS_KEKRecipientInfo);
543 if (!ri->d.kekri)
544 goto merr;
545 ri->type = CMS_RECIPINFO_KEK;
546
547 kekri = ri->d.kekri;
548
549 if (otherTypeId)
550 {
551 kekri->kekid->other = M_ASN1_new_of(CMS_OtherKeyAttribute);
552 if (kekri->kekid->other == NULL)
553 goto merr;
554 }
555
556 if (!sk_CMS_RecipientInfo_push(env->recipientInfos, ri))
557 goto merr;
558
559
560 /* After this point no calls can fail */
561
562 kekri->version = 4;
563
564 kekri->key = key;
565 kekri->keylen = keylen;
566
567 ASN1_STRING_set0(kekri->kekid->keyIdentifier, id, idlen);
568
569 kekri->kekid->date = date;
570
571 if (kekri->kekid->other)
572 {
573 kekri->kekid->other->keyAttrId = otherTypeId;
574 kekri->kekid->other->keyAttr = otherType;
575 }
576
577 X509_ALGOR_set0(kekri->keyEncryptionAlgorithm,
578 OBJ_nid2obj(nid), V_ASN1_UNDEF, NULL);
579
580 return ri;
581
582 merr:
583 CMSerr(CMS_F_CMS_ADD0_RECIPIENT_KEY, ERR_R_MALLOC_FAILURE);
584 err:
585 if (ri)
586 M_ASN1_free_of(ri, CMS_RecipientInfo);
587 return NULL;
588
589 }
590
591int CMS_RecipientInfo_kekri_get0_id(CMS_RecipientInfo *ri,
592 X509_ALGOR **palg,
593 ASN1_OCTET_STRING **pid,
594 ASN1_GENERALIZEDTIME **pdate,
595 ASN1_OBJECT **potherid,
596 ASN1_TYPE **pothertype)
597 {
598 CMS_KEKIdentifier *rkid;
599 if (ri->type != CMS_RECIPINFO_KEK)
600 {
601 CMSerr(CMS_F_CMS_RECIPIENTINFO_KEKRI_GET0_ID, CMS_R_NOT_KEK);
602 return 0;
603 }
604 rkid = ri->d.kekri->kekid;
605 if (palg)
606 *palg = ri->d.kekri->keyEncryptionAlgorithm;
607 if (pid)
608 *pid = rkid->keyIdentifier;
609 if (pdate)
610 *pdate = rkid->date;
611 if (potherid)
612 {
613 if (rkid->other)
614 *potherid = rkid->other->keyAttrId;
615 else
616 *potherid = NULL;
617 }
618 if (pothertype)
619 {
620 if (rkid->other)
621 *pothertype = rkid->other->keyAttr;
622 else
623 *pothertype = NULL;
624 }
625 return 1;
626 }
ab124380
DSH
627
628int CMS_RecipientInfo_set0_key(CMS_RecipientInfo *ri,
629 unsigned char *key, size_t keylen)
630 {
631 CMS_KEKRecipientInfo *kekri;
ab124380
DSH
632 if (ri->type != CMS_RECIPINFO_KEK)
633 {
634 CMSerr(CMS_F_CMS_RECIPIENTINFO_SET0_KEY, CMS_R_NOT_KEK);
635 return 0;
636 }
eeb9cdfc 637
ab124380 638 kekri = ri->d.kekri;
ab124380
DSH
639 kekri->key = key;
640 kekri->keylen = keylen;
641 return 1;
642 }
643
6e3bc4f0
DSH
644
645/* Encrypt content key in KEK recipient info */
646
647static int cms_RecipientInfo_kekri_encrypt(CMS_ContentInfo *cms,
648 CMS_RecipientInfo *ri)
649 {
650 CMS_EncryptedContentInfo *ec;
651 CMS_KEKRecipientInfo *kekri;
652 AES_KEY actx;
653 unsigned char *wkey = NULL;
654 int wkeylen;
655 int r = 0;
656
657 ec = cms->d.envelopedData->encryptedContentInfo;
658
659 kekri = ri->d.kekri;
660
661 if (!kekri->key)
662 {
663 CMSerr(CMS_F_CMS_RECIPIENTINFO_KEKRI_ENCRYPT, CMS_R_NO_KEY);
664 return 0;
665 }
666
667 if (AES_set_encrypt_key(kekri->key, kekri->keylen << 3, &actx))
668 {
669 CMSerr(CMS_F_CMS_RECIPIENTINFO_KEKRI_ENCRYPT,
670 CMS_R_ERROR_SETTING_KEY);
671 goto err;
672 }
673
674 wkey = OPENSSL_malloc(ec->keylen + 8);
675
676 if (!wkey)
677 {
678 CMSerr(CMS_F_CMS_RECIPIENTINFO_KEKRI_ENCRYPT,
679 ERR_R_MALLOC_FAILURE);
680 goto err;
681 }
682
683 wkeylen = AES_wrap_key(&actx, NULL, wkey, ec->key, ec->keylen);
684
685 if (wkeylen <= 0)
686 {
687 CMSerr(CMS_F_CMS_RECIPIENTINFO_KEKRI_ENCRYPT, CMS_R_WRAP_ERROR);
688 goto err;
689 }
690
691 ASN1_STRING_set0(kekri->encryptedKey, wkey, wkeylen);
692
693 r = 1;
694
695 err:
696
697 if (!r && wkey)
698 OPENSSL_free(wkey);
699 OPENSSL_cleanse(&actx, sizeof(actx));
700
701 return r;
702
703 }
704
ab124380
DSH
705/* Decrypt content key in KEK recipient info */
706
6e3bc4f0
DSH
707static int cms_RecipientInfo_kekri_decrypt(CMS_ContentInfo *cms,
708 CMS_RecipientInfo *ri)
709 {
710 CMS_EncryptedContentInfo *ec;
711 CMS_KEKRecipientInfo *kekri;
712 AES_KEY actx;
713 unsigned char *ukey = NULL;
714 int ukeylen;
eeb9cdfc 715 int r = 0, wrap_nid;
6e3bc4f0
DSH
716
717 ec = cms->d.envelopedData->encryptedContentInfo;
718
719 kekri = ri->d.kekri;
720
721 if (!kekri->key)
722 {
723 CMSerr(CMS_F_CMS_RECIPIENTINFO_KEKRI_DECRYPT, CMS_R_NO_KEY);
724 return 0;
725 }
726
eeb9cdfc
DSH
727 wrap_nid = OBJ_obj2nid(kekri->keyEncryptionAlgorithm->algorithm);
728 if (aes_wrap_keylen(wrap_nid) != kekri->keylen)
729 {
730 CMSerr(CMS_F_CMS_RECIPIENTINFO_KEKRI_DECRYPT,
731 CMS_R_INVALID_KEY_LENGTH);
732 return 0;
733 }
734
6e3bc4f0
DSH
735 /* If encrypted key length is invalid don't bother */
736
737 if (kekri->encryptedKey->length < 16)
738 {
739 CMSerr(CMS_F_CMS_RECIPIENTINFO_KEKRI_DECRYPT,
740 CMS_R_INVALID_ENCRYPTED_KEY_LENGTH);
741 goto err;
742 }
743
744 if (AES_set_decrypt_key(kekri->key, kekri->keylen << 3, &actx))
745 {
746 CMSerr(CMS_F_CMS_RECIPIENTINFO_KEKRI_DECRYPT,
747 CMS_R_ERROR_SETTING_KEY);
748 goto err;
749 }
750
751 ukey = OPENSSL_malloc(kekri->encryptedKey->length - 8);
752
753 if (!ukey)
754 {
755 CMSerr(CMS_F_CMS_RECIPIENTINFO_KEKRI_DECRYPT,
756 ERR_R_MALLOC_FAILURE);
757 goto err;
758 }
759
760 ukeylen = AES_unwrap_key(&actx, NULL, ukey,
761 kekri->encryptedKey->data,
762 kekri->encryptedKey->length);
763
764 if (ukeylen <= 0)
765 {
766 CMSerr(CMS_F_CMS_RECIPIENTINFO_KEKRI_DECRYPT,
767 CMS_R_UNWRAP_ERROR);
768 goto err;
769 }
770
771 ec->key = ukey;
772 ec->keylen = ukeylen;
773
774 r = 1;
775
776 err:
777
778 if (!r && ukey)
779 OPENSSL_free(ukey);
780 OPENSSL_cleanse(&actx, sizeof(actx));
781
782 return r;
783
784 }
785
786int CMS_RecipientInfo_decrypt(CMS_ContentInfo *cms, CMS_RecipientInfo *ri)
787 {
788 switch(ri->type)
789 {
790 case CMS_RECIPINFO_TRANS:
791 return cms_RecipientInfo_ktri_decrypt(cms, ri);
792
793 case CMS_RECIPINFO_KEK:
794 return cms_RecipientInfo_kekri_decrypt(cms, ri);
795
d2a53c22
DSH
796 case CMS_RECIPINFO_PASS:
797 return cms_RecipientInfo_pwri_crypt(cms, ri, 0);
798
6e3bc4f0
DSH
799 default:
800 CMSerr(CMS_F_CMS_RECIPIENTINFO_DECRYPT,
801 CMS_R_UNSUPPORTED_RECPIENTINFO_TYPE);
802 return 0;
803 }
804 }
805
4f1aa191
DSH
806BIO *cms_EnvelopedData_init_bio(CMS_ContentInfo *cms)
807 {
808 CMS_EncryptedContentInfo *ec;
761ffa72
DSH
809 STACK_OF(CMS_RecipientInfo) *rinfos;
810 CMS_RecipientInfo *ri;
811 int i, r, ok = 0;
812 BIO *ret;
813
814 /* Get BIO first to set up key */
815
4f1aa191 816 ec = cms->d.envelopedData->encryptedContentInfo;
761ffa72
DSH
817 ret = cms_EncryptedContent_init_bio(ec);
818
819 /* If error or no cipher end of processing */
820
821 if (!ret || !ec->cipher)
822 return ret;
823
ab124380
DSH
824 /* Now encrypt content key according to each RecipientInfo type */
825
761ffa72
DSH
826 rinfos = cms->d.envelopedData->recipientInfos;
827
828 for (i = 0; i < sk_CMS_RecipientInfo_num(rinfos); i++)
829 {
830 ri = sk_CMS_RecipientInfo_value(rinfos, i);
6e3bc4f0
DSH
831
832 switch (ri->type)
761ffa72 833 {
6e3bc4f0
DSH
834 case CMS_RECIPINFO_TRANS:
835 r = cms_RecipientInfo_ktri_encrypt(cms, ri);
836 break;
837
838 case CMS_RECIPINFO_KEK:
839 r = cms_RecipientInfo_kekri_encrypt(cms, ri);
840 break;
841
d2a53c22
DSH
842 case CMS_RECIPINFO_PASS:
843 r = cms_RecipientInfo_pwri_crypt(cms, ri, 1);
844 break;
845
6e3bc4f0 846 default:
761ffa72
DSH
847 CMSerr(CMS_F_CMS_ENVELOPEDDATA_INIT_BIO,
848 CMS_R_UNSUPPORTED_RECIPIENT_TYPE);
849 goto err;
850 }
6e3bc4f0 851
761ffa72
DSH
852 if (r <= 0)
853 {
854 CMSerr(CMS_F_CMS_ENVELOPEDDATA_INIT_BIO,
855 CMS_R_ERROR_SETTING_RECIPIENTINFO);
856 goto err;
857 }
858 }
859
860 ok = 1;
861
862 err:
863 ec->cipher = NULL;
864 if (ec->key)
865 {
866 OPENSSL_cleanse(ec->key, ec->keylen);
867 OPENSSL_free(ec->key);
868 ec->key = NULL;
869 ec->keylen = 0;
870 }
871 if (ok)
872 return ret;
873 BIO_free(ret);
874 return NULL;
875
8931b30d 876 }