Don't define _XOPEN_SOURCE on OpenBSD. With _XOPEN_SOURCE defined mincore() is not...
[mono.git] / 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         return mremap (old_address, (size_t) old_size, (size_t) new_size,
113                         (unsigned long) _flags);
114 }
115 #endif /* def HAVE_MREMAP */
116
117 int
118 Mono_Posix_Syscall_mincore (void *start, mph_size_t length, unsigned char *vec)
119 {
120         mph_return_if_size_t_overflow (length);
121
122         return mincore (start, (size_t) length, (void*)vec);
123 }
124
125 #ifdef HAVE_POSIX_MADVISE
126 gint32
127 Mono_Posix_Syscall_posix_madvise (void *addr, mph_size_t len, gint32 advice)
128 {
129         mph_return_if_size_t_overflow (len);
130
131         if (Mono_Posix_FromPosixMadviseAdvice (advice, &advice) == -1)
132                 return -1;
133
134         return posix_madvise (addr, (size_t) len, advice);
135 }
136 #endif /* def HAVE_POSIX_MADVISE */
137
138 #ifdef HAVE_REMAP_FILE_PAGES
139 int
140 Mono_Posix_Syscall_remap_file_pages (void *start, mph_size_t size, 
141                 int prot, mph_ssize_t pgoff, int flags)
142 {
143         int _prot, _flags;
144
145         mph_return_if_size_t_overflow (size);
146         mph_return_if_ssize_t_overflow (pgoff);
147
148         if (Mono_Posix_FromMmapProts (prot, &_prot) == -1)
149                 return -1;
150         if (Mono_Posix_FromMmapFlags (flags, &_flags) == -1)
151                 return -1;
152
153         return remap_file_pages (start, (size_t) size, _prot, (ssize_t) pgoff, _flags);
154 }
155 #endif /* def HAVE_REMAP_FILE_PAGES */
156
157 G_END_DECLS
158
159 /*
160  * vim: noexpandtab
161  */