a78839b9923ce31a279252df834644224b89ea79
[openssl.git] / crypto / evp / pmeth_fn.c
1 /*
2  * Copyright 2006-2016 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 #include <stdio.h>
11 #include <stdlib.h>
12 #include <openssl/objects.h>
13 #include <openssl/evp.h>
14 #include "internal/cryptlib.h"
15 #include "crypto/evp.h"
16 #include "internal/provider.h"
17 #include "evp_local.h"
18
19 static EVP_SIGNATURE *evp_signature_new(OSSL_PROVIDER *prov)
20 {
21     EVP_SIGNATURE *signature = OPENSSL_zalloc(sizeof(EVP_SIGNATURE));
22
23     signature->lock = CRYPTO_THREAD_lock_new();
24     if (signature->lock == NULL) {
25         OPENSSL_free(signature);
26         return NULL;
27     }
28     signature->prov = prov;
29     ossl_provider_up_ref(prov);
30     signature->refcnt = 1;
31
32     return signature;
33 }
34
35 static void *evp_signature_from_dispatch(int name_id,
36                                          const OSSL_DISPATCH *fns,
37                                          OSSL_PROVIDER *prov,
38                                          void *vkeymgmt_data)
39 {
40     /*
41      * Signature functions cannot work without a key, and key management
42      * from the same provider to manage its keys.  We therefore fetch
43      * a key management method using the same algorithm and properties
44      * and pass that down to evp_generic_fetch to be passed on to our
45      * evp_signature_from_dispatch, which will attach the key management
46      * method to the newly created key exchange method as long as the
47      * provider matches.
48      */
49     struct keymgmt_data_st *keymgmt_data = vkeymgmt_data;
50     EVP_KEYMGMT *keymgmt =
51         evp_keymgmt_fetch_by_number(keymgmt_data->ctx, name_id,
52                                     keymgmt_data->properties);
53     EVP_SIGNATURE *signature = NULL;
54     int ctxfncnt = 0, signfncnt = 0, verifyfncnt = 0, verifyrecfncnt = 0;
55     int digsignfncnt = 0, digverifyfncnt = 0;
56     int gparamfncnt = 0, sparamfncnt = 0, gmdparamfncnt = 0, smdparamfncnt = 0;
57
58     if (keymgmt == NULL || EVP_KEYMGMT_provider(keymgmt) != prov) {
59         ERR_raise(ERR_LIB_EVP, EVP_R_NO_KEYMGMT_AVAILABLE);
60         goto err;
61     }
62
63     if ((signature = evp_signature_new(prov)) == NULL) {
64         ERR_raise(ERR_LIB_EVP, ERR_R_MALLOC_FAILURE);
65         goto err;
66     }
67
68     signature->name_id = name_id;
69     signature->keymgmt = keymgmt;
70     keymgmt = NULL;              /* avoid double free on failure below */
71
72     for (; fns->function_id != 0; fns++) {
73         switch (fns->function_id) {
74         case OSSL_FUNC_SIGNATURE_NEWCTX:
75             if (signature->newctx != NULL)
76                 break;
77             signature->newctx = OSSL_get_OP_signature_newctx(fns);
78             ctxfncnt++;
79             break;
80         case OSSL_FUNC_SIGNATURE_SIGN_INIT:
81             if (signature->sign_init != NULL)
82                 break;
83             signature->sign_init = OSSL_get_OP_signature_sign_init(fns);
84             signfncnt++;
85             break;
86         case OSSL_FUNC_SIGNATURE_SIGN:
87             if (signature->sign != NULL)
88                 break;
89             signature->sign = OSSL_get_OP_signature_sign(fns);
90             signfncnt++;
91             break;
92         case OSSL_FUNC_SIGNATURE_VERIFY_INIT:
93             if (signature->verify_init != NULL)
94                 break;
95             signature->verify_init = OSSL_get_OP_signature_verify_init(fns);
96             verifyfncnt++;
97             break;
98         case OSSL_FUNC_SIGNATURE_VERIFY:
99             if (signature->verify != NULL)
100                 break;
101             signature->verify = OSSL_get_OP_signature_verify(fns);
102             verifyfncnt++;
103             break;
104         case OSSL_FUNC_SIGNATURE_VERIFY_RECOVER_INIT:
105             if (signature->verify_recover_init != NULL)
106                 break;
107             signature->verify_recover_init
108                 = OSSL_get_OP_signature_verify_recover_init(fns);
109             verifyrecfncnt++;
110             break;
111         case OSSL_FUNC_SIGNATURE_VERIFY_RECOVER:
112             if (signature->verify_recover != NULL)
113                 break;
114             signature->verify_recover
115                 = OSSL_get_OP_signature_verify_recover(fns);
116             verifyrecfncnt++;
117             break;
118         case OSSL_FUNC_SIGNATURE_DIGEST_SIGN_INIT:
119             if (signature->digest_sign_init != NULL)
120                 break;
121             signature->digest_sign_init
122                 = OSSL_get_OP_signature_digest_sign_init(fns);
123             digsignfncnt++;
124             break;
125         case OSSL_FUNC_SIGNATURE_DIGEST_SIGN_UPDATE:
126             if (signature->digest_sign_update != NULL)
127                 break;
128             signature->digest_sign_update
129                 = OSSL_get_OP_signature_digest_sign_update(fns);
130             digsignfncnt++;
131             break;
132         case OSSL_FUNC_SIGNATURE_DIGEST_SIGN_FINAL:
133             if (signature->digest_sign_final != NULL)
134                 break;
135             signature->digest_sign_final
136                 = OSSL_get_OP_signature_digest_sign_final(fns);
137             digsignfncnt++;
138             break;
139         case OSSL_FUNC_SIGNATURE_DIGEST_VERIFY_INIT:
140             if (signature->digest_verify_init != NULL)
141                 break;
142             signature->digest_verify_init
143                 = OSSL_get_OP_signature_digest_verify_init(fns);
144             digverifyfncnt++;
145             break;
146         case OSSL_FUNC_SIGNATURE_DIGEST_VERIFY_UPDATE:
147             if (signature->digest_verify_update != NULL)
148                 break;
149             signature->digest_verify_update
150                 = OSSL_get_OP_signature_digest_verify_update(fns);
151             digverifyfncnt++;
152             break;
153         case OSSL_FUNC_SIGNATURE_DIGEST_VERIFY_FINAL:
154             if (signature->digest_verify_final != NULL)
155                 break;
156             signature->digest_verify_final
157                 = OSSL_get_OP_signature_digest_verify_final(fns);
158             digverifyfncnt++;
159             break;
160         case OSSL_FUNC_SIGNATURE_FREECTX:
161             if (signature->freectx != NULL)
162                 break;
163             signature->freectx = OSSL_get_OP_signature_freectx(fns);
164             ctxfncnt++;
165             break;
166         case OSSL_FUNC_SIGNATURE_DUPCTX:
167             if (signature->dupctx != NULL)
168                 break;
169             signature->dupctx = OSSL_get_OP_signature_dupctx(fns);
170             break;
171         case OSSL_FUNC_SIGNATURE_GET_CTX_PARAMS:
172             if (signature->get_ctx_params != NULL)
173                 break;
174             signature->get_ctx_params
175                 = OSSL_get_OP_signature_get_ctx_params(fns);
176             gparamfncnt++;
177             break;
178         case OSSL_FUNC_SIGNATURE_GETTABLE_CTX_PARAMS:
179             if (signature->gettable_ctx_params != NULL)
180                 break;
181             signature->gettable_ctx_params
182                 = OSSL_get_OP_signature_gettable_ctx_params(fns);
183             gparamfncnt++;
184             break;
185         case OSSL_FUNC_SIGNATURE_SET_CTX_PARAMS:
186             if (signature->set_ctx_params != NULL)
187                 break;
188             signature->set_ctx_params
189                 = OSSL_get_OP_signature_set_ctx_params(fns);
190             sparamfncnt++;
191             break;
192         case OSSL_FUNC_SIGNATURE_SETTABLE_CTX_PARAMS:
193             if (signature->settable_ctx_params != NULL)
194                 break;
195             signature->settable_ctx_params
196                 = OSSL_get_OP_signature_settable_ctx_params(fns);
197             sparamfncnt++;
198             break;
199         case OSSL_FUNC_SIGNATURE_GET_CTX_MD_PARAMS:
200             if (signature->get_ctx_md_params != NULL)
201                 break;
202             signature->get_ctx_md_params
203                 = OSSL_get_OP_signature_get_ctx_md_params(fns);
204             gmdparamfncnt++;
205             break;
206         case OSSL_FUNC_SIGNATURE_GETTABLE_CTX_MD_PARAMS:
207             if (signature->gettable_ctx_md_params != NULL)
208                 break;
209             signature->gettable_ctx_md_params
210                 = OSSL_get_OP_signature_gettable_ctx_md_params(fns);
211             gmdparamfncnt++;
212             break;
213         case OSSL_FUNC_SIGNATURE_SET_CTX_MD_PARAMS:
214             if (signature->set_ctx_md_params != NULL)
215                 break;
216             signature->set_ctx_md_params
217                 = OSSL_get_OP_signature_set_ctx_md_params(fns);
218             smdparamfncnt++;
219             break;
220         case OSSL_FUNC_SIGNATURE_SETTABLE_CTX_MD_PARAMS:
221             if (signature->settable_ctx_md_params != NULL)
222                 break;
223             signature->settable_ctx_md_params
224                 = OSSL_get_OP_signature_settable_ctx_md_params(fns);
225             smdparamfncnt++;
226             break;
227         }
228     }
229     if (ctxfncnt != 2
230         || (signfncnt == 0
231             && verifyfncnt == 0
232             && verifyrecfncnt == 0
233             && digsignfncnt == 0
234             && digverifyfncnt == 0)
235         || (signfncnt != 0 && signfncnt != 2)
236         || (verifyfncnt != 0 && verifyfncnt != 2)
237         || (verifyrecfncnt != 0 && verifyrecfncnt != 2)
238         || (digsignfncnt != 0 && digsignfncnt != 3)
239         || (digverifyfncnt != 0 && digverifyfncnt != 3)
240         || (gparamfncnt != 0 && gparamfncnt != 2)
241         || (sparamfncnt != 0 && sparamfncnt != 2)
242         || (gmdparamfncnt != 0 && gmdparamfncnt != 2)
243         || (smdparamfncnt != 0 && smdparamfncnt != 2)) {
244         /*
245          * In order to be a consistent set of functions we must have at least
246          * a set of context functions (newctx and freectx) as well as a set of
247          * "signature" functions:
248          *  (sign_init, sign) or
249          *  (verify_init verify) or
250          *  (verify_recover_init, verify_recover) or
251          *  (digest_sign_init, digest_sign_update, digest_sign_final) or
252          *  (digest_verify_init, digest_verify_update, digest_verify_final).
253          *
254          * set_ctx_params and settable_ctx_params are optional, but if one of
255          * them is present then the other one must also be present. The same
256          * applies to get_ctx_params and gettable_ctx_params. The same rules
257          * apply to the "md_params" functions. The dupctx function is optional.
258          */
259         ERR_raise(ERR_LIB_EVP, EVP_R_INVALID_PROVIDER_FUNCTIONS);
260         goto err;
261     }
262
263     return signature;
264  err:
265     EVP_SIGNATURE_free(signature);
266     EVP_KEYMGMT_free(keymgmt);
267     return NULL;
268 }
269
270 void EVP_SIGNATURE_free(EVP_SIGNATURE *signature)
271 {
272     if (signature != NULL) {
273         int i;
274
275         CRYPTO_DOWN_REF(&signature->refcnt, &i, signature->lock);
276         if (i > 0)
277             return;
278         EVP_KEYMGMT_free(signature->keymgmt);
279         ossl_provider_free(signature->prov);
280         CRYPTO_THREAD_lock_free(signature->lock);
281         OPENSSL_free(signature);
282     }
283 }
284
285 int EVP_SIGNATURE_up_ref(EVP_SIGNATURE *signature)
286 {
287     int ref = 0;
288
289     CRYPTO_UP_REF(&signature->refcnt, &ref, signature->lock);
290     return 1;
291 }
292
293 OSSL_PROVIDER *EVP_SIGNATURE_provider(const EVP_SIGNATURE *signature)
294 {
295     return signature->prov;
296 }
297
298 EVP_SIGNATURE *EVP_SIGNATURE_fetch(OPENSSL_CTX *ctx, const char *algorithm,
299                                    const char *properties)
300 {
301     struct keymgmt_data_st keymgmt_data;
302
303     /*
304      * A signature operation cannot work without a key, so we need key
305      * management from the same provider to manage its keys.
306      */
307     keymgmt_data.ctx = ctx;
308     keymgmt_data.properties = properties;
309     return evp_generic_fetch(ctx, OSSL_OP_SIGNATURE, algorithm, properties,
310                              evp_signature_from_dispatch, &keymgmt_data,
311                              (int (*)(void *))EVP_SIGNATURE_up_ref,
312                              (void (*)(void *))EVP_SIGNATURE_free);
313 }
314
315 int EVP_SIGNATURE_is_a(const EVP_SIGNATURE *signature, const char *name)
316 {
317     return evp_is_a(signature->prov, signature->name_id, name);
318 }
319
320 int EVP_SIGNATURE_number(const EVP_SIGNATURE *signature)
321 {
322     return signature->name_id;
323 }
324
325 void EVP_SIGNATURE_do_all_provided(OPENSSL_CTX *libctx,
326                                    void (*fn)(EVP_SIGNATURE *signature,
327                                               void *arg),
328                                    void *arg)
329 {
330     struct keymgmt_data_st keymgmt_data;
331
332     keymgmt_data.ctx = libctx;
333     keymgmt_data.properties = NULL;
334     evp_generic_do_all(libctx, OSSL_OP_SIGNATURE,
335                        (void (*)(void *, void *))fn, arg,
336                        evp_signature_from_dispatch, &keymgmt_data,
337                        (void (*)(void *))EVP_SIGNATURE_free);
338 }
339
340
341 void EVP_SIGNATURE_names_do_all(const EVP_SIGNATURE *signature,
342                                 void (*fn)(const char *name, void *data),
343                                 void *data)
344 {
345     if (signature->prov != NULL)
346         evp_names_do_all(signature->prov, signature->name_id, fn, data);
347 }
348
349 static int evp_pkey_signature_init(EVP_PKEY_CTX *ctx, EVP_SIGNATURE *signature,
350                                    int operation)
351 {
352     int ret = 0;
353     void *provkey = NULL;
354
355     if (ctx == NULL) {
356         EVPerr(0, EVP_R_OPERATION_NOT_SUPPORTED_FOR_THIS_KEYTYPE);
357         return -2;
358     }
359
360     evp_pkey_ctx_free_old_ops(ctx);
361     ctx->operation = operation;
362
363     if (ctx->engine != NULL)
364         goto legacy;
365
366     if (signature != NULL) {
367         if (!EVP_SIGNATURE_up_ref(signature))
368             goto err;
369     } else {
370         int nid = ctx->pkey != NULL ? ctx->pkey->type : ctx->pmeth->pkey_id;
371
372         /*
373          * TODO(3.0): Check for legacy handling. Remove this once all all
374          * algorithms are moved to providers.
375          */
376         if (ctx->pkey != NULL) {
377             switch (ctx->pkey->type) {
378             case NID_dsa:
379                 break;
380             default:
381                 goto legacy;
382             }
383             signature = EVP_SIGNATURE_fetch(NULL, OBJ_nid2sn(nid), NULL);
384         } else {
385             goto legacy;
386         }
387
388         if (signature == NULL) {
389             EVPerr(0, EVP_R_INITIALIZATION_ERROR);
390             goto err;
391         }
392     }
393
394     ctx->op.sig.signature = signature;
395     if (ctx->pkey != NULL) {
396         provkey = evp_keymgmt_export_to_provider(ctx->pkey, signature->keymgmt);
397         if (provkey == NULL) {
398             EVPerr(0, EVP_R_INITIALIZATION_ERROR);
399             goto err;
400         }
401     }
402     ctx->op.sig.sigprovctx = signature->newctx(ossl_provider_ctx(signature->prov));
403     if (ctx->op.sig.sigprovctx == NULL) {
404         /* The provider key can stay in the cache */
405         EVPerr(0, EVP_R_INITIALIZATION_ERROR);
406         goto err;
407     }
408
409     switch (operation) {
410     case EVP_PKEY_OP_SIGN:
411         if (signature->sign_init == NULL) {
412             EVPerr(0, EVP_R_OPERATION_NOT_SUPPORTED_FOR_THIS_KEYTYPE);
413             ret = -2;
414             goto err;
415         }
416         ret = signature->sign_init(ctx->op.sig.sigprovctx, provkey);
417         break;
418     case EVP_PKEY_OP_VERIFY:
419         if (signature->verify_init == NULL) {
420             EVPerr(0, EVP_R_OPERATION_NOT_SUPPORTED_FOR_THIS_KEYTYPE);
421             ret = -2;
422             goto err;
423         }
424         ret = signature->verify_init(ctx->op.sig.sigprovctx, provkey);
425         break;
426     case EVP_PKEY_OP_VERIFYRECOVER:
427         if (signature->verify_recover_init == NULL) {
428             EVPerr(0, EVP_R_OPERATION_NOT_SUPPORTED_FOR_THIS_KEYTYPE);
429             ret = -2;
430             goto err;
431         }
432         ret = signature->verify_recover_init(ctx->op.sig.sigprovctx, provkey);
433         break;
434     default:
435         EVPerr(0, EVP_R_INITIALIZATION_ERROR);
436         goto err;
437     }
438
439     if (ret <= 0) {
440         signature->freectx(ctx->op.sig.sigprovctx);
441         ctx->op.sig.sigprovctx = NULL;
442         goto err;
443     }
444     return 1;
445
446  legacy:
447     if (ctx->pmeth == NULL
448             || (operation == EVP_PKEY_OP_SIGN && ctx->pmeth->sign == NULL)
449             || (operation == EVP_PKEY_OP_VERIFY && ctx->pmeth->verify == NULL)
450             || (operation == EVP_PKEY_OP_VERIFYRECOVER
451                 && ctx->pmeth->verify_recover == NULL)) {
452         EVPerr(0, EVP_R_OPERATION_NOT_SUPPORTED_FOR_THIS_KEYTYPE);
453         return -2;
454     }
455
456     switch (operation) {
457     case EVP_PKEY_OP_SIGN:
458         if (ctx->pmeth->sign_init == NULL)
459             return 1;
460         ret = ctx->pmeth->sign_init(ctx);
461         break;
462     case EVP_PKEY_OP_VERIFY:
463         if (ctx->pmeth->verify_init == NULL)
464             return 1;
465         ret = ctx->pmeth->verify_init(ctx);
466         break;
467     case EVP_PKEY_OP_VERIFYRECOVER:
468         if (ctx->pmeth->verify_recover_init == NULL)
469             return 1;
470         ret = ctx->pmeth->verify_recover_init(ctx);
471         break;
472     default:
473         EVPerr(0, EVP_R_INITIALIZATION_ERROR);
474         goto err;
475     }
476     if (ret <= 0)
477         goto err;
478     return ret;
479
480  err:
481     ctx->operation = EVP_PKEY_OP_UNDEFINED;
482     return ret;
483 }
484
485 int EVP_PKEY_sign_init_ex(EVP_PKEY_CTX *ctx, EVP_SIGNATURE *signature)
486 {
487     return evp_pkey_signature_init(ctx, signature, EVP_PKEY_OP_SIGN);
488 }
489
490 int EVP_PKEY_sign_init(EVP_PKEY_CTX *ctx)
491 {
492     return evp_pkey_signature_init(ctx, NULL, EVP_PKEY_OP_SIGN);
493 }
494
495 int EVP_PKEY_sign(EVP_PKEY_CTX *ctx,
496                   unsigned char *sig, size_t *siglen,
497                   const unsigned char *tbs, size_t tbslen)
498 {
499     int ret;
500
501     if (ctx == NULL) {
502         EVPerr(0, EVP_R_OPERATION_NOT_SUPPORTED_FOR_THIS_KEYTYPE);
503         return -2;
504     }
505
506     if (ctx->operation != EVP_PKEY_OP_SIGN) {
507         EVPerr(0, EVP_R_OPERATON_NOT_INITIALIZED);
508         return -1;
509     }
510
511     if (ctx->op.sig.sigprovctx == NULL)
512         goto legacy;
513
514     ret = ctx->op.sig.signature->sign(ctx->op.sig.sigprovctx, sig, siglen,
515                                       SIZE_MAX, tbs, tbslen);
516
517     return ret;
518  legacy:
519  
520     if (ctx->pmeth == NULL || ctx->pmeth->sign == NULL) {
521         EVPerr(0, EVP_R_OPERATION_NOT_SUPPORTED_FOR_THIS_KEYTYPE);
522         return -2;
523     }
524
525     M_check_autoarg(ctx, sig, siglen, EVP_F_EVP_PKEY_SIGN)
526         return ctx->pmeth->sign(ctx, sig, siglen, tbs, tbslen);
527 }
528
529 int EVP_PKEY_verify_init_ex(EVP_PKEY_CTX *ctx, EVP_SIGNATURE *signature)
530 {
531     return evp_pkey_signature_init(ctx, signature, EVP_PKEY_OP_VERIFY);
532 }
533
534 int EVP_PKEY_verify_init(EVP_PKEY_CTX *ctx)
535 {
536     return evp_pkey_signature_init(ctx, NULL, EVP_PKEY_OP_VERIFY);
537 }
538
539 int EVP_PKEY_verify(EVP_PKEY_CTX *ctx,
540                     const unsigned char *sig, size_t siglen,
541                     const unsigned char *tbs, size_t tbslen)
542 {
543     int ret;
544
545     if (ctx == NULL) {
546         EVPerr(0, EVP_R_OPERATION_NOT_SUPPORTED_FOR_THIS_KEYTYPE);
547         return -2;
548     }
549
550     if (ctx->operation != EVP_PKEY_OP_VERIFY) {
551         EVPerr(0, EVP_R_OPERATON_NOT_INITIALIZED);
552         return -1;
553     }
554
555     if (ctx->op.sig.sigprovctx == NULL)
556         goto legacy;
557
558     ret = ctx->op.sig.signature->verify(ctx->op.sig.sigprovctx, sig, siglen,
559                                         tbs, tbslen);
560
561     return ret;
562  legacy:
563     if (ctx->pmeth == NULL || ctx->pmeth->verify == NULL) {
564         EVPerr(0, EVP_R_OPERATION_NOT_SUPPORTED_FOR_THIS_KEYTYPE);
565         return -2;
566     }
567
568     return ctx->pmeth->verify(ctx, sig, siglen, tbs, tbslen);
569 }
570
571 int EVP_PKEY_verify_recover_init_ex(EVP_PKEY_CTX *ctx, EVP_SIGNATURE *signature)
572 {
573     return evp_pkey_signature_init(ctx, signature, EVP_PKEY_OP_VERIFYRECOVER);
574 }
575
576 int EVP_PKEY_verify_recover_init(EVP_PKEY_CTX *ctx)
577 {
578     return evp_pkey_signature_init(ctx, NULL, EVP_PKEY_OP_VERIFYRECOVER);
579 }
580
581 int EVP_PKEY_verify_recover(EVP_PKEY_CTX *ctx,
582                             unsigned char *rout, size_t *routlen,
583                             const unsigned char *sig, size_t siglen)
584 {
585     int ret;
586
587     if (ctx == NULL) {
588         EVPerr(0, EVP_R_OPERATION_NOT_SUPPORTED_FOR_THIS_KEYTYPE);
589         return -2;
590     }
591
592     if (ctx->operation != EVP_PKEY_OP_VERIFYRECOVER) {
593         EVPerr(0, EVP_R_OPERATON_NOT_INITIALIZED);
594         return -1;
595     }
596
597     if (ctx->op.sig.sigprovctx == NULL)
598         goto legacy;
599
600     ret = ctx->op.sig.signature->verify_recover(ctx->op.sig.sigprovctx, rout,
601                                                 routlen,
602                                                 (rout == NULL ? 0 : *routlen),
603                                                 sig, siglen);
604     return ret;
605  legacy:
606     if (ctx->pmeth == NULL || ctx->pmeth->verify_recover == NULL) {
607         EVPerr(0, EVP_R_OPERATION_NOT_SUPPORTED_FOR_THIS_KEYTYPE);
608         return -2;
609     }
610     M_check_autoarg(ctx, rout, routlen, EVP_F_EVP_PKEY_VERIFY_RECOVER)
611         return ctx->pmeth->verify_recover(ctx, rout, routlen, sig, siglen);
612 }
613
614 int EVP_PKEY_encrypt_init(EVP_PKEY_CTX *ctx)
615 {
616     int ret;
617     if (!ctx || !ctx->pmeth || !ctx->pmeth->encrypt) {
618         EVPerr(EVP_F_EVP_PKEY_ENCRYPT_INIT,
619                EVP_R_OPERATION_NOT_SUPPORTED_FOR_THIS_KEYTYPE);
620         return -2;
621     }
622     ctx->operation = EVP_PKEY_OP_ENCRYPT;
623     if (!ctx->pmeth->encrypt_init)
624         return 1;
625     ret = ctx->pmeth->encrypt_init(ctx);
626     if (ret <= 0)
627         ctx->operation = EVP_PKEY_OP_UNDEFINED;
628     return ret;
629 }
630
631 int EVP_PKEY_encrypt(EVP_PKEY_CTX *ctx,
632                      unsigned char *out, size_t *outlen,
633                      const unsigned char *in, size_t inlen)
634 {
635     if (!ctx || !ctx->pmeth || !ctx->pmeth->encrypt) {
636         EVPerr(EVP_F_EVP_PKEY_ENCRYPT,
637                EVP_R_OPERATION_NOT_SUPPORTED_FOR_THIS_KEYTYPE);
638         return -2;
639     }
640     if (ctx->operation != EVP_PKEY_OP_ENCRYPT) {
641         EVPerr(EVP_F_EVP_PKEY_ENCRYPT, EVP_R_OPERATON_NOT_INITIALIZED);
642         return -1;
643     }
644     M_check_autoarg(ctx, out, outlen, EVP_F_EVP_PKEY_ENCRYPT)
645         return ctx->pmeth->encrypt(ctx, out, outlen, in, inlen);
646 }
647
648 int EVP_PKEY_decrypt_init(EVP_PKEY_CTX *ctx)
649 {
650     int ret;
651     if (!ctx || !ctx->pmeth || !ctx->pmeth->decrypt) {
652         EVPerr(EVP_F_EVP_PKEY_DECRYPT_INIT,
653                EVP_R_OPERATION_NOT_SUPPORTED_FOR_THIS_KEYTYPE);
654         return -2;
655     }
656     ctx->operation = EVP_PKEY_OP_DECRYPT;
657     if (!ctx->pmeth->decrypt_init)
658         return 1;
659     ret = ctx->pmeth->decrypt_init(ctx);
660     if (ret <= 0)
661         ctx->operation = EVP_PKEY_OP_UNDEFINED;
662     return ret;
663 }
664
665 int EVP_PKEY_decrypt(EVP_PKEY_CTX *ctx,
666                      unsigned char *out, size_t *outlen,
667                      const unsigned char *in, size_t inlen)
668 {
669     if (!ctx || !ctx->pmeth || !ctx->pmeth->decrypt) {
670         EVPerr(EVP_F_EVP_PKEY_DECRYPT,
671                EVP_R_OPERATION_NOT_SUPPORTED_FOR_THIS_KEYTYPE);
672         return -2;
673     }
674     if (ctx->operation != EVP_PKEY_OP_DECRYPT) {
675         EVPerr(EVP_F_EVP_PKEY_DECRYPT, EVP_R_OPERATON_NOT_INITIALIZED);
676         return -1;
677     }
678     M_check_autoarg(ctx, out, outlen, EVP_F_EVP_PKEY_DECRYPT)
679         return ctx->pmeth->decrypt(ctx, out, outlen, in, inlen);
680 }