support/sys-mman.c

   1 /*
   2  * <sys/mman.h> wrapper functions.
   3  *
   4  * Authors:
   5  *   Jonathan Pryor (jonpryor@vt.edu)
   6  *
   7  * Copyright (C) 2004-2006 Jonathan Pryor
   8  */
   9
  10 #define _XOPEN_SOURCE 600
  11
  12 #ifdef PLATFORM_MACOSX
  13 /* For mincore () */
  14 #define _DARWIN_C_SOURCE
  15 #endif
  16 #ifdef __FreeBSD__
  17 /* For mincore () */
  18 #define __BSD_VISIBLE 1
  19 #endif
  20
  21 #include <sys/types.h>
  22 #include <sys/mman.h>
  23 #include <errno.h>
  24
  25 #include "map.h"
  26 #include "mph.h"
  27
  28 G_BEGIN_DECLS
  29
  30 void*
  31 Mono_Posix_Syscall_mmap (void *start, mph_size_t length, int prot, int flags,
  32                 int fd, mph_off_t offset)
  33 {
  34         int _prot, _flags;
  35
  36         mph_return_val_if_size_t_overflow (length, MAP_FAILED);
  37         mph_return_val_if_off_t_overflow (offset, MAP_FAILED);
  38
  39         if (Mono_Posix_FromMmapProts (prot, &_prot) == -1)
  40                 return MAP_FAILED;
  41         if (Mono_Posix_FromMmapFlags (flags, &_flags) == -1)
  42                 return MAP_FAILED;
  43
  44         return mmap (start, (size_t) length, _prot, _flags, fd, (off_t) offset);
  45 }
  46
  47 int
  48 Mono_Posix_Syscall_munmap (void *start, mph_size_t length)
  49 {
  50         mph_return_if_size_t_overflow (length);
  51
  52         return munmap (start, (size_t) length);
  53 }
  54
  55 int
  56 Mono_Posix_Syscall_mprotect (void *start, mph_size_t len, int prot)
  57 {
  58         int _prot;
  59         mph_return_if_size_t_overflow (len);
  60
  61         if (Mono_Posix_FromMmapProts (prot, &_prot) == -1)
  62                 return -1;
  63
  64         return mprotect (start, (size_t) len, _prot);
  65 }
  66
  67 int
  68 Mono_Posix_Syscall_msync (void *start, mph_size_t len, int flags)
  69 {
  70         int _flags;
  71         mph_return_if_size_t_overflow (len);
  72
  73         if (Mono_Posix_FromMsyncFlags (flags, &_flags) == -1)
  74                 return -1;
  75
  76         return msync (start, (size_t) len, _flags);
  77 }
  78
  79 int
  80 Mono_Posix_Syscall_mlock (void *start, mph_size_t len)
  81 {
  82         mph_return_if_size_t_overflow (len);
  83
  84         return mlock (start, (size_t) len);
  85 }
  86
  87 int
  88 Mono_Posix_Syscall_munlock (void *start, mph_size_t len)
  89 {
  90         mph_return_if_size_t_overflow (len);
  91
  92         return munlock (start, (size_t) len);
  93 }
  94
  95 #ifdef HAVE_MREMAP
  96 void*
  97 Mono_Posix_Syscall_mremap (void *old_address, mph_size_t old_size,
  98                 mph_size_t new_size, guint64 flags)
  99 {
 100         guint64 _flags;
 101
 102         mph_return_val_if_size_t_overflow (old_size, MAP_FAILED);
 103         mph_return_val_if_size_t_overflow (new_size, MAP_FAILED);
 104
 105         if (Mono_Posix_FromMremapFlags (flags, &_flags) == -1)
 106                 return MAP_FAILED;
 107
 108         return mremap (old_address, (size_t) old_size, (size_t) new_size,
 109                         (unsigned long) _flags);
 110 }
 111 #endif /* def HAVE_MREMAP */
 112
 113 int
 114 Mono_Posix_Syscall_mincore (void *start, mph_size_t length, unsigned char *vec)
 115 {
 116         mph_return_if_size_t_overflow (length);
 117
 118         return mincore (start, (size_t) length, (void*)vec);
 119 }
 120
 121 #ifdef HAVE_POSIX_MADVISE
 122 gint32
 123 Mono_Posix_Syscall_posix_madvise (void *addr, mph_size_t len, gint32 advice)
 124 {
 125         mph_return_if_size_t_overflow (len);
 126
 127         if (Mono_Posix_FromPosixMadviseAdvice (advice, &advice) == -1)
 128                 return -1;
 129
 130         return posix_madvise (addr, (size_t) len, advice);
 131 }
 132 #endif /* def HAVE_POSIX_MADVISE */
 133
 134 #ifdef HAVE_REMAP_FILE_PAGES
 135 int
 136 Mono_Posix_Syscall_remap_file_pages (void *start, mph_size_t size,
 137                 int prot, mph_ssize_t pgoff, int flags)
 138 {
 139         int _prot, _flags;
 140
 141         mph_return_if_size_t_overflow (size);
 142         mph_return_if_ssize_t_overflow (pgoff);
 143
 144         if (Mono_Posix_FromMmapProts (prot, &_prot) == -1)
 145                 return -1;
 146         if (Mono_Posix_FromMmapFlags (flags, &_flags) == -1)
 147                 return -1;
 148
 149         return remap_file_pages (start, (size_t) size, _prot, (ssize_t) pgoff, _flags);
 150 }
 151 #endif /* def HAVE_REMAP_FILE_PAGES */
 152
 153 G_END_DECLS
 154
 155 /*
 156  * vim: noexpandtab
 157  */