]> git.ipfire.org Git - thirdparty/openssl.git/blame - crypto/rsa/rsa_ameth.c
projects / thirdparty / openssl.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Stop accepting certificates signed using SHA1 at security level 1
[thirdparty/openssl.git] / crypto / rsa / rsa_ameth.c
CommitLineData
0f113f3e 1/*
b0edda11 2 * Copyright 2006-2018 The OpenSSL Project Authors. All Rights Reserved.
448be743 3 *
2a7b6f39 4 * Licensed under the Apache License 2.0 (the "License"). You may not use
2039c421
RS		 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
448be743
DSH		 8 */
9
10#include <stdio.h>
b39fc560 11#include "internal/cryptlib.h"
448be743
DSH		 12#include <openssl/asn1t.h>
13#include <openssl/x509.h>
1e26a8ba 14#include <openssl/bn.h>
3c27208f 15#include <openssl/cms.h>
29be6023
RL		 16#include <openssl/core_names.h>
17#include "internal/param_build.h"
25f2138b
DMSP		 18#include "crypto/asn1.h"
19#include "crypto/evp.h"
29be6023 20#include "crypto/rsa.h"
706457b7 21#include "rsa_local.h"
448be743 22
e968561d 23#ifndef OPENSSL_NO_CMS
0574cadf
DSH		 24static int rsa_cms_sign(CMS_SignerInfo *si);
25static int rsa_cms_verify(CMS_SignerInfo *si);
26static int rsa_cms_decrypt(CMS_RecipientInfo *ri);
27static int rsa_cms_encrypt(CMS_RecipientInfo *ri);
e968561d 28#endif
0574cadf 29
b35b8d11
DSH		 30static RSA_PSS_PARAMS *rsa_pss_decode(const X509_ALGOR *alg);
31
42009ae8
DSH		 32/* Set any parameters associated with pkey */
33static int rsa_param_encode(const EVP_PKEY *pkey,
34 ASN1_STRING **pstr, int *pstrtype)
35{
36 const RSA *rsa = pkey->pkey.rsa;
52ad523c 37
42009ae8
DSH		 38 *pstr = NULL;
39 /* If RSA it's just NULL type */
1f483a69 40 if (pkey->ameth->pkey_id != EVP_PKEY_RSA_PSS) {
42009ae8
DSH		 41 *pstrtype = V_ASN1_NULL;
42 return 1;
43 }
44 /* If no PSS parameters we omit parameters entirely */
45 if (rsa->pss == NULL) {
46 *pstrtype = V_ASN1_UNDEF;
47 return 1;
48 }
49 /* Encode PSS parameters */
f291138b 50 if (ASN1_item_pack(rsa->pss, ASN1_ITEM_rptr(RSA_PSS_PARAMS), pstr) == NULL)
42009ae8 51 return 0;
42009ae8
DSH		 52
53 *pstrtype = V_ASN1_SEQUENCE;
54 return 1;
55}
56/* Decode any parameters and set them in RSA structure */
57static int rsa_param_decode(RSA *rsa, const X509_ALGOR *alg)
58{
59 const ASN1_OBJECT *algoid;
60 const void *algp;
61 int algptype;
62
63 X509_ALGOR_get0(&algoid, &algptype, &algp, alg);
1f483a69 64 if (OBJ_obj2nid(algoid) != EVP_PKEY_RSA_PSS)
42009ae8
DSH		 65 return 1;
66 if (algptype == V_ASN1_UNDEF)
67 return 1;
635fe50f
DSH		 68 if (algptype != V_ASN1_SEQUENCE) {
69 RSAerr(RSA_F_RSA_PARAM_DECODE, RSA_R_INVALID_PSS_PARAMETERS);
42009ae8 70 return 0;
635fe50f 71 }
b35b8d11 72 rsa->pss = rsa_pss_decode(alg);
42009ae8
DSH		 73 if (rsa->pss == NULL)
74 return 0;
75 return 1;
76}
77
6f81892e 78static int rsa_pub_encode(X509_PUBKEY *pk, const EVP_PKEY *pkey)
0f113f3e
MC		 79{
80 unsigned char *penc = NULL;
81 int penclen;
42009ae8
DSH		 82 ASN1_STRING *str;
83 int strtype;
52ad523c 84
42009ae8
DSH		 85 if (!rsa_param_encode(pkey, &str, &strtype))
86 return 0;
0f113f3e
MC		 87 penclen = i2d_RSAPublicKey(pkey->pkey.rsa, &penc);
88 if (penclen <= 0)
89 return 0;
42009ae8
DSH		 90 if (X509_PUBKEY_set0_param(pk, OBJ_nid2obj(pkey->ameth->pkey_id),
91 strtype, str, penc, penclen))
0f113f3e
MC		 92 return 1;
93
94 OPENSSL_free(penc);
95 return 0;
96}
448be743
DSH		 97
98static int rsa_pub_decode(EVP_PKEY *pkey, X509_PUBKEY *pubkey)
0f113f3e
MC		 99{
100 const unsigned char *p;
101 int pklen;
42009ae8 102 X509_ALGOR *alg;
0f113f3e 103 RSA *rsa = NULL;
75ebbd9a 104
42009ae8 105 if (!X509_PUBKEY_get0_param(NULL, &p, &pklen, &alg, pubkey))
0f113f3e 106 return 0;
75ebbd9a 107 if ((rsa = d2i_RSAPublicKey(NULL, &p, pklen)) == NULL) {
0f113f3e
MC		 108 RSAerr(RSA_F_RSA_PUB_DECODE, ERR_R_RSA_LIB);
109 return 0;
110 }
42009ae8
DSH		 111 if (!rsa_param_decode(rsa, alg)) {
112 RSA_free(rsa);
113 return 0;
114 }
1f483a69
BE		 115 if (!EVP_PKEY_assign(pkey, pkey->ameth->pkey_id, rsa)) {
116 RSA_free(rsa);
117 return 0;
118 }
0f113f3e
MC		 119 return 1;
120}
448be743 121
6f81892e 122static int rsa_pub_cmp(const EVP_PKEY *a, const EVP_PKEY *b)
0f113f3e
MC		 123{
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)
126 return 0;
127 return 1;
128}
6f81892e 129
e4263314 130static int old_rsa_priv_decode(EVP_PKEY *pkey,
0f113f3e
MC		 131 const unsigned char **pder, int derlen)
132{
133 RSA *rsa;
75ebbd9a
RS		 134
135 if ((rsa = d2i_RSAPrivateKey(NULL, pder, derlen)) == NULL) {
0f113f3e
MC		 136 RSAerr(RSA_F_OLD_RSA_PRIV_DECODE, ERR_R_RSA_LIB);
137 return 0;
138 }
faa02fe2 139 EVP_PKEY_assign(pkey, pkey->ameth->pkey_id, rsa);
0f113f3e
MC		 140 return 1;
141}
448be743 142
e4263314 143static int old_rsa_priv_encode(const EVP_PKEY *pkey, unsigned char **pder)
0f113f3e
MC		 144{
145 return i2d_RSAPrivateKey(pkey->pkey.rsa, pder);
146}
e4263314 147
6f81892e 148static int rsa_priv_encode(PKCS8_PRIV_KEY_INFO *p8, const EVP_PKEY *pkey)
0f113f3e
MC		 149{
150 unsigned char *rk = NULL;
151 int rklen;
42009ae8
DSH		 152 ASN1_STRING *str;
153 int strtype;
52ad523c 154
42009ae8
DSH		 155 if (!rsa_param_encode(pkey, &str, &strtype))
156 return 0;
0f113f3e
MC		 157 rklen = i2d_RSAPrivateKey(pkey->pkey.rsa, &rk);
158
159 if (rklen <= 0) {
160 RSAerr(RSA_F_RSA_PRIV_ENCODE, ERR_R_MALLOC_FAILURE);
285c7d9c 161 ASN1_STRING_free(str);
0f113f3e
MC		 162 return 0;
163 }
164
faa02fe2 165 if (!PKCS8_pkey_set0(p8, OBJ_nid2obj(pkey->ameth->pkey_id), 0,
42009ae8 166 strtype, str, rk, rklen)) {
0f113f3e 167 RSAerr(RSA_F_RSA_PRIV_ENCODE, ERR_R_MALLOC_FAILURE);
285c7d9c 168 ASN1_STRING_free(str);
0f113f3e
MC		 169 return 0;
170 }
171
172 return 1;
173}
448be743 174
245c6bc3 175static int rsa_priv_decode(EVP_PKEY *pkey, const PKCS8_PRIV_KEY_INFO *p8)
0f113f3e
MC		 176{
177 const unsigned char *p;
42009ae8 178 RSA *rsa;
0f113f3e 179 int pklen;
42009ae8
DSH		 180 const X509_ALGOR *alg;
181
182 if (!PKCS8_pkey_get0(NULL, &p, &pklen, &alg, p8))
183 return 0;
184 rsa = d2i_RSAPrivateKey(NULL, &p, pklen);
185 if (rsa == NULL) {
186 RSAerr(RSA_F_RSA_PRIV_DECODE, ERR_R_RSA_LIB);
187 return 0;
188 }
189 if (!rsa_param_decode(rsa, alg)) {
190 RSA_free(rsa);
0f113f3e 191 return 0;
42009ae8
DSH		 192 }
193 EVP_PKEY_assign(pkey, pkey->ameth->pkey_id, rsa);
194 return 1;
0f113f3e 195}
e4263314 196
6f81892e 197static int int_rsa_size(const EVP_PKEY *pkey)
0f113f3e
MC		 198{
199 return RSA_size(pkey->pkey.rsa);
200}
6f81892e
DSH		 201
202static int rsa_bits(const EVP_PKEY *pkey)
0f113f3e
MC		 203{
204 return BN_num_bits(pkey->pkey.rsa->n);
205}
6f81892e 206
2514fa79 207static int rsa_security_bits(const EVP_PKEY *pkey)
0f113f3e
MC		 208{
209 return RSA_security_bits(pkey->pkey.rsa);
210}
2514fa79 211
6f81892e 212static void int_rsa_free(EVP_PKEY *pkey)
0f113f3e
MC		 213{
214 RSA_free(pkey->pkey.rsa);
215}
35208f36 216
9503ed8b
DSH		 217static X509_ALGOR *rsa_mgf1_decode(X509_ALGOR *alg)
218{
219 if (OBJ_obj2nid(alg->algorithm) != NID_mgf1)
220 return NULL;
221 return ASN1_TYPE_unpack_sequence(ASN1_ITEM_rptr(X509_ALGOR),
222 alg->parameter);
223}
224
225static int rsa_pss_param_print(BIO *bp, int pss_key, RSA_PSS_PARAMS *pss,
226 int indent)
227{
228 int rv = 0;
229 X509_ALGOR *maskHash = NULL;
52ad523c 230
9503ed8b
DSH		 231 if (!BIO_indent(bp, indent, 128))
232 goto err;
233 if (pss_key) {
234 if (pss == NULL) {
235 if (BIO_puts(bp, "No PSS parameter restrictions\n") <= 0)
236 return 0;
237 return 1;
238 } else {
239 if (BIO_puts(bp, "PSS parameter restrictions:") <= 0)
240 return 0;
241 }
242 } else if (pss == NULL) {
243 if (BIO_puts(bp,"(INVALID PSS PARAMETERS)\n") <= 0)
244 return 0;
245 return 1;
246 }
247 if (BIO_puts(bp, "\n") <= 0)
248 goto err;
249 if (pss_key)
250 indent += 2;
251 if (!BIO_indent(bp, indent, 128))
252 goto err;
253 if (BIO_puts(bp, "Hash Algorithm: ") <= 0)
254 goto err;
255
256 if (pss->hashAlgorithm) {
257 if (i2a_ASN1_OBJECT(bp, pss->hashAlgorithm->algorithm) <= 0)
258 goto err;
90862ab4 259 } else if (BIO_puts(bp, "sha1 (default)") <= 0) {
9503ed8b 260 goto err;
90862ab4 261 }
9503ed8b
DSH		 262
263 if (BIO_puts(bp, "\n") <= 0)
264 goto err;
265
266 if (!BIO_indent(bp, indent, 128))
267 goto err;
268
269 if (BIO_puts(bp, "Mask Algorithm: ") <= 0)
270 goto err;
271 if (pss->maskGenAlgorithm) {
272 if (i2a_ASN1_OBJECT(bp, pss->maskGenAlgorithm->algorithm) <= 0)
273 goto err;
274 if (BIO_puts(bp, " with ") <= 0)
275 goto err;
276 maskHash = rsa_mgf1_decode(pss->maskGenAlgorithm);
277 if (maskHash != NULL) {
278 if (i2a_ASN1_OBJECT(bp, maskHash->algorithm) <= 0)
279 goto err;
90862ab4 280 } else if (BIO_puts(bp, "INVALID") <= 0) {
9503ed8b 281 goto err;
90862ab4
PY		 282 }
283 } else if (BIO_puts(bp, "mgf1 with sha1 (default)") <= 0) {
9503ed8b 284 goto err;
90862ab4 285 }
9503ed8b
DSH		 286 BIO_puts(bp, "\n");
287
288 if (!BIO_indent(bp, indent, 128))
289 goto err;
290 if (BIO_printf(bp, "%s Salt Length: 0x", pss_key ? "Minimum" : "") <= 0)
291 goto err;
292 if (pss->saltLength) {
293 if (i2a_ASN1_INTEGER(bp, pss->saltLength) <= 0)
294 goto err;
90862ab4 295 } else if (BIO_puts(bp, "14 (default)") <= 0) {
9503ed8b 296 goto err;
90862ab4 297 }
9503ed8b
DSH		 298 BIO_puts(bp, "\n");
299
300 if (!BIO_indent(bp, indent, 128))
301 goto err;
302 if (BIO_puts(bp, "Trailer Field: 0x") <= 0)
303 goto err;
304 if (pss->trailerField) {
305 if (i2a_ASN1_INTEGER(bp, pss->trailerField) <= 0)
306 goto err;
90862ab4 307 } else if (BIO_puts(bp, "BC (default)") <= 0) {
9503ed8b 308 goto err;
90862ab4 309 }
9503ed8b
DSH		 310 BIO_puts(bp, "\n");
311
312 rv = 1;
313
314 err:
315 X509_ALGOR_free(maskHash);
316 return rv;
317
318}
319
320static int pkey_rsa_print(BIO *bp, const EVP_PKEY *pkey, int off, int priv)
0f113f3e 321{
9503ed8b 322 const RSA *x = pkey->pkey.rsa;
0f113f3e
MC		 323 char *str;
324 const char *s;
665d899f 325 int ret = 0, mod_len = 0, ex_primes;
0f113f3e
MC		 326
327 if (x->n != NULL)
328 mod_len = BN_num_bits(x->n);
665d899f 329 ex_primes = sk_RSA_PRIME_INFO_num(x->prime_infos);
0f113f3e
MC		 330
331 if (!BIO_indent(bp, off, 128))
332 goto err;
333
87ee7b22 334 if (BIO_printf(bp, "%s ", pkey_is_pss(pkey) ? "RSA-PSS" : "RSA") <= 0)
9503ed8b
DSH		 335 goto err;
336
0f113f3e 337 if (priv && x->d) {
665d899f
PY		 338 if (BIO_printf(bp, "Private-Key: (%d bit, %d primes)\n",
339 mod_len, ex_primes <= 0 ? 2 : ex_primes + 2) <= 0)
0f113f3e
MC		 340 goto err;
341 str = "modulus:";
342 s = "publicExponent:";
343 } else {
a773b52a 344 if (BIO_printf(bp, "Public-Key: (%d bit)\n", mod_len) <= 0)
0f113f3e
MC		 345 goto err;
346 str = "Modulus:";
347 s = "Exponent:";
348 }
a773b52a 349 if (!ASN1_bn_print(bp, str, x->n, NULL, off))
0f113f3e 350 goto err;
a773b52a 351 if (!ASN1_bn_print(bp, s, x->e, NULL, off))
0f113f3e
MC		 352 goto err;
353 if (priv) {
665d899f
PY		 354 int i;
355
a773b52a 356 if (!ASN1_bn_print(bp, "privateExponent:", x->d, NULL, off))
0f113f3e 357 goto err;
a773b52a 358 if (!ASN1_bn_print(bp, "prime1:", x->p, NULL, off))
0f113f3e 359 goto err;
a773b52a 360 if (!ASN1_bn_print(bp, "prime2:", x->q, NULL, off))
0f113f3e 361 goto err;
a773b52a 362 if (!ASN1_bn_print(bp, "exponent1:", x->dmp1, NULL, off))
0f113f3e 363 goto err;
a773b52a 364 if (!ASN1_bn_print(bp, "exponent2:", x->dmq1, NULL, off))
0f113f3e 365 goto err;
a773b52a 366 if (!ASN1_bn_print(bp, "coefficient:", x->iqmp, NULL, off))
0f113f3e 367 goto err;
665d899f
PY		 368 for (i = 0; i < sk_RSA_PRIME_INFO_num(x->prime_infos); i++) {
369 /* print multi-prime info */
370 BIGNUM *bn = NULL;
371 RSA_PRIME_INFO *pinfo;
372 int j;
373
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))
377 goto err;
378 switch (j) {
379 case 0:
380 if (BIO_printf(bp, "prime%d:", i + 3) <= 0)
381 goto err;
382 bn = pinfo->r;
383 break;
384 case 1:
385 if (BIO_printf(bp, "exponent%d:", i + 3) <= 0)
386 goto err;
387 bn = pinfo->d;
388 break;
389 case 2:
390 if (BIO_printf(bp, "coefficient%d:", i + 3) <= 0)
391 goto err;
392 bn = pinfo->t;
393 break;
394 default:
395 break;
396 }
397 if (!ASN1_bn_print(bp, "", bn, NULL, off))
398 goto err;
399 }
400 }
0f113f3e 401 }
87ee7b22 402 if (pkey_is_pss(pkey) && !rsa_pss_param_print(bp, 1, x->pss, off))
9503ed8b 403 goto err;
0f113f3e
MC		 404 ret = 1;
405 err:
9503ed8b 406 return ret;
0f113f3e 407}
35208f36
DSH		 408
409static int rsa_pub_print(BIO *bp, const EVP_PKEY *pkey, int indent,
0f113f3e
MC		 410 ASN1_PCTX *ctx)
411{
9503ed8b 412 return pkey_rsa_print(bp, pkey, indent, 0);
0f113f3e 413}
35208f36
DSH		 414
415static int rsa_priv_print(BIO *bp, const EVP_PKEY *pkey, int indent,
0f113f3e
MC		 416 ASN1_PCTX *ctx)
417{
9503ed8b 418 return pkey_rsa_print(bp, pkey, indent, 1);
0f113f3e 419}
0574cadf 420
6745a1ff 421static RSA_PSS_PARAMS *rsa_pss_decode(const X509_ALGOR *alg)
0f113f3e 422{
0f113f3e
MC		 423 RSA_PSS_PARAMS *pss;
424
e93c8748
DSH		 425 pss = ASN1_TYPE_unpack_sequence(ASN1_ITEM_rptr(RSA_PSS_PARAMS),
426 alg->parameter);
0f113f3e 427
6745a1ff 428 if (pss == NULL)
0f113f3e
MC		 429 return NULL;
430
6745a1ff
DSH		 431 if (pss->maskGenAlgorithm != NULL) {
432 pss->maskHash = rsa_mgf1_decode(pss->maskGenAlgorithm);
433 if (pss->maskHash == NULL) {
434 RSA_PSS_PARAMS_free(pss);
435 return NULL;
436 }
437 }
0f113f3e
MC		 438
439 return pss;
440}
441
ff04bbe3 442static int rsa_sig_print(BIO *bp, const X509_ALGOR *sigalg,
0f113f3e
MC		 443 const ASN1_STRING *sig, int indent, ASN1_PCTX *pctx)
444{
ffc6fad5 445 if (OBJ_obj2nid(sigalg->algorithm) == EVP_PKEY_RSA_PSS) {
0f113f3e 446 int rv;
52ad523c 447 RSA_PSS_PARAMS *pss = rsa_pss_decode(sigalg);
c82bafc5 448
9503ed8b 449 rv = rsa_pss_param_print(bp, 0, pss, indent);
25aaa98a 450 RSA_PSS_PARAMS_free(pss);
0f113f3e
MC		 451 if (!rv)
452 return 0;
a4c467c9 453 } else if (BIO_puts(bp, "\n") <= 0) {
0f113f3e 454 return 0;
52ad523c 455 }
0f113f3e
MC		 456 if (sig)
457 return X509_signature_dump(bp, sig, indent);
458 return 1;
459}
492a9e24
DSH		 460
461static int rsa_pkey_ctrl(EVP_PKEY *pkey, int op, long arg1, void *arg2)
0f113f3e
MC		 462{
463 X509_ALGOR *alg = NULL;
9bcc9f97
MC		 464 const EVP_MD *md;
465 const EVP_MD *mgf1md;
466 int min_saltlen;
52ad523c 467
0f113f3e
MC		 468 switch (op) {
469
470 case ASN1_PKEY_CTRL_PKCS7_SIGN:
471 if (arg1 == 0)
472 PKCS7_SIGNER_INFO_get0_algs(arg2, NULL, NULL, &alg);
473 break;
474
475 case ASN1_PKEY_CTRL_PKCS7_ENCRYPT:
53d2260c
DSH		 476 if (pkey_is_pss(pkey))
477 return -2;
0f113f3e
MC		 478 if (arg1 == 0)
479 PKCS7_RECIP_INFO_get0_alg(arg2, &alg);
480 break;
8931b30d 481#ifndef OPENSSL_NO_CMS
0f113f3e
MC		 482 case ASN1_PKEY_CTRL_CMS_SIGN:
483 if (arg1 == 0)
484 return rsa_cms_sign(arg2);
485 else if (arg1 == 1)
486 return rsa_cms_verify(arg2);
487 break;
488
489 case ASN1_PKEY_CTRL_CMS_ENVELOPE:
53d2260c
DSH		 490 if (pkey_is_pss(pkey))
491 return -2;
0f113f3e
MC		 492 if (arg1 == 0)
493 return rsa_cms_encrypt(arg2);
494 else if (arg1 == 1)
495 return rsa_cms_decrypt(arg2);
496 break;
497
498 case ASN1_PKEY_CTRL_CMS_RI_TYPE:
53d2260c
DSH		 499 if (pkey_is_pss(pkey))
500 return -2;
0f113f3e
MC		 501 *(int *)arg2 = CMS_RECIPINFO_TRANS;
502 return 1;
8931b30d 503#endif
a78568b7 504
0f113f3e 505 case ASN1_PKEY_CTRL_DEFAULT_MD_NID:
9bcc9f97
MC		 506 if (pkey->pkey.rsa->pss != NULL) {
507 if (!rsa_pss_get_param(pkey->pkey.rsa->pss, &md, &mgf1md,
508 &min_saltlen)) {
509 RSAerr(0, ERR_R_INTERNAL_ERROR);
510 return 0;
511 }
512 *(int *)arg2 = EVP_MD_type(md);
513 /* Return of 2 indicates this MD is mandatory */
514 return 2;
515 }
0f113f3e
MC		 516 *(int *)arg2 = NID_sha256;
517 return 1;
03919683 518
0f113f3e
MC		 519 default:
520 return -2;
492a9e24 521
0f113f3e 522 }
492a9e24 523
0f113f3e
MC		 524 if (alg)
525 X509_ALGOR_set0(alg, OBJ_nid2obj(NID_rsaEncryption), V_ASN1_NULL, 0);
4f1aa191 526
0f113f3e 527 return 1;
4f1aa191 528
0f113f3e 529}
492a9e24 530
0574cadf
DSH		 531/* allocate and set algorithm ID from EVP_MD, default SHA1 */
532static int rsa_md_to_algor(X509_ALGOR **palg, const EVP_MD *md)
0f113f3e 533{
47e42b3c 534 if (md == NULL || EVP_MD_type(md) == NID_sha1)
0f113f3e
MC		 535 return 1;
536 *palg = X509_ALGOR_new();
90945fa3 537 if (*palg == NULL)
0f113f3e
MC		 538 return 0;
539 X509_ALGOR_set_md(*palg, md);
540 return 1;
541}
0574cadf
DSH		 542
543/* Allocate and set MGF1 algorithm ID from EVP_MD */
544static int rsa_md_to_mgf1(X509_ALGOR **palg, const EVP_MD *mgf1md)
0f113f3e
MC		 545{
546 X509_ALGOR *algtmp = NULL;
547 ASN1_STRING *stmp = NULL;
52ad523c 548
0f113f3e 549 *palg = NULL;
47e42b3c 550 if (mgf1md == NULL || EVP_MD_type(mgf1md) == NID_sha1)
0f113f3e
MC		 551 return 1;
552 /* need to embed algorithm ID inside another */
553 if (!rsa_md_to_algor(&algtmp, mgf1md))
554 goto err;
f291138b 555 if (ASN1_item_pack(algtmp, ASN1_ITEM_rptr(X509_ALGOR), &stmp) == NULL)
0f113f3e
MC		 556 goto err;
557 *palg = X509_ALGOR_new();
90945fa3 558 if (*palg == NULL)
0f113f3e
MC		 559 goto err;
560 X509_ALGOR_set0(*palg, OBJ_nid2obj(NID_mgf1), V_ASN1_SEQUENCE, stmp);
561 stmp = NULL;
562 err:
0dfb9398 563 ASN1_STRING_free(stmp);
222561fe 564 X509_ALGOR_free(algtmp);
0f113f3e
MC		 565 if (*palg)
566 return 1;
567 return 0;
568}
0574cadf
DSH		 569
570/* convert algorithm ID to EVP_MD, default SHA1 */
571static const EVP_MD *rsa_algor_to_md(X509_ALGOR *alg)
0f113f3e
MC		 572{
573 const EVP_MD *md;
52ad523c 574
0f113f3e
MC		 575 if (!alg)
576 return EVP_sha1();
577 md = EVP_get_digestbyobj(alg->algorithm);
578 if (md == NULL)
579 RSAerr(RSA_F_RSA_ALGOR_TO_MD, RSA_R_UNKNOWN_DIGEST);
580 return md;
581}
582
0f113f3e 583/*
47e42b3c 584 * Convert EVP_PKEY_CTX in PSS mode into corresponding algorithm parameter,
0574cadf 585 * suitable for setting an AlgorithmIdentifier.
31904ecd
DSH		 586 */
587
47e42b3c 588static RSA_PSS_PARAMS *rsa_ctx_to_pss(EVP_PKEY_CTX *pkctx)
0f113f3e
MC		 589{
590 const EVP_MD *sigmd, *mgf1md;
0f113f3e 591 EVP_PKEY *pk = EVP_PKEY_CTX_get0_pkey(pkctx);
9767a3dc 592 RSA *rsa = EVP_PKEY_get0_RSA(pk);
47e42b3c 593 int saltlen;
52ad523c 594
0f113f3e 595 if (EVP_PKEY_CTX_get_signature_md(pkctx, &sigmd) <= 0)
47e42b3c 596 return NULL;
0f113f3e 597 if (EVP_PKEY_CTX_get_rsa_mgf1_md(pkctx, &mgf1md) <= 0)
47e42b3c 598 return NULL;
0f113f3e 599 if (!EVP_PKEY_CTX_get_rsa_pss_saltlen(pkctx, &saltlen))
47e42b3c 600 return NULL;
90862ab4 601 if (saltlen == -1) {
0f113f3e 602 saltlen = EVP_MD_size(sigmd);
491360e7 603 } else if (saltlen == -2 || saltlen == -3) {
9767a3dc 604 saltlen = RSA_size(rsa) - EVP_MD_size(sigmd) - 2;
137096a7 605 if ((EVP_PKEY_bits(pk) & 0x7) == 1)
0f113f3e 606 saltlen--;
491360e7
BE		 607 if (saltlen < 0)
608 return NULL;
0f113f3e 609 }
47e42b3c
DSH		 610
611 return rsa_pss_params_create(sigmd, mgf1md, saltlen);
612}
613
614RSA_PSS_PARAMS *rsa_pss_params_create(const EVP_MD *sigmd,
615 const EVP_MD *mgf1md, int saltlen)
616{
617 RSA_PSS_PARAMS *pss = RSA_PSS_PARAMS_new();
52ad523c 618
90945fa3 619 if (pss == NULL)
0f113f3e
MC		 620 goto err;
621 if (saltlen != 20) {
622 pss->saltLength = ASN1_INTEGER_new();
90945fa3 623 if (pss->saltLength == NULL)
0f113f3e
MC		 624 goto err;
625 if (!ASN1_INTEGER_set(pss->saltLength, saltlen))
626 goto err;
627 }
628 if (!rsa_md_to_algor(&pss->hashAlgorithm, sigmd))
629 goto err;
47e42b3c 630 if (mgf1md == NULL)
b6b885c6 631 mgf1md = sigmd;
0f113f3e
MC		 632 if (!rsa_md_to_mgf1(&pss->maskGenAlgorithm, mgf1md))
633 goto err;
74753357
DSH		 634 if (!rsa_md_to_algor(&pss->maskHash, mgf1md))
635 goto err;
47e42b3c 636 return pss;
0f113f3e 637 err:
25aaa98a 638 RSA_PSS_PARAMS_free(pss);
0f113f3e
MC		 639 return NULL;
640}
641
47e42b3c
DSH		 642static ASN1_STRING *rsa_ctx_to_pss_string(EVP_PKEY_CTX *pkctx)
643{
644 RSA_PSS_PARAMS *pss = rsa_ctx_to_pss(pkctx);
f291138b 645 ASN1_STRING *os;
52ad523c 646
47e42b3c
DSH		 647 if (pss == NULL)
648 return NULL;
649
f291138b 650 os = ASN1_item_pack(pss, ASN1_ITEM_rptr(RSA_PSS_PARAMS), NULL);
47e42b3c
DSH		 651 RSA_PSS_PARAMS_free(pss);
652 return os;
653}
654
0f113f3e
MC		 655/*
656 * From PSS AlgorithmIdentifier set public key parameters. If pkey isn't NULL
0d4fb843 657 * then the EVP_MD_CTX is setup and initialised. If it is NULL parameters are
0f113f3e 658 * passed to pkctx instead.
0574cadf 659 */
31904ecd 660
0574cadf 661static int rsa_pss_to_ctx(EVP_MD_CTX *ctx, EVP_PKEY_CTX *pkctx,
0f113f3e
MC		 662 X509_ALGOR *sigalg, EVP_PKEY *pkey)
663{
664 int rv = -1;
665 int saltlen;
666 const EVP_MD *mgf1md = NULL, *md = NULL;
667 RSA_PSS_PARAMS *pss;
52ad523c 668
0f113f3e 669 /* Sanity check: make sure it is PSS */
ffc6fad5 670 if (OBJ_obj2nid(sigalg->algorithm) != EVP_PKEY_RSA_PSS) {
0f113f3e
MC		 671 RSAerr(RSA_F_RSA_PSS_TO_CTX, RSA_R_UNSUPPORTED_SIGNATURE_TYPE);
672 return -1;
673 }
674 /* Decode PSS parameters */
6745a1ff 675 pss = rsa_pss_decode(sigalg);
0f113f3e 676
cfd81c6d 677 if (!rsa_pss_get_param(pss, &md, &mgf1md, &saltlen)) {
0f113f3e
MC		 678 RSAerr(RSA_F_RSA_PSS_TO_CTX, RSA_R_INVALID_PSS_PARAMETERS);
679 goto err;
680 }
0f113f3e
MC		 681
682 /* We have all parameters now set up context */
0f113f3e
MC		 683 if (pkey) {
684 if (!EVP_DigestVerifyInit(ctx, &pkctx, md, NULL, pkey))
685 goto err;
686 } else {
687 const EVP_MD *checkmd;
688 if (EVP_PKEY_CTX_get_signature_md(pkctx, &checkmd) <= 0)
689 goto err;
690 if (EVP_MD_type(md) != EVP_MD_type(checkmd)) {
691 RSAerr(RSA_F_RSA_PSS_TO_CTX, RSA_R_DIGEST_DOES_NOT_MATCH);
692 goto err;
693 }
694 }
695
696 if (EVP_PKEY_CTX_set_rsa_padding(pkctx, RSA_PKCS1_PSS_PADDING) <= 0)
697 goto err;
698
699 if (EVP_PKEY_CTX_set_rsa_pss_saltlen(pkctx, saltlen) <= 0)
700 goto err;
701
702 if (EVP_PKEY_CTX_set_rsa_mgf1_md(pkctx, mgf1md) <= 0)
703 goto err;
704 /* Carry on */
705 rv = 1;
706
707 err:
708 RSA_PSS_PARAMS_free(pss);
0f113f3e
MC		 709 return rv;
710}
492a9e24 711
cfd81c6d
DSH		 712int rsa_pss_get_param(const RSA_PSS_PARAMS *pss, const EVP_MD **pmd,
713 const EVP_MD **pmgf1md, int *psaltlen)
714{
715 if (pss == NULL)
716 return 0;
717 *pmd = rsa_algor_to_md(pss->hashAlgorithm);
718 if (*pmd == NULL)
719 return 0;
720 *pmgf1md = rsa_algor_to_md(pss->maskHash);
721 if (*pmgf1md == NULL)
722 return 0;
723 if (pss->saltLength) {
724 *psaltlen = ASN1_INTEGER_get(pss->saltLength);
725 if (*psaltlen < 0) {
726 RSAerr(RSA_F_RSA_PSS_GET_PARAM, RSA_R_INVALID_SALT_LENGTH);
727 return 0;
728 }
c82bafc5 729 } else {
cfd81c6d 730 *psaltlen = 20;
c82bafc5 731 }
cfd81c6d
DSH		 732
733 /*
734 * low-level routines support only trailer field 0xbc (value 1) and
735 * PKCS#1 says we should reject any other value anyway.
736 */
737 if (pss->trailerField && ASN1_INTEGER_get(pss->trailerField) != 1) {
738 RSAerr(RSA_F_RSA_PSS_GET_PARAM, RSA_R_INVALID_TRAILER);
b6b885c6 739 return 0;
cfd81c6d
DSH		 740 }
741
742 return 1;
743}
744
e968561d 745#ifndef OPENSSL_NO_CMS
0574cadf 746static int rsa_cms_verify(CMS_SignerInfo *si)
0f113f3e
MC		 747{
748 int nid, nid2;
749 X509_ALGOR *alg;
750 EVP_PKEY_CTX *pkctx = CMS_SignerInfo_get0_pkey_ctx(si);
52ad523c 751
0f113f3e
MC		 752 CMS_SignerInfo_get0_algs(si, NULL, NULL, NULL, &alg);
753 nid = OBJ_obj2nid(alg->algorithm);
ffc6fad5 754 if (nid == EVP_PKEY_RSA_PSS)
0f113f3e 755 return rsa_pss_to_ctx(NULL, pkctx, alg, NULL);
08be0331
DSH		 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);
759 return 0;
760 }
761 if (nid == NID_rsaEncryption)
762 return 1;
0f113f3e
MC		 763 /* Workaround for some implementation that use a signature OID */
764 if (OBJ_find_sigid_algs(nid, NULL, &nid2)) {
765 if (nid2 == NID_rsaEncryption)
766 return 1;
767 }
768 return 0;
769}
e968561d 770#endif
0f113f3e
MC		 771
772/*
773 * Customised RSA item verification routine. This is called when a signature
774 * is encountered requiring special handling. We currently only handle PSS.
0574cadf
DSH		 775 */
776
0574cadf 777static int rsa_item_verify(EVP_MD_CTX *ctx, const ASN1_ITEM *it, void *asn,
0f113f3e
MC		 778 X509_ALGOR *sigalg, ASN1_BIT_STRING *sig,
779 EVP_PKEY *pkey)
780{
781 /* Sanity check: make sure it is PSS */
ffc6fad5 782 if (OBJ_obj2nid(sigalg->algorithm) != EVP_PKEY_RSA_PSS) {
0f113f3e
MC		 783 RSAerr(RSA_F_RSA_ITEM_VERIFY, RSA_R_UNSUPPORTED_SIGNATURE_TYPE);
784 return -1;
785 }
09f06923 786 if (rsa_pss_to_ctx(ctx, NULL, sigalg, pkey) > 0) {
0f113f3e
MC		 787 /* Carry on */
788 return 2;
09f06923 789 }
0f113f3e
MC		 790 return -1;
791}
0574cadf 792
e968561d 793#ifndef OPENSSL_NO_CMS
0574cadf 794static int rsa_cms_sign(CMS_SignerInfo *si)
0f113f3e
MC		 795{
796 int pad_mode = RSA_PKCS1_PADDING;
797 X509_ALGOR *alg;
798 EVP_PKEY_CTX *pkctx = CMS_SignerInfo_get0_pkey_ctx(si);
799 ASN1_STRING *os = NULL;
52ad523c 800
0f113f3e
MC		 801 CMS_SignerInfo_get0_algs(si, NULL, NULL, NULL, &alg);
802 if (pkctx) {
803 if (EVP_PKEY_CTX_get_rsa_padding(pkctx, &pad_mode) <= 0)
804 return 0;
805 }
806 if (pad_mode == RSA_PKCS1_PADDING) {
807 X509_ALGOR_set0(alg, OBJ_nid2obj(NID_rsaEncryption), V_ASN1_NULL, 0);
808 return 1;
809 }
810 /* We don't support it */
811 if (pad_mode != RSA_PKCS1_PSS_PADDING)
812 return 0;
47e42b3c 813 os = rsa_ctx_to_pss_string(pkctx);
0f113f3e
MC		 814 if (!os)
815 return 0;
ffc6fad5 816 X509_ALGOR_set0(alg, OBJ_nid2obj(EVP_PKEY_RSA_PSS), V_ASN1_SEQUENCE, os);
0f113f3e
MC		 817 return 1;
818}
e968561d 819#endif
0574cadf 820
17c63d1c 821static int rsa_item_sign(EVP_MD_CTX *ctx, const ASN1_ITEM *it, void *asn,
0f113f3e
MC		 822 X509_ALGOR *alg1, X509_ALGOR *alg2,
823 ASN1_BIT_STRING *sig)
824{
825 int pad_mode;
6e59a892 826 EVP_PKEY_CTX *pkctx = EVP_MD_CTX_pkey_ctx(ctx);
52ad523c 827
0f113f3e
MC		 828 if (EVP_PKEY_CTX_get_rsa_padding(pkctx, &pad_mode) <= 0)
829 return 0;
830 if (pad_mode == RSA_PKCS1_PADDING)
831 return 2;
832 if (pad_mode == RSA_PKCS1_PSS_PADDING) {
833 ASN1_STRING *os1 = NULL;
47e42b3c 834 os1 = rsa_ctx_to_pss_string(pkctx);
0f113f3e
MC		 835 if (!os1)
836 return 0;
837 /* Duplicate parameters if we have to */
838 if (alg2) {
839 ASN1_STRING *os2 = ASN1_STRING_dup(os1);
840 if (!os2) {
841 ASN1_STRING_free(os1);
842 return 0;
843 }
ffc6fad5 844 X509_ALGOR_set0(alg2, OBJ_nid2obj(EVP_PKEY_RSA_PSS),
0f113f3e
MC		 845 V_ASN1_SEQUENCE, os2);
846 }
ffc6fad5 847 X509_ALGOR_set0(alg1, OBJ_nid2obj(EVP_PKEY_RSA_PSS),
0f113f3e
MC		 848 V_ASN1_SEQUENCE, os1);
849 return 3;
850 }
851 return 2;
852}
17c63d1c 853
629e369c
DSH		 854static int rsa_sig_info_set(X509_SIG_INFO *siginf, const X509_ALGOR *sigalg,
855 const ASN1_STRING *sig)
856{
857 int rv = 0;
858 int mdnid, saltlen;
859 uint32_t flags;
860 const EVP_MD *mgf1md = NULL, *md = NULL;
861 RSA_PSS_PARAMS *pss;
b744f915 862 int secbits;
629e369c
DSH		 863
864 /* Sanity check: make sure it is PSS */
865 if (OBJ_obj2nid(sigalg->algorithm) != EVP_PKEY_RSA_PSS)
866 return 0;
867 /* Decode PSS parameters */
868 pss = rsa_pss_decode(sigalg);
869 if (!rsa_pss_get_param(pss, &md, &mgf1md, &saltlen))
870 goto err;
871 mdnid = EVP_MD_type(md);
872 /*
873 * For TLS need SHA256, SHA384 or SHA512, digest and MGF1 digest must
874 * match and salt length must equal digest size
875 */
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;
879 else
880 flags = 0;
881 /* Note: security bits half number of digest bits */
b744f915
KR		 882 secbits = EVP_MD_size(md) * 4;
883 /*
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
887 * level 1.
888 * https://eprint.iacr.org/2020/014 puts a chosen-prefix attack for SHA1 at
889 * 2^63.4
890 * https://documents.epfl.ch/users/l/le/lenstra/public/papers/lat.pdf
891 * puts a chosen-prefix attack for MD5 at 2^39.
892 */
893 if (mdnid == NID_sha1)
894 secbits = 64;
895 else if (mdnid == NID_md5_sha1)
896 secbits = 68;
897 else if (mdnid == NID_md5)
898 secbits = 39;
899 X509_SIG_INFO_set(siginf, mdnid, EVP_PKEY_RSA_PSS, secbits,
629e369c
DSH		 900 flags);
901 rv = 1;
902 err:
903 RSA_PSS_PARAMS_free(pss);
904 return rv;
905}
906
e968561d 907#ifndef OPENSSL_NO_CMS
6745a1ff 908static RSA_OAEP_PARAMS *rsa_oaep_decode(const X509_ALGOR *alg)
0f113f3e 909{
6745a1ff 910 RSA_OAEP_PARAMS *oaep;
0574cadf 911
6745a1ff 912 oaep = ASN1_TYPE_unpack_sequence(ASN1_ITEM_rptr(RSA_OAEP_PARAMS),
52ad523c 913 alg->parameter);
0574cadf 914
6745a1ff 915 if (oaep == NULL)
0f113f3e 916 return NULL;
0574cadf 917
6745a1ff
DSH		 918 if (oaep->maskGenFunc != NULL) {
919 oaep->maskHash = rsa_mgf1_decode(oaep->maskGenFunc);
920 if (oaep->maskHash == NULL) {
921 RSA_OAEP_PARAMS_free(oaep);
922 return NULL;
923 }
924 }
925 return oaep;
0f113f3e 926}
0574cadf
DSH		 927
928static int rsa_cms_decrypt(CMS_RecipientInfo *ri)
0f113f3e
MC		 929{
930 EVP_PKEY_CTX *pkctx;
931 X509_ALGOR *cmsalg;
932 int nid;
933 int rv = -1;
934 unsigned char *label = NULL;
935 int labellen = 0;
936 const EVP_MD *mgf1md = NULL, *md = NULL;
937 RSA_OAEP_PARAMS *oaep;
52ad523c 938
0f113f3e 939 pkctx = CMS_RecipientInfo_get0_pkey_ctx(ri);
52ad523c 940 if (pkctx == NULL)
0f113f3e
MC		 941 return 0;
942 if (!CMS_RecipientInfo_ktri_get0_algs(ri, NULL, NULL, &cmsalg))
943 return -1;
944 nid = OBJ_obj2nid(cmsalg->algorithm);
945 if (nid == NID_rsaEncryption)
946 return 1;
947 if (nid != NID_rsaesOaep) {
948 RSAerr(RSA_F_RSA_CMS_DECRYPT, RSA_R_UNSUPPORTED_ENCRYPTION_TYPE);
949 return -1;
950 }
951 /* Decode OAEP parameters */
6745a1ff 952 oaep = rsa_oaep_decode(cmsalg);
0f113f3e
MC		 953
954 if (oaep == NULL) {
955 RSAerr(RSA_F_RSA_CMS_DECRYPT, RSA_R_INVALID_OAEP_PARAMETERS);
956 goto err;
957 }
958
6745a1ff 959 mgf1md = rsa_algor_to_md(oaep->maskHash);
52ad523c 960 if (mgf1md == NULL)
0f113f3e
MC		 961 goto err;
962 md = rsa_algor_to_md(oaep->hashFunc);
52ad523c 963 if (md == NULL)
0f113f3e
MC		 964 goto err;
965
52ad523c 966 if (oaep->pSourceFunc != NULL) {
0f113f3e 967 X509_ALGOR *plab = oaep->pSourceFunc;
52ad523c 968
0f113f3e
MC		 969 if (OBJ_obj2nid(plab->algorithm) != NID_pSpecified) {
970 RSAerr(RSA_F_RSA_CMS_DECRYPT, RSA_R_UNSUPPORTED_LABEL_SOURCE);
971 goto err;
972 }
973 if (plab->parameter->type != V_ASN1_OCTET_STRING) {
974 RSAerr(RSA_F_RSA_CMS_DECRYPT, RSA_R_INVALID_LABEL);
975 goto err;
976 }
977
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;
982 }
983
984 if (EVP_PKEY_CTX_set_rsa_padding(pkctx, RSA_PKCS1_OAEP_PADDING) <= 0)
985 goto err;
986 if (EVP_PKEY_CTX_set_rsa_oaep_md(pkctx, md) <= 0)
987 goto err;
988 if (EVP_PKEY_CTX_set_rsa_mgf1_md(pkctx, mgf1md) <= 0)
989 goto err;
990 if (EVP_PKEY_CTX_set0_rsa_oaep_label(pkctx, label, labellen) <= 0)
991 goto err;
992 /* Carry on */
993 rv = 1;
994
995 err:
996 RSA_OAEP_PARAMS_free(oaep);
0f113f3e
MC		 997 return rv;
998}
0574cadf
DSH		 999
1000static int rsa_cms_encrypt(CMS_RecipientInfo *ri)
0f113f3e
MC		 1001{
1002 const EVP_MD *md, *mgf1md;
1003 RSA_OAEP_PARAMS *oaep = NULL;
1004 ASN1_STRING *os = NULL;
1005 X509_ALGOR *alg;
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;
52ad523c 1009
178989b4
BS		 1010 if (CMS_RecipientInfo_ktri_get0_algs(ri, NULL, NULL, &alg) <= 0)
1011 return 0;
0f113f3e
MC		 1012 if (pkctx) {
1013 if (EVP_PKEY_CTX_get_rsa_padding(pkctx, &pad_mode) <= 0)
1014 return 0;
1015 }
1016 if (pad_mode == RSA_PKCS1_PADDING) {
1017 X509_ALGOR_set0(alg, OBJ_nid2obj(NID_rsaEncryption), V_ASN1_NULL, 0);
1018 return 1;
1019 }
1020 /* Not supported */
1021 if (pad_mode != RSA_PKCS1_OAEP_PADDING)
1022 return 0;
1023 if (EVP_PKEY_CTX_get_rsa_oaep_md(pkctx, &md) <= 0)
1024 goto err;
1025 if (EVP_PKEY_CTX_get_rsa_mgf1_md(pkctx, &mgf1md) <= 0)
1026 goto err;
1027 labellen = EVP_PKEY_CTX_get0_rsa_oaep_label(pkctx, &label);
1028 if (labellen < 0)
1029 goto err;
1030 oaep = RSA_OAEP_PARAMS_new();
90945fa3 1031 if (oaep == NULL)
0f113f3e
MC		 1032 goto err;
1033 if (!rsa_md_to_algor(&oaep->hashFunc, md))
1034 goto err;
1035 if (!rsa_md_to_mgf1(&oaep->maskGenFunc, mgf1md))
1036 goto err;
1037 if (labellen > 0) {
5e8129f2 1038 ASN1_OCTET_STRING *los;
0f113f3e 1039 oaep->pSourceFunc = X509_ALGOR_new();
90945fa3 1040 if (oaep->pSourceFunc == NULL)
0f113f3e 1041 goto err;
5e8129f2 1042 los = ASN1_OCTET_STRING_new();
90945fa3 1043 if (los == NULL)
0f113f3e
MC		 1044 goto err;
1045 if (!ASN1_OCTET_STRING_set(los, label, labellen)) {
1046 ASN1_OCTET_STRING_free(los);
1047 goto err;
1048 }
1049 X509_ALGOR_set0(oaep->pSourceFunc, OBJ_nid2obj(NID_pSpecified),
1050 V_ASN1_OCTET_STRING, los);
1051 }
1052 /* create string with pss parameter encoding. */
1053 if (!ASN1_item_pack(oaep, ASN1_ITEM_rptr(RSA_OAEP_PARAMS), &os))
1054 goto err;
1055 X509_ALGOR_set0(alg, OBJ_nid2obj(NID_rsaesOaep), V_ASN1_SEQUENCE, os);
1056 os = NULL;
1057 rv = 1;
1058 err:
25aaa98a 1059 RSA_OAEP_PARAMS_free(oaep);
0dfb9398 1060 ASN1_STRING_free(os);
0f113f3e
MC		 1061 return rv;
1062}
e968561d 1063#endif
0f113f3e 1064
2aee35d3
PY		 1065static int rsa_pkey_check(const EVP_PKEY *pkey)
1066{
1067 return RSA_check_key_ex(pkey->pkey.rsa, NULL);
1068}
1069
29be6023
RL		 1070static size_t rsa_pkey_dirty_cnt(const EVP_PKEY *pkey)
1071{
1072 return pkey->pkey.rsa->dirty_cnt;
1073}
1074
1075DEFINE_SPECIAL_STACK_OF_CONST(BIGNUM_const, BIGNUM)
1076
1077static void *rsa_pkey_export_to(const EVP_PKEY *pk, EVP_KEYMGMT *keymgmt,
1078 int want_domainparams)
1079{
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;
1088
1089 /*
1090 * There are no domain parameters for RSA keys, or rather, they are
1091 * included in the key data itself.
1092 */
1093 if (want_domainparams)
1094 goto err;
1095
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)
1100 goto err;
1101
1102 if (!rsa_get0_all_params(rsa, primes, exps, coeffs))
1103 goto err;
1104
1105 /* Public parameters must always be present */
1106 if (n == NULL || e == NULL)
1107 goto err;
1108
1109 if (d != 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);
1114
1115 if (numprimes < 2 || numexps < 2 || numcoeffs < 1)
1116 goto err;
1117
081d08fa 1118 /* assert that an OSSL_PARAM_BLD has enough space. */
29be6023
RL		 1119 if (!ossl_assert(/* n, e */ 2 + /* d */ 1 + /* numprimes */ 1
1120 + numprimes + numexps + numcoeffs
1121 <= OSSL_PARAM_BLD_MAX))
1122 goto err;
1123 }
1124
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))
1128 goto err;
1129
1130 if (d != NULL) {
1131 int i;
1132
1133 if (!ossl_param_bld_push_BN(&tmpl, OSSL_PKEY_PARAM_RSA_D, d))
1134 goto err;
1135
1136 for (i = 0; i < numprimes; i++) {
1137 const BIGNUM *num = sk_BIGNUM_const_value(primes, i);
1138
1139 if (!ossl_param_bld_push_BN(&tmpl, OSSL_PKEY_PARAM_RSA_FACTOR,
1140 num))
1141 goto err;
1142 }
1143
1144 for (i = 0; i < numexps; i++) {
1145 const BIGNUM *num = sk_BIGNUM_const_value(exps, i);
1146
1147 if (!ossl_param_bld_push_BN(&tmpl, OSSL_PKEY_PARAM_RSA_EXPONENT,
1148 num))
1149 goto err;
1150 }
1151
1152 for (i = 0; i < numcoeffs; i++) {
1153 const BIGNUM *num = sk_BIGNUM_const_value(coeffs, i);
1154
1155 if (!ossl_param_bld_push_BN(&tmpl, OSSL_PKEY_PARAM_RSA_COEFFICIENT,
1156 num))
1157 goto err;
1158 }
1159 }
1160
1161 if ((params = ossl_param_bld_to_param(&tmpl)) == NULL)
1162 goto err;
1163
1164 /* We export, the provider imports */
1165 provkey = evp_keymgmt_importkey(keymgmt, params);
1166
1167 err:
1168 sk_BIGNUM_const_free(primes);
1169 sk_BIGNUM_const_free(exps);
1170 sk_BIGNUM_const_free(coeffs);
1171 ossl_param_bld_free(params);
1172 return provkey;
1173}
1174
578b5514 1175const EVP_PKEY_ASN1_METHOD rsa_asn1_meths[2] = {
0f113f3e
MC		 1176 {
1177 EVP_PKEY_RSA,
1178 EVP_PKEY_RSA,
1179 ASN1_PKEY_SIGPARAM_NULL,
1180
1181 "RSA",
1182 "OpenSSL RSA method",
1183
1184 rsa_pub_decode,
1185 rsa_pub_encode,
1186 rsa_pub_cmp,
1187 rsa_pub_print,
1188
1189 rsa_priv_decode,
1190 rsa_priv_encode,
1191 rsa_priv_print,
1192
1193 int_rsa_size,
1194 rsa_bits,
1195 rsa_security_bits,
1196
1197 0, 0, 0, 0, 0, 0,
1198
1199 rsa_sig_print,
1200 int_rsa_free,
1201 rsa_pkey_ctrl,
1202 old_rsa_priv_decode,
1203 old_rsa_priv_encode,
1204 rsa_item_verify,
629e369c 1205 rsa_item_sign,
2aee35d3 1206 rsa_sig_info_set,
29be6023
RL		 1207 rsa_pkey_check,
1208
1209 0, 0,
1210 0, 0, 0, 0,
1211
1212 rsa_pkey_dirty_cnt,
1213 rsa_pkey_export_to
629e369c 1214 },
0f113f3e
MC		 1215
1216 {
1217 EVP_PKEY_RSA2,
1218 EVP_PKEY_RSA,
1219 ASN1_PKEY_ALIAS}
1220};
4e8ba747
DSH		 1221
1222const EVP_PKEY_ASN1_METHOD rsa_pss_asn1_meth = {
1223 EVP_PKEY_RSA_PSS,
1224 EVP_PKEY_RSA_PSS,
1225 ASN1_PKEY_SIGPARAM_NULL,
1226
1227 "RSA-PSS",
1228 "OpenSSL RSA-PSS method",
1229
1230 rsa_pub_decode,
1231 rsa_pub_encode,
1232 rsa_pub_cmp,
1233 rsa_pub_print,
1234
1235 rsa_priv_decode,
1236 rsa_priv_encode,
1237 rsa_priv_print,
1238
1239 int_rsa_size,
1240 rsa_bits,
1241 rsa_security_bits,
1242
1243 0, 0, 0, 0, 0, 0,
1244
1245 rsa_sig_print,
1246 int_rsa_free,
1247 rsa_pkey_ctrl,
1248 0, 0,
1249 rsa_item_verify,
1250 rsa_item_sign,
2aee35d3 1251 0,
29be6023
RL		 1252 rsa_pkey_check,
1253
1254 0, 0,
1255 0, 0, 0, 0,
1256
1257 rsa_pkey_dirty_cnt,
1258 rsa_pkey_export_to
4e8ba747 1259};
A mirror of the official openssl repository