#include "db_config.h"
#ifndef lint
static const char revid[] = "$Id: os_map.c,v 1.2 2004/03/30 01:23:48 jtownsen Exp $";
#endif
#include "db_int.h"
static int __os_map
__P((DB_ENV *, char *, REGINFO *, DB_FH *, size_t, int, int, int, void **));
static int __os_unique_name __P((char *, HANDLE, char *, size_t));
int
__os_r_sysattach(dbenv, infop, rp)
DB_ENV *dbenv;
REGINFO *infop;
REGION *rp;
{
DB_FH *fhp;
int is_system, ret;
if ((ret = __os_open(dbenv, infop->name,
DB_OSO_DIRECT |
F_ISSET(infop, REGION_CREATE_OK) ? DB_OSO_CREATE: 0,
infop->mode, &fhp)) != 0) {
__db_err(dbenv, "%s: %s", infop->name, db_strerror(ret));
return (ret);
}
is_system = F_ISSET(dbenv, DB_ENV_SYSTEM_MEM) ||
(!F_ISSET(dbenv, DB_ENV_PRIVATE) && __os_is_winnt() == 0);
ret = __os_map(dbenv, infop->name, infop, fhp, rp->size,
1, is_system, 0, &infop->addr);
if (ret == 0 && is_system == 1)
rp->segid = 1;
(void)__os_closehandle(dbenv, fhp);
return (ret);
}
int
__os_r_sysdetach(dbenv, infop, destroy)
DB_ENV *dbenv;
REGINFO *infop;
int destroy;
{
int ret, t_ret;
if (infop->wnt_handle != NULL) {
(void)CloseHandle(infop->wnt_handle);
infop->wnt_handle = NULL;
}
ret = !UnmapViewOfFile(infop->addr) ? __os_win32_errno() : 0;
if (ret != 0)
__db_err(dbenv, "UnmapViewOfFile: %s", strerror(ret));
if (!F_ISSET(dbenv, DB_ENV_SYSTEM_MEM) && destroy) {
if (F_ISSET(dbenv, DB_ENV_OVERWRITE))
(void)__db_overwrite(dbenv, infop->name);
if ((t_ret = __os_unlink(dbenv, infop->name)) != 0 && ret == 0)
ret = t_ret;
}
return (ret);
}
int
__os_mapfile(dbenv, path, fhp, len, is_rdonly, addr)
DB_ENV *dbenv;
char *path;
DB_FH *fhp;
int is_rdonly;
size_t len;
void **addr;
{
if (DB_GLOBAL(j_map) != NULL)
return (DB_GLOBAL(j_map)(path, len, 0, is_rdonly, addr));
return (__os_map(dbenv, path, NULL, fhp, len, 0, 0, is_rdonly, addr));
}
int
__os_unmapfile(dbenv, addr, len)
DB_ENV *dbenv;
void *addr;
size_t len;
{
if (DB_GLOBAL(j_unmap) != NULL)
return (DB_GLOBAL(j_unmap)(addr, len));
return (!UnmapViewOfFile(addr) ? __os_win32_errno() : 0);
}
static int
__os_unique_name(orig_path, hfile, result_path, result_path_len)
char *orig_path, *result_path;
HANDLE hfile;
size_t result_path_len;
{
BY_HANDLE_FILE_INFORMATION fileinfo;
char *basename, *p;
basename = strrchr(orig_path, '/');
p = strrchr(orig_path, '\\');
if (basename == NULL || (p != NULL && p > basename))
basename = p;
if (basename == NULL)
basename = strrchr(orig_path, ':');
if (basename == NULL)
basename = orig_path;
else
basename++;
if (!GetFileInformationByHandle(hfile, &fileinfo))
return (__os_win32_errno());
(void)snprintf(result_path, result_path_len,
"__db_shmem.%8.8lx.%8.8lx.%8.8lx.%8.8lx.%8.8lx.%s",
fileinfo.dwVolumeSerialNumber,
fileinfo.nFileIndexHigh,
fileinfo.nFileIndexLow,
fileinfo.ftCreationTime.dwHighDateTime,
fileinfo.ftCreationTime.dwHighDateTime,
basename);
return (0);
}
static int
__os_map(dbenv, path, infop, fhp, len, is_region, is_system, is_rdonly, addr)
DB_ENV *dbenv;
REGINFO *infop;
char *path;
DB_FH *fhp;
int is_region, is_system, is_rdonly;
size_t len;
void **addr;
{
HANDLE hMemory;
int ret, use_pagefile;
char shmem_name[MAXPATHLEN];
void *pMemory;
ret = 0;
if (infop != NULL)
infop->wnt_handle = NULL;
use_pagefile = is_region && is_system;
if (use_pagefile && (ret = __os_unique_name(
path, fhp->handle, shmem_name, sizeof(shmem_name))) != 0)
return (ret);
hMemory = NULL;
if (use_pagefile) {
hMemory = OpenFileMapping(
is_rdonly ? FILE_MAP_READ : FILE_MAP_ALL_ACCESS,
0, shmem_name);
if (hMemory == NULL && F_ISSET(infop, REGION_CREATE_OK))
hMemory = CreateFileMapping((HANDLE)-1, 0,
is_rdonly ? PAGE_READONLY : PAGE_READWRITE,
0, (DWORD)len, shmem_name);
} else
hMemory = CreateFileMapping(fhp->handle, 0,
is_rdonly ? PAGE_READONLY : PAGE_READWRITE,
0, (DWORD)len, NULL);
if (hMemory == NULL) {
ret = __os_win32_errno();
__db_err(dbenv, "OpenFileMapping: %s", strerror(ret));
return (__db_panic(dbenv, ret));
}
pMemory = MapViewOfFile(hMemory,
(is_rdonly ? FILE_MAP_READ : FILE_MAP_ALL_ACCESS), 0, 0, len);
if (pMemory == NULL) {
ret = __os_win32_errno();
__db_err(dbenv, "MapViewOfFile: %s", strerror(ret));
return (__db_panic(dbenv, ret));
}
if (use_pagefile && infop != NULL)
infop->wnt_handle = hMemory;
else
CloseHandle(hMemory);
*addr = pMemory;
return (ret);
}