libdb/lang/cxx/cxx_txn.cpp
2011-09-13 13:44:24 -04:00

117 lines
3.1 KiB
C++

/*-
* See the file LICENSE for redistribution information.
*
* Copyright (c) 1997, 2011 Oracle and/or its affiliates. All rights reserved.
*
* $Id$
*/
#include "db_config.h"
#include "db_int.h"
#include "db_cxx.h"
#include "dbinc/cxx_int.h"
#include "dbinc/txn.h"
// Helper macro for simple methods that pass through to the
// underlying C method. It may return an error or raise an exception.
// Note this macro expects that input _argspec is an argument
// list element (e.g., "char *arg") and that _arglist is the arguments
// that should be passed through to the C method (e.g., "(db, arg)")
//
#define DBTXN_METHOD(_name, _delete, _argspec, _arglist) \
int DbTxn::_name _argspec \
{ \
int ret; \
DB_TXN *txn = unwrap(this); \
DbEnv *dbenv = DbEnv::get_DbEnv(txn->mgrp->env->dbenv); \
\
ret = txn->_name _arglist; \
/* Weird, but safe if we don't access this again. */ \
if (_delete) { \
/* Can't do this in the destructor. */ \
if (parent_txn_ != NULL) \
parent_txn_->remove_child_txn(this); \
delete this; \
} \
if (!DB_RETOK_STD(ret)) \
DB_ERROR(dbenv, "DbTxn::" # _name, ret, ON_ERROR_UNKNOWN); \
return (ret); \
}
// private constructor, never called but needed by some C++ linkers
DbTxn::DbTxn(DbTxn *ptxn)
: imp_(0)
{
TAILQ_INIT(&children);
memset(&child_entry, 0, sizeof(child_entry));
parent_txn_ = ptxn;
if (parent_txn_ != NULL)
parent_txn_->add_child_txn(this);
}
DbTxn::DbTxn(DB_TXN *txn, DbTxn *ptxn)
: imp_(txn)
{
txn->api_internal = this;
TAILQ_INIT(&children);
memset(&child_entry, 0, sizeof(child_entry));
parent_txn_ = ptxn;
if (parent_txn_ != NULL)
parent_txn_->add_child_txn(this);
}
DbTxn::~DbTxn()
{
DbTxn *txn, *pnext;
for(txn = TAILQ_FIRST(&children); txn != NULL;) {
pnext = TAILQ_NEXT(txn, child_entry);
delete txn;
txn = pnext;
}
}
DBTXN_METHOD(abort, 1, (), (txn))
DBTXN_METHOD(commit, 1, (u_int32_t flags), (txn, flags))
DBTXN_METHOD(discard, 1, (u_int32_t flags), (txn, flags))
void DbTxn::remove_child_txn(DbTxn *kid)
{
TAILQ_REMOVE(&children, kid, child_entry);
kid->set_parent(NULL);
}
void DbTxn::add_child_txn(DbTxn *kid)
{
TAILQ_INSERT_HEAD(&children, kid, child_entry);
kid->set_parent(this);
}
u_int32_t DbTxn::id()
{
DB_TXN *txn;
txn = unwrap(this);
return (txn->id(txn)); // no error
}
DBTXN_METHOD(get_name, 0, (const char **namep), (txn, namep))
DBTXN_METHOD(get_priority, 0, (u_int32_t *priorityp), (txn, priorityp))
DBTXN_METHOD(prepare, 0, (u_int8_t *gid), (txn, gid))
DBTXN_METHOD(set_name, 0, (const char *name), (txn, name))
DBTXN_METHOD(set_priority, 0, (u_int32_t priority), (txn, priority))
DBTXN_METHOD(set_timeout, 0, (db_timeout_t timeout, u_int32_t flags),
(txn, timeout, flags))
// static method
DbTxn *DbTxn::wrap_DB_TXN(DB_TXN *txn)
{
DbTxn *wrapped_txn = get_DbTxn(txn);
// txn may have a valid parent transaction, but here we don't care.
// We maintain parent-kid relationship in DbTxn only to make sure
// unresolved kids of DbTxn objects are deleted.
return (wrapped_txn != NULL) ? wrapped_txn : new DbTxn(txn, NULL);
}