lib/tdb/tools/tdbdump.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    simple tdb dump util
   4    Copyright (C) Andrew Tridgell              2001
   5
   6    This program is free software; you can redistribute it and/or modify
   7    it under the terms of the GNU General Public License as published by
   8    the Free Software Foundation; either version 3 of the License, or
   9    (at your option) any later version.
  10
  11    This program is distributed in the hope that it will be useful,
  12    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14    GNU General Public License for more details.
  15
  16    You should have received a copy of the GNU General Public License
  17    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  18 */
  19
  20 #include "replace.h"
  21 #include "system/locale.h"
  22 #include "system/time.h"
  23 #include "system/filesys.h"
  24 #include "system/wait.h"
  25 #include "tdb.h"
  26
  27 static void print_data(TDB_DATA d)
  28 {
  29         unsigned char *p = (unsigned char *)d.dptr;
  30         int len = d.dsize;
  31         while (len--) {
  32                 if (isprint(*p) && !strchr("\"\\", *p)) {
  33                         fputc(*p, stdout);
  34                 } else {
  35                         printf("\\%02X", *p);
  36                 }
  37                 p++;
  38         }
  39 }
  40
  41 static int traverse_fn(TDB_CONTEXT *tdb, TDB_DATA key, TDB_DATA dbuf, void *state)
  42 {
  43         printf("{\n");
  44         printf("key(%d) = \"", (int)key.dsize);
  45         print_data(key);
  46         printf("\"\n");
  47         printf("data(%d) = \"", (int)dbuf.dsize);
  48         print_data(dbuf);
  49         printf("\"\n");
  50         printf("}\n");
  51         return 0;
  52 }
  53
  54 static void log_stderr(struct tdb_context *tdb, enum tdb_debug_level level,
  55                        const char *fmt, ...)
  56 {
  57         va_list ap;
  58         const char *name = tdb_name(tdb);
  59         const char *prefix = "";
  60
  61         if (!name)
  62                 name = "unnamed";
  63
  64         switch (level) {
  65         case TDB_DEBUG_ERROR:
  66                 prefix = "ERROR: ";
  67                 break;
  68         case TDB_DEBUG_WARNING:
  69                 prefix = "WARNING: ";
  70                 break;
  71         case TDB_DEBUG_TRACE:
  72                 return;
  73
  74         default:
  75         case TDB_DEBUG_FATAL:
  76                 prefix = "FATAL: ";
  77                 break;
  78         }
  79
  80         va_start(ap, fmt);
  81         fprintf(stderr, "tdb(%s): %s", name, prefix);
  82         vfprintf(stderr, fmt, ap);
  83         va_end(ap);
  84 }
  85
  86 static void emergency_walk(TDB_DATA key, TDB_DATA dbuf, void *keyname)
  87 {
  88         if (keyname) {
  89                 if (key.dsize != strlen(keyname))
  90                         return;
  91                 if (memcmp(key.dptr, keyname, key.dsize) != 0)
  92                         return;
  93         }
  94         traverse_fn(NULL, key, dbuf, NULL);
  95 }
  96
  97 static int dump_tdb(const char *fname, const char *keyname, bool emergency)
  98 {
  99         TDB_CONTEXT *tdb;
 100         TDB_DATA key, value;
 101         struct tdb_logging_context logfn = { log_stderr };
 102
 103         tdb = tdb_open_ex(fname, 0, 0, O_RDONLY, 0, &logfn, NULL);
 104         if (!tdb) {
 105                 printf("Failed to open %s\n", fname);
 106                 return 1;
 107         }
 108
 109         if (emergency) {
 110                 return tdb_rescue(tdb, emergency_walk, discard_const(keyname)) == 0;
 111         }
 112         if (!keyname) {
 113                 return tdb_traverse(tdb, traverse_fn, NULL) == -1 ? 1 : 0;
 114         } else {
 115                 key.dptr = discard_const_p(uint8_t, keyname);
 116                 key.dsize = strlen(keyname);
 117                 value = tdb_fetch(tdb, key);
 118                 if (!value.dptr) {
 119                         return 1;
 120                 } else {
 121                         print_data(value);
 122                         free(value.dptr);
 123                 }
 124         }
 125
 126         return 0;
 127 }
 128
 129 static void usage( void)
 130 {
 131         printf( "Usage: tdbdump [options] <filename>\n\n");
 132         printf( "   -h          this help message\n");
 133         printf( "   -k keyname  dumps value of keyname\n");
 134         printf( "   -e          emergency dump, for corrupt databases\n");
 135 }
 136
 137  int main(int argc, char *argv[])
 138 {
 139         char *fname, *keyname=NULL;
 140         bool emergency = false;
 141         int c;
 142
 143         if (argc < 2) {
 144                 printf("Usage: tdbdump <fname>\n");
 145                 exit(1);
 146         }
 147
 148         while ((c = getopt( argc, argv, "hk:e")) != -1) {
 149                 switch (c) {
 150                 case 'h':
 151                         usage();
 152                         exit( 0);
 153                 case 'k':
 154                         keyname = optarg;
 155                         break;
 156                 case 'e':
 157                         emergency = true;
 158                         break;
 159                 default:
 160                         usage();
 161                         exit( 1);
 162                 }
 163         }
 164
 165         fname = argv[optind];
 166
 167         return dump_tdb(fname, keyname, emergency);
 168 }