2 * Copyright 2006-2018 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/asn1t.h>
13 #include <openssl/x509.h>
14 #include <openssl/bn.h>
15 #include <openssl/cms.h>
16 #include <openssl/core_names.h>
17 #include "internal/param_build.h"
18 #include "crypto/asn1.h"
19 #include "crypto/evp.h"
20 #include "crypto/rsa.h"
21 #include "rsa_local.h"
23 #ifndef OPENSSL_NO_CMS
24 static int rsa_cms_sign(CMS_SignerInfo *si);
25 static int rsa_cms_verify(CMS_SignerInfo *si);
26 static int rsa_cms_decrypt(CMS_RecipientInfo *ri);
27 static int rsa_cms_encrypt(CMS_RecipientInfo *ri);
30 static RSA_PSS_PARAMS *rsa_pss_decode(const X509_ALGOR *alg);
32 /* Set any parameters associated with pkey */
33 static int rsa_param_encode(const EVP_PKEY *pkey,
34 ASN1_STRING **pstr, int *pstrtype)
36 const RSA *rsa = pkey->pkey.rsa;
39 /* If RSA it's just NULL type */
40 if (pkey->ameth->pkey_id != EVP_PKEY_RSA_PSS) {
41 *pstrtype = V_ASN1_NULL;
44 /* If no PSS parameters we omit parameters entirely */
45 if (rsa->pss == NULL) {
46 *pstrtype = V_ASN1_UNDEF;
49 /* Encode PSS parameters */
50 if (ASN1_item_pack(rsa->pss, ASN1_ITEM_rptr(RSA_PSS_PARAMS), pstr) == NULL)
53 *pstrtype = V_ASN1_SEQUENCE;
56 /* Decode any parameters and set them in RSA structure */
57 static int rsa_param_decode(RSA *rsa, const X509_ALGOR *alg)
59 const ASN1_OBJECT *algoid;
63 X509_ALGOR_get0(&algoid, &algptype, &algp, alg);
64 if (OBJ_obj2nid(algoid) != EVP_PKEY_RSA_PSS)
66 if (algptype == V_ASN1_UNDEF)
68 if (algptype != V_ASN1_SEQUENCE) {
69 RSAerr(RSA_F_RSA_PARAM_DECODE, RSA_R_INVALID_PSS_PARAMETERS);
72 rsa->pss = rsa_pss_decode(alg);
78 static int rsa_pub_encode(X509_PUBKEY *pk, const EVP_PKEY *pkey)
80 unsigned char *penc = NULL;
85 if (!rsa_param_encode(pkey, &str, &strtype))
87 penclen = i2d_RSAPublicKey(pkey->pkey.rsa, &penc);
90 if (X509_PUBKEY_set0_param(pk, OBJ_nid2obj(pkey->ameth->pkey_id),
91 strtype, str, penc, penclen))
98 static int rsa_pub_decode(EVP_PKEY *pkey, X509_PUBKEY *pubkey)
100 const unsigned char *p;
105 if (!X509_PUBKEY_get0_param(NULL, &p, &pklen, &alg, pubkey))
107 if ((rsa = d2i_RSAPublicKey(NULL, &p, pklen)) == NULL) {
108 RSAerr(RSA_F_RSA_PUB_DECODE, ERR_R_RSA_LIB);
111 if (!rsa_param_decode(rsa, alg)) {
115 if (!EVP_PKEY_assign(pkey, pkey->ameth->pkey_id, rsa)) {
122 static int rsa_pub_cmp(const EVP_PKEY *a, const EVP_PKEY *b)
124 if (BN_cmp(b->pkey.rsa->n, a->pkey.rsa->n) != 0
125 || BN_cmp(b->pkey.rsa->e, a->pkey.rsa->e) != 0)
130 static int old_rsa_priv_decode(EVP_PKEY *pkey,
131 const unsigned char **pder, int derlen)
135 if ((rsa = d2i_RSAPrivateKey(NULL, pder, derlen)) == NULL) {
136 RSAerr(RSA_F_OLD_RSA_PRIV_DECODE, ERR_R_RSA_LIB);
139 EVP_PKEY_assign(pkey, pkey->ameth->pkey_id, rsa);
143 static int old_rsa_priv_encode(const EVP_PKEY *pkey, unsigned char **pder)
145 return i2d_RSAPrivateKey(pkey->pkey.rsa, pder);
148 static int rsa_priv_encode(PKCS8_PRIV_KEY_INFO *p8, const EVP_PKEY *pkey)
150 unsigned char *rk = NULL;
155 if (!rsa_param_encode(pkey, &str, &strtype))
157 rklen = i2d_RSAPrivateKey(pkey->pkey.rsa, &rk);
160 RSAerr(RSA_F_RSA_PRIV_ENCODE, ERR_R_MALLOC_FAILURE);
161 ASN1_STRING_free(str);
165 if (!PKCS8_pkey_set0(p8, OBJ_nid2obj(pkey->ameth->pkey_id), 0,
166 strtype, str, rk, rklen)) {
167 RSAerr(RSA_F_RSA_PRIV_ENCODE, ERR_R_MALLOC_FAILURE);
168 ASN1_STRING_free(str);
175 static int rsa_priv_decode(EVP_PKEY *pkey, const PKCS8_PRIV_KEY_INFO *p8)
177 const unsigned char *p;
180 const X509_ALGOR *alg;
182 if (!PKCS8_pkey_get0(NULL, &p, &pklen, &alg, p8))
184 rsa = d2i_RSAPrivateKey(NULL, &p, pklen);
186 RSAerr(RSA_F_RSA_PRIV_DECODE, ERR_R_RSA_LIB);
189 if (!rsa_param_decode(rsa, alg)) {
193 EVP_PKEY_assign(pkey, pkey->ameth->pkey_id, rsa);
197 static int int_rsa_size(const EVP_PKEY *pkey)
199 return RSA_size(pkey->pkey.rsa);
202 static int rsa_bits(const EVP_PKEY *pkey)
204 return BN_num_bits(pkey->pkey.rsa->n);
207 static int rsa_security_bits(const EVP_PKEY *pkey)
209 return RSA_security_bits(pkey->pkey.rsa);
212 static void int_rsa_free(EVP_PKEY *pkey)
214 RSA_free(pkey->pkey.rsa);
217 static X509_ALGOR *rsa_mgf1_decode(X509_ALGOR *alg)
219 if (OBJ_obj2nid(alg->algorithm) != NID_mgf1)
221 return ASN1_TYPE_unpack_sequence(ASN1_ITEM_rptr(X509_ALGOR),
225 static int rsa_pss_param_print(BIO *bp, int pss_key, RSA_PSS_PARAMS *pss,
229 X509_ALGOR *maskHash = NULL;
231 if (!BIO_indent(bp, indent, 128))
235 if (BIO_puts(bp, "No PSS parameter restrictions\n") <= 0)
239 if (BIO_puts(bp, "PSS parameter restrictions:") <= 0)
242 } else if (pss == NULL) {
243 if (BIO_puts(bp,"(INVALID PSS PARAMETERS)\n") <= 0)
247 if (BIO_puts(bp, "\n") <= 0)
251 if (!BIO_indent(bp, indent, 128))
253 if (BIO_puts(bp, "Hash Algorithm: ") <= 0)
256 if (pss->hashAlgorithm) {
257 if (i2a_ASN1_OBJECT(bp, pss->hashAlgorithm->algorithm) <= 0)
259 } else if (BIO_puts(bp, "sha1 (default)") <= 0) {
263 if (BIO_puts(bp, "\n") <= 0)
266 if (!BIO_indent(bp, indent, 128))
269 if (BIO_puts(bp, "Mask Algorithm: ") <= 0)
271 if (pss->maskGenAlgorithm) {
272 if (i2a_ASN1_OBJECT(bp, pss->maskGenAlgorithm->algorithm) <= 0)
274 if (BIO_puts(bp, " with ") <= 0)
276 maskHash = rsa_mgf1_decode(pss->maskGenAlgorithm);
277 if (maskHash != NULL) {
278 if (i2a_ASN1_OBJECT(bp, maskHash->algorithm) <= 0)
280 } else if (BIO_puts(bp, "INVALID") <= 0) {
283 } else if (BIO_puts(bp, "mgf1 with sha1 (default)") <= 0) {
288 if (!BIO_indent(bp, indent, 128))
290 if (BIO_printf(bp, "%s Salt Length: 0x", pss_key ? "Minimum" : "") <= 0)
292 if (pss->saltLength) {
293 if (i2a_ASN1_INTEGER(bp, pss->saltLength) <= 0)
295 } else if (BIO_puts(bp, "14 (default)") <= 0) {
300 if (!BIO_indent(bp, indent, 128))
302 if (BIO_puts(bp, "Trailer Field: 0x") <= 0)
304 if (pss->trailerField) {
305 if (i2a_ASN1_INTEGER(bp, pss->trailerField) <= 0)
307 } else if (BIO_puts(bp, "BC (default)") <= 0) {
315 X509_ALGOR_free(maskHash);
320 static int pkey_rsa_print(BIO *bp, const EVP_PKEY *pkey, int off, int priv)
322 const RSA *x = pkey->pkey.rsa;
325 int ret = 0, mod_len = 0, ex_primes;
328 mod_len = BN_num_bits(x->n);
329 ex_primes = sk_RSA_PRIME_INFO_num(x->prime_infos);
331 if (!BIO_indent(bp, off, 128))
334 if (BIO_printf(bp, "%s ", pkey_is_pss(pkey) ? "RSA-PSS" : "RSA") <= 0)
338 if (BIO_printf(bp, "Private-Key: (%d bit, %d primes)\n",
339 mod_len, ex_primes <= 0 ? 2 : ex_primes + 2) <= 0)
342 s = "publicExponent:";
344 if (BIO_printf(bp, "Public-Key: (%d bit)\n", mod_len) <= 0)
349 if (!ASN1_bn_print(bp, str, x->n, NULL, off))
351 if (!ASN1_bn_print(bp, s, x->e, NULL, off))
356 if (!ASN1_bn_print(bp, "privateExponent:", x->d, NULL, off))
358 if (!ASN1_bn_print(bp, "prime1:", x->p, NULL, off))
360 if (!ASN1_bn_print(bp, "prime2:", x->q, NULL, off))
362 if (!ASN1_bn_print(bp, "exponent1:", x->dmp1, NULL, off))
364 if (!ASN1_bn_print(bp, "exponent2:", x->dmq1, NULL, off))
366 if (!ASN1_bn_print(bp, "coefficient:", x->iqmp, NULL, off))
368 for (i = 0; i < sk_RSA_PRIME_INFO_num(x->prime_infos); i++) {
369 /* print multi-prime info */
371 RSA_PRIME_INFO *pinfo;
374 pinfo = sk_RSA_PRIME_INFO_value(x->prime_infos, i);
375 for (j = 0; j < 3; j++) {
376 if (!BIO_indent(bp, off, 128))
380 if (BIO_printf(bp, "prime%d:", i + 3) <= 0)
385 if (BIO_printf(bp, "exponent%d:", i + 3) <= 0)
390 if (BIO_printf(bp, "coefficient%d:", i + 3) <= 0)
397 if (!ASN1_bn_print(bp, "", bn, NULL, off))
402 if (pkey_is_pss(pkey) && !rsa_pss_param_print(bp, 1, x->pss, off))
409 static int rsa_pub_print(BIO *bp, const EVP_PKEY *pkey, int indent,
412 return pkey_rsa_print(bp, pkey, indent, 0);
415 static int rsa_priv_print(BIO *bp, const EVP_PKEY *pkey, int indent,
418 return pkey_rsa_print(bp, pkey, indent, 1);
421 static RSA_PSS_PARAMS *rsa_pss_decode(const X509_ALGOR *alg)
425 pss = ASN1_TYPE_unpack_sequence(ASN1_ITEM_rptr(RSA_PSS_PARAMS),
431 if (pss->maskGenAlgorithm != NULL) {
432 pss->maskHash = rsa_mgf1_decode(pss->maskGenAlgorithm);
433 if (pss->maskHash == NULL) {
434 RSA_PSS_PARAMS_free(pss);
442 static int rsa_sig_print(BIO *bp, const X509_ALGOR *sigalg,
443 const ASN1_STRING *sig, int indent, ASN1_PCTX *pctx)
445 if (OBJ_obj2nid(sigalg->algorithm) == EVP_PKEY_RSA_PSS) {
447 RSA_PSS_PARAMS *pss = rsa_pss_decode(sigalg);
449 rv = rsa_pss_param_print(bp, 0, pss, indent);
450 RSA_PSS_PARAMS_free(pss);
453 } else if (BIO_puts(bp, "\n") <= 0) {
457 return X509_signature_dump(bp, sig, indent);
461 static int rsa_pkey_ctrl(EVP_PKEY *pkey, int op, long arg1, void *arg2)
463 X509_ALGOR *alg = NULL;
465 const EVP_MD *mgf1md;
470 case ASN1_PKEY_CTRL_PKCS7_SIGN:
472 PKCS7_SIGNER_INFO_get0_algs(arg2, NULL, NULL, &alg);
475 case ASN1_PKEY_CTRL_PKCS7_ENCRYPT:
476 if (pkey_is_pss(pkey))
479 PKCS7_RECIP_INFO_get0_alg(arg2, &alg);
481 #ifndef OPENSSL_NO_CMS
482 case ASN1_PKEY_CTRL_CMS_SIGN:
484 return rsa_cms_sign(arg2);
486 return rsa_cms_verify(arg2);
489 case ASN1_PKEY_CTRL_CMS_ENVELOPE:
490 if (pkey_is_pss(pkey))
493 return rsa_cms_encrypt(arg2);
495 return rsa_cms_decrypt(arg2);
498 case ASN1_PKEY_CTRL_CMS_RI_TYPE:
499 if (pkey_is_pss(pkey))
501 *(int *)arg2 = CMS_RECIPINFO_TRANS;
505 case ASN1_PKEY_CTRL_DEFAULT_MD_NID:
506 if (pkey->pkey.rsa->pss != NULL) {
507 if (!rsa_pss_get_param(pkey->pkey.rsa->pss, &md, &mgf1md,
509 RSAerr(0, ERR_R_INTERNAL_ERROR);
512 *(int *)arg2 = EVP_MD_type(md);
513 /* Return of 2 indicates this MD is mandatory */
516 *(int *)arg2 = NID_sha256;
525 X509_ALGOR_set0(alg, OBJ_nid2obj(NID_rsaEncryption), V_ASN1_NULL, 0);
531 /* allocate and set algorithm ID from EVP_MD, default SHA1 */
532 static int rsa_md_to_algor(X509_ALGOR **palg, const EVP_MD *md)
534 if (md == NULL || EVP_MD_type(md) == NID_sha1)
536 *palg = X509_ALGOR_new();
539 X509_ALGOR_set_md(*palg, md);
543 /* Allocate and set MGF1 algorithm ID from EVP_MD */
544 static int rsa_md_to_mgf1(X509_ALGOR **palg, const EVP_MD *mgf1md)
546 X509_ALGOR *algtmp = NULL;
547 ASN1_STRING *stmp = NULL;
550 if (mgf1md == NULL || EVP_MD_type(mgf1md) == NID_sha1)
552 /* need to embed algorithm ID inside another */
553 if (!rsa_md_to_algor(&algtmp, mgf1md))
555 if (ASN1_item_pack(algtmp, ASN1_ITEM_rptr(X509_ALGOR), &stmp) == NULL)
557 *palg = X509_ALGOR_new();
560 X509_ALGOR_set0(*palg, OBJ_nid2obj(NID_mgf1), V_ASN1_SEQUENCE, stmp);
563 ASN1_STRING_free(stmp);
564 X509_ALGOR_free(algtmp);
570 /* convert algorithm ID to EVP_MD, default SHA1 */
571 static const EVP_MD *rsa_algor_to_md(X509_ALGOR *alg)
577 md = EVP_get_digestbyobj(alg->algorithm);
579 RSAerr(RSA_F_RSA_ALGOR_TO_MD, RSA_R_UNKNOWN_DIGEST);
584 * Convert EVP_PKEY_CTX in PSS mode into corresponding algorithm parameter,
585 * suitable for setting an AlgorithmIdentifier.
588 static RSA_PSS_PARAMS *rsa_ctx_to_pss(EVP_PKEY_CTX *pkctx)
590 const EVP_MD *sigmd, *mgf1md;
591 EVP_PKEY *pk = EVP_PKEY_CTX_get0_pkey(pkctx);
592 RSA *rsa = EVP_PKEY_get0_RSA(pk);
595 if (EVP_PKEY_CTX_get_signature_md(pkctx, &sigmd) <= 0)
597 if (EVP_PKEY_CTX_get_rsa_mgf1_md(pkctx, &mgf1md) <= 0)
599 if (!EVP_PKEY_CTX_get_rsa_pss_saltlen(pkctx, &saltlen))
602 saltlen = EVP_MD_size(sigmd);
603 } else if (saltlen == -2 || saltlen == -3) {
604 saltlen = RSA_size(rsa) - EVP_MD_size(sigmd) - 2;
605 if ((EVP_PKEY_bits(pk) & 0x7) == 1)
611 return rsa_pss_params_create(sigmd, mgf1md, saltlen);
614 RSA_PSS_PARAMS *rsa_pss_params_create(const EVP_MD *sigmd,
615 const EVP_MD *mgf1md, int saltlen)
617 RSA_PSS_PARAMS *pss = RSA_PSS_PARAMS_new();
622 pss->saltLength = ASN1_INTEGER_new();
623 if (pss->saltLength == NULL)
625 if (!ASN1_INTEGER_set(pss->saltLength, saltlen))
628 if (!rsa_md_to_algor(&pss->hashAlgorithm, sigmd))
632 if (!rsa_md_to_mgf1(&pss->maskGenAlgorithm, mgf1md))
634 if (!rsa_md_to_algor(&pss->maskHash, mgf1md))
638 RSA_PSS_PARAMS_free(pss);
642 static ASN1_STRING *rsa_ctx_to_pss_string(EVP_PKEY_CTX *pkctx)
644 RSA_PSS_PARAMS *pss = rsa_ctx_to_pss(pkctx);
650 os = ASN1_item_pack(pss, ASN1_ITEM_rptr(RSA_PSS_PARAMS), NULL);
651 RSA_PSS_PARAMS_free(pss);
656 * From PSS AlgorithmIdentifier set public key parameters. If pkey isn't NULL
657 * then the EVP_MD_CTX is setup and initialised. If it is NULL parameters are
658 * passed to pkctx instead.
661 static int rsa_pss_to_ctx(EVP_MD_CTX *ctx, EVP_PKEY_CTX *pkctx,
662 X509_ALGOR *sigalg, EVP_PKEY *pkey)
666 const EVP_MD *mgf1md = NULL, *md = NULL;
669 /* Sanity check: make sure it is PSS */
670 if (OBJ_obj2nid(sigalg->algorithm) != EVP_PKEY_RSA_PSS) {
671 RSAerr(RSA_F_RSA_PSS_TO_CTX, RSA_R_UNSUPPORTED_SIGNATURE_TYPE);
674 /* Decode PSS parameters */
675 pss = rsa_pss_decode(sigalg);
677 if (!rsa_pss_get_param(pss, &md, &mgf1md, &saltlen)) {
678 RSAerr(RSA_F_RSA_PSS_TO_CTX, RSA_R_INVALID_PSS_PARAMETERS);
682 /* We have all parameters now set up context */
684 if (!EVP_DigestVerifyInit(ctx, &pkctx, md, NULL, pkey))
687 const EVP_MD *checkmd;
688 if (EVP_PKEY_CTX_get_signature_md(pkctx, &checkmd) <= 0)
690 if (EVP_MD_type(md) != EVP_MD_type(checkmd)) {
691 RSAerr(RSA_F_RSA_PSS_TO_CTX, RSA_R_DIGEST_DOES_NOT_MATCH);
696 if (EVP_PKEY_CTX_set_rsa_padding(pkctx, RSA_PKCS1_PSS_PADDING) <= 0)
699 if (EVP_PKEY_CTX_set_rsa_pss_saltlen(pkctx, saltlen) <= 0)
702 if (EVP_PKEY_CTX_set_rsa_mgf1_md(pkctx, mgf1md) <= 0)
708 RSA_PSS_PARAMS_free(pss);
712 int rsa_pss_get_param(const RSA_PSS_PARAMS *pss, const EVP_MD **pmd,
713 const EVP_MD **pmgf1md, int *psaltlen)
717 *pmd = rsa_algor_to_md(pss->hashAlgorithm);
720 *pmgf1md = rsa_algor_to_md(pss->maskHash);
721 if (*pmgf1md == NULL)
723 if (pss->saltLength) {
724 *psaltlen = ASN1_INTEGER_get(pss->saltLength);
726 RSAerr(RSA_F_RSA_PSS_GET_PARAM, RSA_R_INVALID_SALT_LENGTH);
734 * low-level routines support only trailer field 0xbc (value 1) and
735 * PKCS#1 says we should reject any other value anyway.
737 if (pss->trailerField && ASN1_INTEGER_get(pss->trailerField) != 1) {
738 RSAerr(RSA_F_RSA_PSS_GET_PARAM, RSA_R_INVALID_TRAILER);
745 #ifndef OPENSSL_NO_CMS
746 static int rsa_cms_verify(CMS_SignerInfo *si)
750 EVP_PKEY_CTX *pkctx = CMS_SignerInfo_get0_pkey_ctx(si);
752 CMS_SignerInfo_get0_algs(si, NULL, NULL, NULL, &alg);
753 nid = OBJ_obj2nid(alg->algorithm);
754 if (nid == EVP_PKEY_RSA_PSS)
755 return rsa_pss_to_ctx(NULL, pkctx, alg, NULL);
756 /* Only PSS allowed for PSS keys */
757 if (pkey_ctx_is_pss(pkctx)) {
758 RSAerr(RSA_F_RSA_CMS_VERIFY, RSA_R_ILLEGAL_OR_UNSUPPORTED_PADDING_MODE);
761 if (nid == NID_rsaEncryption)
763 /* Workaround for some implementation that use a signature OID */
764 if (OBJ_find_sigid_algs(nid, NULL, &nid2)) {
765 if (nid2 == NID_rsaEncryption)
773 * Customised RSA item verification routine. This is called when a signature
774 * is encountered requiring special handling. We currently only handle PSS.
777 static int rsa_item_verify(EVP_MD_CTX *ctx, const ASN1_ITEM *it, void *asn,
778 X509_ALGOR *sigalg, ASN1_BIT_STRING *sig,
781 /* Sanity check: make sure it is PSS */
782 if (OBJ_obj2nid(sigalg->algorithm) != EVP_PKEY_RSA_PSS) {
783 RSAerr(RSA_F_RSA_ITEM_VERIFY, RSA_R_UNSUPPORTED_SIGNATURE_TYPE);
786 if (rsa_pss_to_ctx(ctx, NULL, sigalg, pkey) > 0) {
793 #ifndef OPENSSL_NO_CMS
794 static int rsa_cms_sign(CMS_SignerInfo *si)
796 int pad_mode = RSA_PKCS1_PADDING;
798 EVP_PKEY_CTX *pkctx = CMS_SignerInfo_get0_pkey_ctx(si);
799 ASN1_STRING *os = NULL;
801 CMS_SignerInfo_get0_algs(si, NULL, NULL, NULL, &alg);
803 if (EVP_PKEY_CTX_get_rsa_padding(pkctx, &pad_mode) <= 0)
806 if (pad_mode == RSA_PKCS1_PADDING) {
807 X509_ALGOR_set0(alg, OBJ_nid2obj(NID_rsaEncryption), V_ASN1_NULL, 0);
810 /* We don't support it */
811 if (pad_mode != RSA_PKCS1_PSS_PADDING)
813 os = rsa_ctx_to_pss_string(pkctx);
816 X509_ALGOR_set0(alg, OBJ_nid2obj(EVP_PKEY_RSA_PSS), V_ASN1_SEQUENCE, os);
821 static int rsa_item_sign(EVP_MD_CTX *ctx, const ASN1_ITEM *it, void *asn,
822 X509_ALGOR *alg1, X509_ALGOR *alg2,
823 ASN1_BIT_STRING *sig)
826 EVP_PKEY_CTX *pkctx = EVP_MD_CTX_pkey_ctx(ctx);
828 if (EVP_PKEY_CTX_get_rsa_padding(pkctx, &pad_mode) <= 0)
830 if (pad_mode == RSA_PKCS1_PADDING)
832 if (pad_mode == RSA_PKCS1_PSS_PADDING) {
833 ASN1_STRING *os1 = NULL;
834 os1 = rsa_ctx_to_pss_string(pkctx);
837 /* Duplicate parameters if we have to */
839 ASN1_STRING *os2 = ASN1_STRING_dup(os1);
841 ASN1_STRING_free(os1);
844 X509_ALGOR_set0(alg2, OBJ_nid2obj(EVP_PKEY_RSA_PSS),
845 V_ASN1_SEQUENCE, os2);
847 X509_ALGOR_set0(alg1, OBJ_nid2obj(EVP_PKEY_RSA_PSS),
848 V_ASN1_SEQUENCE, os1);
854 static int rsa_sig_info_set(X509_SIG_INFO *siginf, const X509_ALGOR *sigalg,
855 const ASN1_STRING *sig)
860 const EVP_MD *mgf1md = NULL, *md = NULL;
864 /* Sanity check: make sure it is PSS */
865 if (OBJ_obj2nid(sigalg->algorithm) != EVP_PKEY_RSA_PSS)
867 /* Decode PSS parameters */
868 pss = rsa_pss_decode(sigalg);
869 if (!rsa_pss_get_param(pss, &md, &mgf1md, &saltlen))
871 mdnid = EVP_MD_type(md);
873 * For TLS need SHA256, SHA384 or SHA512, digest and MGF1 digest must
874 * match and salt length must equal digest size
876 if ((mdnid == NID_sha256 || mdnid == NID_sha384 || mdnid == NID_sha512)
877 && mdnid == EVP_MD_type(mgf1md) && saltlen == EVP_MD_size(md))
878 flags = X509_SIG_INFO_TLS;
881 /* Note: security bits half number of digest bits */
882 secbits = EVP_MD_size(md) * 4;
884 * SHA1 and MD5 are known to be broken. Reduce security bits so that
885 * they're no longer accepted at security level 1. The real values don't
886 * really matter as long as they're lower than 80, which is our security
888 * https://eprint.iacr.org/2020/014 puts a chosen-prefix attack for SHA1 at
890 * https://documents.epfl.ch/users/l/le/lenstra/public/papers/lat.pdf
891 * puts a chosen-prefix attack for MD5 at 2^39.
893 if (mdnid == NID_sha1)
895 else if (mdnid == NID_md5_sha1)
897 else if (mdnid == NID_md5)
899 X509_SIG_INFO_set(siginf, mdnid, EVP_PKEY_RSA_PSS, secbits,
903 RSA_PSS_PARAMS_free(pss);
907 #ifndef OPENSSL_NO_CMS
908 static RSA_OAEP_PARAMS *rsa_oaep_decode(const X509_ALGOR *alg)
910 RSA_OAEP_PARAMS *oaep;
912 oaep = ASN1_TYPE_unpack_sequence(ASN1_ITEM_rptr(RSA_OAEP_PARAMS),
918 if (oaep->maskGenFunc != NULL) {
919 oaep->maskHash = rsa_mgf1_decode(oaep->maskGenFunc);
920 if (oaep->maskHash == NULL) {
921 RSA_OAEP_PARAMS_free(oaep);
928 static int rsa_cms_decrypt(CMS_RecipientInfo *ri)
934 unsigned char *label = NULL;
936 const EVP_MD *mgf1md = NULL, *md = NULL;
937 RSA_OAEP_PARAMS *oaep;
939 pkctx = CMS_RecipientInfo_get0_pkey_ctx(ri);
942 if (!CMS_RecipientInfo_ktri_get0_algs(ri, NULL, NULL, &cmsalg))
944 nid = OBJ_obj2nid(cmsalg->algorithm);
945 if (nid == NID_rsaEncryption)
947 if (nid != NID_rsaesOaep) {
948 RSAerr(RSA_F_RSA_CMS_DECRYPT, RSA_R_UNSUPPORTED_ENCRYPTION_TYPE);
951 /* Decode OAEP parameters */
952 oaep = rsa_oaep_decode(cmsalg);
955 RSAerr(RSA_F_RSA_CMS_DECRYPT, RSA_R_INVALID_OAEP_PARAMETERS);
959 mgf1md = rsa_algor_to_md(oaep->maskHash);
962 md = rsa_algor_to_md(oaep->hashFunc);
966 if (oaep->pSourceFunc != NULL) {
967 X509_ALGOR *plab = oaep->pSourceFunc;
969 if (OBJ_obj2nid(plab->algorithm) != NID_pSpecified) {
970 RSAerr(RSA_F_RSA_CMS_DECRYPT, RSA_R_UNSUPPORTED_LABEL_SOURCE);
973 if (plab->parameter->type != V_ASN1_OCTET_STRING) {
974 RSAerr(RSA_F_RSA_CMS_DECRYPT, RSA_R_INVALID_LABEL);
978 label = plab->parameter->value.octet_string->data;
979 /* Stop label being freed when OAEP parameters are freed */
980 plab->parameter->value.octet_string->data = NULL;
981 labellen = plab->parameter->value.octet_string->length;
984 if (EVP_PKEY_CTX_set_rsa_padding(pkctx, RSA_PKCS1_OAEP_PADDING) <= 0)
986 if (EVP_PKEY_CTX_set_rsa_oaep_md(pkctx, md) <= 0)
988 if (EVP_PKEY_CTX_set_rsa_mgf1_md(pkctx, mgf1md) <= 0)
990 if (EVP_PKEY_CTX_set0_rsa_oaep_label(pkctx, label, labellen) <= 0)
996 RSA_OAEP_PARAMS_free(oaep);
1000 static int rsa_cms_encrypt(CMS_RecipientInfo *ri)
1002 const EVP_MD *md, *mgf1md;
1003 RSA_OAEP_PARAMS *oaep = NULL;
1004 ASN1_STRING *os = NULL;
1006 EVP_PKEY_CTX *pkctx = CMS_RecipientInfo_get0_pkey_ctx(ri);
1007 int pad_mode = RSA_PKCS1_PADDING, rv = 0, labellen;
1008 unsigned char *label;
1010 if (CMS_RecipientInfo_ktri_get0_algs(ri, NULL, NULL, &alg) <= 0)
1013 if (EVP_PKEY_CTX_get_rsa_padding(pkctx, &pad_mode) <= 0)
1016 if (pad_mode == RSA_PKCS1_PADDING) {
1017 X509_ALGOR_set0(alg, OBJ_nid2obj(NID_rsaEncryption), V_ASN1_NULL, 0);
1021 if (pad_mode != RSA_PKCS1_OAEP_PADDING)
1023 if (EVP_PKEY_CTX_get_rsa_oaep_md(pkctx, &md) <= 0)
1025 if (EVP_PKEY_CTX_get_rsa_mgf1_md(pkctx, &mgf1md) <= 0)
1027 labellen = EVP_PKEY_CTX_get0_rsa_oaep_label(pkctx, &label);
1030 oaep = RSA_OAEP_PARAMS_new();
1033 if (!rsa_md_to_algor(&oaep->hashFunc, md))
1035 if (!rsa_md_to_mgf1(&oaep->maskGenFunc, mgf1md))
1038 ASN1_OCTET_STRING *los;
1039 oaep->pSourceFunc = X509_ALGOR_new();
1040 if (oaep->pSourceFunc == NULL)
1042 los = ASN1_OCTET_STRING_new();
1045 if (!ASN1_OCTET_STRING_set(los, label, labellen)) {
1046 ASN1_OCTET_STRING_free(los);
1049 X509_ALGOR_set0(oaep->pSourceFunc, OBJ_nid2obj(NID_pSpecified),
1050 V_ASN1_OCTET_STRING, los);
1052 /* create string with pss parameter encoding. */
1053 if (!ASN1_item_pack(oaep, ASN1_ITEM_rptr(RSA_OAEP_PARAMS), &os))
1055 X509_ALGOR_set0(alg, OBJ_nid2obj(NID_rsaesOaep), V_ASN1_SEQUENCE, os);
1059 RSA_OAEP_PARAMS_free(oaep);
1060 ASN1_STRING_free(os);
1065 static int rsa_pkey_check(const EVP_PKEY *pkey)
1067 return RSA_check_key_ex(pkey->pkey.rsa, NULL);
1070 static size_t rsa_pkey_dirty_cnt(const EVP_PKEY *pkey)
1072 return pkey->pkey.rsa->dirty_cnt;
1075 DEFINE_SPECIAL_STACK_OF_CONST(BIGNUM_const, BIGNUM)
1077 static void *rsa_pkey_export_to(const EVP_PKEY *pk, EVP_KEYMGMT *keymgmt,
1078 int want_domainparams)
1080 RSA *rsa = pk->pkey.rsa;
1081 OSSL_PARAM_BLD tmpl;
1082 const BIGNUM *n = RSA_get0_n(rsa), *e = RSA_get0_e(rsa);
1083 const BIGNUM *d = RSA_get0_d(rsa);
1084 STACK_OF(BIGNUM_const) *primes = NULL, *exps = NULL, *coeffs = NULL;
1085 int numprimes = 0, numexps = 0, numcoeffs = 0;
1086 OSSL_PARAM *params = NULL;
1087 void *provkey = NULL;
1090 * There are no domain parameters for RSA keys, or rather, they are
1091 * included in the key data itself.
1093 if (want_domainparams)
1096 /* Get all the primes and CRT params */
1097 if ((primes = sk_BIGNUM_const_new_null()) == NULL
1098 || (exps = sk_BIGNUM_const_new_null()) == NULL
1099 || (coeffs = sk_BIGNUM_const_new_null()) == NULL)
1102 if (!rsa_get0_all_params(rsa, primes, exps, coeffs))
1105 /* Public parameters must always be present */
1106 if (n == NULL || e == NULL)
1110 /* It's a private key, so we should have everything else too */
1111 numprimes = sk_BIGNUM_const_num(primes);
1112 numexps = sk_BIGNUM_const_num(exps);
1113 numcoeffs = sk_BIGNUM_const_num(coeffs);
1115 if (numprimes < 2 || numexps < 2 || numcoeffs < 1)
1118 /* assert that an OSSL_PARAM_BLD has enough space. */
1119 if (!ossl_assert(/* n, e */ 2 + /* d */ 1 + /* numprimes */ 1
1120 + numprimes + numexps + numcoeffs
1121 <= OSSL_PARAM_BLD_MAX))
1125 ossl_param_bld_init(&tmpl);
1126 if (!ossl_param_bld_push_BN(&tmpl, OSSL_PKEY_PARAM_RSA_N, n)
1127 || !ossl_param_bld_push_BN(&tmpl, OSSL_PKEY_PARAM_RSA_E, e))
1133 if (!ossl_param_bld_push_BN(&tmpl, OSSL_PKEY_PARAM_RSA_D, d))
1136 for (i = 0; i < numprimes; i++) {
1137 const BIGNUM *num = sk_BIGNUM_const_value(primes, i);
1139 if (!ossl_param_bld_push_BN(&tmpl, OSSL_PKEY_PARAM_RSA_FACTOR,
1144 for (i = 0; i < numexps; i++) {
1145 const BIGNUM *num = sk_BIGNUM_const_value(exps, i);
1147 if (!ossl_param_bld_push_BN(&tmpl, OSSL_PKEY_PARAM_RSA_EXPONENT,
1152 for (i = 0; i < numcoeffs; i++) {
1153 const BIGNUM *num = sk_BIGNUM_const_value(coeffs, i);
1155 if (!ossl_param_bld_push_BN(&tmpl, OSSL_PKEY_PARAM_RSA_COEFFICIENT,
1161 if ((params = ossl_param_bld_to_param(&tmpl)) == NULL)
1164 /* We export, the provider imports */
1165 provkey = evp_keymgmt_importkey(keymgmt, params);
1168 sk_BIGNUM_const_free(primes);
1169 sk_BIGNUM_const_free(exps);
1170 sk_BIGNUM_const_free(coeffs);
1171 ossl_param_bld_free(params);
1175 const EVP_PKEY_ASN1_METHOD rsa_asn1_meths[2] = {
1179 ASN1_PKEY_SIGPARAM_NULL,
1182 "OpenSSL RSA method",
1202 old_rsa_priv_decode,
1203 old_rsa_priv_encode,
1222 const EVP_PKEY_ASN1_METHOD rsa_pss_asn1_meth = {
1225 ASN1_PKEY_SIGPARAM_NULL,
1228 "OpenSSL RSA-PSS method",