/**
|
* \file
|
* Unix/Windows implementation for filemap.
|
*
|
* Author:
|
* Paolo Molaro (lupus@ximian.com)
|
*
|
* Copyright 2008-2008 Novell, Inc.
|
* Licensed under the MIT license. See LICENSE file in the project root for full license information.
|
*/
|
|
#include "config.h"
|
|
#if HAVE_SYS_STAT_H
|
#include <sys/stat.h>
|
#endif
|
#include <fcntl.h>
|
#include <string.h>
|
#ifdef HAVE_UNISTD_H
|
#include <unistd.h>
|
#endif
|
#include <stdlib.h>
|
#include <stdio.h>
|
|
#include "mono-mmap.h"
|
|
static MonoFileMapOpen file_open_func = 0;
|
static MonoFileMapSize file_size_func = 0;
|
static MonoFileMapFd file_fd_func = 0;
|
static MonoFileMapClose file_close_func = 0;
|
MonoFileMapMap file_map_func = 0;
|
MonoFileMapUnmap file_unmap_func = 0;
|
|
#if defined(ANDROID)
|
void mono_file_map_override(MonoFileMapOpen open_func, MonoFileMapSize size_func, MonoFileMapFd fd_func, MonoFileMapClose close_func, MonoFileMapMap map_func, MonoFileMapUnmap unmap_func)
|
{
|
file_open_func = open_func;
|
file_size_func = size_func;
|
file_fd_func = fd_func;
|
file_close_func = close_func;
|
file_map_func = map_func;
|
file_unmap_func = unmap_func;
|
}
|
#endif
|
|
|
MonoFileMap *
|
mono_file_map_open (const char* name)
|
{
|
if (file_open_func) return file_open_func(name);
|
#ifdef WIN32
|
gunichar2 *wname = g_utf8_to_utf16 (name, -1, 0, 0, 0);
|
MonoFileMap *result;
|
|
if (wname == NULL)
|
return NULL;
|
result = (MonoFileMap *) _wfopen ((wchar_t *) wname, L"rb");
|
g_free (wname);
|
return result;
|
#else
|
int fd = open (name, O_RDONLY);
|
if (fd < 0)
|
return NULL;
|
return (MonoFileMap *)(size_t)fd;
|
#endif
|
}
|
|
guint64
|
mono_file_map_size (MonoFileMap *fmap)
|
{
|
if (file_size_func) return file_size_func(fmap);
|
struct stat stat_buf;
|
if (fstat (mono_file_map_fd (fmap), &stat_buf) < 0)
|
return 0;
|
return stat_buf.st_size;
|
}
|
|
int
|
mono_file_map_fd (MonoFileMap *fmap)
|
{
|
if (file_fd_func) return file_fd_func(fmap);
|
#ifdef WIN32
|
return _fileno ((FILE*)fmap);
|
#else
|
return (int)(size_t)fmap;
|
#endif
|
}
|
|
int
|
mono_file_map_close (MonoFileMap *fmap)
|
{
|
if (file_close_func) return file_close_func(fmap);
|
#ifdef WIN32
|
return fclose ((FILE*)fmap);
|
#else
|
return close (mono_file_map_fd (fmap));
|
#endif
|
}
|
|
#if !defined (HOST_WIN32)
|
|
static mono_file_map_alloc_fn alloc_fn = (mono_file_map_alloc_fn) malloc;
|
static mono_file_map_release_fn release_fn = (mono_file_map_release_fn) free;
|
|
void
|
mono_file_map_set_allocator (mono_file_map_alloc_fn alloc, mono_file_map_release_fn release)
|
{
|
alloc_fn = alloc == NULL ? (mono_file_map_alloc_fn) malloc : alloc;
|
release_fn = release == NULL ? (mono_file_map_release_fn) free : release;
|
}
|
|
void *
|
mono_file_map_fileio (size_t length, int flags, int fd, guint64 offset, void **ret_handle)
|
{
|
guint64 cur_offset;
|
size_t bytes_read;
|
void *ptr = (*alloc_fn) (length);
|
if (!ptr)
|
return NULL;
|
cur_offset = lseek (fd, 0, SEEK_CUR);
|
if (lseek (fd, offset, SEEK_SET) != offset) {
|
(*release_fn) (ptr);
|
return NULL;
|
}
|
bytes_read = read (fd, ptr, length);
|
if (bytes_read != length)
|
return NULL;
|
lseek (fd, cur_offset, SEEK_SET);
|
*ret_handle = NULL;
|
return ptr;
|
}
|
|
int
|
mono_file_unmap_fileio (void *addr, void *handle)
|
{
|
(*release_fn) (addr);
|
return 0;
|
}
|
#if !defined(HAVE_MMAP)
|
void *
|
mono_file_map (size_t length, int flags, int fd, guint64 offset, void **ret_handle)
|
{
|
return mono_file_map_fileio (length, flags, fd, offset, ret_handle);
|
}
|
|
int
|
mono_file_unmap (void *addr, void *handle)
|
{
|
return mono_file_unmap_fileio(addr, handle);
|
}
|
#endif
|
#endif
|
