]>
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> |
f582af58 PB |
31 | |
32 | /* Needed early for CONFIG_BSD etc. */ | |
33 | #include "config-host.h" | |
34 | ||
dfe5fff3 | 35 | #ifdef CONFIG_SOLARIS |
605686cd TS |
36 | #include <sys/types.h> |
37 | #include <sys/statvfs.h> | |
38 | #endif | |
ea88812f | 39 | |
6e4255f6 FB |
40 | #ifdef _WIN32 |
41 | #include <windows.h> | |
71e72a19 | 42 | #elif defined(CONFIG_BSD) |
194884dd FB |
43 | #include <stdlib.h> |
44 | #else | |
49b470eb | 45 | #include <malloc.h> |
194884dd | 46 | #endif |
49b470eb | 47 | |
511d2b14 BS |
48 | #include "qemu-common.h" |
49 | #include "sysemu.h" | |
03ff3ca3 AL |
50 | #include "qemu_socket.h" |
51 | ||
d741429a | 52 | #if !defined(_POSIX_C_SOURCE) || defined(_WIN32) || defined(__sun__) |
d644f8be | 53 | static void *oom_check(void *ptr) |
54 | { | |
55 | if (ptr == NULL) { | |
d2d5adcb SW |
56 | #if defined(_WIN32) |
57 | fprintf(stderr, "Failed to allocate memory: %lu\n", GetLastError()); | |
58 | #else | |
59 | fprintf(stderr, "Failed to allocate memory: %s\n", strerror(errno)); | |
60 | #endif | |
d644f8be | 61 | abort(); |
62 | } | |
63 | return ptr; | |
64 | } | |
65 | #endif | |
66 | ||
6e4255f6 | 67 | #if defined(_WIN32) |
33f00271 AZ |
68 | void *qemu_memalign(size_t alignment, size_t size) |
69 | { | |
d644f8be | 70 | if (!size) { |
71 | abort(); | |
72 | } | |
73 | return oom_check(VirtualAlloc(NULL, size, MEM_COMMIT, PAGE_READWRITE)); | |
33f00271 | 74 | } |
6e4255f6 FB |
75 | |
76 | void *qemu_vmalloc(size_t size) | |
77 | { | |
78 | /* FIXME: this is not exactly optimal solution since VirtualAlloc | |
79 | has 64Kb granularity, but at least it guarantees us that the | |
80 | memory is page aligned. */ | |
d644f8be | 81 | if (!size) { |
82 | abort(); | |
83 | } | |
84 | return oom_check(VirtualAlloc(NULL, size, MEM_COMMIT, PAGE_READWRITE)); | |
6e4255f6 FB |
85 | } |
86 | ||
87 | void qemu_vfree(void *ptr) | |
88 | { | |
89 | VirtualFree(ptr, 0, MEM_RELEASE); | |
90 | } | |
91 | ||
6cb7ee85 PB |
92 | #else |
93 | ||
33f00271 AZ |
94 | void *qemu_memalign(size_t alignment, size_t size) |
95 | { | |
d741429a | 96 | #if defined(_POSIX_C_SOURCE) && !defined(__sun__) |
33f00271 AZ |
97 | int ret; |
98 | void *ptr; | |
99 | ret = posix_memalign(&ptr, alignment, size); | |
d2d5adcb SW |
100 | if (ret != 0) { |
101 | fprintf(stderr, "Failed to allocate %zu B: %s\n", | |
102 | size, strerror(ret)); | |
d644f8be | 103 | abort(); |
d2d5adcb | 104 | } |
33f00271 | 105 | return ptr; |
71e72a19 | 106 | #elif defined(CONFIG_BSD) |
d644f8be | 107 | return oom_check(valloc(size)); |
33f00271 | 108 | #else |
d644f8be | 109 | return oom_check(memalign(alignment, size)); |
33f00271 AZ |
110 | #endif |
111 | } | |
112 | ||
49b470eb FB |
113 | /* alloc shared memory pages */ |
114 | void *qemu_vmalloc(size_t size) | |
115 | { | |
48253bd8 | 116 | return qemu_memalign(getpagesize(), size); |
49b470eb FB |
117 | } |
118 | ||
119 | void qemu_vfree(void *ptr) | |
120 | { | |
121 | free(ptr); | |
122 | } | |
123 | ||
124 | #endif | |
125 | ||
aa26bb2d TS |
126 | int qemu_create_pidfile(const char *filename) |
127 | { | |
128 | char buffer[128]; | |
129 | int len; | |
130 | #ifndef _WIN32 | |
131 | int fd; | |
132 | ||
40ff6d7e | 133 | fd = qemu_open(filename, O_RDWR | O_CREAT, 0600); |
aa26bb2d TS |
134 | if (fd == -1) |
135 | return -1; | |
136 | ||
137 | if (lockf(fd, F_TLOCK, 0) == -1) | |
138 | return -1; | |
139 | ||
140 | len = snprintf(buffer, sizeof(buffer), "%ld\n", (long)getpid()); | |
141 | if (write(fd, buffer, len) != len) | |
142 | return -1; | |
143 | #else | |
144 | HANDLE file; | |
aa26bb2d TS |
145 | OVERLAPPED overlap; |
146 | BOOL ret; | |
099fe236 | 147 | memset(&overlap, 0, sizeof(overlap)); |
aa26bb2d | 148 | |
099fe236 | 149 | file = CreateFile(filename, GENERIC_WRITE, FILE_SHARE_READ, NULL, |
aa26bb2d TS |
150 | OPEN_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL); |
151 | ||
152 | if (file == INVALID_HANDLE_VALUE) | |
153 | return -1; | |
154 | ||
aa26bb2d | 155 | len = snprintf(buffer, sizeof(buffer), "%ld\n", (long)getpid()); |
5fafdf24 | 156 | ret = WriteFileEx(file, (LPCVOID)buffer, (DWORD)len, |
aa26bb2d TS |
157 | &overlap, NULL); |
158 | if (ret == 0) | |
159 | return -1; | |
160 | #endif | |
161 | return 0; | |
162 | } | |
29b3a662 PB |
163 | |
164 | #ifdef _WIN32 | |
165 | ||
166 | /* Offset between 1/1/1601 and 1/1/1970 in 100 nanosec units */ | |
167 | #define _W32_FT_OFFSET (116444736000000000ULL) | |
168 | ||
169 | int qemu_gettimeofday(qemu_timeval *tp) | |
170 | { | |
171 | union { | |
172 | unsigned long long ns100; /*time since 1 Jan 1601 in 100ns units */ | |
173 | FILETIME ft; | |
174 | } _now; | |
175 | ||
176 | if(tp) | |
177 | { | |
178 | GetSystemTimeAsFileTime (&_now.ft); | |
179 | tp->tv_usec=(long)((_now.ns100 / 10ULL) % 1000000ULL ); | |
180 | tp->tv_sec= (long)((_now.ns100 - _W32_FT_OFFSET) / 10000000ULL); | |
181 | } | |
182 | /* Always return 0 as per Open Group Base Specifications Issue 6. | |
183 | Do not set errno on error. */ | |
184 | return 0; | |
185 | } | |
186 | #endif /* _WIN32 */ | |
03ff3ca3 AL |
187 | |
188 | ||
189 | #ifdef _WIN32 | |
190 | void socket_set_nonblock(int fd) | |
191 | { | |
192 | unsigned long opt = 1; | |
193 | ioctlsocket(fd, FIONBIO, &opt); | |
194 | } | |
195 | ||
196 | int inet_aton(const char *cp, struct in_addr *ia) | |
197 | { | |
198 | uint32_t addr = inet_addr(cp); | |
199 | if (addr == 0xffffffff) | |
200 | return 0; | |
201 | ia->s_addr = addr; | |
202 | return 1; | |
203 | } | |
40ff6d7e KW |
204 | |
205 | void qemu_set_cloexec(int fd) | |
206 | { | |
207 | } | |
208 | ||
03ff3ca3 | 209 | #else |
40ff6d7e | 210 | |
03ff3ca3 AL |
211 | void socket_set_nonblock(int fd) |
212 | { | |
213 | int f; | |
214 | f = fcntl(fd, F_GETFL); | |
215 | fcntl(fd, F_SETFL, f | O_NONBLOCK); | |
216 | } | |
40ff6d7e KW |
217 | |
218 | void qemu_set_cloexec(int fd) | |
219 | { | |
220 | int f; | |
221 | f = fcntl(fd, F_GETFD); | |
222 | fcntl(fd, F_SETFD, f | FD_CLOEXEC); | |
223 | } | |
224 | ||
225 | #endif | |
226 | ||
227 | /* | |
228 | * Opens a file with FD_CLOEXEC set | |
229 | */ | |
230 | int qemu_open(const char *name, int flags, ...) | |
231 | { | |
232 | int ret; | |
233 | int mode = 0; | |
234 | ||
235 | if (flags & O_CREAT) { | |
236 | va_list ap; | |
237 | ||
238 | va_start(ap, flags); | |
239 | mode = va_arg(ap, int); | |
240 | va_end(ap); | |
241 | } | |
242 | ||
243 | #ifdef O_CLOEXEC | |
244 | ret = open(name, flags | O_CLOEXEC, mode); | |
245 | #else | |
246 | ret = open(name, flags, mode); | |
247 | if (ret >= 0) { | |
248 | qemu_set_cloexec(ret); | |
249 | } | |
03ff3ca3 | 250 | #endif |
40ff6d7e KW |
251 | |
252 | return ret; | |
253 | } | |
254 | ||
7b5f699d KS |
255 | /* |
256 | * A variant of write(2) which handles partial write. | |
257 | * | |
258 | * Return the number of bytes transferred. | |
259 | * Set errno if fewer than `count' bytes are written. | |
260 | */ | |
261 | ssize_t qemu_write_full(int fd, const void *buf, size_t count) | |
262 | { | |
263 | ssize_t ret = 0; | |
264 | ssize_t total = 0; | |
265 | ||
266 | while (count) { | |
267 | ret = write(fd, buf, count); | |
268 | if (ret < 0) { | |
269 | if (errno == EINTR) | |
270 | continue; | |
271 | break; | |
272 | } | |
273 | ||
274 | count -= ret; | |
275 | buf += ret; | |
276 | total += ret; | |
277 | } | |
278 | ||
279 | return total; | |
280 | } | |
281 | ||
40ff6d7e KW |
282 | #ifndef _WIN32 |
283 | /* | |
284 | * Creates a pipe with FD_CLOEXEC set on both file descriptors | |
285 | */ | |
286 | int qemu_pipe(int pipefd[2]) | |
287 | { | |
288 | int ret; | |
289 | ||
290 | #ifdef CONFIG_PIPE2 | |
291 | ret = pipe2(pipefd, O_CLOEXEC); | |
3a03bfa5 AP |
292 | if (ret != -1 || errno != ENOSYS) { |
293 | return ret; | |
294 | } | |
295 | #endif | |
40ff6d7e KW |
296 | ret = pipe(pipefd); |
297 | if (ret == 0) { | |
298 | qemu_set_cloexec(pipefd[0]); | |
299 | qemu_set_cloexec(pipefd[1]); | |
300 | } | |
40ff6d7e KW |
301 | |
302 | return ret; | |
303 | } | |
304 | #endif | |
305 | ||
306 | /* | |
307 | * Opens a socket with FD_CLOEXEC set | |
308 | */ | |
309 | int qemu_socket(int domain, int type, int protocol) | |
310 | { | |
311 | int ret; | |
312 | ||
313 | #ifdef SOCK_CLOEXEC | |
314 | ret = socket(domain, type | SOCK_CLOEXEC, protocol); | |
3a03bfa5 AP |
315 | if (ret != -1 || errno != EINVAL) { |
316 | return ret; | |
317 | } | |
318 | #endif | |
40ff6d7e KW |
319 | ret = socket(domain, type, protocol); |
320 | if (ret >= 0) { | |
321 | qemu_set_cloexec(ret); | |
322 | } | |
40ff6d7e KW |
323 | |
324 | return ret; | |
325 | } | |
326 | ||
327 | /* | |
328 | * Accept a connection and set FD_CLOEXEC | |
329 | */ | |
330 | int qemu_accept(int s, struct sockaddr *addr, socklen_t *addrlen) | |
331 | { | |
332 | int ret; | |
333 | ||
334 | #ifdef CONFIG_ACCEPT4 | |
335 | ret = accept4(s, addr, addrlen, SOCK_CLOEXEC); | |
347ed55c | 336 | if (ret != -1 || errno != ENOSYS) { |
3a03bfa5 AP |
337 | return ret; |
338 | } | |
339 | #endif | |
40ff6d7e KW |
340 | ret = accept(s, addr, addrlen); |
341 | if (ret >= 0) { | |
342 | qemu_set_cloexec(ret); | |
343 | } | |
40ff6d7e KW |
344 | |
345 | return ret; | |
346 | } |