1 /* bconfig.c - the config backend */
3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
5 * Copyright 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>.
17 * This work was originally developed by Howard Chu for inclusion
18 * in OpenLDAP Software.
24 #include <ac/string.h>
31 #include "slapi/slapi.h"
38 static struct berval config_rdn = BER_BVC("cn=config");
39 static struct berval schema_rdn = BER_BVC("cn=schema");
44 typedef struct modpath_s {
45 struct modpath_s *mp_next;
46 struct berval mp_path;
50 static ModPaths modpaths, *modlast = &modpaths, *modcur = &modpaths;
53 typedef struct ConfigFile {
54 struct ConfigFile *c_sibs;
55 struct ConfigFile *c_kids;
57 AttributeType *c_at_head, *c_at_tail;
58 ContentRule *c_cr_head, *c_cr_tail;
59 ObjectClass *c_oc_head, *c_oc_tail;
60 OidMacro *c_om_head, *c_om_tail;
64 typedef struct CfOcInfo {
65 struct berval *co_name;
66 ConfigTable *co_table;
70 typedef struct CfEntryInfo {
71 struct CfEntryInfo *ce_parent;
72 struct CfEntryInfo *ce_sibs;
73 struct CfEntryInfo *ce_kids;
81 ConfigFile *cb_config;
83 BackendDB cb_db; /* underlying database */
87 /* These do nothing in slapd, they're kept only to make them
90 static char *replica_pidFile, *replica_argsFile;
91 static int replicationInterval;
93 static char *passwd_salt;
94 static char *logfileName;
95 static BerVarray authz_rewrites;
97 static struct berval cfdir;
100 static AttributeDescription *cfAd_backend, *cfAd_database, *cfAd_overlay,
103 static ObjectClass *cfOc_schema, *cfOc_global, *cfOc_backend, *cfOc_database,
104 *cfOc_include, *cfOc_overlay, *cfOc_module;
106 static ConfigFile cf_prv, *cfn = &cf_prv;
108 static Avlnode *CfOcTree;
110 static int add_syncrepl LDAP_P(( Backend *, char **, int ));
111 static int parse_syncrepl_line LDAP_P(( char **, int, syncinfo_t *));
112 static void syncrepl_unparse LDAP_P (( syncinfo_t *, struct berval *));
113 static int config_add_internal( CfBackInfo *cfb, Entry *e, SlapReply *rs,
116 static ConfigDriver config_fname;
117 static ConfigDriver config_cfdir;
118 static ConfigDriver config_generic;
119 static ConfigDriver config_search_base;
120 static ConfigDriver config_passwd_hash;
121 static ConfigDriver config_schema_dn;
122 static ConfigDriver config_sizelimit;
123 static ConfigDriver config_timelimit;
124 static ConfigDriver config_limits;
125 static ConfigDriver config_overlay;
126 static ConfigDriver config_suffix;
127 static ConfigDriver config_deref_depth;
128 static ConfigDriver config_rootdn;
129 static ConfigDriver config_rootpw;
130 static ConfigDriver config_restrict;
131 static ConfigDriver config_allows;
132 static ConfigDriver config_disallows;
133 static ConfigDriver config_requires;
134 static ConfigDriver config_security;
135 static ConfigDriver config_referral;
136 static ConfigDriver config_loglevel;
137 static ConfigDriver config_syncrepl;
138 static ConfigDriver config_replica;
139 static ConfigDriver config_updatedn;
140 static ConfigDriver config_updateref;
141 static ConfigDriver config_include;
143 static ConfigDriver config_tls_option;
144 static ConfigDriver config_tls_config;
193 static OidRec OidMacros[] = {
194 /* OpenLDAProot:666.11.1 */
195 { "OLcfg", "1.3.6.1.4.1.4203.666.11.1" },
196 { "OLcfgAt", "OLcfg:3" },
197 { "OLcfgOc", "OLcfg:4" },
198 { "OMsyn", "1.3.6.1.4.1.1466.115.121.1" },
199 { "OMsInteger", "OMsyn:2" },
200 { "OMsBoolean", "OMsyn:7" },
201 { "OMsDN", "OMsyn:12" },
202 { "OMsDirectoryString", "OMsyn:15" },
203 { "OMsOctetString", "OMsyn:40" },
207 /* alphabetical ordering */
209 ConfigTable config_back_cf_table[] = {
210 /* This attr is read-only */
211 { "", "", 0, 0, 0, ARG_MAGIC,
212 &config_fname, "( OLcfgAt:78 NAME 'olcConfigFile' "
213 "DESC 'File for slapd configuration directives' "
214 "EQUALITY caseIgnoreMatch "
215 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
216 { "", "", 0, 0, 0, ARG_MAGIC,
217 &config_cfdir, "( OLcfgAt:79 NAME 'olcConfigDir' "
218 "DESC 'Directory for slapd configuration backend' "
219 "EQUALITY caseIgnoreMatch "
220 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
221 { "access", NULL, 0, 0, 0, ARG_MAY_DB|ARG_MAGIC|CFG_ACL,
222 &config_generic, "( OLcfgAt:1 NAME 'olcAccess' "
223 "DESC 'Access Control List' "
224 "EQUALITY caseIgnoreMatch "
225 "SYNTAX OMsDirectoryString X-ORDERED 'VALUES' )", NULL, NULL },
226 { "allows", "features", 2, 0, 5, ARG_PRE_DB|ARG_MAGIC,
227 &config_allows, "( OLcfgAt:2 NAME 'olcAllows' "
228 "DESC 'Allowed set of deprecated features' "
229 "EQUALITY caseIgnoreMatch "
230 "SYNTAX OMsDirectoryString )", NULL, NULL },
231 { "argsfile", "file", 2, 2, 0, ARG_STRING,
232 &slapd_args_file, "( OLcfgAt:3 NAME 'olcArgsFile' "
233 "DESC 'File for slapd command line options' "
234 "EQUALITY caseIgnoreMatch "
235 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
236 { "attribute", "attribute", 2, 0, 9, ARG_PAREN|ARG_MAGIC|CFG_ATTR,
237 &config_generic, "( OLcfgAt:4 NAME 'olcAttributeTypes' "
238 "DESC 'OpenLDAP attributeTypes' "
239 "EQUALITY caseIgnoreMatch "
240 "SYNTAX OMsDirectoryString X-ORDERED 'VALUES' )",
242 { "attributeoptions", NULL, 0, 0, 0, ARG_MAGIC|CFG_ATOPT,
243 &config_generic, "( OLcfgAt:5 NAME 'olcAttributeOptions' "
244 "EQUALITY caseIgnoreMatch "
245 "SYNTAX OMsDirectoryString )", NULL, NULL },
246 { "authid-rewrite", NULL, 2, 0, 0,
247 #ifdef SLAP_AUTH_REWRITE
248 ARG_MAGIC|CFG_REWRITE, &config_generic,
252 "( OLcfgAt:6 NAME 'olcAuthIDRewrite' "
253 "EQUALITY caseIgnoreMatch "
254 "SYNTAX OMsDirectoryString X-ORDERED 'VALUES' )", NULL, NULL },
255 { "authz-policy", "policy", 2, 2, 0, ARG_STRING|ARG_MAGIC|CFG_AZPOLICY,
256 &config_generic, "( OLcfgAt:7 NAME 'olcAuthzPolicy' "
257 "EQUALITY caseIgnoreMatch "
258 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
259 { "authz-regexp", NULL, 3, 3, 0, ARG_MAGIC|CFG_AZREGEXP,
260 &config_generic, "( OLcfgAt:8 NAME 'olcAuthzRegexp' "
261 "EQUALITY caseIgnoreMatch "
262 "SYNTAX OMsDirectoryString X-ORDERED 'VALUES' )", NULL, NULL },
263 { "backend", "type", 2, 2, 0, ARG_PRE_DB|ARG_MAGIC|CFG_BACKEND,
264 &config_generic, "( OLcfgAt:9 NAME 'olcBackend' "
265 "DESC 'A type of backend' "
266 "EQUALITY caseIgnoreMatch "
267 "SYNTAX OMsDirectoryString X-ORDERED 'VALUES' )", NULL, NULL },
268 { "concurrency", "level", 2, 2, 0, ARG_INT|ARG_MAGIC|CFG_CONCUR,
269 &config_generic, "( OLcfgAt:10 NAME 'olcConcurrency' "
270 "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
271 { "conn_max_pending", "max", 2, 2, 0, ARG_INT,
272 &slap_conn_max_pending, "( OLcfgAt:11 NAME 'olcConnMaxPending' "
273 "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
274 { "conn_max_pending_auth", "max", 2, 2, 0, ARG_INT,
275 &slap_conn_max_pending_auth, "( OLcfgAt:12 NAME 'olcConnMaxPendingAuth' "
276 "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
277 { "database", "type", 2, 2, 0, ARG_MAGIC|CFG_DATABASE,
278 &config_generic, "( OLcfgAt:13 NAME 'olcDatabase' "
279 "DESC 'The backend type for a database instance' "
280 "SUP olcBackend X-ORDERED 'VALUES' )", NULL, NULL },
281 { "defaultSearchBase", "dn", 2, 2, 0, ARG_PRE_BI|ARG_PRE_DB|ARG_DN|ARG_MAGIC,
282 &config_search_base, "( OLcfgAt:14 NAME 'olcDefaultSearchBase' "
283 "SYNTAX OMsDN SINGLE-VALUE )", NULL, NULL },
284 { "disallows", "features", 2, 0, 8, ARG_PRE_DB|ARG_MAGIC,
285 &config_disallows, "( OLcfgAt:15 NAME 'olcDisallows' "
286 "EQUALITY caseIgnoreMatch "
287 "SYNTAX OMsDirectoryString )", NULL, NULL },
288 { "ditcontentrule", NULL, 0, 0, 0, ARG_MAGIC|CFG_DIT,
289 &config_generic, "( OLcfgAt:16 NAME 'olcDitContentRules' "
290 "DESC 'OpenLDAP DIT content rules' "
291 "EQUALITY caseIgnoreMatch "
292 "SYNTAX OMsDirectoryString X-ORDERED 'VALUES' )",
294 { "gentlehup", "on|off", 2, 2, 0,
296 ARG_ON_OFF, &global_gentlehup,
300 "( OLcfgAt:17 NAME 'olcGentleHUP' "
301 "SYNTAX OMsBoolean SINGLE-VALUE )", NULL, NULL },
302 { "idletimeout", "timeout", 2, 2, 0, ARG_INT,
303 &global_idletimeout, "( OLcfgAt:18 NAME 'olcIdleTimeout' "
304 "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
305 /* XXX -- special case? */
306 { "include", "file", 2, 2, 0, ARG_MAGIC,
307 &config_include, "( OLcfgAt:19 NAME 'olcInclude' "
308 "SUP labeledURI )", NULL, NULL },
309 { "index_substr_if_minlen", "min", 2, 2, 0, ARG_INT|ARG_NONZERO|ARG_MAGIC|CFG_SSTR_IF_MIN,
310 &config_generic, "( OLcfgAt:20 NAME 'olcIndexSubstrIfMinLen' "
311 "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
312 { "index_substr_if_maxlen", "max", 2, 2, 0, ARG_INT|ARG_NONZERO|ARG_MAGIC|CFG_SSTR_IF_MAX,
313 &config_generic, "( OLcfgAt:21 NAME 'olcIndexSubstrIfMaxLen' "
314 "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
315 { "index_substr_any_len", "len", 2, 2, 0, ARG_INT|ARG_NONZERO,
316 &index_substr_any_len, "( OLcfgAt:22 NAME 'olcIndexSubstrAnyLen' "
317 "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
318 { "index_substr_step", "step", 2, 2, 0, ARG_INT|ARG_NONZERO,
319 &index_substr_any_step, "( OLcfgAt:23 NAME 'olcIndexSubstrAnyStep' "
320 "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
321 { "lastmod", "on|off", 2, 2, 0, ARG_DB|ARG_ON_OFF|ARG_MAGIC|CFG_LASTMOD,
322 &config_generic, "( OLcfgAt:24 NAME 'olcLastMod' "
323 "SYNTAX OMsBoolean SINGLE-VALUE )", NULL, NULL },
324 { "limits", "limits", 2, 0, 0, ARG_DB|ARG_MAGIC|CFG_LIMITS,
325 &config_generic, "( OLcfgAt:25 NAME 'olcLimits' "
326 "SYNTAX OMsDirectoryString )", NULL, NULL },
327 { "localSSF", "ssf", 2, 2, 0, ARG_INT,
328 &local_ssf, "( OLcfgAt:26 NAME 'olcLocalSSF' "
329 "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
330 { "logfile", "file", 2, 2, 0, ARG_STRING|ARG_MAGIC|CFG_LOGFILE,
331 &config_generic, "( OLcfgAt:27 NAME 'olcLogFile' "
332 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
333 { "loglevel", "level", 2, 0, 0, ARG_MAGIC,
334 &config_loglevel, "( OLcfgAt:28 NAME 'olcLogLevel' "
335 "SYNTAX OMsDirectoryString )", NULL, NULL },
336 { "maxDerefDepth", "depth", 2, 2, 0, ARG_DB|ARG_INT|ARG_MAGIC|CFG_DEPTH,
337 &config_generic, "( OLcfgAt:29 NAME 'olcMaxDerefDepth' "
338 "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
339 { "moduleload", "file", 2, 0, 0,
341 ARG_MAGIC|CFG_MODLOAD, &config_generic,
345 "( OLcfgAt:30 NAME 'olcModuleLoad' "
346 "SYNTAX OMsDirectoryString X-ORDERED 'VALUES' )", NULL, NULL },
347 { "modulepath", "path", 2, 2, 0,
349 ARG_MAGIC|CFG_MODPATH, &config_generic,
353 "( OLcfgAt:31 NAME 'olcModulePath' "
354 "SYNTAX OMsDirectoryString X-ORDERED 'VALUES' )", NULL, NULL },
355 { "objectclass", "objectclass", 2, 0, 0, ARG_PAREN|ARG_MAGIC|CFG_OC,
356 &config_generic, "( OLcfgAt:32 NAME 'olcObjectClasses' "
357 "DESC 'OpenLDAP object classes' "
358 "EQUALITY caseIgnoreMatch "
359 "SYNTAX OMsDirectoryString X-ORDERED 'VALUES' )",
361 { "objectidentifier", NULL, 0, 0, 0, ARG_MAGIC|CFG_OID,
362 &config_generic, "( OLcfgAt:33 NAME 'olcObjectIdentifier' "
363 "SYNTAX OMsDirectoryString X-ORDERED 'VALUES' )", NULL, NULL },
364 { "overlay", "overlay", 2, 2, 0, ARG_MAGIC,
365 &config_overlay, "( OLcfgAt:34 NAME 'olcOverlay' "
366 "SUP olcDatabase X-ORDERED 'VALUES' )", NULL, NULL },
367 { "password-crypt-salt-format", "salt", 2, 2, 0, ARG_STRING|ARG_MAGIC|CFG_SALT,
368 &config_generic, "( OLcfgAt:35 NAME 'olcPasswordCryptSaltFormat' "
369 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
370 { "password-hash", "hash", 2, 2, 0, ARG_MAGIC,
371 &config_passwd_hash, "( OLcfgAt:36 NAME 'olcPasswordHash' "
372 "SYNTAX OMsDirectoryString )", NULL, NULL },
373 { "pidfile", "file", 2, 2, 0, ARG_STRING,
374 &slapd_pid_file, "( OLcfgAt:37 NAME 'olcPidFile' "
375 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
376 { "plugin", NULL, 0, 0, 0,
378 ARG_MAGIC|CFG_PLUGIN, &config_generic,
382 "( OLcfgAt:38 NAME 'olcPlugin' "
383 "SYNTAX OMsDirectoryString )", NULL, NULL },
384 { "pluginlog", "filename", 2, 2, 0,
386 ARG_STRING, &slapi_log_file,
390 "( OLcfgAt:39 NAME 'olcPluginLogFile' "
391 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
392 { "readonly", "on|off", 2, 2, 0, ARG_MAY_DB|ARG_ON_OFF|ARG_MAGIC|CFG_RO,
393 &config_generic, "( OLcfgAt:40 NAME 'olcReadOnly' "
394 "SYNTAX OMsBoolean SINGLE-VALUE )", NULL, NULL },
395 { "referral", "url", 2, 2, 0, ARG_MAGIC,
396 &config_referral, "( OLcfgAt:41 NAME 'olcReferral' "
397 "SUP labeledURI SINGLE-VALUE )", NULL, NULL },
398 { "replica", "host or uri", 2, 0, 0, ARG_DB|ARG_MAGIC,
399 &config_replica, "( OLcfgAt:42 NAME 'olcReplica' "
400 "SUP labeledURI )", NULL, NULL },
401 { "replica-argsfile", NULL, 0, 0, 0, ARG_STRING,
402 &replica_argsFile, "( OLcfgAt:43 NAME 'olcReplicaArgsFile' "
403 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
404 { "replica-pidfile", NULL, 0, 0, 0, ARG_STRING,
405 &replica_pidFile, "( OLcfgAt:44 NAME 'olcReplicaPidFile' "
406 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
407 { "replicationInterval", NULL, 0, 0, 0, ARG_INT,
408 &replicationInterval, "( OLcfgAt:45 NAME 'olcReplicationInterval' "
409 "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
410 { "replogfile", "filename", 2, 2, 0, ARG_MAY_DB|ARG_MAGIC|ARG_STRING|CFG_REPLOG,
411 &config_generic, "( OLcfgAt:46 NAME 'olcReplogFile' "
412 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
413 { "require", "features", 2, 0, 7, ARG_MAY_DB|ARG_MAGIC,
414 &config_requires, "( OLcfgAt:47 NAME 'olcRequires' "
415 "SYNTAX OMsDirectoryString )", NULL, NULL },
416 { "restrict", "op_list", 2, 0, 0, ARG_MAY_DB|ARG_MAGIC,
417 &config_restrict, "( OLcfgAt:48 NAME 'olcRestrict' "
418 "SYNTAX OMsDirectoryString )", NULL, NULL },
419 { "reverse-lookup", "on|off", 2, 2, 0,
420 #ifdef SLAPD_RLOOKUPS
421 ARG_ON_OFF, &use_reverse_lookup,
425 "( OLcfgAt:49 NAME 'olcReverseLookup' "
426 "SYNTAX OMsBoolean SINGLE-VALUE )", NULL, NULL },
427 { "rootdn", "dn", 2, 2, 0, ARG_DB|ARG_DN|ARG_MAGIC,
428 &config_rootdn, "( OLcfgAt:50 NAME 'olcRootDN' "
429 "SYNTAX OMsDN SINGLE-VALUE )", NULL, NULL },
430 { "rootDSE", "file", 2, 2, 0, ARG_MAGIC|CFG_ROOTDSE,
431 &config_generic, "( OLcfgAt:51 NAME 'olcRootDSE' "
432 "SYNTAX OMsDirectoryString )", NULL, NULL },
433 { "rootpw", "password", 2, 2, 0, ARG_BERVAL|ARG_DB|ARG_MAGIC,
434 &config_rootpw, "( OLcfgAt:52 NAME 'olcRootPW' "
435 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
436 { "sasl-authz-policy", NULL, 2, 2, 0, ARG_MAGIC|CFG_AZPOLICY,
437 &config_generic, NULL, NULL, NULL },
438 { "sasl-host", "host", 2, 2, 0,
439 #ifdef HAVE_CYRUS_SASL
440 ARG_STRING|ARG_UNIQUE, &global_host,
444 "( OLcfgAt:53 NAME 'olcSaslHost' "
445 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
446 { "sasl-realm", "realm", 2, 2, 0,
447 #ifdef HAVE_CYRUS_SASL
448 ARG_STRING|ARG_UNIQUE, &global_realm,
452 "( OLcfgAt:54 NAME 'olcSaslRealm' "
453 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
454 { "sasl-regexp", NULL, 3, 3, 0, ARG_MAGIC|CFG_AZREGEXP,
455 &config_generic, NULL, NULL, NULL },
456 { "sasl-secprops", "properties", 2, 2, 0,
457 #ifdef HAVE_CYRUS_SASL
458 ARG_MAGIC|CFG_SASLSECP, &config_generic,
462 "( OLcfgAt:56 NAME 'olcSaslSecProps' "
463 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
464 { "saslRegexp", NULL, 3, 3, 0, ARG_MAGIC|CFG_AZREGEXP,
465 &config_generic, NULL, NULL, NULL },
466 { "schemacheck", "on|off", 2, 2, 0, ARG_ON_OFF|ARG_MAGIC|CFG_CHECK,
467 &config_generic, "( OLcfgAt:57 NAME 'olcSchemaCheck' "
468 "SYNTAX OMsBoolean SINGLE-VALUE )", NULL, NULL },
469 { "schemadn", "dn", 2, 2, 0, ARG_MAY_DB|ARG_DN|ARG_MAGIC,
470 &config_schema_dn, "( OLcfgAt:58 NAME 'olcSchemaDN' "
471 "SYNTAX OMsDN SINGLE-VALUE )", NULL, NULL },
472 { "security", "factors", 2, 0, 0, ARG_MAY_DB|ARG_MAGIC,
473 &config_security, "( OLcfgAt:59 NAME 'olcSecurity' "
474 "SYNTAX OMsDirectoryString )", NULL, NULL },
475 { "sizelimit", "limit", 2, 0, 0, ARG_MAY_DB|ARG_MAGIC|CFG_SIZE,
476 &config_sizelimit, "( OLcfgAt:60 NAME 'olcSizeLimit' "
477 "SYNTAX OMsInteger )", NULL, NULL },
478 { "sockbuf_max_incoming", "max", 2, 2, 0, ARG_BER_LEN_T,
479 &sockbuf_max_incoming, "( OLcfgAt:61 NAME 'olcSockbufMaxIncoming' "
480 "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
481 { "sockbuf_max_incoming_auth", "max", 2, 2, 0, ARG_BER_LEN_T,
482 &sockbuf_max_incoming_auth, "( OLcfgAt:62 NAME 'olcSockbufMaxIncomingAuth' "
483 "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
484 { "srvtab", "file", 2, 2, 0,
485 #ifdef LDAP_API_FEATURE_X_OPENLDAP_V2_KBIND
486 ARG_STRING, &ldap_srvtab,
490 "( OLcfgAt:63 NAME 'olcSrvtab' "
491 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
492 { "suffix", "suffix", 2, 2, 0, ARG_DB|ARG_DN|ARG_MAGIC,
493 &config_suffix, "( OLcfgAt:64 NAME 'olcSuffix' "
494 "SYNTAX OMsDN )", NULL, NULL },
495 { "syncrepl", NULL, 0, 0, 0, ARG_DB|ARG_MAGIC,
496 &config_syncrepl, "( OLcfgAt:65 NAME 'olcSyncrepl' "
497 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
498 { "threads", "count", 2, 2, 0, ARG_INT|ARG_MAGIC|CFG_THREADS,
499 &config_generic, "( OLcfgAt:66 NAME 'olcThreads' "
500 "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
501 { "timelimit", "limit", 2, 0, 0, ARG_MAY_DB|ARG_MAGIC|CFG_TIME,
502 &config_timelimit, "( OLcfgAt:67 NAME 'olcTimeLimit' "
503 "SYNTAX OMsInteger )", NULL, NULL },
504 { "TLSCACertificateFile", NULL, 0, 0, 0,
506 CFG_TLS_CA_FILE|ARG_STRING|ARG_MAGIC, &config_tls_option,
510 "( OLcfgAt:68 NAME 'olcTLSCACertificateFile' "
511 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
512 { "TLSCACertificatePath", NULL, 0, 0, 0,
514 CFG_TLS_CA_PATH|ARG_STRING|ARG_MAGIC, &config_tls_option,
518 "( OLcfgAt:69 NAME 'olcTLSCACertificatePath' "
519 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
520 { "TLSCertificateFile", NULL, 0, 0, 0,
522 CFG_TLS_CERT_FILE|ARG_STRING|ARG_MAGIC, &config_tls_option,
526 "( OLcfgAt:70 NAME 'olcTLSCertificateFile' "
527 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
528 { "TLSCertificateKeyFile", NULL, 0, 0, 0,
530 CFG_TLS_CERT_KEY|ARG_STRING|ARG_MAGIC, &config_tls_option,
534 "( OLcfgAt:71 NAME 'olcTLSCertificateKeyFile' "
535 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
536 { "TLSCipherSuite", NULL, 0, 0, 0,
538 CFG_TLS_CIPHER|ARG_STRING|ARG_MAGIC, &config_tls_option,
542 "( OLcfgAt:72 NAME 'olcTLSCipherSuite' "
543 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
544 { "TLSCRLCheck", NULL, 0, 0, 0,
546 CFG_TLS_CRLCHECK|ARG_STRING|ARG_MAGIC, &config_tls_config,
550 "( OLcfgAt:73 NAME 'olcTLSCRLCheck' "
551 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
552 { "TLSRandFile", NULL, 0, 0, 0,
554 CFG_TLS_RAND|ARG_STRING|ARG_MAGIC, &config_tls_option,
558 "( OLcfgAt:74 NAME 'olcTLSRandFile' "
559 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
560 { "TLSVerifyClient", NULL, 0, 0, 0,
562 CFG_TLS_VERIFY|ARG_STRING|ARG_MAGIC, &config_tls_config,
566 "( OLcfgAt:75 NAME 'olcTLSVerifyClient' "
567 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
568 { "ucdata-path", "path", 2, 2, 0, ARG_IGNORED,
569 NULL, NULL, NULL, NULL },
570 { "updatedn", "dn", 2, 2, 0, ARG_DB|ARG_MAGIC,
571 &config_updatedn, "( OLcfgAt:76 NAME 'olcUpdateDN' "
572 "SYNTAX OMsDN SINGLE-VALUE )", NULL, NULL },
573 { "updateref", "url", 2, 2, 0, ARG_DB|ARG_MAGIC,
574 &config_updateref, "( OLcfgAt:77 NAME 'olcUpdateRef' "
575 "SUP labeledURI )", NULL, NULL },
576 { NULL, NULL, 0, 0, 0, ARG_IGNORED,
577 NULL, NULL, NULL, NULL }
580 static ConfigOCs cf_ocs[] = {
583 "DESC 'OpenLDAP configuration object' "
585 "MAY cn )", Cft_Abstract, NULL },
588 "DESC 'OpenLDAP Global configuration options' "
589 "SUP olcConfig STRUCTURAL "
590 "MAY ( olcConfigFile $ olcConfigDir $ olcAllows $ olcArgsFile $ "
591 "olcAttributeOptions $ olcAttributeTypes $ olcAuthIDRewrite $ "
592 "olcAuthzPolicy $ olcAuthzRegexp $ olcConcurrency $ "
593 "olcConnMaxPending $ olcConnMaxPendingAuth $ olcDefaultSearchBase $ "
594 "olcDisallows $ olcDitContentRules $ olcGentleHUP $ olcIdleTimeout $ "
595 "olcIndexSubstrIfMaxLen $ olcIndexSubstrIfMinLen $ "
596 "olcIndexSubstrAnyLen $ olcIndexSubstrAnyStep $ olcLocalSSF $ "
597 "olcLogLevel $ olcModulePath $ olcObjectClasses $ "
598 "olcObjectIdentifier $ "
599 "olcPasswordCryptSaltFormat $ olcPasswordHash $ olcPidFile $ "
600 "olcPlugin $ olcPluginLogFile $ olcReadOnly $ olcReferral $ "
601 "olcReplicaPidFile $ olcReplicaArgsFile $ olcReplicationInterval $ "
602 "olcReplogFile $ olcRequires $ olcRestrict $ olcReverseLookup $ "
603 "olcRootDSE $ olcRootPW $ "
604 "olcSaslHost $ olcSaslRealm $ olcSaslSecProps $ "
605 "olcSchemaCheck $ olcSchemaDN $ olcSecurity $ olcSizeLimit $ "
606 "olcSockbufMaxIncoming $ olcSockbufMaxIncomingAuth $ olcSrvtab $ "
607 "olcThreads $ olcTimeLimit $ olcTLSCACertificateFile $ "
608 "olcTLSCACertificatePath $ olcTLSCertificateFile $ "
609 "olcTLSCertificateKeyFile $ olcTLSCipherSuite $ olcTLSCRLCheck $ "
610 "olcTLSRandFile $ olcTLSVerifyClient ) )", Cft_Global, &cfOc_global },
612 "NAME 'olcSchemaConfig' "
613 "DESC 'OpenLDAP schema object' "
614 "SUP olcConfig STRUCTURAL "
615 "MAY ( olcObjectIdentifier $ olcAttributeTypes $ olcObjectClasses $ "
616 "olcDitContentRules ) )", Cft_Schema, &cfOc_schema },
618 "NAME 'olcBackendConfig' "
619 "DESC 'OpenLDAP Backend-specific options' "
620 "SUP olcConfig STRUCTURAL "
621 "MAY ( olcBackend ) )", Cft_Backend, &cfOc_backend },
623 "NAME 'olcDatabaseConfig' "
624 "DESC 'OpenLDAP Database-specific options' "
625 "SUP olcConfig STRUCTURAL "
626 "MAY ( olcDatabase $ olcSuffix $ olcAccess $ olcLastMod $ olcLimits $ "
627 "olcMaxDerefDepth $ olcPlugin $ olcReadOnly $ olcReplica $ "
628 "olcReplogFile $ olcRequires $ olcRestrict $ olcRootDN $ olcRootPW $ "
629 "olcSchemaDN $ olcSecurity $ olcSizeLimit $ olcSyncrepl $ "
630 "olcTimeLimit $ olcUpdateDN $ olcUpdateRef ) )",
631 Cft_Database, &cfOc_database },
633 "NAME 'olcOverlayConfig' "
634 "DESC 'OpenLDAP Overlay-specific options' "
635 "SUP olcConfig STRUCTURAL "
636 "MAY ( olcOverlay ) )", Cft_Overlay, &cfOc_overlay },
638 "NAME 'olcIncludeFile' "
639 "DESC 'OpenLDAP configuration include file' "
640 "SUP olcConfig STRUCTURAL "
641 "MAY ( olcInclude $ olcConfigFile $ olcRootDSE ) )",
642 Cft_Include, &cfOc_include },
645 "NAME 'olcModuleList' "
646 "DESC 'OpenLDAP dynamic module info' "
647 "SUP olcConfig STRUCTURAL "
648 "MUST olcModuleLoad )",
649 Cft_Module, &cfOc_module },
655 config_generic(ConfigArgs *c) {
659 if ( c->op == SLAP_CONFIG_EMIT ) {
663 c->value_int = ldap_pvt_thread_get_concurrency();
666 c->value_int = connection_pool_max;
670 c->value_string = ch_strdup( passwd_salt );
675 if ( c->be->be_limits ) {
680 for ( i=0; c->be->be_limits[i]; i++ ) {
681 bv.bv_len = sprintf( buf, IFMT, i );
682 bv.bv_val = buf+bv.bv_len;
683 limits_unparse( c->be->be_limits[i], &bv );
684 bv.bv_len += bv.bv_val - buf;
686 value_add_one( &c->rvalue_vals, &bv );
689 if ( !c->rvalue_vals ) rc = 1;
692 c->value_int = (c->be->be_restrictops & SLAP_RESTRICT_OP_WRITES) != 0;
695 c->value_string = ch_strdup( slap_sasl_getpolicy());
698 slap_sasl_regexp_unparse( &c->rvalue_vals );
699 if ( !c->rvalue_vals ) rc = 1;
701 #ifdef HAVE_CYRUS_SASL
703 struct berval bv = BER_BVNULL;
704 slap_sasl_secprops_unparse( &bv );
705 if ( !BER_BVISNULL( &bv )) {
706 ber_bvarray_add( &c->rvalue_vals, &bv );
714 c->value_int = c->be->be_max_deref_depth;
717 ConfigFile *cf = c->private;
719 oidm_unparse( &c->rvalue_vals, NULL, NULL, 1 );
720 else if ( cf->c_om_head )
721 oidm_unparse( &c->rvalue_vals, cf->c_om_head,
723 if ( !c->rvalue_vals )
728 ConfigFile *cf = c->private;
730 oc_unparse( &c->rvalue_vals, NULL, NULL, 1 );
731 else if ( cf->c_oc_head )
732 oc_unparse( &c->rvalue_vals, cf->c_oc_head,
734 if ( !c->rvalue_vals )
739 ConfigFile *cf = c->private;
741 at_unparse( &c->rvalue_vals, NULL, NULL, 1 );
742 else if ( cf->c_at_head )
743 at_unparse( &c->rvalue_vals, cf->c_at_head,
745 if ( !c->rvalue_vals )
750 ConfigFile *cf = c->private;
752 cr_unparse( &c->rvalue_vals, NULL, NULL, 1 );
753 else if ( cf->c_cr_head )
754 cr_unparse( &c->rvalue_vals, cf->c_cr_head,
756 if ( !c->rvalue_vals )
762 c->value_int = global_schemacheck;
766 char *src, *dst, ibuf[11];
767 struct berval bv, abv;
768 for (i=0, a=c->be->be_acl; a; i++,a=a->acl_next) {
769 abv.bv_len = sprintf( ibuf, IFMT, i );
770 acl_unparse( a, &bv );
771 abv.bv_val = ch_malloc( abv.bv_len + bv.bv_len + 1 );
772 AC_MEMCPY( abv.bv_val, ibuf, abv.bv_len );
773 /* Turn TAB / EOL into plain space */
774 for (src=bv.bv_val,dst=abv.bv_val+abv.bv_len; *src; src++) {
775 if (isspace(*src)) *dst++ = ' ';
779 if (dst[-1] == ' ') {
783 abv.bv_len = dst - abv.bv_val;
784 ber_bvarray_add( &c->rvalue_vals, &abv );
790 if ( c->be->be_replogfile )
791 c->value_string = ch_strdup( c->be->be_replogfile );
794 ConfigFile *cf = c->private;
795 if ( cf->c_dseFiles ) {
796 value_add( &c->rvalue_vals, cf->c_dseFiles );
804 c->value_string = ch_strdup( logfileName );
809 c->value_int = (SLAP_NOLASTMOD(c->be) == 0);
811 case CFG_SSTR_IF_MAX:
812 c->value_int = index_substr_if_maxlen;
814 case CFG_SSTR_IF_MIN:
815 c->value_int = index_substr_if_minlen;
819 ModPaths *mp = c->private;
822 for (i=0; !BER_BVISNULL(&mp->mp_loads[i]); i++) {
825 bv.bv_len = sprintf( bv.bv_val, IFMT "%s", i,
826 mp->mp_loads[i].bv_val );
827 value_add_one( &c->rvalue_vals, &bv );
831 rc = c->rvalue_vals ? 0 : 1;
836 for (i=0, mp=&modpaths; mp; mp=mp->mp_next, i++) {
838 if ( BER_BVISNULL( &mp->mp_path ) && !mp->mp_loads )
841 bv.bv_len = sprintf( bv.bv_val, IFMT "%s", i,
842 mp->mp_path.bv_val );
843 value_add_one( &c->rvalue_vals, &bv );
845 rc = c->rvalue_vals ? 0 : 1;
851 slapi_int_plugin_unparse( c->be, &c->rvalue_vals );
852 if ( !c->rvalue_vals ) rc = 1;
855 #ifdef SLAP_AUTH_REWRITE
857 if ( authz_rewrites ) {
858 struct berval bv, idx;
863 for ( i=0; !BER_BVISNULL( &authz_rewrites[i] ); i++ ) {
864 idx.bv_len = sprintf( idx.bv_val, IFMT, i );
865 bv.bv_len = idx.bv_len + authz_rewrites[i].bv_len;
866 bv.bv_val = ch_malloc( bv.bv_len + 1 );
867 strcpy( bv.bv_val, idx.bv_val );
868 strcpy( bv.bv_val+idx.bv_len, authz_rewrites[i].bv_val );
869 ber_bvarray_add( &c->rvalue_vals, &bv );
872 if ( !c->rvalue_vals ) rc = 1;
881 p = strchr(c->line,'(' /*')'*/);
882 if ( c->op == LDAP_MOD_DELETE ) {
890 ldap_pvt_thread_set_concurrency(c);
897 if(!(c->bi = backend_info(c->argv[1]))) {
898 Debug(LDAP_DEBUG_ANY, "%s: "
899 "backend %s failed init!\n", c->log, c->argv[1], 0);
906 /* NOTE: config is always the first backend!
908 if ( !strcasecmp( c->argv[1], "config" )) {
909 c->be = LDAP_STAILQ_FIRST(&backendDB);
910 } else if ( !strcasecmp( c->argv[1], "frontend" )) {
912 } else if(!(c->be = backend_db_init(c->argv[1]))) {
913 Debug(LDAP_DEBUG_ANY, "%s: "
914 "database %s failed init!\n", c->log, c->argv[1], 0);
920 ldap_pvt_thread_set_concurrency(c->value_int);
924 ldap_pvt_thread_pool_maxthreads(&connection_pool, c->value_int);
925 connection_pool_max = c->value_int; /* save for reference */
929 if ( passwd_salt ) ch_free( passwd_salt );
930 passwd_salt = c->value_string;
931 lutil_salt_format(passwd_salt);
935 if(limits_parse(c->be, c->fname, c->lineno, c->argc, c->argv))
941 c->be->be_restrictops |= SLAP_RESTRICT_OP_WRITES;
943 c->be->be_restrictops &= ~SLAP_RESTRICT_OP_WRITES;
947 ch_free(c->value_string);
948 if (slap_sasl_setpolicy( c->argv[1] )) {
949 Debug(LDAP_DEBUG_ANY, "%s: unable to parse value \"%s\" in"
950 " \"authz-policy <policy>\"\n",
951 c->log, c->argv[1], 0 );
957 if (slap_sasl_regexp_config( c->argv[1], c->argv[2] ))
961 #ifdef HAVE_CYRUS_SASL
964 char *txt = slap_sasl_secprops( c->argv[1] );
966 Debug(LDAP_DEBUG_ANY, "%s: sasl-secprops: %s\n",
975 c->be->be_max_deref_depth = c->value_int;
981 if(parse_oidm(c->fname, c->lineno, c->argc, c->argv, 1, &om))
983 if (!cfn->c_om_head) cfn->c_om_head = om;
991 if(parse_oc(c->fname, c->lineno, p, c->argv, &oc)) return(1);
992 if (!cfn->c_oc_head) cfn->c_oc_head = oc;
1000 if(parse_cr(c->fname, c->lineno, p, c->argv, &cr)) return(1);
1001 if (!cfn->c_cr_head) cfn->c_cr_head = cr;
1002 cfn->c_cr_tail = cr;
1009 if(parse_at(c->fname, c->lineno, p, c->argv, &at)) return(1);
1010 if (!cfn->c_at_head) cfn->c_at_head = at;
1011 cfn->c_at_tail = at;
1016 ad_define_option(NULL, NULL, 0);
1017 for(i = 1; i < c->argc; i++)
1018 if(ad_define_option(c->argv[i], c->fname, c->lineno))
1023 global_schemacheck = c->value_int;
1024 if(!global_schemacheck) Debug(LDAP_DEBUG_ANY, "%s: "
1025 "schema checking disabled! your mileage may vary!\n",
1030 parse_acl(c->be, c->fname, c->lineno, c->argc, c->argv);
1034 if(SLAP_MONITOR(c->be)) {
1035 Debug(LDAP_DEBUG_ANY, "%s: "
1036 "\"replogfile\" should not be used "
1037 "inside monitor database\n",
1039 return(0); /* FIXME: should this be an error? */
1042 c->be->be_replogfile = c->value_string;
1046 if(read_root_dse_file(c->argv[1])) {
1047 Debug(LDAP_DEBUG_ANY, "%s: "
1048 "could not read \"rootDSE <filename>\" line\n",
1054 ber_str2bv( c->argv[1], 0, 1, &bv );
1055 ber_bvarray_add( &cfn->c_dseFiles, &bv );
1061 if ( logfileName ) ch_free( logfileName );
1062 logfileName = c->value_string;
1063 logfile = fopen(logfileName, "w");
1064 if(logfile) lutil_debug_file(logfile);
1068 if(SLAP_NOLASTMODCMD(c->be)) {
1069 Debug(LDAP_DEBUG_ANY, "%s: "
1070 "lastmod not available for %s databases\n",
1071 c->log, c->be->bd_info->bi_type, 0);
1075 SLAP_DBFLAGS(c->be) &= ~SLAP_DBFLAG_NOLASTMOD;
1077 SLAP_DBFLAGS(c->be) |= SLAP_DBFLAG_NOLASTMOD;
1080 case CFG_SSTR_IF_MAX:
1081 if (c->value_int < index_substr_if_minlen) {
1082 Debug(LDAP_DEBUG_ANY, "%s: "
1083 "invalid max value (%d)\n",
1084 c->log, c->value_int, 0 );
1087 index_substr_if_maxlen = c->value_int;
1090 case CFG_SSTR_IF_MIN:
1091 if (c->value_int > index_substr_if_maxlen) {
1092 Debug(LDAP_DEBUG_ANY, "%s: "
1093 "invalid min value (%d)\n",
1094 c->log, c->value_int, 0 );
1097 index_substr_if_minlen = c->value_int;
1100 #ifdef SLAPD_MODULES
1102 if(module_load(c->argv[1], c->argc - 2, (c->argc > 2) ? c->argv + 2 : NULL))
1104 /* Record this load on the current path */
1107 char *ptr = c->line + STRLENOF("moduleload");
1108 while (!isspace(*ptr)) ptr++;
1109 while (isspace(*ptr)) ptr++;
1110 ber_str2bv(ptr, 0, 1, &bv);
1111 ber_bvarray_add( &modcur->mp_loads, &bv );
1116 if(module_path(c->argv[1])) return(1);
1117 /* Record which path was used with each module */
1121 if (!modpaths.mp_loads) {
1124 mp = ch_malloc( sizeof( ModPaths ));
1125 modlast->mp_next = mp;
1127 ber_str2bv(c->argv[1], 0, 1, &mp->mp_path);
1129 mp->mp_loads = NULL;
1131 if ( c->op == SLAP_CONFIG_ADD )
1140 if(slapi_int_read_config(c->be, c->fname, c->lineno, c->argc, c->argv) != LDAP_SUCCESS)
1142 slapi_plugins_used++;
1146 #ifdef SLAP_AUTH_REWRITE
1149 if(slap_sasl_rewrite_config(c->fname, c->lineno, c->argc, c->argv))
1151 ber_str2bv( c->line, 0, 1, &bv );
1152 ber_bvarray_add( &authz_rewrites, &bv );
1159 Debug(LDAP_DEBUG_ANY, "%s: unknown CFG_TYPE %d"
1160 "(ignored)\n", c->log, c->type, 0);
1168 config_fname(ConfigArgs *c) {
1169 if(c->op == SLAP_CONFIG_EMIT) {
1171 ConfigFile *cf = c->private;
1172 value_add_one( &c->rvalue_vals, &cf->c_file );
1181 config_cfdir(ConfigArgs *c) {
1182 if(c->op == SLAP_CONFIG_EMIT) {
1183 value_add_one( &c->rvalue_vals, &cfdir );
1190 config_search_base(ConfigArgs *c) {
1193 if(c->op == SLAP_CONFIG_EMIT) {
1195 if (!BER_BVISEMPTY(&default_search_base)) {
1196 value_add_one(&c->rvalue_vals, &default_search_base);
1197 value_add_one(&c->rvalue_nvals, &default_search_nbase);
1203 if(c->bi || c->be != frontendDB) {
1204 Debug(LDAP_DEBUG_ANY, "%s: defaultSearchBase line must appear "
1205 "prior to any backend or database definition\n",
1210 if(default_search_nbase.bv_len) {
1211 Debug(LDAP_DEBUG_ANY, "%s: "
1212 "default search base \"%s\" already defined "
1213 "(discarding old)\n",
1214 c->log, default_search_base.bv_val, 0);
1215 free(default_search_base.bv_val);
1216 free(default_search_nbase.bv_val);
1219 default_search_base = c->value_dn;
1220 default_search_nbase = c->value_ndn;
1225 config_passwd_hash(ConfigArgs *c) {
1227 if (c->op == SLAP_CONFIG_EMIT) {
1229 for (i=0; default_passwd_hash && default_passwd_hash[i]; i++) {
1230 ber_str2bv(default_passwd_hash[i], 0, 0, &bv);
1231 value_add_one(&c->rvalue_vals, &bv);
1235 if(default_passwd_hash) {
1236 Debug(LDAP_DEBUG_ANY, "%s: "
1237 "already set default password_hash\n",
1241 for(i = 1; i < c->argc; i++) {
1242 if(!lutil_passwd_scheme(c->argv[i])) {
1243 Debug(LDAP_DEBUG_ANY, "%s: "
1244 "password scheme \"%s\" not available\n",
1245 c->log, c->argv[i], 0);
1247 ldap_charray_add(&default_passwd_hash, c->argv[i]);
1249 if(!default_passwd_hash) {
1250 Debug(LDAP_DEBUG_ANY, "%s: no valid hashes found\n",
1259 config_schema_dn(ConfigArgs *c) {
1260 if ( c->op == SLAP_CONFIG_EMIT ) {
1262 if ( !BER_BVISEMPTY( &c->be->be_schemadn )) {
1263 value_add_one(&c->rvalue_vals, &c->be->be_schemadn);
1264 value_add_one(&c->rvalue_nvals, &c->be->be_schemandn);
1269 c->be->be_schemadn = c->value_dn;
1270 c->be->be_schemandn = c->value_ndn;
1275 config_sizelimit(ConfigArgs *c) {
1278 struct slap_limits_set *lim = &c->be->be_def_limit;
1279 if (c->op == SLAP_CONFIG_EMIT) {
1284 limits_unparse_one( lim, SLAP_LIMIT_SIZE, &bv );
1285 if ( !BER_BVISEMPTY( &bv ))
1286 value_add_one( &c->rvalue_vals, &bv );
1291 for(i = 1; i < c->argc; i++) {
1292 if(!strncasecmp(c->argv[i], "size", 4)) {
1293 rc = limits_parse_one(c->argv[i], lim);
1295 Debug(LDAP_DEBUG_ANY, "%s: "
1296 "unable to parse value \"%s\" in \"sizelimit <limit>\" line\n",
1297 c->log, c->argv[i], 0);
1301 if(!strcasecmp(c->argv[i], "unlimited")) {
1302 lim->lms_s_soft = -1;
1304 lim->lms_s_soft = strtol(c->argv[i], &next, 0);
1305 if(next == c->argv[i]) {
1306 Debug(LDAP_DEBUG_ANY, "%s: "
1307 "unable to parse limit \"%s\" in \"sizelimit <limit>\" line\n",
1308 c->log, c->argv[i], 0);
1310 } else if(next[0] != '\0') {
1311 Debug(LDAP_DEBUG_ANY, "%s: "
1312 "trailing chars \"%s\" in \"sizelimit <limit>\" line (ignored)\n",
1316 lim->lms_s_hard = 0;
1323 config_timelimit(ConfigArgs *c) {
1326 struct slap_limits_set *lim = &c->be->be_def_limit;
1327 if (c->op == SLAP_CONFIG_EMIT) {
1332 limits_unparse_one( lim, SLAP_LIMIT_TIME, &bv );
1333 if ( !BER_BVISEMPTY( &bv ))
1334 value_add_one( &c->rvalue_vals, &bv );
1339 for(i = 1; i < c->argc; i++) {
1340 if(!strncasecmp(c->argv[i], "time", 4)) {
1341 rc = limits_parse_one(c->argv[i], lim);
1343 Debug(LDAP_DEBUG_ANY, "%s: "
1344 "unable to parse value \"%s\" in \"timelimit <limit>\" line\n",
1345 c->log, c->argv[i], 0);
1349 if(!strcasecmp(c->argv[i], "unlimited")) {
1350 lim->lms_t_soft = -1;
1352 lim->lms_t_soft = strtol(c->argv[i], &next, 0);
1353 if(next == c->argv[i]) {
1354 Debug(LDAP_DEBUG_ANY, "%s: "
1355 "unable to parse limit \"%s\" in \"timelimit <limit>\" line\n",
1356 c->log, c->argv[i], 0);
1358 } else if(next[0] != '\0') {
1359 Debug(LDAP_DEBUG_ANY, "%s: "
1360 "trailing chars \"%s\" in \"timelimit <limit>\" line (ignored)\n",
1364 lim->lms_t_hard = 0;
1371 config_overlay(ConfigArgs *c) {
1372 if (c->op == SLAP_CONFIG_EMIT) {
1375 if(c->argv[1][0] == '-' && overlay_config(c->be, &c->argv[1][1])) {
1377 Debug(LDAP_DEBUG_ANY, "%s: (optional) %s overlay \"%s\" configuration failed (ignored)\n",
1378 c->log, c->be == frontendDB ? "global " : "", c->argv[1][1]);
1379 } else if(overlay_config(c->be, c->argv[1])) {
1386 config_suffix(ConfigArgs *c) {
1388 struct berval pdn, ndn;
1391 if (c->be == frontendDB || SLAP_MONITOR(c->be) ||
1392 SLAP_CONFIG(c->be)) return 1;
1394 if (c->op == SLAP_CONFIG_EMIT) {
1395 if (!BER_BVISNULL( &c->be->be_suffix[0] )) {
1396 value_add( &c->rvalue_vals, c->be->be_suffix );
1397 value_add( &c->rvalue_nvals, c->be->be_nsuffix );
1403 #ifdef SLAPD_MONITOR_DN
1404 if(!strcasecmp(c->argv[1], SLAPD_MONITOR_DN)) {
1405 Debug(LDAP_DEBUG_ANY, "%s: "
1406 "\"%s\" is reserved for monitoring slapd\n",
1407 c->log, SLAPD_MONITOR_DN, 0);
1414 tbe = select_backend(&ndn, 0, 0);
1416 Debug(LDAP_DEBUG_ANY, "%s: suffix already served by this backend! (ignored)\n",
1421 Debug(LDAP_DEBUG_ANY, "%s: suffix already served by a preceding backend \"%s\"\n",
1422 c->log, tbe->be_suffix[0].bv_val, 0);
1426 } else if(pdn.bv_len == 0 && default_search_nbase.bv_len) {
1427 Debug(LDAP_DEBUG_ANY, "%s: suffix DN empty and default search "
1428 "base provided \"%s\" (assuming okay)\n",
1429 c->log, default_search_base.bv_val, 0);
1431 ber_bvarray_add(&c->be->be_suffix, &pdn);
1432 ber_bvarray_add(&c->be->be_nsuffix, &ndn);
1437 config_rootdn(ConfigArgs *c) {
1438 if (c->op == SLAP_CONFIG_EMIT) {
1439 if ( !BER_BVISNULL( &c->be->be_rootdn )) {
1440 value_add_one(&c->rvalue_vals, &c->be->be_rootdn);
1441 value_add_one(&c->rvalue_nvals, &c->be->be_rootndn);
1447 c->be->be_rootdn = c->value_dn;
1448 c->be->be_rootndn = c->value_ndn;
1453 config_rootpw(ConfigArgs *c) {
1455 if (c->op == SLAP_CONFIG_EMIT) {
1456 if (!BER_BVISEMPTY(&c->be->be_rootpw)) {
1457 ber_dupbv( &c->value_bv, &c->be->be_rootpw);
1463 tbe = select_backend(&c->be->be_rootndn, 0, 0);
1465 Debug(LDAP_DEBUG_ANY, "%s: "
1466 "rootpw can only be set when rootdn is under suffix\n",
1470 c->be->be_rootpw = c->value_bv;
1475 config_restrict(ConfigArgs *c) {
1476 slap_mask_t restrictops = 0;
1478 slap_verbmasks restrictable_ops[] = {
1479 { BER_BVC("bind"), SLAP_RESTRICT_OP_BIND },
1480 { BER_BVC("add"), SLAP_RESTRICT_OP_ADD },
1481 { BER_BVC("modify"), SLAP_RESTRICT_OP_MODIFY },
1482 { BER_BVC("rename"), SLAP_RESTRICT_OP_RENAME },
1483 { BER_BVC("modrdn"), 0 },
1484 { BER_BVC("delete"), SLAP_RESTRICT_OP_DELETE },
1485 { BER_BVC("search"), SLAP_RESTRICT_OP_SEARCH },
1486 { BER_BVC("compare"), SLAP_RESTRICT_OP_COMPARE },
1487 { BER_BVC("read"), SLAP_RESTRICT_OP_READS },
1488 { BER_BVC("write"), SLAP_RESTRICT_OP_WRITES },
1489 { BER_BVC("extended"), SLAP_RESTRICT_OP_EXTENDED },
1490 { BER_BVC("extended=" LDAP_EXOP_START_TLS ), SLAP_RESTRICT_EXOP_START_TLS },
1491 { BER_BVC("extended=" LDAP_EXOP_MODIFY_PASSWD ), SLAP_RESTRICT_EXOP_MODIFY_PASSWD },
1492 { BER_BVC("extended=" LDAP_EXOP_X_WHO_AM_I ), SLAP_RESTRICT_EXOP_WHOAMI },
1493 { BER_BVC("extended=" LDAP_EXOP_X_CANCEL ), SLAP_RESTRICT_EXOP_CANCEL },
1497 if (c->op == SLAP_CONFIG_EMIT) {
1498 return mask_to_verbs( restrictable_ops, c->be->be_restrictops,
1501 i = verbs_to_mask( c->argc, c->argv, restrictable_ops, &restrictops );
1503 Debug(LDAP_DEBUG_ANY, "%s: "
1504 "unknown operation %s in \"restrict <features>\" line\n",
1505 c->log, c->argv[i], 0);
1508 if ( restrictops & SLAP_RESTRICT_OP_EXTENDED )
1509 restrictops &= ~SLAP_RESTRICT_EXOP_MASK;
1510 c->be->be_restrictops |= restrictops;
1515 config_allows(ConfigArgs *c) {
1516 slap_mask_t allows = 0;
1518 slap_verbmasks allowable_ops[] = {
1519 { BER_BVC("bind_v2"), SLAP_ALLOW_BIND_V2 },
1520 { BER_BVC("bind_anon_cred"), SLAP_ALLOW_BIND_ANON_CRED },
1521 { BER_BVC("bind_anon_dn"), SLAP_ALLOW_BIND_ANON_DN },
1522 { BER_BVC("update_anon"), SLAP_ALLOW_UPDATE_ANON },
1525 if (c->op == SLAP_CONFIG_EMIT) {
1526 return mask_to_verbs( allowable_ops, global_allows, &c->rvalue_vals );
1528 i = verbs_to_mask(c->argc, c->argv, allowable_ops, &allows);
1530 Debug(LDAP_DEBUG_ANY, "%s: "
1531 "unknown feature %s in \"allow <features>\" line\n",
1532 c->log, c->argv[i], 0);
1535 global_allows |= allows;
1540 config_disallows(ConfigArgs *c) {
1541 slap_mask_t disallows = 0;
1543 slap_verbmasks disallowable_ops[] = {
1544 { BER_BVC("bind_anon"), SLAP_DISALLOW_BIND_ANON },
1545 { BER_BVC("bind_simple"), SLAP_DISALLOW_BIND_SIMPLE },
1546 { BER_BVC("bind_krb4"), SLAP_DISALLOW_BIND_KRBV4 },
1547 { BER_BVC("tls_2_anon"), SLAP_DISALLOW_TLS_2_ANON },
1548 { BER_BVC("tls_authc"), SLAP_DISALLOW_TLS_AUTHC },
1551 if (c->op == SLAP_CONFIG_EMIT) {
1552 return mask_to_verbs( disallowable_ops, global_disallows, &c->rvalue_vals );
1554 i = verbs_to_mask(c->argc, c->argv, disallowable_ops, &disallows);
1556 Debug(LDAP_DEBUG_ANY, "%s: "
1557 "unknown feature %s in \"disallow <features>\" line\n",
1558 c->log, c->argv[i], 0);
1561 global_disallows |= disallows;
1566 config_requires(ConfigArgs *c) {
1567 slap_mask_t requires = 0;
1569 slap_verbmasks requires_ops[] = {
1570 { BER_BVC("bind"), SLAP_REQUIRE_BIND },
1571 { BER_BVC("LDAPv3"), SLAP_REQUIRE_LDAP_V3 },
1572 { BER_BVC("authc"), SLAP_REQUIRE_AUTHC },
1573 { BER_BVC("sasl"), SLAP_REQUIRE_SASL },
1574 { BER_BVC("strong"), SLAP_REQUIRE_STRONG },
1577 if (c->op == SLAP_CONFIG_EMIT) {
1578 return mask_to_verbs( requires_ops, c->be->be_requires, &c->rvalue_vals );
1580 i = verbs_to_mask(c->argc, c->argv, requires_ops, &requires);
1582 Debug(LDAP_DEBUG_ANY, "%s: "
1583 "unknown feature %s in \"require <features>\" line\n",
1584 c->log, c->argv[i], 0);
1587 c->be->be_requires = requires;
1592 config_loglevel(ConfigArgs *c) {
1595 slap_verbmasks loglevel_ops[] = {
1596 { BER_BVC("Trace"), LDAP_DEBUG_TRACE },
1597 { BER_BVC("Packets"), LDAP_DEBUG_PACKETS },
1598 { BER_BVC("Args"), LDAP_DEBUG_ARGS },
1599 { BER_BVC("Conns"), LDAP_DEBUG_CONNS },
1600 { BER_BVC("BER"), LDAP_DEBUG_BER },
1601 { BER_BVC("Filter"), LDAP_DEBUG_FILTER },
1602 { BER_BVC("Config"), LDAP_DEBUG_CONFIG },
1603 { BER_BVC("ACL"), LDAP_DEBUG_ACL },
1604 { BER_BVC("Stats"), LDAP_DEBUG_STATS },
1605 { BER_BVC("Stats2"), LDAP_DEBUG_STATS2 },
1606 { BER_BVC("Shell"), LDAP_DEBUG_SHELL },
1607 { BER_BVC("Parse"), LDAP_DEBUG_PARSE },
1608 { BER_BVC("Cache"), LDAP_DEBUG_CACHE },
1609 { BER_BVC("Index"), LDAP_DEBUG_INDEX },
1610 { BER_BVC("Any"), -1 },
1614 if (c->op == SLAP_CONFIG_EMIT) {
1615 return mask_to_verbs( loglevel_ops, ldap_syslog, &c->rvalue_vals );
1620 for( i=1; i < c->argc; i++ ) {
1623 if ( isdigit( c->argv[i][0] ) ) {
1624 level = strtol( c->argv[i], &next, 10 );
1625 if ( next == NULL || next[0] != '\0' ) {
1626 Debug( LDAP_DEBUG_ANY,
1627 "%s: unable to parse level \"%s\" "
1628 "in \"loglevel <level> [...]\" line.\n",
1629 c->log, c->argv[i], 0);
1633 int j = verb_to_mask(c->argv[i], loglevel_ops);
1634 if(BER_BVISNULL(&loglevel_ops[j].word)) {
1635 Debug( LDAP_DEBUG_ANY,
1636 "%s: unknown level \"%s\" "
1637 "in \"loglevel <level> [...]\" line.\n",
1638 c->log, c->argv[i], 0);
1641 level = loglevel_ops[j].mask;
1643 ldap_syslog |= level;
1649 config_syncrepl(ConfigArgs *c) {
1650 if (c->op == SLAP_CONFIG_EMIT) {
1651 if ( c->be->be_syncinfo ) {
1653 syncrepl_unparse( c->be->be_syncinfo, &bv );
1654 ber_bvarray_add( &c->rvalue_vals, &bv );
1659 if(SLAP_SHADOW(c->be)) {
1660 Debug(LDAP_DEBUG_ANY, "%s: "
1661 "syncrepl: database already shadowed.\n",
1664 } else if(add_syncrepl(c->be, c->argv, c->argc)) {
1667 SLAP_DBFLAGS(c->be) |= (SLAP_DBFLAG_SHADOW | SLAP_DBFLAG_SYNC_SHADOW);
1672 config_referral(ConfigArgs *c) {
1673 struct berval vals[2];
1674 if (c->op == SLAP_CONFIG_EMIT) {
1675 if ( default_referral ) {
1676 value_add( &c->rvalue_vals, default_referral );
1682 if(validate_global_referral(c->argv[1])) {
1683 Debug(LDAP_DEBUG_ANY, "%s: "
1684 "invalid URL (%s) in \"referral\" line.\n",
1685 c->log, c->argv[1], 0);
1689 ber_str2bv(c->argv[1], 0, 0, &vals[0]);
1690 vals[1].bv_val = NULL; vals[1].bv_len = 0;
1691 if(value_add(&default_referral, vals)) return(LDAP_OTHER);
1699 { BER_BVC("ssf="), offsetof(slap_ssf_set_t, sss_ssf) },
1700 { BER_BVC("transport="), offsetof(slap_ssf_set_t, sss_transport) },
1701 { BER_BVC("tls="), offsetof(slap_ssf_set_t, sss_tls) },
1702 { BER_BVC("sasl="), offsetof(slap_ssf_set_t, sss_sasl) },
1703 { BER_BVC("update_ssf="), offsetof(slap_ssf_set_t, sss_update_ssf) },
1704 { BER_BVC("update_transport="), offsetof(slap_ssf_set_t, sss_update_transport) },
1705 { BER_BVC("update_tls="), offsetof(slap_ssf_set_t, sss_update_tls) },
1706 { BER_BVC("update_sasl="), offsetof(slap_ssf_set_t, sss_update_sasl) },
1707 { BER_BVC("simple_bind="), offsetof(slap_ssf_set_t, sss_simple_bind) },
1712 config_security(ConfigArgs *c) {
1713 slap_ssf_set_t *set = &c->be->be_ssf_set;
1716 if (c->op == SLAP_CONFIG_EMIT) {
1722 for (i=0; !BER_BVISNULL( &sec_keys[i].key ); i++) {
1723 tgt = (slap_ssf_t *)((char *)set + sec_keys[i].off);
1726 bv.bv_len = sprintf( numbuf, "%u", *tgt );
1727 bv.bv_len += sec_keys[i].key.bv_len;
1728 bv.bv_val = ch_malloc( bv.bv_len + 1);
1729 next = lutil_strcopy( bv.bv_val, sec_keys[i].key.bv_val );
1730 strcpy( next, numbuf );
1731 ber_bvarray_add( &c->rvalue_vals, &bv );
1736 for(i = 1; i < c->argc; i++) {
1737 slap_ssf_t *tgt = NULL;
1739 for ( j=0; !BER_BVISNULL( &sec_keys[j].key ); j++ ) {
1740 if(!strncasecmp(c->argv[i], sec_keys[j].key.bv_val,
1741 sec_keys[j].key.bv_len)) {
1742 src = c->argv[i] + sec_keys[j].key.bv_len;
1743 tgt = (slap_ssf_t *)((char *)set + sec_keys[j].off);
1748 Debug(LDAP_DEBUG_ANY, "%s: "
1749 "unknown factor %s in \"security <factors>\" line\n",
1750 c->log, c->argv[i], 0);
1754 *tgt = strtol(src, &next, 10);
1755 if(next == NULL || next[0] != '\0' ) {
1756 Debug(LDAP_DEBUG_ANY, "%s: "
1757 "unable to parse factor \"%s\" in \"security <factors>\" line\n",
1758 c->log, c->argv[i], 0);
1766 anlist_unparse( AttributeName *an, char *ptr ) {
1769 for (; !BER_BVISNULL( &an->an_name ); an++) {
1770 if ( comma ) *ptr++ = ',';
1771 ptr = lutil_strcopy( ptr, an->an_name.bv_val );
1778 replica_unparse( struct slap_replica_info *ri, int i, struct berval *bv )
1782 struct berval bc = {0};
1785 len = sprintf(numbuf, IFMT, i );
1787 len += strlen( ri->ri_uri ) + STRLENOF("uri=");
1788 if ( ri->ri_nsuffix ) {
1789 for (i=0; !BER_BVISNULL( &ri->ri_nsuffix[i] ); i++) {
1790 len += ri->ri_nsuffix[i].bv_len + STRLENOF(" suffix=\"\"");
1793 if ( ri->ri_attrs ) {
1794 len += STRLENOF("attr");
1795 if ( ri->ri_exclude ) len++;
1796 for (i=0; !BER_BVISNULL( &ri->ri_attrs[i].an_name ); i++) {
1797 len += 1 + ri->ri_attrs[i].an_name.bv_len;
1800 bindconf_unparse( &ri->ri_bindconf, &bc );
1803 bv->bv_val = ch_malloc(len + 1);
1806 ptr = lutil_strcopy( bv->bv_val, numbuf );
1807 ptr = lutil_strcopy( ptr, "uri=" );
1808 ptr = lutil_strcopy( ptr, ri->ri_uri );
1810 if ( ri->ri_nsuffix ) {
1811 for (i=0; !BER_BVISNULL( &ri->ri_nsuffix[i] ); i++) {
1812 ptr = lutil_strcopy( ptr, " suffix=\"" );
1813 ptr = lutil_strcopy( ptr, ri->ri_nsuffix[i].bv_val );
1817 if ( ri->ri_attrs ) {
1818 ptr = lutil_strcopy( ptr, "attr" );
1819 if ( ri->ri_exclude ) *ptr++ = '!';
1821 ptr = anlist_unparse( ri->ri_attrs, ptr );
1824 strcpy( ptr, bc.bv_val );
1825 ch_free( bc.bv_val );
1830 config_replica(ConfigArgs *c) {
1831 int i, nr = -1, len;
1832 char *replicahost, *replicauri;
1835 if (c->op == SLAP_CONFIG_EMIT) {
1836 if (c->be->be_replica) {
1838 for (i=0;c->be->be_replica[i]; i++) {
1839 replica_unparse( c->be->be_replica[i], i, &bv );
1840 ber_bvarray_add( &c->rvalue_vals, &bv );
1846 if(SLAP_MONITOR(c->be)) {
1847 Debug(LDAP_DEBUG_ANY, "%s: "
1848 "\"replica\" should not be used inside monitor database\n",
1850 return(0); /* FIXME: should this be an error? */
1853 for(i = 1; i < c->argc; i++) {
1854 if(!strncasecmp(c->argv[i], "host=", STRLENOF("host="))) {
1855 replicahost = c->argv[i] + STRLENOF("host=");
1856 len = strlen( replicahost );
1857 replicauri = ch_malloc( len + STRLENOF("ldap://") + 1 );
1858 sprintf( replicauri, "ldap://%s", replicahost );
1859 replicahost = replicauri + STRLENOF( "ldap://");
1860 nr = add_replica_info(c->be, replicauri, replicahost);
1862 } else if(!strncasecmp(c->argv[i], "uri=", STRLENOF("uri="))) {
1863 if(ldap_url_parse(c->argv[i] + STRLENOF("uri="), &ludp) != LDAP_SUCCESS) {
1864 Debug(LDAP_DEBUG_ANY, "%s: "
1865 "replica line contains invalid "
1866 "uri definition.\n", c->log, 0, 0);
1869 if(!ludp->lud_host) {
1870 Debug(LDAP_DEBUG_ANY, "%s: "
1871 "replica line contains invalid "
1872 "uri definition - missing hostname.\n",
1876 ldap_free_urldesc(ludp);
1877 replicauri = c->argv[i] + STRLENOF("uri=");
1878 replicauri = ch_strdup( replicauri );
1879 replicahost = strchr( replicauri, '/' );
1881 nr = add_replica_info(c->be, replicauri, replicahost);
1886 Debug(LDAP_DEBUG_ANY, "%s: "
1887 "missing host or uri in \"replica\" line\n",
1890 } else if(nr == -1) {
1891 Debug(LDAP_DEBUG_ANY, "%s: "
1892 "unable to add replica \"%s\"\n",
1893 c->log, replicauri, 0);
1896 for(i = 1; i < c->argc; i++) {
1897 if(!strncasecmp(c->argv[i], "suffix=", STRLENOF( "suffix="))) {
1898 switch(add_replica_suffix(c->be, nr, c->argv[i] + STRLENOF("suffix="))) {
1900 Debug(LDAP_DEBUG_ANY, "%s: "
1901 "suffix \"%s\" in \"replica\" line is not valid for backend (ignored)\n",
1902 c->log, c->argv[i] + STRLENOF("suffix="), 0);
1905 Debug(LDAP_DEBUG_ANY, "%s: "
1906 "unable to normalize suffix in \"replica\" line (ignored)\n",
1911 } else if(!strncasecmp(c->argv[i], "attr", STRLENOF("attr"))) {
1913 char *arg = c->argv[i] + STRLENOF("attr");
1921 if(add_replica_attrs(c->be, nr, arg + 1, exclude)) {
1922 Debug(LDAP_DEBUG_ANY, "%s: "
1923 "attribute \"%s\" in \"replica\" line is unknown\n",
1924 c->log, arg + 1, 0);
1927 } else if ( bindconf_parse( c->argv[i],
1928 &c->be->be_replica[nr]->ri_bindconf ) ) {
1937 config_updatedn(ConfigArgs *c) {
1940 if (c->op == SLAP_CONFIG_EMIT) {
1941 if (!BER_BVISEMPTY(&c->be->be_update_ndn)) {
1942 value_add_one(&c->rvalue_vals, &c->be->be_update_ndn);
1943 value_add_one(&c->rvalue_nvals, &c->be->be_update_ndn);
1948 if(SLAP_SHADOW(c->be)) {
1949 Debug(LDAP_DEBUG_ANY, "%s: "
1950 "updatedn: database already shadowed.\n",
1955 ber_str2bv(c->argv[1], 0, 0, &dn);
1957 rc = dnNormalize(0, NULL, NULL, &dn, &c->be->be_update_ndn, NULL);
1959 if(rc != LDAP_SUCCESS) {
1960 Debug(LDAP_DEBUG_ANY, "%s: "
1961 "updatedn DN is invalid: %d (%s)\n",
1962 c->log, rc, ldap_err2string( rc ));
1966 SLAP_DBFLAGS(c->be) |= (SLAP_DBFLAG_SHADOW | SLAP_DBFLAG_SLURP_SHADOW);
1971 config_updateref(ConfigArgs *c) {
1972 struct berval vals[2];
1973 if (c->op == SLAP_CONFIG_EMIT) {
1974 if ( c->be->be_update_refs ) {
1975 value_add( &c->rvalue_vals, c->be->be_update_refs );
1981 if(!SLAP_SHADOW(c->be)) {
1982 Debug(LDAP_DEBUG_ANY, "%s: "
1983 "updateref line must come after syncrepl or updatedn.\n",
1988 if(validate_global_referral(c->argv[1])) {
1989 Debug(LDAP_DEBUG_ANY, "%s: "
1990 "invalid URL (%s) in \"updateref\" line.\n",
1991 c->log, c->argv[1], 0);
1994 ber_str2bv(c->argv[1], 0, 0, &vals[0]);
1995 vals[1].bv_val = NULL;
1996 if(value_add(&c->be->be_update_refs, vals)) return(LDAP_OTHER);
2001 config_include(ConfigArgs *c) {
2002 unsigned long savelineno = c->lineno;
2005 ConfigFile *cfsave = cfn;
2006 ConfigFile *cf2 = NULL;
2007 if (c->op == SLAP_CONFIG_EMIT) {
2010 cf = ch_calloc( 1, sizeof(ConfigFile));
2011 if ( cfn->c_kids ) {
2012 for (cf2=cfn->c_kids; cf2 && cf2->c_sibs; cf2=cf2->c_sibs) ;
2018 ber_str2bv( c->argv[1], 0, 1, &cf->c_file );
2019 rc = read_config_file(c->argv[1], c->depth + 1, c);
2020 c->lineno = savelineno - 1;
2023 if ( cf2 ) cf2->c_sibs = NULL;
2024 else cfn->c_kids = NULL;
2025 ch_free( cf->c_file.bv_val );
2033 config_tls_option(ConfigArgs *c) {
2036 case CFG_TLS_RAND: flag = LDAP_OPT_X_TLS_RANDOM_FILE; break;
2037 case CFG_TLS_CIPHER: flag = LDAP_OPT_X_TLS_CIPHER_SUITE; break;
2038 case CFG_TLS_CERT_FILE: flag = LDAP_OPT_X_TLS_CERTFILE; break;
2039 case CFG_TLS_CERT_KEY: flag = LDAP_OPT_X_TLS_KEYFILE; break;
2040 case CFG_TLS_CA_PATH: flag = LDAP_OPT_X_TLS_CACERTDIR; break;
2041 case CFG_TLS_CA_FILE: flag = LDAP_OPT_X_TLS_CACERTFILE; break;
2042 default: Debug(LDAP_DEBUG_ANY, "%s: "
2043 "unknown tls_option <%x>\n",
2044 c->log, c->type, 0);
2046 if (c->op == SLAP_CONFIG_EMIT) {
2047 return ldap_pvt_tls_get_option( NULL, flag, &c->value_string );
2049 ch_free(c->value_string);
2050 return(ldap_pvt_tls_set_option(NULL, flag, c->argv[1]));
2053 /* FIXME: this ought to be provided by libldap */
2055 config_tls_config(ConfigArgs *c) {
2057 slap_verbmasks crlkeys[] = {
2058 { BER_BVC("none"), LDAP_OPT_X_TLS_CRL_NONE },
2059 { BER_BVC("peer"), LDAP_OPT_X_TLS_CRL_PEER },
2060 { BER_BVC("all"), LDAP_OPT_X_TLS_CRL_ALL },
2063 slap_verbmasks vfykeys[] = {
2064 { BER_BVC("never"), LDAP_OPT_X_TLS_NEVER },
2065 { BER_BVC("demand"), LDAP_OPT_X_TLS_DEMAND },
2066 { BER_BVC("try"), LDAP_OPT_X_TLS_TRY },
2067 { BER_BVC("hard"), LDAP_OPT_X_TLS_HARD },
2071 #ifdef HAVE_OPENSSL_CRL
2072 case CFG_TLS_CRLCHECK: flag = LDAP_OPT_X_TLS_CRLCHECK; keys = crlkeys;
2075 case CFG_TLS_VERIFY: flag = LDAP_OPT_X_TLS_REQUIRE_CERT; keys = vfykeys;
2077 default: Debug(LDAP_DEBUG_ANY, "%s: "
2078 "unknown tls_option <%x>\n",
2079 c->log, c->type, 0);
2081 if (c->op == SLAP_CONFIG_EMIT) {
2082 ldap_pvt_tls_get_option( NULL, flag, &c->value_int );
2083 for (i=0; !BER_BVISNULL(&keys[i].word); i++) {
2084 if (keys[i].mask == c->value_int) {
2085 c->value_string = ch_strdup( keys[i].word.bv_val );
2091 ch_free( c->value_string );
2092 if(isdigit((unsigned char)c->argv[1][0])) {
2093 i = atoi(c->argv[1]);
2094 return(ldap_pvt_tls_set_option(NULL, flag, &i));
2096 return(ldap_int_tls_config(NULL, flag, c->argv[1]));
2111 si = (syncinfo_t *) ch_calloc( 1, sizeof( syncinfo_t ) );
2114 Debug( LDAP_DEBUG_ANY, "out of memory in add_syncrepl\n", 0, 0, 0 );
2118 si->si_bindconf.sb_tls = SB_TLS_OFF;
2119 si->si_bindconf.sb_method = LDAP_AUTH_SIMPLE;
2120 si->si_schemachecking = 0;
2121 ber_str2bv( "(objectclass=*)", STRLENOF("(objectclass=*)"), 1,
2122 &si->si_filterstr );
2123 si->si_base.bv_val = NULL;
2124 si->si_scope = LDAP_SCOPE_SUBTREE;
2125 si->si_attrsonly = 0;
2126 si->si_anlist = (AttributeName *) ch_calloc( 1, sizeof( AttributeName ));
2127 si->si_exanlist = (AttributeName *) ch_calloc( 1, sizeof( AttributeName ));
2128 si->si_attrs = NULL;
2129 si->si_allattrs = 0;
2130 si->si_allopattrs = 0;
2131 si->si_exattrs = NULL;
2132 si->si_type = LDAP_SYNC_REFRESH_ONLY;
2133 si->si_interval = 86400;
2134 si->si_retryinterval = NULL;
2135 si->si_retrynum_init = NULL;
2136 si->si_retrynum = NULL;
2137 si->si_manageDSAit = 0;
2141 si->si_presentlist = NULL;
2142 LDAP_LIST_INIT( &si->si_nonpresentlist );
2143 ldap_pvt_thread_mutex_init( &si->si_mutex );
2145 rc = parse_syncrepl_line( cargv, cargc, si );
2148 Debug( LDAP_DEBUG_ANY, "failed to add syncinfo\n", 0, 0, 0 );
2149 syncinfo_free( si );
2152 Debug( LDAP_DEBUG_CONFIG,
2153 "Config: ** successfully added syncrepl \"%s\"\n",
2154 BER_BVISNULL( &si->si_provideruri ) ?
2155 "(null)" : si->si_provideruri.bv_val, 0, 0 );
2156 if ( !si->si_schemachecking ) {
2157 SLAP_DBFLAGS(be) |= SLAP_DBFLAG_NO_SCHEMA_CHECK;
2160 be->be_syncinfo = si;
2165 /* NOTE: used & documented in slapd.conf(5) */
2167 #define PROVIDERSTR "provider"
2168 #define TYPESTR "type"
2169 #define INTERVALSTR "interval"
2170 #define SEARCHBASESTR "searchbase"
2171 #define FILTERSTR "filter"
2172 #define SCOPESTR "scope"
2173 #define ATTRSSTR "attrs"
2174 #define ATTRSONLYSTR "attrsonly"
2175 #define SLIMITSTR "sizelimit"
2176 #define TLIMITSTR "timelimit"
2177 #define SCHEMASTR "schemachecking"
2179 /* FIXME: undocumented */
2180 #define OLDAUTHCSTR "bindprincipal"
2181 #define EXATTRSSTR "exattrs"
2182 #define RETRYSTR "retry"
2185 #define LASTMODSTR "lastmod"
2186 #define LMGENSTR "gen"
2187 #define LMNOSTR "no"
2188 #define LMREQSTR "req"
2189 #define SRVTABSTR "srvtab"
2190 #define SUFFIXSTR "suffix"
2191 #define MANAGEDSAITSTR "manageDSAit"
2194 #define GOT_ID 0x0001
2195 #define GOT_PROVIDER 0x0002
2198 #define GOT_ALL (GOT_ID|GOT_PROVIDER)
2204 { BER_BVC("base"), LDAP_SCOPE_BASE },
2205 { BER_BVC("one"), LDAP_SCOPE_ONELEVEL },
2206 #ifdef LDAP_SCOPE_SUBORDINATE
2207 { BER_BVC("children"), LDAP_SCOPE_SUBORDINATE },
2208 { BER_BVC("subordinate"), 0 },
2210 { BER_BVC("sub"), LDAP_SCOPE_SUBTREE },
2215 parse_syncrepl_line(
2225 for ( i = 1; i < cargc; i++ ) {
2226 if ( !strncasecmp( cargv[ i ], IDSTR "=",
2227 STRLENOF( IDSTR "=" ) ) )
2230 /* '\0' string terminator accounts for '=' */
2231 val = cargv[ i ] + STRLENOF( IDSTR "=" );
2233 if ( tmp >= 1000 || tmp < 0 ) {
2234 fprintf( stderr, "Error: parse_syncrepl_line: "
2235 "syncrepl id %d is out of range [0..999]\n", tmp );
2240 } else if ( !strncasecmp( cargv[ i ], PROVIDERSTR "=",
2241 STRLENOF( PROVIDERSTR "=" ) ) )
2243 val = cargv[ i ] + STRLENOF( PROVIDERSTR "=" );
2244 ber_str2bv( val, 0, 1, &si->si_provideruri );
2245 gots |= GOT_PROVIDER;
2246 } else if ( !strncasecmp( cargv[ i ], SCHEMASTR "=",
2247 STRLENOF( SCHEMASTR "=" ) ) )
2249 val = cargv[ i ] + STRLENOF( SCHEMASTR "=" );
2250 if ( !strncasecmp( val, "on", STRLENOF( "on" ) )) {
2251 si->si_schemachecking = 1;
2252 } else if ( !strncasecmp( val, "off", STRLENOF( "off" ) ) ) {
2253 si->si_schemachecking = 0;
2255 si->si_schemachecking = 1;
2257 } else if ( !strncasecmp( cargv[ i ], FILTERSTR "=",
2258 STRLENOF( FILTERSTR "=" ) ) )
2260 val = cargv[ i ] + STRLENOF( FILTERSTR "=" );
2261 ber_str2bv( val, 0, 1, &si->si_filterstr );
2262 } else if ( !strncasecmp( cargv[ i ], SEARCHBASESTR "=",
2263 STRLENOF( SEARCHBASESTR "=" ) ) )
2268 val = cargv[ i ] + STRLENOF( SEARCHBASESTR "=" );
2269 if ( si->si_base.bv_val ) {
2270 ch_free( si->si_base.bv_val );
2272 ber_str2bv( val, 0, 0, &bv );
2273 rc = dnNormalize( 0, NULL, NULL, &bv, &si->si_base, NULL );
2274 if ( rc != LDAP_SUCCESS ) {
2275 fprintf( stderr, "Invalid base DN \"%s\": %d (%s)\n",
2276 val, rc, ldap_err2string( rc ) );
2279 } else if ( !strncasecmp( cargv[ i ], SCOPESTR "=",
2280 STRLENOF( SCOPESTR "=" ) ) )
2283 val = cargv[ i ] + STRLENOF( SCOPESTR "=" );
2284 for ( j=0; !BER_BVISNULL(&scopes[j].key); j++ ) {
2285 if (!strncasecmp( val, scopes[j].key.bv_val,
2286 scopes[j].key.bv_len )) {
2287 while (!scopes[j].val) j--;
2288 si->si_scope = scopes[j].val;
2292 if ( BER_BVISNULL(&scopes[j].key) ) {
2293 fprintf( stderr, "Error: parse_syncrepl_line: "
2294 "unknown scope \"%s\"\n", val);
2297 } else if ( !strncasecmp( cargv[ i ], ATTRSONLYSTR "=",
2298 STRLENOF( ATTRSONLYSTR "=" ) ) )
2300 si->si_attrsonly = 1;
2301 } else if ( !strncasecmp( cargv[ i ], ATTRSSTR "=",
2302 STRLENOF( ATTRSSTR "=" ) ) )
2304 val = cargv[ i ] + STRLENOF( ATTRSSTR "=" );
2305 if ( !strncasecmp( val, ":include:", STRLENOF(":include:") ) ) {
2307 attr_fname = ch_strdup( val + STRLENOF(":include:") );
2308 si->si_anlist = file2anlist( si->si_anlist, attr_fname, " ,\t" );
2309 if ( si->si_anlist == NULL ) {
2310 ch_free( attr_fname );
2313 si->si_anfile = attr_fname;
2315 char *str, *s, *next;
2316 char delimstr[] = " ,\t";
2317 str = ch_strdup( val );
2318 for ( s = ldap_pvt_strtok( str, delimstr, &next );
2320 s = ldap_pvt_strtok( NULL, delimstr, &next ) )
2322 if ( strlen(s) == 1 && *s == '*' ) {
2323 si->si_allattrs = 1;
2324 *(val + ( s - str )) = delimstr[0];
2326 if ( strlen(s) == 1 && *s == '+' ) {
2327 si->si_allopattrs = 1;
2328 *(val + ( s - str )) = delimstr[0];
2332 si->si_anlist = str2anlist( si->si_anlist, val, " ,\t" );
2333 if ( si->si_anlist == NULL ) {
2337 } else if ( !strncasecmp( cargv[ i ], EXATTRSSTR "=",
2338 STRLENOF( EXATTRSSTR "=" ) ) )
2340 val = cargv[ i ] + STRLENOF( EXATTRSSTR "=" );
2341 if ( !strncasecmp( val, ":include:", STRLENOF(":include:") )) {
2343 attr_fname = ch_strdup( val + STRLENOF(":include:") );
2344 si->si_exanlist = file2anlist(
2345 si->si_exanlist, attr_fname, " ,\t" );
2346 if ( si->si_exanlist == NULL ) {
2347 ch_free( attr_fname );
2350 ch_free( attr_fname );
2352 si->si_exanlist = str2anlist( si->si_exanlist, val, " ,\t" );
2353 if ( si->si_exanlist == NULL ) {
2357 } else if ( !strncasecmp( cargv[ i ], TYPESTR "=",
2358 STRLENOF( TYPESTR "=" ) ) )
2360 val = cargv[ i ] + STRLENOF( TYPESTR "=" );
2361 if ( !strncasecmp( val, "refreshOnly",
2362 STRLENOF("refreshOnly") ))
2364 si->si_type = LDAP_SYNC_REFRESH_ONLY;
2365 } else if ( !strncasecmp( val, "refreshAndPersist",
2366 STRLENOF("refreshAndPersist") ))
2368 si->si_type = LDAP_SYNC_REFRESH_AND_PERSIST;
2369 si->si_interval = 60;
2371 fprintf( stderr, "Error: parse_syncrepl_line: "
2372 "unknown sync type \"%s\"\n", val);
2375 } else if ( !strncasecmp( cargv[ i ], INTERVALSTR "=",
2376 STRLENOF( INTERVALSTR "=" ) ) )
2378 val = cargv[ i ] + STRLENOF( INTERVALSTR "=" );
2379 if ( si->si_type == LDAP_SYNC_REFRESH_AND_PERSIST ) {
2380 si->si_interval = 0;
2388 hstr = strchr( dstr, ':' );
2389 if ( hstr == NULL ) {
2390 fprintf( stderr, "Error: parse_syncrepl_line: "
2391 "invalid interval \"%s\"\n", val );
2395 mstr = strchr( hstr, ':' );
2396 if ( mstr == NULL ) {
2397 fprintf( stderr, "Error: parse_syncrepl_line: "
2398 "invalid interval \"%s\"\n", val );
2402 sstr = strchr( mstr, ':' );
2403 if ( sstr == NULL ) {
2404 fprintf( stderr, "Error: parse_syncrepl_line: "
2405 "invalid interval \"%s\"\n", val );
2414 if (( hh > 24 ) || ( hh < 0 ) ||
2415 ( mm > 60 ) || ( mm < 0 ) ||
2416 ( ss > 60 ) || ( ss < 0 ) || ( dd < 0 )) {
2417 fprintf( stderr, "Error: parse_syncrepl_line: "
2418 "invalid interval \"%s\"\n", val );
2421 si->si_interval = (( dd * 24 + hh ) * 60 + mm ) * 60 + ss;
2423 if ( si->si_interval < 0 ) {
2424 fprintf( stderr, "Error: parse_syncrepl_line: "
2425 "invalid interval \"%ld\"\n",
2426 (long) si->si_interval);
2429 } else if ( !strncasecmp( cargv[ i ], RETRYSTR "=",
2430 STRLENOF( RETRYSTR "=" ) ) )
2435 val = cargv[ i ] + STRLENOF( RETRYSTR "=" );
2436 retry_list = (char **) ch_calloc( 1, sizeof( char * ));
2437 retry_list[0] = NULL;
2439 slap_str2clist( &retry_list, val, " ,\t" );
2441 for ( k = 0; retry_list && retry_list[k]; k++ ) ;
2445 "Error: incomplete syncrepl retry list\n" );
2446 for ( k = 0; retry_list && retry_list[k]; k++ ) {
2447 ch_free( retry_list[k] );
2449 ch_free( retry_list );
2450 exit( EXIT_FAILURE );
2452 si->si_retryinterval = (time_t *) ch_calloc( n + 1, sizeof( time_t ));
2453 si->si_retrynum = (int *) ch_calloc( n + 1, sizeof( int ));
2454 si->si_retrynum_init = (int *) ch_calloc( n + 1, sizeof( int ));
2455 for ( j = 0; j < n; j++ ) {
2456 si->si_retryinterval[j] = atoi( retry_list[j*2] );
2457 if ( *retry_list[j*2+1] == '+' ) {
2458 si->si_retrynum_init[j] = -1;
2459 si->si_retrynum[j] = -1;
2463 si->si_retrynum_init[j] = atoi( retry_list[j*2+1] );
2464 si->si_retrynum[j] = atoi( retry_list[j*2+1] );
2467 si->si_retrynum_init[j] = -2;
2468 si->si_retrynum[j] = -2;
2469 si->si_retryinterval[j] = 0;
2471 for ( k = 0; retry_list && retry_list[k]; k++ ) {
2472 ch_free( retry_list[k] );
2474 ch_free( retry_list );
2475 } else if ( !strncasecmp( cargv[ i ], MANAGEDSAITSTR "=",
2476 STRLENOF( MANAGEDSAITSTR "=" ) ) )
2478 val = cargv[ i ] + STRLENOF( MANAGEDSAITSTR "=" );
2479 si->si_manageDSAit = atoi( val );
2480 } else if ( !strncasecmp( cargv[ i ], SLIMITSTR "=",
2481 STRLENOF( SLIMITSTR "=") ) )
2483 val = cargv[ i ] + STRLENOF( SLIMITSTR "=" );
2484 si->si_slimit = atoi( val );
2485 } else if ( !strncasecmp( cargv[ i ], TLIMITSTR "=",
2486 STRLENOF( TLIMITSTR "=" ) ) )
2488 val = cargv[ i ] + STRLENOF( TLIMITSTR "=" );
2489 si->si_tlimit = atoi( val );
2490 } else if ( bindconf_parse( cargv[i], &si->si_bindconf )) {
2491 fprintf( stderr, "Error: parse_syncrepl_line: "
2492 "unknown keyword \"%s\"\n", cargv[ i ] );
2497 if ( gots != GOT_ALL ) {
2499 "Error: Malformed \"syncrepl\" line in slapd config file" );
2507 syncrepl_unparse( syncinfo_t *si, struct berval *bv )
2510 char buf[BUFSIZ*2], *ptr;
2513 bindconf_unparse( &si->si_bindconf, &bc );
2515 ptr += sprintf( ptr, IDSTR "=%03d " PROVIDERSTR "=%s",
2516 si->si_rid, si->si_provideruri.bv_val );
2517 if ( !BER_BVISNULL( &bc )) {
2518 ptr = lutil_strcopy( ptr, bc.bv_val );
2521 if ( !BER_BVISEMPTY( &si->si_filterstr )) {
2522 ptr = lutil_strcopy( ptr, " " FILTERSTR "=\"" );
2523 ptr = lutil_strcopy( ptr, si->si_filterstr.bv_val );
2526 if ( !BER_BVISNULL( &si->si_base )) {
2527 ptr = lutil_strcopy( ptr, " " SEARCHBASESTR "=\"" );
2528 ptr = lutil_strcopy( ptr, si->si_base.bv_val );
2531 for (i=0; !BER_BVISNULL(&scopes[i].key);i++) {
2532 if ( si->si_scope == scopes[i].val ) {
2533 ptr = lutil_strcopy( ptr, " " SCOPESTR "=" );
2534 ptr = lutil_strcopy( ptr, scopes[i].key.bv_val );
2538 if ( si->si_attrsonly ) {
2539 ptr = lutil_strcopy( ptr, " " ATTRSONLYSTR "=yes" );
2541 if ( si->si_anfile ) {
2542 ptr = lutil_strcopy( ptr, " " ATTRSSTR "=:include:" );
2543 ptr = lutil_strcopy( ptr, si->si_anfile );
2544 } else if ( si->si_allattrs || si->si_allopattrs ||
2545 ( si->si_anlist && !BER_BVISNULL(&si->si_anlist[0].an_name) )) {
2547 ptr = lutil_strcopy( ptr, " " ATTRSSTR "=\"" );
2549 ptr = anlist_unparse( si->si_anlist, ptr );
2550 if ( si->si_allattrs ) {
2551 if ( old != ptr ) *ptr++ = ',';
2554 if ( si->si_allopattrs ) {
2555 if ( old != ptr ) *ptr++ = ',';
2560 if ( si->si_exanlist && !BER_BVISNULL(&si->si_exanlist[0].an_name) ) {
2561 ptr = lutil_strcopy( ptr, " " EXATTRSSTR "=" );
2562 ptr = anlist_unparse( si->si_exanlist, ptr );
2564 ptr = lutil_strcopy( ptr, " " SCHEMASTR "=" );
2565 ptr = lutil_strcopy( ptr, si->si_schemachecking ? "on" : "off" );
2567 ptr = lutil_strcopy( ptr, " " TYPESTR "=" );
2568 ptr = lutil_strcopy( ptr, si->si_type == LDAP_SYNC_REFRESH_AND_PERSIST ?
2569 "refreshAndPersist" : "refreshOnly" );
2571 if ( si->si_type == LDAP_SYNC_REFRESH_ONLY ) {
2574 dd = si->si_interval;
2581 ptr = lutil_strcopy( ptr, " " INTERVALSTR "=" );
2582 ptr += sprintf( ptr, "%02d:%02d:%02d:%02d", dd, hh, mm, ss );
2583 } else if ( si->si_retryinterval ) {
2585 ptr = lutil_strcopy( ptr, " " RETRYSTR "=\"" );
2586 for (i=0; si->si_retryinterval[i]; i++) {
2587 if ( space ) *ptr++ = ' ';
2589 ptr += sprintf( ptr, "%d", si->si_retryinterval[i] );
2590 if ( si->si_retrynum_init[i] == -1 )
2593 ptr += sprintf( ptr, "%d", si->si_retrynum_init );
2598 #if 0 /* FIXME: unused in syncrepl.c, should remove it */
2599 ptr = lutil_strcopy( ptr, " " MANAGEDSAITSTR "=" );
2600 ptr += sprintf( ptr, "%d", si->si_manageDSAit );
2603 if ( si->si_slimit ) {
2604 ptr = lutil_strcopy( ptr, " " SLIMITSTR "=" );
2605 ptr += sprintf( ptr, "%d", si->si_slimit );
2608 if ( si->si_tlimit ) {
2609 ptr = lutil_strcopy( ptr, " " TLIMITSTR "=" );
2610 ptr += sprintf( ptr, "%d", si->si_tlimit );
2612 bc.bv_len = ptr - buf;
2614 ber_dupbv( bv, &bc );
2617 static CfEntryInfo *
2618 config_find_base( CfEntryInfo *root, struct berval *dn, CfEntryInfo **last )
2628 if ( dn_match( &root->ce_entry->e_nname, dn ))
2631 c = dn->bv_val+dn->bv_len;
2632 for (;*c != ',';c--);
2636 for (--c;c>dn->bv_val && *c != ',';c--);
2640 cdn.bv_len = dn->bv_len - (cdn.bv_val - dn->bv_val);
2642 root = root->ce_kids;
2644 for (;root;root=root->ce_sibs) {
2645 if ( dn_match( &root->ce_entry->e_nname, &cdn )) {
2646 if ( cdn.bv_val == dn->bv_val ) {
2657 config_ldif_resp( Operation *op, SlapReply *rs )
2659 if ( rs->sr_type == REP_SEARCH ) {
2660 CfBackInfo *cfb = op->o_callback->sc_private;
2662 cfb->cb_got_ldif = 1;
2663 rs->sr_err = config_add_internal( cfb, rs->sr_entry, NULL, NULL );
2668 /* Configure and read the underlying back-ldif store */
2670 config_setup_ldif( BackendDB *be, const char *dir ) {
2671 CfBackInfo *cfb = be->be_private;
2676 slap_callback cb = { NULL, config_ldif_resp, NULL, NULL };
2677 Connection conn = {0};
2678 char opbuf[OPERATION_BUFFER_SIZE];
2680 SlapReply rs = {REP_RESULT};
2681 Filter filter = { LDAP_FILTER_PRESENT };
2682 struct berval filterstr = BER_BVC("(objectclass=*)");
2684 cfb->cb_db.bd_info = backend_info( "ldif" );
2685 if ( !cfb->cb_db.bd_info )
2686 return 0; /* FIXME: eventually this will be a fatal error */
2688 if ( cfb->cb_db.bd_info->bi_db_init( &cfb->cb_db )) return 1;
2690 /* Mark that back-ldif type is in use */
2691 cfb->cb_db.bd_info->bi_nDB++;
2693 cfb->cb_db.be_suffix = be->be_suffix;
2694 cfb->cb_db.be_nsuffix = be->be_nsuffix;
2695 cfb->cb_db.be_rootdn = be->be_rootdn;
2696 cfb->cb_db.be_rootndn = be->be_rootndn;
2698 ber_str2bv( dir, 0, 1, &cfdir );
2703 argv[0] = "directory";
2704 argv[1] = (char *)dir;
2708 ct = config_find_keyword( c.be->be_cf_table, &c );
2712 if ( config_add_vals( ct, &c ))
2715 if ( backend_startup_one( &cfb->cb_db ))
2718 op = (Operation *)opbuf;
2719 connection_fake_init( &conn, op, cfb );
2721 filter.f_desc = slap_schema.si_ad_objectClass;
2723 op->o_tag = LDAP_REQ_SEARCH;
2725 op->ors_filter = &filter;
2726 op->ors_filterstr = filterstr;
2727 op->ors_scope = LDAP_SCOPE_SUBTREE;
2729 op->o_dn = be->be_rootdn;
2730 op->o_ndn = be->be_rootndn;
2732 op->o_req_dn = be->be_suffix[0];
2733 op->o_req_ndn = be->be_nsuffix[0];
2735 op->ors_tlimit = SLAP_NO_LIMIT;
2736 op->ors_slimit = SLAP_NO_LIMIT;
2738 op->ors_attrs = slap_anlist_all_attributes;
2739 op->ors_attrsonly = 0;
2741 op->o_callback = &cb;
2742 cb.sc_private = cfb;
2744 op->o_bd = &cfb->cb_db;
2745 op->o_bd->be_search( op, &rs );
2751 CfOcInfo_cmp( const void *c1, const void *c2 ) {
2752 const CfOcInfo *co1 = c1;
2753 const CfOcInfo *co2 = c2;
2755 return ber_bvcmp( co1->co_name, co2->co_name );
2759 config_register_schema(ConfigTable *ct, ConfigOCs *ocs) {
2763 i = init_config_attrs( ct );
2766 /* set up the objectclasses */
2767 i = init_config_ocs( ocs );
2770 for (i=0; ocs[i].def; i++) {
2772 co = ch_malloc( sizeof(CfOcInfo) );
2773 co->co_name = &(*ocs[i].oc)->soc_cname;
2775 co->co_type = ocs[i].cft;
2776 avl_insert( &CfOcTree, co, CfOcInfo_cmp, avl_dup_error );
2783 read_config(const char *fname, const char *dir) {
2787 /* Setup the config backend */
2788 be = backend_db_init( "config" );
2792 cfb = be->be_private;
2794 /* Setup the underlying back-ldif backend */
2795 if ( config_setup_ldif( be, dir ))
2798 #ifdef SLAP_USE_CONFDIR
2799 /* If we read the config from back-ldif, nothing to do here */
2800 if ( cfb->cb_got_ldif )
2803 ber_str2bv( fname, 0, 1, &cf_prv.c_file );
2805 return read_config_file(fname, 0, NULL);
2809 config_back_bind( Operation *op, SlapReply *rs )
2811 if ( op->orb_method == LDAP_AUTH_SIMPLE && be_isroot_pw( op )) {
2812 ber_dupbv( &op->orb_edn, be_root_dn( op->o_bd ));
2813 /* frontend sends result */
2814 return LDAP_SUCCESS;
2817 rs->sr_err = LDAP_INVALID_CREDENTIALS;
2818 send_ldap_result( op, rs );
2824 config_send( Operation *op, SlapReply *rs, CfEntryInfo *ce, int depth )
2828 if ( test_filter( op, ce->ce_entry, op->ors_filter ) == LDAP_COMPARE_TRUE )
2830 rs->sr_attrs = op->ors_attrs;
2831 rs->sr_entry = ce->ce_entry;
2832 rc = send_search_entry( op, rs );
2834 if ( op->ors_scope == LDAP_SCOPE_SUBTREE ) {
2835 if ( ce->ce_kids ) {
2836 rc = config_send( op, rs, ce->ce_kids, 1 );
2837 if ( rc ) return rc;
2840 for (ce=ce->ce_sibs; ce; ce=ce->ce_sibs) {
2841 rc = config_send( op, rs, ce, 0 );
2849 static ConfigTable *
2850 config_find_table( CfOcInfo *co, AttributeDescription *ad )
2854 for (i=0; co->co_table[i].name; i++)
2855 if ( co->co_table[i].ad == ad )
2856 return &co->co_table[i];
2860 /* Sort the values in an X-ORDERED attribute.
2861 * If the values have no index, leave them in their given order.
2862 * If the values have indexes, sort them and then strip the index.
2863 * If some are indexed and some are not, return Error.
2865 * FIXME: This function probably belongs in the frontend somewhere,
2866 * like slap_mods_check.
2869 sort_vals( Attribute *a )
2872 int index = 0, noindex = 0;
2874 /* count attrs, look for index */
2875 for (i=0; a->a_vals[i].bv_val; i++) {
2876 if ( a->a_vals[i].bv_val[0] == '{' ) {
2879 ptr = strchr( a->a_vals[i].bv_val, '}' );
2880 if ( !ptr || !ptr[1] )
2881 return LDAP_INVALID_SYNTAX;
2883 return LDAP_INVALID_SYNTAX;
2887 return LDAP_INVALID_SYNTAX;
2892 int vals = i, *indexes, j, idx;
2893 struct berval tmp, ntmp;
2897 /* Strip index from normalized values */
2898 if ( !a->a_nvals || a->a_vals == a->a_nvals ) {
2899 a->a_nvals = ch_malloc( (vals+1)*sizeof(struct berval));
2900 BER_BVZERO(a->a_nvals+vals);
2901 for ( i=0; i<vals; i++ ) {
2902 ptr = strchr(a->a_vals[i].bv_val, '}') + 1;
2903 a->a_nvals[i].bv_len = a->a_vals[i].bv_len -
2904 (ptr - a->a_vals[i].bv_val);
2905 a->a_nvals[i].bv_val = ch_malloc( a->a_nvals[i].bv_len + 1);
2906 strcpy(a->a_nvals[i].bv_val, ptr );
2909 for ( i=0; i<vals; i++ ) {
2910 ptr = strchr(a->a_nvals[i].bv_val, '}') + 1;
2911 a->a_nvals[i].bv_len -= ptr - a->a_nvals[i].bv_val;
2912 strcpy(a->a_nvals[i].bv_val, ptr);
2917 indexes = ch_malloc( vals * sizeof(int) );
2918 for ( i=0; i<vals; i++)
2919 indexes[i] = atoi(a->a_vals[i].bv_val+1);
2921 /* Insertion sort */
2922 for ( i=1; i<vals; i++ ) {
2925 ntmp = a->a_nvals[i];
2927 while ((j > 0) && (indexes[j-1] > idx)) {
2928 indexes[j] = indexes[j-1];
2929 a->a_vals[j] = a->a_vals[j-1];
2930 a->a_nvals[j] = a->a_nvals[j-1];
2935 a->a_nvals[j] = ntmp;
2942 check_attr( ConfigTable *ct, ConfigArgs *ca, Attribute *a )
2944 int i, rc = 0, sort = 0;
2946 if ( a->a_desc->ad_type->sat_flags & SLAP_AT_ORDERED ) {
2948 rc = sort_vals( a );
2952 for ( i=0; a->a_nvals[i].bv_val; i++ ) {
2953 ca->line = a->a_nvals[i].bv_val;
2954 if ( sort ) ca->line = strchr( ca->line, '}' ) + 1;
2955 rc = config_parse_vals( ct, ca, i );
2963 check_name_index( CfEntryInfo *parent, ConfigType ce_type, Entry *e,
2964 SlapReply *rs, int *renum )
2967 int index = -1, gotindex = 0, nsibs;
2968 int renumber = 0, tailindex = 0;
2972 if ( renum ) *renum = 0;
2974 /* These entries don't get indexed/renumbered */
2975 if ( ce_type == Cft_Global ) return 0;
2976 if ( ce_type == Cft_Schema && parent->ce_type == Cft_Global ) return 0;
2978 if ( ce_type == Cft_Include || ce_type == Cft_Module )
2981 /* See if the rdn has an index already */
2982 dnRdn( &e->e_name, &rdn );
2983 ptr1 = strchr( e->e_name.bv_val, '{' );
2984 if ( ptr1 && ptr1 - e->e_name.bv_val < rdn.bv_len ) {
2985 ptr2 = strchr( ptr1, '}' );
2986 if (!ptr2 || ptr2 - e->e_name.bv_val > rdn.bv_len)
2987 return LDAP_NAMING_VIOLATION;
2988 if ( ptr2-ptr1 == 1)
2989 return LDAP_NAMING_VIOLATION;
2991 index = atoi(ptr1+1);
2993 return LDAP_NAMING_VIOLATION;
2996 /* count related kids */
2997 for (nsibs=0, ce=parent->ce_kids; ce; ce=ce->ce_sibs) {
2998 if ( ce->ce_type == ce_type ) nsibs++;
3001 if ( index != nsibs ) {
3003 if ( index < nsibs ) {
3004 if ( tailindex ) return LDAP_NAMING_VIOLATION;
3005 /* Siblings need to be renumbered */
3010 struct berval ival, newrdn, nnewrdn;
3011 struct berval rtype, rval;
3013 AttributeDescription *ad = NULL;
3017 rval.bv_val = strchr(rdn.bv_val, '=' ) + 1;
3018 rval.bv_len = rdn.bv_len - (rval.bv_val - rdn.bv_val);
3019 rtype.bv_val = rdn.bv_val;
3020 rtype.bv_len = rval.bv_val - rtype.bv_val - 1;
3023 slap_bv2ad( &rtype, &ad, &text );
3024 a = attr_find( e->e_attrs, ad );
3025 if (!a ) return LDAP_NAMING_VIOLATION;
3028 ival.bv_len = sprintf( ibuf, IFMT, nsibs );
3030 newrdn.bv_len = rdn.bv_len + ival.bv_len;
3031 newrdn.bv_val = ch_malloc( newrdn.bv_len+1 );
3034 ptr1 = lutil_strncopy( newrdn.bv_val, rdn.bv_val, rdn.bv_len );
3035 ptr1 = lutil_strcopy( ptr1, ival.bv_val );
3042 xlen = rdn.bv_len - (ptr2 - rdn.bv_val);
3044 ptr1 = lutil_strncopy( newrdn.bv_val, rtype.bv_val,
3047 ptr1 = lutil_strcopy( ptr1, ival.bv_val );
3048 ptr1 = lutil_strncopy( ptr1, ptr2, xlen );
3052 /* Do the equivalent of ModRDN */
3053 /* Replace DN / NDN */
3054 newrdn.bv_len = ptr1 - newrdn.bv_val;
3055 rdnNormalize( 0, NULL, NULL, &newrdn, &nnewrdn, NULL );
3056 free( e->e_name.bv_val );
3057 build_new_dn( &e->e_name, &parent->ce_entry->e_name,
3059 free( e->e_nname.bv_val );
3060 build_new_dn( &e->e_nname, &parent->ce_entry->e_nname,
3064 free( a->a_vals[0].bv_val );
3065 ptr1 = strchr( newrdn.bv_val, '=' ) + 1;
3066 a->a_vals[0].bv_len = newrdn.bv_len - (ptr1 - newrdn.bv_val);
3067 a->a_vals[0].bv_val = ch_malloc( a->a_vals[0].bv_len + 1 );
3068 strcpy( a->a_vals[0].bv_val, ptr1 );
3070 if ( a->a_nvals != a->a_vals ) {
3071 free( a->a_nvals[0].bv_val );
3072 ptr1 = strchr( nnewrdn.bv_val, '=' ) + 1;
3073 a->a_nvals[0].bv_len = nnewrdn.bv_len - (ptr1 - nnewrdn.bv_val);
3074 a->a_nvals[0].bv_val = ch_malloc( a->a_nvals[0].bv_len + 1 );
3075 strcpy( a->a_nvals[0].bv_val, ptr1 );
3077 free( nnewrdn.bv_val );
3078 free( newrdn.bv_val );
3081 if ( renum ) *renum = renumber;
3085 /* Parse an LDAP entry into config directives */
3087 config_add_internal( CfBackInfo *cfb, Entry *e, SlapReply *rs, int *renum )
3089 CfEntryInfo *ce, *last;
3090 CfOcInfo co, *coptr, **colst = NULL;
3091 Attribute *a, *oc_at, *type_attr;
3092 AttributeDescription *type_ad = NULL;
3094 ConfigArgs ca = {0};
3097 ConfigTable *ct, *type_ct = NULL;
3099 /* Make sure parent exists and entry does not */
3100 ce = config_find_base( cfb->cb_root, &e->e_nname, &last );
3102 return LDAP_ALREADY_EXISTS;
3104 dnParent( &e->e_nname, &pdn );
3106 /* If last is NULL, the new entry is the root/suffix entry,
3107 * otherwise last should be the parent.
3109 if ( last && !dn_match( &last->ce_entry->e_nname, &pdn )) {
3111 rs->sr_matched = last->ce_entry->e_name.bv_val;
3112 return LDAP_NO_SUCH_OBJECT;
3115 oc_at = attr_find( e->e_attrs, slap_schema.si_ad_objectClass );
3116 if ( !oc_at ) return LDAP_OBJECT_CLASS_VIOLATION;
3118 /* count the objectclasses */
3119 for ( i=0; oc_at->a_nvals[i].bv_val; i++ );
3121 colst = (CfOcInfo **)ch_malloc( nocs * sizeof(CfOcInfo *));
3123 for ( i=0, j=0; i<nocs; i++) {
3124 co.co_name = &oc_at->a_nvals[i];
3125 coptr = avl_find( CfOcTree, &co, CfOcInfo_cmp );
3127 /* ignore non-config objectclasses. probably should be
3128 * an error, general data doesn't belong here.
3130 if ( !coptr ) continue;
3132 /* Ignore the root objectclass, it has no implementation.
3134 if ( coptr->co_type == Cft_Abstract ) continue;
3139 /* Only the root can be Cft_Global, everything else must
3140 * have a parent. Only limited nesting arrangements are allowed.
3142 switch( colst[0]->co_type ) {
3145 rc = LDAP_CONSTRAINT_VIOLATION;
3153 if ( !last || ( last->ce_type != Cft_Global &&
3154 last->ce_type != colst[0]->co_type )) {
3155 rc = LDAP_CONSTRAINT_VIOLATION;
3160 if ( !last || ( last->ce_type != Cft_Global &&
3161 last->ce_type != Cft_Database &&
3162 last->ce_type != colst[0]->co_type )) {
3163 rc = LDAP_CONSTRAINT_VIOLATION;
3166 #ifdef SLAPD_MODULES
3168 if ( !last || last->ce_type != Cft_Global ) {
3169 rc = LDAP_CONSTRAINT_VIOLATION;
3176 /* Parse all the values and check for simple syntax errors before
3177 * performing any set actions.
3179 switch (colst[0]->co_type) {
3181 /* The cn=schema entry is all hardcoded, so never reparse it */
3182 if (last->ce_type == Cft_Global )
3186 ca.be = LDAP_STAILQ_FIRST(&backendDB);
3190 if ( last->ce_type == Cft_Backend )
3191 ca.bi = last->ce_bi;
3193 type_ad = cfAd_backend;
3196 if ( last->ce_type == Cft_Database ) {
3197 ca.be = last->ce_be;
3199 type_ad = cfAd_database;
3200 /* dummy, just to get past check_attr */
3206 ca.be = last->ce_be;
3207 type_ad = cfAd_overlay;
3210 if ( !rs ) /* ignored */
3212 type_ad = cfAd_include;
3213 #ifdef SLAPD_MODULES
3217 ptr = strchr( e->e_name.bv_val, '{' );
3219 rc = LDAP_NAMING_VIOLATION;
3223 for (i=0, mp=&modpaths; mp && i<j; mp=mp->mp_next);
3224 /* There is no corresponding modpath for this load? */
3226 rc = LDAP_NAMING_VIOLATION;
3229 module_path( mp->mp_path.bv_val );
3236 /* If doing an LDAPadd, check for indexed names and any necessary
3237 * renaming/renumbering. Entries that don't need indexed names are
3238 * ignored. Entries that need an indexed name and arrive without one
3239 * are assigned to the end. Entries that arrive with an index may
3240 * cause the following entries to be renumbered/bumped down.
3242 * Note that "pseudo-indexed" entries (cn=Include{xx}, cn=Module{xx})
3243 * don't allow Adding an entry with an index that's already in use.
3244 * This is flagged as an error (LDAP_ALREADY_EXISTS) up above.
3246 * These entries can have auto-assigned indexes (appended to the end)
3247 * but only the other types support auto-renumbering of siblings.
3249 rc = check_name_index( last, colst[0]->co_type, e, rs, renum );
3253 init_config_argv( &ca );
3255 type_attr = attr_find( e->e_attrs, type_ad );
3257 rc = LDAP_OBJECT_CLASS_VIOLATION;
3260 for ( i=0; i<nocs; i++ ) {
3261 type_ct = config_find_table( colst[i], type_ad );
3262 if ( type_ct ) break;
3265 rc = LDAP_OBJECT_CLASS_VIOLATION;
3268 rc = check_attr( type_ct, &ca, type_attr );
3269 if ( rc ) goto leave;
3271 for ( a=e->e_attrs; a; a=a->a_next ) {
3272 if ( a == type_attr || a == oc_at ) continue;
3274 for ( i=0; i<nocs; i++ ) {
3275 ct = config_find_table( colst[i], a->a_desc );
3278 if ( !ct ) continue; /* user data? */
3279 rc = check_attr( ct, &ca, a );
3280 if ( rc ) goto leave;
3283 /* Basic syntax checks are OK. Do the actual settings. */
3285 ca.line = type_attr->a_vals[0].bv_val;
3286 if ( type_ad->ad_type->sat_flags & SLAP_AT_ORDERED )
3287 ca.line = strchr( ca.line, '}' ) + 1;
3288 rc = config_parse_add( type_ct, &ca, 0 );
3294 for ( a=e->e_attrs; a; a=a->a_next ) {
3295 if ( a == type_attr || a == oc_at ) continue;
3297 for ( i=0; i<nocs; i++ ) {
3298 ct = config_find_table( colst[i], a->a_desc );
3301 if ( !ct ) continue; /* user data? */
3302 for (i=0; a->a_vals[i].bv_val; i++) {
3303 ca.line = a->a_vals[i].bv_val;
3304 if ( a->a_desc->ad_type->sat_flags & SLAP_AT_ORDERED )
3305 ca.line = strchr( ca.line, '}' ) + 1;
3306 rc = config_parse_add( ct, &ca, i );
3314 ce = ch_calloc( 1, sizeof(CfEntryInfo) );
3315 ce->ce_parent = last;
3316 ce->ce_entry = entry_dup( e );
3317 ce->ce_entry->e_private = ce;
3318 ce->ce_type = colst[0]->co_type;
3321 } else if ( last->ce_kids ) {
3324 for (c2=last->ce_kids; c2 && c2->ce_sibs; c2 = c2->ce_sibs);
3333 if ( colst ) ch_free( colst );
3337 /* Parse an LDAP entry into config directives, then store in underlying
3341 config_back_add( Operation *op, SlapReply *rs )
3344 CfEntryInfo *ce, *last;
3347 if ( !be_isroot( op ) ) {
3348 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
3349 send_ldap_result( op, rs );
3352 cfb = (CfBackInfo *)op->o_bd->be_private;
3354 ldap_pvt_thread_pool_pause( &connection_pool );
3357 * 1) check for existence of entry
3358 * 2) check for sibling renumbering
3359 * 3) perform internal add
3360 * 4) store entry in underlying database
3361 * 5) perform any necessary renumbering
3363 rs->sr_err = config_add_internal( cfb, op->ora_e, rs, &renumber );
3364 if ( rs->sr_err == LDAP_SUCCESS ) {
3365 BackendDB *be = op->o_bd;
3366 slap_callback sc = { NULL, slap_null_cb, NULL, NULL };
3367 op->o_bd = &cfb->cb_db;
3368 sc.sc_next = op->o_callback;
3369 op->o_callback = ≻
3370 op->o_bd->be_add( op, rs );
3372 op->o_callback = sc.sc_next;
3377 ldap_pvt_thread_pool_resume( &connection_pool );
3380 send_ldap_result( op, rs );
3385 config_back_modify( Operation *op, SlapReply *rs )
3388 CfEntryInfo *ce, *last;
3390 if ( !be_isroot( op ) ) {
3391 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
3392 send_ldap_result( op, rs );
3395 cfb = (CfBackInfo *)op->o_bd->be_private;
3397 ce = config_find_base( cfb->cb_root, &op->o_req_ndn, &last );
3400 rs->sr_matched = last->ce_entry->e_name.bv_val;
3401 rs->sr_err = LDAP_NO_SUCH_OBJECT;
3404 ldap_pvt_thread_pool_pause( &connection_pool );
3407 * 1) perform the Modify on the cached Entry.
3408 * 2) verify that the Entry still satisfies the schema.
3409 * 3) perform the individual config operations.
3410 * 4) store Modified entry in underlying LDIF backend.
3412 ldap_pvt_thread_pool_resume( &connection_pool );
3414 send_ldap_result( op, rs );
3419 config_back_modrdn( Operation *op, SlapReply *rs )
3422 CfEntryInfo *ce, *last;
3424 if ( !be_isroot( op ) ) {
3425 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
3426 send_ldap_result( op, rs );
3429 cfb = (CfBackInfo *)op->o_bd->be_private;
3431 ce = config_find_base( cfb->cb_root, &op->o_req_ndn, &last );
3434 rs->sr_matched = last->ce_entry->e_name.bv_val;
3435 rs->sr_err = LDAP_NO_SUCH_OBJECT;
3439 /* We don't allow moving objects to new parents.
3440 * Generally we only allow reordering a set of ordered entries.
3442 if ( op->orr_newSup ) {
3443 rs->sr_err = LDAP_UNWILLING_TO_PERFORM;
3446 ldap_pvt_thread_pool_pause( &connection_pool );
3448 ldap_pvt_thread_pool_resume( &connection_pool );
3450 send_ldap_result( op, rs );
3455 config_back_search( Operation *op, SlapReply *rs )
3458 CfEntryInfo *ce, *last;
3461 if ( !be_isroot( op ) ) {
3462 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
3463 send_ldap_result( op, rs );
3466 cfb = (CfBackInfo *)op->o_bd->be_private;
3468 ce = config_find_base( cfb->cb_root, &op->o_req_ndn, &last );
3471 rs->sr_matched = last->ce_entry->e_name.bv_val;
3472 rs->sr_err = LDAP_NO_SUCH_OBJECT;
3475 switch ( op->ors_scope ) {
3476 case LDAP_SCOPE_BASE:
3477 case LDAP_SCOPE_SUBTREE:
3478 config_send( op, rs, ce, 0 );
3481 case LDAP_SCOPE_ONELEVEL:
3482 for (ce = ce->ce_kids; ce; ce=ce->ce_sibs) {
3483 config_send( op, rs, ce, 1 );
3488 rs->sr_err = LDAP_SUCCESS;
3490 send_ldap_result( op, rs );
3495 config_alloc_entry( CfEntryInfo *parent, struct berval *rdn )
3497 Entry *e = ch_calloc( 1, sizeof(Entry) );
3498 CfEntryInfo *ce = ch_calloc( 1, sizeof(CfEntryInfo) );
3503 ce->ce_parent = parent;
3505 pdn = parent->ce_entry->e_nname;
3510 build_new_dn( &e->e_name, &pdn, rdn, NULL );
3511 ber_dupbv( &e->e_nname, &e->e_name );
3520 config_build_entry( ConfigArgs *c, Entry *e, ObjectClass *oc,
3521 struct berval *rdn, ConfigTable *ct, int table )
3523 struct berval vals[2];
3524 struct berval ad_name;
3525 AttributeDescription *ad = NULL;
3529 char textbuf[SLAP_TEXT_BUFLEN];
3530 size_t textlen = sizeof(textbuf);
3534 BER_BVZERO( &vals[1] );
3536 vals[0] = oc->soc_cname;
3537 attr_merge(e, slap_schema.si_ad_objectClass, vals, NULL );
3538 ptr = strchr(rdn->bv_val, '=');
3539 ad_name.bv_val = rdn->bv_val;
3540 ad_name.bv_len = ptr - rdn->bv_val;
3541 rc = slap_bv2ad( &ad_name, &ad, &text );
3545 vals[0].bv_val = ptr+1;
3546 vals[0].bv_len = rdn->bv_len - (vals[0].bv_val - rdn->bv_val);
3547 attr_merge(e, ad, vals, NULL );
3549 for (at=oc->soc_required; at && *at; at++) {
3550 /* Skip the naming attr */
3551 if ((*at)->sat_ad == ad || (*at)->sat_ad == slap_schema.si_ad_cn )
3553 for (i=0;ct[i].name;i++) {
3554 if (ct[i].ad == (*at)->sat_ad) {
3555 rc = config_get_vals(&ct[i], c);
3556 if (rc == LDAP_SUCCESS) {
3557 attr_merge(e, ct[i].ad, c->rvalue_vals, c->rvalue_nvals);
3558 ber_bvarray_free( c->rvalue_nvals );
3559 ber_bvarray_free( c->rvalue_vals );
3566 for (at=oc->soc_allowed; at && *at; at++) {
3567 /* Skip the naming attr */
3568 if ((*at)->sat_ad == ad || (*at)->sat_ad == slap_schema.si_ad_cn )
3570 for (i=0;ct[i].name;i++) {
3571 if (ct[i].ad == (*at)->sat_ad) {
3572 rc = config_get_vals(&ct[i], c);
3573 if (rc == LDAP_SUCCESS) {
3574 attr_merge(e, ct[i].ad, c->rvalue_vals, c->rvalue_nvals);
3575 ber_bvarray_free( c->rvalue_nvals );
3576 ber_bvarray_free( c->rvalue_vals );
3584 if ( table == BI_TABLE )
3585 ct = c->bi->bi_cf_table;
3587 ct = c->be->be_cf_table;
3588 for (;ct && ct->name;ct++) {
3589 if (!ct->ad) continue;
3590 rc = config_get_vals(ct, c);
3591 if (rc == LDAP_SUCCESS) {
3592 attr_merge(e, ct->ad, c->rvalue_vals, c->rvalue_nvals);
3596 oc_at = attr_find( e->e_attrs, slap_schema.si_ad_objectClass );
3597 rc = structural_class(oc_at->a_vals, vals, NULL, &text, textbuf, textlen);
3598 BER_BVZERO( &vals[1] );
3599 attr_merge(e, slap_schema.si_ad_structuralObjectClass, vals, NULL );
3605 config_build_schema_inc( ConfigArgs *c, CfEntryInfo *ceparent,
3606 Operation *op, SlapReply *rs )
3609 ConfigFile *cf = c->private;
3610 CfEntryInfo *ce, *ceprev;
3614 if ( ceparent->ce_kids ) {
3615 for ( ceprev = ceparent->ce_kids; ceprev->ce_sibs;
3616 ceprev = ceprev->ce_sibs );
3619 for (; cf; cf=cf->c_sibs, c->depth++) {
3620 c->value_dn.bv_val = c->log;
3621 bv.bv_val = strrchr(cf->c_file.bv_val, LDAP_DIRSEP[0]);
3626 bv.bv_len = cf->c_file.bv_len - (bv.bv_val - cf->c_file.bv_val);
3628 ptr = strchr( bv.bv_val, '.' );
3630 bv.bv_len = ptr - bv.bv_val;
3631 c->value_dn.bv_len = sprintf(c->value_dn.bv_val, "cn=" IFMT, c->depth);
3632 strncpy( c->value_dn.bv_val + c->value_dn.bv_len, bv.bv_val,
3634 c->value_dn.bv_len += bv.bv_len;
3635 c->value_dn.bv_val[c->value_dn.bv_len] ='\0';
3637 e = config_alloc_entry( ceparent, &c->value_dn );
3639 config_build_entry( c, e, cfOc_schema, &c->value_dn,
3640 c->bi->bi_cf_table, NO_TABLE );
3642 ce->ce_type = Cft_Schema;
3644 op->o_bd->be_add( op, rs );
3646 if ( !ceparent->ce_kids ) {
3647 ceparent->ce_kids = ce;
3649 ceprev->ce_sibs = ce;
3653 c->private = cf->c_kids;
3654 config_build_schema_inc( c, ceparent, op, rs );
3659 static CfEntryInfo *
3660 config_build_includes( ConfigArgs *c, CfEntryInfo *ceparent,
3661 Operation *op, SlapReply *rs )
3665 ConfigFile *cf = c->private;
3666 CfEntryInfo *ce, *ceprev;
3668 if ( ceparent->ce_kids ) {
3669 for ( ceprev = ceparent->ce_kids; ceprev->ce_sibs;
3670 ceprev = ceprev->ce_sibs );
3673 for (i=0; cf; cf=cf->c_sibs, i++) {
3674 c->value_dn.bv_val = c->log;
3675 c->value_dn.bv_len = sprintf(c->value_dn.bv_val, "cn=include" IFMT, i);
3676 e = config_alloc_entry( ceparent, &c->value_dn );
3678 config_build_entry( c, e, cfOc_include, &c->value_dn,
3679 c->bi->bi_cf_table, NO_TABLE );
3681 op->o_bd->be_add( op, rs );
3683 ce->ce_type = Cft_Include;
3685 if ( !ceparent->ce_kids ) {
3686 ceparent->ce_kids = ce;
3688 ceprev->ce_sibs = ce;
3692 c->private = cf->c_kids;
3693 config_build_includes( c, ce, op, rs );
3699 #ifdef SLAPD_MODULES
3701 static CfEntryInfo *
3702 config_build_modules( ConfigArgs *c, CfEntryInfo *ceparent,
3703 Operation *op, SlapReply *rs )
3707 CfEntryInfo *ce, *ceprev;
3710 if ( ceparent->ce_kids ) {
3711 for ( ceprev = ceparent->ce_kids; ceprev->ce_sibs;
3712 ceprev = ceprev->ce_sibs );
3715 for (i=0, mp=&modpaths; mp; mp=mp->mp_next, i++) {
3716 if ( BER_BVISNULL( &mp->mp_path ) && !mp->mp_loads )
3718 c->value_dn.bv_val = c->log;
3719 c->value_dn.bv_len = sprintf(c->value_dn.bv_val, "cn=module" IFMT, i);
3720 e = config_alloc_entry( ceparent, &c->value_dn );
3722 ce->ce_type = Cft_Include;
3724 config_build_entry( c, e, cfOc_module, &c->value_dn,
3725 c->bi->bi_cf_table, NO_TABLE );
3727 op->o_bd->be_add( op, rs );
3729 if ( !ceparent->ce_kids ) {
3730 ceparent->ce_kids = ce;
3732 ceprev->ce_sibs = ce;
3741 config_back_db_open( BackendDB *be )
3743 CfBackInfo *cfb = be->be_private;
3746 CfEntryInfo *ce, *ceparent, *ceprev;
3752 Connection conn = {0};
3753 char opbuf[OPERATION_BUFFER_SIZE];
3755 slap_callback cb = { NULL, slap_null_cb, NULL, NULL };
3756 SlapReply rs = {REP_RESULT};
3758 /* If we read the config from back-ldif, nothing to do here */
3759 if ( cfb->cb_got_ldif )
3762 op = (Operation *)opbuf;
3763 connection_fake_init( &conn, op, cfb );
3765 op->o_dn = be->be_rootdn;
3766 op->o_ndn = be->be_rootndn;
3768 op->o_tag = LDAP_REQ_ADD;
3769 op->o_callback = &cb;
3770 op->o_bd = &cfb->cb_db;
3772 /* create root of tree */
3774 e = config_alloc_entry( NULL, &rdn );
3776 ce->ce_type = Cft_Global;
3780 c.private = cfb->cb_config;
3781 ct = c.bi->bi_cf_table;
3782 config_build_entry( &c, e, cfOc_global, &rdn, ct, NO_TABLE );
3784 op->o_bd->be_add( op, &rs );
3790 /* Create schema nodes... cn=schema will contain the hardcoded core
3791 * schema, read-only. Child objects will contain runtime loaded schema
3795 e = config_alloc_entry( ceparent, &rdn );
3797 ce->ce_type = Cft_Schema;
3799 config_build_entry( &c, e, cfOc_schema, &rdn, ct, NO_TABLE );
3801 op->o_bd->be_add( op, &rs );
3802 if ( !ceparent->ce_kids ) {
3803 ceparent->ce_kids = ce;
3805 ceprev->ce_sibs = ce;
3809 /* Create includeFile nodes and schema nodes for included schema... */
3810 if ( cfb->cb_config->c_kids ) {
3812 c.private = cfb->cb_config->c_kids;
3813 config_build_schema_inc( &c, ce, op, &rs );
3814 c.private = cfb->cb_config->c_kids;
3815 ceprev = config_build_includes( &c, ceparent, op, &rs );
3818 #ifdef SLAPD_MODULES
3819 /* Create Module nodes... */
3820 if ( modpaths.mp_loads ) {
3821 ceprev = config_build_modules( &c, ceparent, op, &rs );
3825 /* Create backend nodes. Skip if they don't provide a cf_table.
3826 * There usually aren't any of these.
3830 LDAP_STAILQ_FOREACH( bi, &backendInfo, bi_next) {
3831 if (!bi->bi_cf_table) continue;
3832 if (!bi->bi_private) continue;
3835 rdn.bv_len = sprintf(rdn.bv_val, "%s=%s", cfAd_backend->ad_cname.bv_val, bi->bi_type);
3836 e = config_alloc_entry( ceparent, &rdn );
3838 ce->ce_type = Cft_Backend;
3841 config_build_entry( &c, e, cfOc_backend, &rdn, ct, BI_TABLE );
3843 op->o_bd->be_add( op, &rs );
3844 if ( !ceparent->ce_kids ) {
3845 ceparent->ce_kids = ce;
3847 ceprev->ce_sibs = ce;
3852 /* Create database nodes... */
3854 LDAP_STAILQ_FOREACH( be, &backendDB, be_next ) {
3855 slap_overinfo *oi = NULL;
3862 if ( overlay_is_over( bptr )) {
3863 oi = bptr->bd_info->bi_private;
3869 rdn.bv_len = sprintf(rdn.bv_val, "%s=" IFMT "%s", cfAd_database->ad_cname.bv_val,
3871 e = config_alloc_entry( ceparent, &rdn );
3875 ce->ce_type = Cft_Database;
3878 config_build_entry( &c, e, cfOc_database, &rdn, ct, BE_TABLE );
3880 op->o_bd->be_add( op, &rs );
3881 if ( !ceparent->ce_kids ) {
3882 ceparent->ce_kids = ce;
3884 ceprev->ce_sibs = ce;
3887 /* Iterate through overlays */
3891 CfEntryInfo *opar = ce, *oprev = NULL;
3894 for (j=0,on=oi->oi_list; on; j++,on=on->on_next) {
3896 rdn.bv_len = sprintf(rdn.bv_val, "%s=" IFMT "%s",
3897 cfAd_overlay->ad_cname.bv_val, j, on->on_bi.bi_type );
3898 oe = config_alloc_entry( opar, &rdn );
3902 ce->ce_type = Cft_Overlay;
3905 config_build_entry( &c, oe, cfOc_overlay, &rdn, ct, BI_TABLE );
3907 op->o_bd->be_add( op, &rs );
3908 if ( !opar->ce_kids ) {
3911 oprev->ce_sibs = ce;
3922 config_back_db_destroy( Backend *be )
3924 free( be->be_private );
3929 config_back_db_init( Backend *be )
3934 cfb = ch_calloc( 1, sizeof(CfBackInfo));
3935 cfb->cb_config = &cf_prv;
3936 be->be_private = cfb;
3938 ber_dupbv( &be->be_rootdn, &config_rdn );
3939 ber_dupbv( &be->be_rootndn, &be->be_rootdn );
3940 ber_dupbv( &dn, &be->be_rootdn );
3941 ber_bvarray_add( &be->be_suffix, &dn );
3942 ber_dupbv( &dn, &be->be_rootdn );
3943 ber_bvarray_add( &be->be_nsuffix, &dn );
3945 /* Hide from namingContexts */
3946 SLAP_BFLAGS(be) |= SLAP_BFLAG_CONFIG;
3953 AttributeDescription **desc;
3955 { "backend", &cfAd_backend },
3956 { "database", &cfAd_database },
3957 { "include", &cfAd_include },
3958 { "overlay", &cfAd_overlay },
3963 * add / delete: all types that may be added or deleted must use an
3964 * X-ORDERED attributeType for their RDN. Adding and deleting entries
3965 * should automatically renumber the index of any siblings as needed,
3966 * so that no gaps in the numbering sequence exist after the add/delete
3968 * What can be added:
3970 * backend objects for backend-specific config directives
3974 * delete: probably no support this time around.
3976 * modrdn: generally not done. Will be invoked automatically by add/
3977 * delete to update numbering sequence. Perform as an explicit operation
3978 * so that the renumbering effect may be replicated. Subtree rename must
3979 * be supported, since renumbering a database will affect all its child
3982 * modify: must be fully supported.
3986 config_back_initialize( BackendInfo *bi )
3988 ConfigTable *ct = config_back_cf_table;
3997 bi->bi_db_init = config_back_db_init;
3998 bi->bi_db_config = 0;
3999 bi->bi_db_open = config_back_db_open;
4000 bi->bi_db_close = 0;
4001 bi->bi_db_destroy = config_back_db_destroy;
4003 bi->bi_op_bind = config_back_bind;
4004 bi->bi_op_unbind = 0;
4005 bi->bi_op_search = config_back_search;
4006 bi->bi_op_compare = 0;
4007 bi->bi_op_modify = config_back_modify;
4008 bi->bi_op_modrdn = config_back_modrdn;
4009 bi->bi_op_add = config_back_add;
4010 bi->bi_op_delete = 0;
4011 bi->bi_op_abandon = 0;
4013 bi->bi_extended = 0;
4015 bi->bi_chk_referrals = 0;
4017 bi->bi_connection_init = 0;
4018 bi->bi_connection_destroy = 0;
4021 for (i=0; OidMacros[i].name; i++ ) {
4022 argv[1] = OidMacros[i].name;
4023 argv[2] = OidMacros[i].oid;
4024 parse_oidm( "slapd", i, 3, argv, 0, NULL );
4027 bi->bi_cf_table = ct;
4029 i = config_register_schema( ct, cf_ocs );
4032 /* set up the notable AttributeDescriptions */
4034 for (;ct->name;ct++) {
4035 if (strcmp(ct->name, ads[i].name)) continue;
4036 *ads[i].desc = ct->ad;
4038 if (!ads[i].name) break;