#include "db_config.h"
#include "db_int.h"
int
__os_openhandle(env, name, flags, mode, fhpp)
ENV *env;
const char *name;
int flags, mode;
DB_FH **fhpp;
{
#ifdef DB_WINCE
return (EFAULT);
#else
DB_FH *fhp;
int ret, nrepeat, retries;
if ((ret = __os_calloc(env, 1, sizeof(DB_FH), &fhp)) != 0)
return (ret);
if ((ret = __os_strdup(env, name, &fhp->name)) != 0)
goto err;
if (env != NULL) {
MUTEX_LOCK(env, env->mtx_env);
TAILQ_INSERT_TAIL(&env->fdlist, fhp, q);
MUTEX_UNLOCK(env, env->mtx_env);
F_SET(fhp, DB_FH_ENVLINK);
}
retries = 0;
for (nrepeat = 1; nrepeat < 4; ++nrepeat) {
fhp->fd = _open(name, flags, mode);
if (fhp->fd != -1) {
ret = 0;
break;
}
switch (ret = __os_posix_err(__os_get_syserr())) {
case EMFILE:
case ENFILE:
case ENOSPC:
__os_yield(env, nrepeat * 2, 0);
break;
case EAGAIN:
case EBUSY:
case EINTR:
if (++retries < DB_RETRY)
--nrepeat;
break;
default:
goto err;
}
}
if (ret == 0) {
F_SET(fhp, DB_FH_OPENED);
*fhpp = fhp;
return (0);
}
err: (void)__os_closehandle(env, fhp);
return (ret);
#endif
}
int
__os_closehandle(env, fhp)
ENV *env;
DB_FH *fhp;
{
DB_ENV *dbenv;
int ret, t_ret;
ret = 0;
if (env != NULL) {
dbenv = env->dbenv;
if (fhp->name != NULL && FLD_ISSET(
dbenv->verbose, DB_VERB_FILEOPS | DB_VERB_FILEOPS_ALL))
__db_msg(env, "fileops: %s: close", fhp->name);
if (F_ISSET(fhp, DB_FH_ENVLINK)) {
MUTEX_LOCK(env, env->mtx_env);
TAILQ_REMOVE(&env->fdlist, fhp, q);
MUTEX_UNLOCK(env, env->mtx_env);
}
}
if (F_ISSET(fhp, DB_FH_OPENED)) {
if (fhp->handle != INVALID_HANDLE_VALUE)
RETRY_CHK((!CloseHandle(fhp->handle)), ret);
else
#ifdef DB_WINCE
ret = EFAULT;
#else
RETRY_CHK((_close(fhp->fd)), ret);
#endif
if (fhp->trunc_handle != INVALID_HANDLE_VALUE) {
RETRY_CHK((!CloseHandle(fhp->trunc_handle)), t_ret);
if (t_ret != 0 && ret == 0)
ret = t_ret;
}
if (ret != 0) {
__db_syserr(env, ret, "CloseHandle");
ret = __os_posix_err(ret);
}
}
if (F_ISSET(fhp, DB_FH_UNLINK))
(void)__os_unlink(env, fhp->name, 0);
if (fhp->name != NULL)
__os_free(env, fhp->name);
__os_free(env, fhp);
return (ret);
}