]> git.sur5r.net Git - openldap/blob - servers/slapd/back-bdb/config.c
5ab844bd8732b203abbdd63eb43a5944d5c76705
[openldap] / servers / slapd / back-bdb / config.c
1 /* config.c - bdb backend configuration file routine */
2 /* $OpenLDAP$ */
3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
4  *
5  * Copyright 2000-2007 The OpenLDAP Foundation.
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted only as authorized by the OpenLDAP
10  * Public License.
11  *
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>.
15  */
16
17 #include "portable.h"
18
19 #include <stdio.h>
20 #include <ac/ctype.h>
21 #include <ac/string.h>
22
23 #include "back-bdb.h"
24
25 #include "config.h"
26
27 #include "lutil.h"
28 #include "ldap_rq.h"
29
30 #ifdef DB_DIRTY_READ
31 #       define  SLAP_BDB_ALLOW_DIRTY_READ
32 #endif
33
34 #define bdb_cf_gen                      BDB_SYMBOL(cf_gen)
35 #define bdb_cf_cleanup          BDB_SYMBOL(cf_cleanup)
36 #define bdb_checkpoint          BDB_SYMBOL(checkpoint)
37 #define bdb_online_index        BDB_SYMBOL(online_index)
38
39 static ConfigDriver bdb_cf_gen;
40
41 enum {
42         BDB_CHKPT = 1,
43         BDB_CONFIG,
44         BDB_DIRECTORY,
45         BDB_NOSYNC,
46         BDB_DIRTYR,
47         BDB_INDEX,
48         BDB_LOCKD,
49         BDB_SSTACK
50 };
51
52 static ConfigTable bdbcfg[] = {
53         { "directory", "dir", 2, 2, 0, ARG_STRING|ARG_MAGIC|BDB_DIRECTORY,
54                 bdb_cf_gen, "( OLcfgDbAt:0.1 NAME 'olcDbDirectory' "
55                         "DESC 'Directory for database content' "
56                         "EQUALITY caseIgnoreMatch "
57                         "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
58         { "cachefree", "size", 2, 2, 0, ARG_INT|ARG_OFFSET,
59                 (void *)offsetof(struct bdb_info, bi_cache.c_minfree),
60                 "( OLcfgDbAt:1.11 NAME 'olcDbCacheFree' "
61                         "DESC 'Number of extra entries to free when max is reached' "
62                         "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
63         { "cachesize", "size", 2, 2, 0, ARG_INT|ARG_OFFSET,
64                 (void *)offsetof(struct bdb_info, bi_cache.c_maxsize),
65                 "( OLcfgDbAt:1.1 NAME 'olcDbCacheSize' "
66                         "DESC 'Entry cache size in entries' "
67                         "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
68         { "checkpoint", "kbyte> <min", 3, 3, 0, ARG_MAGIC|BDB_CHKPT,
69                 bdb_cf_gen, "( OLcfgDbAt:1.2 NAME 'olcDbCheckpoint' "
70                         "DESC 'Database checkpoint interval in kbytes and minutes' "
71                         "SYNTAX OMsDirectoryString SINGLE-VALUE )",NULL, NULL },
72         { "dbconfig", "DB_CONFIG setting", 1, 0, 0, ARG_MAGIC|BDB_CONFIG,
73                 bdb_cf_gen, "( OLcfgDbAt:1.3 NAME 'olcDbConfig' "
74                         "DESC 'BerkeleyDB DB_CONFIG configuration directives' "
75                         "SYNTAX OMsDirectoryString X-ORDERED 'VALUES' )", NULL, NULL },
76         { "dbnosync", NULL, 1, 2, 0, ARG_ON_OFF|ARG_MAGIC|BDB_NOSYNC,
77                 bdb_cf_gen, "( OLcfgDbAt:1.4 NAME 'olcDbNoSync' "
78                         "DESC 'Disable synchronous database writes' "
79                         "SYNTAX OMsBoolean SINGLE-VALUE )", NULL, NULL },
80         { "dirtyread", NULL, 1, 2, 0,
81 #ifdef SLAP_BDB_ALLOW_DIRTY_READ
82                 ARG_ON_OFF|ARG_MAGIC|BDB_DIRTYR, bdb_cf_gen,
83 #else
84                 ARG_IGNORED, NULL,
85 #endif
86                 "( OLcfgDbAt:1.5 NAME 'olcDbDirtyRead' "
87                 "DESC 'Allow reads of uncommitted data' "
88                 "SYNTAX OMsBoolean SINGLE-VALUE )", NULL, NULL },
89         { "idlcachesize", "size", 2, 2, 0, ARG_INT|ARG_OFFSET,
90                 (void *)offsetof(struct bdb_info,bi_idl_cache_max_size),
91                 "( OLcfgDbAt:1.6 NAME 'olcDbIDLcacheSize' "
92                 "DESC 'IDL cache size in IDLs' "
93                 "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
94         { "index", "attr> <[pres,eq,approx,sub]", 2, 3, 0, ARG_MAGIC|BDB_INDEX,
95                 bdb_cf_gen, "( OLcfgDbAt:0.2 NAME 'olcDbIndex' "
96                 "DESC 'Attribute index parameters' "
97                 "EQUALITY caseIgnoreMatch "
98                 "SYNTAX OMsDirectoryString )", NULL, NULL },
99         { "linearindex", NULL, 1, 2, 0, ARG_ON_OFF|ARG_OFFSET,
100                 (void *)offsetof(struct bdb_info, bi_linear_index), 
101                 "( OLcfgDbAt:1.7 NAME 'olcDbLinearIndex' "
102                 "DESC 'Index attributes one at a time' "
103                 "SYNTAX OMsBoolean SINGLE-VALUE )", NULL, NULL },
104         { "lockdetect", "policy", 2, 2, 0, ARG_MAGIC|BDB_LOCKD,
105                 bdb_cf_gen, "( OLcfgDbAt:1.8 NAME 'olcDbLockDetect' "
106                 "DESC 'Deadlock detection algorithm' "
107                 "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
108         { "mode", "mode", 2, 2, 0, ARG_INT|ARG_OFFSET,
109                 (void *)offsetof(struct bdb_info, bi_dbenv_mode),
110                 "( OLcfgDbAt:0.3 NAME 'olcDbMode' "
111                 "DESC 'Unix permissions of database files' "
112                 "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
113         { "searchstack", "depth", 2, 2, 0, ARG_INT|ARG_MAGIC|BDB_SSTACK,
114                 bdb_cf_gen, "( OLcfgDbAt:1.9 NAME 'olcDbSearchStack' "
115                 "DESC 'Depth of search stack in IDLs' "
116                 "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
117         { "shm_key", "key", 2, 2, 0, ARG_INT|ARG_OFFSET,
118                 (void *)offsetof(struct bdb_info, bi_shm_key), 
119                 "( OLcfgDbAt:1.10 NAME 'olcDbShmKey' "
120                 "DESC 'Key for shared memory region' "
121                 "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
122         { NULL, NULL, 0, 0, 0, ARG_IGNORED,
123                 NULL, NULL, NULL, NULL }
124 };
125
126 static ConfigOCs bdbocs[] = {
127         {
128 #ifdef BDB_HIER
129                 "( OLcfgDbOc:1.2 "
130                 "NAME 'olcHdbConfig' "
131                 "DESC 'HDB backend configuration' "
132 #else
133                 "( OLcfgDbOc:1.1 "
134                 "NAME 'olcBdbConfig' "
135                 "DESC 'BDB backend configuration' "
136 #endif
137                 "SUP olcDatabaseConfig "
138                 "MUST olcDbDirectory "
139                 "MAY ( olcDbCacheSize $ olcDbCheckpoint $ olcDbConfig $ "
140                 "olcDbNoSync $ olcDbDirtyRead $ olcDbIDLcacheSize $ "
141                 "olcDbIndex $ olcDbLinearIndex $ olcDbLockDetect $ "
142                 "olcDbMode $ olcDbSearchStack $ olcDbShmKey $ "
143                 " olcDbCacheFree ) )",
144                         Cft_Database, bdbcfg },
145         { NULL, 0, NULL }
146 };
147
148 static slap_verbmasks bdb_lockd[] = {
149         { BER_BVC("default"), DB_LOCK_DEFAULT },
150         { BER_BVC("oldest"), DB_LOCK_OLDEST },
151         { BER_BVC("random"), DB_LOCK_RANDOM },
152         { BER_BVC("youngest"), DB_LOCK_YOUNGEST },
153         { BER_BVC("fewest"), DB_LOCK_MINLOCKS },
154         { BER_BVNULL, 0 }
155 };
156
157 /* perform periodic checkpoints */
158 static void *
159 bdb_checkpoint( void *ctx, void *arg )
160 {
161         struct re_s *rtask = arg;
162         struct bdb_info *bdb = rtask->arg;
163         
164         TXN_CHECKPOINT( bdb->bi_dbenv, bdb->bi_txn_cp_kbyte,
165                 bdb->bi_txn_cp_min, 0 );
166         ldap_pvt_thread_mutex_lock( &slapd_rq.rq_mutex );
167         ldap_pvt_runqueue_stoptask( &slapd_rq, rtask );
168         ldap_pvt_thread_mutex_unlock( &slapd_rq.rq_mutex );
169         return NULL;
170 }
171
172 /* reindex entries on the fly */
173 static void *
174 bdb_online_index( void *ctx, void *arg )
175 {
176         struct re_s *rtask = arg;
177         BackendDB *be = rtask->arg;
178         struct bdb_info *bdb = be->be_private;
179
180         Connection conn = {0};
181         OperationBuffer opbuf;
182         Operation *op = (Operation *) &opbuf;
183
184         DBC *curs;
185         DBT key, data;
186         DB_TXN *txn;
187         DB_LOCK lock;
188         u_int32_t locker;
189         ID id, nid;
190         EntryInfo *ei;
191         int rc, getnext = 1;
192         int i;
193
194         connection_fake_init( &conn, op, ctx );
195
196         op->o_bd = be;
197
198         DBTzero( &key );
199         DBTzero( &data );
200         
201         id = 1;
202         key.data = &nid;
203         key.size = key.ulen = sizeof(ID);
204         key.flags = DB_DBT_USERMEM;
205
206         data.flags = DB_DBT_USERMEM | DB_DBT_PARTIAL;
207         data.dlen = data.ulen = 0;
208
209         while ( 1 ) {
210                 if ( slapd_shutdown )
211                         break;
212
213                 rc = TXN_BEGIN( bdb->bi_dbenv, NULL, &txn, bdb->bi_db_opflags );
214                 if ( rc ) 
215                         break;
216                 locker = TXN_ID( txn );
217                 if ( getnext ) {
218                         getnext = 0;
219                         BDB_ID2DISK( id, &nid );
220                         rc = bdb->bi_id2entry->bdi_db->cursor(
221                                 bdb->bi_id2entry->bdi_db, txn, &curs, bdb->bi_db_opflags );
222                         if ( rc ) {
223                                 TXN_ABORT( txn );
224                                 break;
225                         }
226                         rc = curs->c_get( curs, &key, &data, DB_SET_RANGE );
227                         curs->c_close( curs );
228                         if ( rc ) {
229                                 TXN_ABORT( txn );
230                                 if ( rc == DB_NOTFOUND )
231                                         rc = 0;
232                                 if ( rc == DB_LOCK_DEADLOCK ) {
233                                         ldap_pvt_thread_yield();
234                                         continue;
235                                 }
236                                 break;
237                         }
238                         BDB_DISK2ID( &nid, &id );
239                 }
240
241                 ei = NULL;
242                 rc = bdb_cache_find_id( op, txn, id, &ei, 0, locker, &lock );
243                 if ( rc ) {
244                         TXN_ABORT( txn );
245                         if ( rc == DB_LOCK_DEADLOCK ) {
246                                 ldap_pvt_thread_yield();
247                                 continue;
248                         }
249                         if ( rc == DB_NOTFOUND ) {
250                                 id++;
251                                 getnext = 1;
252                                 continue;
253                         }
254                         break;
255                 }
256                 if ( ei->bei_e ) {
257                         rc = bdb_index_entry( op, txn, BDB_INDEX_UPDATE_OP, ei->bei_e );
258                         if ( rc == DB_LOCK_DEADLOCK ) {
259                                 TXN_ABORT( txn );
260                                 ldap_pvt_thread_yield();
261                                 continue;
262                         }
263                         if ( rc == 0 ) {
264                                 rc = TXN_COMMIT( txn, 0 );
265                                 txn = NULL;
266                         }
267                         if ( rc )
268                                 break;
269                 }
270                 id++;
271                 getnext = 1;
272         }
273
274         for ( i = 0; i < bdb->bi_nattrs; i++ ) {
275                 if ( bdb->bi_attrs[ i ]->ai_indexmask & BDB_INDEX_DELETING
276                         || bdb->bi_attrs[ i ]->ai_newmask == 0 )
277                 {
278                         continue;
279                 }
280                 bdb->bi_attrs[ i ]->ai_indexmask = bdb->bi_attrs[ i ]->ai_newmask;
281                 bdb->bi_attrs[ i ]->ai_newmask = 0;
282         }
283
284         ldap_pvt_thread_mutex_lock( &slapd_rq.rq_mutex );
285         ldap_pvt_runqueue_stoptask( &slapd_rq, rtask );
286         bdb->bi_index_task = NULL;
287         ldap_pvt_runqueue_remove( &slapd_rq, rtask );
288         ldap_pvt_thread_mutex_unlock( &slapd_rq.rq_mutex );
289
290         return NULL;
291 }
292
293 /* Cleanup loose ends after Modify completes */
294 static int
295 bdb_cf_cleanup( ConfigArgs *c )
296 {
297         struct bdb_info *bdb = c->be->be_private;
298         int rc = 0;
299
300         if ( bdb->bi_flags & BDB_UPD_CONFIG ) {
301                 if ( bdb->bi_db_config ) {
302                         int i;
303                         FILE *f = fopen( bdb->bi_db_config_path, "w" );
304                         if ( f ) {
305                                 for (i=0; bdb->bi_db_config[i].bv_val; i++)
306                                         fprintf( f, "%s\n", bdb->bi_db_config[i].bv_val );
307                                 fclose( f );
308                         }
309                 } else {
310                         unlink( bdb->bi_db_config_path );
311                 }
312                 bdb->bi_flags ^= BDB_UPD_CONFIG;
313         }
314
315         if ( bdb->bi_flags & BDB_DEL_INDEX ) {
316                 bdb_attr_flush( bdb );
317                 bdb->bi_flags ^= BDB_DEL_INDEX;
318         }
319         
320         if ( bdb->bi_flags & BDB_RE_OPEN ) {
321                 bdb->bi_flags ^= BDB_RE_OPEN;
322                 rc = c->be->bd_info->bi_db_close( c->be );
323                 if ( rc == 0 )
324                         rc = c->be->bd_info->bi_db_open( c->be );
325                 /* If this fails, we need to restart */
326                 if ( rc ) {
327                         slapd_shutdown = 2;
328                         Debug( LDAP_DEBUG_ANY, LDAP_XSTRING(bdb_cf_cleanup)
329                                 ": failed to reopen database, rc=%d", rc, 0, 0 );
330                 }
331         }
332         return rc;
333 }
334
335 static int
336 bdb_cf_gen(ConfigArgs *c)
337 {
338         struct bdb_info *bdb = c->be->be_private;
339         int rc;
340
341         if ( c->op == SLAP_CONFIG_EMIT ) {
342                 rc = 0;
343                 switch( c->type ) {
344                 case BDB_CHKPT:
345                         if (bdb->bi_txn_cp ) {
346                                 char buf[64];
347                                 struct berval bv;
348                                 bv.bv_len = sprintf( buf, "%d %d", bdb->bi_txn_cp_kbyte,
349                                         bdb->bi_txn_cp_min );
350                                 bv.bv_val = buf;
351                                 value_add_one( &c->rvalue_vals, &bv );
352                         } else{
353                                 rc = 1;
354                         }
355                         break;
356
357                 case BDB_DIRECTORY:
358                         if ( bdb->bi_dbenv_home ) {
359                                 c->value_string = ch_strdup( bdb->bi_dbenv_home );
360                         } else {
361                                 rc = 1;
362                         }
363                         break;
364
365                 case BDB_CONFIG:
366                         if (( slapMode&SLAP_SERVER_MODE ) && !( bdb->bi_flags&BDB_IS_OPEN )
367                                 && !bdb->bi_db_config ) {
368                                 char    buf[SLAP_TEXT_BUFLEN];
369                                 FILE *f = fopen( bdb->bi_db_config_path, "r" );
370                                 struct berval bv;
371
372                                 if ( f ) {
373                                         bdb->bi_flags |= BDB_HAS_CONFIG;
374                                         while ( fgets( buf, sizeof(buf), f )) {
375                                                 ber_str2bv( buf, 0, 1, &bv );
376                                                 if ( bv.bv_len > 0 && bv.bv_val[bv.bv_len-1] == '\n' ) {
377                                                         bv.bv_len--;
378                                                         bv.bv_val[bv.bv_len] = '\0';
379                                                 }
380                                                 /* shouldn't need this, but ... */
381                                                 if ( bv.bv_len > 0 && bv.bv_val[bv.bv_len-1] == '\r' ) {
382                                                         bv.bv_len--;
383                                                         bv.bv_val[bv.bv_len] = '\0';
384                                                 }
385                                                 ber_bvarray_add( &bdb->bi_db_config, &bv );
386                                         }
387                                         fclose( f );
388                                 }
389                         }
390                         if ( bdb->bi_db_config ) {
391                                 int i;
392                                 struct berval bv;
393
394                                 bv.bv_val = c->log;
395                                 for (i=0; !BER_BVISNULL(&bdb->bi_db_config[i]); i++) {
396                                         bv.bv_len = sprintf( bv.bv_val, "{%d}%s", i,
397                                                 bdb->bi_db_config[i].bv_val );
398                                         value_add_one( &c->rvalue_vals, &bv );
399                                 }
400                         }
401                         if ( !c->rvalue_vals ) rc = 1;
402                         break;
403
404                 case BDB_NOSYNC:
405                         if ( bdb->bi_dbenv_xflags & DB_TXN_NOSYNC )
406                                 c->value_int = 1;
407                         break;
408                         
409                 case BDB_INDEX:
410                         bdb_attr_index_unparse( bdb, &c->rvalue_vals );
411                         if ( !c->rvalue_vals ) rc = 1;
412                         break;
413
414                 case BDB_LOCKD:
415                         rc = 1;
416                         if ( bdb->bi_lock_detect != DB_LOCK_DEFAULT ) {
417                                 int i;
418                                 for (i=0; !BER_BVISNULL(&bdb_lockd[i].word); i++) {
419                                         if ( bdb->bi_lock_detect == bdb_lockd[i].mask ) {
420                                                 value_add_one( &c->rvalue_vals, &bdb_lockd[i].word );
421                                                 rc = 0;
422                                                 break;
423                                         }
424                                 }
425                         }
426                         break;
427
428                 case BDB_SSTACK:
429                         c->value_int = bdb->bi_search_stack_depth;
430                         break;
431                 }
432                 return rc;
433         } else if ( c->op == LDAP_MOD_DELETE ) {
434                 rc = 0;
435                 switch( c->type ) {
436                 /* single-valued no-ops */
437                 case BDB_LOCKD:
438                 case BDB_SSTACK:
439                         break;
440
441                 case BDB_CHKPT:
442                         if ( bdb->bi_txn_cp_task ) {
443                                 struct re_s *re = bdb->bi_txn_cp_task;
444                                 bdb->bi_txn_cp_task = NULL;
445                                 if ( ldap_pvt_runqueue_isrunning( &slapd_rq, re ))
446                                         ldap_pvt_runqueue_stoptask( &slapd_rq, re );
447                                 ldap_pvt_runqueue_remove( &slapd_rq, re );
448                         }
449                         bdb->bi_txn_cp = 0;
450                         break;
451                 case BDB_CONFIG:
452                         if ( c->valx < 0 ) {
453                                 ber_bvarray_free( bdb->bi_db_config );
454                                 bdb->bi_db_config = NULL;
455                         } else {
456                                 int i = c->valx;
457                                 ch_free( bdb->bi_db_config[i].bv_val );
458                                 for (; bdb->bi_db_config[i].bv_val; i++)
459                                         bdb->bi_db_config[i] = bdb->bi_db_config[i+1];
460                         }
461                         bdb->bi_flags |= BDB_UPD_CONFIG;
462                         c->cleanup = bdb_cf_cleanup;
463                         break;
464                 case BDB_DIRECTORY:
465                         bdb->bi_flags |= BDB_RE_OPEN;
466                         bdb->bi_flags ^= BDB_HAS_CONFIG;
467                         ch_free( bdb->bi_dbenv_home );
468                         bdb->bi_dbenv_home = NULL;
469                         ch_free( bdb->bi_db_config_path );
470                         bdb->bi_db_config_path = NULL;
471                         c->cleanup = bdb_cf_cleanup;
472                         ldap_pvt_thread_pool_purgekey( bdb->bi_dbenv );
473                         ldap_pvt_thread_pool_purgekey( ((char *)bdb->bi_dbenv) + 1 );
474                         break;
475                 case BDB_NOSYNC:
476                         bdb->bi_dbenv->set_flags( bdb->bi_dbenv, DB_TXN_NOSYNC, 0 );
477                         break;
478                 case BDB_INDEX:
479                         if ( c->valx == -1 ) {
480                                 int i;
481
482                                 /* delete all (FIXME) */
483                                 for ( i = 0; i < bdb->bi_nattrs; i++ ) {
484                                         bdb->bi_attrs[i]->ai_indexmask |= BDB_INDEX_DELETING;
485                                 }
486                                 bdb->bi_flags |= BDB_DEL_INDEX;
487                                 c->cleanup = bdb_cf_cleanup;
488
489                         } else {
490                                 struct berval bv, def = BER_BVC("default");
491                                 char *ptr;
492
493                                 for (ptr = c->line; !isspace( *ptr ); ptr++);
494
495                                 bv.bv_val = c->line;
496                                 bv.bv_len = ptr - bv.bv_val;
497                                 if ( bvmatch( &bv, &def )) {
498                                         bdb->bi_defaultmask = 0;
499
500                                 } else {
501                                         int i;
502                                         char **attrs;
503                                         char sep;
504
505                                         sep = bv.bv_val[ bv.bv_len ];
506                                         bv.bv_val[ bv.bv_len ] = '\0';
507                                         attrs = ldap_str2charray( bv.bv_val, "," );
508
509                                         for ( i = 0; attrs[ i ]; i++ ) {
510                                                 AttributeDescription *ad = NULL;
511                                                 const char *text;
512                                                 AttrInfo *ai;
513
514                                                 slap_str2ad( attrs[ i ], &ad, &text );
515                                                 /* if we got here... */
516                                                 assert( ad != NULL );
517
518                                                 ai = bdb_attr_mask( bdb, ad );
519                                                 /* if we got here... */
520                                                 assert( ai != NULL );
521
522                                                 ai->ai_indexmask |= BDB_INDEX_DELETING;
523                                                 bdb->bi_flags |= BDB_DEL_INDEX;
524                                                 c->cleanup = bdb_cf_cleanup;
525                                         }
526
527                                         bv.bv_val[ bv.bv_len ] = sep;
528                                         ldap_charray_free( attrs );
529                                 }
530                         }
531                         break;
532                 }
533                 return rc;
534         }
535
536         switch( c->type ) {
537         case BDB_CHKPT: {
538                 long    l;
539                 bdb->bi_txn_cp = 1;
540                 if ( lutil_atolx( &l, c->argv[1], 0 ) != 0 ) {
541                         fprintf( stderr, "%s: "
542                                 "invalid kbyte \"%s\" in \"checkpoint\".\n",
543                                 c->log, c->argv[1] );
544                         return 1;
545                 }
546                 bdb->bi_txn_cp_kbyte = l;
547                 if ( lutil_atolx( &l, c->argv[2], 0 ) != 0 ) {
548                         fprintf( stderr, "%s: "
549                                 "invalid minutes \"%s\" in \"checkpoint\".\n",
550                                 c->log, c->argv[2] );
551                         return 1;
552                 }
553                 bdb->bi_txn_cp_min = l;
554                 /* If we're in server mode and time-based checkpointing is enabled,
555                  * submit a task to perform periodic checkpoints.
556                  */
557                 if ((slapMode & SLAP_SERVER_MODE) && bdb->bi_txn_cp_min ) {
558                         struct re_s *re = bdb->bi_txn_cp_task;
559                         if ( re ) {
560                                 re->interval.tv_sec = bdb->bi_txn_cp_min * 60;
561                         } else {
562                                 if ( c->be->be_suffix == NULL || BER_BVISNULL( &c->be->be_suffix[0] ) ) {
563                                         fprintf( stderr, "%s: "
564                                                 "\"checkpoint\" must occur after \"suffix\".\n",
565                                                 c->log );
566                                         return 1;
567                                 }
568                                 bdb->bi_txn_cp_task = ldap_pvt_runqueue_insert( &slapd_rq,
569                                         bdb->bi_txn_cp_min * 60, bdb_checkpoint, bdb,
570                                         LDAP_XSTRING(bdb_checkpoint), c->be->be_suffix[0].bv_val );
571                         }
572                 }
573                 } break;
574
575         case BDB_CONFIG: {
576                 char *ptr = c->line;
577                 struct berval bv;
578
579                 if ( c->op == SLAP_CONFIG_ADD ) {
580                         ptr += STRLENOF("dbconfig");
581                         while (!isspace(*ptr)) ptr++;
582                         while (isspace(*ptr)) ptr++;
583                 }
584
585                 if ( bdb->bi_flags & BDB_IS_OPEN ) {
586                         bdb->bi_flags |= BDB_UPD_CONFIG;
587                         c->cleanup = bdb_cf_cleanup;
588                 } else {
589                 /* If we're just starting up...
590                  */
591                         FILE *f;
592                         /* If a DB_CONFIG file exists, or we don't know the path
593                          * to the DB_CONFIG file, ignore these directives
594                          */
595                         if (( bdb->bi_flags & BDB_HAS_CONFIG ) || !bdb->bi_db_config_path )
596                                 break;
597                         f = fopen( bdb->bi_db_config_path, "a" );
598                         if ( f ) {
599                                 /* FIXME: EBCDIC probably needs special handling */
600                                 fprintf( f, "%s\n", ptr );
601                                 fclose( f );
602                         }
603                 }
604                 ber_str2bv( ptr, 0, 1, &bv );
605                 ber_bvarray_add( &bdb->bi_db_config, &bv );
606                 }
607                 break;
608
609         case BDB_DIRECTORY: {
610                 FILE *f;
611                 char *ptr;
612
613                 if ( bdb->bi_dbenv_home )
614                         ch_free( bdb->bi_dbenv_home );
615                 bdb->bi_dbenv_home = c->value_string;
616
617                 /* See if a DB_CONFIG file already exists here */
618                 if ( bdb->bi_db_config_path )
619                         ch_free( bdb->bi_db_config_path );
620                 bdb->bi_db_config_path = ch_malloc( strlen( bdb->bi_dbenv_home ) +
621                         STRLENOF(LDAP_DIRSEP) + STRLENOF("DB_CONFIG") + 1 );
622                 ptr = lutil_strcopy( bdb->bi_db_config_path, bdb->bi_dbenv_home );
623                 *ptr++ = LDAP_DIRSEP[0];
624                 strcpy( ptr, "DB_CONFIG" );
625
626                 f = fopen( bdb->bi_db_config_path, "r" );
627                 if ( f ) {
628                         bdb->bi_flags |= BDB_HAS_CONFIG;
629                         fclose(f);
630                 }
631                 }
632                 break;
633
634         case BDB_NOSYNC:
635                 if ( c->value_int )
636                         bdb->bi_dbenv_xflags |= DB_TXN_NOSYNC;
637                 else
638                         bdb->bi_dbenv_xflags &= ~DB_TXN_NOSYNC;
639                 if ( bdb->bi_flags & BDB_IS_OPEN ) {
640                         bdb->bi_dbenv->set_flags( bdb->bi_dbenv, DB_TXN_NOSYNC,
641                                 c->value_int );
642                 }
643                 break;
644
645         case BDB_INDEX:
646                 rc = bdb_attr_index_config( bdb, c->fname, c->lineno,
647                         c->argc - 1, &c->argv[1] );
648
649                 if( rc != LDAP_SUCCESS ) return 1;
650                 if (( bdb->bi_flags & BDB_IS_OPEN ) && !bdb->bi_index_task ) {
651                         /* Start the task as soon as we finish here. Set a long
652                          * interval (10 hours) so that it only gets scheduled once.
653                          */
654                         if ( c->be->be_suffix == NULL || BER_BVISNULL( &c->be->be_suffix[0] ) ) {
655                                 fprintf( stderr, "%s: "
656                                         "\"index\" must occur after \"suffix\".\n",
657                                         c->log );
658                                 return 1;
659                         }
660                         bdb->bi_index_task = ldap_pvt_runqueue_insert( &slapd_rq, 36000,
661                                 bdb_online_index, c->be,
662                                 LDAP_XSTRING(bdb_online_index), c->be->be_suffix[0].bv_val );
663                 }
664                 break;
665
666         case BDB_LOCKD:
667                 rc = verb_to_mask( c->argv[1], bdb_lockd );
668                 if ( BER_BVISNULL(&bdb_lockd[rc].word) ) {
669                         fprintf( stderr, "%s: "
670                                 "bad policy (%s) in \"lockDetect <policy>\" line\n",
671                                 c->log, c->argv[1] );
672                         return 1;
673                 }
674                 bdb->bi_lock_detect = rc;
675                 break;
676
677         case BDB_SSTACK:
678                 if ( c->value_int < MINIMUM_SEARCH_STACK_DEPTH ) {
679                         fprintf( stderr,
680                 "%s: depth %d too small, using %d\n",
681                         c->log, c->value_int, MINIMUM_SEARCH_STACK_DEPTH );
682                         c->value_int = MINIMUM_SEARCH_STACK_DEPTH;
683                 }
684                 bdb->bi_search_stack_depth = c->value_int;
685                 break;
686         }
687         return 0;
688 }
689
690 int bdb_back_init_cf( BackendInfo *bi )
691 {
692         int rc;
693         bi->bi_cf_ocs = bdbocs;
694
695         rc = config_register_schema( bdbcfg, bdbocs );
696         if ( rc ) return rc;
697         return 0;
698 }