6cdab2256cec22fbcbf775233d80a01c7a24bb3a
[openssl.git] / crypto / evp / names.c
1 /*
2  * Copyright 1995-2018 The OpenSSL Project Authors. All Rights Reserved.
3  *
4  * Licensed under the OpenSSL license (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 "internal/cryptlib.h"
12 #include <openssl/evp.h>
13 #include "internal/objects.h"
14 #include <openssl/x509.h>
15 #include "internal/evp_int.h"
16
17 int EVP_add_cipher(const EVP_CIPHER *c)
18 {
19     int r;
20
21     if (c == NULL)
22         return 0;
23
24     r = OBJ_NAME_add(OBJ_nid2sn(c->nid), OBJ_NAME_TYPE_CIPHER_METH,
25                      (const char *)c);
26     if (r == 0)
27         return 0;
28     r = OBJ_NAME_add(OBJ_nid2ln(c->nid), OBJ_NAME_TYPE_CIPHER_METH,
29                      (const char *)c);
30     return r;
31 }
32
33 int EVP_add_digest(const EVP_MD *md)
34 {
35     int r;
36     const char *name;
37
38     name = OBJ_nid2sn(md->type);
39     r = OBJ_NAME_add(name, OBJ_NAME_TYPE_MD_METH, (const char *)md);
40     if (r == 0)
41         return 0;
42     r = OBJ_NAME_add(OBJ_nid2ln(md->type), OBJ_NAME_TYPE_MD_METH,
43                      (const char *)md);
44     if (r == 0)
45         return 0;
46
47     if (md->pkey_type && md->type != md->pkey_type) {
48         r = OBJ_NAME_add(OBJ_nid2sn(md->pkey_type),
49                          OBJ_NAME_TYPE_MD_METH | OBJ_NAME_ALIAS, name);
50         if (r == 0)
51             return 0;
52         r = OBJ_NAME_add(OBJ_nid2ln(md->pkey_type),
53                          OBJ_NAME_TYPE_MD_METH | OBJ_NAME_ALIAS, name);
54     }
55     return r;
56 }
57
58 int EVP_add_mac(const EVP_MAC *m)
59 {
60     int r;
61
62     if (m == NULL)
63         return 0;
64
65     r = OBJ_NAME_add(OBJ_nid2sn(m->type), OBJ_NAME_TYPE_MAC_METH,
66                      (const char *)m);
67     if (r == 0)
68         return 0;
69     r = OBJ_NAME_add(OBJ_nid2ln(m->type), OBJ_NAME_TYPE_MAC_METH,
70                      (const char *)m);
71     return r;
72 }
73
74 const EVP_CIPHER *EVP_get_cipherbyname(const char *name)
75 {
76     const EVP_CIPHER *cp;
77
78     if (!OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_CIPHERS, NULL))
79         return NULL;
80
81     cp = (const EVP_CIPHER *)OBJ_NAME_get(name, OBJ_NAME_TYPE_CIPHER_METH);
82     return cp;
83 }
84
85 const EVP_MD *EVP_get_digestbyname(const char *name)
86 {
87     const EVP_MD *cp;
88
89     if (!OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_DIGESTS, NULL))
90         return NULL;
91
92     cp = (const EVP_MD *)OBJ_NAME_get(name, OBJ_NAME_TYPE_MD_METH);
93     return cp;
94 }
95
96 const EVP_MAC *EVP_get_macbyname(const char *name)
97 {
98     const EVP_MAC *mp;
99
100     if (!OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_MACS, NULL))
101         return NULL;
102
103     mp = (const EVP_MAC *)OBJ_NAME_get(name, OBJ_NAME_TYPE_MAC_METH);
104     return mp;
105 }
106
107 void evp_cleanup_int(void)
108 {
109     OBJ_NAME_cleanup(OBJ_NAME_TYPE_MAC_METH);
110     OBJ_NAME_cleanup(OBJ_NAME_TYPE_CIPHER_METH);
111     OBJ_NAME_cleanup(OBJ_NAME_TYPE_MD_METH);
112     /*
113      * The above calls will only clean out the contents of the name hash
114      * table, but not the hash table itself.  The following line does that
115      * part.  -- Richard Levitte
116      */
117     OBJ_NAME_cleanup(-1);
118
119     EVP_PBE_cleanup();
120     OBJ_sigid_free();
121
122     evp_app_cleanup_int();
123 }
124
125 struct doall_cipher {
126     void *arg;
127     void (*fn) (const EVP_CIPHER *ciph,
128                 const char *from, const char *to, void *arg);
129 };
130
131 static void do_all_cipher_fn(const OBJ_NAME *nm, void *arg)
132 {
133     struct doall_cipher *dc = arg;
134     if (nm->alias)
135         dc->fn(NULL, nm->name, nm->data, dc->arg);
136     else
137         dc->fn((const EVP_CIPHER *)nm->data, nm->name, NULL, dc->arg);
138 }
139
140 void EVP_CIPHER_do_all(void (*fn) (const EVP_CIPHER *ciph,
141                                    const char *from, const char *to, void *x),
142                        void *arg)
143 {
144     struct doall_cipher dc;
145
146     /* Ignore errors */
147     OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_CIPHERS, NULL);
148
149     dc.fn = fn;
150     dc.arg = arg;
151     OBJ_NAME_do_all(OBJ_NAME_TYPE_CIPHER_METH, do_all_cipher_fn, &dc);
152 }
153
154 void EVP_CIPHER_do_all_sorted(void (*fn) (const EVP_CIPHER *ciph,
155                                           const char *from, const char *to,
156                                           void *x), void *arg)
157 {
158     struct doall_cipher dc;
159
160     /* Ignore errors */
161     OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_CIPHERS, NULL);
162
163     dc.fn = fn;
164     dc.arg = arg;
165     OBJ_NAME_do_all_sorted(OBJ_NAME_TYPE_CIPHER_METH, do_all_cipher_fn, &dc);
166 }
167
168 struct doall_md {
169     void *arg;
170     void (*fn) (const EVP_MD *ciph,
171                 const char *from, const char *to, void *arg);
172 };
173
174 static void do_all_md_fn(const OBJ_NAME *nm, void *arg)
175 {
176     struct doall_md *dc = arg;
177     if (nm->alias)
178         dc->fn(NULL, nm->name, nm->data, dc->arg);
179     else
180         dc->fn((const EVP_MD *)nm->data, nm->name, NULL, dc->arg);
181 }
182
183 void EVP_MD_do_all(void (*fn) (const EVP_MD *md,
184                                const char *from, const char *to, void *x),
185                    void *arg)
186 {
187     struct doall_md dc;
188
189     /* Ignore errors */
190     OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_DIGESTS, NULL);
191
192     dc.fn = fn;
193     dc.arg = arg;
194     OBJ_NAME_do_all(OBJ_NAME_TYPE_MD_METH, do_all_md_fn, &dc);
195 }
196
197 void EVP_MD_do_all_sorted(void (*fn) (const EVP_MD *md,
198                                       const char *from, const char *to,
199                                       void *x), void *arg)
200 {
201     struct doall_md dc;
202
203     OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_DIGESTS, NULL);
204
205     dc.fn = fn;
206     dc.arg = arg;
207     OBJ_NAME_do_all_sorted(OBJ_NAME_TYPE_MD_METH, do_all_md_fn, &dc);
208 }
209
210 struct doall_mac {
211     void *arg;
212     void (*fn) (const EVP_MAC *ciph,
213                 const char *from, const char *to, void *arg);
214 };
215
216 static void do_all_mac_fn(const OBJ_NAME *nm, void *arg)
217 {
218     struct doall_mac *dc = arg;
219
220     if (nm->alias)
221         dc->fn(NULL, nm->name, nm->data, dc->arg);
222     else
223         dc->fn((const EVP_MAC *)nm->data, nm->name, NULL, dc->arg);
224 }
225
226 void EVP_MAC_do_all(void (*fn)
227                     (const EVP_MAC *ciph, const char *from, const char *to,
228                      void *x), void *arg)
229 {
230     struct doall_mac dc;
231
232     /* Ignore errors */
233     OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_MACS, NULL);
234
235     dc.fn = fn;
236     dc.arg = arg;
237     OBJ_NAME_do_all(OBJ_NAME_TYPE_MAC_METH, do_all_mac_fn, &dc);
238 }
239
240 void EVP_MAC_do_all_sorted(void (*fn)
241                            (const EVP_MAC *ciph, const char *from,
242                             const char *to, void *x), void *arg)
243 {
244     struct doall_mac dc;
245
246     /* Ignore errors */
247     OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_MACS, NULL);
248
249     dc.fn = fn;
250     dc.arg = arg;
251     OBJ_NAME_do_all_sorted(OBJ_NAME_TYPE_MAC_METH, do_all_mac_fn, &dc);
252 }
253