1 /* config.c - configuration file handling routines */
3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
5 * Copyright 1998-2005 The OpenLDAP Foundation.
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted only as authorized by the OpenLDAP
12 * A copy of this license is available in the file LICENSE in the
13 * top-level directory of the distribution or, alternatively, at
14 * <http://www.OpenLDAP.org/license.html>.
16 /* Portions Copyright (c) 1995 Regents of the University of Michigan.
17 * All rights reserved.
19 * Redistribution and use in source and binary forms are permitted
20 * provided that this notice is preserved and that due credit is given
21 * to the University of Michigan at Ann Arbor. The name of the University
22 * may not be used to endorse or promote products derived from this
23 * software without specific prior written permission. This software
24 * is provided ``as is'' without express or implied warranty.
31 #include <ac/string.h>
33 #include <ac/signal.h>
34 #include <ac/socket.h>
39 #include "slapi/slapi.h"
47 * defaults for various global variables
49 slap_mask_t global_allows = 0;
50 slap_mask_t global_disallows = 0;
51 int global_gentlehup = 0;
52 int global_idletimeout = 0;
53 char *global_host = NULL;
54 char *global_realm = NULL;
55 char *ldap_srvtab = "";
56 char **default_passwd_hash = NULL;
57 struct berval default_search_base = BER_BVNULL;
58 struct berval default_search_nbase = BER_BVNULL;
60 ber_len_t sockbuf_max_incoming = SLAP_SB_MAX_INCOMING_DEFAULT;
61 ber_len_t sockbuf_max_incoming_auth= SLAP_SB_MAX_INCOMING_AUTH;
63 int slap_conn_max_pending = SLAP_CONN_MAX_PENDING_DEFAULT;
64 int slap_conn_max_pending_auth = SLAP_CONN_MAX_PENDING_AUTH;
66 char *slapd_pid_file = NULL;
67 char *slapd_args_file = NULL;
69 int use_reverse_lookup = 0;
72 int slapi_plugins_used = 0;
75 static int fp_getline(FILE *fp, ConfigArgs *c);
76 static void fp_getline_init(ConfigArgs *c);
77 static int fp_parse_line(ConfigArgs *c);
79 static char *strtok_quote(char *line, char *sep, char **quote_ptr);
81 int read_config_file(const char *fname, int depth, ConfigArgs *cf);
84 new_config_args( BackendDB *be, const char *fname, int lineno, int argc, char **argv )
87 c = ch_calloc( 1, sizeof( ConfigArgs ) );
88 if ( c == NULL ) return(NULL);
94 snprintf( c->log, sizeof( c->log ), "%s: line %lu", fname, lineno );
99 init_config_argv( ConfigArgs *c )
101 c->argv = ch_calloc( ARGS_STEP + 1, sizeof( *c->argv ) );
102 c->argv_size = ARGS_STEP + 1;
105 ConfigTable *config_find_keyword(ConfigTable *Conf, ConfigArgs *c) {
108 for(i = 0; Conf[i].name; i++)
109 if( (Conf[i].length && (!strncasecmp(c->argv[0], Conf[i].name, Conf[i].length))) ||
110 (!strcasecmp(c->argv[0], Conf[i].name)) ) break;
111 if ( !Conf[i].name ) return NULL;
115 int config_check_vals(ConfigTable *Conf, ConfigArgs *c, int check_only ) {
116 int rc, arg_user, arg_type, iarg;
120 arg_type = Conf->arg_type;
121 if(arg_type == ARG_IGNORED) {
122 Debug(LDAP_DEBUG_CONFIG, "%s: keyword <%s> ignored\n",
123 c->log, Conf->name, 0);
126 if((arg_type & ARG_DN) && c->argc == 1) {
130 if(Conf->min_args && (c->argc < Conf->min_args)) {
131 sprintf( c->msg, "<%s> missing <%s> argument",
132 c->argv[0], Conf->what );
133 Debug(LDAP_DEBUG_CONFIG, "%s: keyword %s\n", c->log, c->msg, 0 );
134 return(ARG_BAD_CONF);
136 if(Conf->max_args && (c->argc > Conf->max_args)) {
137 sprintf( c->msg, "<%s> extra cruft after <%s> ignored",
138 c->argv[0], Conf->what );
139 Debug(LDAP_DEBUG_CONFIG, "%s: %s\n", c->log, c->msg, 0 );
141 if((arg_type & ARG_DB) && !c->be) {
142 sprintf( c->msg, "<%s> only allowed within database declaration",
144 Debug(LDAP_DEBUG_CONFIG, "%s: keyword %s\n",
146 return(ARG_BAD_CONF);
148 if((arg_type & ARG_PRE_BI) && c->bi) {
149 sprintf( c->msg, "<%s> must occur before any backend %sdeclaration",
150 c->argv[0], (arg_type & ARG_PRE_DB) ? "or database " : "" );
151 Debug(LDAP_DEBUG_CONFIG, "%s: keyword %s\n",
153 return(ARG_BAD_CONF);
155 if((arg_type & ARG_PRE_DB) && c->be && c->be != frontendDB) {
156 sprintf( c->msg, "<%s> must occur before any database declaration",
158 Debug(LDAP_DEBUG_CONFIG, "%s: keyword %s\n",
160 return(ARG_BAD_CONF);
162 if((arg_type & ARG_PAREN) && *c->argv[1] != '(' /*')'*/) {
163 sprintf( c->msg, "<%s> old format not supported", c->argv[0] );
164 Debug(LDAP_DEBUG_CONFIG, "%s: %s\n",
166 return(ARG_BAD_CONF);
168 if((arg_type & ARGS_POINTER) && !Conf->arg_item && !(arg_type & ARG_OFFSET)) {
169 sprintf( c->msg, "<%s> invalid config_table, arg_item is NULL",
171 Debug(LDAP_DEBUG_CONFIG, "%s: %s\n",
173 return(ARG_BAD_CONF);
175 c->type = arg_user = (arg_type & ARGS_USERLAND);
176 memset(&c->values, 0, sizeof(c->values));
177 if(arg_type & ARGS_NUMERIC) {
179 iarg = 0; larg = 0; barg = 0;
180 switch(arg_type & ARGS_NUMERIC) {
181 case ARG_INT: iarg = atoi(c->argv[1]); break;
182 case ARG_LONG: larg = strtol(c->argv[1], NULL, 0); break;
183 case ARG_BER_LEN_T: barg = (ber_len_t)atol(c->argv[1]); break;
187 } else if(!strcasecmp(c->argv[1], "on") ||
188 !strcasecmp(c->argv[1], "true")) {
190 } else if(!strcasecmp(c->argv[1], "off") ||
191 !strcasecmp(c->argv[1], "false")) {
194 sprintf( c->msg, "<%s> invalid value, ignored",
196 Debug(LDAP_DEBUG_CONFIG, "%s: %s\n",
202 j = (arg_type & ARG_NONZERO) ? 1 : 0;
203 if(iarg < j && larg < j && barg < j ) {
204 larg = larg ? larg : (barg ? barg : iarg);
205 sprintf( c->msg, "<%s> invalid value, ignored",
207 Debug(LDAP_DEBUG_CONFIG, "%s: %s\n",
209 return(ARG_BAD_CONF);
211 switch(arg_type & ARGS_NUMERIC) {
213 case ARG_INT: c->value_int = iarg; break;
214 case ARG_LONG: c->value_long = larg; break;
215 case ARG_BER_LEN_T: c->value_ber_t = barg; break;
217 } else if(arg_type & ARG_STRING) {
219 c->value_string = ch_strdup(c->argv[1]);
220 } else if(arg_type & ARG_BERVAL) {
222 ber_str2bv( c->argv[1], 0, 1, &c->value_bv );
223 } else if(arg_type & ARG_DN) {
225 ber_str2bv( c->argv[1], 0, 0, &bv );
226 rc = dnPrettyNormal( NULL, &bv, &c->value_dn, &c->value_ndn, NULL );
227 if ( rc != LDAP_SUCCESS ) {
228 sprintf( c->msg, "<%s> invalid DN %d (%s)",
229 c->argv[0], rc, ldap_err2string( rc ));
230 Debug(LDAP_DEBUG_CONFIG, "%s: %s\n" , c->log, c->msg, 0);
231 return(ARG_BAD_CONF);
234 ch_free( c->value_ndn.bv_val );
235 ch_free( c->value_dn.bv_val );
241 int config_set_vals(ConfigTable *Conf, ConfigArgs *c) {
245 arg_type = Conf->arg_type;
246 if(arg_type & ARG_MAGIC) {
247 if(!c->be) c->be = frontendDB;
249 rc = (*((ConfigDriver*)Conf->arg_item))(c);
251 if(c->be == frontendDB) c->be = NULL;
255 sprintf( c->msg, "<%s> handler exited with %d",
257 Debug(LDAP_DEBUG_CONFIG, "%s: %s!\n",
260 return(ARG_BAD_CONF);
264 if(arg_type & ARG_OFFSET) {
266 ptr = c->be->be_private;
268 ptr = c->bi->bi_private;
270 sprintf( c->msg, "<%s> offset is missing base pointer",
272 Debug(LDAP_DEBUG_CONFIG, "%s: %s!\n",
274 return(ARG_BAD_CONF);
276 ptr = (void *)((char *)ptr + (int)Conf->arg_item);
277 } else if (arg_type & ARGS_POINTER) {
278 ptr = Conf->arg_item;
280 if(arg_type & ARGS_POINTER)
281 switch(arg_type & ARGS_POINTER) {
283 case ARG_INT: *(int*)ptr = c->value_int; break;
284 case ARG_LONG: *(long*)ptr = c->value_long; break;
285 case ARG_BER_LEN_T: *(ber_len_t*)ptr = c->value_ber_t; break;
287 char *cc = *(char**)ptr;
289 if ((arg_type & ARG_UNIQUE) && c->op == SLAP_CONFIG_ADD ) {
290 Debug(LDAP_DEBUG_CONFIG, "%s: already set %s!\n",
291 c->log, Conf->name, 0 );
292 return(ARG_BAD_CONF);
296 *(char **)ptr = c->value_string;
300 *(struct berval *)ptr = c->value_bv;
306 int config_add_vals(ConfigTable *Conf, ConfigArgs *c) {
309 arg_type = Conf->arg_type;
310 if(arg_type == ARG_IGNORED) {
311 Debug(LDAP_DEBUG_CONFIG, "%s: keyword <%s> ignored\n",
312 c->log, Conf->name, 0);
315 rc = config_check_vals( Conf, c, 0 );
317 return config_set_vals( Conf, c );
321 config_del_vals(ConfigTable *cf, ConfigArgs *c)
325 /* If there is no handler, just ignore it */
326 if ( cf->arg_type & ARG_MAGIC ) {
327 c->op = LDAP_MOD_DELETE;
328 c->type = cf->arg_type & ARGS_USERLAND;
329 rc = (*((ConfigDriver*)cf->arg_item))(c);
335 config_get_vals(ConfigTable *cf, ConfigArgs *c)
341 if ( cf->arg_type & ARG_IGNORED ) {
345 memset(&c->values, 0, sizeof(c->values));
346 c->rvalue_vals = NULL;
347 c->rvalue_nvals = NULL;
348 c->op = SLAP_CONFIG_EMIT;
349 c->type = cf->arg_type & ARGS_USERLAND;
351 if ( cf->arg_type & ARG_MAGIC ) {
352 rc = (*((ConfigDriver*)cf->arg_item))(c);
355 if ( cf->arg_type & ARG_OFFSET ) {
357 ptr = c->be->be_private;
359 ptr = c->bi->bi_private;
362 ptr = (void *)((char *)ptr + (int)cf->arg_item);
367 switch(cf->arg_type & ARGS_POINTER) {
369 case ARG_INT: c->value_int = *(int *)ptr; break;
370 case ARG_LONG: c->value_long = *(long *)ptr; break;
371 case ARG_BER_LEN_T: c->value_ber_t = *(ber_len_t *)ptr; break;
374 c->value_string = ch_strdup(*(char **)ptr);
377 ber_dupbv( &c->value_bv, (struct berval *)ptr ); break;
380 if ( cf->arg_type & ARGS_POINTER) {
382 switch(cf->arg_type & ARGS_POINTER) {
383 case ARG_INT: bv.bv_len = sprintf(bv.bv_val, "%d", c->value_int); break;
384 case ARG_LONG: bv.bv_len = sprintf(bv.bv_val, "%ld", c->value_long); break;
385 case ARG_BER_LEN_T: bv.bv_len = sprintf(bv.bv_val, "%ld", c->value_ber_t); break;
386 case ARG_ON_OFF: bv.bv_len = sprintf(bv.bv_val, "%s",
387 c->value_int ? "TRUE" : "FALSE"); break;
389 if ( c->value_string && c->value_string[0]) {
390 ber_str2bv( c->value_string, 0, 0, &bv);
396 if ( !BER_BVISEMPTY( &c->value_bv )) {
403 if (( cf->arg_type & ARGS_POINTER ) == ARG_STRING )
404 ber_bvarray_add(&c->rvalue_vals, &bv);
406 value_add_one(&c->rvalue_vals, &bv);
412 init_config_attrs(ConfigTable *ct) {
413 LDAPAttributeType *at;
417 for (i=0; ct[i].name; i++ ) {
418 if ( !ct[i].attribute ) continue;
419 at = ldap_str2attributetype( ct[i].attribute,
420 &code, &err, LDAP_SCHEMA_ALLOW_ALL );
422 fprintf( stderr, "init_config_attrs: AttributeType \"%s\": %s, %s\n",
423 ct[i].attribute, ldap_scherr2str(code), err );
426 code = at_add( at, 0, NULL, &err );
427 if ( code && code != SLAP_SCHERR_ATTR_DUP ) {
428 fprintf( stderr, "init_config_attrs: AttributeType \"%s\": %s, %s\n",
429 ct[i].attribute, scherr2str(code), err );
432 code = slap_str2ad( at->at_names[0], &ct[i].ad, &err );
434 fprintf( stderr, "init_config_attrs: AttributeType \"%s\": %s\n",
435 ct[i].attribute, err );
445 init_config_ocs( ConfigOCs *ocs ) {
448 for (i=0;ocs[i].def;i++) {
453 oc = ldap_str2objectclass( ocs[i].def, &code, &err,
454 LDAP_SCHEMA_ALLOW_ALL );
456 fprintf( stderr, "init_config_ocs: objectclass \"%s\": %s, %s\n",
457 ocs[i].def, ldap_scherr2str(code), err );
460 code = oc_add(oc,0,NULL,&err);
461 if ( code && code != SLAP_SCHERR_CLASS_DUP ) {
462 fprintf( stderr, "init_config_ocs: objectclass \"%s\": %s, %s\n",
463 ocs[i].def, scherr2str(code), err );
467 *ocs[i].oc = oc_find(oc->oc_names[0]);
475 config_parse_vals(ConfigTable *ct, ConfigArgs *c, int valx)
479 snprintf( c->log, sizeof( c->log ), "%s: value #%d",
480 ct->ad->ad_cname.bv_val, valx );
482 c->argv[0] = ct->ad->ad_cname.bv_val;
483 if ( fp_parse_line( c ) ) {
486 rc = config_check_vals( ct, c, 1 );
494 config_parse_add(ConfigTable *ct, ConfigArgs *c)
498 snprintf( c->log, sizeof( c->log ), "%s: value #%d",
499 ct->ad->ad_cname.bv_val, c->valx );
501 c->argv[0] = ct->ad->ad_cname.bv_val;
502 if ( fp_parse_line( c ) ) {
505 c->op = LDAP_MOD_ADD;
506 rc = config_add_vals( ct, c );
514 read_config_file(const char *fname, int depth, ConfigArgs *cf)
521 c = ch_calloc( 1, sizeof( ConfigArgs ) );
527 memcpy( c, cf, sizeof( ConfigArgs ) );
529 c->depth = depth; /* XXX */
536 init_config_argv( c );
538 fp = fopen( fname, "r" );
541 Debug(LDAP_DEBUG_ANY,
542 "could not open config file \"%s\": %s (%d)\n",
543 fname, strerror(errno), errno);
547 Debug(LDAP_DEBUG_CONFIG, "reading config file %s\n", fname, 0, 0);
553 while ( fp_getline( fp, c ) ) {
554 /* skip comments and blank lines */
555 if ( c->line[0] == '#' || c->line[0] == '\0' ) {
559 snprintf( c->log, sizeof( c->log ), "%s: line %lu",
560 c->fname, c->lineno );
564 if ( fp_parse_line( c ) ) {
570 Debug(LDAP_DEBUG_CONFIG, "%s: bad config line (ignored)\n", c->log, 0, 0);
574 c->op = SLAP_CONFIG_ADD;
576 ct = config_find_keyword( config_back_cf_table, c );
578 rc = config_add_vals( ct, c );
581 if ( rc & ARGS_USERLAND ) {
582 /* XXX a usertype would be opaque here */
583 Debug(LDAP_DEBUG_CONFIG, "%s: unknown user type <%s>\n",
584 c->log, c->argv[0], 0);
588 } else if ( rc == ARG_BAD_CONF ) {
593 } else if ( c->bi ) {
594 rc = SLAP_CONF_UNKNOWN;
595 if ( c->bi->bi_cf_table ) {
596 ct = config_find_keyword( c->bi->bi_cf_table, c );
598 rc = config_add_vals( ct, c );
601 if ( c->bi->bi_config && rc == SLAP_CONF_UNKNOWN ) {
602 rc = (*c->bi->bi_config)(c->bi, c->fname, c->lineno,
607 case SLAP_CONF_UNKNOWN:
608 Debug(LDAP_DEBUG_CONFIG, "%s: "
609 "unknown directive <%s> inside backend info definition (ignored)\n",
610 c->log, *c->argv, 0);
618 } else if ( c->be ) {
619 rc = SLAP_CONF_UNKNOWN;
620 if ( c->be->be_cf_table ) {
621 ct = config_find_keyword( c->be->be_cf_table, c );
623 rc = config_add_vals( ct, c );
626 if ( c->be->be_config && rc == SLAP_CONF_UNKNOWN ) {
627 rc = (*c->be->be_config)(c->be, c->fname, c->lineno,
632 case SLAP_CONF_UNKNOWN:
633 Debug( LDAP_DEBUG_CONFIG, "%s: "
634 "unknown directive <%s> inside backend database "
635 "definition (ignored)\n",
636 c->log, *c->argv, 0);
644 } else if ( frontendDB->be_config ) {
645 rc = (*frontendDB->be_config)(frontendDB, c->fname, (int)c->lineno, c->argc, c->argv);
648 case SLAP_CONF_UNKNOWN:
649 Debug( LDAP_DEBUG_CONFIG, "%s: "
650 "unknown directive <%s> inside global database definition (ignored)\n",
651 c->log, *c->argv, 0);
660 Debug(LDAP_DEBUG_CONFIG, "%s: "
661 "unknown directive <%s> outside backend info and database definitions (ignored)\n",
662 c->log, *c->argv, 0);
668 if ( BER_BVISNULL( &frontendDB->be_schemadn ) ) {
669 ber_str2bv( SLAPD_SCHEMA_DN, STRLENOF( SLAPD_SCHEMA_DN ), 1,
670 &frontendDB->be_schemadn );
671 rc = dnNormalize( 0, NULL, NULL, &frontendDB->be_schemadn, &frontendDB->be_schemandn, NULL );
672 if ( rc != LDAP_SUCCESS ) {
673 Debug(LDAP_DEBUG_ANY, "%s: "
674 "unable to normalize default schema DN \"%s\"\n",
675 c->log, frontendDB->be_schemadn.bv_val, 0 );
676 /* must not happen */
690 /* restrictops, allows, disallows, requires, loglevel */
693 verb_to_mask(const char *word, slap_verbmasks *v) {
695 for(i = 0; !BER_BVISNULL(&v[i].word); i++)
696 if(!strcasecmp(word, v[i].word.bv_val))
702 verbs_to_mask(int argc, char *argv[], slap_verbmasks *v, slap_mask_t *m) {
704 for(i = 1; i < argc; i++) {
705 j = verb_to_mask(argv[i], v);
706 if(BER_BVISNULL(&v[j].word)) return(1);
707 while (!v[j].mask) j--;
714 mask_to_verbs(slap_verbmasks *v, slap_mask_t m, BerVarray *bva) {
718 for (i=0; !BER_BVISNULL(&v[i].word); i++) {
719 if (!v[i].mask) continue;
720 if (( m & v[i].mask ) == v[i].mask ) {
721 value_add_one( bva, &v[i].word );
727 static slap_verbmasks tlskey[] = {
728 { BER_BVC("no"), SB_TLS_OFF },
729 { BER_BVC("yes"), SB_TLS_ON },
730 { BER_BVC("critical"), SB_TLS_CRITICAL },
734 static slap_verbmasks methkey[] = {
736 { BER_BVC("none"), LDAP_AUTH_NONE },
738 { BER_BVC("simple"), LDAP_AUTH_SIMPLE },
739 #ifdef HAVE_CYRUS_SASL
740 { BER_BVC("sasl"), LDAP_AUTH_SASL },
745 typedef struct cf_aux_table {
753 static cf_aux_table bindkey[] = {
754 { BER_BVC("starttls="), offsetof(slap_bindconf, sb_tls), 'd', 0, tlskey },
755 { BER_BVC("bindmethod="), offsetof(slap_bindconf, sb_method), 'd', 0, methkey },
756 { BER_BVC("binddn="), offsetof(slap_bindconf, sb_binddn), 'b', 1, NULL },
757 { BER_BVC("credentials="), offsetof(slap_bindconf, sb_cred), 'b', 1, NULL },
758 { BER_BVC("saslmech="), offsetof(slap_bindconf, sb_saslmech), 'b', 0, NULL },
759 { BER_BVC("secprops="), offsetof(slap_bindconf, sb_secprops), 's', 0, NULL },
760 { BER_BVC("realm="), offsetof(slap_bindconf, sb_realm), 'b', 0, NULL },
761 { BER_BVC("authcID="), offsetof(slap_bindconf, sb_authcId), 'b', 0, NULL },
762 { BER_BVC("authzID="), offsetof(slap_bindconf, sb_authzId), 'b', 1, NULL },
763 { BER_BVNULL, 0, 0, 0, NULL }
766 int bindconf_parse( const char *word, slap_bindconf *bc ) {
770 for (tab = bindkey; !BER_BVISNULL(&tab->key); tab++) {
771 if ( !strncasecmp( word, tab->key.bv_val, tab->key.bv_len )) {
775 const char *val = word + tab->key.bv_len;
777 switch ( tab->type ) {
779 cptr = (char **)((char *)bc + tab->off);
780 *cptr = ch_strdup( val );
784 bptr = (struct berval *)((char *)bc + tab->off);
785 ber_str2bv( val, 0, 1, bptr );
790 iptr = (int *)((char *)bc + tab->off);
793 for ( j = 0; !BER_BVISNULL( &tab->aux[j].word ); j++ ) {
794 if ( !strcasecmp( val, tab->aux[j].word.bv_val ) ) {
795 *iptr = tab->aux[j].mask;
803 Debug( LDAP_DEBUG_ANY, "invalid bind config value %s\n",
814 int bindconf_unparse( slap_bindconf *bc, struct berval *bv ) {
815 char buf[BUFSIZ], *ptr;
820 for (tab = bindkey; !BER_BVISNULL(&tab->key); tab++) {
825 cptr = (char **)((char *)bc + tab->off);
827 switch ( tab->type ) {
829 bptr = (struct berval *)((char *)bc + tab->off);
830 cptr = &bptr->bv_val;
834 ptr = lutil_strcopy( ptr, tab->key.bv_val );
835 if ( tab->quote ) *ptr++ = '"';
836 ptr = lutil_strcopy( ptr, *cptr );
837 if ( tab->quote ) *ptr++ = '"';
843 iptr = (int *)((char *)bc + tab->off);
845 for ( i = 0; !BER_BVISNULL( &tab->aux[i].word ); i++ ) {
846 if ( *iptr == tab->aux[i].mask ) {
848 ptr = lutil_strcopy( ptr, tab->key.bv_val );
849 ptr = lutil_strcopy( ptr, tab->aux[i].word.bv_val );
857 tmp.bv_len = ptr - buf;
858 ber_dupbv( bv, &tmp );
862 void bindconf_free( slap_bindconf *bc ) {
863 if ( !BER_BVISNULL( &bc->sb_binddn ) ) {
864 ch_free( bc->sb_binddn.bv_val );
865 BER_BVZERO( &bc->sb_binddn );
867 if ( !BER_BVISNULL( &bc->sb_cred ) ) {
868 ch_free( bc->sb_cred.bv_val );
869 BER_BVZERO( &bc->sb_cred );
871 if ( !BER_BVISNULL( &bc->sb_saslmech ) ) {
872 ch_free( bc->sb_saslmech.bv_val );
873 BER_BVZERO( &bc->sb_saslmech );
875 if ( bc->sb_secprops ) {
876 ch_free( bc->sb_secprops );
877 bc->sb_secprops = NULL;
879 if ( !BER_BVISNULL( &bc->sb_realm ) ) {
880 ch_free( bc->sb_realm.bv_val );
881 BER_BVZERO( &bc->sb_realm );
883 if ( !BER_BVISNULL( &bc->sb_authcId ) ) {
884 ch_free( bc->sb_authcId.bv_val );
885 BER_BVZERO( &bc->sb_authcId );
887 if ( !BER_BVISNULL( &bc->sb_authzId ) ) {
888 ch_free( bc->sb_authzId.bv_val );
889 BER_BVZERO( &bc->sb_authzId );
894 /* -------------------------------------- */
898 strtok_quote( char *line, char *sep, char **quote_ptr )
905 if ( line != NULL ) {
908 while ( *next && strchr( sep, *next ) ) {
912 if ( *next == '\0' ) {
918 for ( inquote = 0; *next; ) {
926 AC_MEMCPY( next, next + 1, strlen( next + 1 ) + 1 );
932 next + 1, strlen( next + 1 ) + 1 );
933 next++; /* dont parse the escaped character */
938 if ( strchr( sep, *next ) != NULL ) {
952 static char buf[BUFSIZ];
954 static size_t lmax, lcur;
956 #define CATLINE( buf ) \
958 size_t len = strlen( buf ); \
959 while ( lcur + len + 1 > lmax ) { \
961 line = (char *) ch_realloc( line, lmax ); \
963 strcpy( line + lcur, buf ); \
968 fp_getline_init(ConfigArgs *c) {
974 fp_getline( FILE *fp, ConfigArgs *c )
982 /* avoid stack of bufs */
983 if ( strncasecmp( line, "include", STRLENOF( "include" ) ) == 0 ) {
989 while ( fgets( buf, sizeof( buf ), fp ) ) {
990 p = strchr( buf, '\n' );
992 if ( p > buf && p[-1] == '\r' ) {
1000 && ( p = line + strlen( line ) - 1 )[0] == '\\'
1007 if ( !isspace( (unsigned char)buf[0] ) ) {
1018 return(line[0] ? 1 : 0);
1022 fp_parse_line(ConfigArgs *c)
1025 char *hide[] = { "rootpw", "replica", "bindpw", "pseudorootpw", "dbpasswd", '\0' };
1029 c->tline = ch_strdup(c->line);
1030 token = strtok_quote(c->tline, " \t", "e_ptr);
1032 if(token) for(i = 0; hide[i]; i++) if(!strcasecmp(token, hide[i])) break;
1033 if(quote_ptr) *quote_ptr = ' ';
1034 Debug(LDAP_DEBUG_CONFIG, "line %lu (%s%s)\n", c->lineno,
1035 hide[i] ? hide[i] : c->line, hide[i] ? " ***" : "");
1036 if(quote_ptr) *quote_ptr = '\0';
1038 for(; token; token = strtok_quote(NULL, " \t", "e_ptr)) {
1039 if(c->argc == c->argv_size - 1) {
1041 tmp = ch_realloc(c->argv, (c->argv_size + ARGS_STEP) * sizeof(*c->argv));
1043 Debug(LDAP_DEBUG_ANY, "line %lu: out of memory\n", c->lineno, 0, 0);
1047 c->argv_size += ARGS_STEP;
1049 c->argv[c->argc++] = token;
1051 c->argv[c->argc] = NULL;
1058 ucdata_unload( UCDATA_ALL );
1060 /* NOTE: in case of early exit, frontendDB can be NULL */
1061 if ( frontendDB->be_schemandn.bv_val )
1062 free( frontendDB->be_schemandn.bv_val );
1063 if ( frontendDB->be_schemadn.bv_val )
1064 free( frontendDB->be_schemadn.bv_val );
1065 if ( frontendDB->be_acl )
1066 acl_destroy( frontendDB->be_acl, NULL );
1069 if ( slapd_args_file )
1070 free ( slapd_args_file );
1071 if ( slapd_pid_file )
1072 free ( slapd_pid_file );
1073 if ( default_passwd_hash )
1074 ldap_charray_free( default_passwd_hash );
1078 slap_str2clist( char ***out, char *in, const char *brkstr )
1086 /* find last element in list */
1087 for (i = 0; *out && (*out)[i]; i++);
1089 /* protect the input string from strtok */
1090 str = ch_strdup( in );
1092 if ( *str == '\0' ) {
1097 /* Count words in string */
1099 for ( s = str; *s; s++ ) {
1100 if ( strchr( brkstr, *s ) != NULL ) {
1105 *out = ch_realloc( *out, ( i + j + 1 ) * sizeof( char * ) );
1107 for ( s = ldap_pvt_strtok( str, brkstr, &lasts );
1109 s = ldap_pvt_strtok( NULL, brkstr, &lasts ) )
1111 *new = ch_strdup( s );
1120 int config_generic_wrapper( Backend *be, const char *fname, int lineno,
1121 int argc, char **argv )
1123 ConfigArgs c = { 0 };
1133 sprintf( c.log, "%s: line %lu", fname, lineno );
1135 rc = SLAP_CONF_UNKNOWN;
1136 ct = config_find_keyword( be->be_cf_table, &c );
1138 rc = config_add_vals( ct, &c );