#ifndef lint
static const char copyright[] =
"Copyright (c) 1996,2008 Oracle. All rights reserved.\n";
#endif
#include <sys/types.h>
#include <ctype.h>
#include <errno.h>
#include <fcntl.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#ifdef HAVE_DB_185_H
#include <db_185.h>
#else
#include <db.h>
#endif
typedef struct hashhdr185 {
int magic;
int version;
u_int32_t lorder;
int bsize;
int bshift;
int dsize;
int ssize;
int sshift;
int ovfl_point;
int last_freed;
int max_bucket;
int high_mask;
int low_mask;
int ffactor;
int nkeys;
} HASHHDR185;
typedef struct htab185 {
HASHHDR185 hdr;
} HTAB185;
typedef struct hashhdr186 {
int32_t magic;
int32_t version;
int32_t lorder;
int32_t bsize;
int32_t bshift;
int32_t ovfl_point;
int32_t last_freed;
int32_t max_bucket;
int32_t high_mask;
int32_t low_mask;
int32_t ffactor;
int32_t nkeys;
int32_t hdrpages;
int32_t h_charkey;
#define NCACHED 32
int32_t spares[NCACHED];
u_int16_t bitmaps[NCACHED];
} HASHHDR186;
typedef struct htab186 {
void *unused[2];
HASHHDR186 hdr;
} HTAB186;
typedef struct _epgno {
u_int32_t pgno;
u_int16_t index;
} EPGNO;
typedef struct _epg {
void *page;
u_int16_t index;
} EPG;
typedef struct _cursor {
EPGNO pg;
DBT key;
u_int32_t rcursor;
#define CURS_ACQUIRE 0x01
#define CURS_AFTER 0x02
#define CURS_BEFORE 0x04
#define CURS_INIT 0x08
u_int8_t flags;
} CURSOR;
typedef struct _btree {
void *bt_mp;
void *bt_dbp;
EPG bt_cur;
void *bt_pinned;
CURSOR bt_cursor;
EPGNO bt_stack[50];
EPGNO *bt_sp;
DBT bt_rkey;
DBT bt_rdata;
int bt_fd;
u_int32_t bt_free;
u_int32_t bt_psize;
u_int16_t bt_ovflsize;
int bt_lorder;
enum { NOT, BACK, FORWARD } bt_order;
EPGNO bt_last;
int (*bt_cmp) __P((DBT *, DBT *));
size_t (*bt_pfx) __P((DBT *, DBT *));
int (*bt_irec) __P((struct _btree *, u_int32_t));
FILE *bt_rfp;
int bt_rfd;
void *bt_cmap;
void *bt_smap;
void *bt_emap;
size_t bt_msize;
u_int32_t bt_nrecs;
size_t bt_reclen;
u_char bt_bval;
#define B_INMEM 0x00001
#define B_METADIRTY 0x00002
#define B_MODIFIED 0x00004
#define B_NEEDSWAP 0x00008
#define B_RDONLY 0x00010
#define B_NODUPS 0x00020
#define R_RECNO 0x00080
#define R_CLOSEFP 0x00040
#define R_EOF 0x00100
#define R_FIXLEN 0x00200
#define R_MEMMAPPED 0x00400
#define R_INMEM 0x00800
#define R_MODIFIED 0x01000
#define R_RDONLY 0x02000
#define B_DB_LOCK 0x04000
#define B_DB_SHMEM 0x08000
#define B_DB_TXN 0x10000
u_int32_t flags;
} BTREE;
void db_btree __P((DB *, int));
void db_hash __P((DB *, int));
void dbt_dump __P((DBT *));
void dbt_print __P((DBT *));
int main __P((int, char *[]));
int usage __P((void));
int
main(argc, argv)
int argc;
char *argv[];
{
extern char *optarg;
extern int optind;
DB *dbp;
DBT key, data;
int ch, pflag, rval;
pflag = 0;
while ((ch = getopt(argc, argv, "f:p")) != EOF)
switch (ch) {
case 'f':
if (freopen(optarg, "w", stdout) == NULL) {
fprintf(stderr, "db_dump185: %s: %s\n",
optarg, strerror(errno));
return (EXIT_FAILURE);
}
break;
case 'p':
pflag = 1;
break;
case '?':
default:
return (usage());
}
argc -= optind;
argv += optind;
if (argc != 1)
return (usage());
if ((dbp = dbopen(argv[0], O_RDONLY, 0, DB_BTREE, NULL)) == NULL) {
if ((dbp =
dbopen(argv[0], O_RDONLY, 0, DB_HASH, NULL)) == NULL) {
fprintf(stderr,
"db_dump185: %s: %s\n", argv[0], strerror(errno));
return (EXIT_FAILURE);
}
db_hash(dbp, pflag);
} else
db_btree(dbp, pflag);
if (pflag)
while (!(rval = dbp->seq(dbp, &key, &data, R_NEXT))) {
dbt_print(&key);
dbt_print(&data);
}
else
while (!(rval = dbp->seq(dbp, &key, &data, R_NEXT))) {
dbt_dump(&key);
dbt_dump(&data);
}
if (rval == -1) {
fprintf(stderr, "db_dump185: seq: %s\n", strerror(errno));
return (EXIT_FAILURE);
}
return (EXIT_SUCCESS);
}
void
db_hash(dbp, pflag)
DB *dbp;
int pflag;
{
HTAB185 *hash185p;
HTAB186 *hash186p;
printf("format=%s\n", pflag ? "print" : "bytevalue");
printf("type=hash\n");
hash185p = dbp->internal;
if (hash185p->hdr.version > 2) {
hash186p = dbp->internal;
printf("h_ffactor=%lu\n", (u_long)hash186p->hdr.ffactor);
if (hash186p->hdr.lorder != 0)
printf("db_lorder=%lu\n", (u_long)hash186p->hdr.lorder);
printf("db_pagesize=%lu\n", (u_long)hash186p->hdr.bsize);
} else {
printf("h_ffactor=%lu\n", (u_long)hash185p->hdr.ffactor);
if (hash185p->hdr.lorder != 0)
printf("db_lorder=%lu\n", (u_long)hash185p->hdr.lorder);
printf("db_pagesize=%lu\n", (u_long)hash185p->hdr.bsize);
}
printf("HEADER=END\n");
}
void
db_btree(dbp, pflag)
DB *dbp;
int pflag;
{
BTREE *btp;
btp = dbp->internal;
printf("format=%s\n", pflag ? "print" : "bytevalue");
printf("type=btree\n");
#ifdef NOT_AVAILABLE_IN_185
printf("bt_minkey=%lu\n", (u_long)XXX);
printf("bt_maxkey=%lu\n", (u_long)XXX);
#endif
if (btp->bt_lorder != 0)
printf("db_lorder=%lu\n", (u_long)btp->bt_lorder);
printf("db_pagesize=%lu\n", (u_long)btp->bt_psize);
if (!(btp->flags & B_NODUPS))
printf("duplicates=1\n");
printf("HEADER=END\n");
}
static char hex[] = "0123456789abcdef";
void
dbt_dump(dbtp)
DBT *dbtp;
{
size_t len;
u_int8_t *p;
for (len = dbtp->size, p = dbtp->data; len--; ++p)
(void)printf("%c%c",
hex[(*p & 0xf0) >> 4], hex[*p & 0x0f]);
printf("\n");
}
void
dbt_print(dbtp)
DBT *dbtp;
{
size_t len;
u_int8_t *p;
for (len = dbtp->size, p = dbtp->data; len--; ++p)
if (isprint((int)*p)) {
if (*p == '\\')
(void)printf("\\");
(void)printf("%c", *p);
} else
(void)printf("\\%c%c",
hex[(*p & 0xf0) >> 4], hex[*p & 0x0f]);
printf("\n");
}
int
usage()
{
(void)fprintf(stderr, "usage: db_dump185 [-p] [-f file] db_file\n");
return (EXIT_FAILURE);
}