OLD | NEW |
| (Empty) |
1 /* crypto/rsa/rsa_pmeth.c */ | |
2 /* Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL | |
3 * project 2006. | |
4 */ | |
5 /* ==================================================================== | |
6 * Copyright (c) 2006 The OpenSSL Project. All rights reserved. | |
7 * | |
8 * Redistribution and use in source and binary forms, with or without | |
9 * modification, are permitted provided that the following conditions | |
10 * are met: | |
11 * | |
12 * 1. Redistributions of source code must retain the above copyright | |
13 * notice, this list of conditions and the following disclaimer. | |
14 * | |
15 * 2. Redistributions in binary form must reproduce the above copyright | |
16 * notice, this list of conditions and the following disclaimer in | |
17 * the documentation and/or other materials provided with the | |
18 * distribution. | |
19 * | |
20 * 3. All advertising materials mentioning features or use of this | |
21 * software must display the following acknowledgment: | |
22 * "This product includes software developed by the OpenSSL Project | |
23 * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)" | |
24 * | |
25 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to | |
26 * endorse or promote products derived from this software without | |
27 * prior written permission. For written permission, please contact | |
28 * licensing@OpenSSL.org. | |
29 * | |
30 * 5. Products derived from this software may not be called "OpenSSL" | |
31 * nor may "OpenSSL" appear in their names without prior written | |
32 * permission of the OpenSSL Project. | |
33 * | |
34 * 6. Redistributions of any form whatsoever must retain the following | |
35 * acknowledgment: | |
36 * "This product includes software developed by the OpenSSL Project | |
37 * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" | |
38 * | |
39 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY | |
40 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | |
41 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR | |
42 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR | |
43 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, | |
44 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT | |
45 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; | |
46 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | |
47 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, | |
48 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | |
49 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED | |
50 * OF THE POSSIBILITY OF SUCH DAMAGE. | |
51 * ==================================================================== | |
52 * | |
53 * This product includes cryptographic software written by Eric Young | |
54 * (eay@cryptsoft.com). This product includes software written by Tim | |
55 * Hudson (tjh@cryptsoft.com). | |
56 * | |
57 */ | |
58 | |
59 #include <stdio.h> | |
60 #include "cryptlib.h" | |
61 #include <openssl/asn1t.h> | |
62 #include <openssl/x509.h> | |
63 #include <openssl/rsa.h> | |
64 #include <openssl/bn.h> | |
65 #include <openssl/evp.h> | |
66 #ifndef OPENSSL_NO_CMS | |
67 #include <openssl/cms.h> | |
68 #endif | |
69 #ifdef OPENSSL_FIPS | |
70 #include <openssl/fips.h> | |
71 #endif | |
72 #include "evp_locl.h" | |
73 #include "rsa_locl.h" | |
74 | |
75 /* RSA pkey context structure */ | |
76 | |
77 typedef struct | |
78 { | |
79 /* Key gen parameters */ | |
80 int nbits; | |
81 BIGNUM *pub_exp; | |
82 /* Keygen callback info */ | |
83 int gentmp[2]; | |
84 /* RSA padding mode */ | |
85 int pad_mode; | |
86 /* message digest */ | |
87 const EVP_MD *md; | |
88 /* message digest for MGF1 */ | |
89 const EVP_MD *mgf1md; | |
90 /* PSS/OAEP salt length */ | |
91 int saltlen; | |
92 /* Temp buffer */ | |
93 unsigned char *tbuf; | |
94 } RSA_PKEY_CTX; | |
95 | |
96 static int pkey_rsa_init(EVP_PKEY_CTX *ctx) | |
97 { | |
98 RSA_PKEY_CTX *rctx; | |
99 rctx = OPENSSL_malloc(sizeof(RSA_PKEY_CTX)); | |
100 if (!rctx) | |
101 return 0; | |
102 rctx->nbits = 1024; | |
103 rctx->pub_exp = NULL; | |
104 rctx->pad_mode = RSA_PKCS1_PADDING; | |
105 rctx->md = NULL; | |
106 rctx->mgf1md = NULL; | |
107 rctx->tbuf = NULL; | |
108 | |
109 rctx->saltlen = -2; | |
110 | |
111 ctx->data = rctx; | |
112 ctx->keygen_info = rctx->gentmp; | |
113 ctx->keygen_info_count = 2; | |
114 | |
115 return 1; | |
116 } | |
117 | |
118 static int pkey_rsa_copy(EVP_PKEY_CTX *dst, EVP_PKEY_CTX *src) | |
119 { | |
120 RSA_PKEY_CTX *dctx, *sctx; | |
121 if (!pkey_rsa_init(dst)) | |
122 return 0; | |
123 sctx = src->data; | |
124 dctx = dst->data; | |
125 dctx->nbits = sctx->nbits; | |
126 if (sctx->pub_exp) | |
127 { | |
128 dctx->pub_exp = BN_dup(sctx->pub_exp); | |
129 if (!dctx->pub_exp) | |
130 return 0; | |
131 } | |
132 dctx->pad_mode = sctx->pad_mode; | |
133 dctx->md = sctx->md; | |
134 return 1; | |
135 } | |
136 | |
137 static int setup_tbuf(RSA_PKEY_CTX *ctx, EVP_PKEY_CTX *pk) | |
138 { | |
139 if (ctx->tbuf) | |
140 return 1; | |
141 ctx->tbuf = OPENSSL_malloc(EVP_PKEY_size(pk->pkey)); | |
142 if (!ctx->tbuf) | |
143 return 0; | |
144 return 1; | |
145 } | |
146 | |
147 static void pkey_rsa_cleanup(EVP_PKEY_CTX *ctx) | |
148 { | |
149 RSA_PKEY_CTX *rctx = ctx->data; | |
150 if (rctx) | |
151 { | |
152 if (rctx->pub_exp) | |
153 BN_free(rctx->pub_exp); | |
154 if (rctx->tbuf) | |
155 OPENSSL_free(rctx->tbuf); | |
156 OPENSSL_free(rctx); | |
157 } | |
158 } | |
159 #ifdef OPENSSL_FIPS | |
160 /* FIP checker. Return value indicates status of context parameters: | |
161 * 1 : redirect to FIPS. | |
162 * 0 : don't redirect to FIPS. | |
163 * -1 : illegal operation in FIPS mode. | |
164 */ | |
165 | |
166 static int pkey_fips_check_ctx(EVP_PKEY_CTX *ctx) | |
167 { | |
168 RSA_PKEY_CTX *rctx = ctx->data; | |
169 RSA *rsa = ctx->pkey->pkey.rsa; | |
170 int rv = -1; | |
171 if (!FIPS_mode()) | |
172 return 0; | |
173 if (rsa->flags & RSA_FLAG_NON_FIPS_ALLOW) | |
174 rv = 0; | |
175 if (!(rsa->meth->flags & RSA_FLAG_FIPS_METHOD) && rv) | |
176 return -1; | |
177 if (rctx->md && !(rctx->md->flags & EVP_MD_FLAG_FIPS)) | |
178 return rv; | |
179 if (rctx->mgf1md && !(rctx->mgf1md->flags & EVP_MD_FLAG_FIPS)) | |
180 return rv; | |
181 return 1; | |
182 } | |
183 #endif | |
184 | |
185 static int pkey_rsa_sign(EVP_PKEY_CTX *ctx, unsigned char *sig, size_t *siglen, | |
186 const unsigned char *tbs, size_t tbslen) | |
187 { | |
188 int ret; | |
189 RSA_PKEY_CTX *rctx = ctx->data; | |
190 RSA *rsa = ctx->pkey->pkey.rsa; | |
191 | |
192 #ifdef OPENSSL_FIPS | |
193 ret = pkey_fips_check_ctx(ctx); | |
194 if (ret < 0) | |
195 { | |
196 RSAerr(RSA_F_PKEY_RSA_SIGN, RSA_R_OPERATION_NOT_ALLOWED_IN_FIPS_
MODE); | |
197 return -1; | |
198 } | |
199 #endif | |
200 | |
201 if (rctx->md) | |
202 { | |
203 if (tbslen != (size_t)EVP_MD_size(rctx->md)) | |
204 { | |
205 RSAerr(RSA_F_PKEY_RSA_SIGN, | |
206 RSA_R_INVALID_DIGEST_LENGTH); | |
207 return -1; | |
208 } | |
209 #ifdef OPENSSL_FIPS | |
210 if (ret > 0) | |
211 { | |
212 unsigned int slen; | |
213 ret = FIPS_rsa_sign_digest(rsa, tbs, tbslen, rctx->md, | |
214 rctx->pad_mode, | |
215 rctx->saltlen, | |
216 rctx->mgf1md, | |
217 sig, &slen); | |
218 if (ret > 0) | |
219 *siglen = slen; | |
220 else | |
221 *siglen = 0; | |
222 return ret; | |
223 } | |
224 #endif | |
225 | |
226 if (EVP_MD_type(rctx->md) == NID_mdc2) | |
227 { | |
228 unsigned int sltmp; | |
229 if (rctx->pad_mode != RSA_PKCS1_PADDING) | |
230 return -1; | |
231 ret = RSA_sign_ASN1_OCTET_STRING(NID_mdc2, | |
232 tbs, tbslen, sig, &sltmp, rsa); | |
233 | |
234 if (ret <= 0) | |
235 return ret; | |
236 ret = sltmp; | |
237 } | |
238 else if (rctx->pad_mode == RSA_X931_PADDING) | |
239 { | |
240 if (!setup_tbuf(rctx, ctx)) | |
241 return -1; | |
242 memcpy(rctx->tbuf, tbs, tbslen); | |
243 rctx->tbuf[tbslen] = | |
244 RSA_X931_hash_id(EVP_MD_type(rctx->md)); | |
245 ret = RSA_private_encrypt(tbslen + 1, rctx->tbuf, | |
246 sig, rsa, RSA_X931_PADDING); | |
247 } | |
248 else if (rctx->pad_mode == RSA_PKCS1_PADDING) | |
249 { | |
250 unsigned int sltmp; | |
251 ret = RSA_sign(EVP_MD_type(rctx->md), | |
252 tbs, tbslen, sig, &sltmp, rsa); | |
253 if (ret <= 0) | |
254 return ret; | |
255 ret = sltmp; | |
256 } | |
257 else if (rctx->pad_mode == RSA_PKCS1_PSS_PADDING) | |
258 { | |
259 if (!setup_tbuf(rctx, ctx)) | |
260 return -1; | |
261 if (!RSA_padding_add_PKCS1_PSS_mgf1(rsa, | |
262 rctx->tbuf, tbs, | |
263 rctx->md, rctx->mgf1md, | |
264 rctx->saltlen)) | |
265 return -1; | |
266 ret = RSA_private_encrypt(RSA_size(rsa), rctx->tbuf, | |
267 sig, rsa, RSA_NO_PADDING); | |
268 } | |
269 else | |
270 return -1; | |
271 } | |
272 else | |
273 ret = RSA_private_encrypt(tbslen, tbs, sig, ctx->pkey->pkey.rsa, | |
274 rctx->pad_mode); | |
275 if (ret < 0) | |
276 return ret; | |
277 *siglen = ret; | |
278 return 1; | |
279 } | |
280 | |
281 | |
282 static int pkey_rsa_verifyrecover(EVP_PKEY_CTX *ctx, | |
283 unsigned char *rout, size_t *routlen, | |
284 const unsigned char *sig, size_t siglen) | |
285 { | |
286 int ret; | |
287 RSA_PKEY_CTX *rctx = ctx->data; | |
288 | |
289 if (rctx->md) | |
290 { | |
291 if (rctx->pad_mode == RSA_X931_PADDING) | |
292 { | |
293 if (!setup_tbuf(rctx, ctx)) | |
294 return -1; | |
295 ret = RSA_public_decrypt(siglen, sig, | |
296 rctx->tbuf, ctx->pkey->pkey.rsa, | |
297 RSA_X931_PADDING); | |
298 if (ret < 1) | |
299 return 0; | |
300 ret--; | |
301 if (rctx->tbuf[ret] != | |
302 RSA_X931_hash_id(EVP_MD_type(rctx->md))) | |
303 { | |
304 RSAerr(RSA_F_PKEY_RSA_VERIFYRECOVER, | |
305 RSA_R_ALGORITHM_MISMATCH); | |
306 return 0; | |
307 } | |
308 if (ret != EVP_MD_size(rctx->md)) | |
309 { | |
310 RSAerr(RSA_F_PKEY_RSA_VERIFYRECOVER, | |
311 RSA_R_INVALID_DIGEST_LENGTH); | |
312 return 0; | |
313 } | |
314 if (rout) | |
315 memcpy(rout, rctx->tbuf, ret); | |
316 } | |
317 else if (rctx->pad_mode == RSA_PKCS1_PADDING) | |
318 { | |
319 size_t sltmp; | |
320 ret = int_rsa_verify(EVP_MD_type(rctx->md), | |
321 NULL, 0, rout, &sltmp, | |
322 sig, siglen, ctx->pkey->pkey.rsa); | |
323 if (ret <= 0) | |
324 return 0; | |
325 ret = sltmp; | |
326 } | |
327 else | |
328 return -1; | |
329 } | |
330 else | |
331 ret = RSA_public_decrypt(siglen, sig, rout, ctx->pkey->pkey.rsa, | |
332 rctx->pad_mode); | |
333 if (ret < 0) | |
334 return ret; | |
335 *routlen = ret; | |
336 return 1; | |
337 } | |
338 | |
339 static int pkey_rsa_verify(EVP_PKEY_CTX *ctx, | |
340 const unsigned char *sig, size_t siglen, | |
341 const unsigned char *tbs, size_t tbslen) | |
342 { | |
343 RSA_PKEY_CTX *rctx = ctx->data; | |
344 RSA *rsa = ctx->pkey->pkey.rsa; | |
345 size_t rslen; | |
346 #ifdef OPENSSL_FIPS | |
347 int rv; | |
348 rv = pkey_fips_check_ctx(ctx); | |
349 if (rv < 0) | |
350 { | |
351 RSAerr(RSA_F_PKEY_RSA_VERIFY, RSA_R_OPERATION_NOT_ALLOWED_IN_FIP
S_MODE); | |
352 return -1; | |
353 } | |
354 #endif | |
355 if (rctx->md) | |
356 { | |
357 #ifdef OPENSSL_FIPS | |
358 if (rv > 0) | |
359 { | |
360 return FIPS_rsa_verify_digest(rsa, | |
361 tbs, tbslen, | |
362 rctx->md, | |
363 rctx->pad_mode, | |
364 rctx->saltlen, | |
365 rctx->mgf1md, | |
366 sig, siglen); | |
367 | |
368 } | |
369 #endif | |
370 if (rctx->pad_mode == RSA_PKCS1_PADDING) | |
371 return RSA_verify(EVP_MD_type(rctx->md), tbs, tbslen, | |
372 sig, siglen, rsa); | |
373 if (rctx->pad_mode == RSA_X931_PADDING) | |
374 { | |
375 if (pkey_rsa_verifyrecover(ctx, NULL, &rslen, | |
376 sig, siglen) <= 0) | |
377 return 0; | |
378 } | |
379 else if (rctx->pad_mode == RSA_PKCS1_PSS_PADDING) | |
380 { | |
381 int ret; | |
382 if (!setup_tbuf(rctx, ctx)) | |
383 return -1; | |
384 ret = RSA_public_decrypt(siglen, sig, rctx->tbuf, | |
385 rsa, RSA_NO_PADDING); | |
386 if (ret <= 0) | |
387 return 0; | |
388 ret = RSA_verify_PKCS1_PSS_mgf1(rsa, tbs, | |
389 rctx->md, rctx->mgf1md, | |
390 rctx->tbuf, rctx->saltlen); | |
391 if (ret <= 0) | |
392 return 0; | |
393 return 1; | |
394 } | |
395 else | |
396 return -1; | |
397 } | |
398 else | |
399 { | |
400 if (!setup_tbuf(rctx, ctx)) | |
401 return -1; | |
402 rslen = RSA_public_decrypt(siglen, sig, rctx->tbuf, | |
403 rsa, rctx->pad_mode); | |
404 if (rslen == 0) | |
405 return 0; | |
406 } | |
407 | |
408 if ((rslen != tbslen) || memcmp(tbs, rctx->tbuf, rslen)) | |
409 return 0; | |
410 | |
411 return 1; | |
412 | |
413 } | |
414 | |
415 | |
416 static int pkey_rsa_encrypt(EVP_PKEY_CTX *ctx, | |
417 unsigned char *out, size_t *outlen, | |
418 const unsigned char *in, size_t inlen) | |
419 { | |
420 int ret; | |
421 RSA_PKEY_CTX *rctx = ctx->data; | |
422 ret = RSA_public_encrypt(inlen, in, out, ctx->pkey->pkey.rsa, | |
423 rctx->pad_mode); | |
424 if (ret < 0) | |
425 return ret; | |
426 *outlen = ret; | |
427 return 1; | |
428 } | |
429 | |
430 static int pkey_rsa_decrypt(EVP_PKEY_CTX *ctx, | |
431 unsigned char *out, size_t *outlen, | |
432 const unsigned char *in, size_t inlen) | |
433 { | |
434 int ret; | |
435 RSA_PKEY_CTX *rctx = ctx->data; | |
436 ret = RSA_private_decrypt(inlen, in, out, ctx->pkey->pkey.rsa, | |
437 rctx->pad_mode); | |
438 if (ret < 0) | |
439 return ret; | |
440 *outlen = ret; | |
441 return 1; | |
442 } | |
443 | |
444 static int check_padding_md(const EVP_MD *md, int padding) | |
445 { | |
446 if (!md) | |
447 return 1; | |
448 | |
449 if (padding == RSA_NO_PADDING) | |
450 { | |
451 RSAerr(RSA_F_CHECK_PADDING_MD, RSA_R_INVALID_PADDING_MODE); | |
452 return 0; | |
453 } | |
454 | |
455 if (padding == RSA_X931_PADDING) | |
456 { | |
457 if (RSA_X931_hash_id(EVP_MD_type(md)) == -1) | |
458 { | |
459 RSAerr(RSA_F_CHECK_PADDING_MD, | |
460 RSA_R_INVALID_X931_DIGEST); | |
461 return 0; | |
462 } | |
463 return 1; | |
464 } | |
465 | |
466 return 1; | |
467 } | |
468 | |
469 | |
470 static int pkey_rsa_ctrl(EVP_PKEY_CTX *ctx, int type, int p1, void *p2) | |
471 { | |
472 RSA_PKEY_CTX *rctx = ctx->data; | |
473 switch (type) | |
474 { | |
475 case EVP_PKEY_CTRL_RSA_PADDING: | |
476 if ((p1 >= RSA_PKCS1_PADDING) && (p1 <= RSA_PKCS1_PSS_PADDING)) | |
477 { | |
478 if (!check_padding_md(rctx->md, p1)) | |
479 return 0; | |
480 if (p1 == RSA_PKCS1_PSS_PADDING) | |
481 { | |
482 if (!(ctx->operation & | |
483 (EVP_PKEY_OP_SIGN | EVP_PKEY_OP_VERIFY))) | |
484 goto bad_pad; | |
485 if (!rctx->md) | |
486 rctx->md = EVP_sha1(); | |
487 } | |
488 if (p1 == RSA_PKCS1_OAEP_PADDING) | |
489 { | |
490 if (!(ctx->operation & EVP_PKEY_OP_TYPE_CRYPT)) | |
491 goto bad_pad; | |
492 if (!rctx->md) | |
493 rctx->md = EVP_sha1(); | |
494 } | |
495 rctx->pad_mode = p1; | |
496 return 1; | |
497 } | |
498 bad_pad: | |
499 RSAerr(RSA_F_PKEY_RSA_CTRL, | |
500 RSA_R_ILLEGAL_OR_UNSUPPORTED_PADDING_MODE); | |
501 return -2; | |
502 | |
503 case EVP_PKEY_CTRL_GET_RSA_PADDING: | |
504 *(int *)p2 = rctx->pad_mode; | |
505 return 1; | |
506 | |
507 case EVP_PKEY_CTRL_RSA_PSS_SALTLEN: | |
508 case EVP_PKEY_CTRL_GET_RSA_PSS_SALTLEN: | |
509 if (rctx->pad_mode != RSA_PKCS1_PSS_PADDING) | |
510 { | |
511 RSAerr(RSA_F_PKEY_RSA_CTRL, RSA_R_INVALID_PSS_SALTLEN); | |
512 return -2; | |
513 } | |
514 if (type == EVP_PKEY_CTRL_GET_RSA_PSS_SALTLEN) | |
515 *(int *)p2 = rctx->saltlen; | |
516 else | |
517 { | |
518 if (p1 < -2) | |
519 return -2; | |
520 rctx->saltlen = p1; | |
521 } | |
522 return 1; | |
523 | |
524 case EVP_PKEY_CTRL_RSA_KEYGEN_BITS: | |
525 if (p1 < 256) | |
526 { | |
527 RSAerr(RSA_F_PKEY_RSA_CTRL, RSA_R_INVALID_KEYBITS); | |
528 return -2; | |
529 } | |
530 rctx->nbits = p1; | |
531 return 1; | |
532 | |
533 case EVP_PKEY_CTRL_RSA_KEYGEN_PUBEXP: | |
534 if (!p2) | |
535 return -2; | |
536 rctx->pub_exp = p2; | |
537 return 1; | |
538 | |
539 case EVP_PKEY_CTRL_MD: | |
540 if (!check_padding_md(p2, rctx->pad_mode)) | |
541 return 0; | |
542 rctx->md = p2; | |
543 return 1; | |
544 | |
545 case EVP_PKEY_CTRL_RSA_MGF1_MD: | |
546 case EVP_PKEY_CTRL_GET_RSA_MGF1_MD: | |
547 if (rctx->pad_mode != RSA_PKCS1_PSS_PADDING) | |
548 { | |
549 RSAerr(RSA_F_PKEY_RSA_CTRL, RSA_R_INVALID_MGF1_MD); | |
550 return -2; | |
551 } | |
552 if (type == EVP_PKEY_CTRL_GET_RSA_MGF1_MD) | |
553 { | |
554 if (rctx->mgf1md) | |
555 *(const EVP_MD **)p2 = rctx->mgf1md; | |
556 else | |
557 *(const EVP_MD **)p2 = rctx->md; | |
558 } | |
559 else | |
560 rctx->mgf1md = p2; | |
561 return 1; | |
562 | |
563 case EVP_PKEY_CTRL_DIGESTINIT: | |
564 case EVP_PKEY_CTRL_PKCS7_ENCRYPT: | |
565 case EVP_PKEY_CTRL_PKCS7_DECRYPT: | |
566 case EVP_PKEY_CTRL_PKCS7_SIGN: | |
567 return 1; | |
568 #ifndef OPENSSL_NO_CMS | |
569 case EVP_PKEY_CTRL_CMS_DECRYPT: | |
570 { | |
571 X509_ALGOR *alg = NULL; | |
572 ASN1_OBJECT *encalg = NULL; | |
573 if (p2) | |
574 CMS_RecipientInfo_ktri_get0_algs(p2, NULL, NULL, &alg); | |
575 if (alg) | |
576 X509_ALGOR_get0(&encalg, NULL, NULL, alg); | |
577 if (encalg && OBJ_obj2nid(encalg) == NID_rsaesOaep) | |
578 rctx->pad_mode = RSA_PKCS1_OAEP_PADDING; | |
579 } | |
580 case EVP_PKEY_CTRL_CMS_ENCRYPT: | |
581 case EVP_PKEY_CTRL_CMS_SIGN: | |
582 return 1; | |
583 #endif | |
584 case EVP_PKEY_CTRL_PEER_KEY: | |
585 RSAerr(RSA_F_PKEY_RSA_CTRL, | |
586 RSA_R_OPERATION_NOT_SUPPORTED_FOR_THIS_KEYTYPE); | |
587 return -2; | |
588 | |
589 default: | |
590 return -2; | |
591 | |
592 } | |
593 } | |
594 | |
595 static int pkey_rsa_ctrl_str(EVP_PKEY_CTX *ctx, | |
596 const char *type, const char *value) | |
597 { | |
598 if (!value) | |
599 { | |
600 RSAerr(RSA_F_PKEY_RSA_CTRL_STR, RSA_R_VALUE_MISSING); | |
601 return 0; | |
602 } | |
603 if (!strcmp(type, "rsa_padding_mode")) | |
604 { | |
605 int pm; | |
606 if (!strcmp(value, "pkcs1")) | |
607 pm = RSA_PKCS1_PADDING; | |
608 else if (!strcmp(value, "sslv23")) | |
609 pm = RSA_SSLV23_PADDING; | |
610 else if (!strcmp(value, "none")) | |
611 pm = RSA_NO_PADDING; | |
612 else if (!strcmp(value, "oeap")) | |
613 pm = RSA_PKCS1_OAEP_PADDING; | |
614 else if (!strcmp(value, "x931")) | |
615 pm = RSA_X931_PADDING; | |
616 else if (!strcmp(value, "pss")) | |
617 pm = RSA_PKCS1_PSS_PADDING; | |
618 else | |
619 { | |
620 RSAerr(RSA_F_PKEY_RSA_CTRL_STR, | |
621 RSA_R_UNKNOWN_PADDING_TYPE); | |
622 return -2; | |
623 } | |
624 return EVP_PKEY_CTX_set_rsa_padding(ctx, pm); | |
625 } | |
626 | |
627 if (!strcmp(type, "rsa_pss_saltlen")) | |
628 { | |
629 int saltlen; | |
630 saltlen = atoi(value); | |
631 return EVP_PKEY_CTX_set_rsa_pss_saltlen(ctx, saltlen); | |
632 } | |
633 | |
634 if (!strcmp(type, "rsa_keygen_bits")) | |
635 { | |
636 int nbits; | |
637 nbits = atoi(value); | |
638 return EVP_PKEY_CTX_set_rsa_keygen_bits(ctx, nbits); | |
639 } | |
640 | |
641 if (!strcmp(type, "rsa_keygen_pubexp")) | |
642 { | |
643 int ret; | |
644 BIGNUM *pubexp = NULL; | |
645 if (!BN_asc2bn(&pubexp, value)) | |
646 return 0; | |
647 ret = EVP_PKEY_CTX_set_rsa_keygen_pubexp(ctx, pubexp); | |
648 if (ret <= 0) | |
649 BN_free(pubexp); | |
650 return ret; | |
651 } | |
652 | |
653 return -2; | |
654 } | |
655 | |
656 static int pkey_rsa_keygen(EVP_PKEY_CTX *ctx, EVP_PKEY *pkey) | |
657 { | |
658 RSA *rsa = NULL; | |
659 RSA_PKEY_CTX *rctx = ctx->data; | |
660 BN_GENCB *pcb, cb; | |
661 int ret; | |
662 if (!rctx->pub_exp) | |
663 { | |
664 rctx->pub_exp = BN_new(); | |
665 if (!rctx->pub_exp || !BN_set_word(rctx->pub_exp, RSA_F4)) | |
666 return 0; | |
667 } | |
668 rsa = RSA_new(); | |
669 if (!rsa) | |
670 return 0; | |
671 if (ctx->pkey_gencb) | |
672 { | |
673 pcb = &cb; | |
674 evp_pkey_set_cb_translate(pcb, ctx); | |
675 } | |
676 else | |
677 pcb = NULL; | |
678 ret = RSA_generate_key_ex(rsa, rctx->nbits, rctx->pub_exp, pcb); | |
679 if (ret > 0) | |
680 EVP_PKEY_assign_RSA(pkey, rsa); | |
681 else | |
682 RSA_free(rsa); | |
683 return ret; | |
684 } | |
685 | |
686 const EVP_PKEY_METHOD rsa_pkey_meth = | |
687 { | |
688 EVP_PKEY_RSA, | |
689 EVP_PKEY_FLAG_AUTOARGLEN, | |
690 pkey_rsa_init, | |
691 pkey_rsa_copy, | |
692 pkey_rsa_cleanup, | |
693 | |
694 0,0, | |
695 | |
696 0, | |
697 pkey_rsa_keygen, | |
698 | |
699 0, | |
700 pkey_rsa_sign, | |
701 | |
702 0, | |
703 pkey_rsa_verify, | |
704 | |
705 0, | |
706 pkey_rsa_verifyrecover, | |
707 | |
708 | |
709 0,0,0,0, | |
710 | |
711 0, | |
712 pkey_rsa_encrypt, | |
713 | |
714 0, | |
715 pkey_rsa_decrypt, | |
716 | |
717 0,0, | |
718 | |
719 pkey_rsa_ctrl, | |
720 pkey_rsa_ctrl_str | |
721 | |
722 | |
723 }; | |
OLD | NEW |