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