root / osdep.c @ c2c5104b
History | View | Annotate | Download (8.2 kB)
1 | ea88812f | bellard | /*
|
---|---|---|---|
2 | ea88812f | bellard | * QEMU low level functions
|
3 | 5fafdf24 | ths | *
|
4 | ea88812f | bellard | * Copyright (c) 2003 Fabrice Bellard
|
5 | 5fafdf24 | ths | *
|
6 | ea88812f | bellard | * Permission is hereby granted, free of charge, to any person obtaining a copy
|
7 | ea88812f | bellard | * of this software and associated documentation files (the "Software"), to deal
|
8 | ea88812f | bellard | * in the Software without restriction, including without limitation the rights
|
9 | ea88812f | bellard | * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
10 | ea88812f | bellard | * copies of the Software, and to permit persons to whom the Software is
|
11 | ea88812f | bellard | * furnished to do so, subject to the following conditions:
|
12 | ea88812f | bellard | *
|
13 | ea88812f | bellard | * The above copyright notice and this permission notice shall be included in
|
14 | ea88812f | bellard | * all copies or substantial portions of the Software.
|
15 | ea88812f | bellard | *
|
16 | ea88812f | bellard | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
17 | ea88812f | bellard | * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
18 | ea88812f | bellard | * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
|
19 | ea88812f | bellard | * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
20 | ea88812f | bellard | * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
21 | ea88812f | bellard | * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
22 | ea88812f | bellard | * THE SOFTWARE.
|
23 | ea88812f | bellard | */
|
24 | ea88812f | bellard | #include <stdlib.h> |
25 | ea88812f | bellard | #include <stdio.h> |
26 | ea88812f | bellard | #include <stdarg.h> |
27 | ea88812f | bellard | #include <string.h> |
28 | ea88812f | bellard | #include <errno.h> |
29 | ea88812f | bellard | #include <unistd.h> |
30 | aa26bb2d | ths | #include <fcntl.h> |
31 | 605686cd | ths | #ifdef HOST_SOLARIS
|
32 | 605686cd | ths | #include <sys/types.h> |
33 | 605686cd | ths | #include <sys/statvfs.h> |
34 | 605686cd | ths | #endif
|
35 | ea88812f | bellard | |
36 | 179a2c19 | blueswir1 | /* Needed early for HOST_BSD etc. */
|
37 | d40cdb10 | blueswir1 | #include "config-host.h" |
38 | d40cdb10 | blueswir1 | |
39 | 6e4255f6 | bellard | #ifdef _WIN32
|
40 | 6e4255f6 | bellard | #include <windows.h> |
41 | 179a2c19 | blueswir1 | #elif defined(HOST_BSD)
|
42 | 194884dd | bellard | #include <stdlib.h> |
43 | 194884dd | bellard | #else
|
44 | 49b470eb | bellard | #include <malloc.h> |
45 | 194884dd | bellard | #endif
|
46 | 49b470eb | bellard | |
47 | 511d2b14 | blueswir1 | #include "qemu-common.h" |
48 | 511d2b14 | blueswir1 | #include "sysemu.h" |
49 | 03ff3ca3 | aliguori | #include "qemu_socket.h" |
50 | 03ff3ca3 | aliguori | |
51 | 6e4255f6 | bellard | #if defined(_WIN32)
|
52 | 33f00271 | balrog | void *qemu_memalign(size_t alignment, size_t size)
|
53 | 33f00271 | balrog | { |
54 | 33f00271 | balrog | return VirtualAlloc(NULL, size, MEM_COMMIT, PAGE_READWRITE); |
55 | 33f00271 | balrog | } |
56 | 6e4255f6 | bellard | |
57 | 6e4255f6 | bellard | void *qemu_vmalloc(size_t size)
|
58 | 6e4255f6 | bellard | { |
59 | 6e4255f6 | bellard | /* FIXME: this is not exactly optimal solution since VirtualAlloc
|
60 | 6e4255f6 | bellard | has 64Kb granularity, but at least it guarantees us that the
|
61 | 6e4255f6 | bellard | memory is page aligned. */
|
62 | 6e4255f6 | bellard | return VirtualAlloc(NULL, size, MEM_COMMIT, PAGE_READWRITE); |
63 | 6e4255f6 | bellard | } |
64 | 6e4255f6 | bellard | |
65 | 6e4255f6 | bellard | void qemu_vfree(void *ptr) |
66 | 6e4255f6 | bellard | { |
67 | 6e4255f6 | bellard | VirtualFree(ptr, 0, MEM_RELEASE);
|
68 | 6e4255f6 | bellard | } |
69 | 6e4255f6 | bellard | |
70 | 6cb7ee85 | pbrook | #else
|
71 | 6cb7ee85 | pbrook | |
72 | 6cb7ee85 | pbrook | #if defined(USE_KQEMU)
|
73 | 49b470eb | bellard | |
74 | 128ab2ff | blueswir1 | #ifdef __OpenBSD__
|
75 | 128ab2ff | blueswir1 | #include <sys/param.h> |
76 | 128ab2ff | blueswir1 | #include <sys/types.h> |
77 | 128ab2ff | blueswir1 | #include <sys/mount.h> |
78 | 128ab2ff | blueswir1 | #else
|
79 | 5f8712aa | blueswir1 | #ifndef __FreeBSD__
|
80 | 6bae7ed8 | bellard | #include <sys/vfs.h> |
81 | 128ab2ff | blueswir1 | #endif
|
82 | 5f8712aa | blueswir1 | #endif
|
83 | 128ab2ff | blueswir1 | |
84 | 49b470eb | bellard | #include <sys/mman.h> |
85 | 49b470eb | bellard | #include <fcntl.h> |
86 | 49b470eb | bellard | |
87 | 9596ebb7 | pbrook | static void *kqemu_vmalloc(size_t size) |
88 | 49b470eb | bellard | { |
89 | 49b470eb | bellard | static int phys_ram_fd = -1; |
90 | 49b470eb | bellard | static int phys_ram_size = 0; |
91 | 128ab2ff | blueswir1 | void *ptr;
|
92 | 128ab2ff | blueswir1 | |
93 | 5f8712aa | blueswir1 | /* no need (?) for a dummy file on OpenBSD/FreeBSD */
|
94 | c5e97233 | blueswir1 | #if defined(__OpenBSD__) || defined(__FreeBSD__) || defined(__DragonFly__)
|
95 | 128ab2ff | blueswir1 | int map_anon = MAP_ANON;
|
96 | 128ab2ff | blueswir1 | #else
|
97 | 128ab2ff | blueswir1 | int map_anon = 0; |
98 | 49b470eb | bellard | const char *tmpdir; |
99 | 49b470eb | bellard | char phys_ram_file[1024]; |
100 | 605686cd | ths | #ifdef HOST_SOLARIS
|
101 | 605686cd | ths | struct statvfs stfs;
|
102 | 605686cd | ths | #else
|
103 | 6bae7ed8 | bellard | struct statfs stfs;
|
104 | 605686cd | ths | #endif
|
105 | 49b470eb | bellard | |
106 | 49b470eb | bellard | if (phys_ram_fd < 0) { |
107 | 49b470eb | bellard | tmpdir = getenv("QEMU_TMPDIR");
|
108 | 49b470eb | bellard | if (!tmpdir)
|
109 | 605686cd | ths | #ifdef HOST_SOLARIS
|
110 | 605686cd | ths | tmpdir = "/tmp";
|
111 | 605686cd | ths | if (statvfs(tmpdir, &stfs) == 0) { |
112 | 605686cd | ths | #else
|
113 | 49b470eb | bellard | tmpdir = "/dev/shm";
|
114 | 6bae7ed8 | bellard | if (statfs(tmpdir, &stfs) == 0) { |
115 | 605686cd | ths | #endif
|
116 | 6bae7ed8 | bellard | int64_t free_space; |
117 | 6bae7ed8 | bellard | int ram_mb;
|
118 | 6bae7ed8 | bellard | |
119 | 6bae7ed8 | bellard | free_space = (int64_t)stfs.f_bavail * stfs.f_bsize; |
120 | 6bae7ed8 | bellard | if ((ram_size + 8192 * 1024) >= free_space) { |
121 | 6bae7ed8 | bellard | ram_mb = (ram_size / (1024 * 1024)); |
122 | 5fafdf24 | ths | fprintf(stderr, |
123 | 6bae7ed8 | bellard | "You do not have enough space in '%s' for the %d MB of QEMU virtual RAM.\n",
|
124 | 6bae7ed8 | bellard | tmpdir, ram_mb); |
125 | 6bae7ed8 | bellard | if (strcmp(tmpdir, "/dev/shm") == 0) { |
126 | 6bae7ed8 | bellard | fprintf(stderr, "To have more space available provided you have enough RAM and swap, do as root:\n"
|
127 | 2520c665 | aurel32 | "mount -o remount,size=%dm /dev/shm\n",
|
128 | 6bae7ed8 | bellard | ram_mb + 16);
|
129 | 6bae7ed8 | bellard | } else {
|
130 | 5fafdf24 | ths | fprintf(stderr, |
131 | 6bae7ed8 | bellard | "Use the '-m' option of QEMU to diminish the amount of virtual RAM or use the\n"
|
132 | 6bae7ed8 | bellard | "QEMU_TMPDIR environment variable to set another directory where the QEMU\n"
|
133 | 6bae7ed8 | bellard | "temporary RAM file will be opened.\n");
|
134 | 6bae7ed8 | bellard | } |
135 | 6cb7ee85 | pbrook | fprintf(stderr, "Or disable the accelerator module with -no-kqemu\n");
|
136 | 6bae7ed8 | bellard | exit(1);
|
137 | 6bae7ed8 | bellard | } |
138 | 6bae7ed8 | bellard | } |
139 | 5fafdf24 | ths | snprintf(phys_ram_file, sizeof(phys_ram_file), "%s/qemuXXXXXX", |
140 | 49b470eb | bellard | tmpdir); |
141 | 243a273e | bellard | phys_ram_fd = mkstemp(phys_ram_file); |
142 | 243a273e | bellard | if (phys_ram_fd < 0) { |
143 | 5fafdf24 | ths | fprintf(stderr, |
144 | 49b470eb | bellard | "warning: could not create temporary file in '%s'.\n"
|
145 | 49b470eb | bellard | "Use QEMU_TMPDIR to select a directory in a tmpfs filesystem.\n"
|
146 | 49b470eb | bellard | "Using '/tmp' as fallback.\n",
|
147 | 49b470eb | bellard | tmpdir); |
148 | 5fafdf24 | ths | snprintf(phys_ram_file, sizeof(phys_ram_file), "%s/qemuXXXXXX", |
149 | 49b470eb | bellard | "/tmp");
|
150 | 243a273e | bellard | phys_ram_fd = mkstemp(phys_ram_file); |
151 | 243a273e | bellard | if (phys_ram_fd < 0) { |
152 | 5fafdf24 | ths | fprintf(stderr, "Could not create temporary memory file '%s'\n",
|
153 | 49b470eb | bellard | phys_ram_file); |
154 | 49b470eb | bellard | exit(1);
|
155 | 49b470eb | bellard | } |
156 | 49b470eb | bellard | } |
157 | 49b470eb | bellard | unlink(phys_ram_file); |
158 | 49b470eb | bellard | } |
159 | 49b470eb | bellard | size = (size + 4095) & ~4095; |
160 | 49b470eb | bellard | ftruncate(phys_ram_fd, phys_ram_size + size); |
161 | c5e97233 | blueswir1 | #endif /* !(__OpenBSD__ || __FreeBSD__ || __DragonFly__) */ |
162 | 5fafdf24 | ths | ptr = mmap(NULL,
|
163 | 5fafdf24 | ths | size, |
164 | 128ab2ff | blueswir1 | PROT_WRITE | PROT_READ, map_anon | MAP_SHARED, |
165 | 49b470eb | bellard | phys_ram_fd, phys_ram_size); |
166 | 49b470eb | bellard | if (ptr == MAP_FAILED) {
|
167 | 49b470eb | bellard | fprintf(stderr, "Could not map physical memory\n");
|
168 | 49b470eb | bellard | exit(1);
|
169 | 49b470eb | bellard | } |
170 | 49b470eb | bellard | phys_ram_size += size; |
171 | 49b470eb | bellard | return ptr;
|
172 | 49b470eb | bellard | } |
173 | 49b470eb | bellard | |
174 | 9596ebb7 | pbrook | static void kqemu_vfree(void *ptr) |
175 | 49b470eb | bellard | { |
176 | 49b470eb | bellard | /* may be useful some day, but currently we do not need to free */
|
177 | 49b470eb | bellard | } |
178 | 49b470eb | bellard | |
179 | 6cb7ee85 | pbrook | #endif
|
180 | 49b470eb | bellard | |
181 | 33f00271 | balrog | void *qemu_memalign(size_t alignment, size_t size)
|
182 | 33f00271 | balrog | { |
183 | 33f00271 | balrog | #if defined(_POSIX_C_SOURCE)
|
184 | 33f00271 | balrog | int ret;
|
185 | 33f00271 | balrog | void *ptr;
|
186 | 33f00271 | balrog | ret = posix_memalign(&ptr, alignment, size); |
187 | 33f00271 | balrog | if (ret != 0) |
188 | 33f00271 | balrog | return NULL; |
189 | 33f00271 | balrog | return ptr;
|
190 | 179a2c19 | blueswir1 | #elif defined(HOST_BSD)
|
191 | 33f00271 | balrog | return valloc(size);
|
192 | 33f00271 | balrog | #else
|
193 | 33f00271 | balrog | return memalign(alignment, size);
|
194 | 33f00271 | balrog | #endif
|
195 | 33f00271 | balrog | } |
196 | 33f00271 | balrog | |
197 | 49b470eb | bellard | /* alloc shared memory pages */
|
198 | 49b470eb | bellard | void *qemu_vmalloc(size_t size)
|
199 | 49b470eb | bellard | { |
200 | 6cb7ee85 | pbrook | #if defined(USE_KQEMU)
|
201 | 6cb7ee85 | pbrook | if (kqemu_allowed)
|
202 | 6cb7ee85 | pbrook | return kqemu_vmalloc(size);
|
203 | 6cb7ee85 | pbrook | #endif
|
204 | 48253bd8 | malc | return qemu_memalign(getpagesize(), size);
|
205 | 49b470eb | bellard | } |
206 | 49b470eb | bellard | |
207 | 49b470eb | bellard | void qemu_vfree(void *ptr) |
208 | 49b470eb | bellard | { |
209 | 6cb7ee85 | pbrook | #if defined(USE_KQEMU)
|
210 | 6cb7ee85 | pbrook | if (kqemu_allowed)
|
211 | 6cb7ee85 | pbrook | kqemu_vfree(ptr); |
212 | 6cb7ee85 | pbrook | #endif
|
213 | 49b470eb | bellard | free(ptr); |
214 | 49b470eb | bellard | } |
215 | 49b470eb | bellard | |
216 | 49b470eb | bellard | #endif
|
217 | 49b470eb | bellard | |
218 | aa26bb2d | ths | int qemu_create_pidfile(const char *filename) |
219 | aa26bb2d | ths | { |
220 | aa26bb2d | ths | char buffer[128]; |
221 | aa26bb2d | ths | int len;
|
222 | aa26bb2d | ths | #ifndef _WIN32
|
223 | aa26bb2d | ths | int fd;
|
224 | aa26bb2d | ths | |
225 | aa26bb2d | ths | fd = open(filename, O_RDWR | O_CREAT, 0600);
|
226 | aa26bb2d | ths | if (fd == -1) |
227 | aa26bb2d | ths | return -1; |
228 | aa26bb2d | ths | |
229 | aa26bb2d | ths | if (lockf(fd, F_TLOCK, 0) == -1) |
230 | aa26bb2d | ths | return -1; |
231 | aa26bb2d | ths | |
232 | aa26bb2d | ths | len = snprintf(buffer, sizeof(buffer), "%ld\n", (long)getpid()); |
233 | aa26bb2d | ths | if (write(fd, buffer, len) != len)
|
234 | aa26bb2d | ths | return -1; |
235 | aa26bb2d | ths | #else
|
236 | aa26bb2d | ths | HANDLE file; |
237 | aa26bb2d | ths | DWORD flags; |
238 | aa26bb2d | ths | OVERLAPPED overlap; |
239 | aa26bb2d | ths | BOOL ret; |
240 | aa26bb2d | ths | |
241 | aa26bb2d | ths | /* Open for writing with no sharing. */
|
242 | 5fafdf24 | ths | file = CreateFile(filename, GENERIC_WRITE, 0, NULL, |
243 | aa26bb2d | ths | OPEN_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);
|
244 | aa26bb2d | ths | |
245 | aa26bb2d | ths | if (file == INVALID_HANDLE_VALUE)
|
246 | aa26bb2d | ths | return -1; |
247 | aa26bb2d | ths | |
248 | aa26bb2d | ths | flags = LOCKFILE_EXCLUSIVE_LOCK | LOCKFILE_FAIL_IMMEDIATELY; |
249 | aa26bb2d | ths | overlap.hEvent = 0;
|
250 | aa26bb2d | ths | /* Lock 1 byte. */
|
251 | aa26bb2d | ths | ret = LockFileEx(file, flags, 0, 0, 1, &overlap); |
252 | aa26bb2d | ths | if (ret == 0) |
253 | aa26bb2d | ths | return -1; |
254 | aa26bb2d | ths | |
255 | aa26bb2d | ths | /* Write PID to file. */
|
256 | aa26bb2d | ths | len = snprintf(buffer, sizeof(buffer), "%ld\n", (long)getpid()); |
257 | 5fafdf24 | ths | ret = WriteFileEx(file, (LPCVOID)buffer, (DWORD)len, |
258 | aa26bb2d | ths | &overlap, NULL);
|
259 | aa26bb2d | ths | if (ret == 0) |
260 | aa26bb2d | ths | return -1; |
261 | aa26bb2d | ths | #endif
|
262 | aa26bb2d | ths | return 0; |
263 | aa26bb2d | ths | } |
264 | 29b3a662 | pbrook | |
265 | 29b3a662 | pbrook | #ifdef _WIN32
|
266 | 29b3a662 | pbrook | |
267 | 29b3a662 | pbrook | /* Offset between 1/1/1601 and 1/1/1970 in 100 nanosec units */
|
268 | 29b3a662 | pbrook | #define _W32_FT_OFFSET (116444736000000000ULL) |
269 | 29b3a662 | pbrook | |
270 | 29b3a662 | pbrook | int qemu_gettimeofday(qemu_timeval *tp)
|
271 | 29b3a662 | pbrook | { |
272 | 29b3a662 | pbrook | union {
|
273 | 29b3a662 | pbrook | unsigned long long ns100; /*time since 1 Jan 1601 in 100ns units */ |
274 | 29b3a662 | pbrook | FILETIME ft; |
275 | 29b3a662 | pbrook | } _now; |
276 | 29b3a662 | pbrook | |
277 | 29b3a662 | pbrook | if(tp)
|
278 | 29b3a662 | pbrook | { |
279 | 29b3a662 | pbrook | GetSystemTimeAsFileTime (&_now.ft); |
280 | 29b3a662 | pbrook | tp->tv_usec=(long)((_now.ns100 / 10ULL) % 1000000ULL ); |
281 | 29b3a662 | pbrook | tp->tv_sec= (long)((_now.ns100 - _W32_FT_OFFSET) / 10000000ULL); |
282 | 29b3a662 | pbrook | } |
283 | 29b3a662 | pbrook | /* Always return 0 as per Open Group Base Specifications Issue 6.
|
284 | 29b3a662 | pbrook | Do not set errno on error. */
|
285 | 29b3a662 | pbrook | return 0; |
286 | 29b3a662 | pbrook | } |
287 | 29b3a662 | pbrook | #endif /* _WIN32 */ |
288 | 03ff3ca3 | aliguori | |
289 | 03ff3ca3 | aliguori | |
290 | 03ff3ca3 | aliguori | #ifdef _WIN32
|
291 | 03ff3ca3 | aliguori | void socket_set_nonblock(int fd) |
292 | 03ff3ca3 | aliguori | { |
293 | 03ff3ca3 | aliguori | unsigned long opt = 1; |
294 | 03ff3ca3 | aliguori | ioctlsocket(fd, FIONBIO, &opt); |
295 | 03ff3ca3 | aliguori | } |
296 | 03ff3ca3 | aliguori | |
297 | 03ff3ca3 | aliguori | int inet_aton(const char *cp, struct in_addr *ia) |
298 | 03ff3ca3 | aliguori | { |
299 | 03ff3ca3 | aliguori | uint32_t addr = inet_addr(cp); |
300 | 03ff3ca3 | aliguori | if (addr == 0xffffffff) |
301 | 03ff3ca3 | aliguori | return 0; |
302 | 03ff3ca3 | aliguori | ia->s_addr = addr; |
303 | 03ff3ca3 | aliguori | return 1; |
304 | 03ff3ca3 | aliguori | } |
305 | 03ff3ca3 | aliguori | #else
|
306 | 03ff3ca3 | aliguori | void socket_set_nonblock(int fd) |
307 | 03ff3ca3 | aliguori | { |
308 | 03ff3ca3 | aliguori | int f;
|
309 | 03ff3ca3 | aliguori | f = fcntl(fd, F_GETFL); |
310 | 03ff3ca3 | aliguori | fcntl(fd, F_SETFL, f | O_NONBLOCK); |
311 | 03ff3ca3 | aliguori | } |
312 | 03ff3ca3 | aliguori | #endif |