1 /*
2 * Copyright 2019-2021 The OpenSSL Project Authors. All Rights Reserved.
3 *
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
8 */
9
10 /*
11 * RSA low level APIs are deprecated for public use, but still ok for
12 * internal use.
13 */
14 #include "internal/deprecated.h"
15
16 #include "e_os.h" /* strcasecmp */
17 #include <string.h>
18 #include <openssl/crypto.h>
19 #include <openssl/core_dispatch.h>
20 #include <openssl/core_names.h>
21 #include <openssl/err.h>
22 #include <openssl/rsa.h>
23 #include <openssl/params.h>
24 #include <openssl/evp.h>
25 #include <openssl/proverr.h>
26 #include "internal/cryptlib.h"
27 #include "internal/nelem.h"
28 #include "internal/sizes.h"
29 #include "crypto/rsa.h"
30 #include "prov/providercommon.h"
31 #include "prov/implementations.h"
32 #include "prov/provider_ctx.h"
33 #include "prov/der_rsa.h"
34 #include "prov/securitycheck.h"
35
36 #define RSA_DEFAULT_DIGEST_NAME OSSL_DIGEST_NAME_SHA1
37
38 static OSSL_FUNC_signature_newctx_fn rsa_newctx;
39 static OSSL_FUNC_signature_sign_init_fn rsa_sign_init;
40 static OSSL_FUNC_signature_verify_init_fn rsa_verify_init;
41 static OSSL_FUNC_signature_verify_recover_init_fn rsa_verify_recover_init;
42 static OSSL_FUNC_signature_sign_fn rsa_sign;
43 static OSSL_FUNC_signature_verify_fn rsa_verify;
44 static OSSL_FUNC_signature_verify_recover_fn rsa_verify_recover;
45 static OSSL_FUNC_signature_digest_sign_init_fn rsa_digest_sign_init;
46 static OSSL_FUNC_signature_digest_sign_update_fn rsa_digest_signverify_update;
47 static OSSL_FUNC_signature_digest_sign_final_fn rsa_digest_sign_final;
48 static OSSL_FUNC_signature_digest_verify_init_fn rsa_digest_verify_init;
49 static OSSL_FUNC_signature_digest_verify_update_fn rsa_digest_signverify_update;
50 static OSSL_FUNC_signature_digest_verify_final_fn rsa_digest_verify_final;
51 static OSSL_FUNC_signature_freectx_fn rsa_freectx;
52 static OSSL_FUNC_signature_dupctx_fn rsa_dupctx;
53 static OSSL_FUNC_signature_get_ctx_params_fn rsa_get_ctx_params;
54 static OSSL_FUNC_signature_gettable_ctx_params_fn rsa_gettable_ctx_params;
55 static OSSL_FUNC_signature_set_ctx_params_fn rsa_set_ctx_params;
56 static OSSL_FUNC_signature_settable_ctx_params_fn rsa_settable_ctx_params;
57 static OSSL_FUNC_signature_get_ctx_md_params_fn rsa_get_ctx_md_params;
58 static OSSL_FUNC_signature_gettable_ctx_md_params_fn rsa_gettable_ctx_md_params;
59 static OSSL_FUNC_signature_set_ctx_md_params_fn rsa_set_ctx_md_params;
60 static OSSL_FUNC_signature_settable_ctx_md_params_fn rsa_settable_ctx_md_params;
61
62 static OSSL_ITEM padding_item[] = {
63 { RSA_PKCS1_PADDING, OSSL_PKEY_RSA_PAD_MODE_PKCSV15 },
64 { RSA_NO_PADDING, OSSL_PKEY_RSA_PAD_MODE_NONE },
65 { RSA_X931_PADDING, OSSL_PKEY_RSA_PAD_MODE_X931 },
66 { RSA_PKCS1_PSS_PADDING, OSSL_PKEY_RSA_PAD_MODE_PSS },
67 { 0, NULL }
68 };
69
70 /*
71 * What's passed as an actual key is defined by the KEYMGMT interface.
72 * We happen to know that our KEYMGMT simply passes RSA structures, so
73 * we use that here too.
74 */
75
76 typedef struct {
77 OSSL_LIB_CTX *libctx;
78 char *propq;
79 RSA *rsa;
80 int operation;
81
82 /*
83 * Flag to determine if the hash function can be changed (1) or not (0)
84 * Because it's dangerous to change during a DigestSign or DigestVerify
85 * operation, this flag is cleared by their Init function, and set again
86 * by their Final function.
87 */
88 unsigned int flag_allow_md : 1;
89 unsigned int mgf1_md_set : 1;
90
91 /* main digest */
92 EVP_MD *md;
93 EVP_MD_CTX *mdctx;
94 int mdnid;
95 char mdname[OSSL_MAX_NAME_SIZE]; /* Purely informational */
96
97 /* RSA padding mode */
98 int pad_mode;
99 /* message digest for MGF1 */
100 EVP_MD *mgf1_md;
101 int mgf1_mdnid;
102 char mgf1_mdname[OSSL_MAX_NAME_SIZE]; /* Purely informational */
103 /* PSS salt length */
104 int saltlen;
105 /* Minimum salt length or -1 if no PSS parameter restriction */
106 int min_saltlen;
107
108 /* Temp buffer */
109 unsigned char *tbuf;
110
111 } PROV_RSA_CTX;
112
113 /* True if PSS parameters are restricted */
114 #define rsa_pss_restricted(prsactx) (prsactx->min_saltlen != -1)
115
rsa_get_md_size(const PROV_RSA_CTX * prsactx)116 static size_t rsa_get_md_size(const PROV_RSA_CTX *prsactx)
117 {
118 if (prsactx->md != NULL)
119 return EVP_MD_get_size(prsactx->md);
120 return 0;
121 }
122
rsa_check_padding(const PROV_RSA_CTX * prsactx,const char * mdname,const char * mgf1_mdname,int mdnid)123 static int rsa_check_padding(const PROV_RSA_CTX *prsactx,
124 const char *mdname, const char *mgf1_mdname,
125 int mdnid)
126 {
127 switch (prsactx->pad_mode) {
128 case RSA_NO_PADDING:
129 if (mdname != NULL || mdnid != NID_undef) {
130 ERR_raise(ERR_LIB_PROV, PROV_R_INVALID_PADDING_MODE);
131 return 0;
132 }
133 break;
134 case RSA_X931_PADDING:
135 if (RSA_X931_hash_id(mdnid) == -1) {
136 ERR_raise(ERR_LIB_PROV, PROV_R_INVALID_X931_DIGEST);
137 return 0;
138 }
139 break;
140 case RSA_PKCS1_PSS_PADDING:
141 if (rsa_pss_restricted(prsactx))
142 if ((mdname != NULL && !EVP_MD_is_a(prsactx->md, mdname))
143 || (mgf1_mdname != NULL
144 && !EVP_MD_is_a(prsactx->mgf1_md, mgf1_mdname))) {
145 ERR_raise(ERR_LIB_PROV, PROV_R_DIGEST_NOT_ALLOWED);
146 return 0;
147 }
148 break;
149 default:
150 break;
151 }
152
153 return 1;
154 }
155
rsa_check_parameters(PROV_RSA_CTX * prsactx,int min_saltlen)156 static int rsa_check_parameters(PROV_RSA_CTX *prsactx, int min_saltlen)
157 {
158 if (prsactx->pad_mode == RSA_PKCS1_PSS_PADDING) {
159 int max_saltlen;
160
161 /* See if minimum salt length exceeds maximum possible */
162 max_saltlen = RSA_size(prsactx->rsa) - EVP_MD_get_size(prsactx->md);
163 if ((RSA_bits(prsactx->rsa) & 0x7) == 1)
164 max_saltlen--;
165 if (min_saltlen < 0 || min_saltlen > max_saltlen) {
166 ERR_raise(ERR_LIB_PROV, PROV_R_INVALID_SALT_LENGTH);
167 return 0;
168 }
169 prsactx->min_saltlen = min_saltlen;
170 }
171 return 1;
172 }
173
rsa_newctx(void * provctx,const char * propq)174 static void *rsa_newctx(void *provctx, const char *propq)
175 {
176 PROV_RSA_CTX *prsactx = NULL;
177 char *propq_copy = NULL;
178
179 if (!ossl_prov_is_running())
180 return NULL;
181
182 if ((prsactx = OPENSSL_zalloc(sizeof(PROV_RSA_CTX))) == NULL
183 || (propq != NULL
184 && (propq_copy = OPENSSL_strdup(propq)) == NULL)) {
185 OPENSSL_free(prsactx);
186 ERR_raise(ERR_LIB_PROV, ERR_R_MALLOC_FAILURE);
187 return NULL;
188 }
189
190 prsactx->libctx = PROV_LIBCTX_OF(provctx);
191 prsactx->flag_allow_md = 1;
192 prsactx->propq = propq_copy;
193 return prsactx;
194 }
195
rsa_pss_compute_saltlen(PROV_RSA_CTX * ctx)196 static int rsa_pss_compute_saltlen(PROV_RSA_CTX *ctx)
197 {
198 int saltlen = ctx->saltlen;
199
200 if (saltlen == RSA_PSS_SALTLEN_DIGEST) {
201 saltlen = EVP_MD_get_size(ctx->md);
202 } else if (saltlen == RSA_PSS_SALTLEN_AUTO || saltlen == RSA_PSS_SALTLEN_MAX) {
203 saltlen = RSA_size(ctx->rsa) - EVP_MD_get_size(ctx->md) - 2;
204 if ((RSA_bits(ctx->rsa) & 0x7) == 1)
205 saltlen--;
206 }
207 if (saltlen < 0) {
208 ERR_raise(ERR_LIB_PROV, ERR_R_INTERNAL_ERROR);
209 return -1;
210 } else if (saltlen < ctx->min_saltlen) {
211 ERR_raise_data(ERR_LIB_PROV, PROV_R_PSS_SALTLEN_TOO_SMALL,
212 "minimum salt length: %d, actual salt length: %d",
213 ctx->min_saltlen, saltlen);
214 return -1;
215 }
216 return saltlen;
217 }
218
rsa_generate_signature_aid(PROV_RSA_CTX * ctx,unsigned char * aid_buf,size_t buf_len,size_t * aid_len)219 static unsigned char *rsa_generate_signature_aid(PROV_RSA_CTX *ctx,
220 unsigned char *aid_buf,
221 size_t buf_len,
222 size_t *aid_len)
223 {
224 WPACKET pkt;
225 unsigned char *aid = NULL;
226 int saltlen;
227 RSA_PSS_PARAMS_30 pss_params;
228 int ret;
229
230 if (!WPACKET_init_der(&pkt, aid_buf, buf_len)) {
231 ERR_raise(ERR_LIB_PROV, ERR_R_MALLOC_FAILURE);
232 return NULL;
233 }
234
235 switch (ctx->pad_mode) {
236 case RSA_PKCS1_PADDING:
237 ret = ossl_DER_w_algorithmIdentifier_MDWithRSAEncryption(&pkt, -1,
238 ctx->mdnid);
239
240 if (ret > 0) {
241 break;
242 } else if (ret == 0) {
243 ERR_raise(ERR_LIB_PROV, ERR_R_INTERNAL_ERROR);
244 goto cleanup;
245 }
246 ERR_raise_data(ERR_LIB_PROV, ERR_R_UNSUPPORTED,
247 "Algorithm ID generation - md NID: %d",
248 ctx->mdnid);
249 goto cleanup;
250 case RSA_PKCS1_PSS_PADDING:
251 saltlen = rsa_pss_compute_saltlen(ctx);
252 if (saltlen < 0)
253 goto cleanup;
254 if (!ossl_rsa_pss_params_30_set_defaults(&pss_params)
255 || !ossl_rsa_pss_params_30_set_hashalg(&pss_params, ctx->mdnid)
256 || !ossl_rsa_pss_params_30_set_maskgenhashalg(&pss_params,
257 ctx->mgf1_mdnid)
258 || !ossl_rsa_pss_params_30_set_saltlen(&pss_params, saltlen)
259 || !ossl_DER_w_algorithmIdentifier_RSA_PSS(&pkt, -1,
260 RSA_FLAG_TYPE_RSASSAPSS,
261 &pss_params)) {
262 ERR_raise(ERR_LIB_PROV, ERR_R_INTERNAL_ERROR);
263 goto cleanup;
264 }
265 break;
266 default:
267 ERR_raise_data(ERR_LIB_PROV, ERR_R_UNSUPPORTED,
268 "Algorithm ID generation - pad mode: %d",
269 ctx->pad_mode);
270 goto cleanup;
271 }
272 if (WPACKET_finish(&pkt)) {
273 WPACKET_get_total_written(&pkt, aid_len);
274 aid = WPACKET_get_curr(&pkt);
275 }
276 cleanup:
277 WPACKET_cleanup(&pkt);
278 return aid;
279 }
280
rsa_setup_md(PROV_RSA_CTX * ctx,const char * mdname,const char * mdprops)281 static int rsa_setup_md(PROV_RSA_CTX *ctx, const char *mdname,
282 const char *mdprops)
283 {
284 if (mdprops == NULL)
285 mdprops = ctx->propq;
286
287 if (mdname != NULL) {
288 EVP_MD *md = EVP_MD_fetch(ctx->libctx, mdname, mdprops);
289 int sha1_allowed = (ctx->operation != EVP_PKEY_OP_SIGN);
290 int md_nid = ossl_digest_rsa_sign_get_md_nid(ctx->libctx, md,
291 sha1_allowed);
292 size_t mdname_len = strlen(mdname);
293
294 if (md == NULL
295 || md_nid <= 0
296 || !rsa_check_padding(ctx, mdname, NULL, md_nid)
297 || mdname_len >= sizeof(ctx->mdname)) {
298 if (md == NULL)
299 ERR_raise_data(ERR_LIB_PROV, PROV_R_INVALID_DIGEST,
300 "%s could not be fetched", mdname);
301 if (md_nid <= 0)
302 ERR_raise_data(ERR_LIB_PROV, PROV_R_DIGEST_NOT_ALLOWED,
303 "digest=%s", mdname);
304 if (mdname_len >= sizeof(ctx->mdname))
305 ERR_raise_data(ERR_LIB_PROV, PROV_R_INVALID_DIGEST,
306 "%s exceeds name buffer length", mdname);
307 EVP_MD_free(md);
308 return 0;
309 }
310
311 if (!ctx->flag_allow_md) {
312 if (ctx->mdname[0] != '\0' && !EVP_MD_is_a(md, ctx->mdname)) {
313 ERR_raise_data(ERR_LIB_PROV, PROV_R_DIGEST_NOT_ALLOWED,
314 "digest %s != %s", mdname, ctx->mdname);
315 EVP_MD_free(md);
316 return 0;
317 }
318 EVP_MD_free(md);
319 return 1;
320 }
321
322 if (!ctx->mgf1_md_set) {
323 if (!EVP_MD_up_ref(md)) {
324 EVP_MD_free(md);
325 return 0;
326 }
327 EVP_MD_free(ctx->mgf1_md);
328 ctx->mgf1_md = md;
329 ctx->mgf1_mdnid = md_nid;
330 OPENSSL_strlcpy(ctx->mgf1_mdname, mdname, sizeof(ctx->mgf1_mdname));
331 }
332
333 EVP_MD_CTX_free(ctx->mdctx);
334 EVP_MD_free(ctx->md);
335
336 ctx->mdctx = NULL;
337 ctx->md = md;
338 ctx->mdnid = md_nid;
339 OPENSSL_strlcpy(ctx->mdname, mdname, sizeof(ctx->mdname));
340 }
341
342 return 1;
343 }
344
rsa_setup_mgf1_md(PROV_RSA_CTX * ctx,const char * mdname,const char * mdprops)345 static int rsa_setup_mgf1_md(PROV_RSA_CTX *ctx, const char *mdname,
346 const char *mdprops)
347 {
348 size_t len;
349 EVP_MD *md = NULL;
350 int mdnid;
351
352 if (mdprops == NULL)
353 mdprops = ctx->propq;
354
355 if ((md = EVP_MD_fetch(ctx->libctx, mdname, mdprops)) == NULL) {
356 ERR_raise_data(ERR_LIB_PROV, PROV_R_INVALID_DIGEST,
357 "%s could not be fetched", mdname);
358 return 0;
359 }
360 /* The default for mgf1 is SHA1 - so allow SHA1 */
361 if ((mdnid = ossl_digest_rsa_sign_get_md_nid(ctx->libctx, md, 1)) <= 0
362 || !rsa_check_padding(ctx, NULL, mdname, mdnid)) {
363 if (mdnid <= 0)
364 ERR_raise_data(ERR_LIB_PROV, PROV_R_DIGEST_NOT_ALLOWED,
365 "digest=%s", mdname);
366 EVP_MD_free(md);
367 return 0;
368 }
369 len = OPENSSL_strlcpy(ctx->mgf1_mdname, mdname, sizeof(ctx->mgf1_mdname));
370 if (len >= sizeof(ctx->mgf1_mdname)) {
371 ERR_raise_data(ERR_LIB_PROV, PROV_R_INVALID_DIGEST,
372 "%s exceeds name buffer length", mdname);
373 EVP_MD_free(md);
374 return 0;
375 }
376
377 EVP_MD_free(ctx->mgf1_md);
378 ctx->mgf1_md = md;
379 ctx->mgf1_mdnid = mdnid;
380 ctx->mgf1_md_set = 1;
381 return 1;
382 }
383
rsa_signverify_init(void * vprsactx,void * vrsa,const OSSL_PARAM params[],int operation)384 static int rsa_signverify_init(void *vprsactx, void *vrsa,
385 const OSSL_PARAM params[], int operation)
386 {
387 PROV_RSA_CTX *prsactx = (PROV_RSA_CTX *)vprsactx;
388
389 if (!ossl_prov_is_running() || prsactx == NULL)
390 return 0;
391
392 if (vrsa == NULL && prsactx->rsa == NULL) {
393 ERR_raise(ERR_LIB_PROV, PROV_R_NO_KEY_SET);
394 return 0;
395 }
396
397 if (vrsa != NULL) {
398 if (!ossl_rsa_check_key(prsactx->libctx, vrsa, operation))
399 return 0;
400
401 if (!RSA_up_ref(vrsa))
402 return 0;
403 RSA_free(prsactx->rsa);
404 prsactx->rsa = vrsa;
405 }
406
407 prsactx->operation = operation;
408
409 if (!rsa_set_ctx_params(prsactx, params))
410 return 0;
411
412 /* Maximum for sign, auto for verify */
413 prsactx->saltlen = RSA_PSS_SALTLEN_AUTO;
414 prsactx->min_saltlen = -1;
415
416 switch (RSA_test_flags(prsactx->rsa, RSA_FLAG_TYPE_MASK)) {
417 case RSA_FLAG_TYPE_RSA:
418 prsactx->pad_mode = RSA_PKCS1_PADDING;
419 break;
420 case RSA_FLAG_TYPE_RSASSAPSS:
421 prsactx->pad_mode = RSA_PKCS1_PSS_PADDING;
422
423 {
424 const RSA_PSS_PARAMS_30 *pss =
425 ossl_rsa_get0_pss_params_30(prsactx->rsa);
426
427 if (!ossl_rsa_pss_params_30_is_unrestricted(pss)) {
428 int md_nid = ossl_rsa_pss_params_30_hashalg(pss);
429 int mgf1md_nid = ossl_rsa_pss_params_30_maskgenhashalg(pss);
430 int min_saltlen = ossl_rsa_pss_params_30_saltlen(pss);
431 const char *mdname, *mgf1mdname;
432 size_t len;
433
434 mdname = ossl_rsa_oaeppss_nid2name(md_nid);
435 mgf1mdname = ossl_rsa_oaeppss_nid2name(mgf1md_nid);
436
437 if (mdname == NULL) {
438 ERR_raise_data(ERR_LIB_PROV, PROV_R_INVALID_DIGEST,
439 "PSS restrictions lack hash algorithm");
440 return 0;
441 }
442 if (mgf1mdname == NULL) {
443 ERR_raise_data(ERR_LIB_PROV, PROV_R_INVALID_DIGEST,
444 "PSS restrictions lack MGF1 hash algorithm");
445 return 0;
446 }
447
448 len = OPENSSL_strlcpy(prsactx->mdname, mdname,
449 sizeof(prsactx->mdname));
450 if (len >= sizeof(prsactx->mdname)) {
451 ERR_raise_data(ERR_LIB_PROV, PROV_R_INVALID_DIGEST,
452 "hash algorithm name too long");
453 return 0;
454 }
455 len = OPENSSL_strlcpy(prsactx->mgf1_mdname, mgf1mdname,
456 sizeof(prsactx->mgf1_mdname));
457 if (len >= sizeof(prsactx->mgf1_mdname)) {
458 ERR_raise_data(ERR_LIB_PROV, PROV_R_INVALID_DIGEST,
459 "MGF1 hash algorithm name too long");
460 return 0;
461 }
462 prsactx->saltlen = min_saltlen;
463
464 /* call rsa_setup_mgf1_md before rsa_setup_md to avoid duplication */
465 return rsa_setup_mgf1_md(prsactx, mgf1mdname, prsactx->propq)
466 && rsa_setup_md(prsactx, mdname, prsactx->propq)
467 && rsa_check_parameters(prsactx, min_saltlen);
468 }
469 }
470
471 break;
472 default:
473 ERR_raise(ERR_LIB_RSA, PROV_R_OPERATION_NOT_SUPPORTED_FOR_THIS_KEYTYPE);
474 return 0;
475 }
476
477 return 1;
478 }
479
setup_tbuf(PROV_RSA_CTX * ctx)480 static int setup_tbuf(PROV_RSA_CTX *ctx)
481 {
482 if (ctx->tbuf != NULL)
483 return 1;
484 if ((ctx->tbuf = OPENSSL_malloc(RSA_size(ctx->rsa))) == NULL) {
485 ERR_raise(ERR_LIB_PROV, ERR_R_MALLOC_FAILURE);
486 return 0;
487 }
488 return 1;
489 }
490
clean_tbuf(PROV_RSA_CTX * ctx)491 static void clean_tbuf(PROV_RSA_CTX *ctx)
492 {
493 if (ctx->tbuf != NULL)
494 OPENSSL_cleanse(ctx->tbuf, RSA_size(ctx->rsa));
495 }
496
free_tbuf(PROV_RSA_CTX * ctx)497 static void free_tbuf(PROV_RSA_CTX *ctx)
498 {
499 clean_tbuf(ctx);
500 OPENSSL_free(ctx->tbuf);
501 ctx->tbuf = NULL;
502 }
503
rsa_sign_init(void * vprsactx,void * vrsa,const OSSL_PARAM params[])504 static int rsa_sign_init(void *vprsactx, void *vrsa, const OSSL_PARAM params[])
505 {
506 if (!ossl_prov_is_running())
507 return 0;
508 return rsa_signverify_init(vprsactx, vrsa, params, EVP_PKEY_OP_SIGN);
509 }
510
rsa_sign(void * vprsactx,unsigned char * sig,size_t * siglen,size_t sigsize,const unsigned char * tbs,size_t tbslen)511 static int rsa_sign(void *vprsactx, unsigned char *sig, size_t *siglen,
512 size_t sigsize, const unsigned char *tbs, size_t tbslen)
513 {
514 PROV_RSA_CTX *prsactx = (PROV_RSA_CTX *)vprsactx;
515 int ret;
516 size_t rsasize = RSA_size(prsactx->rsa);
517 size_t mdsize = rsa_get_md_size(prsactx);
518
519 if (!ossl_prov_is_running())
520 return 0;
521
522 if (sig == NULL) {
523 *siglen = rsasize;
524 return 1;
525 }
526
527 if (sigsize < rsasize) {
528 ERR_raise_data(ERR_LIB_PROV, PROV_R_INVALID_SIGNATURE_SIZE,
529 "is %zu, should be at least %zu", sigsize, rsasize);
530 return 0;
531 }
532
533 if (mdsize != 0) {
534 if (tbslen != mdsize) {
535 ERR_raise(ERR_LIB_PROV, PROV_R_INVALID_DIGEST_LENGTH);
536 return 0;
537 }
538
539 #ifndef FIPS_MODULE
540 if (EVP_MD_is_a(prsactx->md, OSSL_DIGEST_NAME_MDC2)) {
541 unsigned int sltmp;
542
543 if (prsactx->pad_mode != RSA_PKCS1_PADDING) {
544 ERR_raise_data(ERR_LIB_PROV, PROV_R_INVALID_PADDING_MODE,
545 "only PKCS#1 padding supported with MDC2");
546 return 0;
547 }
548 ret = RSA_sign_ASN1_OCTET_STRING(0, tbs, tbslen, sig, &sltmp,
549 prsactx->rsa);
550
551 if (ret <= 0) {
552 ERR_raise(ERR_LIB_PROV, ERR_R_RSA_LIB);
553 return 0;
554 }
555 ret = sltmp;
556 goto end;
557 }
558 #endif
559 switch (prsactx->pad_mode) {
560 case RSA_X931_PADDING:
561 if ((size_t)RSA_size(prsactx->rsa) < tbslen + 1) {
562 ERR_raise_data(ERR_LIB_PROV, PROV_R_KEY_SIZE_TOO_SMALL,
563 "RSA key size = %d, expected minimum = %d",
564 RSA_size(prsactx->rsa), tbslen + 1);
565 return 0;
566 }
567 if (!setup_tbuf(prsactx)) {
568 ERR_raise(ERR_LIB_PROV, ERR_R_MALLOC_FAILURE);
569 return 0;
570 }
571 memcpy(prsactx->tbuf, tbs, tbslen);
572 prsactx->tbuf[tbslen] = RSA_X931_hash_id(prsactx->mdnid);
573 ret = RSA_private_encrypt(tbslen + 1, prsactx->tbuf,
574 sig, prsactx->rsa, RSA_X931_PADDING);
575 clean_tbuf(prsactx);
576 break;
577
578 case RSA_PKCS1_PADDING:
579 {
580 unsigned int sltmp;
581
582 ret = RSA_sign(prsactx->mdnid, tbs, tbslen, sig, &sltmp,
583 prsactx->rsa);
584 if (ret <= 0) {
585 ERR_raise(ERR_LIB_PROV, ERR_R_RSA_LIB);
586 return 0;
587 }
588 ret = sltmp;
589 }
590 break;
591
592 case RSA_PKCS1_PSS_PADDING:
593 /* Check PSS restrictions */
594 if (rsa_pss_restricted(prsactx)) {
595 switch (prsactx->saltlen) {
596 case RSA_PSS_SALTLEN_DIGEST:
597 if (prsactx->min_saltlen > EVP_MD_get_size(prsactx->md)) {
598 ERR_raise_data(ERR_LIB_PROV,
599 PROV_R_PSS_SALTLEN_TOO_SMALL,
600 "minimum salt length set to %d, "
601 "but the digest only gives %d",
602 prsactx->min_saltlen,
603 EVP_MD_get_size(prsactx->md));
604 return 0;
605 }
606 /* FALLTHRU */
607 default:
608 if (prsactx->saltlen >= 0
609 && prsactx->saltlen < prsactx->min_saltlen) {
610 ERR_raise_data(ERR_LIB_PROV,
611 PROV_R_PSS_SALTLEN_TOO_SMALL,
612 "minimum salt length set to %d, but the"
613 "actual salt length is only set to %d",
614 prsactx->min_saltlen,
615 prsactx->saltlen);
616 return 0;
617 }
618 break;
619 }
620 }
621 if (!setup_tbuf(prsactx))
622 return 0;
623 if (!RSA_padding_add_PKCS1_PSS_mgf1(prsactx->rsa,
624 prsactx->tbuf, tbs,
625 prsactx->md, prsactx->mgf1_md,
626 prsactx->saltlen)) {
627 ERR_raise(ERR_LIB_PROV, ERR_R_RSA_LIB);
628 return 0;
629 }
630 ret = RSA_private_encrypt(RSA_size(prsactx->rsa), prsactx->tbuf,
631 sig, prsactx->rsa, RSA_NO_PADDING);
632 clean_tbuf(prsactx);
633 break;
634
635 default:
636 ERR_raise_data(ERR_LIB_PROV, PROV_R_INVALID_PADDING_MODE,
637 "Only X.931, PKCS#1 v1.5 or PSS padding allowed");
638 return 0;
639 }
640 } else {
641 ret = RSA_private_encrypt(tbslen, tbs, sig, prsactx->rsa,
642 prsactx->pad_mode);
643 }
644
645 #ifndef FIPS_MODULE
646 end:
647 #endif
648 if (ret <= 0) {
649 ERR_raise(ERR_LIB_PROV, ERR_R_RSA_LIB);
650 return 0;
651 }
652
653 *siglen = ret;
654 return 1;
655 }
656
rsa_verify_recover_init(void * vprsactx,void * vrsa,const OSSL_PARAM params[])657 static int rsa_verify_recover_init(void *vprsactx, void *vrsa,
658 const OSSL_PARAM params[])
659 {
660 if (!ossl_prov_is_running())
661 return 0;
662 return rsa_signverify_init(vprsactx, vrsa, params,
663 EVP_PKEY_OP_VERIFYRECOVER);
664 }
665
rsa_verify_recover(void * vprsactx,unsigned char * rout,size_t * routlen,size_t routsize,const unsigned char * sig,size_t siglen)666 static int rsa_verify_recover(void *vprsactx,
667 unsigned char *rout,
668 size_t *routlen,
669 size_t routsize,
670 const unsigned char *sig,
671 size_t siglen)
672 {
673 PROV_RSA_CTX *prsactx = (PROV_RSA_CTX *)vprsactx;
674 int ret;
675
676 if (!ossl_prov_is_running())
677 return 0;
678
679 if (rout == NULL) {
680 *routlen = RSA_size(prsactx->rsa);
681 return 1;
682 }
683
684 if (prsactx->md != NULL) {
685 switch (prsactx->pad_mode) {
686 case RSA_X931_PADDING:
687 if (!setup_tbuf(prsactx))
688 return 0;
689 ret = RSA_public_decrypt(siglen, sig, prsactx->tbuf, prsactx->rsa,
690 RSA_X931_PADDING);
691 if (ret < 1) {
692 ERR_raise(ERR_LIB_PROV, ERR_R_RSA_LIB);
693 return 0;
694 }
695 ret--;
696 if (prsactx->tbuf[ret] != RSA_X931_hash_id(prsactx->mdnid)) {
697 ERR_raise(ERR_LIB_PROV, PROV_R_ALGORITHM_MISMATCH);
698 return 0;
699 }
700 if (ret != EVP_MD_get_size(prsactx->md)) {
701 ERR_raise_data(ERR_LIB_PROV, PROV_R_INVALID_DIGEST_LENGTH,
702 "Should be %d, but got %d",
703 EVP_MD_get_size(prsactx->md), ret);
704 return 0;
705 }
706
707 *routlen = ret;
708 if (rout != prsactx->tbuf) {
709 if (routsize < (size_t)ret) {
710 ERR_raise_data(ERR_LIB_PROV, PROV_R_OUTPUT_BUFFER_TOO_SMALL,
711 "buffer size is %d, should be %d",
712 routsize, ret);
713 return 0;
714 }
715 memcpy(rout, prsactx->tbuf, ret);
716 }
717 break;
718
719 case RSA_PKCS1_PADDING:
720 {
721 size_t sltmp;
722
723 ret = ossl_rsa_verify(prsactx->mdnid, NULL, 0, rout, &sltmp,
724 sig, siglen, prsactx->rsa);
725 if (ret <= 0) {
726 ERR_raise(ERR_LIB_PROV, ERR_R_RSA_LIB);
727 return 0;
728 }
729 ret = sltmp;
730 }
731 break;
732
733 default:
734 ERR_raise_data(ERR_LIB_PROV, PROV_R_INVALID_PADDING_MODE,
735 "Only X.931 or PKCS#1 v1.5 padding allowed");
736 return 0;
737 }
738 } else {
739 ret = RSA_public_decrypt(siglen, sig, rout, prsactx->rsa,
740 prsactx->pad_mode);
741 if (ret < 0) {
742 ERR_raise(ERR_LIB_PROV, ERR_R_RSA_LIB);
743 return 0;
744 }
745 }
746 *routlen = ret;
747 return 1;
748 }
749
rsa_verify_init(void * vprsactx,void * vrsa,const OSSL_PARAM params[])750 static int rsa_verify_init(void *vprsactx, void *vrsa,
751 const OSSL_PARAM params[])
752 {
753 if (!ossl_prov_is_running())
754 return 0;
755 return rsa_signverify_init(vprsactx, vrsa, params, EVP_PKEY_OP_VERIFY);
756 }
757
rsa_verify(void * vprsactx,const unsigned char * sig,size_t siglen,const unsigned char * tbs,size_t tbslen)758 static int rsa_verify(void *vprsactx, const unsigned char *sig, size_t siglen,
759 const unsigned char *tbs, size_t tbslen)
760 {
761 PROV_RSA_CTX *prsactx = (PROV_RSA_CTX *)vprsactx;
762 size_t rslen;
763
764 if (!ossl_prov_is_running())
765 return 0;
766 if (prsactx->md != NULL) {
767 switch (prsactx->pad_mode) {
768 case RSA_PKCS1_PADDING:
769 if (!RSA_verify(prsactx->mdnid, tbs, tbslen, sig, siglen,
770 prsactx->rsa)) {
771 ERR_raise(ERR_LIB_PROV, ERR_R_RSA_LIB);
772 return 0;
773 }
774 return 1;
775 case RSA_X931_PADDING:
776 if (!setup_tbuf(prsactx))
777 return 0;
778 if (rsa_verify_recover(prsactx, prsactx->tbuf, &rslen, 0,
779 sig, siglen) <= 0)
780 return 0;
781 break;
782 case RSA_PKCS1_PSS_PADDING:
783 {
784 int ret;
785 size_t mdsize;
786
787 /*
788 * We need to check this for the RSA_verify_PKCS1_PSS_mgf1()
789 * call
790 */
791 mdsize = rsa_get_md_size(prsactx);
792 if (tbslen != mdsize) {
793 ERR_raise_data(ERR_LIB_PROV, PROV_R_INVALID_DIGEST_LENGTH,
794 "Should be %d, but got %d",
795 mdsize, tbslen);
796 return 0;
797 }
798
799 if (!setup_tbuf(prsactx))
800 return 0;
801 ret = RSA_public_decrypt(siglen, sig, prsactx->tbuf,
802 prsactx->rsa, RSA_NO_PADDING);
803 if (ret <= 0) {
804 ERR_raise(ERR_LIB_PROV, ERR_R_RSA_LIB);
805 return 0;
806 }
807 ret = RSA_verify_PKCS1_PSS_mgf1(prsactx->rsa, tbs,
808 prsactx->md, prsactx->mgf1_md,
809 prsactx->tbuf,
810 prsactx->saltlen);
811 if (ret <= 0) {
812 ERR_raise(ERR_LIB_PROV, ERR_R_RSA_LIB);
813 return 0;
814 }
815 return 1;
816 }
817 default:
818 ERR_raise_data(ERR_LIB_PROV, PROV_R_INVALID_PADDING_MODE,
819 "Only X.931, PKCS#1 v1.5 or PSS padding allowed");
820 return 0;
821 }
822 } else {
823 if (!setup_tbuf(prsactx))
824 return 0;
825 rslen = RSA_public_decrypt(siglen, sig, prsactx->tbuf, prsactx->rsa,
826 prsactx->pad_mode);
827 if (rslen == 0) {
828 ERR_raise(ERR_LIB_PROV, ERR_R_RSA_LIB);
829 return 0;
830 }
831 }
832
833 if ((rslen != tbslen) || memcmp(tbs, prsactx->tbuf, rslen))
834 return 0;
835
836 return 1;
837 }
838
rsa_digest_signverify_init(void * vprsactx,const char * mdname,void * vrsa,const OSSL_PARAM params[],int operation)839 static int rsa_digest_signverify_init(void *vprsactx, const char *mdname,
840 void *vrsa, const OSSL_PARAM params[],
841 int operation)
842 {
843 PROV_RSA_CTX *prsactx = (PROV_RSA_CTX *)vprsactx;
844
845 if (!ossl_prov_is_running())
846 return 0;
847
848 if (!rsa_signverify_init(vprsactx, vrsa, params, operation))
849 return 0;
850
851 if (mdname != NULL
852 /* was rsa_setup_md already called in rsa_signverify_init()? */
853 && (mdname[0] == '\0' || strcasecmp(prsactx->mdname, mdname) != 0)
854 && !rsa_setup_md(prsactx, mdname, prsactx->propq))
855 return 0;
856
857 prsactx->flag_allow_md = 0;
858
859 if (prsactx->mdctx == NULL) {
860 prsactx->mdctx = EVP_MD_CTX_new();
861 if (prsactx->mdctx == NULL)
862 goto error;
863 }
864
865 if (!EVP_DigestInit_ex2(prsactx->mdctx, prsactx->md, params))
866 goto error;
867
868 return 1;
869
870 error:
871 EVP_MD_CTX_free(prsactx->mdctx);
872 prsactx->mdctx = NULL;
873 return 0;
874 }
875
rsa_digest_signverify_update(void * vprsactx,const unsigned char * data,size_t datalen)876 static int rsa_digest_signverify_update(void *vprsactx,
877 const unsigned char *data,
878 size_t datalen)
879 {
880 PROV_RSA_CTX *prsactx = (PROV_RSA_CTX *)vprsactx;
881
882 if (prsactx == NULL || prsactx->mdctx == NULL)
883 return 0;
884
885 return EVP_DigestUpdate(prsactx->mdctx, data, datalen);
886 }
887
rsa_digest_sign_init(void * vprsactx,const char * mdname,void * vrsa,const OSSL_PARAM params[])888 static int rsa_digest_sign_init(void *vprsactx, const char *mdname,
889 void *vrsa, const OSSL_PARAM params[])
890 {
891 if (!ossl_prov_is_running())
892 return 0;
893 return rsa_digest_signverify_init(vprsactx, mdname, vrsa,
894 params, EVP_PKEY_OP_SIGN);
895 }
896
rsa_digest_sign_final(void * vprsactx,unsigned char * sig,size_t * siglen,size_t sigsize)897 static int rsa_digest_sign_final(void *vprsactx, unsigned char *sig,
898 size_t *siglen, size_t sigsize)
899 {
900 PROV_RSA_CTX *prsactx = (PROV_RSA_CTX *)vprsactx;
901 unsigned char digest[EVP_MAX_MD_SIZE];
902 unsigned int dlen = 0;
903
904 if (!ossl_prov_is_running() || prsactx == NULL)
905 return 0;
906 prsactx->flag_allow_md = 1;
907 if (prsactx->mdctx == NULL)
908 return 0;
909 /*
910 * If sig is NULL then we're just finding out the sig size. Other fields
911 * are ignored. Defer to rsa_sign.
912 */
913 if (sig != NULL) {
914 /*
915 * The digests used here are all known (see rsa_get_md_nid()), so they
916 * should not exceed the internal buffer size of EVP_MAX_MD_SIZE.
917 */
918 if (!EVP_DigestFinal_ex(prsactx->mdctx, digest, &dlen))
919 return 0;
920 }
921
922 return rsa_sign(vprsactx, sig, siglen, sigsize, digest, (size_t)dlen);
923 }
924
rsa_digest_verify_init(void * vprsactx,const char * mdname,void * vrsa,const OSSL_PARAM params[])925 static int rsa_digest_verify_init(void *vprsactx, const char *mdname,
926 void *vrsa, const OSSL_PARAM params[])
927 {
928 if (!ossl_prov_is_running())
929 return 0;
930 return rsa_digest_signverify_init(vprsactx, mdname, vrsa,
931 params, EVP_PKEY_OP_VERIFY);
932 }
933
rsa_digest_verify_final(void * vprsactx,const unsigned char * sig,size_t siglen)934 int rsa_digest_verify_final(void *vprsactx, const unsigned char *sig,
935 size_t siglen)
936 {
937 PROV_RSA_CTX *prsactx = (PROV_RSA_CTX *)vprsactx;
938 unsigned char digest[EVP_MAX_MD_SIZE];
939 unsigned int dlen = 0;
940
941 if (!ossl_prov_is_running())
942 return 0;
943
944 if (prsactx == NULL)
945 return 0;
946 prsactx->flag_allow_md = 1;
947 if (prsactx->mdctx == NULL)
948 return 0;
949
950 /*
951 * The digests used here are all known (see rsa_get_md_nid()), so they
952 * should not exceed the internal buffer size of EVP_MAX_MD_SIZE.
953 */
954 if (!EVP_DigestFinal_ex(prsactx->mdctx, digest, &dlen))
955 return 0;
956
957 return rsa_verify(vprsactx, sig, siglen, digest, (size_t)dlen);
958 }
959
rsa_freectx(void * vprsactx)960 static void rsa_freectx(void *vprsactx)
961 {
962 PROV_RSA_CTX *prsactx = (PROV_RSA_CTX *)vprsactx;
963
964 if (prsactx == NULL)
965 return;
966
967 EVP_MD_CTX_free(prsactx->mdctx);
968 EVP_MD_free(prsactx->md);
969 EVP_MD_free(prsactx->mgf1_md);
970 OPENSSL_free(prsactx->propq);
971 free_tbuf(prsactx);
972 RSA_free(prsactx->rsa);
973
974 OPENSSL_clear_free(prsactx, sizeof(*prsactx));
975 }
976
rsa_dupctx(void * vprsactx)977 static void *rsa_dupctx(void *vprsactx)
978 {
979 PROV_RSA_CTX *srcctx = (PROV_RSA_CTX *)vprsactx;
980 PROV_RSA_CTX *dstctx;
981
982 if (!ossl_prov_is_running())
983 return NULL;
984
985 dstctx = OPENSSL_zalloc(sizeof(*srcctx));
986 if (dstctx == NULL) {
987 ERR_raise(ERR_LIB_PROV, ERR_R_MALLOC_FAILURE);
988 return NULL;
989 }
990
991 *dstctx = *srcctx;
992 dstctx->rsa = NULL;
993 dstctx->md = NULL;
994 dstctx->mdctx = NULL;
995 dstctx->tbuf = NULL;
996 dstctx->propq = NULL;
997
998 if (srcctx->rsa != NULL && !RSA_up_ref(srcctx->rsa))
999 goto err;
1000 dstctx->rsa = srcctx->rsa;
1001
1002 if (srcctx->md != NULL && !EVP_MD_up_ref(srcctx->md))
1003 goto err;
1004 dstctx->md = srcctx->md;
1005
1006 if (srcctx->mgf1_md != NULL && !EVP_MD_up_ref(srcctx->mgf1_md))
1007 goto err;
1008 dstctx->mgf1_md = srcctx->mgf1_md;
1009
1010 if (srcctx->mdctx != NULL) {
1011 dstctx->mdctx = EVP_MD_CTX_new();
1012 if (dstctx->mdctx == NULL
1013 || !EVP_MD_CTX_copy_ex(dstctx->mdctx, srcctx->mdctx))
1014 goto err;
1015 }
1016
1017 if (srcctx->propq != NULL) {
1018 dstctx->propq = OPENSSL_strdup(srcctx->propq);
1019 if (dstctx->propq == NULL)
1020 goto err;
1021 }
1022
1023 return dstctx;
1024 err:
1025 rsa_freectx(dstctx);
1026 return NULL;
1027 }
1028
rsa_get_ctx_params(void * vprsactx,OSSL_PARAM * params)1029 static int rsa_get_ctx_params(void *vprsactx, OSSL_PARAM *params)
1030 {
1031 PROV_RSA_CTX *prsactx = (PROV_RSA_CTX *)vprsactx;
1032 OSSL_PARAM *p;
1033
1034 if (prsactx == NULL)
1035 return 0;
1036
1037 p = OSSL_PARAM_locate(params, OSSL_SIGNATURE_PARAM_ALGORITHM_ID);
1038 if (p != NULL) {
1039 /* The Algorithm Identifier of the combined signature algorithm */
1040 unsigned char aid_buf[128];
1041 unsigned char *aid;
1042 size_t aid_len;
1043
1044 aid = rsa_generate_signature_aid(prsactx, aid_buf,
1045 sizeof(aid_buf), &aid_len);
1046 if (aid == NULL || !OSSL_PARAM_set_octet_string(p, aid, aid_len))
1047 return 0;
1048 }
1049
1050 p = OSSL_PARAM_locate(params, OSSL_SIGNATURE_PARAM_PAD_MODE);
1051 if (p != NULL)
1052 switch (p->data_type) {
1053 case OSSL_PARAM_INTEGER:
1054 if (!OSSL_PARAM_set_int(p, prsactx->pad_mode))
1055 return 0;
1056 break;
1057 case OSSL_PARAM_UTF8_STRING:
1058 {
1059 int i;
1060 const char *word = NULL;
1061
1062 for (i = 0; padding_item[i].id != 0; i++) {
1063 if (prsactx->pad_mode == (int)padding_item[i].id) {
1064 word = padding_item[i].ptr;
1065 break;
1066 }
1067 }
1068
1069 if (word != NULL) {
1070 if (!OSSL_PARAM_set_utf8_string(p, word))
1071 return 0;
1072 } else {
1073 ERR_raise(ERR_LIB_PROV, ERR_R_INTERNAL_ERROR);
1074 }
1075 }
1076 break;
1077 default:
1078 return 0;
1079 }
1080
1081 p = OSSL_PARAM_locate(params, OSSL_SIGNATURE_PARAM_DIGEST);
1082 if (p != NULL && !OSSL_PARAM_set_utf8_string(p, prsactx->mdname))
1083 return 0;
1084
1085 p = OSSL_PARAM_locate(params, OSSL_SIGNATURE_PARAM_MGF1_DIGEST);
1086 if (p != NULL && !OSSL_PARAM_set_utf8_string(p, prsactx->mgf1_mdname))
1087 return 0;
1088
1089 p = OSSL_PARAM_locate(params, OSSL_SIGNATURE_PARAM_PSS_SALTLEN);
1090 if (p != NULL) {
1091 if (p->data_type == OSSL_PARAM_INTEGER) {
1092 if (!OSSL_PARAM_set_int(p, prsactx->saltlen))
1093 return 0;
1094 } else if (p->data_type == OSSL_PARAM_UTF8_STRING) {
1095 const char *value = NULL;
1096
1097 switch (prsactx->saltlen) {
1098 case RSA_PSS_SALTLEN_DIGEST:
1099 value = OSSL_PKEY_RSA_PSS_SALT_LEN_DIGEST;
1100 break;
1101 case RSA_PSS_SALTLEN_MAX:
1102 value = OSSL_PKEY_RSA_PSS_SALT_LEN_MAX;
1103 break;
1104 case RSA_PSS_SALTLEN_AUTO:
1105 value = OSSL_PKEY_RSA_PSS_SALT_LEN_AUTO;
1106 break;
1107 default:
1108 {
1109 int len = BIO_snprintf(p->data, p->data_size, "%d",
1110 prsactx->saltlen);
1111
1112 if (len <= 0)
1113 return 0;
1114 p->return_size = len;
1115 break;
1116 }
1117 }
1118 if (value != NULL
1119 && !OSSL_PARAM_set_utf8_string(p, value))
1120 return 0;
1121 }
1122 }
1123
1124 return 1;
1125 }
1126
1127 static const OSSL_PARAM known_gettable_ctx_params[] = {
1128 OSSL_PARAM_octet_string(OSSL_SIGNATURE_PARAM_ALGORITHM_ID, NULL, 0),
1129 OSSL_PARAM_utf8_string(OSSL_SIGNATURE_PARAM_PAD_MODE, NULL, 0),
1130 OSSL_PARAM_utf8_string(OSSL_SIGNATURE_PARAM_DIGEST, NULL, 0),
1131 OSSL_PARAM_utf8_string(OSSL_SIGNATURE_PARAM_MGF1_DIGEST, NULL, 0),
1132 OSSL_PARAM_utf8_string(OSSL_SIGNATURE_PARAM_PSS_SALTLEN, NULL, 0),
1133 OSSL_PARAM_END
1134 };
1135
rsa_gettable_ctx_params(ossl_unused void * vprsactx,ossl_unused void * provctx)1136 static const OSSL_PARAM *rsa_gettable_ctx_params(ossl_unused void *vprsactx,
1137 ossl_unused void *provctx)
1138 {
1139 return known_gettable_ctx_params;
1140 }
1141
rsa_set_ctx_params(void * vprsactx,const OSSL_PARAM params[])1142 static int rsa_set_ctx_params(void *vprsactx, const OSSL_PARAM params[])
1143 {
1144 PROV_RSA_CTX *prsactx = (PROV_RSA_CTX *)vprsactx;
1145 const OSSL_PARAM *p;
1146 int pad_mode;
1147 int saltlen;
1148 char mdname[OSSL_MAX_NAME_SIZE] = "", *pmdname = NULL;
1149 char mdprops[OSSL_MAX_PROPQUERY_SIZE] = "", *pmdprops = NULL;
1150 char mgf1mdname[OSSL_MAX_NAME_SIZE] = "", *pmgf1mdname = NULL;
1151 char mgf1mdprops[OSSL_MAX_PROPQUERY_SIZE] = "", *pmgf1mdprops = NULL;
1152
1153 if (prsactx == NULL)
1154 return 0;
1155 if (params == NULL)
1156 return 1;
1157
1158 pad_mode = prsactx->pad_mode;
1159 saltlen = prsactx->saltlen;
1160
1161 p = OSSL_PARAM_locate_const(params, OSSL_SIGNATURE_PARAM_DIGEST);
1162 if (p != NULL) {
1163 const OSSL_PARAM *propsp =
1164 OSSL_PARAM_locate_const(params,
1165 OSSL_SIGNATURE_PARAM_PROPERTIES);
1166
1167 pmdname = mdname;
1168 if (!OSSL_PARAM_get_utf8_string(p, &pmdname, sizeof(mdname)))
1169 return 0;
1170
1171 if (propsp != NULL) {
1172 pmdprops = mdprops;
1173 if (!OSSL_PARAM_get_utf8_string(propsp,
1174 &pmdprops, sizeof(mdprops)))
1175 return 0;
1176 }
1177 }
1178
1179 p = OSSL_PARAM_locate_const(params, OSSL_SIGNATURE_PARAM_PAD_MODE);
1180 if (p != NULL) {
1181 const char *err_extra_text = NULL;
1182
1183 switch (p->data_type) {
1184 case OSSL_PARAM_INTEGER: /* Support for legacy pad mode number */
1185 if (!OSSL_PARAM_get_int(p, &pad_mode))
1186 return 0;
1187 break;
1188 case OSSL_PARAM_UTF8_STRING:
1189 {
1190 int i;
1191
1192 if (p->data == NULL)
1193 return 0;
1194
1195 for (i = 0; padding_item[i].id != 0; i++) {
1196 if (strcmp(p->data, padding_item[i].ptr) == 0) {
1197 pad_mode = padding_item[i].id;
1198 break;
1199 }
1200 }
1201 }
1202 break;
1203 default:
1204 return 0;
1205 }
1206
1207 switch (pad_mode) {
1208 case RSA_PKCS1_OAEP_PADDING:
1209 /*
1210 * OAEP padding is for asymmetric cipher only so is not compatible
1211 * with signature use.
1212 */
1213 err_extra_text = "OAEP padding not allowed for signing / verifying";
1214 goto bad_pad;
1215 case RSA_PKCS1_PSS_PADDING:
1216 if ((prsactx->operation
1217 & (EVP_PKEY_OP_SIGN | EVP_PKEY_OP_VERIFY)) == 0) {
1218 err_extra_text =
1219 "PSS padding only allowed for sign and verify operations";
1220 goto bad_pad;
1221 }
1222 break;
1223 case RSA_PKCS1_PADDING:
1224 err_extra_text = "PKCS#1 padding not allowed with RSA-PSS";
1225 goto cont;
1226 case RSA_NO_PADDING:
1227 err_extra_text = "No padding not allowed with RSA-PSS";
1228 goto cont;
1229 case RSA_X931_PADDING:
1230 err_extra_text = "X.931 padding not allowed with RSA-PSS";
1231 cont:
1232 if (RSA_test_flags(prsactx->rsa,
1233 RSA_FLAG_TYPE_MASK) == RSA_FLAG_TYPE_RSA)
1234 break;
1235 /* FALLTHRU */
1236 default:
1237 bad_pad:
1238 if (err_extra_text == NULL)
1239 ERR_raise(ERR_LIB_PROV,
1240 PROV_R_ILLEGAL_OR_UNSUPPORTED_PADDING_MODE);
1241 else
1242 ERR_raise_data(ERR_LIB_PROV,
1243 PROV_R_ILLEGAL_OR_UNSUPPORTED_PADDING_MODE,
1244 err_extra_text);
1245 return 0;
1246 }
1247 }
1248
1249 p = OSSL_PARAM_locate_const(params, OSSL_SIGNATURE_PARAM_PSS_SALTLEN);
1250 if (p != NULL) {
1251 if (pad_mode != RSA_PKCS1_PSS_PADDING) {
1252 ERR_raise_data(ERR_LIB_PROV, PROV_R_NOT_SUPPORTED,
1253 "PSS saltlen can only be specified if "
1254 "PSS padding has been specified first");
1255 return 0;
1256 }
1257
1258 switch (p->data_type) {
1259 case OSSL_PARAM_INTEGER: /* Support for legacy pad mode number */
1260 if (!OSSL_PARAM_get_int(p, &saltlen))
1261 return 0;
1262 break;
1263 case OSSL_PARAM_UTF8_STRING:
1264 if (strcmp(p->data, OSSL_PKEY_RSA_PSS_SALT_LEN_DIGEST) == 0)
1265 saltlen = RSA_PSS_SALTLEN_DIGEST;
1266 else if (strcmp(p->data, OSSL_PKEY_RSA_PSS_SALT_LEN_MAX) == 0)
1267 saltlen = RSA_PSS_SALTLEN_MAX;
1268 else if (strcmp(p->data, OSSL_PKEY_RSA_PSS_SALT_LEN_AUTO) == 0)
1269 saltlen = RSA_PSS_SALTLEN_AUTO;
1270 else
1271 saltlen = atoi(p->data);
1272 break;
1273 default:
1274 return 0;
1275 }
1276
1277 /*
1278 * RSA_PSS_SALTLEN_MAX seems curiously named in this check.
1279 * Contrary to what it's name suggests, it's the currently
1280 * lowest saltlen number possible.
1281 */
1282 if (saltlen < RSA_PSS_SALTLEN_MAX) {
1283 ERR_raise(ERR_LIB_PROV, PROV_R_INVALID_SALT_LENGTH);
1284 return 0;
1285 }
1286
1287 if (rsa_pss_restricted(prsactx)) {
1288 switch (saltlen) {
1289 case RSA_PSS_SALTLEN_AUTO:
1290 if (prsactx->operation == EVP_PKEY_OP_VERIFY) {
1291 ERR_raise_data(ERR_LIB_PROV, PROV_R_INVALID_SALT_LENGTH,
1292 "Cannot use autodetected salt length");
1293 return 0;
1294 }
1295 break;
1296 case RSA_PSS_SALTLEN_DIGEST:
1297 if (prsactx->min_saltlen > EVP_MD_get_size(prsactx->md)) {
1298 ERR_raise_data(ERR_LIB_PROV,
1299 PROV_R_PSS_SALTLEN_TOO_SMALL,
1300 "Should be more than %d, but would be "
1301 "set to match digest size (%d)",
1302 prsactx->min_saltlen,
1303 EVP_MD_get_size(prsactx->md));
1304 return 0;
1305 }
1306 break;
1307 default:
1308 if (saltlen >= 0 && saltlen < prsactx->min_saltlen) {
1309 ERR_raise_data(ERR_LIB_PROV,
1310 PROV_R_PSS_SALTLEN_TOO_SMALL,
1311 "Should be more than %d, "
1312 "but would be set to %d",
1313 prsactx->min_saltlen, saltlen);
1314 return 0;
1315 }
1316 }
1317 }
1318 }
1319
1320 p = OSSL_PARAM_locate_const(params, OSSL_SIGNATURE_PARAM_MGF1_DIGEST);
1321 if (p != NULL) {
1322 const OSSL_PARAM *propsp =
1323 OSSL_PARAM_locate_const(params,
1324 OSSL_SIGNATURE_PARAM_MGF1_PROPERTIES);
1325
1326 pmgf1mdname = mgf1mdname;
1327 if (!OSSL_PARAM_get_utf8_string(p, &pmgf1mdname, sizeof(mgf1mdname)))
1328 return 0;
1329
1330 if (propsp != NULL) {
1331 pmgf1mdprops = mgf1mdprops;
1332 if (!OSSL_PARAM_get_utf8_string(propsp,
1333 &pmgf1mdprops, sizeof(mgf1mdprops)))
1334 return 0;
1335 }
1336
1337 if (pad_mode != RSA_PKCS1_PSS_PADDING) {
1338 ERR_raise(ERR_LIB_PROV, PROV_R_INVALID_MGF1_MD);
1339 return 0;
1340 }
1341 }
1342
1343 prsactx->saltlen = saltlen;
1344 prsactx->pad_mode = pad_mode;
1345
1346 if (prsactx->md == NULL && pmdname == NULL
1347 && pad_mode == RSA_PKCS1_PSS_PADDING)
1348 pmdname = RSA_DEFAULT_DIGEST_NAME;
1349
1350 if (pmgf1mdname != NULL
1351 && !rsa_setup_mgf1_md(prsactx, pmgf1mdname, pmgf1mdprops))
1352 return 0;
1353
1354 if (pmdname != NULL) {
1355 if (!rsa_setup_md(prsactx, pmdname, pmdprops))
1356 return 0;
1357 } else {
1358 if (!rsa_check_padding(prsactx, NULL, NULL, prsactx->mdnid))
1359 return 0;
1360 }
1361 return 1;
1362 }
1363
1364 static const OSSL_PARAM settable_ctx_params[] = {
1365 OSSL_PARAM_utf8_string(OSSL_SIGNATURE_PARAM_DIGEST, NULL, 0),
1366 OSSL_PARAM_utf8_string(OSSL_SIGNATURE_PARAM_PROPERTIES, NULL, 0),
1367 OSSL_PARAM_utf8_string(OSSL_SIGNATURE_PARAM_PAD_MODE, NULL, 0),
1368 OSSL_PARAM_utf8_string(OSSL_SIGNATURE_PARAM_MGF1_DIGEST, NULL, 0),
1369 OSSL_PARAM_utf8_string(OSSL_SIGNATURE_PARAM_MGF1_PROPERTIES, NULL, 0),
1370 OSSL_PARAM_utf8_string(OSSL_SIGNATURE_PARAM_PSS_SALTLEN, NULL, 0),
1371 OSSL_PARAM_END
1372 };
1373
1374 static const OSSL_PARAM settable_ctx_params_no_digest[] = {
1375 OSSL_PARAM_utf8_string(OSSL_SIGNATURE_PARAM_PAD_MODE, NULL, 0),
1376 OSSL_PARAM_utf8_string(OSSL_SIGNATURE_PARAM_MGF1_DIGEST, NULL, 0),
1377 OSSL_PARAM_utf8_string(OSSL_SIGNATURE_PARAM_MGF1_PROPERTIES, NULL, 0),
1378 OSSL_PARAM_utf8_string(OSSL_SIGNATURE_PARAM_PSS_SALTLEN, NULL, 0),
1379 OSSL_PARAM_END
1380 };
1381
rsa_settable_ctx_params(void * vprsactx,ossl_unused void * provctx)1382 static const OSSL_PARAM *rsa_settable_ctx_params(void *vprsactx,
1383 ossl_unused void *provctx)
1384 {
1385 PROV_RSA_CTX *prsactx = (PROV_RSA_CTX *)vprsactx;
1386
1387 if (prsactx != NULL && !prsactx->flag_allow_md)
1388 return settable_ctx_params_no_digest;
1389 return settable_ctx_params;
1390 }
1391
rsa_get_ctx_md_params(void * vprsactx,OSSL_PARAM * params)1392 static int rsa_get_ctx_md_params(void *vprsactx, OSSL_PARAM *params)
1393 {
1394 PROV_RSA_CTX *prsactx = (PROV_RSA_CTX *)vprsactx;
1395
1396 if (prsactx->mdctx == NULL)
1397 return 0;
1398
1399 return EVP_MD_CTX_get_params(prsactx->mdctx, params);
1400 }
1401
rsa_gettable_ctx_md_params(void * vprsactx)1402 static const OSSL_PARAM *rsa_gettable_ctx_md_params(void *vprsactx)
1403 {
1404 PROV_RSA_CTX *prsactx = (PROV_RSA_CTX *)vprsactx;
1405
1406 if (prsactx->md == NULL)
1407 return 0;
1408
1409 return EVP_MD_gettable_ctx_params(prsactx->md);
1410 }
1411
rsa_set_ctx_md_params(void * vprsactx,const OSSL_PARAM params[])1412 static int rsa_set_ctx_md_params(void *vprsactx, const OSSL_PARAM params[])
1413 {
1414 PROV_RSA_CTX *prsactx = (PROV_RSA_CTX *)vprsactx;
1415
1416 if (prsactx->mdctx == NULL)
1417 return 0;
1418
1419 return EVP_MD_CTX_set_params(prsactx->mdctx, params);
1420 }
1421
rsa_settable_ctx_md_params(void * vprsactx)1422 static const OSSL_PARAM *rsa_settable_ctx_md_params(void *vprsactx)
1423 {
1424 PROV_RSA_CTX *prsactx = (PROV_RSA_CTX *)vprsactx;
1425
1426 if (prsactx->md == NULL)
1427 return 0;
1428
1429 return EVP_MD_settable_ctx_params(prsactx->md);
1430 }
1431
1432 const OSSL_DISPATCH ossl_rsa_signature_functions[] = {
1433 { OSSL_FUNC_SIGNATURE_NEWCTX, (void (*)(void))rsa_newctx },
1434 { OSSL_FUNC_SIGNATURE_SIGN_INIT, (void (*)(void))rsa_sign_init },
1435 { OSSL_FUNC_SIGNATURE_SIGN, (void (*)(void))rsa_sign },
1436 { OSSL_FUNC_SIGNATURE_VERIFY_INIT, (void (*)(void))rsa_verify_init },
1437 { OSSL_FUNC_SIGNATURE_VERIFY, (void (*)(void))rsa_verify },
1438 { OSSL_FUNC_SIGNATURE_VERIFY_RECOVER_INIT,
1439 (void (*)(void))rsa_verify_recover_init },
1440 { OSSL_FUNC_SIGNATURE_VERIFY_RECOVER,
1441 (void (*)(void))rsa_verify_recover },
1442 { OSSL_FUNC_SIGNATURE_DIGEST_SIGN_INIT,
1443 (void (*)(void))rsa_digest_sign_init },
1444 { OSSL_FUNC_SIGNATURE_DIGEST_SIGN_UPDATE,
1445 (void (*)(void))rsa_digest_signverify_update },
1446 { OSSL_FUNC_SIGNATURE_DIGEST_SIGN_FINAL,
1447 (void (*)(void))rsa_digest_sign_final },
1448 { OSSL_FUNC_SIGNATURE_DIGEST_VERIFY_INIT,
1449 (void (*)(void))rsa_digest_verify_init },
1450 { OSSL_FUNC_SIGNATURE_DIGEST_VERIFY_UPDATE,
1451 (void (*)(void))rsa_digest_signverify_update },
1452 { OSSL_FUNC_SIGNATURE_DIGEST_VERIFY_FINAL,
1453 (void (*)(void))rsa_digest_verify_final },
1454 { OSSL_FUNC_SIGNATURE_FREECTX, (void (*)(void))rsa_freectx },
1455 { OSSL_FUNC_SIGNATURE_DUPCTX, (void (*)(void))rsa_dupctx },
1456 { OSSL_FUNC_SIGNATURE_GET_CTX_PARAMS, (void (*)(void))rsa_get_ctx_params },
1457 { OSSL_FUNC_SIGNATURE_GETTABLE_CTX_PARAMS,
1458 (void (*)(void))rsa_gettable_ctx_params },
1459 { OSSL_FUNC_SIGNATURE_SET_CTX_PARAMS, (void (*)(void))rsa_set_ctx_params },
1460 { OSSL_FUNC_SIGNATURE_SETTABLE_CTX_PARAMS,
1461 (void (*)(void))rsa_settable_ctx_params },
1462 { OSSL_FUNC_SIGNATURE_GET_CTX_MD_PARAMS,
1463 (void (*)(void))rsa_get_ctx_md_params },
1464 { OSSL_FUNC_SIGNATURE_GETTABLE_CTX_MD_PARAMS,
1465 (void (*)(void))rsa_gettable_ctx_md_params },
1466 { OSSL_FUNC_SIGNATURE_SET_CTX_MD_PARAMS,
1467 (void (*)(void))rsa_set_ctx_md_params },
1468 { OSSL_FUNC_SIGNATURE_SETTABLE_CTX_MD_PARAMS,
1469 (void (*)(void))rsa_settable_ctx_md_params },
1470 { 0, NULL }
1471 };
1472