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