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 <openssl/evp.h>
12 #include <openssl/kdf.h>
13 #include <openssl/x509.h>
14 #include "internal/cryptlib.h"
15 #include "internal/namemap.h"
16 #include "crypto/objects.h"
17 #include "crypto/evp.h"
19 int EVP_add_cipher(const EVP_CIPHER
*c
)
26 r
= OBJ_NAME_add(OBJ_nid2sn(c
->nid
), OBJ_NAME_TYPE_CIPHER_METH
,
30 r
= OBJ_NAME_add(OBJ_nid2ln(c
->nid
), OBJ_NAME_TYPE_CIPHER_METH
,
35 int EVP_add_digest(const EVP_MD
*md
)
40 name
= OBJ_nid2sn(md
->type
);
41 r
= OBJ_NAME_add(name
, OBJ_NAME_TYPE_MD_METH
, (const char *)md
);
44 r
= OBJ_NAME_add(OBJ_nid2ln(md
->type
), OBJ_NAME_TYPE_MD_METH
,
49 if (md
->pkey_type
&& md
->type
!= md
->pkey_type
) {
50 r
= OBJ_NAME_add(OBJ_nid2sn(md
->pkey_type
),
51 OBJ_NAME_TYPE_MD_METH
| OBJ_NAME_ALIAS
, name
);
54 r
= OBJ_NAME_add(OBJ_nid2ln(md
->pkey_type
),
55 OBJ_NAME_TYPE_MD_METH
| OBJ_NAME_ALIAS
, name
);
60 static void cipher_from_name(const char *name
, void *data
)
62 const EVP_CIPHER
**cipher
= data
;
67 *cipher
= (const EVP_CIPHER
*)OBJ_NAME_get(name
, OBJ_NAME_TYPE_CIPHER_METH
);
70 const EVP_CIPHER
*EVP_get_cipherbyname(const char *name
)
72 return evp_get_cipherbyname_ex(NULL
, name
);
75 const EVP_CIPHER
*evp_get_cipherbyname_ex(OPENSSL_CTX
*libctx
, const char *name
)
78 OSSL_NAMEMAP
*namemap
;
81 if (!OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_CIPHERS
, NULL
))
84 cp
= (const EVP_CIPHER
*)OBJ_NAME_get(name
, OBJ_NAME_TYPE_CIPHER_METH
);
90 * It's not in the method database, but it might be there under a different
91 * name. So we check for aliases in the EVP namemap and try all of those
95 namemap
= ossl_namemap_stored(libctx
);
96 id
= ossl_namemap_name2num(namemap
, name
);
100 ossl_namemap_doall_names(namemap
, id
, cipher_from_name
, &cp
);
105 static void digest_from_name(const char *name
, void *data
)
107 const EVP_MD
**md
= data
;
112 *md
= (const EVP_MD
*)OBJ_NAME_get(name
, OBJ_NAME_TYPE_MD_METH
);
115 const EVP_MD
*EVP_get_digestbyname(const char *name
)
117 return evp_get_digestbyname_ex(NULL
, name
);
120 const EVP_MD
*evp_get_digestbyname_ex(OPENSSL_CTX
*libctx
, const char *name
)
123 OSSL_NAMEMAP
*namemap
;
126 if (!OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_DIGESTS
, NULL
))
129 dp
= (const EVP_MD
*)OBJ_NAME_get(name
, OBJ_NAME_TYPE_MD_METH
);
135 * It's not in the method database, but it might be there under a different
136 * name. So we check for aliases in the EVP namemap and try all of those
140 namemap
= ossl_namemap_stored(libctx
);
141 id
= ossl_namemap_name2num(namemap
, name
);
145 ossl_namemap_doall_names(namemap
, id
, digest_from_name
, &dp
);
150 void evp_cleanup_int(void)
152 OBJ_NAME_cleanup(OBJ_NAME_TYPE_KDF_METH
);
153 OBJ_NAME_cleanup(OBJ_NAME_TYPE_CIPHER_METH
);
154 OBJ_NAME_cleanup(OBJ_NAME_TYPE_MD_METH
);
156 * The above calls will only clean out the contents of the name hash
157 * table, but not the hash table itself. The following line does that
158 * part. -- Richard Levitte
160 OBJ_NAME_cleanup(-1);
165 evp_app_cleanup_int();
168 struct doall_cipher
{
170 void (*fn
) (const EVP_CIPHER
*ciph
,
171 const char *from
, const char *to
, void *arg
);
174 static void do_all_cipher_fn(const OBJ_NAME
*nm
, void *arg
)
176 struct doall_cipher
*dc
= arg
;
178 dc
->fn(NULL
, nm
->name
, nm
->data
, dc
->arg
);
180 dc
->fn((const EVP_CIPHER
*)nm
->data
, nm
->name
, NULL
, dc
->arg
);
183 void EVP_CIPHER_do_all(void (*fn
) (const EVP_CIPHER
*ciph
,
184 const char *from
, const char *to
, void *x
),
187 struct doall_cipher dc
;
190 OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_CIPHERS
, NULL
);
194 OBJ_NAME_do_all(OBJ_NAME_TYPE_CIPHER_METH
, do_all_cipher_fn
, &dc
);
197 void EVP_CIPHER_do_all_sorted(void (*fn
) (const EVP_CIPHER
*ciph
,
198 const char *from
, const char *to
,
201 struct doall_cipher dc
;
204 OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_CIPHERS
, NULL
);
208 OBJ_NAME_do_all_sorted(OBJ_NAME_TYPE_CIPHER_METH
, do_all_cipher_fn
, &dc
);
213 void (*fn
) (const EVP_MD
*ciph
,
214 const char *from
, const char *to
, void *arg
);
217 static void do_all_md_fn(const OBJ_NAME
*nm
, void *arg
)
219 struct doall_md
*dc
= arg
;
221 dc
->fn(NULL
, nm
->name
, nm
->data
, dc
->arg
);
223 dc
->fn((const EVP_MD
*)nm
->data
, nm
->name
, NULL
, dc
->arg
);
226 void EVP_MD_do_all(void (*fn
) (const EVP_MD
*md
,
227 const char *from
, const char *to
, void *x
),
233 OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_DIGESTS
, NULL
);
237 OBJ_NAME_do_all(OBJ_NAME_TYPE_MD_METH
, do_all_md_fn
, &dc
);
240 void EVP_MD_do_all_sorted(void (*fn
) (const EVP_MD
*md
,
241 const char *from
, const char *to
,
246 OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_DIGESTS
, NULL
);
250 OBJ_NAME_do_all_sorted(OBJ_NAME_TYPE_MD_METH
, do_all_md_fn
, &dc
);