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