2 * Copyright 1995-2018 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 #include "internal/cryptlib.h"
12 #include <openssl/evp.h>
13 #include <openssl/objects.h>
14 #include <openssl/params.h>
15 #include <openssl/core_names.h>
16 #include <openssl/dh.h>
17 #include "crypto/evp.h"
18 #include "internal/provider.h"
19 #include "evp_local.h"
21 #if !defined(FIPS_MODE)
22 int EVP_CIPHER_param_to_asn1(EVP_CIPHER_CTX
*c
, ASN1_TYPE
*type
)
24 int ret
= -1; /* Assume the worst */
25 const EVP_CIPHER
*cipher
= c
->cipher
;
28 * For legacy implementations, we detect custom AlgorithmIdentifier
29 * parameter handling by checking if the function pointer
30 * cipher->set_asn1_parameters is set. We know that this pointer
31 * is NULL for provided implementations.
33 * Otherwise, for any implementation, we check the flag
34 * EVP_CIPH_FLAG_CUSTOM_ASN1. If it isn't set, we apply
35 * default AI parameter extraction.
37 * Otherwise, for provided implementations, we convert |type| to
38 * a DER encoded blob and pass to the implementation in OSSL_PARAM
41 * If none of the above applies, this operation is unsupported.
43 if (cipher
->set_asn1_parameters
!= NULL
) {
44 ret
= cipher
->set_asn1_parameters(c
, type
);
45 } else if ((EVP_CIPHER_flags(cipher
) & EVP_CIPH_FLAG_CUSTOM_ASN1
) == 0) {
46 switch (EVP_CIPHER_mode(cipher
)) {
47 case EVP_CIPH_WRAP_MODE
:
48 if (EVP_CIPHER_is_a(cipher
, SN_id_smime_alg_CMS3DESwrap
))
49 ASN1_TYPE_set(type
, V_ASN1_NULL
, NULL
);
53 case EVP_CIPH_GCM_MODE
:
54 case EVP_CIPH_CCM_MODE
:
55 case EVP_CIPH_XTS_MODE
:
56 case EVP_CIPH_OCB_MODE
:
61 ret
= EVP_CIPHER_set_asn1_iv(c
, type
);
63 } else if (cipher
->prov
!= NULL
) {
64 OSSL_PARAM params
[3], *p
= params
;
65 unsigned char *der
= NULL
, *derp
;
68 * We make two passes, the first to get the appropriate buffer size,
69 * and the second to get the actual value.
71 *p
++ = OSSL_PARAM_construct_octet_string(OSSL_CIPHER_PARAM_ALG_ID
,
73 *p
= OSSL_PARAM_construct_end();
75 if (!EVP_CIPHER_CTX_get_params(c
, params
))
78 /* ... but, we should get a return size too! */
79 if (params
[0].return_size
!= 0
80 && (der
= OPENSSL_malloc(params
[0].return_size
)) != NULL
) {
82 params
[0].data_size
= params
[0].return_size
;
83 params
[0].return_size
= 0;
85 if (EVP_CIPHER_CTX_get_params(c
, params
)
86 && d2i_ASN1_TYPE(&type
, (const unsigned char **)&derp
,
87 params
[0].return_size
) != NULL
) {
98 EVPerr(EVP_F_EVP_CIPHER_PARAM_TO_ASN1
, ASN1_R_UNSUPPORTED_CIPHER
);
100 EVPerr(EVP_F_EVP_CIPHER_PARAM_TO_ASN1
, EVP_R_CIPHER_PARAMETER_ERROR
);
106 int EVP_CIPHER_asn1_to_param(EVP_CIPHER_CTX
*c
, ASN1_TYPE
*type
)
108 int ret
= -1; /* Assume the worst */
109 const EVP_CIPHER
*cipher
= c
->cipher
;
112 * For legacy implementations, we detect custom AlgorithmIdentifier
113 * parameter handling by checking if there the function pointer
114 * cipher->get_asn1_parameters is set. We know that this pointer
115 * is NULL for provided implementations.
117 * Otherwise, for any implementation, we check the flag
118 * EVP_CIPH_FLAG_CUSTOM_ASN1. If it isn't set, we apply
119 * default AI parameter creation.
121 * Otherwise, for provided implementations, we get the AI parameter
122 * in DER encoded form from the implementation by requesting the
123 * appropriate OSSL_PARAM and converting the result to a ASN1_TYPE.
125 * If none of the above applies, this operation is unsupported.
127 if (cipher
->get_asn1_parameters
!= NULL
) {
128 ret
= cipher
->get_asn1_parameters(c
, type
);
129 } else if ((EVP_CIPHER_flags(cipher
) & EVP_CIPH_FLAG_CUSTOM_ASN1
) == 0) {
130 switch (EVP_CIPHER_mode(cipher
)) {
131 case EVP_CIPH_WRAP_MODE
:
135 case EVP_CIPH_GCM_MODE
:
136 case EVP_CIPH_CCM_MODE
:
137 case EVP_CIPH_XTS_MODE
:
138 case EVP_CIPH_OCB_MODE
:
143 ret
= EVP_CIPHER_get_asn1_iv(c
, type
);
145 } else if (cipher
->prov
!= NULL
) {
146 OSSL_PARAM params
[3], *p
= params
;
147 unsigned char *der
= NULL
;
150 if ((derl
= i2d_ASN1_TYPE(type
, &der
)) >= 0) {
152 OSSL_PARAM_construct_octet_string(OSSL_CIPHER_PARAM_ALG_ID
,
154 *p
= OSSL_PARAM_construct_end();
155 if (EVP_CIPHER_CTX_set_params(c
, params
))
164 EVPerr(EVP_F_EVP_CIPHER_ASN1_TO_PARAM
, EVP_R_UNSUPPORTED_CIPHER
);
166 EVPerr(EVP_F_EVP_CIPHER_ASN1_TO_PARAM
, EVP_R_CIPHER_PARAMETER_ERROR
);
172 int EVP_CIPHER_get_asn1_iv(EVP_CIPHER_CTX
*ctx
, ASN1_TYPE
*type
)
178 unsigned char iv
[EVP_MAX_IV_LENGTH
];
180 l
= EVP_CIPHER_CTX_iv_length(ctx
);
181 if (!ossl_assert(l
<= sizeof(iv
)))
183 i
= ASN1_TYPE_get_octetstring(type
, iv
, l
);
187 if (!EVP_CipherInit_ex(ctx
, NULL
, NULL
, NULL
, iv
, -1))
193 int EVP_CIPHER_set_asn1_iv(EVP_CIPHER_CTX
*c
, ASN1_TYPE
*type
)
199 j
= EVP_CIPHER_CTX_iv_length(c
);
200 OPENSSL_assert(j
<= sizeof(c
->iv
));
201 i
= ASN1_TYPE_set_octetstring(type
, c
->oiv
, j
);
205 #endif /* !defined(FIPS_MODE) */
207 /* Convert the various cipher NIDs and dummies to a proper OID NID */
208 int EVP_CIPHER_type(const EVP_CIPHER
*ctx
)
211 nid
= EVP_CIPHER_nid(ctx
);
226 case NID_aes_128_cfb128
:
227 case NID_aes_128_cfb8
:
228 case NID_aes_128_cfb1
:
230 return NID_aes_128_cfb128
;
232 case NID_aes_192_cfb128
:
233 case NID_aes_192_cfb8
:
234 case NID_aes_192_cfb1
:
236 return NID_aes_192_cfb128
;
238 case NID_aes_256_cfb128
:
239 case NID_aes_256_cfb8
:
240 case NID_aes_256_cfb1
:
242 return NID_aes_256_cfb128
;
248 return NID_des_cfb64
;
250 case NID_des_ede3_cfb64
:
251 case NID_des_ede3_cfb8
:
252 case NID_des_ede3_cfb1
:
254 return NID_des_cfb64
;
261 /* Check it has an OID and it is valid */
262 ASN1_OBJECT
*otmp
= OBJ_nid2obj(nid
);
264 if (OBJ_get0_data(otmp
) == NULL
)
266 ASN1_OBJECT_free(otmp
);
273 int EVP_CIPHER_block_size(const EVP_CIPHER
*cipher
)
276 size_t v
= cipher
->block_size
;
277 OSSL_PARAM params
[2] = { OSSL_PARAM_END
, OSSL_PARAM_END
};
279 params
[0] = OSSL_PARAM_construct_size_t(OSSL_CIPHER_PARAM_BLOCK_SIZE
, &v
);
280 ok
= evp_do_ciph_getparams(cipher
, params
);
282 return ok
!= 0 ? (int)v
: EVP_CTRL_RET_UNSUPPORTED
;
285 int EVP_CIPHER_CTX_block_size(const EVP_CIPHER_CTX
*ctx
)
287 return EVP_CIPHER_block_size(ctx
->cipher
);
290 int EVP_CIPHER_impl_ctx_size(const EVP_CIPHER
*e
)
295 int EVP_Cipher(EVP_CIPHER_CTX
*ctx
, unsigned char *out
,
296 const unsigned char *in
, unsigned int inl
)
298 if (ctx
->cipher
->prov
!= NULL
) {
299 size_t outl
= 0; /* ignored */
300 int blocksize
= EVP_CIPHER_CTX_block_size(ctx
);
302 if (ctx
->cipher
->ccipher
!= NULL
)
304 ctx
->cipher
->ccipher(ctx
->provctx
, out
, &outl
,
305 inl
+ (blocksize
== 1 ? 0 : blocksize
),
310 return ctx
->cipher
->do_cipher(ctx
, out
, in
, inl
);
313 const EVP_CIPHER
*EVP_CIPHER_CTX_cipher(const EVP_CIPHER_CTX
*ctx
)
318 int EVP_CIPHER_CTX_encrypting(const EVP_CIPHER_CTX
*ctx
)
323 unsigned long EVP_CIPHER_flags(const EVP_CIPHER
*cipher
)
326 unsigned long v
= cipher
->flags
;
327 OSSL_PARAM params
[2] = { OSSL_PARAM_END
, OSSL_PARAM_END
};
329 params
[0] = OSSL_PARAM_construct_ulong(OSSL_CIPHER_PARAM_FLAGS
, &v
);
330 ok
= evp_do_ciph_getparams(cipher
, params
);
332 return ok
!= 0 ? v
: 0;
335 void *EVP_CIPHER_CTX_get_app_data(const EVP_CIPHER_CTX
*ctx
)
337 return ctx
->app_data
;
340 void EVP_CIPHER_CTX_set_app_data(EVP_CIPHER_CTX
*ctx
, void *data
)
342 ctx
->app_data
= data
;
345 void *EVP_CIPHER_CTX_get_cipher_data(const EVP_CIPHER_CTX
*ctx
)
347 return ctx
->cipher_data
;
350 void *EVP_CIPHER_CTX_set_cipher_data(EVP_CIPHER_CTX
*ctx
, void *cipher_data
)
352 void *old_cipher_data
;
354 old_cipher_data
= ctx
->cipher_data
;
355 ctx
->cipher_data
= cipher_data
;
357 return old_cipher_data
;
360 int EVP_CIPHER_iv_length(const EVP_CIPHER
*cipher
)
363 size_t v
= cipher
->iv_len
;
364 OSSL_PARAM params
[2] = { OSSL_PARAM_END
, OSSL_PARAM_END
};
366 params
[0] = OSSL_PARAM_construct_size_t(OSSL_CIPHER_PARAM_IVLEN
, &v
);
367 ok
= evp_do_ciph_getparams(cipher
, params
);
369 return ok
!= 0 ? (int)v
: EVP_CTRL_RET_UNSUPPORTED
;
372 int EVP_CIPHER_CTX_iv_length(const EVP_CIPHER_CTX
*ctx
)
374 int rv
, len
= EVP_CIPHER_iv_length(ctx
->cipher
);
376 OSSL_PARAM params
[2] = { OSSL_PARAM_END
, OSSL_PARAM_END
};
378 params
[0] = OSSL_PARAM_construct_size_t(OSSL_CIPHER_PARAM_IVLEN
, &v
);
379 rv
= evp_do_ciph_ctx_getparams(ctx
->cipher
, ctx
->provctx
, params
);
380 if (rv
== EVP_CTRL_RET_UNSUPPORTED
)
382 return rv
!= 0 ? (int)v
: -1;
383 /* TODO (3.0) Remove legacy support */
385 if ((EVP_CIPHER_flags(ctx
->cipher
) & EVP_CIPH_CUSTOM_IV_LENGTH
) != 0) {
386 rv
= EVP_CIPHER_CTX_ctrl((EVP_CIPHER_CTX
*)ctx
, EVP_CTRL_GET_IVLEN
,
388 return (rv
== 1) ? len
: -1;
393 int EVP_CIPHER_CTX_tag_length(const EVP_CIPHER_CTX
*ctx
)
397 OSSL_PARAM params
[2] = { OSSL_PARAM_END
, OSSL_PARAM_END
};
399 params
[0] = OSSL_PARAM_construct_size_t(OSSL_CIPHER_PARAM_AEAD_TAGLEN
, &v
);
400 ret
= evp_do_ciph_ctx_getparams(ctx
->cipher
, ctx
->provctx
, params
);
401 return ret
== 1 ? (int)v
: 0;
404 const unsigned char *EVP_CIPHER_CTX_original_iv(const EVP_CIPHER_CTX
*ctx
)
410 * OSSL_PARAM_OCTET_PTR gets us the pointer to the running IV in the provider
412 const unsigned char *EVP_CIPHER_CTX_iv(const EVP_CIPHER_CTX
*ctx
)
415 const unsigned char *v
= ctx
->iv
;
416 OSSL_PARAM params
[2] = { OSSL_PARAM_END
, OSSL_PARAM_END
};
419 OSSL_PARAM_construct_octet_ptr(OSSL_CIPHER_PARAM_IV
, (void **)&v
,
421 ok
= evp_do_ciph_ctx_getparams(ctx
->cipher
, ctx
->provctx
, params
);
423 return ok
!= 0 ? v
: NULL
;
426 unsigned char *EVP_CIPHER_CTX_iv_noconst(EVP_CIPHER_CTX
*ctx
)
429 unsigned char *v
= ctx
->iv
;
430 OSSL_PARAM params
[2] = { OSSL_PARAM_END
, OSSL_PARAM_END
};
433 OSSL_PARAM_construct_octet_ptr(OSSL_CIPHER_PARAM_IV
, (void **)&v
,
435 ok
= evp_do_ciph_ctx_getparams(ctx
->cipher
, ctx
->provctx
, params
);
437 return ok
!= 0 ? v
: NULL
;
440 unsigned char *EVP_CIPHER_CTX_buf_noconst(EVP_CIPHER_CTX
*ctx
)
445 int EVP_CIPHER_CTX_num(const EVP_CIPHER_CTX
*ctx
)
448 unsigned int v
= (unsigned int)ctx
->num
;
449 OSSL_PARAM params
[2] = { OSSL_PARAM_END
, OSSL_PARAM_END
};
451 params
[0] = OSSL_PARAM_construct_uint(OSSL_CIPHER_PARAM_NUM
, &v
);
452 ok
= evp_do_ciph_ctx_getparams(ctx
->cipher
, ctx
->provctx
, params
);
454 return ok
!= 0 ? (int)v
: EVP_CTRL_RET_UNSUPPORTED
;
457 int EVP_CIPHER_CTX_set_num(EVP_CIPHER_CTX
*ctx
, int num
)
460 unsigned int n
= (unsigned int)num
;
461 OSSL_PARAM params
[2] = { OSSL_PARAM_END
, OSSL_PARAM_END
};
463 params
[0] = OSSL_PARAM_construct_uint(OSSL_CIPHER_PARAM_NUM
, &n
);
464 ok
= evp_do_ciph_ctx_setparams(ctx
->cipher
, ctx
->provctx
, params
);
471 int EVP_CIPHER_key_length(const EVP_CIPHER
*cipher
)
474 size_t v
= cipher
->key_len
;
475 OSSL_PARAM params
[2] = { OSSL_PARAM_END
, OSSL_PARAM_END
};
477 params
[0] = OSSL_PARAM_construct_size_t(OSSL_CIPHER_PARAM_KEYLEN
, &v
);
478 ok
= evp_do_ciph_getparams(cipher
, params
);
480 return ok
!= 0 ? (int)v
: EVP_CTRL_RET_UNSUPPORTED
;
483 int EVP_CIPHER_CTX_key_length(const EVP_CIPHER_CTX
*ctx
)
486 size_t v
= ctx
->key_len
;
487 OSSL_PARAM params
[2] = { OSSL_PARAM_END
, OSSL_PARAM_END
};
489 params
[0] = OSSL_PARAM_construct_size_t(OSSL_CIPHER_PARAM_KEYLEN
, &v
);
490 ok
= evp_do_ciph_ctx_getparams(ctx
->cipher
, ctx
->provctx
, params
);
492 return ok
!= 0 ? (int)v
: EVP_CTRL_RET_UNSUPPORTED
;
495 int EVP_CIPHER_nid(const EVP_CIPHER
*cipher
)
500 int EVP_CIPHER_CTX_nid(const EVP_CIPHER_CTX
*ctx
)
502 return ctx
->cipher
->nid
;
505 int EVP_CIPHER_is_a(const EVP_CIPHER
*cipher
, const char *name
)
508 if (cipher
->prov
== NULL
) {
509 int nid
= EVP_CIPHER_nid(cipher
);
511 return nid
== OBJ_sn2nid(name
) || nid
== OBJ_ln2nid(name
);
514 return evp_is_a(cipher
->prov
, cipher
->name_id
, name
);
517 const char *EVP_CIPHER_name(const EVP_CIPHER
*cipher
)
519 if (cipher
->prov
!= NULL
)
520 return evp_first_name(cipher
->prov
, cipher
->name_id
);
522 return OBJ_nid2sn(EVP_CIPHER_nid(cipher
));
528 const OSSL_PROVIDER
*EVP_CIPHER_provider(const EVP_CIPHER
*cipher
)
533 int EVP_CIPHER_mode(const EVP_CIPHER
*cipher
)
536 unsigned int v
= EVP_CIPHER_flags(cipher
) & EVP_CIPH_MODE
;
537 OSSL_PARAM params
[2] = { OSSL_PARAM_END
, OSSL_PARAM_END
};
539 params
[0] = OSSL_PARAM_construct_uint(OSSL_CIPHER_PARAM_MODE
, &v
);
540 ok
= evp_do_ciph_getparams(cipher
, params
);
542 return ok
!= 0 ? (int)v
: 0;
545 const char *EVP_MD_name(const EVP_MD
*md
)
547 if (md
->prov
!= NULL
)
548 return evp_first_name(md
->prov
, md
->name_id
);
550 return OBJ_nid2sn(EVP_MD_nid(md
));
556 const OSSL_PROVIDER
*EVP_MD_provider(const EVP_MD
*md
)
561 int EVP_MD_block_size(const EVP_MD
*md
)
564 size_t v
= md
->block_size
;
565 OSSL_PARAM params
[2] = { OSSL_PARAM_END
, OSSL_PARAM_END
};
568 EVPerr(EVP_F_EVP_MD_BLOCK_SIZE
, EVP_R_MESSAGE_DIGEST_IS_NULL
);
572 params
[0] = OSSL_PARAM_construct_size_t(OSSL_DIGEST_PARAM_BLOCK_SIZE
, &v
);
573 ok
= evp_do_md_getparams(md
, params
);
575 return ok
!= 0 ? (int)v
: -1;
578 int EVP_MD_type(const EVP_MD
*md
)
583 int EVP_MD_pkey_type(const EVP_MD
*md
)
585 return md
->pkey_type
;
588 int EVP_MD_size(const EVP_MD
*md
)
591 size_t v
= md
->md_size
;
592 OSSL_PARAM params
[2] = { OSSL_PARAM_END
, OSSL_PARAM_END
};
595 EVPerr(EVP_F_EVP_MD_SIZE
, EVP_R_MESSAGE_DIGEST_IS_NULL
);
599 params
[0] = OSSL_PARAM_construct_size_t(OSSL_DIGEST_PARAM_SIZE
, &v
);
600 ok
= evp_do_md_getparams(md
, params
);
602 return ok
!= 0 ? (int)v
: -1;
605 unsigned long EVP_MD_flags(const EVP_MD
*md
)
608 unsigned long v
= md
->flags
;
609 OSSL_PARAM params
[2] = { OSSL_PARAM_END
, OSSL_PARAM_END
};
611 params
[0] = OSSL_PARAM_construct_ulong(OSSL_CIPHER_PARAM_FLAGS
, &v
);
612 ok
= evp_do_md_getparams(md
, params
);
614 return ok
!= 0 ? v
: 0;
617 EVP_MD
*EVP_MD_meth_new(int md_type
, int pkey_type
)
619 EVP_MD
*md
= evp_md_new();
623 md
->pkey_type
= pkey_type
;
628 EVP_MD
*EVP_MD_meth_dup(const EVP_MD
*md
)
633 * Non-legacy EVP_MDs can't be duplicated like this.
634 * Use EVP_MD_up_ref() instead.
636 if (md
->prov
!= NULL
)
639 if ((to
= EVP_MD_meth_new(md
->type
, md
->pkey_type
)) != NULL
) {
640 CRYPTO_RWLOCK
*lock
= to
->lock
;
642 memcpy(to
, md
, sizeof(*to
));
648 void EVP_MD_meth_free(EVP_MD
*md
)
652 int EVP_MD_meth_set_input_blocksize(EVP_MD
*md
, int blocksize
)
654 if (md
->block_size
!= 0)
657 md
->block_size
= blocksize
;
660 int EVP_MD_meth_set_result_size(EVP_MD
*md
, int resultsize
)
662 if (md
->md_size
!= 0)
665 md
->md_size
= resultsize
;
668 int EVP_MD_meth_set_app_datasize(EVP_MD
*md
, int datasize
)
670 if (md
->ctx_size
!= 0)
673 md
->ctx_size
= datasize
;
676 int EVP_MD_meth_set_flags(EVP_MD
*md
, unsigned long flags
)
684 int EVP_MD_meth_set_init(EVP_MD
*md
, int (*init
)(EVP_MD_CTX
*ctx
))
686 if (md
->init
!= NULL
)
692 int EVP_MD_meth_set_update(EVP_MD
*md
, int (*update
)(EVP_MD_CTX
*ctx
,
696 if (md
->update
!= NULL
)
702 int EVP_MD_meth_set_final(EVP_MD
*md
, int (*final
)(EVP_MD_CTX
*ctx
,
705 if (md
->final
!= NULL
)
711 int EVP_MD_meth_set_copy(EVP_MD
*md
, int (*copy
)(EVP_MD_CTX
*to
,
712 const EVP_MD_CTX
*from
))
714 if (md
->copy
!= NULL
)
720 int EVP_MD_meth_set_cleanup(EVP_MD
*md
, int (*cleanup
)(EVP_MD_CTX
*ctx
))
722 if (md
->cleanup
!= NULL
)
725 md
->cleanup
= cleanup
;
728 int EVP_MD_meth_set_ctrl(EVP_MD
*md
, int (*ctrl
)(EVP_MD_CTX
*ctx
, int cmd
,
731 if (md
->md_ctrl
!= NULL
)
738 int EVP_MD_meth_get_input_blocksize(const EVP_MD
*md
)
740 return md
->block_size
;
742 int EVP_MD_meth_get_result_size(const EVP_MD
*md
)
746 int EVP_MD_meth_get_app_datasize(const EVP_MD
*md
)
750 unsigned long EVP_MD_meth_get_flags(const EVP_MD
*md
)
754 int (*EVP_MD_meth_get_init(const EVP_MD
*md
))(EVP_MD_CTX
*ctx
)
758 int (*EVP_MD_meth_get_update(const EVP_MD
*md
))(EVP_MD_CTX
*ctx
,
764 int (*EVP_MD_meth_get_final(const EVP_MD
*md
))(EVP_MD_CTX
*ctx
,
769 int (*EVP_MD_meth_get_copy(const EVP_MD
*md
))(EVP_MD_CTX
*to
,
770 const EVP_MD_CTX
*from
)
774 int (*EVP_MD_meth_get_cleanup(const EVP_MD
*md
))(EVP_MD_CTX
*ctx
)
778 int (*EVP_MD_meth_get_ctrl(const EVP_MD
*md
))(EVP_MD_CTX
*ctx
, int cmd
,
784 const EVP_MD
*EVP_MD_CTX_md(const EVP_MD_CTX
*ctx
)
788 return ctx
->reqdigest
;
791 EVP_PKEY_CTX
*EVP_MD_CTX_pkey_ctx(const EVP_MD_CTX
*ctx
)
796 #if !defined(FIPS_MODE)
797 /* TODO(3.0): EVP_DigestSign* not yet supported in FIPS module */
798 void EVP_MD_CTX_set_pkey_ctx(EVP_MD_CTX
*ctx
, EVP_PKEY_CTX
*pctx
)
801 * it's reasonable to set NULL pctx (a.k.a clear the ctx->pctx), so
802 * we have to deal with the cleanup job here.
804 if (!EVP_MD_CTX_test_flags(ctx
, EVP_MD_CTX_FLAG_KEEP_PKEY_CTX
))
805 EVP_PKEY_CTX_free(ctx
->pctx
);
810 /* make sure pctx is not freed when destroying EVP_MD_CTX */
811 EVP_MD_CTX_set_flags(ctx
, EVP_MD_CTX_FLAG_KEEP_PKEY_CTX
);
813 EVP_MD_CTX_clear_flags(ctx
, EVP_MD_CTX_FLAG_KEEP_PKEY_CTX
);
816 #endif /* !defined(FIPS_MODE) */
818 void *EVP_MD_CTX_md_data(const EVP_MD_CTX
*ctx
)
823 int (*EVP_MD_CTX_update_fn(EVP_MD_CTX
*ctx
))(EVP_MD_CTX
*ctx
,
824 const void *data
, size_t count
)
829 void EVP_MD_CTX_set_update_fn(EVP_MD_CTX
*ctx
,
830 int (*update
) (EVP_MD_CTX
*ctx
,
831 const void *data
, size_t count
))
833 ctx
->update
= update
;
836 void EVP_MD_CTX_set_flags(EVP_MD_CTX
*ctx
, int flags
)
841 void EVP_MD_CTX_clear_flags(EVP_MD_CTX
*ctx
, int flags
)
843 ctx
->flags
&= ~flags
;
846 int EVP_MD_CTX_test_flags(const EVP_MD_CTX
*ctx
, int flags
)
848 return (ctx
->flags
& flags
);
851 void EVP_CIPHER_CTX_set_flags(EVP_CIPHER_CTX
*ctx
, int flags
)
856 void EVP_CIPHER_CTX_clear_flags(EVP_CIPHER_CTX
*ctx
, int flags
)
858 ctx
->flags
&= ~flags
;
861 int EVP_CIPHER_CTX_test_flags(const EVP_CIPHER_CTX
*ctx
, int flags
)
863 return (ctx
->flags
& flags
);
866 int EVP_str2ctrl(int (*cb
)(void *ctx
, int cmd
, void *buf
, size_t buflen
),
867 void *ctx
, int cmd
, const char *value
)
874 return cb(ctx
, cmd
, (void *)value
, len
);
877 int EVP_hex2ctrl(int (*cb
)(void *ctx
, int cmd
, void *buf
, size_t buflen
),
878 void *ctx
, int cmd
, const char *hex
)
884 bin
= OPENSSL_hexstr2buf(hex
, &binlen
);
887 if (binlen
<= INT_MAX
)
888 rv
= cb(ctx
, cmd
, bin
, binlen
);