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