1 /* crypto/rsa/rsa_ameth.c */
3 * Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL project
6 /* ====================================================================
7 * Copyright (c) 2006 The OpenSSL Project. All rights reserved.
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
16 * 2. Redistributions in binary form must reproduce the above copyright
17 * notice, this list of conditions and the following disclaimer in
18 * the documentation and/or other materials provided with the
21 * 3. All advertising materials mentioning features or use of this
22 * software must display the following acknowledgment:
23 * "This product includes software developed by the OpenSSL Project
24 * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
26 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
27 * endorse or promote products derived from this software without
28 * prior written permission. For written permission, please contact
29 * licensing@OpenSSL.org.
31 * 5. Products derived from this software may not be called "OpenSSL"
32 * nor may "OpenSSL" appear in their names without prior written
33 * permission of the OpenSSL Project.
35 * 6. Redistributions of any form whatsoever must retain the following
37 * "This product includes software developed by the OpenSSL Project
38 * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
40 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
41 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
42 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
43 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR
44 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
45 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
46 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
47 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
49 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
50 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
51 * OF THE POSSIBILITY OF SUCH DAMAGE.
52 * ====================================================================
54 * This product includes cryptographic software written by Eric Young
55 * (eay@cryptsoft.com). This product includes software written by Tim
56 * Hudson (tjh@cryptsoft.com).
62 #include <openssl/asn1t.h>
63 #include <openssl/x509.h>
64 #include <openssl/rsa.h>
65 #include <openssl/bn.h>
66 #ifndef OPENSSL_NO_CMS
67 # include <openssl/cms.h>
69 #include "internal/asn1_int.h"
71 static int rsa_cms_sign(CMS_SignerInfo
*si
);
72 static int rsa_cms_verify(CMS_SignerInfo
*si
);
73 static int rsa_cms_decrypt(CMS_RecipientInfo
*ri
);
74 static int rsa_cms_encrypt(CMS_RecipientInfo
*ri
);
76 static int rsa_pub_encode(X509_PUBKEY
*pk
, const EVP_PKEY
*pkey
)
78 unsigned char *penc
= NULL
;
80 penclen
= i2d_RSAPublicKey(pkey
->pkey
.rsa
, &penc
);
83 if (X509_PUBKEY_set0_param(pk
, OBJ_nid2obj(EVP_PKEY_RSA
),
84 V_ASN1_NULL
, NULL
, penc
, penclen
))
91 static int rsa_pub_decode(EVP_PKEY
*pkey
, X509_PUBKEY
*pubkey
)
93 const unsigned char *p
;
96 if (!X509_PUBKEY_get0_param(NULL
, &p
, &pklen
, NULL
, pubkey
))
98 if (!(rsa
= d2i_RSAPublicKey(NULL
, &p
, pklen
))) {
99 RSAerr(RSA_F_RSA_PUB_DECODE
, ERR_R_RSA_LIB
);
102 EVP_PKEY_assign_RSA(pkey
, rsa
);
106 static int rsa_pub_cmp(const EVP_PKEY
*a
, const EVP_PKEY
*b
)
108 if (BN_cmp(b
->pkey
.rsa
->n
, a
->pkey
.rsa
->n
) != 0
109 || BN_cmp(b
->pkey
.rsa
->e
, a
->pkey
.rsa
->e
) != 0)
114 static int old_rsa_priv_decode(EVP_PKEY
*pkey
,
115 const unsigned char **pder
, int derlen
)
118 if (!(rsa
= d2i_RSAPrivateKey(NULL
, pder
, derlen
))) {
119 RSAerr(RSA_F_OLD_RSA_PRIV_DECODE
, ERR_R_RSA_LIB
);
122 EVP_PKEY_assign_RSA(pkey
, rsa
);
126 static int old_rsa_priv_encode(const EVP_PKEY
*pkey
, unsigned char **pder
)
128 return i2d_RSAPrivateKey(pkey
->pkey
.rsa
, pder
);
131 static int rsa_priv_encode(PKCS8_PRIV_KEY_INFO
*p8
, const EVP_PKEY
*pkey
)
133 unsigned char *rk
= NULL
;
135 rklen
= i2d_RSAPrivateKey(pkey
->pkey
.rsa
, &rk
);
138 RSAerr(RSA_F_RSA_PRIV_ENCODE
, ERR_R_MALLOC_FAILURE
);
142 if (!PKCS8_pkey_set0(p8
, OBJ_nid2obj(NID_rsaEncryption
), 0,
143 V_ASN1_NULL
, NULL
, rk
, rklen
)) {
144 RSAerr(RSA_F_RSA_PRIV_ENCODE
, ERR_R_MALLOC_FAILURE
);
151 static int rsa_priv_decode(EVP_PKEY
*pkey
, PKCS8_PRIV_KEY_INFO
*p8
)
153 const unsigned char *p
;
155 if (!PKCS8_pkey_get0(NULL
, &p
, &pklen
, NULL
, p8
))
157 return old_rsa_priv_decode(pkey
, &p
, pklen
);
160 static int int_rsa_size(const EVP_PKEY
*pkey
)
162 return RSA_size(pkey
->pkey
.rsa
);
165 static int rsa_bits(const EVP_PKEY
*pkey
)
167 return BN_num_bits(pkey
->pkey
.rsa
->n
);
170 static int rsa_security_bits(const EVP_PKEY
*pkey
)
172 return RSA_security_bits(pkey
->pkey
.rsa
);
175 static void int_rsa_free(EVP_PKEY
*pkey
)
177 RSA_free(pkey
->pkey
.rsa
);
180 static void update_buflen(const BIGNUM
*b
, size_t *pbuflen
)
185 if (*pbuflen
< (i
= (size_t)BN_num_bytes(b
)))
189 static int do_rsa_print(BIO
*bp
, const RSA
*x
, int off
, int priv
)
193 unsigned char *m
= NULL
;
194 int ret
= 0, mod_len
= 0;
197 update_buflen(x
->n
, &buf_len
);
198 update_buflen(x
->e
, &buf_len
);
201 update_buflen(x
->d
, &buf_len
);
202 update_buflen(x
->p
, &buf_len
);
203 update_buflen(x
->q
, &buf_len
);
204 update_buflen(x
->dmp1
, &buf_len
);
205 update_buflen(x
->dmq1
, &buf_len
);
206 update_buflen(x
->iqmp
, &buf_len
);
209 m
= OPENSSL_malloc(buf_len
+ 10);
211 RSAerr(RSA_F_DO_RSA_PRINT
, ERR_R_MALLOC_FAILURE
);
216 mod_len
= BN_num_bits(x
->n
);
218 if (!BIO_indent(bp
, off
, 128))
222 if (BIO_printf(bp
, "Private-Key: (%d bit)\n", mod_len
)
226 s
= "publicExponent:";
228 if (BIO_printf(bp
, "Public-Key: (%d bit)\n", mod_len
)
234 if (!ASN1_bn_print(bp
, str
, x
->n
, m
, off
))
236 if (!ASN1_bn_print(bp
, s
, x
->e
, m
, off
))
239 if (!ASN1_bn_print(bp
, "privateExponent:", x
->d
, m
, off
))
241 if (!ASN1_bn_print(bp
, "prime1:", x
->p
, m
, off
))
243 if (!ASN1_bn_print(bp
, "prime2:", x
->q
, m
, off
))
245 if (!ASN1_bn_print(bp
, "exponent1:", x
->dmp1
, m
, off
))
247 if (!ASN1_bn_print(bp
, "exponent2:", x
->dmq1
, m
, off
))
249 if (!ASN1_bn_print(bp
, "coefficient:", x
->iqmp
, m
, off
))
259 static int rsa_pub_print(BIO
*bp
, const EVP_PKEY
*pkey
, int indent
,
262 return do_rsa_print(bp
, pkey
->pkey
.rsa
, indent
, 0);
265 static int rsa_priv_print(BIO
*bp
, const EVP_PKEY
*pkey
, int indent
,
268 return do_rsa_print(bp
, pkey
->pkey
.rsa
, indent
, 1);
271 /* Given an MGF1 Algorithm ID decode to an Algorithm Identifier */
272 static X509_ALGOR
*rsa_mgf1_decode(X509_ALGOR
*alg
)
276 if (OBJ_obj2nid(alg
->algorithm
) != NID_mgf1
)
278 return ASN1_TYPE_unpack_sequence(ASN1_ITEM_rptr(X509_ALGOR
),
282 static RSA_PSS_PARAMS
*rsa_pss_decode(const X509_ALGOR
*alg
,
283 X509_ALGOR
**pmaskHash
)
289 pss
= ASN1_TYPE_unpack_sequence(ASN1_ITEM_rptr(RSA_PSS_PARAMS
),
295 *pmaskHash
= rsa_mgf1_decode(pss
->maskGenAlgorithm
);
300 static int rsa_pss_param_print(BIO
*bp
, RSA_PSS_PARAMS
*pss
,
301 X509_ALGOR
*maskHash
, int indent
)
305 if (BIO_puts(bp
, " (INVALID PSS PARAMETERS)\n") <= 0)
309 if (BIO_puts(bp
, "\n") <= 0)
311 if (!BIO_indent(bp
, indent
, 128))
313 if (BIO_puts(bp
, "Hash Algorithm: ") <= 0)
316 if (pss
->hashAlgorithm
) {
317 if (i2a_ASN1_OBJECT(bp
, pss
->hashAlgorithm
->algorithm
) <= 0)
319 } else if (BIO_puts(bp
, "sha1 (default)") <= 0)
322 if (BIO_puts(bp
, "\n") <= 0)
325 if (!BIO_indent(bp
, indent
, 128))
328 if (BIO_puts(bp
, "Mask Algorithm: ") <= 0)
330 if (pss
->maskGenAlgorithm
) {
331 if (i2a_ASN1_OBJECT(bp
, pss
->maskGenAlgorithm
->algorithm
) <= 0)
333 if (BIO_puts(bp
, " with ") <= 0)
336 if (i2a_ASN1_OBJECT(bp
, maskHash
->algorithm
) <= 0)
338 } else if (BIO_puts(bp
, "INVALID") <= 0)
340 } else if (BIO_puts(bp
, "mgf1 with sha1 (default)") <= 0)
344 if (!BIO_indent(bp
, indent
, 128))
346 if (BIO_puts(bp
, "Salt Length: 0x") <= 0)
348 if (pss
->saltLength
) {
349 if (i2a_ASN1_INTEGER(bp
, pss
->saltLength
) <= 0)
351 } else if (BIO_puts(bp
, "14 (default)") <= 0)
355 if (!BIO_indent(bp
, indent
, 128))
357 if (BIO_puts(bp
, "Trailer Field: 0x") <= 0)
359 if (pss
->trailerField
) {
360 if (i2a_ASN1_INTEGER(bp
, pss
->trailerField
) <= 0)
362 } else if (BIO_puts(bp
, "BC (default)") <= 0)
373 static int rsa_sig_print(BIO
*bp
, const X509_ALGOR
*sigalg
,
374 const ASN1_STRING
*sig
, int indent
, ASN1_PCTX
*pctx
)
376 if (OBJ_obj2nid(sigalg
->algorithm
) == NID_rsassaPss
) {
379 X509_ALGOR
*maskHash
;
380 pss
= rsa_pss_decode(sigalg
, &maskHash
);
381 rv
= rsa_pss_param_print(bp
, pss
, maskHash
, indent
);
383 RSA_PSS_PARAMS_free(pss
);
384 X509_ALGOR_free(maskHash
);
387 } else if (!sig
&& BIO_puts(bp
, "\n") <= 0)
390 return X509_signature_dump(bp
, sig
, indent
);
394 static int rsa_pkey_ctrl(EVP_PKEY
*pkey
, int op
, long arg1
, void *arg2
)
396 X509_ALGOR
*alg
= NULL
;
399 case ASN1_PKEY_CTRL_PKCS7_SIGN
:
401 PKCS7_SIGNER_INFO_get0_algs(arg2
, NULL
, NULL
, &alg
);
404 case ASN1_PKEY_CTRL_PKCS7_ENCRYPT
:
406 PKCS7_RECIP_INFO_get0_alg(arg2
, &alg
);
408 #ifndef OPENSSL_NO_CMS
409 case ASN1_PKEY_CTRL_CMS_SIGN
:
411 return rsa_cms_sign(arg2
);
413 return rsa_cms_verify(arg2
);
416 case ASN1_PKEY_CTRL_CMS_ENVELOPE
:
418 return rsa_cms_encrypt(arg2
);
420 return rsa_cms_decrypt(arg2
);
423 case ASN1_PKEY_CTRL_CMS_RI_TYPE
:
424 *(int *)arg2
= CMS_RECIPINFO_TRANS
;
428 case ASN1_PKEY_CTRL_DEFAULT_MD_NID
:
429 *(int *)arg2
= NID_sha256
;
438 X509_ALGOR_set0(alg
, OBJ_nid2obj(NID_rsaEncryption
), V_ASN1_NULL
, 0);
444 /* allocate and set algorithm ID from EVP_MD, default SHA1 */
445 static int rsa_md_to_algor(X509_ALGOR
**palg
, const EVP_MD
*md
)
447 if (EVP_MD_type(md
) == NID_sha1
)
449 *palg
= X509_ALGOR_new();
452 X509_ALGOR_set_md(*palg
, md
);
456 /* Allocate and set MGF1 algorithm ID from EVP_MD */
457 static int rsa_md_to_mgf1(X509_ALGOR
**palg
, const EVP_MD
*mgf1md
)
459 X509_ALGOR
*algtmp
= NULL
;
460 ASN1_STRING
*stmp
= NULL
;
462 if (EVP_MD_type(mgf1md
) == NID_sha1
)
464 /* need to embed algorithm ID inside another */
465 if (!rsa_md_to_algor(&algtmp
, mgf1md
))
467 if (!ASN1_item_pack(algtmp
, ASN1_ITEM_rptr(X509_ALGOR
), &stmp
))
469 *palg
= X509_ALGOR_new();
472 X509_ALGOR_set0(*palg
, OBJ_nid2obj(NID_mgf1
), V_ASN1_SEQUENCE
, stmp
);
475 ASN1_STRING_free(stmp
);
476 X509_ALGOR_free(algtmp
);
482 /* convert algorithm ID to EVP_MD, default SHA1 */
483 static const EVP_MD
*rsa_algor_to_md(X509_ALGOR
*alg
)
488 md
= EVP_get_digestbyobj(alg
->algorithm
);
490 RSAerr(RSA_F_RSA_ALGOR_TO_MD
, RSA_R_UNKNOWN_DIGEST
);
494 /* convert MGF1 algorithm ID to EVP_MD, default SHA1 */
495 static const EVP_MD
*rsa_mgf1_to_md(X509_ALGOR
*alg
, X509_ALGOR
*maskHash
)
500 /* Check mask and lookup mask hash algorithm */
501 if (OBJ_obj2nid(alg
->algorithm
) != NID_mgf1
) {
502 RSAerr(RSA_F_RSA_MGF1_TO_MD
, RSA_R_UNSUPPORTED_MASK_ALGORITHM
);
506 RSAerr(RSA_F_RSA_MGF1_TO_MD
, RSA_R_UNSUPPORTED_MASK_PARAMETER
);
509 md
= EVP_get_digestbyobj(maskHash
->algorithm
);
511 RSAerr(RSA_F_RSA_MGF1_TO_MD
, RSA_R_UNKNOWN_MASK_DIGEST
);
518 * Convert EVP_PKEY_CTX is PSS mode into corresponding algorithm parameter,
519 * suitable for setting an AlgorithmIdentifier.
522 static ASN1_STRING
*rsa_ctx_to_pss(EVP_PKEY_CTX
*pkctx
)
524 const EVP_MD
*sigmd
, *mgf1md
;
525 RSA_PSS_PARAMS
*pss
= NULL
;
526 ASN1_STRING
*os
= NULL
;
527 EVP_PKEY
*pk
= EVP_PKEY_CTX_get0_pkey(pkctx
);
529 if (EVP_PKEY_CTX_get_signature_md(pkctx
, &sigmd
) <= 0)
531 if (EVP_PKEY_CTX_get_rsa_mgf1_md(pkctx
, &mgf1md
) <= 0)
533 if (!EVP_PKEY_CTX_get_rsa_pss_saltlen(pkctx
, &saltlen
))
536 saltlen
= EVP_MD_size(sigmd
);
537 else if (saltlen
== -2) {
538 saltlen
= EVP_PKEY_size(pk
) - EVP_MD_size(sigmd
) - 2;
539 if (((EVP_PKEY_bits(pk
) - 1) & 0x7) == 0)
542 pss
= RSA_PSS_PARAMS_new();
546 pss
->saltLength
= ASN1_INTEGER_new();
547 if (!pss
->saltLength
)
549 if (!ASN1_INTEGER_set(pss
->saltLength
, saltlen
))
552 if (!rsa_md_to_algor(&pss
->hashAlgorithm
, sigmd
))
554 if (!rsa_md_to_mgf1(&pss
->maskGenAlgorithm
, mgf1md
))
556 /* Finally create string with pss parameter encoding. */
557 if (!ASN1_item_pack(pss
, ASN1_ITEM_rptr(RSA_PSS_PARAMS
), &os
))
562 RSA_PSS_PARAMS_free(pss
);
565 ASN1_STRING_free(os
);
570 * From PSS AlgorithmIdentifier set public key parameters. If pkey isn't NULL
571 * then the EVP_MD_CTX is setup and initalised. If it is NULL parameters are
572 * passed to pkctx instead.
575 static int rsa_pss_to_ctx(EVP_MD_CTX
*ctx
, EVP_PKEY_CTX
*pkctx
,
576 X509_ALGOR
*sigalg
, EVP_PKEY
*pkey
)
580 const EVP_MD
*mgf1md
= NULL
, *md
= NULL
;
582 X509_ALGOR
*maskHash
;
583 /* Sanity check: make sure it is PSS */
584 if (OBJ_obj2nid(sigalg
->algorithm
) != NID_rsassaPss
) {
585 RSAerr(RSA_F_RSA_PSS_TO_CTX
, RSA_R_UNSUPPORTED_SIGNATURE_TYPE
);
588 /* Decode PSS parameters */
589 pss
= rsa_pss_decode(sigalg
, &maskHash
);
592 RSAerr(RSA_F_RSA_PSS_TO_CTX
, RSA_R_INVALID_PSS_PARAMETERS
);
595 mgf1md
= rsa_mgf1_to_md(pss
->maskGenAlgorithm
, maskHash
);
598 md
= rsa_algor_to_md(pss
->hashAlgorithm
);
602 if (pss
->saltLength
) {
603 saltlen
= ASN1_INTEGER_get(pss
->saltLength
);
606 * Could perform more salt length sanity checks but the main RSA
607 * routines will trap other invalid values anyway.
610 RSAerr(RSA_F_RSA_PSS_TO_CTX
, RSA_R_INVALID_SALT_LENGTH
);
617 * low-level routines support only trailer field 0xbc (value 1) and
618 * PKCS#1 says we should reject any other value anyway.
620 if (pss
->trailerField
&& ASN1_INTEGER_get(pss
->trailerField
) != 1) {
621 RSAerr(RSA_F_RSA_PSS_TO_CTX
, RSA_R_INVALID_TRAILER
);
625 /* We have all parameters now set up context */
628 if (!EVP_DigestVerifyInit(ctx
, &pkctx
, md
, NULL
, pkey
))
631 const EVP_MD
*checkmd
;
632 if (EVP_PKEY_CTX_get_signature_md(pkctx
, &checkmd
) <= 0)
634 if (EVP_MD_type(md
) != EVP_MD_type(checkmd
)) {
635 RSAerr(RSA_F_RSA_PSS_TO_CTX
, RSA_R_DIGEST_DOES_NOT_MATCH
);
640 if (EVP_PKEY_CTX_set_rsa_padding(pkctx
, RSA_PKCS1_PSS_PADDING
) <= 0)
643 if (EVP_PKEY_CTX_set_rsa_pss_saltlen(pkctx
, saltlen
) <= 0)
646 if (EVP_PKEY_CTX_set_rsa_mgf1_md(pkctx
, mgf1md
) <= 0)
652 RSA_PSS_PARAMS_free(pss
);
653 X509_ALGOR_free(maskHash
);
657 static int rsa_cms_verify(CMS_SignerInfo
*si
)
661 EVP_PKEY_CTX
*pkctx
= CMS_SignerInfo_get0_pkey_ctx(si
);
662 CMS_SignerInfo_get0_algs(si
, NULL
, NULL
, NULL
, &alg
);
663 nid
= OBJ_obj2nid(alg
->algorithm
);
664 if (nid
== NID_rsaEncryption
)
666 if (nid
== NID_rsassaPss
)
667 return rsa_pss_to_ctx(NULL
, pkctx
, alg
, NULL
);
668 /* Workaround for some implementation that use a signature OID */
669 if (OBJ_find_sigid_algs(nid
, NULL
, &nid2
)) {
670 if (nid2
== NID_rsaEncryption
)
677 * Customised RSA item verification routine. This is called when a signature
678 * is encountered requiring special handling. We currently only handle PSS.
681 static int rsa_item_verify(EVP_MD_CTX
*ctx
, const ASN1_ITEM
*it
, void *asn
,
682 X509_ALGOR
*sigalg
, ASN1_BIT_STRING
*sig
,
685 /* Sanity check: make sure it is PSS */
686 if (OBJ_obj2nid(sigalg
->algorithm
) != NID_rsassaPss
) {
687 RSAerr(RSA_F_RSA_ITEM_VERIFY
, RSA_R_UNSUPPORTED_SIGNATURE_TYPE
);
690 if (rsa_pss_to_ctx(ctx
, NULL
, sigalg
, pkey
) > 0) {
697 static int rsa_cms_sign(CMS_SignerInfo
*si
)
699 int pad_mode
= RSA_PKCS1_PADDING
;
701 EVP_PKEY_CTX
*pkctx
= CMS_SignerInfo_get0_pkey_ctx(si
);
702 ASN1_STRING
*os
= NULL
;
703 CMS_SignerInfo_get0_algs(si
, NULL
, NULL
, NULL
, &alg
);
705 if (EVP_PKEY_CTX_get_rsa_padding(pkctx
, &pad_mode
) <= 0)
708 if (pad_mode
== RSA_PKCS1_PADDING
) {
709 X509_ALGOR_set0(alg
, OBJ_nid2obj(NID_rsaEncryption
), V_ASN1_NULL
, 0);
712 /* We don't support it */
713 if (pad_mode
!= RSA_PKCS1_PSS_PADDING
)
715 os
= rsa_ctx_to_pss(pkctx
);
718 X509_ALGOR_set0(alg
, OBJ_nid2obj(NID_rsassaPss
), V_ASN1_SEQUENCE
, os
);
722 static int rsa_item_sign(EVP_MD_CTX
*ctx
, const ASN1_ITEM
*it
, void *asn
,
723 X509_ALGOR
*alg1
, X509_ALGOR
*alg2
,
724 ASN1_BIT_STRING
*sig
)
727 EVP_PKEY_CTX
*pkctx
= ctx
->pctx
;
728 if (EVP_PKEY_CTX_get_rsa_padding(pkctx
, &pad_mode
) <= 0)
730 if (pad_mode
== RSA_PKCS1_PADDING
)
732 if (pad_mode
== RSA_PKCS1_PSS_PADDING
) {
733 ASN1_STRING
*os1
= NULL
;
734 os1
= rsa_ctx_to_pss(pkctx
);
737 /* Duplicate parameters if we have to */
739 ASN1_STRING
*os2
= ASN1_STRING_dup(os1
);
741 ASN1_STRING_free(os1
);
744 X509_ALGOR_set0(alg2
, OBJ_nid2obj(NID_rsassaPss
),
745 V_ASN1_SEQUENCE
, os2
);
747 X509_ALGOR_set0(alg1
, OBJ_nid2obj(NID_rsassaPss
),
748 V_ASN1_SEQUENCE
, os1
);
754 static RSA_OAEP_PARAMS
*rsa_oaep_decode(const X509_ALGOR
*alg
,
755 X509_ALGOR
**pmaskHash
)
757 RSA_OAEP_PARAMS
*pss
;
761 pss
= ASN1_TYPE_unpack_sequence(ASN1_ITEM_rptr(RSA_OAEP_PARAMS
),
767 *pmaskHash
= rsa_mgf1_decode(pss
->maskGenFunc
);
772 static int rsa_cms_decrypt(CMS_RecipientInfo
*ri
)
778 unsigned char *label
= NULL
;
780 const EVP_MD
*mgf1md
= NULL
, *md
= NULL
;
781 RSA_OAEP_PARAMS
*oaep
;
782 X509_ALGOR
*maskHash
;
783 pkctx
= CMS_RecipientInfo_get0_pkey_ctx(ri
);
786 if (!CMS_RecipientInfo_ktri_get0_algs(ri
, NULL
, NULL
, &cmsalg
))
788 nid
= OBJ_obj2nid(cmsalg
->algorithm
);
789 if (nid
== NID_rsaEncryption
)
791 if (nid
!= NID_rsaesOaep
) {
792 RSAerr(RSA_F_RSA_CMS_DECRYPT
, RSA_R_UNSUPPORTED_ENCRYPTION_TYPE
);
795 /* Decode OAEP parameters */
796 oaep
= rsa_oaep_decode(cmsalg
, &maskHash
);
799 RSAerr(RSA_F_RSA_CMS_DECRYPT
, RSA_R_INVALID_OAEP_PARAMETERS
);
803 mgf1md
= rsa_mgf1_to_md(oaep
->maskGenFunc
, maskHash
);
806 md
= rsa_algor_to_md(oaep
->hashFunc
);
810 if (oaep
->pSourceFunc
) {
811 X509_ALGOR
*plab
= oaep
->pSourceFunc
;
812 if (OBJ_obj2nid(plab
->algorithm
) != NID_pSpecified
) {
813 RSAerr(RSA_F_RSA_CMS_DECRYPT
, RSA_R_UNSUPPORTED_LABEL_SOURCE
);
816 if (plab
->parameter
->type
!= V_ASN1_OCTET_STRING
) {
817 RSAerr(RSA_F_RSA_CMS_DECRYPT
, RSA_R_INVALID_LABEL
);
821 label
= plab
->parameter
->value
.octet_string
->data
;
822 /* Stop label being freed when OAEP parameters are freed */
823 plab
->parameter
->value
.octet_string
->data
= NULL
;
824 labellen
= plab
->parameter
->value
.octet_string
->length
;
827 if (EVP_PKEY_CTX_set_rsa_padding(pkctx
, RSA_PKCS1_OAEP_PADDING
) <= 0)
829 if (EVP_PKEY_CTX_set_rsa_oaep_md(pkctx
, md
) <= 0)
831 if (EVP_PKEY_CTX_set_rsa_mgf1_md(pkctx
, mgf1md
) <= 0)
833 if (EVP_PKEY_CTX_set0_rsa_oaep_label(pkctx
, label
, labellen
) <= 0)
839 RSA_OAEP_PARAMS_free(oaep
);
840 X509_ALGOR_free(maskHash
);
844 static int rsa_cms_encrypt(CMS_RecipientInfo
*ri
)
846 const EVP_MD
*md
, *mgf1md
;
847 RSA_OAEP_PARAMS
*oaep
= NULL
;
848 ASN1_STRING
*os
= NULL
;
850 EVP_PKEY_CTX
*pkctx
= CMS_RecipientInfo_get0_pkey_ctx(ri
);
851 int pad_mode
= RSA_PKCS1_PADDING
, rv
= 0, labellen
;
852 unsigned char *label
;
853 CMS_RecipientInfo_ktri_get0_algs(ri
, NULL
, NULL
, &alg
);
855 if (EVP_PKEY_CTX_get_rsa_padding(pkctx
, &pad_mode
) <= 0)
858 if (pad_mode
== RSA_PKCS1_PADDING
) {
859 X509_ALGOR_set0(alg
, OBJ_nid2obj(NID_rsaEncryption
), V_ASN1_NULL
, 0);
863 if (pad_mode
!= RSA_PKCS1_OAEP_PADDING
)
865 if (EVP_PKEY_CTX_get_rsa_oaep_md(pkctx
, &md
) <= 0)
867 if (EVP_PKEY_CTX_get_rsa_mgf1_md(pkctx
, &mgf1md
) <= 0)
869 labellen
= EVP_PKEY_CTX_get0_rsa_oaep_label(pkctx
, &label
);
872 oaep
= RSA_OAEP_PARAMS_new();
875 if (!rsa_md_to_algor(&oaep
->hashFunc
, md
))
877 if (!rsa_md_to_mgf1(&oaep
->maskGenFunc
, mgf1md
))
880 ASN1_OCTET_STRING
*los
= ASN1_OCTET_STRING_new();
881 oaep
->pSourceFunc
= X509_ALGOR_new();
882 if (!oaep
->pSourceFunc
)
886 if (!ASN1_OCTET_STRING_set(los
, label
, labellen
)) {
887 ASN1_OCTET_STRING_free(los
);
890 X509_ALGOR_set0(oaep
->pSourceFunc
, OBJ_nid2obj(NID_pSpecified
),
891 V_ASN1_OCTET_STRING
, los
);
893 /* create string with pss parameter encoding. */
894 if (!ASN1_item_pack(oaep
, ASN1_ITEM_rptr(RSA_OAEP_PARAMS
), &os
))
896 X509_ALGOR_set0(alg
, OBJ_nid2obj(NID_rsaesOaep
), V_ASN1_SEQUENCE
, os
);
901 RSA_OAEP_PARAMS_free(oaep
);
902 ASN1_STRING_free(os
);
906 const EVP_PKEY_ASN1_METHOD rsa_asn1_meths
[] = {
910 ASN1_PKEY_SIGPARAM_NULL
,
913 "OpenSSL RSA method",