3 * Written by Richard Levitte (richard@levitte.org) for the OpenSSL project
6 /* ====================================================================
7 * Copyright (c) 2000 The OpenSSL Project. All rights reserved.
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
16 * 2. Redistributions in binary form must reproduce the above copyright
17 * notice, this list of conditions and the following disclaimer in
18 * the documentation and/or other materials provided with the
21 * 3. All advertising materials mentioning features or use of this
22 * software must display the following acknowledgment:
23 * "This product includes software developed by the OpenSSL Project
24 * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
26 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
27 * endorse or promote products derived from this software without
28 * prior written permission. For written permission, please contact
29 * licensing@OpenSSL.org.
31 * 5. Products derived from this software may not be called "OpenSSL"
32 * nor may "OpenSSL" appear in their names without prior written
33 * permission of the OpenSSL Project.
35 * 6. Redistributions of any form whatsoever must retain the following
37 * "This product includes software developed by the OpenSSL Project
38 * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
40 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
41 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
42 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
43 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR
44 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
45 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
46 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
47 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
49 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
50 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
51 * OF THE POSSIBILITY OF SUCH DAMAGE.
52 * ====================================================================
54 * This product includes cryptographic software written by Eric Young
55 * (eay@cryptsoft.com). This product includes software written by Tim
56 * Hudson (tjh@cryptsoft.com).
61 #include <openssl/crypto.h>
62 #include <openssl/err.h>
63 #include <openssl/conf.h>
64 #include <openssl/conf_api.h>
65 #include <openssl/lhash.h>
67 const char CONF_version
[] = "CONF" OPENSSL_VERSION_PTEXT
;
69 static CONF_METHOD
*default_CONF_method
= NULL
;
71 /* Init a 'CONF' structure from an old LHASH */
73 void CONF_set_nconf(CONF
*conf
, LHASH_OF(CONF_VALUE
) *hash
)
75 if (default_CONF_method
== NULL
)
76 default_CONF_method
= NCONF_default();
78 default_CONF_method
->init(conf
);
83 * The following section contains the "CONF classic" functions, rewritten in
84 * terms of the new CONF interface.
87 int CONF_set_default_method(CONF_METHOD
*meth
)
89 default_CONF_method
= meth
;
93 #ifndef OPENSSL_NO_STDIO
94 LHASH_OF(CONF_VALUE
) *CONF_load(LHASH_OF(CONF_VALUE
) *conf
, const char *file
,
97 LHASH_OF(CONF_VALUE
) *ltmp
;
100 #ifdef OPENSSL_SYS_VMS
101 in
= BIO_new_file(file
, "r");
103 in
= BIO_new_file(file
, "rb");
106 CONFerr(CONF_F_CONF_LOAD
, ERR_R_SYS_LIB
);
110 ltmp
= CONF_load_bio(conf
, in
, eline
);
117 #ifndef OPENSSL_NO_FP_API
118 LHASH_OF(CONF_VALUE
) *CONF_load_fp(LHASH_OF(CONF_VALUE
) *conf
, FILE *fp
,
122 LHASH_OF(CONF_VALUE
) *ltmp
;
123 if (!(btmp
= BIO_new_fp(fp
, BIO_NOCLOSE
))) {
124 CONFerr(CONF_F_CONF_LOAD_FP
, ERR_R_BUF_LIB
);
127 ltmp
= CONF_load_bio(conf
, btmp
, eline
);
133 LHASH_OF(CONF_VALUE
) *CONF_load_bio(LHASH_OF(CONF_VALUE
) *conf
, BIO
*bp
,
139 CONF_set_nconf(&ctmp
, conf
);
141 ret
= NCONF_load_bio(&ctmp
, bp
, eline
);
147 STACK_OF(CONF_VALUE
) *CONF_get_section(LHASH_OF(CONF_VALUE
) *conf
,
154 CONF_set_nconf(&ctmp
, conf
);
155 return NCONF_get_section(&ctmp
, section
);
159 char *CONF_get_string(LHASH_OF(CONF_VALUE
) *conf
, const char *group
,
163 return NCONF_get_string(NULL
, group
, name
);
166 CONF_set_nconf(&ctmp
, conf
);
167 return NCONF_get_string(&ctmp
, group
, name
);
171 long CONF_get_number(LHASH_OF(CONF_VALUE
) *conf
, const char *group
,
178 status
= NCONF_get_number_e(NULL
, group
, name
, &result
);
181 CONF_set_nconf(&ctmp
, conf
);
182 status
= NCONF_get_number_e(&ctmp
, group
, name
, &result
);
186 /* This function does not believe in errors... */
192 void CONF_free(LHASH_OF(CONF_VALUE
) *conf
)
195 CONF_set_nconf(&ctmp
, conf
);
196 NCONF_free_data(&ctmp
);
199 #ifndef OPENSSL_NO_FP_API
200 int CONF_dump_fp(LHASH_OF(CONF_VALUE
) *conf
, FILE *out
)
205 if (!(btmp
= BIO_new_fp(out
, BIO_NOCLOSE
))) {
206 CONFerr(CONF_F_CONF_DUMP_FP
, ERR_R_BUF_LIB
);
209 ret
= CONF_dump_bio(conf
, btmp
);
215 int CONF_dump_bio(LHASH_OF(CONF_VALUE
) *conf
, BIO
*out
)
218 CONF_set_nconf(&ctmp
, conf
);
219 return NCONF_dump_bio(&ctmp
, out
);
223 * The following section contains the "New CONF" functions. They are
224 * completely centralised around a new CONF structure that may contain
225 * basically anything, but at least a method pointer and a table of data.
226 * These functions are also written in terms of the bridge functions used by
227 * the "CONF classic" functions, for consistency.
230 CONF
*NCONF_new(CONF_METHOD
*meth
)
235 meth
= NCONF_default();
237 ret
= meth
->create(meth
);
239 CONFerr(CONF_F_NCONF_NEW
, ERR_R_MALLOC_FAILURE
);
246 void NCONF_free(CONF
*conf
)
250 conf
->meth
->destroy(conf
);
253 void NCONF_free_data(CONF
*conf
)
257 conf
->meth
->destroy_data(conf
);
260 #ifndef OPENSSL_NO_STDIO
261 int NCONF_load(CONF
*conf
, const char *file
, long *eline
)
264 CONFerr(CONF_F_NCONF_LOAD
, CONF_R_NO_CONF
);
268 return conf
->meth
->load(conf
, file
, eline
);
272 #ifndef OPENSSL_NO_FP_API
273 int NCONF_load_fp(CONF
*conf
, FILE *fp
, long *eline
)
277 if (!(btmp
= BIO_new_fp(fp
, BIO_NOCLOSE
))) {
278 CONFerr(CONF_F_NCONF_LOAD_FP
, ERR_R_BUF_LIB
);
281 ret
= NCONF_load_bio(conf
, btmp
, eline
);
287 int NCONF_load_bio(CONF
*conf
, BIO
*bp
, long *eline
)
290 CONFerr(CONF_F_NCONF_LOAD_BIO
, CONF_R_NO_CONF
);
294 return conf
->meth
->load_bio(conf
, bp
, eline
);
297 STACK_OF(CONF_VALUE
) *NCONF_get_section(const CONF
*conf
, const char *section
)
300 CONFerr(CONF_F_NCONF_GET_SECTION
, CONF_R_NO_CONF
);
304 if (section
== NULL
) {
305 CONFerr(CONF_F_NCONF_GET_SECTION
, CONF_R_NO_SECTION
);
309 return _CONF_get_section_values(conf
, section
);
312 char *NCONF_get_string(const CONF
*conf
, const char *group
, const char *name
)
314 char *s
= _CONF_get_string(conf
, group
, name
);
317 * Since we may get a value from an environment variable even if conf is
318 * NULL, let's check the value first
324 CONFerr(CONF_F_NCONF_GET_STRING
,
325 CONF_R_NO_CONF_OR_ENVIRONMENT_VARIABLE
);
328 CONFerr(CONF_F_NCONF_GET_STRING
, CONF_R_NO_VALUE
);
329 ERR_add_error_data(4, "group=", group
, " name=", name
);
333 int NCONF_get_number_e(const CONF
*conf
, const char *group
, const char *name
,
338 if (result
== NULL
) {
339 CONFerr(CONF_F_NCONF_GET_NUMBER_E
, ERR_R_PASSED_NULL_PARAMETER
);
346 str
= NCONF_get_string(conf
, group
, name
);
351 for (*result
= 0; conf
->meth
->is_number(conf
, *str
);) {
352 *result
= (*result
) * 10 + conf
->meth
->to_int(conf
, *str
);
359 #ifndef OPENSSL_NO_FP_API
360 int NCONF_dump_fp(const CONF
*conf
, FILE *out
)
364 if (!(btmp
= BIO_new_fp(out
, BIO_NOCLOSE
))) {
365 CONFerr(CONF_F_NCONF_DUMP_FP
, ERR_R_BUF_LIB
);
368 ret
= NCONF_dump_bio(conf
, btmp
);
374 int NCONF_dump_bio(const CONF
*conf
, BIO
*out
)
377 CONFerr(CONF_F_NCONF_DUMP_BIO
, CONF_R_NO_CONF
);
381 return conf
->meth
->dump(conf
, out
);
384 /* This function should be avoided */
386 long NCONF_get_number(CONF
*conf
, char *group
, char *name
)
391 status
= NCONF_get_number_e(conf
, group
, name
, &ret
);
393 /* This function does not believe in errors... */