text: #include "qemu/osdep.h"
  #include <sys/ipc.h>
  #include <sys/msg.h>
  #include <sys/sem.h>
  #include <sys/shm.h>
  #include <sys/select.h>
  #include <sys/mount.h>
  #include <arpa/inet.h>
  #include <netinet/tcp.h>
  #include <linux/if_packet.h>
  #include <sched.h>
  #include "qemu.h"
  
  int do_strace=0;
  
  struct syscallname {
      int nr;
      const char *name;
      const char *format;
      void (*call)(const struct syscallname *,
                   abi_long, abi_long, abi_long,
                   abi_long, abi_long, abi_long);
      void (*result)(const struct syscallname *, abi_long);
  };
  
  #ifdef __GNUC__
  /*
   * It is possible that target doesn't have syscall that uses
   * following flags but we don't want the compiler to warn
   * us about them being unused.  Same applies to utility print
   * functions.  It is ok to keep them while not used.
   */
  #define UNUSED __attribute__ ((unused))
  #else
  #define UNUSED
  #endif
  
  /*
   * Structure used to translate flag values into strings.  This is
   * similar that is in the actual strace tool.
   */
  struct flags {
      abi_long    f_value;  /* flag */
      const char  *f_string; /* stringified flag */
  };
  
  /* common flags for all architectures */
  #define FLAG_GENERIC(name) { name, #name }
  /* target specific flags (syscall_defs.h has TARGET_<flag>) */
  #define FLAG_TARGET(name)  { TARGET_ ## name, #name }
  /* end of flags array */
  #define FLAG_END           { 0, NULL }
  
  UNUSED static const char *get_comma(int);
  UNUSED static void print_pointer(abi_long, int);
  UNUSED static void print_flags(const struct flags *, abi_long, int);
  UNUSED static void print_at_dirfd(abi_long, int);
  UNUSED static void print_file_mode(abi_long, int);
  UNUSED static void print_open_flags(abi_long, int);
  UNUSED static void print_syscall_prologue(const struct syscallname *);
  UNUSED static void print_syscall_epilogue(const struct syscallname *);
  UNUSED static void print_string(abi_long, int);
  UNUSED static void print_buf(abi_long addr, abi_long len, int last);
  UNUSED static void print_raw_param(const char *, abi_long, int);
  UNUSED static void print_timeval(abi_ulong, int);
  UNUSED static void print_number(abi_long, int);
  UNUSED static void print_signal(abi_ulong, int);
  UNUSED static void print_sockaddr(abi_ulong addr, abi_long addrlen);
  UNUSED static void print_socket_domain(int domain);
  UNUSED static void print_socket_type(int type);
  UNUSED static void print_socket_protocol(int domain, int type, int protocol);
  
  /*
   * Utility functions
   */
  static void
  print_ipc_cmd(int cmd)
  {
  #define output_cmd(val) \
  if( cmd == val ) { \
      gemu_log(#val); \
      return; \
  }
  
      cmd &= 0xff;
  
      /* General IPC commands */
      output_cmd( IPC_RMID );
      output_cmd( IPC_SET );
      output_cmd( IPC_STAT );
      output_cmd( IPC_INFO );
      /* msgctl() commands */
      output_cmd( MSG_STAT );
      output_cmd( MSG_INFO );
      /* shmctl() commands */
      output_cmd( SHM_LOCK );
      output_cmd( SHM_UNLOCK );
      output_cmd( SHM_STAT );
      output_cmd( SHM_INFO );
      /* semctl() commands */
      output_cmd( GETPID );
      output_cmd( GETVAL );
      output_cmd( GETALL );
      output_cmd( GETNCNT );
      output_cmd( GETZCNT );
      output_cmd( SETVAL );
      output_cmd( SETALL );
      output_cmd( SEM_STAT );
      output_cmd( SEM_INFO );
      output_cmd( IPC_RMID );
      output_cmd( IPC_RMID );
      output_cmd( IPC_RMID );
      output_cmd( IPC_RMID );
      output_cmd( IPC_RMID );
      output_cmd( IPC_RMID );
      output_cmd( IPC_RMID );
      output_cmd( IPC_RMID );
      output_cmd( IPC_RMID );
  
      /* Some value we don't recognize */
      gemu_log("%d",cmd);
  }
  
  static void
  print_signal(abi_ulong arg, int last)
  {
      const char *signal_name = NULL;
      switch(arg) {
      case TARGET_SIGHUP: signal_name = "SIGHUP"; break;
      case TARGET_SIGINT: signal_name = "SIGINT"; break;
      case TARGET_SIGQUIT: signal_name = "SIGQUIT"; break;
      case TARGET_SIGILL: signal_name = "SIGILL"; break;
      case TARGET_SIGABRT: signal_name = "SIGABRT"; break;
      case TARGET_SIGFPE: signal_name = "SIGFPE"; break;
      case TARGET_SIGKILL: signal_name = "SIGKILL"; break;
      case TARGET_SIGSEGV: signal_name = "SIGSEGV"; break;
      case TARGET_SIGPIPE: signal_name = "SIGPIPE"; break;
      case TARGET_SIGALRM: signal_name = "SIGALRM"; break;
      case TARGET_SIGTERM: signal_name = "SIGTERM"; break;
      case TARGET_SIGUSR1: signal_name = "SIGUSR1"; break;
      case TARGET_SIGUSR2: signal_name = "SIGUSR2"; break;
      case TARGET_SIGCHLD: signal_name = "SIGCHLD"; break;
      case TARGET_SIGCONT: signal_name = "SIGCONT"; break;
      case TARGET_SIGSTOP: signal_name = "SIGSTOP"; break;
      case TARGET_SIGTTIN: signal_name = "SIGTTIN"; break;
      case TARGET_SIGTTOU: signal_name = "SIGTTOU"; break;
      }
      if (signal_name == NULL) {
          print_raw_param("%ld", arg, last);
          return;
      }
      gemu_log("%s%s", signal_name, get_comma(last));
  }
  
  static void print_si_code(int arg)
  {
      const char *codename = NULL;
  
      switch (arg) {
      case SI_USER:
          codename = "SI_USER";
          break;
      case SI_KERNEL:
          codename = "SI_KERNEL";
          break;
      case SI_QUEUE:
          codename = "SI_QUEUE";
          break;
      case SI_TIMER:
          codename = "SI_TIMER";
          break;
      case SI_MESGQ:
          codename = "SI_MESGQ";
          break;
      case SI_ASYNCIO:
          codename = "SI_ASYNCIO";
          break;
      case SI_SIGIO:
          codename = "SI_SIGIO";
          break;
      case SI_TKILL:
          codename = "SI_TKILL";
          break;
      default:
          gemu_log("%d", arg);
          return;
      }
      gemu_log("%s", codename);
  }
  
  static void get_target_siginfo(target_siginfo_t *tinfo,
                                  const target_siginfo_t *info)
  {
      abi_ulong sival_ptr;
  
      int sig;
      int si_errno;
      int si_code;
      int si_type;
  
      __get_user(sig, &info->si_signo);
      __get_user(si_errno, &tinfo->si_errno);
      __get_user(si_code, &info->si_code);
  
      tinfo->si_signo = sig;
      tinfo->si_errno = si_errno;
      tinfo->si_code = si_code;
  
      /* Ensure we don't leak random junk to the guest later */
      memset(tinfo->_sifields._pad, 0, sizeof(tinfo->_sifields._pad));
  
      /* This is awkward, because we have to use a combination of
       * the si_code and si_signo to figure out which of the union's
       * members are valid. (Within the host kernel it is always possible
       * to tell, but the kernel carefully avoids giving userspace the
       * high 16 bits of si_code, so we don't have the information to
       * do this the easy way...) We therefore make our best guess,
       * bearing in mind that a guest can spoof most of the si_codes
       * via rt_sigqueueinfo() if it likes.
       *
       * Once we have made our guess, we record it in the top 16 bits of
       * the si_code, so that print_siginfo() later can use it.
       * print_siginfo() will strip these top bits out before printing
       * the si_code.
       */
  
      switch (si_code) {
      case SI_USER:
      case SI_TKILL:
      case SI_KERNEL:
          /* Sent via kill(), tkill() or tgkill(), or direct from the kernel.
           * These are the only unspoofable si_code values.
           */
          __get_user(tinfo->_sifields._kill._pid, &info->_sifields._kill._pid);
          __get_user(tinfo->_sifields._kill._uid, &info->_sifields._kill._uid);
          si_type = QEMU_SI_KILL;
          break;
      default:
          /* Everything else is spoofable. Make best guess based on signal */
          switch (sig) {
          case TARGET_SIGCHLD:
              __get_user(tinfo->_sifields._sigchld._pid,
                         &info->_sifields._sigchld._pid);
              __get_user(tinfo->_sifields._sigchld._uid,
                         &info->_sifields._sigchld._uid);
              __get_user(tinfo->_sifields._sigchld._status,
                         &info->_sifields._sigchld._status);
              __get_user(tinfo->_sifields._sigchld._utime,
                         &info->_sifields._sigchld._utime);
              __get_user(tinfo->_sifields._sigchld._stime,
                         &info->_sifields._sigchld._stime);
              si_type = QEMU_SI_CHLD;
              break;
          case TARGET_SIGIO:
              __get_user(tinfo->_sifields._sigpoll._band,
                         &info->_sifields._sigpoll._band);
              __get_user(tinfo->_sifields._sigpoll._fd,
                         &info->_sifields._sigpoll._fd);
              si_type = QEMU_SI_POLL;
              break;
          default:
              /* Assume a sigqueue()/mq_notify()/rt_sigqueueinfo() source. */
              __get_user(tinfo->_sifields._rt._pid, &info->_sifields._rt._pid);
              __get_user(tinfo->_sifields._rt._uid, &info->_sifields._rt._uid);
              /* XXX: potential problem if 64 bit */
              __get_user(sival_ptr, &info->_sifields._rt._sigval.sival_ptr);
              tinfo->_sifields._rt._sigval.sival_ptr = sival_ptr;
  
              si_type = QEMU_SI_RT;
              break;
          }
          break;
      }
  
      tinfo->si_code = deposit32(si_code, 16, 16, si_type);
  }
  
  static void print_siginfo(const target_siginfo_t *tinfo)
  {
      /* Print a target_siginfo_t in the format desired for printing
       * signals being taken. We assume the target_siginfo_t is in the
       * internal form where the top 16 bits of si_code indicate which
       * part of the union is valid, rather than in the guest-visible
       * form where the bottom 16 bits are sign-extended into the top 16.
       */
      int si_type = extract32(tinfo->si_code, 16, 16);
      int si_code = sextract32(tinfo->si_code, 0, 16);
  
      gemu_log("{si_signo=");
      print_signal(tinfo->si_signo, 1);
      gemu_log(", si_code=");
      print_si_code(si_code);
  
      switch (si_type) {
      case QEMU_SI_KILL:
          gemu_log(", si_pid=%u, si_uid=%u",
                   (unsigned int)tinfo->_sifields._kill._pid,
                   (unsigned int)tinfo->_sifields._kill._uid);
          break;
      case QEMU_SI_TIMER:
          gemu_log(", si_timer1=%u, si_timer2=%u",
                   tinfo->_sifields._timer._timer1,
                   tinfo->_sifields._timer._timer2);
          break;
      case QEMU_SI_POLL:
          gemu_log(", si_band=%d, si_fd=%d",
                   tinfo->_sifields._sigpoll._band,
                   tinfo->_sifields._sigpoll._fd);
          break;
      case QEMU_SI_FAULT:
          gemu_log(", si_addr=");
          print_pointer(tinfo->_sifields._sigfault._addr, 1);
          break;
      case QEMU_SI_CHLD:
          gemu_log(", si_pid=%u, si_uid=%u, si_status=%d"
                   ", si_utime=" TARGET_ABI_FMT_ld
                   ", si_stime=" TARGET_ABI_FMT_ld,
                   (unsigned int)(tinfo->_sifields._sigchld._pid),
                   (unsigned int)(tinfo->_sifields._sigchld._uid),
                   tinfo->_sifields._sigchld._status,
                   tinfo->_sifields._sigchld._utime,
                   tinfo->_sifields._sigchld._stime);
          break;
      case QEMU_SI_RT:
          gemu_log(", si_pid=%u, si_uid=%u, si_sigval=" TARGET_ABI_FMT_ld,
                   (unsigned int)tinfo->_sifields._rt._pid,
                   (unsigned int)tinfo->_sifields._rt._uid,
                   tinfo->_sifields._rt._sigval.sival_ptr);
          break;
      default:
          g_assert_not_reached();
      }
      gemu_log("}");
  }
  
  static void
  print_sockaddr(abi_ulong addr, abi_long addrlen)
  {
      struct target_sockaddr *sa;
      int i;
      int sa_family;
  
      sa = lock_user(VERIFY_READ, addr, addrlen, 1);
      if (sa) {
          sa_family = tswap16(sa->sa_family);
          switch (sa_family) {
          case AF_UNIX: {
              struct target_sockaddr_un *un = (struct target_sockaddr_un *)sa;
              int i;
              gemu_log("{sun_family=AF_UNIX,sun_path=\"");
              for (i = 0; i < addrlen -
                              offsetof(struct target_sockaddr_un, sun_path) &&
                   un->sun_path[i]; i++) {
                  gemu_log("%c", un->sun_path[i]);
              }
              gemu_log("\"}");
              break;
          }
          case AF_INET: {
              struct target_sockaddr_in *in = (struct target_sockaddr_in *)sa;
              uint8_t *c = (uint8_t *)&in->sin_addr.s_addr;
              gemu_log("{sin_family=AF_INET,sin_port=htons(%d),",
                       ntohs(in->sin_port));
              gemu_log("sin_addr=inet_addr(\"%d.%d.%d.%d\")",
                       c[0], c[1], c[2], c[3]);
              gemu_log("}");
              break;
          }
          case AF_PACKET: {
              struct target_sockaddr_ll *ll = (struct target_sockaddr_ll *)sa;
              uint8_t *c = (uint8_t *)&ll->sll_addr;
              gemu_log("{sll_family=AF_PACKET,"
                       "sll_protocol=htons(0x%04x),if%d,pkttype=",
                       ntohs(ll->sll_protocol), ll->sll_ifindex);
              switch (ll->sll_pkttype) {
              case PACKET_HOST:
                  gemu_log("PACKET_HOST");
                  break;
              case PACKET_BROADCAST:
                  gemu_log("PACKET_BROADCAST");
                  break;
              case PACKET_MULTICAST:
                  gemu_log("PACKET_MULTICAST");
                  break;
              case PACKET_OTHERHOST:
                  gemu_log("PACKET_OTHERHOST");
                  break;
              case PACKET_OUTGOING:
                  gemu_log("PACKET_OUTGOING");
                  break;
              default:
                  gemu_log("%d", ll->sll_pkttype);
                  break;
              }
              gemu_log(",sll_addr=%02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x",
                       c[0], c[1], c[2], c[3], c[4], c[5], c[6], c[7]);
              gemu_log("}");
              break;
          }
          default:
              gemu_log("{sa_family=%d, sa_data={", sa->sa_family);
              for (i = 0; i < 13; i++) {
                  gemu_log("%02x, ", sa->sa_data[i]);
              }
              gemu_log("%02x}", sa->sa_data[i]);
              gemu_log("}");
              break;
          }
          unlock_user(sa, addr, 0);
      } else {
          print_raw_param("0x"TARGET_ABI_FMT_lx, addr, 0);
      }
      gemu_log(", "TARGET_ABI_FMT_ld, addrlen);
  }
  
  static void
  print_socket_domain(int domain)
  {
      switch (domain) {
      case PF_UNIX:
          gemu_log("PF_UNIX");
          break;
      case PF_INET:
          gemu_log("PF_INET");
          break;
      case PF_PACKET:
          gemu_log("PF_PACKET");
          break;
      default:
          gemu_log("%d", domain);
          break;
      }
  }
  
  static void
  print_socket_type(int type)
  {
      switch (type) {
      case TARGET_SOCK_DGRAM:
          gemu_log("SOCK_DGRAM");
          break;
      case TARGET_SOCK_STREAM:
          gemu_log("SOCK_STREAM");
          break;
      case TARGET_SOCK_RAW:
          gemu_log("SOCK_RAW");
          break;
      case TARGET_SOCK_RDM:
          gemu_log("SOCK_RDM");
          break;
      case TARGET_SOCK_SEQPACKET:
          gemu_log("SOCK_SEQPACKET");
          break;
      case TARGET_SOCK_PACKET:
          gemu_log("SOCK_PACKET");
          break;
      }
  }
  
  static void
  print_socket_protocol(int domain, int type, int protocol)
  {
      if (domain == AF_PACKET ||
          (domain == AF_INET && type == TARGET_SOCK_PACKET)) {
          switch (protocol) {
          case 0x0003:
              gemu_log("ETH_P_ALL");
              break;
          default:
              gemu_log("%d", protocol);
          }
          return;
      }
  
      switch (protocol) {
      case IPPROTO_IP:
          gemu_log("IPPROTO_IP");
          break;
      case IPPROTO_TCP:
          gemu_log("IPPROTO_TCP");
          break;
      case IPPROTO_UDP:
          gemu_log("IPPROTO_UDP");
          break;
      case IPPROTO_RAW:
          gemu_log("IPPROTO_RAW");
          break;
      default:
          gemu_log("%d", protocol);
          break;
      }
  }
  
  
  #ifdef TARGET_NR__newselect
  static void
  print_fdset(int n, abi_ulong target_fds_addr)
  {
      int i;
  
      gemu_log("[");
      if( target_fds_addr ) {
          abi_long *target_fds;
  
          target_fds = lock_user(VERIFY_READ,
                                 target_fds_addr,
                                 sizeof(*target_fds)*(n / TARGET_ABI_BITS + 1),
                                 1);
  
          if (!target_fds)
              return;
  
          for (i=n; i>=0; i--) {
              if ((tswapal(target_fds[i / TARGET_ABI_BITS]) >> (i & (TARGET_ABI_BITS - 1))) & 1)
                  gemu_log("%d,", i );
              }
          unlock_user(target_fds, target_fds_addr, 0);
      }
      gemu_log("]");
  }
  #endif
  
  #ifdef TARGET_NR_clock_adjtime
  /* IDs of the various system clocks */
  #define TARGET_CLOCK_REALTIME              0
  #define TARGET_CLOCK_MONOTONIC             1
  #define TARGET_CLOCK_PROCESS_CPUTIME_ID    2
  #define TARGET_CLOCK_THREAD_CPUTIME_ID     3
  #define TARGET_CLOCK_MONOTONIC_RAW         4
  #define TARGET_CLOCK_REALTIME_COARSE       5
  #define TARGET_CLOCK_MONOTONIC_COARSE      6
  #define TARGET_CLOCK_BOOTTIME              7
  #define TARGET_CLOCK_REALTIME_ALARM        8
  #define TARGET_CLOCK_BOOTTIME_ALARM        9
  #define TARGET_CLOCK_SGI_CYCLE             10
  #define TARGET_CLOCK_TAI                   11
  
  static void
  print_clockid(int clockid, int last)
  {
      switch (clockid) {
      case TARGET_CLOCK_REALTIME:
          gemu_log("CLOCK_REALTIME");
          break;
      case TARGET_CLOCK_MONOTONIC:
          gemu_log("CLOCK_MONOTONIC");
          break;
      case TARGET_CLOCK_PROCESS_CPUTIME_ID:
          gemu_log("CLOCK_PROCESS_CPUTIME_ID");
          break;
      case TARGET_CLOCK_THREAD_CPUTIME_ID:
          gemu_log("CLOCK_THREAD_CPUTIME_ID");
          break;
      case TARGET_CLOCK_MONOTONIC_RAW:
          gemu_log("CLOCK_MONOTONIC_RAW");
          break;
      case TARGET_CLOCK_REALTIME_COARSE:
          gemu_log("CLOCK_REALTIME_COARSE");
          break;
      case TARGET_CLOCK_MONOTONIC_COARSE:
          gemu_log("CLOCK_MONOTONIC_COARSE");
          break;
      case TARGET_CLOCK_BOOTTIME:
          gemu_log("CLOCK_BOOTTIME");
          break;
      case TARGET_CLOCK_REALTIME_ALARM:
          gemu_log("CLOCK_REALTIME_ALARM");
          break;
      case TARGET_CLOCK_BOOTTIME_ALARM:
          gemu_log("CLOCK_BOOTTIME_ALARM");
          break;
      case TARGET_CLOCK_SGI_CYCLE:
          gemu_log("CLOCK_SGI_CYCLE");
          break;
      case TARGET_CLOCK_TAI:
          gemu_log("CLOCK_TAI");
          break;
      default:
          gemu_log("%d", clockid);
          break;
      }
      gemu_log("%s", get_comma(last));
  }
  #endif
  
  /*
   * Sysycall specific output functions
   */
  
  /* select */
  #ifdef TARGET_NR__newselect
  static long newselect_arg1 = 0;
  static long newselect_arg2 = 0;
  static long newselect_arg3 = 0;
  static long newselect_arg4 = 0;
  static long newselect_arg5 = 0;
  
  static void
  print_newselect(const struct syscallname *name,
                  abi_long arg1, abi_long arg2, abi_long arg3,
                  abi_long arg4, abi_long arg5, abi_long arg6)
  {
      gemu_log("%s(" TARGET_ABI_FMT_ld ",", name->name, arg1);
      print_fdset(arg1, arg2);
      gemu_log(",");
      print_fdset(arg1, arg3);
      gemu_log(",");
      print_fdset(arg1, arg4);
      gemu_log(",");
      print_timeval(arg5, 1);
      gemu_log(")");
  
      /* save for use in the return output function below */
      newselect_arg1=arg1;
      newselect_arg2=arg2;
      newselect_arg3=arg3;
      newselect_arg4=arg4;
      newselect_arg5=arg5;
  }
  #endif
  
  #ifdef TARGET_NR_semctl
  static void
  print_semctl(const struct syscallname *name,
               abi_long arg1, abi_long arg2, abi_long arg3,
               abi_long arg4, abi_long arg5, abi_long arg6)
  {
      gemu_log("%s(" TARGET_ABI_FMT_ld "," TARGET_ABI_FMT_ld ",", name->name, arg1, arg2);
      print_ipc_cmd(arg3);
      gemu_log(",0x" TARGET_ABI_FMT_lx ")", arg4);
  }
  #endif
  
  static void
  print_execve(const struct syscallname *name,
               abi_long arg1, abi_long arg2, abi_long arg3,
               abi_long arg4, abi_long arg5, abi_long arg6)
  {
      abi_ulong arg_ptr_addr;
      char *s;
  
      if (!(s = lock_user_string(arg1)))
          return;
      gemu_log("%s(\"%s\",{", name->name, s);
      unlock_user(s, arg1, 0);
  
      for (arg_ptr_addr = arg2; ; arg_ptr_addr += sizeof(abi_ulong)) {
          abi_ulong *arg_ptr, arg_addr;
  
  	arg_ptr = lock_user(VERIFY_READ, arg_ptr_addr, sizeof(abi_ulong), 1);
          if (!arg_ptr)
              return;
      arg_addr = tswapal(*arg_ptr);
  	unlock_user(arg_ptr, arg_ptr_addr, 0);
          if (!arg_addr)
              break;
          if ((s = lock_user_string(arg_addr))) {
              gemu_log("\"%s\",", s);
              unlock_user(s, arg_addr, 0);
          }
      }
  
      gemu_log("NULL})");
  }
  
  #ifdef TARGET_NR_ipc
  static void
  print_ipc(const struct syscallname *name,
            abi_long arg1, abi_long arg2, abi_long arg3,
            abi_long arg4, abi_long arg5, abi_long arg6)
  {
      switch(arg1) {
      case IPCOP_semctl:
          gemu_log("semctl(" TARGET_ABI_FMT_ld "," TARGET_ABI_FMT_ld ",", arg1, arg2);
          print_ipc_cmd(arg3);
          gemu_log(",0x" TARGET_ABI_FMT_lx ")", arg4);
          break;
      default:
          gemu_log("%s(" TARGET_ABI_FMT_ld "," TARGET_ABI_FMT_ld "," TARGET_ABI_FMT_ld "," TARGET_ABI_FMT_ld ")",
                   name->name, arg1, arg2, arg3, arg4);
      }
  }
  #endif
  
  /*
   * Variants for the return value output function
   */
  
  static void
  print_syscall_ret_addr(const struct syscallname *name, abi_long ret)
  {
      const char *errstr = NULL;
  
      if (ret < 0) {
          errstr = target_strerror(-ret);
      }
      if (errstr) {
          gemu_log(" = -1 errno=%d (%s)\n", (int)-ret, errstr);
      } else {
          gemu_log(" = 0x" TARGET_ABI_FMT_lx "\n", ret);
      }
  }
  
  #if 0 /* currently unused */
  static void
  print_syscall_ret_raw(struct syscallname *name, abi_long ret)
  {
          gemu_log(" = 0x" TARGET_ABI_FMT_lx "\n", ret);
  }
  #endif
  
  #ifdef TARGET_NR__newselect
  static void
  print_syscall_ret_newselect(const struct syscallname *name, abi_long ret)
  {
      gemu_log(" = 0x" TARGET_ABI_FMT_lx " (", ret);
      print_fdset(newselect_arg1,newselect_arg2);
      gemu_log(",");
      print_fdset(newselect_arg1,newselect_arg3);
      gemu_log(",");
      print_fdset(newselect_arg1,newselect_arg4);
      gemu_log(",");
      print_timeval(newselect_arg5, 1);
      gemu_log(")\n");
  }
  #endif
  
  /* special meanings of adjtimex()' non-negative return values */
  #define TARGET_TIME_OK       0   /* clock synchronized, no leap second */
  #define TARGET_TIME_INS      1   /* insert leap second */
  #define TARGET_TIME_DEL      2   /* delete leap second */
  #define TARGET_TIME_OOP      3   /* leap second in progress */
  #define TARGET_TIME_WAIT     4   /* leap second has occurred */
  #define TARGET_TIME_ERROR    5   /* clock not synchronized */
  static void
  print_syscall_ret_adjtimex(const struct syscallname *name, abi_long ret)
  {
      const char *errstr = NULL;
  
      gemu_log(" = ");
      if (ret < 0) {
          gemu_log("-1 errno=%d", errno);
          errstr = target_strerror(-ret);
          if (errstr) {
              gemu_log(" (%s)", errstr);
          }
      } else {
          gemu_log(TARGET_ABI_FMT_ld, ret);
          switch (ret) {
          case TARGET_TIME_OK:
              gemu_log(" TIME_OK (clock synchronized, no leap second)");
              break;
          case TARGET_TIME_INS:
              gemu_log(" TIME_INS (insert leap second)");
              break;
          case TARGET_TIME_DEL:
              gemu_log(" TIME_DEL (delete leap second)");
              break;
          case TARGET_TIME_OOP:
              gemu_log(" TIME_OOP (leap second in progress)");
              break;
          case TARGET_TIME_WAIT:
              gemu_log(" TIME_WAIT (leap second has occurred)");
              break;
          case TARGET_TIME_ERROR:
              gemu_log(" TIME_ERROR (clock not synchronized)");
              break;
          }
      }
  
      gemu_log("\n");
  }
  
  UNUSED static struct flags access_flags[] = {
      FLAG_GENERIC(F_OK),
      FLAG_GENERIC(R_OK),
      FLAG_GENERIC(W_OK),
      FLAG_GENERIC(X_OK),
      FLAG_END,
  };
  
  UNUSED static struct flags at_file_flags[] = {
  #ifdef AT_EACCESS
      FLAG_GENERIC(AT_EACCESS),
  #endif
  #ifdef AT_SYMLINK_NOFOLLOW
      FLAG_GENERIC(AT_SYMLINK_NOFOLLOW),
  #endif
      FLAG_END,
  };
  
  UNUSED static struct flags unlinkat_flags[] = {
  #ifdef AT_REMOVEDIR
      FLAG_GENERIC(AT_REMOVEDIR),
  #endif
      FLAG_END,
  };
  
  UNUSED static struct flags mode_flags[] = {
      FLAG_GENERIC(S_IFSOCK),
      FLAG_GENERIC(S_IFLNK),
      FLAG_GENERIC(S_IFREG),
      FLAG_GENERIC(S_IFBLK),
      FLAG_GENERIC(S_IFDIR),
      FLAG_GENERIC(S_IFCHR),
      FLAG_GENERIC(S_IFIFO),
      FLAG_END,
  };
  
  UNUSED static struct flags open_access_flags[] = {
      FLAG_TARGET(O_RDONLY),
      FLAG_TARGET(O_WRONLY),
      FLAG_TARGET(O_RDWR),
      FLAG_END,
  };
  
  UNUSED static struct flags open_flags[] = {
      FLAG_TARGET(O_APPEND),
      FLAG_TARGET(O_CREAT),
      FLAG_TARGET(O_DIRECTORY),
      FLAG_TARGET(O_EXCL),
      FLAG_TARGET(O_LARGEFILE),
      FLAG_TARGET(O_NOCTTY),
      FLAG_TARGET(O_NOFOLLOW),
      FLAG_TARGET(O_NONBLOCK),      /* also O_NDELAY */
      FLAG_TARGET(O_DSYNC),
      FLAG_TARGET(__O_SYNC),
      FLAG_TARGET(O_TRUNC),
  #ifdef O_DIRECT
      FLAG_TARGET(O_DIRECT),
  #endif
  #ifdef O_NOATIME
      FLAG_TARGET(O_NOATIME),
  #endif
  #ifdef O_CLOEXEC
      FLAG_TARGET(O_CLOEXEC),
  #endif
  #ifdef O_PATH
      FLAG_TARGET(O_PATH),
  #endif
  #ifdef O_TMPFILE
      FLAG_TARGET(O_TMPFILE),
      FLAG_TARGET(__O_TMPFILE),
  #endif
      FLAG_END,
  };
  
  UNUSED static struct flags mount_flags[] = {
  #ifdef MS_BIND
      FLAG_GENERIC(MS_BIND),
  #endif
  #ifdef MS_DIRSYNC
      FLAG_GENERIC(MS_DIRSYNC),
  #endif
      FLAG_GENERIC(MS_MANDLOCK),
  #ifdef MS_MOVE
      FLAG_GENERIC(MS_MOVE),
  #endif
      FLAG_GENERIC(MS_NOATIME),
      FLAG_GENERIC(MS_NODEV),
      FLAG_GENERIC(MS_NODIRATIME),
      FLAG_GENERIC(MS_NOEXEC),
      FLAG_GENERIC(MS_NOSUID),
      FLAG_GENERIC(MS_RDONLY),
  #ifdef MS_RELATIME
      FLAG_GENERIC(MS_RELATIME),
  #endif
      FLAG_GENERIC(MS_REMOUNT),
      FLAG_GENERIC(MS_SYNCHRONOUS),
      FLAG_END,
  };
  
  UNUSED static struct flags umount2_flags[] = {
  #ifdef MNT_FORCE
      FLAG_GENERIC(MNT_FORCE),
  #endif
  #ifdef MNT_DETACH
      FLAG_GENERIC(MNT_DETACH),
  #endif
  #ifdef MNT_EXPIRE
      FLAG_GENERIC(MNT_EXPIRE),
  #endif
      FLAG_END,
  };
  
  UNUSED static struct flags mmap_prot_flags[] = {
      FLAG_GENERIC(PROT_NONE),
      FLAG_GENERIC(PROT_EXEC),
      FLAG_GENERIC(PROT_READ),
      FLAG_GENERIC(PROT_WRITE),
      FLAG_TARGET(PROT_SEM),
      FLAG_GENERIC(PROT_GROWSDOWN),
      FLAG_GENERIC(PROT_GROWSUP),
      FLAG_END,
  };
  
  UNUSED static struct flags mmap_flags[] = {
      FLAG_TARGET(MAP_SHARED),
      FLAG_TARGET(MAP_PRIVATE),
      FLAG_TARGET(MAP_ANONYMOUS),
      FLAG_TARGET(MAP_DENYWRITE),
      FLAG_TARGET(MAP_FIXED),
      FLAG_TARGET(MAP_GROWSDOWN),
      FLAG_TARGET(MAP_EXECUTABLE),
  #ifdef MAP_LOCKED
      FLAG_TARGET(MAP_LOCKED),
  #endif
  #ifdef MAP_NONBLOCK
      FLAG_TARGET(MAP_NONBLOCK),
  #endif
      FLAG_TARGET(MAP_NORESERVE),
  #ifdef MAP_POPULATE
      FLAG_TARGET(MAP_POPULATE),
  #endif
  #ifdef TARGET_MAP_UNINITIALIZED
      FLAG_TARGET(MAP_UNINITIALIZED),
  #endif
      FLAG_END,
  };
  
  UNUSED static struct flags clone_flags[] = {
      FLAG_GENERIC(CLONE_VM),
      FLAG_GENERIC(CLONE_FS),
      FLAG_GENERIC(CLONE_FILES),
      FLAG_GENERIC(CLONE_SIGHAND),
      FLAG_GENERIC(CLONE_PTRACE),
      FLAG_GENERIC(CLONE_VFORK),
      FLAG_GENERIC(CLONE_PARENT),
      FLAG_GENERIC(CLONE_THREAD),
      FLAG_GENERIC(CLONE_NEWNS),
      FLAG_GENERIC(CLONE_SYSVSEM),
      FLAG_GENERIC(CLONE_SETTLS),
      FLAG_GENERIC(CLONE_PARENT_SETTID),
      FLAG_GENERIC(CLONE_CHILD_CLEARTID),
      FLAG_GENERIC(CLONE_DETACHED),
      FLAG_GENERIC(CLONE_UNTRACED),
      FLAG_GENERIC(CLONE_CHILD_SETTID),
  #if defined(CLONE_NEWUTS)
      FLAG_GENERIC(CLONE_NEWUTS),
  #endif
  #if defined(CLONE_NEWIPC)
      FLAG_GENERIC(CLONE_NEWIPC),
  #endif
  #if defined(CLONE_NEWUSER)
      FLAG_GENERIC(CLONE_NEWUSER),
  #endif
  #if defined(CLONE_NEWPID)
      FLAG_GENERIC(CLONE_NEWPID),
  #endif
  #if defined(CLONE_NEWNET)
      FLAG_GENERIC(CLONE_NEWNET),
  #endif
  #if defined(CLONE_IO)
      FLAG_GENERIC(CLONE_IO),
  #endif
      FLAG_END,
  };
  
  UNUSED static struct flags msg_flags[] = {
      /* send */
      FLAG_GENERIC(MSG_CONFIRM),
      FLAG_GENERIC(MSG_DONTROUTE),
      FLAG_GENERIC(MSG_DONTWAIT),
      FLAG_GENERIC(MSG_EOR),
      FLAG_GENERIC(MSG_MORE),
      FLAG_GENERIC(MSG_NOSIGNAL),
      FLAG_GENERIC(MSG_OOB),
      /* recv */
      FLAG_GENERIC(MSG_CMSG_CLOEXEC),
      FLAG_GENERIC(MSG_ERRQUEUE),
      FLAG_GENERIC(MSG_PEEK),
      FLAG_GENERIC(MSG_TRUNC),
      FLAG_GENERIC(MSG_WAITALL),
      /* recvmsg */
      FLAG_GENERIC(MSG_CTRUNC),
      FLAG_END,
  };
  
  /*
   * print_xxx utility functions.  These are used to print syscall
   * parameters in certain format.  All of these have parameter
   * named 'last'.  This parameter is used to add comma to output
   * when last == 0.
   */
  
  static const char *
  get_comma(int last)
  {
      return ((last) ? "" : ",");
  }
  
  static void
  print_flags(const struct flags *f, abi_long flags, int last)
  {
      const char *sep = "";
      int n;
  
      if ((flags == 0) && (f->f_value == 0)) {
          gemu_log("%s%s", f->f_string, get_comma(last));
          return;
      }
      for (n = 0; f->f_string != NULL; f++) {
          if ((f->f_value != 0) && ((flags & f->f_value) == f->f_value)) {
              gemu_log("%s%s", sep, f->f_string);
              flags &= ~f->f_value;
              sep = "|";
              n++;
          }
      }
  
      if (n > 0) {
          /* print rest of the flags as numeric */
          if (flags != 0) {
              gemu_log("%s%#x%s", sep, (unsigned int)flags, get_comma(last));
          } else {
              gemu_log("%s", get_comma(last));
          }
      } else {
          /* no string version of flags found, print them in hex then */
          gemu_log("%#x%s", (unsigned int)flags, get_comma(last));
      }
  }
  
  static void
  print_at_dirfd(abi_long dirfd, int last)
  {
  #ifdef AT_FDCWD
      if (dirfd == AT_FDCWD) {
          gemu_log("AT_FDCWD%s", get_comma(last));
          return;
      }
  #endif
      gemu_log("%d%s", (int)dirfd, get_comma(last));
  }
  
  static void
  print_file_mode(abi_long mode, int last)
  {
      const char *sep = "";
      const struct flags *m;
  
      for (m = &mode_flags[0]; m->f_string != NULL; m++) {
          if ((m->f_value & mode) == m->f_value) {
              gemu_log("%s%s", m->f_string, sep);
              sep = "|";
              mode &= ~m->f_value;
              break;
          }
      }
  
      mode &= ~S_IFMT;
      /* print rest of the mode as octal */
      if (mode != 0)
          gemu_log("%s%#o", sep, (unsigned int)mode);
  
      gemu_log("%s", get_comma(last));
  }
  
  static void
  print_open_flags(abi_long flags, int last)
  {
      print_flags(open_access_flags, flags & TARGET_O_ACCMODE, 1);
      flags &= ~TARGET_O_ACCMODE;
      if (flags == 0) {
          gemu_log("%s", get_comma(last));
          return;
      }
      gemu_log("|");
      print_flags(open_flags, flags, last);
  }
  
  static void
  print_syscall_prologue(const struct syscallname *sc)
  {
      gemu_log("%s(", sc->name);
  }
  
  /*ARGSUSED*/
  static void
  print_syscall_epilogue(const struct syscallname *sc)
  {
      (void)sc;
      gemu_log(")");
  }
  
  static void
  print_string(abi_long addr, int last)
  {
      char *s;
  
      if ((s = lock_user_string(addr)) != NULL) {
          gemu_log("\"%s\"%s", s, get_comma(last));
          unlock_user(s, addr, 0);
      } else {
          /* can't get string out of it, so print it as pointer */
          print_pointer(addr, last);
      }
  }
  
  #define MAX_PRINT_BUF 40
  static void
  print_buf(abi_long addr, abi_long len, int last)
  {
      uint8_t *s;
      int i;
  
      s = lock_user(VERIFY_READ, addr, len, 1);
      if (s) {
          gemu_log("\"");
          for (i = 0; i < MAX_PRINT_BUF && i < len; i++) {
              if (isprint(s[i])) {
                  gemu_log("%c", s[i]);
              } else {
                  gemu_log("\\%o", s[i]);
              }
          }
          gemu_log("\"");
          if (i != len) {
              gemu_log("...");
          }
          if (!last) {
              gemu_log(",");
          }
          unlock_user(s, addr, 0);
      } else {
          print_pointer(addr, last);
      }
  }
  
  /*
   * Prints out raw parameter using given format.  Caller needs
   * to do byte swapping if needed.
   */
  static void
  print_raw_param(const char *fmt, abi_long param, int last)
  {
      char format[64];
  
      (void) snprintf(format, sizeof (format), "%s%s", fmt, get_comma(last));
      gemu_log(format, param);
  }
  
  static void
  print_pointer(abi_long p, int last)
  {
      if (p == 0)
          gemu_log("NULL%s", get_comma(last));
      else
          gemu_log("0x" TARGET_ABI_FMT_lx "%s", p, get_comma(last));
  }
  
  /*
   * Reads 32-bit (int) number from guest address space from
   * address 'addr' and prints it.
   */
  static void
  print_number(abi_long addr, int last)
  {
      if (addr == 0) {
          gemu_log("NULL%s", get_comma(last));
      } else {
          int num;
  
          get_user_s32(num, addr);
          gemu_log("[%d]%s", num, get_comma(last));
      }
  }
  
  static void
  print_timeval(abi_ulong tv_addr, int last)
  {
      if( tv_addr ) {
          struct target_timeval *tv;
  
          tv = lock_user(VERIFY_READ, tv_addr, sizeof(*tv), 1);
          if (!tv)
              return;
          gemu_log("{" TARGET_ABI_FMT_ld "," TARGET_ABI_FMT_ld "}%s",
              tswapal(tv->tv_sec), tswapal(tv->tv_usec), get_comma(last));
          unlock_user(tv, tv_addr, 0);
      } else
          gemu_log("NULL%s", get_comma(last));
  }
  
  #undef UNUSED
  
  #ifdef TARGET_NR_accept
  static void
  print_accept(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_raw_param("%d", arg0, 0);
      print_pointer(arg1, 0);
      print_number(arg2, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_access
  static void
  print_access(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_flags(access_flags, arg1, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_brk
  static void
  print_brk(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_pointer(arg0, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_chdir
  static void
  print_chdir(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_chmod
  static void
  print_chmod(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_file_mode(arg1, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_clock_adjtime
  static void
  print_clock_adjtime(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_clockid(arg0, 0);
      print_pointer(arg1, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_clone
  static void do_print_clone(unsigned int flags, abi_ulong newsp,
                             abi_ulong parent_tidptr, target_ulong newtls,
                             abi_ulong child_tidptr)
  {
      print_flags(clone_flags, flags, 0);
      print_raw_param("child_stack=0x" TARGET_ABI_FMT_lx, newsp, 0);
      print_raw_param("parent_tidptr=0x" TARGET_ABI_FMT_lx, parent_tidptr, 0);
      print_raw_param("tls=0x" TARGET_ABI_FMT_lx, newtls, 0);
      print_raw_param("child_tidptr=0x" TARGET_ABI_FMT_lx, child_tidptr, 1);
  }
  
  static void
  print_clone(const struct syscallname *name,
      abi_long arg1, abi_long arg2, abi_long arg3,
      abi_long arg4, abi_long arg5, abi_long arg6)
  {
      print_syscall_prologue(name);
  #if defined(TARGET_MICROBLAZE)
      do_print_clone(arg1, arg2, arg4, arg6, arg5);
  #elif defined(TARGET_CLONE_BACKWARDS)
      do_print_clone(arg1, arg2, arg3, arg4, arg5);
  #elif defined(TARGET_CLONE_BACKWARDS2)
      do_print_clone(arg2, arg1, arg3, arg5, arg4);
  #else
      do_print_clone(arg1, arg2, arg3, arg5, arg4);
  #endif
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_creat
  static void
  print_creat(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_file_mode(arg1, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_execv
  static void
  print_execv(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_raw_param("0x" TARGET_ABI_FMT_lx, arg1, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_faccessat
  static void
  print_faccessat(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_at_dirfd(arg0, 0);
      print_string(arg1, 0);
      print_flags(access_flags, arg2, 0);
      print_flags(at_file_flags, arg3, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_fchmodat
  static void
  print_fchmodat(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_at_dirfd(arg0, 0);
      print_string(arg1, 0);
      print_file_mode(arg2, 0);
      print_flags(at_file_flags, arg3, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_fchownat
  static void
  print_fchownat(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_at_dirfd(arg0, 0);
      print_string(arg1, 0);
      print_raw_param("%d", arg2, 0);
      print_raw_param("%d", arg3, 0);
      print_flags(at_file_flags, arg4, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #if defined(TARGET_NR_fcntl) || defined(TARGET_NR_fcntl64)
  static void
  print_fcntl(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_raw_param("%d", arg0, 0);
      switch(arg1) {
      case TARGET_F_DUPFD:
          gemu_log("F_DUPFD,");
          print_raw_param(TARGET_ABI_FMT_ld, arg2, 1);
          break;
      case TARGET_F_GETFD:
          gemu_log("F_GETFD");
          break;
      case TARGET_F_SETFD:
          gemu_log("F_SETFD,");
          print_raw_param(TARGET_ABI_FMT_ld, arg2, 1);
          break;
      case TARGET_F_GETFL:
          gemu_log("F_GETFL");
          break;
      case TARGET_F_SETFL:
          gemu_log("F_SETFL,");
          print_open_flags(arg2, 1);
          break;
      case TARGET_F_GETLK:
          gemu_log("F_GETLK,");
          print_pointer(arg2, 1);
          break;
      case TARGET_F_SETLK:
          gemu_log("F_SETLK,");
          print_pointer(arg2, 1);
          break;
      case TARGET_F_SETLKW:
          gemu_log("F_SETLKW,");
          print_pointer(arg2, 1);
          break;
      case TARGET_F_GETOWN:
          gemu_log("F_GETOWN");
          break;
      case TARGET_F_SETOWN:
          gemu_log("F_SETOWN,");
          print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
          break;
      case TARGET_F_GETSIG:
          gemu_log("F_GETSIG");
          break;
      case TARGET_F_SETSIG:
          gemu_log("F_SETSIG,");
          print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
          break;
  #if TARGET_ABI_BITS == 32
      case TARGET_F_GETLK64:
          gemu_log("F_GETLK64,");
          print_pointer(arg2, 1);
          break;
      case TARGET_F_SETLK64:
          gemu_log("F_SETLK64,");
          print_pointer(arg2, 1);
          break;
      case TARGET_F_SETLKW64:
          gemu_log("F_SETLKW64,");
          print_pointer(arg2, 1);
          break;
  #endif
      case TARGET_F_SETLEASE:
          gemu_log("F_SETLEASE,");
          print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
          break;
      case TARGET_F_GETLEASE:
          gemu_log("F_GETLEASE");
          break;
      case TARGET_F_SETPIPE_SZ:
          gemu_log("F_SETPIPE_SZ,");
          print_raw_param(TARGET_ABI_FMT_ld, arg2, 1);
          break;
      case TARGET_F_GETPIPE_SZ:
          gemu_log("F_GETPIPE_SZ");
          break;
      case TARGET_F_DUPFD_CLOEXEC:
          gemu_log("F_DUPFD_CLOEXEC,");
          print_raw_param(TARGET_ABI_FMT_ld, arg2, 1);
          break;
      case TARGET_F_NOTIFY:
          gemu_log("F_NOTIFY,");
          print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
          break;
      default:
          print_raw_param(TARGET_ABI_FMT_ld, arg1, 0);
          print_pointer(arg2, 1);
          break;
      }
      print_syscall_epilogue(name);
  }
  #define print_fcntl64   print_fcntl
  #endif
  
  
  #ifdef TARGET_NR_futimesat
  static void
  print_futimesat(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_at_dirfd(arg0, 0);
      print_string(arg1, 0);
      print_timeval(arg2, 0);
      print_timeval(arg2 + sizeof (struct target_timeval), 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_link
  static void
  print_link(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_string(arg1, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_linkat
  static void
  print_linkat(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_at_dirfd(arg0, 0);
      print_string(arg1, 0);
      print_at_dirfd(arg2, 0);
      print_string(arg3, 0);
      print_flags(at_file_flags, arg4, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR__llseek
  static void
  print__llseek(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      const char *whence = "UNKNOWN";
      print_syscall_prologue(name);
      print_raw_param("%d", arg0, 0);
      print_raw_param("%ld", arg1, 0);
      print_raw_param("%ld", arg2, 0);
      print_pointer(arg3, 0);
      switch(arg4) {
      case SEEK_SET: whence = "SEEK_SET"; break;
      case SEEK_CUR: whence = "SEEK_CUR"; break;
      case SEEK_END: whence = "SEEK_END"; break;
      }
      gemu_log("%s",whence);
      print_syscall_epilogue(name);
  }
  #endif
  
  #if defined(TARGET_NR_socket)
  static void
  print_socket(const struct syscallname *name,
               abi_long arg0, abi_long arg1, abi_long arg2,
               abi_long arg3, abi_long arg4, abi_long arg5)
  {
      abi_ulong domain = arg0, type = arg1, protocol = arg2;
  
      print_syscall_prologue(name);
      print_socket_domain(domain);
      gemu_log(",");
      print_socket_type(type);
      gemu_log(",");
      if (domain == AF_PACKET ||
          (domain == AF_INET && type == TARGET_SOCK_PACKET)) {
          protocol = tswap16(protocol);
      }
      print_socket_protocol(domain, type, protocol);
      print_syscall_epilogue(name);
  }
  
  #endif
  
  #if defined(TARGET_NR_socketcall)
  
  #define get_user_ualx(x, gaddr, idx) \
          get_user_ual(x, (gaddr) + (idx) * sizeof(abi_long))
  
  static void do_print_socket(const char *name, abi_long arg1)
  {
      abi_ulong domain, type, protocol;
  
      get_user_ualx(domain, arg1, 0);
      get_user_ualx(type, arg1, 1);
      get_user_ualx(protocol, arg1, 2);
      gemu_log("%s(", name);
      print_socket_domain(domain);
      gemu_log(",");
      print_socket_type(type);
      gemu_log(",");
      if (domain == AF_PACKET ||
          (domain == AF_INET && type == TARGET_SOCK_PACKET)) {
          protocol = tswap16(protocol);
      }
      print_socket_protocol(domain, type, protocol);
      gemu_log(")");
  }
  
  static void do_print_sockaddr(const char *name, abi_long arg1)
  {
      abi_ulong sockfd, addr, addrlen;
  
      get_user_ualx(sockfd, arg1, 0);
      get_user_ualx(addr, arg1, 1);
      get_user_ualx(addrlen, arg1, 2);
  
      gemu_log("%s(", name);
      print_raw_param(TARGET_ABI_FMT_ld, sockfd, 0);
      print_sockaddr(addr, addrlen);
      gemu_log(")");
  }
  
  static void do_print_listen(const char *name, abi_long arg1)
  {
      abi_ulong sockfd, backlog;
  
      get_user_ualx(sockfd, arg1, 0);
      get_user_ualx(backlog, arg1, 1);
  
      gemu_log("%s(", name);
      print_raw_param(TARGET_ABI_FMT_ld, sockfd, 0);
      print_raw_param(TARGET_ABI_FMT_ld, backlog, 1);
      gemu_log(")");
  }
  
  static void do_print_socketpair(const char *name, abi_long arg1)
  {
      abi_ulong domain, type, protocol, tab;
  
      get_user_ualx(domain, arg1, 0);
      get_user_ualx(type, arg1, 1);
      get_user_ualx(protocol, arg1, 2);
      get_user_ualx(tab, arg1, 3);
  
      gemu_log("%s(", name);
      print_socket_domain(domain);
      gemu_log(",");
      print_socket_type(type);
      gemu_log(",");
      print_socket_protocol(domain, type, protocol);
      gemu_log(",");
      print_raw_param(TARGET_ABI_FMT_lx, tab, 1);
      gemu_log(")");
  }
  
  static void do_print_sendrecv(const char *name, abi_long arg1)
  {
      abi_ulong sockfd, msg, len, flags;
  
      get_user_ualx(sockfd, arg1, 0);
      get_user_ualx(msg, arg1, 1);
      get_user_ualx(len, arg1, 2);
      get_user_ualx(flags, arg1, 3);
  
      gemu_log("%s(", name);
      print_raw_param(TARGET_ABI_FMT_ld, sockfd, 0);
      print_buf(msg, len, 0);
      print_raw_param(TARGET_ABI_FMT_ld, len, 0);
      print_flags(msg_flags, flags, 1);
      gemu_log(")");
  }
  
  static void do_print_msgaddr(const char *name, abi_long arg1)
  {
      abi_ulong sockfd, msg, len, flags, addr, addrlen;
  
      get_user_ualx(sockfd, arg1, 0);
      get_user_ualx(msg, arg1, 1);
      get_user_ualx(len, arg1, 2);
      get_user_ualx(flags, arg1, 3);
      get_user_ualx(addr, arg1, 4);
      get_user_ualx(addrlen, arg1, 5);
  
      gemu_log("%s(", name);
      print_raw_param(TARGET_ABI_FMT_ld, sockfd, 0);
      print_buf(msg, len, 0);
      print_raw_param(TARGET_ABI_FMT_ld, len, 0);
      print_flags(msg_flags, flags, 0);
      print_sockaddr(addr, addrlen);
      gemu_log(")");
  }
  
  static void do_print_shutdown(const char *name, abi_long arg1)
  {
      abi_ulong sockfd, how;
  
      get_user_ualx(sockfd, arg1, 0);
      get_user_ualx(how, arg1, 1);
  
      gemu_log("shutdown(");
      print_raw_param(TARGET_ABI_FMT_ld, sockfd, 0);
      switch (how) {
      case SHUT_RD:
          gemu_log("SHUT_RD");
          break;
      case SHUT_WR:
          gemu_log("SHUT_WR");
          break;
      case SHUT_RDWR:
          gemu_log("SHUT_RDWR");
          break;
      default:
          print_raw_param(TARGET_ABI_FMT_ld, how, 1);
          break;
      }
      gemu_log(")");
  }
  
  static void do_print_msg(const char *name, abi_long arg1)
  {
      abi_ulong sockfd, msg, flags;
  
      get_user_ualx(sockfd, arg1, 0);
      get_user_ualx(msg, arg1, 1);
      get_user_ualx(flags, arg1, 2);
  
      gemu_log("%s(", name);
      print_raw_param(TARGET_ABI_FMT_ld, sockfd, 0);
      print_pointer(msg, 0);
      print_flags(msg_flags, flags, 1);
      gemu_log(")");
  }
  
  static void do_print_sockopt(const char *name, abi_long arg1)
  {
      abi_ulong sockfd, level, optname, optval, optlen;
  
      get_user_ualx(sockfd, arg1, 0);
      get_user_ualx(level, arg1, 1);
      get_user_ualx(optname, arg1, 2);
      get_user_ualx(optval, arg1, 3);
      get_user_ualx(optlen, arg1, 4);
  
      gemu_log("%s(", name);
      print_raw_param(TARGET_ABI_FMT_ld, sockfd, 0);
      switch (level) {
      case SOL_TCP:
          gemu_log("SOL_TCP,");
          print_raw_param(TARGET_ABI_FMT_ld, optname, 0);
          print_pointer(optval, 0);
          break;
      case SOL_IP:
          gemu_log("SOL_IP,");
          print_raw_param(TARGET_ABI_FMT_ld, optname, 0);
          print_pointer(optval, 0);
          break;
      case SOL_RAW:
          gemu_log("SOL_RAW,");
          print_raw_param(TARGET_ABI_FMT_ld, optname, 0);
          print_pointer(optval, 0);
          break;
      case TARGET_SOL_SOCKET:
          gemu_log("SOL_SOCKET,");
          switch (optname) {
          case TARGET_SO_DEBUG:
              gemu_log("SO_DEBUG,");
  print_optint:
              print_number(optval, 0);
              break;
          case TARGET_SO_REUSEADDR:
              gemu_log("SO_REUSEADDR,");
              goto print_optint;
          case TARGET_SO_REUSEPORT:
              gemu_log("SO_REUSEPORT,");
              goto print_optint;
          case TARGET_SO_TYPE:
              gemu_log("SO_TYPE,");
              goto print_optint;
          case TARGET_SO_ERROR:
              gemu_log("SO_ERROR,");
              goto print_optint;
          case TARGET_SO_DONTROUTE:
              gemu_log("SO_DONTROUTE,");
              goto print_optint;
          case TARGET_SO_BROADCAST:
              gemu_log("SO_BROADCAST,");
              goto print_optint;
          case TARGET_SO_SNDBUF:
              gemu_log("SO_SNDBUF,");
              goto print_optint;
          case TARGET_SO_RCVBUF:
              gemu_log("SO_RCVBUF,");
              goto print_optint;
          case TARGET_SO_KEEPALIVE:
              gemu_log("SO_KEEPALIVE,");
              goto print_optint;
          case TARGET_SO_OOBINLINE:
              gemu_log("SO_OOBINLINE,");
              goto print_optint;
          case TARGET_SO_NO_CHECK:
              gemu_log("SO_NO_CHECK,");
              goto print_optint;
          case TARGET_SO_PRIORITY:
              gemu_log("SO_PRIORITY,");
              goto print_optint;
          case TARGET_SO_BSDCOMPAT:
              gemu_log("SO_BSDCOMPAT,");
              goto print_optint;
          case TARGET_SO_PASSCRED:
              gemu_log("SO_PASSCRED,");
              goto print_optint;
          case TARGET_SO_TIMESTAMP:
              gemu_log("SO_TIMESTAMP,");
              goto print_optint;
          case TARGET_SO_RCVLOWAT:
              gemu_log("SO_RCVLOWAT,");
              goto print_optint;
          case TARGET_SO_RCVTIMEO:
              gemu_log("SO_RCVTIMEO,");
              print_timeval(optval, 0);
              break;
          case TARGET_SO_SNDTIMEO:
              gemu_log("SO_SNDTIMEO,");
              print_timeval(optval, 0);
              break;
          case TARGET_SO_ATTACH_FILTER: {
              struct target_sock_fprog *fprog;
  
              gemu_log("SO_ATTACH_FILTER,");
  
              if (lock_user_struct(VERIFY_READ, fprog, optval,  0)) {
                  struct target_sock_filter *filter;
                  gemu_log("{");
                  if (lock_user_struct(VERIFY_READ, filter,
                                       tswapal(fprog->filter),  0)) {
                      int i;
                      for (i = 0; i < tswap16(fprog->len) - 1; i++) {
                          gemu_log("[%d]{0x%x,%d,%d,0x%x},",
                                   i, tswap16(filter[i].code),
                                   filter[i].jt, filter[i].jf,
                                   tswap32(filter[i].k));
                      }
                      gemu_log("[%d]{0x%x,%d,%d,0x%x}",
                               i, tswap16(filter[i].code),
                               filter[i].jt, filter[i].jf,
                               tswap32(filter[i].k));
                  } else {
                      gemu_log(TARGET_ABI_FMT_lx, tswapal(fprog->filter));
                  }
                  gemu_log(",%d},", tswap16(fprog->len));
                  unlock_user(fprog, optval, 0);
              } else {
                  print_pointer(optval, 0);
              }
              break;
          }
          default:
              print_raw_param(TARGET_ABI_FMT_ld, optname, 0);
              print_pointer(optval, 0);
              break;
          }
          break;
      default:
          print_raw_param(TARGET_ABI_FMT_ld, level, 0);
          print_raw_param(TARGET_ABI_FMT_ld, optname, 0);
          print_pointer(optval, 0);
          break;
      }
      print_raw_param(TARGET_ABI_FMT_ld, optlen, 1);
      gemu_log(")");
  }
  
  #define PRINT_SOCKOP(name, func) \
      [TARGET_SYS_##name] = { #name, func }
  
  static struct {
      const char *name;
      void (*print)(const char *, abi_long);
  } scall[] = {
      PRINT_SOCKOP(SOCKET, do_print_socket),
      PRINT_SOCKOP(BIND, do_print_sockaddr),
      PRINT_SOCKOP(CONNECT, do_print_sockaddr),
      PRINT_SOCKOP(LISTEN, do_print_listen),
      PRINT_SOCKOP(ACCEPT, do_print_sockaddr),
      PRINT_SOCKOP(GETSOCKNAME, do_print_sockaddr),
      PRINT_SOCKOP(GETPEERNAME, do_print_sockaddr),
      PRINT_SOCKOP(SOCKETPAIR, do_print_socketpair),
      PRINT_SOCKOP(SEND, do_print_sendrecv),
      PRINT_SOCKOP(RECV, do_print_sendrecv),
      PRINT_SOCKOP(SENDTO, do_print_msgaddr),
      PRINT_SOCKOP(RECVFROM, do_print_msgaddr),
      PRINT_SOCKOP(SHUTDOWN, do_print_shutdown),
      PRINT_SOCKOP(SETSOCKOPT, do_print_sockopt),
      PRINT_SOCKOP(GETSOCKOPT, do_print_sockopt),
      PRINT_SOCKOP(SENDMSG, do_print_msg),
      PRINT_SOCKOP(RECVMSG, do_print_msg),
      PRINT_SOCKOP(ACCEPT4, NULL),
      PRINT_SOCKOP(RECVMMSG, NULL),
      PRINT_SOCKOP(SENDMMSG, NULL),
  };
  
  static void
  print_socketcall(const struct syscallname *name,
                   abi_long arg0, abi_long arg1, abi_long arg2,
                   abi_long arg3, abi_long arg4, abi_long arg5)
  {
      if (arg0 >= 0 && arg0 < ARRAY_SIZE(scall) && scall[arg0].print) {
          scall[arg0].print(scall[arg0].name, arg1);
          return;
      }
      print_syscall_prologue(name);
      print_raw_param(TARGET_ABI_FMT_ld, arg0, 0);
      print_raw_param(TARGET_ABI_FMT_ld, arg1, 0);
      print_raw_param(TARGET_ABI_FMT_ld, arg2, 0);
      print_raw_param(TARGET_ABI_FMT_ld, arg3, 0);
      print_raw_param(TARGET_ABI_FMT_ld, arg4, 0);
      print_raw_param(TARGET_ABI_FMT_ld, arg5, 0);
      print_syscall_epilogue(name);
  }
  #endif
  
  #if defined(TARGET_NR_stat) || defined(TARGET_NR_stat64) || \
      defined(TARGET_NR_lstat) || defined(TARGET_NR_lstat64)
  static void
  print_stat(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_pointer(arg1, 1);
      print_syscall_epilogue(name);
  }
  #define print_lstat     print_stat
  #define print_stat64	print_stat
  #define print_lstat64   print_stat
  #endif
  
  #if defined(TARGET_NR_fstat) || defined(TARGET_NR_fstat64)
  static void
  print_fstat(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_raw_param("%d", arg0, 0);
      print_pointer(arg1, 1);
      print_syscall_epilogue(name);
  }
  #define print_fstat64     print_fstat
  #endif
  
  #ifdef TARGET_NR_mkdir
  static void
  print_mkdir(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_file_mode(arg1, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_mkdirat
  static void
  print_mkdirat(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_at_dirfd(arg0, 0);
      print_string(arg1, 0);
      print_file_mode(arg2, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_rmdir
  static void
  print_rmdir(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_rt_sigaction
  static void
  print_rt_sigaction(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_signal(arg0, 0);
      print_pointer(arg1, 0);
      print_pointer(arg2, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_rt_sigprocmask
  static void
  print_rt_sigprocmask(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      const char *how = "UNKNOWN";
      print_syscall_prologue(name);
      switch(arg0) {
      case TARGET_SIG_BLOCK: how = "SIG_BLOCK"; break;
      case TARGET_SIG_UNBLOCK: how = "SIG_UNBLOCK"; break;
      case TARGET_SIG_SETMASK: how = "SIG_SETMASK"; break;
      }
      gemu_log("%s,",how);
      print_pointer(arg1, 0);
      print_pointer(arg2, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_rt_sigqueueinfo
  static void
  print_rt_sigqueueinfo(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      void *p;
      target_siginfo_t uinfo;
  
      print_syscall_prologue(name);
      print_raw_param("%d", arg0, 0);
      print_signal(arg1, 0);
      p = lock_user(VERIFY_READ, arg2, sizeof(target_siginfo_t), 1);
      if (p) {
          get_target_siginfo(&uinfo, p);
          print_siginfo(&uinfo);
  
          unlock_user(p, arg2, 0);
      } else {
          print_pointer(arg2, 1);
      }
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_rt_tgsigqueueinfo
  static void
  print_rt_tgsigqueueinfo(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      void *p;
      target_siginfo_t uinfo;
  
      print_syscall_prologue(name);
      print_raw_param("%d", arg0, 0);
      print_raw_param("%d", arg1, 0);
      print_signal(arg2, 0);
      p = lock_user(VERIFY_READ, arg3, sizeof(target_siginfo_t), 1);
      if (p) {
          get_target_siginfo(&uinfo, p);
          print_siginfo(&uinfo);
  
          unlock_user(p, arg3, 0);
      } else {
          print_pointer(arg3, 1);
      }
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_syslog
  static void
  print_syslog_action(abi_ulong arg, int last)
  {
      const char *type;
  
      switch (arg) {
          case TARGET_SYSLOG_ACTION_CLOSE: {
              type = "SYSLOG_ACTION_CLOSE";
              break;
          }
          case TARGET_SYSLOG_ACTION_OPEN: {
              type = "SYSLOG_ACTION_OPEN";
              break;
          }
          case TARGET_SYSLOG_ACTION_READ: {
              type = "SYSLOG_ACTION_READ";
              break;
          }
          case TARGET_SYSLOG_ACTION_READ_ALL: {
              type = "SYSLOG_ACTION_READ_ALL";
              break;
          }
          case TARGET_SYSLOG_ACTION_READ_CLEAR: {
              type = "SYSLOG_ACTION_READ_CLEAR";
              break;
          }
          case TARGET_SYSLOG_ACTION_CLEAR: {
              type = "SYSLOG_ACTION_CLEAR";
              break;
          }
          case TARGET_SYSLOG_ACTION_CONSOLE_OFF: {
              type = "SYSLOG_ACTION_CONSOLE_OFF";
              break;
          }
          case TARGET_SYSLOG_ACTION_CONSOLE_ON: {
              type = "SYSLOG_ACTION_CONSOLE_ON";
              break;
          }
          case TARGET_SYSLOG_ACTION_CONSOLE_LEVEL: {
              type = "SYSLOG_ACTION_CONSOLE_LEVEL";
              break;
          }
          case TARGET_SYSLOG_ACTION_SIZE_UNREAD: {
              type = "SYSLOG_ACTION_SIZE_UNREAD";
              break;
          }
          case TARGET_SYSLOG_ACTION_SIZE_BUFFER: {
              type = "SYSLOG_ACTION_SIZE_BUFFER";
              break;
          }
          default: {
              print_raw_param("%ld", arg, last);
              return;
          }
      }
      gemu_log("%s%s", type, get_comma(last));
  }
  
  static void
  print_syslog(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_syslog_action(arg0, 0);
      print_pointer(arg1, 0);
      print_raw_param("%d", arg2, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_mknod
  static void
  print_mknod(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      int hasdev = (arg1 & (S_IFCHR|S_IFBLK));
  
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_file_mode(arg1, (hasdev == 0));
      if (hasdev) {
          print_raw_param("makedev(%d", major(arg2), 0);
          print_raw_param("%d)", minor(arg2), 1);
      }
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_mknodat
  static void
  print_mknodat(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      int hasdev = (arg2 & (S_IFCHR|S_IFBLK));
  
      print_syscall_prologue(name);
      print_at_dirfd(arg0, 0);
      print_string(arg1, 0);
      print_file_mode(arg2, (hasdev == 0));
      if (hasdev) {
          print_raw_param("makedev(%d", major(arg3), 0);
          print_raw_param("%d)", minor(arg3), 1);
      }
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_mq_open
  static void
  print_mq_open(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      int is_creat = (arg1 & TARGET_O_CREAT);
  
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_open_flags(arg1, (is_creat == 0));
      if (is_creat) {
          print_file_mode(arg2, 0);
          print_pointer(arg3, 1);
      }
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_open
  static void
  print_open(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      int is_creat = (arg1 & TARGET_O_CREAT);
  
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_open_flags(arg1, (is_creat == 0));
      if (is_creat)
          print_file_mode(arg2, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_openat
  static void
  print_openat(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      int is_creat = (arg2 & TARGET_O_CREAT);
  
      print_syscall_prologue(name);
      print_at_dirfd(arg0, 0);
      print_string(arg1, 0);
      print_open_flags(arg2, (is_creat == 0));
      if (is_creat)
          print_file_mode(arg3, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_mq_unlink
  static void
  print_mq_unlink(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #if defined(TARGET_NR_fstatat64) || defined(TARGET_NR_newfstatat)
  static void
  print_fstatat64(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_at_dirfd(arg0, 0);
      print_string(arg1, 0);
      print_pointer(arg2, 0);
      print_flags(at_file_flags, arg3, 1);
      print_syscall_epilogue(name);
  }
  #define print_newfstatat    print_fstatat64
  #endif
  
  #ifdef TARGET_NR_readlink
  static void
  print_readlink(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_pointer(arg1, 0);
      print_raw_param("%u", arg2, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_readlinkat
  static void
  print_readlinkat(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_at_dirfd(arg0, 0);
      print_string(arg1, 0);
      print_pointer(arg2, 0);
      print_raw_param("%u", arg3, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_rename
  static void
  print_rename(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_string(arg1, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_renameat
  static void
  print_renameat(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_at_dirfd(arg0, 0);
      print_string(arg1, 0);
      print_at_dirfd(arg2, 0);
      print_string(arg3, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_statfs
  static void
  print_statfs(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_pointer(arg1, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_statfs64
  static void
  print_statfs64(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_pointer(arg1, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_symlink
  static void
  print_symlink(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_string(arg1, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_symlinkat
  static void
  print_symlinkat(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_at_dirfd(arg1, 0);
      print_string(arg2, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_mount
  static void
  print_mount(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_string(arg1, 0);
      print_string(arg2, 0);
      print_flags(mount_flags, arg3, 0);
      print_pointer(arg4, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_umount
  static void
  print_umount(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_umount2
  static void
  print_umount2(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_flags(umount2_flags, arg1, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_unlink
  static void
  print_unlink(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_unlinkat
  static void
  print_unlinkat(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_at_dirfd(arg0, 0);
      print_string(arg1, 0);
      print_flags(unlinkat_flags, arg2, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_utime
  static void
  print_utime(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_pointer(arg1, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_utimes
  static void
  print_utimes(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_string(arg0, 0);
      print_pointer(arg1, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_utimensat
  static void
  print_utimensat(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_at_dirfd(arg0, 0);
      print_string(arg1, 0);
      print_pointer(arg2, 0);
      print_flags(at_file_flags, arg3, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #if defined(TARGET_NR_mmap) || defined(TARGET_NR_mmap2)
  static void
  print_mmap(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_pointer(arg0, 0);
      print_raw_param("%d", arg1, 0);
      print_flags(mmap_prot_flags, arg2, 0);
      print_flags(mmap_flags, arg3, 0);
      print_raw_param("%d", arg4, 0);
      print_raw_param("%#x", arg5, 1);
      print_syscall_epilogue(name);
  }
  #define print_mmap2     print_mmap
  #endif
  
  #ifdef TARGET_NR_mprotect
  static void
  print_mprotect(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_pointer(arg0, 0);
      print_raw_param("%d", arg1, 0);
      print_flags(mmap_prot_flags, arg2, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_munmap
  static void
  print_munmap(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_pointer(arg0, 0);
      print_raw_param("%d", arg1, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_futex
  static void print_futex_op(abi_long tflag, int last)
  {
  #define print_op(val) \
  if( cmd == val ) { \
      gemu_log(#val); \
      return; \
  }
  
      int cmd = (int)tflag;
  #ifdef FUTEX_PRIVATE_FLAG
      if (cmd & FUTEX_PRIVATE_FLAG) {
          gemu_log("FUTEX_PRIVATE_FLAG|");
          cmd &= ~FUTEX_PRIVATE_FLAG;
      }
  #endif
  #ifdef FUTEX_CLOCK_REALTIME
      if (cmd & FUTEX_CLOCK_REALTIME) {
          gemu_log("FUTEX_CLOCK_REALTIME|");
          cmd &= ~FUTEX_CLOCK_REALTIME;
      }
  #endif
      print_op(FUTEX_WAIT)
      print_op(FUTEX_WAKE)
      print_op(FUTEX_FD)
      print_op(FUTEX_REQUEUE)
      print_op(FUTEX_CMP_REQUEUE)
      print_op(FUTEX_WAKE_OP)
      print_op(FUTEX_LOCK_PI)
      print_op(FUTEX_UNLOCK_PI)
      print_op(FUTEX_TRYLOCK_PI)
  #ifdef FUTEX_WAIT_BITSET
      print_op(FUTEX_WAIT_BITSET)
  #endif
  #ifdef FUTEX_WAKE_BITSET
      print_op(FUTEX_WAKE_BITSET)
  #endif
      /* unknown values */
      gemu_log("%d",cmd);
  }
  
  static void
  print_futex(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_pointer(arg0, 0);
      print_futex_op(arg1, 0);
      print_raw_param(",%d", arg2, 0);
      print_pointer(arg3, 0); /* struct timespec */
      print_pointer(arg4, 0);
      print_raw_param("%d", arg4, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_kill
  static void
  print_kill(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_raw_param("%d", arg0, 0);
      print_signal(arg1, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_tkill
  static void
  print_tkill(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_raw_param("%d", arg0, 0);
      print_signal(arg1, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  #ifdef TARGET_NR_tgkill
  static void
  print_tgkill(const struct syscallname *name,
      abi_long arg0, abi_long arg1, abi_long arg2,
      abi_long arg3, abi_long arg4, abi_long arg5)
  {
      print_syscall_prologue(name);
      print_raw_param("%d", arg0, 0);
      print_raw_param("%d", arg1, 0);
      print_signal(arg2, 1);
      print_syscall_epilogue(name);
  }
  #endif
  
  /*
   * An array of all of the syscalls we know about
   */
  
  static const struct syscallname scnames[] = {
  #include "strace.list"
  };
  
  static int nsyscalls = ARRAY_SIZE(scnames);
  
  /*
   * The public interface to this module.
   */
  void
  print_syscall(int num,
                abi_long arg1, abi_long arg2, abi_long arg3,
                abi_long arg4, abi_long arg5, abi_long arg6)
  {
      int i;
      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 ")";
  
      gemu_log("%d ", getpid() );
  
      for(i=0;i<nsyscalls;i++)
          if( scnames[i].nr == num ) {
              if( scnames[i].call != NULL ) {
                  scnames[i].call(&scnames[i],arg1,arg2,arg3,arg4,arg5,arg6);
              } else {
                  /* XXX: this format system is broken because it uses
                     host types and host pointers for strings */
                  if( scnames[i].format != NULL )
                      format = scnames[i].format;
                  gemu_log(format,scnames[i].name, arg1,arg2,arg3,arg4,arg5,arg6);
              }
              return;
          }
      gemu_log("Unknown syscall %d\n", num);
  }
  
  
  void
  print_syscall_ret(int num, abi_long ret)
  {
      int i;
      const char *errstr = NULL;
  
      for(i=0;i<nsyscalls;i++)
          if( scnames[i].nr == num ) {
              if( scnames[i].result != NULL ) {
                  scnames[i].result(&scnames[i],ret);
              } else {
                  if (ret < 0) {
                      errstr = target_strerror(-ret);
                  }
                  if (errstr) {
                      gemu_log(" = -1 errno=" TARGET_ABI_FMT_ld " (%s)\n",
                               -ret, errstr);
                  } else {
                      gemu_log(" = " TARGET_ABI_FMT_ld "\n", ret);
                  }
              }
              break;
          }
  }
  
  void print_taken_signal(int target_signum, const target_siginfo_t *tinfo)
  {
      /* Print the strace output for a signal being taken:
       * --- SIGSEGV {si_signo=SIGSEGV, si_code=SI_KERNEL, si_addr=0} ---
       */
      gemu_log("--- ");
      print_signal(target_signum, 1);
      gemu_log(" ");
      print_siginfo(tinfo);
      gemu_log(" ---\n");
  }
  