#include "db_config.h"
#include "db_int.h"
#include "dbinc/db_page.h"
#include "dbinc/btree.h"
#include "dbinc/lock.h"
#include "dbinc/log.h"
#include "dbinc/mp.h"
#define IS_BTREE_PAGE(pagep) \
(TYPE(pagep) == P_IBTREE || \
TYPE(pagep) == P_LBTREE || TYPE(pagep) == P_LDUP)
int
__bam_split_recover(dbenv, dbtp, lsnp, op, info)
DB_ENV *dbenv;
DBT *dbtp;
DB_LSN *lsnp;
db_recops op;
void *info;
{
__bam_split_args *argp;
DB *file_dbp;
DBC *dbc;
DB_MPOOLFILE *mpf;
PAGE *_lp, *lp, *np, *pp, *_rp, *rp, *sp;
db_pgno_t pgno, root_pgno;
u_int32_t ptype;
int cmp, l_update, p_update, r_update, rc, ret, rootsplit, t_ret;
REC_PRINT(__bam_split_print);
mpf = NULL;
_lp = lp = np = pp = _rp = rp = NULL;
sp = NULL;
REC_INTRO(__bam_split_read, 1, 0);
if ((ret = __os_malloc(dbenv, argp->pg.size, &sp)) != 0)
goto out;
memcpy(sp, argp->pg.data, argp->pg.size);
pgno = PGNO(sp);
root_pgno = argp->root_pgno;
rootsplit = root_pgno != PGNO_INVALID;
REC_FGET(mpf, argp->left, &lp, right);
right: REC_FGET(mpf, argp->right, &rp, redo);
redo: if (DB_REDO(op)) {
l_update = r_update = p_update = 0;
if (rootsplit) {
REC_FGET(mpf, root_pgno, &pp, do_left);
cmp =
LOG_COMPARE(&LSN(pp), &LSN(argp->pg.data));
CHECK_LSN(dbenv, op,
cmp, &LSN(pp), &LSN(argp->pg.data));
p_update = cmp == 0;
}
do_left: if (lp != NULL) {
cmp = LOG_COMPARE(&LSN(lp), &argp->llsn);
CHECK_LSN(dbenv, op, cmp, &LSN(lp), &argp->llsn);
if (cmp == 0)
l_update = 1;
}
if (rp != NULL) {
cmp = LOG_COMPARE(&LSN(rp), &argp->rlsn);
CHECK_LSN(dbenv, op, cmp, &LSN(rp), &argp->rlsn);
if (cmp == 0)
r_update = 1;
}
if (!p_update && !l_update && !r_update)
goto check_next;
if ((ret = __os_malloc(dbenv, file_dbp->pgsize, &_lp)) != 0 ||
(ret = __os_malloc(dbenv, file_dbp->pgsize, &_rp)) != 0)
goto out;
if (rootsplit) {
P_INIT(_lp, file_dbp->pgsize, argp->left,
PGNO_INVALID,
ISINTERNAL(sp) ? PGNO_INVALID : argp->right,
LEVEL(sp), TYPE(sp));
P_INIT(_rp, file_dbp->pgsize, argp->right,
ISINTERNAL(sp) ? PGNO_INVALID : argp->left,
PGNO_INVALID, LEVEL(sp), TYPE(sp));
} else {
P_INIT(_lp, file_dbp->pgsize, PGNO(sp),
ISINTERNAL(sp) ? PGNO_INVALID : PREV_PGNO(sp),
ISINTERNAL(sp) ? PGNO_INVALID : argp->right,
LEVEL(sp), TYPE(sp));
P_INIT(_rp, file_dbp->pgsize, argp->right,
ISINTERNAL(sp) ? PGNO_INVALID : sp->pgno,
ISINTERNAL(sp) ? PGNO_INVALID : NEXT_PGNO(sp),
LEVEL(sp), TYPE(sp));
}
if ((ret = __bam_copy(file_dbp, sp, _lp, 0, argp->indx)) != 0 ||
(ret = __bam_copy(file_dbp, sp, _rp, argp->indx,
NUM_ENT(sp))) != 0)
goto out;
if (l_update) {
REC_DIRTY(mpf, file_dbp->priority, &lp);
memcpy(lp, _lp, file_dbp->pgsize);
lp->lsn = *lsnp;
if ((ret =
__memp_fput(mpf, lp, file_dbp->priority)) != 0)
goto out;
lp = NULL;
}
if (r_update) {
REC_DIRTY(mpf, file_dbp->priority, &rp);
memcpy(rp, _rp, file_dbp->pgsize);
rp->lsn = *lsnp;
if ((ret =
__memp_fput(mpf, rp, file_dbp->priority)) != 0)
goto out;
rp = NULL;
}
if (rootsplit && p_update) {
if (IS_BTREE_PAGE(sp)) {
ptype = P_IBTREE;
rc = argp->opflags & SPL_NRECS ? 1 : 0;
} else {
ptype = P_IRECNO;
rc = 1;
}
REC_DIRTY(mpf, file_dbp->priority, &pp);
P_INIT(pp, file_dbp->pgsize, root_pgno,
PGNO_INVALID, PGNO_INVALID, _lp->level + 1, ptype);
RE_NREC_SET(pp, rc ? __bam_total(file_dbp, _lp) +
__bam_total(file_dbp, _rp) : 0);
pp->lsn = *lsnp;
if ((ret =
__memp_fput(mpf, pp, file_dbp->priority)) != 0)
goto out;
pp = NULL;
}
check_next:
if (!rootsplit && argp->npgno != PGNO_INVALID) {
if ((ret = __memp_fget(mpf, &argp->npgno, NULL,
0, &np)) != 0) {
if (ret != DB_PAGE_NOTFOUND
#ifndef HAVE_FTRUNCATE
|| DB_REDO(op)
#endif
) {
ret = __db_pgerr(
file_dbp, argp->npgno, ret);
goto out;
} else
goto done;
}
cmp = LOG_COMPARE(&LSN(np), &argp->nlsn);
CHECK_LSN(dbenv, op, cmp, &LSN(np), &argp->nlsn);
if (cmp == 0) {
REC_DIRTY(mpf, file_dbp->priority, &np);
PREV_PGNO(np) = argp->right;
np->lsn = *lsnp;
if ((ret = __memp_fput(mpf,
np, file_dbp->priority)) != 0)
goto out;
np = NULL;
}
}
} else {
if ((ret = __memp_fget(mpf, &pgno, NULL,
DB_MPOOL_EDIT, &pp)) != 0) {
pp = NULL;
goto lrundo;
}
if (LOG_COMPARE(lsnp, &LSN(pp)) == 0) {
REC_DIRTY(mpf, file_dbp->priority, &pp);
memcpy(pp, argp->pg.data, argp->pg.size);
if ((ret =
__memp_fput(mpf, pp, file_dbp->priority)) != 0)
goto out;
pp = NULL;
}
lrundo: if ((rootsplit && lp != NULL) || rp != NULL) {
if (rootsplit && lp != NULL &&
LOG_COMPARE(lsnp, &LSN(lp)) == 0) {
REC_DIRTY(mpf, file_dbp->priority, &lp);
lp->lsn = argp->llsn;
if ((ret = __memp_fput(mpf,
lp, file_dbp->priority)) != 0)
goto out;
lp = NULL;
}
if (rp != NULL &&
LOG_COMPARE(lsnp, &LSN(rp)) == 0) {
REC_DIRTY(mpf, file_dbp->priority, &rp);
rp->lsn = argp->rlsn;
if ((ret = __memp_fput(mpf,
rp, file_dbp->priority)) != 0)
goto out;
rp = NULL;
}
}
if (!rootsplit && argp->npgno != PGNO_INVALID) {
if ((ret = __memp_fget(mpf, &argp->npgno, NULL,
DB_MPOOL_EDIT, &np)) != 0) {
np = NULL;
goto done;
}
if (LOG_COMPARE(lsnp, &LSN(np)) == 0) {
REC_DIRTY(mpf, file_dbp->priority, &np);
PREV_PGNO(np) = argp->left;
np->lsn = argp->nlsn;
if (__memp_fput(mpf, np, file_dbp->priority))
goto out;
np = NULL;
}
}
}
done: *lsnp = argp->prev_lsn;
ret = 0;
out:
if (pp != NULL &&
(t_ret = __memp_fput(mpf, pp, file_dbp->priority)) != 0 && ret == 0)
ret = t_ret;
if (lp != NULL &&
(t_ret = __memp_fput(mpf, lp, file_dbp->priority)) != 0 && ret == 0)
ret = t_ret;
if (np != NULL &&
(t_ret = __memp_fput(mpf, np, file_dbp->priority)) != 0 && ret == 0)
ret = t_ret;
if (rp != NULL &&
(t_ret = __memp_fput(mpf, rp, file_dbp->priority)) != 0 && ret == 0)
ret = t_ret;
if (_lp != NULL)
__os_free(dbenv, _lp);
if (_rp != NULL)
__os_free(dbenv, _rp);
if (sp != NULL)
__os_free(dbenv, sp);
REC_CLOSE;
}
int
__bam_rsplit_recover(dbenv, dbtp, lsnp, op, info)
DB_ENV *dbenv;
DBT *dbtp;
DB_LSN *lsnp;
db_recops op;
void *info;
{
__bam_rsplit_args *argp;
DB *file_dbp;
DBC *dbc;
DB_LSN copy_lsn;
DB_MPOOLFILE *mpf;
PAGE *pagep;
db_pgno_t pgno, root_pgno;
db_recno_t rcnt;
int cmp_n, cmp_p, ret;
pagep = NULL;
REC_PRINT(__bam_rsplit_print);
REC_INTRO(__bam_rsplit_read, 1, 1);
pgno = root_pgno = argp->root_pgno;
if ((ret = __memp_fget(mpf, &pgno, NULL,
0, &pagep)) != 0) {
if (ret != DB_PAGE_NOTFOUND
#ifndef HAVE_FTRUNCATE
|| DB_REDO(op)
#endif
) {
ret = __db_pgerr(file_dbp, pgno, ret);
goto out;
} else
goto do_page;
}
cmp_n = LOG_COMPARE(lsnp, &LSN(pagep));
cmp_p = LOG_COMPARE(&LSN(pagep), &argp->rootlsn);
CHECK_LSN(dbenv, op, cmp_p, &LSN(pagep), &argp->rootlsn);
if (cmp_p == 0 && DB_REDO(op)) {
REC_DIRTY(mpf, dbc->priority, &pagep);
rcnt = RE_NREC(pagep);
memcpy(pagep, argp->pgdbt.data, argp->pgdbt.size);
if (LEVEL(pagep) > LEAFLEVEL)
RE_NREC_SET(pagep, rcnt);
pagep->pgno = root_pgno;
pagep->lsn = *lsnp;
} else if (cmp_n == 0 && DB_UNDO(op)) {
REC_DIRTY(mpf, dbc->priority, &pagep);
P_INIT(pagep, file_dbp->pgsize, root_pgno,
argp->nrec, PGNO_INVALID, pagep->level + 1,
IS_BTREE_PAGE(pagep) ? P_IBTREE : P_IRECNO);
if ((ret = __db_pitem(dbc, pagep, 0,
argp->rootent.size, &argp->rootent, NULL)) != 0)
goto out;
pagep->lsn = argp->rootlsn;
}
if ((ret = __memp_fput(mpf, pagep, dbc->priority)) != 0)
goto out;
do_page:
if ((ret = __memp_fget(mpf, &argp->pgno, NULL,
0, &pagep)) != 0) {
if (ret != DB_PAGE_NOTFOUND
#ifndef HAVE_FTRUNCATE
|| DB_REDO(op)
#endif
) {
ret = __db_pgerr(file_dbp, argp->pgno, ret);
goto out;
} else
goto done;
}
(void)__ua_memcpy(©_lsn, &LSN(argp->pgdbt.data), sizeof(DB_LSN));
cmp_n = LOG_COMPARE(lsnp, &LSN(pagep));
cmp_p = LOG_COMPARE(&LSN(pagep), ©_lsn);
CHECK_LSN(dbenv, op, cmp_p, &LSN(pagep), ©_lsn);
if (cmp_p == 0 && DB_REDO(op)) {
REC_DIRTY(mpf, dbc->priority, &pagep);
pagep->lsn = *lsnp;
} else if (cmp_n == 0 && DB_UNDO(op)) {
REC_DIRTY(mpf, dbc->priority, &pagep);
memcpy(pagep, argp->pgdbt.data, argp->pgdbt.size);
}
if ((ret = __memp_fput(mpf, pagep, dbc->priority)) != 0)
goto out;
pagep = NULL;
done: *lsnp = argp->prev_lsn;
ret = 0;
out: if (pagep != NULL)
(void)__memp_fput(mpf, pagep, dbc->priority);
REC_CLOSE;
}
int
__bam_adj_recover(dbenv, dbtp, lsnp, op, info)
DB_ENV *dbenv;
DBT *dbtp;
DB_LSN *lsnp;
db_recops op;
void *info;
{
__bam_adj_args *argp;
DB *file_dbp;
DBC *dbc;
DB_MPOOLFILE *mpf;
PAGE *pagep;
int cmp_n, cmp_p, ret;
pagep = NULL;
REC_PRINT(__bam_adj_print);
REC_INTRO(__bam_adj_read, 1, 1);
if ((ret = __memp_fget(mpf, &argp->pgno, NULL,
0, &pagep)) != 0) {
if (ret != DB_PAGE_NOTFOUND
#ifndef HAVE_FTRUNCATE
|| DB_REDO(op)
#endif
) {
ret = __db_pgerr(file_dbp, argp->pgno, ret);
goto out;
} else
goto done;
}
cmp_n = LOG_COMPARE(lsnp, &LSN(pagep));
cmp_p = LOG_COMPARE(&LSN(pagep), &argp->lsn);
CHECK_LSN(dbenv, op, cmp_p, &LSN(pagep), &argp->lsn);
if (cmp_p == 0 && DB_REDO(op)) {
REC_DIRTY(mpf, dbc->priority, &pagep);
if ((ret = __bam_adjindx(dbc,
pagep, argp->indx, argp->indx_copy, argp->is_insert)) != 0)
goto out;
LSN(pagep) = *lsnp;
} else if (cmp_n == 0 && DB_UNDO(op)) {
REC_DIRTY(mpf, dbc->priority, &pagep);
if ((ret = __bam_adjindx(dbc,
pagep, argp->indx, argp->indx_copy, !argp->is_insert)) != 0)
goto out;
LSN(pagep) = argp->lsn;
}
if ((ret = __memp_fput(mpf, pagep, dbc->priority)) != 0)
goto out;
pagep = NULL;
done: *lsnp = argp->prev_lsn;
ret = 0;
out: if (pagep != NULL)
(void)__memp_fput(mpf, pagep, dbc->priority);
REC_CLOSE;
}
int
__bam_cadjust_recover(dbenv, dbtp, lsnp, op, info)
DB_ENV *dbenv;
DBT *dbtp;
DB_LSN *lsnp;
db_recops op;
void *info;
{
__bam_cadjust_args *argp;
DB *file_dbp;
DBC *dbc;
DB_MPOOLFILE *mpf;
PAGE *pagep;
int cmp_n, cmp_p, ret;
pagep = NULL;
REC_PRINT(__bam_cadjust_print);
REC_INTRO(__bam_cadjust_read, 1, 0);
if ((ret = __memp_fget(mpf, &argp->pgno, NULL,
0, &pagep)) != 0) {
if (ret != DB_PAGE_NOTFOUND
#ifndef HAVE_FTRUNCATE
|| DB_REDO(op)
#endif
) {
ret = __db_pgerr(file_dbp, argp->pgno, ret);
goto out;
} else
goto done;
}
cmp_n = LOG_COMPARE(lsnp, &LSN(pagep));
cmp_p = LOG_COMPARE(&LSN(pagep), &argp->lsn);
CHECK_LSN(dbenv, op, cmp_p, &LSN(pagep), &argp->lsn);
if (cmp_p == 0 && DB_REDO(op)) {
REC_DIRTY(mpf, file_dbp->priority, &pagep);
if (IS_BTREE_PAGE(pagep)) {
GET_BINTERNAL(file_dbp, pagep, argp->indx)->nrecs +=
argp->adjust;
if (argp->opflags & CAD_UPDATEROOT)
RE_NREC_ADJ(pagep, argp->adjust);
} else {
GET_RINTERNAL(file_dbp, pagep, argp->indx)->nrecs +=
argp->adjust;
if (argp->opflags & CAD_UPDATEROOT)
RE_NREC_ADJ(pagep, argp->adjust);
}
LSN(pagep) = *lsnp;
} else if (cmp_n == 0 && DB_UNDO(op)) {
REC_DIRTY(mpf, file_dbp->priority, &pagep);
if (IS_BTREE_PAGE(pagep)) {
GET_BINTERNAL(file_dbp, pagep, argp->indx)->nrecs -=
argp->adjust;
if (argp->opflags & CAD_UPDATEROOT)
RE_NREC_ADJ(pagep, -(argp->adjust));
} else {
GET_RINTERNAL(file_dbp, pagep, argp->indx)->nrecs -=
argp->adjust;
if (argp->opflags & CAD_UPDATEROOT)
RE_NREC_ADJ(pagep, -(argp->adjust));
}
LSN(pagep) = argp->lsn;
}
if ((ret = __memp_fput(mpf, pagep, file_dbp->priority)) != 0)
goto out;
pagep = NULL;
done: *lsnp = argp->prev_lsn;
ret = 0;
out: if (pagep != NULL)
(void)__memp_fput(mpf, pagep, file_dbp->priority);
REC_CLOSE;
}
int
__bam_cdel_recover(dbenv, dbtp, lsnp, op, info)
DB_ENV *dbenv;
DBT *dbtp;
DB_LSN *lsnp;
db_recops op;
void *info;
{
__bam_cdel_args *argp;
DB *file_dbp;
DBC *dbc;
DB_MPOOLFILE *mpf;
PAGE *pagep;
u_int32_t indx;
int cmp_n, cmp_p, ret;
pagep = NULL;
REC_PRINT(__bam_cdel_print);
REC_INTRO(__bam_cdel_read, 1, 0);
if ((ret = __memp_fget(mpf, &argp->pgno, NULL,
0, &pagep)) != 0) {
if (ret != DB_PAGE_NOTFOUND
#ifndef HAVE_FTRUNCATE
|| DB_REDO(op)
#endif
) {
ret = __db_pgerr(file_dbp, argp->pgno, ret);
goto out;
} else
goto done;
}
cmp_n = LOG_COMPARE(lsnp, &LSN(pagep));
cmp_p = LOG_COMPARE(&LSN(pagep), &argp->lsn);
CHECK_LSN(dbenv, op, cmp_p, &LSN(pagep), &argp->lsn);
if (cmp_p == 0 && DB_REDO(op)) {
REC_DIRTY(mpf, file_dbp->priority, &pagep);
indx = argp->indx + (TYPE(pagep) == P_LBTREE ? O_INDX : 0);
B_DSET(GET_BKEYDATA(file_dbp, pagep, indx)->type);
LSN(pagep) = *lsnp;
} else if (cmp_n == 0 && DB_UNDO(op)) {
REC_DIRTY(mpf, file_dbp->priority, &pagep);
indx = argp->indx + (TYPE(pagep) == P_LBTREE ? O_INDX : 0);
B_DCLR(GET_BKEYDATA(file_dbp, pagep, indx)->type);
if ((ret = __bam_ca_delete(
file_dbp, argp->pgno, argp->indx, 0, NULL)) != 0)
goto out;
LSN(pagep) = argp->lsn;
}
if ((ret = __memp_fput(mpf, pagep, file_dbp->priority)) != 0)
goto out;
pagep = NULL;
done: *lsnp = argp->prev_lsn;
ret = 0;
out: if (pagep != NULL)
(void)__memp_fput(mpf, pagep, file_dbp->priority);
REC_CLOSE;
}
int
__bam_repl_recover(dbenv, dbtp, lsnp, op, info)
DB_ENV *dbenv;
DBT *dbtp;
DB_LSN *lsnp;
db_recops op;
void *info;
{
__bam_repl_args *argp;
BKEYDATA *bk;
DB *file_dbp;
DBC *dbc;
DBT dbt;
DB_MPOOLFILE *mpf;
PAGE *pagep;
int cmp_n, cmp_p, ret;
u_int8_t *p;
pagep = NULL;
REC_PRINT(__bam_repl_print);
REC_INTRO(__bam_repl_read, 1, 1);
if ((ret = __memp_fget(mpf, &argp->pgno, NULL,
0, &pagep)) != 0) {
if (ret != DB_PAGE_NOTFOUND
#ifndef HAVE_FTRUNCATE
|| DB_REDO(op)
#endif
) {
ret = __db_pgerr(file_dbp, argp->pgno, ret);
goto out;
} else
goto done;
}
bk = GET_BKEYDATA(file_dbp, pagep, argp->indx);
cmp_n = LOG_COMPARE(lsnp, &LSN(pagep));
cmp_p = LOG_COMPARE(&LSN(pagep), &argp->lsn);
CHECK_LSN(dbenv, op, cmp_p, &LSN(pagep), &argp->lsn);
if (cmp_p == 0 && DB_REDO(op)) {
REC_DIRTY(mpf, dbc->priority, &pagep);
memset(&dbt, 0, sizeof(dbt));
dbt.size = argp->prefix + argp->suffix + argp->repl.size;
if ((ret = __os_malloc(dbenv, dbt.size, &dbt.data)) != 0)
goto out;
p = dbt.data;
memcpy(p, bk->data, argp->prefix);
p += argp->prefix;
memcpy(p, argp->repl.data, argp->repl.size);
p += argp->repl.size;
memcpy(p, bk->data + (bk->len - argp->suffix), argp->suffix);
ret = __bam_ritem(dbc, pagep, argp->indx, &dbt);
__os_free(dbenv, dbt.data);
if (ret != 0)
goto out;
LSN(pagep) = *lsnp;
} else if (cmp_n == 0 && DB_UNDO(op)) {
REC_DIRTY(mpf, dbc->priority, &pagep);
memset(&dbt, 0, sizeof(dbt));
dbt.size = argp->prefix + argp->suffix + argp->orig.size;
if ((ret = __os_malloc(dbenv, dbt.size, &dbt.data)) != 0)
goto out;
p = dbt.data;
memcpy(p, bk->data, argp->prefix);
p += argp->prefix;
memcpy(p, argp->orig.data, argp->orig.size);
p += argp->orig.size;
memcpy(p, bk->data + (bk->len - argp->suffix), argp->suffix);
ret = __bam_ritem(dbc, pagep, argp->indx, &dbt);
__os_free(dbenv, dbt.data);
if (ret != 0)
goto out;
if (argp->isdeleted)
B_DSET(GET_BKEYDATA(file_dbp, pagep, argp->indx)->type);
LSN(pagep) = argp->lsn;
}
if ((ret = __memp_fput(mpf, pagep, dbc->priority)) != 0)
goto out;
pagep = NULL;
done: *lsnp = argp->prev_lsn;
ret = 0;
out: if (pagep != NULL)
(void)__memp_fput(mpf, pagep, dbc->priority);
REC_CLOSE;
}
int
__bam_root_recover(dbenv, dbtp, lsnp, op, info)
DB_ENV *dbenv;
DBT *dbtp;
DB_LSN *lsnp;
db_recops op;
void *info;
{
__bam_root_args *argp;
BTMETA *meta;
DB *file_dbp;
DBC *dbc;
DB_MPOOLFILE *mpf;
int cmp_n, cmp_p, ret;
meta = NULL;
REC_PRINT(__bam_root_print);
REC_INTRO(__bam_root_read, 0, 0);
if ((ret = __memp_fget(mpf, &argp->meta_pgno, NULL,
0, &meta)) != 0) {
if (ret != DB_PAGE_NOTFOUND
#ifndef HAVE_FTRUNCATE
|| DB_REDO(op)
#endif
) {
ret = __db_pgerr(file_dbp, argp->meta_pgno, ret);
goto out;
} else
goto done;
}
cmp_n = LOG_COMPARE(lsnp, &LSN(meta));
cmp_p = LOG_COMPARE(&LSN(meta), &argp->meta_lsn);
CHECK_LSN(dbenv, op, cmp_p, &LSN(meta), &argp->meta_lsn);
if (cmp_p == 0 && DB_REDO(op)) {
REC_DIRTY(mpf, file_dbp->priority, &meta);
meta->root = argp->root_pgno;
meta->dbmeta.lsn = *lsnp;
((BTREE *)file_dbp->bt_internal)->bt_root = meta->root;
} else if (cmp_n == 0 && DB_UNDO(op)) {
REC_DIRTY(mpf, file_dbp->priority, &meta);
meta->dbmeta.lsn = argp->meta_lsn;
}
if ((ret = __memp_fput(mpf, meta, file_dbp->priority)) != 0)
goto out;
meta = NULL;
done: *lsnp = argp->prev_lsn;
ret = 0;
out: if (meta != NULL)
(void)__memp_fput(mpf, meta, file_dbp->priority);
REC_CLOSE;
}
int
__bam_curadj_recover(dbenv, dbtp, lsnp, op, info)
DB_ENV *dbenv;
DBT *dbtp;
DB_LSN *lsnp;
db_recops op;
void *info;
{
__bam_curadj_args *argp;
DB *file_dbp;
DBC *dbc;
DB_MPOOLFILE *mpf;
int ret;
COMPQUIET(mpf, NULL);
REC_PRINT(__bam_curadj_print);
REC_INTRO(__bam_curadj_read, 0, 1);
ret = 0;
if (op != DB_TXN_ABORT)
goto done;
switch (argp->mode) {
case DB_CA_DI:
if ((ret = __bam_ca_di(dbc, argp->from_pgno,
argp->from_indx, -(int)argp->first_indx)) != 0)
goto out;
break;
case DB_CA_DUP:
if ((ret = __bam_ca_undodup(file_dbp, argp->first_indx,
argp->from_pgno, argp->from_indx, argp->to_indx)) != 0)
goto out;
break;
case DB_CA_RSPLIT:
if ((ret =
__bam_ca_rsplit(dbc, argp->to_pgno, argp->from_pgno)) != 0)
goto out;
break;
case DB_CA_SPLIT:
if ((ret = __bam_ca_undosplit(file_dbp, argp->from_pgno,
argp->to_pgno, argp->left_pgno, argp->from_indx)) != 0)
goto out;
break;
}
done: *lsnp = argp->prev_lsn;
out: REC_CLOSE;
}
int
__bam_rcuradj_recover(dbenv, dbtp, lsnp, op, info)
DB_ENV *dbenv;
DBT *dbtp;
DB_LSN *lsnp;
db_recops op;
void *info;
{
__bam_rcuradj_args *argp;
BTREE_CURSOR *cp;
DB *file_dbp;
DBC *dbc, *rdbc;
DB_MPOOLFILE *mpf;
int ret, t_ret;
COMPQUIET(mpf, NULL);
rdbc = NULL;
REC_PRINT(__bam_rcuradj_print);
REC_INTRO(__bam_rcuradj_read, 0, 1);
ret = t_ret = 0;
if (op != DB_TXN_ABORT)
goto done;
if ((ret = __db_cursor_int(file_dbp,
NULL, DB_RECNO, argp->root, 0, DB_LOCK_INVALIDID, &rdbc)) != 0)
goto out;
cp = (BTREE_CURSOR *)rdbc->internal;
F_SET(cp, C_RENUMBER);
cp->recno = argp->recno;
switch (argp->mode) {
case CA_DELETE:
F_SET(cp, C_DELETED);
F_SET(cp, C_RENUMBER);
cp->order = argp->order;
if ((ret = __ram_ca(rdbc, CA_ICURRENT, NULL)) != 0)
goto out;
break;
case CA_IAFTER:
case CA_IBEFORE:
case CA_ICURRENT:
F_CLR(cp, C_DELETED);
cp->order = INVALID_ORDER;
if ((ret = __ram_ca(rdbc, CA_DELETE, NULL)) != 0)
goto out;
break;
}
done: *lsnp = argp->prev_lsn;
out: if (rdbc != NULL && (t_ret = __dbc_close(rdbc)) != 0 && ret == 0)
ret = t_ret;
REC_CLOSE;
}
int
__bam_relink_recover(dbenv, dbtp, lsnp, op, info)
DB_ENV *dbenv;
DBT *dbtp;
DB_LSN *lsnp;
db_recops op;
void *info;
{
__bam_relink_args *argp;
DB *file_dbp;
DBC *dbc;
DB_MPOOLFILE *mpf;
PAGE *pagep;
int cmp_n, cmp_p, ret;
pagep = NULL;
REC_PRINT(__bam_relink_print);
REC_INTRO(__bam_relink_read, 1, 0);
if ((ret = __memp_fget(mpf, &argp->next, NULL,
0, &pagep)) != 0) {
if (ret != DB_PAGE_NOTFOUND
#ifndef HAVE_FTRUNCATE
|| DB_REDO(op)
#endif
) {
ret = __db_pgerr(file_dbp, argp->next, ret);
goto out;
} else
goto prev;
}
cmp_n = LOG_COMPARE(lsnp, &LSN(pagep));
cmp_p = LOG_COMPARE(&LSN(pagep), &argp->lsn_next);
CHECK_LSN(dbenv, op, cmp_p, &LSN(pagep), &argp->lsn_next);
if (cmp_p == 0 && DB_REDO(op)) {
REC_DIRTY(mpf, file_dbp->priority, &pagep);
if (argp->new_pgno == PGNO_INVALID)
pagep->prev_pgno = argp->prev;
else
pagep->prev_pgno = argp->new_pgno;
pagep->lsn = *lsnp;
} else if (cmp_n == 0 && DB_UNDO(op)) {
REC_DIRTY(mpf, file_dbp->priority, &pagep);
pagep->prev_pgno = argp->pgno;
pagep->lsn = argp->lsn_next;
}
if ((ret = __memp_fput(mpf, pagep, file_dbp->priority)) != 0)
goto out;
pagep = NULL;
prev: if ((ret = __memp_fget(mpf, &argp->prev, NULL,
0, &pagep)) != 0) {
if (ret != DB_PAGE_NOTFOUND
#ifndef HAVE_FTRUNCATE
|| DB_REDO(op)
#endif
) {
ret = __db_pgerr(file_dbp, argp->prev, ret);
goto out;
} else
goto done;
}
cmp_p = LOG_COMPARE(&LSN(pagep), &argp->lsn_prev);
CHECK_LSN(dbenv, op, cmp_p, &LSN(pagep), &argp->lsn_prev);
if (cmp_p == 0 && DB_REDO(op)) {
REC_DIRTY(mpf, file_dbp->priority, &pagep);
if (argp->new_pgno == PGNO_INVALID)
pagep->next_pgno = argp->next;
else
pagep->next_pgno = argp->new_pgno;
pagep->lsn = *lsnp;
} else if (LOG_COMPARE(lsnp, &LSN(pagep)) == 0 && DB_UNDO(op)) {
REC_DIRTY(mpf, file_dbp->priority, &pagep);
pagep->next_pgno = argp->pgno;
pagep->lsn = argp->lsn_prev;
}
if ((ret = __memp_fput(mpf, pagep, file_dbp->priority)) != 0)
goto out;
pagep = NULL;
done: *lsnp = argp->prev_lsn;
ret = 0;
out: if (pagep != NULL)
(void)__memp_fput(mpf, pagep, file_dbp->priority);
REC_CLOSE;
}
int
__bam_merge_recover(dbenv, dbtp, lsnp, op, info)
DB_ENV *dbenv;
DBT *dbtp;
DB_LSN *lsnp;
db_recops op;
void *info;
{
__bam_merge_args *argp;
BKEYDATA *bk;
DB *file_dbp;
DBC *dbc;
DB_MPOOLFILE *mpf;
PAGE *pagep;
db_indx_t indx, *ninp, *pinp;
u_int32_t size;
u_int8_t *bp;
int cmp_n, cmp_p, i, ret;
REC_PRINT(__bam_merge_print);
REC_INTRO(__bam_merge_read, 1, 1);
if ((ret = __memp_fget(mpf, &argp->pgno, NULL,
0, &pagep)) != 0) {
if (ret != DB_PAGE_NOTFOUND
#ifndef HAVE_FTRUNCATE
|| DB_REDO(op)
#endif
) {
ret = __db_pgerr(file_dbp, argp->pgno, ret);
goto out;
} else
goto next;
}
cmp_n = LOG_COMPARE(lsnp, &LSN(pagep));
cmp_p = LOG_COMPARE(&LSN(pagep), &argp->lsn);
CHECK_LSN(file_dbp->dbenv, op, cmp_p, &LSN(pagep), &argp->lsn);
if (cmp_p == 0 && DB_REDO(op)) {
DB_ASSERT(dbenv, argp->hdr.size == 0 || NUM_ENT(pagep) == 0);
REC_DIRTY(mpf, dbc->priority, &pagep);
if (argp->hdr.size != 0) {
P_INIT(pagep, file_dbp->pgsize, pagep->pgno,
PREV_PGNO(argp->hdr.data),
NEXT_PGNO(argp->hdr.data),
LEVEL(argp->hdr.data), TYPE(argp->hdr.data));
}
if (TYPE(pagep) == P_OVERFLOW) {
OV_REF(pagep) = OV_REF(argp->hdr.data);
OV_LEN(pagep) = OV_LEN(argp->hdr.data);
bp = (u_int8_t *) pagep + P_OVERHEAD(file_dbp);
memcpy(bp, argp->data.data, argp->data.size);
} else {
bp = (u_int8_t *)pagep +
(db_indx_t)(HOFFSET(pagep) - argp->data.size);
memcpy(bp, argp->data.data, argp->data.size);
pinp = P_INP(file_dbp, pagep) + NUM_ENT(pagep);
ninp = argp->ind.data;
for (i = 0;
i < (int)(argp->ind.size / sizeof(*ninp)); i++)
*pinp++ = *ninp++
- (file_dbp->pgsize - HOFFSET(pagep));
HOFFSET(pagep) -= argp->data.size;
NUM_ENT(pagep) += i;
}
pagep->lsn = *lsnp;
} else if (cmp_n == 0 && !DB_REDO(op)) {
REC_DIRTY(mpf, dbc->priority, &pagep);
for (i = 0; i < (int)(argp->ind.size / sizeof(*ninp)); i++) {
indx = NUM_ENT(pagep) - 1;
if (P_INP(file_dbp, pagep)[indx] ==
P_INP(file_dbp, pagep)[indx - P_INDX]) {
NUM_ENT(pagep)--;
continue;
}
switch (TYPE(pagep)) {
case P_LBTREE:
case P_LRECNO:
case P_LDUP:
bk = GET_BKEYDATA(file_dbp, pagep, indx);
size = BITEM_SIZE(bk);
break;
case P_IBTREE:
size = BINTERNAL_SIZE(
GET_BINTERNAL(file_dbp, pagep, indx)->len);
break;
case P_IRECNO:
size = RINTERNAL_SIZE;
break;
default:
ret = __db_pgfmt(dbenv, PGNO(pagep));
goto out;
}
if ((ret =
__db_ditem(dbc, pagep, indx, size)) != 0)
goto out;
}
if (argp->ind.size == 0)
HOFFSET(pagep) = file_dbp->pgsize;
pagep->lsn = argp->lsn;
}
if ((ret = __memp_fput(mpf, pagep, dbc->priority)) != 0)
goto out;
next: if ((ret = __memp_fget(mpf, &argp->npgno, NULL,
0, &pagep)) != 0) {
if (ret != DB_PAGE_NOTFOUND
#ifndef HAVE_FTRUNCATE
|| DB_REDO(op)
#endif
) {
ret = __db_pgerr(file_dbp, argp->pgno, ret);
goto out;
} else
goto done;
}
cmp_n = LOG_COMPARE(lsnp, &LSN(pagep));
cmp_p = LOG_COMPARE(&LSN(pagep), &argp->nlsn);
CHECK_LSN(file_dbp->dbenv, op, cmp_p, &LSN(pagep), &argp->nlsn);
if (cmp_p == 0 && DB_REDO(op)) {
REC_DIRTY(mpf, dbc->priority, &pagep);
HOFFSET(pagep) = file_dbp->pgsize;
NUM_ENT(pagep) = 0;
pagep->lsn = *lsnp;
} else if (cmp_n == 0 && !DB_REDO(op)) {
REC_DIRTY(mpf, dbc->priority, &pagep);
if (TYPE(pagep) == P_OVERFLOW) {
OV_REF(pagep) = OV_REF(argp->hdr.data);
OV_LEN(pagep) = OV_LEN(argp->hdr.data);
bp = (u_int8_t *) pagep + P_OVERHEAD(file_dbp);
memcpy(bp, argp->data.data, argp->data.size);
} else {
bp = (u_int8_t *)pagep +
(db_indx_t)(HOFFSET(pagep) - argp->data.size);
memcpy(bp, argp->data.data, argp->data.size);
pinp = P_INP(file_dbp, pagep) + NUM_ENT(pagep);
ninp = argp->ind.data;
for (i = 0;
i < (int)(argp->ind.size / sizeof(*ninp)); i++)
*pinp++ = *ninp++;
HOFFSET(pagep) -= argp->data.size;
NUM_ENT(pagep) = i;
}
pagep->lsn = argp->nlsn;
}
if ((ret = __memp_fput(mpf, pagep, dbc->priority)) != 0)
goto out;
done:
*lsnp = argp->prev_lsn;
ret = 0;
out: REC_CLOSE;
}
int
__bam_pgno_recover(dbenv, dbtp, lsnp, op, info)
DB_ENV *dbenv;
DBT *dbtp;
DB_LSN *lsnp;
db_recops op;
void *info;
{
BINTERNAL *bi;
__bam_pgno_args *argp;
DB *file_dbp;
DBC *dbc;
DB_MPOOLFILE *mpf;
PAGE *pagep, *npagep;
db_pgno_t *pgnop;
int cmp_n, cmp_p, ret;
REC_PRINT(__bam_pgno_print);
REC_INTRO(__bam_pgno_read, 1, 0);
REC_FGET(mpf, argp->pgno, &pagep, done);
cmp_n = LOG_COMPARE(lsnp, &LSN(pagep));
cmp_p = LOG_COMPARE(&LSN(pagep), &argp->lsn);
CHECK_LSN(file_dbp->dbenv, op, cmp_p, &LSN(pagep), &argp->lsn);
if ((cmp_p == 0 && DB_REDO(op)) || (cmp_n == 0 && !DB_REDO(op))) {
switch (TYPE(pagep)) {
case P_IBTREE:
bi = GET_BINTERNAL(file_dbp, pagep, argp->indx);
if (B_TYPE(bi->type) == B_OVERFLOW) {
REC_FGET(mpf, argp->npgno, &npagep, out);
if (TYPE(npagep) == P_OVERFLOW)
pgnop =
&((BOVERFLOW *)(bi->data))->pgno;
else
pgnop = &bi->pgno;
if ((ret = __memp_fput(mpf,
npagep, file_dbp->priority)) != 0)
goto out;
break;
}
pgnop = &bi->pgno;
break;
case P_IRECNO:
pgnop =
&GET_RINTERNAL(file_dbp, pagep, argp->indx)->pgno;
break;
default:
pgnop =
&GET_BOVERFLOW(file_dbp, pagep, argp->indx)->pgno;
break;
}
if (DB_REDO(op)) {
REC_DIRTY(mpf, file_dbp->priority, &pagep);
*pgnop = argp->npgno;
pagep->lsn = *lsnp;
} else {
REC_DIRTY(mpf, file_dbp->priority, &pagep);
*pgnop = argp->opgno;
pagep->lsn = argp->lsn;
}
}
if ((ret = __memp_fput(mpf, pagep, file_dbp->priority)) != 0)
goto out;
done:
*lsnp = argp->prev_lsn;
ret = 0;
out: REC_CLOSE;
}
int
__bam_relink_43_recover(dbenv, dbtp, lsnp, op, info)
DB_ENV *dbenv;
DBT *dbtp;
DB_LSN *lsnp;
db_recops op;
void *info;
{
__bam_relink_43_args *argp;
DB *file_dbp;
DBC *dbc;
DB_MPOOLFILE *mpf;
PAGE *pagep;
int cmp_n, cmp_p, modified, ret;
pagep = NULL;
REC_PRINT(__bam_relink_43_print);
REC_INTRO(__bam_relink_43_read, 1, 0);
if ((ret = __memp_fget(mpf, &argp->pgno, NULL, 0, &pagep)) != 0) {
if (ret != DB_PAGE_NOTFOUND
#ifndef HAVE_FTRUNCATE
|| DB_REDO(op)
#endif
) {
ret = __db_pgerr(file_dbp, argp->pgno, ret);
goto out;
} else
goto next2;
}
cmp_p = LOG_COMPARE(&LSN(pagep), &argp->lsn);
CHECK_LSN(dbenv, op, cmp_p, &LSN(pagep), &argp->lsn);
if (cmp_p == 0 && DB_REDO(op)) {
REC_DIRTY(mpf, file_dbp->priority, &pagep);
pagep->lsn = *lsnp;
} else if (LOG_COMPARE(lsnp, &LSN(pagep)) == 0 && DB_UNDO(op)) {
REC_DIRTY(mpf, file_dbp->priority, &pagep);
pagep->next_pgno = argp->next;
pagep->prev_pgno = argp->prev;
pagep->lsn = argp->lsn;
}
if ((ret = __memp_fput(mpf, pagep, file_dbp->priority)) != 0)
goto out;
pagep = NULL;
next2: if ((ret = __memp_fget(mpf, &argp->next, NULL, 0, &pagep)) != 0) {
if (ret != DB_PAGE_NOTFOUND
#ifndef HAVE_FTRUNCATE
|| DB_REDO(op)
#endif
) {
ret = __db_pgerr(file_dbp, argp->next, ret);
goto out;
} else
goto prev;
}
modified = 0;
cmp_n = LOG_COMPARE(lsnp, &LSN(pagep));
cmp_p = LOG_COMPARE(&LSN(pagep), &argp->lsn_next);
CHECK_LSN(dbenv, op, cmp_p, &LSN(pagep), &argp->lsn_next);
if (cmp_p == 0 && DB_REDO(op)) {
REC_DIRTY(mpf, file_dbp->priority, &pagep);
pagep->prev_pgno = argp->prev;
modified = 1;
} else if (cmp_n == 0 && DB_UNDO(op)) {
REC_DIRTY(mpf, file_dbp->priority, &pagep);
pagep->prev_pgno = argp->pgno;
modified = 1;
}
if (modified) {
if (DB_UNDO(op))
pagep->lsn = argp->lsn_next;
else
pagep->lsn = *lsnp;
}
if ((ret = __memp_fput(mpf, pagep, file_dbp->priority)) != 0)
goto out;
pagep = NULL;
prev: if ((ret = __memp_fget(mpf, &argp->prev, NULL, 0, &pagep)) != 0) {
if (ret != DB_PAGE_NOTFOUND
#ifndef HAVE_FTRUNCATE
|| DB_REDO(op)
#endif
) {
ret = __db_pgerr(file_dbp, argp->prev, ret);
goto out;
} else
goto done;
}
modified = 0;
cmp_p = LOG_COMPARE(&LSN(pagep), &argp->lsn_prev);
CHECK_LSN(dbenv, op, cmp_p, &LSN(pagep), &argp->lsn_prev);
if (cmp_p == 0 && DB_REDO(op)) {
REC_DIRTY(mpf, file_dbp->priority, &pagep);
pagep->next_pgno = argp->next;
modified = 1;
} else if (LOG_COMPARE(lsnp, &LSN(pagep)) == 0 && DB_UNDO(op)) {
REC_DIRTY(mpf, file_dbp->priority, &pagep);
pagep->next_pgno = argp->pgno;
modified = 1;
}
if (modified) {
if (DB_UNDO(op))
pagep->lsn = argp->lsn_prev;
else
pagep->lsn = *lsnp;
}
if ((ret = __memp_fput(mpf, pagep, file_dbp->priority)) != 0)
goto out;
pagep = NULL;
done: *lsnp = argp->prev_lsn;
ret = 0;
out: if (pagep != NULL)
(void)__memp_fput(mpf, pagep, file_dbp->priority);
REC_CLOSE;
}