1 /* crypto/conf/conf.c */
2 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
5 * This package is an SSL implementation written
6 * by Eric Young (eay@cryptsoft.com).
7 * The implementation was written so as to conform with Netscapes SSL.
9 * This library is free for commercial and non-commercial use as long as
10 * the following conditions are aheared to. The following conditions
11 * apply to all code found in this distribution, be it the RC4, RSA,
12 * lhash, DES, etc., code; not just the SSL code. The SSL documentation
13 * included with this distribution is covered by the same copyright terms
14 * except that the holder is Tim Hudson (tjh@cryptsoft.com).
16 * Copyright remains Eric Young's, and as such any Copyright notices in
17 * the code are not to be removed.
18 * If this package is used in a product, Eric Young should be given attribution
19 * as the author of the parts of the library used.
20 * This can be in the form of a textual message at program startup or
21 * in documentation (online or textual) provided with the package.
23 * Redistribution and use in source and binary forms, with or without
24 * modification, are permitted provided that the following conditions
26 * 1. Redistributions of source code must retain the copyright
27 * notice, this list of conditions and the following disclaimer.
28 * 2. Redistributions in binary form must reproduce the above copyright
29 * notice, this list of conditions and the following disclaimer in the
30 * documentation and/or other materials provided with the distribution.
31 * 3. All advertising materials mentioning features or use of this software
32 * must display the following acknowledgement:
33 * "This product includes cryptographic software written by
34 * Eric Young (eay@cryptsoft.com)"
35 * The word 'cryptographic' can be left out if the rouines from the library
36 * being used are not cryptographic related :-).
37 * 4. If you include any Windows specific code (or a derivative thereof) from
38 * the apps directory (application code) you must include an acknowledgement:
39 * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
41 * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
42 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
43 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
44 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
45 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
46 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
47 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
49 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
50 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
53 * The licence and distribution terms for any publically available version or
54 * derivative of this code cannot be changed. i.e. this code cannot simply be
55 * copied and put under another distribution licence
56 * [including the GNU Public Licence.]
59 /* Part of the code in here was originally in conf.c, which is now removed */
63 #include <openssl/stack.h>
64 #include <openssl/lhash.h>
65 #include <openssl/conf.h>
66 #include <openssl/conf_api.h>
68 #include <openssl/buffer.h>
69 #include <openssl/err.h>
71 static char *eat_ws(CONF
*conf
, char *p
);
72 static char *eat_alpha_numeric(CONF
*conf
, char *p
);
73 static void clear_comments(CONF
*conf
, char *p
);
74 static int str_copy(CONF
*conf
,char *section
,char **to
, char *from
);
75 static char *scan_quote(CONF
*conf
, char *p
);
76 static char *scan_dquote(CONF
*conf
, char *p
);
77 #define scan_esc(conf,p) (((IS_EOF((conf),(p)[1]))?((p)+1):((p)+2)))
79 static CONF
*def_create(CONF_METHOD
*meth
);
80 static int def_init_default(CONF
*conf
);
81 static int def_init_WIN32(CONF
*conf
);
82 static int def_destroy(CONF
*conf
);
83 static int def_destroy_data(CONF
*conf
);
84 static int def_load(CONF
*conf
, const char *name
, long *eline
);
85 static int def_load_bio(CONF
*conf
, BIO
*bp
, long *eline
);
86 static int def_dump(CONF
*conf
, BIO
*bp
);
87 static int def_is_number(CONF
*conf
, char c
);
88 static int def_to_int(CONF
*conf
, char c
);
90 const char *CONF_def_version
="CONF_def" OPENSSL_VERSION_PTEXT
;
92 static CONF_METHOD default_method
= {
105 static CONF_METHOD WIN32_method
= {
118 CONF_METHOD
*NCONF_default()
120 return &default_method
;
122 CONF_METHOD
*NCONF_WIN32()
124 return &WIN32_method
;
127 static CONF
*def_create(CONF_METHOD
*meth
)
131 ret
= (CONF
*)OPENSSL_malloc(sizeof(CONF
) + sizeof(unsigned short *));
133 if (meth
->init(ret
) == 0)
141 static int def_init_default(CONF
*conf
)
146 conf
->meth
= &default_method
;
147 conf
->meth_data
= (void *)CONF_type_default
;
153 static int def_init_WIN32(CONF
*conf
)
158 conf
->meth
= &WIN32_method
;
159 conf
->meth_data
= (void *)CONF_type_win32
;
165 static int def_destroy(CONF
*conf
)
167 if (def_destroy_data(conf
))
175 static int def_destroy_data(CONF
*conf
)
179 _CONF_free_data(conf
);
183 static int def_load(CONF
*conf
, const char *name
, long *line
)
189 in
=BIO_new_file(name
, "r");
191 in
=BIO_new_file(name
, "rb");
195 CONFerr(CONF_F_CONF_LOAD
,ERR_R_SYS_LIB
);
199 ret
= def_load_bio(conf
, in
, line
);
205 static int def_load_bio(CONF
*conf
, BIO
*in
, long *line
)
214 CONF_VALUE
*v
=NULL
,*tv
;
216 char *section
=NULL
,*buf
;
217 STACK_OF(CONF_VALUE
) *section_sk
=NULL
,*ts
;
218 char *start
,*psection
,*pname
;
219 void *h
= (void *)(conf
->data
);
221 if ((buff
=BUF_MEM_new()) == NULL
)
223 CONFerr(CONF_F_CONF_LOAD_BIO
,ERR_R_BUF_LIB
);
227 section
=(char *)OPENSSL_malloc(10);
230 CONFerr(CONF_F_CONF_LOAD_BIO
,ERR_R_MALLOC_FAILURE
);
233 strcpy(section
,"default");
235 if (_CONF_new_data(conf
) == 0)
237 CONFerr(CONF_F_CONF_LOAD_BIO
,ERR_R_MALLOC_FAILURE
);
241 sv
=_CONF_new_section(conf
,section
);
244 CONFerr(CONF_F_CONF_LOAD_BIO
,
245 CONF_R_UNABLE_TO_CREATE_NEW_SECTION
);
248 section_sk
=(STACK_OF(CONF_VALUE
) *)sv
->value
;
254 if (!BUF_MEM_grow(buff
,bufnum
+BUFSIZE
))
256 CONFerr(CONF_F_CONF_LOAD_BIO
,ERR_R_BUF_LIB
);
259 p
= &(buff
->data
[bufnum
]);
261 BIO_gets(in
, p
, BUFSIZE
-1);
267 if ((p
[i
-1] != '\r') && (p
[i
-1] != '\n'))
272 /* we removed some trailing stuff so there is a new
273 * line on the end. */
275 again
=1; /* long line */
279 eline
++; /* another input line */
282 /* we now have a line with trailing \r\n removed */
284 /* i is the number of bytes */
288 /* check for line continuation */
291 /* If we have bytes and the last char '\\' and
292 * second last char is not '\\' */
293 p
= &(buff
->data
[bufnum
-1]);
294 if (IS_ESC(conf
,p
[0]) &&
295 ((bufnum
<= 1) || !IS_ESC(conf
,p
[-1])))
305 clear_comments(conf
, buf
);
308 if (IS_EOF(conf
,*s
)) continue; /* blank line */
314 start
=eat_ws(conf
, s
);
317 end
=eat_alpha_numeric(conf
, ss
);
326 CONFerr(CONF_F_CONF_LOAD_BIO
,
327 CONF_R_MISSING_CLOSE_SQUARE_BRACKET
);
331 if (!str_copy(conf
,NULL
,§ion
,start
)) goto err
;
332 if ((sv
=_CONF_get_section(conf
,section
)) == NULL
)
333 sv
=_CONF_new_section(conf
,section
);
336 CONFerr(CONF_F_CONF_LOAD_BIO
,
337 CONF_R_UNABLE_TO_CREATE_NEW_SECTION
);
340 section_sk
=(STACK_OF(CONF_VALUE
) *)sv
->value
;
347 end
=eat_alpha_numeric(conf
, s
);
348 if ((end
[0] == ':') && (end
[1] == ':'))
354 end
=eat_alpha_numeric(conf
, end
);
359 CONFerr(CONF_F_CONF_LOAD_BIO
,
360 CONF_R_MISSING_EQUAL_SIGN
);
365 start
=eat_ws(conf
, p
);
366 while (!IS_EOF(conf
,*p
))
369 while ((p
!= start
) && (IS_WS(conf
,*p
)))
374 if (!(v
=(CONF_VALUE
*)OPENSSL_malloc(sizeof(CONF_VALUE
))))
376 CONFerr(CONF_F_CONF_LOAD_BIO
,
377 ERR_R_MALLOC_FAILURE
);
380 if (psection
== NULL
) psection
=section
;
381 v
->name
=(char *)OPENSSL_malloc(strlen(pname
)+1);
385 CONFerr(CONF_F_CONF_LOAD_BIO
,
386 ERR_R_MALLOC_FAILURE
);
389 strcpy(v
->name
,pname
);
390 if (!str_copy(conf
,psection
,&(v
->value
),start
)) goto err
;
392 if (strcmp(psection
,section
) != 0)
394 if ((tv
=_CONF_get_section(conf
,psection
))
396 tv
=_CONF_new_section(conf
,psection
);
399 CONFerr(CONF_F_CONF_LOAD_BIO
,
400 CONF_R_UNABLE_TO_CREATE_NEW_SECTION
);
403 ts
=(STACK_OF(CONF_VALUE
) *)tv
->value
;
411 if (_CONF_add_string(conf
, tv
, v
) == 0)
413 CONFerr(CONF_F_CONF_LOAD_BIO
,
414 ERR_R_MALLOC_FAILURE
);
418 v
->section
=tv
->section
;
419 if (!sk_CONF_VALUE_push(ts
,v
))
421 CONFerr(CONF_F_CONF_LOAD_BIO
,
422 ERR_R_MALLOC_FAILURE
);
425 vv
=(CONF_VALUE
*)lh_insert(conf
->data
,v
);
428 sk_CONF_VALUE_delete_ptr(ts
,vv
);
429 OPENSSL_free(vv
->name
);
430 OPENSSL_free(vv
->value
);
437 if (buff
!= NULL
) BUF_MEM_free(buff
);
438 if (section
!= NULL
) OPENSSL_free(section
);
441 if (buff
!= NULL
) BUF_MEM_free(buff
);
442 if (section
!= NULL
) OPENSSL_free(section
);
443 if (line
!= NULL
) *line
=eline
;
444 sprintf(btmp
,"%ld",eline
);
445 ERR_add_error_data(2,"line ",btmp
);
446 if ((h
!= conf
->data
) && (conf
->data
!= NULL
)) CONF_free(conf
->data
);
449 if (v
->name
!= NULL
) OPENSSL_free(v
->name
);
450 if (v
->value
!= NULL
) OPENSSL_free(v
->value
);
451 if (v
!= NULL
) OPENSSL_free(v
);
456 static void clear_comments(CONF
*conf
, char *p
)
463 if (IS_FCOMMENT(conf
,*p
))
477 if (IS_COMMENT(conf
,*p
))
482 if (IS_DQUOTE(conf
,*p
))
484 p
=scan_dquote(conf
, p
);
487 if (IS_QUOTE(conf
,*p
))
489 p
=scan_quote(conf
, p
);
504 static int str_copy(CONF
*conf
, char *section
, char **pto
, char *from
)
506 int q
,r
,rr
=0,to
=0,len
=0;
507 char *s
,*e
,*rp
,*p
,*rrp
,*np
,*cp
,v
;
510 if ((buf
=BUF_MEM_new()) == NULL
) return(0);
513 if (!BUF_MEM_grow(buf
,len
)) goto err
;
517 if (IS_QUOTE(conf
,*from
))
521 while (!IS_EOF(conf
,*from
) && (*from
!= q
))
523 if (IS_ESC(conf
,*from
))
526 if (IS_EOF(conf
,*from
)) break;
528 buf
->data
[to
++]= *(from
++);
530 if (*from
== q
) from
++;
532 else if (IS_DQUOTE(conf
,*from
))
536 while (!IS_EOF(conf
,*from
))
549 buf
->data
[to
++]= *(from
++);
551 if (*from
== q
) from
++;
553 else if (IS_ESC(conf
,*from
))
557 if (IS_EOF(conf
,v
)) break;
558 else if (v
== 'r') v
='\r';
559 else if (v
== 'n') v
='\n';
560 else if (v
== 'b') v
='\b';
561 else if (v
== 't') v
='\t';
564 else if (IS_EOF(conf
,*from
))
566 else if (*from
== '$')
568 /* try to expand it */
580 while (IS_ALPHA_NUMERIC(conf
,*e
))
582 if ((e
[0] == ':') && (e
[1] == ':'))
590 while (IS_ALPHA_NUMERIC(conf
,*e
))
600 CONFerr(CONF_F_STR_COPY
,CONF_R_NO_CLOSE_BRACE
);
605 /* So at this point we have
606 * ns which is the start of the name string which is
608 * cs which is the start of the section string which is
610 * e is the 'next point after'.
611 * r and s are the chars replaced by the '\0'
612 * rp and sp is where 'r' and 's' came from.
614 p
=_CONF_get_string(conf
,cp
,np
);
615 if (rrp
!= NULL
) *rrp
=rr
;
619 CONFerr(CONF_F_STR_COPY
,CONF_R_VARIABLE_HAS_NO_VALUE
);
622 BUF_MEM_grow(buf
,(strlen(p
)+len
-(e
-from
)));
624 buf
->data
[to
++]= *(p
++);
628 buf
->data
[to
++]= *(from
++);
631 if (*pto
!= NULL
) OPENSSL_free(*pto
);
636 if (buf
!= NULL
) BUF_MEM_free(buf
);
640 static char *eat_ws(CONF
*conf
, char *p
)
642 while (IS_WS(conf
,*p
) && (!IS_EOF(conf
,*p
)))
647 static char *eat_alpha_numeric(CONF
*conf
, char *p
)
656 if (!IS_ALPHA_NUMERIC_PUNCT(conf
,*p
))
662 static char *scan_quote(CONF
*conf
, char *p
)
667 while (!(IS_EOF(conf
,*p
)) && (*p
!= q
))
672 if (IS_EOF(conf
,*p
)) return(p
);
681 static char *scan_dquote(CONF
*conf
, char *p
)
686 while (!(IS_EOF(conf
,*p
)))
705 static void dump_value(CONF_VALUE
*a
, BIO
*out
)
708 BIO_printf(out
, "[%s] %s=%s\n", a
->section
, a
->name
, a
->value
);
710 BIO_printf(out
, "[[%s]]\n", a
->section
);
713 static int def_dump(CONF
*conf
, BIO
*out
)
715 lh_doall_arg(conf
->data
, (void (*)())dump_value
, out
);
719 static int def_is_number(CONF
*conf
, char c
)
721 return IS_NUMBER(conf
,c
);
724 static int def_to_int(CONF
*conf
, char c
)