linux-user/strace.c

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