#include "db_config.h"
#ifndef NO_SYSTEM_INCLUDES
#include <sys/types.h>
#include <ctype.h>
#include <string.h>
#endif
#include "db_int.h"
#include "dbinc/crypto.h"
#include "dbinc/db_page.h"
#include "dbinc/db_dispatch.h"
#include "dbinc/db_am.h"
#include "dbinc/log.h"
#include "dbinc/txn.h"
int
__dbreg_register_log(dbenv, txnid, ret_lsnp, flags,
opcode, name, uid, fileid, ftype, meta_pgno,
id)
DB_ENV *dbenv;
DB_TXN *txnid;
DB_LSN *ret_lsnp;
u_int32_t flags;
u_int32_t opcode;
const DBT *name;
const DBT *uid;
int32_t fileid;
DBTYPE ftype;
db_pgno_t meta_pgno;
u_int32_t id;
{
DBT logrec;
DB_TXNLOGREC *lr;
DB_LSN *lsnp, null_lsn;
u_int32_t zero, uinttmp, rectype, txn_num;
u_int npad;
u_int8_t *bp;
int is_durable, ret;
rectype = DB___dbreg_register;
npad = 0;
is_durable = 1;
if (LF_ISSET(DB_LOG_NOT_DURABLE) ||
F_ISSET(dbenv, DB_ENV_TXN_NOT_DURABLE)) {
if (txnid == NULL)
return (0);
is_durable = 0;
}
if (txnid == NULL) {
txn_num = 0;
null_lsn.file = 0;
null_lsn.offset = 0;
lsnp = &null_lsn;
} else {
if (TAILQ_FIRST(&txnid->kids) != NULL &&
(ret = __txn_activekids(dbenv, rectype, txnid)) != 0)
return (ret);
txn_num = txnid->txnid;
lsnp = &txnid->last_lsn;
}
logrec.size = sizeof(rectype) + sizeof(txn_num) + sizeof(DB_LSN)
+ sizeof(u_int32_t)
+ sizeof(u_int32_t) + (name == NULL ? 0 : name->size)
+ sizeof(u_int32_t) + (uid == NULL ? 0 : uid->size)
+ sizeof(u_int32_t)
+ sizeof(u_int32_t)
+ sizeof(u_int32_t)
+ sizeof(u_int32_t);
if (CRYPTO_ON(dbenv)) {
npad =
((DB_CIPHER *)dbenv->crypto_handle)->adj_size(logrec.size);
logrec.size += npad;
}
if (!is_durable && txnid != NULL) {
if ((ret = __os_malloc(dbenv,
logrec.size + sizeof(DB_TXNLOGREC), &lr)) != 0)
return (ret);
#ifdef DIAGNOSTIC
goto do_malloc;
#else
logrec.data = &lr->data;
#endif
} else {
#ifdef DIAGNOSTIC
do_malloc:
#endif
if ((ret =
__os_malloc(dbenv, logrec.size, &logrec.data)) != 0) {
#ifdef DIAGNOSTIC
if (!is_durable && txnid != NULL)
(void)__os_free(dbenv, lr);
#endif
return (ret);
}
}
if (npad > 0)
memset((u_int8_t *)logrec.data + logrec.size - npad, 0, npad);
bp = logrec.data;
memcpy(bp, &rectype, sizeof(rectype));
bp += sizeof(rectype);
memcpy(bp, &txn_num, sizeof(txn_num));
bp += sizeof(txn_num);
memcpy(bp, lsnp, sizeof(DB_LSN));
bp += sizeof(DB_LSN);
uinttmp = (u_int32_t)opcode;
memcpy(bp, &uinttmp, sizeof(uinttmp));
bp += sizeof(uinttmp);
if (name == NULL) {
zero = 0;
memcpy(bp, &zero, sizeof(u_int32_t));
bp += sizeof(u_int32_t);
} else {
memcpy(bp, &name->size, sizeof(name->size));
bp += sizeof(name->size);
memcpy(bp, name->data, name->size);
bp += name->size;
}
if (uid == NULL) {
zero = 0;
memcpy(bp, &zero, sizeof(u_int32_t));
bp += sizeof(u_int32_t);
} else {
memcpy(bp, &uid->size, sizeof(uid->size));
bp += sizeof(uid->size);
memcpy(bp, uid->data, uid->size);
bp += uid->size;
}
uinttmp = (u_int32_t)fileid;
memcpy(bp, &uinttmp, sizeof(uinttmp));
bp += sizeof(uinttmp);
uinttmp = (u_int32_t)ftype;
memcpy(bp, &uinttmp, sizeof(uinttmp));
bp += sizeof(uinttmp);
uinttmp = (u_int32_t)meta_pgno;
memcpy(bp, &uinttmp, sizeof(uinttmp));
bp += sizeof(uinttmp);
uinttmp = (u_int32_t)id;
memcpy(bp, &uinttmp, sizeof(uinttmp));
bp += sizeof(uinttmp);
DB_ASSERT((u_int32_t)(bp - (u_int8_t *)logrec.data) <= logrec.size);
#ifdef DIAGNOSTIC
if (!is_durable && txnid != NULL) {
memcpy(lr->data, logrec.data, logrec.size);
rectype |= DB_debug_FLAG;
memcpy(logrec.data, &rectype, sizeof(rectype));
}
#endif
if (!is_durable && txnid != NULL) {
ret = 0;
STAILQ_INSERT_HEAD(&txnid->logs, lr, links);
#ifdef DIAGNOSTIC
goto do_put;
#endif
} else{
#ifdef DIAGNOSTIC
do_put:
#endif
ret = __log_put(dbenv,
ret_lsnp, (DBT *)&logrec, flags | DB_LOG_NOCOPY);
if (ret == 0 && txnid != NULL)
txnid->last_lsn = *ret_lsnp;
}
if (!is_durable)
LSN_NOT_LOGGED(*ret_lsnp);
#ifdef LOG_DIAGNOSTIC
if (ret != 0)
(void)__dbreg_register_print(dbenv,
(DBT *)&logrec, ret_lsnp, NULL, NULL);
#endif
#ifndef DIAGNOSTIC
if (is_durable || txnid == NULL)
#endif
__os_free(dbenv, logrec.data);
return (ret);
}
#ifdef HAVE_REPLICATION
int
__dbreg_register_getpgnos(dbenv, rec, lsnp, notused1, summary)
DB_ENV *dbenv;
DBT *rec;
DB_LSN *lsnp;
db_recops notused1;
void *summary;
{
TXN_RECS *t;
int ret;
COMPQUIET(rec, NULL);
COMPQUIET(notused1, DB_TXN_ABORT);
t = (TXN_RECS *)summary;
if ((ret = __rep_check_alloc(dbenv, t, 1)) != 0)
return (ret);
t->array[t->npages].flags = LSN_PAGE_NOLOCK;
t->array[t->npages].lsn = *lsnp;
t->array[t->npages].fid = DB_LOGFILEID_INVALID;
memset(&t->array[t->npages].pgdesc, 0,
sizeof(t->array[t->npages].pgdesc));
t->npages++;
return (0);
}
#endif
int
__dbreg_register_print(dbenv, dbtp, lsnp, notused2, notused3)
DB_ENV *dbenv;
DBT *dbtp;
DB_LSN *lsnp;
db_recops notused2;
void *notused3;
{
__dbreg_register_args *argp;
u_int32_t i;
int ch;
int ret;
notused2 = DB_TXN_ABORT;
notused3 = NULL;
if ((ret = __dbreg_register_read(dbenv, dbtp->data, &argp)) != 0)
return (ret);
(void)printf(
"[%lu][%lu]__dbreg_register%s: rec: %lu txnid %lx prevlsn [%lu][%lu]\n",
(u_long)lsnp->file,
(u_long)lsnp->offset,
(argp->type & DB_debug_FLAG) ? "_debug" : "",
(u_long)argp->type,
(u_long)argp->txnid->txnid,
(u_long)argp->prev_lsn.file,
(u_long)argp->prev_lsn.offset);
(void)printf("\topcode: %lu\n", (u_long)argp->opcode);
(void)printf("\tname: ");
for (i = 0; i < argp->name.size; i++) {
ch = ((u_int8_t *)argp->name.data)[i];
printf(isprint(ch) || ch == 0x0a ? "%c" : "%#x ", ch);
}
(void)printf("\n");
(void)printf("\tuid: ");
for (i = 0; i < argp->uid.size; i++) {
ch = ((u_int8_t *)argp->uid.data)[i];
printf(isprint(ch) || ch == 0x0a ? "%c" : "%#x ", ch);
}
(void)printf("\n");
(void)printf("\tfileid: %ld\n", (long)argp->fileid);
(void)printf("\tftype: 0x%lx\n", (u_long)argp->ftype);
(void)printf("\tmeta_pgno: %lu\n", (u_long)argp->meta_pgno);
(void)printf("\tid: 0x%lx\n", (u_long)argp->id);
(void)printf("\n");
__os_free(dbenv, argp);
return (0);
}
int
__dbreg_register_read(dbenv, recbuf, argpp)
DB_ENV *dbenv;
void *recbuf;
__dbreg_register_args **argpp;
{
__dbreg_register_args *argp;
u_int32_t uinttmp;
u_int8_t *bp;
int ret;
if ((ret = __os_malloc(dbenv,
sizeof(__dbreg_register_args) + sizeof(DB_TXN), &argp)) != 0)
return (ret);
argp->txnid = (DB_TXN *)&argp[1];
bp = recbuf;
memcpy(&argp->type, bp, sizeof(argp->type));
bp += sizeof(argp->type);
memcpy(&argp->txnid->txnid, bp, sizeof(argp->txnid->txnid));
bp += sizeof(argp->txnid->txnid);
memcpy(&argp->prev_lsn, bp, sizeof(DB_LSN));
bp += sizeof(DB_LSN);
memcpy(&uinttmp, bp, sizeof(uinttmp));
argp->opcode = (u_int32_t)uinttmp;
bp += sizeof(uinttmp);
memset(&argp->name, 0, sizeof(argp->name));
memcpy(&argp->name.size, bp, sizeof(u_int32_t));
bp += sizeof(u_int32_t);
argp->name.data = bp;
bp += argp->name.size;
memset(&argp->uid, 0, sizeof(argp->uid));
memcpy(&argp->uid.size, bp, sizeof(u_int32_t));
bp += sizeof(u_int32_t);
argp->uid.data = bp;
bp += argp->uid.size;
memcpy(&uinttmp, bp, sizeof(uinttmp));
argp->fileid = (int32_t)uinttmp;
bp += sizeof(uinttmp);
memcpy(&uinttmp, bp, sizeof(uinttmp));
argp->ftype = (DBTYPE)uinttmp;
bp += sizeof(uinttmp);
memcpy(&uinttmp, bp, sizeof(uinttmp));
argp->meta_pgno = (db_pgno_t)uinttmp;
bp += sizeof(uinttmp);
memcpy(&uinttmp, bp, sizeof(uinttmp));
argp->id = (u_int32_t)uinttmp;
bp += sizeof(uinttmp);
*argpp = argp;
return (0);
}
int
__dbreg_init_print(dbenv, dtabp, dtabsizep)
DB_ENV *dbenv;
int (***dtabp)__P((DB_ENV *, DBT *, DB_LSN *, db_recops, void *));
size_t *dtabsizep;
{
int ret;
if ((ret = __db_add_recovery(dbenv, dtabp, dtabsizep,
__dbreg_register_print, DB___dbreg_register)) != 0)
return (ret);
return (0);
}
#ifdef HAVE_REPLICATION
int
__dbreg_init_getpgnos(dbenv, dtabp, dtabsizep)
DB_ENV *dbenv;
int (***dtabp)__P((DB_ENV *, DBT *, DB_LSN *, db_recops, void *));
size_t *dtabsizep;
{
int ret;
if ((ret = __db_add_recovery(dbenv, dtabp, dtabsizep,
__dbreg_register_getpgnos, DB___dbreg_register)) != 0)
return (ret);
return (0);
}
#endif
int
__dbreg_init_recover(dbenv, dtabp, dtabsizep)
DB_ENV *dbenv;
int (***dtabp)__P((DB_ENV *, DBT *, DB_LSN *, db_recops, void *));
size_t *dtabsizep;
{
int ret;
if ((ret = __db_add_recovery(dbenv, dtabp, dtabsizep,
__dbreg_register_recover, DB___dbreg_register)) != 0)
return (ret);
return (0);
}