#include "db_config.h"
#ifndef lint
static const char revid[] = "$Id: db_rename.c,v 1.2 2004/03/30 01:21:24 jtownsen Exp $";
#endif
#ifndef NO_SYSTEM_INCLUDES
#include <sys/types.h>
#include <string.h>
#endif
#include "db_int.h"
#include "dbinc/db_page.h"
#include "dbinc/db_shash.h"
#include "dbinc/db_am.h"
#include "dbinc/fop.h"
#include "dbinc/lock.h"
#include "dbinc/log.h"
#include "dbinc/mp.h"
static int __dbenv_dbrename __P((DB_ENV *,
DB_TXN *, const char *, const char *, const char *, int));
static int __db_subdb_rename __P((DB *,
DB_TXN *, const char *, const char *, const char *));
int
__dbenv_dbrename_pp(dbenv, txn, name, subdb, newname, flags)
DB_ENV *dbenv;
DB_TXN *txn;
const char *name, *subdb, *newname;
u_int32_t flags;
{
int ret, txn_local;
PANIC_CHECK(dbenv);
ENV_ILLEGAL_BEFORE_OPEN(dbenv, "DB_ENV->dbrename");
if ((ret = __db_fchk(dbenv, "DB->rename", flags, DB_AUTO_COMMIT)) != 0)
return (ret);
if (IS_AUTO_COMMIT(dbenv, txn, flags)) {
if ((ret = __db_txn_auto_init(dbenv, &txn)) != 0)
return (ret);
txn_local = 1;
} else {
if (txn != NULL && !TXN_ON(dbenv))
return (__db_not_txn_env(dbenv));
txn_local = 0;
}
ret = __dbenv_dbrename(dbenv, txn, name, subdb, newname, txn_local);
return (txn_local ? __db_txn_auto_resolve(dbenv, txn, 0, ret) : ret);
}
static int
__dbenv_dbrename(dbenv, txn, name, subdb, newname, txn_local)
DB_ENV *dbenv;
DB_TXN *txn;
const char *name, *subdb, *newname;
int txn_local;
{
DB *dbp;
int handle_check, ret, t_ret;
if ((ret = db_create(&dbp, dbenv, 0)) != 0)
return (ret);
if (txn != NULL)
F_SET(dbp, DB_AM_TXN);
handle_check = IS_REPLICATED(dbenv, dbp);
if (handle_check && (ret = __db_rep_enter(dbp, 1, txn != NULL)) != 0)
return (ret);
ret = __db_rename_int(dbp, txn, name, subdb, newname);
if (txn_local) {
LOCK_INIT(dbp->handle_lock);
dbp->lid = DB_LOCK_INVALIDID;
} else if (txn != NULL) {
dbp->lid = DB_LOCK_INVALIDID;
}
if (handle_check)
__db_rep_exit(dbenv);
if ((t_ret = __db_close(dbp, txn, DB_NOSYNC)) != 0 && ret == 0)
ret = t_ret;
return (ret);
}
int
__db_rename_pp(dbp, name, subdb, newname, flags)
DB *dbp;
const char *name, *subdb, *newname;
u_int32_t flags;
{
DB_ENV *dbenv;
int handle_check, ret;
dbenv = dbp->dbenv;
handle_check = 0;
PANIC_CHECK(dbenv);
if (F_ISSET(dbp, DB_AM_OPEN_CALLED)) {
ret = __db_mi_open(dbenv, "DB->rename", 1);
goto err;
}
if ((ret = __db_fchk(dbenv, "DB->rename", flags, 0)) != 0)
goto err;
if ((ret = __db_check_txn(dbp, NULL, DB_LOCK_INVALIDID, 0)) != 0)
goto err;
handle_check = IS_REPLICATED(dbenv, dbp);
if (handle_check && (ret = __db_rep_enter(dbp, 1, 0)) != 0) {
handle_check = 0;
goto err;
}
ret = __db_rename(dbp, NULL, name, subdb, newname);
err: if (handle_check)
__db_rep_exit(dbenv);
return (ret);
}
int
__db_rename(dbp, txn, name, subdb, newname)
DB *dbp;
DB_TXN *txn;
const char *name, *subdb, *newname;
{
int ret, t_ret;
ret = __db_rename_int(dbp, txn, name, subdb, newname);
if ((t_ret = __db_close(dbp, txn, DB_NOSYNC)) != 0 && ret == 0)
ret = t_ret;
return (ret);
}
int
__db_rename_int(dbp, txn, name, subdb, newname)
DB *dbp;
DB_TXN *txn;
const char *name, *subdb, *newname;
{
DB_ENV *dbenv;
int ret;
char *real_name;
dbenv = dbp->dbenv;
real_name = NULL;
DB_TEST_RECOVERY(dbp, DB_TEST_PREDESTROY, ret, name);
if (subdb != NULL) {
ret = __db_subdb_rename(dbp, txn, name, subdb, newname);
goto err;
}
if ((ret = __db_appname(dbenv,
DB_APP_DATA, name, 0, NULL, &real_name)) != 0)
goto err;
if ((ret = __fop_remove_setup(dbp, txn, real_name, 0)) != 0)
goto err;
if (dbp->db_am_rename != NULL &&
(ret = dbp->db_am_rename(dbp, txn, name, subdb, newname)) != 0)
goto err;
if (txn != NULL) {
if ((ret = __fop_dummy(dbp, txn, name, newname, 0)) != 0)
goto err;
} else {
if ((ret = __fop_dbrename(dbp, name, newname)) != 0)
goto err;
}
DB_ASSERT(dbp->log_filename == NULL ||
dbp->log_filename->id == DB_LOGFILEID_INVALID);
DB_TEST_RECOVERY(dbp, DB_TEST_POSTDESTROY, ret, newname);
DB_TEST_RECOVERY_LABEL
err: if (real_name != NULL)
__os_free(dbenv, real_name);
return (ret);
}
static int
__db_subdb_rename(dbp, txn, name, subdb, newname)
DB *dbp;
DB_TXN *txn;
const char *name, *subdb, *newname;
{
DB *mdbp;
DB_ENV *dbenv;
PAGE *meta;
int ret, t_ret;
mdbp = NULL;
meta = NULL;
dbenv = dbp->dbenv;
F_SET(dbp, DB_AM_SUBDB);
if ((ret = __db_master_open(dbp, txn, name, 0, 0, &mdbp)) != 0)
goto err;
if ((ret = __db_master_update(mdbp, dbp, txn, subdb, dbp->type,
MU_OPEN, NULL, 0)) != 0)
goto err;
if ((ret = __memp_fget(mdbp->mpf, &dbp->meta_pgno, 0, &meta)) != 0)
goto err;
memcpy(dbp->fileid, ((DBMETA *)meta)->uid, DB_FILE_ID_LEN);
if ((ret = __fop_lock_handle(dbenv,
dbp, mdbp->lid, DB_LOCK_WRITE, NULL, 0)) != 0)
goto err;
ret = __memp_fput(mdbp->mpf, meta, 0);
meta = NULL;
if (ret != 0)
goto err;
if ((ret = __db_master_update(mdbp, dbp, txn,
subdb, dbp->type, MU_RENAME, newname, 0)) != 0)
goto err;
DB_TEST_RECOVERY(dbp, DB_TEST_POSTDESTROY, ret, name);
DB_TEST_RECOVERY_LABEL
err:
if (meta != NULL &&
(t_ret = __memp_fput(mdbp->mpf, meta, 0)) != 0 && ret == 0)
ret = t_ret;
if (mdbp != NULL &&
(t_ret = __db_close(mdbp, txn, 0)) != 0 && ret == 0)
ret = t_ret;
return (ret);
}