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