1 /* $OpenBSD: conf_lib.c,v 1.15 2017/01/29 17:49:22 beck Exp $ */
2 /* Written by Richard Levitte (richard@levitte.org) for the OpenSSL
3 * project 2000.
4 */
5 /* ====================================================================
6 * Copyright (c) 2000 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 #include <stdio.h>
60 #include <openssl/crypto.h>
61 #include <openssl/err.h>
62 #include <openssl/conf.h>
63 #include <openssl/conf_api.h>
64 #include <openssl/lhash.h>
65
66 static CONF_METHOD *default_CONF_method = NULL;
67
68 /* Init a 'CONF' structure from an old LHASH */
69
70 void
CONF_set_nconf(CONF * conf,LHASH_OF (CONF_VALUE)* hash)71 CONF_set_nconf(CONF *conf, LHASH_OF(CONF_VALUE) *hash)
72 {
73 if (default_CONF_method == NULL)
74 default_CONF_method = NCONF_default();
75 default_CONF_method->init(conf);
76 conf->data = hash;
77 }
78
79 /* The following section contains the "CONF classic" functions,
80 rewritten in terms of the new CONF interface. */
81
82 int
CONF_set_default_method(CONF_METHOD * meth)83 CONF_set_default_method(CONF_METHOD *meth)
84 {
85 default_CONF_method = meth;
86 return 1;
87 }
88
LHASH_OF(CONF_VALUE)89 LHASH_OF(CONF_VALUE) *CONF_load(LHASH_OF(CONF_VALUE) *conf, const char *file,
90 long *eline)
91 {
92 LHASH_OF(CONF_VALUE) *ltmp;
93 BIO *in = NULL;
94
95 in = BIO_new_file(file, "rb");
96 if (in == NULL) {
97 CONFerror(ERR_R_SYS_LIB);
98 return NULL;
99 }
100
101 ltmp = CONF_load_bio(conf, in, eline);
102 BIO_free(in);
103
104 return ltmp;
105 }
106
LHASH_OF(CONF_VALUE)107 LHASH_OF(CONF_VALUE) *CONF_load_fp(LHASH_OF(CONF_VALUE) *conf, FILE *fp,
108 long *eline)
109 {
110 BIO *btmp;
111 LHASH_OF(CONF_VALUE) *ltmp;
112
113 if (!(btmp = BIO_new_fp(fp, BIO_NOCLOSE))) {
114 CONFerror(ERR_R_BUF_LIB);
115 return NULL;
116 }
117 ltmp = CONF_load_bio(conf, btmp, eline);
118 BIO_free(btmp);
119 return ltmp;
120 }
121
LHASH_OF(CONF_VALUE)122 LHASH_OF(CONF_VALUE) *CONF_load_bio(LHASH_OF(CONF_VALUE) *conf, BIO *bp,
123 long *eline)
124 {
125 CONF ctmp;
126 int ret;
127
128 CONF_set_nconf(&ctmp, conf);
129
130 ret = NCONF_load_bio(&ctmp, bp, eline);
131 if (ret)
132 return ctmp.data;
133 return NULL;
134 }
135
STACK_OF(CONF_VALUE)136 STACK_OF(CONF_VALUE) *CONF_get_section(LHASH_OF(CONF_VALUE) *conf,
137 const char *section)
138 {
139 if (conf == NULL) {
140 return NULL;
141 } else {
142 CONF ctmp;
143 CONF_set_nconf(&ctmp, conf);
144 return NCONF_get_section(&ctmp, section);
145 }
146 }
147
148 char *
CONF_get_string(LHASH_OF (CONF_VALUE)* conf,const char * group,const char * name)149 CONF_get_string(LHASH_OF(CONF_VALUE) *conf, const char *group,
150 const char *name)
151 {
152 if (conf == NULL) {
153 return NCONF_get_string(NULL, group, name);
154 } else {
155 CONF ctmp;
156 CONF_set_nconf(&ctmp, conf);
157 return NCONF_get_string(&ctmp, group, name);
158 }
159 }
160
161 long
CONF_get_number(LHASH_OF (CONF_VALUE)* conf,const char * group,const char * name)162 CONF_get_number(LHASH_OF(CONF_VALUE) *conf, const char *group,
163 const char *name)
164 {
165 int status;
166 long result = 0;
167
168 if (conf == NULL) {
169 status = NCONF_get_number_e(NULL, group, name, &result);
170 } else {
171 CONF ctmp;
172 CONF_set_nconf(&ctmp, conf);
173 status = NCONF_get_number_e(&ctmp, group, name, &result);
174 }
175
176 if (status == 0) {
177 /* This function does not believe in errors... */
178 ERR_clear_error();
179 }
180 return result;
181 }
182
183 void
CONF_free(LHASH_OF (CONF_VALUE)* conf)184 CONF_free(LHASH_OF(CONF_VALUE) *conf)
185 {
186 CONF ctmp;
187
188 CONF_set_nconf(&ctmp, conf);
189 NCONF_free_data(&ctmp);
190 }
191
192 int
CONF_dump_fp(LHASH_OF (CONF_VALUE)* conf,FILE * out)193 CONF_dump_fp(LHASH_OF(CONF_VALUE) *conf, FILE *out)
194 {
195 BIO *btmp;
196 int ret;
197
198 if (!(btmp = BIO_new_fp(out, BIO_NOCLOSE))) {
199 CONFerror(ERR_R_BUF_LIB);
200 return 0;
201 }
202 ret = CONF_dump_bio(conf, btmp);
203 BIO_free(btmp);
204 return ret;
205 }
206
207 int
CONF_dump_bio(LHASH_OF (CONF_VALUE)* conf,BIO * out)208 CONF_dump_bio(LHASH_OF(CONF_VALUE) *conf, BIO *out)
209 {
210 CONF ctmp;
211
212 CONF_set_nconf(&ctmp, conf);
213 return NCONF_dump_bio(&ctmp, out);
214 }
215
216 /* The following section contains the "New CONF" functions. They are
217 completely centralised around a new CONF structure that may contain
218 basically anything, but at least a method pointer and a table of data.
219 These functions are also written in terms of the bridge functions used
220 by the "CONF classic" functions, for consistency. */
221
222 CONF *
NCONF_new(CONF_METHOD * meth)223 NCONF_new(CONF_METHOD *meth)
224 {
225 CONF *ret;
226
227 if (meth == NULL)
228 meth = NCONF_default();
229
230 ret = meth->create(meth);
231 if (ret == NULL) {
232 CONFerror(ERR_R_MALLOC_FAILURE);
233 return (NULL);
234 }
235
236 return ret;
237 }
238
239 void
NCONF_free(CONF * conf)240 NCONF_free(CONF *conf)
241 {
242 if (conf == NULL)
243 return;
244 conf->meth->destroy(conf);
245 }
246
247 void
NCONF_free_data(CONF * conf)248 NCONF_free_data(CONF *conf)
249 {
250 if (conf == NULL)
251 return;
252 conf->meth->destroy_data(conf);
253 }
254
255 int
NCONF_load(CONF * conf,const char * file,long * eline)256 NCONF_load(CONF *conf, const char *file, long *eline)
257 {
258 if (conf == NULL) {
259 CONFerror(CONF_R_NO_CONF);
260 return 0;
261 }
262
263 return conf->meth->load(conf, file, eline);
264 }
265
266 int
NCONF_load_fp(CONF * conf,FILE * fp,long * eline)267 NCONF_load_fp(CONF *conf, FILE *fp, long *eline)
268 {
269 BIO *btmp;
270 int ret;
271
272 if (!(btmp = BIO_new_fp(fp, BIO_NOCLOSE))) {
273 CONFerror(ERR_R_BUF_LIB);
274 return 0;
275 }
276 ret = NCONF_load_bio(conf, btmp, eline);
277 BIO_free(btmp);
278 return ret;
279 }
280
281 int
NCONF_load_bio(CONF * conf,BIO * bp,long * eline)282 NCONF_load_bio(CONF *conf, BIO *bp, long *eline)
283 {
284 if (conf == NULL) {
285 CONFerror(CONF_R_NO_CONF);
286 return 0;
287 }
288
289 return conf->meth->load_bio(conf, bp, eline);
290 }
291
STACK_OF(CONF_VALUE)292 STACK_OF(CONF_VALUE) *
293 NCONF_get_section(const CONF *conf, const char *section)
294 {
295 if (conf == NULL) {
296 CONFerror(CONF_R_NO_CONF);
297 return NULL;
298 }
299
300 if (section == NULL) {
301 CONFerror(CONF_R_NO_SECTION);
302 return NULL;
303 }
304
305 return _CONF_get_section_values(conf, section);
306 }
307
308 char *
NCONF_get_string(const CONF * conf,const char * group,const char * name)309 NCONF_get_string(const CONF *conf, const char *group, const char *name)
310 {
311 char *s = _CONF_get_string(conf, group, name);
312
313 /* Since we may get a value from an environment variable even
314 if conf is NULL, let's check the value first */
315 if (s)
316 return s;
317
318 if (conf == NULL) {
319 CONFerror(CONF_R_NO_CONF_OR_ENVIRONMENT_VARIABLE);
320 return NULL;
321 }
322 CONFerror(CONF_R_NO_VALUE);
323 ERR_asprintf_error_data("group=%s name=%s",
324 group ? group : "", name);
325 return NULL;
326 }
327
328 int
NCONF_get_number_e(const CONF * conf,const char * group,const char * name,long * result)329 NCONF_get_number_e(const CONF *conf, const char *group, const char *name,
330 long *result)
331 {
332 char *str;
333
334 if (result == NULL) {
335 CONFerror(ERR_R_PASSED_NULL_PARAMETER);
336 return 0;
337 }
338
339 str = NCONF_get_string(conf, group, name);
340
341 if (str == NULL)
342 return 0;
343
344 for (*result = 0; conf->meth->is_number(conf, *str); ) {
345 *result = (*result) * 10 + conf->meth->to_int(conf, *str);
346 str++;
347 }
348
349 return 1;
350 }
351
352 int
NCONF_dump_fp(const CONF * conf,FILE * out)353 NCONF_dump_fp(const CONF *conf, FILE *out)
354 {
355 BIO *btmp;
356 int ret;
357 if (!(btmp = BIO_new_fp(out, BIO_NOCLOSE))) {
358 CONFerror(ERR_R_BUF_LIB);
359 return 0;
360 }
361 ret = NCONF_dump_bio(conf, btmp);
362 BIO_free(btmp);
363 return ret;
364 }
365
366 int
NCONF_dump_bio(const CONF * conf,BIO * out)367 NCONF_dump_bio(const CONF *conf, BIO *out)
368 {
369 if (conf == NULL) {
370 CONFerror(CONF_R_NO_CONF);
371 return 0;
372 }
373
374 return conf->meth->dump(conf, out);
375 }
376