mirror of
https://sourceware.org/git/glibc.git
synced 2024-10-04 04:57:46 +00:00
a5a0310d8e
1997-09-30 18:03 Ulrich Drepper <drepper@cygnus.com> * Makerules: Undo last change. * csu/Makefile: Define before-compile at the right place. * aclocal.m4: Remove a.out file created by assembler test. * set-init.c: Find set-hooks.h using <...>. Update to db 2.3.10. * db2/Makefile: Update. * db2/db.h: Likewise. * db2/db_185.h: Likewise. * db2/db_int.h: Likewise. * db2/btree/bt_close.c: Likewise. * db2/btree/bt_conv.c: Likewise. * db2/btree/bt_cursor.c: Likewise. * db2/btree/bt_put.c: Likewise. * db2/btree/bt_rec.c: Likewise. * db2/btree/bt_recno.c: Likewise. * db2/btree/btree.src: Likewise. * db2/btree/btree_auto.c: Likewise. * db2/clib/getlong.c: Likewise. * db2/db/db.c: Likewise. * db2/db/db_auto.c: Likewise. * db2/db/db_conv.c: Likewise. * db2/db/db_pr.c: Likewise. * db2/db/db_ret.c: Likewise. * db2/db/db_thread.c: Likewise. * db2/hash/hash.c: Likewise. * db2/hash/hash_auto.c: Likewise. * db2/hash/hash_conv.c: Likewise. * db2/hash/hash_dup.c: Likewise. * db2/hash/hash_func.c: Likewise. * db2/hash/hash_page.c: Likewise. * db2/hash/hash_rec.c: Likewise. * db2/include/btree.h: Likewise. * db2/include/btree_ext.h: Likewise. * db2/include/db.h.src: Likewise. * db2/include/db_185.h.src: Likewise. * db2/include/db_cxx.h: Likewise. * db2/include/db_ext.h: Likewise. * db2/include/db_int.h.src: Likewise. * db2/include/db_page.h: Likewise. * db2/include/db_shash.h: Likewise. * db2/include/lock.h: Likewise. * db2/include/log.h: Likewise. * db2/include/log_ext.h: Likewise. * db2/include/mp.h: Likewise. * db2/include/shqueue.h: Likewise. * db2/include/txn.h: Likewise. * db2/lock/lock.c: Likewise. * db2/lock/lock_deadlock.c: Likewise. * db2/log/log.c: Likewise. * db2/log/log_archive.c: Likewise. * db2/log/log_auto.c: Likewise. * db2/log/log_get.c: Likewise. * db2/log/log_put.c: Likewise. * db2/log/log_register.c: Likewise. * db2/mp/mp_bh.c: Likewise. * db2/mp/mp_fget.c: Likewise. * db2/mp/mp_fopen.c: Likewise. * db2/mp/mp_fput.c: Likewise. * db2/mp/mp_fset.c: Likewise. * db2/mp/mp_open.c: Likewise. * db2/mutex/mutex.c: Likewise. * db2/os/db_os_dir.c: Likewise. * db2/progs/db_checkpoint/db_checkpoint.c: Likewise. * db2/progs/db_deadlock/db_deadlock.c: Likewise. * db2/progs/db_dump185/db_dump185.c: Likewise. * db2/progs/db_load/db_load.c: Likewise. * db2/progs/db_recover/db_recover.c: Likewise. * db2/txn/txn.c: Likewise. * db2/txn/txn_auto.c: Likewise. * elf/link.h: Define struct libname_list outside struct link_map to not confuse C++ compilers. * include/features.h: Recognize _XOPEN_SOURCE == 500 and set __USE_UNIX98. * manual/creature.texi: Explain this. * libc.map: Add new functions. * libio/Makefile (routines): Add fseeko and ftello. * libio/ftello.c: New file. * libio/fseeko.c: New file. * libio/stdio.h: Add prototypes for new functions. * manual/stdio.texi: Document fseeko and ftello. * posix/Makefile (routines): Add pread and pwrite. * sysdeps/posix/pread.c: New file. * sysdeps/posix/pwrite.c: New file. * sysdeps/stub/pread.c: New file. * sysdeps/stub/pwrite.c: New file. * posix/unistd.h: Add prototypes for pread and pwrite. Pretty print header. Define gid_t, uid_t, off_t, pid_t if __USE_UNIX98. Declare ctermid and cuserid if __USE_UNIX98. (swab): Change to take void * arguments. * string/swab.c: Change parameter to void *. * posix/sys/types: Define gid_t, uid_t, off_t, pid_t only if not already happened. * manual/llio.texi: Document pread and pwrite. * string/strings.h: Don't simply include string.h. Define BSD functions according to Unix98. * stdlib/tst-strtol.c: Include <string.h> not <strings.h>. * sunrpc/clnt_simp.c: Likewise. * malloc/Makefile (aux): Add set-freeres. * malloc/mtrace.c: Define function release_libc_mem which calls the __libc_subfreeres handler. (mtrace): Register release_libc_mem. * malloc/set-freeres.c: New file. * intl/dcgettext.c: Define free_mem function and add to __libc_subfreeres list. * intl/finddomain.c: Likewise. * intl/gettextP.h (struct loaded_domain): Add new fields use_mmap and mmap_size. Add prototype for _nl_unloaded_domain. * intl/loadmsgcat.c: Define new function _nl_unload_domain. (_nl_load_domain): Store informaiton about mmap use and file size. * intl/localealias.c (read_alias_file): Optimize locale alias file reading by avoid frequen mallocs. Define free_mem function and add to __libc_subfreeres list. * locale/localeinfo.h: Make a difference between MAX_USAGE_COUNT and undeletable. Add prototype for _nl_unload_locale. * locale/C-collate: Mark data as undeletable by using UNDELETABLE. * locale/C-ctype: Likewise. * locale/C-messages: Likewise. * locale/C-monetary: Likewise. * locale/C-numeric: Likewise. * locale/C-time: Likewise. * locale/findlocale.c (_nl_find_locale, _nl_remove_locale): Handle MAX_USAGE_COUNT and UNDELETABLE. (free_mem): New function. Add it to __libc_subfreeres list. * locale/loadlocale.c: Define _nl_unload_locale function. * misc/hsearch.c: Register hdestroy in __libc_subfreeres list. * stdlib/fmtmsg.c (addseverity): Handle illegal severity arguments correctly Define free_mem function and add to __libc_subfreeres list. * locale/programs/localedef.c (options): short form os verbose is v. Reported by Andreas Jaeger. * misc/sys/select.h: Define pselect only is __USE_POSIX since this header is used in some others as well for historical reasons. * resolv/resolv.h: Include <netinet/in.h> to make self-contained. * string/bits/string2.h: Add missing braces and optimize strcmp a bit more. * sysdeps/i386/i486/bits/string.h: Likewise. * sunrpc/rpc/auth_des.h: Include rpc/auth.h to be self-contained. Pretty print. * sysdeps/mach/hurd/cthreads.c: Add copyright text. * sysdeps/unix/sysv/linux/syscalls.list: Correct prctl entry. * sysdeps/unix/sysv/linux/sys/mman.h: Get definition of size_t. * time/time.h: Pretty print. 1997-09-29 Paul Eggert <eggert@twinsun.com> * time/strftime.c: Synchronize with GNU Emacs strftime.c. (HAVE_MEMCPY): Define if emacs is defined and HAVE_BCOPY isn't. (gmtime_r, localtime_r): Undef before defining. (iso_week_days): Use __inline__, not inline. 1997-09-27 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de> * sysdeps/m68k/fpu/bits/mathinline.h: Rename exp2{,l,f} to __ieee754_exp2{,l,f}. * sysdeps/m68k/fpu/s_exp2.c: Likewise. * sysdeps/m68k/fpu/s_exp2l.c: Likewise. * sysdeps/m68k/fpu/s_exp2f.c: Likewise. 1997-09-27 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de> * elf/soinit.c (__EH_FRAME_BEGIN__): Don't make the .eh_frame section read-only, it contains relocations. * elf/sofini.c (__FRAME_END__): Likewise. 1997-09-29 03:08 Ulrich Drepper <drepper@cygnus.com> * sysdeps/i386/i486/bits/string.h [__PIC__] (__strspn_cg, __strcspn_cg, __strpbrk_cg, __strstr_cg): Optimize even more. No spill register needed. Patch by NIIBE Yutaka <gniibe@mri.co.jp>. 1997-09-28 08:27 Thorsten Kukuk <kukuk@vt.uni-paderborn.de> * nis/nis_call.c (__do_niscall2): Fix return code, add missing break in switch case. * nis/nis_mkdir.c: Fix return codes to match Solaris version. * nis/nis_rmdir.c: Likewise. * nis/rpcsvc/yp_prot.h: Rename struct keydat to struct keydat_t for C++. 1997-09-28 04:32 Ulrich Drepper <drepper@cygnus.com> * configure.in: Fix typo. Patch by Zack Weinberg <zack@rabi.phys.columbia.edu>. 1997-09-25 20:14 Philip Blundell <Philip.Blundell@pobox.com> * sysdeps/unix/sysv/linux/scsi/sg.h: New file. * sysdeps/unix/sysv/linux/Makefile: Install <scsi/sg.h>.
817 lines
20 KiB
C
817 lines
20 KiB
C
/*-
|
|
* See the file LICENSE for redistribution information.
|
|
*
|
|
* Copyright (c) 1996, 1997
|
|
* Sleepycat Software. All rights reserved.
|
|
*/
|
|
/*
|
|
* Copyright (c) 1995, 1996
|
|
* The President and Fellows of Harvard University. All rights reserved.
|
|
*
|
|
* This code is derived from software contributed to Berkeley by
|
|
* Margo Seltzer.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
* 3. All advertising materials mentioning features or use of this software
|
|
* must display the following acknowledgement:
|
|
* This product includes software developed by the University of
|
|
* California, Berkeley and its contributors.
|
|
* 4. Neither the name of the University nor the names of its contributors
|
|
* may be used to endorse or promote products derived from this software
|
|
* without specific prior written permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
|
|
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
|
|
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
|
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
|
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
|
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
|
* SUCH DAMAGE.
|
|
*/
|
|
|
|
#include "config.h"
|
|
|
|
#ifndef lint
|
|
static const char sccsid[] = "@(#)txn.c 10.30 (Sleepycat) 9/23/97";
|
|
#endif /* not lint */
|
|
|
|
|
|
#ifndef NO_SYSTEM_INCLUDES
|
|
#include <sys/types.h>
|
|
#include <sys/mman.h>
|
|
#include <sys/stat.h>
|
|
|
|
#include <errno.h>
|
|
#include <fcntl.h>
|
|
#include <stddef.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <time.h>
|
|
#include <unistd.h>
|
|
#endif
|
|
|
|
#include "shqueue.h"
|
|
#include "db_int.h"
|
|
#include "db_page.h"
|
|
#include "db_shash.h"
|
|
#include "txn.h"
|
|
#include "db_dispatch.h"
|
|
#include "lock.h"
|
|
#include "log.h"
|
|
#include "db_am.h"
|
|
#include "common_ext.h"
|
|
|
|
static int __txn_check_running __P((const DB_TXN *));
|
|
static int __txn_create __P((DB_ENV *, const char *, u_int));
|
|
static int __txn_end __P((DB_TXN *, int));
|
|
static int __txn_grow_region __P((DB_TXNMGR *));
|
|
static int __txn_undo __P((DB_TXN *));
|
|
static int __txn_validate_region __P((DB_TXNMGR *));
|
|
|
|
/*
|
|
* This file contains the top level routines of the transaction library.
|
|
* It assumes that a lock manager and log manager that conform to the db_log(3)
|
|
* and db_lock(3) interfaces exist.
|
|
*
|
|
* Create and initialize a transaction region in shared memory.
|
|
* Return 0 on success, errno on failure.
|
|
*/
|
|
static int
|
|
__txn_create(dbenv, path, mode)
|
|
DB_ENV *dbenv;
|
|
const char *path;
|
|
u_int mode;
|
|
{
|
|
DB_TXNREGION *txn_region;
|
|
time_t now;
|
|
int fd, maxtxns, ret;
|
|
|
|
maxtxns = dbenv->tx_max != 0 ? dbenv->tx_max : 1000;
|
|
(void)time(&now);
|
|
|
|
ret = __db_rcreate(dbenv, DB_APP_NONE, path,
|
|
DEFAULT_TXN_FILE, mode, TXN_REGION_SIZE(maxtxns), &fd, &txn_region);
|
|
|
|
/* Region may have existed. If it didn't, the open will fail. */
|
|
if (ret != 0)
|
|
return (ret);
|
|
|
|
txn_region->magic = DB_TXNMAGIC;
|
|
txn_region->version = DB_TXNVERSION;
|
|
txn_region->maxtxns = maxtxns;
|
|
txn_region->last_txnid = TXN_MINIMUM;
|
|
/* XXX If we ever do more types of locking and logging, this changes. */
|
|
txn_region->logtype = 0;
|
|
txn_region->locktype = 0;
|
|
txn_region->time_ckp = now;
|
|
ZERO_LSN(txn_region->last_ckp);
|
|
ZERO_LSN(txn_region->pending_ckp);
|
|
SH_TAILQ_INIT(&txn_region->active_txn);
|
|
__db_shalloc_init((void *)&txn_region[1],
|
|
TXN_REGION_SIZE(maxtxns) - sizeof(DB_TXNREGION));
|
|
|
|
/* Unlock the region. */
|
|
(void)__db_mutex_unlock(&txn_region->hdr.lock, fd);
|
|
|
|
/* Now unmap and close the region. */
|
|
if ((ret = __db_rclose(dbenv, fd, txn_region)) != 0) {
|
|
(void)txn_unlink(path, 1 /* force */, dbenv);
|
|
return (ret);
|
|
}
|
|
return (0);
|
|
}
|
|
|
|
int
|
|
txn_open(path, flags, mode, dbenv, mgrpp)
|
|
const char *path;
|
|
int flags, mode;
|
|
DB_ENV *dbenv;
|
|
DB_TXNMGR **mgrpp;
|
|
{
|
|
DB_TXNMGR *tmgrp;
|
|
DB_TXNREGION *txn_regionp;
|
|
int fd, ret, retry_cnt;
|
|
|
|
tmgrp = NULL;
|
|
txn_regionp = NULL;
|
|
fd = -1;
|
|
|
|
/* Validate arguments. */
|
|
if (dbenv == NULL)
|
|
return (EINVAL);
|
|
#ifdef HAVE_SPINLOCKS
|
|
#define OKFLAGS (DB_CREATE | DB_THREAD | DB_TXN_NOSYNC)
|
|
#else
|
|
#define OKFLAGS (DB_CREATE | DB_TXN_NOSYNC)
|
|
#endif
|
|
if ((ret = __db_fchk(dbenv, "txn_open", flags, OKFLAGS)) != 0)
|
|
return (ret);
|
|
|
|
retry_cnt = 0;
|
|
retry: if (LF_ISSET(DB_CREATE) && (ret = __txn_create(dbenv, path, mode)) != 0)
|
|
if (ret == EAGAIN && ++retry_cnt < 0) {
|
|
(void)__db_sleep(1, 0);
|
|
goto retry;
|
|
} else /* We did not really create the region */
|
|
flags &= ~DB_CREATE;
|
|
|
|
retry_cnt = 0;
|
|
retry1: if ((ret = __db_ropen(dbenv, DB_APP_NONE, path, DEFAULT_TXN_FILE,
|
|
flags & ~(DB_CREATE | DB_THREAD | DB_TXN_NOSYNC),
|
|
&fd, &txn_regionp)) != 0) {
|
|
if (ret == EAGAIN && ++retry_cnt < 3) {
|
|
(void)__db_sleep(1, 0);
|
|
goto retry1;
|
|
}
|
|
goto out;
|
|
}
|
|
|
|
|
|
/* Check if valid region. */
|
|
if (txn_regionp->magic != DB_TXNMAGIC) {
|
|
__db_err(dbenv, "txn_open: Bad magic number");
|
|
ret = EINVAL;
|
|
goto out;
|
|
}
|
|
|
|
/* Now, create the transaction manager structure and set its fields. */
|
|
if ((tmgrp = (DB_TXNMGR *)malloc(sizeof(DB_TXNMGR))) == NULL) {
|
|
__db_err(dbenv, "txn_open: %s", strerror(ENOMEM));
|
|
ret = ENOMEM;
|
|
goto out;
|
|
}
|
|
|
|
tmgrp->dbenv = dbenv;
|
|
tmgrp->recover =
|
|
dbenv->tx_recover == NULL ? __db_dispatch : dbenv->tx_recover;
|
|
tmgrp->region = txn_regionp;
|
|
tmgrp->reg_size = txn_regionp->hdr.size;
|
|
tmgrp->fd = fd;
|
|
tmgrp->flags = LF_ISSET(DB_TXN_NOSYNC | DB_THREAD);
|
|
tmgrp->mem = &txn_regionp[1];
|
|
tmgrp->mutexp = NULL;
|
|
TAILQ_INIT(&tmgrp->txn_chain);
|
|
if (LF_ISSET(DB_THREAD)) {
|
|
LOCK_TXNREGION(tmgrp);
|
|
if ((ret = __db_shalloc(tmgrp->mem, sizeof(db_mutex_t),
|
|
MUTEX_ALIGNMENT, &tmgrp->mutexp)) == 0)
|
|
__db_mutex_init(tmgrp->mutexp, -1);
|
|
UNLOCK_TXNREGION(tmgrp);
|
|
if (ret != 0)
|
|
goto out;
|
|
}
|
|
*mgrpp = tmgrp;
|
|
return (0);
|
|
|
|
out: if (txn_regionp != NULL)
|
|
(void)__db_rclose(dbenv, fd, txn_regionp);
|
|
if (flags & DB_CREATE)
|
|
(void)txn_unlink(path, 1, dbenv);
|
|
if (tmgrp != NULL) {
|
|
if (tmgrp->mutexp != NULL) {
|
|
LOCK_TXNREGION(tmgrp);
|
|
__db_shalloc_free(tmgrp->mem, tmgrp->mutexp);
|
|
UNLOCK_TXNREGION(tmgrp);
|
|
}
|
|
free(tmgrp);
|
|
}
|
|
return (ret);
|
|
}
|
|
|
|
/*
|
|
* Internally, we use TXN_DETAIL structures, but we allocate and return
|
|
* DB_TXN structures that provide access to the transaction ID and the
|
|
* offset in the transaction region of the TXN_DETAIL structure.
|
|
*/
|
|
int
|
|
txn_begin(tmgrp, parent, txnpp)
|
|
DB_TXNMGR *tmgrp;
|
|
DB_TXN *parent;
|
|
DB_TXN **txnpp;
|
|
{
|
|
TXN_DETAIL *txnp;
|
|
DB_TXN *retp;
|
|
int id, ret;
|
|
|
|
LOCK_TXNREGION(tmgrp);
|
|
|
|
if ((ret = __txn_validate_region(tmgrp)) != 0)
|
|
goto err;
|
|
|
|
/* Allocate a new transaction detail structure. */
|
|
if ((ret = __db_shalloc(tmgrp->mem, sizeof(TXN_DETAIL), 0, &txnp)) != 0
|
|
&& ret == ENOMEM && (ret = __txn_grow_region(tmgrp)) == 0)
|
|
ret = __db_shalloc(tmgrp->mem, sizeof(TXN_DETAIL), 0, &txnp);
|
|
|
|
if (ret != 0)
|
|
goto err;
|
|
|
|
/* Make sure that last_txnid is not going to wrap around. */
|
|
if (tmgrp->region->last_txnid == TXN_INVALID)
|
|
return (EINVAL);
|
|
|
|
if ((retp = (DB_TXN *)malloc(sizeof(DB_TXN))) == NULL) {
|
|
__db_err(tmgrp->dbenv, "txn_begin : %s", strerror(ENOMEM));
|
|
ret = ENOMEM;
|
|
goto err1;
|
|
}
|
|
|
|
id = ++tmgrp->region->last_txnid;
|
|
tmgrp->region->nbegins++;
|
|
|
|
txnp->txnid = id;
|
|
ZERO_LSN(txnp->last_lsn);
|
|
ZERO_LSN(txnp->begin_lsn);
|
|
txnp->last_lock = 0;
|
|
txnp->status = TXN_RUNNING;
|
|
SH_TAILQ_INSERT_HEAD(&tmgrp->region->active_txn,
|
|
txnp, links, __txn_detail);
|
|
|
|
UNLOCK_TXNREGION(tmgrp);
|
|
|
|
ZERO_LSN(retp->last_lsn);
|
|
retp->txnid = id;
|
|
retp->parent = parent;
|
|
retp->off = (u_int8_t *)txnp - (u_int8_t *)tmgrp->region;
|
|
retp->mgrp = tmgrp;
|
|
|
|
if (tmgrp->dbenv->lg_info != NULL &&
|
|
(ret = __txn_regop_log(tmgrp->dbenv->lg_info,
|
|
retp, &txnp->begin_lsn, 0, TXN_BEGIN)) != 0) {
|
|
|
|
/* Deallocate transaction. */
|
|
LOCK_TXNREGION(tmgrp);
|
|
SH_TAILQ_REMOVE(&tmgrp->region->active_txn,
|
|
txnp, links, __txn_detail);
|
|
__db_shalloc_free(tmgrp->mem, txnp);
|
|
UNLOCK_TXNREGION(tmgrp);
|
|
free (retp);
|
|
return (ret);
|
|
}
|
|
|
|
LOCK_TXNTHREAD(tmgrp);
|
|
TAILQ_INSERT_TAIL(&tmgrp->txn_chain, retp, links);
|
|
UNLOCK_TXNTHREAD(tmgrp);
|
|
|
|
*txnpp = retp;
|
|
return (0);
|
|
|
|
err1:
|
|
__db_shalloc_free(tmgrp->mem, txnp);
|
|
err:
|
|
UNLOCK_TXNREGION(tmgrp);
|
|
return (ret);
|
|
}
|
|
|
|
/* The db_txn(3) man page describes txn_commit. */
|
|
int
|
|
txn_commit(txnp)
|
|
DB_TXN *txnp;
|
|
{
|
|
DB_LOG *logp;
|
|
int ret;
|
|
|
|
if ((ret = __txn_check_running(txnp)) != 0)
|
|
return (ret);
|
|
|
|
/* Sync the log. */
|
|
if ((logp = txnp->mgrp->dbenv->lg_info) != NULL &&
|
|
(ret = __txn_regop_log(logp,
|
|
txnp, &txnp->last_lsn,
|
|
F_ISSET(txnp->mgrp, DB_TXN_NOSYNC) ? 0 : DB_FLUSH, TXN_COMMIT))
|
|
!= 0)
|
|
return (ret);
|
|
|
|
return (__txn_end(txnp, 1));
|
|
}
|
|
|
|
/* The db_txn(3) man page describes txn_abort. */
|
|
int
|
|
txn_abort(txnp)
|
|
DB_TXN *txnp;
|
|
{
|
|
int ret;
|
|
|
|
if ((ret = __txn_check_running(txnp)) != 0)
|
|
return (ret);
|
|
|
|
if ((ret = __txn_undo(txnp)) != 0) {
|
|
__db_err(txnp->mgrp->dbenv,
|
|
"txn_abort: Log undo failed %s", strerror(ret));
|
|
return (ret);
|
|
}
|
|
return (__txn_end(txnp, 0));
|
|
}
|
|
|
|
/*
|
|
* Flush the log so a future commit is guaranteed to succeed.
|
|
*/
|
|
int
|
|
txn_prepare(txnp)
|
|
DB_TXN *txnp;
|
|
{
|
|
int ret;
|
|
TXN_DETAIL *tp;
|
|
|
|
if ((ret = __txn_check_running(txnp)) != 0)
|
|
return (ret);
|
|
|
|
if (txnp->mgrp->dbenv->lg_info != NULL) {
|
|
if ((ret = log_flush(txnp->mgrp->dbenv->lg_info,
|
|
&txnp->last_lsn)) != 0)
|
|
__db_err(txnp->mgrp->dbenv,
|
|
"txn_prepare: log_flush failed %s\n",
|
|
strerror(ret));
|
|
return (ret);
|
|
}
|
|
|
|
LOCK_TXNTHREAD(txnp->mgrp);
|
|
tp = (TXN_DETAIL *)((u_int8_t *)txnp->mgrp->region + txnp->off);
|
|
tp->status = TXN_PREPARED;
|
|
UNLOCK_TXNTHREAD(txnp->mgrp);
|
|
return (ret);
|
|
}
|
|
|
|
/*
|
|
* Return the transaction ID associated with a particular transaction
|
|
*/
|
|
u_int32_t
|
|
txn_id(txnp)
|
|
DB_TXN *txnp;
|
|
{
|
|
return (txnp->txnid);
|
|
}
|
|
|
|
/*
|
|
* The db_txn(3) man page describes txn_close. Currently the caller should
|
|
* arrange a checkpoint before calling txn_close.
|
|
*/
|
|
int
|
|
txn_close(tmgrp)
|
|
DB_TXNMGR *tmgrp;
|
|
{
|
|
DB_TXN *txnp;
|
|
int ret, t_ret;
|
|
|
|
/*
|
|
* This function had better only be called once per process
|
|
* (i.e., not per thread), so there should be no synchronization
|
|
* required.
|
|
*/
|
|
for (ret = 0, txnp = TAILQ_FIRST(&tmgrp->txn_chain);
|
|
txnp != TAILQ_END(&tmgrp->txn_chain);
|
|
txnp = TAILQ_FIRST(&tmgrp->txn_chain)) {
|
|
if ((t_ret = txn_abort(txnp)) != 0 && ret == 0)
|
|
ret = t_ret;
|
|
}
|
|
|
|
if (tmgrp->dbenv->lg_info && (t_ret =
|
|
log_flush(tmgrp->dbenv->lg_info, NULL)) != 0 &&
|
|
ret == 0)
|
|
ret = t_ret;
|
|
|
|
if (tmgrp->mutexp != NULL) {
|
|
LOCK_TXNREGION(tmgrp);
|
|
__db_shalloc_free(tmgrp->mem, tmgrp->mutexp);
|
|
UNLOCK_TXNREGION(tmgrp);
|
|
}
|
|
|
|
if ((t_ret = __db_rclose(tmgrp->dbenv, tmgrp->fd, tmgrp->region)) != 0
|
|
&& ret == 0)
|
|
ret = t_ret;
|
|
|
|
if (ret == 0)
|
|
free (tmgrp);
|
|
|
|
return (ret);
|
|
}
|
|
|
|
/*
|
|
* The db_txn(3) man page describes txn_unlink. Right now it is up to
|
|
* txn_close to write the final checkpoint record.
|
|
*/
|
|
int
|
|
txn_unlink(path, force, dbenv)
|
|
const char *path;
|
|
int force;
|
|
DB_ENV *dbenv;
|
|
{
|
|
return (__db_runlink(dbenv,
|
|
DB_APP_NONE, path, DEFAULT_TXN_FILE, force));
|
|
}
|
|
|
|
/* Internal routines. */
|
|
|
|
/*
|
|
* Return 0 if the txnp is reasonable, otherwise returns EINVAL.
|
|
*/
|
|
static int
|
|
__txn_check_running(txnp)
|
|
const DB_TXN *txnp;
|
|
{
|
|
TXN_DETAIL *tp;
|
|
|
|
tp = NULL;
|
|
if (txnp != NULL && txnp->mgrp != NULL && txnp->mgrp->region != NULL) {
|
|
tp = (TXN_DETAIL *)((u_int8_t *)txnp->mgrp->region + txnp->off);
|
|
if (tp->status != TXN_RUNNING)
|
|
tp = NULL;
|
|
}
|
|
|
|
return (tp == NULL ? EINVAL : 0);
|
|
}
|
|
|
|
static int
|
|
__txn_end(txnp, is_commit)
|
|
DB_TXN *txnp;
|
|
int is_commit;
|
|
{
|
|
DB_TXNMGR *mgr;
|
|
TXN_DETAIL *tp;
|
|
DB_LOCKREQ request;
|
|
int ret;
|
|
u_int32_t locker;
|
|
|
|
mgr = txnp->mgrp;
|
|
|
|
LOCK_TXNTHREAD(mgr);
|
|
TAILQ_REMOVE(&mgr->txn_chain, txnp, links);
|
|
UNLOCK_TXNTHREAD(mgr);
|
|
|
|
/* Release the locks. */
|
|
locker = txnp->txnid;
|
|
request.op = DB_LOCK_PUT_ALL;
|
|
|
|
if (mgr->dbenv->lk_info) {
|
|
ret = lock_vec(mgr->dbenv->lk_info, locker, 0,
|
|
&request, 1, NULL);
|
|
if (ret != 0 && (ret != DB_LOCK_DEADLOCK || is_commit)) {
|
|
__db_err(mgr->dbenv, "%s: release locks failed %s",
|
|
is_commit ? "txn_commit" : "txn_abort",
|
|
strerror(ret));
|
|
return (ret);
|
|
}
|
|
}
|
|
|
|
/* End the transaction. */
|
|
LOCK_TXNREGION(mgr);
|
|
tp = (TXN_DETAIL *)((u_int8_t *)mgr->region + txnp->off);
|
|
SH_TAILQ_REMOVE(&mgr->region->active_txn, tp, links, __txn_detail);
|
|
__db_shalloc_free(mgr->mem, tp);
|
|
if (is_commit)
|
|
mgr->region->ncommits++;
|
|
else
|
|
mgr->region->naborts++;
|
|
UNLOCK_TXNREGION(mgr);
|
|
|
|
FREE(txnp, sizeof(*txnp));
|
|
|
|
return (0);
|
|
}
|
|
|
|
|
|
/*
|
|
* __txn_undo --
|
|
* Undo the transaction with id txnid. Returns 0 on success and
|
|
* errno on failure.
|
|
*/
|
|
static int
|
|
__txn_undo(txnp)
|
|
DB_TXN *txnp;
|
|
{
|
|
DB_TXNMGR *mgr;
|
|
DB_LOG *logp;
|
|
DBT rdbt;
|
|
DB_LSN key_lsn;
|
|
int ret;
|
|
|
|
mgr = txnp->mgrp;
|
|
logp = mgr->dbenv->lg_info;
|
|
if (logp == NULL)
|
|
return (0);
|
|
|
|
/*
|
|
* This is the simplest way to code this, but if the mallocs during
|
|
* recovery turn out to be a performance issue, we can do the
|
|
* allocation here and use DB_DBT_USERMEM.
|
|
*/
|
|
memset(&rdbt, 0, sizeof(rdbt));
|
|
if (F_ISSET(logp, DB_AM_THREAD))
|
|
F_SET(&rdbt, DB_DBT_MALLOC);
|
|
|
|
key_lsn = txnp->last_lsn; /* structure assignment */
|
|
for (ret = 0; ret == 0 && !IS_ZERO_LSN(key_lsn);) {
|
|
/*
|
|
* The dispatch routine returns the lsn of the record
|
|
* before the current one in the key_lsn argument.
|
|
*/
|
|
if ((ret = log_get(logp, &key_lsn, &rdbt, DB_SET)) == 0) {
|
|
ret =
|
|
mgr->recover(logp, &rdbt, &key_lsn, TXN_UNDO, NULL);
|
|
if (F_ISSET(logp, DB_AM_THREAD) && rdbt.data != NULL) {
|
|
free(rdbt.data);
|
|
rdbt.data = NULL;
|
|
}
|
|
}
|
|
if (ret != 0)
|
|
return (ret);
|
|
}
|
|
|
|
return (ret);
|
|
}
|
|
|
|
/*
|
|
* Transaction checkpoint.
|
|
* If either kbytes or minutes is non-zero, then we only take the checkpoint
|
|
* more than "minutes" minutes have passed since the last checkpoint or if
|
|
* more than "kbytes" of log data have been written since the last checkpoint.
|
|
* When taking a checkpoint, find the oldest active transaction and figure out
|
|
* its first LSN. This is the lowest LSN we can checkpoint, since any record
|
|
* written after since that point may be involved in a transaction and may
|
|
* therefore need to be undone in the case of an abort.
|
|
*/
|
|
int
|
|
txn_checkpoint(mgr, kbytes, minutes)
|
|
const DB_TXNMGR *mgr;
|
|
int kbytes, minutes;
|
|
{
|
|
TXN_DETAIL *txnp;
|
|
DB_LSN ckp_lsn, last_ckp;
|
|
DB_LOG *dblp;
|
|
u_int32_t bytes_written;
|
|
time_t last_ckp_time, now;
|
|
int ret;
|
|
|
|
/* Check usage. */
|
|
if (kbytes < 0 || minutes < 0)
|
|
return (EINVAL);
|
|
|
|
/*
|
|
* Check if we need to run recovery.
|
|
*/
|
|
ZERO_LSN(ckp_lsn);
|
|
if (minutes != 0) {
|
|
(void)time(&now);
|
|
|
|
LOCK_TXNREGION(mgr);
|
|
last_ckp_time = mgr->region->time_ckp;
|
|
UNLOCK_TXNREGION(mgr);
|
|
|
|
if (now - last_ckp_time >= (time_t)(minutes * 60))
|
|
goto do_ckp;
|
|
}
|
|
|
|
if (kbytes != 0) {
|
|
dblp = mgr->dbenv->lg_info;
|
|
LOCK_LOGREGION(dblp);
|
|
bytes_written = dblp->lp->written;
|
|
ckp_lsn = dblp->lp->lsn;
|
|
UNLOCK_LOGREGION(dblp);
|
|
if (bytes_written >= (u_int32_t)(kbytes * 1024))
|
|
goto do_ckp;
|
|
}
|
|
|
|
/*
|
|
* If we checked time and data and didn't go to checkpoint,
|
|
* we're done.
|
|
*/
|
|
if (minutes != 0 || kbytes != 0)
|
|
return (0);
|
|
|
|
do_ckp:
|
|
if (IS_ZERO_LSN(ckp_lsn)) {
|
|
dblp = mgr->dbenv->lg_info;
|
|
LOCK_LOGREGION(dblp);
|
|
ckp_lsn = dblp->lp->lsn;
|
|
UNLOCK_LOGREGION(dblp);
|
|
}
|
|
|
|
/*
|
|
* We have to find an LSN such that all transactions begun
|
|
* before that LSN are complete.
|
|
*/
|
|
LOCK_TXNREGION(mgr);
|
|
|
|
if (!IS_ZERO_LSN(mgr->region->pending_ckp))
|
|
ckp_lsn = mgr->region->pending_ckp;
|
|
else
|
|
for (txnp =
|
|
SH_TAILQ_FIRST(&mgr->region->active_txn, __txn_detail);
|
|
txnp != NULL;
|
|
txnp = SH_TAILQ_NEXT(txnp, links, __txn_detail)) {
|
|
|
|
/*
|
|
* Look through the active transactions for the
|
|
* lowest begin lsn.
|
|
*/
|
|
if (!IS_ZERO_LSN(txnp->begin_lsn) &&
|
|
log_compare(&txnp->begin_lsn, &ckp_lsn) < 0)
|
|
ckp_lsn = txnp->begin_lsn;
|
|
}
|
|
|
|
mgr->region->pending_ckp = ckp_lsn;
|
|
UNLOCK_TXNREGION(mgr);
|
|
|
|
ret = memp_sync(mgr->dbenv->mp_info, &ckp_lsn);
|
|
if (ret > 0) {
|
|
__db_err(mgr->dbenv,
|
|
"txn_checkpoint: system failure in memp_sync %s\n",
|
|
strerror(ret));
|
|
} else if (ret == 0 && mgr->dbenv->lg_info != NULL) {
|
|
LOCK_TXNREGION(mgr);
|
|
last_ckp = mgr->region->last_ckp;
|
|
ZERO_LSN(mgr->region->pending_ckp);
|
|
UNLOCK_TXNREGION(mgr);
|
|
|
|
if ((ret = __txn_ckp_log(mgr->dbenv->lg_info,
|
|
NULL, &ckp_lsn, DB_CHECKPOINT, &ckp_lsn, &last_ckp)) != 0) {
|
|
__db_err(mgr->dbenv,
|
|
"txn_checkpoint: log failed at LSN [%ld %ld] %s\n",
|
|
(long)ckp_lsn.file, (long)ckp_lsn.offset,
|
|
strerror(ret));
|
|
return (ret);
|
|
}
|
|
|
|
LOCK_TXNREGION(mgr);
|
|
mgr->region->last_ckp = ckp_lsn;
|
|
(void)time(&mgr->region->time_ckp);
|
|
UNLOCK_TXNREGION(mgr);
|
|
}
|
|
/*
|
|
* ret < 0 means that there are still buffers to flush; the
|
|
* checkpoint is not complete. Back off and try again.
|
|
*/
|
|
return (ret);
|
|
}
|
|
|
|
/*
|
|
* This is called at every interface to verify if the region
|
|
* has changed size, and if so, to remap the region in and
|
|
* reset the process pointers.
|
|
*/
|
|
static int
|
|
__txn_validate_region(tp)
|
|
DB_TXNMGR *tp;
|
|
{
|
|
int ret;
|
|
|
|
if (tp->reg_size == tp->region->hdr.size)
|
|
return (0);
|
|
|
|
/* Grow the region. */
|
|
if ((ret = __db_rremap(tp->dbenv, tp->region,
|
|
tp->reg_size, tp->region->hdr.size, tp->fd, &tp->region)) != 0)
|
|
return (ret);
|
|
|
|
tp->reg_size = tp->region->hdr.size;
|
|
tp->mem = &tp->region[1];
|
|
|
|
return (0);
|
|
}
|
|
|
|
static int
|
|
__txn_grow_region(tp)
|
|
DB_TXNMGR *tp;
|
|
{
|
|
size_t incr;
|
|
u_int32_t oldmax;
|
|
u_int8_t *curaddr;
|
|
int ret;
|
|
|
|
oldmax = tp->region->maxtxns;
|
|
incr = oldmax * sizeof(DB_TXN);
|
|
|
|
if ((ret = __db_rgrow(tp->dbenv, tp->fd, incr)) != 0)
|
|
return (ret);
|
|
|
|
if ((ret = __db_rremap(tp->dbenv, tp->region,
|
|
tp->reg_size, tp->reg_size + incr, tp->fd, &tp->region)) != 0)
|
|
return (ret);
|
|
|
|
/* Throw the new space on the free list. */
|
|
curaddr = (u_int8_t *)tp->region + tp->reg_size;
|
|
tp->mem = &tp->region[1];
|
|
tp->reg_size += incr;
|
|
|
|
*((size_t *)curaddr) = incr - sizeof(size_t);
|
|
curaddr += sizeof(size_t);
|
|
__db_shalloc_free(tp->mem, curaddr);
|
|
|
|
tp->region->maxtxns = 2 * oldmax;
|
|
|
|
return (0);
|
|
}
|
|
|
|
int
|
|
txn_stat(mgr, statp, db_malloc)
|
|
DB_TXNMGR *mgr;
|
|
DB_TXN_STAT **statp;
|
|
void *(*db_malloc) __P((size_t));
|
|
{
|
|
DB_TXN_STAT *stats;
|
|
TXN_DETAIL *txnp;
|
|
size_t nbytes;
|
|
u_int32_t nactive, ndx;
|
|
|
|
LOCK_TXNREGION(mgr);
|
|
nactive = mgr->region->nbegins -
|
|
mgr->region->naborts - mgr->region->ncommits;
|
|
UNLOCK_TXNREGION(mgr);
|
|
|
|
/*
|
|
* Allocate a bunch of extra active structures to handle any
|
|
* that have been created since we unlocked the region.
|
|
*/
|
|
nbytes = sizeof(DB_TXN_STAT) + sizeof(DB_TXN_ACTIVE) * (nactive + 200);
|
|
if (db_malloc == NULL)
|
|
stats = (DB_TXN_STAT *)malloc(nbytes);
|
|
else
|
|
stats = (DB_TXN_STAT *)db_malloc(nbytes);
|
|
|
|
if (stats == NULL)
|
|
return (ENOMEM);
|
|
|
|
LOCK_TXNREGION(mgr);
|
|
stats->st_last_txnid = mgr->region->last_txnid;
|
|
stats->st_last_ckp = mgr->region->last_ckp;
|
|
stats->st_maxtxns = mgr->region->maxtxns;
|
|
stats->st_naborts = mgr->region->naborts;
|
|
stats->st_nbegins = mgr->region->nbegins;
|
|
stats->st_ncommits = mgr->region->ncommits;
|
|
stats->st_pending_ckp = mgr->region->pending_ckp;
|
|
stats->st_time_ckp = mgr->region->time_ckp;
|
|
stats->st_nactive = stats->st_nbegins -
|
|
stats->st_naborts - stats->st_ncommits;
|
|
if (stats->st_nactive > nactive + 200)
|
|
stats->st_nactive = nactive + 200;
|
|
stats->st_txnarray = (DB_TXN_ACTIVE *)&stats[1];
|
|
|
|
ndx = 0;
|
|
for (txnp = SH_TAILQ_FIRST(&mgr->region->active_txn, __txn_detail);
|
|
txnp != NULL;
|
|
txnp = SH_TAILQ_NEXT(txnp, links, __txn_detail)) {
|
|
stats->st_txnarray[ndx].txnid = txnp->txnid;
|
|
stats->st_txnarray[ndx].lsn = txnp->begin_lsn;
|
|
ndx++;
|
|
|
|
if (ndx >= stats->st_nactive)
|
|
break;
|
|
}
|
|
|
|
UNLOCK_TXNREGION(mgr);
|
|
*statp = stats;
|
|
return (0);
|
|
}
|