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

#ifdef CONFIG_ATTR

#include "qemu-xattr.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/dm-ioctl.h>

#include "linux_loop.h"

#include "cpu-uname.h"

#include "qemu.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);

_syscall4(int, reboot, int, magic1, int, magic2, unsigned int, cmd,

          void *, arg);

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, mode_t mode)

{

  /*

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

   * flag O_CREAT.

   */

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

      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 *);

/* ARM EABI and MIPS expect 64bit types aligned even on pairs or registers */

#ifdef TARGET_ARM 

static inline int regpairs_aligned(void *cpu_env) {

    return ((((CPUARMState *)cpu_env)->eabi) == 1) ;

}

#elif defined(TARGET_MIPS)

static inline int regpairs_aligned(void *cpu_env) { return 1; }

#else

static inline int regpairs_aligned(void *cpu_env) { return 0; }

#endif

#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)

{

    if ((err >= ERRNO_TABLE_SIZE) || (err < 0)) {

        return NULL;

    }

    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(" TARGET_ABI_FMT_lx ") -> ", new_brk);

    if (!new_brk) {

        DEBUGF_BRK(TARGET_ABI_FMT_lx " (!new_brk)\n", target_brk);

        return target_brk;

    }

    if (new_brk < target_original_brk) {

        DEBUGF_BRK(TARGET_ABI_FMT_lx " (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(TARGET_ABI_FMT_lx " (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) {

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

         * mapped pages.  Technically the new pages are already

         * initialized to zero since they *are* anonymous mapped

         * pages, however we have to take care with the contents that

         * come from the remaining part of the previous page: it may

         * contains garbage data due to a previous heap usage (grown

         * then shrunken).  */

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

        target_brk = new_brk;

        brk_page = HOST_PAGE_ALIGN(target_brk);

        DEBUGF_BRK(TARGET_ABI_FMT_lx " (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(TARGET_ABI_FMT_lx " (mapped_addr != -1)\n", target_brk);

    }

    else {

        DEBUGF_BRK(TARGET_ABI_FMT_lx " (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++) {

        v = 0;

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

            v |= ((FD_ISSET(k, fds) != 0) << j);

            k++;

        }

        __put_user(v, &target_fds[i]);

    }

    unlock_user(target_fds, target_fds_addr, sizeof(abi_ulong) * nw);

    return 0;

}

#if defined(__alpha__)

#define HOST_HZ 1024

#else

#define HOST_HZ 100

#endif

static inline abi_long host_to_target_clock_t(long ticks)

{

#if HOST_HZ == TARGET_HZ

    return ticks;

#else

    return ((int64_t)ticks * TARGET_HZ) / HOST_HZ;

#endif

}

static inline abi_long host_to_target_rusage(abi_ulong target_addr,

                                             const struct rusage *rusage)

{

    struct target_rusage *target_rusage;

    if (!lock_user_struct(VERIFY_WRITE, target_rusage, target_addr, 0))

        return -TARGET_EFAULT;

    target_rusage->ru_utime.tv_sec = tswapal(rusage->ru_utime.tv_sec);

    target_rusage->ru_utime.tv_usec = tswapal(rusage->ru_utime.tv_usec);

    target_rusage->ru_stime.tv_sec = tswapal(rusage->ru_stime.tv_sec);

    target_rusage->ru_stime.tv_usec = tswapal(rusage->ru_stime.tv_usec);

    target_rusage->ru_maxrss = tswapal(rusage->ru_maxrss);

    target_rusage->ru_ixrss = tswapal(rusage->ru_ixrss);

    target_rusage->ru_idrss = tswapal(rusage->ru_idrss);

    target_rusage->ru_isrss = tswapal(rusage->ru_isrss);

    target_rusage->ru_minflt = tswapal(rusage->ru_minflt);

    target_rusage->ru_majflt = tswapal(rusage->ru_majflt);

    target_rusage->ru_nswap = tswapal(rusage->ru_nswap);

    target_rusage->ru_inblock = tswapal(rusage->ru_inblock);

    target_rusage->ru_oublock = tswapal(rusage->ru_oublock);

    target_rusage->ru_msgsnd = tswapal(rusage->ru_msgsnd);

    target_rusage->ru_msgrcv = tswapal(rusage->ru_msgrcv);

    target_rusage->ru_nsignals = tswapal(rusage->ru_nsignals);

    target_rusage->ru_nvcsw = tswapal(rusage->ru_nvcsw);

    target_rusage->ru_nivcsw = tswapal(rusage->ru_nivcsw);

    unlock_user_struct(target_rusage, target_addr, 1);

    return 0;

}

static inline rlim_t target_to_host_rlim(abi_ulong target_rlim)

{

    abi_ulong target_rlim_swap;

    rlim_t result;

    target_rlim_swap = tswapal(target_rlim);

    if (target_rlim_swap == TARGET_RLIM_INFINITY)

        return RLIM_INFINITY;

    result = target_rlim_swap;

    if (target_rlim_swap != (rlim_t)result)

        return RLIM_INFINITY;

    return result;

}

static inline abi_ulong host_to_target_rlim(rlim_t rlim)

{

    abi_ulong target_rlim_swap;

    abi_ulong result;

    if (rlim == RLIM_INFINITY || rlim != (abi_long)rlim)

        target_rlim_swap = TARGET_RLIM_INFINITY;

    else

        target_rlim_swap = rlim;

    result = tswapal(target_rlim_swap);

    return result;

}

static inline int target_to_host_resource(int code)

{

    switch (code) {

    case TARGET_RLIMIT_AS:

        return RLIMIT_AS;

    case TARGET_RLIMIT_CORE:

        return RLIMIT_CORE;

    case TARGET_RLIMIT_CPU:

        return RLIMIT_CPU;

    case TARGET_RLIMIT_DATA:

        return RLIMIT_DATA;

    case TARGET_RLIMIT_FSIZE:

        return RLIMIT_FSIZE;

    case TARGET_RLIMIT_LOCKS:

        return RLIMIT_LOCKS;

    case TARGET_RLIMIT_MEMLOCK:

        return RLIMIT_MEMLOCK;

    case TARGET_RLIMIT_MSGQUEUE:

        return RLIMIT_MSGQUEUE;

    case TARGET_RLIMIT_NICE:

        return RLIMIT_NICE;

    case TARGET_RLIMIT_NOFILE:

        return RLIMIT_NOFILE;

    case TARGET_RLIMIT_NPROC:

        return RLIMIT_NPROC;

    case TARGET_RLIMIT_RSS:

        return RLIMIT_RSS;

    case TARGET_RLIMIT_RTPRIO:

        return RLIMIT_RTPRIO;

    case TARGET_RLIMIT_SIGPENDING:

        return RLIMIT_SIGPENDING;

    case TARGET_RLIMIT_STACK:

        return RLIMIT_STACK;

    default:

        return code;

    }

}

static inline abi_long copy_from_user_timeval(struct timeval *tv,

                                              abi_ulong target_tv_addr)

{

    struct target_timeval *target_tv;

    if (!lock_user_struct(VERIFY_READ, target_tv, target_tv_addr, 1))

        return -TARGET_EFAULT;

    __get_user(tv->tv_sec, &target_tv->tv_sec);

    __get_user(tv->tv_usec, &target_tv->tv_usec);

    unlock_user_struct(target_tv, target_tv_addr, 0);

    return 0;

}

static inline abi_long copy_to_user_timeval(abi_ulong target_tv_addr,

                                            const struct timeval *tv)

{

    struct target_timeval *target_tv;

    if (!lock_user_struct(VERIFY_WRITE, target_tv, target_tv_addr, 0))

        return -TARGET_EFAULT;

    __put_user(tv->tv_sec, &target_tv->tv_sec);

    __put_user(tv->tv_usec, &target_tv->tv_usec);

    unlock_user_struct(target_tv, target_tv_addr, 1);

    return 0;

}

#if defined(TARGET_NR_mq_open) && defined(__NR_mq_open)

#include <mqueue.h>

static inline abi_long copy_from_user_mq_attr(struct mq_attr *attr,

                                              abi_ulong target_mq_attr_addr)

{

    struct target_mq_attr *target_mq_attr;

    if (!lock_user_struct(VERIFY_READ, target_mq_attr,

                          target_mq_attr_addr, 1))

        return -TARGET_EFAULT;

    __get_user(attr->mq_flags, &target_mq_attr->mq_flags);

    __get_user(attr->mq_maxmsg, &target_mq_attr->mq_maxmsg);

    __get_user(attr->mq_msgsize, &target_mq_attr->mq_msgsize);

    __get_user(attr->mq_curmsgs, &target_mq_attr->mq_curmsgs);

    unlock_user_struct(target_mq_attr, target_mq_attr_addr, 0);

    return 0;

}

static inline abi_long copy_to_user_mq_attr(abi_ulong target_mq_attr_addr,

                                            const struct mq_attr *attr)

{

    struct target_mq_attr *target_mq_attr;

    if (!lock_user_struct(VERIFY_WRITE, target_mq_attr,

                          target_mq_attr_addr, 0))

        return -TARGET_EFAULT;

    __put_user(attr->mq_flags, &target_mq_attr->mq_flags);

    __put_user(attr->mq_maxmsg, &target_mq_attr->mq_maxmsg);

    __put_user(attr->mq_msgsize, &target_mq_attr->mq_msgsize);

    __put_user(attr->mq_curmsgs, &target_mq_attr->mq_curmsgs);

    unlock_user_struct(target_mq_attr, target_mq_attr_addr, 1);

    return 0;

}

#endif

#if defined(TARGET_NR_select) || defined(TARGET_NR__newselect)

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

static abi_long do_select(int n,

                          abi_ulong rfd_addr, abi_ulong wfd_addr,

                          abi_ulong efd_addr, abi_ulong target_tv_addr)

{

    fd_set rfds, wfds, efds;

    fd_set *rfds_ptr, *wfds_ptr, *efds_ptr;

    struct timeval tv, *tv_ptr;

    abi_long ret;

    ret = copy_from_user_fdset_ptr(&rfds, &rfds_ptr, rfd_addr, n);

    if (ret) {

        return ret;

    }

    ret = copy_from_user_fdset_ptr(&wfds, &wfds_ptr, wfd_addr, n);

    if (ret) {

        return ret;

    }

    ret = copy_from_user_fdset_ptr(&efds, &efds_ptr, efd_addr, n);

    if (ret) {

        return ret;

    }

    if (target_tv_addr) {

        if (copy_from_user_timeval(&tv, target_tv_addr))

            return -TARGET_EFAULT;

        tv_ptr = &tv;

    } else {

        tv_ptr = NULL;

    }

    ret = get_errno(select(n, rfds_ptr, wfds_ptr, efds_ptr, tv_ptr));

    if (!is_error(ret)) {

        if (rfd_addr && copy_to_user_fdset(rfd_addr, &rfds, n))

            return -TARGET_EFAULT;

        if (wfd_addr && copy_to_user_fdset(wfd_addr, &wfds, n))

            return -TARGET_EFAULT;

        if (efd_addr && copy_to_user_fdset(efd_addr, &efds, n))

            return -TARGET_EFAULT;

        if (target_tv_addr && copy_to_user_timeval(target_tv_addr, &tv))

            return -TARGET_EFAULT;

    }

    return ret;

}

#endif

static abi_long do_pipe2(int host_pipe[], int flags)

{

#ifdef CONFIG_PIPE2

    return pipe2(host_pipe, flags);

#else

    return -ENOSYS;

#endif

}

static abi_long do_pipe(void *cpu_env, abi_ulong pipedes,

                        int flags, int is_pipe2)

{

    int host_pipe[2];

    abi_long ret;

    ret = flags ? do_pipe2(host_pipe, flags) : pipe(host_pipe);

    if (is_error(ret))

        return get_errno(ret);

    /* Several targets have special calling conventions for the original

       pipe syscall, but didn't replicate this into the pipe2 syscall.  */

    if (!is_pipe2) {

#if defined(TARGET_ALPHA)

        ((CPUAlphaState *)cpu_env)->ir[IR_A4] = host_pipe[1];

        return host_pipe[0];

#elif defined(TARGET_MIPS)

        ((CPUMIPSState*)cpu_env)->active_tc.gpr[3] = host_pipe[1];

        return host_pipe[0];

#elif defined(TARGET_SH4)

        ((CPUSH4State*)cpu_env)->gregs[1] = host_pipe[1];

        return host_pipe[0];

#endif

    }

    if (put_user_s32(host_pipe[0], pipedes)

        || put_user_s32(host_pipe[1], pipedes + sizeof(host_pipe[0])))

        return -TARGET_EFAULT;

    return get_errno(ret);

}

static inline abi_long target_to_host_ip_mreq(struct ip_mreqn *mreqn,

                                              abi_ulong target_addr,

                                              socklen_t len)

{

    struct target_ip_mreqn *target_smreqn;

    target_smreqn = lock_user(VERIFY_READ, target_addr, len, 1);

    if (!target_smreqn)

        return -TARGET_EFAULT;

    mreqn->imr_multiaddr.s_addr = target_smreqn->imr_multiaddr.s_addr;

    mreqn->imr_address.s_addr = target_smreqn->imr_address.s_addr;

    if (len == sizeof(struct target_ip_mreqn))

        mreqn->imr_ifindex = tswapal(target_smreqn->imr_ifindex);

    unlock_user(target_smreqn, target_addr, 0);

    return 0;

}

static inline abi_long target_to_host_sockaddr(struct sockaddr *addr,

                                               abi_ulong target_addr,

                                               socklen_t len)

{

    const socklen_t unix_maxlen = sizeof (struct sockaddr_un);

    sa_family_t sa_family;

    struct target_sockaddr *target_saddr;

    target_saddr = lock_user(VERIFY_READ, target_addr, len, 1);

    if (!target_saddr)

        return -TARGET_EFAULT;

    sa_family = tswap16(target_saddr->sa_family);

    /* Oops. The caller might send a incomplete sun_path; sun_path

     * must be terminated by \0 (see the manual page), but

     * unfortunately it is quite common to specify sockaddr_un

     * length as "strlen(x->sun_path)" while it should be

     * "strlen(...) + 1". We'll fix that here if needed.

     * Linux kernel has a similar feature.

     */

    if (sa_family == AF_UNIX) {

        if (len < unix_maxlen && len > 0) {

            char *cp = (char*)target_saddr;

            if ( cp[len-1] && !cp[len] )

                len++;

        }

        if (len > unix_maxlen)

            len = unix_maxlen;

    }

    memcpy(addr, target_saddr, len);

    addr->sa_family = sa_family;

    unlock_user(target_saddr, target_addr, 0);

    return 0;

}

static inline abi_long host_to_target_sockaddr(abi_ulong target_addr,

                                               struct sockaddr *addr,

                                               socklen_t len)

{

    struct target_sockaddr *target_saddr;

    target_saddr = lock_user(VERIFY_WRITE, target_addr, len, 0);

    if (!target_saddr)

        return -TARGET_EFAULT;

    memcpy(target_saddr, addr, len);

    target_saddr->sa_family = tswap16(addr->sa_family);

    unlock_user(target_saddr, target_addr, len);

    return 0;

}

/* ??? Should this also swap msgh->name?  */

static inline abi_long target_to_host_cmsg(struct msghdr *msgh,

                                           struct target_msghdr *target_msgh)

{

    struct cmsghdr *cmsg = CMSG_FIRSTHDR(msgh);

    abi_long msg_controllen;

    abi_ulong target_cmsg_addr;

    struct target_cmsghdr *target_cmsg;

    socklen_t space = 0;

    msg_controllen = tswapal(target_msgh->msg_controllen);

    if (msg_controllen < sizeof (struct target_cmsghdr)) 

        goto the_end;

    target_cmsg_addr = tswapal(target_msgh->msg_control);

    target_cmsg = lock_user(VERIFY_READ, target_cmsg_addr, msg_controllen, 1);

    if (!target_cmsg)

        return -TARGET_EFAULT;

    while (cmsg && target_cmsg) {

        void *data = CMSG_DATA(cmsg);

        void *target_data = TARGET_CMSG_DATA(target_cmsg);

        int len = tswapal(target_cmsg->cmsg_len)

                  - TARGET_CMSG_ALIGN(sizeof (struct target_cmsghdr));

        space += CMSG_SPACE(len);

        if (space > msgh->msg_controllen) {

            space -= CMSG_SPACE(len);

            gemu_log("Host cmsg overflow\n");

            break;

        }

        cmsg->cmsg_level = tswap32(target_cmsg->cmsg_level);

        cmsg->cmsg_type = tswap32(target_cmsg->cmsg_type);

        cmsg->cmsg_len = CMSG_LEN(len);

        if (cmsg->cmsg_level != TARGET_SOL_SOCKET || cmsg->cmsg_type != SCM_RIGHTS) {

            gemu_log("Unsupported ancillary data: %d/%d\n", cmsg->cmsg_level, cmsg->cmsg_type);

            memcpy(data, target_data, len);

        } else {

            int *fd = (int *)data;

            int *target_fd = (int *)target_data;

            int i, numfds = len / sizeof(int);

            for (i = 0; i < numfds; i++)

                fd[i] = tswap32(target_fd[i]);

        }

        cmsg = CMSG_NXTHDR(msgh, cmsg);

        target_cmsg = TARGET_CMSG_NXTHDR(target_msgh, target_cmsg);

    }

    unlock_user(target_cmsg, target_cmsg_addr, 0);

 the_end:

    msgh->msg_controllen = space;

    return 0;

}

/* ??? Should this also swap msgh->name?  */

static inline abi_long host_to_target_cmsg(struct target_msghdr *target_msgh,

                                           struct msghdr *msgh)

{

    struct cmsghdr *cmsg = CMSG_FIRSTHDR(msgh);

    abi_long msg_controllen;

    abi_ulong target_cmsg_addr;

    struct target_cmsghdr *target_cmsg;

    socklen_t space = 0;

    msg_controllen = tswapal(target_msgh->msg_controllen);

    if (msg_controllen < sizeof (struct target_cmsghdr)) 

        goto the_end;

    target_cmsg_addr = tswapal(target_msgh->msg_control);

    target_cmsg = lock_user(VERIFY_WRITE, target_cmsg_addr, msg_controllen, 0);