etc/cnid_dbd/dbif.c

   1 /*
   2  * Copyright (C) Joerg Lenneis 2003
   3  * Copyright (C) Frank Lahm 2009
   4  * All Rights Reserved.  See COPYING.
   5  */
   6
   7 #ifdef HAVE_CONFIG_H
   8 #include "config.h"
   9 #endif /* HAVE_CONFIG_H */
  10
  11 #include <stdio.h>
  12 #include <errno.h>
  13 #include <stdlib.h>
  14 #include <string.h>
  15 #include <sys/types.h>
  16 #include <sys/stat.h>
  17 #include <unistd.h>
  18 #include <arpa/inet.h>
  19
  20 #include <db.h>
  21
  22 #include <atalk/logger.h>
  23 #include <atalk/util.h>
  24 #include <atalk/errchk.h>
  25
  26 #include "db_param.h"
  27 #include "dbif.h"
  28 #include "pack.h"
  29
  30 #define DB_ERRLOGFILE "db_errlog"
  31
  32 /*!
  33  * Get the db stamp which is the st_ctime of the file "cnid2.db" and store it in buffer
  34  */
  35 static int dbif_stamp(DBD *dbd, void *buffer, int size)
  36 {
  37     EC_INIT;
  38     struct stat st;
  39     int cwd = -1;
  40
  41     if (size < 8)
  42         EC_FAIL;
  43
  44     /* Remember cwd */
  45     if ((cwd = open(".", O_RDONLY)) < 0) {
  46         LOG(log_error, logtype_cnid, "error opening cwd: %s", strerror(errno));
  47         EC_FAIL;
  48     }
  49
  50     /* chdir to db_envhome */
  51     if ((chdir(dbd->db_envhome)) != 0) {
  52         LOG(log_error, logtype_cnid, "error chdiring to db_env '%s': %s", dbd->db_envhome, strerror(errno));
  53         EC_FAIL;
  54     }
  55
  56     if (stat(dbd->db_table[DBIF_CNID].name, &st) < 0) {
  57         LOG(log_error, logtype_cnid, "error stating database %s: %s", dbd->db_table[DBIF_CNID].name, db_strerror(errno));
  58         EC_FAIL;
  59     }
  60
  61     LOG(log_maxdebug, logtype_cnid,"stamp: %s", asctime(localtime(&st.st_ctime)));
  62
  63     memset(buffer, 0, size);
  64     memcpy(buffer, &st.st_ctime, sizeof(st.st_ctime));
  65
  66 EC_CLEANUP:
  67     if (cwd != -1) {
  68         if (fchdir(cwd) != 0) {
  69             LOG(log_error, logtype_cnid, "error chdiring back: %s", strerror(errno));
  70             EC_STATUS(-1);
  71         }
  72         close(cwd);
  73     }
  74     EC_EXIT;
  75 }
  76
  77 /*!
  78  * Inititialize rootinfo key (which has CNID 0 as key)
  79  *
  80  * This also "stamps" the database, which means storing st.st_ctime of the
  81  * "cnid2.db" file in the rootinfo data at the DEV offset
  82  *
  83  * @param dbd      (rw) database handle
  84  * @param version  (r)  database version number
  85  *
  86  * @returns -1 on error, 0 on success
  87  */
  88 static int dbif_init_rootinfo(DBD *dbd, int version)
  89 {
  90     DBT key, data;
  91     uint32_t v;
  92     char buf[ROOTINFO_DATALEN];
  93
  94     LOG(log_debug, logtype_cnid, "Setting CNID database version to %u", version);
  95
  96     v = version;
  97     v = htonl(v);
  98
  99     memset(&key, 0, sizeof(key));
 100     memset(&data, 0, sizeof(data));
 101     key.data = ROOTINFO_KEY;
 102     key.size = ROOTINFO_KEYLEN;
 103     data.data = buf;
 104     data.size = ROOTINFO_DATALEN;
 105
 106     memcpy(buf, ROOTINFO_DATA, ROOTINFO_DATALEN);
 107     memcpy(buf + CNID_DID_OFS, &v, sizeof(v));
 108     if (dbif_stamp(dbd, buf + CNID_DEV_OFS, CNID_DEV_LEN) < 0)
 109         return -1;
 110
 111     if (dbif_put(dbd, DBIF_CNID, &key, &data, 0) < 0)
 112         return -1;
 113     if (dbif_txn_commit(dbd) != 1) {
 114         LOG(log_error, logtype_cnid, "dbif_init_rootinfo: cant commit txn");
 115         return -1;
 116     }
 117
 118     return 0;
 119 }
 120
 121 /*!
 122  * Return CNID database version number
 123  *
 124  * Returns version in *version
 125  *
 126  * @returns -1 on error, 0 if theres no rootinfo key yet, 1 if *version is returned
 127  */
 128 static int dbif_getversion(DBD *dbd, uint32_t *version)
 129 {
 130     DBT key, data;
 131     int ret;
 132
 133     LOG(log_maxdebug, logtype_cnid, "dbif_getversion: reading version info");
 134
 135     *version = -1;
 136     memset(&key, 0, sizeof(key));
 137     memset(&data, 0, sizeof(data));
 138     key.data = ROOTINFO_KEY;
 139     key.size = ROOTINFO_KEYLEN;
 140
 141     switch (dbif_get(dbd, DBIF_CNID, &key, &data, 0)) {
 142     case 1: /* found */
 143         memcpy(version, (char *)data.data + CNID_DID_OFS, sizeof(uint32_t));
 144         *version = ntohl(*version);
 145         LOG(log_debug, logtype_cnid, "CNID database version %u", *version);
 146         ret = 1;
 147         break;
 148     case 0: /* not found */
 149         LOG(log_debug, logtype_cnid, "dbif_getversion: no version info found");
 150         ret = 0;
 151         break;
 152     default:
 153         LOG(log_error, logtype_cnid, "dbif_getversion: database error");
 154         ret = -1;
 155         break;
 156     }
 157
 158     return ret;
 159 }
 160
 161 /*!
 162  * Set CNID database version number
 163  *
 164  * Initializes rootinfo key as neccessary
 165  * @returns -1 on error, 0 on success
 166  */
 167 static int dbif_setversion(DBD *dbd, uint32_t version)
 168 {
 169     int ret;
 170     DBT key, data;
 171     uint32_t v;
 172
 173     LOG(log_debug, logtype_cnid, "Setting CNID database version to %u", version);
 174
 175     v = version;
 176     v = htonl(v);
 177
 178     memset(&key, 0, sizeof(key));
 179     memset(&data, 0, sizeof(data));
 180     key.data = ROOTINFO_KEY;
 181     key.size = ROOTINFO_KEYLEN;
 182
 183     if ((ret = dbif_get(dbd, DBIF_CNID, &key, &data, 0)) == -1)
 184         return -1;
 185     if (ret == 0) {
 186         /* No rootinfo key yet, init it */
 187         if (dbif_init_rootinfo(dbd, CNID_VERSION) != 0)
 188             return -1;
 189         /* Now try again */
 190         if (dbif_get(dbd, DBIF_CNID, &key, &data, 0) == -1)
 191             return -1;
 192     }
 193     memcpy((char *)data.data + CNID_DID_OFS, &v, sizeof(v));
 194     data.size = ROOTINFO_DATALEN;
 195     if (dbif_put(dbd, DBIF_CNID, &key, &data, 0) < 0)
 196         return -1;
 197
 198     return 0;
 199 }
 200
 201 /*!
 202  * Upgrade CNID database versions, initialize rootinfo key as as necessary in dbif_setversion()
 203  *
 204  * For now this does nothing, as upgrading from ver. 0 to 1 is done in dbif_open
 205  */
 206 #define UNINTIALIZED_DB UINT32_MAX
 207 static int dbif_upgrade(DBD *dbd)
 208 {
 209     uint32_t version = CNID_VERSION_UNINTIALIZED_DB;
 210
 211     if (dbif_getversion(dbd, &version) == -1)
 212         return -1;
 213     if (version == CNID_VERSION_UNINTIALIZED_DB) {
 214         version = CNID_VERSION;
 215         if (dbif_setversion(dbd, CNID_VERSION) != 0)
 216             return -1;
 217     }
 218
 219     /*
 220      * Do upgrade stuff ...
 221      */
 222
 223     /* Write current version to database */
 224     if (version != CNID_VERSION) {
 225         if (dbif_setversion(dbd, CNID_VERSION) != 0)
 226             return -1;
 227     }
 228
 229     LOG(log_debug, logtype_cnid, "Finished CNID database version upgrade check");
 230
 231     return 0;
 232 }
 233
 234 /* --------------- */
 235 static int dbif_openlog(DBD *dbd)
 236 {
 237     int ret = 0;
 238     int cwd = -1;
 239
 240     if ( ! dbd->db_filename)
 241         /* in memory db */
 242         return 0;
 243
 244     /* Remember cwd */
 245     if ((cwd = open(".", O_RDONLY)) < 0) {
 246         LOG(log_error, logtype_cnid, "error opening cwd: %s", strerror(errno));
 247         return -1;
 248     }
 249
 250     /* chdir to db_envhome */
 251     if ((chdir(dbd->db_envhome)) != 0) {
 252         LOG(log_error, logtype_cnid, "error chdiring to db_env '%s': %s", dbd->db_envhome, strerror(errno));
 253         ret = -1;
 254         goto exit;
 255     }
 256
 257     if ((dbd->db_errlog = fopen(DB_ERRLOGFILE, "a")) == NULL)
 258         LOG(log_warning, logtype_cnid, "error creating/opening DB errlogfile: %s", strerror(errno));
 259
 260     if (dbd->db_errlog != NULL) {
 261         dbd->db_env->set_errfile(dbd->db_env, dbd->db_errlog);
 262         dbd->db_env->set_msgfile(dbd->db_env, dbd->db_errlog);
 263     }
 264
 265 exit:
 266     if (cwd != -1) {
 267         if ((fchdir(cwd)) != 0) {
 268             LOG(log_error, logtype_cnid, "error chdiring back: %s", strerror(errno));
 269             ret = -1;
 270         }
 271         close(cwd);
 272     }
 273     return ret;
 274 }
 275
 276 /* --------------- */
 277 static int dbif_logautorem(DBD *dbd)
 278 {
 279     int ret = 0;
 280     int cwd = -1;
 281     char **logfiles = NULL;
 282     char **file;
 283
 284     if ( ! dbd->db_filename)
 285         /* in memory db */
 286         return 0;
 287
 288     /* Remember cwd */
 289     if ((cwd = open(".", O_RDONLY)) < 0) {
 290         LOG(log_error, logtype_cnid, "error opening cwd: %s", strerror(errno));
 291         return -1;
 292     }
 293
 294     /* chdir to db_envhome */
 295     if ((chdir(dbd->db_envhome)) != 0) {
 296         LOG(log_error, logtype_cnid, "error chdiring to db_env '%s': %s", dbd->db_envhome, strerror(errno));
 297         ret = -1;
 298         goto exit;
 299     }
 300
 301     if ((ret = dbd->db_env->log_archive(dbd->db_env, &logfiles, 0)) != 0) {
 302         LOG(log_error, logtype_cnid, "error getting list of stale logfiles: %s",
 303             db_strerror(ret));
 304         dbd->db_env->close(dbd->db_env, 0);
 305         dbd->db_env = NULL;
 306         ret = -1;
 307         goto exit;
 308     }
 309
 310     if (logfiles != NULL) {
 311         for (file = logfiles; *file != NULL; file++) {
 312             if (unlink(*file) < 0)
 313                 LOG(log_warning, logtype_cnid, "Error removing stale logfile %s: %s", *file, strerror(errno));
 314         }
 315         free(logfiles);
 316     }
 317
 318 exit:
 319     if (cwd != -1) {
 320         if ((fchdir(cwd)) != 0) {
 321             LOG(log_error, logtype_cnid, "error chdiring back: %s", strerror(errno));
 322             ret = -1;
 323         }
 324         close(cwd);
 325     }
 326     return ret;
 327 }
 328
 329 /*!
 330  * Get lock on db lock file
 331  *
 332  * @args cmd       (r) lock command:
 333  *                     LOCK_FREE:   close lockfd
 334  *                     LOCK_UNLOCK: unlock lockm keep lockfd open
 335  *                     LOCK_EXCL:   F_WRLCK on lockfd
 336  *                     LOCK_SHRD:   F_RDLCK on lockfd
 337  * @args dbpath    (r) path to lockfile, only used on first call,
 338  *                     later the stored fd is used
 339  * @returns            LOCK_FREE/LOCK_UNLOCK return 0 on success, -1 on error
 340  *                     LOCK_EXCL/LOCK_SHRD return LOCK_EXCL or LOCK_SHRD respectively on
 341  *                     success, 0 if the lock couldn't be acquired, -1 on other errors
 342  */
 343 int get_lock(int cmd, const char *dbpath)
 344 {
 345     static int lockfd = -1;
 346     int ret;
 347     char lockpath[PATH_MAX];
 348     struct stat st;
 349
 350     LOG(log_debug, logtype_cnid, "get_lock(%s, \"%s\")",
 351         cmd == LOCK_EXCL ? "LOCK_EXCL" :
 352         cmd == LOCK_SHRD ? "LOCK_SHRD" :
 353         cmd == LOCK_FREE ? "LOCK_FREE" :
 354         cmd == LOCK_UNLOCK ? "LOCK_UNLOCK" : "UNKNOWN" , dbpath ? dbpath : "");
 355
 356     switch (cmd) {
 357     case LOCK_FREE:
 358         if (lockfd == -1)
 359             return -1;
 360         close(lockfd);
 361         lockfd = -1;
 362         return 0;
 363
 364     case LOCK_UNLOCK:
 365         if (lockfd == -1)
 366             return -1;
 367         return unlock(lockfd, 0, SEEK_SET, 0);
 368
 369     case LOCK_EXCL:
 370     case LOCK_SHRD:
 371         if (lockfd == -1) {
 372             if ( (strlen(dbpath) + strlen(LOCKFILENAME+1)) > (PATH_MAX - 1) ) {
 373                 LOG(log_error, logtype_cnid, ".AppleDB pathname too long");
 374                 return -1;
 375             }
 376             strncpy(lockpath, dbpath, PATH_MAX - 1);
 377             strcat(lockpath, "/");
 378             strcat(lockpath, LOCKFILENAME);
 379
 380             if ((lockfd = open(lockpath, O_RDWR | O_CREAT, 0644)) < 0) {
 381                 LOG(log_error, logtype_cnid, "Error opening lockfile: %s", strerror(errno));
 382                 return -1;
 383             }
 384
 385             if ((stat(dbpath, &st)) != 0) {
 386                 LOG(log_error, logtype_cnid, "Error statting lockfile: %s", strerror(errno));
 387                 return -1;
 388             }
 389
 390             if ((chown(lockpath, st.st_uid, st.st_gid)) != 0) {
 391                 LOG(log_error, logtype_cnid, "Error inheriting lockfile permissions: %s",
 392                          strerror(errno));
 393                 return -1;
 394             }
 395         }
 396
 397         if (cmd == LOCK_EXCL)
 398             ret = write_lock(lockfd, 0, SEEK_SET, 0);
 399         else
 400             ret = read_lock(lockfd, 0, SEEK_SET, 0);
 401
 402         if (ret != 0) {
 403             if (cmd == LOCK_SHRD)
 404                 LOG(log_error, logtype_cnid, "Volume CNID db is locked, try again...");
 405             return 0;
 406         }
 407
 408         LOG(log_debug, logtype_cnid, "get_lock: got %s lock",
 409             cmd == LOCK_EXCL ? "LOCK_EXCL" : "LOCK_SHRD");
 410         return cmd;
 411
 412     default:
 413         return -1;
 414     } /* switch(cmd) */
 415
 416     /* deadc0de, never get here */
 417     return -1;
 418 }
 419
 420 /* --------------- */
 421 DBD *dbif_init(const char *envhome, const char *filename)
 422 {
 423     DBD *dbd;
 424
 425     if ( NULL == (dbd = calloc(sizeof(DBD), 1)) )
 426         return NULL;
 427
 428     /* filename == NULL means in memory db */
 429     if (filename) {
 430         if (! envhome)
 431             return NULL;
 432
 433         dbd->db_envhome = strdup(envhome);
 434         if (NULL == dbd->db_envhome) {
 435             free(dbd);
 436             return NULL;
 437         }
 438
 439         dbd->db_filename = strdup(filename);
 440         if (NULL == dbd->db_filename) {
 441             free(dbd->db_envhome);
 442             free(dbd);
 443             return NULL;
 444         }
 445     }
 446
 447     dbd->db_table[DBIF_CNID].name        = "cnid2.db";
 448     dbd->db_table[DBIF_IDX_DEVINO].name  = "devino.db";
 449     dbd->db_table[DBIF_IDX_DIDNAME].name = "didname.db";
 450     dbd->db_table[DBIF_IDX_NAME].name    = "name.db";
 451
 452     dbd->db_table[DBIF_CNID].type        = DB_BTREE;
 453     dbd->db_table[DBIF_IDX_DEVINO].type  = DB_BTREE;
 454     dbd->db_table[DBIF_IDX_DIDNAME].type = DB_BTREE;
 455     dbd->db_table[DBIF_IDX_NAME].type    = DB_BTREE;
 456
 457     dbd->db_table[DBIF_CNID].openflags        = DB_CREATE;
 458     dbd->db_table[DBIF_IDX_DEVINO].openflags  = DB_CREATE;
 459     dbd->db_table[DBIF_IDX_DIDNAME].openflags = DB_CREATE;
 460     dbd->db_table[DBIF_IDX_NAME].openflags    = DB_CREATE;
 461
 462     dbd->db_table[DBIF_IDX_NAME].flags = DB_DUPSORT;
 463
 464     return dbd;
 465 }
 466
 467 /*
 468    We must open the db_env with an absolute pathname, as `dbd` keeps chdir'ing, which
 469    breaks e.g. bdb logfile-rotation with relative pathnames.
 470    But still we use relative paths with DB_ERRLOGFILE
 471    in order to avoid creating absolute paths by copying. Both have no problem with
 472    a relative path.
 473 */
 474 int dbif_env_open(DBD *dbd, struct db_param *dbp, uint32_t dbenv_oflags)
 475 {
 476     int ret;
 477
 478     if ((ret = db_env_create(&dbd->db_env, 0))) {
 479         LOG(log_error, logtype_cnid, "error creating DB environment: %s",
 480             db_strerror(ret));
 481         dbd->db_env = NULL;
 482         return -1;
 483     }
 484
 485     dbd->db_param = *dbp;
 486
 487     if ((dbif_openlog(dbd)) != 0)
 488         return -1;
 489
 490     if (dbenv_oflags & DB_RECOVER) {
 491
 492         LOG(log_debug, logtype_cnid, "Running recovery");
 493
 494         dbd->db_env->set_verbose(dbd->db_env, DB_VERB_RECOVERY, 1);
 495         /* Open the database for recovery using DB_PRIVATE option which is faster */
 496         if ((ret = dbd->db_env->open(dbd->db_env, dbd->db_envhome, dbenv_oflags | DB_PRIVATE, 0))) {
 497             LOG(log_error, logtype_cnid, "error opening DB environment: %s",
 498                 db_strerror(ret));
 499             dbd->db_env->close(dbd->db_env, 0);
 500             dbd->db_env = NULL;
 501             return -1;
 502         }
 503         dbenv_oflags = (dbenv_oflags & ~DB_RECOVER);
 504
 505         if (dbd->db_errlog != NULL)
 506             fflush(dbd->db_errlog);
 507
 508         if ((ret = dbd->db_env->close(dbd->db_env, 0))) {
 509             LOG(log_error, logtype_cnid, "error closing DB environment after recovery: %s",
 510                 db_strerror(ret));
 511             dbd->db_env = NULL;
 512             return -1;
 513         }
 514         dbd->db_errlog = NULL;
 515
 516         if ((ret = db_env_create(&dbd->db_env, 0))) {
 517             LOG(log_error, logtype_cnid, "error creating DB environment after recovery: %s",
 518                 db_strerror(ret));
 519             dbd->db_env = NULL;
 520             return -1;
 521         }
 522
 523         if ((dbif_openlog(dbd)) != 0)
 524             return -1;
 525
 526         LOG(log_debug, logtype_cnid, "Finished recovery.");
 527     }
 528
 529     if ((ret = dbd->db_env->set_cachesize(dbd->db_env, 0, 1024 * dbp->cachesize, 0))) {
 530         LOG(log_error, logtype_cnid, "error setting DB environment cachesize to %i: %s",
 531             dbp->cachesize, db_strerror(ret));
 532         dbd->db_env->close(dbd->db_env, 0);
 533         dbd->db_env = NULL;
 534         return -1;
 535     }
 536
 537     if ((ret = dbd->db_env->set_lk_max_locks(dbd->db_env, dbp->maxlocks))) {
 538         LOG(log_error, logtype_cnid, "error setting DB environment maxlocks to %i: %s",
 539             10000, db_strerror(ret));
 540         dbd->db_env->close(dbd->db_env, 0);
 541         dbd->db_env = NULL;
 542         return -1;
 543     }
 544
 545     if ((ret = dbd->db_env->set_lk_max_objects(dbd->db_env, dbp->maxlockobjs))) {
 546         LOG(log_error, logtype_cnid, "error setting DB environment max lockobjects to %i: %s",
 547             10000, db_strerror(ret));
 548         dbd->db_env->close(dbd->db_env, 0);
 549         dbd->db_env = NULL;
 550         return -1;
 551     }
 552
 553     if ((ret = dbd->db_env->open(dbd->db_env, dbd->db_envhome, dbenv_oflags, 0))) {
 554         LOG(log_error, logtype_cnid, "error opening DB environment after recovery: %s",
 555             db_strerror(ret));
 556         dbd->db_env->close(dbd->db_env, 0);
 557         dbd->db_env = NULL;
 558         return -1;
 559     }
 560
 561     if ((ret = dbd->db_env->set_flags(dbd->db_env, DB_AUTO_COMMIT, 1))) {
 562         LOG(log_error, logtype_cnid, "error setting DB_AUTO_COMMIT flag: %s",
 563             db_strerror(ret));
 564         dbd->db_env->close(dbd->db_env, 0);
 565         dbd->db_env = NULL;
 566         return -1;
 567     }
 568
 569     if (dbp->logfile_autoremove) {
 570         if ((dbif_logautorem(dbd)) != 0)
 571             return -1;
 572
 573 #if DB_VERSION_MAJOR > 4 || (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR >= 7)
 574         if ((ret = dbd->db_env->log_set_config(dbd->db_env, DB_LOG_AUTO_REMOVE, 1))) {
 575             LOG(log_error, logtype_cnid, "error setting DB_LOG_AUTO_REMOVE flag: %s",
 576             db_strerror(ret));
 577             dbd->db_env->close(dbd->db_env, 0);
 578             dbd->db_env = NULL;
 579             return -1;
 580         }
 581 #else
 582         if ((ret = dbd->db_env->set_flags(dbd->db_env, DB_LOG_AUTOREMOVE, 1))) {
 583             LOG(log_error, logtype_cnid, "error setting DB_LOG_AUTOREMOVE flag: %s",
 584                 db_strerror(ret));
 585             dbd->db_env->close(dbd->db_env, 0);
 586             dbd->db_env = NULL;
 587             return -1;
 588         }
 589 #endif
 590     }
 591
 592     return 0;
 593 }
 594
 595 /* --------------- */
 596 int dbif_open(DBD *dbd, struct db_param *dbp, int reindex)
 597 {
 598     int ret, i, cwd;
 599     u_int32_t count;
 600     struct stat st;
 601     DB *upgrade_db;
 602
 603     /* Try to upgrade if it's a normal on-disk database */
 604     if (dbd->db_envhome) {
 605         /* Remember cwd */
 606         if ((cwd = open(".", O_RDONLY)) < 0) {
 607             LOG(log_error, logtype_cnid, "error opening cwd: %s", strerror(errno));
 608             return -1;
 609         }
 610
 611         /* chdir to db_envhome. makes it easier checking for old db files and creating db_errlog file  */
 612         if ((chdir(dbd->db_envhome)) != 0) {
 613             LOG(log_error, logtype_cnid, "error chdiring to db_env '%s': %s", dbd->db_envhome, strerror(errno));
 614             return -1;
 615         }
 616
 617         if ((stat(dbd->db_filename, &st)) == 0) {
 618             LOG(log_debug, logtype_cnid, "See if we can upgrade the CNID database...");
 619             if ((ret = db_create(&upgrade_db, dbd->db_env, 0))) {
 620                 LOG(log_error, logtype_cnid, "error creating handle for database: %s", db_strerror(ret));
 621                 return -1;
 622             }
 623             if ((ret = upgrade_db->upgrade(upgrade_db, dbd->db_filename, 0))) {
 624                 LOG(log_error, logtype_cnid, "error upgarding database: %s", db_strerror(ret));
 625                 return -1;
 626             }
 627             if ((ret = upgrade_db->close(upgrade_db, 0))) {
 628                 LOG(log_error, logtype_cnid, "error closing database: %s", db_strerror(ret));
 629                 return -1;
 630             }
 631             if ((ret = dbd->db_env->txn_checkpoint(dbd->db_env, 0, 0, DB_FORCE))) {
 632                 LOG(log_error, logtype_cnid, "error forcing checkpoint: %s", db_strerror(ret));
 633                 return -1;
 634             }
 635             LOG(log_debug, logtype_cnid, "Finished BerkeleyBD upgrade check");
 636         }
 637
 638         if ((fchdir(cwd)) != 0) {
 639             LOG(log_error, logtype_cnid, "error chdiring back: %s", strerror(errno));
 640             return -1;
 641         }
 642     }
 643
 644     /* Now open databases ... */
 645     for (i = 0; i != DBIF_DB_CNT; i++) {
 646         if ((ret = db_create(&dbd->db_table[i].db, dbd->db_env, 0))) {
 647             LOG(log_error, logtype_cnid, "error creating handle for database %s: %s",
 648                 dbd->db_table[i].name, db_strerror(ret));
 649             return -1;
 650         }
 651
 652         if (dbd->db_table[i].flags) {
 653             if ((ret = dbd->db_table[i].db->set_flags(dbd->db_table[i].db,
 654                                                       dbd->db_table[i].flags))) {
 655                 LOG(log_error, logtype_cnid, "error setting flags for database %s: %s",
 656                     dbd->db_table[i].name, db_strerror(ret));
 657                 return -1;
 658             }
 659         }
 660
 661         if ( ! dbd->db_env) {   /* In memory db */
 662             if ((ret = dbd->db_table[i].db->set_cachesize(dbd->db_table[i].db,
 663                                                           0,
 664                                                           dbp->cachesize,
 665                                                           4)) /* split in 4 memory chunks */
 666                 < 0)  {
 667                 LOG(log_error, logtype_cnid, "error setting cachesize %u KB for database %s: %s",
 668                     dbp->cachesize / 1024, dbd->db_table[i].name, db_strerror(ret));
 669                 return -1;
 670             }
 671         }
 672
 673         if (dbd->db_table[i].db->open(dbd->db_table[i].db,
 674                                       dbd->db_txn,
 675                                       dbd->db_filename,
 676                                       dbd->db_table[i].name,
 677                                       dbd->db_table[i].type,
 678                                       dbd->db_table[i].openflags,
 679                                       0664) < 0) {
 680             LOG(log_error, logtype_cnid, "Cant open database");
 681             return -1;
 682         }
 683
 684         if (reindex && i > 0) {
 685             LOG(log_info, logtype_cnid, "Truncating CNID index.");
 686             if ((ret = dbd->db_table[i].db->truncate(dbd->db_table[i].db, NULL, &count, 0))) {
 687                 LOG(log_error, logtype_cnid, "error truncating database %s: %s",
 688                     dbd->db_table[i].name, db_strerror(ret));
 689                 return -1;
 690             }
 691         }
 692     }
 693
 694     /* TODO: Implement CNID DB versioning info on new databases. */
 695
 696     /* Associate the secondary with the primary. */
 697     if (reindex)
 698         LOG(log_info, logtype_cnid, "Reindexing did/name index...");
 699     if ((ret = dbd->db_table[0].db->associate(dbd->db_table[DBIF_CNID].db,
 700                                               dbd->db_txn,
 701                                               dbd->db_table[DBIF_IDX_DIDNAME].db,
 702                                               didname,
 703                                               (reindex) ? DB_CREATE : 0))
 704          != 0) {
 705         LOG(log_error, logtype_cnid, "Failed to associate didname database: %s",db_strerror(ret));
 706         return -1;
 707     }
 708     if (reindex)
 709         LOG(log_info, logtype_cnid, "... done.");
 710
 711     if (reindex)
 712         LOG(log_info, logtype_cnid, "Reindexing dev/ino index...");
 713     if ((ret = dbd->db_table[0].db->associate(dbd->db_table[0].db,
 714                                               dbd->db_txn,
 715                                               dbd->db_table[DBIF_IDX_DEVINO].db,
 716                                               devino,
 717                                               (reindex) ? DB_CREATE : 0))
 718         != 0) {
 719         LOG(log_error, logtype_cnid, "Failed to associate devino database: %s",db_strerror(ret));
 720         return -1;
 721     }
 722     if (reindex)
 723         LOG(log_info, logtype_cnid, "... done.");
 724
 725     if (reindex)
 726         LOG(log_info, logtype_cnid, "Reindexing name index...");
 727
 728     /*
 729      * Upgrading from version 0 to 1 requires adding the name index below which
 730      * must be done by specifying the DB_CREATE flag
 731      */
 732     uint32_t version = CNID_VERSION;
 733     if (dbd->db_envhome && !reindex) {
 734         if (dbif_getversion(dbd, &version) == -1)
 735             return -1;
 736     }
 737
 738     if ((ret = dbd->db_table[0].db->associate(dbd->db_table[0].db,
 739                                               dbd->db_txn,
 740                                               dbd->db_table[DBIF_IDX_NAME].db,
 741                                               idxname,
 742                                               (reindex
 743                                                ||
 744                                                ((CNID_VERSION == CNID_VERSION_1) && (version == CNID_VERSION_0)))
 745                                               ? DB_CREATE : 0)) != 0) {
 746         LOG(log_error, logtype_cnid, "Failed to associate name index: %s", db_strerror(ret));
 747         return -1;
 748     }
 749     if (reindex)
 750         LOG(log_info, logtype_cnid, "... done.");
 751
 752     if ((dbd->db_envhome) && ((ret = dbif_upgrade(dbd)) != 0)) {
 753         LOG(log_error, logtype_cnid, "Error upgrading CNID database to version %d", CNID_VERSION);
 754         return -1;
 755     }
 756
 757     return 0;
 758 }
 759
 760 /* ------------------------ */
 761 static int dbif_closedb(DBD *dbd)
 762 {
 763     int i;
 764     int ret;
 765     int err = 0;
 766
 767     for (i = DBIF_DB_CNT -1; i >= 0; i--) {
 768         if (dbd->db_table[i].db != NULL && (ret = dbd->db_table[i].db->close(dbd->db_table[i].db, 0))) {
 769             LOG(log_error, logtype_cnid, "error closing database %s: %s", dbd->db_table[i].name, db_strerror(ret));
 770             err++;
 771         }
 772     }
 773     if (err)
 774         return -1;
 775     return 0;
 776 }
 777
 778 /* ------------------------ */
 779 int dbif_close(DBD *dbd)
 780 {
 781     int ret;
 782     int err = 0;
 783
 784     if (dbif_closedb(dbd))
 785         err++;
 786
 787     if (dbd->db_env != NULL && (ret = dbd->db_env->close(dbd->db_env, 0))) {
 788         LOG(log_error, logtype_cnid, "error closing DB environment: %s", db_strerror(ret));
 789         err++;
 790     }
 791     if (dbd->db_errlog != NULL && fclose(dbd->db_errlog) == EOF) {
 792         LOG(log_error, logtype_cnid, "error closing DB logfile: %s", strerror(errno));
 793         err++;
 794     }
 795
 796     free(dbd->db_filename);
 797     free(dbd);
 798     dbd = NULL;
 799
 800     if (err)
 801         return -1;
 802     return 0;
 803 }
 804
 805 /*
 806    In order to support silent database upgrades:
 807    destroy env at cnid_dbd shutdown.
 808  */
 809 int dbif_env_remove(const char *path)
 810 {
 811     int ret;
 812     DBD *dbd;
 813
 814     LOG(log_debug, logtype_cnid, "Trying to remove BerkeleyDB environment");
 815
 816     if (get_lock(LOCK_EXCL, path) != LOCK_EXCL) {
 817         LOG(log_debug, logtype_cnid, "CNID db \"%s\" in use, not removing BerkeleyDB environment", path);
 818         return 0;
 819     }
 820
 821     if (NULL == (dbd = dbif_init(path, "cnid2.db")))
 822         return -1;
 823
 824     /* Get db_env handle */
 825     if ((ret = db_env_create(&dbd->db_env, 0))) {
 826         LOG(log_error, logtype_cnid, "error creating DB environment: %s", db_strerror(ret));
 827         dbd->db_env = NULL;
 828         return -1;
 829     }
 830
 831     if ((dbif_openlog(dbd)) != 0)
 832         return -1;
 833
 834     /* Open environment with recovery */
 835     if ((ret = dbd->db_env->open(dbd->db_env,
 836                                  dbd->db_envhome,
 837                                  DB_CREATE | DB_INIT_LOG | DB_INIT_MPOOL | DB_INIT_LOCK | DB_INIT_TXN | DB_RECOVER | DB_PRIVATE,
 838                                  0))) {
 839         LOG(log_error, logtype_cnid, "error opening DB environment: %s",
 840             db_strerror(ret));
 841         dbd->db_env->close(dbd->db_env, 0);
 842         dbd->db_env = NULL;
 843         return -1;
 844     }
 845
 846     if (dbd->db_errlog != NULL)
 847         fflush(dbd->db_errlog);
 848
 849     /* Remove logfiles */
 850     if ((ret = dbd->db_env->log_archive(dbd->db_env, NULL, DB_ARCH_REMOVE))) {
 851          LOG(log_error, logtype_cnid, "error removing transaction logfiles: %s", db_strerror(ret));
 852          return -1;
 853     }
 854
 855     if ((ret = dbd->db_env->close(dbd->db_env, 0))) {
 856         LOG(log_error, logtype_cnid, "error closing DB environment after recovery: %s", db_strerror(ret));
 857         dbd->db_env = NULL;
 858         return -1;
 859     }
 860
 861     LOG(log_debug, logtype_cnid, "BerkeleyDB environment recovery done.");
 862
 863     /* Get a new db_env handle and then remove environment */
 864     if ((ret = db_env_create(&dbd->db_env, 0))) {
 865         LOG(log_error, logtype_cnid, "error acquiring db_end handle: %s", db_strerror(ret));
 866         dbd->db_env = NULL;
 867         return -1;
 868     }
 869     if ((ret = dbd->db_env->remove(dbd->db_env, dbd->db_envhome, 0))) {
 870         LOG(log_error, logtype_cnid, "error removing BerkeleyDB environment: %s", db_strerror(ret));
 871         return -1;
 872     }
 873
 874     LOG(log_debug, logtype_cnid, "Removed BerkeleyDB environment.");
 875
 876     return 0;
 877 }
 878
 879 /*
 880  *  The following three functions are wrappers for DB->get(), DB->put() and DB->del().
 881  *  All three return -1 on error. dbif_get()/dbif_del return 1 if the key was found and 0
 882  *  otherwise. dbif_put() returns 0 if key/val was successfully updated and 1 if
 883  *  the DB_NOOVERWRITE flag was specified and the key already exists.
 884  *
 885  *  All return codes other than DB_NOTFOUND and DB_KEYEXIST from the DB->()
 886  *  functions are not expected and therefore error conditions.
 887  */
 888
 889 int dbif_get(DBD *dbd, const int dbi, DBT *key, DBT *val, u_int32_t flags)
 890 {
 891     int ret;
 892
 893     ret = dbd->db_table[dbi].db->get(dbd->db_table[dbi].db,
 894                                      dbd->db_txn,
 895                                      key,
 896                                      val,
 897                                      flags);
 898
 899     if (ret == DB_NOTFOUND)
 900         return 0;
 901     if (ret) {
 902         LOG(log_error, logtype_cnid, "error retrieving value from %s: %s",
 903             dbd->db_table[dbi].name, db_strerror(ret));
 904         return -1;
 905     } else
 906         return 1;
 907 }
 908
 909 /* search by secondary return primary */
 910 int dbif_pget(DBD *dbd, const int dbi, DBT *key, DBT *pkey, DBT *val, u_int32_t flags)
 911 {
 912     int ret;
 913
 914     ret = dbd->db_table[dbi].db->pget(dbd->db_table[dbi].db,
 915                                       dbd->db_txn,
 916                                       key,
 917                                       pkey,
 918                                       val,
 919                                       flags);
 920
 921     if (ret == DB_NOTFOUND || ret == DB_SECONDARY_BAD) {
 922         return 0;
 923     }
 924     if (ret) {
 925         LOG(log_error, logtype_cnid, "error retrieving value from %s: %s",
 926             dbd->db_table[dbi].name, db_strerror(ret));
 927         return -1;
 928    } else
 929         return 1;
 930 }
 931
 932 /* -------------------------- */
 933 int dbif_put(DBD *dbd, const int dbi, DBT *key, DBT *val, u_int32_t flags)
 934 {
 935     int ret;
 936
 937     if (dbif_txn_begin(dbd) < 0) {
 938         LOG(log_error, logtype_cnid, "error setting key/value in %s", dbd->db_table[dbi].name);
 939         return -1;
 940     }
 941
 942     ret = dbd->db_table[dbi].db->put(dbd->db_table[dbi].db,
 943                                      dbd->db_txn,
 944                                      key,
 945                                      val,
 946                                      flags);
 947
 948
 949     if (ret) {
 950         if ((flags & DB_NOOVERWRITE) && ret == DB_KEYEXIST) {
 951             return 1;
 952         } else {
 953             LOG(log_error, logtype_cnid, "error setting key/value in %s: %s",
 954                 dbd->db_table[dbi].name, db_strerror(ret));
 955             return -1;
 956         }
 957     } else
 958         return 0;
 959 }
 960
 961 int dbif_del(DBD *dbd, const int dbi, DBT *key, u_int32_t flags)
 962 {
 963     int ret;
 964
 965     /* For cooperation with the dbd utility and its usage of a cursor */
 966     if (dbd->db_cur) {
 967         dbd->db_cur->close(dbd->db_cur);
 968         dbd->db_cur = NULL;
 969     }
 970
 971     if (dbif_txn_begin(dbd) < 0) {
 972         LOG(log_error, logtype_cnid, "error deleting key/value from %s", dbd->db_table[dbi].name);
 973         return -1;
 974     }
 975
 976     ret = dbd->db_table[dbi].db->del(dbd->db_table[dbi].db,
 977                                      dbd->db_txn,
 978                                      key,
 979                                      flags);
 980
 981     if (ret == DB_NOTFOUND) {
 982         LOG(log_debug, logtype_cnid, "key not found");
 983         return 0;
 984     }
 985     if (ret) {
 986         LOG(log_error, logtype_cnid, "error deleting key/value from %s: %s",
 987             dbd->db_table[dbi].name, db_strerror(ret));
 988         return -1;
 989     } else
 990         return 1;
 991 }
 992
 993 /*!
 994  * Search the database by name
 995  *
 996  * @param resbuf    (w) buffer for search results CNIDs, maxsize is assumed to be
 997  *                      DBD_MAX_SRCH_RSLTS * sizefof(cnid_t)
 998  *
 999  * @returns -1 on error, 0 when nothing found, else the number of matches
1000  */
1001 int dbif_search(DBD *dbd, DBT *key, char *resbuf)
1002 {
1003     int ret = 0;
1004     int count = 0;
1005     DBC *cursorp = NULL;
1006     DBT pkey, data;
1007     char *cnids = resbuf;
1008     cnid_t cnid;
1009     char *namebkp = key->data;
1010     int namelenbkp = key->size;
1011
1012     memset(&pkey, 0, sizeof(DBT));
1013     memset(&data, 0, sizeof(DBT));
1014
1015     /* Get a cursor */
1016     ret = dbd->db_table[DBIF_IDX_NAME].db->cursor(dbd->db_table[DBIF_IDX_NAME].db,
1017                                                   NULL,
1018                                                   &cursorp,
1019                                                   0);
1020     if (ret != 0) {
1021         LOG(log_error, logtype_cnid, "Couldn't create cursor: %s", db_strerror(ret));
1022         ret = -1;
1023         goto exit;
1024     }
1025
1026     ret = cursorp->pget(cursorp, key, &pkey, &data, DB_SET_RANGE);
1027     while (count < DBD_MAX_SRCH_RSLTS && ret != DB_NOTFOUND) {
1028         if (!((namelenbkp <= key->size) && (strncmp(namebkp, key->data, namelenbkp) == 0)))
1029             break;
1030         count++;
1031         memcpy(cnids, pkey.data, sizeof(cnid_t));
1032         memcpy(&cnid, pkey.data, sizeof(cnid_t));
1033         cnids += sizeof(cnid_t);
1034         LOG(log_debug, logtype_cnid, "match: CNID %" PRIu32, ntohl(cnid));
1035
1036         ret = cursorp->pget(cursorp, key, &pkey, &data, DB_NEXT);
1037     }
1038
1039     ret = count;
1040
1041 exit:
1042     if (cursorp != NULL)
1043         cursorp->close(cursorp);
1044     return ret;
1045 }
1046
1047 int dbif_txn_begin(DBD *dbd)
1048 {
1049     int ret;
1050
1051     /* If we already have an active txn, just return */
1052     if (dbd->db_txn)
1053         return 0;
1054
1055     /* If our DBD has no env, just return (-> in memory db) */
1056     if (dbd->db_env == NULL)
1057         return 0;
1058
1059     ret = dbd->db_env->txn_begin(dbd->db_env, NULL, &dbd->db_txn, 0);
1060
1061     if (ret) {
1062         LOG(log_error, logtype_cnid, "error starting transaction: %s", db_strerror(ret));
1063         return -1;
1064     } else
1065         return 0;
1066 }
1067
1068 int dbif_txn_commit(DBD *dbd)
1069 {
1070     int ret;
1071
1072     if (! dbd->db_txn)
1073         return 0;
1074
1075     /* If our DBD has no env, just return (-> in memory db) */
1076     if (dbd->db_env == NULL)
1077         return 0;
1078
1079     ret = dbd->db_txn->commit(dbd->db_txn, 0);
1080     dbd->db_txn = NULL;
1081
1082     if (ret) {
1083         LOG(log_error, logtype_cnid, "error committing transaction: %s", db_strerror(ret));
1084         return -1;
1085     } else
1086         return 1;
1087 }
1088
1089 int dbif_txn_abort(DBD *dbd)
1090 {
1091     int ret;
1092
1093     if (! dbd->db_txn)
1094         return 0;
1095
1096     /* If our DBD has no env, just return (-> in memory db) */
1097     if (dbd->db_env == NULL)
1098         return 0;
1099
1100     ret = dbd->db_txn->abort(dbd->db_txn);
1101     dbd->db_txn = NULL;
1102
1103     if (ret) {
1104         LOG(log_error, logtype_cnid, "error aborting transaction: %s", db_strerror(ret));
1105         return -1;
1106     } else
1107         return 0;
1108 }
1109
1110 /*
1111    ret = 1 -> commit txn if db_param.txn_frequency
1112    ret = 0 -> abort txn db_param.txn_frequency -> exit!
1113    anything else -> exit!
1114
1115    @returns 0 on success (abort or commit), -1 on error
1116 */
1117 int dbif_txn_close(DBD *dbd, int ret)
1118 {
1119     if (ret == 0) {
1120         if (dbif_txn_abort(dbd) < 0) {
1121             LOG( log_error, logtype_cnid, "Fatal error aborting transaction. Exiting!");
1122             return -1;
1123         }
1124     } else if (ret == 1) {
1125         ret = dbif_txn_commit(dbd);
1126         if (  ret < 0) {
1127             LOG( log_error, logtype_cnid, "Fatal error committing transaction. Exiting!");
1128             return -1;
1129         }
1130     } else {
1131         return -1;
1132     }
1133
1134     return 0;
1135 }
1136
1137 int dbif_txn_checkpoint(DBD *dbd, u_int32_t kbyte, u_int32_t min, u_int32_t flags)
1138 {
1139     int ret;
1140     ret = dbd->db_env->txn_checkpoint(dbd->db_env, kbyte, min, flags);
1141     if (ret) {
1142         LOG(log_error, logtype_cnid, "error checkpointing transaction susystem: %s", db_strerror(ret));
1143         return -1;
1144     } else
1145         return 0;
1146 }
1147
1148 int dbif_count(DBD *dbd, const int dbi, u_int32_t *count)
1149 {
1150     int ret;
1151     DB_BTREE_STAT *sp;
1152     DB *db = dbd->db_table[dbi].db;
1153
1154     ret = db->stat(db, NULL, &sp, 0);
1155
1156     if (ret) {
1157         LOG(log_error, logtype_cnid, "error getting stat infotmation on database: %s", db_strerror(ret));
1158         return -1;
1159     }
1160
1161     *count = sp->bt_ndata;
1162     free(sp);
1163
1164     return 0;
1165 }
1166
1167 int dbif_copy_rootinfokey(DBD *srcdbd, DBD *destdbd)
1168 {
1169     DBT key, data;
1170     int rc;
1171
1172     memset(&key, 0, sizeof(key));
1173     memset(&data, 0, sizeof(data));
1174
1175     key.data = ROOTINFO_KEY;
1176     key.size = ROOTINFO_KEYLEN;
1177
1178     if ((rc = dbif_get(srcdbd, DBIF_CNID, &key, &data, 0)) <= 0) {
1179         LOG(log_error, logtype_cnid, "dbif_copy_rootinfokey: Error getting rootinfo record");
1180         return -1;
1181     }
1182
1183     memset(&key, 0, sizeof(key));
1184     key.data = ROOTINFO_KEY;
1185     key.size = ROOTINFO_KEYLEN;
1186
1187     if ((rc = dbif_put(destdbd, DBIF_CNID, &key, &data, 0))) {
1188         LOG(log_error, logtype_cnid, "dbif_copy_rootinfokey: Error writing rootinfo key");
1189         return -1;
1190     }
1191
1192     return 0;
1193 }
1194
1195 int dbif_dump(DBD *dbd, int dumpindexes)
1196 {
1197     int rc;
1198     uint32_t max = 0, count = 0, cnid, type, did, lastid, version;
1199     uint64_t dev, ino;
1200     time_t stamp;
1201     DBC *cur;
1202     DBT key = { 0 }, data = { 0 };
1203     DB *db = dbd->db_table[DBIF_CNID].db;
1204     char *typestring[2] = {"f", "d"};
1205     char timebuf[64];
1206
1207     printf("CNID database dump:\n");
1208
1209     rc = db->cursor(db, NULL, &cur, 0);
1210     if (rc) {
1211         LOG(log_error, logtype_cnid, "Couldn't create cursor: %s", db_strerror(rc));
1212         return -1;
1213     }
1214
1215     cur->c_get(cur, &key, &data, DB_FIRST);
1216     while (rc == 0) {
1217         /* Parse and print data */
1218         memcpy(&cnid, key.data, 4);
1219         cnid = ntohl(cnid);
1220         if (cnid > max)
1221             max = cnid;
1222
1223         /* Rootinfo node ? */
1224         if (cnid == 0) {
1225             memcpy(&stamp, (char *)data.data + CNID_DEV_OFS, sizeof(time_t));
1226             memcpy(&lastid, (char *)data.data + CNID_TYPE_OFS, CNID_TYPE_LEN);
1227             lastid = ntohl(lastid);
1228             memcpy(&version, (char *)data.data + CNID_DID_OFS, CNID_DID_LEN);
1229             version = ntohl(version);
1230
1231             strftime(timebuf, sizeof(timebuf), "%b %d %Y %H:%M:%S", localtime(&stamp));
1232             printf("CNID db version: %u, dbd stamp: 0x%08x (%s), next free CNID: %u\n",
1233                    version, (unsigned int)stamp, timebuf, lastid + 1);
1234         } else {
1235             /* dev */
1236             memcpy(&dev, (char *)data.data + CNID_DEV_OFS, 8);
1237             dev = ntoh64(dev);
1238             /* ino */
1239             memcpy(&ino, (char *)data.data + CNID_INO_OFS, 8);
1240             ino = ntoh64(ino);
1241             /* type */
1242             memcpy(&type, (char *)data.data + CNID_TYPE_OFS, 4);
1243             type = ntohl(type);
1244             /* did */
1245             memcpy(&did, (char *)data.data + CNID_DID_OFS, 4);
1246             did = ntohl(did);
1247
1248             count++;
1249             printf("id: %10u, did: %10u, type: %s, dev: 0x%llx, ino: 0x%016llx, name: %s\n",
1250                    cnid, did, typestring[type],
1251                    (long long unsigned int)dev, (long long unsigned int)ino,
1252                    (char *)data.data + CNID_NAME_OFS);
1253
1254         }
1255
1256         rc = cur->c_get(cur, &key, &data, DB_NEXT);
1257     }
1258
1259     if (rc != DB_NOTFOUND) {
1260         LOG(log_error, logtype_cnid, "Error iterating over btree: %s", db_strerror(rc));
1261         return -1;
1262     }
1263
1264     rc = cur->c_close(cur);
1265     if (rc) {
1266         LOG(log_error, logtype_cnid, "Couldn't close cursor: %s", db_strerror(rc));
1267         return -1;
1268     }
1269     printf("%u CNIDs in database. Max CNID: %u.\n", count, max);
1270
1271     /* Dump indexes too ? */
1272     if (dumpindexes) {
1273         /* DBIF_IDX_DEVINO */
1274         printf("\ndev/inode index:\n");
1275         count = 0;
1276         db = dbd->db_table[DBIF_IDX_DEVINO].db;
1277         rc = db->cursor(db, NULL, &cur, 0);
1278         if (rc) {
1279             LOG(log_error, logtype_cnid, "Couldn't create cursor: %s", db_strerror(rc));
1280             return -1;
1281         }
1282
1283         cur->c_get(cur, &key, &data, DB_FIRST);
1284         while (rc == 0) {
1285             /* Parse and print data */
1286
1287             /* cnid */
1288             memcpy(&cnid, data.data, CNID_LEN);
1289             cnid = ntohl(cnid);
1290             if (cnid == 0) {
1291                 /* Rootinfo node */
1292             } else {
1293                 /* dev */
1294                 memcpy(&dev, key.data, CNID_DEV_LEN);
1295                 dev = ntoh64(dev);
1296                 /* ino */
1297                 memcpy(&ino, (char *)key.data + CNID_DEV_LEN, CNID_INO_LEN);
1298                 ino = ntoh64(ino);
1299
1300                 printf("id: %10u <== dev: 0x%llx, ino: 0x%016llx\n",
1301                        cnid, (unsigned long long int)dev, (unsigned long long int)ino);
1302                 count++;
1303             }
1304             rc = cur->c_get(cur, &key, &data, DB_NEXT);
1305         }
1306         if (rc != DB_NOTFOUND) {
1307             LOG(log_error, logtype_cnid, "Error iterating over btree: %s", db_strerror(rc));
1308             return -1;
1309         }
1310
1311         rc = cur->c_close(cur);
1312         if (rc) {
1313             LOG(log_error, logtype_cnid, "Couldn't close cursor: %s", db_strerror(rc));
1314             return -1;
1315         }
1316         printf("%u items\n", count);
1317
1318         /* Now dump DBIF_IDX_DIDNAME */
1319         printf("\ndid/name index:\n");
1320         count = 0;
1321         db = dbd->db_table[DBIF_IDX_DIDNAME].db;
1322         rc = db->cursor(db, NULL, &cur, 0);
1323         if (rc) {
1324             LOG(log_error, logtype_cnid, "Couldn't create cursor: %s", db_strerror(rc));
1325             return -1;
1326         }
1327
1328         cur->c_get(cur, &key, &data, DB_FIRST);
1329         while (rc == 0) {
1330             /* Parse and print data */
1331
1332             /* cnid */
1333             memcpy(&cnid, data.data, CNID_LEN);
1334             cnid = ntohl(cnid);
1335             if (cnid == 0) {
1336                 /* Rootinfo node */
1337             } else {
1338                 /* did */
1339                 memcpy(&did, key.data, CNID_LEN);
1340                 did = ntohl(did);
1341
1342                 printf("id: %10u <== did: %10u, name: %s\n", cnid, did, (char *)key.data + CNID_LEN);
1343                 count++;
1344             }
1345             rc = cur->c_get(cur, &key, &data, DB_NEXT);
1346         }
1347         if (rc != DB_NOTFOUND) {
1348             LOG(log_error, logtype_cnid, "Error iterating over btree: %s", db_strerror(rc));
1349             return -1;
1350         }
1351
1352         rc = cur->c_close(cur);
1353         if (rc) {
1354             LOG(log_error, logtype_cnid, "Couldn't close cursor: %s", db_strerror(rc));
1355             return -1;
1356         }
1357         printf("%u items\n", count);
1358     }
1359
1360     return 0;
1361 }
1362
1363 /*
1364    Iterates over dbd, returning cnids.
1365    Uses in-value of cnid to seek to that cnid, then gets next and return that in cnid.
1366    If close=1, close cursor.
1367    Return -1 on error, 0 on EOD (end-of-database), 1 if returning cnid.
1368 */
1369 int dbif_idwalk(DBD *dbd, cnid_t *cnid, int close)
1370 {
1371     int rc;
1372     int flag;
1373     cnid_t id;
1374
1375     static DBT key = { 0 }, data = { 0 };
1376     DB *db = dbd->db_table[DBIF_CNID].db;
1377
1378     if (close) {
1379         if (dbd->db_cur) {
1380             dbd->db_cur->close(dbd->db_cur);
1381             dbd->db_cur = NULL;
1382         }
1383         return 0;
1384     }
1385
1386     /* An dbif_del will have closed our cursor too */
1387     if ( ! dbd->db_cur ) {
1388         if ((rc = db->cursor(db, NULL, &dbd->db_cur, 0)) != 0) {
1389             LOG(log_error, logtype_cnid, "Couldn't create cursor: %s", db_strerror(rc));
1390             return -1;
1391         }
1392         flag = DB_SET_RANGE;    /* This will seek to next cnid after the one just deleted */
1393         id = htonl(*cnid);
1394         key.data = &id;
1395         key.size = sizeof(cnid_t);
1396     } else
1397         flag = DB_NEXT;
1398
1399     if ((rc = dbd->db_cur->get(dbd->db_cur, &key, &data, flag)) == 0) {
1400         memcpy(cnid, key.data, sizeof(cnid_t));
1401         *cnid = ntohl(*cnid);
1402         return 1;
1403     }
1404
1405     if (rc != DB_NOTFOUND) {
1406         LOG(log_error, logtype_cnid, "Error iterating over btree: %s", db_strerror(rc));
1407         dbd->db_cur->close(dbd->db_cur);
1408         dbd->db_cur = NULL;
1409         return -1;
1410     }
1411
1412     if (dbd->db_cur) {
1413         dbd->db_cur->close(dbd->db_cur);
1414         dbd->db_cur = NULL;
1415     }
1416
1417     return 0;
1418 }