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
))
258 static int rsa_pub_print(BIO
*bp
, const EVP_PKEY
*pkey
, int indent
,
261 return do_rsa_print(bp
, pkey
->pkey
.rsa
, indent
, 0);
264 static int rsa_priv_print(BIO
*bp
, const EVP_PKEY
*pkey
, int indent
,
267 return do_rsa_print(bp
, pkey
->pkey
.rsa
, indent
, 1);
270 /* Given an MGF1 Algorithm ID decode to an Algorithm Identifier */
271 static X509_ALGOR
*rsa_mgf1_decode(X509_ALGOR
*alg
)
275 if (OBJ_obj2nid(alg
->algorithm
) != NID_mgf1
)
277 return ASN1_TYPE_unpack_sequence(ASN1_ITEM_rptr(X509_ALGOR
),
281 static RSA_PSS_PARAMS
*rsa_pss_decode(const X509_ALGOR
*alg
,
282 X509_ALGOR
**pmaskHash
)
288 pss
= ASN1_TYPE_unpack_sequence(ASN1_ITEM_rptr(RSA_PSS_PARAMS
),
294 *pmaskHash
= rsa_mgf1_decode(pss
->maskGenAlgorithm
);
299 static int rsa_pss_param_print(BIO
*bp
, RSA_PSS_PARAMS
*pss
,
300 X509_ALGOR
*maskHash
, int indent
)
304 if (BIO_puts(bp
, " (INVALID PSS PARAMETERS)\n") <= 0)
308 if (BIO_puts(bp
, "\n") <= 0)
310 if (!BIO_indent(bp
, indent
, 128))
312 if (BIO_puts(bp
, "Hash Algorithm: ") <= 0)
315 if (pss
->hashAlgorithm
) {
316 if (i2a_ASN1_OBJECT(bp
, pss
->hashAlgorithm
->algorithm
) <= 0)
318 } else if (BIO_puts(bp
, "sha1 (default)") <= 0)
321 if (BIO_puts(bp
, "\n") <= 0)
324 if (!BIO_indent(bp
, indent
, 128))
327 if (BIO_puts(bp
, "Mask Algorithm: ") <= 0)
329 if (pss
->maskGenAlgorithm
) {
330 if (i2a_ASN1_OBJECT(bp
, pss
->maskGenAlgorithm
->algorithm
) <= 0)
332 if (BIO_puts(bp
, " with ") <= 0)
335 if (i2a_ASN1_OBJECT(bp
, maskHash
->algorithm
) <= 0)
337 } else if (BIO_puts(bp
, "INVALID") <= 0)
339 } else if (BIO_puts(bp
, "mgf1 with sha1 (default)") <= 0)
343 if (!BIO_indent(bp
, indent
, 128))
345 if (BIO_puts(bp
, "Salt Length: 0x") <= 0)
347 if (pss
->saltLength
) {
348 if (i2a_ASN1_INTEGER(bp
, pss
->saltLength
) <= 0)
350 } else if (BIO_puts(bp
, "14 (default)") <= 0)
354 if (!BIO_indent(bp
, indent
, 128))
356 if (BIO_puts(bp
, "Trailer Field: 0x") <= 0)
358 if (pss
->trailerField
) {
359 if (i2a_ASN1_INTEGER(bp
, pss
->trailerField
) <= 0)
361 } else if (BIO_puts(bp
, "BC (default)") <= 0)
372 static int rsa_sig_print(BIO
*bp
, const X509_ALGOR
*sigalg
,
373 const ASN1_STRING
*sig
, int indent
, ASN1_PCTX
*pctx
)
375 if (OBJ_obj2nid(sigalg
->algorithm
) == NID_rsassaPss
) {
378 X509_ALGOR
*maskHash
;
379 pss
= rsa_pss_decode(sigalg
, &maskHash
);
380 rv
= rsa_pss_param_print(bp
, pss
, maskHash
, indent
);
381 RSA_PSS_PARAMS_free(pss
);
382 X509_ALGOR_free(maskHash
);
385 } else if (!sig
&& BIO_puts(bp
, "\n") <= 0)
388 return X509_signature_dump(bp
, sig
, indent
);
392 static int rsa_pkey_ctrl(EVP_PKEY
*pkey
, int op
, long arg1
, void *arg2
)
394 X509_ALGOR
*alg
= NULL
;
397 case ASN1_PKEY_CTRL_PKCS7_SIGN
:
399 PKCS7_SIGNER_INFO_get0_algs(arg2
, NULL
, NULL
, &alg
);
402 case ASN1_PKEY_CTRL_PKCS7_ENCRYPT
:
404 PKCS7_RECIP_INFO_get0_alg(arg2
, &alg
);
406 #ifndef OPENSSL_NO_CMS
407 case ASN1_PKEY_CTRL_CMS_SIGN
:
409 return rsa_cms_sign(arg2
);
411 return rsa_cms_verify(arg2
);
414 case ASN1_PKEY_CTRL_CMS_ENVELOPE
:
416 return rsa_cms_encrypt(arg2
);
418 return rsa_cms_decrypt(arg2
);
421 case ASN1_PKEY_CTRL_CMS_RI_TYPE
:
422 *(int *)arg2
= CMS_RECIPINFO_TRANS
;
426 case ASN1_PKEY_CTRL_DEFAULT_MD_NID
:
427 *(int *)arg2
= NID_sha256
;
436 X509_ALGOR_set0(alg
, OBJ_nid2obj(NID_rsaEncryption
), V_ASN1_NULL
, 0);
442 /* allocate and set algorithm ID from EVP_MD, default SHA1 */
443 static int rsa_md_to_algor(X509_ALGOR
**palg
, const EVP_MD
*md
)
445 if (EVP_MD_type(md
) == NID_sha1
)
447 *palg
= X509_ALGOR_new();
450 X509_ALGOR_set_md(*palg
, md
);
454 /* Allocate and set MGF1 algorithm ID from EVP_MD */
455 static int rsa_md_to_mgf1(X509_ALGOR
**palg
, const EVP_MD
*mgf1md
)
457 X509_ALGOR
*algtmp
= NULL
;
458 ASN1_STRING
*stmp
= NULL
;
460 if (EVP_MD_type(mgf1md
) == NID_sha1
)
462 /* need to embed algorithm ID inside another */
463 if (!rsa_md_to_algor(&algtmp
, mgf1md
))
465 if (!ASN1_item_pack(algtmp
, ASN1_ITEM_rptr(X509_ALGOR
), &stmp
))
467 *palg
= X509_ALGOR_new();
470 X509_ALGOR_set0(*palg
, OBJ_nid2obj(NID_mgf1
), V_ASN1_SEQUENCE
, stmp
);
473 ASN1_STRING_free(stmp
);
474 X509_ALGOR_free(algtmp
);
480 /* convert algorithm ID to EVP_MD, default SHA1 */
481 static const EVP_MD
*rsa_algor_to_md(X509_ALGOR
*alg
)
486 md
= EVP_get_digestbyobj(alg
->algorithm
);
488 RSAerr(RSA_F_RSA_ALGOR_TO_MD
, RSA_R_UNKNOWN_DIGEST
);
492 /* convert MGF1 algorithm ID to EVP_MD, default SHA1 */
493 static const EVP_MD
*rsa_mgf1_to_md(X509_ALGOR
*alg
, X509_ALGOR
*maskHash
)
498 /* Check mask and lookup mask hash algorithm */
499 if (OBJ_obj2nid(alg
->algorithm
) != NID_mgf1
) {
500 RSAerr(RSA_F_RSA_MGF1_TO_MD
, RSA_R_UNSUPPORTED_MASK_ALGORITHM
);
504 RSAerr(RSA_F_RSA_MGF1_TO_MD
, RSA_R_UNSUPPORTED_MASK_PARAMETER
);
507 md
= EVP_get_digestbyobj(maskHash
->algorithm
);
509 RSAerr(RSA_F_RSA_MGF1_TO_MD
, RSA_R_UNKNOWN_MASK_DIGEST
);
516 * Convert EVP_PKEY_CTX is PSS mode into corresponding algorithm parameter,
517 * suitable for setting an AlgorithmIdentifier.
520 static ASN1_STRING
*rsa_ctx_to_pss(EVP_PKEY_CTX
*pkctx
)
522 const EVP_MD
*sigmd
, *mgf1md
;
523 RSA_PSS_PARAMS
*pss
= NULL
;
524 ASN1_STRING
*os
= NULL
;
525 EVP_PKEY
*pk
= EVP_PKEY_CTX_get0_pkey(pkctx
);
527 if (EVP_PKEY_CTX_get_signature_md(pkctx
, &sigmd
) <= 0)
529 if (EVP_PKEY_CTX_get_rsa_mgf1_md(pkctx
, &mgf1md
) <= 0)
531 if (!EVP_PKEY_CTX_get_rsa_pss_saltlen(pkctx
, &saltlen
))
534 saltlen
= EVP_MD_size(sigmd
);
535 else if (saltlen
== -2) {
536 saltlen
= EVP_PKEY_size(pk
) - EVP_MD_size(sigmd
) - 2;
537 if (((EVP_PKEY_bits(pk
) - 1) & 0x7) == 0)
540 pss
= RSA_PSS_PARAMS_new();
544 pss
->saltLength
= ASN1_INTEGER_new();
545 if (!pss
->saltLength
)
547 if (!ASN1_INTEGER_set(pss
->saltLength
, saltlen
))
550 if (!rsa_md_to_algor(&pss
->hashAlgorithm
, sigmd
))
552 if (!rsa_md_to_mgf1(&pss
->maskGenAlgorithm
, mgf1md
))
554 /* Finally create string with pss parameter encoding. */
555 if (!ASN1_item_pack(pss
, ASN1_ITEM_rptr(RSA_PSS_PARAMS
), &os
))
559 RSA_PSS_PARAMS_free(pss
);
562 ASN1_STRING_free(os
);
567 * From PSS AlgorithmIdentifier set public key parameters. If pkey isn't NULL
568 * then the EVP_MD_CTX is setup and initalised. If it is NULL parameters are
569 * passed to pkctx instead.
572 static int rsa_pss_to_ctx(EVP_MD_CTX
*ctx
, EVP_PKEY_CTX
*pkctx
,
573 X509_ALGOR
*sigalg
, EVP_PKEY
*pkey
)
577 const EVP_MD
*mgf1md
= NULL
, *md
= NULL
;
579 X509_ALGOR
*maskHash
;
580 /* Sanity check: make sure it is PSS */
581 if (OBJ_obj2nid(sigalg
->algorithm
) != NID_rsassaPss
) {
582 RSAerr(RSA_F_RSA_PSS_TO_CTX
, RSA_R_UNSUPPORTED_SIGNATURE_TYPE
);
585 /* Decode PSS parameters */
586 pss
= rsa_pss_decode(sigalg
, &maskHash
);
589 RSAerr(RSA_F_RSA_PSS_TO_CTX
, RSA_R_INVALID_PSS_PARAMETERS
);
592 mgf1md
= rsa_mgf1_to_md(pss
->maskGenAlgorithm
, maskHash
);
595 md
= rsa_algor_to_md(pss
->hashAlgorithm
);
599 if (pss
->saltLength
) {
600 saltlen
= ASN1_INTEGER_get(pss
->saltLength
);
603 * Could perform more salt length sanity checks but the main RSA
604 * routines will trap other invalid values anyway.
607 RSAerr(RSA_F_RSA_PSS_TO_CTX
, RSA_R_INVALID_SALT_LENGTH
);
614 * low-level routines support only trailer field 0xbc (value 1) and
615 * PKCS#1 says we should reject any other value anyway.
617 if (pss
->trailerField
&& ASN1_INTEGER_get(pss
->trailerField
) != 1) {
618 RSAerr(RSA_F_RSA_PSS_TO_CTX
, RSA_R_INVALID_TRAILER
);
622 /* We have all parameters now set up context */
625 if (!EVP_DigestVerifyInit(ctx
, &pkctx
, md
, NULL
, pkey
))
628 const EVP_MD
*checkmd
;
629 if (EVP_PKEY_CTX_get_signature_md(pkctx
, &checkmd
) <= 0)
631 if (EVP_MD_type(md
) != EVP_MD_type(checkmd
)) {
632 RSAerr(RSA_F_RSA_PSS_TO_CTX
, RSA_R_DIGEST_DOES_NOT_MATCH
);
637 if (EVP_PKEY_CTX_set_rsa_padding(pkctx
, RSA_PKCS1_PSS_PADDING
) <= 0)
640 if (EVP_PKEY_CTX_set_rsa_pss_saltlen(pkctx
, saltlen
) <= 0)
643 if (EVP_PKEY_CTX_set_rsa_mgf1_md(pkctx
, mgf1md
) <= 0)
649 RSA_PSS_PARAMS_free(pss
);
650 X509_ALGOR_free(maskHash
);
654 static int rsa_cms_verify(CMS_SignerInfo
*si
)
658 EVP_PKEY_CTX
*pkctx
= CMS_SignerInfo_get0_pkey_ctx(si
);
659 CMS_SignerInfo_get0_algs(si
, NULL
, NULL
, NULL
, &alg
);
660 nid
= OBJ_obj2nid(alg
->algorithm
);
661 if (nid
== NID_rsaEncryption
)
663 if (nid
== NID_rsassaPss
)
664 return rsa_pss_to_ctx(NULL
, pkctx
, alg
, NULL
);
665 /* Workaround for some implementation that use a signature OID */
666 if (OBJ_find_sigid_algs(nid
, NULL
, &nid2
)) {
667 if (nid2
== NID_rsaEncryption
)
674 * Customised RSA item verification routine. This is called when a signature
675 * is encountered requiring special handling. We currently only handle PSS.
678 static int rsa_item_verify(EVP_MD_CTX
*ctx
, const ASN1_ITEM
*it
, void *asn
,
679 X509_ALGOR
*sigalg
, ASN1_BIT_STRING
*sig
,
682 /* Sanity check: make sure it is PSS */
683 if (OBJ_obj2nid(sigalg
->algorithm
) != NID_rsassaPss
) {
684 RSAerr(RSA_F_RSA_ITEM_VERIFY
, RSA_R_UNSUPPORTED_SIGNATURE_TYPE
);
687 if (rsa_pss_to_ctx(ctx
, NULL
, sigalg
, pkey
) > 0) {
694 static int rsa_cms_sign(CMS_SignerInfo
*si
)
696 int pad_mode
= RSA_PKCS1_PADDING
;
698 EVP_PKEY_CTX
*pkctx
= CMS_SignerInfo_get0_pkey_ctx(si
);
699 ASN1_STRING
*os
= NULL
;
700 CMS_SignerInfo_get0_algs(si
, NULL
, NULL
, NULL
, &alg
);
702 if (EVP_PKEY_CTX_get_rsa_padding(pkctx
, &pad_mode
) <= 0)
705 if (pad_mode
== RSA_PKCS1_PADDING
) {
706 X509_ALGOR_set0(alg
, OBJ_nid2obj(NID_rsaEncryption
), V_ASN1_NULL
, 0);
709 /* We don't support it */
710 if (pad_mode
!= RSA_PKCS1_PSS_PADDING
)
712 os
= rsa_ctx_to_pss(pkctx
);
715 X509_ALGOR_set0(alg
, OBJ_nid2obj(NID_rsassaPss
), V_ASN1_SEQUENCE
, os
);
719 static int rsa_item_sign(EVP_MD_CTX
*ctx
, const ASN1_ITEM
*it
, void *asn
,
720 X509_ALGOR
*alg1
, X509_ALGOR
*alg2
,
721 ASN1_BIT_STRING
*sig
)
724 EVP_PKEY_CTX
*pkctx
= ctx
->pctx
;
725 if (EVP_PKEY_CTX_get_rsa_padding(pkctx
, &pad_mode
) <= 0)
727 if (pad_mode
== RSA_PKCS1_PADDING
)
729 if (pad_mode
== RSA_PKCS1_PSS_PADDING
) {
730 ASN1_STRING
*os1
= NULL
;
731 os1
= rsa_ctx_to_pss(pkctx
);
734 /* Duplicate parameters if we have to */
736 ASN1_STRING
*os2
= ASN1_STRING_dup(os1
);
738 ASN1_STRING_free(os1
);
741 X509_ALGOR_set0(alg2
, OBJ_nid2obj(NID_rsassaPss
),
742 V_ASN1_SEQUENCE
, os2
);
744 X509_ALGOR_set0(alg1
, OBJ_nid2obj(NID_rsassaPss
),
745 V_ASN1_SEQUENCE
, os1
);
751 static RSA_OAEP_PARAMS
*rsa_oaep_decode(const X509_ALGOR
*alg
,
752 X509_ALGOR
**pmaskHash
)
754 RSA_OAEP_PARAMS
*pss
;
758 pss
= ASN1_TYPE_unpack_sequence(ASN1_ITEM_rptr(RSA_OAEP_PARAMS
),
764 *pmaskHash
= rsa_mgf1_decode(pss
->maskGenFunc
);
769 static int rsa_cms_decrypt(CMS_RecipientInfo
*ri
)
775 unsigned char *label
= NULL
;
777 const EVP_MD
*mgf1md
= NULL
, *md
= NULL
;
778 RSA_OAEP_PARAMS
*oaep
;
779 X509_ALGOR
*maskHash
;
780 pkctx
= CMS_RecipientInfo_get0_pkey_ctx(ri
);
783 if (!CMS_RecipientInfo_ktri_get0_algs(ri
, NULL
, NULL
, &cmsalg
))
785 nid
= OBJ_obj2nid(cmsalg
->algorithm
);
786 if (nid
== NID_rsaEncryption
)
788 if (nid
!= NID_rsaesOaep
) {
789 RSAerr(RSA_F_RSA_CMS_DECRYPT
, RSA_R_UNSUPPORTED_ENCRYPTION_TYPE
);
792 /* Decode OAEP parameters */
793 oaep
= rsa_oaep_decode(cmsalg
, &maskHash
);
796 RSAerr(RSA_F_RSA_CMS_DECRYPT
, RSA_R_INVALID_OAEP_PARAMETERS
);
800 mgf1md
= rsa_mgf1_to_md(oaep
->maskGenFunc
, maskHash
);
803 md
= rsa_algor_to_md(oaep
->hashFunc
);
807 if (oaep
->pSourceFunc
) {
808 X509_ALGOR
*plab
= oaep
->pSourceFunc
;
809 if (OBJ_obj2nid(plab
->algorithm
) != NID_pSpecified
) {
810 RSAerr(RSA_F_RSA_CMS_DECRYPT
, RSA_R_UNSUPPORTED_LABEL_SOURCE
);
813 if (plab
->parameter
->type
!= V_ASN1_OCTET_STRING
) {
814 RSAerr(RSA_F_RSA_CMS_DECRYPT
, RSA_R_INVALID_LABEL
);
818 label
= plab
->parameter
->value
.octet_string
->data
;
819 /* Stop label being freed when OAEP parameters are freed */
820 plab
->parameter
->value
.octet_string
->data
= NULL
;
821 labellen
= plab
->parameter
->value
.octet_string
->length
;
824 if (EVP_PKEY_CTX_set_rsa_padding(pkctx
, RSA_PKCS1_OAEP_PADDING
) <= 0)
826 if (EVP_PKEY_CTX_set_rsa_oaep_md(pkctx
, md
) <= 0)
828 if (EVP_PKEY_CTX_set_rsa_mgf1_md(pkctx
, mgf1md
) <= 0)
830 if (EVP_PKEY_CTX_set0_rsa_oaep_label(pkctx
, label
, labellen
) <= 0)
836 RSA_OAEP_PARAMS_free(oaep
);
837 X509_ALGOR_free(maskHash
);
841 static int rsa_cms_encrypt(CMS_RecipientInfo
*ri
)
843 const EVP_MD
*md
, *mgf1md
;
844 RSA_OAEP_PARAMS
*oaep
= NULL
;
845 ASN1_STRING
*os
= NULL
;
847 EVP_PKEY_CTX
*pkctx
= CMS_RecipientInfo_get0_pkey_ctx(ri
);
848 int pad_mode
= RSA_PKCS1_PADDING
, rv
= 0, labellen
;
849 unsigned char *label
;
850 CMS_RecipientInfo_ktri_get0_algs(ri
, NULL
, NULL
, &alg
);
852 if (EVP_PKEY_CTX_get_rsa_padding(pkctx
, &pad_mode
) <= 0)
855 if (pad_mode
== RSA_PKCS1_PADDING
) {
856 X509_ALGOR_set0(alg
, OBJ_nid2obj(NID_rsaEncryption
), V_ASN1_NULL
, 0);
860 if (pad_mode
!= RSA_PKCS1_OAEP_PADDING
)
862 if (EVP_PKEY_CTX_get_rsa_oaep_md(pkctx
, &md
) <= 0)
864 if (EVP_PKEY_CTX_get_rsa_mgf1_md(pkctx
, &mgf1md
) <= 0)
866 labellen
= EVP_PKEY_CTX_get0_rsa_oaep_label(pkctx
, &label
);
869 oaep
= RSA_OAEP_PARAMS_new();
872 if (!rsa_md_to_algor(&oaep
->hashFunc
, md
))
874 if (!rsa_md_to_mgf1(&oaep
->maskGenFunc
, mgf1md
))
877 ASN1_OCTET_STRING
*los
= ASN1_OCTET_STRING_new();
878 oaep
->pSourceFunc
= X509_ALGOR_new();
879 if (!oaep
->pSourceFunc
)
883 if (!ASN1_OCTET_STRING_set(los
, label
, labellen
)) {
884 ASN1_OCTET_STRING_free(los
);
887 X509_ALGOR_set0(oaep
->pSourceFunc
, OBJ_nid2obj(NID_pSpecified
),
888 V_ASN1_OCTET_STRING
, los
);
890 /* create string with pss parameter encoding. */
891 if (!ASN1_item_pack(oaep
, ASN1_ITEM_rptr(RSA_OAEP_PARAMS
), &os
))
893 X509_ALGOR_set0(alg
, OBJ_nid2obj(NID_rsaesOaep
), V_ASN1_SEQUENCE
, os
);
897 RSA_OAEP_PARAMS_free(oaep
);
898 ASN1_STRING_free(os
);
902 const EVP_PKEY_ASN1_METHOD rsa_asn1_meths
[] = {
906 ASN1_PKEY_SIGPARAM_NULL
,
909 "OpenSSL RSA method",