xref: /openbmc/qemu/linux-user/strace.c (revision 5a894dd7)
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 <linux/netlink.h>
12 #include <sched.h>
13 #include "qemu.h"
14 
15 struct syscallname {
16     int nr;
17     const char *name;
18     const char *format;
19     void (*call)(const struct syscallname *,
20                  abi_long, abi_long, abi_long,
21                  abi_long, abi_long, abi_long);
22     void (*result)(const struct syscallname *, abi_long,
23                    abi_long, abi_long, abi_long,
24                    abi_long, abi_long, abi_long);
25 };
26 
27 #ifdef __GNUC__
28 /*
29  * It is possible that target doesn't have syscall that uses
30  * following flags but we don't want the compiler to warn
31  * us about them being unused.  Same applies to utility print
32  * functions.  It is ok to keep them while not used.
33  */
34 #define UNUSED __attribute__ ((unused))
35 #else
36 #define UNUSED
37 #endif
38 
39 /*
40  * Structure used to translate flag values into strings.  This is
41  * similar that is in the actual strace tool.
42  */
43 struct flags {
44     abi_long    f_value;  /* flag */
45     const char  *f_string; /* stringified flag */
46 };
47 
48 /* common flags for all architectures */
49 #define FLAG_GENERIC(name) { name, #name }
50 /* target specific flags (syscall_defs.h has TARGET_<flag>) */
51 #define FLAG_TARGET(name)  { TARGET_ ## name, #name }
52 /* end of flags array */
53 #define FLAG_END           { 0, NULL }
54 
55 UNUSED static const char *get_comma(int);
56 UNUSED static void print_pointer(abi_long, int);
57 UNUSED static void print_flags(const struct flags *, abi_long, int);
58 UNUSED static void print_at_dirfd(abi_long, int);
59 UNUSED static void print_file_mode(abi_long, int);
60 UNUSED static void print_open_flags(abi_long, int);
61 UNUSED static void print_syscall_prologue(const struct syscallname *);
62 UNUSED static void print_syscall_epilogue(const struct syscallname *);
63 UNUSED static void print_string(abi_long, int);
64 UNUSED static void print_buf(abi_long addr, abi_long len, int last);
65 UNUSED static void print_raw_param(const char *, abi_long, int);
66 UNUSED static void print_timeval(abi_ulong, int);
67 UNUSED static void print_timezone(abi_ulong, int);
68 UNUSED static void print_number(abi_long, int);
69 UNUSED static void print_signal(abi_ulong, int);
70 UNUSED static void print_sockaddr(abi_ulong, abi_long, int);
71 UNUSED static void print_socket_domain(int domain);
72 UNUSED static void print_socket_type(int type);
73 UNUSED static void print_socket_protocol(int domain, int type, int protocol);
74 
75 /*
76  * Utility functions
77  */
78 static void
79 print_ipc_cmd(int cmd)
80 {
81 #define output_cmd(val) \
82 if( cmd == val ) { \
83     qemu_log(#val); \
84     return; \
85 }
86 
87     cmd &= 0xff;
88 
89     /* General IPC commands */
90     output_cmd( IPC_RMID );
91     output_cmd( IPC_SET );
92     output_cmd( IPC_STAT );
93     output_cmd( IPC_INFO );
94     /* msgctl() commands */
95     output_cmd( MSG_STAT );
96     output_cmd( MSG_INFO );
97     /* shmctl() commands */
98     output_cmd( SHM_LOCK );
99     output_cmd( SHM_UNLOCK );
100     output_cmd( SHM_STAT );
101     output_cmd( SHM_INFO );
102     /* semctl() commands */
103     output_cmd( GETPID );
104     output_cmd( GETVAL );
105     output_cmd( GETALL );
106     output_cmd( GETNCNT );
107     output_cmd( GETZCNT );
108     output_cmd( SETVAL );
109     output_cmd( SETALL );
110     output_cmd( SEM_STAT );
111     output_cmd( SEM_INFO );
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 );
119     output_cmd( IPC_RMID );
120     output_cmd( IPC_RMID );
121 
122     /* Some value we don't recognize */
123     qemu_log("%d", cmd);
124 }
125 
126 static void
127 print_signal(abi_ulong arg, int last)
128 {
129     const char *signal_name = NULL;
130     switch(arg) {
131     case TARGET_SIGHUP: signal_name = "SIGHUP"; break;
132     case TARGET_SIGINT: signal_name = "SIGINT"; break;
133     case TARGET_SIGQUIT: signal_name = "SIGQUIT"; break;
134     case TARGET_SIGILL: signal_name = "SIGILL"; break;
135     case TARGET_SIGABRT: signal_name = "SIGABRT"; break;
136     case TARGET_SIGFPE: signal_name = "SIGFPE"; break;
137     case TARGET_SIGKILL: signal_name = "SIGKILL"; break;
138     case TARGET_SIGSEGV: signal_name = "SIGSEGV"; break;
139     case TARGET_SIGPIPE: signal_name = "SIGPIPE"; break;
140     case TARGET_SIGALRM: signal_name = "SIGALRM"; break;
141     case TARGET_SIGTERM: signal_name = "SIGTERM"; break;
142     case TARGET_SIGUSR1: signal_name = "SIGUSR1"; break;
143     case TARGET_SIGUSR2: signal_name = "SIGUSR2"; break;
144     case TARGET_SIGCHLD: signal_name = "SIGCHLD"; break;
145     case TARGET_SIGCONT: signal_name = "SIGCONT"; break;
146     case TARGET_SIGSTOP: signal_name = "SIGSTOP"; break;
147     case TARGET_SIGTTIN: signal_name = "SIGTTIN"; break;
148     case TARGET_SIGTTOU: signal_name = "SIGTTOU"; break;
149     }
150     if (signal_name == NULL) {
151         print_raw_param("%ld", arg, last);
152         return;
153     }
154     qemu_log("%s%s", signal_name, get_comma(last));
155 }
156 
157 static void print_si_code(int arg)
158 {
159     const char *codename = NULL;
160 
161     switch (arg) {
162     case SI_USER:
163         codename = "SI_USER";
164         break;
165     case SI_KERNEL:
166         codename = "SI_KERNEL";
167         break;
168     case SI_QUEUE:
169         codename = "SI_QUEUE";
170         break;
171     case SI_TIMER:
172         codename = "SI_TIMER";
173         break;
174     case SI_MESGQ:
175         codename = "SI_MESGQ";
176         break;
177     case SI_ASYNCIO:
178         codename = "SI_ASYNCIO";
179         break;
180     case SI_SIGIO:
181         codename = "SI_SIGIO";
182         break;
183     case SI_TKILL:
184         codename = "SI_TKILL";
185         break;
186     default:
187         qemu_log("%d", arg);
188         return;
189     }
190     qemu_log("%s", codename);
191 }
192 
193 static void get_target_siginfo(target_siginfo_t *tinfo,
194                                 const target_siginfo_t *info)
195 {
196     abi_ulong sival_ptr;
197 
198     int sig;
199     int si_errno;
200     int si_code;
201     int si_type;
202 
203     __get_user(sig, &info->si_signo);
204     __get_user(si_errno, &tinfo->si_errno);
205     __get_user(si_code, &info->si_code);
206 
207     tinfo->si_signo = sig;
208     tinfo->si_errno = si_errno;
209     tinfo->si_code = si_code;
210 
211     /* Ensure we don't leak random junk to the guest later */
212     memset(tinfo->_sifields._pad, 0, sizeof(tinfo->_sifields._pad));
213 
214     /* This is awkward, because we have to use a combination of
215      * the si_code and si_signo to figure out which of the union's
216      * members are valid. (Within the host kernel it is always possible
217      * to tell, but the kernel carefully avoids giving userspace the
218      * high 16 bits of si_code, so we don't have the information to
219      * do this the easy way...) We therefore make our best guess,
220      * bearing in mind that a guest can spoof most of the si_codes
221      * via rt_sigqueueinfo() if it likes.
222      *
223      * Once we have made our guess, we record it in the top 16 bits of
224      * the si_code, so that print_siginfo() later can use it.
225      * print_siginfo() will strip these top bits out before printing
226      * the si_code.
227      */
228 
229     switch (si_code) {
230     case SI_USER:
231     case SI_TKILL:
232     case SI_KERNEL:
233         /* Sent via kill(), tkill() or tgkill(), or direct from the kernel.
234          * These are the only unspoofable si_code values.
235          */
236         __get_user(tinfo->_sifields._kill._pid, &info->_sifields._kill._pid);
237         __get_user(tinfo->_sifields._kill._uid, &info->_sifields._kill._uid);
238         si_type = QEMU_SI_KILL;
239         break;
240     default:
241         /* Everything else is spoofable. Make best guess based on signal */
242         switch (sig) {
243         case TARGET_SIGCHLD:
244             __get_user(tinfo->_sifields._sigchld._pid,
245                        &info->_sifields._sigchld._pid);
246             __get_user(tinfo->_sifields._sigchld._uid,
247                        &info->_sifields._sigchld._uid);
248             __get_user(tinfo->_sifields._sigchld._status,
249                        &info->_sifields._sigchld._status);
250             __get_user(tinfo->_sifields._sigchld._utime,
251                        &info->_sifields._sigchld._utime);
252             __get_user(tinfo->_sifields._sigchld._stime,
253                        &info->_sifields._sigchld._stime);
254             si_type = QEMU_SI_CHLD;
255             break;
256         case TARGET_SIGIO:
257             __get_user(tinfo->_sifields._sigpoll._band,
258                        &info->_sifields._sigpoll._band);
259             __get_user(tinfo->_sifields._sigpoll._fd,
260                        &info->_sifields._sigpoll._fd);
261             si_type = QEMU_SI_POLL;
262             break;
263         default:
264             /* Assume a sigqueue()/mq_notify()/rt_sigqueueinfo() source. */
265             __get_user(tinfo->_sifields._rt._pid, &info->_sifields._rt._pid);
266             __get_user(tinfo->_sifields._rt._uid, &info->_sifields._rt._uid);
267             /* XXX: potential problem if 64 bit */
268             __get_user(sival_ptr, &info->_sifields._rt._sigval.sival_ptr);
269             tinfo->_sifields._rt._sigval.sival_ptr = sival_ptr;
270 
271             si_type = QEMU_SI_RT;
272             break;
273         }
274         break;
275     }
276 
277     tinfo->si_code = deposit32(si_code, 16, 16, si_type);
278 }
279 
280 static void print_siginfo(const target_siginfo_t *tinfo)
281 {
282     /* Print a target_siginfo_t in the format desired for printing
283      * signals being taken. We assume the target_siginfo_t is in the
284      * internal form where the top 16 bits of si_code indicate which
285      * part of the union is valid, rather than in the guest-visible
286      * form where the bottom 16 bits are sign-extended into the top 16.
287      */
288     int si_type = extract32(tinfo->si_code, 16, 16);
289     int si_code = sextract32(tinfo->si_code, 0, 16);
290 
291     qemu_log("{si_signo=");
292     print_signal(tinfo->si_signo, 1);
293     qemu_log(", si_code=");
294     print_si_code(si_code);
295 
296     switch (si_type) {
297     case QEMU_SI_KILL:
298         qemu_log(", si_pid=%u, si_uid=%u",
299                  (unsigned int)tinfo->_sifields._kill._pid,
300                  (unsigned int)tinfo->_sifields._kill._uid);
301         break;
302     case QEMU_SI_TIMER:
303         qemu_log(", si_timer1=%u, si_timer2=%u",
304                  tinfo->_sifields._timer._timer1,
305                  tinfo->_sifields._timer._timer2);
306         break;
307     case QEMU_SI_POLL:
308         qemu_log(", si_band=%d, si_fd=%d",
309                  tinfo->_sifields._sigpoll._band,
310                  tinfo->_sifields._sigpoll._fd);
311         break;
312     case QEMU_SI_FAULT:
313         qemu_log(", si_addr=");
314         print_pointer(tinfo->_sifields._sigfault._addr, 1);
315         break;
316     case QEMU_SI_CHLD:
317         qemu_log(", si_pid=%u, si_uid=%u, si_status=%d"
318                  ", si_utime=" TARGET_ABI_FMT_ld
319                  ", si_stime=" TARGET_ABI_FMT_ld,
320                  (unsigned int)(tinfo->_sifields._sigchld._pid),
321                  (unsigned int)(tinfo->_sifields._sigchld._uid),
322                  tinfo->_sifields._sigchld._status,
323                  tinfo->_sifields._sigchld._utime,
324                  tinfo->_sifields._sigchld._stime);
325         break;
326     case QEMU_SI_RT:
327         qemu_log(", si_pid=%u, si_uid=%u, si_sigval=" TARGET_ABI_FMT_ld,
328                  (unsigned int)tinfo->_sifields._rt._pid,
329                  (unsigned int)tinfo->_sifields._rt._uid,
330                  tinfo->_sifields._rt._sigval.sival_ptr);
331         break;
332     default:
333         g_assert_not_reached();
334     }
335     qemu_log("}");
336 }
337 
338 static void
339 print_sockaddr(abi_ulong addr, abi_long addrlen, int last)
340 {
341     struct target_sockaddr *sa;
342     int i;
343     int sa_family;
344 
345     sa = lock_user(VERIFY_READ, addr, addrlen, 1);
346     if (sa) {
347         sa_family = tswap16(sa->sa_family);
348         switch (sa_family) {
349         case AF_UNIX: {
350             struct target_sockaddr_un *un = (struct target_sockaddr_un *)sa;
351             int i;
352             qemu_log("{sun_family=AF_UNIX,sun_path=\"");
353             for (i = 0; i < addrlen -
354                             offsetof(struct target_sockaddr_un, sun_path) &&
355                  un->sun_path[i]; i++) {
356                 qemu_log("%c", un->sun_path[i]);
357             }
358             qemu_log("\"}");
359             break;
360         }
361         case AF_INET: {
362             struct target_sockaddr_in *in = (struct target_sockaddr_in *)sa;
363             uint8_t *c = (uint8_t *)&in->sin_addr.s_addr;
364             qemu_log("{sin_family=AF_INET,sin_port=htons(%d),",
365                      ntohs(in->sin_port));
366             qemu_log("sin_addr=inet_addr(\"%d.%d.%d.%d\")",
367                      c[0], c[1], c[2], c[3]);
368             qemu_log("}");
369             break;
370         }
371         case AF_PACKET: {
372             struct target_sockaddr_ll *ll = (struct target_sockaddr_ll *)sa;
373             uint8_t *c = (uint8_t *)&ll->sll_addr;
374             qemu_log("{sll_family=AF_PACKET,"
375                      "sll_protocol=htons(0x%04x),if%d,pkttype=",
376                      ntohs(ll->sll_protocol), ll->sll_ifindex);
377             switch (ll->sll_pkttype) {
378             case PACKET_HOST:
379                 qemu_log("PACKET_HOST");
380                 break;
381             case PACKET_BROADCAST:
382                 qemu_log("PACKET_BROADCAST");
383                 break;
384             case PACKET_MULTICAST:
385                 qemu_log("PACKET_MULTICAST");
386                 break;
387             case PACKET_OTHERHOST:
388                 qemu_log("PACKET_OTHERHOST");
389                 break;
390             case PACKET_OUTGOING:
391                 qemu_log("PACKET_OUTGOING");
392                 break;
393             default:
394                 qemu_log("%d", ll->sll_pkttype);
395                 break;
396             }
397             qemu_log(",sll_addr=%02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x",
398                      c[0], c[1], c[2], c[3], c[4], c[5], c[6], c[7]);
399             qemu_log("}");
400             break;
401         }
402         case AF_NETLINK: {
403             struct target_sockaddr_nl *nl = (struct target_sockaddr_nl *)sa;
404             qemu_log("{nl_family=AF_NETLINK,nl_pid=%u,nl_groups=%u}",
405                      tswap32(nl->nl_pid), tswap32(nl->nl_groups));
406             break;
407         }
408         default:
409             qemu_log("{sa_family=%d, sa_data={", sa->sa_family);
410             for (i = 0; i < 13; i++) {
411                 qemu_log("%02x, ", sa->sa_data[i]);
412             }
413             qemu_log("%02x}", sa->sa_data[i]);
414             qemu_log("}");
415             break;
416         }
417         unlock_user(sa, addr, 0);
418     } else {
419         print_raw_param("0x"TARGET_ABI_FMT_lx, addr, 0);
420     }
421     qemu_log(", "TARGET_ABI_FMT_ld"%s", addrlen, get_comma(last));
422 }
423 
424 static void
425 print_socket_domain(int domain)
426 {
427     switch (domain) {
428     case PF_UNIX:
429         qemu_log("PF_UNIX");
430         break;
431     case PF_INET:
432         qemu_log("PF_INET");
433         break;
434     case PF_NETLINK:
435         qemu_log("PF_NETLINK");
436         break;
437     case PF_PACKET:
438         qemu_log("PF_PACKET");
439         break;
440     default:
441         qemu_log("%d", domain);
442         break;
443     }
444 }
445 
446 static void
447 print_socket_type(int type)
448 {
449     switch (type & TARGET_SOCK_TYPE_MASK) {
450     case TARGET_SOCK_DGRAM:
451         qemu_log("SOCK_DGRAM");
452         break;
453     case TARGET_SOCK_STREAM:
454         qemu_log("SOCK_STREAM");
455         break;
456     case TARGET_SOCK_RAW:
457         qemu_log("SOCK_RAW");
458         break;
459     case TARGET_SOCK_RDM:
460         qemu_log("SOCK_RDM");
461         break;
462     case TARGET_SOCK_SEQPACKET:
463         qemu_log("SOCK_SEQPACKET");
464         break;
465     case TARGET_SOCK_PACKET:
466         qemu_log("SOCK_PACKET");
467         break;
468     }
469     if (type & TARGET_SOCK_CLOEXEC) {
470         qemu_log("|SOCK_CLOEXEC");
471     }
472     if (type & TARGET_SOCK_NONBLOCK) {
473         qemu_log("|SOCK_NONBLOCK");
474     }
475 }
476 
477 static void
478 print_socket_protocol(int domain, int type, int protocol)
479 {
480     if (domain == AF_PACKET ||
481         (domain == AF_INET && type == TARGET_SOCK_PACKET)) {
482         switch (protocol) {
483         case 0x0003:
484             qemu_log("ETH_P_ALL");
485             break;
486         default:
487             qemu_log("%d", protocol);
488         }
489         return;
490     }
491 
492     if (domain == PF_NETLINK) {
493         switch (protocol) {
494         case NETLINK_ROUTE:
495             qemu_log("NETLINK_ROUTE");
496             break;
497         case NETLINK_AUDIT:
498             qemu_log("NETLINK_AUDIT");
499             break;
500         case NETLINK_NETFILTER:
501             qemu_log("NETLINK_NETFILTER");
502             break;
503         case NETLINK_KOBJECT_UEVENT:
504             qemu_log("NETLINK_KOBJECT_UEVENT");
505             break;
506         case NETLINK_RDMA:
507             qemu_log("NETLINK_RDMA");
508             break;
509         case NETLINK_CRYPTO:
510             qemu_log("NETLINK_CRYPTO");
511             break;
512         default:
513             qemu_log("%d", protocol);
514             break;
515         }
516         return;
517     }
518 
519     switch (protocol) {
520     case IPPROTO_IP:
521         qemu_log("IPPROTO_IP");
522         break;
523     case IPPROTO_TCP:
524         qemu_log("IPPROTO_TCP");
525         break;
526     case IPPROTO_UDP:
527         qemu_log("IPPROTO_UDP");
528         break;
529     case IPPROTO_RAW:
530         qemu_log("IPPROTO_RAW");
531         break;
532     default:
533         qemu_log("%d", protocol);
534         break;
535     }
536 }
537 
538 
539 #ifdef TARGET_NR__newselect
540 static void
541 print_fdset(int n, abi_ulong target_fds_addr)
542 {
543     int i;
544     int first = 1;
545 
546     qemu_log("[");
547     if( target_fds_addr ) {
548         abi_long *target_fds;
549 
550         target_fds = lock_user(VERIFY_READ,
551                                target_fds_addr,
552                                sizeof(*target_fds)*(n / TARGET_ABI_BITS + 1),
553                                1);
554 
555         if (!target_fds)
556             return;
557 
558         for (i=n; i>=0; i--) {
559             if ((tswapal(target_fds[i / TARGET_ABI_BITS]) >>
560                 (i & (TARGET_ABI_BITS - 1))) & 1) {
561                 qemu_log("%s%d", get_comma(first), i);
562                 first = 0;
563             }
564         }
565         unlock_user(target_fds, target_fds_addr, 0);
566     }
567     qemu_log("]");
568 }
569 #endif
570 
571 #ifdef TARGET_NR_clock_adjtime
572 /* IDs of the various system clocks */
573 #define TARGET_CLOCK_REALTIME              0
574 #define TARGET_CLOCK_MONOTONIC             1
575 #define TARGET_CLOCK_PROCESS_CPUTIME_ID    2
576 #define TARGET_CLOCK_THREAD_CPUTIME_ID     3
577 #define TARGET_CLOCK_MONOTONIC_RAW         4
578 #define TARGET_CLOCK_REALTIME_COARSE       5
579 #define TARGET_CLOCK_MONOTONIC_COARSE      6
580 #define TARGET_CLOCK_BOOTTIME              7
581 #define TARGET_CLOCK_REALTIME_ALARM        8
582 #define TARGET_CLOCK_BOOTTIME_ALARM        9
583 #define TARGET_CLOCK_SGI_CYCLE             10
584 #define TARGET_CLOCK_TAI                   11
585 
586 static void
587 print_clockid(int clockid, int last)
588 {
589     switch (clockid) {
590     case TARGET_CLOCK_REALTIME:
591         qemu_log("CLOCK_REALTIME");
592         break;
593     case TARGET_CLOCK_MONOTONIC:
594         qemu_log("CLOCK_MONOTONIC");
595         break;
596     case TARGET_CLOCK_PROCESS_CPUTIME_ID:
597         qemu_log("CLOCK_PROCESS_CPUTIME_ID");
598         break;
599     case TARGET_CLOCK_THREAD_CPUTIME_ID:
600         qemu_log("CLOCK_THREAD_CPUTIME_ID");
601         break;
602     case TARGET_CLOCK_MONOTONIC_RAW:
603         qemu_log("CLOCK_MONOTONIC_RAW");
604         break;
605     case TARGET_CLOCK_REALTIME_COARSE:
606         qemu_log("CLOCK_REALTIME_COARSE");
607         break;
608     case TARGET_CLOCK_MONOTONIC_COARSE:
609         qemu_log("CLOCK_MONOTONIC_COARSE");
610         break;
611     case TARGET_CLOCK_BOOTTIME:
612         qemu_log("CLOCK_BOOTTIME");
613         break;
614     case TARGET_CLOCK_REALTIME_ALARM:
615         qemu_log("CLOCK_REALTIME_ALARM");
616         break;
617     case TARGET_CLOCK_BOOTTIME_ALARM:
618         qemu_log("CLOCK_BOOTTIME_ALARM");
619         break;
620     case TARGET_CLOCK_SGI_CYCLE:
621         qemu_log("CLOCK_SGI_CYCLE");
622         break;
623     case TARGET_CLOCK_TAI:
624         qemu_log("CLOCK_TAI");
625         break;
626     default:
627         qemu_log("%d", clockid);
628         break;
629     }
630     qemu_log("%s", get_comma(last));
631 }
632 #endif
633 
634 /*
635  * Sysycall specific output functions
636  */
637 
638 /* select */
639 #ifdef TARGET_NR__newselect
640 static void
641 print_newselect(const struct syscallname *name,
642                 abi_long arg1, abi_long arg2, abi_long arg3,
643                 abi_long arg4, abi_long arg5, abi_long arg6)
644 {
645     print_syscall_prologue(name);
646     print_fdset(arg1, arg2);
647     qemu_log(",");
648     print_fdset(arg1, arg3);
649     qemu_log(",");
650     print_fdset(arg1, arg4);
651     qemu_log(",");
652     print_timeval(arg5, 1);
653     print_syscall_epilogue(name);
654 }
655 #endif
656 
657 #ifdef TARGET_NR_semctl
658 static void
659 print_semctl(const struct syscallname *name,
660              abi_long arg1, abi_long arg2, abi_long arg3,
661              abi_long arg4, abi_long arg5, abi_long arg6)
662 {
663     qemu_log("%s(" TARGET_ABI_FMT_ld "," TARGET_ABI_FMT_ld ",",
664              name->name, arg1, arg2);
665     print_ipc_cmd(arg3);
666     qemu_log(",0x" TARGET_ABI_FMT_lx ")", arg4);
667 }
668 #endif
669 
670 static void
671 print_execve(const struct syscallname *name,
672              abi_long arg1, abi_long arg2, abi_long arg3,
673              abi_long arg4, abi_long arg5, abi_long arg6)
674 {
675     abi_ulong arg_ptr_addr;
676     char *s;
677 
678     if (!(s = lock_user_string(arg1)))
679         return;
680     qemu_log("%s(\"%s\",{", name->name, s);
681     unlock_user(s, arg1, 0);
682 
683     for (arg_ptr_addr = arg2; ; arg_ptr_addr += sizeof(abi_ulong)) {
684         abi_ulong *arg_ptr, arg_addr;
685 
686         arg_ptr = lock_user(VERIFY_READ, arg_ptr_addr, sizeof(abi_ulong), 1);
687         if (!arg_ptr)
688             return;
689     arg_addr = tswapal(*arg_ptr);
690         unlock_user(arg_ptr, arg_ptr_addr, 0);
691         if (!arg_addr)
692             break;
693         if ((s = lock_user_string(arg_addr))) {
694             qemu_log("\"%s\",", s);
695             unlock_user(s, arg_addr, 0);
696         }
697     }
698 
699     qemu_log("NULL})");
700 }
701 
702 #ifdef TARGET_NR_ipc
703 static void
704 print_ipc(const struct syscallname *name,
705           abi_long arg1, abi_long arg2, abi_long arg3,
706           abi_long arg4, abi_long arg5, abi_long arg6)
707 {
708     switch(arg1) {
709     case IPCOP_semctl:
710         qemu_log("semctl(" TARGET_ABI_FMT_ld "," TARGET_ABI_FMT_ld ",",
711                  arg1, arg2);
712         print_ipc_cmd(arg3);
713         qemu_log(",0x" TARGET_ABI_FMT_lx ")", arg4);
714         break;
715     default:
716         qemu_log(("%s("
717                   TARGET_ABI_FMT_ld ","
718                   TARGET_ABI_FMT_ld ","
719                   TARGET_ABI_FMT_ld ","
720                   TARGET_ABI_FMT_ld
721                   ")"),
722                  name->name, arg1, arg2, arg3, arg4);
723     }
724 }
725 #endif
726 
727 /*
728  * Variants for the return value output function
729  */
730 
731 static bool
732 print_syscall_err(abi_long ret)
733 {
734     const char *errstr;
735 
736     qemu_log(" = ");
737     if (ret < 0) {
738         errstr = target_strerror(-ret);
739         if (errstr) {
740             qemu_log("-1 errno=%d (%s)", (int)-ret, errstr);
741             return true;
742         }
743     }
744     return false;
745 }
746 
747 static void
748 print_syscall_ret_addr(const struct syscallname *name, abi_long ret,
749                        abi_long arg0, abi_long arg1, abi_long arg2,
750                        abi_long arg3, abi_long arg4, abi_long arg5)
751 {
752     if (!print_syscall_err(ret)) {
753         qemu_log("0x" TARGET_ABI_FMT_lx, ret);
754     }
755     qemu_log("\n");
756 }
757 
758 #if 0 /* currently unused */
759 static void
760 print_syscall_ret_raw(struct syscallname *name, abi_long ret)
761 {
762         qemu_log(" = 0x" TARGET_ABI_FMT_lx "\n", ret);
763 }
764 #endif
765 
766 #ifdef TARGET_NR__newselect
767 static void
768 print_syscall_ret_newselect(const struct syscallname *name, abi_long ret,
769                             abi_long arg0, abi_long arg1, abi_long arg2,
770                             abi_long arg3, abi_long arg4, abi_long arg5)
771 {
772     if (!print_syscall_err(ret)) {
773         qemu_log(" = 0x" TARGET_ABI_FMT_lx " (", ret);
774         print_fdset(arg0, arg1);
775         qemu_log(",");
776         print_fdset(arg0, arg2);
777         qemu_log(",");
778         print_fdset(arg0, arg3);
779         qemu_log(",");
780         print_timeval(arg4, 1);
781         qemu_log(")");
782     }
783 
784     qemu_log("\n");
785 }
786 #endif
787 
788 /* special meanings of adjtimex()' non-negative return values */
789 #define TARGET_TIME_OK       0   /* clock synchronized, no leap second */
790 #define TARGET_TIME_INS      1   /* insert leap second */
791 #define TARGET_TIME_DEL      2   /* delete leap second */
792 #define TARGET_TIME_OOP      3   /* leap second in progress */
793 #define TARGET_TIME_WAIT     4   /* leap second has occurred */
794 #define TARGET_TIME_ERROR    5   /* clock not synchronized */
795 #ifdef TARGET_NR_adjtimex
796 static void
797 print_syscall_ret_adjtimex(const struct syscallname *name, abi_long ret,
798                            abi_long arg0, abi_long arg1, abi_long arg2,
799                            abi_long arg3, abi_long arg4, abi_long arg5)
800 {
801     if (!print_syscall_err(ret)) {
802         qemu_log(TARGET_ABI_FMT_ld, ret);
803         switch (ret) {
804         case TARGET_TIME_OK:
805             qemu_log(" TIME_OK (clock synchronized, no leap second)");
806             break;
807         case TARGET_TIME_INS:
808             qemu_log(" TIME_INS (insert leap second)");
809             break;
810         case TARGET_TIME_DEL:
811             qemu_log(" TIME_DEL (delete leap second)");
812             break;
813         case TARGET_TIME_OOP:
814             qemu_log(" TIME_OOP (leap second in progress)");
815             break;
816         case TARGET_TIME_WAIT:
817             qemu_log(" TIME_WAIT (leap second has occurred)");
818             break;
819         case TARGET_TIME_ERROR:
820             qemu_log(" TIME_ERROR (clock not synchronized)");
821             break;
822         }
823     }
824 
825     qemu_log("\n");
826 }
827 #endif
828 
829 #if defined(TARGET_NR_listxattr) || defined(TARGET_NR_llistxattr) \
830  || defined(TARGGET_NR_flistxattr)
831 static void
832 print_syscall_ret_listxattr(const struct syscallname *name, abi_long ret,
833                             abi_long arg0, abi_long arg1, abi_long arg2,
834                             abi_long arg3, abi_long arg4, abi_long arg5)
835 {
836     if (!print_syscall_err(ret)) {
837         qemu_log(TARGET_ABI_FMT_ld, ret);
838         qemu_log(" (list = ");
839         if (arg1 != 0) {
840             abi_long attr = arg1;
841             while (ret) {
842                 if (attr != arg1) {
843                     qemu_log(",");
844                 }
845                 print_string(attr, 1);
846                 ret -= target_strlen(attr) + 1;
847                 attr += target_strlen(attr) + 1;
848             }
849         } else {
850             qemu_log("NULL");
851         }
852         qemu_log(")");
853     }
854 
855     qemu_log("\n");
856 }
857 #define print_syscall_ret_llistxattr     print_syscall_ret_listxattr
858 #define print_syscall_ret_flistxattr     print_syscall_ret_listxattr
859 #endif
860 
861 #ifdef TARGET_NR_ioctl
862 static void
863 print_syscall_ret_ioctl(const struct syscallname *name, abi_long ret,
864                         abi_long arg0, abi_long arg1, abi_long arg2,
865                         abi_long arg3, abi_long arg4, abi_long arg5)
866 {
867     if (!print_syscall_err(ret)) {
868         qemu_log(TARGET_ABI_FMT_ld, ret);
869 
870         const IOCTLEntry *ie;
871         const argtype *arg_type;
872         void *argptr;
873         int target_size;
874 
875         for (ie = ioctl_entries; ie->target_cmd != 0; ie++) {
876             if (ie->target_cmd == arg1) {
877                 break;
878             }
879         }
880 
881         if (ie->target_cmd == arg1 &&
882            (ie->access == IOC_R || ie->access == IOC_RW)) {
883             arg_type = ie->arg_type;
884             qemu_log(" (");
885             arg_type++;
886             target_size = thunk_type_size(arg_type, 0);
887             argptr = lock_user(VERIFY_READ, arg2, target_size, 1);
888             if (argptr) {
889                 thunk_print(argptr, arg_type);
890                 unlock_user(argptr, arg2, target_size);
891             } else {
892                 print_pointer(arg2, 1);
893             }
894             qemu_log(")");
895         }
896     }
897     qemu_log("\n");
898 }
899 #endif
900 
901 UNUSED static struct flags access_flags[] = {
902     FLAG_GENERIC(F_OK),
903     FLAG_GENERIC(R_OK),
904     FLAG_GENERIC(W_OK),
905     FLAG_GENERIC(X_OK),
906     FLAG_END,
907 };
908 
909 UNUSED static struct flags at_file_flags[] = {
910 #ifdef AT_EACCESS
911     FLAG_GENERIC(AT_EACCESS),
912 #endif
913 #ifdef AT_SYMLINK_NOFOLLOW
914     FLAG_GENERIC(AT_SYMLINK_NOFOLLOW),
915 #endif
916     FLAG_END,
917 };
918 
919 UNUSED static struct flags unlinkat_flags[] = {
920 #ifdef AT_REMOVEDIR
921     FLAG_GENERIC(AT_REMOVEDIR),
922 #endif
923     FLAG_END,
924 };
925 
926 UNUSED static struct flags mode_flags[] = {
927     FLAG_GENERIC(S_IFSOCK),
928     FLAG_GENERIC(S_IFLNK),
929     FLAG_GENERIC(S_IFREG),
930     FLAG_GENERIC(S_IFBLK),
931     FLAG_GENERIC(S_IFDIR),
932     FLAG_GENERIC(S_IFCHR),
933     FLAG_GENERIC(S_IFIFO),
934     FLAG_END,
935 };
936 
937 UNUSED static struct flags open_access_flags[] = {
938     FLAG_TARGET(O_RDONLY),
939     FLAG_TARGET(O_WRONLY),
940     FLAG_TARGET(O_RDWR),
941     FLAG_END,
942 };
943 
944 UNUSED static struct flags open_flags[] = {
945     FLAG_TARGET(O_APPEND),
946     FLAG_TARGET(O_CREAT),
947     FLAG_TARGET(O_DIRECTORY),
948     FLAG_TARGET(O_EXCL),
949     FLAG_TARGET(O_LARGEFILE),
950     FLAG_TARGET(O_NOCTTY),
951     FLAG_TARGET(O_NOFOLLOW),
952     FLAG_TARGET(O_NONBLOCK),      /* also O_NDELAY */
953     FLAG_TARGET(O_DSYNC),
954     FLAG_TARGET(__O_SYNC),
955     FLAG_TARGET(O_TRUNC),
956 #ifdef O_DIRECT
957     FLAG_TARGET(O_DIRECT),
958 #endif
959 #ifdef O_NOATIME
960     FLAG_TARGET(O_NOATIME),
961 #endif
962 #ifdef O_CLOEXEC
963     FLAG_TARGET(O_CLOEXEC),
964 #endif
965 #ifdef O_PATH
966     FLAG_TARGET(O_PATH),
967 #endif
968 #ifdef O_TMPFILE
969     FLAG_TARGET(O_TMPFILE),
970     FLAG_TARGET(__O_TMPFILE),
971 #endif
972     FLAG_END,
973 };
974 
975 UNUSED static struct flags mount_flags[] = {
976 #ifdef MS_BIND
977     FLAG_GENERIC(MS_BIND),
978 #endif
979 #ifdef MS_DIRSYNC
980     FLAG_GENERIC(MS_DIRSYNC),
981 #endif
982     FLAG_GENERIC(MS_MANDLOCK),
983 #ifdef MS_MOVE
984     FLAG_GENERIC(MS_MOVE),
985 #endif
986     FLAG_GENERIC(MS_NOATIME),
987     FLAG_GENERIC(MS_NODEV),
988     FLAG_GENERIC(MS_NODIRATIME),
989     FLAG_GENERIC(MS_NOEXEC),
990     FLAG_GENERIC(MS_NOSUID),
991     FLAG_GENERIC(MS_RDONLY),
992 #ifdef MS_RELATIME
993     FLAG_GENERIC(MS_RELATIME),
994 #endif
995     FLAG_GENERIC(MS_REMOUNT),
996     FLAG_GENERIC(MS_SYNCHRONOUS),
997     FLAG_END,
998 };
999 
1000 UNUSED static struct flags umount2_flags[] = {
1001 #ifdef MNT_FORCE
1002     FLAG_GENERIC(MNT_FORCE),
1003 #endif
1004 #ifdef MNT_DETACH
1005     FLAG_GENERIC(MNT_DETACH),
1006 #endif
1007 #ifdef MNT_EXPIRE
1008     FLAG_GENERIC(MNT_EXPIRE),
1009 #endif
1010     FLAG_END,
1011 };
1012 
1013 UNUSED static struct flags mmap_prot_flags[] = {
1014     FLAG_GENERIC(PROT_NONE),
1015     FLAG_GENERIC(PROT_EXEC),
1016     FLAG_GENERIC(PROT_READ),
1017     FLAG_GENERIC(PROT_WRITE),
1018     FLAG_TARGET(PROT_SEM),
1019     FLAG_GENERIC(PROT_GROWSDOWN),
1020     FLAG_GENERIC(PROT_GROWSUP),
1021     FLAG_END,
1022 };
1023 
1024 UNUSED static struct flags mmap_flags[] = {
1025     FLAG_TARGET(MAP_SHARED),
1026     FLAG_TARGET(MAP_PRIVATE),
1027     FLAG_TARGET(MAP_ANONYMOUS),
1028     FLAG_TARGET(MAP_DENYWRITE),
1029     FLAG_TARGET(MAP_FIXED),
1030     FLAG_TARGET(MAP_GROWSDOWN),
1031     FLAG_TARGET(MAP_EXECUTABLE),
1032 #ifdef MAP_LOCKED
1033     FLAG_TARGET(MAP_LOCKED),
1034 #endif
1035 #ifdef MAP_NONBLOCK
1036     FLAG_TARGET(MAP_NONBLOCK),
1037 #endif
1038     FLAG_TARGET(MAP_NORESERVE),
1039 #ifdef MAP_POPULATE
1040     FLAG_TARGET(MAP_POPULATE),
1041 #endif
1042 #ifdef TARGET_MAP_UNINITIALIZED
1043     FLAG_TARGET(MAP_UNINITIALIZED),
1044 #endif
1045     FLAG_END,
1046 };
1047 
1048 UNUSED static struct flags clone_flags[] = {
1049     FLAG_GENERIC(CLONE_VM),
1050     FLAG_GENERIC(CLONE_FS),
1051     FLAG_GENERIC(CLONE_FILES),
1052     FLAG_GENERIC(CLONE_SIGHAND),
1053     FLAG_GENERIC(CLONE_PTRACE),
1054     FLAG_GENERIC(CLONE_VFORK),
1055     FLAG_GENERIC(CLONE_PARENT),
1056     FLAG_GENERIC(CLONE_THREAD),
1057     FLAG_GENERIC(CLONE_NEWNS),
1058     FLAG_GENERIC(CLONE_SYSVSEM),
1059     FLAG_GENERIC(CLONE_SETTLS),
1060     FLAG_GENERIC(CLONE_PARENT_SETTID),
1061     FLAG_GENERIC(CLONE_CHILD_CLEARTID),
1062     FLAG_GENERIC(CLONE_DETACHED),
1063     FLAG_GENERIC(CLONE_UNTRACED),
1064     FLAG_GENERIC(CLONE_CHILD_SETTID),
1065 #if defined(CLONE_NEWUTS)
1066     FLAG_GENERIC(CLONE_NEWUTS),
1067 #endif
1068 #if defined(CLONE_NEWIPC)
1069     FLAG_GENERIC(CLONE_NEWIPC),
1070 #endif
1071 #if defined(CLONE_NEWUSER)
1072     FLAG_GENERIC(CLONE_NEWUSER),
1073 #endif
1074 #if defined(CLONE_NEWPID)
1075     FLAG_GENERIC(CLONE_NEWPID),
1076 #endif
1077 #if defined(CLONE_NEWNET)
1078     FLAG_GENERIC(CLONE_NEWNET),
1079 #endif
1080 #if defined(CLONE_IO)
1081     FLAG_GENERIC(CLONE_IO),
1082 #endif
1083     FLAG_END,
1084 };
1085 
1086 UNUSED static struct flags msg_flags[] = {
1087     /* send */
1088     FLAG_GENERIC(MSG_CONFIRM),
1089     FLAG_GENERIC(MSG_DONTROUTE),
1090     FLAG_GENERIC(MSG_DONTWAIT),
1091     FLAG_GENERIC(MSG_EOR),
1092     FLAG_GENERIC(MSG_MORE),
1093     FLAG_GENERIC(MSG_NOSIGNAL),
1094     FLAG_GENERIC(MSG_OOB),
1095     /* recv */
1096     FLAG_GENERIC(MSG_CMSG_CLOEXEC),
1097     FLAG_GENERIC(MSG_ERRQUEUE),
1098     FLAG_GENERIC(MSG_PEEK),
1099     FLAG_GENERIC(MSG_TRUNC),
1100     FLAG_GENERIC(MSG_WAITALL),
1101     /* recvmsg */
1102     FLAG_GENERIC(MSG_CTRUNC),
1103     FLAG_END,
1104 };
1105 
1106 UNUSED static struct flags statx_flags[] = {
1107 #ifdef AT_EMPTY_PATH
1108     FLAG_GENERIC(AT_EMPTY_PATH),
1109 #endif
1110 #ifdef AT_NO_AUTOMOUNT
1111     FLAG_GENERIC(AT_NO_AUTOMOUNT),
1112 #endif
1113 #ifdef AT_SYMLINK_NOFOLLOW
1114     FLAG_GENERIC(AT_SYMLINK_NOFOLLOW),
1115 #endif
1116 #ifdef AT_STATX_SYNC_AS_STAT
1117     FLAG_GENERIC(AT_STATX_SYNC_AS_STAT),
1118 #endif
1119 #ifdef AT_STATX_FORCE_SYNC
1120     FLAG_GENERIC(AT_STATX_FORCE_SYNC),
1121 #endif
1122 #ifdef AT_STATX_DONT_SYNC
1123     FLAG_GENERIC(AT_STATX_DONT_SYNC),
1124 #endif
1125     FLAG_END,
1126 };
1127 
1128 UNUSED static struct flags statx_mask[] = {
1129 /* This must come first, because it includes everything.  */
1130 #ifdef STATX_ALL
1131     FLAG_GENERIC(STATX_ALL),
1132 #endif
1133 /* This must come second; it includes everything except STATX_BTIME.  */
1134 #ifdef STATX_BASIC_STATS
1135     FLAG_GENERIC(STATX_BASIC_STATS),
1136 #endif
1137 #ifdef STATX_TYPE
1138     FLAG_GENERIC(STATX_TYPE),
1139 #endif
1140 #ifdef STATX_MODE
1141     FLAG_GENERIC(STATX_MODE),
1142 #endif
1143 #ifdef STATX_NLINK
1144     FLAG_GENERIC(STATX_NLINK),
1145 #endif
1146 #ifdef STATX_UID
1147     FLAG_GENERIC(STATX_UID),
1148 #endif
1149 #ifdef STATX_GID
1150     FLAG_GENERIC(STATX_GID),
1151 #endif
1152 #ifdef STATX_ATIME
1153     FLAG_GENERIC(STATX_ATIME),
1154 #endif
1155 #ifdef STATX_MTIME
1156     FLAG_GENERIC(STATX_MTIME),
1157 #endif
1158 #ifdef STATX_CTIME
1159     FLAG_GENERIC(STATX_CTIME),
1160 #endif
1161 #ifdef STATX_INO
1162     FLAG_GENERIC(STATX_INO),
1163 #endif
1164 #ifdef STATX_SIZE
1165     FLAG_GENERIC(STATX_SIZE),
1166 #endif
1167 #ifdef STATX_BLOCKS
1168     FLAG_GENERIC(STATX_BLOCKS),
1169 #endif
1170 #ifdef STATX_BTIME
1171     FLAG_GENERIC(STATX_BTIME),
1172 #endif
1173     FLAG_END,
1174 };
1175 
1176 UNUSED static struct flags falloc_flags[] = {
1177     FLAG_GENERIC(FALLOC_FL_KEEP_SIZE),
1178     FLAG_GENERIC(FALLOC_FL_PUNCH_HOLE),
1179 #ifdef FALLOC_FL_NO_HIDE_STALE
1180     FLAG_GENERIC(FALLOC_FL_NO_HIDE_STALE),
1181 #endif
1182 #ifdef FALLOC_FL_COLLAPSE_RANGE
1183     FLAG_GENERIC(FALLOC_FL_COLLAPSE_RANGE),
1184 #endif
1185 #ifdef FALLOC_FL_ZERO_RANGE
1186     FLAG_GENERIC(FALLOC_FL_ZERO_RANGE),
1187 #endif
1188 #ifdef FALLOC_FL_INSERT_RANGE
1189     FLAG_GENERIC(FALLOC_FL_INSERT_RANGE),
1190 #endif
1191 #ifdef FALLOC_FL_UNSHARE_RANGE
1192     FLAG_GENERIC(FALLOC_FL_UNSHARE_RANGE),
1193 #endif
1194 };
1195 
1196 /*
1197  * print_xxx utility functions.  These are used to print syscall
1198  * parameters in certain format.  All of these have parameter
1199  * named 'last'.  This parameter is used to add comma to output
1200  * when last == 0.
1201  */
1202 
1203 static const char *
1204 get_comma(int last)
1205 {
1206     return ((last) ? "" : ",");
1207 }
1208 
1209 static void
1210 print_flags(const struct flags *f, abi_long flags, int last)
1211 {
1212     const char *sep = "";
1213     int n;
1214 
1215     if ((flags == 0) && (f->f_value == 0)) {
1216         qemu_log("%s%s", f->f_string, get_comma(last));
1217         return;
1218     }
1219     for (n = 0; f->f_string != NULL; f++) {
1220         if ((f->f_value != 0) && ((flags & f->f_value) == f->f_value)) {
1221             qemu_log("%s%s", sep, f->f_string);
1222             flags &= ~f->f_value;
1223             sep = "|";
1224             n++;
1225         }
1226     }
1227 
1228     if (n > 0) {
1229         /* print rest of the flags as numeric */
1230         if (flags != 0) {
1231             qemu_log("%s%#x%s", sep, (unsigned int)flags, get_comma(last));
1232         } else {
1233             qemu_log("%s", get_comma(last));
1234         }
1235     } else {
1236         /* no string version of flags found, print them in hex then */
1237         qemu_log("%#x%s", (unsigned int)flags, get_comma(last));
1238     }
1239 }
1240 
1241 static void
1242 print_at_dirfd(abi_long dirfd, int last)
1243 {
1244 #ifdef AT_FDCWD
1245     if (dirfd == AT_FDCWD) {
1246         qemu_log("AT_FDCWD%s", get_comma(last));
1247         return;
1248     }
1249 #endif
1250     qemu_log("%d%s", (int)dirfd, get_comma(last));
1251 }
1252 
1253 static void
1254 print_file_mode(abi_long mode, int last)
1255 {
1256     const char *sep = "";
1257     const struct flags *m;
1258 
1259     for (m = &mode_flags[0]; m->f_string != NULL; m++) {
1260         if ((m->f_value & mode) == m->f_value) {
1261             qemu_log("%s%s", m->f_string, sep);
1262             sep = "|";
1263             mode &= ~m->f_value;
1264             break;
1265         }
1266     }
1267 
1268     mode &= ~S_IFMT;
1269     /* print rest of the mode as octal */
1270     if (mode != 0)
1271         qemu_log("%s%#o", sep, (unsigned int)mode);
1272 
1273     qemu_log("%s", get_comma(last));
1274 }
1275 
1276 static void
1277 print_open_flags(abi_long flags, int last)
1278 {
1279     print_flags(open_access_flags, flags & TARGET_O_ACCMODE, 1);
1280     flags &= ~TARGET_O_ACCMODE;
1281     if (flags == 0) {
1282         qemu_log("%s", get_comma(last));
1283         return;
1284     }
1285     qemu_log("|");
1286     print_flags(open_flags, flags, last);
1287 }
1288 
1289 static void
1290 print_syscall_prologue(const struct syscallname *sc)
1291 {
1292     qemu_log("%s(", sc->name);
1293 }
1294 
1295 /*ARGSUSED*/
1296 static void
1297 print_syscall_epilogue(const struct syscallname *sc)
1298 {
1299     (void)sc;
1300     qemu_log(")");
1301 }
1302 
1303 static void
1304 print_string(abi_long addr, int last)
1305 {
1306     char *s;
1307 
1308     if ((s = lock_user_string(addr)) != NULL) {
1309         qemu_log("\"%s\"%s", s, get_comma(last));
1310         unlock_user(s, addr, 0);
1311     } else {
1312         /* can't get string out of it, so print it as pointer */
1313         print_pointer(addr, last);
1314     }
1315 }
1316 
1317 #define MAX_PRINT_BUF 40
1318 static void
1319 print_buf(abi_long addr, abi_long len, int last)
1320 {
1321     uint8_t *s;
1322     int i;
1323 
1324     s = lock_user(VERIFY_READ, addr, len, 1);
1325     if (s) {
1326         qemu_log("\"");
1327         for (i = 0; i < MAX_PRINT_BUF && i < len; i++) {
1328             if (isprint(s[i])) {
1329                 qemu_log("%c", s[i]);
1330             } else {
1331                 qemu_log("\\%o", s[i]);
1332             }
1333         }
1334         qemu_log("\"");
1335         if (i != len) {
1336             qemu_log("...");
1337         }
1338         if (!last) {
1339             qemu_log(",");
1340         }
1341         unlock_user(s, addr, 0);
1342     } else {
1343         print_pointer(addr, last);
1344     }
1345 }
1346 
1347 /*
1348  * Prints out raw parameter using given format.  Caller needs
1349  * to do byte swapping if needed.
1350  */
1351 static void
1352 print_raw_param(const char *fmt, abi_long param, int last)
1353 {
1354     char format[64];
1355 
1356     (void) snprintf(format, sizeof (format), "%s%s", fmt, get_comma(last));
1357     qemu_log(format, param);
1358 }
1359 
1360 static void
1361 print_pointer(abi_long p, int last)
1362 {
1363     if (p == 0)
1364         qemu_log("NULL%s", get_comma(last));
1365     else
1366         qemu_log("0x" TARGET_ABI_FMT_lx "%s", p, get_comma(last));
1367 }
1368 
1369 /*
1370  * Reads 32-bit (int) number from guest address space from
1371  * address 'addr' and prints it.
1372  */
1373 static void
1374 print_number(abi_long addr, int last)
1375 {
1376     if (addr == 0) {
1377         qemu_log("NULL%s", get_comma(last));
1378     } else {
1379         int num;
1380 
1381         get_user_s32(num, addr);
1382         qemu_log("[%d]%s", num, get_comma(last));
1383     }
1384 }
1385 
1386 static void
1387 print_timeval(abi_ulong tv_addr, int last)
1388 {
1389     if( tv_addr ) {
1390         struct target_timeval *tv;
1391 
1392         tv = lock_user(VERIFY_READ, tv_addr, sizeof(*tv), 1);
1393         if (!tv) {
1394             print_pointer(tv_addr, last);
1395             return;
1396         }
1397         qemu_log("{" TARGET_ABI_FMT_ld "," TARGET_ABI_FMT_ld "}%s",
1398             tswapal(tv->tv_sec), tswapal(tv->tv_usec), get_comma(last));
1399         unlock_user(tv, tv_addr, 0);
1400     } else
1401         qemu_log("NULL%s", get_comma(last));
1402 }
1403 
1404 static void
1405 print_timezone(abi_ulong tz_addr, int last)
1406 {
1407     if (tz_addr) {
1408         struct target_timezone *tz;
1409 
1410         tz = lock_user(VERIFY_READ, tz_addr, sizeof(*tz), 1);
1411         if (!tz) {
1412             print_pointer(tz_addr, last);
1413             return;
1414         }
1415         qemu_log("{%d,%d}%s", tswap32(tz->tz_minuteswest),
1416                  tswap32(tz->tz_dsttime), get_comma(last));
1417         unlock_user(tz, tz_addr, 0);
1418     } else {
1419         qemu_log("NULL%s", get_comma(last));
1420     }
1421 }
1422 
1423 #undef UNUSED
1424 
1425 #ifdef TARGET_NR_accept
1426 static void
1427 print_accept(const struct syscallname *name,
1428     abi_long arg0, abi_long arg1, abi_long arg2,
1429     abi_long arg3, abi_long arg4, abi_long arg5)
1430 {
1431     print_syscall_prologue(name);
1432     print_raw_param("%d", arg0, 0);
1433     print_pointer(arg1, 0);
1434     print_number(arg2, 1);
1435     print_syscall_epilogue(name);
1436 }
1437 #endif
1438 
1439 #ifdef TARGET_NR_access
1440 static void
1441 print_access(const struct syscallname *name,
1442     abi_long arg0, abi_long arg1, abi_long arg2,
1443     abi_long arg3, abi_long arg4, abi_long arg5)
1444 {
1445     print_syscall_prologue(name);
1446     print_string(arg0, 0);
1447     print_flags(access_flags, arg1, 1);
1448     print_syscall_epilogue(name);
1449 }
1450 #endif
1451 
1452 #ifdef TARGET_NR_acct
1453 static void
1454 print_acct(const struct syscallname *name,
1455     abi_long arg0, abi_long arg1, abi_long arg2,
1456     abi_long arg3, abi_long arg4, abi_long arg5)
1457 {
1458     print_syscall_prologue(name);
1459     print_string(arg0, 1);
1460     print_syscall_epilogue(name);
1461 }
1462 #endif
1463 
1464 #ifdef TARGET_NR_brk
1465 static void
1466 print_brk(const struct syscallname *name,
1467     abi_long arg0, abi_long arg1, abi_long arg2,
1468     abi_long arg3, abi_long arg4, abi_long arg5)
1469 {
1470     print_syscall_prologue(name);
1471     print_pointer(arg0, 1);
1472     print_syscall_epilogue(name);
1473 }
1474 #endif
1475 
1476 #ifdef TARGET_NR_chdir
1477 static void
1478 print_chdir(const struct syscallname *name,
1479     abi_long arg0, abi_long arg1, abi_long arg2,
1480     abi_long arg3, abi_long arg4, abi_long arg5)
1481 {
1482     print_syscall_prologue(name);
1483     print_string(arg0, 1);
1484     print_syscall_epilogue(name);
1485 }
1486 #endif
1487 
1488 #ifdef TARGET_NR_chroot
1489 static void
1490 print_chroot(const struct syscallname *name,
1491     abi_long arg0, abi_long arg1, abi_long arg2,
1492     abi_long arg3, abi_long arg4, abi_long arg5)
1493 {
1494     print_syscall_prologue(name);
1495     print_string(arg0, 1);
1496     print_syscall_epilogue(name);
1497 }
1498 #endif
1499 
1500 #ifdef TARGET_NR_chmod
1501 static void
1502 print_chmod(const struct syscallname *name,
1503     abi_long arg0, abi_long arg1, abi_long arg2,
1504     abi_long arg3, abi_long arg4, abi_long arg5)
1505 {
1506     print_syscall_prologue(name);
1507     print_string(arg0, 0);
1508     print_file_mode(arg1, 1);
1509     print_syscall_epilogue(name);
1510 }
1511 #endif
1512 
1513 #if defined(TARGET_NR_chown) || defined(TARGET_NR_lchown)
1514 static void
1515 print_chown(const struct syscallname *name,
1516     abi_long arg0, abi_long arg1, abi_long arg2,
1517     abi_long arg3, abi_long arg4, abi_long arg5)
1518 {
1519     print_syscall_prologue(name);
1520     print_string(arg0, 0);
1521     print_raw_param("%d", arg1, 0);
1522     print_raw_param("%d", arg2, 1);
1523     print_syscall_epilogue(name);
1524 }
1525 #define print_lchown     print_chown
1526 #endif
1527 
1528 #ifdef TARGET_NR_clock_adjtime
1529 static void
1530 print_clock_adjtime(const struct syscallname *name,
1531     abi_long arg0, abi_long arg1, abi_long arg2,
1532     abi_long arg3, abi_long arg4, abi_long arg5)
1533 {
1534     print_syscall_prologue(name);
1535     print_clockid(arg0, 0);
1536     print_pointer(arg1, 1);
1537     print_syscall_epilogue(name);
1538 }
1539 #endif
1540 
1541 #ifdef TARGET_NR_clone
1542 static void do_print_clone(unsigned int flags, abi_ulong newsp,
1543                            abi_ulong parent_tidptr, target_ulong newtls,
1544                            abi_ulong child_tidptr)
1545 {
1546     print_flags(clone_flags, flags, 0);
1547     print_raw_param("child_stack=0x" TARGET_ABI_FMT_lx, newsp, 0);
1548     print_raw_param("parent_tidptr=0x" TARGET_ABI_FMT_lx, parent_tidptr, 0);
1549     print_raw_param("tls=0x" TARGET_ABI_FMT_lx, newtls, 0);
1550     print_raw_param("child_tidptr=0x" TARGET_ABI_FMT_lx, child_tidptr, 1);
1551 }
1552 
1553 static void
1554 print_clone(const struct syscallname *name,
1555     abi_long arg1, abi_long arg2, abi_long arg3,
1556     abi_long arg4, abi_long arg5, abi_long arg6)
1557 {
1558     print_syscall_prologue(name);
1559 #if defined(TARGET_MICROBLAZE)
1560     do_print_clone(arg1, arg2, arg4, arg6, arg5);
1561 #elif defined(TARGET_CLONE_BACKWARDS)
1562     do_print_clone(arg1, arg2, arg3, arg4, arg5);
1563 #elif defined(TARGET_CLONE_BACKWARDS2)
1564     do_print_clone(arg2, arg1, arg3, arg5, arg4);
1565 #else
1566     do_print_clone(arg1, arg2, arg3, arg5, arg4);
1567 #endif
1568     print_syscall_epilogue(name);
1569 }
1570 #endif
1571 
1572 #ifdef TARGET_NR_creat
1573 static void
1574 print_creat(const struct syscallname *name,
1575     abi_long arg0, abi_long arg1, abi_long arg2,
1576     abi_long arg3, abi_long arg4, abi_long arg5)
1577 {
1578     print_syscall_prologue(name);
1579     print_string(arg0, 0);
1580     print_file_mode(arg1, 1);
1581     print_syscall_epilogue(name);
1582 }
1583 #endif
1584 
1585 #ifdef TARGET_NR_execv
1586 static void
1587 print_execv(const struct syscallname *name,
1588     abi_long arg0, abi_long arg1, abi_long arg2,
1589     abi_long arg3, abi_long arg4, abi_long arg5)
1590 {
1591     print_syscall_prologue(name);
1592     print_string(arg0, 0);
1593     print_raw_param("0x" TARGET_ABI_FMT_lx, arg1, 1);
1594     print_syscall_epilogue(name);
1595 }
1596 #endif
1597 
1598 #ifdef TARGET_NR_faccessat
1599 static void
1600 print_faccessat(const struct syscallname *name,
1601     abi_long arg0, abi_long arg1, abi_long arg2,
1602     abi_long arg3, abi_long arg4, abi_long arg5)
1603 {
1604     print_syscall_prologue(name);
1605     print_at_dirfd(arg0, 0);
1606     print_string(arg1, 0);
1607     print_flags(access_flags, arg2, 0);
1608     print_flags(at_file_flags, arg3, 1);
1609     print_syscall_epilogue(name);
1610 }
1611 #endif
1612 
1613 #ifdef TARGET_NR_fallocate
1614 static void
1615 print_fallocate(const struct syscallname *name,
1616     abi_long arg0, abi_long arg1, abi_long arg2,
1617     abi_long arg3, abi_long arg4, abi_long arg5)
1618 {
1619     print_syscall_prologue(name);
1620     print_raw_param("%d", arg0, 0);
1621     print_flags(falloc_flags, arg1, 0);
1622 #if TARGET_ABI_BITS == 32
1623     print_raw_param("%" PRIu64, target_offset64(arg2, arg3), 0);
1624     print_raw_param("%" PRIu64, target_offset64(arg4, arg5), 1);
1625 #else
1626     print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
1627     print_raw_param(TARGET_ABI_FMT_ld, arg3, 1);
1628 #endif
1629     print_syscall_epilogue(name);
1630 }
1631 #endif
1632 
1633 #ifdef TARGET_NR_fchmodat
1634 static void
1635 print_fchmodat(const struct syscallname *name,
1636     abi_long arg0, abi_long arg1, abi_long arg2,
1637     abi_long arg3, abi_long arg4, abi_long arg5)
1638 {
1639     print_syscall_prologue(name);
1640     print_at_dirfd(arg0, 0);
1641     print_string(arg1, 0);
1642     print_file_mode(arg2, 0);
1643     print_flags(at_file_flags, arg3, 1);
1644     print_syscall_epilogue(name);
1645 }
1646 #endif
1647 
1648 #ifdef TARGET_NR_fchownat
1649 static void
1650 print_fchownat(const struct syscallname *name,
1651     abi_long arg0, abi_long arg1, abi_long arg2,
1652     abi_long arg3, abi_long arg4, abi_long arg5)
1653 {
1654     print_syscall_prologue(name);
1655     print_at_dirfd(arg0, 0);
1656     print_string(arg1, 0);
1657     print_raw_param("%d", arg2, 0);
1658     print_raw_param("%d", arg3, 0);
1659     print_flags(at_file_flags, arg4, 1);
1660     print_syscall_epilogue(name);
1661 }
1662 #endif
1663 
1664 #if defined(TARGET_NR_fcntl) || defined(TARGET_NR_fcntl64)
1665 static void
1666 print_fcntl(const struct syscallname *name,
1667     abi_long arg0, abi_long arg1, abi_long arg2,
1668     abi_long arg3, abi_long arg4, abi_long arg5)
1669 {
1670     print_syscall_prologue(name);
1671     print_raw_param("%d", arg0, 0);
1672     switch(arg1) {
1673     case TARGET_F_DUPFD:
1674         qemu_log("F_DUPFD,");
1675         print_raw_param(TARGET_ABI_FMT_ld, arg2, 1);
1676         break;
1677     case TARGET_F_GETFD:
1678         qemu_log("F_GETFD");
1679         break;
1680     case TARGET_F_SETFD:
1681         qemu_log("F_SETFD,");
1682         print_raw_param(TARGET_ABI_FMT_ld, arg2, 1);
1683         break;
1684     case TARGET_F_GETFL:
1685         qemu_log("F_GETFL");
1686         break;
1687     case TARGET_F_SETFL:
1688         qemu_log("F_SETFL,");
1689         print_open_flags(arg2, 1);
1690         break;
1691     case TARGET_F_GETLK:
1692         qemu_log("F_GETLK,");
1693         print_pointer(arg2, 1);
1694         break;
1695     case TARGET_F_SETLK:
1696         qemu_log("F_SETLK,");
1697         print_pointer(arg2, 1);
1698         break;
1699     case TARGET_F_SETLKW:
1700         qemu_log("F_SETLKW,");
1701         print_pointer(arg2, 1);
1702         break;
1703     case TARGET_F_GETOWN:
1704         qemu_log("F_GETOWN");
1705         break;
1706     case TARGET_F_SETOWN:
1707         qemu_log("F_SETOWN,");
1708         print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
1709         break;
1710     case TARGET_F_GETSIG:
1711         qemu_log("F_GETSIG");
1712         break;
1713     case TARGET_F_SETSIG:
1714         qemu_log("F_SETSIG,");
1715         print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
1716         break;
1717 #if TARGET_ABI_BITS == 32
1718     case TARGET_F_GETLK64:
1719         qemu_log("F_GETLK64,");
1720         print_pointer(arg2, 1);
1721         break;
1722     case TARGET_F_SETLK64:
1723         qemu_log("F_SETLK64,");
1724         print_pointer(arg2, 1);
1725         break;
1726     case TARGET_F_SETLKW64:
1727         qemu_log("F_SETLKW64,");
1728         print_pointer(arg2, 1);
1729         break;
1730 #endif
1731     case TARGET_F_SETLEASE:
1732         qemu_log("F_SETLEASE,");
1733         print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
1734         break;
1735     case TARGET_F_GETLEASE:
1736         qemu_log("F_GETLEASE");
1737         break;
1738     case TARGET_F_SETPIPE_SZ:
1739         qemu_log("F_SETPIPE_SZ,");
1740         print_raw_param(TARGET_ABI_FMT_ld, arg2, 1);
1741         break;
1742     case TARGET_F_GETPIPE_SZ:
1743         qemu_log("F_GETPIPE_SZ");
1744         break;
1745     case TARGET_F_DUPFD_CLOEXEC:
1746         qemu_log("F_DUPFD_CLOEXEC,");
1747         print_raw_param(TARGET_ABI_FMT_ld, arg2, 1);
1748         break;
1749     case TARGET_F_NOTIFY:
1750         qemu_log("F_NOTIFY,");
1751         print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
1752         break;
1753     default:
1754         print_raw_param(TARGET_ABI_FMT_ld, arg1, 0);
1755         print_pointer(arg2, 1);
1756         break;
1757     }
1758     print_syscall_epilogue(name);
1759 }
1760 #define print_fcntl64   print_fcntl
1761 #endif
1762 
1763 #ifdef TARGET_NR_fgetxattr
1764 static void
1765 print_fgetxattr(const struct syscallname *name,
1766     abi_long arg0, abi_long arg1, abi_long arg2,
1767     abi_long arg3, abi_long arg4, abi_long arg5)
1768 {
1769     print_syscall_prologue(name);
1770     print_raw_param("%d", arg0, 0);
1771     print_string(arg1, 0);
1772     print_pointer(arg2, 0);
1773     print_raw_param(TARGET_FMT_lu, arg3, 1);
1774     print_syscall_epilogue(name);
1775 }
1776 #endif
1777 
1778 #ifdef TARGET_NR_flistxattr
1779 static void
1780 print_flistxattr(const struct syscallname *name,
1781     abi_long arg0, abi_long arg1, abi_long arg2,
1782     abi_long arg3, abi_long arg4, abi_long arg5)
1783 {
1784     print_syscall_prologue(name);
1785     print_raw_param("%d", arg0, 0);
1786     print_pointer(arg1, 0);
1787     print_raw_param(TARGET_FMT_lu, arg2, 1);
1788     print_syscall_epilogue(name);
1789 }
1790 #endif
1791 
1792 #if defined(TARGET_NR_getxattr) || defined(TARGET_NR_lgetxattr)
1793 static void
1794 print_getxattr(const struct syscallname *name,
1795     abi_long arg0, abi_long arg1, abi_long arg2,
1796     abi_long arg3, abi_long arg4, abi_long arg5)
1797 {
1798     print_syscall_prologue(name);
1799     print_string(arg0, 0);
1800     print_string(arg1, 0);
1801     print_pointer(arg2, 0);
1802     print_raw_param(TARGET_FMT_lu, arg3, 1);
1803     print_syscall_epilogue(name);
1804 }
1805 #define print_lgetxattr     print_getxattr
1806 #endif
1807 
1808 #if defined(TARGET_NR_listxattr) || defined(TARGET_NR_llistxattr)
1809 static void
1810 print_listxattr(const struct syscallname *name,
1811     abi_long arg0, abi_long arg1, abi_long arg2,
1812     abi_long arg3, abi_long arg4, abi_long arg5)
1813 {
1814     print_syscall_prologue(name);
1815     print_string(arg0, 0);
1816     print_pointer(arg1, 0);
1817     print_raw_param(TARGET_FMT_lu, arg2, 1);
1818     print_syscall_epilogue(name);
1819 }
1820 #define print_llistxattr     print_listxattr
1821 #endif
1822 
1823 #if defined(TARGET_NR_fremovexattr)
1824 static void
1825 print_fremovexattr(const struct syscallname *name,
1826     abi_long arg0, abi_long arg1, abi_long arg2,
1827     abi_long arg3, abi_long arg4, abi_long arg5)
1828 {
1829     print_syscall_prologue(name);
1830     print_raw_param("%d", arg0, 0);
1831     print_string(arg1, 1);
1832     print_syscall_epilogue(name);
1833 }
1834 #endif
1835 
1836 #if defined(TARGET_NR_removexattr) || defined(TARGET_NR_lremovexattr)
1837 static void
1838 print_removexattr(const struct syscallname *name,
1839     abi_long arg0, abi_long arg1, abi_long arg2,
1840     abi_long arg3, abi_long arg4, abi_long arg5)
1841 {
1842     print_syscall_prologue(name);
1843     print_string(arg0, 0);
1844     print_string(arg1, 1);
1845     print_syscall_epilogue(name);
1846 }
1847 #define print_lremovexattr     print_removexattr
1848 #endif
1849 
1850 #ifdef TARGET_NR_futimesat
1851 static void
1852 print_futimesat(const struct syscallname *name,
1853     abi_long arg0, abi_long arg1, abi_long arg2,
1854     abi_long arg3, abi_long arg4, abi_long arg5)
1855 {
1856     print_syscall_prologue(name);
1857     print_at_dirfd(arg0, 0);
1858     print_string(arg1, 0);
1859     print_timeval(arg2, 0);
1860     print_timeval(arg2 + sizeof (struct target_timeval), 1);
1861     print_syscall_epilogue(name);
1862 }
1863 #endif
1864 
1865 #ifdef TARGET_NR_settimeofday
1866 static void
1867 print_settimeofday(const struct syscallname *name,
1868                 abi_long arg0, abi_long arg1, abi_long arg2,
1869                 abi_long arg3, abi_long arg4, abi_long arg5)
1870 {
1871     print_syscall_prologue(name);
1872     print_timeval(arg0, 0);
1873     print_timezone(arg1, 1);
1874     print_syscall_epilogue(name);
1875 }
1876 #endif
1877 
1878 #ifdef TARGET_NR_link
1879 static void
1880 print_link(const struct syscallname *name,
1881     abi_long arg0, abi_long arg1, abi_long arg2,
1882     abi_long arg3, abi_long arg4, abi_long arg5)
1883 {
1884     print_syscall_prologue(name);
1885     print_string(arg0, 0);
1886     print_string(arg1, 1);
1887     print_syscall_epilogue(name);
1888 }
1889 #endif
1890 
1891 #ifdef TARGET_NR_linkat
1892 static void
1893 print_linkat(const struct syscallname *name,
1894     abi_long arg0, abi_long arg1, abi_long arg2,
1895     abi_long arg3, abi_long arg4, abi_long arg5)
1896 {
1897     print_syscall_prologue(name);
1898     print_at_dirfd(arg0, 0);
1899     print_string(arg1, 0);
1900     print_at_dirfd(arg2, 0);
1901     print_string(arg3, 0);
1902     print_flags(at_file_flags, arg4, 1);
1903     print_syscall_epilogue(name);
1904 }
1905 #endif
1906 
1907 #ifdef TARGET_NR__llseek
1908 static void
1909 print__llseek(const struct syscallname *name,
1910     abi_long arg0, abi_long arg1, abi_long arg2,
1911     abi_long arg3, abi_long arg4, abi_long arg5)
1912 {
1913     const char *whence = "UNKNOWN";
1914     print_syscall_prologue(name);
1915     print_raw_param("%d", arg0, 0);
1916     print_raw_param("%ld", arg1, 0);
1917     print_raw_param("%ld", arg2, 0);
1918     print_pointer(arg3, 0);
1919     switch(arg4) {
1920     case SEEK_SET: whence = "SEEK_SET"; break;
1921     case SEEK_CUR: whence = "SEEK_CUR"; break;
1922     case SEEK_END: whence = "SEEK_END"; break;
1923     }
1924     qemu_log("%s", whence);
1925     print_syscall_epilogue(name);
1926 }
1927 #endif
1928 
1929 #ifdef TARGET_NR_lseek
1930 static void
1931 print_lseek(const struct syscallname *name,
1932     abi_long arg0, abi_long arg1, abi_long arg2,
1933     abi_long arg3, abi_long arg4, abi_long arg5)
1934 {
1935     print_syscall_prologue(name);
1936     print_raw_param("%d", arg0, 0);
1937     print_raw_param(TARGET_ABI_FMT_ld, arg1, 0);
1938     switch (arg2) {
1939     case SEEK_SET:
1940         qemu_log("SEEK_SET"); break;
1941     case SEEK_CUR:
1942         qemu_log("SEEK_CUR"); break;
1943     case SEEK_END:
1944         qemu_log("SEEK_END"); break;
1945 #ifdef SEEK_DATA
1946     case SEEK_DATA:
1947         qemu_log("SEEK_DATA"); break;
1948 #endif
1949 #ifdef SEEK_HOLE
1950     case SEEK_HOLE:
1951         qemu_log("SEEK_HOLE"); break;
1952 #endif
1953     default:
1954         print_raw_param("%#x", arg2, 1);
1955     }
1956     print_syscall_epilogue(name);
1957 }
1958 #endif
1959 
1960 #if defined(TARGET_NR_socket)
1961 static void
1962 print_socket(const struct syscallname *name,
1963              abi_long arg0, abi_long arg1, abi_long arg2,
1964              abi_long arg3, abi_long arg4, abi_long arg5)
1965 {
1966     abi_ulong domain = arg0, type = arg1, protocol = arg2;
1967 
1968     print_syscall_prologue(name);
1969     print_socket_domain(domain);
1970     qemu_log(",");
1971     print_socket_type(type);
1972     qemu_log(",");
1973     if (domain == AF_PACKET ||
1974         (domain == AF_INET && type == TARGET_SOCK_PACKET)) {
1975         protocol = tswap16(protocol);
1976     }
1977     print_socket_protocol(domain, type, protocol);
1978     print_syscall_epilogue(name);
1979 }
1980 
1981 #endif
1982 
1983 #if defined(TARGET_NR_socketcall) || defined(TARGET_NR_bind)
1984 
1985 static void print_sockfd(abi_long sockfd, int last)
1986 {
1987     print_raw_param(TARGET_ABI_FMT_ld, sockfd, last);
1988 }
1989 
1990 #endif
1991 
1992 #if defined(TARGET_NR_socketcall)
1993 
1994 #define get_user_ualx(x, gaddr, idx) \
1995         get_user_ual(x, (gaddr) + (idx) * sizeof(abi_long))
1996 
1997 static void do_print_socket(const char *name, abi_long arg1)
1998 {
1999     abi_ulong domain, type, protocol;
2000 
2001     get_user_ualx(domain, arg1, 0);
2002     get_user_ualx(type, arg1, 1);
2003     get_user_ualx(protocol, arg1, 2);
2004     qemu_log("%s(", name);
2005     print_socket_domain(domain);
2006     qemu_log(",");
2007     print_socket_type(type);
2008     qemu_log(",");
2009     if (domain == AF_PACKET ||
2010         (domain == AF_INET && type == TARGET_SOCK_PACKET)) {
2011         protocol = tswap16(protocol);
2012     }
2013     print_socket_protocol(domain, type, protocol);
2014     qemu_log(")");
2015 }
2016 
2017 static void do_print_sockaddr(const char *name, abi_long arg1)
2018 {
2019     abi_ulong sockfd, addr, addrlen;
2020 
2021     get_user_ualx(sockfd, arg1, 0);
2022     get_user_ualx(addr, arg1, 1);
2023     get_user_ualx(addrlen, arg1, 2);
2024 
2025     qemu_log("%s(", name);
2026     print_sockfd(sockfd, 0);
2027     print_sockaddr(addr, addrlen, 0);
2028     qemu_log(")");
2029 }
2030 
2031 static void do_print_listen(const char *name, abi_long arg1)
2032 {
2033     abi_ulong sockfd, backlog;
2034 
2035     get_user_ualx(sockfd, arg1, 0);
2036     get_user_ualx(backlog, arg1, 1);
2037 
2038     qemu_log("%s(", name);
2039     print_sockfd(sockfd, 0);
2040     print_raw_param(TARGET_ABI_FMT_ld, backlog, 1);
2041     qemu_log(")");
2042 }
2043 
2044 static void do_print_socketpair(const char *name, abi_long arg1)
2045 {
2046     abi_ulong domain, type, protocol, tab;
2047 
2048     get_user_ualx(domain, arg1, 0);
2049     get_user_ualx(type, arg1, 1);
2050     get_user_ualx(protocol, arg1, 2);
2051     get_user_ualx(tab, arg1, 3);
2052 
2053     qemu_log("%s(", name);
2054     print_socket_domain(domain);
2055     qemu_log(",");
2056     print_socket_type(type);
2057     qemu_log(",");
2058     print_socket_protocol(domain, type, protocol);
2059     qemu_log(",");
2060     print_raw_param(TARGET_ABI_FMT_lx, tab, 1);
2061     qemu_log(")");
2062 }
2063 
2064 static void do_print_sendrecv(const char *name, abi_long arg1)
2065 {
2066     abi_ulong sockfd, msg, len, flags;
2067 
2068     get_user_ualx(sockfd, arg1, 0);
2069     get_user_ualx(msg, arg1, 1);
2070     get_user_ualx(len, arg1, 2);
2071     get_user_ualx(flags, arg1, 3);
2072 
2073     qemu_log("%s(", name);
2074     print_sockfd(sockfd, 0);
2075     print_buf(msg, len, 0);
2076     print_raw_param(TARGET_ABI_FMT_ld, len, 0);
2077     print_flags(msg_flags, flags, 1);
2078     qemu_log(")");
2079 }
2080 
2081 static void do_print_msgaddr(const char *name, abi_long arg1)
2082 {
2083     abi_ulong sockfd, msg, len, flags, addr, addrlen;
2084 
2085     get_user_ualx(sockfd, arg1, 0);
2086     get_user_ualx(msg, arg1, 1);
2087     get_user_ualx(len, arg1, 2);
2088     get_user_ualx(flags, arg1, 3);
2089     get_user_ualx(addr, arg1, 4);
2090     get_user_ualx(addrlen, arg1, 5);
2091 
2092     qemu_log("%s(", name);
2093     print_sockfd(sockfd, 0);
2094     print_buf(msg, len, 0);
2095     print_raw_param(TARGET_ABI_FMT_ld, len, 0);
2096     print_flags(msg_flags, flags, 0);
2097     print_sockaddr(addr, addrlen, 0);
2098     qemu_log(")");
2099 }
2100 
2101 static void do_print_shutdown(const char *name, abi_long arg1)
2102 {
2103     abi_ulong sockfd, how;
2104 
2105     get_user_ualx(sockfd, arg1, 0);
2106     get_user_ualx(how, arg1, 1);
2107 
2108     qemu_log("shutdown(");
2109     print_sockfd(sockfd, 0);
2110     switch (how) {
2111     case SHUT_RD:
2112         qemu_log("SHUT_RD");
2113         break;
2114     case SHUT_WR:
2115         qemu_log("SHUT_WR");
2116         break;
2117     case SHUT_RDWR:
2118         qemu_log("SHUT_RDWR");
2119         break;
2120     default:
2121         print_raw_param(TARGET_ABI_FMT_ld, how, 1);
2122         break;
2123     }
2124     qemu_log(")");
2125 }
2126 
2127 static void do_print_msg(const char *name, abi_long arg1)
2128 {
2129     abi_ulong sockfd, msg, flags;
2130 
2131     get_user_ualx(sockfd, arg1, 0);
2132     get_user_ualx(msg, arg1, 1);
2133     get_user_ualx(flags, arg1, 2);
2134 
2135     qemu_log("%s(", name);
2136     print_sockfd(sockfd, 0);
2137     print_pointer(msg, 0);
2138     print_flags(msg_flags, flags, 1);
2139     qemu_log(")");
2140 }
2141 
2142 static void do_print_sockopt(const char *name, abi_long arg1)
2143 {
2144     abi_ulong sockfd, level, optname, optval, optlen;
2145 
2146     get_user_ualx(sockfd, arg1, 0);
2147     get_user_ualx(level, arg1, 1);
2148     get_user_ualx(optname, arg1, 2);
2149     get_user_ualx(optval, arg1, 3);
2150     get_user_ualx(optlen, arg1, 4);
2151 
2152     qemu_log("%s(", name);
2153     print_sockfd(sockfd, 0);
2154     switch (level) {
2155     case SOL_TCP:
2156         qemu_log("SOL_TCP,");
2157         print_raw_param(TARGET_ABI_FMT_ld, optname, 0);
2158         print_pointer(optval, 0);
2159         break;
2160     case SOL_IP:
2161         qemu_log("SOL_IP,");
2162         print_raw_param(TARGET_ABI_FMT_ld, optname, 0);
2163         print_pointer(optval, 0);
2164         break;
2165     case SOL_RAW:
2166         qemu_log("SOL_RAW,");
2167         print_raw_param(TARGET_ABI_FMT_ld, optname, 0);
2168         print_pointer(optval, 0);
2169         break;
2170     case TARGET_SOL_SOCKET:
2171         qemu_log("SOL_SOCKET,");
2172         switch (optname) {
2173         case TARGET_SO_DEBUG:
2174             qemu_log("SO_DEBUG,");
2175 print_optint:
2176             print_number(optval, 0);
2177             break;
2178         case TARGET_SO_REUSEADDR:
2179             qemu_log("SO_REUSEADDR,");
2180             goto print_optint;
2181         case TARGET_SO_REUSEPORT:
2182             qemu_log("SO_REUSEPORT,");
2183             goto print_optint;
2184         case TARGET_SO_TYPE:
2185             qemu_log("SO_TYPE,");
2186             goto print_optint;
2187         case TARGET_SO_ERROR:
2188             qemu_log("SO_ERROR,");
2189             goto print_optint;
2190         case TARGET_SO_DONTROUTE:
2191             qemu_log("SO_DONTROUTE,");
2192             goto print_optint;
2193         case TARGET_SO_BROADCAST:
2194             qemu_log("SO_BROADCAST,");
2195             goto print_optint;
2196         case TARGET_SO_SNDBUF:
2197             qemu_log("SO_SNDBUF,");
2198             goto print_optint;
2199         case TARGET_SO_RCVBUF:
2200             qemu_log("SO_RCVBUF,");
2201             goto print_optint;
2202         case TARGET_SO_KEEPALIVE:
2203             qemu_log("SO_KEEPALIVE,");
2204             goto print_optint;
2205         case TARGET_SO_OOBINLINE:
2206             qemu_log("SO_OOBINLINE,");
2207             goto print_optint;
2208         case TARGET_SO_NO_CHECK:
2209             qemu_log("SO_NO_CHECK,");
2210             goto print_optint;
2211         case TARGET_SO_PRIORITY:
2212             qemu_log("SO_PRIORITY,");
2213             goto print_optint;
2214         case TARGET_SO_BSDCOMPAT:
2215             qemu_log("SO_BSDCOMPAT,");
2216             goto print_optint;
2217         case TARGET_SO_PASSCRED:
2218             qemu_log("SO_PASSCRED,");
2219             goto print_optint;
2220         case TARGET_SO_TIMESTAMP:
2221             qemu_log("SO_TIMESTAMP,");
2222             goto print_optint;
2223         case TARGET_SO_RCVLOWAT:
2224             qemu_log("SO_RCVLOWAT,");
2225             goto print_optint;
2226         case TARGET_SO_RCVTIMEO:
2227             qemu_log("SO_RCVTIMEO,");
2228             print_timeval(optval, 0);
2229             break;
2230         case TARGET_SO_SNDTIMEO:
2231             qemu_log("SO_SNDTIMEO,");
2232             print_timeval(optval, 0);
2233             break;
2234         case TARGET_SO_ATTACH_FILTER: {
2235             struct target_sock_fprog *fprog;
2236 
2237             qemu_log("SO_ATTACH_FILTER,");
2238 
2239             if (lock_user_struct(VERIFY_READ, fprog, optval,  0)) {
2240                 struct target_sock_filter *filter;
2241                 qemu_log("{");
2242                 if (lock_user_struct(VERIFY_READ, filter,
2243                                      tswapal(fprog->filter),  0)) {
2244                     int i;
2245                     for (i = 0; i < tswap16(fprog->len) - 1; i++) {
2246                         qemu_log("[%d]{0x%x,%d,%d,0x%x},",
2247                                  i, tswap16(filter[i].code),
2248                                  filter[i].jt, filter[i].jf,
2249                                  tswap32(filter[i].k));
2250                     }
2251                     qemu_log("[%d]{0x%x,%d,%d,0x%x}",
2252                              i, tswap16(filter[i].code),
2253                              filter[i].jt, filter[i].jf,
2254                              tswap32(filter[i].k));
2255                 } else {
2256                     qemu_log(TARGET_ABI_FMT_lx, tswapal(fprog->filter));
2257                 }
2258                 qemu_log(",%d},", tswap16(fprog->len));
2259                 unlock_user(fprog, optval, 0);
2260             } else {
2261                 print_pointer(optval, 0);
2262             }
2263             break;
2264         }
2265         default:
2266             print_raw_param(TARGET_ABI_FMT_ld, optname, 0);
2267             print_pointer(optval, 0);
2268             break;
2269         }
2270         break;
2271     default:
2272         print_raw_param(TARGET_ABI_FMT_ld, level, 0);
2273         print_raw_param(TARGET_ABI_FMT_ld, optname, 0);
2274         print_pointer(optval, 0);
2275         break;
2276     }
2277     print_raw_param(TARGET_ABI_FMT_ld, optlen, 1);
2278     qemu_log(")");
2279 }
2280 
2281 #define PRINT_SOCKOP(name, func) \
2282     [TARGET_SYS_##name] = { #name, func }
2283 
2284 static struct {
2285     const char *name;
2286     void (*print)(const char *, abi_long);
2287 } scall[] = {
2288     PRINT_SOCKOP(SOCKET, do_print_socket),
2289     PRINT_SOCKOP(BIND, do_print_sockaddr),
2290     PRINT_SOCKOP(CONNECT, do_print_sockaddr),
2291     PRINT_SOCKOP(LISTEN, do_print_listen),
2292     PRINT_SOCKOP(ACCEPT, do_print_sockaddr),
2293     PRINT_SOCKOP(GETSOCKNAME, do_print_sockaddr),
2294     PRINT_SOCKOP(GETPEERNAME, do_print_sockaddr),
2295     PRINT_SOCKOP(SOCKETPAIR, do_print_socketpair),
2296     PRINT_SOCKOP(SEND, do_print_sendrecv),
2297     PRINT_SOCKOP(RECV, do_print_sendrecv),
2298     PRINT_SOCKOP(SENDTO, do_print_msgaddr),
2299     PRINT_SOCKOP(RECVFROM, do_print_msgaddr),
2300     PRINT_SOCKOP(SHUTDOWN, do_print_shutdown),
2301     PRINT_SOCKOP(SETSOCKOPT, do_print_sockopt),
2302     PRINT_SOCKOP(GETSOCKOPT, do_print_sockopt),
2303     PRINT_SOCKOP(SENDMSG, do_print_msg),
2304     PRINT_SOCKOP(RECVMSG, do_print_msg),
2305     PRINT_SOCKOP(ACCEPT4, NULL),
2306     PRINT_SOCKOP(RECVMMSG, NULL),
2307     PRINT_SOCKOP(SENDMMSG, NULL),
2308 };
2309 
2310 static void
2311 print_socketcall(const struct syscallname *name,
2312                  abi_long arg0, abi_long arg1, abi_long arg2,
2313                  abi_long arg3, abi_long arg4, abi_long arg5)
2314 {
2315     if (arg0 >= 0 && arg0 < ARRAY_SIZE(scall) && scall[arg0].print) {
2316         scall[arg0].print(scall[arg0].name, arg1);
2317         return;
2318     }
2319     print_syscall_prologue(name);
2320     print_raw_param(TARGET_ABI_FMT_ld, arg0, 0);
2321     print_raw_param(TARGET_ABI_FMT_ld, arg1, 0);
2322     print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
2323     print_raw_param(TARGET_ABI_FMT_ld, arg3, 0);
2324     print_raw_param(TARGET_ABI_FMT_ld, arg4, 0);
2325     print_raw_param(TARGET_ABI_FMT_ld, arg5, 0);
2326     print_syscall_epilogue(name);
2327 }
2328 #endif
2329 
2330 #if defined(TARGET_NR_bind)
2331 static void
2332 print_bind(const struct syscallname *name,
2333            abi_long arg0, abi_long arg1, abi_long arg2,
2334            abi_long arg3, abi_long arg4, abi_long arg5)
2335 {
2336     print_syscall_prologue(name);
2337     print_sockfd(arg0, 0);
2338     print_sockaddr(arg1, arg2, 1);
2339     print_syscall_epilogue(name);
2340 }
2341 #endif
2342 
2343 #if defined(TARGET_NR_stat) || defined(TARGET_NR_stat64) || \
2344     defined(TARGET_NR_lstat) || defined(TARGET_NR_lstat64)
2345 static void
2346 print_stat(const struct syscallname *name,
2347     abi_long arg0, abi_long arg1, abi_long arg2,
2348     abi_long arg3, abi_long arg4, abi_long arg5)
2349 {
2350     print_syscall_prologue(name);
2351     print_string(arg0, 0);
2352     print_pointer(arg1, 1);
2353     print_syscall_epilogue(name);
2354 }
2355 #define print_lstat     print_stat
2356 #define print_stat64	print_stat
2357 #define print_lstat64   print_stat
2358 #endif
2359 
2360 #if defined(TARGET_NR_fstat) || defined(TARGET_NR_fstat64)
2361 static void
2362 print_fstat(const struct syscallname *name,
2363     abi_long arg0, abi_long arg1, abi_long arg2,
2364     abi_long arg3, abi_long arg4, abi_long arg5)
2365 {
2366     print_syscall_prologue(name);
2367     print_raw_param("%d", arg0, 0);
2368     print_pointer(arg1, 1);
2369     print_syscall_epilogue(name);
2370 }
2371 #define print_fstat64     print_fstat
2372 #endif
2373 
2374 #ifdef TARGET_NR_mkdir
2375 static void
2376 print_mkdir(const struct syscallname *name,
2377     abi_long arg0, abi_long arg1, abi_long arg2,
2378     abi_long arg3, abi_long arg4, abi_long arg5)
2379 {
2380     print_syscall_prologue(name);
2381     print_string(arg0, 0);
2382     print_file_mode(arg1, 1);
2383     print_syscall_epilogue(name);
2384 }
2385 #endif
2386 
2387 #ifdef TARGET_NR_mkdirat
2388 static void
2389 print_mkdirat(const struct syscallname *name,
2390     abi_long arg0, abi_long arg1, abi_long arg2,
2391     abi_long arg3, abi_long arg4, abi_long arg5)
2392 {
2393     print_syscall_prologue(name);
2394     print_at_dirfd(arg0, 0);
2395     print_string(arg1, 0);
2396     print_file_mode(arg2, 1);
2397     print_syscall_epilogue(name);
2398 }
2399 #endif
2400 
2401 #ifdef TARGET_NR_rmdir
2402 static void
2403 print_rmdir(const struct syscallname *name,
2404     abi_long arg0, abi_long arg1, abi_long arg2,
2405     abi_long arg3, abi_long arg4, abi_long arg5)
2406 {
2407     print_syscall_prologue(name);
2408     print_string(arg0, 0);
2409     print_syscall_epilogue(name);
2410 }
2411 #endif
2412 
2413 #ifdef TARGET_NR_rt_sigaction
2414 static void
2415 print_rt_sigaction(const struct syscallname *name,
2416     abi_long arg0, abi_long arg1, abi_long arg2,
2417     abi_long arg3, abi_long arg4, abi_long arg5)
2418 {
2419     print_syscall_prologue(name);
2420     print_signal(arg0, 0);
2421     print_pointer(arg1, 0);
2422     print_pointer(arg2, 1);
2423     print_syscall_epilogue(name);
2424 }
2425 #endif
2426 
2427 #ifdef TARGET_NR_rt_sigprocmask
2428 static void
2429 print_rt_sigprocmask(const struct syscallname *name,
2430     abi_long arg0, abi_long arg1, abi_long arg2,
2431     abi_long arg3, abi_long arg4, abi_long arg5)
2432 {
2433     const char *how = "UNKNOWN";
2434     print_syscall_prologue(name);
2435     switch(arg0) {
2436     case TARGET_SIG_BLOCK: how = "SIG_BLOCK"; break;
2437     case TARGET_SIG_UNBLOCK: how = "SIG_UNBLOCK"; break;
2438     case TARGET_SIG_SETMASK: how = "SIG_SETMASK"; break;
2439     }
2440     qemu_log("%s,", how);
2441     print_pointer(arg1, 0);
2442     print_pointer(arg2, 1);
2443     print_syscall_epilogue(name);
2444 }
2445 #endif
2446 
2447 #ifdef TARGET_NR_rt_sigqueueinfo
2448 static void
2449 print_rt_sigqueueinfo(const struct syscallname *name,
2450     abi_long arg0, abi_long arg1, abi_long arg2,
2451     abi_long arg3, abi_long arg4, abi_long arg5)
2452 {
2453     void *p;
2454     target_siginfo_t uinfo;
2455 
2456     print_syscall_prologue(name);
2457     print_raw_param("%d", arg0, 0);
2458     print_signal(arg1, 0);
2459     p = lock_user(VERIFY_READ, arg2, sizeof(target_siginfo_t), 1);
2460     if (p) {
2461         get_target_siginfo(&uinfo, p);
2462         print_siginfo(&uinfo);
2463 
2464         unlock_user(p, arg2, 0);
2465     } else {
2466         print_pointer(arg2, 1);
2467     }
2468     print_syscall_epilogue(name);
2469 }
2470 #endif
2471 
2472 #ifdef TARGET_NR_rt_tgsigqueueinfo
2473 static void
2474 print_rt_tgsigqueueinfo(const struct syscallname *name,
2475     abi_long arg0, abi_long arg1, abi_long arg2,
2476     abi_long arg3, abi_long arg4, abi_long arg5)
2477 {
2478     void *p;
2479     target_siginfo_t uinfo;
2480 
2481     print_syscall_prologue(name);
2482     print_raw_param("%d", arg0, 0);
2483     print_raw_param("%d", arg1, 0);
2484     print_signal(arg2, 0);
2485     p = lock_user(VERIFY_READ, arg3, sizeof(target_siginfo_t), 1);
2486     if (p) {
2487         get_target_siginfo(&uinfo, p);
2488         print_siginfo(&uinfo);
2489 
2490         unlock_user(p, arg3, 0);
2491     } else {
2492         print_pointer(arg3, 1);
2493     }
2494     print_syscall_epilogue(name);
2495 }
2496 #endif
2497 
2498 #ifdef TARGET_NR_syslog
2499 static void
2500 print_syslog_action(abi_ulong arg, int last)
2501 {
2502     const char *type;
2503 
2504     switch (arg) {
2505         case TARGET_SYSLOG_ACTION_CLOSE: {
2506             type = "SYSLOG_ACTION_CLOSE";
2507             break;
2508         }
2509         case TARGET_SYSLOG_ACTION_OPEN: {
2510             type = "SYSLOG_ACTION_OPEN";
2511             break;
2512         }
2513         case TARGET_SYSLOG_ACTION_READ: {
2514             type = "SYSLOG_ACTION_READ";
2515             break;
2516         }
2517         case TARGET_SYSLOG_ACTION_READ_ALL: {
2518             type = "SYSLOG_ACTION_READ_ALL";
2519             break;
2520         }
2521         case TARGET_SYSLOG_ACTION_READ_CLEAR: {
2522             type = "SYSLOG_ACTION_READ_CLEAR";
2523             break;
2524         }
2525         case TARGET_SYSLOG_ACTION_CLEAR: {
2526             type = "SYSLOG_ACTION_CLEAR";
2527             break;
2528         }
2529         case TARGET_SYSLOG_ACTION_CONSOLE_OFF: {
2530             type = "SYSLOG_ACTION_CONSOLE_OFF";
2531             break;
2532         }
2533         case TARGET_SYSLOG_ACTION_CONSOLE_ON: {
2534             type = "SYSLOG_ACTION_CONSOLE_ON";
2535             break;
2536         }
2537         case TARGET_SYSLOG_ACTION_CONSOLE_LEVEL: {
2538             type = "SYSLOG_ACTION_CONSOLE_LEVEL";
2539             break;
2540         }
2541         case TARGET_SYSLOG_ACTION_SIZE_UNREAD: {
2542             type = "SYSLOG_ACTION_SIZE_UNREAD";
2543             break;
2544         }
2545         case TARGET_SYSLOG_ACTION_SIZE_BUFFER: {
2546             type = "SYSLOG_ACTION_SIZE_BUFFER";
2547             break;
2548         }
2549         default: {
2550             print_raw_param("%ld", arg, last);
2551             return;
2552         }
2553     }
2554     qemu_log("%s%s", type, get_comma(last));
2555 }
2556 
2557 static void
2558 print_syslog(const struct syscallname *name,
2559     abi_long arg0, abi_long arg1, abi_long arg2,
2560     abi_long arg3, abi_long arg4, abi_long arg5)
2561 {
2562     print_syscall_prologue(name);
2563     print_syslog_action(arg0, 0);
2564     print_pointer(arg1, 0);
2565     print_raw_param("%d", arg2, 1);
2566     print_syscall_epilogue(name);
2567 }
2568 #endif
2569 
2570 #ifdef TARGET_NR_mknod
2571 static void
2572 print_mknod(const struct syscallname *name,
2573     abi_long arg0, abi_long arg1, abi_long arg2,
2574     abi_long arg3, abi_long arg4, abi_long arg5)
2575 {
2576     int hasdev = (arg1 & (S_IFCHR|S_IFBLK));
2577 
2578     print_syscall_prologue(name);
2579     print_string(arg0, 0);
2580     print_file_mode(arg1, (hasdev == 0));
2581     if (hasdev) {
2582         print_raw_param("makedev(%d", major(arg2), 0);
2583         print_raw_param("%d)", minor(arg2), 1);
2584     }
2585     print_syscall_epilogue(name);
2586 }
2587 #endif
2588 
2589 #ifdef TARGET_NR_mknodat
2590 static void
2591 print_mknodat(const struct syscallname *name,
2592     abi_long arg0, abi_long arg1, abi_long arg2,
2593     abi_long arg3, abi_long arg4, abi_long arg5)
2594 {
2595     int hasdev = (arg2 & (S_IFCHR|S_IFBLK));
2596 
2597     print_syscall_prologue(name);
2598     print_at_dirfd(arg0, 0);
2599     print_string(arg1, 0);
2600     print_file_mode(arg2, (hasdev == 0));
2601     if (hasdev) {
2602         print_raw_param("makedev(%d", major(arg3), 0);
2603         print_raw_param("%d)", minor(arg3), 1);
2604     }
2605     print_syscall_epilogue(name);
2606 }
2607 #endif
2608 
2609 #ifdef TARGET_NR_mq_open
2610 static void
2611 print_mq_open(const struct syscallname *name,
2612     abi_long arg0, abi_long arg1, abi_long arg2,
2613     abi_long arg3, abi_long arg4, abi_long arg5)
2614 {
2615     int is_creat = (arg1 & TARGET_O_CREAT);
2616 
2617     print_syscall_prologue(name);
2618     print_string(arg0, 0);
2619     print_open_flags(arg1, (is_creat == 0));
2620     if (is_creat) {
2621         print_file_mode(arg2, 0);
2622         print_pointer(arg3, 1);
2623     }
2624     print_syscall_epilogue(name);
2625 }
2626 #endif
2627 
2628 #ifdef TARGET_NR_open
2629 static void
2630 print_open(const struct syscallname *name,
2631     abi_long arg0, abi_long arg1, abi_long arg2,
2632     abi_long arg3, abi_long arg4, abi_long arg5)
2633 {
2634     int is_creat = (arg1 & TARGET_O_CREAT);
2635 
2636     print_syscall_prologue(name);
2637     print_string(arg0, 0);
2638     print_open_flags(arg1, (is_creat == 0));
2639     if (is_creat)
2640         print_file_mode(arg2, 1);
2641     print_syscall_epilogue(name);
2642 }
2643 #endif
2644 
2645 #ifdef TARGET_NR_openat
2646 static void
2647 print_openat(const struct syscallname *name,
2648     abi_long arg0, abi_long arg1, abi_long arg2,
2649     abi_long arg3, abi_long arg4, abi_long arg5)
2650 {
2651     int is_creat = (arg2 & TARGET_O_CREAT);
2652 
2653     print_syscall_prologue(name);
2654     print_at_dirfd(arg0, 0);
2655     print_string(arg1, 0);
2656     print_open_flags(arg2, (is_creat == 0));
2657     if (is_creat)
2658         print_file_mode(arg3, 1);
2659     print_syscall_epilogue(name);
2660 }
2661 #endif
2662 
2663 #ifdef TARGET_NR_mq_unlink
2664 static void
2665 print_mq_unlink(const struct syscallname *name,
2666     abi_long arg0, abi_long arg1, abi_long arg2,
2667     abi_long arg3, abi_long arg4, abi_long arg5)
2668 {
2669     print_syscall_prologue(name);
2670     print_string(arg0, 1);
2671     print_syscall_epilogue(name);
2672 }
2673 #endif
2674 
2675 #if defined(TARGET_NR_fstatat64) || defined(TARGET_NR_newfstatat)
2676 static void
2677 print_fstatat64(const struct syscallname *name,
2678     abi_long arg0, abi_long arg1, abi_long arg2,
2679     abi_long arg3, abi_long arg4, abi_long arg5)
2680 {
2681     print_syscall_prologue(name);
2682     print_at_dirfd(arg0, 0);
2683     print_string(arg1, 0);
2684     print_pointer(arg2, 0);
2685     print_flags(at_file_flags, arg3, 1);
2686     print_syscall_epilogue(name);
2687 }
2688 #define print_newfstatat    print_fstatat64
2689 #endif
2690 
2691 #ifdef TARGET_NR_readlink
2692 static void
2693 print_readlink(const struct syscallname *name,
2694     abi_long arg0, abi_long arg1, abi_long arg2,
2695     abi_long arg3, abi_long arg4, abi_long arg5)
2696 {
2697     print_syscall_prologue(name);
2698     print_string(arg0, 0);
2699     print_pointer(arg1, 0);
2700     print_raw_param("%u", arg2, 1);
2701     print_syscall_epilogue(name);
2702 }
2703 #endif
2704 
2705 #ifdef TARGET_NR_readlinkat
2706 static void
2707 print_readlinkat(const struct syscallname *name,
2708     abi_long arg0, abi_long arg1, abi_long arg2,
2709     abi_long arg3, abi_long arg4, abi_long arg5)
2710 {
2711     print_syscall_prologue(name);
2712     print_at_dirfd(arg0, 0);
2713     print_string(arg1, 0);
2714     print_pointer(arg2, 0);
2715     print_raw_param("%u", arg3, 1);
2716     print_syscall_epilogue(name);
2717 }
2718 #endif
2719 
2720 #ifdef TARGET_NR_rename
2721 static void
2722 print_rename(const struct syscallname *name,
2723     abi_long arg0, abi_long arg1, abi_long arg2,
2724     abi_long arg3, abi_long arg4, abi_long arg5)
2725 {
2726     print_syscall_prologue(name);
2727     print_string(arg0, 0);
2728     print_string(arg1, 1);
2729     print_syscall_epilogue(name);
2730 }
2731 #endif
2732 
2733 #ifdef TARGET_NR_renameat
2734 static void
2735 print_renameat(const struct syscallname *name,
2736     abi_long arg0, abi_long arg1, abi_long arg2,
2737     abi_long arg3, abi_long arg4, abi_long arg5)
2738 {
2739     print_syscall_prologue(name);
2740     print_at_dirfd(arg0, 0);
2741     print_string(arg1, 0);
2742     print_at_dirfd(arg2, 0);
2743     print_string(arg3, 1);
2744     print_syscall_epilogue(name);
2745 }
2746 #endif
2747 
2748 #ifdef TARGET_NR_statfs
2749 static void
2750 print_statfs(const struct syscallname *name,
2751     abi_long arg0, abi_long arg1, abi_long arg2,
2752     abi_long arg3, abi_long arg4, abi_long arg5)
2753 {
2754     print_syscall_prologue(name);
2755     print_string(arg0, 0);
2756     print_pointer(arg1, 1);
2757     print_syscall_epilogue(name);
2758 }
2759 #endif
2760 
2761 #ifdef TARGET_NR_statfs64
2762 static void
2763 print_statfs64(const struct syscallname *name,
2764     abi_long arg0, abi_long arg1, abi_long arg2,
2765     abi_long arg3, abi_long arg4, abi_long arg5)
2766 {
2767     print_syscall_prologue(name);
2768     print_string(arg0, 0);
2769     print_pointer(arg1, 1);
2770     print_syscall_epilogue(name);
2771 }
2772 #endif
2773 
2774 #ifdef TARGET_NR_symlink
2775 static void
2776 print_symlink(const struct syscallname *name,
2777     abi_long arg0, abi_long arg1, abi_long arg2,
2778     abi_long arg3, abi_long arg4, abi_long arg5)
2779 {
2780     print_syscall_prologue(name);
2781     print_string(arg0, 0);
2782     print_string(arg1, 1);
2783     print_syscall_epilogue(name);
2784 }
2785 #endif
2786 
2787 #ifdef TARGET_NR_symlinkat
2788 static void
2789 print_symlinkat(const struct syscallname *name,
2790     abi_long arg0, abi_long arg1, abi_long arg2,
2791     abi_long arg3, abi_long arg4, abi_long arg5)
2792 {
2793     print_syscall_prologue(name);
2794     print_string(arg0, 0);
2795     print_at_dirfd(arg1, 0);
2796     print_string(arg2, 1);
2797     print_syscall_epilogue(name);
2798 }
2799 #endif
2800 
2801 #ifdef TARGET_NR_mount
2802 static void
2803 print_mount(const struct syscallname *name,
2804     abi_long arg0, abi_long arg1, abi_long arg2,
2805     abi_long arg3, abi_long arg4, abi_long arg5)
2806 {
2807     print_syscall_prologue(name);
2808     print_string(arg0, 0);
2809     print_string(arg1, 0);
2810     print_string(arg2, 0);
2811     print_flags(mount_flags, arg3, 0);
2812     print_pointer(arg4, 1);
2813     print_syscall_epilogue(name);
2814 }
2815 #endif
2816 
2817 #ifdef TARGET_NR_umount
2818 static void
2819 print_umount(const struct syscallname *name,
2820     abi_long arg0, abi_long arg1, abi_long arg2,
2821     abi_long arg3, abi_long arg4, abi_long arg5)
2822 {
2823     print_syscall_prologue(name);
2824     print_string(arg0, 1);
2825     print_syscall_epilogue(name);
2826 }
2827 #endif
2828 
2829 #ifdef TARGET_NR_umount2
2830 static void
2831 print_umount2(const struct syscallname *name,
2832     abi_long arg0, abi_long arg1, abi_long arg2,
2833     abi_long arg3, abi_long arg4, abi_long arg5)
2834 {
2835     print_syscall_prologue(name);
2836     print_string(arg0, 0);
2837     print_flags(umount2_flags, arg1, 1);
2838     print_syscall_epilogue(name);
2839 }
2840 #endif
2841 
2842 #ifdef TARGET_NR_unlink
2843 static void
2844 print_unlink(const struct syscallname *name,
2845     abi_long arg0, abi_long arg1, abi_long arg2,
2846     abi_long arg3, abi_long arg4, abi_long arg5)
2847 {
2848     print_syscall_prologue(name);
2849     print_string(arg0, 1);
2850     print_syscall_epilogue(name);
2851 }
2852 #endif
2853 
2854 #ifdef TARGET_NR_unlinkat
2855 static void
2856 print_unlinkat(const struct syscallname *name,
2857     abi_long arg0, abi_long arg1, abi_long arg2,
2858     abi_long arg3, abi_long arg4, abi_long arg5)
2859 {
2860     print_syscall_prologue(name);
2861     print_at_dirfd(arg0, 0);
2862     print_string(arg1, 0);
2863     print_flags(unlinkat_flags, arg2, 1);
2864     print_syscall_epilogue(name);
2865 }
2866 #endif
2867 
2868 #ifdef TARGET_NR_utime
2869 static void
2870 print_utime(const struct syscallname *name,
2871     abi_long arg0, abi_long arg1, abi_long arg2,
2872     abi_long arg3, abi_long arg4, abi_long arg5)
2873 {
2874     print_syscall_prologue(name);
2875     print_string(arg0, 0);
2876     print_pointer(arg1, 1);
2877     print_syscall_epilogue(name);
2878 }
2879 #endif
2880 
2881 #ifdef TARGET_NR_utimes
2882 static void
2883 print_utimes(const struct syscallname *name,
2884     abi_long arg0, abi_long arg1, abi_long arg2,
2885     abi_long arg3, abi_long arg4, abi_long arg5)
2886 {
2887     print_syscall_prologue(name);
2888     print_string(arg0, 0);
2889     print_pointer(arg1, 1);
2890     print_syscall_epilogue(name);
2891 }
2892 #endif
2893 
2894 #ifdef TARGET_NR_utimensat
2895 static void
2896 print_utimensat(const struct syscallname *name,
2897     abi_long arg0, abi_long arg1, abi_long arg2,
2898     abi_long arg3, abi_long arg4, abi_long arg5)
2899 {
2900     print_syscall_prologue(name);
2901     print_at_dirfd(arg0, 0);
2902     print_string(arg1, 0);
2903     print_pointer(arg2, 0);
2904     print_flags(at_file_flags, arg3, 1);
2905     print_syscall_epilogue(name);
2906 }
2907 #endif
2908 
2909 #if defined(TARGET_NR_mmap) || defined(TARGET_NR_mmap2)
2910 static void
2911 print_mmap(const struct syscallname *name,
2912     abi_long arg0, abi_long arg1, abi_long arg2,
2913     abi_long arg3, abi_long arg4, abi_long arg5)
2914 {
2915     print_syscall_prologue(name);
2916     print_pointer(arg0, 0);
2917     print_raw_param("%d", arg1, 0);
2918     print_flags(mmap_prot_flags, arg2, 0);
2919     print_flags(mmap_flags, arg3, 0);
2920     print_raw_param("%d", arg4, 0);
2921     print_raw_param("%#x", arg5, 1);
2922     print_syscall_epilogue(name);
2923 }
2924 #define print_mmap2     print_mmap
2925 #endif
2926 
2927 #ifdef TARGET_NR_mprotect
2928 static void
2929 print_mprotect(const struct syscallname *name,
2930     abi_long arg0, abi_long arg1, abi_long arg2,
2931     abi_long arg3, abi_long arg4, abi_long arg5)
2932 {
2933     print_syscall_prologue(name);
2934     print_pointer(arg0, 0);
2935     print_raw_param("%d", arg1, 0);
2936     print_flags(mmap_prot_flags, arg2, 1);
2937     print_syscall_epilogue(name);
2938 }
2939 #endif
2940 
2941 #ifdef TARGET_NR_munmap
2942 static void
2943 print_munmap(const struct syscallname *name,
2944     abi_long arg0, abi_long arg1, abi_long arg2,
2945     abi_long arg3, abi_long arg4, abi_long arg5)
2946 {
2947     print_syscall_prologue(name);
2948     print_pointer(arg0, 0);
2949     print_raw_param("%d", arg1, 1);
2950     print_syscall_epilogue(name);
2951 }
2952 #endif
2953 
2954 #ifdef TARGET_NR_futex
2955 static void print_futex_op(abi_long tflag, int last)
2956 {
2957 #define print_op(val) \
2958 if( cmd == val ) { \
2959     qemu_log(#val); \
2960     return; \
2961 }
2962 
2963     int cmd = (int)tflag;
2964 #ifdef FUTEX_PRIVATE_FLAG
2965     if (cmd & FUTEX_PRIVATE_FLAG) {
2966         qemu_log("FUTEX_PRIVATE_FLAG|");
2967         cmd &= ~FUTEX_PRIVATE_FLAG;
2968     }
2969 #endif
2970 #ifdef FUTEX_CLOCK_REALTIME
2971     if (cmd & FUTEX_CLOCK_REALTIME) {
2972         qemu_log("FUTEX_CLOCK_REALTIME|");
2973         cmd &= ~FUTEX_CLOCK_REALTIME;
2974     }
2975 #endif
2976     print_op(FUTEX_WAIT)
2977     print_op(FUTEX_WAKE)
2978     print_op(FUTEX_FD)
2979     print_op(FUTEX_REQUEUE)
2980     print_op(FUTEX_CMP_REQUEUE)
2981     print_op(FUTEX_WAKE_OP)
2982     print_op(FUTEX_LOCK_PI)
2983     print_op(FUTEX_UNLOCK_PI)
2984     print_op(FUTEX_TRYLOCK_PI)
2985 #ifdef FUTEX_WAIT_BITSET
2986     print_op(FUTEX_WAIT_BITSET)
2987 #endif
2988 #ifdef FUTEX_WAKE_BITSET
2989     print_op(FUTEX_WAKE_BITSET)
2990 #endif
2991     /* unknown values */
2992     qemu_log("%d", cmd);
2993 }
2994 
2995 static void
2996 print_futex(const struct syscallname *name,
2997     abi_long arg0, abi_long arg1, abi_long arg2,
2998     abi_long arg3, abi_long arg4, abi_long arg5)
2999 {
3000     print_syscall_prologue(name);
3001     print_pointer(arg0, 0);
3002     print_futex_op(arg1, 0);
3003     print_raw_param(",%d", arg2, 0);
3004     print_pointer(arg3, 0); /* struct timespec */
3005     print_pointer(arg4, 0);
3006     print_raw_param("%d", arg4, 1);
3007     print_syscall_epilogue(name);
3008 }
3009 #endif
3010 
3011 #ifdef TARGET_NR_kill
3012 static void
3013 print_kill(const struct syscallname *name,
3014     abi_long arg0, abi_long arg1, abi_long arg2,
3015     abi_long arg3, abi_long arg4, abi_long arg5)
3016 {
3017     print_syscall_prologue(name);
3018     print_raw_param("%d", arg0, 0);
3019     print_signal(arg1, 1);
3020     print_syscall_epilogue(name);
3021 }
3022 #endif
3023 
3024 #ifdef TARGET_NR_tkill
3025 static void
3026 print_tkill(const struct syscallname *name,
3027     abi_long arg0, abi_long arg1, abi_long arg2,
3028     abi_long arg3, abi_long arg4, abi_long arg5)
3029 {
3030     print_syscall_prologue(name);
3031     print_raw_param("%d", arg0, 0);
3032     print_signal(arg1, 1);
3033     print_syscall_epilogue(name);
3034 }
3035 #endif
3036 
3037 #ifdef TARGET_NR_tgkill
3038 static void
3039 print_tgkill(const struct syscallname *name,
3040     abi_long arg0, abi_long arg1, abi_long arg2,
3041     abi_long arg3, abi_long arg4, abi_long arg5)
3042 {
3043     print_syscall_prologue(name);
3044     print_raw_param("%d", arg0, 0);
3045     print_raw_param("%d", arg1, 0);
3046     print_signal(arg2, 1);
3047     print_syscall_epilogue(name);
3048 }
3049 #endif
3050 
3051 #ifdef TARGET_NR_statx
3052 static void
3053 print_statx(const struct syscallname *name,
3054             abi_long arg0, abi_long arg1, abi_long arg2,
3055             abi_long arg3, abi_long arg4, abi_long arg5)
3056 {
3057     print_syscall_prologue(name);
3058     print_at_dirfd(arg0, 0);
3059     print_string(arg1, 0);
3060     print_flags(statx_flags, arg2, 0);
3061     print_flags(statx_mask, arg3, 0);
3062     print_pointer(arg4, 1);
3063     print_syscall_epilogue(name);
3064 }
3065 #endif
3066 
3067 #ifdef TARGET_NR_ioctl
3068 static void
3069 print_ioctl(const struct syscallname *name,
3070             abi_long arg0, abi_long arg1, abi_long arg2,
3071             abi_long arg3, abi_long arg4, abi_long arg5)
3072 {
3073     print_syscall_prologue(name);
3074     print_raw_param("%d", arg0, 0);
3075 
3076     const IOCTLEntry *ie;
3077     const argtype *arg_type;
3078     void *argptr;
3079     int target_size;
3080 
3081     for (ie = ioctl_entries; ie->target_cmd != 0; ie++) {
3082         if (ie->target_cmd == arg1) {
3083             break;
3084         }
3085     }
3086 
3087     if (ie->target_cmd == 0) {
3088         print_raw_param("%#x", arg1, 0);
3089         print_raw_param("%#x", arg2, 1);
3090     } else {
3091         qemu_log("%s", ie->name);
3092         arg_type = ie->arg_type;
3093 
3094         if (arg_type[0] != TYPE_NULL) {
3095             qemu_log(",");
3096 
3097             switch (arg_type[0]) {
3098             case TYPE_PTRVOID:
3099                 print_pointer(arg2, 1);
3100                 break;
3101             case TYPE_CHAR:
3102             case TYPE_SHORT:
3103             case TYPE_INT:
3104                 print_raw_param("%d", arg2, 1);
3105                 break;
3106             case TYPE_LONG:
3107                 print_raw_param(TARGET_ABI_FMT_ld, arg2, 1);
3108                 break;
3109             case TYPE_ULONG:
3110                 print_raw_param(TARGET_ABI_FMT_lu, arg2, 1);
3111                 break;
3112             case TYPE_PTR:
3113                 switch (ie->access) {
3114                 case IOC_R:
3115                     print_pointer(arg2, 1);
3116                     break;
3117                 case IOC_W:
3118                 case IOC_RW:
3119                     arg_type++;
3120                     target_size = thunk_type_size(arg_type, 0);
3121                     argptr = lock_user(VERIFY_READ, arg2, target_size, 1);
3122                     if (argptr) {
3123                         thunk_print(argptr, arg_type);
3124                         unlock_user(argptr, arg2, target_size);
3125                     } else {
3126                         print_pointer(arg2, 1);
3127                     }
3128                     break;
3129                 }
3130                 break;
3131             default:
3132                 g_assert_not_reached();
3133             }
3134         }
3135     }
3136     print_syscall_epilogue(name);
3137 }
3138 #endif
3139 
3140 /*
3141  * An array of all of the syscalls we know about
3142  */
3143 
3144 static const struct syscallname scnames[] = {
3145 #include "strace.list"
3146 };
3147 
3148 static int nsyscalls = ARRAY_SIZE(scnames);
3149 
3150 /*
3151  * The public interface to this module.
3152  */
3153 void
3154 print_syscall(int num,
3155               abi_long arg1, abi_long arg2, abi_long arg3,
3156               abi_long arg4, abi_long arg5, abi_long arg6)
3157 {
3158     int i;
3159     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 ")";
3160 
3161     qemu_log("%d ", getpid());
3162 
3163     for(i=0;i<nsyscalls;i++)
3164         if( scnames[i].nr == num ) {
3165             if( scnames[i].call != NULL ) {
3166                 scnames[i].call(
3167                     &scnames[i], arg1, arg2, arg3, arg4, arg5, arg6);
3168             } else {
3169                 /* XXX: this format system is broken because it uses
3170                    host types and host pointers for strings */
3171                 if( scnames[i].format != NULL )
3172                     format = scnames[i].format;
3173                 qemu_log(format,
3174                          scnames[i].name, arg1, arg2, arg3, arg4, arg5, arg6);
3175             }
3176             return;
3177         }
3178     qemu_log("Unknown syscall %d\n", num);
3179 }
3180 
3181 
3182 void
3183 print_syscall_ret(int num, abi_long ret,
3184                   abi_long arg1, abi_long arg2, abi_long arg3,
3185                   abi_long arg4, abi_long arg5, abi_long arg6)
3186 {
3187     int i;
3188 
3189     for(i=0;i<nsyscalls;i++)
3190         if( scnames[i].nr == num ) {
3191             if( scnames[i].result != NULL ) {
3192                 scnames[i].result(&scnames[i], ret,
3193                                   arg1, arg2, arg3,
3194                                   arg4, arg5, arg6);
3195             } else {
3196                 if (!print_syscall_err(ret)) {
3197                     qemu_log(TARGET_ABI_FMT_ld, ret);
3198                 }
3199                 qemu_log("\n");
3200             }
3201             break;
3202         }
3203 }
3204 
3205 void print_taken_signal(int target_signum, const target_siginfo_t *tinfo)
3206 {
3207     /* Print the strace output for a signal being taken:
3208      * --- SIGSEGV {si_signo=SIGSEGV, si_code=SI_KERNEL, si_addr=0} ---
3209      */
3210     qemu_log("--- ");
3211     print_signal(target_signum, 1);
3212     qemu_log(" ");
3213     print_siginfo(tinfo);
3214     qemu_log(" ---\n");
3215 }
3216