#include "db_config.h"
#ifndef lint
static const char revid[] = "$Id: txn_stat.c,v 1.2 2004/03/30 01:24:47 jtownsen Exp $";
#endif
#ifndef NO_SYSTEM_INCLUDES
#include <sys/types.h>
#include <string.h>
#endif
#include "db_int.h"
#include "dbinc/log.h"
#include "dbinc/txn.h"
static int __txn_stat __P((DB_ENV *, DB_TXN_STAT **, u_int32_t));
int
__txn_stat_pp(dbenv, statp, flags)
DB_ENV *dbenv;
DB_TXN_STAT **statp;
u_int32_t flags;
{
int rep_check, ret;
PANIC_CHECK(dbenv);
ENV_REQUIRES_CONFIG(dbenv, dbenv->tx_handle, "txn_stat", DB_INIT_TXN);
if ((ret = __db_fchk(dbenv,
"DB_ENV->txn_stat", flags, DB_STAT_CLEAR)) != 0)
return (ret);
rep_check = IS_ENV_REPLICATED(dbenv) ? 1 : 0;
if (rep_check)
__env_rep_enter(dbenv);
ret = __txn_stat(dbenv, statp, flags);
if (rep_check)
__env_rep_exit(dbenv);
return (ret);
}
static int
__txn_stat(dbenv, statp, flags)
DB_ENV *dbenv;
DB_TXN_STAT **statp;
u_int32_t flags;
{
DB_TXNMGR *mgr;
DB_TXNREGION *region;
DB_TXN_STAT *stats;
TXN_DETAIL *txnp;
size_t nbytes;
u_int32_t maxtxn, ndx;
int ret;
*statp = NULL;
mgr = dbenv->tx_handle;
region = mgr->reginfo.primary;
maxtxn = region->maxtxns + (region->maxtxns / 10) + 10;
nbytes = sizeof(DB_TXN_STAT) + sizeof(DB_TXN_ACTIVE) * maxtxn;
if ((ret = __os_umalloc(dbenv, nbytes, &stats)) != 0)
return (ret);
R_LOCK(dbenv, &mgr->reginfo);
memcpy(stats, ®ion->stat, sizeof(*stats));
stats->st_last_txnid = region->last_txnid;
stats->st_last_ckp = region->last_ckp;
stats->st_time_ckp = region->time_ckp;
stats->st_txnarray = (DB_TXN_ACTIVE *)&stats[1];
for (ndx = 0,
txnp = SH_TAILQ_FIRST(®ion->active_txn, __txn_detail);
txnp != NULL && ndx < maxtxn;
txnp = SH_TAILQ_NEXT(txnp, links, __txn_detail), ++ndx) {
stats->st_txnarray[ndx].txnid = txnp->txnid;
if (txnp->parent == INVALID_ROFF)
stats->st_txnarray[ndx].parentid = TXN_INVALID;
else
stats->st_txnarray[ndx].parentid =
((TXN_DETAIL *)R_ADDR(&mgr->reginfo,
txnp->parent))->txnid;
stats->st_txnarray[ndx].lsn = txnp->begin_lsn;
if ((stats->st_txnarray[ndx].xa_status = txnp->xa_status) != 0)
memcpy(stats->st_txnarray[ndx].xid,
txnp->xid, DB_XIDDATASIZE);
}
stats->st_region_wait = mgr->reginfo.rp->mutex.mutex_set_wait;
stats->st_region_nowait = mgr->reginfo.rp->mutex.mutex_set_nowait;
stats->st_regsize = mgr->reginfo.rp->size;
if (LF_ISSET(DB_STAT_CLEAR)) {
mgr->reginfo.rp->mutex.mutex_set_wait = 0;
mgr->reginfo.rp->mutex.mutex_set_nowait = 0;
memset(®ion->stat, 0, sizeof(region->stat));
region->stat.st_maxtxns = region->maxtxns;
region->stat.st_maxnactive =
region->stat.st_nactive = stats->st_nactive;
}
R_UNLOCK(dbenv, &mgr->reginfo);
*statp = stats;
return (0);
}