Archipelago » qemu

/*

 *  Linux syscalls

 *

 *  Copyright (c) 2003 Fabrice Bellard

 *

 *  This program is free software; you can redistribute it and/or modify

 *  it under the terms of the GNU General Public License as published by

 *  the Free Software Foundation; either version 2 of the License, or

 *  (at your option) any later version.

 *

 *  This program is distributed in the hope that it will be useful,

 *  but WITHOUT ANY WARRANTY; without even the implied warranty of

 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

 *  GNU General Public License for more details.

 *

 *  You should have received a copy of the GNU General Public License

 *  along with this program; if not, see <http://www.gnu.org/licenses/>.

 */

#define _ATFILE_SOURCE

#include <stdlib.h>

#include <stdio.h>

#include <stdarg.h>

#include <string.h>

#include <elf.h>

#include <endian.h>

#include <errno.h>

#include <unistd.h>

#include <fcntl.h>

#include <time.h>

#include <limits.h>

#include <sys/types.h>

#include <sys/ipc.h>

#include <sys/msg.h>

#include <sys/wait.h>

#include <sys/time.h>

#include <sys/stat.h>

#include <sys/mount.h>

#include <sys/prctl.h>

#include <sys/resource.h>

#include <sys/mman.h>

#include <sys/swap.h>

#include <signal.h>

#include <sched.h>

#ifdef __ia64__

int __clone2(int (*fn)(void *), void *child_stack_base,

             size_t stack_size, int flags, void *arg, ...);

#endif

#include <sys/socket.h>

#include <sys/un.h>

#include <sys/uio.h>

#include <sys/poll.h>

#include <sys/times.h>

#include <sys/shm.h>

#include <sys/sem.h>

#include <sys/statfs.h>

#include <utime.h>

#include <sys/sysinfo.h>

#include <sys/utsname.h>

//#include <sys/user.h>

#include <netinet/ip.h>

#include <netinet/tcp.h>

#include <linux/wireless.h>

#include <qemu-common.h>

#ifdef TARGET_GPROF

#include <sys/gmon.h>

#endif

#ifdef CONFIG_EVENTFD

#include <sys/eventfd.h>

#endif

#ifdef CONFIG_EPOLL

#include <sys/epoll.h>

#endif

#define termios host_termios

#define winsize host_winsize

#define termio host_termio

#define sgttyb host_sgttyb /* same as target */

#define tchars host_tchars /* same as target */

#define ltchars host_ltchars /* same as target */

#include <linux/termios.h>

#include <linux/unistd.h>

#include <linux/utsname.h>

#include <linux/cdrom.h>

#include <linux/hdreg.h>

#include <linux/soundcard.h>

#include <linux/kd.h>

#include <linux/mtio.h>

#include <linux/fs.h>

#if defined(CONFIG_FIEMAP)

#include <linux/fiemap.h>

#endif

#include <linux/fb.h>

#include <linux/vt.h>

#include "linux_loop.h"

#include "cpu-uname.h"

#include "qemu.h"

#include "qemu-common.h"

#if defined(CONFIG_USE_NPTL)

#define CLONE_NPTL_FLAGS2 (CLONE_SETTLS | \

    CLONE_PARENT_SETTID | CLONE_CHILD_SETTID | CLONE_CHILD_CLEARTID)

#else

/* XXX: Hardcode the above values.  */

#define CLONE_NPTL_FLAGS2 0

#endif

//#define DEBUG

//#include <linux/msdos_fs.h>

#define        VFAT_IOCTL_READDIR_BOTH                _IOR('r', 1, struct linux_dirent [2])

#define        VFAT_IOCTL_READDIR_SHORT        _IOR('r', 2, struct linux_dirent [2])

#undef _syscall0

#undef _syscall1

#undef _syscall2

#undef _syscall3

#undef _syscall4

#undef _syscall5

#undef _syscall6

#define _syscall0(type,name)                \

static type name (void)                        \

