|
1 /* eng_cnf.c */ |
|
2 /* Written by Stephen Henson (shenson@bigfoot.com) for the OpenSSL |
|
3 * project 2001. |
|
4 */ |
|
5 /* ==================================================================== |
|
6 * Copyright (c) 2001 The OpenSSL Project. All rights reserved. |
|
7 * |
|
8 * Redistribution and use in source and binary forms, with or without |
|
9 * modification, are permitted provided that the following conditions |
|
10 * are met: |
|
11 * |
|
12 * 1. Redistributions of source code must retain the above copyright |
|
13 * notice, this list of conditions and the following disclaimer. |
|
14 * |
|
15 * 2. Redistributions in binary form must reproduce the above copyright |
|
16 * notice, this list of conditions and the following disclaimer in |
|
17 * the documentation and/or other materials provided with the |
|
18 * distribution. |
|
19 * |
|
20 * 3. All advertising materials mentioning features or use of this |
|
21 * software must display the following acknowledgment: |
|
22 * "This product includes software developed by the OpenSSL Project |
|
23 * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)" |
|
24 * |
|
25 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to |
|
26 * endorse or promote products derived from this software without |
|
27 * prior written permission. For written permission, please contact |
|
28 * licensing@OpenSSL.org. |
|
29 * |
|
30 * 5. Products derived from this software may not be called "OpenSSL" |
|
31 * nor may "OpenSSL" appear in their names without prior written |
|
32 * permission of the OpenSSL Project. |
|
33 * |
|
34 * 6. Redistributions of any form whatsoever must retain the following |
|
35 * acknowledgment: |
|
36 * "This product includes software developed by the OpenSSL Project |
|
37 * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" |
|
38 * |
|
39 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY |
|
40 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
|
41 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR |
|
42 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR |
|
43 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, |
|
44 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
|
45 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; |
|
46 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) |
|
47 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, |
|
48 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) |
|
49 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED |
|
50 * OF THE POSSIBILITY OF SUCH DAMAGE. |
|
51 * ==================================================================== |
|
52 * |
|
53 * This product includes cryptographic software written by Eric Young |
|
54 * (eay@cryptsoft.com). This product includes software written by Tim |
|
55 * Hudson (tjh@cryptsoft.com). |
|
56 * |
|
57 */ |
|
58 /* |
|
59 © Portions copyright (c) 2006 Nokia Corporation. All rights reserved. |
|
60 */ |
|
61 |
|
62 |
|
63 |
|
64 #include "eng_int.h" |
|
65 #include <openssl/conf.h> |
|
66 #if (defined(SYMBIAN) && (defined(__WINSCW__) || defined(__WINS__))) |
|
67 #include "libcrypto_wsd_macros.h" |
|
68 #include "libcrypto_wsd.h" |
|
69 #endif |
|
70 |
|
71 |
|
72 /* #define ENGINE_CONF_DEBUG */ |
|
73 |
|
74 /* ENGINE config module */ |
|
75 |
|
76 static char *skip_dot(char *name) |
|
77 { |
|
78 char *p; |
|
79 p = strchr(name, '.'); |
|
80 if (p) |
|
81 return p + 1; |
|
82 return name; |
|
83 } |
|
84 |
|
85 #ifndef EMULATOR |
|
86 static STACK_OF(ENGINE) *initialized_engines = NULL; |
|
87 #else |
|
88 GET_STATIC_VAR_FROM_TLS(initialized_engines,eng_cnf,STACK_OF(ENGINE) *) |
|
89 #define initialized_engines (*GET_WSD_VAR_NAME(initialized_engines,eng_cnf, s)()) |
|
90 #endif |
|
91 |
|
92 static int int_engine_init(ENGINE *e) |
|
93 { |
|
94 if (!ENGINE_init(e)) |
|
95 return 0; |
|
96 if (!initialized_engines) |
|
97 initialized_engines = sk_ENGINE_new_null(); |
|
98 if (!initialized_engines || !sk_ENGINE_push(initialized_engines, e)) |
|
99 { |
|
100 ENGINE_finish(e); |
|
101 return 0; |
|
102 } |
|
103 return 1; |
|
104 } |
|
105 |
|
106 |
|
107 static int int_engine_configure(char *name, char *value, const CONF *cnf) |
|
108 { |
|
109 int i; |
|
110 int ret = 0; |
|
111 long do_init = -1; |
|
112 STACK_OF(CONF_VALUE) *ecmds; |
|
113 CONF_VALUE *ecmd; |
|
114 char *ctrlname, *ctrlvalue; |
|
115 ENGINE *e = NULL; |
|
116 name = skip_dot(name); |
|
117 #ifdef ENGINE_CONF_DEBUG |
|
118 fprintf(stderr, "Configuring engine %s\n", name); |
|
119 #endif |
|
120 /* Value is a section containing ENGINE commands */ |
|
121 ecmds = NCONF_get_section(cnf, value); |
|
122 |
|
123 if (!ecmds) |
|
124 { |
|
125 ENGINEerr(ENGINE_F_INT_ENGINE_CONFIGURE, ENGINE_R_ENGINE_SECTION_ERROR); |
|
126 return 0; |
|
127 } |
|
128 |
|
129 for (i = 0; i < sk_CONF_VALUE_num(ecmds); i++) |
|
130 { |
|
131 ecmd = sk_CONF_VALUE_value(ecmds, i); |
|
132 ctrlname = skip_dot(ecmd->name); |
|
133 ctrlvalue = ecmd->value; |
|
134 #ifdef ENGINE_CONF_DEBUG |
|
135 fprintf(stderr, "ENGINE conf: doing ctrl(%s,%s)\n", ctrlname, ctrlvalue); |
|
136 #endif |
|
137 |
|
138 /* First handle some special pseudo ctrls */ |
|
139 |
|
140 /* Override engine name to use */ |
|
141 if (!strcmp(ctrlname, "engine_id")) |
|
142 name = ctrlvalue; |
|
143 /* Load a dynamic ENGINE */ |
|
144 else if (!strcmp(ctrlname, "dynamic_path")) |
|
145 { |
|
146 e = ENGINE_by_id("dynamic"); |
|
147 if (!e) |
|
148 goto err; |
|
149 if (!ENGINE_ctrl_cmd_string(e, "SO_PATH", ctrlvalue, 0)) |
|
150 goto err; |
|
151 if (!ENGINE_ctrl_cmd_string(e, "LIST_ADD", "2", 0)) |
|
152 goto err; |
|
153 if (!ENGINE_ctrl_cmd_string(e, "LOAD", NULL, 0)) |
|
154 goto err; |
|
155 } |
|
156 /* ... add other pseudos here ... */ |
|
157 else |
|
158 { |
|
159 /* At this point we need an ENGINE structural reference |
|
160 * if we don't already have one. |
|
161 */ |
|
162 if (!e) |
|
163 { |
|
164 e = ENGINE_by_id(name); |
|
165 if (!e) |
|
166 return 0; |
|
167 } |
|
168 /* Allow "EMPTY" to mean no value: this allows a valid |
|
169 * "value" to be passed to ctrls of type NO_INPUT |
|
170 */ |
|
171 if (!strcmp(ctrlvalue, "EMPTY")) |
|
172 ctrlvalue = NULL; |
|
173 if (!strcmp(ctrlname, "init")) |
|
174 { |
|
175 if (!NCONF_get_number_e(cnf, value, "init", &do_init)) |
|
176 goto err; |
|
177 if (do_init == 1) |
|
178 { |
|
179 if (!int_engine_init(e)) |
|
180 goto err; |
|
181 } |
|
182 else if (do_init != 0) |
|
183 { |
|
184 ENGINEerr(ENGINE_F_INT_ENGINE_CONFIGURE, ENGINE_R_INVALID_INIT_VALUE); |
|
185 goto err; |
|
186 } |
|
187 } |
|
188 else if (!strcmp(ctrlname, "default_algorithms")) |
|
189 { |
|
190 if (!ENGINE_set_default_string(e, ctrlvalue)) |
|
191 goto err; |
|
192 } |
|
193 else if (!ENGINE_ctrl_cmd_string(e, |
|
194 ctrlname, ctrlvalue, 0)) |
|
195 return 0; |
|
196 } |
|
197 |
|
198 |
|
199 |
|
200 } |
|
201 if (e && (do_init == -1) && !int_engine_init(e)) |
|
202 goto err; |
|
203 ret = 1; |
|
204 err: |
|
205 if (e) |
|
206 ENGINE_free(e); |
|
207 return ret; |
|
208 } |
|
209 |
|
210 |
|
211 static int int_engine_module_init(CONF_IMODULE *md, const CONF *cnf) |
|
212 { |
|
213 STACK_OF(CONF_VALUE) *elist; |
|
214 CONF_VALUE *cval; |
|
215 int i; |
|
216 #ifdef ENGINE_CONF_DEBUG |
|
217 fprintf(stderr, "Called engine module: name %s, value %s\n", |
|
218 CONF_imodule_get_name(md), CONF_imodule_get_value(md)); |
|
219 #endif |
|
220 /* Value is a section containing ENGINEs to configure */ |
|
221 elist = NCONF_get_section(cnf, CONF_imodule_get_value(md)); |
|
222 |
|
223 if (!elist) |
|
224 { |
|
225 ENGINEerr(ENGINE_F_INT_ENGINE_MODULE_INIT, ENGINE_R_ENGINES_SECTION_ERROR); |
|
226 return 0; |
|
227 } |
|
228 |
|
229 for (i = 0; i < sk_CONF_VALUE_num(elist); i++) |
|
230 { |
|
231 cval = sk_CONF_VALUE_value(elist, i); |
|
232 if (!int_engine_configure(cval->name, cval->value, cnf)) |
|
233 return 0; |
|
234 } |
|
235 |
|
236 return 1; |
|
237 } |
|
238 |
|
239 static void int_engine_module_finish(CONF_IMODULE *md) |
|
240 { |
|
241 ENGINE *e; |
|
242 while ((e = sk_ENGINE_pop(initialized_engines))) |
|
243 ENGINE_finish(e); |
|
244 sk_ENGINE_free(initialized_engines); |
|
245 initialized_engines = NULL; |
|
246 } |
|
247 |
|
248 |
|
249 EXPORT_C void ENGINE_add_conf_module(void) |
|
250 { |
|
251 CONF_module_add("engines", |
|
252 int_engine_module_init, |
|
253 int_engine_module_finish); |
|
254 } |