#include "db_config.h"
#ifndef lint
static const char revid[] = "$Id: os_handle.c,v 1.2 2004/03/30 01:23:46 jtownsen Exp $";
#endif
#ifndef NO_SYSTEM_INCLUDES
#include <sys/types.h>
#include <fcntl.h>
#include <string.h>
#include <unistd.h>
#endif
#include "db_int.h"
int
__os_openhandle(dbenv, name, flags, mode, fhpp)
DB_ENV *dbenv;
const char *name;
int flags, mode;
DB_FH **fhpp;
{
DB_FH *fhp;
int ret, nrepeat, retries;
#ifdef HAVE_VXWORKS
int newflags;
#endif
if ((ret = __os_calloc(dbenv, 1, sizeof(DB_FH), fhpp)) != 0)
return (ret);
fhp = *fhpp;
if (DB_GLOBAL(j_open) != NULL) {
if ((fhp->fd = DB_GLOBAL(j_open)(name, flags, mode)) == -1) {
ret = __os_get_errno();
goto err;
}
F_SET(fhp, DB_FH_OPENED);
return (0);
}
retries = 0;
for (nrepeat = 1; nrepeat < 4; ++nrepeat) {
ret = 0;
#ifdef HAVE_VXWORKS
if (LF_ISSET(O_CREAT)) {
DB_BEGIN_SINGLE_THREAD;
newflags = flags & ~(O_CREAT | O_EXCL);
if ((fhp->fd = open(name, newflags, mode)) != -1) {
if (LF_ISSET(O_EXCL)) {
DB_END_SINGLE_THREAD;
ret = EEXIST;
goto err;
}
} else
fhp->fd = creat(name, newflags);
DB_END_SINGLE_THREAD;
} else
#endif
#ifdef __VMS
fhp->fd = open(name, flags, mode, "shr=get,put,upd,del,upi");
#else
fhp->fd = open(name, flags, mode);
#endif
if (fhp->fd != -1) {
F_SET(fhp, DB_FH_OPENED);
#if defined(HAVE_FCNTL_F_SETFD)
if (fcntl(fhp->fd, F_SETFD, 1) == -1) {
ret = __os_get_errno();
__db_err(dbenv,
"fcntl(F_SETFD): %s", strerror(ret));
goto err;
}
#endif
break;
}
switch (ret = __os_get_errno()) {
case EMFILE:
case ENFILE:
case ENOSPC:
(void)__os_sleep(dbenv, nrepeat * 2, 0);
break;
case EBUSY:
case EINTR:
if (++retries < DB_RETRY)
--nrepeat;
break;
}
}
err: if (ret != 0) {
(void)__os_closehandle(dbenv, fhp);
*fhpp = NULL;
}
return (ret);
}
int
__os_closehandle(dbenv, fhp)
DB_ENV *dbenv;
DB_FH *fhp;
{
int ret, retries;
ret = 0;
if (F_ISSET(fhp, DB_FH_OPENED)) {
retries = 0;
do {
ret = DB_GLOBAL(j_close) != NULL ?
DB_GLOBAL(j_close)(fhp->fd) : close(fhp->fd);
} while (ret != 0 &&
((ret = __os_get_errno()) == EINTR || ret == EBUSY) &&
++retries < DB_RETRY);
if (ret != 0)
__db_err(dbenv, "close: %s", strerror(ret));
if (F_ISSET(fhp, DB_FH_UNLINK)) {
(void)__os_unlink(dbenv, fhp->name);
(void)__os_free(dbenv, fhp->name);
}
}
__os_free(dbenv, fhp);
return (ret);
}