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