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