Remove init of MACs from EVP
[openssl.git] / crypto / evp / names.c
1 /*
2  * Copyright 1995-2018 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 "internal/cryptlib.h"
12 #include <openssl/evp.h>
13 #include <openssl/kdf.h>
14 #include "internal/objects.h"
15 #include <openssl/x509.h>
16 #include "internal/evp_int.h"
17
18 int EVP_add_cipher(const EVP_CIPHER *c)
19 {
20     int r;
21
22     if (c == NULL)
23         return 0;
24
25     r = OBJ_NAME_add(OBJ_nid2sn(c->nid), OBJ_NAME_TYPE_CIPHER_METH,
26                      (const char *)c);
27     if (r == 0)
28         return 0;
29     r = OBJ_NAME_add(OBJ_nid2ln(c->nid), OBJ_NAME_TYPE_CIPHER_METH,
30                      (const char *)c);
31     return r;
32 }
33
34 int EVP_add_digest(const EVP_MD *md)
35 {
36     int r;
37     const char *name;
38
39     name = OBJ_nid2sn(md->type);
40     r = OBJ_NAME_add(name, OBJ_NAME_TYPE_MD_METH, (const char *)md);
41     if (r == 0)
42         return 0;
43     r = OBJ_NAME_add(OBJ_nid2ln(md->type), OBJ_NAME_TYPE_MD_METH,
44                      (const char *)md);
45     if (r == 0)
46         return 0;
47
48     if (md->pkey_type && md->type != md->pkey_type) {
49         r = OBJ_NAME_add(OBJ_nid2sn(md->pkey_type),
50                          OBJ_NAME_TYPE_MD_METH | OBJ_NAME_ALIAS, name);
51         if (r == 0)
52             return 0;
53         r = OBJ_NAME_add(OBJ_nid2ln(md->pkey_type),
54                          OBJ_NAME_TYPE_MD_METH | OBJ_NAME_ALIAS, name);
55     }
56     return r;
57 }
58
59 /* TODO(3.0) Is this needed after changing to providers? */
60 int EVP_add_kdf(const EVP_KDF *k)
61 {
62     int r;
63
64     if (k == NULL)
65         return 0;
66
67     r = OBJ_NAME_add(OBJ_nid2sn(k->type), OBJ_NAME_TYPE_KDF_METH,
68                      (const char *)k);
69     if (r == 0)
70         return 0;
71     r = OBJ_NAME_add(OBJ_nid2ln(k->type), OBJ_NAME_TYPE_KDF_METH,
72                      (const char *)k);
73     return r;
74 }
75
76 const EVP_CIPHER *EVP_get_cipherbyname(const char *name)
77 {
78     const EVP_CIPHER *cp;
79
80     if (!OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_CIPHERS, NULL))
81         return NULL;
82
83     cp = (const EVP_CIPHER *)OBJ_NAME_get(name, OBJ_NAME_TYPE_CIPHER_METH);
84     return cp;
85 }
86
87 const EVP_MD *EVP_get_digestbyname(const char *name)
88 {
89     const EVP_MD *cp;
90
91     if (!OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_DIGESTS, NULL))
92         return NULL;
93
94     cp = (const EVP_MD *)OBJ_NAME_get(name, OBJ_NAME_TYPE_MD_METH);
95     return cp;
96 }
97
98 /* TODO(3.0) Is this API needed after implementing providers? */
99 const EVP_KDF *EVP_get_kdfbyname(const char *name)
100 {
101     const EVP_KDF *kdf;
102
103     if (!OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_KDFS, NULL))
104         return NULL;
105
106     kdf = (const EVP_KDF *)OBJ_NAME_get(name, OBJ_NAME_TYPE_KDF_METH);
107     return kdf;
108 }
109
110 void evp_cleanup_int(void)
111 {
112     OBJ_NAME_cleanup(OBJ_NAME_TYPE_KDF_METH);
113     OBJ_NAME_cleanup(OBJ_NAME_TYPE_CIPHER_METH);
114     OBJ_NAME_cleanup(OBJ_NAME_TYPE_MD_METH);
115     /*
116      * The above calls will only clean out the contents of the name hash
117      * table, but not the hash table itself.  The following line does that
118      * part.  -- Richard Levitte
119      */
120     OBJ_NAME_cleanup(-1);
121
122     EVP_PBE_cleanup();
123     OBJ_sigid_free();
124
125     evp_app_cleanup_int();
126 }
127
128 struct doall_cipher {
129     void *arg;
130     void (*fn) (const EVP_CIPHER *ciph,
131                 const char *from, const char *to, void *arg);
132 };
133
134 static void do_all_cipher_fn(const OBJ_NAME *nm, void *arg)
135 {
136     struct doall_cipher *dc = arg;
137     if (nm->alias)
138         dc->fn(NULL, nm->name, nm->data, dc->arg);
139     else
140         dc->fn((const EVP_CIPHER *)nm->data, nm->name, NULL, dc->arg);
141 }
142
143 void EVP_CIPHER_do_all(void (*fn) (const EVP_CIPHER *ciph,
144                                    const char *from, const char *to, void *x),
145                        void *arg)
146 {
147     struct doall_cipher dc;
148
149     /* Ignore errors */
150     OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_CIPHERS, NULL);
151
152     dc.fn = fn;
153     dc.arg = arg;
154     OBJ_NAME_do_all(OBJ_NAME_TYPE_CIPHER_METH, do_all_cipher_fn, &dc);
155 }
156
157 void EVP_CIPHER_do_all_sorted(void (*fn) (const EVP_CIPHER *ciph,
158                                           const char *from, const char *to,
159                                           void *x), void *arg)
160 {
161     struct doall_cipher dc;
162
163     /* Ignore errors */
164     OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_CIPHERS, NULL);
165
166     dc.fn = fn;
167     dc.arg = arg;
168     OBJ_NAME_do_all_sorted(OBJ_NAME_TYPE_CIPHER_METH, do_all_cipher_fn, &dc);
169 }
170
171 struct doall_md {
172     void *arg;
173     void (*fn) (const EVP_MD *ciph,
174                 const char *from, const char *to, void *arg);
175 };
176
177 static void do_all_md_fn(const OBJ_NAME *nm, void *arg)
178 {
179     struct doall_md *dc = arg;
180     if (nm->alias)
181         dc->fn(NULL, nm->name, nm->data, dc->arg);
182     else
183         dc->fn((const EVP_MD *)nm->data, nm->name, NULL, dc->arg);
184 }
185
186 void EVP_MD_do_all(void (*fn) (const EVP_MD *md,
187                                const char *from, const char *to, void *x),
188                    void *arg)
189 {
190     struct doall_md dc;
191
192     /* Ignore errors */
193     OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_DIGESTS, NULL);
194
195     dc.fn = fn;
196     dc.arg = arg;
197     OBJ_NAME_do_all(OBJ_NAME_TYPE_MD_METH, do_all_md_fn, &dc);
198 }
199
200 void EVP_MD_do_all_sorted(void (*fn) (const EVP_MD *md,
201                                       const char *from, const char *to,
202                                       void *x), void *arg)
203 {
204     struct doall_md dc;
205
206     OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_DIGESTS, NULL);
207
208     dc.fn = fn;
209     dc.arg = arg;
210     OBJ_NAME_do_all_sorted(OBJ_NAME_TYPE_MD_METH, do_all_md_fn, &dc);
211 }