{                                        \

        return syscall(__NR_##name);        \

}

#define _syscall1(type,name,type1,arg1)                \

static type name (type1 arg1)                        \

{                                                \

        return syscall(__NR_##name, arg1);        \

}

#define _syscall2(type,name,type1,arg1,type2,arg2)        \

static type name (type1 arg1,type2 arg2)                \

{                                                        \

        return syscall(__NR_##name, arg1, arg2);        \

}

#define _syscall3(type,name,type1,arg1,type2,arg2,type3,arg3)        \

static type name (type1 arg1,type2 arg2,type3 arg3)                \

{                                                                \

        return syscall(__NR_##name, arg1, arg2, arg3);                \

}

#define _syscall4(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4)        \

static type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4)                        \

{                                                                                \

        return syscall(__NR_##name, arg1, arg2, arg3, arg4);                        \

}

#define _syscall5(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4,        \

                  type5,arg5)                                                        \

static type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4,type5 arg5)        \

{                                                                                \

        return syscall(__NR_##name, arg1, arg2, arg3, arg4, arg5);                \

}

#define _syscall6(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4,        \

                  type5,arg5,type6,arg6)                                        \

static type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4,type5 arg5,        \

                  type6 arg6)                                                        \

{                                                                                \

        return syscall(__NR_##name, arg1, arg2, arg3, arg4, arg5, arg6);        \

}

#define __NR_sys_uname __NR_uname

#define __NR_sys_faccessat __NR_faccessat

#define __NR_sys_fchmodat __NR_fchmodat

#define __NR_sys_fchownat __NR_fchownat

#define __NR_sys_fstatat64 __NR_fstatat64

#define __NR_sys_futimesat __NR_futimesat

#define __NR_sys_getcwd1 __NR_getcwd

#define __NR_sys_getdents __NR_getdents

#define __NR_sys_getdents64 __NR_getdents64

#define __NR_sys_getpriority __NR_getpriority

#define __NR_sys_linkat __NR_linkat

#define __NR_sys_mkdirat __NR_mkdirat

#define __NR_sys_mknodat __NR_mknodat

#define __NR_sys_newfstatat __NR_newfstatat

#define __NR_sys_openat __NR_openat

#define __NR_sys_readlinkat __NR_readlinkat

#define __NR_sys_renameat __NR_renameat

#define __NR_sys_rt_sigqueueinfo __NR_rt_sigqueueinfo

#define __NR_sys_symlinkat __NR_symlinkat

#define __NR_sys_syslog __NR_syslog

#define __NR_sys_tgkill __NR_tgkill

#define __NR_sys_tkill __NR_tkill

#define __NR_sys_unlinkat __NR_unlinkat

#define __NR_sys_utimensat __NR_utimensat

#define __NR_sys_futex __NR_futex

#define __NR_sys_inotify_init __NR_inotify_init

#define __NR_sys_inotify_add_watch __NR_inotify_add_watch

#define __NR_sys_inotify_rm_watch __NR_inotify_rm_watch

#if defined(__alpha__) || defined (__ia64__) || defined(__x86_64__) || \

    defined(__s390x__)

#define __NR__llseek __NR_lseek

#endif

#ifdef __NR_gettid

_syscall0(int, gettid)

#else

/* This is a replacement for the host gettid() and must return a host

   errno. */

static int gettid(void) {

    return -ENOSYS;

}

#endif

_syscall3(int, sys_getdents, uint, fd, struct linux_dirent *, dirp, uint, count);

#if defined(TARGET_NR_getdents64) && defined(__NR_getdents64)

_syscall3(int, sys_getdents64, uint, fd, struct linux_dirent64 *, dirp, uint, count);

#endif

_syscall2(int, sys_getpriority, int, which, int, who);

#if defined(TARGET_NR__llseek) && defined(__NR_llseek)

_syscall5(int, _llseek,  uint,  fd, ulong, hi, ulong, lo,

          loff_t *, res, uint, wh);

#endif

_syscall3(int,sys_rt_sigqueueinfo,int,pid,int,sig,siginfo_t *,uinfo)

_syscall3(int,sys_syslog,int,type,char*,bufp,int,len)

#if defined(TARGET_NR_tgkill) && defined(__NR_tgkill)

_syscall3(int,sys_tgkill,int,tgid,int,pid,int,sig)

#endif

#if defined(TARGET_NR_tkill) && defined(__NR_tkill)

_syscall2(int,sys_tkill,int,tid,int,sig)

#endif

#ifdef __NR_exit_group

_syscall1(int,exit_group,int,error_code)

#endif

#if defined(TARGET_NR_set_tid_address) && defined(__NR_set_tid_address)

_syscall1(int,set_tid_address,int *,tidptr)

#endif

#if defined(CONFIG_USE_NPTL)

#if defined(TARGET_NR_futex) && defined(__NR_futex)

_syscall6(int,sys_futex,int *,uaddr,int,op,int,val,

          const struct timespec *,timeout,int *,uaddr2,int,val3)

#endif

#endif

#define __NR_sys_sched_getaffinity __NR_sched_getaffinity

_syscall3(int, sys_sched_getaffinity, pid_t, pid, unsigned int, len,

          unsigned long *, user_mask_ptr);

#define __NR_sys_sched_setaffinity __NR_sched_setaffinity

_syscall3(int, sys_sched_setaffinity, pid_t, pid, unsigned int, len,

          unsigned long *, user_mask_ptr);

static bitmask_transtbl fcntl_flags_tbl[] = {

  { TARGET_O_ACCMODE,   TARGET_O_WRONLY,    O_ACCMODE,   O_WRONLY,    },

  { TARGET_O_ACCMODE,   TARGET_O_RDWR,      O_ACCMODE,   O_RDWR,      },

  { TARGET_O_CREAT,     TARGET_O_CREAT,     O_CREAT,     O_CREAT,     },

  { TARGET_O_EXCL,      TARGET_O_EXCL,      O_EXCL,      O_EXCL,      },

  { TARGET_O_NOCTTY,    TARGET_O_NOCTTY,    O_NOCTTY,    O_NOCTTY,    },

  { TARGET_O_TRUNC,     TARGET_O_TRUNC,     O_TRUNC,     O_TRUNC,     },

  { TARGET_O_APPEND,    TARGET_O_APPEND,    O_APPEND,    O_APPEND,    },

  { TARGET_O_NONBLOCK,  TARGET_O_NONBLOCK,  O_NONBLOCK,  O_NONBLOCK,  },

  { TARGET_O_SYNC,      TARGET_O_SYNC,      O_SYNC,      O_SYNC,      },

  { TARGET_FASYNC,      TARGET_FASYNC,      FASYNC,      FASYNC,      },

  { TARGET_O_DIRECTORY, TARGET_O_DIRECTORY, O_DIRECTORY, O_DIRECTORY, },

  { TARGET_O_NOFOLLOW,  TARGET_O_NOFOLLOW,  O_NOFOLLOW,  O_NOFOLLOW,  },

  { TARGET_O_LARGEFILE, TARGET_O_LARGEFILE, O_LARGEFILE, O_LARGEFILE, },

#if defined(O_DIRECT)

  { TARGET_O_DIRECT,    TARGET_O_DIRECT,    O_DIRECT,    O_DIRECT,    },

#endif

  { 0, 0, 0, 0 }

};

#define COPY_UTSNAME_FIELD(dest, src) \

  do { \

      /* __NEW_UTS_LEN doesn't include terminating null */ \

      (void) strncpy((dest), (src), __NEW_UTS_LEN); \

      (dest)[__NEW_UTS_LEN] = '\0'; \

  } while (0)

static int sys_uname(struct new_utsname *buf)

{

  struct utsname uts_buf;

  if (uname(&uts_buf) < 0)

      return (-1);

  /*

   * Just in case these have some differences, we

   * translate utsname to new_utsname (which is the

   * struct linux kernel uses).

   */

  memset(buf, 0, sizeof(*buf));

  COPY_UTSNAME_FIELD(buf->sysname, uts_buf.sysname);

  COPY_UTSNAME_FIELD(buf->nodename, uts_buf.nodename);

  COPY_UTSNAME_FIELD(buf->release, uts_buf.release);

  COPY_UTSNAME_FIELD(buf->version, uts_buf.version);

  COPY_UTSNAME_FIELD(buf->machine, uts_buf.machine);

#ifdef _GNU_SOURCE

  COPY_UTSNAME_FIELD(buf->domainname, uts_buf.domainname);

#endif

  return (0);

#undef COPY_UTSNAME_FIELD

}

static int sys_getcwd1(char *buf, size_t size)

{

  if (getcwd(buf, size) == NULL) {

      /* getcwd() sets errno */

      return (-1);

  }

  return strlen(buf)+1;

}

#ifdef CONFIG_ATFILE

/*

 * Host system seems to have atfile syscall stubs available.  We

 * now enable them one by one as specified by target syscall_nr.h.

 */

#ifdef TARGET_NR_faccessat

static int sys_faccessat(int dirfd, const char *pathname, int mode)

{

  return (faccessat(dirfd, pathname, mode, 0));

}

#endif

#ifdef TARGET_NR_fchmodat

static int sys_fchmodat(int dirfd, const char *pathname, mode_t mode)

{

  return (fchmodat(dirfd, pathname, mode, 0));

}

#endif

#if defined(TARGET_NR_fchownat)

static int sys_fchownat(int dirfd, const char *pathname, uid_t owner,

    gid_t group, int flags)

{

  return (fchownat(dirfd, pathname, owner, group, flags));

}

#endif

#ifdef __NR_fstatat64

static int sys_fstatat64(int dirfd, const char *pathname, struct stat *buf,

    int flags)

{

  return (fstatat(dirfd, pathname, buf, flags));

}

#endif

#ifdef __NR_newfstatat

static int sys_newfstatat(int dirfd, const char *pathname, struct stat *buf,

    int flags)

{

  return (fstatat(dirfd, pathname, buf, flags));

}

#endif

#ifdef TARGET_NR_futimesat

static int sys_futimesat(int dirfd, const char *pathname,

    const struct timeval times[2])

{

  return (futimesat(dirfd, pathname, times));

}

#endif

#ifdef TARGET_NR_linkat

static int sys_linkat(int olddirfd, const char *oldpath,

    int newdirfd, const char *newpath, int flags)

{

  return (linkat(olddirfd, oldpath, newdirfd, newpath, flags));

}

#endif

#ifdef TARGET_NR_mkdirat

static int sys_mkdirat(int dirfd, const char *pathname, mode_t mode)

{

  return (mkdirat(dirfd, pathname, mode));

}

#endif

#ifdef TARGET_NR_mknodat

static int sys_mknodat(int dirfd, const char *pathname, mode_t mode,

    dev_t dev)

{

  return (mknodat(dirfd, pathname, mode, dev));

}

#endif

#ifdef TARGET_NR_openat

static int sys_openat(int dirfd, const char *pathname, int flags, ...)

{

  /*

   * open(2) has extra parameter 'mode' when called with

   * flag O_CREAT.

   */

  if ((flags & O_CREAT) != 0) {

      va_list ap;

      mode_t mode;

      /*

       * Get the 'mode' parameter and translate it to

       * host bits.

       */

      va_start(ap, flags);

      mode = va_arg(ap, mode_t);

      mode = target_to_host_bitmask(mode, fcntl_flags_tbl);

      va_end(ap);

      return (openat(dirfd, pathname, flags, mode));

  }

  return (openat(dirfd, pathname, flags));

}

#endif

#ifdef TARGET_NR_readlinkat

static int sys_readlinkat(int dirfd, const char *pathname, char *buf, size_t bufsiz)

{

  return (readlinkat(dirfd, pathname, buf, bufsiz));

}

#endif

#ifdef TARGET_NR_renameat

static int sys_renameat(int olddirfd, const char *oldpath,

    int newdirfd, const char *newpath)

{

  return (renameat(olddirfd, oldpath, newdirfd, newpath));

}

#endif

#ifdef TARGET_NR_symlinkat

static int sys_symlinkat(const char *oldpath, int newdirfd, const char *newpath)

{

  return (symlinkat(oldpath, newdirfd, newpath));

}

#endif

#ifdef TARGET_NR_unlinkat

static int sys_unlinkat(int dirfd, const char *pathname, int flags)

{

  return (unlinkat(dirfd, pathname, flags));

}

#endif

#else /* !CONFIG_ATFILE */

/*

 * Try direct syscalls instead

 */

#if defined(TARGET_NR_faccessat) && defined(__NR_faccessat)

_syscall3(int,sys_faccessat,int,dirfd,const char *,pathname,int,mode)

#endif

#if defined(TARGET_NR_fchmodat) && defined(__NR_fchmodat)

_syscall3(int,sys_fchmodat,int,dirfd,const char *,pathname, mode_t,mode)

#endif

#if defined(TARGET_NR_fchownat) && defined(__NR_fchownat)

_syscall5(int,sys_fchownat,int,dirfd,const char *,pathname,

          uid_t,owner,gid_t,group,int,flags)

#endif

#if (defined(TARGET_NR_fstatat64) || defined(TARGET_NR_newfstatat)) && \

        defined(__NR_fstatat64)

_syscall4(int,sys_fstatat64,int,dirfd,const char *,pathname,

          struct stat *,buf,int,flags)

#endif

#if defined(TARGET_NR_futimesat) && defined(__NR_futimesat)

_syscall3(int,sys_futimesat,int,dirfd,const char *,pathname,

         const struct timeval *,times)

#endif

#if (defined(TARGET_NR_newfstatat) || defined(TARGET_NR_fstatat64) ) && \

        defined(__NR_newfstatat)

_syscall4(int,sys_newfstatat,int,dirfd,const char *,pathname,

          struct stat *,buf,int,flags)

#endif

#if defined(TARGET_NR_linkat) && defined(__NR_linkat)

_syscall5(int,sys_linkat,int,olddirfd,const char *,oldpath,

      int,newdirfd,const char *,newpath,int,flags)

#endif

#if defined(TARGET_NR_mkdirat) && defined(__NR_mkdirat)

_syscall3(int,sys_mkdirat,int,dirfd,const char *,pathname,mode_t,mode)

#endif

#if defined(TARGET_NR_mknodat) && defined(__NR_mknodat)

_syscall4(int,sys_mknodat,int,dirfd,const char *,pathname,

          mode_t,mode,dev_t,dev)

#endif

#if defined(TARGET_NR_openat) && defined(__NR_openat)

_syscall4(int,sys_openat,int,dirfd,const char *,pathname,int,flags,mode_t,mode)

#endif

#if defined(TARGET_NR_readlinkat) && defined(__NR_readlinkat)

_syscall4(int,sys_readlinkat,int,dirfd,const char *,pathname,

          char *,buf,size_t,bufsize)

#endif

#if defined(TARGET_NR_renameat) && defined(__NR_renameat)

_syscall4(int,sys_renameat,int,olddirfd,const char *,oldpath,

          int,newdirfd,const char *,newpath)

#endif

#if defined(TARGET_NR_symlinkat) && defined(__NR_symlinkat)

_syscall3(int,sys_symlinkat,const char *,oldpath,

          int,newdirfd,const char *,newpath)

#endif

#if defined(TARGET_NR_unlinkat) && defined(__NR_unlinkat)

_syscall3(int,sys_unlinkat,int,dirfd,const char *,pathname,int,flags)

#endif

#endif /* CONFIG_ATFILE */

#ifdef CONFIG_UTIMENSAT

static int sys_utimensat(int dirfd, const char *pathname,

    const struct timespec times[2], int flags)

{

    if (pathname == NULL)

        return futimens(dirfd, times);

    else

        return utimensat(dirfd, pathname, times, flags);

}

#else

#if defined(TARGET_NR_utimensat) && defined(__NR_utimensat)

_syscall4(int,sys_utimensat,int,dirfd,const char *,pathname,

          const struct timespec *,tsp,int,flags)

#endif

#endif /* CONFIG_UTIMENSAT  */

#ifdef CONFIG_INOTIFY

#include <sys/inotify.h>

#if defined(TARGET_NR_inotify_init) && defined(__NR_inotify_init)

static int sys_inotify_init(void)

{

  return (inotify_init());

}

#endif

#if defined(TARGET_NR_inotify_add_watch) && defined(__NR_inotify_add_watch)

static int sys_inotify_add_watch(int fd,const char *pathname, int32_t mask)

{

  return (inotify_add_watch(fd, pathname, mask));

}

#endif

#if defined(TARGET_NR_inotify_rm_watch) && defined(__NR_inotify_rm_watch)

static int sys_inotify_rm_watch(int fd, int32_t wd)

{

  return (inotify_rm_watch(fd, wd));

}

#endif

#ifdef CONFIG_INOTIFY1

#if defined(TARGET_NR_inotify_init1) && defined(__NR_inotify_init1)

static int sys_inotify_init1(int flags)

{

  return (inotify_init1(flags));

}

#endif

#endif

#else

/* Userspace can usually survive runtime without inotify */

#undef TARGET_NR_inotify_init

#undef TARGET_NR_inotify_init1

#undef TARGET_NR_inotify_add_watch

#undef TARGET_NR_inotify_rm_watch

#endif /* CONFIG_INOTIFY  */

#if defined(TARGET_NR_ppoll)

#ifndef __NR_ppoll

# define __NR_ppoll -1

#endif

#define __NR_sys_ppoll __NR_ppoll

_syscall5(int, sys_ppoll, struct pollfd *, fds, nfds_t, nfds,

          struct timespec *, timeout, const __sigset_t *, sigmask,

          size_t, sigsetsize)

#endif

#if defined(TARGET_NR_pselect6)

#ifndef __NR_pselect6

# define __NR_pselect6 -1

#endif

#define __NR_sys_pselect6 __NR_pselect6

_syscall6(int, sys_pselect6, int, nfds, fd_set *, readfds, fd_set *, writefds,

          fd_set *, exceptfds, struct timespec *, timeout, void *, sig);

#endif

#if defined(TARGET_NR_prlimit64)

#ifndef __NR_prlimit64

# define __NR_prlimit64 -1

#endif

#define __NR_sys_prlimit64 __NR_prlimit64

/* The glibc rlimit structure may not be that used by the underlying syscall */

struct host_rlimit64 {

    uint64_t rlim_cur;

    uint64_t rlim_max;

};

_syscall4(int, sys_prlimit64, pid_t, pid, int, resource,

          const struct host_rlimit64 *, new_limit,

          struct host_rlimit64 *, old_limit)

#endif

extern int personality(int);

extern int flock(int, int);

extern int setfsuid(int);

extern int setfsgid(int);

extern int setgroups(int, gid_t *);

#define ERRNO_TABLE_SIZE 1200

/* target_to_host_errno_table[] is initialized from

 * host_to_target_errno_table[] in syscall_init(). */

static uint16_t target_to_host_errno_table[ERRNO_TABLE_SIZE] = {

};

/*

 * This list is the union of errno values overridden in asm-<arch>/errno.h

 * minus the errnos that are not actually generic to all archs.

 */

static uint16_t host_to_target_errno_table[ERRNO_TABLE_SIZE] = {

    [EIDRM]                = TARGET_EIDRM,

    [ECHRNG]                = TARGET_ECHRNG,

    [EL2NSYNC]                = TARGET_EL2NSYNC,

    [EL3HLT]                = TARGET_EL3HLT,

    [EL3RST]                = TARGET_EL3RST,

    [ELNRNG]                = TARGET_ELNRNG,

    [EUNATCH]                = TARGET_EUNATCH,

    [ENOCSI]                = TARGET_ENOCSI,

    [EL2HLT]                = TARGET_EL2HLT,

    [EDEADLK]                = TARGET_EDEADLK,

    [ENOLCK]                = TARGET_ENOLCK,

    [EBADE]                = TARGET_EBADE,

    [EBADR]                = TARGET_EBADR,

    [EXFULL]                = TARGET_EXFULL,

    [ENOANO]                = TARGET_ENOANO,

    [EBADRQC]                = TARGET_EBADRQC,

    [EBADSLT]                = TARGET_EBADSLT,

    [EBFONT]                = TARGET_EBFONT,

    [ENOSTR]                = TARGET_ENOSTR,

    [ENODATA]                = TARGET_ENODATA,

    [ETIME]                = TARGET_ETIME,

    [ENOSR]                = TARGET_ENOSR,

    [ENONET]                = TARGET_ENONET,

    [ENOPKG]                = TARGET_ENOPKG,

    [EREMOTE]                = TARGET_EREMOTE,

    [ENOLINK]                = TARGET_ENOLINK,

    [EADV]                = TARGET_EADV,

    [ESRMNT]                = TARGET_ESRMNT,

    [ECOMM]                = TARGET_ECOMM,

    [EPROTO]                = TARGET_EPROTO,

    [EDOTDOT]                = TARGET_EDOTDOT,

    [EMULTIHOP]                = TARGET_EMULTIHOP,

    [EBADMSG]                = TARGET_EBADMSG,

    [ENAMETOOLONG]        = TARGET_ENAMETOOLONG,

    [EOVERFLOW]                = TARGET_EOVERFLOW,

    [ENOTUNIQ]                = TARGET_ENOTUNIQ,

    [EBADFD]                = TARGET_EBADFD,

    [EREMCHG]                = TARGET_EREMCHG,

    [ELIBACC]                = TARGET_ELIBACC,

    [ELIBBAD]                = TARGET_ELIBBAD,

    [ELIBSCN]                = TARGET_ELIBSCN,

    [ELIBMAX]                = TARGET_ELIBMAX,

    [ELIBEXEC]                = TARGET_ELIBEXEC,

    [EILSEQ]                = TARGET_EILSEQ,

    [ENOSYS]                = TARGET_ENOSYS,

    [ELOOP]                = TARGET_ELOOP,

    [ERESTART]                = TARGET_ERESTART,

    [ESTRPIPE]                = TARGET_ESTRPIPE,

    [ENOTEMPTY]                = TARGET_ENOTEMPTY,

    [EUSERS]                = TARGET_EUSERS,

    [ENOTSOCK]                = TARGET_ENOTSOCK,

    [EDESTADDRREQ]        = TARGET_EDESTADDRREQ,

    [EMSGSIZE]                = TARGET_EMSGSIZE,

    [EPROTOTYPE]        = TARGET_EPROTOTYPE,

    [ENOPROTOOPT]        = TARGET_ENOPROTOOPT,

    [EPROTONOSUPPORT]        = TARGET_EPROTONOSUPPORT,

    [ESOCKTNOSUPPORT]        = TARGET_ESOCKTNOSUPPORT,

    [EOPNOTSUPP]        = TARGET_EOPNOTSUPP,

    [EPFNOSUPPORT]        = TARGET_EPFNOSUPPORT,

    [EAFNOSUPPORT]        = TARGET_EAFNOSUPPORT,

    [EADDRINUSE]        = TARGET_EADDRINUSE,

    [EADDRNOTAVAIL]        = TARGET_EADDRNOTAVAIL,

    [ENETDOWN]                = TARGET_ENETDOWN,

    [ENETUNREACH]        = TARGET_ENETUNREACH,

    [ENETRESET]                = TARGET_ENETRESET,

    [ECONNABORTED]        = TARGET_ECONNABORTED,

    [ECONNRESET]        = TARGET_ECONNRESET,

    [ENOBUFS]                = TARGET_ENOBUFS,

    [EISCONN]                = TARGET_EISCONN,

    [ENOTCONN]                = TARGET_ENOTCONN,

    [EUCLEAN]                = TARGET_EUCLEAN,

    [ENOTNAM]                = TARGET_ENOTNAM,

    [ENAVAIL]                = TARGET_ENAVAIL,

    [EISNAM]                = TARGET_EISNAM,

    [EREMOTEIO]                = TARGET_EREMOTEIO,

    [ESHUTDOWN]                = TARGET_ESHUTDOWN,

    [ETOOMANYREFS]        = TARGET_ETOOMANYREFS,

    [ETIMEDOUT]                = TARGET_ETIMEDOUT,

    [ECONNREFUSED]        = TARGET_ECONNREFUSED,

    [EHOSTDOWN]                = TARGET_EHOSTDOWN,

    [EHOSTUNREACH]        = TARGET_EHOSTUNREACH,

    [EALREADY]                = TARGET_EALREADY,

    [EINPROGRESS]        = TARGET_EINPROGRESS,

    [ESTALE]                = TARGET_ESTALE,

    [ECANCELED]                = TARGET_ECANCELED,

    [ENOMEDIUM]                = TARGET_ENOMEDIUM,

    [EMEDIUMTYPE]        = TARGET_EMEDIUMTYPE,

#ifdef ENOKEY

    [ENOKEY]                = TARGET_ENOKEY,

#endif

#ifdef EKEYEXPIRED

    [EKEYEXPIRED]        = TARGET_EKEYEXPIRED,

#endif

#ifdef EKEYREVOKED

    [EKEYREVOKED]        = TARGET_EKEYREVOKED,

#endif

#ifdef EKEYREJECTED

    [EKEYREJECTED]        = TARGET_EKEYREJECTED,

#endif

#ifdef EOWNERDEAD

    [EOWNERDEAD]        = TARGET_EOWNERDEAD,

#endif

#ifdef ENOTRECOVERABLE

    [ENOTRECOVERABLE]        = TARGET_ENOTRECOVERABLE,

#endif

};

static inline int host_to_target_errno(int err)

{

    if(host_to_target_errno_table[err])

        return host_to_target_errno_table[err];

    return err;

}

static inline int target_to_host_errno(int err)

{

    if (target_to_host_errno_table[err])

        return target_to_host_errno_table[err];

    return err;

}

static inline abi_long get_errno(abi_long ret)

{

    if (ret == -1)

        return -host_to_target_errno(errno);

    else

        return ret;

}

static inline int is_error(abi_long ret)

{

    return (abi_ulong)ret >= (abi_ulong)(-4096);

}

char *target_strerror(int err)

{

    return strerror(target_to_host_errno(err));

}

static abi_ulong target_brk;

static abi_ulong target_original_brk;

static abi_ulong brk_page;

void target_set_brk(abi_ulong new_brk)

{

    target_original_brk = target_brk = HOST_PAGE_ALIGN(new_brk);

    brk_page = HOST_PAGE_ALIGN(target_brk);

}

//#define DEBUGF_BRK(message, args...) do { fprintf(stderr, (message), ## args); } while (0)

#define DEBUGF_BRK(message, args...)

/* do_brk() must return target values and target errnos. */

abi_long do_brk(abi_ulong new_brk)

{

    abi_long mapped_addr;

    int        new_alloc_size;

    DEBUGF_BRK("do_brk(%#010x) -> ", new_brk);

    if (!new_brk) {

        DEBUGF_BRK("%#010x (!new_brk)\n", target_brk);

        return target_brk;

    }

    if (new_brk < target_original_brk) {

        DEBUGF_BRK("%#010x (new_brk < target_original_brk)\n", target_brk);

        return target_brk;

    }

    /* If the new brk is less than the highest page reserved to the

     * target heap allocation, set it and we're almost done...  */

    if (new_brk <= brk_page) {

        /* Heap contents are initialized to zero, as for anonymous

         * mapped pages.  */

        if (new_brk > target_brk) {

            memset(g2h(target_brk), 0, new_brk - target_brk);

        }

        target_brk = new_brk;

        DEBUGF_BRK("%#010x (new_brk <= brk_page)\n", target_brk);

            return target_brk;

    }

    /* We need to allocate more memory after the brk... Note that

     * we don't use MAP_FIXED because that will map over the top of

     * any existing mapping (like the one with the host libc or qemu

     * itself); instead we treat "mapped but at wrong address" as

     * a failure and unmap again.

     */

    new_alloc_size = HOST_PAGE_ALIGN(new_brk - brk_page);

    mapped_addr = get_errno(target_mmap(brk_page, new_alloc_size,

                                        PROT_READ|PROT_WRITE,

                                        MAP_ANON|MAP_PRIVATE, 0, 0));

    if (mapped_addr == brk_page) {

        target_brk = new_brk;

        brk_page = HOST_PAGE_ALIGN(target_brk);

        DEBUGF_BRK("%#010x (mapped_addr == brk_page)\n", target_brk);

        return target_brk;

    } else if (mapped_addr != -1) {

        /* Mapped but at wrong address, meaning there wasn't actually

         * enough space for this brk.

         */

        target_munmap(mapped_addr, new_alloc_size);

        mapped_addr = -1;

        DEBUGF_BRK("%#010x (mapped_addr != -1)\n", target_brk);

    }

    else {

        DEBUGF_BRK("%#010x (otherwise)\n", target_brk);

    }

#if defined(TARGET_ALPHA)

    /* We (partially) emulate OSF/1 on Alpha, which requires we

       return a proper errno, not an unchanged brk value.  */

    return -TARGET_ENOMEM;

#endif

    /* For everything else, return the previous break. */

    return target_brk;

}

static inline abi_long copy_from_user_fdset(fd_set *fds,

                                            abi_ulong target_fds_addr,

                                            int n)

{

    int i, nw, j, k;

    abi_ulong b, *target_fds;

    nw = (n + TARGET_ABI_BITS - 1) / TARGET_ABI_BITS;

    if (!(target_fds = lock_user(VERIFY_READ,

                                 target_fds_addr,

                                 sizeof(abi_ulong) * nw,

                                 1)))

        return -TARGET_EFAULT;

    FD_ZERO(fds);

    k = 0;

    for (i = 0; i < nw; i++) {

        /* grab the abi_ulong */

        __get_user(b, &target_fds[i]);

        for (j = 0; j < TARGET_ABI_BITS; j++) {

            /* check the bit inside the abi_ulong */

            if ((b >> j) & 1)

                FD_SET(k, fds);

            k++;

        }

    }

    unlock_user(target_fds, target_fds_addr, 0);

    return 0;

}

static inline abi_ulong copy_from_user_fdset_ptr(fd_set *fds, fd_set **fds_ptr,

                                                 abi_ulong target_fds_addr,

                                                 int n)

{

    if (target_fds_addr) {

        if (copy_from_user_fdset(fds, target_fds_addr, n))

            return -TARGET_EFAULT;

        *fds_ptr = fds;

    } else {

        *fds_ptr = NULL;

    }

    return 0;

}

static inline abi_long copy_to_user_fdset(abi_ulong target_fds_addr,

                                          const fd_set *fds,

                                          int n)

{

    int i, nw, j, k;

    abi_long v;

    abi_ulong *target_fds;

    nw = (n + TARGET_ABI_BITS - 1) / TARGET_ABI_BITS;

    if (!(target_fds = lock_user(VERIFY_WRITE,

                                 target_fds_addr,

                                 sizeof(abi_ulong) * nw,

                                 0)))

        return -TARGET_EFAULT;

    k = 0;

    for (i = 0; i < nw; i++) {