1 /*
2 * Copyright 2019-2021 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/core.h>
11 #include <openssl/core_dispatch.h>
12 #include "internal/core.h"
13 #include "internal/property.h"
14 #include "internal/provider.h"
15
16 struct algorithm_data_st {
17 OSSL_LIB_CTX *libctx;
18 int operation_id; /* May be zero for finding them all */
19 int (*pre)(OSSL_PROVIDER *, int operation_id, void *data, int *result);
20 void (*fn)(OSSL_PROVIDER *, const OSSL_ALGORITHM *, int no_store,
21 void *data);
22 int (*post)(OSSL_PROVIDER *, int operation_id, int no_store, void *data,
23 int *result);
24 void *data;
25 };
26
algorithm_do_this(OSSL_PROVIDER * provider,void * cbdata)27 static int algorithm_do_this(OSSL_PROVIDER *provider, void *cbdata)
28 {
29 struct algorithm_data_st *data = cbdata;
30 int no_store = 0; /* Assume caching is ok */
31 int first_operation = 1;
32 int last_operation = OSSL_OP__HIGHEST;
33 int cur_operation;
34 int ok = 1;
35
36 if (data->operation_id != 0)
37 first_operation = last_operation = data->operation_id;
38
39 for (cur_operation = first_operation;
40 cur_operation <= last_operation;
41 cur_operation++) {
42 const OSSL_ALGORITHM *map = NULL;
43 int ret;
44
45 /* Do we fulfill pre-conditions? */
46 if (data->pre == NULL) {
47 /* If there is no pre-condition function, assume "yes" */
48 ret = 1;
49 } else {
50 if (!data->pre(provider, cur_operation, data->data, &ret))
51 /* Error, bail out! */
52 return 0;
53 }
54
55 /* If pre-condition not fulfilled, go to the next operation */
56 if (!ret)
57 continue;
58
59 map = ossl_provider_query_operation(provider, cur_operation,
60 &no_store);
61 if (map != NULL) {
62 const OSSL_ALGORITHM *thismap;
63
64 for (thismap = map; thismap->algorithm_names != NULL; thismap++)
65 data->fn(provider, thismap, no_store, data->data);
66 }
67 ossl_provider_unquery_operation(provider, cur_operation, map);
68
69 /* Do we fulfill post-conditions? */
70 if (data->post == NULL) {
71 /* If there is no post-condition function, assume "yes" */
72 ret = 1;
73 } else {
74 if (!data->post(provider, cur_operation, no_store, data->data,
75 &ret))
76 /* Error, bail out! */
77 return 0;
78 }
79
80 /* If post-condition not fulfilled, set general failure */
81 if (!ret)
82 ok = 0;
83 }
84
85 return ok;
86 }
87
ossl_algorithm_do_all(OSSL_LIB_CTX * libctx,int operation_id,OSSL_PROVIDER * provider,int (* pre)(OSSL_PROVIDER *,int operation_id,void * data,int * result),void (* fn)(OSSL_PROVIDER * provider,const OSSL_ALGORITHM * algo,int no_store,void * data),int (* post)(OSSL_PROVIDER *,int operation_id,int no_store,void * data,int * result),void * data)88 void ossl_algorithm_do_all(OSSL_LIB_CTX *libctx, int operation_id,
89 OSSL_PROVIDER *provider,
90 int (*pre)(OSSL_PROVIDER *, int operation_id,
91 void *data, int *result),
92 void (*fn)(OSSL_PROVIDER *provider,
93 const OSSL_ALGORITHM *algo,
94 int no_store, void *data),
95 int (*post)(OSSL_PROVIDER *, int operation_id,
96 int no_store, void *data, int *result),
97 void *data)
98 {
99 struct algorithm_data_st cbdata = { 0, };
100
101 cbdata.libctx = libctx;
102 cbdata.operation_id = operation_id;
103 cbdata.pre = pre;
104 cbdata.fn = fn;
105 cbdata.post = post;
106 cbdata.data = data;
107
108 if (provider == NULL)
109 ossl_provider_doall_activated(libctx, algorithm_do_this, &cbdata);
110 else
111 algorithm_do_this(provider, &cbdata);
112 }
113
ossl_algorithm_get1_first_name(const OSSL_ALGORITHM * algo)114 char *ossl_algorithm_get1_first_name(const OSSL_ALGORITHM *algo)
115 {
116 const char *first_name_end = NULL;
117 size_t first_name_len = 0;
118 char *ret;
119
120 if (algo->algorithm_names == NULL)
121 return NULL;
122
123 first_name_end = strchr(algo->algorithm_names, ':');
124 if (first_name_end == NULL)
125 first_name_len = strlen(algo->algorithm_names);
126 else
127 first_name_len = first_name_end - algo->algorithm_names;
128
129 ret = OPENSSL_strndup(algo->algorithm_names, first_name_len);
130 if (ret == NULL)
131 ERR_raise(ERR_LIB_EVP, ERR_R_MALLOC_FAILURE);
132 return ret;
133 }
134