1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
|
/* Memory segment handling.
Copyright (C) 2006 Tristan Gingold.
GHDL is free software; you can redistribute it and/or modify it under
the terms of the GNU General Public License as published by the Free
Software Foundation; either version 2, or (at your option) any later
version.
GHDL is distributed in the hope that it will be useful, but WITHOUT ANY
WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
for more details.
You should have received a copy of the GNU General Public License
along with GCC; see the file COPYING. If not, write to the Free
Software Foundation, 59 Temple Place - Suite 330, Boston, MA
02111-1307, USA.
*/
#ifndef WINNT
#define _GNU_SOURCE
#include <sys/mman.h>
#include <stddef.h>
/* #include <stdio.h> */
/* TODO: init (get pagesize)
round size,
set rights.
*/
#ifdef __APPLE__
#define MAP_ANONYMOUS MAP_ANON
#else
#define HAVE_MREMAP
#endif
#ifndef HAVE_MREMAP
#include <string.h>
#endif
void *
mmap_malloc (int size)
{
void *res;
res = mmap (NULL, size, PROT_READ | PROT_WRITE,
MAP_PRIVATE | MAP_ANONYMOUS, -1, 0);
/* printf ("mmap (%d) = %p\n", size, res); */
if (res == MAP_FAILED)
return NULL;
return res;
}
void *
mmap_realloc (void *ptr, int old_size, int size)
{
void *res;
#ifdef HAVE_MREMAP
res = mremap (ptr, old_size, size, MREMAP_MAYMOVE);
#else
res = mmap (NULL, size, PROT_READ | PROT_WRITE,
MAP_PRIVATE | MAP_ANONYMOUS, -1, 0);
if (res == MAP_FAILED)
return NULL;
memcpy (res, ptr, old_size);
munmap (ptr, old_size);
#endif
/* printf ("mremap (%p, %d, %d) = %p\n", ptr, old_size, size, res); */
#if 0
if (res == MAP_FAILED)
return NULL;
#endif
return res;
}
void
mmap_free (void * ptr, int size)
{
munmap (ptr, size);
}
void
mmap_rx (void *ptr, int size)
{
mprotect (ptr, size, PROT_READ | PROT_EXEC);
}
#else
#include <windows.h>
void *
mmap_malloc (int size)
{
void *res;
res = VirtualAlloc (NULL, size,
MEM_COMMIT | MEM_RESERVE,
PAGE_READWRITE);
return res;
}
void *
mmap_realloc (void *ptr, int old_size, int size)
{
void *res;
res = VirtualAlloc (NULL, size,
MEM_COMMIT | MEM_RESERVE,
PAGE_READWRITE);
if (ptr != NULL)
{
CopyMemory (res, ptr, size > old_size ? old_size : size);
VirtualFree (ptr, old_size, MEM_RELEASE);
}
return res;
}
void
mmap_free (void * ptr, int size)
{
VirtualFree (ptr, size, MEM_RELEASE);
}
void
mmap_rx (void *ptr, int size)
{
DWORD old;
/* This is not supported on every version.
In case of failure, this should still work. */
VirtualProtect (ptr, size, PAGE_EXECUTE_READ, &old);
}
#endif
|
