etc/cnid_dbd/dbif.c

   1 /*
   2  * $Id: dbif.c,v 1.11 2009-05-18 09:54:14 franklahm Exp $
   3  *
   4  * Copyright (C) Joerg Lenneis 2003
   5  * Copyright (C) Frank Lahm 2009
   6  * All Rights Reserved.  See COPYING.
   7  */
   8
   9 #ifdef HAVE_CONFIG_H
  10 #include "config.h"
  11 #endif /* HAVE_CONFIG_H */
  12
  13 #include <stdio.h>
  14 #include <errno.h>
  15 #include <stdlib.h>
  16 #ifdef HAVE_SYS_TYPES_H
  17 #include <sys/types.h>
  18 #endif /* HAVE_SYS_TYPES_H */
  19 #include <string.h>
  20 #include <sys/types.h>
  21 #include <sys/stat.h>
  22 #include <sys/cdefs.h>
  23 #include <unistd.h>
  24 #include <atalk/logger.h>
  25 #include <db.h>
  26 #include "db_param.h"
  27 #include "dbif.h"
  28 #include "pack.h"
  29
  30 #define DB_ERRLOGFILE "db_errlog"
  31
  32 static char *old_dbfiles[] = {"cnid.db", NULL};
  33
  34 /* --------------- */
  35 static int upgrade_required()
  36 {
  37     int i;
  38     int found = 0;
  39     struct stat st;
  40
  41     for (i = 0; old_dbfiles[i] != NULL; i++) {
  42         if ( !(stat(old_dbfiles[i], &st) < 0) ) {
  43             found++;
  44             continue;
  45         }
  46         if (errno != ENOENT) {
  47             LOG(log_error, logtype_cnid, "cnid_open: Checking %s gave %s", old_dbfiles[i], strerror(errno));
  48             found++;
  49         }
  50     }
  51     return found;
  52 }
  53
  54 /* --------------- */
  55 int dbif_stamp(DBD *dbd, void *buffer, int size)
  56 {
  57     struct stat st;
  58     int         rc;
  59
  60     if (size < 8)
  61         return -1;
  62
  63     if ((rc = stat(dbd->db_table[DBIF_CNID].name, &st)) < 0) {
  64         LOG(log_error, logtype_cnid, "error stating database %s: %s", dbd->db_table[DBIF_CNID].name, db_strerror(rc));
  65         return -1;
  66     }
  67     memset(buffer, 0, size);
  68     memcpy(buffer, &st.st_ctime, sizeof(st.st_ctime));
  69
  70     return 0;
  71 }
  72
  73 /* --------------- */
  74 DBD *dbif_init(const char *envhome, const char *filename)
  75 {
  76     DBD *dbd;
  77
  78     if ( NULL == (dbd = calloc(sizeof(DBD), 1)) )
  79         return NULL;
  80
  81     /* filename == NULL means in memory db */
  82     if (filename) {
  83         if (! envhome)
  84             return NULL;
  85
  86         dbd->db_envhome = strdup(envhome);
  87         if (NULL == dbd->db_envhome) {
  88             free(dbd);
  89             return NULL;
  90         }
  91
  92         dbd->db_filename = strdup(filename);
  93         if (NULL == dbd->db_filename) {
  94             free(dbd->db_envhome);
  95             free(dbd);
  96             return NULL;
  97         }
  98     }
  99
 100     dbd->db_table[DBIF_CNID].name        = "cnid2.db";
 101     dbd->db_table[DBIF_IDX_DEVINO].name  = "devino.db";
 102     dbd->db_table[DBIF_IDX_DIDNAME].name = "didname.db";
 103
 104     dbd->db_table[DBIF_CNID].type        = DB_BTREE;
 105     dbd->db_table[DBIF_IDX_DEVINO].type  = DB_BTREE;
 106     dbd->db_table[DBIF_IDX_DIDNAME].type = DB_BTREE;
 107
 108     dbd->db_table[DBIF_CNID].openflags        = DB_CREATE;
 109     dbd->db_table[DBIF_IDX_DEVINO].openflags  = DB_CREATE;
 110     dbd->db_table[DBIF_IDX_DIDNAME].openflags = DB_CREATE;
 111
 112     return dbd;
 113 }
 114
 115 /*
 116    We must open the db_env with an absolute pathname, as `dbd` keeps chdir'ing, which
 117    breaks e.g. bdb logfile-rotation with relative pathnames.
 118    But still we use relative paths with upgrade_required() and the DB_ERRLOGFILE
 119    in order to avoid creating absolute paths by copying. Both have no problem with
 120    a relative path.
 121 */
 122 int dbif_env_open(DBD *dbd, struct db_param *dbp, uint32_t dbenv_oflags)
 123 {
 124     int ret, cwd;
 125     char **logfiles = NULL;
 126     char **file;
 127
 128     /* Remember cwd */
 129     if ((cwd = open(".", O_RDONLY)) < 0) {
 130         LOG(log_error, logtype_cnid, "error opening cwd: %s", strerror(errno));
 131         return -1;
 132     }
 133
 134     /* chdir to db_envhome. makes it easier checking for old db files and creating db_errlog file  */
 135     if ((chdir(dbd->db_envhome)) != 0) {
 136         LOG(log_error, logtype_cnid, "error chdiring to db_env '%s': %s", dbd->db_envhome, strerror(errno));
 137         return -1;
 138     }
 139
 140     /* Refuse to do anything if this is an old version of the CNID database */
 141     if (upgrade_required()) {
 142         LOG(log_error, logtype_cnid, "Found version 1 of the CNID database. Please upgrade to version 2");
 143         return -1;
 144     }
 145
 146     if ((dbd->db_errlog = fopen(DB_ERRLOGFILE, "a")) == NULL)
 147         LOG(log_warning, logtype_cnid, "error creating/opening DB errlogfile: %s", strerror(errno));
 148
 149     if ((fchdir(cwd)) != 0) {
 150         LOG(log_error, logtype_cnid, "error chdiring back: %s", strerror(errno));
 151         return -1;
 152     }
 153
 154     if ((ret = db_env_create(&dbd->db_env, 0))) {
 155         LOG(log_error, logtype_cnid, "error creating DB environment: %s",
 156             db_strerror(ret));
 157         dbd->db_env = NULL;
 158         return -1;
 159     }
 160
 161     if (dbd->db_errlog != NULL) {
 162         dbd->db_env->set_errfile(dbd->db_env, dbd->db_errlog);
 163         dbd->db_env->set_msgfile(dbd->db_env, dbd->db_errlog);
 164     }
 165
 166     if (dbenv_oflags & DB_RECOVER) {
 167         dbd->db_env->set_verbose(dbd->db_env, DB_VERB_RECOVERY, 1);
 168         /* Open the database for recovery using DB_PRIVATE option which is faster */
 169         if ((ret = dbd->db_env->open(dbd->db_env, dbd->db_envhome, dbenv_oflags | DB_PRIVATE, 0))) {
 170             LOG(log_error, logtype_cnid, "error opening DB environment: %s",
 171                 db_strerror(ret));
 172             dbd->db_env->close(dbd->db_env, 0);
 173             dbd->db_env = NULL;
 174             return -1;
 175         }
 176         dbenv_oflags = (dbenv_oflags & ~DB_RECOVER);
 177
 178         if (dbd->db_errlog != NULL)
 179             fflush(dbd->db_errlog);
 180
 181         if ((ret = dbd->db_env->close(dbd->db_env, 0))) {
 182             LOG(log_error, logtype_cnid, "error closing DB environment after recovery: %s",
 183                 db_strerror(ret));
 184             dbd->db_env = NULL;
 185             return -1;
 186         }
 187
 188         if ((ret = db_env_create(&dbd->db_env, 0))) {
 189             LOG(log_error, logtype_cnid, "error creating DB environment after recovery: %s",
 190                 db_strerror(ret));
 191             dbd->db_env = NULL;
 192             return -1;
 193         }
 194     }
 195
 196     if ((ret = dbd->db_env->set_cachesize(dbd->db_env, 0, 1024 * dbp->cachesize, 0))) {
 197         LOG(log_error, logtype_cnid, "error setting DB environment cachesize to %i: %s",
 198             dbp->cachesize, db_strerror(ret));
 199         dbd->db_env->close(dbd->db_env, 0);
 200         dbd->db_env = NULL;
 201         return -1;
 202     }
 203
 204     if (dbd->db_errlog != NULL) {
 205         dbd->db_env->set_errfile(dbd->db_env, dbd->db_errlog);
 206         dbd->db_env->set_msgfile(dbd->db_env, dbd->db_errlog);
 207     }
 208     if ((ret = dbd->db_env->open(dbd->db_env, dbd->db_envhome, dbenv_oflags, 0))) {
 209         LOG(log_error, logtype_cnid, "error opening DB environment after recovery: %s",
 210             db_strerror(ret));
 211         dbd->db_env->close(dbd->db_env, 0);
 212         dbd->db_env = NULL;
 213         return -1;
 214     }
 215
 216     if ((ret = dbd->db_env->set_flags(dbd->db_env, DB_AUTO_COMMIT, 1))) {
 217         LOG(log_error, logtype_cnid, "error setting DB_AUTO_COMMIT flag: %s",
 218             db_strerror(ret));
 219         dbd->db_env->close(dbd->db_env, 0);
 220         dbd->db_env = NULL;
 221         return -1;
 222     }
 223
 224     if (dbp->logfile_autoremove) {
 225         if (dbd->db_env->log_archive(dbd->db_env, &logfiles, 0)) {
 226             LOG(log_error, logtype_cnid, "error getting list of stale logfiles: %s",
 227                 db_strerror(ret));
 228             dbd->db_env->close(dbd->db_env, 0);
 229             dbd->db_env = NULL;
 230             return -1;
 231         }
 232         if (logfiles != NULL) {
 233             for (file = logfiles; *file != NULL; file++) {
 234                 if (unlink(*file) < 0)
 235                     LOG(log_warning, logtype_cnid, "Error removing stale logfile %s: %s", *file, strerror(errno));
 236             }
 237             free(logfiles);
 238         }
 239
 240 #if DB_VERSION_MAJOR > 4 || (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR >= 7)
 241         if ((ret = dbd->db_env->log_set_config(dbd->db_env, DB_LOG_AUTO_REMOVE, 1))) {
 242             LOG(log_error, logtype_cnid, "error setting DB_LOG_AUTO_REMOVE flag: %s",
 243             db_strerror(ret));
 244             dbd->db_env->close(dbd->db_env, 0);
 245             dbd->db_env = NULL;
 246             return -1;
 247         }
 248 #else
 249         if ((ret = dbd->db_env->set_flags(dbd->db_env, DB_LOG_AUTOREMOVE, 1))) {
 250             LOG(log_error, logtype_cnid, "error setting DB_LOG_AUTOREMOVE flag: %s",
 251                 db_strerror(ret));
 252             dbd->db_env->close(dbd->db_env, 0);
 253             dbd->db_env = NULL;
 254             return -1;
 255         }
 256 #endif
 257     }
 258
 259     return 0;
 260 }
 261
 262 /* --------------- */
 263 int dbif_open(DBD *dbd, struct db_param *dbp _U_, int do_truncate)
 264 {
 265     int ret;
 266     int i;
 267     u_int32_t count;
 268
 269     for (i = 0; i != DBIF_DB_CNT; i++) {
 270         if ((ret = db_create(&dbd->db_table[i].db, dbd->db_env, 0))) {
 271             LOG(log_error, logtype_cnid, "error creating handle for database %s: %s",
 272                 dbd->db_table[i].name, db_strerror(ret));
 273             return -1;
 274         }
 275
 276         if (dbd->db_table[i].flags) {
 277             if ((ret = dbd->db_table[i].db->set_flags(dbd->db_table[i].db,
 278                                                       dbd->db_table[i].flags))) {
 279                 LOG(log_error, logtype_cnid, "error setting flags for database %s: %s",
 280                     dbd->db_table[i].name, db_strerror(ret));
 281                 return -1;
 282             }
 283         }
 284
 285         if (dbd->db_table[i].db->open(dbd->db_table[i].db,
 286                                       dbd->db_txn,
 287                                       dbd->db_filename,
 288                                       dbd->db_table[i].name,
 289                                       dbd->db_table[i].type,
 290                                       dbd->db_table[i].openflags,
 291                                       0664) < 0) {
 292             LOG(log_error, logtype_cnid, "Cant open database");
 293             return -1;
 294         }
 295         if (dbd->db_errlog != NULL)
 296             dbd->db_table[i].db->set_errfile(dbd->db_table[i].db, dbd->db_errlog);
 297
 298         if (do_truncate && i > 0) {
 299             LOG(log_info, logtype_cnid, "Truncating CNID index.");
 300             if ((ret = dbd->db_table[i].db->truncate(dbd->db_table[i].db, NULL, &count, 0))) {
 301                 LOG(log_error, logtype_cnid, "error truncating database %s: %s",
 302                     dbd->db_table[i].name, db_strerror(ret));
 303                 return -1;
 304             }
 305         }
 306     }
 307
 308     /* TODO: Implement CNID DB versioning info on new databases. */
 309
 310     /* Associate the secondary with the primary. */
 311     if (do_truncate)
 312         LOG(log_info, logtype_cnid, "Reindexing did/name index...");
 313     if ((ret = dbd->db_table[0].db->associate(dbd->db_table[DBIF_CNID].db,
 314                                               dbd->db_txn,
 315                                               dbd->db_table[DBIF_IDX_DIDNAME].db,
 316                                               didname,
 317                                               (do_truncate) ? DB_CREATE : 0))
 318          != 0) {
 319         LOG(log_error, logtype_cnid, "Failed to associate didname database: %s",db_strerror(ret));
 320         return -1;
 321     }
 322     if (do_truncate)
 323         LOG(log_info, logtype_cnid, "... done.");
 324
 325     if (do_truncate)
 326         LOG(log_info, logtype_cnid, "Reindexing dev/ino index...");
 327     if ((ret = dbd->db_table[0].db->associate(dbd->db_table[0].db,
 328                                               dbd->db_txn,
 329                                               dbd->db_table[DBIF_IDX_DEVINO].db,
 330                                               devino,
 331                                               (do_truncate) ? DB_CREATE : 0))
 332         != 0) {
 333         LOG(log_error, logtype_cnid, "Failed to associate devino database: %s",db_strerror(ret));
 334         return -1;
 335     }
 336     if (do_truncate)
 337         LOG(log_info, logtype_cnid, "... done.");
 338
 339     return 0;
 340 }
 341
 342 /* ------------------------ */
 343 int dbif_closedb(DBD *dbd)
 344 {
 345     int i;
 346     int ret;
 347     int err = 0;
 348
 349     for (i = DBIF_DB_CNT -1; i >= 0; i--) {
 350         if (dbd->db_table[i].db != NULL && (ret = dbd->db_table[i].db->close(dbd->db_table[i].db, 0))) {
 351             LOG(log_error, logtype_cnid, "error closing database %s: %s", dbd->db_table[i].name, db_strerror(ret));
 352             err++;
 353         }
 354     }
 355     if (err)
 356         return -1;
 357     return 0;
 358 }
 359
 360 /* ------------------------ */
 361 int dbif_close(DBD *dbd)
 362 {
 363     int ret;
 364     int err = 0;
 365
 366     if (dbif_closedb(dbd))
 367         err++;
 368
 369     if (dbd->db_env != NULL && (ret = dbd->db_env->close(dbd->db_env, 0))) {
 370         LOG(log_error, logtype_cnid, "error closing DB environment: %s", db_strerror(ret));
 371         err++;
 372     }
 373     if (dbd->db_errlog != NULL && fclose(dbd->db_errlog) == EOF) {
 374         LOG(log_error, logtype_cnid, "error closing DB logfile: %s", strerror(errno));
 375         err++;
 376     }
 377
 378     free(dbd->db_filename);
 379     free(dbd);
 380     dbd = NULL;
 381
 382     if (err)
 383         return -1;
 384     return 0;
 385 }
 386
 387 /*
 388  *  The following three functions are wrappers for DB->get(), DB->put() and DB->del().
 389  *  All three return -1 on error. dbif_get()/dbif_del return 1 if the key was found and 0
 390  *  otherwise. dbif_put() returns 0 if key/val was successfully updated and 1 if
 391  *  the DB_NOOVERWRITE flag was specified and the key already exists.
 392  *
 393  *  All return codes other than DB_NOTFOUND and DB_KEYEXIST from the DB->()
 394  *  functions are not expected and therefore error conditions.
 395  */
 396
 397 int dbif_get(DBD *dbd, const int dbi, DBT *key, DBT *val, u_int32_t flags)
 398 {
 399     int ret;
 400
 401     ret = dbd->db_table[dbi].db->get(dbd->db_table[dbi].db,
 402                                      dbd->db_txn,
 403                                      key,
 404                                      val,
 405                                      flags);
 406
 407     if (ret == DB_NOTFOUND)
 408         return 0;
 409     if (ret) {
 410         LOG(log_error, logtype_cnid, "error retrieving value from %s: %s",
 411             dbd->db_table[dbi].name, db_strerror(errno));
 412         return -1;
 413     } else
 414         return 1;
 415 }
 416
 417 /* search by secondary return primary */
 418 int dbif_pget(DBD *dbd, const int dbi, DBT *key, DBT *pkey, DBT *val, u_int32_t flags)
 419 {
 420     int ret;
 421
 422     ret = dbd->db_table[dbi].db->pget(dbd->db_table[dbi].db,
 423                                       dbd->db_txn,
 424                                       key,
 425                                       pkey,
 426                                       val,
 427                                       flags);
 428
 429     if (ret == DB_NOTFOUND || ret == DB_SECONDARY_BAD) {
 430         return 0;
 431     }
 432     if (ret) {
 433         LOG(log_error, logtype_cnid, "error retrieving value from %s: %s",
 434             dbd->db_table[dbi].name, db_strerror(errno));
 435         return -1;
 436    } else
 437         return 1;
 438 }
 439
 440 /* -------------------------- */
 441 int dbif_put(DBD *dbd, const int dbi, DBT *key, DBT *val, u_int32_t flags)
 442 {
 443     int ret;
 444
 445     if (dbif_txn_begin(dbd) < 0) {
 446         LOG(log_error, logtype_cnid, "error setting key/value in %s: %s",
 447             dbd->db_table[dbi].name, db_strerror(errno));
 448         return -1;
 449     }
 450
 451     ret = dbd->db_table[dbi].db->put(dbd->db_table[dbi].db,
 452                                      dbd->db_txn,
 453                                      key,
 454                                      val,
 455                                      flags);
 456
 457     if (ret) {
 458         if ((flags & DB_NOOVERWRITE) && ret == DB_KEYEXIST) {
 459             return 1;
 460         } else {
 461             LOG(log_error, logtype_cnid, "error setting key/value in %s: %s",
 462                 dbd->db_table[dbi].name, db_strerror(errno));
 463             return -1;
 464         }
 465     } else
 466         return 0;
 467 }
 468
 469 int dbif_del(DBD *dbd, const int dbi, DBT *key, u_int32_t flags)
 470 {
 471     int ret;
 472
 473     if (dbif_txn_begin(dbd) < 0) {
 474         LOG(log_error, logtype_cnid, "error deleting key/value from %s: %s",
 475             dbd->db_table[dbi].name, db_strerror(errno));
 476         return -1;
 477     }
 478
 479     ret = dbd->db_table[dbi].db->del(dbd->db_table[dbi].db,
 480                                      dbd->db_txn,
 481                                      key,
 482                                      flags);
 483
 484     if (ret == DB_NOTFOUND || ret == DB_SECONDARY_BAD)
 485         return 0;
 486     if (ret) {
 487         LOG(log_error, logtype_cnid, "error deleting key/value from %s: %s",
 488             dbd->db_table[dbi].name, db_strerror(errno));
 489         return -1;
 490     } else
 491         return 1;
 492 }
 493
 494 int dbif_txn_begin(DBD *dbd)
 495 {
 496     int ret;
 497
 498     /* If we already have an active txn, just return */
 499     if (dbd->db_txn)
 500         return 0;
 501
 502     /* If our DBD has no env, just return (-> in memory db) */
 503     if (dbd->db_env == NULL)
 504         return 0;
 505
 506     ret = dbd->db_env->txn_begin(dbd->db_env, NULL, &dbd->db_txn, 0);
 507
 508     if (ret) {
 509         LOG(log_error, logtype_cnid, "error starting transaction: %s", db_strerror(errno));
 510         return -1;
 511     } else
 512         return 0;
 513 }
 514
 515 int dbif_txn_commit(DBD *dbd)
 516 {
 517     int ret;
 518
 519     if (! dbd->db_txn)
 520         return 0;
 521
 522     /* If our DBD has no env, just return (-> in memory db) */
 523     if (dbd->db_env == NULL)
 524         return 0;
 525
 526     ret = dbd->db_txn->commit(dbd->db_txn, 0);
 527     dbd->db_txn = NULL;
 528
 529     if (ret) {
 530         LOG(log_error, logtype_cnid, "error committing transaction: %s", db_strerror(errno));
 531         return -1;
 532     } else
 533         return 1;
 534 }
 535
 536 int dbif_txn_abort(DBD *dbd)
 537 {
 538     int ret;
 539
 540     if (! dbd->db_txn)
 541         return 0;
 542
 543     /* If our DBD has no env, just return (-> in memory db) */
 544     if (dbd->db_env == NULL)
 545         return 0;
 546
 547     ret = dbd->db_txn->abort(dbd->db_txn);
 548     dbd->db_txn = NULL;
 549
 550     if (ret) {
 551         LOG(log_error, logtype_cnid, "error aborting transaction: %s", db_strerror(errno));
 552         return -1;
 553     } else
 554         return 0;
 555 }
 556
 557 /*
 558    ret = 1 -> commit txn
 559    ret = 0 -> abort txn -> exit!
 560    anything else -> exit!
 561 */
 562 void dbif_txn_close(DBD *dbd, int ret)
 563 {
 564     if (ret == 0) {
 565         if (dbif_txn_abort(dbd) < 0) {
 566             LOG( log_error, logtype_cnid, "Fatal error aborting transaction. Exiting!");
 567             exit(EXIT_FAILURE);
 568         }
 569     } else if (ret == 1) {
 570         ret = dbif_txn_commit(dbd);
 571         if (  ret < 0) {
 572             LOG( log_error, logtype_cnid, "Fatal error committing transaction. Exiting!");
 573             exit(EXIT_FAILURE);
 574         }
 575     } else
 576        exit(EXIT_FAILURE);
 577 }
 578
 579 int dbif_txn_checkpoint(DBD *dbd, u_int32_t kbyte, u_int32_t min, u_int32_t flags)
 580 {
 581     int ret;
 582     ret = dbd->db_env->txn_checkpoint(dbd->db_env, kbyte, min, flags);
 583     if (ret) {
 584         LOG(log_error, logtype_cnid, "error checkpointing transaction susystem: %s", db_strerror(errno));
 585         return -1;
 586     } else
 587         return 0;
 588 }
 589
 590 int dbif_count(DBD *dbd, const int dbi, u_int32_t *count)
 591 {
 592     int ret;
 593     DB_BTREE_STAT *sp;
 594     DB *db = dbd->db_table[dbi].db;
 595
 596     ret = db->stat(db, NULL, &sp, 0);
 597
 598     if (ret) {
 599         LOG(log_error, logtype_cnid, "error getting stat infotmation on database: %s", db_strerror(errno));
 600         return -1;
 601     }
 602
 603     *count = sp->bt_ndata;
 604     free(sp);
 605
 606     return 0;
 607 }
 608
 609 int dbif_copy_rootinfokey(DBD *srcdbd, DBD *destdbd)
 610 {
 611     DBT key, data;
 612     int rc;
 613
 614     memset(&key, 0, sizeof(key));
 615     memset(&data, 0, sizeof(data));
 616
 617     key.data = ROOTINFO_KEY;
 618     key.size = ROOTINFO_KEYLEN;
 619
 620     if ((rc = dbif_get(srcdbd, DBIF_CNID, &key, &data, 0)) <= 0) {
 621         LOG(log_error, logtype_cnid, "dbif_copy_rootinfokey: Error getting rootinfo record");
 622         return -1;
 623     }
 624
 625     memset(&key, 0, sizeof(key));
 626     key.data = ROOTINFO_KEY;
 627     key.size = ROOTINFO_KEYLEN;
 628
 629     if ((rc = dbif_put(destdbd, DBIF_CNID, &key, &data, 0))) {
 630         LOG(log_error, logtype_cnid, "dbif_copy_rootinfokey: Error writing rootinfo key");
 631         return -1;
 632     }
 633
 634     return 0;
 635 }
 636
 637 int dbif_dump(DBD *dbd, int dumpindexes)
 638 {
 639     int rc;
 640     uint32_t max = 0, count = 0, cnid, type, did, lastid;
 641     uint64_t dev, ino;
 642     time_t stamp;
 643     DBC *cur;
 644     DBT key = { 0 }, data = { 0 };
 645     DB *db = dbd->db_table[DBIF_CNID].db;
 646     char *typestring[2] = {"f", "d"};
 647     char timebuf[64];
 648
 649     printf("CNID database dump:\n");
 650
 651     rc = db->cursor(db, NULL, &cur, 0);
 652     if (rc) {
 653         LOG(log_error, logtype_cnid, "Couldn't create cursor: %s", db_strerror(errno));
 654         return -1;
 655     }
 656
 657     cur->c_get(cur, &key, &data, DB_FIRST);
 658     while (rc == 0) {
 659         /* Parse and print data */
 660         memcpy(&cnid, key.data, 4);
 661         cnid = ntohl(cnid);
 662         if (cnid > max)
 663             max = cnid;
 664
 665         /* Rootinfo node ? */
 666         if (cnid == 0) {
 667             memcpy(&stamp, data.data + 4, sizeof(time_t));
 668             memcpy(&lastid, data.data + 20, sizeof(cnid_t));
 669             lastid = ntohl(lastid);
 670             strftime(timebuf, sizeof(timebuf), "%b %d %Y %H:%M:%S", localtime(&stamp));
 671             printf("dbd stamp: 0x%08x (%s), next free CNID: %u\n", (unsigned int)stamp, timebuf, lastid + 1);
 672         } else {
 673             /* dev */
 674             memcpy(&dev, data.data + CNID_DEV_OFS, 8);
 675             dev = ntoh64(dev);
 676             /* ino */
 677             memcpy(&ino, data.data + CNID_INO_OFS, 8);
 678             ino = ntoh64(ino);
 679             /* type */
 680             memcpy(&type, data.data + CNID_TYPE_OFS, 4);
 681             type = ntohl(type);
 682             /* did */
 683             memcpy(&did, data.data + CNID_DID_OFS, 4);
 684             did = ntohl(did);
 685
 686             count++;
 687             printf("id: %10u, did: %10u, type: %s, dev: 0x%llx, ino: 0x%016llx, name: %s\n",
 688                    cnid, did, typestring[type],
 689                    (long long unsigned int)dev, (long long unsigned int)ino,
 690                    (char *)data.data + CNID_NAME_OFS);
 691
 692         }
 693
 694         rc = cur->c_get(cur, &key, &data, DB_NEXT);
 695     }
 696
 697     if (rc != DB_NOTFOUND) {
 698         LOG(log_error, logtype_cnid, "Error iterating over btree: %s", db_strerror(errno));
 699         return -1;
 700     }
 701
 702     rc = cur->c_close(cur);
 703     if (rc) {
 704         LOG(log_error, logtype_cnid, "Couldn't close cursor: %s", db_strerror(errno));
 705         return -1;
 706     }
 707     printf("%u CNIDs in database. Max CNID: %u.\n", count, max);
 708
 709     /* Dump indexes too ? */
 710     if (dumpindexes) {
 711         /* DBIF_IDX_DEVINO */
 712         printf("\ndev/inode index:\n");
 713         count = 0;
 714         db = dbd->db_table[DBIF_IDX_DEVINO].db;
 715         rc = db->cursor(db, NULL, &cur, 0);
 716         if (rc) {
 717             LOG(log_error, logtype_cnid, "Couldn't create cursor: %s", db_strerror(errno));
 718             return -1;
 719         }
 720
 721         cur->c_get(cur, &key, &data, DB_FIRST);
 722         while (rc == 0) {
 723             /* Parse and print data */
 724
 725             /* cnid */
 726             memcpy(&cnid, data.data, CNID_LEN);
 727             cnid = ntohl(cnid);
 728             if (cnid == 0) {
 729                 /* Rootinfo node */
 730             } else {
 731                 /* dev */
 732                 memcpy(&dev, key.data, CNID_DEV_LEN);
 733                 dev = ntoh64(dev);
 734                 /* ino */
 735                 memcpy(&ino, key.data + CNID_DEV_LEN, CNID_INO_LEN);
 736                 ino = ntoh64(ino);
 737
 738                 printf("id: %10u <== dev: 0x%llx, ino: 0x%016llx\n",
 739                        cnid, (unsigned long long int)dev, (unsigned long long int)ino);
 740                 count++;
 741             }
 742             rc = cur->c_get(cur, &key, &data, DB_NEXT);
 743         }
 744         if (rc != DB_NOTFOUND) {
 745             LOG(log_error, logtype_cnid, "Error iterating over btree: %s", db_strerror(errno));
 746             return -1;
 747         }
 748
 749         rc = cur->c_close(cur);
 750         if (rc) {
 751             LOG(log_error, logtype_cnid, "Couldn't close cursor: %s", db_strerror(errno));
 752             return -1;
 753         }
 754         printf("%u items\n", count);
 755
 756         /* Now dump DBIF_IDX_DIDNAME */
 757         printf("\ndid/name index:\n");
 758         count = 0;
 759         db = dbd->db_table[DBIF_IDX_DIDNAME].db;
 760         rc = db->cursor(db, NULL, &cur, 0);
 761         if (rc) {
 762             LOG(log_error, logtype_cnid, "Couldn't create cursor: %s", db_strerror(errno));
 763             return -1;
 764         }
 765
 766         cur->c_get(cur, &key, &data, DB_FIRST);
 767         while (rc == 0) {
 768             /* Parse and print data */
 769
 770             /* cnid */
 771             memcpy(&cnid, data.data, CNID_LEN);
 772             cnid = ntohl(cnid);
 773             if (cnid == 0) {
 774                 /* Rootinfo node */
 775             } else {
 776                 /* did */
 777                 memcpy(&did, key.data, CNID_LEN);
 778                 did = ntohl(did);
 779
 780                 printf("id: %10u <== did: %10u, name: %s\n", cnid, did, (char *)key.data + CNID_LEN);
 781                 count++;
 782             }
 783             rc = cur->c_get(cur, &key, &data, DB_NEXT);
 784         }
 785         if (rc != DB_NOTFOUND) {
 786             LOG(log_error, logtype_cnid, "Error iterating over btree: %s", db_strerror(errno));
 787             return -1;
 788         }
 789
 790         rc = cur->c_close(cur);
 791         if (rc) {
 792             LOG(log_error, logtype_cnid, "Couldn't close cursor: %s", db_strerror(errno));
 793             return -1;
 794         }
 795         printf("%u items\n", count);
 796     }
 797
 798     return 0;
 799 }
 800