Merge remote-tracking branch 'kevin/tags/for-upstream' into block
[qemu.git] / linux-user / strace.c
blob33f4a506a21fd0399a95796a8f846c3039349608
1 #include "qemu/osdep.h"
2 #include <sys/ipc.h>
3 #include <sys/msg.h>
4 #include <sys/sem.h>
5 #include <sys/shm.h>
6 #include <sys/select.h>
7 #include <sys/mount.h>
8 #include <arpa/inet.h>
9 #include <netinet/tcp.h>
10 #include <linux/if_packet.h>
11 #include <sched.h>
12 #include "qemu.h"
14 int do_strace=0;
16 struct syscallname {
17 int nr;
18 const char *name;
19 const char *format;
20 void (*call)(const struct syscallname *,
21 abi_long, abi_long, abi_long,
22 abi_long, abi_long, abi_long);
23 void (*result)(const struct syscallname *, abi_long);
26 #ifdef __GNUC__
28 * It is possible that target doesn't have syscall that uses
29 * following flags but we don't want the compiler to warn
30 * us about them being unused. Same applies to utility print
31 * functions. It is ok to keep them while not used.
33 #define UNUSED __attribute__ ((unused))
34 #else
35 #define UNUSED
36 #endif
39 * Structure used to translate flag values into strings. This is
40 * similar that is in the actual strace tool.
42 struct flags {
43 abi_long f_value; /* flag */
44 const char *f_string; /* stringified flag */
47 /* common flags for all architectures */
48 #define FLAG_GENERIC(name) { name, #name }
49 /* target specific flags (syscall_defs.h has TARGET_<flag>) */
50 #define FLAG_TARGET(name) { TARGET_ ## name, #name }
51 /* end of flags array */
52 #define FLAG_END { 0, NULL }
54 UNUSED static const char *get_comma(int);
55 UNUSED static void print_pointer(abi_long, int);
56 UNUSED static void print_flags(const struct flags *, abi_long, int);
57 UNUSED static void print_at_dirfd(abi_long, int);
58 UNUSED static void print_file_mode(abi_long, int);
59 UNUSED static void print_open_flags(abi_long, int);
60 UNUSED static void print_syscall_prologue(const struct syscallname *);
61 UNUSED static void print_syscall_epilogue(const struct syscallname *);
62 UNUSED static void print_string(abi_long, int);
63 UNUSED static void print_buf(abi_long addr, abi_long len, int last);
64 UNUSED static void print_raw_param(const char *, abi_long, int);
65 UNUSED static void print_timeval(abi_ulong, int);
66 UNUSED static void print_number(abi_long, int);
67 UNUSED static void print_signal(abi_ulong, int);
68 UNUSED static void print_sockaddr(abi_ulong addr, abi_long addrlen);
69 UNUSED static void print_socket_domain(int domain);
70 UNUSED static void print_socket_type(int type);
71 UNUSED static void print_socket_protocol(int domain, int type, int protocol);
74 * Utility functions
76 static void
77 print_ipc_cmd(int cmd)
79 #define output_cmd(val) \
80 if( cmd == val ) { \
81 gemu_log(#val); \
82 return; \
85 cmd &= 0xff;
87 /* General IPC commands */
88 output_cmd( IPC_RMID );
89 output_cmd( IPC_SET );
90 output_cmd( IPC_STAT );
91 output_cmd( IPC_INFO );
92 /* msgctl() commands */
93 output_cmd( MSG_STAT );
94 output_cmd( MSG_INFO );
95 /* shmctl() commands */
96 output_cmd( SHM_LOCK );
97 output_cmd( SHM_UNLOCK );
98 output_cmd( SHM_STAT );
99 output_cmd( SHM_INFO );
100 /* semctl() commands */
101 output_cmd( GETPID );
102 output_cmd( GETVAL );
103 output_cmd( GETALL );
104 output_cmd( GETNCNT );
105 output_cmd( GETZCNT );
106 output_cmd( SETVAL );
107 output_cmd( SETALL );
108 output_cmd( SEM_STAT );
109 output_cmd( SEM_INFO );
110 output_cmd( IPC_RMID );
111 output_cmd( IPC_RMID );
112 output_cmd( IPC_RMID );
113 output_cmd( IPC_RMID );
114 output_cmd( IPC_RMID );
115 output_cmd( IPC_RMID );
116 output_cmd( IPC_RMID );
117 output_cmd( IPC_RMID );
118 output_cmd( IPC_RMID );
120 /* Some value we don't recognize */
121 gemu_log("%d",cmd);
124 static void
125 print_signal(abi_ulong arg, int last)
127 const char *signal_name = NULL;
128 switch(arg) {
129 case TARGET_SIGHUP: signal_name = "SIGHUP"; break;
130 case TARGET_SIGINT: signal_name = "SIGINT"; break;
131 case TARGET_SIGQUIT: signal_name = "SIGQUIT"; break;
132 case TARGET_SIGILL: signal_name = "SIGILL"; break;
133 case TARGET_SIGABRT: signal_name = "SIGABRT"; break;
134 case TARGET_SIGFPE: signal_name = "SIGFPE"; break;
135 case TARGET_SIGKILL: signal_name = "SIGKILL"; break;
136 case TARGET_SIGSEGV: signal_name = "SIGSEGV"; break;
137 case TARGET_SIGPIPE: signal_name = "SIGPIPE"; break;
138 case TARGET_SIGALRM: signal_name = "SIGALRM"; break;
139 case TARGET_SIGTERM: signal_name = "SIGTERM"; break;
140 case TARGET_SIGUSR1: signal_name = "SIGUSR1"; break;
141 case TARGET_SIGUSR2: signal_name = "SIGUSR2"; break;
142 case TARGET_SIGCHLD: signal_name = "SIGCHLD"; break;
143 case TARGET_SIGCONT: signal_name = "SIGCONT"; break;
144 case TARGET_SIGSTOP: signal_name = "SIGSTOP"; break;
145 case TARGET_SIGTTIN: signal_name = "SIGTTIN"; break;
146 case TARGET_SIGTTOU: signal_name = "SIGTTOU"; break;
148 if (signal_name == NULL) {
149 print_raw_param("%ld", arg, last);
150 return;
152 gemu_log("%s%s", signal_name, get_comma(last));
155 static void print_si_code(int arg)
157 const char *codename = NULL;
159 switch (arg) {
160 case SI_USER:
161 codename = "SI_USER";
162 break;
163 case SI_KERNEL:
164 codename = "SI_KERNEL";
165 break;
166 case SI_QUEUE:
167 codename = "SI_QUEUE";
168 break;
169 case SI_TIMER:
170 codename = "SI_TIMER";
171 break;
172 case SI_MESGQ:
173 codename = "SI_MESGQ";
174 break;
175 case SI_ASYNCIO:
176 codename = "SI_ASYNCIO";
177 break;
178 case SI_SIGIO:
179 codename = "SI_SIGIO";
180 break;
181 case SI_TKILL:
182 codename = "SI_TKILL";
183 break;
184 default:
185 gemu_log("%d", arg);
186 return;
188 gemu_log("%s", codename);
191 static void get_target_siginfo(target_siginfo_t *tinfo,
192 const target_siginfo_t *info)
194 abi_ulong sival_ptr;
196 int sig;
197 int si_errno;
198 int si_code;
199 int si_type;
201 __get_user(sig, &info->si_signo);
202 __get_user(si_errno, &tinfo->si_errno);
203 __get_user(si_code, &info->si_code);
205 tinfo->si_signo = sig;
206 tinfo->si_errno = si_errno;
207 tinfo->si_code = si_code;
209 /* Ensure we don't leak random junk to the guest later */
210 memset(tinfo->_sifields._pad, 0, sizeof(tinfo->_sifields._pad));
212 /* This is awkward, because we have to use a combination of
213 * the si_code and si_signo to figure out which of the union's
214 * members are valid. (Within the host kernel it is always possible
215 * to tell, but the kernel carefully avoids giving userspace the
216 * high 16 bits of si_code, so we don't have the information to
217 * do this the easy way...) We therefore make our best guess,
218 * bearing in mind that a guest can spoof most of the si_codes
219 * via rt_sigqueueinfo() if it likes.
221 * Once we have made our guess, we record it in the top 16 bits of
222 * the si_code, so that print_siginfo() later can use it.
223 * print_siginfo() will strip these top bits out before printing
224 * the si_code.
227 switch (si_code) {
228 case SI_USER:
229 case SI_TKILL:
230 case SI_KERNEL:
231 /* Sent via kill(), tkill() or tgkill(), or direct from the kernel.
232 * These are the only unspoofable si_code values.
234 __get_user(tinfo->_sifields._kill._pid, &info->_sifields._kill._pid);
235 __get_user(tinfo->_sifields._kill._uid, &info->_sifields._kill._uid);
236 si_type = QEMU_SI_KILL;
237 break;
238 default:
239 /* Everything else is spoofable. Make best guess based on signal */
240 switch (sig) {
241 case TARGET_SIGCHLD:
242 __get_user(tinfo->_sifields._sigchld._pid,
243 &info->_sifields._sigchld._pid);
244 __get_user(tinfo->_sifields._sigchld._uid,
245 &info->_sifields._sigchld._uid);
246 __get_user(tinfo->_sifields._sigchld._status,
247 &info->_sifields._sigchld._status);
248 __get_user(tinfo->_sifields._sigchld._utime,
249 &info->_sifields._sigchld._utime);
250 __get_user(tinfo->_sifields._sigchld._stime,
251 &info->_sifields._sigchld._stime);
252 si_type = QEMU_SI_CHLD;
253 break;
254 case TARGET_SIGIO:
255 __get_user(tinfo->_sifields._sigpoll._band,
256 &info->_sifields._sigpoll._band);
257 __get_user(tinfo->_sifields._sigpoll._fd,
258 &info->_sifields._sigpoll._fd);
259 si_type = QEMU_SI_POLL;
260 break;
261 default:
262 /* Assume a sigqueue()/mq_notify()/rt_sigqueueinfo() source. */
263 __get_user(tinfo->_sifields._rt._pid, &info->_sifields._rt._pid);
264 __get_user(tinfo->_sifields._rt._uid, &info->_sifields._rt._uid);
265 /* XXX: potential problem if 64 bit */
266 __get_user(sival_ptr, &info->_sifields._rt._sigval.sival_ptr);
267 tinfo->_sifields._rt._sigval.sival_ptr = sival_ptr;
269 si_type = QEMU_SI_RT;
270 break;
272 break;
275 tinfo->si_code = deposit32(si_code, 16, 16, si_type);
278 static void print_siginfo(const target_siginfo_t *tinfo)
280 /* Print a target_siginfo_t in the format desired for printing
281 * signals being taken. We assume the target_siginfo_t is in the
282 * internal form where the top 16 bits of si_code indicate which
283 * part of the union is valid, rather than in the guest-visible
284 * form where the bottom 16 bits are sign-extended into the top 16.
286 int si_type = extract32(tinfo->si_code, 16, 16);
287 int si_code = sextract32(tinfo->si_code, 0, 16);
289 gemu_log("{si_signo=");
290 print_signal(tinfo->si_signo, 1);
291 gemu_log(", si_code=");
292 print_si_code(si_code);
294 switch (si_type) {
295 case QEMU_SI_KILL:
296 gemu_log(", si_pid=%u, si_uid=%u",
297 (unsigned int)tinfo->_sifields._kill._pid,
298 (unsigned int)tinfo->_sifields._kill._uid);
299 break;
300 case QEMU_SI_TIMER:
301 gemu_log(", si_timer1=%u, si_timer2=%u",
302 tinfo->_sifields._timer._timer1,
303 tinfo->_sifields._timer._timer2);
304 break;
305 case QEMU_SI_POLL:
306 gemu_log(", si_band=%d, si_fd=%d",
307 tinfo->_sifields._sigpoll._band,
308 tinfo->_sifields._sigpoll._fd);
309 break;
310 case QEMU_SI_FAULT:
311 gemu_log(", si_addr=");
312 print_pointer(tinfo->_sifields._sigfault._addr, 1);
313 break;
314 case QEMU_SI_CHLD:
315 gemu_log(", si_pid=%u, si_uid=%u, si_status=%d"
316 ", si_utime=" TARGET_ABI_FMT_ld
317 ", si_stime=" TARGET_ABI_FMT_ld,
318 (unsigned int)(tinfo->_sifields._sigchld._pid),
319 (unsigned int)(tinfo->_sifields._sigchld._uid),
320 tinfo->_sifields._sigchld._status,
321 tinfo->_sifields._sigchld._utime,
322 tinfo->_sifields._sigchld._stime);
323 break;
324 case QEMU_SI_RT:
325 gemu_log(", si_pid=%u, si_uid=%u, si_sigval=" TARGET_ABI_FMT_ld,
326 (unsigned int)tinfo->_sifields._rt._pid,
327 (unsigned int)tinfo->_sifields._rt._uid,
328 tinfo->_sifields._rt._sigval.sival_ptr);
329 break;
330 default:
331 g_assert_not_reached();
333 gemu_log("}");
336 static void
337 print_sockaddr(abi_ulong addr, abi_long addrlen)
339 struct target_sockaddr *sa;
340 int i;
341 int sa_family;
343 sa = lock_user(VERIFY_READ, addr, addrlen, 1);
344 if (sa) {
345 sa_family = tswap16(sa->sa_family);
346 switch (sa_family) {
347 case AF_UNIX: {
348 struct target_sockaddr_un *un = (struct target_sockaddr_un *)sa;
349 int i;
350 gemu_log("{sun_family=AF_UNIX,sun_path=\"");
351 for (i = 0; i < addrlen -
352 offsetof(struct target_sockaddr_un, sun_path) &&
353 un->sun_path[i]; i++) {
354 gemu_log("%c", un->sun_path[i]);
356 gemu_log("\"}");
357 break;
359 case AF_INET: {
360 struct target_sockaddr_in *in = (struct target_sockaddr_in *)sa;
361 uint8_t *c = (uint8_t *)&in->sin_addr.s_addr;
362 gemu_log("{sin_family=AF_INET,sin_port=htons(%d),",
363 ntohs(in->sin_port));
364 gemu_log("sin_addr=inet_addr(\"%d.%d.%d.%d\")",
365 c[0], c[1], c[2], c[3]);
366 gemu_log("}");
367 break;
369 case AF_PACKET: {
370 struct target_sockaddr_ll *ll = (struct target_sockaddr_ll *)sa;
371 uint8_t *c = (uint8_t *)&ll->sll_addr;
372 gemu_log("{sll_family=AF_PACKET,"
373 "sll_protocol=htons(0x%04x),if%d,pkttype=",
374 ntohs(ll->sll_protocol), ll->sll_ifindex);
375 switch (ll->sll_pkttype) {
376 case PACKET_HOST:
377 gemu_log("PACKET_HOST");
378 break;
379 case PACKET_BROADCAST:
380 gemu_log("PACKET_BROADCAST");
381 break;
382 case PACKET_MULTICAST:
383 gemu_log("PACKET_MULTICAST");
384 break;
385 case PACKET_OTHERHOST:
386 gemu_log("PACKET_OTHERHOST");
387 break;
388 case PACKET_OUTGOING:
389 gemu_log("PACKET_OUTGOING");
390 break;
391 default:
392 gemu_log("%d", ll->sll_pkttype);
393 break;
395 gemu_log(",sll_addr=%02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x",
396 c[0], c[1], c[2], c[3], c[4], c[5], c[6], c[7]);
397 gemu_log("}");
398 break;
400 default:
401 gemu_log("{sa_family=%d, sa_data={", sa->sa_family);
402 for (i = 0; i < 13; i++) {
403 gemu_log("%02x, ", sa->sa_data[i]);
405 gemu_log("%02x}", sa->sa_data[i]);
406 gemu_log("}");
407 break;
409 unlock_user(sa, addr, 0);
410 } else {
411 print_raw_param("0x"TARGET_ABI_FMT_lx, addr, 0);
413 gemu_log(", "TARGET_ABI_FMT_ld, addrlen);
416 static void
417 print_socket_domain(int domain)
419 switch (domain) {
420 case PF_UNIX:
421 gemu_log("PF_UNIX");
422 break;
423 case PF_INET:
424 gemu_log("PF_INET");
425 break;
426 case PF_PACKET:
427 gemu_log("PF_PACKET");
428 break;
429 default:
430 gemu_log("%d", domain);
431 break;
435 static void
436 print_socket_type(int type)
438 switch (type) {
439 case TARGET_SOCK_DGRAM:
440 gemu_log("SOCK_DGRAM");
441 break;
442 case TARGET_SOCK_STREAM:
443 gemu_log("SOCK_STREAM");
444 break;
445 case TARGET_SOCK_RAW:
446 gemu_log("SOCK_RAW");
447 break;
448 case TARGET_SOCK_RDM:
449 gemu_log("SOCK_RDM");
450 break;
451 case TARGET_SOCK_SEQPACKET:
452 gemu_log("SOCK_SEQPACKET");
453 break;
454 case TARGET_SOCK_PACKET:
455 gemu_log("SOCK_PACKET");
456 break;
460 static void
461 print_socket_protocol(int domain, int type, int protocol)
463 if (domain == AF_PACKET ||
464 (domain == AF_INET && type == TARGET_SOCK_PACKET)) {
465 switch (protocol) {
466 case 0x0003:
467 gemu_log("ETH_P_ALL");
468 break;
469 default:
470 gemu_log("%d", protocol);
472 return;
475 switch (protocol) {
476 case IPPROTO_IP:
477 gemu_log("IPPROTO_IP");
478 break;
479 case IPPROTO_TCP:
480 gemu_log("IPPROTO_TCP");
481 break;
482 case IPPROTO_UDP:
483 gemu_log("IPPROTO_UDP");
484 break;
485 case IPPROTO_RAW:
486 gemu_log("IPPROTO_RAW");
487 break;
488 default:
489 gemu_log("%d", protocol);
490 break;
495 #ifdef TARGET_NR__newselect
496 static void
497 print_fdset(int n, abi_ulong target_fds_addr)
499 int i;
501 gemu_log("[");
502 if( target_fds_addr ) {
503 abi_long *target_fds;
505 target_fds = lock_user(VERIFY_READ,
506 target_fds_addr,
507 sizeof(*target_fds)*(n / TARGET_ABI_BITS + 1),
510 if (!target_fds)
511 return;
513 for (i=n; i>=0; i--) {
514 if ((tswapal(target_fds[i / TARGET_ABI_BITS]) >> (i & (TARGET_ABI_BITS - 1))) & 1)
515 gemu_log("%d,", i );
517 unlock_user(target_fds, target_fds_addr, 0);
519 gemu_log("]");
521 #endif
523 #ifdef TARGET_NR_clock_adjtime
524 /* IDs of the various system clocks */
525 #define TARGET_CLOCK_REALTIME 0
526 #define TARGET_CLOCK_MONOTONIC 1
527 #define TARGET_CLOCK_PROCESS_CPUTIME_ID 2
528 #define TARGET_CLOCK_THREAD_CPUTIME_ID 3
529 #define TARGET_CLOCK_MONOTONIC_RAW 4
530 #define TARGET_CLOCK_REALTIME_COARSE 5
531 #define TARGET_CLOCK_MONOTONIC_COARSE 6
532 #define TARGET_CLOCK_BOOTTIME 7
533 #define TARGET_CLOCK_REALTIME_ALARM 8
534 #define TARGET_CLOCK_BOOTTIME_ALARM 9
535 #define TARGET_CLOCK_SGI_CYCLE 10
536 #define TARGET_CLOCK_TAI 11
538 static void
539 print_clockid(int clockid, int last)
541 switch (clockid) {
542 case TARGET_CLOCK_REALTIME:
543 gemu_log("CLOCK_REALTIME");
544 break;
545 case TARGET_CLOCK_MONOTONIC:
546 gemu_log("CLOCK_MONOTONIC");
547 break;
548 case TARGET_CLOCK_PROCESS_CPUTIME_ID:
549 gemu_log("CLOCK_PROCESS_CPUTIME_ID");
550 break;
551 case TARGET_CLOCK_THREAD_CPUTIME_ID:
552 gemu_log("CLOCK_THREAD_CPUTIME_ID");
553 break;
554 case TARGET_CLOCK_MONOTONIC_RAW:
555 gemu_log("CLOCK_MONOTONIC_RAW");
556 break;
557 case TARGET_CLOCK_REALTIME_COARSE:
558 gemu_log("CLOCK_REALTIME_COARSE");
559 break;
560 case TARGET_CLOCK_MONOTONIC_COARSE:
561 gemu_log("CLOCK_MONOTONIC_COARSE");
562 break;
563 case TARGET_CLOCK_BOOTTIME:
564 gemu_log("CLOCK_BOOTTIME");
565 break;
566 case TARGET_CLOCK_REALTIME_ALARM:
567 gemu_log("CLOCK_REALTIME_ALARM");
568 break;
569 case TARGET_CLOCK_BOOTTIME_ALARM:
570 gemu_log("CLOCK_BOOTTIME_ALARM");
571 break;
572 case TARGET_CLOCK_SGI_CYCLE:
573 gemu_log("CLOCK_SGI_CYCLE");
574 break;
575 case TARGET_CLOCK_TAI:
576 gemu_log("CLOCK_TAI");
577 break;
578 default:
579 gemu_log("%d", clockid);
580 break;
582 gemu_log("%s", get_comma(last));
584 #endif
587 * Sysycall specific output functions
590 /* select */
591 #ifdef TARGET_NR__newselect
592 static long newselect_arg1 = 0;
593 static long newselect_arg2 = 0;
594 static long newselect_arg3 = 0;
595 static long newselect_arg4 = 0;
596 static long newselect_arg5 = 0;
598 static void
599 print_newselect(const struct syscallname *name,
600 abi_long arg1, abi_long arg2, abi_long arg3,
601 abi_long arg4, abi_long arg5, abi_long arg6)
603 gemu_log("%s(" TARGET_ABI_FMT_ld ",", name->name, arg1);
604 print_fdset(arg1, arg2);
605 gemu_log(",");
606 print_fdset(arg1, arg3);
607 gemu_log(",");
608 print_fdset(arg1, arg4);
609 gemu_log(",");
610 print_timeval(arg5, 1);
611 gemu_log(")");
613 /* save for use in the return output function below */
614 newselect_arg1=arg1;
615 newselect_arg2=arg2;
616 newselect_arg3=arg3;
617 newselect_arg4=arg4;
618 newselect_arg5=arg5;
620 #endif
622 #ifdef TARGET_NR_semctl
623 static void
624 print_semctl(const struct syscallname *name,
625 abi_long arg1, abi_long arg2, abi_long arg3,
626 abi_long arg4, abi_long arg5, abi_long arg6)
628 gemu_log("%s(" TARGET_ABI_FMT_ld "," TARGET_ABI_FMT_ld ",", name->name, arg1, arg2);
629 print_ipc_cmd(arg3);
630 gemu_log(",0x" TARGET_ABI_FMT_lx ")", arg4);
632 #endif
634 static void
635 print_execve(const struct syscallname *name,
636 abi_long arg1, abi_long arg2, abi_long arg3,
637 abi_long arg4, abi_long arg5, abi_long arg6)
639 abi_ulong arg_ptr_addr;
640 char *s;
642 if (!(s = lock_user_string(arg1)))
643 return;
644 gemu_log("%s(\"%s\",{", name->name, s);
645 unlock_user(s, arg1, 0);
647 for (arg_ptr_addr = arg2; ; arg_ptr_addr += sizeof(abi_ulong)) {
648 abi_ulong *arg_ptr, arg_addr;
650 arg_ptr = lock_user(VERIFY_READ, arg_ptr_addr, sizeof(abi_ulong), 1);
651 if (!arg_ptr)
652 return;
653 arg_addr = tswapal(*arg_ptr);
654 unlock_user(arg_ptr, arg_ptr_addr, 0);
655 if (!arg_addr)
656 break;
657 if ((s = lock_user_string(arg_addr))) {
658 gemu_log("\"%s\",", s);
659 unlock_user(s, arg_addr, 0);
663 gemu_log("NULL})");
666 #ifdef TARGET_NR_ipc
667 static void
668 print_ipc(const struct syscallname *name,
669 abi_long arg1, abi_long arg2, abi_long arg3,
670 abi_long arg4, abi_long arg5, abi_long arg6)
672 switch(arg1) {
673 case IPCOP_semctl:
674 gemu_log("semctl(" TARGET_ABI_FMT_ld "," TARGET_ABI_FMT_ld ",", arg1, arg2);
675 print_ipc_cmd(arg3);
676 gemu_log(",0x" TARGET_ABI_FMT_lx ")", arg4);
677 break;
678 default:
679 gemu_log("%s(" TARGET_ABI_FMT_ld "," TARGET_ABI_FMT_ld "," TARGET_ABI_FMT_ld "," TARGET_ABI_FMT_ld ")",
680 name->name, arg1, arg2, arg3, arg4);
683 #endif
686 * Variants for the return value output function
689 static void
690 print_syscall_ret_addr(const struct syscallname *name, abi_long ret)
692 const char *errstr = NULL;
694 if (ret < 0) {
695 errstr = target_strerror(-ret);
697 if (errstr) {
698 gemu_log(" = -1 errno=%d (%s)\n", (int)-ret, errstr);
699 } else {
700 gemu_log(" = 0x" TARGET_ABI_FMT_lx "\n", ret);
704 #if 0 /* currently unused */
705 static void
706 print_syscall_ret_raw(struct syscallname *name, abi_long ret)
708 gemu_log(" = 0x" TARGET_ABI_FMT_lx "\n", ret);
710 #endif
712 #ifdef TARGET_NR__newselect
713 static void
714 print_syscall_ret_newselect(const struct syscallname *name, abi_long ret)
716 gemu_log(" = 0x" TARGET_ABI_FMT_lx " (", ret);
717 print_fdset(newselect_arg1,newselect_arg2);
718 gemu_log(",");
719 print_fdset(newselect_arg1,newselect_arg3);
720 gemu_log(",");
721 print_fdset(newselect_arg1,newselect_arg4);
722 gemu_log(",");
723 print_timeval(newselect_arg5, 1);
724 gemu_log(")\n");
726 #endif
728 /* special meanings of adjtimex()' non-negative return values */
729 #define TARGET_TIME_OK 0 /* clock synchronized, no leap second */
730 #define TARGET_TIME_INS 1 /* insert leap second */
731 #define TARGET_TIME_DEL 2 /* delete leap second */
732 #define TARGET_TIME_OOP 3 /* leap second in progress */
733 #define TARGET_TIME_WAIT 4 /* leap second has occurred */
734 #define TARGET_TIME_ERROR 5 /* clock not synchronized */
735 static void
736 print_syscall_ret_adjtimex(const struct syscallname *name, abi_long ret)
738 const char *errstr = NULL;
740 gemu_log(" = ");
741 if (ret < 0) {
742 gemu_log("-1 errno=%d", errno);
743 errstr = target_strerror(-ret);
744 if (errstr) {
745 gemu_log(" (%s)", errstr);
747 } else {
748 gemu_log(TARGET_ABI_FMT_ld, ret);
749 switch (ret) {
750 case TARGET_TIME_OK:
751 gemu_log(" TIME_OK (clock synchronized, no leap second)");
752 break;
753 case TARGET_TIME_INS:
754 gemu_log(" TIME_INS (insert leap second)");
755 break;
756 case TARGET_TIME_DEL:
757 gemu_log(" TIME_DEL (delete leap second)");
758 break;
759 case TARGET_TIME_OOP:
760 gemu_log(" TIME_OOP (leap second in progress)");
761 break;
762 case TARGET_TIME_WAIT:
763 gemu_log(" TIME_WAIT (leap second has occurred)");
764 break;
765 case TARGET_TIME_ERROR:
766 gemu_log(" TIME_ERROR (clock not synchronized)");
767 break;
771 gemu_log("\n");
774 UNUSED static struct flags access_flags[] = {
775 FLAG_GENERIC(F_OK),
776 FLAG_GENERIC(R_OK),
777 FLAG_GENERIC(W_OK),
778 FLAG_GENERIC(X_OK),
779 FLAG_END,
782 UNUSED static struct flags at_file_flags[] = {
783 #ifdef AT_EACCESS
784 FLAG_GENERIC(AT_EACCESS),
785 #endif
786 #ifdef AT_SYMLINK_NOFOLLOW
787 FLAG_GENERIC(AT_SYMLINK_NOFOLLOW),
788 #endif
789 FLAG_END,
792 UNUSED static struct flags unlinkat_flags[] = {
793 #ifdef AT_REMOVEDIR
794 FLAG_GENERIC(AT_REMOVEDIR),
795 #endif
796 FLAG_END,
799 UNUSED static struct flags mode_flags[] = {
800 FLAG_GENERIC(S_IFSOCK),
801 FLAG_GENERIC(S_IFLNK),
802 FLAG_GENERIC(S_IFREG),
803 FLAG_GENERIC(S_IFBLK),
804 FLAG_GENERIC(S_IFDIR),
805 FLAG_GENERIC(S_IFCHR),
806 FLAG_GENERIC(S_IFIFO),
807 FLAG_END,
810 UNUSED static struct flags open_access_flags[] = {
811 FLAG_TARGET(O_RDONLY),
812 FLAG_TARGET(O_WRONLY),
813 FLAG_TARGET(O_RDWR),
814 FLAG_END,
817 UNUSED static struct flags open_flags[] = {
818 FLAG_TARGET(O_APPEND),
819 FLAG_TARGET(O_CREAT),
820 FLAG_TARGET(O_DIRECTORY),
821 FLAG_TARGET(O_EXCL),
822 FLAG_TARGET(O_LARGEFILE),
823 FLAG_TARGET(O_NOCTTY),
824 FLAG_TARGET(O_NOFOLLOW),
825 FLAG_TARGET(O_NONBLOCK), /* also O_NDELAY */
826 FLAG_TARGET(O_DSYNC),
827 FLAG_TARGET(__O_SYNC),
828 FLAG_TARGET(O_TRUNC),
829 #ifdef O_DIRECT
830 FLAG_TARGET(O_DIRECT),
831 #endif
832 #ifdef O_NOATIME
833 FLAG_TARGET(O_NOATIME),
834 #endif
835 #ifdef O_CLOEXEC
836 FLAG_TARGET(O_CLOEXEC),
837 #endif
838 #ifdef O_PATH
839 FLAG_TARGET(O_PATH),
840 #endif
841 #ifdef O_TMPFILE
842 FLAG_TARGET(O_TMPFILE),
843 FLAG_TARGET(__O_TMPFILE),
844 #endif
845 FLAG_END,
848 UNUSED static struct flags mount_flags[] = {
849 #ifdef MS_BIND
850 FLAG_GENERIC(MS_BIND),
851 #endif
852 #ifdef MS_DIRSYNC
853 FLAG_GENERIC(MS_DIRSYNC),
854 #endif
855 FLAG_GENERIC(MS_MANDLOCK),
856 #ifdef MS_MOVE
857 FLAG_GENERIC(MS_MOVE),
858 #endif
859 FLAG_GENERIC(MS_NOATIME),
860 FLAG_GENERIC(MS_NODEV),
861 FLAG_GENERIC(MS_NODIRATIME),
862 FLAG_GENERIC(MS_NOEXEC),
863 FLAG_GENERIC(MS_NOSUID),
864 FLAG_GENERIC(MS_RDONLY),
865 #ifdef MS_RELATIME
866 FLAG_GENERIC(MS_RELATIME),
867 #endif
868 FLAG_GENERIC(MS_REMOUNT),
869 FLAG_GENERIC(MS_SYNCHRONOUS),
870 FLAG_END,
873 UNUSED static struct flags umount2_flags[] = {
874 #ifdef MNT_FORCE
875 FLAG_GENERIC(MNT_FORCE),
876 #endif
877 #ifdef MNT_DETACH
878 FLAG_GENERIC(MNT_DETACH),
879 #endif
880 #ifdef MNT_EXPIRE
881 FLAG_GENERIC(MNT_EXPIRE),
882 #endif
883 FLAG_END,
886 UNUSED static struct flags mmap_prot_flags[] = {
887 FLAG_GENERIC(PROT_NONE),
888 FLAG_GENERIC(PROT_EXEC),
889 FLAG_GENERIC(PROT_READ),
890 FLAG_GENERIC(PROT_WRITE),
891 FLAG_TARGET(PROT_SEM),
892 FLAG_GENERIC(PROT_GROWSDOWN),
893 FLAG_GENERIC(PROT_GROWSUP),
894 FLAG_END,
897 UNUSED static struct flags mmap_flags[] = {
898 FLAG_TARGET(MAP_SHARED),
899 FLAG_TARGET(MAP_PRIVATE),
900 FLAG_TARGET(MAP_ANONYMOUS),
901 FLAG_TARGET(MAP_DENYWRITE),
902 FLAG_TARGET(MAP_FIXED),
903 FLAG_TARGET(MAP_GROWSDOWN),
904 FLAG_TARGET(MAP_EXECUTABLE),
905 #ifdef MAP_LOCKED
906 FLAG_TARGET(MAP_LOCKED),
907 #endif
908 #ifdef MAP_NONBLOCK
909 FLAG_TARGET(MAP_NONBLOCK),
910 #endif
911 FLAG_TARGET(MAP_NORESERVE),
912 #ifdef MAP_POPULATE
913 FLAG_TARGET(MAP_POPULATE),
914 #endif
915 #ifdef TARGET_MAP_UNINITIALIZED
916 FLAG_TARGET(MAP_UNINITIALIZED),
917 #endif
918 FLAG_END,
921 UNUSED static struct flags clone_flags[] = {
922 FLAG_GENERIC(CLONE_VM),
923 FLAG_GENERIC(CLONE_FS),
924 FLAG_GENERIC(CLONE_FILES),
925 FLAG_GENERIC(CLONE_SIGHAND),
926 FLAG_GENERIC(CLONE_PTRACE),
927 FLAG_GENERIC(CLONE_VFORK),
928 FLAG_GENERIC(CLONE_PARENT),
929 FLAG_GENERIC(CLONE_THREAD),
930 FLAG_GENERIC(CLONE_NEWNS),
931 FLAG_GENERIC(CLONE_SYSVSEM),
932 FLAG_GENERIC(CLONE_SETTLS),
933 FLAG_GENERIC(CLONE_PARENT_SETTID),
934 FLAG_GENERIC(CLONE_CHILD_CLEARTID),
935 FLAG_GENERIC(CLONE_DETACHED),
936 FLAG_GENERIC(CLONE_UNTRACED),
937 FLAG_GENERIC(CLONE_CHILD_SETTID),
938 #if defined(CLONE_NEWUTS)
939 FLAG_GENERIC(CLONE_NEWUTS),
940 #endif
941 #if defined(CLONE_NEWIPC)
942 FLAG_GENERIC(CLONE_NEWIPC),
943 #endif
944 #if defined(CLONE_NEWUSER)
945 FLAG_GENERIC(CLONE_NEWUSER),
946 #endif
947 #if defined(CLONE_NEWPID)
948 FLAG_GENERIC(CLONE_NEWPID),
949 #endif
950 #if defined(CLONE_NEWNET)
951 FLAG_GENERIC(CLONE_NEWNET),
952 #endif
953 #if defined(CLONE_IO)
954 FLAG_GENERIC(CLONE_IO),
955 #endif
956 FLAG_END,
959 UNUSED static struct flags msg_flags[] = {
960 /* send */
961 FLAG_GENERIC(MSG_CONFIRM),
962 FLAG_GENERIC(MSG_DONTROUTE),
963 FLAG_GENERIC(MSG_DONTWAIT),
964 FLAG_GENERIC(MSG_EOR),
965 FLAG_GENERIC(MSG_MORE),
966 FLAG_GENERIC(MSG_NOSIGNAL),
967 FLAG_GENERIC(MSG_OOB),
968 /* recv */
969 FLAG_GENERIC(MSG_CMSG_CLOEXEC),
970 FLAG_GENERIC(MSG_ERRQUEUE),
971 FLAG_GENERIC(MSG_PEEK),
972 FLAG_GENERIC(MSG_TRUNC),
973 FLAG_GENERIC(MSG_WAITALL),
974 /* recvmsg */
975 FLAG_GENERIC(MSG_CTRUNC),
976 FLAG_END,
980 * print_xxx utility functions. These are used to print syscall
981 * parameters in certain format. All of these have parameter
982 * named 'last'. This parameter is used to add comma to output
983 * when last == 0.
986 static const char *
987 get_comma(int last)
989 return ((last) ? "" : ",");
992 static void
993 print_flags(const struct flags *f, abi_long flags, int last)
995 const char *sep = "";
996 int n;
998 if ((flags == 0) && (f->f_value == 0)) {
999 gemu_log("%s%s", f->f_string, get_comma(last));
1000 return;
1002 for (n = 0; f->f_string != NULL; f++) {
1003 if ((f->f_value != 0) && ((flags & f->f_value) == f->f_value)) {
1004 gemu_log("%s%s", sep, f->f_string);
1005 flags &= ~f->f_value;
1006 sep = "|";
1007 n++;
1011 if (n > 0) {
1012 /* print rest of the flags as numeric */
1013 if (flags != 0) {
1014 gemu_log("%s%#x%s", sep, (unsigned int)flags, get_comma(last));
1015 } else {
1016 gemu_log("%s", get_comma(last));
1018 } else {
1019 /* no string version of flags found, print them in hex then */
1020 gemu_log("%#x%s", (unsigned int)flags, get_comma(last));
1024 static void
1025 print_at_dirfd(abi_long dirfd, int last)
1027 #ifdef AT_FDCWD
1028 if (dirfd == AT_FDCWD) {
1029 gemu_log("AT_FDCWD%s", get_comma(last));
1030 return;
1032 #endif
1033 gemu_log("%d%s", (int)dirfd, get_comma(last));
1036 static void
1037 print_file_mode(abi_long mode, int last)
1039 const char *sep = "";
1040 const struct flags *m;
1042 for (m = &mode_flags[0]; m->f_string != NULL; m++) {
1043 if ((m->f_value & mode) == m->f_value) {
1044 gemu_log("%s%s", m->f_string, sep);
1045 sep = "|";
1046 mode &= ~m->f_value;
1047 break;
1051 mode &= ~S_IFMT;
1052 /* print rest of the mode as octal */
1053 if (mode != 0)
1054 gemu_log("%s%#o", sep, (unsigned int)mode);
1056 gemu_log("%s", get_comma(last));
1059 static void
1060 print_open_flags(abi_long flags, int last)
1062 print_flags(open_access_flags, flags & TARGET_O_ACCMODE, 1);
1063 flags &= ~TARGET_O_ACCMODE;
1064 if (flags == 0) {
1065 gemu_log("%s", get_comma(last));
1066 return;
1068 gemu_log("|");
1069 print_flags(open_flags, flags, last);
1072 static void
1073 print_syscall_prologue(const struct syscallname *sc)
1075 gemu_log("%s(", sc->name);
1078 /*ARGSUSED*/
1079 static void
1080 print_syscall_epilogue(const struct syscallname *sc)
1082 (void)sc;
1083 gemu_log(")");
1086 static void
1087 print_string(abi_long addr, int last)
1089 char *s;
1091 if ((s = lock_user_string(addr)) != NULL) {
1092 gemu_log("\"%s\"%s", s, get_comma(last));
1093 unlock_user(s, addr, 0);
1094 } else {
1095 /* can't get string out of it, so print it as pointer */
1096 print_pointer(addr, last);
1100 #define MAX_PRINT_BUF 40
1101 static void
1102 print_buf(abi_long addr, abi_long len, int last)
1104 uint8_t *s;
1105 int i;
1107 s = lock_user(VERIFY_READ, addr, len, 1);
1108 if (s) {
1109 gemu_log("\"");
1110 for (i = 0; i < MAX_PRINT_BUF && i < len; i++) {
1111 if (isprint(s[i])) {
1112 gemu_log("%c", s[i]);
1113 } else {
1114 gemu_log("\\%o", s[i]);
1117 gemu_log("\"");
1118 if (i != len) {
1119 gemu_log("...");
1121 if (!last) {
1122 gemu_log(",");
1124 unlock_user(s, addr, 0);
1125 } else {
1126 print_pointer(addr, last);
1131 * Prints out raw parameter using given format. Caller needs
1132 * to do byte swapping if needed.
1134 static void
1135 print_raw_param(const char *fmt, abi_long param, int last)
1137 char format[64];
1139 (void) snprintf(format, sizeof (format), "%s%s", fmt, get_comma(last));
1140 gemu_log(format, param);
1143 static void
1144 print_pointer(abi_long p, int last)
1146 if (p == 0)
1147 gemu_log("NULL%s", get_comma(last));
1148 else
1149 gemu_log("0x" TARGET_ABI_FMT_lx "%s", p, get_comma(last));
1153 * Reads 32-bit (int) number from guest address space from
1154 * address 'addr' and prints it.
1156 static void
1157 print_number(abi_long addr, int last)
1159 if (addr == 0) {
1160 gemu_log("NULL%s", get_comma(last));
1161 } else {
1162 int num;
1164 get_user_s32(num, addr);
1165 gemu_log("[%d]%s", num, get_comma(last));
1169 static void
1170 print_timeval(abi_ulong tv_addr, int last)
1172 if( tv_addr ) {
1173 struct target_timeval *tv;
1175 tv = lock_user(VERIFY_READ, tv_addr, sizeof(*tv), 1);
1176 if (!tv)
1177 return;
1178 gemu_log("{" TARGET_ABI_FMT_ld "," TARGET_ABI_FMT_ld "}%s",
1179 tswapal(tv->tv_sec), tswapal(tv->tv_usec), get_comma(last));
1180 unlock_user(tv, tv_addr, 0);
1181 } else
1182 gemu_log("NULL%s", get_comma(last));
1185 #undef UNUSED
1187 #ifdef TARGET_NR_accept
1188 static void
1189 print_accept(const struct syscallname *name,
1190 abi_long arg0, abi_long arg1, abi_long arg2,
1191 abi_long arg3, abi_long arg4, abi_long arg5)
1193 print_syscall_prologue(name);
1194 print_raw_param("%d", arg0, 0);
1195 print_pointer(arg1, 0);
1196 print_number(arg2, 1);
1197 print_syscall_epilogue(name);
1199 #endif
1201 #ifdef TARGET_NR_access
1202 static void
1203 print_access(const struct syscallname *name,
1204 abi_long arg0, abi_long arg1, abi_long arg2,
1205 abi_long arg3, abi_long arg4, abi_long arg5)
1207 print_syscall_prologue(name);
1208 print_string(arg0, 0);
1209 print_flags(access_flags, arg1, 1);
1210 print_syscall_epilogue(name);
1212 #endif
1214 #ifdef TARGET_NR_brk
1215 static void
1216 print_brk(const struct syscallname *name,
1217 abi_long arg0, abi_long arg1, abi_long arg2,
1218 abi_long arg3, abi_long arg4, abi_long arg5)
1220 print_syscall_prologue(name);
1221 print_pointer(arg0, 1);
1222 print_syscall_epilogue(name);
1224 #endif
1226 #ifdef TARGET_NR_chdir
1227 static void
1228 print_chdir(const struct syscallname *name,
1229 abi_long arg0, abi_long arg1, abi_long arg2,
1230 abi_long arg3, abi_long arg4, abi_long arg5)
1232 print_syscall_prologue(name);
1233 print_string(arg0, 1);
1234 print_syscall_epilogue(name);
1236 #endif
1238 #ifdef TARGET_NR_chmod
1239 static void
1240 print_chmod(const struct syscallname *name,
1241 abi_long arg0, abi_long arg1, abi_long arg2,
1242 abi_long arg3, abi_long arg4, abi_long arg5)
1244 print_syscall_prologue(name);
1245 print_string(arg0, 0);
1246 print_file_mode(arg1, 1);
1247 print_syscall_epilogue(name);
1249 #endif
1251 #ifdef TARGET_NR_clock_adjtime
1252 static void
1253 print_clock_adjtime(const struct syscallname *name,
1254 abi_long arg0, abi_long arg1, abi_long arg2,
1255 abi_long arg3, abi_long arg4, abi_long arg5)
1257 print_syscall_prologue(name);
1258 print_clockid(arg0, 0);
1259 print_pointer(arg1, 1);
1260 print_syscall_epilogue(name);
1262 #endif
1264 #ifdef TARGET_NR_clone
1265 static void do_print_clone(unsigned int flags, abi_ulong newsp,
1266 abi_ulong parent_tidptr, target_ulong newtls,
1267 abi_ulong child_tidptr)
1269 print_flags(clone_flags, flags, 0);
1270 print_raw_param("child_stack=0x" TARGET_ABI_FMT_lx, newsp, 0);
1271 print_raw_param("parent_tidptr=0x" TARGET_ABI_FMT_lx, parent_tidptr, 0);
1272 print_raw_param("tls=0x" TARGET_ABI_FMT_lx, newtls, 0);
1273 print_raw_param("child_tidptr=0x" TARGET_ABI_FMT_lx, child_tidptr, 1);
1276 static void
1277 print_clone(const struct syscallname *name,
1278 abi_long arg1, abi_long arg2, abi_long arg3,
1279 abi_long arg4, abi_long arg5, abi_long arg6)
1281 print_syscall_prologue(name);
1282 #if defined(TARGET_MICROBLAZE)
1283 do_print_clone(arg1, arg2, arg4, arg6, arg5);
1284 #elif defined(TARGET_CLONE_BACKWARDS)
1285 do_print_clone(arg1, arg2, arg3, arg4, arg5);
1286 #elif defined(TARGET_CLONE_BACKWARDS2)
1287 do_print_clone(arg2, arg1, arg3, arg5, arg4);
1288 #else
1289 do_print_clone(arg1, arg2, arg3, arg5, arg4);
1290 #endif
1291 print_syscall_epilogue(name);
1293 #endif
1295 #ifdef TARGET_NR_creat
1296 static void
1297 print_creat(const struct syscallname *name,
1298 abi_long arg0, abi_long arg1, abi_long arg2,
1299 abi_long arg3, abi_long arg4, abi_long arg5)
1301 print_syscall_prologue(name);
1302 print_string(arg0, 0);
1303 print_file_mode(arg1, 1);
1304 print_syscall_epilogue(name);
1306 #endif
1308 #ifdef TARGET_NR_execv
1309 static void
1310 print_execv(const struct syscallname *name,
1311 abi_long arg0, abi_long arg1, abi_long arg2,
1312 abi_long arg3, abi_long arg4, abi_long arg5)
1314 print_syscall_prologue(name);
1315 print_string(arg0, 0);
1316 print_raw_param("0x" TARGET_ABI_FMT_lx, arg1, 1);
1317 print_syscall_epilogue(name);
1319 #endif
1321 #ifdef TARGET_NR_faccessat
1322 static void
1323 print_faccessat(const struct syscallname *name,
1324 abi_long arg0, abi_long arg1, abi_long arg2,
1325 abi_long arg3, abi_long arg4, abi_long arg5)
1327 print_syscall_prologue(name);
1328 print_at_dirfd(arg0, 0);
1329 print_string(arg1, 0);
1330 print_flags(access_flags, arg2, 0);
1331 print_flags(at_file_flags, arg3, 1);
1332 print_syscall_epilogue(name);
1334 #endif
1336 #ifdef TARGET_NR_fchmodat
1337 static void
1338 print_fchmodat(const struct syscallname *name,
1339 abi_long arg0, abi_long arg1, abi_long arg2,
1340 abi_long arg3, abi_long arg4, abi_long arg5)
1342 print_syscall_prologue(name);
1343 print_at_dirfd(arg0, 0);
1344 print_string(arg1, 0);
1345 print_file_mode(arg2, 0);
1346 print_flags(at_file_flags, arg3, 1);
1347 print_syscall_epilogue(name);
1349 #endif
1351 #ifdef TARGET_NR_fchownat
1352 static void
1353 print_fchownat(const struct syscallname *name,
1354 abi_long arg0, abi_long arg1, abi_long arg2,
1355 abi_long arg3, abi_long arg4, abi_long arg5)
1357 print_syscall_prologue(name);
1358 print_at_dirfd(arg0, 0);
1359 print_string(arg1, 0);
1360 print_raw_param("%d", arg2, 0);
1361 print_raw_param("%d", arg3, 0);
1362 print_flags(at_file_flags, arg4, 1);
1363 print_syscall_epilogue(name);
1365 #endif
1367 #if defined(TARGET_NR_fcntl) || defined(TARGET_NR_fcntl64)
1368 static void
1369 print_fcntl(const struct syscallname *name,
1370 abi_long arg0, abi_long arg1, abi_long arg2,
1371 abi_long arg3, abi_long arg4, abi_long arg5)
1373 print_syscall_prologue(name);
1374 print_raw_param("%d", arg0, 0);
1375 switch(arg1) {
1376 case TARGET_F_DUPFD:
1377 gemu_log("F_DUPFD,");
1378 print_raw_param(TARGET_ABI_FMT_ld, arg2, 1);
1379 break;
1380 case TARGET_F_GETFD:
1381 gemu_log("F_GETFD");
1382 break;
1383 case TARGET_F_SETFD:
1384 gemu_log("F_SETFD,");
1385 print_raw_param(TARGET_ABI_FMT_ld, arg2, 1);
1386 break;
1387 case TARGET_F_GETFL:
1388 gemu_log("F_GETFL");
1389 break;
1390 case TARGET_F_SETFL:
1391 gemu_log("F_SETFL,");
1392 print_open_flags(arg2, 1);
1393 break;
1394 case TARGET_F_GETLK:
1395 gemu_log("F_GETLK,");
1396 print_pointer(arg2, 1);
1397 break;
1398 case TARGET_F_SETLK:
1399 gemu_log("F_SETLK,");
1400 print_pointer(arg2, 1);
1401 break;
1402 case TARGET_F_SETLKW:
1403 gemu_log("F_SETLKW,");
1404 print_pointer(arg2, 1);
1405 break;
1406 case TARGET_F_GETOWN:
1407 gemu_log("F_GETOWN");
1408 break;
1409 case TARGET_F_SETOWN:
1410 gemu_log("F_SETOWN,");
1411 print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
1412 break;
1413 case TARGET_F_GETSIG:
1414 gemu_log("F_GETSIG");
1415 break;
1416 case TARGET_F_SETSIG:
1417 gemu_log("F_SETSIG,");
1418 print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
1419 break;
1420 #if TARGET_ABI_BITS == 32
1421 case TARGET_F_GETLK64:
1422 gemu_log("F_GETLK64,");
1423 print_pointer(arg2, 1);
1424 break;
1425 case TARGET_F_SETLK64:
1426 gemu_log("F_SETLK64,");
1427 print_pointer(arg2, 1);
1428 break;
1429 case TARGET_F_SETLKW64:
1430 gemu_log("F_SETLKW64,");
1431 print_pointer(arg2, 1);
1432 break;
1433 #endif
1434 case TARGET_F_SETLEASE:
1435 gemu_log("F_SETLEASE,");
1436 print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
1437 break;
1438 case TARGET_F_GETLEASE:
1439 gemu_log("F_GETLEASE");
1440 break;
1441 case TARGET_F_SETPIPE_SZ:
1442 gemu_log("F_SETPIPE_SZ,");
1443 print_raw_param(TARGET_ABI_FMT_ld, arg2, 1);
1444 break;
1445 case TARGET_F_GETPIPE_SZ:
1446 gemu_log("F_GETPIPE_SZ");
1447 break;
1448 case TARGET_F_DUPFD_CLOEXEC:
1449 gemu_log("F_DUPFD_CLOEXEC,");
1450 print_raw_param(TARGET_ABI_FMT_ld, arg2, 1);
1451 break;
1452 case TARGET_F_NOTIFY:
1453 gemu_log("F_NOTIFY,");
1454 print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
1455 break;
1456 default:
1457 print_raw_param(TARGET_ABI_FMT_ld, arg1, 0);
1458 print_pointer(arg2, 1);
1459 break;
1461 print_syscall_epilogue(name);
1463 #define print_fcntl64 print_fcntl
1464 #endif
1467 #ifdef TARGET_NR_futimesat
1468 static void
1469 print_futimesat(const struct syscallname *name,
1470 abi_long arg0, abi_long arg1, abi_long arg2,
1471 abi_long arg3, abi_long arg4, abi_long arg5)
1473 print_syscall_prologue(name);
1474 print_at_dirfd(arg0, 0);
1475 print_string(arg1, 0);
1476 print_timeval(arg2, 0);
1477 print_timeval(arg2 + sizeof (struct target_timeval), 1);
1478 print_syscall_epilogue(name);
1480 #endif
1482 #ifdef TARGET_NR_link
1483 static void
1484 print_link(const struct syscallname *name,
1485 abi_long arg0, abi_long arg1, abi_long arg2,
1486 abi_long arg3, abi_long arg4, abi_long arg5)
1488 print_syscall_prologue(name);
1489 print_string(arg0, 0);
1490 print_string(arg1, 1);
1491 print_syscall_epilogue(name);
1493 #endif
1495 #ifdef TARGET_NR_linkat
1496 static void
1497 print_linkat(const struct syscallname *name,
1498 abi_long arg0, abi_long arg1, abi_long arg2,
1499 abi_long arg3, abi_long arg4, abi_long arg5)
1501 print_syscall_prologue(name);
1502 print_at_dirfd(arg0, 0);
1503 print_string(arg1, 0);
1504 print_at_dirfd(arg2, 0);
1505 print_string(arg3, 0);
1506 print_flags(at_file_flags, arg4, 1);
1507 print_syscall_epilogue(name);
1509 #endif
1511 #ifdef TARGET_NR__llseek
1512 static void
1513 print__llseek(const struct syscallname *name,
1514 abi_long arg0, abi_long arg1, abi_long arg2,
1515 abi_long arg3, abi_long arg4, abi_long arg5)
1517 const char *whence = "UNKNOWN";
1518 print_syscall_prologue(name);
1519 print_raw_param("%d", arg0, 0);
1520 print_raw_param("%ld", arg1, 0);
1521 print_raw_param("%ld", arg2, 0);
1522 print_pointer(arg3, 0);
1523 switch(arg4) {
1524 case SEEK_SET: whence = "SEEK_SET"; break;
1525 case SEEK_CUR: whence = "SEEK_CUR"; break;
1526 case SEEK_END: whence = "SEEK_END"; break;
1528 gemu_log("%s",whence);
1529 print_syscall_epilogue(name);
1531 #endif
1533 #if defined(TARGET_NR_socket)
1534 static void
1535 print_socket(const struct syscallname *name,
1536 abi_long arg0, abi_long arg1, abi_long arg2,
1537 abi_long arg3, abi_long arg4, abi_long arg5)
1539 abi_ulong domain = arg0, type = arg1, protocol = arg2;
1541 print_syscall_prologue(name);
1542 print_socket_domain(domain);
1543 gemu_log(",");
1544 print_socket_type(type);
1545 gemu_log(",");
1546 if (domain == AF_PACKET ||
1547 (domain == AF_INET && type == TARGET_SOCK_PACKET)) {
1548 protocol = tswap16(protocol);
1550 print_socket_protocol(domain, type, protocol);
1551 print_syscall_epilogue(name);
1554 #endif
1556 #if defined(TARGET_NR_socketcall)
1558 #define get_user_ualx(x, gaddr, idx) \
1559 get_user_ual(x, (gaddr) + (idx) * sizeof(abi_long))
1561 static void do_print_socket(const char *name, abi_long arg1)
1563 abi_ulong domain, type, protocol;
1565 get_user_ualx(domain, arg1, 0);
1566 get_user_ualx(type, arg1, 1);
1567 get_user_ualx(protocol, arg1, 2);
1568 gemu_log("%s(", name);
1569 print_socket_domain(domain);
1570 gemu_log(",");
1571 print_socket_type(type);
1572 gemu_log(",");
1573 if (domain == AF_PACKET ||
1574 (domain == AF_INET && type == TARGET_SOCK_PACKET)) {
1575 protocol = tswap16(protocol);
1577 print_socket_protocol(domain, type, protocol);
1578 gemu_log(")");
1581 static void do_print_sockaddr(const char *name, abi_long arg1)
1583 abi_ulong sockfd, addr, addrlen;
1585 get_user_ualx(sockfd, arg1, 0);
1586 get_user_ualx(addr, arg1, 1);
1587 get_user_ualx(addrlen, arg1, 2);
1589 gemu_log("%s(", name);
1590 print_raw_param(TARGET_ABI_FMT_ld, sockfd, 0);
1591 print_sockaddr(addr, addrlen);
1592 gemu_log(")");
1595 static void do_print_listen(const char *name, abi_long arg1)
1597 abi_ulong sockfd, backlog;
1599 get_user_ualx(sockfd, arg1, 0);
1600 get_user_ualx(backlog, arg1, 1);
1602 gemu_log("%s(", name);
1603 print_raw_param(TARGET_ABI_FMT_ld, sockfd, 0);
1604 print_raw_param(TARGET_ABI_FMT_ld, backlog, 1);
1605 gemu_log(")");
1608 static void do_print_socketpair(const char *name, abi_long arg1)
1610 abi_ulong domain, type, protocol, tab;
1612 get_user_ualx(domain, arg1, 0);
1613 get_user_ualx(type, arg1, 1);
1614 get_user_ualx(protocol, arg1, 2);
1615 get_user_ualx(tab, arg1, 3);
1617 gemu_log("%s(", name);
1618 print_socket_domain(domain);
1619 gemu_log(",");
1620 print_socket_type(type);
1621 gemu_log(",");
1622 print_socket_protocol(domain, type, protocol);
1623 gemu_log(",");
1624 print_raw_param(TARGET_ABI_FMT_lx, tab, 1);
1625 gemu_log(")");
1628 static void do_print_sendrecv(const char *name, abi_long arg1)
1630 abi_ulong sockfd, msg, len, flags;
1632 get_user_ualx(sockfd, arg1, 0);
1633 get_user_ualx(msg, arg1, 1);
1634 get_user_ualx(len, arg1, 2);
1635 get_user_ualx(flags, arg1, 3);
1637 gemu_log("%s(", name);
1638 print_raw_param(TARGET_ABI_FMT_ld, sockfd, 0);
1639 print_buf(msg, len, 0);
1640 print_raw_param(TARGET_ABI_FMT_ld, len, 0);
1641 print_flags(msg_flags, flags, 1);
1642 gemu_log(")");
1645 static void do_print_msgaddr(const char *name, abi_long arg1)
1647 abi_ulong sockfd, msg, len, flags, addr, addrlen;
1649 get_user_ualx(sockfd, arg1, 0);
1650 get_user_ualx(msg, arg1, 1);
1651 get_user_ualx(len, arg1, 2);
1652 get_user_ualx(flags, arg1, 3);
1653 get_user_ualx(addr, arg1, 4);
1654 get_user_ualx(addrlen, arg1, 5);
1656 gemu_log("%s(", name);
1657 print_raw_param(TARGET_ABI_FMT_ld, sockfd, 0);
1658 print_buf(msg, len, 0);
1659 print_raw_param(TARGET_ABI_FMT_ld, len, 0);
1660 print_flags(msg_flags, flags, 0);
1661 print_sockaddr(addr, addrlen);
1662 gemu_log(")");
1665 static void do_print_shutdown(const char *name, abi_long arg1)
1667 abi_ulong sockfd, how;
1669 get_user_ualx(sockfd, arg1, 0);
1670 get_user_ualx(how, arg1, 1);
1672 gemu_log("shutdown(");
1673 print_raw_param(TARGET_ABI_FMT_ld, sockfd, 0);
1674 switch (how) {
1675 case SHUT_RD:
1676 gemu_log("SHUT_RD");
1677 break;
1678 case SHUT_WR:
1679 gemu_log("SHUT_WR");
1680 break;
1681 case SHUT_RDWR:
1682 gemu_log("SHUT_RDWR");
1683 break;
1684 default:
1685 print_raw_param(TARGET_ABI_FMT_ld, how, 1);
1686 break;
1688 gemu_log(")");
1691 static void do_print_msg(const char *name, abi_long arg1)
1693 abi_ulong sockfd, msg, flags;
1695 get_user_ualx(sockfd, arg1, 0);
1696 get_user_ualx(msg, arg1, 1);
1697 get_user_ualx(flags, arg1, 2);
1699 gemu_log("%s(", name);
1700 print_raw_param(TARGET_ABI_FMT_ld, sockfd, 0);
1701 print_pointer(msg, 0);
1702 print_flags(msg_flags, flags, 1);
1703 gemu_log(")");
1706 static void do_print_sockopt(const char *name, abi_long arg1)
1708 abi_ulong sockfd, level, optname, optval, optlen;
1710 get_user_ualx(sockfd, arg1, 0);
1711 get_user_ualx(level, arg1, 1);
1712 get_user_ualx(optname, arg1, 2);
1713 get_user_ualx(optval, arg1, 3);
1714 get_user_ualx(optlen, arg1, 4);
1716 gemu_log("%s(", name);
1717 print_raw_param(TARGET_ABI_FMT_ld, sockfd, 0);
1718 switch (level) {
1719 case SOL_TCP:
1720 gemu_log("SOL_TCP,");
1721 print_raw_param(TARGET_ABI_FMT_ld, optname, 0);
1722 print_pointer(optval, 0);
1723 break;
1724 case SOL_IP:
1725 gemu_log("SOL_IP,");
1726 print_raw_param(TARGET_ABI_FMT_ld, optname, 0);
1727 print_pointer(optval, 0);
1728 break;
1729 case SOL_RAW:
1730 gemu_log("SOL_RAW,");
1731 print_raw_param(TARGET_ABI_FMT_ld, optname, 0);
1732 print_pointer(optval, 0);
1733 break;
1734 case TARGET_SOL_SOCKET:
1735 gemu_log("SOL_SOCKET,");
1736 switch (optname) {
1737 case TARGET_SO_DEBUG:
1738 gemu_log("SO_DEBUG,");
1739 print_optint:
1740 print_number(optval, 0);
1741 break;
1742 case TARGET_SO_REUSEADDR:
1743 gemu_log("SO_REUSEADDR,");
1744 goto print_optint;
1745 case TARGET_SO_TYPE:
1746 gemu_log("SO_TYPE,");
1747 goto print_optint;
1748 case TARGET_SO_ERROR:
1749 gemu_log("SO_ERROR,");
1750 goto print_optint;
1751 case TARGET_SO_DONTROUTE:
1752 gemu_log("SO_DONTROUTE,");
1753 goto print_optint;
1754 case TARGET_SO_BROADCAST:
1755 gemu_log("SO_BROADCAST,");
1756 goto print_optint;
1757 case TARGET_SO_SNDBUF:
1758 gemu_log("SO_SNDBUF,");
1759 goto print_optint;
1760 case TARGET_SO_RCVBUF:
1761 gemu_log("SO_RCVBUF,");
1762 goto print_optint;
1763 case TARGET_SO_KEEPALIVE:
1764 gemu_log("SO_KEEPALIVE,");
1765 goto print_optint;
1766 case TARGET_SO_OOBINLINE:
1767 gemu_log("SO_OOBINLINE,");
1768 goto print_optint;
1769 case TARGET_SO_NO_CHECK:
1770 gemu_log("SO_NO_CHECK,");
1771 goto print_optint;
1772 case TARGET_SO_PRIORITY:
1773 gemu_log("SO_PRIORITY,");
1774 goto print_optint;
1775 case TARGET_SO_BSDCOMPAT:
1776 gemu_log("SO_BSDCOMPAT,");
1777 goto print_optint;
1778 case TARGET_SO_PASSCRED:
1779 gemu_log("SO_PASSCRED,");
1780 goto print_optint;
1781 case TARGET_SO_TIMESTAMP:
1782 gemu_log("SO_TIMESTAMP,");
1783 goto print_optint;
1784 case TARGET_SO_RCVLOWAT:
1785 gemu_log("SO_RCVLOWAT,");
1786 goto print_optint;
1787 case TARGET_SO_RCVTIMEO:
1788 gemu_log("SO_RCVTIMEO,");
1789 print_timeval(optval, 0);
1790 break;
1791 case TARGET_SO_SNDTIMEO:
1792 gemu_log("SO_SNDTIMEO,");
1793 print_timeval(optval, 0);
1794 break;
1795 case TARGET_SO_ATTACH_FILTER: {
1796 struct target_sock_fprog *fprog;
1798 gemu_log("SO_ATTACH_FILTER,");
1800 if (lock_user_struct(VERIFY_READ, fprog, optval, 0)) {
1801 struct target_sock_filter *filter;
1802 gemu_log("{");
1803 if (lock_user_struct(VERIFY_READ, filter,
1804 tswapal(fprog->filter), 0)) {
1805 int i;
1806 for (i = 0; i < tswap16(fprog->len) - 1; i++) {
1807 gemu_log("[%d]{0x%x,%d,%d,0x%x},",
1808 i, tswap16(filter[i].code),
1809 filter[i].jt, filter[i].jf,
1810 tswap32(filter[i].k));
1812 gemu_log("[%d]{0x%x,%d,%d,0x%x}",
1813 i, tswap16(filter[i].code),
1814 filter[i].jt, filter[i].jf,
1815 tswap32(filter[i].k));
1816 } else {
1817 gemu_log(TARGET_ABI_FMT_lx, tswapal(fprog->filter));
1819 gemu_log(",%d},", tswap16(fprog->len));
1820 unlock_user(fprog, optval, 0);
1821 } else {
1822 print_pointer(optval, 0);
1824 break;
1826 default:
1827 print_raw_param(TARGET_ABI_FMT_ld, optname, 0);
1828 print_pointer(optval, 0);
1829 break;
1831 break;
1832 default:
1833 print_raw_param(TARGET_ABI_FMT_ld, level, 0);
1834 print_raw_param(TARGET_ABI_FMT_ld, optname, 0);
1835 print_pointer(optval, 0);
1836 break;
1838 print_raw_param(TARGET_ABI_FMT_ld, optlen, 1);
1839 gemu_log(")");
1842 #define PRINT_SOCKOP(name, func) \
1843 [TARGET_SYS_##name] = { #name, func }
1845 static struct {
1846 const char *name;
1847 void (*print)(const char *, abi_long);
1848 } scall[] = {
1849 PRINT_SOCKOP(SOCKET, do_print_socket),
1850 PRINT_SOCKOP(BIND, do_print_sockaddr),
1851 PRINT_SOCKOP(CONNECT, do_print_sockaddr),
1852 PRINT_SOCKOP(LISTEN, do_print_listen),
1853 PRINT_SOCKOP(ACCEPT, do_print_sockaddr),
1854 PRINT_SOCKOP(GETSOCKNAME, do_print_sockaddr),
1855 PRINT_SOCKOP(GETPEERNAME, do_print_sockaddr),
1856 PRINT_SOCKOP(SOCKETPAIR, do_print_socketpair),
1857 PRINT_SOCKOP(SEND, do_print_sendrecv),
1858 PRINT_SOCKOP(RECV, do_print_sendrecv),
1859 PRINT_SOCKOP(SENDTO, do_print_msgaddr),
1860 PRINT_SOCKOP(RECVFROM, do_print_msgaddr),
1861 PRINT_SOCKOP(SHUTDOWN, do_print_shutdown),
1862 PRINT_SOCKOP(SETSOCKOPT, do_print_sockopt),
1863 PRINT_SOCKOP(GETSOCKOPT, do_print_sockopt),
1864 PRINT_SOCKOP(SENDMSG, do_print_msg),
1865 PRINT_SOCKOP(RECVMSG, do_print_msg),
1866 PRINT_SOCKOP(ACCEPT4, NULL),
1867 PRINT_SOCKOP(RECVMMSG, NULL),
1868 PRINT_SOCKOP(SENDMMSG, NULL),
1871 static void
1872 print_socketcall(const struct syscallname *name,
1873 abi_long arg0, abi_long arg1, abi_long arg2,
1874 abi_long arg3, abi_long arg4, abi_long arg5)
1876 if (arg0 >= 0 && arg0 < ARRAY_SIZE(scall) && scall[arg0].print) {
1877 scall[arg0].print(scall[arg0].name, arg1);
1878 return;
1880 print_syscall_prologue(name);
1881 print_raw_param(TARGET_ABI_FMT_ld, arg0, 0);
1882 print_raw_param(TARGET_ABI_FMT_ld, arg1, 0);
1883 print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
1884 print_raw_param(TARGET_ABI_FMT_ld, arg3, 0);
1885 print_raw_param(TARGET_ABI_FMT_ld, arg4, 0);
1886 print_raw_param(TARGET_ABI_FMT_ld, arg5, 0);
1887 print_syscall_epilogue(name);
1889 #endif
1891 #if defined(TARGET_NR_stat) || defined(TARGET_NR_stat64) || \
1892 defined(TARGET_NR_lstat) || defined(TARGET_NR_lstat64)
1893 static void
1894 print_stat(const struct syscallname *name,
1895 abi_long arg0, abi_long arg1, abi_long arg2,
1896 abi_long arg3, abi_long arg4, abi_long arg5)
1898 print_syscall_prologue(name);
1899 print_string(arg0, 0);
1900 print_pointer(arg1, 1);
1901 print_syscall_epilogue(name);
1903 #define print_lstat print_stat
1904 #define print_stat64 print_stat
1905 #define print_lstat64 print_stat
1906 #endif
1908 #if defined(TARGET_NR_fstat) || defined(TARGET_NR_fstat64)
1909 static void
1910 print_fstat(const struct syscallname *name,
1911 abi_long arg0, abi_long arg1, abi_long arg2,
1912 abi_long arg3, abi_long arg4, abi_long arg5)
1914 print_syscall_prologue(name);
1915 print_raw_param("%d", arg0, 0);
1916 print_pointer(arg1, 1);
1917 print_syscall_epilogue(name);
1919 #define print_fstat64 print_fstat
1920 #endif
1922 #ifdef TARGET_NR_mkdir
1923 static void
1924 print_mkdir(const struct syscallname *name,
1925 abi_long arg0, abi_long arg1, abi_long arg2,
1926 abi_long arg3, abi_long arg4, abi_long arg5)
1928 print_syscall_prologue(name);
1929 print_string(arg0, 0);
1930 print_file_mode(arg1, 1);
1931 print_syscall_epilogue(name);
1933 #endif
1935 #ifdef TARGET_NR_mkdirat
1936 static void
1937 print_mkdirat(const struct syscallname *name,
1938 abi_long arg0, abi_long arg1, abi_long arg2,
1939 abi_long arg3, abi_long arg4, abi_long arg5)
1941 print_syscall_prologue(name);
1942 print_at_dirfd(arg0, 0);
1943 print_string(arg1, 0);
1944 print_file_mode(arg2, 1);
1945 print_syscall_epilogue(name);
1947 #endif
1949 #ifdef TARGET_NR_rmdir
1950 static void
1951 print_rmdir(const struct syscallname *name,
1952 abi_long arg0, abi_long arg1, abi_long arg2,
1953 abi_long arg3, abi_long arg4, abi_long arg5)
1955 print_syscall_prologue(name);
1956 print_string(arg0, 0);
1957 print_syscall_epilogue(name);
1959 #endif
1961 #ifdef TARGET_NR_rt_sigaction
1962 static void
1963 print_rt_sigaction(const struct syscallname *name,
1964 abi_long arg0, abi_long arg1, abi_long arg2,
1965 abi_long arg3, abi_long arg4, abi_long arg5)
1967 print_syscall_prologue(name);
1968 print_signal(arg0, 0);
1969 print_pointer(arg1, 0);
1970 print_pointer(arg2, 1);
1971 print_syscall_epilogue(name);
1973 #endif
1975 #ifdef TARGET_NR_rt_sigprocmask
1976 static void
1977 print_rt_sigprocmask(const struct syscallname *name,
1978 abi_long arg0, abi_long arg1, abi_long arg2,
1979 abi_long arg3, abi_long arg4, abi_long arg5)
1981 const char *how = "UNKNOWN";
1982 print_syscall_prologue(name);
1983 switch(arg0) {
1984 case TARGET_SIG_BLOCK: how = "SIG_BLOCK"; break;
1985 case TARGET_SIG_UNBLOCK: how = "SIG_UNBLOCK"; break;
1986 case TARGET_SIG_SETMASK: how = "SIG_SETMASK"; break;
1988 gemu_log("%s,",how);
1989 print_pointer(arg1, 0);
1990 print_pointer(arg2, 1);
1991 print_syscall_epilogue(name);
1993 #endif
1995 #ifdef TARGET_NR_rt_sigqueueinfo
1996 static void
1997 print_rt_sigqueueinfo(const struct syscallname *name,
1998 abi_long arg0, abi_long arg1, abi_long arg2,
1999 abi_long arg3, abi_long arg4, abi_long arg5)
2001 void *p;
2002 target_siginfo_t uinfo;
2004 print_syscall_prologue(name);
2005 print_raw_param("%d", arg0, 0);
2006 print_signal(arg1, 0);
2007 p = lock_user(VERIFY_READ, arg2, sizeof(target_siginfo_t), 1);
2008 if (p) {
2009 get_target_siginfo(&uinfo, p);
2010 print_siginfo(&uinfo);
2012 unlock_user(p, arg2, 0);
2013 } else {
2014 print_pointer(arg2, 1);
2016 print_syscall_epilogue(name);
2018 #endif
2020 #ifdef TARGET_NR_rt_tgsigqueueinfo
2021 static void
2022 print_rt_tgsigqueueinfo(const struct syscallname *name,
2023 abi_long arg0, abi_long arg1, abi_long arg2,
2024 abi_long arg3, abi_long arg4, abi_long arg5)
2026 void *p;
2027 target_siginfo_t uinfo;
2029 print_syscall_prologue(name);
2030 print_raw_param("%d", arg0, 0);
2031 print_raw_param("%d", arg1, 0);
2032 print_signal(arg2, 0);
2033 p = lock_user(VERIFY_READ, arg3, sizeof(target_siginfo_t), 1);
2034 if (p) {
2035 get_target_siginfo(&uinfo, p);
2036 print_siginfo(&uinfo);
2038 unlock_user(p, arg3, 0);
2039 } else {
2040 print_pointer(arg3, 1);
2042 print_syscall_epilogue(name);
2044 #endif
2046 #ifdef TARGET_NR_syslog
2047 static void
2048 print_syslog_action(abi_ulong arg, int last)
2050 const char *type;
2052 switch (arg) {
2053 case TARGET_SYSLOG_ACTION_CLOSE: {
2054 type = "SYSLOG_ACTION_CLOSE";
2055 break;
2057 case TARGET_SYSLOG_ACTION_OPEN: {
2058 type = "SYSLOG_ACTION_OPEN";
2059 break;
2061 case TARGET_SYSLOG_ACTION_READ: {
2062 type = "SYSLOG_ACTION_READ";
2063 break;
2065 case TARGET_SYSLOG_ACTION_READ_ALL: {
2066 type = "SYSLOG_ACTION_READ_ALL";
2067 break;
2069 case TARGET_SYSLOG_ACTION_READ_CLEAR: {
2070 type = "SYSLOG_ACTION_READ_CLEAR";
2071 break;
2073 case TARGET_SYSLOG_ACTION_CLEAR: {
2074 type = "SYSLOG_ACTION_CLEAR";
2075 break;
2077 case TARGET_SYSLOG_ACTION_CONSOLE_OFF: {
2078 type = "SYSLOG_ACTION_CONSOLE_OFF";
2079 break;
2081 case TARGET_SYSLOG_ACTION_CONSOLE_ON: {
2082 type = "SYSLOG_ACTION_CONSOLE_ON";
2083 break;
2085 case TARGET_SYSLOG_ACTION_CONSOLE_LEVEL: {
2086 type = "SYSLOG_ACTION_CONSOLE_LEVEL";
2087 break;
2089 case TARGET_SYSLOG_ACTION_SIZE_UNREAD: {
2090 type = "SYSLOG_ACTION_SIZE_UNREAD";
2091 break;
2093 case TARGET_SYSLOG_ACTION_SIZE_BUFFER: {
2094 type = "SYSLOG_ACTION_SIZE_BUFFER";
2095 break;
2097 default: {
2098 print_raw_param("%ld", arg, last);
2099 return;
2102 gemu_log("%s%s", type, get_comma(last));
2105 static void
2106 print_syslog(const struct syscallname *name,
2107 abi_long arg0, abi_long arg1, abi_long arg2,
2108 abi_long arg3, abi_long arg4, abi_long arg5)
2110 print_syscall_prologue(name);
2111 print_syslog_action(arg0, 0);
2112 print_pointer(arg1, 0);
2113 print_raw_param("%d", arg2, 1);
2114 print_syscall_epilogue(name);
2116 #endif
2118 #ifdef TARGET_NR_mknod
2119 static void
2120 print_mknod(const struct syscallname *name,
2121 abi_long arg0, abi_long arg1, abi_long arg2,
2122 abi_long arg3, abi_long arg4, abi_long arg5)
2124 int hasdev = (arg1 & (S_IFCHR|S_IFBLK));
2126 print_syscall_prologue(name);
2127 print_string(arg0, 0);
2128 print_file_mode(arg1, (hasdev == 0));
2129 if (hasdev) {
2130 print_raw_param("makedev(%d", major(arg2), 0);
2131 print_raw_param("%d)", minor(arg2), 1);
2133 print_syscall_epilogue(name);
2135 #endif
2137 #ifdef TARGET_NR_mknodat
2138 static void
2139 print_mknodat(const struct syscallname *name,
2140 abi_long arg0, abi_long arg1, abi_long arg2,
2141 abi_long arg3, abi_long arg4, abi_long arg5)
2143 int hasdev = (arg2 & (S_IFCHR|S_IFBLK));
2145 print_syscall_prologue(name);
2146 print_at_dirfd(arg0, 0);
2147 print_string(arg1, 0);
2148 print_file_mode(arg2, (hasdev == 0));
2149 if (hasdev) {
2150 print_raw_param("makedev(%d", major(arg3), 0);
2151 print_raw_param("%d)", minor(arg3), 1);
2153 print_syscall_epilogue(name);
2155 #endif
2157 #ifdef TARGET_NR_mq_open
2158 static void
2159 print_mq_open(const struct syscallname *name,
2160 abi_long arg0, abi_long arg1, abi_long arg2,
2161 abi_long arg3, abi_long arg4, abi_long arg5)
2163 int is_creat = (arg1 & TARGET_O_CREAT);
2165 print_syscall_prologue(name);
2166 print_string(arg0, 0);
2167 print_open_flags(arg1, (is_creat == 0));
2168 if (is_creat) {
2169 print_file_mode(arg2, 0);
2170 print_pointer(arg3, 1);
2172 print_syscall_epilogue(name);
2174 #endif
2176 #ifdef TARGET_NR_open
2177 static void
2178 print_open(const struct syscallname *name,
2179 abi_long arg0, abi_long arg1, abi_long arg2,
2180 abi_long arg3, abi_long arg4, abi_long arg5)
2182 int is_creat = (arg1 & TARGET_O_CREAT);
2184 print_syscall_prologue(name);
2185 print_string(arg0, 0);
2186 print_open_flags(arg1, (is_creat == 0));
2187 if (is_creat)
2188 print_file_mode(arg2, 1);
2189 print_syscall_epilogue(name);
2191 #endif
2193 #ifdef TARGET_NR_openat
2194 static void
2195 print_openat(const struct syscallname *name,
2196 abi_long arg0, abi_long arg1, abi_long arg2,
2197 abi_long arg3, abi_long arg4, abi_long arg5)
2199 int is_creat = (arg2 & TARGET_O_CREAT);
2201 print_syscall_prologue(name);
2202 print_at_dirfd(arg0, 0);
2203 print_string(arg1, 0);
2204 print_open_flags(arg2, (is_creat == 0));
2205 if (is_creat)
2206 print_file_mode(arg3, 1);
2207 print_syscall_epilogue(name);
2209 #endif
2211 #ifdef TARGET_NR_mq_unlink
2212 static void
2213 print_mq_unlink(const struct syscallname *name,
2214 abi_long arg0, abi_long arg1, abi_long arg2,
2215 abi_long arg3, abi_long arg4, abi_long arg5)
2217 print_syscall_prologue(name);
2218 print_string(arg0, 1);
2219 print_syscall_epilogue(name);
2221 #endif
2223 #if defined(TARGET_NR_fstatat64) || defined(TARGET_NR_newfstatat)
2224 static void
2225 print_fstatat64(const struct syscallname *name,
2226 abi_long arg0, abi_long arg1, abi_long arg2,
2227 abi_long arg3, abi_long arg4, abi_long arg5)
2229 print_syscall_prologue(name);
2230 print_at_dirfd(arg0, 0);
2231 print_string(arg1, 0);
2232 print_pointer(arg2, 0);
2233 print_flags(at_file_flags, arg3, 1);
2234 print_syscall_epilogue(name);
2236 #define print_newfstatat print_fstatat64
2237 #endif
2239 #ifdef TARGET_NR_readlink
2240 static void
2241 print_readlink(const struct syscallname *name,
2242 abi_long arg0, abi_long arg1, abi_long arg2,
2243 abi_long arg3, abi_long arg4, abi_long arg5)
2245 print_syscall_prologue(name);
2246 print_string(arg0, 0);
2247 print_pointer(arg1, 0);
2248 print_raw_param("%u", arg2, 1);
2249 print_syscall_epilogue(name);
2251 #endif
2253 #ifdef TARGET_NR_readlinkat
2254 static void
2255 print_readlinkat(const struct syscallname *name,
2256 abi_long arg0, abi_long arg1, abi_long arg2,
2257 abi_long arg3, abi_long arg4, abi_long arg5)
2259 print_syscall_prologue(name);
2260 print_at_dirfd(arg0, 0);
2261 print_string(arg1, 0);
2262 print_pointer(arg2, 0);
2263 print_raw_param("%u", arg3, 1);
2264 print_syscall_epilogue(name);
2266 #endif
2268 #ifdef TARGET_NR_rename
2269 static void
2270 print_rename(const struct syscallname *name,
2271 abi_long arg0, abi_long arg1, abi_long arg2,
2272 abi_long arg3, abi_long arg4, abi_long arg5)
2274 print_syscall_prologue(name);
2275 print_string(arg0, 0);
2276 print_string(arg1, 1);
2277 print_syscall_epilogue(name);
2279 #endif
2281 #ifdef TARGET_NR_renameat
2282 static void
2283 print_renameat(const struct syscallname *name,
2284 abi_long arg0, abi_long arg1, abi_long arg2,
2285 abi_long arg3, abi_long arg4, abi_long arg5)
2287 print_syscall_prologue(name);
2288 print_at_dirfd(arg0, 0);
2289 print_string(arg1, 0);
2290 print_at_dirfd(arg2, 0);
2291 print_string(arg3, 1);
2292 print_syscall_epilogue(name);
2294 #endif
2296 #ifdef TARGET_NR_statfs
2297 static void
2298 print_statfs(const struct syscallname *name,
2299 abi_long arg0, abi_long arg1, abi_long arg2,
2300 abi_long arg3, abi_long arg4, abi_long arg5)
2302 print_syscall_prologue(name);
2303 print_string(arg0, 0);
2304 print_pointer(arg1, 1);
2305 print_syscall_epilogue(name);
2307 #endif
2309 #ifdef TARGET_NR_statfs64
2310 static void
2311 print_statfs64(const struct syscallname *name,
2312 abi_long arg0, abi_long arg1, abi_long arg2,
2313 abi_long arg3, abi_long arg4, abi_long arg5)
2315 print_syscall_prologue(name);
2316 print_string(arg0, 0);
2317 print_pointer(arg1, 1);
2318 print_syscall_epilogue(name);
2320 #endif
2322 #ifdef TARGET_NR_symlink
2323 static void
2324 print_symlink(const struct syscallname *name,
2325 abi_long arg0, abi_long arg1, abi_long arg2,
2326 abi_long arg3, abi_long arg4, abi_long arg5)
2328 print_syscall_prologue(name);
2329 print_string(arg0, 0);
2330 print_string(arg1, 1);
2331 print_syscall_epilogue(name);
2333 #endif
2335 #ifdef TARGET_NR_symlinkat
2336 static void
2337 print_symlinkat(const struct syscallname *name,
2338 abi_long arg0, abi_long arg1, abi_long arg2,
2339 abi_long arg3, abi_long arg4, abi_long arg5)
2341 print_syscall_prologue(name);
2342 print_string(arg0, 0);
2343 print_at_dirfd(arg1, 0);
2344 print_string(arg2, 1);
2345 print_syscall_epilogue(name);
2347 #endif
2349 #ifdef TARGET_NR_mount
2350 static void
2351 print_mount(const struct syscallname *name,
2352 abi_long arg0, abi_long arg1, abi_long arg2,
2353 abi_long arg3, abi_long arg4, abi_long arg5)
2355 print_syscall_prologue(name);
2356 print_string(arg0, 0);
2357 print_string(arg1, 0);
2358 print_string(arg2, 0);
2359 print_flags(mount_flags, arg3, 0);
2360 print_pointer(arg4, 1);
2361 print_syscall_epilogue(name);
2363 #endif
2365 #ifdef TARGET_NR_umount
2366 static void
2367 print_umount(const struct syscallname *name,
2368 abi_long arg0, abi_long arg1, abi_long arg2,
2369 abi_long arg3, abi_long arg4, abi_long arg5)
2371 print_syscall_prologue(name);
2372 print_string(arg0, 1);
2373 print_syscall_epilogue(name);
2375 #endif
2377 #ifdef TARGET_NR_umount2
2378 static void
2379 print_umount2(const struct syscallname *name,
2380 abi_long arg0, abi_long arg1, abi_long arg2,
2381 abi_long arg3, abi_long arg4, abi_long arg5)
2383 print_syscall_prologue(name);
2384 print_string(arg0, 0);
2385 print_flags(umount2_flags, arg1, 1);
2386 print_syscall_epilogue(name);
2388 #endif
2390 #ifdef TARGET_NR_unlink
2391 static void
2392 print_unlink(const struct syscallname *name,
2393 abi_long arg0, abi_long arg1, abi_long arg2,
2394 abi_long arg3, abi_long arg4, abi_long arg5)
2396 print_syscall_prologue(name);
2397 print_string(arg0, 1);
2398 print_syscall_epilogue(name);
2400 #endif
2402 #ifdef TARGET_NR_unlinkat
2403 static void
2404 print_unlinkat(const struct syscallname *name,
2405 abi_long arg0, abi_long arg1, abi_long arg2,
2406 abi_long arg3, abi_long arg4, abi_long arg5)
2408 print_syscall_prologue(name);
2409 print_at_dirfd(arg0, 0);
2410 print_string(arg1, 0);
2411 print_flags(unlinkat_flags, arg2, 1);
2412 print_syscall_epilogue(name);
2414 #endif
2416 #ifdef TARGET_NR_utime
2417 static void
2418 print_utime(const struct syscallname *name,
2419 abi_long arg0, abi_long arg1, abi_long arg2,
2420 abi_long arg3, abi_long arg4, abi_long arg5)
2422 print_syscall_prologue(name);
2423 print_string(arg0, 0);
2424 print_pointer(arg1, 1);
2425 print_syscall_epilogue(name);
2427 #endif
2429 #ifdef TARGET_NR_utimes
2430 static void
2431 print_utimes(const struct syscallname *name,
2432 abi_long arg0, abi_long arg1, abi_long arg2,
2433 abi_long arg3, abi_long arg4, abi_long arg5)
2435 print_syscall_prologue(name);
2436 print_string(arg0, 0);
2437 print_pointer(arg1, 1);
2438 print_syscall_epilogue(name);
2440 #endif
2442 #ifdef TARGET_NR_utimensat
2443 static void
2444 print_utimensat(const struct syscallname *name,
2445 abi_long arg0, abi_long arg1, abi_long arg2,
2446 abi_long arg3, abi_long arg4, abi_long arg5)
2448 print_syscall_prologue(name);
2449 print_at_dirfd(arg0, 0);
2450 print_string(arg1, 0);
2451 print_pointer(arg2, 0);
2452 print_flags(at_file_flags, arg3, 1);
2453 print_syscall_epilogue(name);
2455 #endif
2457 #if defined(TARGET_NR_mmap) || defined(TARGET_NR_mmap2)
2458 static void
2459 print_mmap(const struct syscallname *name,
2460 abi_long arg0, abi_long arg1, abi_long arg2,
2461 abi_long arg3, abi_long arg4, abi_long arg5)
2463 print_syscall_prologue(name);
2464 print_pointer(arg0, 0);
2465 print_raw_param("%d", arg1, 0);
2466 print_flags(mmap_prot_flags, arg2, 0);
2467 print_flags(mmap_flags, arg3, 0);
2468 print_raw_param("%d", arg4, 0);
2469 print_raw_param("%#x", arg5, 1);
2470 print_syscall_epilogue(name);
2472 #define print_mmap2 print_mmap
2473 #endif
2475 #ifdef TARGET_NR_mprotect
2476 static void
2477 print_mprotect(const struct syscallname *name,
2478 abi_long arg0, abi_long arg1, abi_long arg2,
2479 abi_long arg3, abi_long arg4, abi_long arg5)
2481 print_syscall_prologue(name);
2482 print_pointer(arg0, 0);
2483 print_raw_param("%d", arg1, 0);
2484 print_flags(mmap_prot_flags, arg2, 1);
2485 print_syscall_epilogue(name);
2487 #endif
2489 #ifdef TARGET_NR_munmap
2490 static void
2491 print_munmap(const struct syscallname *name,
2492 abi_long arg0, abi_long arg1, abi_long arg2,
2493 abi_long arg3, abi_long arg4, abi_long arg5)
2495 print_syscall_prologue(name);
2496 print_pointer(arg0, 0);
2497 print_raw_param("%d", arg1, 1);
2498 print_syscall_epilogue(name);
2500 #endif
2502 #ifdef TARGET_NR_futex
2503 static void print_futex_op(abi_long tflag, int last)
2505 #define print_op(val) \
2506 if( cmd == val ) { \
2507 gemu_log(#val); \
2508 return; \
2511 int cmd = (int)tflag;
2512 #ifdef FUTEX_PRIVATE_FLAG
2513 if (cmd & FUTEX_PRIVATE_FLAG) {
2514 gemu_log("FUTEX_PRIVATE_FLAG|");
2515 cmd &= ~FUTEX_PRIVATE_FLAG;
2517 #endif
2518 #ifdef FUTEX_CLOCK_REALTIME
2519 if (cmd & FUTEX_CLOCK_REALTIME) {
2520 gemu_log("FUTEX_CLOCK_REALTIME|");
2521 cmd &= ~FUTEX_CLOCK_REALTIME;
2523 #endif
2524 print_op(FUTEX_WAIT)
2525 print_op(FUTEX_WAKE)
2526 print_op(FUTEX_FD)
2527 print_op(FUTEX_REQUEUE)
2528 print_op(FUTEX_CMP_REQUEUE)
2529 print_op(FUTEX_WAKE_OP)
2530 print_op(FUTEX_LOCK_PI)
2531 print_op(FUTEX_UNLOCK_PI)
2532 print_op(FUTEX_TRYLOCK_PI)
2533 #ifdef FUTEX_WAIT_BITSET
2534 print_op(FUTEX_WAIT_BITSET)
2535 #endif
2536 #ifdef FUTEX_WAKE_BITSET
2537 print_op(FUTEX_WAKE_BITSET)
2538 #endif
2539 /* unknown values */
2540 gemu_log("%d",cmd);
2543 static void
2544 print_futex(const struct syscallname *name,
2545 abi_long arg0, abi_long arg1, abi_long arg2,
2546 abi_long arg3, abi_long arg4, abi_long arg5)
2548 print_syscall_prologue(name);
2549 print_pointer(arg0, 0);
2550 print_futex_op(arg1, 0);
2551 print_raw_param(",%d", arg2, 0);
2552 print_pointer(arg3, 0); /* struct timespec */
2553 print_pointer(arg4, 0);
2554 print_raw_param("%d", arg4, 1);
2555 print_syscall_epilogue(name);
2557 #endif
2559 #ifdef TARGET_NR_kill
2560 static void
2561 print_kill(const struct syscallname *name,
2562 abi_long arg0, abi_long arg1, abi_long arg2,
2563 abi_long arg3, abi_long arg4, abi_long arg5)
2565 print_syscall_prologue(name);
2566 print_raw_param("%d", arg0, 0);
2567 print_signal(arg1, 1);
2568 print_syscall_epilogue(name);
2570 #endif
2572 #ifdef TARGET_NR_tkill
2573 static void
2574 print_tkill(const struct syscallname *name,
2575 abi_long arg0, abi_long arg1, abi_long arg2,
2576 abi_long arg3, abi_long arg4, abi_long arg5)
2578 print_syscall_prologue(name);
2579 print_raw_param("%d", arg0, 0);
2580 print_signal(arg1, 1);
2581 print_syscall_epilogue(name);
2583 #endif
2585 #ifdef TARGET_NR_tgkill
2586 static void
2587 print_tgkill(const struct syscallname *name,
2588 abi_long arg0, abi_long arg1, abi_long arg2,
2589 abi_long arg3, abi_long arg4, abi_long arg5)
2591 print_syscall_prologue(name);
2592 print_raw_param("%d", arg0, 0);
2593 print_raw_param("%d", arg1, 0);
2594 print_signal(arg2, 1);
2595 print_syscall_epilogue(name);
2597 #endif
2600 * An array of all of the syscalls we know about
2603 static const struct syscallname scnames[] = {
2604 #include "strace.list"
2607 static int nsyscalls = ARRAY_SIZE(scnames);
2610 * The public interface to this module.
2612 void
2613 print_syscall(int num,
2614 abi_long arg1, abi_long arg2, abi_long arg3,
2615 abi_long arg4, abi_long arg5, abi_long arg6)
2617 int i;
2618 const char *format="%s(" TARGET_ABI_FMT_ld "," TARGET_ABI_FMT_ld "," TARGET_ABI_FMT_ld "," TARGET_ABI_FMT_ld "," TARGET_ABI_FMT_ld "," TARGET_ABI_FMT_ld ")";
2620 gemu_log("%d ", getpid() );
2622 for(i=0;i<nsyscalls;i++)
2623 if( scnames[i].nr == num ) {
2624 if( scnames[i].call != NULL ) {
2625 scnames[i].call(&scnames[i],arg1,arg2,arg3,arg4,arg5,arg6);
2626 } else {
2627 /* XXX: this format system is broken because it uses
2628 host types and host pointers for strings */
2629 if( scnames[i].format != NULL )
2630 format = scnames[i].format;
2631 gemu_log(format,scnames[i].name, arg1,arg2,arg3,arg4,arg5,arg6);
2633 return;
2635 gemu_log("Unknown syscall %d\n", num);
2639 void
2640 print_syscall_ret(int num, abi_long ret)
2642 int i;
2643 const char *errstr = NULL;
2645 for(i=0;i<nsyscalls;i++)
2646 if( scnames[i].nr == num ) {
2647 if( scnames[i].result != NULL ) {
2648 scnames[i].result(&scnames[i],ret);
2649 } else {
2650 if (ret < 0) {
2651 errstr = target_strerror(-ret);
2653 if (errstr) {
2654 gemu_log(" = -1 errno=" TARGET_ABI_FMT_ld " (%s)\n",
2655 -ret, errstr);
2656 } else {
2657 gemu_log(" = " TARGET_ABI_FMT_ld "\n", ret);
2660 break;
2664 void print_taken_signal(int target_signum, const target_siginfo_t *tinfo)
2666 /* Print the strace output for a signal being taken:
2667 * --- SIGSEGV {si_signo=SIGSEGV, si_code=SI_KERNEL, si_addr=0} ---
2669 gemu_log("--- ");
2670 print_signal(target_signum, 1);
2671 gemu_log(" ");
2672 print_siginfo(tinfo);
2673 gemu_log(" ---\n");