#include "db_config.h"
#include "db_int.h"
#include "dbinc/db_page.h"
#include "dbinc/db_am.h"
#include "dbinc/lock.h"
#include "dbinc/log.h"
#include "dbinc/mp.h"
#include "dbinc/qam.h"
#include "dbinc/txn.h"
#define QAM_DIRTY(dbp, pgno, pagep) \
if ((ret = __qam_dirty((dbp), \
pgno, pagep, NULL, (dbp)->priority)) != 0) { \
ret = __db_pgerr((dbp), (pgno), ret); \
goto out; \
}
int
__qam_incfirst_recover(dbenv, dbtp, lsnp, op, info)
DB_ENV *dbenv;
DBT *dbtp;
DB_LSN *lsnp;
db_recops op;
void *info;
{
__qam_incfirst_args *argp;
DB *file_dbp;
DBC *dbc;
DB_LOCK lock;
DB_LSN trunc_lsn;
DB_MPOOLFILE *mpf;
QMETA *meta;
QUEUE_CURSOR *cp;
db_pgno_t metapg;
u_int32_t rec_ext;
int exact, ret, t_ret;
LOCK_INIT(lock);
COMPQUIET(meta, NULL);
REC_PRINT(__qam_incfirst_print);
REC_INTRO(__qam_incfirst_read, 1, 1);
metapg = ((QUEUE *)file_dbp->q_internal)->q_meta;
if ((ret = __db_lget(dbc,
LCK_ROLLBACK, metapg, DB_LOCK_WRITE, 0, &lock)) != 0)
goto done;
if ((ret = __memp_fget(mpf, &metapg, NULL,
0, &meta)) != 0) {
if (DB_REDO(op)) {
if ((ret = __memp_fget(mpf, &metapg, NULL,
DB_MPOOL_CREATE, &meta)) != 0) {
(void)__LPUT(dbc, lock);
goto out;
}
meta->dbmeta.pgno = metapg;
meta->dbmeta.type = P_QAMMETA;
} else {
*lsnp = argp->prev_lsn;
ret = __LPUT(dbc, lock);
goto out;
}
}
if (DB_UNDO(op)) {
if (QAM_BEFORE_FIRST(meta, argp->recno)) {
REC_DIRTY(mpf, dbc->priority, &meta);
meta->first_recno = argp->recno;
}
trunc_lsn = ((DB_TXNHEAD *)info)->trunc_lsn;
if (!IS_ZERO_LSN(trunc_lsn) &&
LOG_COMPARE(&LSN(meta), &trunc_lsn) > 0) {
REC_DIRTY(mpf, dbc->priority, &meta);
LSN(meta) = trunc_lsn;
}
} else {
if (LOG_COMPARE(&LSN(meta), lsnp) < 0) {
REC_DIRTY(mpf, dbc->priority, &meta);
LSN(meta) = *lsnp;
}
if (meta->page_ext == 0)
rec_ext = 0;
else
rec_ext = meta->page_ext * meta->rec_page;
cp = (QUEUE_CURSOR *)dbc->internal;
if (meta->first_recno == RECNO_OOB)
meta->first_recno++;
while (meta->first_recno != meta->cur_recno &&
!QAM_BEFORE_FIRST(meta, argp->recno + 1)) {
if ((ret = __qam_position(dbc,
&meta->first_recno, DB_LOCK_READ, 0, &exact)) != 0)
goto err;
if (cp->page != NULL && (ret = __qam_fput(file_dbp,
cp->pgno, cp->page, dbc->priority)) != 0)
goto err;
if (exact == 1)
break;
if (cp->page != NULL &&
rec_ext != 0 && meta->first_recno % rec_ext == 0)
if ((ret =
__qam_fremove(file_dbp, cp->pgno)) != 0)
goto err;
REC_DIRTY(mpf, dbc->priority, &meta);
meta->first_recno++;
if (meta->first_recno == RECNO_OOB)
meta->first_recno++;
}
}
ret = __memp_fput(mpf, meta, dbc->priority);
if ((t_ret = __LPUT(dbc, lock)) != 0 && ret == 0)
ret = t_ret;
if (ret != 0)
goto out;
done: *lsnp = argp->prev_lsn;
ret = 0;
if (0) {
err: (void)__memp_fput(mpf, meta, dbc->priority);
(void)__LPUT(dbc, lock);
}
out: REC_CLOSE;
}
int
__qam_mvptr_recover(dbenv, dbtp, lsnp, op, info)
DB_ENV *dbenv;
DBT *dbtp;
DB_LSN *lsnp;
db_recops op;
void *info;
{
__qam_mvptr_args *argp;
DB *file_dbp;
DBC *dbc;
DB_LSN trunc_lsn;
DB_LOCK lock;
DB_MPOOLFILE *mpf;
QMETA *meta;
QUEUE_CURSOR *cp;
db_pgno_t metapg;
int cmp_n, cmp_p, exact, ret;
REC_PRINT(__qam_mvptr_print);
REC_INTRO(__qam_mvptr_read, 1, 1);
metapg = ((QUEUE *)file_dbp->q_internal)->q_meta;
if ((ret = __db_lget(dbc,
LCK_ROLLBACK, metapg, DB_LOCK_WRITE, 0, &lock)) != 0)
goto done;
if ((ret = __memp_fget(mpf, &metapg, NULL, 0, &meta)) != 0) {
if (DB_REDO(op)) {
if ((ret = __memp_fget(mpf, &metapg, NULL,
DB_MPOOL_CREATE, &meta)) != 0) {
(void)__LPUT(dbc, lock);
goto out;
}
meta->dbmeta.pgno = metapg;
meta->dbmeta.type = P_QAMMETA;
} else {
*lsnp = argp->prev_lsn;
ret = __LPUT(dbc, lock);
goto out;
}
}
cmp_n = LOG_COMPARE(lsnp, &LSN(meta));
cmp_p = LOG_COMPARE(&LSN(meta), &argp->metalsn);
if (DB_UNDO(op)) {
if ((argp->opcode & QAM_TRUNCATE) && cmp_n <= 0) {
REC_DIRTY(mpf, dbc->priority, &meta);
meta->first_recno = argp->old_first;
meta->cur_recno = argp->old_cur;
LSN(meta) = argp->metalsn;
}
trunc_lsn = ((DB_TXNHEAD *)info)->trunc_lsn;
if (!IS_ZERO_LSN(trunc_lsn) &&
LOG_COMPARE(&trunc_lsn, &LSN(meta)) < 0) {
REC_DIRTY(mpf, dbc->priority, &meta);
LSN(meta) = argp->metalsn;
}
} else if (op == DB_TXN_APPLY || cmp_p == 0) {
REC_DIRTY(mpf, dbc->priority, &meta);
cp = (QUEUE_CURSOR *)dbc->internal;
if ((argp->opcode & QAM_SETFIRST) &&
meta->first_recno == argp->old_first) {
if (argp->old_first > argp->new_first)
meta->first_recno = argp->new_first;
else {
if ((ret = __qam_position(dbc,
&meta->first_recno, DB_LOCK_READ, 0,
&exact)) != 0)
goto err;
if (!exact)
meta->first_recno = argp->new_first;
if (cp->page != NULL &&
(ret = __qam_fput(file_dbp,
cp->pgno, cp->page, dbc->priority)) != 0)
goto err;
}
}
if ((argp->opcode & QAM_SETCUR) &&
meta->cur_recno == argp->old_cur) {
if (argp->old_cur < argp->new_cur)
meta->cur_recno = argp->new_cur;
else {
if ((ret = __qam_position(dbc, &meta->cur_recno,
DB_LOCK_READ, 0, &exact)) != 0)
goto err;
if (!exact)
meta->cur_recno = argp->new_cur;
if (cp->page != NULL &&
(ret = __qam_fput(file_dbp,
cp->pgno, cp->page, dbc->priority)) != 0)
goto err;
}
}
meta->dbmeta.lsn = *lsnp;
}
if ((ret = __memp_fput(mpf, meta, dbc->priority)) != 0)
goto out;
if ((ret = __LPUT(dbc, lock)) != 0)
goto out;
done: *lsnp = argp->prev_lsn;
ret = 0;
if (0) {
err: (void)__memp_fput(mpf, meta, dbc->priority);
(void)__LPUT(dbc, lock);
}
out: REC_CLOSE;
}
int
__qam_del_recover(dbenv, dbtp, lsnp, op, info)
DB_ENV *dbenv;
DBT *dbtp;
DB_LSN *lsnp;
db_recops op;
void *info;
{
__qam_del_args *argp;
DB *file_dbp;
DBC *dbc;
DB_LOCK lock;
DB_MPOOLFILE *mpf;
QAMDATA *qp;
QMETA *meta;
QPAGE *pagep;
db_pgno_t metapg;
int cmp_n, ret, t_ret;
COMPQUIET(pagep, NULL);
REC_PRINT(__qam_del_print);
REC_INTRO(__qam_del_read, 1, 1);
if ((ret = __qam_fget(file_dbp, &argp->pgno, NULL,
DB_MPOOL_CREATE, &pagep)) != 0)
goto out;
if (pagep->pgno == PGNO_INVALID) {
QAM_DIRTY(file_dbp, argp->pgno, &pagep);
pagep->pgno = argp->pgno;
pagep->type = P_QAMDATA;
}
cmp_n = LOG_COMPARE(lsnp, &LSN(pagep));
if (DB_UNDO(op)) {
metapg = ((QUEUE *)file_dbp->q_internal)->q_meta;
if ((ret = __db_lget(dbc,
LCK_ROLLBACK, metapg, DB_LOCK_WRITE, 0, &lock)) != 0)
goto err;
if ((ret = __memp_fget(mpf, &metapg, NULL,
DB_MPOOL_EDIT, &meta)) != 0) {
(void)__LPUT(dbc, lock);
goto err;
}
if (meta->first_recno == RECNO_OOB ||
(QAM_BEFORE_FIRST(meta, argp->recno) &&
(meta->first_recno <= meta->cur_recno ||
meta->first_recno -
argp->recno < argp->recno - meta->cur_recno))) {
REC_DIRTY(mpf, dbc->priority, &meta);
meta->first_recno = argp->recno;
ret = __memp_fput(mpf, meta, dbc->priority);
} else
ret = __memp_fput(mpf, meta, dbc->priority);
if ((t_ret = __LPUT(dbc, lock)) != 0 && ret == 0)
ret = t_ret;
if (ret != 0)
goto err;
QAM_DIRTY(file_dbp, pagep->pgno, &pagep);
qp = QAM_GET_RECORD(file_dbp, pagep, argp->indx);
F_SET(qp, QAM_VALID);
if (cmp_n <= 0 && op == DB_TXN_BACKWARD_ROLL)
LSN(pagep) = argp->lsn;
} else if (op == DB_TXN_APPLY || (cmp_n > 0 && DB_REDO(op))) {
QAM_DIRTY(file_dbp, pagep->pgno, &pagep);
qp = QAM_GET_RECORD(file_dbp, pagep, argp->indx);
F_CLR(qp, QAM_VALID);
if (op == DB_TXN_APPLY)
LSN(pagep) = *lsnp;
}
if ((ret = __qam_fput(file_dbp, argp->pgno, pagep, dbc->priority)) != 0)
goto out;
done: *lsnp = argp->prev_lsn;
ret = 0;
if (0) {
err: (void)__qam_fput(file_dbp, argp->pgno, pagep, dbc->priority);
}
out: REC_CLOSE;
}
int
__qam_delext_recover(dbenv, dbtp, lsnp, op, info)
DB_ENV *dbenv;
DBT *dbtp;
DB_LSN *lsnp;
db_recops op;
void *info;
{
__qam_delext_args *argp;
DB *file_dbp;
DBC *dbc;
DB_LOCK lock;
DB_MPOOLFILE *mpf;
QAMDATA *qp;
QMETA *meta;
QPAGE *pagep;
db_pgno_t metapg;
int cmp_n, ret, t_ret;
COMPQUIET(pagep, NULL);
REC_PRINT(__qam_delext_print);
REC_INTRO(__qam_delext_read, 1, 1);
if ((ret = __qam_fget(file_dbp, &argp->pgno, NULL,
DB_REDO(op) ? 0 : DB_MPOOL_CREATE, &pagep)) != 0) {
if (DB_REDO(op) && (ret == DB_PAGE_NOTFOUND || ret == ENOENT))
goto done;
goto out;
}
if (pagep->pgno == PGNO_INVALID) {
QAM_DIRTY(file_dbp, argp->pgno, &pagep);
pagep->pgno = argp->pgno;
pagep->type = P_QAMDATA;
}
cmp_n = LOG_COMPARE(lsnp, &LSN(pagep));
if (DB_UNDO(op)) {
metapg = ((QUEUE *)file_dbp->q_internal)->q_meta;
if ((ret = __db_lget(dbc,
LCK_ROLLBACK, metapg, DB_LOCK_WRITE, 0, &lock)) != 0)
goto err;
if ((ret = __memp_fget(mpf, &metapg, NULL,
DB_MPOOL_EDIT, &meta)) != 0) {
(void)__LPUT(dbc, lock);
goto err;
}
if (meta->first_recno == RECNO_OOB ||
(QAM_BEFORE_FIRST(meta, argp->recno) &&
(meta->first_recno <= meta->cur_recno ||
meta->first_recno -
argp->recno < argp->recno - meta->cur_recno))) {
meta->first_recno = argp->recno;
ret = __memp_fput(mpf, meta, dbc->priority);
} else
ret = __memp_fput(mpf, meta, dbc->priority);
if ((t_ret = __LPUT(dbc, lock)) != 0 && ret == 0)
ret = t_ret;
if (ret != 0)
goto err;
QAM_DIRTY(file_dbp, pagep->pgno, &pagep);
if ((ret = __qam_pitem(dbc, pagep,
argp->indx, argp->recno, &argp->data)) != 0)
goto err;
if (cmp_n <= 0 && op == DB_TXN_BACKWARD_ROLL)
LSN(pagep) = argp->lsn;
} else if (op == DB_TXN_APPLY || (cmp_n > 0 && DB_REDO(op))) {
QAM_DIRTY(file_dbp, pagep->pgno, &pagep);
qp = QAM_GET_RECORD(file_dbp, pagep, argp->indx);
F_CLR(qp, QAM_VALID);
if (op == DB_TXN_APPLY)
LSN(pagep) = *lsnp;
}
if ((ret = __qam_fput(file_dbp, argp->pgno, pagep, dbc->priority)) != 0)
goto out;
done: *lsnp = argp->prev_lsn;
ret = 0;
if (0) {
err: (void)__qam_fput(file_dbp, argp->pgno, pagep, dbc->priority);
}
out: REC_CLOSE;
}
int
__qam_add_recover(dbenv, dbtp, lsnp, op, info)
DB_ENV *dbenv;
DBT *dbtp;
DB_LSN *lsnp;
db_recops op;
void *info;
{
__qam_add_args *argp;
DB *file_dbp;
DBC *dbc;
DB_MPOOLFILE *mpf;
QAMDATA *qp;
QMETA *meta;
QPAGE *pagep;
db_pgno_t metapg;
int cmp_n, ret;
COMPQUIET(pagep, NULL);
REC_PRINT(__qam_add_print);
REC_INTRO(__qam_add_read, 1, 1);
if ((ret = __qam_fget(file_dbp, &argp->pgno, NULL,
DB_UNDO(op) ? 0 : DB_MPOOL_CREATE, &pagep)) != 0) {
if (DB_UNDO(op) && (ret == DB_PAGE_NOTFOUND || ret == ENOENT))
goto done;
goto out;
}
if (pagep->pgno == PGNO_INVALID) {
QAM_DIRTY(file_dbp, argp->pgno, &pagep);
pagep->pgno = argp->pgno;
pagep->type = P_QAMDATA;
}
cmp_n = LOG_COMPARE(lsnp, &LSN(pagep));
if (DB_REDO(op)) {
metapg = ((QUEUE *)file_dbp->q_internal)->q_meta;
if ((ret = __memp_fget(mpf, &metapg, NULL,
0, &meta)) != 0)
goto err;
if (QAM_BEFORE_FIRST(meta, argp->recno)) {
REC_DIRTY(mpf, dbc->priority, &meta);
meta->first_recno = argp->recno;
}
if (argp->recno == meta->cur_recno ||
QAM_AFTER_CURRENT(meta, argp->recno)) {
REC_DIRTY(mpf, dbc->priority, &meta);
meta->cur_recno = argp->recno + 1;
}
if ((ret = __memp_fput(mpf, meta, dbc->priority)) != 0)
goto err;
if (op == DB_TXN_APPLY || cmp_n > 0) {
QAM_DIRTY(file_dbp, pagep->pgno, &pagep);
if ((ret = __qam_pitem(dbc,
pagep, argp->indx, argp->recno, &argp->data)) != 0)
goto err;
if (op == DB_TXN_APPLY)
LSN(pagep) = *lsnp;
}
} else if (DB_UNDO(op)) {
if (argp->olddata.size != 0) {
QAM_DIRTY(file_dbp, pagep->pgno, &pagep);
if ((ret = __qam_pitem(dbc, pagep,
argp->indx, argp->recno, &argp->olddata)) != 0)
goto err;
if (!(argp->vflag & QAM_VALID)) {
qp = QAM_GET_RECORD(
file_dbp, pagep, argp->indx);
F_CLR(qp, QAM_VALID);
}
} else {
QAM_DIRTY(file_dbp, pagep->pgno, &pagep);
qp = QAM_GET_RECORD(file_dbp, pagep, argp->indx);
qp->flags = 0;
}
if (cmp_n <= 0 && op == DB_TXN_BACKWARD_ROLL)
LSN(pagep) = argp->lsn;
}
if ((ret = __qam_fput(file_dbp, argp->pgno, pagep, dbc->priority)) != 0)
goto out;
done: *lsnp = argp->prev_lsn;
ret = 0;
if (0) {
err: (void)__qam_fput(file_dbp, argp->pgno, pagep, dbc->priority);
}
out: REC_CLOSE;
}