]>
Commit | Line | Data |
---|---|---|
831b7825 TS |
1 | /* |
2 | * Darwin syscalls | |
3 | * | |
4 | * Copyright (c) 2003 Fabrice Bellard | |
5 | * Copyright (c) 2006 Pierre d'Herbemont | |
6 | * | |
7 | * This program is free software; you can redistribute it and/or modify | |
8 | * it under the terms of the GNU General Public License as published by | |
9 | * the Free Software Foundation; either version 2 of the License, or | |
10 | * (at your option) any later version. | |
11 | * | |
12 | * This program is distributed in the hope that it will be useful, | |
13 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
14 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
15 | * GNU General Public License for more details. | |
16 | * | |
17 | * You should have received a copy of the GNU General Public License | |
18 | * along with this program; if not, write to the Free Software | |
530e7615 BS |
19 | * Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, |
20 | * MA 02110-1301, USA. | |
831b7825 TS |
21 | */ |
22 | #include <fcntl.h> | |
23 | #include <stdio.h> | |
24 | #include <stdlib.h> | |
25 | #include <errno.h> | |
26 | ||
263466f5 | 27 | #include <mach/host_info.h> |
831b7825 TS |
28 | #include <mach/mach.h> |
29 | #include <mach/mach_time.h> | |
263466f5 | 30 | #include <mach/message.h> |
831b7825 TS |
31 | |
32 | #include <pthread.h> | |
33 | #include <dirent.h> | |
34 | ||
35 | #include <sys/stat.h> | |
36 | #include <sys/syscall.h> | |
37 | #include <sys/sysctl.h> | |
38 | #include <sys/types.h> | |
39 | #include <unistd.h> | |
40 | #include <sys/ioctl.h> | |
41 | #include <sys/mman.h> | |
42 | #include <sys/types.h> | |
43 | #include <sys/dirent.h> | |
44 | #include <sys/uio.h> | |
45 | #include <sys/termios.h> | |
46 | #include <sys/ptrace.h> | |
47 | #include <net/if.h> | |
48 | ||
49 | #include <sys/param.h> | |
50 | #include <sys/mount.h> | |
51 | ||
52 | #include <sys/attr.h> | |
53 | ||
54 | #include <mach/ndr.h> | |
55 | #include <mach/mig_errors.h> | |
56 | ||
ee999a88 TS |
57 | #include <sys/xattr.h> |
58 | ||
831b7825 TS |
59 | #include "qemu.h" |
60 | ||
61 | //#define DEBUG_SYSCALL | |
62 | ||
63 | #ifdef DEBUG_SYSCALL | |
64 | # define DEBUG_FORCE_ENABLE_LOCAL() int __DEBUG_qemu_user_force_enable = 1 | |
65 | # define DEBUG_BEGIN_ENABLE __DEBUG_qemu_user_force_enable = 1; | |
66 | # define DEBUG_END_ENABLE __DEBUG_qemu_user_force_enable = 0; | |
67 | ||
68 | # define DEBUG_DISABLE_ALL() static int __DEBUG_qemu_user_force_enable = 0 | |
69 | # define DEBUG_ENABLE_ALL() static int __DEBUG_qemu_user_force_enable = 1 | |
70 | DEBUG_ENABLE_ALL(); | |
71 | ||
93fcfe39 | 72 | # define DPRINTF(...) do { qemu_log(__VA_ARGS__); \ |
831b7825 TS |
73 | if(__DEBUG_qemu_user_force_enable) fprintf(stderr, __VA_ARGS__); \ |
74 | } while(0) | |
75 | #else | |
76 | # define DEBUG_FORCE_ENABLE_LOCAL() | |
77 | # define DEBUG_BEGIN_ENABLE | |
78 | # define DEBUG_END_ENABLE | |
79 | ||
93fcfe39 | 80 | # define DPRINTF(...) do { qemu_log(__VA_ARGS__); } while(0) |
831b7825 TS |
81 | #endif |
82 | ||
83 | enum { | |
84 | bswap_out = 0, | |
85 | bswap_in = 1 | |
86 | }; | |
87 | ||
88 | extern const char *interp_prefix; | |
89 | ||
90 | static inline long get_errno(long ret) | |
91 | { | |
92 | if (ret == -1) | |
93 | return -errno; | |
94 | else | |
95 | return ret; | |
96 | } | |
97 | ||
98 | static inline int is_error(long ret) | |
99 | { | |
100 | return (unsigned long)ret >= (unsigned long)(-4096); | |
101 | } | |
102 | ||
103 | /* ------------------------------------------------------------ | |
104 | Mach syscall handling | |
105 | */ | |
106 | ||
107 | void static inline print_description_msg_header(mach_msg_header_t *hdr) | |
108 | { | |
109 | char *name = NULL; | |
110 | int i; | |
111 | struct { int number; char *name; } msg_name[] = | |
112 | { | |
113 | /* see http://fxr.watson.org/fxr/source/compat/mach/mach_namemap.c?v=NETBSD */ | |
114 | { 200, "host_info" }, | |
115 | { 202, "host_page_size" }, | |
116 | { 206, "host_get_clock_service" }, | |
117 | { 206, "host_get_clock_service" }, | |
118 | { 206, "host_get_clock_service" }, | |
119 | { 306, "host_get_clock_service" }, | |
120 | { 3204, "mach_port_allocate" }, | |
121 | { 3206, "mach_port_deallocate" }, | |
122 | { 3404, "mach_ports_lookup" }, | |
123 | { 3409, "mach_task_get_special_port" }, | |
124 | { 3414, "mach_task_get_exception_ports" }, | |
125 | { 3418, "mach_semaphore_create" }, | |
126 | { 3504, "mach_semaphore_create" }, | |
127 | { 3509, "mach_semaphore_create" }, | |
128 | { 3518, "semaphore_create" }, | |
129 | { 3616, "thread_policy" }, | |
130 | { 3801, "vm_allocate" }, | |
131 | { 3802, "vm_deallocate" }, | |
132 | { 3802, "vm_deallocate" }, | |
133 | { 3803, "vm_protect" }, | |
134 | { 3812, "vm_map" }, | |
135 | { 4241776, "lu_message_send_id" }, /* lookupd */ | |
136 | { 4241876, "lu_message_reply_id" }, /* lookupd */ | |
137 | }; | |
138 | ||
b1503cda | 139 | for(i = 0; i < ARRAY_SIZE(msg_name); i++) { |
831b7825 TS |
140 | if(msg_name[i].number == hdr->msgh_id) |
141 | { | |
142 | name = msg_name[i].name; | |
143 | break; | |
144 | } | |
145 | } | |
146 | if(!name) | |
147 | DPRINTF("unknown mach msg %d 0x%x\n", hdr->msgh_id, hdr->msgh_id); | |
148 | else | |
149 | DPRINTF("%s\n", name); | |
150 | #if 0 | |
151 | DPRINTF("Bits: %8x\n", hdr->msgh_bits); | |
152 | DPRINTF("Size: %8x\n", hdr->msgh_size); | |
153 | DPRINTF("Rmte: %8x\n", hdr->msgh_remote_port); | |
154 | DPRINTF("Locl: %8x\n", hdr->msgh_local_port); | |
155 | DPRINTF("Rsrv: %8x\n", hdr->msgh_reserved); | |
156 | ||
157 | DPRINTF("Id : %8x\n", hdr->msgh_id); | |
158 | ||
159 | NDR_record_t *ndr = (NDR_record_t *)(hdr + 1); | |
160 | DPRINTF("hdr = %p, sizeof(hdr) = %x, NDR = %p\n", hdr, (unsigned int)sizeof(mach_msg_header_t), ndr); | |
161 | DPRINTF("%d %d %d %d %d %d %d %d\n", | |
162 | ndr->mig_vers, ndr->if_vers, ndr->reserved1, ndr->mig_encoding, | |
163 | ndr->int_rep, ndr->char_rep, ndr->float_rep, ndr->reserved2); | |
164 | #endif | |
165 | } | |
166 | ||
167 | static inline void print_mach_msg_return(mach_msg_return_t ret) | |
168 | { | |
169 | int i, found = 0; | |
170 | #define MACH_MSG_RET(msg) { msg, #msg } | |
171 | struct { int code; char *name; } msg_name[] = | |
172 | { | |
173 | /* ref: http://darwinsource.opendarwin.org/10.4.2/xnu-792.2.4/osfmk/man/mach_msg.html */ | |
174 | /* send message */ | |
175 | MACH_MSG_RET(MACH_SEND_MSG_TOO_SMALL), | |
176 | MACH_MSG_RET(MACH_SEND_NO_BUFFER), | |
177 | MACH_MSG_RET(MACH_SEND_INVALID_DATA), | |
178 | MACH_MSG_RET(MACH_SEND_INVALID_HEADER), | |
179 | MACH_MSG_RET(MACH_SEND_INVALID_DEST), | |
180 | MACH_MSG_RET(MACH_SEND_INVALID_NOTIFY), | |
181 | MACH_MSG_RET(MACH_SEND_INVALID_REPLY), | |
182 | MACH_MSG_RET(MACH_SEND_INVALID_TRAILER), | |
183 | MACH_MSG_RET(MACH_SEND_INVALID_MEMORY), | |
184 | MACH_MSG_RET(MACH_SEND_INVALID_RIGHT), | |
185 | MACH_MSG_RET(MACH_SEND_INVALID_TYPE), | |
186 | MACH_MSG_RET(MACH_SEND_INTERRUPTED), | |
187 | MACH_MSG_RET(MACH_SEND_TIMED_OUT), | |
188 | ||
189 | MACH_MSG_RET(MACH_RCV_BODY_ERROR), | |
190 | MACH_MSG_RET(MACH_RCV_HEADER_ERROR), | |
191 | ||
192 | MACH_MSG_RET(MACH_RCV_IN_SET), | |
193 | MACH_MSG_RET(MACH_RCV_INTERRUPTED), | |
194 | ||
195 | MACH_MSG_RET(MACH_RCV_INVALID_DATA), | |
196 | MACH_MSG_RET(MACH_RCV_INVALID_NAME), | |
197 | MACH_MSG_RET(MACH_RCV_INVALID_NOTIFY), | |
198 | MACH_MSG_RET(MACH_RCV_INVALID_TRAILER), | |
199 | MACH_MSG_RET(MACH_RCV_INVALID_TYPE), | |
200 | ||
201 | MACH_MSG_RET(MACH_RCV_PORT_CHANGED), | |
202 | MACH_MSG_RET(MACH_RCV_PORT_DIED), | |
203 | ||
204 | MACH_MSG_RET(MACH_RCV_SCATTER_SMALL), | |
205 | MACH_MSG_RET(MACH_RCV_TIMED_OUT), | |
206 | MACH_MSG_RET(MACH_RCV_TOO_LARGE) | |
207 | }; | |
208 | #undef MACH_MSG_RET | |
209 | ||
210 | if( ret == MACH_MSG_SUCCESS) | |
211 | DPRINTF("MACH_MSG_SUCCESS\n"); | |
212 | else | |
213 | { | |
b1503cda | 214 | for( i = 0; i < ARRAY_SIZE(msg_name); i++) { |
263466f5 FB |
215 | if(msg_name[i].code == ret) { |
216 | DPRINTF("%s\n", msg_name[i].name); | |
831b7825 | 217 | found = 1; |
263466f5 | 218 | break; |
831b7825 TS |
219 | } |
220 | } | |
221 | if(!found) | |
222 | qerror("unknow mach message ret code %d\n", ret); | |
831b7825 TS |
223 | } |
224 | } | |
225 | ||
226 | static inline void swap_mach_msg_header(mach_msg_header_t *hdr) | |
227 | { | |
228 | hdr->msgh_bits = tswap32(hdr->msgh_bits); | |
229 | hdr->msgh_size = tswap32(hdr->msgh_size); | |
230 | hdr->msgh_remote_port = tswap32(hdr->msgh_remote_port); | |
231 | hdr->msgh_local_port = tswap32(hdr->msgh_local_port); | |
232 | hdr->msgh_reserved = tswap32(hdr->msgh_reserved); | |
233 | hdr->msgh_id = tswap32(hdr->msgh_id); | |
234 | } | |
235 | ||
236 | struct complex_msg { | |
237 | mach_msg_header_t hdr; | |
238 | mach_msg_body_t body; | |
239 | }; | |
240 | ||
263466f5 | 241 | static inline void swap_mach_msg_body(struct complex_msg *complex_msg, int bswap) |
831b7825 TS |
242 | { |
243 | mach_msg_port_descriptor_t *descr = (mach_msg_port_descriptor_t *)(complex_msg+1); | |
244 | int i,j; | |
831b7825 TS |
245 | |
246 | if(bswap == bswap_in) | |
247 | tswap32s(&complex_msg->body.msgh_descriptor_count); | |
248 | ||
249 | DPRINTF("body.msgh_descriptor_count %d\n", complex_msg->body.msgh_descriptor_count); | |
250 | ||
251 | for(i = 0; i < complex_msg->body.msgh_descriptor_count; i++) { | |
252 | switch(descr->type) | |
253 | { | |
254 | case MACH_MSG_PORT_DESCRIPTOR: | |
255 | tswap32s(&descr->name); | |
256 | descr++; | |
257 | break; | |
258 | case MACH_MSG_OOL_DESCRIPTOR: | |
259 | { | |
260 | mach_msg_ool_descriptor_t *ool = (void *)descr; | |
261 | tswap32s((uint32_t *)&ool->address); | |
262 | tswap32s(&ool->size); | |
263 | ||
264 | descr = (mach_msg_port_descriptor_t *)(ool+1); | |
265 | break; | |
266 | } | |
267 | case MACH_MSG_OOL_PORTS_DESCRIPTOR: | |
268 | { | |
269 | mach_msg_ool_ports_descriptor_t *ool_ports = (void *)descr; | |
270 | mach_port_name_t * port_names; | |
271 | ||
272 | if(bswap == bswap_in) | |
273 | { | |
274 | tswap32s((uint32_t *)&ool_ports->address); | |
275 | tswap32s(&ool_ports->count); | |
276 | } | |
277 | ||
278 | port_names = ool_ports->address; | |
279 | ||
280 | for(j = 0; j < ool_ports->count; j++) | |
281 | tswap32s(&port_names[j]); | |
282 | ||
283 | if(bswap == bswap_out) | |
284 | { | |
285 | tswap32s((uint32_t *)&ool_ports->address); | |
286 | tswap32s(&ool_ports->count); | |
287 | } | |
288 | ||
289 | descr = (mach_msg_port_descriptor_t *)(ool_ports+1); | |
290 | break; | |
291 | } | |
292 | default: qerror("unknow mach msg descriptor type %x\n", descr->type); | |
293 | } | |
294 | } | |
295 | if(bswap == bswap_out) | |
296 | tswap32s(&complex_msg->body.msgh_descriptor_count); | |
263466f5 FB |
297 | } |
298 | ||
299 | static inline void swap_mach_msg(mach_msg_header_t *hdr, int bswap) | |
300 | { | |
301 | if (bswap == bswap_out && hdr->msgh_bits & MACH_MSGH_BITS_COMPLEX) | |
302 | swap_mach_msg_body((struct complex_msg *)hdr, bswap); | |
303 | ||
304 | swap_mach_msg_header(hdr); | |
305 | ||
306 | if (bswap == bswap_in && hdr->msgh_bits & MACH_MSGH_BITS_COMPLEX) | |
307 | swap_mach_msg_body((struct complex_msg *)hdr, bswap); | |
831b7825 TS |
308 | } |
309 | ||
310 | static inline uint32_t target_mach_msg_trap( | |
311 | mach_msg_header_t *hdr, uint32_t options, uint32_t send_size, | |
263466f5 | 312 | uint32_t rcv_size, uint32_t rcv_name, uint32_t time_out, uint32_t notify) |
831b7825 | 313 | { |
263466f5 FB |
314 | extern int mach_msg_trap(mach_msg_header_t *, mach_msg_option_t, |
315 | mach_msg_size_t, mach_msg_size_t, mach_port_t, | |
316 | mach_msg_timeout_t, mach_port_t); | |
831b7825 TS |
317 | mach_msg_audit_trailer_t *trailer; |
318 | mach_msg_id_t msg_id; | |
319 | uint32_t ret = 0; | |
831b7825 TS |
320 | int i; |
321 | ||
263466f5 | 322 | swap_mach_msg(hdr, bswap_in); |
831b7825 TS |
323 | |
324 | msg_id = hdr->msgh_id; | |
325 | ||
263466f5 | 326 | print_description_msg_header(hdr); |
831b7825 TS |
327 | |
328 | ret = mach_msg_trap(hdr, options, send_size, rcv_size, rcv_name, time_out, notify); | |
329 | ||
330 | print_mach_msg_return(ret); | |
331 | ||
831b7825 TS |
332 | if( (options & MACH_RCV_MSG) && (REQUESTED_TRAILER_SIZE(options) > 0) ) |
333 | { | |
334 | /* XXX: the kernel always return the full trailer with MACH_SEND_MSG, so we should | |
335 | probably always bswap it */ | |
336 | /* warning: according to Mac OS X Internals (the book) msg_size might be expressed in | |
337 | natural_t units but according to xnu/osfmk/mach/message.h: "The size of | |
338 | the message must be specified in bytes" */ | |
339 | trailer = (mach_msg_audit_trailer_t *)((uint8_t *)hdr + hdr->msgh_size); | |
340 | /* XXX: Should probably do that based on the option asked by the sender, but dealing | |
341 | with kernel answer seems more sound */ | |
342 | switch(trailer->msgh_trailer_size) | |
343 | { | |
344 | case sizeof(mach_msg_audit_trailer_t): | |
345 | for(i = 0; i < 8; i++) | |
346 | tswap32s(&trailer->msgh_audit.val[i]); | |
347 | /* Fall in mach_msg_security_trailer_t case */ | |
348 | case sizeof(mach_msg_security_trailer_t): | |
349 | tswap32s(&trailer->msgh_sender.val[0]); | |
350 | tswap32s(&trailer->msgh_sender.val[1]); | |
351 | /* Fall in mach_msg_seqno_trailer_t case */ | |
352 | case sizeof(mach_msg_seqno_trailer_t): | |
353 | tswap32s(&trailer->msgh_seqno); | |
354 | /* Fall in mach_msg_trailer_t case */ | |
355 | case sizeof(mach_msg_trailer_t): | |
356 | tswap32s(&trailer->msgh_trailer_type); | |
357 | tswap32s(&trailer->msgh_trailer_size); | |
358 | break; | |
359 | case 0: | |
360 | /* Safer not to byteswap, but probably wrong */ | |
361 | break; | |
362 | default: | |
363 | qerror("unknow trailer type given its size %d\n", trailer->msgh_trailer_size); | |
364 | break; | |
365 | } | |
366 | } | |
367 | ||
368 | /* Special message handling */ | |
369 | switch (msg_id) { | |
370 | case 200: /* host_info */ | |
371 | { | |
372 | mig_reply_error_t *err = (mig_reply_error_t *)hdr; | |
7ed40acf TS |
373 | struct { |
374 | uint32_t unknow1; | |
375 | uint32_t max_cpus; | |
376 | uint32_t avail_cpus; | |
377 | uint32_t memory_size; | |
378 | uint32_t cpu_type; | |
379 | uint32_t cpu_subtype; | |
380 | } *data = (void *)(err+1); | |
263466f5 FB |
381 | |
382 | DPRINTF("maxcpu = 0x%x\n", data->max_cpus); | |
383 | DPRINTF("numcpu = 0x%x\n", data->avail_cpus); | |
384 | DPRINTF("memsize = 0x%x\n", data->memory_size); | |
831b7825 TS |
385 | |
386 | #if defined(TARGET_I386) | |
387 | data->cpu_type = CPU_TYPE_I386; | |
388 | DPRINTF("cpu_type changed to 0x%x(i386)\n", data->cpu_type); | |
831b7825 TS |
389 | data->cpu_subtype = CPU_SUBTYPE_PENT; |
390 | DPRINTF("cpu_subtype changed to 0x%x(i386_pent)\n", data->cpu_subtype); | |
391 | #elif defined(TARGET_PPC) | |
263466f5 FB |
392 | data->cpu_type = CPU_TYPE_POWERPC; |
393 | DPRINTF("cpu_type changed to 0x%x(ppc)\n", data->cpu_type); | |
831b7825 TS |
394 | data->cpu_subtype = CPU_SUBTYPE_POWERPC_750; |
395 | DPRINTF("cpu_subtype changed to 0x%x(ppc_all)\n", data->cpu_subtype); | |
396 | #else | |
397 | # error target not supported | |
398 | #endif | |
399 | break; | |
400 | } | |
401 | case 202: /* host_page_size */ | |
402 | { | |
403 | mig_reply_error_t *err = (mig_reply_error_t *)hdr; | |
404 | uint32_t *pagesize = (uint32_t *)(err+1); | |
405 | ||
406 | DPRINTF("pagesize = %d\n", *pagesize); | |
407 | break; | |
408 | } | |
409 | default: break; | |
410 | } | |
411 | ||
263466f5 | 412 | swap_mach_msg(hdr, bswap_out); |
831b7825 TS |
413 | |
414 | return ret; | |
415 | } | |
416 | ||
417 | long do_mach_syscall(void *cpu_env, int num, uint32_t arg1, uint32_t arg2, uint32_t arg3, | |
418 | uint32_t arg4, uint32_t arg5, uint32_t arg6, uint32_t arg7, | |
419 | uint32_t arg8) | |
420 | { | |
3f47aa8c | 421 | extern uint32_t mach_reply_port(void); |
831b7825 TS |
422 | |
423 | long ret = 0; | |
424 | ||
425 | arg1 = tswap32(arg1); | |
426 | arg2 = tswap32(arg2); | |
427 | arg3 = tswap32(arg3); | |
428 | arg4 = tswap32(arg4); | |
429 | arg5 = tswap32(arg5); | |
430 | arg6 = tswap32(arg6); | |
431 | arg7 = tswap32(arg7); | |
432 | arg8 = tswap32(arg8); | |
433 | ||
434 | DPRINTF("mach syscall %d : " , num); | |
435 | ||
436 | switch(num) { | |
437 | /* see xnu/osfmk/mach/syscall_sw.h */ | |
438 | case -26: | |
439 | DPRINTF("mach_reply_port()\n"); | |
440 | ret = mach_reply_port(); | |
441 | break; | |
442 | case -27: | |
443 | DPRINTF("mach_thread_self()\n"); | |
444 | ret = mach_thread_self(); | |
445 | break; | |
446 | case -28: | |
447 | DPRINTF("mach_task_self()\n"); | |
448 | ret = mach_task_self(); | |
449 | break; | |
450 | case -29: | |
451 | DPRINTF("mach_host_self()\n"); | |
452 | ret = mach_host_self(); | |
453 | break; | |
454 | case -31: | |
455 | DPRINTF("mach_msg_trap(0x%x, 0x%x, 0x%x, 0x%x, 0x%x, 0x%x, 0x%x)\n", | |
456 | arg1, arg2, arg3, arg4, arg5, arg6, arg7); | |
831b7825 | 457 | ret = target_mach_msg_trap((mach_msg_header_t *)arg1, arg2, arg3, arg4, arg5, arg6, arg7); |
831b7825 | 458 | break; |
ee999a88 TS |
459 | /* may need more translation if target arch is different from host */ |
460 | #if (defined(TARGET_I386) && defined(__i386__)) || (defined(TARGET_PPC) && defined(__ppc__)) | |
461 | case -33: | |
462 | DPRINTF("semaphore_signal_trap(0x%x)\n", arg1); | |
463 | ret = semaphore_signal_trap(arg1); | |
464 | break; | |
465 | case -34: | |
466 | DPRINTF("semaphore_signal_all_trap(0x%x)\n", arg1); | |
467 | ret = semaphore_signal_all_trap(arg1); | |
468 | break; | |
469 | case -35: | |
470 | DPRINTF("semaphore_signal_thread_trap(0x%x)\n", arg1, arg2); | |
471 | ret = semaphore_signal_thread_trap(arg1,arg2); | |
472 | break; | |
473 | #endif | |
831b7825 TS |
474 | case -36: |
475 | DPRINTF("semaphore_wait_trap(0x%x)\n", arg1); | |
476 | extern int semaphore_wait_trap(int); // XXX: is there any header for that? | |
477 | ret = semaphore_wait_trap(arg1); | |
478 | break; | |
ee999a88 TS |
479 | /* may need more translation if target arch is different from host */ |
480 | #if (defined(TARGET_I386) && defined(__i386__)) || (defined(TARGET_PPC) && defined(__ppc__)) | |
481 | case -37: | |
482 | DPRINTF("semaphore_wait_signal_trap(0x%x, 0x%x)\n", arg1, arg2); | |
483 | ret = semaphore_wait_signal_trap(arg1,arg2); | |
484 | break; | |
485 | #endif | |
831b7825 TS |
486 | case -43: |
487 | DPRINTF("map_fd(0x%x, 0x%x, 0x%x, 0x%x, 0x%x)\n", | |
488 | arg1, arg2, arg3, arg4, arg5); | |
489 | ret = map_fd(arg1, arg2, (void*)arg3, arg4, arg5); | |
490 | tswap32s((uint32_t*)arg3); | |
491 | break; | |
ee999a88 TS |
492 | /* may need more translation if target arch is different from host */ |
493 | #if (defined(TARGET_I386) && defined(__i386__)) || (defined(TARGET_PPC) && defined(__ppc__)) | |
494 | case -61: | |
495 | DPRINTF("syscall_thread_switch(0x%x, 0x%x, 0x%x)\n", | |
496 | arg1, arg2, arg3); | |
497 | ret = syscall_thread_switch(arg1, arg2, arg3); // just a hint to the scheduler; can drop? | |
498 | break; | |
499 | #endif | |
831b7825 TS |
500 | case -89: |
501 | DPRINTF("mach_timebase_info(0x%x)\n", arg1); | |
502 | struct mach_timebase_info info; | |
503 | ret = mach_timebase_info(&info); | |
504 | if(!is_error(ret)) | |
505 | { | |
506 | struct mach_timebase_info *outInfo = (void*)arg1; | |
507 | outInfo->numer = tswap32(info.numer); | |
508 | outInfo->denom = tswap32(info.denom); | |
509 | } | |
510 | break; | |
511 | case -90: | |
512 | DPRINTF("mach_wait_until()\n"); | |
513 | extern int mach_wait_until(uint64_t); // XXX: is there any header for that? | |
514 | ret = mach_wait_until(((uint64_t)arg2<<32) | (uint64_t)arg1); | |
515 | break; | |
516 | case -91: | |
517 | DPRINTF("mk_timer_create()\n"); | |
518 | extern int mk_timer_create(); // XXX: is there any header for that? | |
519 | ret = mk_timer_create(); | |
520 | break; | |
521 | case -92: | |
522 | DPRINTF("mk_timer_destroy()\n"); | |
523 | extern int mk_timer_destroy(int); // XXX: is there any header for that? | |
524 | ret = mk_timer_destroy(arg1); | |
525 | break; | |
526 | case -93: | |
527 | DPRINTF("mk_timer_create()\n"); | |
528 | extern int mk_timer_arm(int, uint64_t); // XXX: is there any header for that? | |
529 | ret = mk_timer_arm(arg1, ((uint64_t)arg3<<32) | (uint64_t)arg2); | |
530 | break; | |
531 | case -94: | |
532 | DPRINTF("mk_timer_cancel()\n"); | |
533 | extern int mk_timer_cancel(int, uint64_t *); // XXX: is there any header for that? | |
534 | ret = mk_timer_cancel(arg1, (uint64_t *)arg2); | |
535 | if((!is_error(ret)) && arg2) | |
536 | tswap64s((uint64_t *)arg2); | |
537 | break; | |
538 | default: | |
539 | gemu_log("qemu: Unsupported mach syscall: %d(0x%x)\n", num, num); | |
540 | gdb_handlesig (cpu_env, SIGTRAP); | |
541 | exit(0); | |
542 | break; | |
543 | } | |
544 | return ret; | |
545 | } | |
546 | ||
547 | /* ------------------------------------------------------------ | |
548 | thread type syscall handling | |
549 | */ | |
550 | long do_thread_syscall(void *cpu_env, int num, uint32_t arg1, uint32_t arg2, uint32_t arg3, | |
551 | uint32_t arg4, uint32_t arg5, uint32_t arg6, uint32_t arg7, | |
552 | uint32_t arg8) | |
553 | { | |
554 | extern uint32_t cthread_set_self(uint32_t); | |
3f47aa8c | 555 | extern uint32_t processor_facilities_used(void); |
831b7825 TS |
556 | long ret = 0; |
557 | ||
558 | arg1 = tswap32(arg1); | |
559 | arg2 = tswap32(arg2); | |
560 | arg3 = tswap32(arg3); | |
561 | arg4 = tswap32(arg4); | |
562 | arg5 = tswap32(arg5); | |
563 | arg6 = tswap32(arg6); | |
564 | arg7 = tswap32(arg7); | |
565 | arg8 = tswap32(arg8); | |
566 | ||
567 | DPRINTF("thread syscall %d : " , num); | |
568 | ||
569 | switch(num) { | |
570 | #ifdef TARGET_I386 | |
571 | case 0x3: | |
572 | #endif | |
573 | case 0x7FF1: /* cthread_set_self */ | |
574 | DPRINTF("cthread_set_self(0x%x)\n", (unsigned int)arg1); | |
575 | ret = cthread_set_self(arg1); | |
576 | #ifdef TARGET_I386 | |
577 | /* we need to update the LDT with the address of the thread */ | |
578 | write_dt((void *)(((CPUX86State *) cpu_env)->ldt.base + (4 * sizeof(uint64_t))), arg1, 1, | |
579 | DESC_G_MASK | DESC_B_MASK | DESC_P_MASK | DESC_S_MASK | | |
580 | (3 << DESC_DPL_SHIFT) | (0x2 << DESC_TYPE_SHIFT)); | |
581 | /* New i386 convention, %gs should be set to our this LDT entry */ | |
582 | cpu_x86_load_seg(cpu_env, R_GS, 0x27); | |
583 | /* Old i386 convention, the kernel returns the selector for the cthread (pre-10.4.8?)*/ | |
584 | ret = 0x27; | |
585 | #endif | |
586 | break; | |
587 | case 0x7FF2: /* Called the super-fast pthread_self handler by the apple guys */ | |
588 | DPRINTF("pthread_self()\n"); | |
589 | ret = (uint32_t)pthread_self(); | |
590 | break; | |
591 | case 0x7FF3: | |
592 | DPRINTF("processor_facilities_used()\n"); | |
593 | #ifdef __i386__ | |
594 | qerror("processor_facilities_used: not implemented!\n"); | |
595 | #else | |
596 | ret = (uint32_t)processor_facilities_used(); | |
597 | #endif | |
598 | break; | |
599 | default: | |
600 | gemu_log("qemu: Unsupported thread syscall: %d(0x%x)\n", num, num); | |
601 | gdb_handlesig (cpu_env, SIGTRAP); | |
602 | exit(0); | |
603 | break; | |
604 | } | |
605 | return ret; | |
606 | } | |
607 | ||
608 | /* ------------------------------------------------------------ | |
609 | ioctl handling | |
610 | */ | |
611 | static inline void byteswap_termios(struct termios *t) | |
612 | { | |
613 | tswap32s((uint32_t*)&t->c_iflag); | |
614 | tswap32s((uint32_t*)&t->c_oflag); | |
615 | tswap32s((uint32_t*)&t->c_cflag); | |
616 | tswap32s((uint32_t*)&t->c_lflag); | |
617 | /* 20 (char) bytes then */ | |
618 | tswap32s((uint32_t*)&t->c_ispeed); | |
619 | tswap32s((uint32_t*)&t->c_ospeed); | |
620 | } | |
621 | ||
622 | static inline void byteswap_winsize(struct winsize *w) | |
623 | { | |
624 | tswap16s(&w->ws_row); | |
625 | tswap16s(&w->ws_col); | |
626 | tswap16s(&w->ws_xpixel); | |
627 | tswap16s(&w->ws_ypixel); | |
628 | } | |
629 | ||
001faf32 | 630 | #define STRUCT(name, ...) STRUCT_ ## name, |
831b7825 TS |
631 | #define STRUCT_SPECIAL(name) STRUCT_ ## name, |
632 | enum { | |
633 | #include "ioctls_types.h" | |
634 | }; | |
635 | #undef STRUCT | |
636 | #undef STRUCT_SPECIAL | |
637 | ||
001faf32 | 638 | #define STRUCT(name, ...) const argtype struct_ ## name ## _def[] = { __VA_ARGS__, TYPE_NULL }; |
831b7825 TS |
639 | #define STRUCT_SPECIAL(name) |
640 | #include "ioctls_types.h" | |
641 | #undef STRUCT | |
642 | #undef STRUCT_SPECIAL | |
643 | ||
644 | typedef struct IOCTLEntry { | |
645 | unsigned int target_cmd; | |
646 | unsigned int host_cmd; | |
647 | const char *name; | |
648 | int access; | |
649 | const argtype arg_type[5]; | |
650 | } IOCTLEntry; | |
651 | ||
652 | #define IOC_R 0x0001 | |
653 | #define IOC_W 0x0002 | |
654 | #define IOC_RW (IOC_R | IOC_W) | |
655 | ||
656 | #define MAX_STRUCT_SIZE 4096 | |
657 | ||
9f106a75 | 658 | static IOCTLEntry ioctl_entries[] = { |
001faf32 BS |
659 | #define IOCTL(cmd, access, ...) \ |
660 | { cmd, cmd, #cmd, access, { __VA_ARGS__ } }, | |
831b7825 TS |
661 | #include "ioctls.h" |
662 | { 0, 0, }, | |
663 | }; | |
664 | ||
665 | /* ??? Implement proper locking for ioctls. */ | |
666 | static long do_ioctl(long fd, long cmd, long arg) | |
667 | { | |
668 | const IOCTLEntry *ie; | |
669 | const argtype *arg_type; | |
670 | int ret; | |
671 | uint8_t buf_temp[MAX_STRUCT_SIZE]; | |
672 | int target_size; | |
673 | void *argptr; | |
674 | ||
675 | ie = ioctl_entries; | |
676 | for(;;) { | |
677 | if (ie->target_cmd == 0) { | |
678 | gemu_log("Unsupported ioctl: cmd=0x%04lx\n", cmd); | |
679 | return -ENOSYS; | |
680 | } | |
681 | if (ie->target_cmd == cmd) | |
682 | break; | |
683 | ie++; | |
684 | } | |
685 | arg_type = ie->arg_type; | |
686 | #if defined(DEBUG) | |
687 | gemu_log("ioctl: cmd=0x%04lx (%s)\n", cmd, ie->name); | |
688 | #endif | |
689 | switch(arg_type[0]) { | |
690 | case TYPE_NULL: | |
691 | /* no argument */ | |
692 | ret = get_errno(ioctl(fd, ie->host_cmd)); | |
693 | break; | |
694 | case TYPE_PTRVOID: | |
695 | case TYPE_INT: | |
696 | /* int argment */ | |
697 | ret = get_errno(ioctl(fd, ie->host_cmd, arg)); | |
698 | break; | |
699 | case TYPE_PTR: | |
700 | arg_type++; | |
701 | target_size = thunk_type_size(arg_type, 0); | |
702 | switch(ie->access) { | |
703 | case IOC_R: | |
704 | ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp)); | |
705 | if (!is_error(ret)) { | |
706 | argptr = lock_user(arg, target_size, 0); | |
707 | thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET); | |
708 | unlock_user(argptr, arg, target_size); | |
709 | } | |
710 | break; | |
711 | case IOC_W: | |
712 | argptr = lock_user(arg, target_size, 1); | |
713 | thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST); | |
714 | unlock_user(argptr, arg, 0); | |
715 | ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp)); | |
716 | break; | |
717 | default: | |
718 | case IOC_RW: | |
719 | argptr = lock_user(arg, target_size, 1); | |
720 | thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST); | |
721 | unlock_user(argptr, arg, 0); | |
722 | ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp)); | |
723 | if (!is_error(ret)) { | |
724 | argptr = lock_user(arg, target_size, 0); | |
725 | thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET); | |
726 | unlock_user(argptr, arg, target_size); | |
727 | } | |
728 | break; | |
729 | } | |
730 | break; | |
731 | default: | |
732 | gemu_log("Unsupported ioctl type: cmd=0x%04lx type=%d\n", cmd, arg_type[0]); | |
733 | ret = -ENOSYS; | |
734 | break; | |
735 | } | |
736 | return ret; | |
737 | } | |
738 | ||
739 | /* ------------------------------------------------------------ | |
740 | Unix syscall handling | |
741 | */ | |
742 | ||
743 | static inline void byteswap_attrlist(struct attrlist *a) | |
744 | { | |
745 | tswap16s(&a->bitmapcount); | |
746 | tswap16s(&a->reserved); | |
747 | tswap32s(&a->commonattr); | |
748 | tswap32s(&a->volattr); | |
749 | tswap32s(&a->dirattr); | |
750 | tswap32s(&a->fileattr); | |
751 | tswap32s(&a->forkattr); | |
752 | } | |
753 | ||
754 | struct attrbuf_header { | |
755 | unsigned long length; | |
756 | }; | |
757 | ||
758 | static inline void byteswap_attrbuf(struct attrbuf_header *attrbuf, struct attrlist *attrlist) | |
759 | { | |
760 | DPRINTF("attrBuf.lenght %lx\n", attrbuf->length); | |
761 | } | |
762 | ||
763 | static inline void byteswap_statfs(struct statfs *s) | |
764 | { | |
765 | tswap16s((uint16_t*)&s->f_otype); | |
766 | tswap16s((uint16_t*)&s->f_oflags); | |
767 | tswap32s((uint32_t*)&s->f_bsize); | |
768 | tswap32s((uint32_t*)&s->f_iosize); | |
769 | tswap32s((uint32_t*)&s->f_blocks); | |
770 | tswap32s((uint32_t*)&s->f_bfree); | |
771 | tswap32s((uint32_t*)&s->f_bavail); | |
772 | tswap32s((uint32_t*)&s->f_files); | |
773 | tswap32s((uint32_t*)&s->f_ffree); | |
774 | tswap32s((uint32_t*)&s->f_fsid.val[0]); | |
775 | tswap32s((uint32_t*)&s->f_fsid.val[1]); | |
776 | tswap16s((uint16_t*)&s->f_reserved1); | |
777 | tswap16s((uint16_t*)&s->f_type); | |
778 | tswap32s((uint32_t*)&s->f_flags); | |
779 | } | |
780 | ||
781 | static inline void byteswap_stat(struct stat *s) | |
782 | { | |
783 | tswap32s((uint32_t*)&s->st_dev); | |
784 | tswap32s(&s->st_ino); | |
785 | tswap16s(&s->st_mode); | |
786 | tswap16s(&s->st_nlink); | |
787 | tswap32s(&s->st_uid); | |
788 | tswap32s(&s->st_gid); | |
789 | tswap32s((uint32_t*)&s->st_rdev); | |
790 | tswap32s((uint32_t*)&s->st_atimespec.tv_sec); | |
791 | tswap32s((uint32_t*)&s->st_atimespec.tv_nsec); | |
792 | tswap32s((uint32_t*)&s->st_mtimespec.tv_sec); | |
793 | tswap32s((uint32_t*)&s->st_mtimespec.tv_nsec); | |
794 | tswap32s((uint32_t*)&s->st_ctimespec.tv_sec); | |
795 | tswap32s((uint32_t*)&s->st_ctimespec.tv_nsec); | |
796 | tswap64s((uint64_t*)&s->st_size); | |
797 | tswap64s((uint64_t*)&s->st_blocks); | |
798 | tswap32s((uint32_t*)&s->st_blksize); | |
799 | tswap32s(&s->st_flags); | |
800 | tswap32s(&s->st_gen); | |
801 | } | |
802 | ||
803 | static inline void byteswap_dirents(struct dirent *d, int bytes) | |
804 | { | |
805 | char *b; | |
806 | for( b = (char*)d; (int)b < (int)d+bytes; ) | |
807 | { | |
808 | unsigned short s = ((struct dirent *)b)->d_reclen; | |
809 | tswap32s(&((struct dirent *)b)->d_ino); | |
810 | tswap16s(&((struct dirent *)b)->d_reclen); | |
811 | if(s<=0) | |
812 | break; | |
813 | b += s; | |
814 | } | |
815 | } | |
816 | ||
817 | static inline void byteswap_iovec(struct iovec *v, int n) | |
818 | { | |
819 | int i; | |
820 | for(i = 0; i < n; i++) | |
821 | { | |
822 | tswap32s((uint32_t*)&v[i].iov_base); | |
823 | tswap32s((uint32_t*)&v[i].iov_len); | |
824 | } | |
825 | } | |
826 | ||
827 | static inline void byteswap_timeval(struct timeval *t) | |
828 | { | |
829 | tswap32s((uint32_t*)&t->tv_sec); | |
830 | tswap32s((uint32_t*)&t->tv_usec); | |
831 | } | |
832 | ||
833 | long do_unix_syscall_indirect(void *cpu_env, int num); | |
3f47aa8c | 834 | long do_sync(void); |
831b7825 TS |
835 | long do_exit(uint32_t arg1); |
836 | long do_getlogin(char *out, uint32_t size); | |
837 | long do_open(char * arg1, uint32_t arg2, uint32_t arg3); | |
838 | long do_getfsstat(struct statfs * arg1, uint32_t arg2, uint32_t arg3); | |
839 | long do_sigprocmask(uint32_t arg1, uint32_t * arg2, uint32_t * arg3); | |
840 | long do_execve(char* arg1, char ** arg2, char ** arg3); | |
841 | long do_getgroups(uint32_t arg1, gid_t * arg2); | |
842 | long do_gettimeofday(struct timeval * arg1, void * arg2); | |
843 | long do_readv(uint32_t arg1, struct iovec * arg2, uint32_t arg3); | |
844 | long do_writev(uint32_t arg1, struct iovec * arg2, uint32_t arg3); | |
845 | long do_utimes(char * arg1, struct timeval * arg2); | |
846 | long do_futimes(uint32_t arg1, struct timeval * arg2); | |
847 | long do_statfs(char * arg1, struct statfs * arg2); | |
848 | long do_fstatfs(uint32_t arg1, struct statfs * arg2); | |
849 | long do_stat(char * arg1, struct stat * arg2); | |
850 | long do_fstat(uint32_t arg1, struct stat * arg2); | |
851 | long do_lstat(char * arg1, struct stat * arg2); | |
852 | long do_getdirentries(uint32_t arg1, void* arg2, uint32_t arg3, void* arg4); | |
853 | long do_lseek(void *cpu_env, int num); | |
263466f5 | 854 | long do___sysctl(int * name, uint32_t namelen, void * oldp, size_t * oldlenp, void * newp, size_t newlen /* ignored */); |
831b7825 TS |
855 | long do_getattrlist(void * arg1, void * arg2, void * arg3, uint32_t arg4, uint32_t arg5); |
856 | long do_getdirentriesattr(uint32_t arg1, void * arg2, void * arg3, size_t arg4, void * arg5, void * arg6, void* arg7, uint32_t arg8); | |
263466f5 | 857 | long do_fcntl(int fd, int cmd, int arg); |
831b7825 TS |
858 | |
859 | long no_syscall(void *cpu_env, int num); | |
860 | ||
861 | long do_pread(uint32_t arg1, void * arg2, size_t arg3, off_t arg4) | |
862 | { | |
263466f5 FB |
863 | DPRINTF("0x%x, %p, 0x%lx, 0x%llx\n", arg1, arg2, arg3, arg4); |
864 | long ret = pread(arg1, arg2, arg3, arg4); | |
865 | return ret; | |
866 | } | |
867 | ||
868 | long do_read(int d, void *buf, size_t nbytes) | |
869 | { | |
870 | DPRINTF("0x%x, %p, 0x%lx\n", d, buf, nbytes); | |
871 | long ret = get_errno(read(d, buf, nbytes)); | |
872 | if(!is_error(ret)) | |
873 | DPRINTF("%x\n", *(uint32_t*)buf); | |
831b7825 TS |
874 | return ret; |
875 | } | |
263466f5 | 876 | |
831b7825 TS |
877 | long unimpl_unix_syscall(void *cpu_env, int num); |
878 | ||
879 | typedef long (*syscall_function_t)(void *cpu_env, int num); | |
880 | ||
881 | ||
882 | /* define a table that will handle the syscall number->function association */ | |
883 | #define VOID void | |
884 | #define INT (uint32_t)get_int_arg(&i, cpu_env) | |
885 | #define INT64 (uint64_t)get_int64_arg(&i, cpu_env) | |
886 | #define UINT (unsigned int)INT | |
887 | #define PTR (void*)INT | |
888 | ||
889 | #define SIZE INT | |
890 | #define OFFSET INT64 | |
891 | ||
892 | #define WRAPPER_CALL_DIRECT_0(function, args) long __qemu_##function(void *cpu_env) { return (long)function(); } | |
893 | #define WRAPPER_CALL_DIRECT_1(function, _arg1) long __qemu_##function(void *cpu_env) { int i = 0; typeof(_arg1) arg1 = _arg1; return (long)function(arg1); } | |
894 | #define WRAPPER_CALL_DIRECT_2(function, _arg1, _arg2) long __qemu_##function(void *cpu_env) { int i = 0; typeof(_arg1) arg1 = _arg1; typeof(_arg2) arg2 = _arg2; return (long)function(arg1, arg2); } | |
895 | #define WRAPPER_CALL_DIRECT_3(function, _arg1, _arg2, _arg3) long __qemu_##function(void *cpu_env) { int i = 0; typeof(_arg1) arg1 = _arg1; typeof(_arg2) arg2 = _arg2; typeof(_arg3) arg3 = _arg3; return (long)function(arg1, arg2, arg3); } | |
896 | #define WRAPPER_CALL_DIRECT_4(function, _arg1, _arg2, _arg3, _arg4) long __qemu_##function(void *cpu_env) { int i = 0; typeof(_arg1) arg1 = _arg1; typeof(_arg2) arg2 = _arg2; typeof(_arg3) arg3 = _arg3; typeof(_arg4) arg4 = _arg4; return (long)function(arg1, arg2, arg3, arg4); } | |
897 | #define WRAPPER_CALL_DIRECT_5(function, _arg1, _arg2, _arg3, _arg4, _arg5) long __qemu_##function(void *cpu_env) { int i = 0; typeof(_arg1) arg1 = _arg1; typeof(_arg2) arg2 = _arg2; typeof(_arg3) arg3 = _arg3; typeof(_arg4) arg4 = _arg4; typeof(_arg5) arg5 = _arg5; return (long)function(arg1, arg2, arg3, arg4, arg5); } | |
898 | #define WRAPPER_CALL_DIRECT_6(function, _arg1, _arg2, _arg3, _arg4, _arg5, _arg6) long __qemu_##function(void *cpu_env) { int i = 0; typeof(_arg1) arg1 = _arg1; typeof(_arg2) arg2 = _arg2; typeof(_arg3) arg3 = _arg3; typeof(_arg4) arg4 = _arg4; typeof(_arg5) arg5 = _arg5; typeof(_arg6) arg6 = _arg6; return (long)function(arg1, arg2, arg3, arg4, arg5, arg6); } | |
899 | #define WRAPPER_CALL_DIRECT_7(function, _arg1, _arg2, _arg3, _arg4, _arg5, _arg6, _arg7) long __qemu_##function(void *cpu_env) { int i = 0; typeof(_arg1) arg1 = _arg1; typeof(_arg2) arg2 = _arg2; typeof(_arg3) arg3 = _arg3; typeof(_arg4) arg4 = _arg4; typeof(_arg5) arg5 = _arg5; typeof(_arg6) arg6 = _arg6; typeof(_arg7) arg7 = _arg7; return (long)function(arg1, arg2, arg3, arg4, arg5, arg6, arg7); } | |
900 | #define WRAPPER_CALL_DIRECT_8(function, _arg1, _arg2, _arg3, _arg4, _arg5, _arg6, _arg7, _arg8) long __qemu_##function(void *cpu_env) { int i = 0; typeof(_arg1) arg1 = _arg1; typeof(_arg2) arg2 = _arg2; typeof(_arg3) arg3 = _arg3; typeof(_arg4) arg4 = _arg4; typeof(_arg5) arg5 = _arg5; typeof(_arg6) arg6 = _arg6; typeof(_arg7) arg7 = _arg7; typeof(_arg8) arg8 = _arg8; return (long)function(arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8); } | |
001faf32 BS |
901 | #define WRAPPER_CALL_DIRECT(function, nargs, ...) WRAPPER_CALL_DIRECT_##nargs(function, __VA_ARGS__) |
902 | #define WRAPPER_CALL_NOERRNO(function, nargs, ...) WRAPPER_CALL_DIRECT(function, nargs, __VA_ARGS__) | |
903 | #define WRAPPER_CALL_INDIRECT(function, nargs, ...) | |
904 | #define ENTRY(name, number, function, nargs, call_type, ...) WRAPPER_##call_type(function, nargs, __VA_ARGS__) | |
831b7825 TS |
905 | |
906 | #include "syscalls.h" | |
907 | ||
908 | #undef ENTRY | |
909 | #undef WRAPPER_CALL_DIRECT | |
910 | #undef WRAPPER_CALL_NOERRNO | |
911 | #undef WRAPPER_CALL_INDIRECT | |
912 | #undef OFFSET | |
913 | #undef SIZE | |
914 | #undef INT | |
915 | #undef PTR | |
916 | #undef INT64 | |
917 | ||
918 | #define _ENTRY(name, number, function, nargs, call_type) [number] = {\ | |
919 | name, \ | |
920 | number, \ | |
921 | (syscall_function_t)function, \ | |
922 | nargs, \ | |
923 | call_type \ | |
924 | }, | |
925 | ||
926 | #define ENTRY_CALL_DIRECT(name, number, function, nargs, call_type) _ENTRY(name, number, __qemu_##function, nargs, call_type) | |
927 | #define ENTRY_CALL_NOERRNO(name, number, function, nargs, call_type) ENTRY_CALL_DIRECT(name, number, function, nargs, call_type) | |
928 | #define ENTRY_CALL_INDIRECT(name, number, function, nargs, call_type) _ENTRY(name, number, function, nargs, call_type) | |
001faf32 | 929 | #define ENTRY(name, number, function, nargs, call_type, ...) ENTRY_##call_type(name, number, function, nargs, call_type) |
831b7825 TS |
930 | |
931 | #define CALL_DIRECT 1 | |
932 | #define CALL_INDIRECT 2 | |
933 | #define CALL_NOERRNO (CALL_DIRECT | 4 /* = 5 */) | |
934 | ||
935 | struct unix_syscall { | |
936 | char * name; | |
937 | int number; | |
938 | syscall_function_t function; | |
939 | int nargs; | |
940 | int call_type; | |
941 | } unix_syscall_table[SYS_MAXSYSCALL] = { | |
942 | #include "syscalls.h" | |
943 | }; | |
944 | ||
945 | #undef ENTRY | |
946 | #undef _ENTRY | |
947 | #undef ENTRY_CALL_DIRECT | |
948 | #undef ENTRY_CALL_INDIRECT | |
949 | #undef ENTRY_CALL_NOERRNO | |
950 | ||
951 | /* Actual syscalls implementation */ | |
952 | ||
953 | long do_unix_syscall_indirect(void *cpu_env, int num) | |
954 | { | |
955 | long ret; | |
956 | int new_num; | |
957 | int i = 0; | |
958 | ||
959 | new_num = get_int_arg(&i, cpu_env); | |
960 | #ifdef TARGET_I386 | |
961 | ((CPUX86State*)cpu_env)->regs[R_ESP] += 4; | |
962 | /* XXX: not necessary */ | |
963 | ((CPUX86State*)cpu_env)->regs[R_EAX] = new_num; | |
964 | #elif TARGET_PPC | |
965 | { | |
966 | int i; | |
967 | uint32_t **regs = ((CPUPPCState*)cpu_env)->gpr; | |
968 | for(i = 3; i < 11; i++) | |
969 | *regs[i] = *regs[i+1]; | |
970 | /* XXX: not necessary */ | |
971 | *regs[0] = new_num; | |
972 | } | |
973 | #endif | |
974 | ret = do_unix_syscall(cpu_env, new_num); | |
975 | #ifdef TARGET_I386 | |
976 | ((CPUX86State*)cpu_env)->regs[R_ESP] -= 4; | |
977 | /* XXX: not necessary */ | |
978 | ((CPUX86State*)cpu_env)->regs[R_EAX] = num; | |
979 | #elif TARGET_PPC | |
980 | { | |
981 | int i; | |
982 | /* XXX: not really needed those regs are volatile accross calls */ | |
983 | uint32_t **regs = ((CPUPPCState*)cpu_env)->gpr; | |
984 | for(i = 11; i > 3; i--) | |
985 | *regs[i] = *regs[i-1]; | |
986 | regs[3] = new_num; | |
987 | *regs[0] = num; | |
988 | } | |
989 | #endif | |
990 | return ret; | |
991 | } | |
992 | ||
993 | long do_exit(uint32_t arg1) | |
994 | { | |
995 | exit(arg1); | |
996 | /* not reached */ | |
997 | return -1; | |
998 | } | |
999 | ||
3f47aa8c | 1000 | long do_sync(void) |
831b7825 TS |
1001 | { |
1002 | sync(); | |
1003 | return 0; | |
1004 | } | |
1005 | ||
1006 | long do_getlogin(char *out, uint32_t size) | |
1007 | { | |
1008 | char *login = getlogin(); | |
1009 | if(!login) | |
1010 | return -1; | |
1011 | memcpy(out, login, size); | |
1012 | return 0; | |
1013 | } | |
1014 | long do_open(char * arg1, uint32_t arg2, uint32_t arg3) | |
1015 | { | |
1016 | /* XXX: don't let the %s stay in there */ | |
1017 | DPRINTF("open(%s, 0x%x, 0x%x)\n", arg1, arg2, arg3); | |
1018 | return get_errno(open(arg1, arg2, arg3)); | |
1019 | } | |
1020 | ||
1021 | long do_getfsstat(struct statfs * arg1, uint32_t arg2, uint32_t arg3) | |
1022 | { | |
1023 | long ret; | |
1024 | DPRINTF("getfsstat(%p, 0x%x, 0x%x)\n", arg1, arg2, arg3); | |
1025 | ret = get_errno(getfsstat(arg1, arg2, arg3)); | |
1026 | if((!is_error(ret)) && arg1) | |
1027 | byteswap_statfs(arg1); | |
1028 | return ret; | |
1029 | } | |
1030 | ||
1031 | long do_sigprocmask(uint32_t arg1, uint32_t * arg2, uint32_t * arg3) | |
1032 | { | |
1033 | long ret; | |
1034 | DPRINTF("sigprocmask(%d, %p, %p)\n", arg1, arg2, arg3); | |
1035 | gemu_log("XXX: sigprocmask not tested (%d, %p, %p)\n", arg1, arg2, arg3); | |
1036 | if(arg2) | |
1037 | tswap32s(arg2); | |
1038 | ret = get_errno(sigprocmask(arg1, (void *)arg2, (void *)arg3)); | |
1039 | if((!is_error(ret)) && arg3) | |
1040 | tswap32s(arg3); | |
1041 | if(arg2) | |
1042 | tswap32s(arg2); | |
1043 | return ret; | |
1044 | } | |
1045 | ||
1046 | long do_execve(char* arg1, char ** arg2, char ** arg3) | |
1047 | { | |
1048 | long ret; | |
1049 | char **argv = arg2; | |
1050 | char **envp = arg3; | |
1051 | int argc; | |
1052 | int envc; | |
1053 | ||
1054 | /* XXX: don't let the %s stay in here */ | |
1055 | DPRINTF("execve(%s, %p, %p)\n", arg1, arg2, arg3); | |
1056 | ||
1057 | for(argc = 0; argv[argc]; argc++); | |
1058 | for(envc = 0; envp[envc]; envc++); | |
1059 | ||
1060 | argv = (char**)malloc(sizeof(char*)*argc); | |
1061 | envp = (char**)malloc(sizeof(char*)*envc); | |
1062 | ||
1063 | for(; argc >= 0; argc--) | |
1064 | argv[argc] = (char*)tswap32((uint32_t)(arg2)[argc]); | |
1065 | ||
1066 | for(; envc >= 0; envc--) | |
1067 | envp[envc] = (char*)tswap32((uint32_t)(arg3)[envc]); | |
1068 | ||
1069 | ret = get_errno(execve(arg1, argv, envp)); | |
1070 | free(argv); | |
1071 | free(envp); | |
1072 | return ret; | |
1073 | } | |
1074 | ||
1075 | long do_getgroups(uint32_t arg1, gid_t * arg2) | |
1076 | { | |
1077 | long ret; | |
1078 | int i; | |
1079 | DPRINTF("getgroups(0x%x, %p)\n", arg1, arg2); | |
1080 | ret = get_errno(getgroups(arg1, arg2)); | |
1081 | if(ret > 0) | |
1082 | for(i = 0; i < arg1; i++) | |
1083 | tswap32s(&arg2[i]); | |
1084 | return ret; | |
1085 | } | |
1086 | ||
1087 | long do_gettimeofday(struct timeval * arg1, void * arg2) | |
1088 | { | |
1089 | long ret; | |
1090 | DPRINTF("gettimeofday(%p, %p)\n", | |
1091 | arg1, arg2); | |
1092 | ret = get_errno(gettimeofday(arg1, arg2)); | |
1093 | if(!is_error(ret)) | |
1094 | { | |
1095 | /* timezone no longer used according to the manpage, so don't bother with it */ | |
1096 | byteswap_timeval(arg1); | |
1097 | } | |
1098 | return ret; | |
1099 | } | |
1100 | ||
1101 | long do_readv(uint32_t arg1, struct iovec * arg2, uint32_t arg3) | |
1102 | { | |
1103 | long ret; | |
1104 | DPRINTF("readv(0x%x, %p, 0x%x)\n", arg1, arg2, arg3); | |
1105 | if(arg2) | |
1106 | byteswap_iovec(arg2, arg3); | |
1107 | ret = get_errno(readv(arg1, arg2, arg3)); | |
1108 | if((!is_error(ret)) && arg2) | |
1109 | byteswap_iovec(arg2, arg3); | |
1110 | return ret; | |
1111 | } | |
1112 | ||
1113 | long do_writev(uint32_t arg1, struct iovec * arg2, uint32_t arg3) | |
1114 | { | |
1115 | long ret; | |
1116 | DPRINTF("writev(0x%x, %p, 0x%x)\n", arg1, arg2, arg3); | |
1117 | if(arg2) | |
1118 | byteswap_iovec(arg2, arg3); | |
1119 | ret = get_errno(writev(arg1, arg2, arg3)); | |
1120 | if((!is_error(ret)) && arg2) | |
1121 | byteswap_iovec(arg2, arg3); | |
1122 | return ret; | |
1123 | } | |
1124 | ||
1125 | long do_utimes(char * arg1, struct timeval * arg2) | |
1126 | { | |
1127 | DPRINTF("utimes(%p, %p)\n", arg1, arg2); | |
1128 | if(arg2) | |
1129 | { | |
1130 | byteswap_timeval(arg2); | |
1131 | byteswap_timeval(arg2+1); | |
1132 | } | |
1133 | return get_errno(utimes(arg1, arg2)); | |
1134 | } | |
1135 | ||
1136 | long do_futimes(uint32_t arg1, struct timeval * arg2) | |
1137 | { | |
1138 | DPRINTF("futimes(0x%x, %p)\n", arg1, arg2); | |
1139 | if(arg2) | |
1140 | { | |
1141 | byteswap_timeval(arg2); | |
1142 | byteswap_timeval(arg2+1); | |
1143 | } | |
1144 | return get_errno(futimes(arg1, arg2)); | |
1145 | } | |
1146 | ||
1147 | long do_statfs(char * arg1, struct statfs * arg2) | |
1148 | { | |
1149 | long ret; | |
1150 | DPRINTF("statfs(%p, %p)\n", arg1, arg2); | |
1151 | ret = get_errno(statfs(arg1, arg2)); | |
1152 | if(!is_error(ret)) | |
1153 | byteswap_statfs(arg2); | |
1154 | return ret; | |
1155 | } | |
1156 | ||
1157 | long do_fstatfs(uint32_t arg1, struct statfs* arg2) | |
1158 | { | |
1159 | long ret; | |
1160 | DPRINTF("fstatfs(0x%x, %p)\n", | |
1161 | arg1, arg2); | |
1162 | ret = get_errno(fstatfs(arg1, arg2)); | |
1163 | if(!is_error(ret)) | |
1164 | byteswap_statfs(arg2); | |
1165 | ||
1166 | return ret; | |
1167 | } | |
1168 | ||
1169 | long do_stat(char * arg1, struct stat * arg2) | |
1170 | { | |
1171 | long ret; | |
1172 | /* XXX: don't let the %s stay in there */ | |
1173 | DPRINTF("stat(%s, %p)\n", arg1, arg2); | |
1174 | ret = get_errno(stat(arg1, arg2)); | |
1175 | if(!is_error(ret)) | |
1176 | byteswap_stat(arg2); | |
1177 | return ret; | |
1178 | } | |
1179 | ||
1180 | long do_fstat(uint32_t arg1, struct stat * arg2) | |
1181 | { | |
1182 | long ret; | |
1183 | DPRINTF("fstat(0x%x, %p)\n", arg1, arg2); | |
1184 | ret = get_errno(fstat(arg1, arg2)); | |
1185 | if(!is_error(ret)) | |
1186 | byteswap_stat(arg2); | |
1187 | return ret; | |
1188 | } | |
1189 | ||
1190 | long do_lstat(char * arg1, struct stat * arg2) | |
1191 | { | |
1192 | long ret; | |
1193 | /* XXX: don't let the %s stay in there */ | |
1194 | DPRINTF("lstat(%s, %p)\n", (const char *)arg1, arg2); | |
1195 | ret = get_errno(lstat(arg1, arg2)); | |
1196 | if(!is_error(ret)) | |
1197 | byteswap_stat(arg2); | |
1198 | return ret; | |
1199 | } | |
1200 | ||
1201 | long do_getdirentries(uint32_t arg1, void* arg2, uint32_t arg3, void* arg4) | |
1202 | { | |
1203 | long ret; | |
1204 | DPRINTF("getdirentries(0x%x, %p, 0x%x, %p)\n", arg1, arg2, arg3, arg4); | |
1205 | if(arg4) | |
1206 | tswap32s((uint32_t *)arg4); | |
1207 | ret = get_errno(getdirentries(arg1, arg2, arg3, arg4)); | |
1208 | if(arg4) | |
1209 | tswap32s((uint32_t *)arg4); | |
1210 | if(!is_error(ret)) | |
1211 | byteswap_dirents(arg2, ret); | |
1212 | return ret; | |
1213 | } | |
1214 | ||
1215 | long do_lseek(void *cpu_env, int num) | |
1216 | { | |
1217 | long ret; | |
1218 | int i = 0; | |
1219 | uint32_t arg1 = get_int_arg(&i, cpu_env); | |
1220 | uint64_t offset = get_int64_arg(&i, cpu_env); | |
1221 | uint32_t arg3 = get_int_arg(&i, cpu_env); | |
1222 | uint64_t r = lseek(arg1, offset, arg3); | |
1223 | #ifdef TARGET_I386 | |
1224 | /* lowest word in eax, highest in edx */ | |
1225 | ret = r & 0xffffffff; /* will be set to eax after do_unix_syscall exit */ | |
1226 | ((CPUX86State *)cpu_env)->regs[R_EDX] = (uint32_t)((r >> 32) & 0xffffffff) ; | |
1227 | #elif defined TARGET_PPC | |
1228 | ret = r & 0xffffffff; /* will be set to r3 after do_unix_syscall exit */ | |
1229 | ((CPUPPCState *)cpu_env)->gpr[4] = (uint32_t)((r >> 32) & 0xffffffff) ; | |
1230 | #else | |
1231 | qerror("64 bit ret value on your arch?"); | |
1232 | #endif | |
1233 | return get_errno(ret); | |
1234 | } | |
1235 | ||
263466f5 FB |
1236 | void no_swap(void * oldp, int size) |
1237 | { | |
1238 | } | |
1239 | ||
1240 | void sysctl_tswap32s(void * oldp, int size) | |
1241 | { | |
1242 | tswap32s(oldp); | |
1243 | } | |
1244 | ||
1245 | void bswap_oid(uint32_t * oldp, int size) | |
1246 | { | |
1247 | int count = size / sizeof(int); | |
1248 | int i = 0; | |
1249 | do { tswap32s(oldp + i); } while (++i < count); | |
1250 | } | |
1251 | ||
1252 | void sysctl_usrstack(uint32_t * oldp, int size) | |
1253 | { | |
1254 | DPRINTF("sysctl_usrstack: 0x%x\n", *oldp); | |
1255 | tswap32s(oldp); | |
1256 | } | |
1257 | ||
1258 | void sysctl_ncpu(uint32_t * ncpu, int size) | |
1259 | { | |
1260 | *ncpu = 0x1; | |
1261 | DPRINTF("sysctl_ncpu: 0x%x\n", *ncpu); | |
1262 | tswap32s(ncpu); | |
1263 | } | |
1264 | ||
1265 | void sysctl_exec(char * exec, int size) | |
1266 | { | |
1267 | DPRINTF("sysctl_exec: %s\n", exec); | |
1268 | } | |
1269 | ||
1270 | void sysctl_translate(char * exec, int size) | |
1271 | { | |
1272 | DPRINTF("sysctl_translate: %s\n", exec); | |
1273 | } | |
1274 | ||
1275 | struct sysctl_dir { | |
1276 | int num; | |
1277 | const char * name; | |
1278 | void (*swap_func)(void *, int); | |
1279 | struct sysctl_dir *childs; | |
1280 | }; | |
1281 | ||
1282 | #define ENTRYD(num, name, childs) { num, name, NULL, childs } | |
1283 | #define ENTRYE(num, name, func) { num, name, (void (*)(void *, int))func, NULL } | |
1284 | struct sysctl_dir sysctls_unspec[] = { | |
1285 | ENTRYE(3, "oip", bswap_oid), | |
1286 | { 0, NULL, NULL, NULL } | |
1287 | }; | |
1288 | ||
1289 | struct sysctl_dir sysctls_kern[] = { | |
1290 | ENTRYE(KERN_TRANSLATE, "translate", sysctl_translate), /* 44 */ | |
1291 | ENTRYE(KERN_EXEC, "exec", sysctl_exec), /* 45 */ | |
1292 | ENTRYE(KERN_USRSTACK32, "KERN_USRSTACK32", sysctl_usrstack), /* 35 */ | |
1293 | ENTRYE(KERN_SHREG_PRIVATIZABLE, "KERN_SHREG_PRIVATIZABLE", sysctl_tswap32s), /* 54 */ | |
1294 | { 0, NULL, NULL, NULL } | |
1295 | }; | |
1296 | ||
1297 | struct sysctl_dir sysctls_hw[] = { | |
1298 | ENTRYE(HW_NCPU, "ncpud", sysctl_tswap32s), | |
1299 | ENTRYE(104, "104", no_swap), | |
1300 | ENTRYE(105, "105", no_swap), | |
1301 | { 0, NULL, NULL, NULL } | |
1302 | }; | |
1303 | ||
1304 | struct sysctl_dir sysctls[] = { | |
1305 | ENTRYD(CTL_UNSPEC, "unspec", sysctls_unspec), | |
1306 | ENTRYD(CTL_KERN, "kern", sysctls_kern), | |
1307 | ENTRYD(CTL_HW, "hw", sysctls_hw ), | |
1308 | { 0, NULL, NULL, NULL } | |
1309 | }; | |
1310 | ||
1311 | #undef ENTRYE | |
1312 | #undef ENTRYD | |
1313 | ||
1314 | static inline struct sysctl_dir * get_sysctl_entry_for_mib(int mib, struct sysctl_dir * sysctl_elmt) | |
1315 | { | |
1316 | if(!sysctl_elmt) | |
1317 | return NULL; | |
1318 | for(; sysctl_elmt->name != NULL ; sysctl_elmt++) { | |
1319 | if(sysctl_elmt->num == mib) | |
1320 | return sysctl_elmt; | |
1321 | } | |
1322 | return NULL; | |
1323 | } | |
1324 | ||
1325 | static inline long bswap_syctl(int * mib, int count, void *buf, int size) | |
1326 | { | |
1327 | int i; | |
1328 | struct sysctl_dir * sysctl = sysctls; | |
1329 | struct sysctl_dir * ret = NULL; | |
1330 | ||
1331 | for(i = 0; i < count; i++) { | |
1332 | ||
1333 | if(!(ret = sysctl = get_sysctl_entry_for_mib(mib[i], sysctl))) { | |
1334 | gemu_log("bswap_syctl: can't find mib %d\n", mib[i]); | |
1335 | return -ENOTDIR; | |
1336 | } | |
1337 | if(!(sysctl = sysctl->childs)) | |
1338 | break; | |
1339 | } | |
3b46e624 | 1340 | |
263466f5 FB |
1341 | if(ret->childs) |
1342 | qerror("we shouldn't have a directory element\n"); | |
1343 | ||
1344 | ret->swap_func(buf, size); | |
1345 | return 0; | |
1346 | } | |
1347 | ||
1348 | static inline void print_syctl(int * mib, int count) | |
1349 | { | |
1350 | int i; | |
1351 | struct sysctl_dir * sysctl = sysctls; | |
1352 | struct sysctl_dir * ret = NULL; | |
1353 | ||
1354 | for(i = 0; i < count; i++) { | |
1355 | if(!(ret = sysctl = get_sysctl_entry_for_mib(mib[i], sysctl))){ | |
1356 | gemu_log("print_syctl: can't find mib %d\n", mib[i]); | |
1357 | return; | |
1358 | } | |
1359 | DPRINTF("%s.", sysctl->name); | |
1360 | if(!(sysctl = sysctl->childs)) | |
1361 | break; | |
1362 | } | |
1363 | DPRINTF("\n"); | |
1364 | } | |
1365 | ||
1366 | long do___sysctl(int * name, uint32_t namelen, void * oldp, size_t * oldlenp, void * newp, size_t newlen /* ignored */) | |
831b7825 TS |
1367 | { |
1368 | long ret = 0; | |
1369 | int i; | |
1370 | DPRINTF("sysctl(%p, 0x%x, %p, %p, %p, 0x%lx)\n", | |
263466f5 FB |
1371 | name, namelen, oldp, oldlenp, newp, newlen); |
1372 | if(name) { | |
831b7825 | 1373 | i = 0; |
263466f5 FB |
1374 | do { tswap32s( name + i); } while (++i < namelen); |
1375 | print_syctl(name, namelen); | |
1376 | //bswap_syctl(name, namelen, newp, newlen); | |
1377 | tswap32s((uint32_t*)oldlenp); | |
831b7825 | 1378 | } |
3b46e624 | 1379 | |
263466f5 FB |
1380 | if(name) /* Sometimes sysctl is called with no arg1, ignore */ |
1381 | ret = get_errno(sysctl(name, namelen, oldp, oldlenp, newp, newlen)); | |
831b7825 | 1382 | |
7ed40acf | 1383 | #if defined(TARGET_I386) ^ defined(__i386__) || defined(TARGET_PPC) ^ defined(__ppc__) |
263466f5 FB |
1384 | if (!is_error(ret) && bswap_syctl(name, namelen, oldp, *oldlenp) != 0) { |
1385 | return -ENOTDIR; | |
831b7825 | 1386 | } |
7ed40acf TS |
1387 | #endif |
1388 | ||
263466f5 FB |
1389 | if(name) { |
1390 | //bswap_syctl(name, namelen, newp, newlen); | |
1391 | tswap32s((uint32_t*)oldlenp); | |
831b7825 | 1392 | |
263466f5 FB |
1393 | i = 0; |
1394 | do { tswap32s( name + i); } while (++i < namelen); | |
1395 | } | |
831b7825 TS |
1396 | return ret; |
1397 | } | |
1398 | ||
1399 | long do_getattrlist(void * arg1, void * arg2, void * arg3, uint32_t arg4, uint32_t arg5) | |
1400 | { | |
1401 | struct attrlist * attrlist = (void *)arg2; | |
1402 | long ret; | |
1403 | ||
1404 | #if defined(TARGET_I386) ^ defined(__i386__) || defined(TARGET_PPC) ^ defined(__ppc__) | |
263466f5 FB |
1405 | gemu_log("SYS_getdirentriesattr unimplemented\n"); |
1406 | return -ENOTSUP; | |
831b7825 TS |
1407 | #endif |
1408 | /* XXX: don't let the %s stay in there */ | |
1409 | DPRINTF("getattrlist(%s, %p, %p, 0x%x, 0x%x)\n", | |
1410 | (char *)arg1, arg2, arg3, arg4, arg5); | |
1411 | ||
1412 | if(arg2) /* XXX: We should handle that in a copy especially | |
1413 | if the structure is not writable */ | |
1414 | byteswap_attrlist(attrlist); | |
1415 | ||
1416 | ret = get_errno(getattrlist((const char* )arg1, attrlist, (void *)arg3, arg4, arg5)); | |
1417 | ||
1418 | if(!is_error(ret)) | |
1419 | { | |
1420 | byteswap_attrbuf((void *)arg3, attrlist); | |
1421 | byteswap_attrlist(attrlist); | |
1422 | } | |
1423 | return ret; | |
1424 | } | |
1425 | ||
1426 | long do_getdirentriesattr(uint32_t arg1, void * arg2, void * arg3, size_t arg4, void * arg5, void * arg6, void* arg7, uint32_t arg8) | |
1427 | { | |
1428 | DPRINTF("getdirentriesattr(0x%x, %p, %p, 0x%lx, %p, %p, %p, 0x%x)\n", | |
1429 | arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8); | |
1430 | #if defined(TARGET_I386) ^ defined(__i386__) || defined(TARGET_PPC) ^ defined(__ppc__) | |
1431 | qerror("SYS_getdirentriesattr unimplemented\n"); | |
1432 | #endif | |
1433 | ||
1434 | return get_errno(getdirentriesattr( arg1, (struct attrlist * )arg2, (void *)arg3, arg4, | |
1435 | (unsigned long *)arg5, (unsigned long *)arg6, | |
1436 | (unsigned long *)arg7, arg8)); | |
1437 | } | |
1438 | ||
263466f5 FB |
1439 | static inline void bswap_flock(struct flock *f) |
1440 | { | |
1441 | tswap64s(&f->l_start); | |
1442 | tswap64s(&f->l_len); | |
1443 | tswap32s(&f->l_pid); | |
1444 | tswap16s(&f->l_type); | |
1445 | tswap16s(&f->l_whence); | |
1446 | } | |
1447 | ||
1448 | static inline void bswap_fstore(struct fstore *f) | |
1449 | { | |
1450 | tswap32s(&f->fst_flags); | |
1451 | tswap32s(&f->fst_posmode); | |
1452 | tswap64s(&f->fst_offset); | |
1453 | tswap64s(&f->fst_length); | |
1454 | tswap64s(&f->fst_bytesalloc); | |
1455 | } | |
1456 | ||
1457 | static inline void bswap_radvisory(struct radvisory *f) | |
1458 | { | |
1459 | tswap64s(&f->ra_offset); | |
1460 | tswap32s(&f->ra_count); | |
1461 | } | |
1462 | ||
1463 | static inline void bswap_fbootstraptransfer(struct fbootstraptransfer *f) | |
1464 | { | |
1465 | tswap64s(&f->fbt_offset); | |
1466 | tswap32s((uint32_t*)&f->fbt_length); | |
1467 | tswap32s((uint32_t*)&f->fbt_buffer); /* XXX: this is a ptr */ | |
1468 | } | |
1469 | ||
1470 | static inline void bswap_log2phys(struct log2phys *f) | |
1471 | { | |
1472 | tswap32s(&f->l2p_flags); | |
1473 | tswap64s(&f->l2p_contigbytes); | |
1474 | tswap64s(&f->l2p_devoffset); | |
1475 | } | |
1476 | ||
1477 | static inline void bswap_fcntl_arg(int cmd, void * arg) | |
1478 | { | |
1479 | switch(cmd) | |
1480 | { | |
1481 | case F_DUPFD: | |
1482 | case F_GETFD: | |
1483 | case F_SETFD: | |
1484 | case F_GETFL: | |
1485 | case F_SETFL: | |
1486 | case F_GETOWN: | |
1487 | case F_SETOWN: | |
1488 | case F_SETSIZE: | |
1489 | case F_RDAHEAD: | |
1490 | case F_FULLFSYNC: | |
1491 | break; | |
1492 | case F_GETLK: | |
1493 | case F_SETLK: | |
1494 | case F_SETLKW: | |
1495 | bswap_flock(arg); | |
1496 | break; | |
1497 | case F_PREALLOCATE: | |
1498 | bswap_fstore(arg); | |
1499 | break; | |
1500 | case F_RDADVISE: | |
1501 | bswap_radvisory(arg); | |
1502 | break; | |
1503 | case F_READBOOTSTRAP: | |
1504 | case F_WRITEBOOTSTRAP: | |
1505 | bswap_fbootstraptransfer(arg); | |
1506 | break; | |
1507 | case F_LOG2PHYS: | |
1508 | bswap_log2phys(arg); | |
1509 | break; | |
1510 | default: | |
1511 | gemu_log("unknow cmd in fcntl\n"); | |
1512 | } | |
1513 | } | |
1514 | ||
1515 | long do_fcntl(int fd, int cmd, int arg) | |
1516 | { | |
1517 | long ret; | |
1518 | bswap_fcntl_arg(cmd, (void *)arg); | |
1519 | ret = get_errno(fcntl(fd, cmd, arg)); | |
1520 | if(!is_error(ret)) | |
1521 | bswap_fcntl_arg(cmd, (void *)arg); | |
1522 | return ret; | |
1523 | } | |
831b7825 TS |
1524 | |
1525 | long no_syscall(void *cpu_env, int num) | |
1526 | { | |
1527 | /* XXX: We should probably fordward it to the host kernel */ | |
1528 | qerror("no unix syscall %d\n", num); | |
1529 | /* not reached */ | |
1530 | return -1; | |
1531 | } | |
1532 | ||
1533 | long unimpl_unix_syscall(void *cpu_env, int num) | |
1534 | { | |
1535 | if( (num < 0) || (num > SYS_MAXSYSCALL-1) ) | |
1536 | qerror("unix syscall %d is out of unix syscall bounds (0-%d) " , num, SYS_MAXSYSCALL-1); | |
1537 | ||
1538 | gemu_log("qemu: Unsupported unix syscall %s %d\n", unix_syscall_table[num].name , num); | |
1539 | gdb_handlesig (cpu_env, SIGTRAP); | |
1540 | exit(-1); | |
1541 | } | |
1542 | ||
1543 | long do_unix_syscall(void *cpu_env, int num) | |
1544 | { | |
1545 | long ret = 0; | |
1546 | ||
1547 | DPRINTF("unix syscall %d: " , num); | |
1548 | ||
1549 | if( (num < 0) || (num > SYS_MAXSYSCALL-1) ) | |
1550 | qerror("unix syscall %d is out of unix syscall bounds (0-%d) " , num, SYS_MAXSYSCALL-1); | |
1551 | ||
1552 | DPRINTF("%s [%s]", unix_syscall_table[num].name, unix_syscall_table[num].call_type & CALL_DIRECT ? "direct" : "indirect" ); | |
1553 | ret = unix_syscall_table[num].function(cpu_env, num); | |
1554 | ||
1555 | if(!(unix_syscall_table[num].call_type & CALL_NOERRNO)) | |
1556 | ret = get_errno(ret); | |
1557 | ||
1558 | DPRINTF("[returned 0x%x(%d)]\n", (int)ret, (int)ret); | |
1559 | return ret; | |
1560 | } | |
1561 | ||
1562 | /* ------------------------------------------------------------ | |
1563 | syscall_init | |
1564 | */ | |
1565 | void syscall_init(void) | |
1566 | { | |
1567 | /* Nothing yet */ | |
1568 | } |