2 * Copyright 2006-2020 The OpenSSL Project Authors. All Rights Reserved.
4 * Licensed under the Apache License 2.0 (the "License"). You may not use
5 * this file except in compliance with the License. You can obtain a copy
6 * in the file LICENSE in the source distribution or at
7 * https://www.openssl.org/source/license.html
11 * Low level key APIs (DH etc) are deprecated for public use, but still ok for
14 #include "internal/deprecated.h"
18 #include <openssl/engine.h>
19 #include <openssl/evp.h>
20 #include <openssl/x509v3.h>
21 #include <openssl/core_names.h>
22 #include <openssl/dh.h>
23 #include <openssl/rsa.h>
24 #include <openssl/kdf.h>
25 #include "internal/cryptlib.h"
26 #include "crypto/asn1.h"
27 #include "crypto/evp.h"
28 #include "crypto/dh.h"
29 #include "crypto/ec.h"
30 #include "internal/ffc.h"
31 #include "internal/numbers.h"
32 #include "internal/provider.h"
33 #include "evp_local.h"
37 static int evp_pkey_ctx_store_cached_data(EVP_PKEY_CTX
*ctx
,
38 int keytype
, int optype
,
39 int cmd
, const char *name
,
40 const void *data
, size_t data_len
);
41 static void evp_pkey_ctx_free_cached_data(EVP_PKEY_CTX
*ctx
,
42 int cmd
, const char *name
);
43 static void evp_pkey_ctx_free_all_cached_data(EVP_PKEY_CTX
*ctx
);
45 typedef const EVP_PKEY_METHOD
*(*pmeth_fn
)(void);
46 typedef int sk_cmp_fn_type(const char *const *a
, const char *const *b
);
48 static STACK_OF(EVP_PKEY_METHOD
) *app_pkey_methods
= NULL
;
50 /* This array needs to be in order of NIDs */
51 static pmeth_fn standard_methods
[] = {
52 # ifndef OPENSSL_NO_RSA
55 # ifndef OPENSSL_NO_DH
58 # ifndef OPENSSL_NO_DSA
61 # ifndef OPENSSL_NO_EC
64 # ifndef OPENSSL_NO_RSA
65 ossl_rsa_pss_pkey_method
,
67 # ifndef OPENSSL_NO_DH
70 # ifndef OPENSSL_NO_EC
74 # ifndef OPENSSL_NO_EC
80 DECLARE_OBJ_BSEARCH_CMP_FN(const EVP_PKEY_METHOD
*, pmeth_fn
, pmeth_func
);
82 static int pmeth_func_cmp(const EVP_PKEY_METHOD
*const *a
, pmeth_fn
const *b
)
84 return ((*a
)->pkey_id
- ((**b
)())->pkey_id
);
87 IMPLEMENT_OBJ_BSEARCH_CMP_FN(const EVP_PKEY_METHOD
*, pmeth_fn
, pmeth_func
);
89 static int pmeth_cmp(const EVP_PKEY_METHOD
*const *a
,
90 const EVP_PKEY_METHOD
*const *b
)
92 return ((*a
)->pkey_id
- (*b
)->pkey_id
);
95 const EVP_PKEY_METHOD
*EVP_PKEY_meth_find(int type
)
99 const EVP_PKEY_METHOD
*t
= &tmp
;
102 if (app_pkey_methods
) {
104 idx
= sk_EVP_PKEY_METHOD_find(app_pkey_methods
, &tmp
);
106 return sk_EVP_PKEY_METHOD_value(app_pkey_methods
, idx
);
108 ret
= OBJ_bsearch_pmeth_func(&t
, standard_methods
,
109 sizeof(standard_methods
) /
111 if (ret
== NULL
|| *ret
== NULL
)
116 EVP_PKEY_METHOD
*EVP_PKEY_meth_new(int id
, int flags
)
118 EVP_PKEY_METHOD
*pmeth
;
120 pmeth
= OPENSSL_zalloc(sizeof(*pmeth
));
122 ERR_raise(ERR_LIB_EVP
, ERR_R_MALLOC_FAILURE
);
127 pmeth
->flags
= flags
| EVP_PKEY_FLAG_DYNAMIC
;
131 /* Three possible states: */
132 # define EVP_PKEY_STATE_UNKNOWN 0
133 # define EVP_PKEY_STATE_LEGACY 1
134 # define EVP_PKEY_STATE_PROVIDER 2
136 static int evp_pkey_ctx_state(EVP_PKEY_CTX
*ctx
)
138 if (ctx
->operation
== EVP_PKEY_OP_UNDEFINED
)
139 return EVP_PKEY_STATE_UNKNOWN
;
141 if ((EVP_PKEY_CTX_IS_DERIVE_OP(ctx
)
142 && ctx
->op
.kex
.exchprovctx
!= NULL
)
143 || (EVP_PKEY_CTX_IS_SIGNATURE_OP(ctx
)
144 && ctx
->op
.sig
.sigprovctx
!= NULL
)
145 || (EVP_PKEY_CTX_IS_ASYM_CIPHER_OP(ctx
)
146 && ctx
->op
.ciph
.ciphprovctx
!= NULL
)
147 || (EVP_PKEY_CTX_IS_GEN_OP(ctx
)
148 && ctx
->op
.keymgmt
.genctx
!= NULL
)
149 || (EVP_PKEY_CTX_IS_KEM_OP(ctx
)
150 && ctx
->op
.encap
.kemprovctx
!= NULL
))
151 return EVP_PKEY_STATE_PROVIDER
;
153 return EVP_PKEY_STATE_LEGACY
;
156 static void help_get_legacy_alg_type_from_keymgmt(const char *keytype
,
161 if (*type
== NID_undef
)
162 *type
= evp_pkey_name2type(keytype
);
165 static int get_legacy_alg_type_from_keymgmt(const EVP_KEYMGMT
*keymgmt
)
167 int type
= NID_undef
;
169 EVP_KEYMGMT_names_do_all(keymgmt
, help_get_legacy_alg_type_from_keymgmt
,
173 #endif /* FIPS_MODULE */
175 static EVP_PKEY_CTX
*int_ctx_new(OSSL_LIB_CTX
*libctx
,
176 EVP_PKEY
*pkey
, ENGINE
*e
,
177 const char *keytype
, const char *propquery
,
181 EVP_PKEY_CTX
*ret
= NULL
;
182 const EVP_PKEY_METHOD
*pmeth
= NULL
;
183 EVP_KEYMGMT
*keymgmt
= NULL
;
186 * If the given |pkey| is provided, we extract the keytype from its
187 * keymgmt and skip over the legacy code.
189 if (pkey
!= NULL
&& evp_pkey_is_provided(pkey
)) {
190 /* If we have an engine, something went wrong somewhere... */
191 if (!ossl_assert(e
== NULL
))
193 keytype
= evp_first_name(pkey
->keymgmt
->prov
, pkey
->keymgmt
->name_id
);
199 * TODO(3.0) This legacy code section should be removed when we stop
206 else if (keytype
!= NULL
)
207 id
= evp_pkey_name2type(keytype
);
211 /* If no ID was found here, we can only resort to find a keymgmt */
216 * Here, we extract what information we can for the purpose of
217 * supporting usage with implementations from providers, to make
218 * for a smooth transition from legacy stuff to provider based stuff.
220 * If an engine is given, this is entirely legacy, and we should not
221 * pretend anything else, so we only set the name when no engine is
222 * given. If both are already given, someone made a mistake, and
223 * since that can only happen internally, it's safe to make an
226 if (!ossl_assert(e
== NULL
|| keytype
== NULL
))
229 keytype
= OBJ_nid2sn(id
);
231 # ifndef OPENSSL_NO_ENGINE
232 if (e
== NULL
&& pkey
!= NULL
)
233 e
= pkey
->pmeth_engine
!= NULL
? pkey
->pmeth_engine
: pkey
->engine
;
234 /* Try to find an ENGINE which implements this method */
236 if (!ENGINE_init(e
)) {
237 ERR_raise(ERR_LIB_EVP
, ERR_R_ENGINE_LIB
);
241 e
= ENGINE_get_pkey_meth_engine(id
);
245 * If an ENGINE handled this method look it up. Otherwise use internal
249 pmeth
= ENGINE_get_pkey_meth(e
, id
);
252 pmeth
= EVP_PKEY_meth_find(id
);
255 #endif /* FIPS_MODULE */
258 * If there's no engine and there's a name, we try fetching a provider
261 if (e
== NULL
&& keytype
!= NULL
) {
262 keymgmt
= EVP_KEYMGMT_fetch(libctx
, keytype
, propquery
);
264 return NULL
; /* EVP_KEYMGMT_fetch() recorded an error */
268 * Chase down the legacy NID, as that might be needed for diverse
269 * purposes, such as ensure that EVP_PKEY_type() can return sensible
270 * values, or that there's a better chance to "downgrade" a key when
271 * needed. We go through all keymgmt names, because the keytype
272 * that's passed to this function doesn't necessarily translate
274 * TODO: Remove this when #legacy keys are gone.
276 if (keymgmt
!= NULL
) {
277 int tmp_id
= get_legacy_alg_type_from_keymgmt(keymgmt
);
279 if (tmp_id
!= NID_undef
) {
284 * It really really shouldn't differ. If it still does,
285 * something is very wrong.
287 if (!ossl_assert(id
== tmp_id
)) {
288 ERR_raise(ERR_LIB_EVP
, ERR_R_INTERNAL_ERROR
);
289 EVP_KEYMGMT_free(keymgmt
);
298 if (pmeth
== NULL
&& keymgmt
== NULL
) {
299 ERR_raise(ERR_LIB_EVP
, EVP_R_UNSUPPORTED_ALGORITHM
);
301 ret
= OPENSSL_zalloc(sizeof(*ret
));
303 ERR_raise(ERR_LIB_EVP
, ERR_R_MALLOC_FAILURE
);
306 #if !defined(OPENSSL_NO_ENGINE) && !defined(FIPS_MODULE)
307 if ((ret
== NULL
|| pmeth
== NULL
) && e
!= NULL
)
312 EVP_KEYMGMT_free(keymgmt
);
315 if (propquery
!= NULL
) {
316 ret
->propquery
= OPENSSL_strdup(propquery
);
317 if (ret
->propquery
== NULL
) {
318 EVP_KEYMGMT_free(keymgmt
);
322 ret
->libctx
= libctx
;
323 ret
->keytype
= keytype
;
324 ret
->keymgmt
= keymgmt
;
325 ret
->legacy_keytype
= id
; /* TODO: Remove when #legacy key are gone */
328 ret
->operation
= EVP_PKEY_OP_UNDEFINED
;
331 EVP_PKEY_up_ref(pkey
);
333 if (pmeth
!= NULL
&& pmeth
->init
!= NULL
) {
334 if (pmeth
->init(ret
) <= 0) {
336 EVP_PKEY_CTX_free(ret
);
344 /*- All methods below can also be used in FIPS_MODULE */
346 EVP_PKEY_CTX
*EVP_PKEY_CTX_new_from_name(OSSL_LIB_CTX
*libctx
,
348 const char *propquery
)
350 return int_ctx_new(libctx
, NULL
, NULL
, name
, propquery
, -1);
353 EVP_PKEY_CTX
*EVP_PKEY_CTX_new_from_pkey(OSSL_LIB_CTX
*libctx
, EVP_PKEY
*pkey
,
354 const char *propquery
)
356 return int_ctx_new(libctx
, pkey
, NULL
, NULL
, propquery
, -1);
359 void evp_pkey_ctx_free_old_ops(EVP_PKEY_CTX
*ctx
)
361 if (EVP_PKEY_CTX_IS_SIGNATURE_OP(ctx
)) {
362 if (ctx
->op
.sig
.sigprovctx
!= NULL
&& ctx
->op
.sig
.signature
!= NULL
)
363 ctx
->op
.sig
.signature
->freectx(ctx
->op
.sig
.sigprovctx
);
364 EVP_SIGNATURE_free(ctx
->op
.sig
.signature
);
365 ctx
->op
.sig
.sigprovctx
= NULL
;
366 ctx
->op
.sig
.signature
= NULL
;
367 } else if (EVP_PKEY_CTX_IS_DERIVE_OP(ctx
)) {
368 if (ctx
->op
.kex
.exchprovctx
!= NULL
&& ctx
->op
.kex
.exchange
!= NULL
)
369 ctx
->op
.kex
.exchange
->freectx(ctx
->op
.kex
.exchprovctx
);
370 EVP_KEYEXCH_free(ctx
->op
.kex
.exchange
);
371 ctx
->op
.kex
.exchprovctx
= NULL
;
372 ctx
->op
.kex
.exchange
= NULL
;
373 } else if (EVP_PKEY_CTX_IS_KEM_OP(ctx
)) {
374 if (ctx
->op
.encap
.kemprovctx
!= NULL
&& ctx
->op
.encap
.kem
!= NULL
)
375 ctx
->op
.encap
.kem
->freectx(ctx
->op
.encap
.kemprovctx
);
376 EVP_KEM_free(ctx
->op
.encap
.kem
);
377 ctx
->op
.encap
.kemprovctx
= NULL
;
378 ctx
->op
.encap
.kem
= NULL
;
380 else if (EVP_PKEY_CTX_IS_ASYM_CIPHER_OP(ctx
)) {
381 if (ctx
->op
.ciph
.ciphprovctx
!= NULL
&& ctx
->op
.ciph
.cipher
!= NULL
)
382 ctx
->op
.ciph
.cipher
->freectx(ctx
->op
.ciph
.ciphprovctx
);
383 EVP_ASYM_CIPHER_free(ctx
->op
.ciph
.cipher
);
384 ctx
->op
.ciph
.ciphprovctx
= NULL
;
385 ctx
->op
.ciph
.cipher
= NULL
;
386 } else if (EVP_PKEY_CTX_IS_GEN_OP(ctx
)) {
387 if (ctx
->op
.keymgmt
.genctx
!= NULL
&& ctx
->keymgmt
!= NULL
)
388 evp_keymgmt_gen_cleanup(ctx
->keymgmt
, ctx
->op
.keymgmt
.genctx
);
392 void EVP_PKEY_CTX_free(EVP_PKEY_CTX
*ctx
)
396 if (ctx
->pmeth
&& ctx
->pmeth
->cleanup
)
397 ctx
->pmeth
->cleanup(ctx
);
399 evp_pkey_ctx_free_old_ops(ctx
);
401 evp_pkey_ctx_free_all_cached_data(ctx
);
403 EVP_KEYMGMT_free(ctx
->keymgmt
);
405 OPENSSL_free(ctx
->propquery
);
406 EVP_PKEY_free(ctx
->pkey
);
407 EVP_PKEY_free(ctx
->peerkey
);
408 #if !defined(OPENSSL_NO_ENGINE) && !defined(FIPS_MODULE)
409 ENGINE_finish(ctx
->engine
);
411 BN_free(ctx
->rsa_pubexp
);
417 void EVP_PKEY_meth_get0_info(int *ppkey_id
, int *pflags
,
418 const EVP_PKEY_METHOD
*meth
)
421 *ppkey_id
= meth
->pkey_id
;
423 *pflags
= meth
->flags
;
426 void EVP_PKEY_meth_copy(EVP_PKEY_METHOD
*dst
, const EVP_PKEY_METHOD
*src
)
428 int pkey_id
= dst
->pkey_id
;
429 int flags
= dst
->flags
;
433 /* We only copy the function pointers so restore the other values */
434 dst
->pkey_id
= pkey_id
;
438 void EVP_PKEY_meth_free(EVP_PKEY_METHOD
*pmeth
)
440 if (pmeth
&& (pmeth
->flags
& EVP_PKEY_FLAG_DYNAMIC
))
444 EVP_PKEY_CTX
*EVP_PKEY_CTX_new(EVP_PKEY
*pkey
, ENGINE
*e
)
446 return int_ctx_new(NULL
, pkey
, e
, NULL
, NULL
, -1);
449 EVP_PKEY_CTX
*EVP_PKEY_CTX_new_id(int id
, ENGINE
*e
)
451 return int_ctx_new(NULL
, NULL
, e
, NULL
, NULL
, id
);
454 EVP_PKEY_CTX
*EVP_PKEY_CTX_dup(const EVP_PKEY_CTX
*pctx
)
458 if (((pctx
->pmeth
== NULL
) || (pctx
->pmeth
->copy
== NULL
))
459 && ((EVP_PKEY_CTX_IS_DERIVE_OP(pctx
)
460 && pctx
->op
.kex
.exchprovctx
== NULL
)
461 || (EVP_PKEY_CTX_IS_SIGNATURE_OP(pctx
)
462 && pctx
->op
.sig
.sigprovctx
== NULL
)))
464 # ifndef OPENSSL_NO_ENGINE
465 /* Make sure it's safe to copy a pkey context using an ENGINE */
466 if (pctx
->engine
&& !ENGINE_init(pctx
->engine
)) {
467 ERR_raise(ERR_LIB_EVP
, ERR_R_ENGINE_LIB
);
471 rctx
= OPENSSL_zalloc(sizeof(*rctx
));
473 ERR_raise(ERR_LIB_EVP
, ERR_R_MALLOC_FAILURE
);
477 if (pctx
->pkey
!= NULL
)
478 EVP_PKEY_up_ref(pctx
->pkey
);
479 rctx
->pkey
= pctx
->pkey
;
480 rctx
->operation
= pctx
->operation
;
481 rctx
->libctx
= pctx
->libctx
;
482 rctx
->keytype
= pctx
->keytype
;
483 rctx
->propquery
= NULL
;
484 if (pctx
->propquery
!= NULL
) {
485 rctx
->propquery
= OPENSSL_strdup(pctx
->propquery
);
486 if (rctx
->propquery
== NULL
) {
491 rctx
->legacy_keytype
= pctx
->legacy_keytype
;
493 if (EVP_PKEY_CTX_IS_DERIVE_OP(pctx
)) {
494 if (pctx
->op
.kex
.exchange
!= NULL
) {
495 rctx
->op
.kex
.exchange
= pctx
->op
.kex
.exchange
;
496 if (!EVP_KEYEXCH_up_ref(rctx
->op
.kex
.exchange
))
499 if (pctx
->op
.kex
.exchprovctx
!= NULL
) {
500 if (!ossl_assert(pctx
->op
.kex
.exchange
!= NULL
))
502 rctx
->op
.kex
.exchprovctx
503 = pctx
->op
.kex
.exchange
->dupctx(pctx
->op
.kex
.exchprovctx
);
504 if (rctx
->op
.kex
.exchprovctx
== NULL
) {
505 EVP_KEYEXCH_free(rctx
->op
.kex
.exchange
);
510 } else if (EVP_PKEY_CTX_IS_SIGNATURE_OP(pctx
)) {
511 if (pctx
->op
.sig
.signature
!= NULL
) {
512 rctx
->op
.sig
.signature
= pctx
->op
.sig
.signature
;
513 if (!EVP_SIGNATURE_up_ref(rctx
->op
.sig
.signature
))
516 if (pctx
->op
.sig
.sigprovctx
!= NULL
) {
517 if (!ossl_assert(pctx
->op
.sig
.signature
!= NULL
))
519 rctx
->op
.sig
.sigprovctx
520 = pctx
->op
.sig
.signature
->dupctx(pctx
->op
.sig
.sigprovctx
);
521 if (rctx
->op
.sig
.sigprovctx
== NULL
) {
522 EVP_SIGNATURE_free(rctx
->op
.sig
.signature
);
527 } else if (EVP_PKEY_CTX_IS_ASYM_CIPHER_OP(pctx
)) {
528 if (pctx
->op
.ciph
.cipher
!= NULL
) {
529 rctx
->op
.ciph
.cipher
= pctx
->op
.ciph
.cipher
;
530 if (!EVP_ASYM_CIPHER_up_ref(rctx
->op
.ciph
.cipher
))
533 if (pctx
->op
.ciph
.ciphprovctx
!= NULL
) {
534 if (!ossl_assert(pctx
->op
.ciph
.cipher
!= NULL
))
536 rctx
->op
.ciph
.ciphprovctx
537 = pctx
->op
.ciph
.cipher
->dupctx(pctx
->op
.ciph
.ciphprovctx
);
538 if (rctx
->op
.ciph
.ciphprovctx
== NULL
) {
539 EVP_ASYM_CIPHER_free(rctx
->op
.ciph
.cipher
);
544 } else if (EVP_PKEY_CTX_IS_KEM_OP(pctx
)) {
545 if (pctx
->op
.encap
.kem
!= NULL
) {
546 rctx
->op
.encap
.kem
= pctx
->op
.encap
.kem
;
547 if (!EVP_KEM_up_ref(rctx
->op
.encap
.kem
))
550 if (pctx
->op
.encap
.kemprovctx
!= NULL
) {
551 if (!ossl_assert(pctx
->op
.encap
.kem
!= NULL
))
553 rctx
->op
.encap
.kemprovctx
554 = pctx
->op
.encap
.kem
->dupctx(pctx
->op
.encap
.kemprovctx
);
555 if (rctx
->op
.encap
.kemprovctx
== NULL
) {
556 EVP_KEM_free(rctx
->op
.encap
.kem
);
561 } else if (EVP_PKEY_CTX_IS_GEN_OP(pctx
)) {
562 /* Not supported - This would need a gen_dupctx() to work */
566 rctx
->pmeth
= pctx
->pmeth
;
567 # ifndef OPENSSL_NO_ENGINE
568 rctx
->engine
= pctx
->engine
;
571 if (pctx
->peerkey
!= NULL
)
572 EVP_PKEY_up_ref(pctx
->peerkey
);
573 rctx
->peerkey
= pctx
->peerkey
;
575 if (pctx
->pmeth
== NULL
) {
576 if (rctx
->operation
== EVP_PKEY_OP_UNDEFINED
) {
577 EVP_KEYMGMT
*tmp_keymgmt
= pctx
->keymgmt
;
580 provkey
= evp_pkey_export_to_provider(pctx
->pkey
, pctx
->libctx
,
581 &tmp_keymgmt
, pctx
->propquery
);
584 if (!EVP_KEYMGMT_up_ref(tmp_keymgmt
))
586 EVP_KEYMGMT_free(rctx
->keymgmt
);
587 rctx
->keymgmt
= tmp_keymgmt
;
592 if (pctx
->pmeth
->copy(rctx
, pctx
) > 0)
596 EVP_PKEY_CTX_free(rctx
);
603 int EVP_PKEY_meth_add0(const EVP_PKEY_METHOD
*pmeth
)
605 if (app_pkey_methods
== NULL
) {
606 app_pkey_methods
= sk_EVP_PKEY_METHOD_new(pmeth_cmp
);
607 if (app_pkey_methods
== NULL
){
608 ERR_raise(ERR_LIB_EVP
, ERR_R_MALLOC_FAILURE
);
612 if (!sk_EVP_PKEY_METHOD_push(app_pkey_methods
, pmeth
)) {
613 ERR_raise(ERR_LIB_EVP
, ERR_R_MALLOC_FAILURE
);
616 sk_EVP_PKEY_METHOD_sort(app_pkey_methods
);
620 void evp_app_cleanup_int(void)
622 if (app_pkey_methods
!= NULL
)
623 sk_EVP_PKEY_METHOD_pop_free(app_pkey_methods
, EVP_PKEY_meth_free
);
626 int EVP_PKEY_meth_remove(const EVP_PKEY_METHOD
*pmeth
)
628 const EVP_PKEY_METHOD
*ret
;
630 ret
= sk_EVP_PKEY_METHOD_delete_ptr(app_pkey_methods
, pmeth
);
632 return ret
== NULL
? 0 : 1;
635 size_t EVP_PKEY_meth_get_count(void)
637 size_t rv
= OSSL_NELEM(standard_methods
);
639 if (app_pkey_methods
)
640 rv
+= sk_EVP_PKEY_METHOD_num(app_pkey_methods
);
644 const EVP_PKEY_METHOD
*EVP_PKEY_meth_get0(size_t idx
)
646 if (idx
< OSSL_NELEM(standard_methods
))
647 return (standard_methods
[idx
])();
648 if (app_pkey_methods
== NULL
)
650 idx
-= OSSL_NELEM(standard_methods
);
651 if (idx
>= (size_t)sk_EVP_PKEY_METHOD_num(app_pkey_methods
))
653 return sk_EVP_PKEY_METHOD_value(app_pkey_methods
, idx
);
657 int EVP_PKEY_CTX_set_params(EVP_PKEY_CTX
*ctx
, OSSL_PARAM
*params
)
659 if (EVP_PKEY_CTX_IS_DERIVE_OP(ctx
)
660 && ctx
->op
.kex
.exchprovctx
!= NULL
661 && ctx
->op
.kex
.exchange
!= NULL
662 && ctx
->op
.kex
.exchange
->set_ctx_params
!= NULL
)
663 return ctx
->op
.kex
.exchange
->set_ctx_params(ctx
->op
.kex
.exchprovctx
,
665 if (EVP_PKEY_CTX_IS_SIGNATURE_OP(ctx
)
666 && ctx
->op
.sig
.sigprovctx
!= NULL
667 && ctx
->op
.sig
.signature
!= NULL
668 && ctx
->op
.sig
.signature
->set_ctx_params
!= NULL
)
669 return ctx
->op
.sig
.signature
->set_ctx_params(ctx
->op
.sig
.sigprovctx
,
671 if (EVP_PKEY_CTX_IS_ASYM_CIPHER_OP(ctx
)
672 && ctx
->op
.ciph
.ciphprovctx
!= NULL
673 && ctx
->op
.ciph
.cipher
!= NULL
674 && ctx
->op
.ciph
.cipher
->set_ctx_params
!= NULL
)
675 return ctx
->op
.ciph
.cipher
->set_ctx_params(ctx
->op
.ciph
.ciphprovctx
,
677 if (EVP_PKEY_CTX_IS_GEN_OP(ctx
)
678 && ctx
->op
.keymgmt
.genctx
!= NULL
679 && ctx
->keymgmt
!= NULL
680 && ctx
->keymgmt
->gen_set_params
!= NULL
)
681 return evp_keymgmt_gen_set_params(ctx
->keymgmt
, ctx
->op
.keymgmt
.genctx
,
683 if (EVP_PKEY_CTX_IS_KEM_OP(ctx
)
684 && ctx
->op
.encap
.kemprovctx
!= NULL
685 && ctx
->op
.encap
.kem
!= NULL
686 && ctx
->op
.encap
.kem
->set_ctx_params
!= NULL
)
687 return ctx
->op
.encap
.kem
->set_ctx_params(ctx
->op
.encap
.kemprovctx
,
692 int EVP_PKEY_CTX_get_params(EVP_PKEY_CTX
*ctx
, OSSL_PARAM
*params
)
694 if (EVP_PKEY_CTX_IS_DERIVE_OP(ctx
)
695 && ctx
->op
.kex
.exchprovctx
!= NULL
696 && ctx
->op
.kex
.exchange
!= NULL
697 && ctx
->op
.kex
.exchange
->get_ctx_params
!= NULL
)
698 return ctx
->op
.kex
.exchange
->get_ctx_params(ctx
->op
.kex
.exchprovctx
,
700 if (EVP_PKEY_CTX_IS_SIGNATURE_OP(ctx
)
701 && ctx
->op
.sig
.sigprovctx
!= NULL
702 && ctx
->op
.sig
.signature
!= NULL
703 && ctx
->op
.sig
.signature
->get_ctx_params
!= NULL
)
704 return ctx
->op
.sig
.signature
->get_ctx_params(ctx
->op
.sig
.sigprovctx
,
706 if (EVP_PKEY_CTX_IS_ASYM_CIPHER_OP(ctx
)
707 && ctx
->op
.ciph
.ciphprovctx
!= NULL
708 && ctx
->op
.ciph
.cipher
!= NULL
709 && ctx
->op
.ciph
.cipher
->get_ctx_params
!= NULL
)
710 return ctx
->op
.ciph
.cipher
->get_ctx_params(ctx
->op
.ciph
.ciphprovctx
,
712 if (EVP_PKEY_CTX_IS_KEM_OP(ctx
)
713 && ctx
->op
.encap
.kemprovctx
!= NULL
714 && ctx
->op
.encap
.kem
!= NULL
715 && ctx
->op
.encap
.kem
->get_ctx_params
!= NULL
)
716 return ctx
->op
.encap
.kem
->get_ctx_params(ctx
->op
.encap
.kemprovctx
,
722 const OSSL_PARAM
*EVP_PKEY_CTX_gettable_params(EVP_PKEY_CTX
*ctx
)
726 if (EVP_PKEY_CTX_IS_DERIVE_OP(ctx
)
727 && ctx
->op
.kex
.exchange
!= NULL
728 && ctx
->op
.kex
.exchange
->gettable_ctx_params
!= NULL
) {
729 provctx
= ossl_provider_ctx(EVP_KEYEXCH_provider(ctx
->op
.kex
.exchange
));
730 return ctx
->op
.kex
.exchange
->gettable_ctx_params(provctx
);
732 if (EVP_PKEY_CTX_IS_SIGNATURE_OP(ctx
)
733 && ctx
->op
.sig
.signature
!= NULL
734 && ctx
->op
.sig
.signature
->gettable_ctx_params
!= NULL
) {
735 provctx
= ossl_provider_ctx(
736 EVP_SIGNATURE_provider(ctx
->op
.sig
.signature
));
737 return ctx
->op
.sig
.signature
->gettable_ctx_params(provctx
);
739 if (EVP_PKEY_CTX_IS_ASYM_CIPHER_OP(ctx
)
740 && ctx
->op
.ciph
.cipher
!= NULL
741 && ctx
->op
.ciph
.cipher
->gettable_ctx_params
!= NULL
) {
742 provctx
= ossl_provider_ctx(
743 EVP_ASYM_CIPHER_provider(ctx
->op
.ciph
.cipher
));
744 return ctx
->op
.ciph
.cipher
->gettable_ctx_params(provctx
);
746 if (EVP_PKEY_CTX_IS_KEM_OP(ctx
)
747 && ctx
->op
.encap
.kem
!= NULL
748 && ctx
->op
.encap
.kem
->gettable_ctx_params
!= NULL
) {
749 provctx
= ossl_provider_ctx(EVP_KEM_provider(ctx
->op
.encap
.kem
));
750 return ctx
->op
.encap
.kem
->gettable_ctx_params(provctx
);
755 const OSSL_PARAM
*EVP_PKEY_CTX_settable_params(EVP_PKEY_CTX
*ctx
)
759 if (EVP_PKEY_CTX_IS_DERIVE_OP(ctx
)
760 && ctx
->op
.kex
.exchange
!= NULL
761 && ctx
->op
.kex
.exchange
->settable_ctx_params
!= NULL
) {
762 provctx
= ossl_provider_ctx(EVP_KEYEXCH_provider(ctx
->op
.kex
.exchange
));
763 return ctx
->op
.kex
.exchange
->settable_ctx_params(provctx
);
765 if (EVP_PKEY_CTX_IS_SIGNATURE_OP(ctx
)
766 && ctx
->op
.sig
.signature
!= NULL
767 && ctx
->op
.sig
.signature
->settable_ctx_params
!= NULL
) {
768 provctx
= ossl_provider_ctx(
769 EVP_SIGNATURE_provider(ctx
->op
.sig
.signature
));
770 return ctx
->op
.sig
.signature
->settable_ctx_params(provctx
);
772 if (EVP_PKEY_CTX_IS_ASYM_CIPHER_OP(ctx
)
773 && ctx
->op
.ciph
.cipher
!= NULL
774 && ctx
->op
.ciph
.cipher
->settable_ctx_params
!= NULL
) {
775 provctx
= ossl_provider_ctx(
776 EVP_ASYM_CIPHER_provider(ctx
->op
.ciph
.cipher
));
777 return ctx
->op
.ciph
.cipher
->settable_ctx_params(provctx
);
779 if (EVP_PKEY_CTX_IS_GEN_OP(ctx
)
780 && ctx
->keymgmt
!= NULL
)
781 return EVP_KEYMGMT_gen_settable_params(ctx
->keymgmt
);
782 if (EVP_PKEY_CTX_IS_KEM_OP(ctx
)
783 && ctx
->op
.encap
.kem
!= NULL
784 && ctx
->op
.encap
.kem
->settable_ctx_params
!= NULL
) {
785 provctx
= ossl_provider_ctx(EVP_KEM_provider(ctx
->op
.encap
.kem
));
786 return ctx
->op
.encap
.kem
->settable_ctx_params(provctx
);
792 * Internal helpers for stricter EVP_PKEY_CTX_{set,get}_params().
794 * Return 1 on success, 0 or negative for errors.
796 * In particular they return -2 if any of the params is not supported.
798 * They are not available in FIPS_MODULE as they depend on
799 * - EVP_PKEY_CTX_{get,set}_params()
800 * - EVP_PKEY_CTX_{gettable,settable}_params()
803 int evp_pkey_ctx_set_params_strict(EVP_PKEY_CTX
*ctx
, OSSL_PARAM
*params
)
807 if (ctx
== NULL
|| params
== NULL
)
810 for (p
= params
; p
->key
!= NULL
; p
++) {
811 /* Check the ctx actually understands this parameter */
812 if (OSSL_PARAM_locate_const(EVP_PKEY_CTX_settable_params(ctx
),
817 return EVP_PKEY_CTX_set_params(ctx
, params
);
820 int evp_pkey_ctx_get_params_strict(EVP_PKEY_CTX
*ctx
, OSSL_PARAM
*params
)
824 if (ctx
== NULL
|| params
== NULL
)
827 for (p
= params
; p
->key
!= NULL
; p
++ ) {
828 /* Check the ctx actually understands this parameter */
829 if (OSSL_PARAM_locate_const(EVP_PKEY_CTX_gettable_params(ctx
),
834 return EVP_PKEY_CTX_get_params(ctx
, params
);
837 int EVP_PKEY_CTX_get_signature_md(EVP_PKEY_CTX
*ctx
, const EVP_MD
**md
)
839 OSSL_PARAM sig_md_params
[2], *p
= sig_md_params
;
840 /* 80 should be big enough */
844 if (ctx
== NULL
|| !EVP_PKEY_CTX_IS_SIGNATURE_OP(ctx
)) {
845 ERR_raise(ERR_LIB_EVP
, EVP_R_COMMAND_NOT_SUPPORTED
);
846 /* Uses the same return values as EVP_PKEY_CTX_ctrl */
850 /* TODO(3.0): Remove this eventually when no more legacy */
851 if (ctx
->op
.sig
.sigprovctx
== NULL
)
852 return EVP_PKEY_CTX_ctrl(ctx
, -1, EVP_PKEY_OP_TYPE_SIG
,
853 EVP_PKEY_CTRL_GET_MD
, 0, (void *)(md
));
855 *p
++ = OSSL_PARAM_construct_utf8_string(OSSL_SIGNATURE_PARAM_DIGEST
,
858 *p
= OSSL_PARAM_construct_end();
860 if (!EVP_PKEY_CTX_get_params(ctx
, sig_md_params
))
863 tmp
= evp_get_digestbyname_ex(ctx
->libctx
, name
);
872 static int evp_pkey_ctx_set_md(EVP_PKEY_CTX
*ctx
, const EVP_MD
*md
,
873 int fallback
, const char *param
, int op
,
876 OSSL_PARAM md_params
[2], *p
= md_params
;
879 if (ctx
== NULL
|| (ctx
->operation
& op
) == 0) {
880 ERR_raise(ERR_LIB_EVP
, EVP_R_COMMAND_NOT_SUPPORTED
);
881 /* Uses the same return values as EVP_PKEY_CTX_ctrl */
885 /* TODO(3.0): Remove this eventually when no more legacy */
887 return EVP_PKEY_CTX_ctrl(ctx
, -1, op
, ctrl
, 0, (void *)(md
));
892 name
= EVP_MD_name(md
);
895 *p
++ = OSSL_PARAM_construct_utf8_string(param
,
897 * Cast away the const. This is read
898 * only so should be safe
901 *p
= OSSL_PARAM_construct_end();
903 return EVP_PKEY_CTX_set_params(ctx
, md_params
);
906 int EVP_PKEY_CTX_set_signature_md(EVP_PKEY_CTX
*ctx
, const EVP_MD
*md
)
908 return evp_pkey_ctx_set_md(ctx
, md
, ctx
->op
.sig
.sigprovctx
== NULL
,
909 OSSL_SIGNATURE_PARAM_DIGEST
,
910 EVP_PKEY_OP_TYPE_SIG
, EVP_PKEY_CTRL_MD
);
913 int EVP_PKEY_CTX_set_tls1_prf_md(EVP_PKEY_CTX
*ctx
, const EVP_MD
*md
)
915 return evp_pkey_ctx_set_md(ctx
, md
, ctx
->op
.kex
.exchprovctx
== NULL
,
916 OSSL_KDF_PARAM_DIGEST
,
917 EVP_PKEY_OP_DERIVE
, EVP_PKEY_CTRL_TLS_MD
);
920 static int evp_pkey_ctx_set1_octet_string(EVP_PKEY_CTX
*ctx
, int fallback
,
921 const char *param
, int op
, int ctrl
,
922 const unsigned char *data
,
925 OSSL_PARAM octet_string_params
[2], *p
= octet_string_params
;
927 if (ctx
== NULL
|| (ctx
->operation
& op
) == 0) {
928 ERR_raise(ERR_LIB_EVP
, EVP_R_COMMAND_NOT_SUPPORTED
);
929 /* Uses the same return values as EVP_PKEY_CTX_ctrl */
933 /* TODO(3.0): Remove this eventually when no more legacy */
935 return EVP_PKEY_CTX_ctrl(ctx
, -1, op
, ctrl
, datalen
, (void *)(data
));
938 ERR_raise(ERR_LIB_EVP
, EVP_R_INVALID_LENGTH
);
942 *p
++ = OSSL_PARAM_construct_octet_string(param
,
944 * Cast away the const. This is read
945 * only so should be safe
947 (unsigned char *)data
,
949 *p
= OSSL_PARAM_construct_end();
951 return EVP_PKEY_CTX_set_params(ctx
, octet_string_params
);
954 int EVP_PKEY_CTX_set1_tls1_prf_secret(EVP_PKEY_CTX
*ctx
,
955 const unsigned char *sec
, int seclen
)
957 return evp_pkey_ctx_set1_octet_string(ctx
, ctx
->op
.kex
.exchprovctx
== NULL
,
958 OSSL_KDF_PARAM_SECRET
,
960 EVP_PKEY_CTRL_TLS_SECRET
,
964 int EVP_PKEY_CTX_add1_tls1_prf_seed(EVP_PKEY_CTX
*ctx
,
965 const unsigned char *seed
, int seedlen
)
967 return evp_pkey_ctx_set1_octet_string(ctx
, ctx
->op
.kex
.exchprovctx
== NULL
,
970 EVP_PKEY_CTRL_TLS_SEED
,
974 int EVP_PKEY_CTX_set_hkdf_md(EVP_PKEY_CTX
*ctx
, const EVP_MD
*md
)
976 return evp_pkey_ctx_set_md(ctx
, md
, ctx
->op
.kex
.exchprovctx
== NULL
,
977 OSSL_KDF_PARAM_DIGEST
,
978 EVP_PKEY_OP_DERIVE
, EVP_PKEY_CTRL_HKDF_MD
);
981 int EVP_PKEY_CTX_set1_hkdf_salt(EVP_PKEY_CTX
*ctx
,
982 const unsigned char *salt
, int saltlen
)
984 return evp_pkey_ctx_set1_octet_string(ctx
, ctx
->op
.kex
.exchprovctx
== NULL
,
987 EVP_PKEY_CTRL_HKDF_SALT
,
991 int EVP_PKEY_CTX_set1_hkdf_key(EVP_PKEY_CTX
*ctx
,
992 const unsigned char *key
, int keylen
)
994 return evp_pkey_ctx_set1_octet_string(ctx
, ctx
->op
.kex
.exchprovctx
== NULL
,
997 EVP_PKEY_CTRL_HKDF_KEY
,
1001 int EVP_PKEY_CTX_add1_hkdf_info(EVP_PKEY_CTX
*ctx
,
1002 const unsigned char *info
, int infolen
)
1004 return evp_pkey_ctx_set1_octet_string(ctx
, ctx
->op
.kex
.exchprovctx
== NULL
,
1005 OSSL_KDF_PARAM_INFO
,
1007 EVP_PKEY_CTRL_HKDF_INFO
,
1011 int EVP_PKEY_CTX_hkdf_mode(EVP_PKEY_CTX
*ctx
, int mode
)
1013 OSSL_PARAM int_params
[2], *p
= int_params
;
1015 if (ctx
== NULL
|| !EVP_PKEY_CTX_IS_DERIVE_OP(ctx
)) {
1016 ERR_raise(ERR_LIB_EVP
, EVP_R_COMMAND_NOT_SUPPORTED
);
1017 /* Uses the same return values as EVP_PKEY_CTX_ctrl */
1021 /* TODO(3.0): Remove this eventually when no more legacy */
1022 if (ctx
->op
.kex
.exchprovctx
== NULL
)
1023 return EVP_PKEY_CTX_ctrl(ctx
, -1, EVP_PKEY_OP_DERIVE
,
1024 EVP_PKEY_CTRL_HKDF_MODE
, mode
, NULL
);
1028 ERR_raise(ERR_LIB_EVP
, EVP_R_INVALID_VALUE
);
1032 *p
++ = OSSL_PARAM_construct_int(OSSL_KDF_PARAM_MODE
, &mode
);
1033 *p
= OSSL_PARAM_construct_end();
1035 return EVP_PKEY_CTX_set_params(ctx
, int_params
);
1038 int EVP_PKEY_CTX_set1_pbe_pass(EVP_PKEY_CTX
*ctx
, const char *pass
,
1041 return evp_pkey_ctx_set1_octet_string(ctx
, ctx
->op
.kex
.exchprovctx
== NULL
,
1042 OSSL_KDF_PARAM_PASSWORD
,
1045 (const unsigned char *)pass
, passlen
);
1048 int EVP_PKEY_CTX_set1_scrypt_salt(EVP_PKEY_CTX
*ctx
,
1049 const unsigned char *salt
, int saltlen
)
1051 return evp_pkey_ctx_set1_octet_string(ctx
, ctx
->op
.kex
.exchprovctx
== NULL
,
1052 OSSL_KDF_PARAM_SALT
,
1054 EVP_PKEY_CTRL_SCRYPT_SALT
,
1058 static int evp_pkey_ctx_set_uint64(EVP_PKEY_CTX
*ctx
, const char *param
,
1059 int op
, int ctrl
, uint64_t val
)
1061 OSSL_PARAM uint64_params
[2], *p
= uint64_params
;
1063 if (ctx
== NULL
|| !EVP_PKEY_CTX_IS_DERIVE_OP(ctx
)) {
1064 ERR_raise(ERR_LIB_EVP
, EVP_R_COMMAND_NOT_SUPPORTED
);
1065 /* Uses the same return values as EVP_PKEY_CTX_ctrl */
1069 /* TODO(3.0): Remove this eventually when no more legacy */
1070 if (ctx
->op
.kex
.exchprovctx
== NULL
)
1071 return EVP_PKEY_CTX_ctrl_uint64(ctx
, -1, op
, ctrl
, val
);
1073 *p
++ = OSSL_PARAM_construct_uint64(param
, &val
);
1074 *p
= OSSL_PARAM_construct_end();
1076 return EVP_PKEY_CTX_set_params(ctx
, uint64_params
);
1079 int EVP_PKEY_CTX_set_scrypt_N(EVP_PKEY_CTX
*ctx
, uint64_t n
)
1081 return evp_pkey_ctx_set_uint64(ctx
, OSSL_KDF_PARAM_SCRYPT_N
,
1082 EVP_PKEY_OP_DERIVE
, EVP_PKEY_CTRL_SCRYPT_N
,
1086 int EVP_PKEY_CTX_set_scrypt_r(EVP_PKEY_CTX
*ctx
, uint64_t r
)
1088 return evp_pkey_ctx_set_uint64(ctx
, OSSL_KDF_PARAM_SCRYPT_R
,
1089 EVP_PKEY_OP_DERIVE
, EVP_PKEY_CTRL_SCRYPT_R
,
1093 int EVP_PKEY_CTX_set_scrypt_p(EVP_PKEY_CTX
*ctx
, uint64_t p
)
1095 return evp_pkey_ctx_set_uint64(ctx
, OSSL_KDF_PARAM_SCRYPT_P
,
1096 EVP_PKEY_OP_DERIVE
, EVP_PKEY_CTRL_SCRYPT_P
,
1100 int EVP_PKEY_CTX_set_scrypt_maxmem_bytes(EVP_PKEY_CTX
*ctx
,
1101 uint64_t maxmem_bytes
)
1103 return evp_pkey_ctx_set_uint64(ctx
, OSSL_KDF_PARAM_SCRYPT_MAXMEM
,
1105 EVP_PKEY_CTRL_SCRYPT_MAXMEM_BYTES
,
1109 int EVP_PKEY_CTX_set_mac_key(EVP_PKEY_CTX
*ctx
, const unsigned char *key
,
1112 return evp_pkey_ctx_set1_octet_string(ctx
, ctx
->op
.keymgmt
.genctx
== NULL
,
1113 OSSL_PKEY_PARAM_PRIV_KEY
,
1115 EVP_PKEY_CTRL_SET_MAC_KEY
,
1119 int EVP_PKEY_CTX_set_kem_op(EVP_PKEY_CTX
*ctx
, const char *op
)
1121 OSSL_PARAM params
[2], *p
= params
;
1123 if (ctx
== NULL
|| op
== NULL
) {
1124 ERR_raise(ERR_LIB_EVP
, EVP_R_INVALID_VALUE
);
1127 if (!EVP_PKEY_CTX_IS_KEM_OP(ctx
)) {
1128 ERR_raise(ERR_LIB_EVP
, EVP_R_COMMAND_NOT_SUPPORTED
);
1131 *p
++ = OSSL_PARAM_construct_utf8_string(OSSL_KEM_PARAM_OPERATION
,
1133 *p
= OSSL_PARAM_construct_end();
1134 return EVP_PKEY_CTX_set_params(ctx
, params
);
1137 int evp_pkey_ctx_set1_id_prov(EVP_PKEY_CTX
*ctx
, const void *id
, int len
)
1139 OSSL_PARAM params
[2], *p
= params
;
1142 if (!EVP_PKEY_CTX_IS_SIGNATURE_OP(ctx
)) {
1143 ERR_raise(ERR_LIB_EVP
, EVP_R_COMMAND_NOT_SUPPORTED
);
1144 /* Uses the same return values as EVP_PKEY_CTX_ctrl */
1148 *p
++ = OSSL_PARAM_construct_octet_string(OSSL_PKEY_PARAM_DIST_ID
,
1150 * Cast away the const. This is
1151 * read only so should be safe
1153 (void *)id
, (size_t)len
);
1154 *p
++ = OSSL_PARAM_construct_end();
1156 ret
= evp_pkey_ctx_set_params_strict(ctx
, params
);
1158 ERR_raise(ERR_LIB_EVP
, EVP_R_COMMAND_NOT_SUPPORTED
);
1162 int EVP_PKEY_CTX_set1_id(EVP_PKEY_CTX
*ctx
, const void *id
, int len
)
1164 return EVP_PKEY_CTX_ctrl(ctx
, -1, -1,
1165 EVP_PKEY_CTRL_SET1_ID
, (int)len
, (void*)(id
));
1168 static int get1_id_data(EVP_PKEY_CTX
*ctx
, void *id
, size_t *id_len
)
1171 void *tmp_id
= NULL
;
1172 OSSL_PARAM params
[2], *p
= params
;
1174 if (!EVP_PKEY_CTX_IS_SIGNATURE_OP(ctx
)) {
1175 ERR_raise(ERR_LIB_EVP
, EVP_R_COMMAND_NOT_SUPPORTED
);
1176 /* Uses the same return values as EVP_PKEY_CTX_ctrl */
1180 *p
++ = OSSL_PARAM_construct_octet_ptr(OSSL_PKEY_PARAM_DIST_ID
,
1182 *p
++ = OSSL_PARAM_construct_end();
1184 ret
= evp_pkey_ctx_get_params_strict(ctx
, params
);
1186 ERR_raise(ERR_LIB_EVP
, EVP_R_COMMAND_NOT_SUPPORTED
);
1187 } else if (ret
> 0) {
1188 size_t tmp_id_len
= params
[0].return_size
;
1191 memcpy(id
, tmp_id
, tmp_id_len
);
1193 *id_len
= tmp_id_len
;
1198 int evp_pkey_ctx_get1_id_prov(EVP_PKEY_CTX
*ctx
, void *id
)
1200 return get1_id_data(ctx
, id
, NULL
);
1203 int evp_pkey_ctx_get1_id_len_prov(EVP_PKEY_CTX
*ctx
, size_t *id_len
)
1205 return get1_id_data(ctx
, NULL
, id_len
);
1208 int EVP_PKEY_CTX_get1_id(EVP_PKEY_CTX
*ctx
, void *id
)
1210 return EVP_PKEY_CTX_ctrl(ctx
, -1, -1, EVP_PKEY_CTRL_GET1_ID
, 0, (void*)id
);
1213 int EVP_PKEY_CTX_get1_id_len(EVP_PKEY_CTX
*ctx
, size_t *id_len
)
1215 return EVP_PKEY_CTX_ctrl(ctx
, -1, -1,
1216 EVP_PKEY_CTRL_GET1_ID_LEN
, 0, (void*)id_len
);
1219 static int legacy_ctrl_to_param(EVP_PKEY_CTX
*ctx
, int keytype
, int optype
,
1220 int cmd
, int p1
, void *p2
)
1223 case EVP_PKEY_CTRL_SET1_ID
:
1224 return evp_pkey_ctx_set1_id_prov(ctx
, p2
, p1
);
1225 case EVP_PKEY_CTRL_GET1_ID
:
1226 return evp_pkey_ctx_get1_id_prov(ctx
, p2
);
1227 case EVP_PKEY_CTRL_GET1_ID_LEN
:
1228 return evp_pkey_ctx_get1_id_len_prov(ctx
, p2
);
1231 if (keytype
== EVP_PKEY_DHX
) {
1233 case EVP_PKEY_CTRL_DH_KDF_TYPE
:
1234 return EVP_PKEY_CTX_set_dh_kdf_type(ctx
, p1
);
1235 case EVP_PKEY_CTRL_DH_KDF_MD
:
1236 return EVP_PKEY_CTX_set_dh_kdf_md(ctx
, p2
);
1237 case EVP_PKEY_CTRL_DH_KDF_OUTLEN
:
1238 return EVP_PKEY_CTX_set_dh_kdf_outlen(ctx
, p1
);
1239 case EVP_PKEY_CTRL_DH_KDF_UKM
:
1240 return EVP_PKEY_CTX_set0_dh_kdf_ukm(ctx
, p2
, p1
);
1241 case EVP_PKEY_CTRL_DH_KDF_OID
:
1242 return EVP_PKEY_CTX_set0_dh_kdf_oid(ctx
, p2
);
1243 case EVP_PKEY_CTRL_GET_DH_KDF_MD
:
1244 return EVP_PKEY_CTX_get_dh_kdf_md(ctx
, p2
);
1245 case EVP_PKEY_CTRL_GET_DH_KDF_OUTLEN
:
1246 return EVP_PKEY_CTX_get_dh_kdf_outlen(ctx
, p2
);
1247 case EVP_PKEY_CTRL_GET_DH_KDF_UKM
:
1248 return EVP_PKEY_CTX_get0_dh_kdf_ukm(ctx
, p2
);
1249 case EVP_PKEY_CTRL_GET_DH_KDF_OID
:
1250 return EVP_PKEY_CTX_get0_dh_kdf_oid(ctx
, p2
);
1253 if (keytype
== EVP_PKEY_DH
) {
1255 case EVP_PKEY_CTRL_DH_PAD
:
1256 return EVP_PKEY_CTX_set_dh_pad(ctx
, p1
);
1257 case EVP_PKEY_CTRL_DH_PARAMGEN_PRIME_LEN
:
1258 return EVP_PKEY_CTX_set_dh_paramgen_prime_len(ctx
, p1
);
1259 case EVP_PKEY_CTRL_DH_PARAMGEN_SUBPRIME_LEN
:
1260 return EVP_PKEY_CTX_set_dh_paramgen_subprime_len(ctx
, p1
);
1261 case EVP_PKEY_CTRL_DH_PARAMGEN_GENERATOR
:
1262 return EVP_PKEY_CTX_set_dh_paramgen_generator(ctx
, p1
);
1263 case EVP_PKEY_CTRL_DH_PARAMGEN_TYPE
:
1264 return EVP_PKEY_CTX_set_dh_paramgen_type(ctx
, p1
);
1265 case EVP_PKEY_CTRL_DH_RFC5114
:
1266 return EVP_PKEY_CTX_set_dh_rfc5114(ctx
, p1
);
1269 if (keytype
== EVP_PKEY_DSA
) {
1271 case EVP_PKEY_CTRL_DSA_PARAMGEN_BITS
:
1272 return EVP_PKEY_CTX_set_dsa_paramgen_bits(ctx
, p1
);
1273 case EVP_PKEY_CTRL_DSA_PARAMGEN_Q_BITS
:
1274 return EVP_PKEY_CTX_set_dsa_paramgen_q_bits(ctx
, p1
);
1275 case EVP_PKEY_CTRL_DSA_PARAMGEN_MD
:
1276 return EVP_PKEY_CTX_set_dsa_paramgen_md(ctx
, p2
);
1279 if (keytype
== EVP_PKEY_EC
) {
1281 case EVP_PKEY_CTRL_EC_PARAM_ENC
:
1282 return evp_pkey_ctx_set_ec_param_enc_prov(ctx
, p1
);
1283 case EVP_PKEY_CTRL_EC_PARAMGEN_CURVE_NID
:
1284 return EVP_PKEY_CTX_set_ec_paramgen_curve_nid(ctx
, p1
);
1285 case EVP_PKEY_CTRL_EC_ECDH_COFACTOR
:
1287 return EVP_PKEY_CTX_get_ecdh_cofactor_mode(ctx
);
1288 } else if (p1
< -1 || p1
> 1) {
1289 /* Uses the same return values as EVP_PKEY_CTX_ctrl */
1292 return EVP_PKEY_CTX_set_ecdh_cofactor_mode(ctx
, p1
);
1294 case EVP_PKEY_CTRL_EC_KDF_TYPE
:
1296 return EVP_PKEY_CTX_get_ecdh_kdf_type(ctx
);
1298 return EVP_PKEY_CTX_set_ecdh_kdf_type(ctx
, p1
);
1300 case EVP_PKEY_CTRL_GET_EC_KDF_MD
:
1301 return EVP_PKEY_CTX_get_ecdh_kdf_md(ctx
, p2
);
1302 case EVP_PKEY_CTRL_EC_KDF_MD
:
1303 return EVP_PKEY_CTX_set_ecdh_kdf_md(ctx
, p2
);
1304 case EVP_PKEY_CTRL_GET_EC_KDF_OUTLEN
:
1305 return EVP_PKEY_CTX_get_ecdh_kdf_outlen(ctx
, p2
);
1306 case EVP_PKEY_CTRL_EC_KDF_OUTLEN
:
1307 return EVP_PKEY_CTX_set_ecdh_kdf_outlen(ctx
, p1
);
1308 case EVP_PKEY_CTRL_GET_EC_KDF_UKM
:
1309 return EVP_PKEY_CTX_get0_ecdh_kdf_ukm(ctx
, p2
);
1310 case EVP_PKEY_CTRL_EC_KDF_UKM
:
1311 return EVP_PKEY_CTX_set0_ecdh_kdf_ukm(ctx
, p2
, p1
);
1314 if (keytype
== EVP_PKEY_RSA
) {
1316 case EVP_PKEY_CTRL_RSA_OAEP_MD
:
1317 return EVP_PKEY_CTX_set_rsa_oaep_md(ctx
, p2
);
1318 case EVP_PKEY_CTRL_GET_RSA_OAEP_MD
:
1319 return EVP_PKEY_CTX_get_rsa_oaep_md(ctx
, p2
);
1320 case EVP_PKEY_CTRL_RSA_MGF1_MD
:
1321 return EVP_PKEY_CTX_set_rsa_oaep_md(ctx
, p2
);
1322 case EVP_PKEY_CTRL_RSA_OAEP_LABEL
:
1323 return EVP_PKEY_CTX_set0_rsa_oaep_label(ctx
, p2
, p1
);
1324 case EVP_PKEY_CTRL_GET_RSA_OAEP_LABEL
:
1325 return EVP_PKEY_CTX_get0_rsa_oaep_label(ctx
, (unsigned char **)p2
);
1326 case EVP_PKEY_CTRL_RSA_KEYGEN_BITS
:
1327 return EVP_PKEY_CTX_set_rsa_keygen_bits(ctx
, p1
);
1328 case EVP_PKEY_CTRL_RSA_KEYGEN_PUBEXP
:
1329 return EVP_PKEY_CTX_set_rsa_keygen_pubexp(ctx
, p2
);
1330 case EVP_PKEY_CTRL_RSA_KEYGEN_PRIMES
:
1331 return EVP_PKEY_CTX_set_rsa_keygen_primes(ctx
, p1
);
1335 * keytype == -1 is used when several key types share the same structure,
1336 * or for generic controls that are the same across multiple key types.
1338 if (keytype
== -1) {
1339 if (optype
== EVP_PKEY_OP_DERIVE
) {
1342 case EVP_PKEY_CTRL_TLS_MD
:
1343 return EVP_PKEY_CTX_set_tls1_prf_md(ctx
, p2
);
1344 case EVP_PKEY_CTRL_TLS_SECRET
:
1345 return EVP_PKEY_CTX_set1_tls1_prf_secret(ctx
, p2
, p1
);
1346 case EVP_PKEY_CTRL_TLS_SEED
:
1347 return EVP_PKEY_CTX_add1_tls1_prf_seed(ctx
, p2
, p1
);
1350 case EVP_PKEY_CTRL_HKDF_MD
:
1351 return EVP_PKEY_CTX_set_hkdf_md(ctx
, p2
);
1352 case EVP_PKEY_CTRL_HKDF_SALT
:
1353 return EVP_PKEY_CTX_set1_hkdf_salt(ctx
, p2
, p1
);
1354 case EVP_PKEY_CTRL_HKDF_KEY
:
1355 return EVP_PKEY_CTX_set1_hkdf_key(ctx
, p2
, p1
);
1356 case EVP_PKEY_CTRL_HKDF_INFO
:
1357 return EVP_PKEY_CTX_add1_hkdf_info(ctx
, p2
, p1
);
1358 case EVP_PKEY_CTRL_HKDF_MODE
:
1359 return EVP_PKEY_CTX_hkdf_mode(ctx
, p1
);
1362 case EVP_PKEY_CTRL_PASS
:
1363 return EVP_PKEY_CTX_set1_pbe_pass(ctx
, p2
, p1
);
1364 case EVP_PKEY_CTRL_SCRYPT_SALT
:
1365 return EVP_PKEY_CTX_set1_scrypt_salt(ctx
, p2
, p1
);
1366 case EVP_PKEY_CTRL_SCRYPT_N
:
1367 return EVP_PKEY_CTX_set_scrypt_N(ctx
, p1
);
1368 case EVP_PKEY_CTRL_SCRYPT_R
:
1369 return EVP_PKEY_CTX_set_scrypt_r(ctx
, p1
);
1370 case EVP_PKEY_CTRL_SCRYPT_P
:
1371 return EVP_PKEY_CTX_set_scrypt_p(ctx
, p1
);
1372 case EVP_PKEY_CTRL_SCRYPT_MAXMEM_BYTES
:
1373 return EVP_PKEY_CTX_set_scrypt_maxmem_bytes(ctx
, p1
);
1375 } else if (optype
== EVP_PKEY_OP_KEYGEN
) {
1376 OSSL_PARAM params
[2], *p
= params
;
1379 case EVP_PKEY_CTRL_CIPHER
:
1381 char *ciphname
= (char *)EVP_CIPHER_name(p2
);
1383 *p
++ = OSSL_PARAM_construct_utf8_string(OSSL_PKEY_PARAM_CIPHER
,
1385 *p
= OSSL_PARAM_construct_end();
1387 return EVP_PKEY_CTX_set_params(ctx
, params
);
1389 case EVP_PKEY_CTRL_SET_MAC_KEY
:
1391 *p
++ = OSSL_PARAM_construct_octet_string(OSSL_PKEY_PARAM_PRIV_KEY
,
1393 *p
= OSSL_PARAM_construct_end();
1395 return EVP_PKEY_CTX_set_params(ctx
, params
);
1400 case EVP_PKEY_CTRL_MD
:
1401 return EVP_PKEY_CTX_set_signature_md(ctx
, p2
);
1402 case EVP_PKEY_CTRL_GET_MD
:
1403 return EVP_PKEY_CTX_get_signature_md(ctx
, p2
);
1404 case EVP_PKEY_CTRL_RSA_PADDING
:
1405 return EVP_PKEY_CTX_set_rsa_padding(ctx
, p1
);
1406 case EVP_PKEY_CTRL_GET_RSA_PADDING
:
1407 return EVP_PKEY_CTX_get_rsa_padding(ctx
, p2
);
1408 case EVP_PKEY_CTRL_GET_RSA_MGF1_MD
:
1409 return EVP_PKEY_CTX_get_rsa_oaep_md(ctx
, p2
);
1410 case EVP_PKEY_CTRL_RSA_PSS_SALTLEN
:
1411 return EVP_PKEY_CTX_set_rsa_pss_saltlen(ctx
, p1
);
1412 case EVP_PKEY_CTRL_GET_RSA_PSS_SALTLEN
:
1413 return EVP_PKEY_CTX_get_rsa_pss_saltlen(ctx
, p2
);
1414 case EVP_PKEY_CTRL_PKCS7_ENCRYPT
:
1415 case EVP_PKEY_CTRL_PKCS7_DECRYPT
:
1416 # ifndef OPENSSL_NO_CMS
1417 case EVP_PKEY_CTRL_CMS_DECRYPT
:
1418 case EVP_PKEY_CTRL_CMS_ENCRYPT
:
1420 /* TODO (3.0) Temporary hack, this should probe */
1421 if (!EVP_PKEY_is_a(EVP_PKEY_CTX_get0_pkey(ctx
), "RSASSA-PSS"))
1423 ERR_raise(ERR_LIB_EVP
,
1424 EVP_R_OPERATION_NOT_SUPPORTED_FOR_THIS_KEYTYPE
);
1430 * GOST CMS format is different for different cipher algorithms.
1431 * Most of other algorithms don't have such a difference
1432 * so this ctrl is just ignored.
1434 if (cmd
== EVP_PKEY_CTRL_CIPHER
)
1440 static int evp_pkey_ctx_ctrl_int(EVP_PKEY_CTX
*ctx
, int keytype
, int optype
,
1441 int cmd
, int p1
, void *p2
)
1446 * If the method has a |digest_custom| function, we can relax the
1447 * operation type check, since this can be called before the operation
1450 if (ctx
->pmeth
== NULL
|| ctx
->pmeth
->digest_custom
== NULL
) {
1451 if (ctx
->operation
== EVP_PKEY_OP_UNDEFINED
) {
1452 ERR_raise(ERR_LIB_EVP
, EVP_R_NO_OPERATION_SET
);
1456 if ((optype
!= -1) && !(ctx
->operation
& optype
)) {
1457 ERR_raise(ERR_LIB_EVP
, EVP_R_INVALID_OPERATION
);
1462 switch (evp_pkey_ctx_state(ctx
)) {
1463 case EVP_PKEY_STATE_PROVIDER
:
1464 return legacy_ctrl_to_param(ctx
, keytype
, optype
, cmd
, p1
, p2
);
1465 case EVP_PKEY_STATE_UNKNOWN
:
1466 case EVP_PKEY_STATE_LEGACY
:
1467 if (ctx
->pmeth
== NULL
|| ctx
->pmeth
->ctrl
== NULL
) {
1468 ERR_raise(ERR_LIB_EVP
, EVP_R_COMMAND_NOT_SUPPORTED
);
1471 if ((keytype
!= -1) && (ctx
->pmeth
->pkey_id
!= keytype
))
1474 ret
= ctx
->pmeth
->ctrl(ctx
, cmd
, p1
, p2
);
1477 ERR_raise(ERR_LIB_EVP
, EVP_R_COMMAND_NOT_SUPPORTED
);
1483 int EVP_PKEY_CTX_ctrl(EVP_PKEY_CTX
*ctx
, int keytype
, int optype
,
1484 int cmd
, int p1
, void *p2
)
1489 ERR_raise(ERR_LIB_EVP
, EVP_R_COMMAND_NOT_SUPPORTED
);
1492 /* If unsupported, we don't want that reported here */
1494 ret
= evp_pkey_ctx_store_cached_data(ctx
, keytype
, optype
,
1499 ERR_clear_last_mark();
1501 * If there was an error, there was an error.
1502 * If the operation isn't initialized yet, we also return, as
1503 * the saved values will be used then anyway.
1505 if (ret
< 1 || ctx
->operation
== EVP_PKEY_OP_UNDEFINED
)
1508 return evp_pkey_ctx_ctrl_int(ctx
, keytype
, optype
, cmd
, p1
, p2
);
1511 int EVP_PKEY_CTX_ctrl_uint64(EVP_PKEY_CTX
*ctx
, int keytype
, int optype
,
1512 int cmd
, uint64_t value
)
1514 return EVP_PKEY_CTX_ctrl(ctx
, keytype
, optype
, cmd
, 0, &value
);
1517 static int legacy_ctrl_str_to_param(EVP_PKEY_CTX
*ctx
, const char *name
,
1520 if (strcmp(name
, "md") == 0)
1521 name
= OSSL_ALG_PARAM_DIGEST
;
1522 else if (strcmp(name
, "rsa_padding_mode") == 0)
1523 name
= OSSL_ASYM_CIPHER_PARAM_PAD_MODE
;
1524 else if (strcmp(name
, "rsa_mgf1_md") == 0)
1525 name
= OSSL_ASYM_CIPHER_PARAM_MGF1_DIGEST
;
1526 else if (strcmp(name
, "rsa_oaep_md") == 0)
1527 name
= OSSL_ASYM_CIPHER_PARAM_OAEP_DIGEST
;
1528 else if (strcmp(name
, "rsa_oaep_label") == 0)
1529 name
= OSSL_ASYM_CIPHER_PARAM_OAEP_LABEL
;
1530 else if (strcmp(name
, "rsa_pss_saltlen") == 0)
1531 name
= OSSL_SIGNATURE_PARAM_PSS_SALTLEN
;
1532 else if (strcmp(name
, "rsa_keygen_bits") == 0)
1533 name
= OSSL_PKEY_PARAM_RSA_BITS
;
1534 else if (strcmp(name
, "rsa_keygen_pubexp") == 0)
1535 name
= OSSL_PKEY_PARAM_RSA_E
;
1536 else if (strcmp(name
, "rsa_keygen_primes") == 0)
1537 name
= OSSL_PKEY_PARAM_RSA_PRIMES
;
1538 else if (strcmp(name
, "rsa_pss_keygen_md") == 0)
1539 name
= OSSL_PKEY_PARAM_RSA_DIGEST
;
1540 else if (strcmp(name
, "rsa_pss_keygen_mgf1_md") == 0)
1541 name
= OSSL_PKEY_PARAM_RSA_MGF1_DIGEST
;
1542 else if (strcmp(name
, "rsa_pss_keygen_saltlen") == 0)
1543 name
= OSSL_PKEY_PARAM_RSA_PSS_SALTLEN
;
1544 else if (strcmp(name
, "dsa_paramgen_bits") == 0)
1545 name
= OSSL_PKEY_PARAM_FFC_PBITS
;
1546 else if (strcmp(name
, "dsa_paramgen_q_bits") == 0)
1547 name
= OSSL_PKEY_PARAM_FFC_QBITS
;
1548 else if (strcmp(name
, "dsa_paramgen_md") == 0)
1549 name
= OSSL_PKEY_PARAM_FFC_DIGEST
;
1550 else if (strcmp(name
, "dh_paramgen_generator") == 0)
1551 name
= OSSL_PKEY_PARAM_DH_GENERATOR
;
1552 else if (strcmp(name
, "dh_paramgen_prime_len") == 0)
1553 name
= OSSL_PKEY_PARAM_FFC_PBITS
;
1554 else if (strcmp(name
, "dh_paramgen_subprime_len") == 0)
1555 name
= OSSL_PKEY_PARAM_FFC_QBITS
;
1556 else if (strcmp(name
, "dh_paramgen_type") == 0) {
1557 name
= OSSL_PKEY_PARAM_FFC_TYPE
;
1558 value
= dh_gen_type_id2name(atoi(value
));
1559 } else if (strcmp(name
, "dh_param") == 0)
1560 name
= OSSL_PKEY_PARAM_GROUP_NAME
;
1561 else if (strcmp(name
, "dh_rfc5114") == 0) {
1562 int num
= atoi(value
);
1564 name
= OSSL_PKEY_PARAM_GROUP_NAME
;
1566 ossl_ffc_named_group_get_name(ossl_ffc_uid_to_dh_named_group(num
));
1567 } else if (strcmp(name
, "dh_pad") == 0)
1568 name
= OSSL_EXCHANGE_PARAM_PAD
;
1569 else if (strcmp(name
, "ec_paramgen_curve") == 0)
1570 name
= OSSL_PKEY_PARAM_GROUP_NAME
;
1571 else if (strcmp(name
, "ecdh_cofactor_mode") == 0)
1572 name
= OSSL_EXCHANGE_PARAM_EC_ECDH_COFACTOR_MODE
;
1573 else if (strcmp(name
, "ecdh_kdf_md") == 0)
1574 name
= OSSL_EXCHANGE_PARAM_KDF_DIGEST
;
1575 else if (strcmp(name
, "ec_param_enc") == 0)
1576 name
= OSSL_PKEY_PARAM_EC_ENCODING
;
1577 else if (strcmp(name
, "N") == 0)
1578 name
= OSSL_KDF_PARAM_SCRYPT_N
;
1582 * TODO(3.0) reduce the code above to only translate known legacy
1583 * string to the corresponding core name (see core_names.h), but
1584 * otherwise leave it to this code block to do the actual work.
1586 const OSSL_PARAM
*settable
= EVP_PKEY_CTX_settable_params(ctx
);
1587 OSSL_PARAM params
[2] = { OSSL_PARAM_END
, OSSL_PARAM_END
};
1591 if (!OSSL_PARAM_allocate_from_text(¶ms
[0], settable
, name
, value
,
1592 strlen(value
), &exists
)) {
1594 ERR_raise_data(ERR_LIB_EVP
, EVP_R_COMMAND_NOT_SUPPORTED
,
1595 "name=%s,value=%s", name
, value
);
1600 if (EVP_PKEY_CTX_set_params(ctx
, params
))
1602 OPENSSL_free(params
[0].data
);
1607 static int evp_pkey_ctx_ctrl_str_int(EVP_PKEY_CTX
*ctx
,
1608 const char *name
, const char *value
)
1613 ERR_raise(ERR_LIB_EVP
, EVP_R_COMMAND_NOT_SUPPORTED
);
1617 switch (evp_pkey_ctx_state(ctx
)) {
1618 case EVP_PKEY_STATE_PROVIDER
:
1619 return legacy_ctrl_str_to_param(ctx
, name
, value
);
1620 case EVP_PKEY_STATE_UNKNOWN
:
1621 case EVP_PKEY_STATE_LEGACY
:
1622 if (ctx
== NULL
|| ctx
->pmeth
== NULL
|| ctx
->pmeth
->ctrl_str
== NULL
) {
1623 ERR_raise(ERR_LIB_EVP
, EVP_R_COMMAND_NOT_SUPPORTED
);
1626 if (strcmp(name
, "digest") == 0)
1627 ret
= EVP_PKEY_CTX_md(ctx
,
1628 EVP_PKEY_OP_TYPE_SIG
| EVP_PKEY_OP_TYPE_CRYPT
,
1629 EVP_PKEY_CTRL_MD
, value
);
1631 ret
= ctx
->pmeth
->ctrl_str(ctx
, name
, value
);
1638 int EVP_PKEY_CTX_ctrl_str(EVP_PKEY_CTX
*ctx
,
1639 const char *name
, const char *value
)
1643 /* If unsupported, we don't want that reported here */
1645 ret
= evp_pkey_ctx_store_cached_data(ctx
, -1, -1, -1,
1646 name
, value
, strlen(value
) + 1);
1650 ERR_clear_last_mark();
1652 * If there was an error, there was an error.
1653 * If the operation isn't initialized yet, we also return, as
1654 * the saved values will be used then anyway.
1656 if (ret
< 1 || ctx
->operation
== EVP_PKEY_OP_UNDEFINED
)
1660 return evp_pkey_ctx_ctrl_str_int(ctx
, name
, value
);
1663 static int decode_cmd(int cmd
, const char *name
)
1667 * The consequence of the assertion not being true is that this
1668 * function will return -1, which will cause the calling functions
1669 * to signal that the command is unsupported... in non-debug mode.
1671 if (ossl_assert(name
!= NULL
))
1672 if (strcmp(name
, "distid") == 0 || strcmp(name
, "hexdistid") == 0)
1673 cmd
= EVP_PKEY_CTRL_SET1_ID
;
1679 static int evp_pkey_ctx_store_cached_data(EVP_PKEY_CTX
*ctx
,
1680 int keytype
, int optype
,
1681 int cmd
, const char *name
,
1682 const void *data
, size_t data_len
)
1684 if ((keytype
!= -1 && ctx
->pmeth
->pkey_id
!= keytype
)
1685 || ((optype
!= -1) && !(ctx
->operation
& optype
))) {
1686 ERR_raise(ERR_LIB_EVP
, EVP_R_INVALID_OPERATION
);
1690 cmd
= decode_cmd(cmd
, name
);
1692 case EVP_PKEY_CTRL_SET1_ID
:
1693 evp_pkey_ctx_free_cached_data(ctx
, cmd
, name
);
1695 ctx
->cached_parameters
.dist_id_name
= OPENSSL_strdup(name
);
1696 if (ctx
->cached_parameters
.dist_id_name
== NULL
) {
1697 ERR_raise(ERR_LIB_EVP
, ERR_R_MALLOC_FAILURE
);
1702 ctx
->cached_parameters
.dist_id
= OPENSSL_memdup(data
, data_len
);
1703 if (ctx
->cached_parameters
.dist_id
== NULL
) {
1704 ERR_raise(ERR_LIB_EVP
, ERR_R_MALLOC_FAILURE
);
1708 ctx
->cached_parameters
.dist_id_set
= 1;
1709 ctx
->cached_parameters
.dist_id_len
= data_len
;
1713 ERR_raise(ERR_LIB_EVP
, EVP_R_COMMAND_NOT_SUPPORTED
);
1717 static void evp_pkey_ctx_free_cached_data(EVP_PKEY_CTX
*ctx
,
1718 int cmd
, const char *name
)
1720 cmd
= decode_cmd(cmd
, name
);
1722 case EVP_PKEY_CTRL_SET1_ID
:
1723 OPENSSL_free(ctx
->cached_parameters
.dist_id
);
1724 OPENSSL_free(ctx
->cached_parameters
.dist_id_name
);
1725 ctx
->cached_parameters
.dist_id
= NULL
;
1726 ctx
->cached_parameters
.dist_id_name
= NULL
;
1731 static void evp_pkey_ctx_free_all_cached_data(EVP_PKEY_CTX
*ctx
)
1733 evp_pkey_ctx_free_cached_data(ctx
, EVP_PKEY_CTRL_SET1_ID
, NULL
);
1736 int evp_pkey_ctx_use_cached_data(EVP_PKEY_CTX
*ctx
)
1740 if (ret
&& ctx
->cached_parameters
.dist_id_set
) {
1741 const char *name
= ctx
->cached_parameters
.dist_id_name
;
1742 const void *val
= ctx
->cached_parameters
.dist_id
;
1743 size_t len
= ctx
->cached_parameters
.dist_id_len
;
1746 ret
= evp_pkey_ctx_ctrl_str_int(ctx
, name
, val
);
1748 ret
= evp_pkey_ctx_ctrl_int(ctx
, -1, ctx
->operation
,
1749 EVP_PKEY_CTRL_SET1_ID
,
1750 (int)len
, (void *)val
);
1756 OSSL_LIB_CTX
*EVP_PKEY_CTX_get0_libctx(EVP_PKEY_CTX
*ctx
)
1761 const char *EVP_PKEY_CTX_get0_propq(EVP_PKEY_CTX
*ctx
)
1763 return ctx
->propquery
;
1766 /* Utility functions to send a string of hex string to a ctrl */
1768 int EVP_PKEY_CTX_str2ctrl(EVP_PKEY_CTX
*ctx
, int cmd
, const char *str
)
1775 return ctx
->pmeth
->ctrl(ctx
, cmd
, len
, (void *)str
);
1778 int EVP_PKEY_CTX_hex2ctrl(EVP_PKEY_CTX
*ctx
, int cmd
, const char *hex
)
1784 bin
= OPENSSL_hexstr2buf(hex
, &binlen
);
1787 if (binlen
<= INT_MAX
)
1788 rv
= ctx
->pmeth
->ctrl(ctx
, cmd
, binlen
, bin
);
1793 /* Pass a message digest to a ctrl */
1794 int EVP_PKEY_CTX_md(EVP_PKEY_CTX
*ctx
, int optype
, int cmd
, const char *md
)
1798 if (md
== NULL
|| (m
= EVP_get_digestbyname(md
)) == NULL
) {
1799 ERR_raise(ERR_LIB_EVP
, EVP_R_INVALID_DIGEST
);
1802 return EVP_PKEY_CTX_ctrl(ctx
, -1, optype
, cmd
, 0, (void *)m
);
1805 int EVP_PKEY_CTX_get_operation(EVP_PKEY_CTX
*ctx
)
1807 return ctx
->operation
;
1810 void EVP_PKEY_CTX_set0_keygen_info(EVP_PKEY_CTX
*ctx
, int *dat
, int datlen
)
1812 ctx
->keygen_info
= dat
;
1813 ctx
->keygen_info_count
= datlen
;
1816 void EVP_PKEY_CTX_set_data(EVP_PKEY_CTX
*ctx
, void *data
)
1821 void *EVP_PKEY_CTX_get_data(const EVP_PKEY_CTX
*ctx
)
1826 EVP_PKEY
*EVP_PKEY_CTX_get0_pkey(EVP_PKEY_CTX
*ctx
)
1831 EVP_PKEY
*EVP_PKEY_CTX_get0_peerkey(EVP_PKEY_CTX
*ctx
)
1833 return ctx
->peerkey
;
1836 void EVP_PKEY_CTX_set_app_data(EVP_PKEY_CTX
*ctx
, void *data
)
1838 ctx
->app_data
= data
;
1841 void *EVP_PKEY_CTX_get_app_data(EVP_PKEY_CTX
*ctx
)
1843 return ctx
->app_data
;
1846 void EVP_PKEY_meth_set_init(EVP_PKEY_METHOD
*pmeth
,
1847 int (*init
) (EVP_PKEY_CTX
*ctx
))
1852 void EVP_PKEY_meth_set_copy(EVP_PKEY_METHOD
*pmeth
,
1853 int (*copy
) (EVP_PKEY_CTX
*dst
,
1854 const EVP_PKEY_CTX
*src
))
1859 void EVP_PKEY_meth_set_cleanup(EVP_PKEY_METHOD
*pmeth
,
1860 void (*cleanup
) (EVP_PKEY_CTX
*ctx
))
1862 pmeth
->cleanup
= cleanup
;
1865 void EVP_PKEY_meth_set_paramgen(EVP_PKEY_METHOD
*pmeth
,
1866 int (*paramgen_init
) (EVP_PKEY_CTX
*ctx
),
1867 int (*paramgen
) (EVP_PKEY_CTX
*ctx
,
1870 pmeth
->paramgen_init
= paramgen_init
;
1871 pmeth
->paramgen
= paramgen
;
1874 void EVP_PKEY_meth_set_keygen(EVP_PKEY_METHOD
*pmeth
,
1875 int (*keygen_init
) (EVP_PKEY_CTX
*ctx
),
1876 int (*keygen
) (EVP_PKEY_CTX
*ctx
,
1879 pmeth
->keygen_init
= keygen_init
;
1880 pmeth
->keygen
= keygen
;
1883 void EVP_PKEY_meth_set_sign(EVP_PKEY_METHOD
*pmeth
,
1884 int (*sign_init
) (EVP_PKEY_CTX
*ctx
),
1885 int (*sign
) (EVP_PKEY_CTX
*ctx
,
1886 unsigned char *sig
, size_t *siglen
,
1887 const unsigned char *tbs
,
1890 pmeth
->sign_init
= sign_init
;
1894 void EVP_PKEY_meth_set_verify(EVP_PKEY_METHOD
*pmeth
,
1895 int (*verify_init
) (EVP_PKEY_CTX
*ctx
),
1896 int (*verify
) (EVP_PKEY_CTX
*ctx
,
1897 const unsigned char *sig
,
1899 const unsigned char *tbs
,
1902 pmeth
->verify_init
= verify_init
;
1903 pmeth
->verify
= verify
;
1906 void EVP_PKEY_meth_set_verify_recover(EVP_PKEY_METHOD
*pmeth
,
1907 int (*verify_recover_init
) (EVP_PKEY_CTX
1909 int (*verify_recover
) (EVP_PKEY_CTX
1918 pmeth
->verify_recover_init
= verify_recover_init
;
1919 pmeth
->verify_recover
= verify_recover
;
1922 void EVP_PKEY_meth_set_signctx(EVP_PKEY_METHOD
*pmeth
,
1923 int (*signctx_init
) (EVP_PKEY_CTX
*ctx
,
1925 int (*signctx
) (EVP_PKEY_CTX
*ctx
,
1930 pmeth
->signctx_init
= signctx_init
;
1931 pmeth
->signctx
= signctx
;
1934 void EVP_PKEY_meth_set_verifyctx(EVP_PKEY_METHOD
*pmeth
,
1935 int (*verifyctx_init
) (EVP_PKEY_CTX
*ctx
,
1937 int (*verifyctx
) (EVP_PKEY_CTX
*ctx
,
1938 const unsigned char *sig
,
1942 pmeth
->verifyctx_init
= verifyctx_init
;
1943 pmeth
->verifyctx
= verifyctx
;
1946 void EVP_PKEY_meth_set_encrypt(EVP_PKEY_METHOD
*pmeth
,
1947 int (*encrypt_init
) (EVP_PKEY_CTX
*ctx
),
1948 int (*encryptfn
) (EVP_PKEY_CTX
*ctx
,
1951 const unsigned char *in
,
1954 pmeth
->encrypt_init
= encrypt_init
;
1955 pmeth
->encrypt
= encryptfn
;
1958 void EVP_PKEY_meth_set_decrypt(EVP_PKEY_METHOD
*pmeth
,
1959 int (*decrypt_init
) (EVP_PKEY_CTX
*ctx
),
1960 int (*decrypt
) (EVP_PKEY_CTX
*ctx
,
1963 const unsigned char *in
,
1966 pmeth
->decrypt_init
= decrypt_init
;
1967 pmeth
->decrypt
= decrypt
;
1970 void EVP_PKEY_meth_set_derive(EVP_PKEY_METHOD
*pmeth
,
1971 int (*derive_init
) (EVP_PKEY_CTX
*ctx
),
1972 int (*derive
) (EVP_PKEY_CTX
*ctx
,
1976 pmeth
->derive_init
= derive_init
;
1977 pmeth
->derive
= derive
;
1980 void EVP_PKEY_meth_set_ctrl(EVP_PKEY_METHOD
*pmeth
,
1981 int (*ctrl
) (EVP_PKEY_CTX
*ctx
, int type
, int p1
,
1983 int (*ctrl_str
) (EVP_PKEY_CTX
*ctx
,
1988 pmeth
->ctrl_str
= ctrl_str
;
1991 void EVP_PKEY_meth_set_digestsign(EVP_PKEY_METHOD
*pmeth
,
1992 int (*digestsign
) (EVP_MD_CTX
*ctx
, unsigned char *sig
, size_t *siglen
,
1993 const unsigned char *tbs
, size_t tbslen
))
1995 pmeth
->digestsign
= digestsign
;
1998 void EVP_PKEY_meth_set_digestverify(EVP_PKEY_METHOD
*pmeth
,
1999 int (*digestverify
) (EVP_MD_CTX
*ctx
, const unsigned char *sig
,
2000 size_t siglen
, const unsigned char *tbs
,
2003 pmeth
->digestverify
= digestverify
;
2006 void EVP_PKEY_meth_set_check(EVP_PKEY_METHOD
*pmeth
,
2007 int (*check
) (EVP_PKEY
*pkey
))
2009 pmeth
->check
= check
;
2012 void EVP_PKEY_meth_set_public_check(EVP_PKEY_METHOD
*pmeth
,
2013 int (*check
) (EVP_PKEY
*pkey
))
2015 pmeth
->public_check
= check
;
2018 void EVP_PKEY_meth_set_param_check(EVP_PKEY_METHOD
*pmeth
,
2019 int (*check
) (EVP_PKEY
*pkey
))
2021 pmeth
->param_check
= check
;
2024 void EVP_PKEY_meth_set_digest_custom(EVP_PKEY_METHOD
*pmeth
,
2025 int (*digest_custom
) (EVP_PKEY_CTX
*ctx
,
2028 pmeth
->digest_custom
= digest_custom
;
2031 void EVP_PKEY_meth_get_init(const EVP_PKEY_METHOD
*pmeth
,
2032 int (**pinit
) (EVP_PKEY_CTX
*ctx
))
2034 *pinit
= pmeth
->init
;
2037 void EVP_PKEY_meth_get_copy(const EVP_PKEY_METHOD
*pmeth
,
2038 int (**pcopy
) (EVP_PKEY_CTX
*dst
,
2039 const EVP_PKEY_CTX
*src
))
2041 *pcopy
= pmeth
->copy
;
2044 void EVP_PKEY_meth_get_cleanup(const EVP_PKEY_METHOD
*pmeth
,
2045 void (**pcleanup
) (EVP_PKEY_CTX
*ctx
))
2047 *pcleanup
= pmeth
->cleanup
;
2050 void EVP_PKEY_meth_get_paramgen(const EVP_PKEY_METHOD
*pmeth
,
2051 int (**pparamgen_init
) (EVP_PKEY_CTX
*ctx
),
2052 int (**pparamgen
) (EVP_PKEY_CTX
*ctx
,
2056 *pparamgen_init
= pmeth
->paramgen_init
;
2058 *pparamgen
= pmeth
->paramgen
;
2061 void EVP_PKEY_meth_get_keygen(const EVP_PKEY_METHOD
*pmeth
,
2062 int (**pkeygen_init
) (EVP_PKEY_CTX
*ctx
),
2063 int (**pkeygen
) (EVP_PKEY_CTX
*ctx
,
2067 *pkeygen_init
= pmeth
->keygen_init
;
2069 *pkeygen
= pmeth
->keygen
;
2072 void EVP_PKEY_meth_get_sign(const EVP_PKEY_METHOD
*pmeth
,
2073 int (**psign_init
) (EVP_PKEY_CTX
*ctx
),
2074 int (**psign
) (EVP_PKEY_CTX
*ctx
,
2075 unsigned char *sig
, size_t *siglen
,
2076 const unsigned char *tbs
,
2080 *psign_init
= pmeth
->sign_init
;
2082 *psign
= pmeth
->sign
;
2085 void EVP_PKEY_meth_get_verify(const EVP_PKEY_METHOD
*pmeth
,
2086 int (**pverify_init
) (EVP_PKEY_CTX
*ctx
),
2087 int (**pverify
) (EVP_PKEY_CTX
*ctx
,
2088 const unsigned char *sig
,
2090 const unsigned char *tbs
,
2094 *pverify_init
= pmeth
->verify_init
;
2096 *pverify
= pmeth
->verify
;
2099 void EVP_PKEY_meth_get_verify_recover(const EVP_PKEY_METHOD
*pmeth
,
2100 int (**pverify_recover_init
) (EVP_PKEY_CTX
2102 int (**pverify_recover
) (EVP_PKEY_CTX
2111 if (pverify_recover_init
)
2112 *pverify_recover_init
= pmeth
->verify_recover_init
;
2113 if (pverify_recover
)
2114 *pverify_recover
= pmeth
->verify_recover
;
2117 void EVP_PKEY_meth_get_signctx(const EVP_PKEY_METHOD
*pmeth
,
2118 int (**psignctx_init
) (EVP_PKEY_CTX
*ctx
,
2120 int (**psignctx
) (EVP_PKEY_CTX
*ctx
,
2126 *psignctx_init
= pmeth
->signctx_init
;
2128 *psignctx
= pmeth
->signctx
;
2131 void EVP_PKEY_meth_get_verifyctx(const EVP_PKEY_METHOD
*pmeth
,
2132 int (**pverifyctx_init
) (EVP_PKEY_CTX
*ctx
,
2134 int (**pverifyctx
) (EVP_PKEY_CTX
*ctx
,
2135 const unsigned char *sig
,
2139 if (pverifyctx_init
)
2140 *pverifyctx_init
= pmeth
->verifyctx_init
;
2142 *pverifyctx
= pmeth
->verifyctx
;
2145 void EVP_PKEY_meth_get_encrypt(const EVP_PKEY_METHOD
*pmeth
,
2146 int (**pencrypt_init
) (EVP_PKEY_CTX
*ctx
),
2147 int (**pencryptfn
) (EVP_PKEY_CTX
*ctx
,
2150 const unsigned char *in
,
2154 *pencrypt_init
= pmeth
->encrypt_init
;
2156 *pencryptfn
= pmeth
->encrypt
;
2159 void EVP_PKEY_meth_get_decrypt(const EVP_PKEY_METHOD
*pmeth
,
2160 int (**pdecrypt_init
) (EVP_PKEY_CTX
*ctx
),
2161 int (**pdecrypt
) (EVP_PKEY_CTX
*ctx
,
2164 const unsigned char *in
,
2168 *pdecrypt_init
= pmeth
->decrypt_init
;
2170 *pdecrypt
= pmeth
->decrypt
;
2173 void EVP_PKEY_meth_get_derive(const EVP_PKEY_METHOD
*pmeth
,
2174 int (**pderive_init
) (EVP_PKEY_CTX
*ctx
),
2175 int (**pderive
) (EVP_PKEY_CTX
*ctx
,
2180 *pderive_init
= pmeth
->derive_init
;
2182 *pderive
= pmeth
->derive
;
2185 void EVP_PKEY_meth_get_ctrl(const EVP_PKEY_METHOD
*pmeth
,
2186 int (**pctrl
) (EVP_PKEY_CTX
*ctx
, int type
, int p1
,
2188 int (**pctrl_str
) (EVP_PKEY_CTX
*ctx
,
2193 *pctrl
= pmeth
->ctrl
;
2195 *pctrl_str
= pmeth
->ctrl_str
;
2198 void EVP_PKEY_meth_get_digestsign(EVP_PKEY_METHOD
*pmeth
,
2199 int (**digestsign
) (EVP_MD_CTX
*ctx
, unsigned char *sig
, size_t *siglen
,
2200 const unsigned char *tbs
, size_t tbslen
))
2203 *digestsign
= pmeth
->digestsign
;
2206 void EVP_PKEY_meth_get_digestverify(EVP_PKEY_METHOD
*pmeth
,
2207 int (**digestverify
) (EVP_MD_CTX
*ctx
, const unsigned char *sig
,
2208 size_t siglen
, const unsigned char *tbs
,
2212 *digestverify
= pmeth
->digestverify
;
2215 void EVP_PKEY_meth_get_check(const EVP_PKEY_METHOD
*pmeth
,
2216 int (**pcheck
) (EVP_PKEY
*pkey
))
2219 *pcheck
= pmeth
->check
;
2222 void EVP_PKEY_meth_get_public_check(const EVP_PKEY_METHOD
*pmeth
,
2223 int (**pcheck
) (EVP_PKEY
*pkey
))
2226 *pcheck
= pmeth
->public_check
;
2229 void EVP_PKEY_meth_get_param_check(const EVP_PKEY_METHOD
*pmeth
,
2230 int (**pcheck
) (EVP_PKEY
*pkey
))
2233 *pcheck
= pmeth
->param_check
;
2236 void EVP_PKEY_meth_get_digest_custom(EVP_PKEY_METHOD
*pmeth
,
2237 int (**pdigest_custom
) (EVP_PKEY_CTX
*ctx
,
2240 if (pdigest_custom
!= NULL
)
2241 *pdigest_custom
= pmeth
->digest_custom
;
2244 #endif /* FIPS_MODULE */