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 #if defined(TARGET_NR_chown) || defined(TARGET_NR_lchown)
1456 static void
1457 print_chown(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_string(arg0, 0);
1463     print_raw_param("%d", arg1, 0);
1464     print_raw_param("%d", arg2, 1);
1465     print_syscall_epilogue(name);
1466 }
1467 #define print_lchown     print_chown
1468 #endif
1469
1470 #ifdef TARGET_NR_clock_adjtime
1471 static void
1472 print_clock_adjtime(const struct syscallname *name,
1473     abi_long arg0, abi_long arg1, abi_long arg2,
1474     abi_long arg3, abi_long arg4, abi_long arg5)
1475 {
1476     print_syscall_prologue(name);
1477     print_clockid(arg0, 0);
1478     print_pointer(arg1, 1);
1479     print_syscall_epilogue(name);
1480 }
1481 #endif
1482
1483 #ifdef TARGET_NR_clone
1484 static void do_print_clone(unsigned int flags, abi_ulong newsp,
1485                            abi_ulong parent_tidptr, target_ulong newtls,
1486                            abi_ulong child_tidptr)
1487 {
1488     print_flags(clone_flags, flags, 0);
1489     print_raw_param("child_stack=0x" TARGET_ABI_FMT_lx, newsp, 0);
1490     print_raw_param("parent_tidptr=0x" TARGET_ABI_FMT_lx, parent_tidptr, 0);
1491     print_raw_param("tls=0x" TARGET_ABI_FMT_lx, newtls, 0);
1492     print_raw_param("child_tidptr=0x" TARGET_ABI_FMT_lx, child_tidptr, 1);
1493 }
1494
1495 static void
1496 print_clone(const struct syscallname *name,
1497     abi_long arg1, abi_long arg2, abi_long arg3,
1498     abi_long arg4, abi_long arg5, abi_long arg6)
1499 {
1500     print_syscall_prologue(name);
1501 #if defined(TARGET_MICROBLAZE)
1502     do_print_clone(arg1, arg2, arg4, arg6, arg5);
1503 #elif defined(TARGET_CLONE_BACKWARDS)
1504     do_print_clone(arg1, arg2, arg3, arg4, arg5);
1505 #elif defined(TARGET_CLONE_BACKWARDS2)
1506     do_print_clone(arg2, arg1, arg3, arg5, arg4);
1507 #else
1508     do_print_clone(arg1, arg2, arg3, arg5, arg4);
1509 #endif
1510     print_syscall_epilogue(name);
1511 }
1512 #endif
1513
1514 #ifdef TARGET_NR_creat
1515 static void
1516 print_creat(const struct syscallname *name,
1517     abi_long arg0, abi_long arg1, abi_long arg2,
1518     abi_long arg3, abi_long arg4, abi_long arg5)
1519 {
1520     print_syscall_prologue(name);
1521     print_string(arg0, 0);
1522     print_file_mode(arg1, 1);
1523     print_syscall_epilogue(name);
1524 }
1525 #endif
1526
1527 #ifdef TARGET_NR_execv
1528 static void
1529 print_execv(const struct syscallname *name,
1530     abi_long arg0, abi_long arg1, abi_long arg2,
1531     abi_long arg3, abi_long arg4, abi_long arg5)
1532 {
1533     print_syscall_prologue(name);
1534     print_string(arg0, 0);
1535     print_raw_param("0x" TARGET_ABI_FMT_lx, arg1, 1);
1536     print_syscall_epilogue(name);
1537 }
1538 #endif
1539
1540 #ifdef TARGET_NR_faccessat
1541 static void
1542 print_faccessat(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_flags(access_flags, arg2, 0);
1550     print_flags(at_file_flags, arg3, 1);
1551     print_syscall_epilogue(name);
1552 }
1553 #endif
1554
1555 #ifdef TARGET_NR_fchmodat
1556 static void
1557 print_fchmodat(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_file_mode(arg2, 0);
1565     print_flags(at_file_flags, arg3, 1);
1566     print_syscall_epilogue(name);
1567 }
1568 #endif
1569
1570 #ifdef TARGET_NR_fchownat
1571 static void
1572 print_fchownat(const struct syscallname *name,
1573     abi_long arg0, abi_long arg1, abi_long arg2,
1574     abi_long arg3, abi_long arg4, abi_long arg5)
1575 {
1576     print_syscall_prologue(name);
1577     print_at_dirfd(arg0, 0);
1578     print_string(arg1, 0);
1579     print_raw_param("%d", arg2, 0);
1580     print_raw_param("%d", arg3, 0);
1581     print_flags(at_file_flags, arg4, 1);
1582     print_syscall_epilogue(name);
1583 }
1584 #endif
1585
1586 #if defined(TARGET_NR_fcntl) || defined(TARGET_NR_fcntl64)
1587 static void
1588 print_fcntl(const struct syscallname *name,
1589     abi_long arg0, abi_long arg1, abi_long arg2,
1590     abi_long arg3, abi_long arg4, abi_long arg5)
1591 {
1592     print_syscall_prologue(name);
1593     print_raw_param("%d", arg0, 0);
1594     switch(arg1) {
1595     case TARGET_F_DUPFD:
1596         qemu_log("F_DUPFD,");
1597         print_raw_param(TARGET_ABI_FMT_ld, arg2, 1);
1598         break;
1599     case TARGET_F_GETFD:
1600         qemu_log("F_GETFD");
1601         break;
1602     case TARGET_F_SETFD:
1603         qemu_log("F_SETFD,");
1604         print_raw_param(TARGET_ABI_FMT_ld, arg2, 1);
1605         break;
1606     case TARGET_F_GETFL:
1607         qemu_log("F_GETFL");
1608         break;
1609     case TARGET_F_SETFL:
1610         qemu_log("F_SETFL,");
1611         print_open_flags(arg2, 1);
1612         break;
1613     case TARGET_F_GETLK:
1614         qemu_log("F_GETLK,");
1615         print_pointer(arg2, 1);
1616         break;
1617     case TARGET_F_SETLK:
1618         qemu_log("F_SETLK,");
1619         print_pointer(arg2, 1);
1620         break;
1621     case TARGET_F_SETLKW:
1622         qemu_log("F_SETLKW,");
1623         print_pointer(arg2, 1);
1624         break;
1625     case TARGET_F_GETOWN:
1626         qemu_log("F_GETOWN");
1627         break;
1628     case TARGET_F_SETOWN:
1629         qemu_log("F_SETOWN,");
1630         print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
1631         break;
1632     case TARGET_F_GETSIG:
1633         qemu_log("F_GETSIG");
1634         break;
1635     case TARGET_F_SETSIG:
1636         qemu_log("F_SETSIG,");
1637         print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
1638         break;
1639 #if TARGET_ABI_BITS == 32
1640     case TARGET_F_GETLK64:
1641         qemu_log("F_GETLK64,");
1642         print_pointer(arg2, 1);
1643         break;
1644     case TARGET_F_SETLK64:
1645         qemu_log("F_SETLK64,");
1646         print_pointer(arg2, 1);
1647         break;
1648     case TARGET_F_SETLKW64:
1649         qemu_log("F_SETLKW64,");
1650         print_pointer(arg2, 1);
1651         break;
1652 #endif
1653     case TARGET_F_SETLEASE:
1654         qemu_log("F_SETLEASE,");
1655         print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
1656         break;
1657     case TARGET_F_GETLEASE:
1658         qemu_log("F_GETLEASE");
1659         break;
1660     case TARGET_F_SETPIPE_SZ:
1661         qemu_log("F_SETPIPE_SZ,");
1662         print_raw_param(TARGET_ABI_FMT_ld, arg2, 1);
1663         break;
1664     case TARGET_F_GETPIPE_SZ:
1665         qemu_log("F_GETPIPE_SZ");
1666         break;
1667     case TARGET_F_DUPFD_CLOEXEC:
1668         qemu_log("F_DUPFD_CLOEXEC,");
1669         print_raw_param(TARGET_ABI_FMT_ld, arg2, 1);
1670         break;
1671     case TARGET_F_NOTIFY:
1672         qemu_log("F_NOTIFY,");
1673         print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
1674         break;
1675     default:
1676         print_raw_param(TARGET_ABI_FMT_ld, arg1, 0);
1677         print_pointer(arg2, 1);
1678         break;
1679     }
1680     print_syscall_epilogue(name);
1681 }
1682 #define print_fcntl64   print_fcntl
1683 #endif
1684
1685 #ifdef TARGET_NR_fgetxattr
1686 static void
1687 print_fgetxattr(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_string(arg1, 0);
1694     print_pointer(arg2, 0);
1695     print_raw_param(TARGET_FMT_lu, arg3, 1);
1696     print_syscall_epilogue(name);
1697 }
1698 #endif
1699
1700 #ifdef TARGET_NR_flistxattr
1701 static void
1702 print_flistxattr(const struct syscallname *name,
1703     abi_long arg0, abi_long arg1, abi_long arg2,
1704     abi_long arg3, abi_long arg4, abi_long arg5)
1705 {
1706     print_syscall_prologue(name);
1707     print_raw_param("%d", arg0, 0);
1708     print_pointer(arg1, 0);
1709     print_raw_param(TARGET_FMT_lu, arg2, 1);
1710     print_syscall_epilogue(name);
1711 }
1712 #endif
1713
1714 #if defined(TARGET_NR_getxattr) || defined(TARGET_NR_lgetxattr)
1715 static void
1716 print_getxattr(const struct syscallname *name,
1717     abi_long arg0, abi_long arg1, abi_long arg2,
1718     abi_long arg3, abi_long arg4, abi_long arg5)
1719 {
1720     print_syscall_prologue(name);
1721     print_string(arg0, 0);
1722     print_string(arg1, 0);
1723     print_pointer(arg2, 0);
1724     print_raw_param(TARGET_FMT_lu, arg3, 1);
1725     print_syscall_epilogue(name);
1726 }
1727 #define print_lgetxattr     print_getxattr
1728 #endif
1729
1730 #if defined(TARGET_NR_listxattr) || defined(TARGET_NR_llistxattr)
1731 static void
1732 print_listxattr(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_string(arg0, 0);
1738     print_pointer(arg1, 0);
1739     print_raw_param(TARGET_FMT_lu, arg2, 1);
1740     print_syscall_epilogue(name);
1741 }
1742 #define print_llistxattr     print_listxattr
1743 #endif
1744
1745 #if defined(TARGET_NR_fremovexattr)
1746 static void
1747 print_fremovexattr(const struct syscallname *name,
1748     abi_long arg0, abi_long arg1, abi_long arg2,
1749     abi_long arg3, abi_long arg4, abi_long arg5)
1750 {
1751     print_syscall_prologue(name);
1752     print_raw_param("%d", arg0, 0);
1753     print_string(arg1, 1);
1754     print_syscall_epilogue(name);
1755 }
1756 #endif
1757
1758 #if defined(TARGET_NR_removexattr) || defined(TARGET_NR_lremovexattr)
1759 static void
1760 print_removexattr(const struct syscallname *name,
1761     abi_long arg0, abi_long arg1, abi_long arg2,
1762     abi_long arg3, abi_long arg4, abi_long arg5)
1763 {
1764     print_syscall_prologue(name);
1765     print_string(arg0, 0);
1766     print_string(arg1, 1);
1767     print_syscall_epilogue(name);
1768 }
1769 #define print_lremovexattr     print_removexattr
1770 #endif
1771
1772 #ifdef TARGET_NR_futimesat
1773 static void
1774 print_futimesat(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_at_dirfd(arg0, 0);
1780     print_string(arg1, 0);
1781     print_timeval(arg2, 0);
1782     print_timeval(arg2 + sizeof (struct target_timeval), 1);
1783     print_syscall_epilogue(name);
1784 }
1785 #endif
1786
1787 #ifdef TARGET_NR_settimeofday
1788 static void
1789 print_settimeofday(const struct syscallname *name,
1790                 abi_long arg0, abi_long arg1, abi_long arg2,
1791                 abi_long arg3, abi_long arg4, abi_long arg5)
1792 {
1793     print_syscall_prologue(name);
1794     print_timeval(arg0, 0);
1795     print_timezone(arg1, 1);
1796     print_syscall_epilogue(name);
1797 }
1798 #endif
1799
1800 #ifdef TARGET_NR_link
1801 static void
1802 print_link(const struct syscallname *name,
1803     abi_long arg0, abi_long arg1, abi_long arg2,
1804     abi_long arg3, abi_long arg4, abi_long arg5)
1805 {
1806     print_syscall_prologue(name);
1807     print_string(arg0, 0);
1808     print_string(arg1, 1);
1809     print_syscall_epilogue(name);
1810 }
1811 #endif
1812
1813 #ifdef TARGET_NR_linkat
1814 static void
1815 print_linkat(const struct syscallname *name,
1816     abi_long arg0, abi_long arg1, abi_long arg2,
1817     abi_long arg3, abi_long arg4, abi_long arg5)
1818 {
1819     print_syscall_prologue(name);
1820     print_at_dirfd(arg0, 0);
1821     print_string(arg1, 0);
1822     print_at_dirfd(arg2, 0);
1823     print_string(arg3, 0);
1824     print_flags(at_file_flags, arg4, 1);
1825     print_syscall_epilogue(name);
1826 }
1827 #endif
1828
1829 #ifdef TARGET_NR__llseek
1830 static void
1831 print__llseek(const struct syscallname *name,
1832     abi_long arg0, abi_long arg1, abi_long arg2,
1833     abi_long arg3, abi_long arg4, abi_long arg5)
1834 {
1835     const char *whence = "UNKNOWN";
1836     print_syscall_prologue(name);
1837     print_raw_param("%d", arg0, 0);
1838     print_raw_param("%ld", arg1, 0);
1839     print_raw_param("%ld", arg2, 0);
1840     print_pointer(arg3, 0);
1841     switch(arg4) {
1842     case SEEK_SET: whence = "SEEK_SET"; break;
1843     case SEEK_CUR: whence = "SEEK_CUR"; break;
1844     case SEEK_END: whence = "SEEK_END"; break;
1845     }
1846     qemu_log("%s", whence);
1847     print_syscall_epilogue(name);
1848 }
1849 #endif
1850
1851 #ifdef TARGET_NR_lseek
1852 static void
1853 print_lseek(const struct syscallname *name,
1854     abi_long arg0, abi_long arg1, abi_long arg2,
1855     abi_long arg3, abi_long arg4, abi_long arg5)
1856 {
1857     print_syscall_prologue(name);
1858     print_raw_param("%d", arg0, 0);
1859     print_raw_param(TARGET_ABI_FMT_ld, arg1, 0);
1860     switch (arg2) {
1861     case SEEK_SET:
1862         qemu_log("SEEK_SET"); break;
1863     case SEEK_CUR:
1864         qemu_log("SEEK_CUR"); break;
1865     case SEEK_END:
1866         qemu_log("SEEK_END"); break;
1867 #ifdef SEEK_DATA
1868     case SEEK_DATA:
1869         qemu_log("SEEK_DATA"); break;
1870 #endif
1871 #ifdef SEEK_HOLE
1872     case SEEK_HOLE:
1873         qemu_log("SEEK_HOLE"); break;
1874 #endif
1875     default:
1876         print_raw_param("%#x", arg2, 1);
1877     }
1878     print_syscall_epilogue(name);
1879 }
1880 #endif
1881
1882 #if defined(TARGET_NR_socket)
1883 static void
1884 print_socket(const struct syscallname *name,
1885              abi_long arg0, abi_long arg1, abi_long arg2,
1886              abi_long arg3, abi_long arg4, abi_long arg5)
1887 {
1888     abi_ulong domain = arg0, type = arg1, protocol = arg2;
1889
1890     print_syscall_prologue(name);
1891     print_socket_domain(domain);
1892     qemu_log(",");
1893     print_socket_type(type);
1894     qemu_log(",");
1895     if (domain == AF_PACKET ||
1896         (domain == AF_INET && type == TARGET_SOCK_PACKET)) {
1897         protocol = tswap16(protocol);
1898     }
1899     print_socket_protocol(domain, type, protocol);
1900     print_syscall_epilogue(name);
1901 }
1902
1903 #endif
1904
1905 #if defined(TARGET_NR_socketcall) || defined(TARGET_NR_bind)
1906
1907 static void print_sockfd(abi_long sockfd, int last)
1908 {
1909     print_raw_param(TARGET_ABI_FMT_ld, sockfd, last);
1910 }
1911
1912 #endif
1913
1914 #if defined(TARGET_NR_socketcall)
1915
1916 #define get_user_ualx(x, gaddr, idx) \
1917         get_user_ual(x, (gaddr) + (idx) * sizeof(abi_long))
1918
1919 static void do_print_socket(const char *name, abi_long arg1)
1920 {
1921     abi_ulong domain, type, protocol;
1922
1923     get_user_ualx(domain, arg1, 0);
1924     get_user_ualx(type, arg1, 1);
1925     get_user_ualx(protocol, arg1, 2);
1926     qemu_log("%s(", name);
1927     print_socket_domain(domain);
1928     qemu_log(",");
1929     print_socket_type(type);
1930     qemu_log(",");
1931     if (domain == AF_PACKET ||
1932         (domain == AF_INET && type == TARGET_SOCK_PACKET)) {
1933         protocol = tswap16(protocol);
1934     }
1935     print_socket_protocol(domain, type, protocol);
1936     qemu_log(")");
1937 }
1938
1939 static void do_print_sockaddr(const char *name, abi_long arg1)
1940 {
1941     abi_ulong sockfd, addr, addrlen;
1942
1943     get_user_ualx(sockfd, arg1, 0);
1944     get_user_ualx(addr, arg1, 1);
1945     get_user_ualx(addrlen, arg1, 2);
1946
1947     qemu_log("%s(", name);
1948     print_sockfd(sockfd, 0);
1949     print_sockaddr(addr, addrlen, 0);
1950     qemu_log(")");
1951 }
1952
1953 static void do_print_listen(const char *name, abi_long arg1)
1954 {
1955     abi_ulong sockfd, backlog;
1956
1957     get_user_ualx(sockfd, arg1, 0);
1958     get_user_ualx(backlog, arg1, 1);
1959
1960     qemu_log("%s(", name);
1961     print_sockfd(sockfd, 0);
1962     print_raw_param(TARGET_ABI_FMT_ld, backlog, 1);
1963     qemu_log(")");
1964 }
1965
1966 static void do_print_socketpair(const char *name, abi_long arg1)
1967 {
1968     abi_ulong domain, type, protocol, tab;
1969
1970     get_user_ualx(domain, arg1, 0);
1971     get_user_ualx(type, arg1, 1);
1972     get_user_ualx(protocol, arg1, 2);
1973     get_user_ualx(tab, arg1, 3);
1974
1975     qemu_log("%s(", name);
1976     print_socket_domain(domain);
1977     qemu_log(",");
1978     print_socket_type(type);
1979     qemu_log(",");
1980     print_socket_protocol(domain, type, protocol);
1981     qemu_log(",");
1982     print_raw_param(TARGET_ABI_FMT_lx, tab, 1);
1983     qemu_log(")");
1984 }
1985
1986 static void do_print_sendrecv(const char *name, abi_long arg1)
1987 {
1988     abi_ulong sockfd, msg, len, flags;
1989
1990     get_user_ualx(sockfd, arg1, 0);
1991     get_user_ualx(msg, arg1, 1);
1992     get_user_ualx(len, arg1, 2);
1993     get_user_ualx(flags, arg1, 3);
1994
1995     qemu_log("%s(", name);
1996     print_sockfd(sockfd, 0);
1997     print_buf(msg, len, 0);
1998     print_raw_param(TARGET_ABI_FMT_ld, len, 0);
1999     print_flags(msg_flags, flags, 1);
2000     qemu_log(")");
2001 }
2002
2003 static void do_print_msgaddr(const char *name, abi_long arg1)
2004 {
2005     abi_ulong sockfd, msg, len, flags, addr, addrlen;
2006
2007     get_user_ualx(sockfd, arg1, 0);
2008     get_user_ualx(msg, arg1, 1);
2009     get_user_ualx(len, arg1, 2);
2010     get_user_ualx(flags, arg1, 3);
2011     get_user_ualx(addr, arg1, 4);
2012     get_user_ualx(addrlen, arg1, 5);
2013
2014     qemu_log("%s(", name);
2015     print_sockfd(sockfd, 0);
2016     print_buf(msg, len, 0);
2017     print_raw_param(TARGET_ABI_FMT_ld, len, 0);
2018     print_flags(msg_flags, flags, 0);
2019     print_sockaddr(addr, addrlen, 0);
2020     qemu_log(")");
2021 }
2022
2023 static void do_print_shutdown(const char *name, abi_long arg1)
2024 {
2025     abi_ulong sockfd, how;
2026
2027     get_user_ualx(sockfd, arg1, 0);
2028     get_user_ualx(how, arg1, 1);
2029
2030     qemu_log("shutdown(");
2031     print_sockfd(sockfd, 0);
2032     switch (how) {
2033     case SHUT_RD:
2034         qemu_log("SHUT_RD");
2035         break;
2036     case SHUT_WR:
2037         qemu_log("SHUT_WR");
2038         break;
2039     case SHUT_RDWR:
2040         qemu_log("SHUT_RDWR");
2041         break;
2042     default:
2043         print_raw_param(TARGET_ABI_FMT_ld, how, 1);
2044         break;
2045     }
2046     qemu_log(")");
2047 }
2048
2049 static void do_print_msg(const char *name, abi_long arg1)
2050 {
2051     abi_ulong sockfd, msg, flags;
2052
2053     get_user_ualx(sockfd, arg1, 0);
2054     get_user_ualx(msg, arg1, 1);
2055     get_user_ualx(flags, arg1, 2);
2056
2057     qemu_log("%s(", name);
2058     print_sockfd(sockfd, 0);
2059     print_pointer(msg, 0);
2060     print_flags(msg_flags, flags, 1);
2061     qemu_log(")");
2062 }
2063
2064 static void do_print_sockopt(const char *name, abi_long arg1)
2065 {
2066     abi_ulong sockfd, level, optname, optval, optlen;
2067
2068     get_user_ualx(sockfd, arg1, 0);
2069     get_user_ualx(level, arg1, 1);
2070     get_user_ualx(optname, arg1, 2);
2071     get_user_ualx(optval, arg1, 3);
2072     get_user_ualx(optlen, arg1, 4);
2073
2074     qemu_log("%s(", name);
2075     print_sockfd(sockfd, 0);
2076     switch (level) {
2077     case SOL_TCP:
2078         qemu_log("SOL_TCP,");
2079         print_raw_param(TARGET_ABI_FMT_ld, optname, 0);
2080         print_pointer(optval, 0);
2081         break;
2082     case SOL_IP:
2083         qemu_log("SOL_IP,");
2084         print_raw_param(TARGET_ABI_FMT_ld, optname, 0);
2085         print_pointer(optval, 0);
2086         break;
2087     case SOL_RAW:
2088         qemu_log("SOL_RAW,");
2089         print_raw_param(TARGET_ABI_FMT_ld, optname, 0);
2090         print_pointer(optval, 0);
2091         break;
2092     case TARGET_SOL_SOCKET:
2093         qemu_log("SOL_SOCKET,");
2094         switch (optname) {
2095         case TARGET_SO_DEBUG:
2096             qemu_log("SO_DEBUG,");
2097 print_optint:
2098             print_number(optval, 0);
2099             break;
2100         case TARGET_SO_REUSEADDR:
2101             qemu_log("SO_REUSEADDR,");
2102             goto print_optint;
2103         case TARGET_SO_REUSEPORT:
2104             qemu_log("SO_REUSEPORT,");
2105             goto print_optint;
2106         case TARGET_SO_TYPE:
2107             qemu_log("SO_TYPE,");
2108             goto print_optint;
2109         case TARGET_SO_ERROR:
2110             qemu_log("SO_ERROR,");
2111             goto print_optint;
2112         case TARGET_SO_DONTROUTE:
2113             qemu_log("SO_DONTROUTE,");
2114             goto print_optint;
2115         case TARGET_SO_BROADCAST:
2116             qemu_log("SO_BROADCAST,");
2117             goto print_optint;
2118         case TARGET_SO_SNDBUF:
2119             qemu_log("SO_SNDBUF,");
2120             goto print_optint;
2121         case TARGET_SO_RCVBUF:
2122             qemu_log("SO_RCVBUF,");
2123             goto print_optint;
2124         case TARGET_SO_KEEPALIVE:
2125             qemu_log("SO_KEEPALIVE,");
2126             goto print_optint;
2127         case TARGET_SO_OOBINLINE:
2128             qemu_log("SO_OOBINLINE,");
2129             goto print_optint;
2130         case TARGET_SO_NO_CHECK:
2131             qemu_log("SO_NO_CHECK,");
2132             goto print_optint;
2133         case TARGET_SO_PRIORITY:
2134             qemu_log("SO_PRIORITY,");
2135             goto print_optint;
2136         case TARGET_SO_BSDCOMPAT:
2137             qemu_log("SO_BSDCOMPAT,");
2138             goto print_optint;
2139         case TARGET_SO_PASSCRED:
2140             qemu_log("SO_PASSCRED,");
2141             goto print_optint;
2142         case TARGET_SO_TIMESTAMP:
2143             qemu_log("SO_TIMESTAMP,");
2144             goto print_optint;
2145         case TARGET_SO_RCVLOWAT:
2146             qemu_log("SO_RCVLOWAT,");
2147             goto print_optint;
2148         case TARGET_SO_RCVTIMEO:
2149             qemu_log("SO_RCVTIMEO,");
2150             print_timeval(optval, 0);
2151             break;
2152         case TARGET_SO_SNDTIMEO:
2153             qemu_log("SO_SNDTIMEO,");
2154             print_timeval(optval, 0);
2155             break;
2156         case TARGET_SO_ATTACH_FILTER: {
2157             struct target_sock_fprog *fprog;
2158
2159             qemu_log("SO_ATTACH_FILTER,");
2160
2161             if (lock_user_struct(VERIFY_READ, fprog, optval,  0)) {
2162                 struct target_sock_filter *filter;
2163                 qemu_log("{");
2164                 if (lock_user_struct(VERIFY_READ, filter,
2165                                      tswapal(fprog->filter),  0)) {
2166                     int i;
2167                     for (i = 0; i < tswap16(fprog->len) - 1; i++) {
2168                         qemu_log("[%d]{0x%x,%d,%d,0x%x},",
2169                                  i, tswap16(filter[i].code),
2170                                  filter[i].jt, filter[i].jf,
2171                                  tswap32(filter[i].k));
2172                     }
2173                     qemu_log("[%d]{0x%x,%d,%d,0x%x}",
2174                              i, tswap16(filter[i].code),
2175                              filter[i].jt, filter[i].jf,
2176                              tswap32(filter[i].k));
2177                 } else {
2178                     qemu_log(TARGET_ABI_FMT_lx, tswapal(fprog->filter));
2179                 }
2180                 qemu_log(",%d},", tswap16(fprog->len));
2181                 unlock_user(fprog, optval, 0);
2182             } else {
2183                 print_pointer(optval, 0);
2184             }
2185             break;
2186         }
2187         default:
2188             print_raw_param(TARGET_ABI_FMT_ld, optname, 0);
2189             print_pointer(optval, 0);
2190             break;
2191         }
2192         break;
2193     default:
2194         print_raw_param(TARGET_ABI_FMT_ld, level, 0);
2195         print_raw_param(TARGET_ABI_FMT_ld, optname, 0);
2196         print_pointer(optval, 0);
2197         break;
2198     }
2199     print_raw_param(TARGET_ABI_FMT_ld, optlen, 1);
2200     qemu_log(")");
2201 }
2202
2203 #define PRINT_SOCKOP(name, func) \
2204     [TARGET_SYS_##name] = { #name, func }
2205
2206 static struct {
2207     const char *name;
2208     void (*print)(const char *, abi_long);
2209 } scall[] = {
2210     PRINT_SOCKOP(SOCKET, do_print_socket),
2211     PRINT_SOCKOP(BIND, do_print_sockaddr),
2212     PRINT_SOCKOP(CONNECT, do_print_sockaddr),
2213     PRINT_SOCKOP(LISTEN, do_print_listen),
2214     PRINT_SOCKOP(ACCEPT, do_print_sockaddr),
2215     PRINT_SOCKOP(GETSOCKNAME, do_print_sockaddr),
2216     PRINT_SOCKOP(GETPEERNAME, do_print_sockaddr),
2217     PRINT_SOCKOP(SOCKETPAIR, do_print_socketpair),
2218     PRINT_SOCKOP(SEND, do_print_sendrecv),
2219     PRINT_SOCKOP(RECV, do_print_sendrecv),
2220     PRINT_SOCKOP(SENDTO, do_print_msgaddr),
2221     PRINT_SOCKOP(RECVFROM, do_print_msgaddr),
2222     PRINT_SOCKOP(SHUTDOWN, do_print_shutdown),
2223     PRINT_SOCKOP(SETSOCKOPT, do_print_sockopt),
2224     PRINT_SOCKOP(GETSOCKOPT, do_print_sockopt),
2225     PRINT_SOCKOP(SENDMSG, do_print_msg),
2226     PRINT_SOCKOP(RECVMSG, do_print_msg),
2227     PRINT_SOCKOP(ACCEPT4, NULL),
2228     PRINT_SOCKOP(RECVMMSG, NULL),
2229     PRINT_SOCKOP(SENDMMSG, NULL),
2230 };
2231
2232 static void
2233 print_socketcall(const struct syscallname *name,
2234                  abi_long arg0, abi_long arg1, abi_long arg2,
2235                  abi_long arg3, abi_long arg4, abi_long arg5)
2236 {
2237     if (arg0 >= 0 && arg0 < ARRAY_SIZE(scall) && scall[arg0].print) {
2238         scall[arg0].print(scall[arg0].name, arg1);
2239         return;
2240     }
2241     print_syscall_prologue(name);
2242     print_raw_param(TARGET_ABI_FMT_ld, arg0, 0);
2243     print_raw_param(TARGET_ABI_FMT_ld, arg1, 0);
2244     print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
2245     print_raw_param(TARGET_ABI_FMT_ld, arg3, 0);
2246     print_raw_param(TARGET_ABI_FMT_ld, arg4, 0);
2247     print_raw_param(TARGET_ABI_FMT_ld, arg5, 0);
2248     print_syscall_epilogue(name);
2249 }
2250 #endif
2251
2252 #if defined(TARGET_NR_bind)
2253 static void
2254 print_bind(const struct syscallname *name,
2255            abi_long arg0, abi_long arg1, abi_long arg2,
2256            abi_long arg3, abi_long arg4, abi_long arg5)
2257 {
2258     print_syscall_prologue(name);
2259     print_sockfd(arg0, 0);
2260     print_sockaddr(arg1, arg2, 1);
2261     print_syscall_epilogue(name);
2262 }
2263 #endif
2264
2265 #if defined(TARGET_NR_stat) || defined(TARGET_NR_stat64) || \
2266     defined(TARGET_NR_lstat) || defined(TARGET_NR_lstat64)
2267 static void
2268 print_stat(const struct syscallname *name,
2269     abi_long arg0, abi_long arg1, abi_long arg2,
2270     abi_long arg3, abi_long arg4, abi_long arg5)
2271 {
2272     print_syscall_prologue(name);
2273     print_string(arg0, 0);
2274     print_pointer(arg1, 1);
2275     print_syscall_epilogue(name);
2276 }
2277 #define print_lstat     print_stat
2278 #define print_stat64    print_stat
2279 #define print_lstat64   print_stat
2280 #endif
2281
2282 #if defined(TARGET_NR_fstat) || defined(TARGET_NR_fstat64)
2283 static void
2284 print_fstat(const struct syscallname *name,
2285     abi_long arg0, abi_long arg1, abi_long arg2,
2286     abi_long arg3, abi_long arg4, abi_long arg5)
2287 {
2288     print_syscall_prologue(name);
2289     print_raw_param("%d", arg0, 0);
2290     print_pointer(arg1, 1);
2291     print_syscall_epilogue(name);
2292 }
2293 #define print_fstat64     print_fstat
2294 #endif
2295
2296 #ifdef TARGET_NR_mkdir
2297 static void
2298 print_mkdir(const struct syscallname *name,
2299     abi_long arg0, abi_long arg1, abi_long arg2,
2300     abi_long arg3, abi_long arg4, abi_long arg5)
2301 {
2302     print_syscall_prologue(name);
2303     print_string(arg0, 0);
2304     print_file_mode(arg1, 1);
2305     print_syscall_epilogue(name);
2306 }
2307 #endif
2308
2309 #ifdef TARGET_NR_mkdirat
2310 static void
2311 print_mkdirat(const struct syscallname *name,
2312     abi_long arg0, abi_long arg1, abi_long arg2,
2313     abi_long arg3, abi_long arg4, abi_long arg5)
2314 {
2315     print_syscall_prologue(name);
2316     print_at_dirfd(arg0, 0);
2317     print_string(arg1, 0);
2318     print_file_mode(arg2, 1);
2319     print_syscall_epilogue(name);
2320 }
2321 #endif
2322
2323 #ifdef TARGET_NR_rmdir
2324 static void
2325 print_rmdir(const struct syscallname *name,
2326     abi_long arg0, abi_long arg1, abi_long arg2,
2327     abi_long arg3, abi_long arg4, abi_long arg5)
2328 {
2329     print_syscall_prologue(name);
2330     print_string(arg0, 0);
2331     print_syscall_epilogue(name);
2332 }
2333 #endif
2334
2335 #ifdef TARGET_NR_rt_sigaction
2336 static void
2337 print_rt_sigaction(const struct syscallname *name,
2338     abi_long arg0, abi_long arg1, abi_long arg2,
2339     abi_long arg3, abi_long arg4, abi_long arg5)
2340 {
2341     print_syscall_prologue(name);
2342     print_signal(arg0, 0);
2343     print_pointer(arg1, 0);
2344     print_pointer(arg2, 1);
2345     print_syscall_epilogue(name);
2346 }
2347 #endif
2348
2349 #ifdef TARGET_NR_rt_sigprocmask
2350 static void
2351 print_rt_sigprocmask(const struct syscallname *name,
2352     abi_long arg0, abi_long arg1, abi_long arg2,
2353     abi_long arg3, abi_long arg4, abi_long arg5)
2354 {
2355     const char *how = "UNKNOWN";
2356     print_syscall_prologue(name);
2357     switch(arg0) {
2358     case TARGET_SIG_BLOCK: how = "SIG_BLOCK"; break;
2359     case TARGET_SIG_UNBLOCK: how = "SIG_UNBLOCK"; break;
2360     case TARGET_SIG_SETMASK: how = "SIG_SETMASK"; break;
2361     }
2362     qemu_log("%s,", how);
2363     print_pointer(arg1, 0);
2364     print_pointer(arg2, 1);
2365     print_syscall_epilogue(name);
2366 }
2367 #endif
2368
2369 #ifdef TARGET_NR_rt_sigqueueinfo
2370 static void
2371 print_rt_sigqueueinfo(const struct syscallname *name,
2372     abi_long arg0, abi_long arg1, abi_long arg2,
2373     abi_long arg3, abi_long arg4, abi_long arg5)
2374 {
2375     void *p;
2376     target_siginfo_t uinfo;
2377
2378     print_syscall_prologue(name);
2379     print_raw_param("%d", arg0, 0);
2380     print_signal(arg1, 0);
2381     p = lock_user(VERIFY_READ, arg2, sizeof(target_siginfo_t), 1);
2382     if (p) {
2383         get_target_siginfo(&uinfo, p);
2384         print_siginfo(&uinfo);
2385
2386         unlock_user(p, arg2, 0);
2387     } else {
2388         print_pointer(arg2, 1);
2389     }
2390     print_syscall_epilogue(name);
2391 }
2392 #endif
2393
2394 #ifdef TARGET_NR_rt_tgsigqueueinfo
2395 static void
2396 print_rt_tgsigqueueinfo(const struct syscallname *name,
2397     abi_long arg0, abi_long arg1, abi_long arg2,
2398     abi_long arg3, abi_long arg4, abi_long arg5)
2399 {
2400     void *p;
2401     target_siginfo_t uinfo;
2402
2403     print_syscall_prologue(name);
2404     print_raw_param("%d", arg0, 0);
2405     print_raw_param("%d", arg1, 0);
2406     print_signal(arg2, 0);
2407     p = lock_user(VERIFY_READ, arg3, sizeof(target_siginfo_t), 1);
2408     if (p) {
2409         get_target_siginfo(&uinfo, p);
2410         print_siginfo(&uinfo);
2411
2412         unlock_user(p, arg3, 0);
2413     } else {
2414         print_pointer(arg3, 1);
2415     }
2416     print_syscall_epilogue(name);
2417 }
2418 #endif
2419
2420 #ifdef TARGET_NR_syslog
2421 static void
2422 print_syslog_action(abi_ulong arg, int last)
2423 {
2424     const char *type;
2425
2426     switch (arg) {
2427         case TARGET_SYSLOG_ACTION_CLOSE: {
2428             type = "SYSLOG_ACTION_CLOSE";
2429             break;
2430         }
2431         case TARGET_SYSLOG_ACTION_OPEN: {
2432             type = "SYSLOG_ACTION_OPEN";
2433             break;
2434         }
2435         case TARGET_SYSLOG_ACTION_READ: {
2436             type = "SYSLOG_ACTION_READ";
2437             break;
2438         }
2439         case TARGET_SYSLOG_ACTION_READ_ALL: {
2440             type = "SYSLOG_ACTION_READ_ALL";
2441             break;
2442         }
2443         case TARGET_SYSLOG_ACTION_READ_CLEAR: {
2444             type = "SYSLOG_ACTION_READ_CLEAR";
2445             break;
2446         }
2447         case TARGET_SYSLOG_ACTION_CLEAR: {
2448             type = "SYSLOG_ACTION_CLEAR";
2449             break;
2450         }
2451         case TARGET_SYSLOG_ACTION_CONSOLE_OFF: {
2452             type = "SYSLOG_ACTION_CONSOLE_OFF";
2453             break;
2454         }
2455         case TARGET_SYSLOG_ACTION_CONSOLE_ON: {
2456             type = "SYSLOG_ACTION_CONSOLE_ON";
2457             break;
2458         }
2459         case TARGET_SYSLOG_ACTION_CONSOLE_LEVEL: {
2460             type = "SYSLOG_ACTION_CONSOLE_LEVEL";
2461             break;
2462         }
2463         case TARGET_SYSLOG_ACTION_SIZE_UNREAD: {
2464             type = "SYSLOG_ACTION_SIZE_UNREAD";
2465             break;
2466         }
2467         case TARGET_SYSLOG_ACTION_SIZE_BUFFER: {
2468             type = "SYSLOG_ACTION_SIZE_BUFFER";
2469             break;
2470         }
2471         default: {
2472             print_raw_param("%ld", arg, last);
2473             return;
2474         }
2475     }
2476     qemu_log("%s%s", type, get_comma(last));
2477 }
2478
2479 static void
2480 print_syslog(const struct syscallname *name,
2481     abi_long arg0, abi_long arg1, abi_long arg2,
2482     abi_long arg3, abi_long arg4, abi_long arg5)
2483 {
2484     print_syscall_prologue(name);
2485     print_syslog_action(arg0, 0);
2486     print_pointer(arg1, 0);
2487     print_raw_param("%d", arg2, 1);
2488     print_syscall_epilogue(name);
2489 }
2490 #endif
2491
2492 #ifdef TARGET_NR_mknod
2493 static void
2494 print_mknod(const struct syscallname *name,
2495     abi_long arg0, abi_long arg1, abi_long arg2,
2496     abi_long arg3, abi_long arg4, abi_long arg5)
2497 {
2498     int hasdev = (arg1 & (S_IFCHR|S_IFBLK));
2499
2500     print_syscall_prologue(name);
2501     print_string(arg0, 0);
2502     print_file_mode(arg1, (hasdev == 0));
2503     if (hasdev) {
2504         print_raw_param("makedev(%d", major(arg2), 0);
2505         print_raw_param("%d)", minor(arg2), 1);
2506     }
2507     print_syscall_epilogue(name);
2508 }
2509 #endif
2510
2511 #ifdef TARGET_NR_mknodat
2512 static void
2513 print_mknodat(const struct syscallname *name,
2514     abi_long arg0, abi_long arg1, abi_long arg2,
2515     abi_long arg3, abi_long arg4, abi_long arg5)
2516 {
2517     int hasdev = (arg2 & (S_IFCHR|S_IFBLK));
2518
2519     print_syscall_prologue(name);
2520     print_at_dirfd(arg0, 0);
2521     print_string(arg1, 0);
2522     print_file_mode(arg2, (hasdev == 0));
2523     if (hasdev) {
2524         print_raw_param("makedev(%d", major(arg3), 0);
2525         print_raw_param("%d)", minor(arg3), 1);
2526     }
2527     print_syscall_epilogue(name);
2528 }
2529 #endif
2530
2531 #ifdef TARGET_NR_mq_open
2532 static void
2533 print_mq_open(const struct syscallname *name,
2534     abi_long arg0, abi_long arg1, abi_long arg2,
2535     abi_long arg3, abi_long arg4, abi_long arg5)
2536 {
2537     int is_creat = (arg1 & TARGET_O_CREAT);
2538
2539     print_syscall_prologue(name);
2540     print_string(arg0, 0);
2541     print_open_flags(arg1, (is_creat == 0));
2542     if (is_creat) {
2543         print_file_mode(arg2, 0);
2544         print_pointer(arg3, 1);
2545     }
2546     print_syscall_epilogue(name);
2547 }
2548 #endif
2549
2550 #ifdef TARGET_NR_open
2551 static void
2552 print_open(const struct syscallname *name,
2553     abi_long arg0, abi_long arg1, abi_long arg2,
2554     abi_long arg3, abi_long arg4, abi_long arg5)
2555 {
2556     int is_creat = (arg1 & TARGET_O_CREAT);
2557
2558     print_syscall_prologue(name);
2559     print_string(arg0, 0);
2560     print_open_flags(arg1, (is_creat == 0));
2561     if (is_creat)
2562         print_file_mode(arg2, 1);
2563     print_syscall_epilogue(name);
2564 }
2565 #endif
2566
2567 #ifdef TARGET_NR_openat
2568 static void
2569 print_openat(const struct syscallname *name,
2570     abi_long arg0, abi_long arg1, abi_long arg2,
2571     abi_long arg3, abi_long arg4, abi_long arg5)
2572 {
2573     int is_creat = (arg2 & TARGET_O_CREAT);
2574
2575     print_syscall_prologue(name);
2576     print_at_dirfd(arg0, 0);
2577     print_string(arg1, 0);
2578     print_open_flags(arg2, (is_creat == 0));
2579     if (is_creat)
2580         print_file_mode(arg3, 1);
2581     print_syscall_epilogue(name);
2582 }
2583 #endif
2584
2585 #ifdef TARGET_NR_mq_unlink
2586 static void
2587 print_mq_unlink(const struct syscallname *name,
2588     abi_long arg0, abi_long arg1, abi_long arg2,
2589     abi_long arg3, abi_long arg4, abi_long arg5)
2590 {
2591     print_syscall_prologue(name);
2592     print_string(arg0, 1);
2593     print_syscall_epilogue(name);
2594 }
2595 #endif
2596
2597 #if defined(TARGET_NR_fstatat64) || defined(TARGET_NR_newfstatat)
2598 static void
2599 print_fstatat64(const struct syscallname *name,
2600     abi_long arg0, abi_long arg1, abi_long arg2,
2601     abi_long arg3, abi_long arg4, abi_long arg5)
2602 {
2603     print_syscall_prologue(name);
2604     print_at_dirfd(arg0, 0);
2605     print_string(arg1, 0);
2606     print_pointer(arg2, 0);
2607     print_flags(at_file_flags, arg3, 1);
2608     print_syscall_epilogue(name);
2609 }
2610 #define print_newfstatat    print_fstatat64
2611 #endif
2612
2613 #ifdef TARGET_NR_readlink
2614 static void
2615 print_readlink(const struct syscallname *name,
2616     abi_long arg0, abi_long arg1, abi_long arg2,
2617     abi_long arg3, abi_long arg4, abi_long arg5)
2618 {
2619     print_syscall_prologue(name);
2620     print_string(arg0, 0);
2621     print_pointer(arg1, 0);
2622     print_raw_param("%u", arg2, 1);
2623     print_syscall_epilogue(name);
2624 }
2625 #endif
2626
2627 #ifdef TARGET_NR_readlinkat
2628 static void
2629 print_readlinkat(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_at_dirfd(arg0, 0);
2635     print_string(arg1, 0);
2636     print_pointer(arg2, 0);
2637     print_raw_param("%u", arg3, 1);
2638     print_syscall_epilogue(name);
2639 }
2640 #endif
2641
2642 #ifdef TARGET_NR_rename
2643 static void
2644 print_rename(const struct syscallname *name,
2645     abi_long arg0, abi_long arg1, abi_long arg2,
2646     abi_long arg3, abi_long arg4, abi_long arg5)
2647 {
2648     print_syscall_prologue(name);
2649     print_string(arg0, 0);
2650     print_string(arg1, 1);
2651     print_syscall_epilogue(name);
2652 }
2653 #endif
2654
2655 #ifdef TARGET_NR_renameat
2656 static void
2657 print_renameat(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_at_dirfd(arg0, 0);
2663     print_string(arg1, 0);
2664     print_at_dirfd(arg2, 0);
2665     print_string(arg3, 1);
2666     print_syscall_epilogue(name);
2667 }
2668 #endif
2669
2670 #ifdef TARGET_NR_statfs
2671 static void
2672 print_statfs(const struct syscallname *name,
2673     abi_long arg0, abi_long arg1, abi_long arg2,
2674     abi_long arg3, abi_long arg4, abi_long arg5)
2675 {
2676     print_syscall_prologue(name);
2677     print_string(arg0, 0);
2678     print_pointer(arg1, 1);
2679     print_syscall_epilogue(name);
2680 }
2681 #endif
2682
2683 #ifdef TARGET_NR_statfs64
2684 static void
2685 print_statfs64(const struct syscallname *name,
2686     abi_long arg0, abi_long arg1, abi_long arg2,
2687     abi_long arg3, abi_long arg4, abi_long arg5)
2688 {
2689     print_syscall_prologue(name);
2690     print_string(arg0, 0);
2691     print_pointer(arg1, 1);
2692     print_syscall_epilogue(name);
2693 }
2694 #endif
2695
2696 #ifdef TARGET_NR_symlink
2697 static void
2698 print_symlink(const struct syscallname *name,
2699     abi_long arg0, abi_long arg1, abi_long arg2,
2700     abi_long arg3, abi_long arg4, abi_long arg5)
2701 {
2702     print_syscall_prologue(name);
2703     print_string(arg0, 0);
2704     print_string(arg1, 1);
2705     print_syscall_epilogue(name);
2706 }
2707 #endif
2708
2709 #ifdef TARGET_NR_symlinkat
2710 static void
2711 print_symlinkat(const struct syscallname *name,
2712     abi_long arg0, abi_long arg1, abi_long arg2,
2713     abi_long arg3, abi_long arg4, abi_long arg5)
2714 {
2715     print_syscall_prologue(name);
2716     print_string(arg0, 0);
2717     print_at_dirfd(arg1, 0);
2718     print_string(arg2, 1);
2719     print_syscall_epilogue(name);
2720 }
2721 #endif
2722
2723 #ifdef TARGET_NR_mount
2724 static void
2725 print_mount(const struct syscallname *name,
2726     abi_long arg0, abi_long arg1, abi_long arg2,
2727     abi_long arg3, abi_long arg4, abi_long arg5)
2728 {
2729     print_syscall_prologue(name);
2730     print_string(arg0, 0);
2731     print_string(arg1, 0);
2732     print_string(arg2, 0);
2733     print_flags(mount_flags, arg3, 0);
2734     print_pointer(arg4, 1);
2735     print_syscall_epilogue(name);
2736 }
2737 #endif
2738
2739 #ifdef TARGET_NR_umount
2740 static void
2741 print_umount(const struct syscallname *name,
2742     abi_long arg0, abi_long arg1, abi_long arg2,
2743     abi_long arg3, abi_long arg4, abi_long arg5)
2744 {
2745     print_syscall_prologue(name);
2746     print_string(arg0, 1);
2747     print_syscall_epilogue(name);
2748 }
2749 #endif
2750
2751 #ifdef TARGET_NR_umount2
2752 static void
2753 print_umount2(const struct syscallname *name,
2754     abi_long arg0, abi_long arg1, abi_long arg2,
2755     abi_long arg3, abi_long arg4, abi_long arg5)
2756 {
2757     print_syscall_prologue(name);
2758     print_string(arg0, 0);
2759     print_flags(umount2_flags, arg1, 1);
2760     print_syscall_epilogue(name);
2761 }
2762 #endif
2763
2764 #ifdef TARGET_NR_unlink
2765 static void
2766 print_unlink(const struct syscallname *name,
2767     abi_long arg0, abi_long arg1, abi_long arg2,
2768     abi_long arg3, abi_long arg4, abi_long arg5)
2769 {
2770     print_syscall_prologue(name);
2771     print_string(arg0, 1);
2772     print_syscall_epilogue(name);
2773 }
2774 #endif
2775
2776 #ifdef TARGET_NR_unlinkat
2777 static void
2778 print_unlinkat(const struct syscallname *name,
2779     abi_long arg0, abi_long arg1, abi_long arg2,
2780     abi_long arg3, abi_long arg4, abi_long arg5)
2781 {
2782     print_syscall_prologue(name);
2783     print_at_dirfd(arg0, 0);
2784     print_string(arg1, 0);
2785     print_flags(unlinkat_flags, arg2, 1);
2786     print_syscall_epilogue(name);
2787 }
2788 #endif
2789
2790 #ifdef TARGET_NR_utime
2791 static void
2792 print_utime(const struct syscallname *name,
2793     abi_long arg0, abi_long arg1, abi_long arg2,
2794     abi_long arg3, abi_long arg4, abi_long arg5)
2795 {
2796     print_syscall_prologue(name);
2797     print_string(arg0, 0);
2798     print_pointer(arg1, 1);
2799     print_syscall_epilogue(name);
2800 }
2801 #endif
2802
2803 #ifdef TARGET_NR_utimes
2804 static void
2805 print_utimes(const struct syscallname *name,
2806     abi_long arg0, abi_long arg1, abi_long arg2,
2807     abi_long arg3, abi_long arg4, abi_long arg5)
2808 {
2809     print_syscall_prologue(name);
2810     print_string(arg0, 0);
2811     print_pointer(arg1, 1);
2812     print_syscall_epilogue(name);
2813 }
2814 #endif
2815
2816 #ifdef TARGET_NR_utimensat
2817 static void
2818 print_utimensat(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_at_dirfd(arg0, 0);
2824     print_string(arg1, 0);
2825     print_pointer(arg2, 0);
2826     print_flags(at_file_flags, arg3, 1);
2827     print_syscall_epilogue(name);
2828 }
2829 #endif
2830
2831 #if defined(TARGET_NR_mmap) || defined(TARGET_NR_mmap2)
2832 static void
2833 print_mmap(const struct syscallname *name,
2834     abi_long arg0, abi_long arg1, abi_long arg2,
2835     abi_long arg3, abi_long arg4, abi_long arg5)
2836 {
2837     print_syscall_prologue(name);
2838     print_pointer(arg0, 0);
2839     print_raw_param("%d", arg1, 0);
2840     print_flags(mmap_prot_flags, arg2, 0);
2841     print_flags(mmap_flags, arg3, 0);
2842     print_raw_param("%d", arg4, 0);
2843     print_raw_param("%#x", arg5, 1);
2844     print_syscall_epilogue(name);
2845 }
2846 #define print_mmap2     print_mmap
2847 #endif
2848
2849 #ifdef TARGET_NR_mprotect
2850 static void
2851 print_mprotect(const struct syscallname *name,
2852     abi_long arg0, abi_long arg1, abi_long arg2,
2853     abi_long arg3, abi_long arg4, abi_long arg5)
2854 {
2855     print_syscall_prologue(name);
2856     print_pointer(arg0, 0);
2857     print_raw_param("%d", arg1, 0);
2858     print_flags(mmap_prot_flags, arg2, 1);
2859     print_syscall_epilogue(name);
2860 }
2861 #endif
2862
2863 #ifdef TARGET_NR_munmap
2864 static void
2865 print_munmap(const struct syscallname *name,
2866     abi_long arg0, abi_long arg1, abi_long arg2,
2867     abi_long arg3, abi_long arg4, abi_long arg5)
2868 {
2869     print_syscall_prologue(name);
2870     print_pointer(arg0, 0);
2871     print_raw_param("%d", arg1, 1);
2872     print_syscall_epilogue(name);
2873 }
2874 #endif
2875
2876 #ifdef TARGET_NR_futex
2877 static void print_futex_op(abi_long tflag, int last)
2878 {
2879 #define print_op(val) \
2880 if( cmd == val ) { \
2881     qemu_log(#val); \
2882     return; \
2883 }
2884
2885     int cmd = (int)tflag;
2886 #ifdef FUTEX_PRIVATE_FLAG
2887     if (cmd & FUTEX_PRIVATE_FLAG) {
2888         qemu_log("FUTEX_PRIVATE_FLAG|");
2889         cmd &= ~FUTEX_PRIVATE_FLAG;
2890     }
2891 #endif
2892 #ifdef FUTEX_CLOCK_REALTIME
2893     if (cmd & FUTEX_CLOCK_REALTIME) {
2894         qemu_log("FUTEX_CLOCK_REALTIME|");
2895         cmd &= ~FUTEX_CLOCK_REALTIME;
2896     }
2897 #endif
2898     print_op(FUTEX_WAIT)
2899     print_op(FUTEX_WAKE)
2900     print_op(FUTEX_FD)
2901     print_op(FUTEX_REQUEUE)
2902     print_op(FUTEX_CMP_REQUEUE)
2903     print_op(FUTEX_WAKE_OP)
2904     print_op(FUTEX_LOCK_PI)
2905     print_op(FUTEX_UNLOCK_PI)
2906     print_op(FUTEX_TRYLOCK_PI)
2907 #ifdef FUTEX_WAIT_BITSET
2908     print_op(FUTEX_WAIT_BITSET)
2909 #endif
2910 #ifdef FUTEX_WAKE_BITSET
2911     print_op(FUTEX_WAKE_BITSET)
2912 #endif
2913     /* unknown values */
2914     qemu_log("%d", cmd);
2915 }
2916
2917 static void
2918 print_futex(const struct syscallname *name,
2919     abi_long arg0, abi_long arg1, abi_long arg2,
2920     abi_long arg3, abi_long arg4, abi_long arg5)
2921 {
2922     print_syscall_prologue(name);
2923     print_pointer(arg0, 0);
2924     print_futex_op(arg1, 0);
2925     print_raw_param(",%d", arg2, 0);
2926     print_pointer(arg3, 0); /* struct timespec */
2927     print_pointer(arg4, 0);
2928     print_raw_param("%d", arg4, 1);
2929     print_syscall_epilogue(name);
2930 }
2931 #endif
2932
2933 #ifdef TARGET_NR_kill
2934 static void
2935 print_kill(const struct syscallname *name,
2936     abi_long arg0, abi_long arg1, abi_long arg2,
2937     abi_long arg3, abi_long arg4, abi_long arg5)
2938 {
2939     print_syscall_prologue(name);
2940     print_raw_param("%d", arg0, 0);
2941     print_signal(arg1, 1);
2942     print_syscall_epilogue(name);
2943 }
2944 #endif
2945
2946 #ifdef TARGET_NR_tkill
2947 static void
2948 print_tkill(const struct syscallname *name,
2949     abi_long arg0, abi_long arg1, abi_long arg2,
2950     abi_long arg3, abi_long arg4, abi_long arg5)
2951 {
2952     print_syscall_prologue(name);
2953     print_raw_param("%d", arg0, 0);
2954     print_signal(arg1, 1);
2955     print_syscall_epilogue(name);
2956 }
2957 #endif
2958
2959 #ifdef TARGET_NR_tgkill
2960 static void
2961 print_tgkill(const struct syscallname *name,
2962     abi_long arg0, abi_long arg1, abi_long arg2,
2963     abi_long arg3, abi_long arg4, abi_long arg5)
2964 {
2965     print_syscall_prologue(name);
2966     print_raw_param("%d", arg0, 0);
2967     print_raw_param("%d", arg1, 0);
2968     print_signal(arg2, 1);
2969     print_syscall_epilogue(name);
2970 }
2971 #endif
2972
2973 #ifdef TARGET_NR_statx
2974 static void
2975 print_statx(const struct syscallname *name,
2976             abi_long arg0, abi_long arg1, abi_long arg2,
2977             abi_long arg3, abi_long arg4, abi_long arg5)
2978 {
2979     print_syscall_prologue(name);
2980     print_at_dirfd(arg0, 0);
2981     print_string(arg1, 0);
2982     print_flags(statx_flags, arg2, 0);
2983     print_flags(statx_mask, arg3, 0);
2984     print_pointer(arg4, 1);
2985     print_syscall_epilogue(name);
2986 }
2987 #endif
2988
2989 /*
2990  * An array of all of the syscalls we know about
2991  */
2992
2993 static const struct syscallname scnames[] = {
2994 #include "strace.list"
2995 };
2996
2997 static int nsyscalls = ARRAY_SIZE(scnames);
2998
2999 /*
3000  * The public interface to this module.
3001  */
3002 void
3003 print_syscall(int num,
3004               abi_long arg1, abi_long arg2, abi_long arg3,
3005               abi_long arg4, abi_long arg5, abi_long arg6)
3006 {
3007     int i;
3008     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 ")";
3009
3010     qemu_log("%d ", getpid());
3011
3012     for(i=0;i<nsyscalls;i++)
3013         if( scnames[i].nr == num ) {
3014             if( scnames[i].call != NULL ) {
3015                 scnames[i].call(
3016                     &scnames[i], arg1, arg2, arg3, arg4, arg5, arg6);
3017             } else {
3018                 /* XXX: this format system is broken because it uses
3019                    host types and host pointers for strings */
3020                 if( scnames[i].format != NULL )
3021                     format = scnames[i].format;
3022                 qemu_log(format,
3023                          scnames[i].name, arg1, arg2, arg3, arg4, arg5, arg6);
3024             }
3025             return;
3026         }
3027     qemu_log("Unknown syscall %d\n", num);
3028 }
3029
3030
3031 void
3032 print_syscall_ret(int num, abi_long ret,
3033                   abi_long arg1, abi_long arg2, abi_long arg3,
3034                   abi_long arg4, abi_long arg5, abi_long arg6)
3035 {
3036     int i;
3037
3038     for(i=0;i<nsyscalls;i++)
3039         if( scnames[i].nr == num ) {
3040             if( scnames[i].result != NULL ) {
3041                 scnames[i].result(&scnames[i], ret,
3042                                   arg1, arg2, arg3,
3043                                   arg4, arg5, arg6);
3044             } else {
3045                 print_syscall_err(ret);
3046
3047                 if (ret >= 0) {
3048                     qemu_log(TARGET_ABI_FMT_ld, ret);
3049                 }
3050                 qemu_log("\n");
3051             }
3052             break;
3053         }
3054 }
3055
3056 void print_taken_signal(int target_signum, const target_siginfo_t *tinfo)
3057 {
3058     /* Print the strace output for a signal being taken:
3059      * --- SIGSEGV {si_signo=SIGSEGV, si_code=SI_KERNEL, si_addr=0} ---
3060      */
3061     qemu_log("--- ");
3062     print_signal(target_signum, 1);
3063     qemu_log(" ");
3064     print_siginfo(tinfo);
3065     qemu_log(" ---\n");
3066 }