#include "db_config.h"
#include "db_int.h"
#include "dbinc/db_page.h"
#include "dbinc/btree.h"
#include "dbinc/fop.h"
#include "dbinc/hash.h"
#include "dbinc/log.h"
#include "dbinc/qam.h"
#include "dbinc/txn.h"
#ifndef lint
static const char copyright[] =
"Copyright (c) 1996,2008 Oracle. All rights reserved.\n";
#endif
int db_printlog_print_app_record __P((DB_ENV *, DBT *, DB_LSN *, db_recops));
int db_printlog_env_init_print __P((ENV *, u_int32_t, DB_DISTAB *));
int db_printlog_env_init_print_42 __P((ENV *, DB_DISTAB *));
int db_printlog_env_init_print_43 __P((ENV *, DB_DISTAB *));
int db_printlog_env_init_print_45 __P((ENV *, DB_DISTAB *));
int db_printlog_lsn_arg __P((char *, DB_LSN *));
int db_printlog_main __P((int, char *[]));
int db_printlog_open_rep_db __P((DB_ENV *, DB **, DBC **));
int db_printlog_usage __P((void));
int db_printlog_version_check __P((void));
const char *progname;
int
db_printlog(args)
char *args;
{
int argc;
char **argv;
__db_util_arg("db_printlog", args, &argc, &argv);
return (db_printlog_main(argc, argv) ? EXIT_FAILURE : EXIT_SUCCESS);
}
#include <stdio.h>
#define ERROR_RETURN ERROR
int
db_printlog_main(argc, argv)
int argc;
char *argv[];
{
extern char *optarg;
extern int optind, __db_getopt_reset;
DB *dbp;
DBC *dbc;
DBT data, keydbt;
DB_DISTAB dtab;
DB_ENV *dbenv;
DB_LOGC *logc;
DB_LSN key, start, stop, verslsn;
ENV *env;
u_int32_t logcflag, newversion, version;
int ch, cmp, exitval, nflag, rflag, ret, repflag;
char *home, *passwd;
if ((progname = __db_rpath(argv[0])) == NULL)
progname = argv[0];
else
++progname;
if ((ret = db_printlog_version_check()) != 0)
return (ret);
dbp = NULL;
dbc = NULL;
dbenv = NULL;
logc = NULL;
ZERO_LSN(start);
ZERO_LSN(stop);
exitval = nflag = rflag = repflag = 0;
home = passwd = NULL;
memset(&dtab, 0, sizeof(dtab));
__db_getopt_reset = 1;
while ((ch = getopt(argc, argv, "b:e:h:NP:rRV")) != EOF)
switch (ch) {
case 'b':
if (db_printlog_lsn_arg(optarg, &start))
return (db_printlog_usage());
break;
case 'e':
if (db_printlog_lsn_arg(optarg, &stop))
return (db_printlog_usage());
break;
case 'h':
home = optarg;
break;
case 'N':
nflag = 1;
break;
case 'P':
passwd = strdup(optarg);
memset(optarg, 0, strlen(optarg));
if (passwd == NULL) {
fprintf(stderr, "%s: strdup: %s\n",
progname, strerror(errno));
return (EXIT_FAILURE);
}
break;
case 'r':
rflag = 1;
break;
case 'R':
repflag = 1;
break;
case 'V':
printf("%s\n", db_version(NULL, NULL, NULL));
return (EXIT_SUCCESS);
case '?':
default:
return (db_printlog_usage());
}
argc -= optind;
argv += optind;
if (argc > 0)
return (db_printlog_usage());
__db_util_siginit();
if ((ret = db_env_create(&dbenv, 0)) != 0) {
fprintf(stderr,
"%s: db_env_create: %s\n", progname, db_strerror(ret));
goto shutdown;
}
dbenv->set_errfile(dbenv, stderr);
dbenv->set_errpfx(dbenv, progname);
if (nflag) {
if ((ret = dbenv->set_flags(dbenv, DB_NOLOCKING, 1)) != 0) {
dbenv->err(dbenv, ret, "set_flags: DB_NOLOCKING");
goto shutdown;
}
if ((ret = dbenv->set_flags(dbenv, DB_NOPANIC, 1)) != 0) {
dbenv->err(dbenv, ret, "set_flags: DB_NOPANIC");
goto shutdown;
}
}
if (passwd != NULL && (ret = dbenv->set_encrypt(dbenv,
passwd, DB_ENCRYPT_AES)) != 0) {
dbenv->err(dbenv, ret, "set_passwd");
goto shutdown;
}
if ((ret = dbenv->set_app_dispatch(
dbenv, db_printlog_print_app_record)) != 0) {
dbenv->err(dbenv, ret, "app_dispatch");
goto shutdown;
}
if (repflag) {
if ((ret = dbenv->open(dbenv, home,
DB_INIT_MPOOL | DB_USE_ENVIRON, 0)) != 0 &&
(ret == DB_VERSION_MISMATCH ||
(ret = dbenv->open(dbenv, home,
DB_CREATE | DB_INIT_MPOOL | DB_PRIVATE | DB_USE_ENVIRON, 0))
!= 0)) {
dbenv->err(dbenv, ret, "DB_ENV->open");
goto shutdown;
}
} else if ((ret = dbenv->open(dbenv, home, DB_USE_ENVIRON, 0)) != 0 &&
(ret == DB_VERSION_MISMATCH ||
(ret = dbenv->open(dbenv, home,
DB_CREATE | DB_INIT_LOG | DB_PRIVATE | DB_USE_ENVIRON, 0)) != 0)) {
dbenv->err(dbenv, ret, "DB_ENV->open");
goto shutdown;
}
env = dbenv->env;
if (repflag) {
if ((ret = db_printlog_open_rep_db(dbenv, &dbp, &dbc)) != 0)
goto shutdown;
} else if ((ret = dbenv->log_cursor(dbenv, &logc, 0)) != 0) {
dbenv->err(dbenv, ret, "DB_ENV->log_cursor");
goto shutdown;
}
if (IS_ZERO_LSN(start)) {
memset(&keydbt, 0, sizeof(keydbt));
logcflag = rflag ? DB_PREV : DB_NEXT;
} else {
key = start;
logcflag = DB_SET;
}
memset(&data, 0, sizeof(data));
if (repflag)
version = DB_LOGVERSION;
else
version = 0;
ZERO_LSN(verslsn);
if (repflag &&
(ret = db_printlog_env_init_print(env, version, &dtab)) != 0) {
dbenv->err(dbenv, ret, "callback: initialization");
goto shutdown;
}
for (; !__db_util_interrupted(); logcflag = rflag ? DB_PREV : DB_NEXT) {
if (repflag) {
ret = dbc->get(dbc, &keydbt, &data, logcflag);
if (ret == 0)
key = ((__rep_control_args *)keydbt.data)->lsn;
} else
ret = logc->get(logc, &key, &data, logcflag);
if (ret != 0) {
if (ret == DB_NOTFOUND)
break;
dbenv->err(dbenv,
ret, repflag ? "DBC->get" : "DB_LOGC->get");
goto shutdown;
}
if (!IS_ZERO_LSN(stop)) {
cmp = LOG_COMPARE(&key, &stop);
if ((rflag && cmp < 0) || (!rflag && cmp > 0))
break;
}
if (!repflag && key.file != verslsn.file) {
if ((ret = logc->version(logc, &newversion, 0)) != 0) {
dbenv->err(dbenv, ret, "DB_LOGC->version");
goto shutdown;
}
if (version != newversion) {
version = newversion;
if ((ret = db_printlog_env_init_print(env, version,
&dtab)) != 0) {
dbenv->err(dbenv, ret,
"callback: initialization");
goto shutdown;
}
}
}
ret = __db_dispatch(dbenv->env,
&dtab, &data, &key, DB_TXN_PRINT, NULL);
(void)fflush(stdout);
if (ret != 0) {
dbenv->err(dbenv, ret, "tx: dispatch");
goto shutdown;
}
}
if (0) {
shutdown: exitval = 1;
}
if (logc != NULL && (ret = logc->close(logc, 0)) != 0)
exitval = 1;
if (dbc != NULL && (ret = dbc->close(dbc)) != 0)
exitval = 1;
if (dbp != NULL && (ret = dbp->close(dbp, 0)) != 0)
exitval = 1;
if (dbenv != NULL && (ret = dbenv->close(dbenv, 0)) != 0) {
exitval = 1;
fprintf(stderr,
"%s: dbenv->close: %s\n", progname, db_strerror(ret));
}
if (passwd != NULL)
free(passwd);
__db_util_sigresend();
return (exitval == 0 ? EXIT_SUCCESS : EXIT_FAILURE);
}
int
db_printlog_env_init_print(env, version, dtabp)
ENV *env;
u_int32_t version;
DB_DISTAB *dtabp;
{
int ret;
if ((ret = db_printlog_env_init_print_45(env, dtabp)) != 0)
return (ret);
switch (version) {
case DB_LOGVERSION_47:
case DB_LOGVERSION_46:
case DB_LOGVERSION_45:
case DB_LOGVERSION_44:
ret = 0;
break;
case DB_LOGVERSION_43:
ret = db_printlog_env_init_print_43(env, dtabp);
break;
case DB_LOGVERSION_42:
ret = db_printlog_env_init_print_42(env, dtabp);
break;
default:
env->dbenv->errx(env->dbenv,
"Unknown version %lu", (u_long)version);
ret = EINVAL;
break;
}
return (ret);
}
int
db_printlog_env_init_print_42(env, dtabp)
ENV *env;
DB_DISTAB *dtabp;
{
int ret;
if ((ret = __db_add_recovery_int(env, dtabp,
__db_relink_42_print, DB___db_relink_42)) != 0)
goto err;
if ((ret = __db_add_recovery_int(env, dtabp,
__db_pg_alloc_42_print, DB___db_pg_alloc_42)) != 0)
goto err;
if ((ret = __db_add_recovery_int(env, dtabp,
__db_pg_free_42_print, DB___db_pg_free_42)) != 0)
goto err;
if ((ret = __db_add_recovery_int(env, dtabp,
__db_pg_freedata_42_print, DB___db_pg_freedata_42)) != 0)
goto err;
#if HAVE_HASH
if ((ret = __db_add_recovery_int(env, dtabp,
__ham_metagroup_42_print, DB___ham_metagroup_42)) != 0)
goto err;
if ((ret = __db_add_recovery_int(env, dtabp,
__ham_groupalloc_42_print, DB___ham_groupalloc_42)) != 0)
goto err;
#endif
if ((ret = __db_add_recovery_int(env, dtabp,
__txn_ckp_42_print, DB___txn_ckp_42)) != 0)
goto err;
if ((ret = __db_add_recovery_int(env, dtabp,
__txn_regop_42_print, DB___txn_regop_42)) != 0)
goto err;
err:
return (ret);
}
int
db_printlog_env_init_print_43(env, dtabp)
ENV *env;
DB_DISTAB *dtabp;
{
int ret;
if ((ret = __db_add_recovery_int(env, dtabp,
__bam_relink_43_print, DB___bam_relink_43)) != 0)
goto err;
if ((ret = __db_add_recovery_int(env, dtabp,
__txn_regop_42_print, DB___txn_regop_42)) != 0)
goto err;
err:
return (ret);
}
int
db_printlog_env_init_print_45(env, dtabp)
ENV *env;
DB_DISTAB *dtabp;
{
int ret;
if ((ret = __bam_init_print(env, dtabp)) != 0)
goto err;
if ((ret = __crdel_init_print(env, dtabp)) != 0)
goto err;
if ((ret = __db_init_print(env, dtabp)) != 0)
goto err;
if ((ret = __dbreg_init_print(env, dtabp)) != 0)
goto err;
if ((ret = __fop_init_print(env, dtabp)) != 0)
goto err;
#ifdef HAVE_HASH
if ((ret = __ham_init_print(env, dtabp)) != 0)
goto err;
#endif
#ifdef HAVE_QUEUE
if ((ret = __qam_init_print(env, dtabp)) != 0)
goto err;
#endif
if ((ret = __txn_init_print(env, dtabp)) != 0)
goto err;
err:
return (ret);
}
int
db_printlog_usage()
{
fprintf(stderr, "usage: %s %s\n", progname,
"[-NrV] [-b file/offset] [-e file/offset] [-h home] [-P password]");
return (EXIT_FAILURE);
}
int
db_printlog_version_check()
{
int v_major, v_minor, v_patch;
(void)db_version(&v_major, &v_minor, &v_patch);
if (v_major != DB_VERSION_MAJOR || v_minor != DB_VERSION_MINOR) {
fprintf(stderr,
"%s: version %d.%d doesn't match library version %d.%d\n",
progname, DB_VERSION_MAJOR, DB_VERSION_MINOR,
v_major, v_minor);
return (EXIT_FAILURE);
}
return (0);
}
int
db_printlog_print_app_record(dbenv, dbt, lsnp, op)
DB_ENV *dbenv;
DBT *dbt;
DB_LSN *lsnp;
db_recops op;
{
u_int32_t i, rectype;
int ch;
DB_ASSERT(dbenv->env, op == DB_TXN_PRINT);
COMPQUIET(dbenv, NULL);
COMPQUIET(op, DB_TXN_PRINT);
memcpy(&rectype, dbt->data, sizeof(rectype));
printf("[%lu][%lu]application specific record: rec: %lu\n",
(u_long)lsnp->file, (u_long)lsnp->offset, (u_long)rectype);
printf("\tdata: ");
for (i = 0; i < dbt->size; i++) {
ch = ((u_int8_t *)dbt->data)[i];
printf(isprint(ch) || ch == 0x0a ? "%c" : "%#x ", ch);
}
printf("\n\n");
return (0);
}
int
db_printlog_open_rep_db(dbenv, dbpp, dbcp)
DB_ENV *dbenv;
DB **dbpp;
DBC **dbcp;
{
int ret;
DB *dbp;
*dbpp = NULL;
*dbcp = NULL;
if ((ret = db_create(dbpp, dbenv, 0)) != 0) {
dbenv->err(dbenv, ret, "db_create");
return (ret);
}
dbp = *dbpp;
if ((ret =
dbp->open(dbp, NULL, REPDBNAME, NULL, DB_BTREE, 0, 0)) != 0) {
dbenv->err(dbenv, ret, "DB->open");
goto err;
}
if ((ret = dbp->cursor(dbp, NULL, dbcp, 0)) != 0) {
dbenv->err(dbenv, ret, "DB->cursor");
goto err;
}
return (0);
err: if (*dbpp != NULL)
(void)(*dbpp)->close(*dbpp, 0);
return (ret);
}
int
db_printlog_lsn_arg(arg, lsnp)
char *arg;
DB_LSN *lsnp;
{
u_long uval;
char *p;
if ((p = strchr(arg, '/')) == NULL)
return (1);
*p = '\0';
if (__db_getulong(NULL, progname, arg, 0, UINT32_MAX, &uval))
return (1);
lsnp->file = uval;
if (__db_getulong(NULL, progname, p + 1, 0, UINT32_MAX, &uval))
return (1);
lsnp->offset = uval;
return (0);
}