KEYMGMT: Add functions to get param/key generation parameters
[openssl.git] / crypto / evp / keymgmt_meth.c
1 /*
2  * Copyright 2019 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 <openssl/crypto.h>
11 #include <openssl/core_numbers.h>
12 #include <openssl/evp.h>
13 #include <openssl/err.h>
14 #include "internal/provider.h"
15 #include "internal/refcount.h"
16 #include "crypto/evp.h"
17 #include "evp_local.h"
18
19
20 static void *keymgmt_new(void)
21 {
22     EVP_KEYMGMT *keymgmt = NULL;
23
24     if ((keymgmt = OPENSSL_zalloc(sizeof(*keymgmt))) == NULL
25         || (keymgmt->lock = CRYPTO_THREAD_lock_new()) == NULL) {
26         EVP_KEYMGMT_free(keymgmt);
27         EVPerr(0, ERR_R_MALLOC_FAILURE);
28         return NULL;
29     }
30
31     keymgmt->refcnt = 1;
32
33     return keymgmt;
34 }
35
36 static void *keymgmt_from_dispatch(int name_id,
37                                    const OSSL_DISPATCH *fns,
38                                    OSSL_PROVIDER *prov)
39 {
40     EVP_KEYMGMT *keymgmt = NULL;
41     int setparamfncnt = 0, getparamfncnt = 0;
42     int setgenparamfncnt = 0, getgenparamfncnt = 0;
43     int importfncnt = 0, exportfncnt = 0;
44
45     if ((keymgmt = keymgmt_new()) == NULL) {
46         EVP_KEYMGMT_free(keymgmt);
47         return NULL;
48     }
49     keymgmt->name_id = name_id;
50
51     for (; fns->function_id != 0; fns++) {
52         switch (fns->function_id) {
53         case OSSL_FUNC_KEYMGMT_NEW:
54             if (keymgmt->new == NULL)
55                 keymgmt->new = OSSL_get_OP_keymgmt_new(fns);
56             break;
57         case OSSL_FUNC_KEYMGMT_GEN_INIT:
58             if (keymgmt->gen_init == NULL)
59                 keymgmt->gen_init = OSSL_get_OP_keymgmt_gen_init(fns);
60             break;
61         case OSSL_FUNC_KEYMGMT_GEN_SET_TEMPLATE:
62             if (keymgmt->gen_set_template == NULL)
63                 keymgmt->gen_set_template =
64                     OSSL_get_OP_keymgmt_gen_set_template(fns);
65             break;
66         case OSSL_FUNC_KEYMGMT_GEN_SET_PARAMS:
67             if (keymgmt->gen_set_params == NULL) {
68                 setgenparamfncnt++;
69                 keymgmt->gen_set_params =
70                     OSSL_get_OP_keymgmt_gen_set_params(fns);
71             }
72             break;
73         case OSSL_FUNC_KEYMGMT_GEN_SETTABLE_PARAMS:
74             if (keymgmt->gen_settable_params == NULL) {
75                 setgenparamfncnt++;
76                 keymgmt->gen_settable_params =
77                     OSSL_get_OP_keymgmt_gen_settable_params(fns);
78             }
79             break;
80         case OSSL_FUNC_KEYMGMT_GEN_GET_PARAMS:
81             if (keymgmt->gen_get_params == NULL) {
82                 getgenparamfncnt++;
83                 keymgmt->gen_get_params =
84                     OSSL_get_OP_keymgmt_gen_get_params(fns);
85             }
86             break;
87         case OSSL_FUNC_KEYMGMT_GEN_GETTABLE_PARAMS:
88             if (keymgmt->gen_gettable_params == NULL) {
89                 getgenparamfncnt++;
90                 keymgmt->gen_gettable_params =
91                     OSSL_get_OP_keymgmt_gen_gettable_params(fns);
92             }
93             break;
94         case OSSL_FUNC_KEYMGMT_GEN:
95             if (keymgmt->gen == NULL)
96                 keymgmt->gen = OSSL_get_OP_keymgmt_gen(fns);
97             break;
98         case OSSL_FUNC_KEYMGMT_GEN_CLEANUP:
99             if (keymgmt->gen_cleanup == NULL)
100                 keymgmt->gen_cleanup = OSSL_get_OP_keymgmt_gen_cleanup(fns);
101             break;
102         case OSSL_FUNC_KEYMGMT_FREE:
103             if (keymgmt->free == NULL)
104                 keymgmt->free = OSSL_get_OP_keymgmt_free(fns);
105             break;
106         case OSSL_FUNC_KEYMGMT_GET_PARAMS:
107             if (keymgmt->get_params == NULL) {
108                 getparamfncnt++;
109                 keymgmt->get_params = OSSL_get_OP_keymgmt_get_params(fns);
110             }
111             break;
112         case OSSL_FUNC_KEYMGMT_GETTABLE_PARAMS:
113             if (keymgmt->gettable_params == NULL) {
114                 getparamfncnt++;
115                 keymgmt->gettable_params =
116                     OSSL_get_OP_keymgmt_gettable_params(fns);
117             }
118             break;
119          case OSSL_FUNC_KEYMGMT_SET_PARAMS:
120             if (keymgmt->set_params == NULL) {
121                 setparamfncnt++;
122                 keymgmt->set_params = OSSL_get_OP_keymgmt_set_params(fns);
123             }
124             break;
125         case OSSL_FUNC_KEYMGMT_SETTABLE_PARAMS:
126             if (keymgmt->settable_params == NULL) {
127                 setparamfncnt++;
128                 keymgmt->settable_params =
129                     OSSL_get_OP_keymgmt_settable_params(fns);
130             }
131             break;
132         case OSSL_FUNC_KEYMGMT_QUERY_OPERATION_NAME:
133             if (keymgmt->query_operation_name == NULL)
134                 keymgmt->query_operation_name =
135                     OSSL_get_OP_keymgmt_query_operation_name(fns);
136             break;
137         case OSSL_FUNC_KEYMGMT_HAS:
138             if (keymgmt->has == NULL)
139                 keymgmt->has = OSSL_get_OP_keymgmt_has(fns);
140             break;
141         case OSSL_FUNC_KEYMGMT_VALIDATE:
142             if (keymgmt->validate == NULL)
143                 keymgmt->validate = OSSL_get_OP_keymgmt_validate(fns);
144             break;
145         case OSSL_FUNC_KEYMGMT_MATCH:
146             if (keymgmt->match == NULL)
147                 keymgmt->match = OSSL_get_OP_keymgmt_match(fns);
148             break;
149         case OSSL_FUNC_KEYMGMT_IMPORT:
150             if (keymgmt->import == NULL) {
151                 importfncnt++;
152                 keymgmt->import = OSSL_get_OP_keymgmt_import(fns);
153             }
154             break;
155         case OSSL_FUNC_KEYMGMT_IMPORT_TYPES:
156             if (keymgmt->import_types == NULL) {
157                 importfncnt++;
158                 keymgmt->import_types = OSSL_get_OP_keymgmt_import_types(fns);
159             }
160             break;
161         case OSSL_FUNC_KEYMGMT_EXPORT:
162             if (keymgmt->export == NULL) {
163                 exportfncnt++;
164                 keymgmt->export = OSSL_get_OP_keymgmt_export(fns);
165             }
166             break;
167         case OSSL_FUNC_KEYMGMT_EXPORT_TYPES:
168             if (keymgmt->export_types == NULL) {
169                 exportfncnt++;
170                 keymgmt->export_types = OSSL_get_OP_keymgmt_export_types(fns);
171             }
172             break;
173         }
174     }
175     /*
176      * Try to check that the method is sensible.
177      * At least one constructor and the destructor are MANDATORY
178      * The functions 'has' is MANDATORY
179      * It makes no sense being able to free stuff if you can't create it.
180      * It makes no sense providing OSSL_PARAM descriptors for import and
181      * export if you can't import or export.
182      */
183     if (keymgmt->free == NULL
184         || (keymgmt->new == NULL && keymgmt->gen == NULL)
185         || keymgmt->has == NULL
186         || (getparamfncnt != 0 && getparamfncnt != 2)
187         || (setparamfncnt != 0 && setparamfncnt != 2)
188         || (setgenparamfncnt != 0 && setgenparamfncnt != 2)
189         || (getgenparamfncnt != 0 && getgenparamfncnt != 2)
190         || (importfncnt != 0 && importfncnt != 2)
191         || (exportfncnt != 0 && exportfncnt != 2)
192         || (keymgmt->gen != NULL
193             && (keymgmt->gen_init == NULL
194                 || keymgmt->gen_cleanup == NULL))) {
195         EVP_KEYMGMT_free(keymgmt);
196         EVPerr(0, EVP_R_INVALID_PROVIDER_FUNCTIONS);
197         return NULL;
198     }
199     keymgmt->prov = prov;
200     if (prov != NULL)
201         ossl_provider_up_ref(prov);
202
203     return keymgmt;
204 }
205
206 EVP_KEYMGMT *evp_keymgmt_fetch_by_number(OPENSSL_CTX *ctx, int name_id,
207                                          const char *properties)
208 {
209     return evp_generic_fetch_by_number(ctx,
210                                        OSSL_OP_KEYMGMT, name_id, properties,
211                                        keymgmt_from_dispatch,
212                                        (int (*)(void *))EVP_KEYMGMT_up_ref,
213                                        (void (*)(void *))EVP_KEYMGMT_free);
214 }
215
216 EVP_KEYMGMT *EVP_KEYMGMT_fetch(OPENSSL_CTX *ctx, const char *algorithm,
217                                const char *properties)
218 {
219     return evp_generic_fetch(ctx, OSSL_OP_KEYMGMT, algorithm, properties,
220                              keymgmt_from_dispatch,
221                              (int (*)(void *))EVP_KEYMGMT_up_ref,
222                              (void (*)(void *))EVP_KEYMGMT_free);
223 }
224
225 int EVP_KEYMGMT_up_ref(EVP_KEYMGMT *keymgmt)
226 {
227     int ref = 0;
228
229     CRYPTO_UP_REF(&keymgmt->refcnt, &ref, keymgmt->lock);
230     return 1;
231 }
232
233 void EVP_KEYMGMT_free(EVP_KEYMGMT *keymgmt)
234 {
235     int ref = 0;
236
237     if (keymgmt == NULL)
238         return;
239
240     CRYPTO_DOWN_REF(&keymgmt->refcnt, &ref, keymgmt->lock);
241     if (ref > 0)
242         return;
243     ossl_provider_free(keymgmt->prov);
244     CRYPTO_THREAD_lock_free(keymgmt->lock);
245     OPENSSL_free(keymgmt);
246 }
247
248 const OSSL_PROVIDER *EVP_KEYMGMT_provider(const EVP_KEYMGMT *keymgmt)
249 {
250     return keymgmt->prov;
251 }
252
253 int EVP_KEYMGMT_number(const EVP_KEYMGMT *keymgmt)
254 {
255     return keymgmt->name_id;
256 }
257
258 int EVP_KEYMGMT_is_a(const EVP_KEYMGMT *keymgmt, const char *name)
259 {
260     return evp_is_a(keymgmt->prov, keymgmt->name_id, NULL, name);
261 }
262
263 void EVP_KEYMGMT_do_all_provided(OPENSSL_CTX *libctx,
264                                  void (*fn)(EVP_KEYMGMT *keymgmt, void *arg),
265                                  void *arg)
266 {
267     evp_generic_do_all(libctx, OSSL_OP_KEYMGMT,
268                        (void (*)(void *, void *))fn, arg,
269                        keymgmt_from_dispatch,
270                        (void (*)(void *))EVP_KEYMGMT_free);
271 }
272
273 void EVP_KEYMGMT_names_do_all(const EVP_KEYMGMT *keymgmt,
274                               void (*fn)(const char *name, void *data),
275                               void *data)
276 {
277     if (keymgmt->prov != NULL)
278         evp_names_do_all(keymgmt->prov, keymgmt->name_id, fn, data);
279 }
280
281 /*
282  * Internal API that interfaces with the method function pointers
283  */
284 void *evp_keymgmt_newdata(const EVP_KEYMGMT *keymgmt)
285 {
286     void *provctx = ossl_provider_ctx(EVP_KEYMGMT_provider(keymgmt));
287
288     /*
289      * TODO(3.0) 'new' is currently mandatory on its own, but when new
290      * constructors appear, it won't be quite as mandatory, so we have
291      * a check for future cases.
292      */
293     if (keymgmt->new == NULL)
294         return NULL;
295     return keymgmt->new(provctx);
296 }
297
298 void evp_keymgmt_freedata(const EVP_KEYMGMT *keymgmt, void *keydata)
299 {
300     /* This is mandatory, no need to check for its presence */
301     keymgmt->free(keydata);
302 }
303
304 void *evp_keymgmt_gen_init(const EVP_KEYMGMT *keymgmt, int selection)
305 {
306     void *provctx = ossl_provider_ctx(EVP_KEYMGMT_provider(keymgmt));
307
308     if (keymgmt->gen_init == NULL)
309         return NULL;
310     return keymgmt->gen_init(provctx, selection);
311 }
312
313 int evp_keymgmt_gen_set_template(const EVP_KEYMGMT *keymgmt, void *genctx,
314                                  void *template)
315 {
316     if (keymgmt->gen_set_template == NULL)
317         return 0;
318     return keymgmt->gen_set_template(genctx, template);
319 }
320
321 int evp_keymgmt_gen_set_params(const EVP_KEYMGMT *keymgmt, void *genctx,
322                                const OSSL_PARAM params[])
323 {
324     if (keymgmt->gen_set_params == NULL)
325         return 0;
326     return keymgmt->gen_set_params(genctx, params);
327 }
328
329 const OSSL_PARAM *evp_keymgmt_gen_settable_params(const EVP_KEYMGMT *keymgmt)
330 {
331     void *provctx = ossl_provider_ctx(EVP_KEYMGMT_provider(keymgmt));
332
333     if (keymgmt->gen_settable_params == NULL)
334         return NULL;
335     return keymgmt->gen_settable_params(provctx);
336 }
337
338 int evp_keymgmt_gen_get_params(const EVP_KEYMGMT *keymgmt, void *genctx,
339                                OSSL_PARAM params[])
340 {
341     if (keymgmt->gen_get_params == NULL)
342         return 0;
343     return keymgmt->gen_get_params(genctx, params);
344 }
345
346 const OSSL_PARAM *evp_keymgmt_gen_gettable_params(const EVP_KEYMGMT *keymgmt)
347 {
348     void *provctx = ossl_provider_ctx(EVP_KEYMGMT_provider(keymgmt));
349
350     if (keymgmt->gen_gettable_params == NULL)
351         return NULL;
352     return keymgmt->gen_gettable_params(provctx);
353 }
354
355 void *evp_keymgmt_gen(const EVP_KEYMGMT *keymgmt, void *genctx,
356                       OSSL_CALLBACK *cb, void *cbarg)
357 {
358     if (keymgmt->gen == NULL)
359         return NULL;
360     return keymgmt->gen(genctx, cb, cbarg);
361 }
362
363 void evp_keymgmt_gen_cleanup(const EVP_KEYMGMT *keymgmt, void *genctx)
364 {
365     if (keymgmt->gen != NULL)
366         keymgmt->gen_cleanup(genctx);
367 }
368
369 int evp_keymgmt_get_params(const EVP_KEYMGMT *keymgmt, void *keydata,
370                            OSSL_PARAM params[])
371 {
372     if (keymgmt->get_params == NULL)
373         return 1;
374     return keymgmt->get_params(keydata, params);
375 }
376
377 const OSSL_PARAM *evp_keymgmt_gettable_params(const EVP_KEYMGMT *keymgmt)
378 {
379     if (keymgmt->gettable_params == NULL)
380         return NULL;
381     return keymgmt->gettable_params();
382 }
383
384 int evp_keymgmt_set_params(const EVP_KEYMGMT *keymgmt, void *keydata,
385                            const OSSL_PARAM params[])
386 {
387     if (keymgmt->set_params == NULL)
388         return 1;
389     return keymgmt->set_params(keydata, params);
390 }
391
392 const OSSL_PARAM *evp_keymgmt_settable_params(const EVP_KEYMGMT *keymgmt)
393 {
394     if (keymgmt->settable_params == NULL)
395         return NULL;
396     return keymgmt->settable_params();
397 }
398
399 int evp_keymgmt_has(const EVP_KEYMGMT *keymgmt, void *keydata, int selection)
400 {
401     /* This is mandatory, no need to check for its presence */
402     return keymgmt->has(keydata, selection);
403 }
404
405 int evp_keymgmt_validate(const EVP_KEYMGMT *keymgmt, void *keydata,
406                          int selection)
407 {
408     /* We assume valid if the implementation doesn't have a function */
409     if (keymgmt->validate == NULL)
410         return 1;
411     return keymgmt->validate(keydata, selection);
412 }
413
414 int evp_keymgmt_match(const EVP_KEYMGMT *keymgmt,
415                       const void *keydata1, const void *keydata2,
416                       int selection)
417 {
418     /* We assume no match if the implementation doesn't have a function */
419     if (keymgmt->match == NULL)
420         return 0;
421     return keymgmt->match(keydata1, keydata2, selection);
422 }
423
424 int evp_keymgmt_import(const EVP_KEYMGMT *keymgmt, void *keydata,
425                        int selection, const OSSL_PARAM params[])
426 {
427     if (keymgmt->import == NULL)
428         return 0;
429     return keymgmt->import(keydata, selection, params);
430 }
431
432 const OSSL_PARAM *evp_keymgmt_import_types(const EVP_KEYMGMT *keymgmt,
433                                            int selection)
434 {
435     if (keymgmt->import_types == NULL)
436         return NULL;
437     return keymgmt->import_types(selection);
438 }
439
440 int evp_keymgmt_export(const EVP_KEYMGMT *keymgmt, void *keydata,
441                        int selection, OSSL_CALLBACK *param_cb, void *cbarg)
442 {
443     if (keymgmt->export == NULL)
444         return 0;
445     return keymgmt->export(keydata, selection, param_cb, cbarg);
446 }
447
448 const OSSL_PARAM *evp_keymgmt_export_types(const EVP_KEYMGMT *keymgmt,
449                                            int selection)
450 {
451     if (keymgmt->export_types == NULL)
452         return NULL;
453     return keymgmt->export_types(selection);
454 }
455
456 int evp_keymgmt_copy(const EVP_KEYMGMT *keymgmt,
457                      void *keydata_to, const void *keydata_from,
458                      int selection)
459 {
460     /* We assume no copy if the implementation doesn't have a function */
461     if (keymgmt->copy == NULL)
462         return 0;
463     return keymgmt->copy(keydata_to, keydata_from, selection);
464 }