git.maemo.org Git - qemu/blob - linux-user/syscall.c

   1 /*
   2  *  Linux syscalls
   3  *
   4  *  Copyright (c) 2003 Fabrice Bellard
   5  *
   6  *  This program is free software; you can redistribute it and/or modify
   7  *  it under the terms of the GNU General Public License as published by
   8  *  the Free Software Foundation; either version 2 of the License, or
   9  *  (at your option) any later version.
  10  *
  11  *  This program is distributed in the hope that it will be useful,
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  *  GNU General Public License for more details.
  15  *
  16  *  You should have received a copy of the GNU General Public License
  17  *  along with this program; if not, write to the Free Software
  18  *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  19  */
  20 #include <stdlib.h>
  21 #include <stdio.h>
  22 #include <stdarg.h>
  23 #include <string.h>
  24 #include <elf.h>
  25 #include <endian.h>
  26 #include <errno.h>
  27 #include <unistd.h>
  28 #include <fcntl.h>
  29 #include <time.h>
  30 #include <sys/types.h>
  31 #include <sys/wait.h>
  32 #include <sys/time.h>
  33 #include <sys/stat.h>
  34 #include <sys/mount.h>
  35 #include <sys/resource.h>
  36 #include <sys/mman.h>
  37 #include <sys/swap.h>
  38 #include <signal.h>
  39 #include <sched.h>
  40 #include <sys/socket.h>
  41 #include <sys/uio.h>
  42 #include <sys/poll.h>
  43 #include <sys/times.h>
  44 #include <utime.h>
  45 //#include <sys/user.h>
  46 #include <netinet/tcp.h>
  47
  48 #define termios host_termios
  49 #define winsize host_winsize
  50 #define termio host_termio
  51 #define sgttyb host_sgttyb /* same as target */
  52 #define tchars host_tchars /* same as target */
  53 #define ltchars host_ltchars /* same as target */
  54
  55 #include <linux/termios.h>
  56 #include <linux/unistd.h>
  57 #include <linux/utsname.h>
  58 #include <linux/cdrom.h>
  59 #include <linux/hdreg.h>
  60 #include <linux/soundcard.h>
  61 #include <linux/dirent.h>
  62 #include <linux/kd.h>
  63
  64 #include "qemu.h"
  65
  66 //#define DEBUG
  67
  68 #if defined(TARGET_I386) || defined(TARGET_ARM) || defined(TARGET_SPARC)
  69 /* 16 bit uid wrappers emulation */
  70 #define USE_UID16
  71 #endif
  72
  73 //#include <linux/msdos_fs.h>
  74 #define VFAT_IOCTL_READDIR_BOTH         _IOR('r', 1, struct dirent [2])
  75 #define VFAT_IOCTL_READDIR_SHORT        _IOR('r', 2, struct dirent [2])
  76
  77
  78 #if defined(__powerpc__)
  79 #undef __syscall_nr
  80 #undef __sc_loadargs_0
  81 #undef __sc_loadargs_1
  82 #undef __sc_loadargs_2
  83 #undef __sc_loadargs_3
  84 #undef __sc_loadargs_4
  85 #undef __sc_loadargs_5
  86 #undef __sc_asm_input_0
  87 #undef __sc_asm_input_1
  88 #undef __sc_asm_input_2
  89 #undef __sc_asm_input_3
  90 #undef __sc_asm_input_4
  91 #undef __sc_asm_input_5
  92 #undef _syscall0
  93 #undef _syscall1
  94 #undef _syscall2
  95 #undef _syscall3
  96 #undef _syscall4
  97 #undef _syscall5
  98
  99 /* need to redefine syscalls as Linux kernel defines are incorrect for
 100    the clobber list */
 101 /* On powerpc a system call basically clobbers the same registers like a
 102  * function call, with the exception of LR (which is needed for the
 103  * "sc; bnslr" sequence) and CR (where only CR0.SO is clobbered to signal
 104  * an error return status).
 105  */
 106
 107 #define __syscall_nr(nr, type, name, args...)                           \
 108         unsigned long __sc_ret, __sc_err;                               \
 109         {                                                               \
 110                 register unsigned long __sc_0  __asm__ ("r0");          \
 111                 register unsigned long __sc_3  __asm__ ("r3");          \
 112                 register unsigned long __sc_4  __asm__ ("r4");          \
 113                 register unsigned long __sc_5  __asm__ ("r5");          \
 114                 register unsigned long __sc_6  __asm__ ("r6");          \
 115                 register unsigned long __sc_7  __asm__ ("r7");          \
 116                                                                         \
 117                 __sc_loadargs_##nr(name, args);                         \
 118                 __asm__ __volatile__                                    \
 119                         ("sc           \n\t"                            \
 120                          "mfcr %0      "                                \
 121                         : "=&r" (__sc_0),                               \
 122                           "=&r" (__sc_3),  "=&r" (__sc_4),              \
 123                           "=&r" (__sc_5),  "=&r" (__sc_6),              \
 124                           "=&r" (__sc_7)                                \
 125                         : __sc_asm_input_##nr                           \
 126                         : "cr0", "ctr", "memory",                       \
 127                           "r8", "r9", "r10","r11", "r12");              \
 128                 __sc_ret = __sc_3;                                      \
 129                 __sc_err = __sc_0;                                      \
 130         }                                                               \
 131         if (__sc_err & 0x10000000)                                      \
 132         {                                                               \
 133                 errno = __sc_ret;                                       \
 134                 __sc_ret = -1;                                          \
 135         }                                                               \
 136         return (type) __sc_ret
 137
 138 #define __sc_loadargs_0(name, dummy...)                                 \
 139         __sc_0 = __NR_##name
 140 #define __sc_loadargs_1(name, arg1)                                     \
 141         __sc_loadargs_0(name);                                          \
 142         __sc_3 = (unsigned long) (arg1)
 143 #define __sc_loadargs_2(name, arg1, arg2)                               \
 144         __sc_loadargs_1(name, arg1);                                    \
 145         __sc_4 = (unsigned long) (arg2)
 146 #define __sc_loadargs_3(name, arg1, arg2, arg3)                         \
 147         __sc_loadargs_2(name, arg1, arg2);                              \
 148         __sc_5 = (unsigned long) (arg3)
 149 #define __sc_loadargs_4(name, arg1, arg2, arg3, arg4)                   \
 150         __sc_loadargs_3(name, arg1, arg2, arg3);                        \
 151         __sc_6 = (unsigned long) (arg4)
 152 #define __sc_loadargs_5(name, arg1, arg2, arg3, arg4, arg5)             \
 153         __sc_loadargs_4(name, arg1, arg2, arg3, arg4);                  \
 154         __sc_7 = (unsigned long) (arg5)
 155
 156 #define __sc_asm_input_0 "0" (__sc_0)
 157 #define __sc_asm_input_1 __sc_asm_input_0, "1" (__sc_3)
 158 #define __sc_asm_input_2 __sc_asm_input_1, "2" (__sc_4)
 159 #define __sc_asm_input_3 __sc_asm_input_2, "3" (__sc_5)
 160 #define __sc_asm_input_4 __sc_asm_input_3, "4" (__sc_6)
 161 #define __sc_asm_input_5 __sc_asm_input_4, "5" (__sc_7)
 162
 163 #define _syscall0(type,name)                                            \
 164 type name(void)                                                         \
 165 {                                                                       \
 166         __syscall_nr(0, type, name);                                    \
 167 }
 168
 169 #define _syscall1(type,name,type1,arg1)                                 \
 170 type name(type1 arg1)                                                   \
 171 {                                                                       \
 172         __syscall_nr(1, type, name, arg1);                              \
 173 }
 174
 175 #define _syscall2(type,name,type1,arg1,type2,arg2)                      \
 176 type name(type1 arg1, type2 arg2)                                       \
 177 {                                                                       \
 178         __syscall_nr(2, type, name, arg1, arg2);                        \
 179 }
 180
 181 #define _syscall3(type,name,type1,arg1,type2,arg2,type3,arg3)           \
 182 type name(type1 arg1, type2 arg2, type3 arg3)                           \
 183 {                                                                       \
 184         __syscall_nr(3, type, name, arg1, arg2, arg3);                  \
 185 }
 186
 187 #define _syscall4(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4) \
 188 type name(type1 arg1, type2 arg2, type3 arg3, type4 arg4)               \
 189 {                                                                       \
 190         __syscall_nr(4, type, name, arg1, arg2, arg3, arg4);            \
 191 }
 192
 193 #define _syscall5(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4,type5,arg5) \
 194 type name(type1 arg1, type2 arg2, type3 arg3, type4 arg4, type5 arg5)   \
 195 {                                                                       \
 196         __syscall_nr(5, type, name, arg1, arg2, arg3, arg4, arg5);      \
 197 }
 198 #endif
 199
 200 #define __NR_sys_uname __NR_uname
 201 #define __NR_sys_getcwd1 __NR_getcwd
 202 #define __NR_sys_statfs __NR_statfs
 203 #define __NR_sys_fstatfs __NR_fstatfs
 204 #define __NR_sys_getdents __NR_getdents
 205 #define __NR_sys_getdents64 __NR_getdents64
 206 #define __NR_sys_rt_sigqueueinfo __NR_rt_sigqueueinfo
 207
 208 #if defined(__alpha__) || defined (__ia64__)
 209 #define __NR__llseek __NR_lseek
 210 #endif
 211
 212 #ifdef __NR_gettid
 213 _syscall0(int, gettid)
 214 #else
 215 static int gettid(void) {
 216     return -ENOSYS;
 217 }
 218 #endif
 219 _syscall1(int,sys_uname,struct new_utsname *,buf)
 220 _syscall2(int,sys_getcwd1,char *,buf,size_t,size)
 221 _syscall3(int, sys_getdents, uint, fd, struct dirent *, dirp, uint, count);
 222 _syscall3(int, sys_getdents64, uint, fd, struct dirent64 *, dirp, uint, count);
 223 _syscall5(int, _llseek,  uint,  fd, ulong, hi, ulong, lo,
 224           loff_t *, res, uint, wh);
 225 _syscall2(int,sys_statfs,const char *,path,struct kernel_statfs *,buf)
 226 _syscall2(int,sys_fstatfs,int,fd,struct kernel_statfs *,buf)
 227 _syscall3(int,sys_rt_sigqueueinfo,int,pid,int,sig,siginfo_t *,uinfo)
 228 #ifdef __NR_exit_group
 229 _syscall1(int,exit_group,int,error_code)
 230 #endif
 231
 232 extern int personality(int);
 233 extern int flock(int, int);
 234 extern int setfsuid(int);
 235 extern int setfsgid(int);
 236 extern int setresuid(uid_t, uid_t, uid_t);
 237 extern int getresuid(uid_t *, uid_t *, uid_t *);
 238 extern int setresgid(gid_t, gid_t, gid_t);
 239 extern int getresgid(gid_t *, gid_t *, gid_t *);
 240 extern int setgroups(int, gid_t *);
 241
 242 static inline long get_errno(long ret)
 243 {
 244     if (ret == -1)
 245         return -errno;
 246     else
 247         return ret;
 248 }
 249
 250 static inline int is_error(long ret)
 251 {
 252     return (unsigned long)ret >= (unsigned long)(-4096);
 253 }
 254
 255 static char *target_brk;
 256 static char *target_original_brk;
 257
 258 void target_set_brk(char *new_brk)
 259 {
 260     target_brk = new_brk;
 261     target_original_brk = new_brk;
 262 }
 263
 264 static long do_brk(char *new_brk)
 265 {
 266     char *brk_page;
 267     long mapped_addr;
 268     int new_alloc_size;
 269
 270     if (!new_brk)
 271         return (long)target_brk;
 272     if (new_brk < target_original_brk)
 273         return -ENOMEM;
 274
 275     brk_page = (char *)HOST_PAGE_ALIGN((unsigned long)target_brk);
 276
 277     /* If the new brk is less than this, set it and we're done... */
 278     if (new_brk < brk_page) {
 279         target_brk = new_brk;
 280         return (long)target_brk;
 281     }
 282
 283     /* We need to allocate more memory after the brk... */
 284     new_alloc_size = HOST_PAGE_ALIGN(new_brk - brk_page + 1);
 285     mapped_addr = get_errno(target_mmap((unsigned long)brk_page, new_alloc_size,
 286                                         PROT_READ|PROT_WRITE,
 287                                         MAP_ANON|MAP_FIXED|MAP_PRIVATE, 0, 0));
 288     if (is_error(mapped_addr)) {
 289         return mapped_addr;
 290     } else {
 291         target_brk = new_brk;
 292         return (long)target_brk;
 293     }
 294 }
 295
 296 static inline fd_set *target_to_host_fds(fd_set *fds,
 297                                          target_long *target_fds, int n)
 298 {
 299 #if !defined(BSWAP_NEEDED) && !defined(WORDS_BIGENDIAN)
 300     return (fd_set *)target_fds;
 301 #else
 302     int i, b;
 303     if (target_fds) {
 304         FD_ZERO(fds);
 305         for(i = 0;i < n; i++) {
 306             b = (tswapl(target_fds[i / TARGET_LONG_BITS]) >>
 307                  (i & (TARGET_LONG_BITS - 1))) & 1;
 308             if (b)
 309                 FD_SET(i, fds);
 310         }
 311         return fds;
 312     } else {
 313         return NULL;
 314     }
 315 #endif
 316 }
 317
 318 static inline void host_to_target_fds(target_long *target_fds,
 319                                       fd_set *fds, int n)
 320 {
 321 #if !defined(BSWAP_NEEDED) && !defined(WORDS_BIGENDIAN)
 322     /* nothing to do */
 323 #else
 324     int i, nw, j, k;
 325     target_long v;
 326
 327     if (target_fds) {
 328         nw = n / TARGET_LONG_BITS;
 329         k = 0;
 330         for(i = 0;i < nw; i++) {
 331             v = 0;
 332             for(j = 0; j < TARGET_LONG_BITS; j++) {
 333                 v |= ((FD_ISSET(k, fds) != 0) << j);
 334                 k++;
 335             }
 336             target_fds[i] = tswapl(v);
 337         }
 338     }
 339 #endif
 340 }
 341
 342 #if defined(__alpha__)
 343 #define HOST_HZ 1024
 344 #else
 345 #define HOST_HZ 100
 346 #endif
 347
 348 static inline long host_to_target_clock_t(long ticks)
 349 {
 350 #if HOST_HZ == TARGET_HZ
 351     return ticks;
 352 #else
 353     return ((int64_t)ticks * TARGET_HZ) / HOST_HZ;
 354 #endif
 355 }
 356
 357 static inline void host_to_target_rusage(struct target_rusage *target_rusage,
 358                                          const struct rusage *rusage)
 359 {
 360     target_rusage->ru_utime.tv_sec = tswapl(rusage->ru_utime.tv_sec);
 361     target_rusage->ru_utime.tv_usec = tswapl(rusage->ru_utime.tv_usec);
 362     target_rusage->ru_stime.tv_sec = tswapl(rusage->ru_stime.tv_sec);
 363     target_rusage->ru_stime.tv_usec = tswapl(rusage->ru_stime.tv_usec);
 364     target_rusage->ru_maxrss = tswapl(rusage->ru_maxrss);
 365     target_rusage->ru_ixrss = tswapl(rusage->ru_ixrss);
 366     target_rusage->ru_idrss = tswapl(rusage->ru_idrss);
 367     target_rusage->ru_isrss = tswapl(rusage->ru_isrss);
 368     target_rusage->ru_minflt = tswapl(rusage->ru_minflt);
 369     target_rusage->ru_majflt = tswapl(rusage->ru_majflt);
 370     target_rusage->ru_nswap = tswapl(rusage->ru_nswap);
 371     target_rusage->ru_inblock = tswapl(rusage->ru_inblock);
 372     target_rusage->ru_oublock = tswapl(rusage->ru_oublock);
 373     target_rusage->ru_msgsnd = tswapl(rusage->ru_msgsnd);
 374     target_rusage->ru_msgrcv = tswapl(rusage->ru_msgrcv);
 375     target_rusage->ru_nsignals = tswapl(rusage->ru_nsignals);
 376     target_rusage->ru_nvcsw = tswapl(rusage->ru_nvcsw);
 377     target_rusage->ru_nivcsw = tswapl(rusage->ru_nivcsw);
 378 }
 379
 380 static inline void target_to_host_timeval(struct timeval *tv,
 381                                           const struct target_timeval *target_tv)
 382 {
 383     tv->tv_sec = tswapl(target_tv->tv_sec);
 384     tv->tv_usec = tswapl(target_tv->tv_usec);
 385 }
 386
 387 static inline void host_to_target_timeval(struct target_timeval *target_tv,
 388                                           const struct timeval *tv)
 389 {
 390     target_tv->tv_sec = tswapl(tv->tv_sec);
 391     target_tv->tv_usec = tswapl(tv->tv_usec);
 392 }
 393
 394
 395 static long do_select(long n,
 396                       target_long *target_rfds, target_long *target_wfds,
 397                       target_long *target_efds, struct target_timeval *target_tv)
 398 {
 399     fd_set rfds, wfds, efds;
 400     fd_set *rfds_ptr, *wfds_ptr, *efds_ptr;
 401     struct timeval tv, *tv_ptr;
 402     long ret;
 403
 404     rfds_ptr = target_to_host_fds(&rfds, target_rfds, n);
 405     wfds_ptr = target_to_host_fds(&wfds, target_wfds, n);
 406     efds_ptr = target_to_host_fds(&efds, target_efds, n);
 407
 408     if (target_tv) {
 409         target_to_host_timeval(&tv, target_tv);
 410         tv_ptr = &tv;
 411     } else {
 412         tv_ptr = NULL;
 413     }
 414     ret = get_errno(select(n, rfds_ptr, wfds_ptr, efds_ptr, tv_ptr));
 415     if (!is_error(ret)) {
 416         host_to_target_fds(target_rfds, rfds_ptr, n);
 417         host_to_target_fds(target_wfds, wfds_ptr, n);
 418         host_to_target_fds(target_efds, efds_ptr, n);
 419
 420         if (target_tv) {
 421             host_to_target_timeval(target_tv, &tv);
 422         }
 423     }
 424     return ret;
 425 }
 426
 427 static inline void target_to_host_sockaddr(struct sockaddr *addr,
 428                                            struct target_sockaddr *target_addr,
 429                                            socklen_t len)
 430 {
 431     memcpy(addr, target_addr, len);
 432     addr->sa_family = tswap16(target_addr->sa_family);
 433 }
 434
 435 static inline void host_to_target_sockaddr(struct target_sockaddr *target_addr,
 436                                            struct sockaddr *addr,
 437                                            socklen_t len)
 438 {
 439     memcpy(target_addr, addr, len);
 440     target_addr->sa_family = tswap16(addr->sa_family);
 441 }
 442
 443 static inline void target_to_host_cmsg(struct msghdr *msgh,
 444                                        struct target_msghdr *target_msgh)
 445 {
 446     struct cmsghdr *cmsg = CMSG_FIRSTHDR(msgh);
 447     struct target_cmsghdr *target_cmsg = TARGET_CMSG_FIRSTHDR(target_msgh);
 448     socklen_t space = 0;
 449
 450     while (cmsg && target_cmsg) {
 451         void *data = CMSG_DATA(cmsg);
 452         void *target_data = TARGET_CMSG_DATA(target_cmsg);
 453
 454         int len = tswapl(target_cmsg->cmsg_len)
 455                   - TARGET_CMSG_ALIGN(sizeof (struct target_cmsghdr));
 456
 457         space += CMSG_SPACE(len);
 458         if (space > msgh->msg_controllen) {
 459             space -= CMSG_SPACE(len);
 460             gemu_log("Host cmsg overflow");
 461             break;
 462         }
 463
 464         cmsg->cmsg_level = tswap32(target_cmsg->cmsg_level);
 465         cmsg->cmsg_type = tswap32(target_cmsg->cmsg_type);
 466         cmsg->cmsg_len = CMSG_LEN(len);
 467
 468         if (cmsg->cmsg_level != SOL_SOCKET || cmsg->cmsg_type != SCM_RIGHTS) {
 469             gemu_log("Unsupported ancillary data: %d/%d\n", cmsg->cmsg_level, cmsg->cmsg_type);
 470             memcpy(data, target_data, len);
 471         } else {
 472             int *fd = (int *)data;
 473             int *target_fd = (int *)target_data;
 474             int i, numfds = len / sizeof(int);
 475
 476             for (i = 0; i < numfds; i++)
 477                 fd[i] = tswap32(target_fd[i]);
 478         }
 479
 480         cmsg = CMSG_NXTHDR(msgh, cmsg);
 481         target_cmsg = TARGET_CMSG_NXTHDR(target_msgh, target_cmsg);
 482     }
 483
 484     msgh->msg_controllen = space;
 485 }
 486
 487 static inline void host_to_target_cmsg(struct target_msghdr *target_msgh,
 488                                        struct msghdr *msgh)
 489 {
 490     struct cmsghdr *cmsg = CMSG_FIRSTHDR(msgh);
 491     struct target_cmsghdr *target_cmsg = TARGET_CMSG_FIRSTHDR(target_msgh);
 492     socklen_t space = 0;
 493
 494     while (cmsg && target_cmsg) {
 495         void *data = CMSG_DATA(cmsg);
 496         void *target_data = TARGET_CMSG_DATA(target_cmsg);
 497
 498         int len = cmsg->cmsg_len - CMSG_ALIGN(sizeof (struct cmsghdr));
 499
 500         space += TARGET_CMSG_SPACE(len);
 501         if (space > tswapl(target_msgh->msg_controllen)) {
 502             space -= TARGET_CMSG_SPACE(len);
 503             gemu_log("Target cmsg overflow");
 504             break;
 505         }
 506
 507         target_cmsg->cmsg_level = tswap32(cmsg->cmsg_level);
 508         target_cmsg->cmsg_type = tswap32(cmsg->cmsg_type);
 509         target_cmsg->cmsg_len = tswapl(TARGET_CMSG_LEN(len));
 510
 511         if (cmsg->cmsg_level != SOL_SOCKET || cmsg->cmsg_type != SCM_RIGHTS) {
 512             gemu_log("Unsupported ancillary data: %d/%d\n", cmsg->cmsg_level, cmsg->cmsg_type);
 513             memcpy(target_data, data, len);
 514         } else {
 515             int *fd = (int *)data;
 516             int *target_fd = (int *)target_data;
 517             int i, numfds = len / sizeof(int);
 518
 519             for (i = 0; i < numfds; i++)
 520                 target_fd[i] = tswap32(fd[i]);
 521         }
 522
 523         cmsg = CMSG_NXTHDR(msgh, cmsg);
 524         target_cmsg = TARGET_CMSG_NXTHDR(target_msgh, target_cmsg);
 525     }
 526
 527     msgh->msg_controllen = tswapl(space);
 528 }
 529
 530 static long do_setsockopt(int sockfd, int level, int optname,
 531                           void *optval, socklen_t optlen)
 532 {
 533     if (level == SOL_TCP) {
 534         /* TCP options all take an 'int' value.  */
 535         int val;
 536
 537         if (optlen < sizeof(uint32_t))
 538             return -EINVAL;
 539
 540         val = tswap32(*(uint32_t *)optval);
 541         return get_errno(setsockopt(sockfd, level, optname, &val, sizeof(val)));
 542     }
 543
 544     else if (level != SOL_SOCKET) {
 545         gemu_log("Unsupported setsockopt level: %d\n", level);
 546         return -ENOSYS;
 547     }
 548
 549     switch (optname) {
 550     /* Options with 'int' argument.  */
 551     case SO_DEBUG:
 552     case SO_REUSEADDR:
 553     case SO_TYPE:
 554     case SO_ERROR:
 555     case SO_DONTROUTE:
 556     case SO_BROADCAST:
 557     case SO_SNDBUF:
 558     case SO_RCVBUF:
 559     case SO_KEEPALIVE:
 560     case SO_OOBINLINE:
 561     case SO_NO_CHECK:
 562     case SO_PRIORITY:
 563     case SO_BSDCOMPAT:
 564     case SO_PASSCRED:
 565     case SO_TIMESTAMP:
 566     case SO_RCVLOWAT:
 567     case SO_RCVTIMEO:
 568     case SO_SNDTIMEO:
 569     {
 570         int val;
 571         if (optlen < sizeof(uint32_t))
 572             return -EINVAL;
 573         val = tswap32(*(uint32_t *)optval);
 574         return get_errno(setsockopt(sockfd, level, optname, &val, sizeof(val)));
 575     }
 576
 577     default:
 578         gemu_log("Unsupported setsockopt SOL_SOCKET option: %d\n", optname);
 579         return -ENOSYS;
 580     }
 581 }
 582
 583 static long do_getsockopt(int sockfd, int level, int optname,
 584                           void *optval, socklen_t *optlen)
 585 {
 586     gemu_log("getsockopt not yet supported\n");
 587     return -ENOSYS;
 588 }
 589
 590 static long do_socketcall(int num, int32_t *vptr)
 591 {
 592     long ret;
 593
 594     switch(num) {
 595     case SOCKOP_socket:
 596         {
 597             int domain = tswap32(vptr[0]);
 598             int type = tswap32(vptr[1]);
 599             int protocol = tswap32(vptr[2]);
 600
 601             ret = get_errno(socket(domain, type, protocol));
 602         }
 603         break;
 604     case SOCKOP_bind:
 605         {
 606             int sockfd = tswap32(vptr[0]);
 607             void *target_addr = (void *)tswap32(vptr[1]);
 608             socklen_t addrlen = tswap32(vptr[2]);
 609             void *addr = alloca(addrlen);
 610
 611             target_to_host_sockaddr(addr, target_addr, addrlen);
 612             ret = get_errno(bind(sockfd, addr, addrlen));
 613         }
 614         break;
 615     case SOCKOP_connect:
 616         {
 617             int sockfd = tswap32(vptr[0]);
 618             void *target_addr = (void *)tswap32(vptr[1]);
 619             socklen_t addrlen = tswap32(vptr[2]);
 620             void *addr = alloca(addrlen);
 621
 622             target_to_host_sockaddr(addr, target_addr, addrlen);
 623             ret = get_errno(connect(sockfd, addr, addrlen));
 624         }
 625         break;
 626     case SOCKOP_listen:
 627         {
 628             int sockfd = tswap32(vptr[0]);
 629             int backlog = tswap32(vptr[1]);
 630
 631             ret = get_errno(listen(sockfd, backlog));
 632         }
 633         break;
 634     case SOCKOP_accept:
 635         {
 636             int sockfd = tswap32(vptr[0]);
 637             void *target_addr = (void *)tswap32(vptr[1]);
 638             uint32_t *target_addrlen = (void *)tswap32(vptr[2]);
 639             socklen_t addrlen = tswap32(*target_addrlen);
 640             void *addr = alloca(addrlen);
 641
 642             ret = get_errno(accept(sockfd, addr, &addrlen));
 643             if (!is_error(ret)) {
 644                 host_to_target_sockaddr(target_addr, addr, addrlen);
 645                 *target_addrlen = tswap32(addrlen);
 646             }
 647         }
 648         break;
 649     case SOCKOP_getsockname:
 650         {
 651             int sockfd = tswap32(vptr[0]);
 652             void *target_addr = (void *)tswap32(vptr[1]);
 653             uint32_t *target_addrlen = (void *)tswap32(vptr[2]);
 654             socklen_t addrlen = tswap32(*target_addrlen);
 655             void *addr = alloca(addrlen);
 656
 657             ret = get_errno(getsockname(sockfd, addr, &addrlen));
 658             if (!is_error(ret)) {
 659                 host_to_target_sockaddr(target_addr, addr, addrlen);
 660                 *target_addrlen = tswap32(addrlen);
 661             }
 662         }
 663         break;
 664     case SOCKOP_getpeername:
 665         {
 666             int sockfd = tswap32(vptr[0]);
 667             void *target_addr = (void *)tswap32(vptr[1]);
 668             uint32_t *target_addrlen = (void *)tswap32(vptr[2]);
 669             socklen_t addrlen = tswap32(*target_addrlen);
 670             void *addr = alloca(addrlen);
 671
 672             ret = get_errno(getpeername(sockfd, addr, &addrlen));
 673             if (!is_error(ret)) {
 674                 host_to_target_sockaddr(target_addr, addr, addrlen);
 675                 *target_addrlen = tswap32(addrlen);
 676             }
 677         }
 678         break;
 679     case SOCKOP_socketpair:
 680         {
 681             int domain = tswap32(vptr[0]);
 682             int type = tswap32(vptr[1]);
 683             int protocol = tswap32(vptr[2]);
 684             int32_t *target_tab = (void *)tswap32(vptr[3]);
 685             int tab[2];
 686
 687             ret = get_errno(socketpair(domain, type, protocol, tab));
 688             if (!is_error(ret)) {
 689                 target_tab[0] = tswap32(tab[0]);
 690                 target_tab[1] = tswap32(tab[1]);
 691             }
 692         }
 693         break;
 694     case SOCKOP_send:
 695         {
 696             int sockfd = tswap32(vptr[0]);
 697             void *msg = (void *)tswap32(vptr[1]);
 698             size_t len = tswap32(vptr[2]);
 699             int flags = tswap32(vptr[3]);
 700
 701             ret = get_errno(send(sockfd, msg, len, flags));
 702         }
 703         break;
 704     case SOCKOP_recv:
 705         {
 706             int sockfd = tswap32(vptr[0]);
 707             void *msg = (void *)tswap32(vptr[1]);
 708             size_t len = tswap32(vptr[2]);
 709             int flags = tswap32(vptr[3]);
 710
 711             ret = get_errno(recv(sockfd, msg, len, flags));
 712         }
 713         break;
 714     case SOCKOP_sendto:
 715         {
 716             int sockfd = tswap32(vptr[0]);
 717             void *msg = (void *)tswap32(vptr[1]);
 718             size_t len = tswap32(vptr[2]);
 719             int flags = tswap32(vptr[3]);
 720             void *target_addr = (void *)tswap32(vptr[4]);
 721             socklen_t addrlen = tswap32(vptr[5]);
 722             void *addr = alloca(addrlen);
 723
 724             target_to_host_sockaddr(addr, target_addr, addrlen);
 725             ret = get_errno(sendto(sockfd, msg, len, flags, addr, addrlen));
 726         }
 727         break;
 728     case SOCKOP_recvfrom:
 729         {
 730             int sockfd = tswap32(vptr[0]);
 731             void *msg = (void *)tswap32(vptr[1]);
 732             size_t len = tswap32(vptr[2]);
 733             int flags = tswap32(vptr[3]);
 734             void *target_addr = (void *)tswap32(vptr[4]);
 735             uint32_t *target_addrlen = (void *)tswap32(vptr[5]);
 736             socklen_t addrlen = tswap32(*target_addrlen);
 737             void *addr = alloca(addrlen);
 738
 739             ret = get_errno(recvfrom(sockfd, msg, len, flags, addr, &addrlen));
 740             if (!is_error(ret)) {
 741                 host_to_target_sockaddr(target_addr, addr, addrlen);
 742                 *target_addrlen = tswap32(addrlen);
 743             }
 744         }
 745         break;
 746     case SOCKOP_shutdown:
 747         {
 748             int sockfd = tswap32(vptr[0]);
 749             int how = tswap32(vptr[1]);
 750
 751             ret = get_errno(shutdown(sockfd, how));
 752         }
 753         break;
 754     case SOCKOP_sendmsg:
 755     case SOCKOP_recvmsg:
 756         {
 757             int fd;
 758             struct target_msghdr *msgp;
 759             struct msghdr msg;
 760             int flags, count, i;
 761             struct iovec *vec;
 762             struct target_iovec *target_vec;
 763
 764             msgp = (void *)tswap32(vptr[1]);
 765             msg.msg_name = (void *)tswapl(msgp->msg_name);
 766             msg.msg_namelen = tswapl(msgp->msg_namelen);
 767             msg.msg_controllen = 2 * tswapl(msgp->msg_controllen);
 768             msg.msg_control = alloca(msg.msg_controllen);
 769             msg.msg_flags = tswap32(msgp->msg_flags);
 770
 771             count = tswapl(msgp->msg_iovlen);
 772             vec = alloca(count * sizeof(struct iovec));
 773             target_vec = (void *)tswapl(msgp->msg_iov);
 774             for(i = 0;i < count; i++) {
 775                 vec[i].iov_base = (void *)tswapl(target_vec[i].iov_base);
 776                 vec[i].iov_len = tswapl(target_vec[i].iov_len);
 777             }
 778             msg.msg_iovlen = count;
 779             msg.msg_iov = vec;
 780
 781             fd = tswap32(vptr[0]);
 782             flags = tswap32(vptr[2]);
 783             if (num == SOCKOP_sendmsg) {
 784                 target_to_host_cmsg(&msg, msgp);
 785                 ret = get_errno(sendmsg(fd, &msg, flags));
 786             } else {
 787                 ret = get_errno(recvmsg(fd, &msg, flags));
 788                 if (!is_error(ret))
 789                   host_to_target_cmsg(msgp, &msg);
 790             }
 791         }
 792         break;
 793     case SOCKOP_setsockopt:
 794         {
 795             int sockfd = tswap32(vptr[0]);
 796             int level = tswap32(vptr[1]);
 797             int optname = tswap32(vptr[2]);
 798             void *optval = (void *)tswap32(vptr[3]);
 799             socklen_t optlen = tswap32(vptr[4]);
 800
 801             ret = do_setsockopt(sockfd, level, optname, optval, optlen);
 802         }
 803         break;
 804     case SOCKOP_getsockopt:
 805         {
 806             int sockfd = tswap32(vptr[0]);
 807             int level = tswap32(vptr[1]);
 808             int optname = tswap32(vptr[2]);
 809             void *optval = (void *)tswap32(vptr[3]);
 810             uint32_t *target_len = (void *)tswap32(vptr[4]);
 811             socklen_t optlen = tswap32(*target_len);
 812
 813             ret = do_getsockopt(sockfd, level, optname, optval, &optlen);
 814             if (!is_error(ret))
 815                 *target_len = tswap32(optlen);
 816         }
 817         break;
 818     default:
 819         gemu_log("Unsupported socketcall: %d\n", num);
 820         ret = -ENOSYS;
 821         break;
 822     }
 823     return ret;
 824 }
 825
 826 /* kernel structure types definitions */
 827 #define IFNAMSIZ        16
 828
 829 #define STRUCT(name, list...) STRUCT_ ## name,
 830 #define STRUCT_SPECIAL(name) STRUCT_ ## name,
 831 enum {
 832 #include "syscall_types.h"
 833 };
 834 #undef STRUCT
 835 #undef STRUCT_SPECIAL
 836
 837 #define STRUCT(name, list...) const argtype struct_ ## name ## _def[] = { list, TYPE_NULL };
 838 #define STRUCT_SPECIAL(name)
 839 #include "syscall_types.h"
 840 #undef STRUCT
 841 #undef STRUCT_SPECIAL
 842
 843 typedef struct IOCTLEntry {
 844     unsigned int target_cmd;
 845     unsigned int host_cmd;
 846     const char *name;
 847     int access;
 848     const argtype arg_type[5];
 849 } IOCTLEntry;
 850
 851 #define IOC_R 0x0001
 852 #define IOC_W 0x0002
 853 #define IOC_RW (IOC_R | IOC_W)
 854
 855 #define MAX_STRUCT_SIZE 4096
 856
 857 IOCTLEntry ioctl_entries[] = {
 858 #define IOCTL(cmd, access, types...) \
 859     { TARGET_ ## cmd, cmd, #cmd, access, { types } },
 860 #include "ioctls.h"
 861     { 0, 0, },
 862 };
 863
 864 static long do_ioctl(long fd, long cmd, long arg)
 865 {
 866     const IOCTLEntry *ie;
 867     const argtype *arg_type;
 868     long ret;
 869     uint8_t buf_temp[MAX_STRUCT_SIZE];
 870
 871     ie = ioctl_entries;
 872     for(;;) {
 873         if (ie->target_cmd == 0) {
 874             gemu_log("Unsupported ioctl: cmd=0x%04lx\n", cmd);
 875             return -ENOSYS;
 876         }
 877         if (ie->target_cmd == cmd)
 878             break;
 879         ie++;
 880     }
 881     arg_type = ie->arg_type;
 882 #if defined(DEBUG)
 883     gemu_log("ioctl: cmd=0x%04lx (%s)\n", cmd, ie->name);
 884 #endif
 885     switch(arg_type[0]) {
 886     case TYPE_NULL:
 887         /* no argument */
 888         ret = get_errno(ioctl(fd, ie->host_cmd));
 889         break;
 890     case TYPE_PTRVOID:
 891     case TYPE_INT:
 892         /* int argment */
 893         ret = get_errno(ioctl(fd, ie->host_cmd, arg));
 894         break;
 895     case TYPE_PTR:
 896         arg_type++;
 897         switch(ie->access) {
 898         case IOC_R:
 899             ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
 900             if (!is_error(ret)) {
 901                 thunk_convert((void *)arg, buf_temp, arg_type, THUNK_TARGET);
 902             }
 903             break;
 904         case IOC_W:
 905             thunk_convert(buf_temp, (void *)arg, arg_type, THUNK_HOST);
 906             ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
 907             break;
 908         default:
 909         case IOC_RW:
 910             thunk_convert(buf_temp, (void *)arg, arg_type, THUNK_HOST);
 911             ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
 912             if (!is_error(ret)) {
 913                 thunk_convert((void *)arg, buf_temp, arg_type, THUNK_TARGET);
 914             }
 915             break;
 916         }
 917         break;
 918     default:
 919         gemu_log("Unsupported ioctl type: cmd=0x%04lx type=%d\n", cmd, arg_type[0]);
 920         ret = -ENOSYS;
 921         break;
 922     }
 923     return ret;
 924 }
 925
 926 bitmask_transtbl iflag_tbl[] = {
 927         { TARGET_IGNBRK, TARGET_IGNBRK, IGNBRK, IGNBRK },
 928         { TARGET_BRKINT, TARGET_BRKINT, BRKINT, BRKINT },
 929         { TARGET_IGNPAR, TARGET_IGNPAR, IGNPAR, IGNPAR },
 930         { TARGET_PARMRK, TARGET_PARMRK, PARMRK, PARMRK },
 931         { TARGET_INPCK, TARGET_INPCK, INPCK, INPCK },
 932         { TARGET_ISTRIP, TARGET_ISTRIP, ISTRIP, ISTRIP },
 933         { TARGET_INLCR, TARGET_INLCR, INLCR, INLCR },
 934         { TARGET_IGNCR, TARGET_IGNCR, IGNCR, IGNCR },
 935         { TARGET_ICRNL, TARGET_ICRNL, ICRNL, ICRNL },
 936         { TARGET_IUCLC, TARGET_IUCLC, IUCLC, IUCLC },
 937         { TARGET_IXON, TARGET_IXON, IXON, IXON },
 938         { TARGET_IXANY, TARGET_IXANY, IXANY, IXANY },
 939         { TARGET_IXOFF, TARGET_IXOFF, IXOFF, IXOFF },
 940         { TARGET_IMAXBEL, TARGET_IMAXBEL, IMAXBEL, IMAXBEL },
 941         { 0, 0, 0, 0 }
 942 };
 943
 944 bitmask_transtbl oflag_tbl[] = {
 945         { TARGET_OPOST, TARGET_OPOST, OPOST, OPOST },
 946         { TARGET_OLCUC, TARGET_OLCUC, OLCUC, OLCUC },
 947         { TARGET_ONLCR, TARGET_ONLCR, ONLCR, ONLCR },
 948         { TARGET_OCRNL, TARGET_OCRNL, OCRNL, OCRNL },
 949         { TARGET_ONOCR, TARGET_ONOCR, ONOCR, ONOCR },
 950         { TARGET_ONLRET, TARGET_ONLRET, ONLRET, ONLRET },
 951         { TARGET_OFILL, TARGET_OFILL, OFILL, OFILL },
 952         { TARGET_OFDEL, TARGET_OFDEL, OFDEL, OFDEL },
 953         { TARGET_NLDLY, TARGET_NL0, NLDLY, NL0 },
 954         { TARGET_NLDLY, TARGET_NL1, NLDLY, NL1 },
 955         { TARGET_CRDLY, TARGET_CR0, CRDLY, CR0 },
 956         { TARGET_CRDLY, TARGET_CR1, CRDLY, CR1 },
 957         { TARGET_CRDLY, TARGET_CR2, CRDLY, CR2 },
 958         { TARGET_CRDLY, TARGET_CR3, CRDLY, CR3 },
 959         { TARGET_TABDLY, TARGET_TAB0, TABDLY, TAB0 },
 960         { TARGET_TABDLY, TARGET_TAB1, TABDLY, TAB1 },
 961         { TARGET_TABDLY, TARGET_TAB2, TABDLY, TAB2 },
 962         { TARGET_TABDLY, TARGET_TAB3, TABDLY, TAB3 },
 963         { TARGET_BSDLY, TARGET_BS0, BSDLY, BS0 },
 964         { TARGET_BSDLY, TARGET_BS1, BSDLY, BS1 },
 965         { TARGET_VTDLY, TARGET_VT0, VTDLY, VT0 },
 966         { TARGET_VTDLY, TARGET_VT1, VTDLY, VT1 },
 967         { TARGET_FFDLY, TARGET_FF0, FFDLY, FF0 },
 968         { TARGET_FFDLY, TARGET_FF1, FFDLY, FF1 },
 969         { 0, 0, 0, 0 }
 970 };
 971
 972 bitmask_transtbl cflag_tbl[] = {
 973         { TARGET_CBAUD, TARGET_B0, CBAUD, B0 },
 974         { TARGET_CBAUD, TARGET_B50, CBAUD, B50 },
 975         { TARGET_CBAUD, TARGET_B75, CBAUD, B75 },
 976         { TARGET_CBAUD, TARGET_B110, CBAUD, B110 },
 977         { TARGET_CBAUD, TARGET_B134, CBAUD, B134 },
 978         { TARGET_CBAUD, TARGET_B150, CBAUD, B150 },
 979         { TARGET_CBAUD, TARGET_B200, CBAUD, B200 },
 980         { TARGET_CBAUD, TARGET_B300, CBAUD, B300 },
 981         { TARGET_CBAUD, TARGET_B600, CBAUD, B600 },
 982         { TARGET_CBAUD, TARGET_B1200, CBAUD, B1200 },
 983         { TARGET_CBAUD, TARGET_B1800, CBAUD, B1800 },
 984         { TARGET_CBAUD, TARGET_B2400, CBAUD, B2400 },
 985         { TARGET_CBAUD, TARGET_B4800, CBAUD, B4800 },
 986         { TARGET_CBAUD, TARGET_B9600, CBAUD, B9600 },
 987         { TARGET_CBAUD, TARGET_B19200, CBAUD, B19200 },
 988         { TARGET_CBAUD, TARGET_B38400, CBAUD, B38400 },
 989         { TARGET_CBAUD, TARGET_B57600, CBAUD, B57600 },
 990         { TARGET_CBAUD, TARGET_B115200, CBAUD, B115200 },
 991         { TARGET_CBAUD, TARGET_B230400, CBAUD, B230400 },
 992         { TARGET_CBAUD, TARGET_B460800, CBAUD, B460800 },
 993         { TARGET_CSIZE, TARGET_CS5, CSIZE, CS5 },
 994         { TARGET_CSIZE, TARGET_CS6, CSIZE, CS6 },
 995         { TARGET_CSIZE, TARGET_CS7, CSIZE, CS7 },
 996         { TARGET_CSIZE, TARGET_CS8, CSIZE, CS8 },
 997         { TARGET_CSTOPB, TARGET_CSTOPB, CSTOPB, CSTOPB },
 998         { TARGET_CREAD, TARGET_CREAD, CREAD, CREAD },
 999         { TARGET_PARENB, TARGET_PARENB, PARENB, PARENB },
1000         { TARGET_PARODD, TARGET_PARODD, PARODD, PARODD },
1001         { TARGET_HUPCL, TARGET_HUPCL, HUPCL, HUPCL },
1002         { TARGET_CLOCAL, TARGET_CLOCAL, CLOCAL, CLOCAL },
1003         { TARGET_CRTSCTS, TARGET_CRTSCTS, CRTSCTS, CRTSCTS },
1004         { 0, 0, 0, 0 }
1005 };
1006
1007 bitmask_transtbl lflag_tbl[] = {
1008         { TARGET_ISIG, TARGET_ISIG, ISIG, ISIG },
1009         { TARGET_ICANON, TARGET_ICANON, ICANON, ICANON },
1010         { TARGET_XCASE, TARGET_XCASE, XCASE, XCASE },
1011         { TARGET_ECHO, TARGET_ECHO, ECHO, ECHO },
1012         { TARGET_ECHOE, TARGET_ECHOE, ECHOE, ECHOE },
1013         { TARGET_ECHOK, TARGET_ECHOK, ECHOK, ECHOK },
1014         { TARGET_ECHONL, TARGET_ECHONL, ECHONL, ECHONL },
1015         { TARGET_NOFLSH, TARGET_NOFLSH, NOFLSH, NOFLSH },
1016         { TARGET_TOSTOP, TARGET_TOSTOP, TOSTOP, TOSTOP },
1017         { TARGET_ECHOCTL, TARGET_ECHOCTL, ECHOCTL, ECHOCTL },
1018         { TARGET_ECHOPRT, TARGET_ECHOPRT, ECHOPRT, ECHOPRT },
1019         { TARGET_ECHOKE, TARGET_ECHOKE, ECHOKE, ECHOKE },
1020         { TARGET_FLUSHO, TARGET_FLUSHO, FLUSHO, FLUSHO },
1021         { TARGET_PENDIN, TARGET_PENDIN, PENDIN, PENDIN },
1022         { TARGET_IEXTEN, TARGET_IEXTEN, IEXTEN, IEXTEN },
1023         { 0, 0, 0, 0 }
1024 };
1025
1026 static void target_to_host_termios (void *dst, const void *src)
1027 {
1028     struct host_termios *host = dst;
1029     const struct target_termios *target = src;
1030
1031     host->c_iflag =
1032         target_to_host_bitmask(tswap32(target->c_iflag), iflag_tbl);
1033     host->c_oflag =
1034         target_to_host_bitmask(tswap32(target->c_oflag), oflag_tbl);
1035     host->c_cflag =
1036         target_to_host_bitmask(tswap32(target->c_cflag), cflag_tbl);
1037     host->c_lflag =
1038         target_to_host_bitmask(tswap32(target->c_lflag), lflag_tbl);
1039     host->c_line = target->c_line;
1040
1041     host->c_cc[VINTR] = target->c_cc[TARGET_VINTR];
1042     host->c_cc[VQUIT] = target->c_cc[TARGET_VQUIT];
1043     host->c_cc[VERASE] = target->c_cc[TARGET_VERASE];
1044     host->c_cc[VKILL] = target->c_cc[TARGET_VKILL];
1045     host->c_cc[VEOF] = target->c_cc[TARGET_VEOF];
1046     host->c_cc[VTIME] = target->c_cc[TARGET_VTIME];
1047     host->c_cc[VMIN] = target->c_cc[TARGET_VMIN];
1048     host->c_cc[VSWTC] = target->c_cc[TARGET_VSWTC];
1049     host->c_cc[VSTART] = target->c_cc[TARGET_VSTART];
1050     host->c_cc[VSTOP] = target->c_cc[TARGET_VSTOP];
1051     host->c_cc[VSUSP] = target->c_cc[TARGET_VSUSP];
1052     host->c_cc[VEOL] = target->c_cc[TARGET_VEOL];
1053     host->c_cc[VREPRINT] = target->c_cc[TARGET_VREPRINT];
1054     host->c_cc[VDISCARD] = target->c_cc[TARGET_VDISCARD];
1055     host->c_cc[VWERASE] = target->c_cc[TARGET_VWERASE];
1056     host->c_cc[VLNEXT] = target->c_cc[TARGET_VLNEXT];
1057     host->c_cc[VEOL2] = target->c_cc[TARGET_VEOL2];
1058 }
1059
1060 static void host_to_target_termios (void *dst, const void *src)
1061 {
1062     struct target_termios *target = dst;
1063     const struct host_termios *host = src;
1064
1065     target->c_iflag =
1066         tswap32(host_to_target_bitmask(host->c_iflag, iflag_tbl));
1067     target->c_oflag =
1068         tswap32(host_to_target_bitmask(host->c_oflag, oflag_tbl));
1069     target->c_cflag =
1070         tswap32(host_to_target_bitmask(host->c_cflag, cflag_tbl));
1071     target->c_lflag =
1072         tswap32(host_to_target_bitmask(host->c_lflag, lflag_tbl));
1073     target->c_line = host->c_line;
1074
1075     target->c_cc[TARGET_VINTR] = host->c_cc[VINTR];
1076     target->c_cc[TARGET_VQUIT] = host->c_cc[VQUIT];
1077     target->c_cc[TARGET_VERASE] = host->c_cc[VERASE];
1078     target->c_cc[TARGET_VKILL] = host->c_cc[VKILL];
1079     target->c_cc[TARGET_VEOF] = host->c_cc[VEOF];
1080     target->c_cc[TARGET_VTIME] = host->c_cc[VTIME];
1081     target->c_cc[TARGET_VMIN] = host->c_cc[VMIN];
1082     target->c_cc[TARGET_VSWTC] = host->c_cc[VSWTC];
1083     target->c_cc[TARGET_VSTART] = host->c_cc[VSTART];
1084     target->c_cc[TARGET_VSTOP] = host->c_cc[VSTOP];
1085     target->c_cc[TARGET_VSUSP] = host->c_cc[VSUSP];
1086     target->c_cc[TARGET_VEOL] = host->c_cc[VEOL];
1087     target->c_cc[TARGET_VREPRINT] = host->c_cc[VREPRINT];
1088     target->c_cc[TARGET_VDISCARD] = host->c_cc[VDISCARD];
1089     target->c_cc[TARGET_VWERASE] = host->c_cc[VWERASE];
1090     target->c_cc[TARGET_VLNEXT] = host->c_cc[VLNEXT];
1091     target->c_cc[TARGET_VEOL2] = host->c_cc[VEOL2];
1092 }
1093
1094 StructEntry struct_termios_def = {
1095     .convert = { host_to_target_termios, target_to_host_termios },
1096     .size = { sizeof(struct target_termios), sizeof(struct host_termios) },
1097     .align = { __alignof__(struct target_termios), __alignof__(struct host_termios) },
1098 };
1099
1100 static bitmask_transtbl mmap_flags_tbl[] = {
1101         { TARGET_MAP_SHARED, TARGET_MAP_SHARED, MAP_SHARED, MAP_SHARED },
1102         { TARGET_MAP_PRIVATE, TARGET_MAP_PRIVATE, MAP_PRIVATE, MAP_PRIVATE },
1103         { TARGET_MAP_FIXED, TARGET_MAP_FIXED, MAP_FIXED, MAP_FIXED },
1104         { TARGET_MAP_ANONYMOUS, TARGET_MAP_ANONYMOUS, MAP_ANONYMOUS, MAP_ANONYMOUS },
1105         { TARGET_MAP_GROWSDOWN, TARGET_MAP_GROWSDOWN, MAP_GROWSDOWN, MAP_GROWSDOWN },
1106         { TARGET_MAP_DENYWRITE, TARGET_MAP_DENYWRITE, MAP_DENYWRITE, MAP_DENYWRITE },
1107         { TARGET_MAP_EXECUTABLE, TARGET_MAP_EXECUTABLE, MAP_EXECUTABLE, MAP_EXECUTABLE },
1108         { TARGET_MAP_LOCKED, TARGET_MAP_LOCKED, MAP_LOCKED, MAP_LOCKED },
1109         { 0, 0, 0, 0 }
1110 };
1111
1112 #if defined(TARGET_I386)
1113
1114 /* NOTE: there is really one LDT for all the threads */
1115 uint8_t *ldt_table;
1116
1117 static int read_ldt(void *ptr, unsigned long bytecount)
1118 {
1119     int size;
1120
1121     if (!ldt_table)
1122         return 0;
1123     size = TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE;
1124     if (size > bytecount)
1125         size = bytecount;
1126     memcpy(ptr, ldt_table, size);
1127     return size;
1128 }
1129
1130 /* XXX: add locking support */
1131 static int write_ldt(CPUX86State *env,
1132                      void *ptr, unsigned long bytecount, int oldmode)
1133 {
1134     struct target_modify_ldt_ldt_s ldt_info;
1135     int seg_32bit, contents, read_exec_only, limit_in_pages;
1136     int seg_not_present, useable;
1137     uint32_t *lp, entry_1, entry_2;
1138
1139     if (bytecount != sizeof(ldt_info))
1140         return -EINVAL;
1141     memcpy(&ldt_info, ptr, sizeof(ldt_info));
1142     tswap32s(&ldt_info.entry_number);
1143     tswapls((long *)&ldt_info.base_addr);
1144     tswap32s(&ldt_info.limit);
1145     tswap32s(&ldt_info.flags);
1146
1147     if (ldt_info.entry_number >= TARGET_LDT_ENTRIES)
1148         return -EINVAL;
1149     seg_32bit = ldt_info.flags & 1;
1150     contents = (ldt_info.flags >> 1) & 3;
1151     read_exec_only = (ldt_info.flags >> 3) & 1;
1152     limit_in_pages = (ldt_info.flags >> 4) & 1;
1153     seg_not_present = (ldt_info.flags >> 5) & 1;
1154     useable = (ldt_info.flags >> 6) & 1;
1155
1156     if (contents == 3) {
1157         if (oldmode)
1158             return -EINVAL;
1159         if (seg_not_present == 0)
1160             return -EINVAL;
1161     }
1162     /* allocate the LDT */
1163     if (!ldt_table) {
1164         ldt_table = malloc(TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE);
1165         if (!ldt_table)
1166             return -ENOMEM;
1167         memset(ldt_table, 0, TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE);
1168         env->ldt.base = ldt_table;
1169         env->ldt.limit = 0xffff;
1170     }
1171
1172     /* NOTE: same code as Linux kernel */
1173     /* Allow LDTs to be cleared by the user. */
1174     if (ldt_info.base_addr == 0 && ldt_info.limit == 0) {
1175         if (oldmode ||
1176             (contents == 0              &&
1177              read_exec_only == 1        &&
1178              seg_32bit == 0             &&
1179              limit_in_pages == 0        &&
1180              seg_not_present == 1       &&
1181              useable == 0 )) {
1182             entry_1 = 0;
1183             entry_2 = 0;
1184             goto install;
1185         }
1186     }
1187
1188     entry_1 = ((ldt_info.base_addr & 0x0000ffff) << 16) |
1189         (ldt_info.limit & 0x0ffff);
1190     entry_2 = (ldt_info.base_addr & 0xff000000) |
1191         ((ldt_info.base_addr & 0x00ff0000) >> 16) |
1192         (ldt_info.limit & 0xf0000) |
1193         ((read_exec_only ^ 1) << 9) |
1194         (contents << 10) |
1195         ((seg_not_present ^ 1) << 15) |
1196         (seg_32bit << 22) |
1197         (limit_in_pages << 23) |
1198         0x7000;
1199     if (!oldmode)
1200         entry_2 |= (useable << 20);
1201
1202     /* Install the new entry ...  */
1203 install:
1204     lp = (uint32_t *)(ldt_table + (ldt_info.entry_number << 3));
1205     lp[0] = tswap32(entry_1);
1206     lp[1] = tswap32(entry_2);
1207     return 0;
1208 }
1209
1210 /* specific and weird i386 syscalls */
1211 int do_modify_ldt(CPUX86State *env, int func, void *ptr, unsigned long bytecount)
1212 {
1213     int ret = -ENOSYS;
1214
1215     switch (func) {
1216     case 0:
1217         ret = read_ldt(ptr, bytecount);
1218         break;
1219     case 1:
1220         ret = write_ldt(env, ptr, bytecount, 1);
1221         break;
1222     case 0x11:
1223         ret = write_ldt(env, ptr, bytecount, 0);
1224         break;
1225     }
1226     return ret;
1227 }
1228
1229 #endif /* defined(TARGET_I386) */
1230
1231 /* this stack is the equivalent of the kernel stack associated with a
1232    thread/process */
1233 #define NEW_STACK_SIZE 8192
1234
1235 static int clone_func(void *arg)
1236 {
1237     CPUState *env = arg;
1238     cpu_loop(env);
1239     /* never exits */
1240     return 0;
1241 }
1242
1243 int do_fork(CPUState *env, unsigned int flags, unsigned long newsp)
1244 {
1245     int ret;
1246     TaskState *ts;
1247     uint8_t *new_stack;
1248     CPUState *new_env;
1249
1250     if (flags & CLONE_VM) {
1251         ts = malloc(sizeof(TaskState) + NEW_STACK_SIZE);
1252         memset(ts, 0, sizeof(TaskState));
1253         new_stack = ts->stack;
1254         ts->used = 1;
1255         /* add in task state list */
1256         ts->next = first_task_state;
1257         first_task_state = ts;
1258         /* we create a new CPU instance. */
1259         new_env = cpu_init();
1260         memcpy(new_env, env, sizeof(CPUState));
1261 #if defined(TARGET_I386)
1262         if (!newsp)
1263             newsp = env->regs[R_ESP];
1264         new_env->regs[R_ESP] = newsp;
1265         new_env->regs[R_EAX] = 0;
1266 #elif defined(TARGET_ARM)
1267         if (!newsp)
1268             newsp = env->regs[13];
1269         new_env->regs[13] = newsp;
1270         new_env->regs[0] = 0;
1271 #elif defined(TARGET_SPARC)
1272         printf ("HELPME: %s:%d\n", __FILE__, __LINE__);
1273 #elif defined(TARGET_PPC)
1274         if (!newsp)
1275             newsp = env->gpr[1];
1276         new_env->gpr[1] = newsp;
1277         {
1278             int i;
1279             for (i = 7; i < 32; i++)
1280                 new_env->gpr[i] = 0;
1281         }
1282 #else
1283 #error unsupported target CPU
1284 #endif
1285         new_env->opaque = ts;
1286 #ifdef __ia64__
1287         ret = clone2(clone_func, new_stack + NEW_STACK_SIZE, flags, new_env);
1288 #else
1289         ret = clone(clone_func, new_stack + NEW_STACK_SIZE, flags, new_env);
1290 #endif
1291     } else {
1292         /* if no CLONE_VM, we consider it is a fork */
1293         if ((flags & ~CSIGNAL) != 0)
1294             return -EINVAL;
1295         ret = fork();
1296     }
1297     return ret;
1298 }
1299
1300 static long do_fcntl(int fd, int cmd, unsigned long arg)
1301 {
1302     struct flock fl;
1303     struct target_flock *target_fl = (void *)arg;
1304     long ret;
1305
1306     switch(cmd) {
1307     case TARGET_F_GETLK:
1308         ret = fcntl(fd, cmd, &fl);
1309         if (ret == 0) {
1310             target_fl->l_type = tswap16(fl.l_type);
1311             target_fl->l_whence = tswap16(fl.l_whence);
1312             target_fl->l_start = tswapl(fl.l_start);
1313             target_fl->l_len = tswapl(fl.l_len);
1314             target_fl->l_pid = tswapl(fl.l_pid);
1315         }
1316         break;
1317
1318     case TARGET_F_SETLK:
1319     case TARGET_F_SETLKW:
1320         fl.l_type = tswap16(target_fl->l_type);
1321         fl.l_whence = tswap16(target_fl->l_whence);
1322         fl.l_start = tswapl(target_fl->l_start);
1323         fl.l_len = tswapl(target_fl->l_len);
1324         fl.l_pid = tswapl(target_fl->l_pid);
1325         ret = fcntl(fd, cmd, &fl);
1326         break;
1327
1328     case TARGET_F_GETLK64:
1329     case TARGET_F_SETLK64:
1330     case TARGET_F_SETLKW64:
1331         ret = -1;
1332         errno = EINVAL;
1333         break;
1334
1335     default:
1336         ret = fcntl(fd, cmd, arg);
1337         break;
1338     }
1339     return ret;
1340 }
1341
1342 #ifdef USE_UID16
1343
1344 static inline int high2lowuid(int uid)
1345 {
1346     if (uid > 65535)
1347         return 65534;
1348     else
1349         return uid;
1350 }
1351
1352 static inline int high2lowgid(int gid)
1353 {
1354     if (gid > 65535)
1355         return 65534;
1356     else
1357         return gid;
1358 }
1359
1360 static inline int low2highuid(int uid)
1361 {
1362     if ((int16_t)uid == -1)
1363         return -1;
1364     else
1365         return uid;
1366 }
1367
1368 static inline int low2highgid(int gid)
1369 {
1370     if ((int16_t)gid == -1)
1371         return -1;
1372     else
1373         return gid;
1374 }
1375
1376 #endif /* USE_UID16 */
1377
1378 void syscall_init(void)
1379 {
1380     IOCTLEntry *ie;
1381     const argtype *arg_type;
1382     int size;
1383
1384 #define STRUCT(name, list...) thunk_register_struct(STRUCT_ ## name, #name, struct_ ## name ## _def);
1385 #define STRUCT_SPECIAL(name) thunk_register_struct_direct(STRUCT_ ## name, #name, &struct_ ## name ## _def);
1386 #include "syscall_types.h"
1387 #undef STRUCT
1388 #undef STRUCT_SPECIAL
1389
1390     /* we patch the ioctl size if necessary. We rely on the fact that
1391        no ioctl has all the bits at '1' in the size field */
1392     ie = ioctl_entries;
1393     while (ie->target_cmd != 0) {
1394         if (((ie->target_cmd >> TARGET_IOC_SIZESHIFT) & TARGET_IOC_SIZEMASK) ==
1395             TARGET_IOC_SIZEMASK) {
1396             arg_type = ie->arg_type;
1397             if (arg_type[0] != TYPE_PTR) {
1398                 fprintf(stderr, "cannot patch size for ioctl 0x%x\n",
1399                         ie->target_cmd);
1400                 exit(1);
1401             }
1402             arg_type++;
1403             size = thunk_type_size(arg_type, 0);
1404             ie->target_cmd = (ie->target_cmd &
1405                               ~(TARGET_IOC_SIZEMASK << TARGET_IOC_SIZESHIFT)) |
1406                 (size << TARGET_IOC_SIZESHIFT);
1407         }
1408         /* automatic consistency check if same arch */
1409 #if defined(__i386__) && defined(TARGET_I386)
1410         if (ie->target_cmd != ie->host_cmd) {
1411             fprintf(stderr, "ERROR: ioctl: target=0x%x host=0x%x\n",
1412                     ie->target_cmd, ie->host_cmd);
1413         }
1414 #endif
1415         ie++;
1416     }
1417 }
1418
1419 long do_syscall(void *cpu_env, int num, long arg1, long arg2, long arg3,
1420                 long arg4, long arg5, long arg6)
1421 {
1422     long ret;
1423     struct stat st;
1424     struct kernel_statfs *stfs;
1425
1426 #ifdef DEBUG
1427     gemu_log("syscall %d\n", num);
1428 #endif
1429     switch(num) {
1430     case TARGET_NR_exit:
1431 #ifdef HAVE_GPROF
1432         _mcleanup();
1433 #endif
1434         /* XXX: should free thread stack and CPU env */
1435         _exit(arg1);
1436         ret = 0; /* avoid warning */
1437         break;
1438     case TARGET_NR_read:
1439         page_unprotect_range((void *)arg2, arg3);
1440         ret = get_errno(read(arg1, (void *)arg2, arg3));
1441         break;
1442     case TARGET_NR_write:
1443         ret = get_errno(write(arg1, (void *)arg2, arg3));
1444         break;
1445     case TARGET_NR_open:
1446         ret = get_errno(open(path((const char *)arg1), arg2, arg3));
1447         break;
1448     case TARGET_NR_close:
1449         ret = get_errno(close(arg1));
1450         break;
1451     case TARGET_NR_brk:
1452         ret = do_brk((char *)arg1);
1453         break;
1454     case TARGET_NR_fork:
1455         ret = get_errno(do_fork(cpu_env, SIGCHLD, 0));
1456         break;
1457     case TARGET_NR_waitpid:
1458         {
1459             int *status = (int *)arg2;
1460             ret = get_errno(waitpid(arg1, status, arg3));
1461             if (!is_error(ret) && status)
1462                 tswapls((long *)&status);
1463         }
1464         break;
1465     case TARGET_NR_creat:
1466         ret = get_errno(creat((const char *)arg1, arg2));
1467         break;
1468     case TARGET_NR_link:
1469         ret = get_errno(link((const char *)arg1, (const char *)arg2));
1470         break;
1471     case TARGET_NR_unlink:
1472         ret = get_errno(unlink((const char *)arg1));
1473         break;
1474     case TARGET_NR_execve:
1475         {
1476             char **argp, **envp;
1477             int argc, envc;
1478             uint32_t *p;
1479             char **q;
1480
1481             argc = 0;
1482             for (p = (void *)arg2; *p; p++)
1483                 argc++;
1484             envc = 0;
1485             for (p = (void *)arg3; *p; p++)
1486                 envc++;
1487
1488             argp = alloca((argc + 1) * sizeof(void *));
1489             envp = alloca((envc + 1) * sizeof(void *));
1490
1491             for (p = (void *)arg2, q = argp; *p; p++, q++)
1492                 *q = (void *)tswap32(*p);
1493             *q = NULL;
1494
1495             for (p = (void *)arg3, q = envp; *p; p++, q++)
1496                 *q = (void *)tswap32(*p);
1497             *q = NULL;
1498
1499             ret = get_errno(execve((const char *)arg1, argp, envp));
1500         }
1501         break;
1502     case TARGET_NR_chdir:
1503         ret = get_errno(chdir((const char *)arg1));
1504         break;
1505     case TARGET_NR_time:
1506         {
1507             int *time_ptr = (int *)arg1;
1508             ret = get_errno(time((time_t *)time_ptr));
1509             if (!is_error(ret) && time_ptr)
1510                 tswap32s(time_ptr);
1511         }
1512         break;
1513     case TARGET_NR_mknod:
1514         ret = get_errno(mknod((const char *)arg1, arg2, arg3));
1515         break;
1516     case TARGET_NR_chmod:
1517         ret = get_errno(chmod((const char *)arg1, arg2));
1518         break;
1519 #ifdef TARGET_NR_break
1520     case TARGET_NR_break:
1521         goto unimplemented;
1522 #endif
1523 #ifdef TARGET_NR_oldstat
1524     case TARGET_NR_oldstat:
1525         goto unimplemented;
1526 #endif
1527     case TARGET_NR_lseek:
1528         ret = get_errno(lseek(arg1, arg2, arg3));
1529         break;
1530     case TARGET_NR_getpid:
1531         ret = get_errno(getpid());
1532         break;
1533     case TARGET_NR_mount:
1534         /* need to look at the data field */
1535         goto unimplemented;
1536     case TARGET_NR_umount:
1537         ret = get_errno(umount((const char *)arg1));
1538         break;
1539     case TARGET_NR_stime:
1540         {
1541             int *time_ptr = (int *)arg1;
1542             if (time_ptr)
1543                 tswap32s(time_ptr);
1544             ret = get_errno(stime((time_t *)time_ptr));
1545         }
1546         break;
1547     case TARGET_NR_ptrace:
1548         goto unimplemented;
1549     case TARGET_NR_alarm:
1550         ret = alarm(arg1);
1551         break;
1552 #ifdef TARGET_NR_oldfstat
1553     case TARGET_NR_oldfstat:
1554         goto unimplemented;
1555 #endif
1556     case TARGET_NR_pause:
1557         ret = get_errno(pause());
1558         break;
1559     case TARGET_NR_utime:
1560         {
1561             struct utimbuf tbuf;
1562             struct target_utimbuf *target_tbuf = (void *)arg2;
1563             tbuf.actime = tswapl(target_tbuf->actime);
1564             tbuf.modtime = tswapl(target_tbuf->modtime);
1565             ret = get_errno(utime((const char *)arg1, &tbuf));
1566         }
1567         break;
1568 #ifdef TARGET_NR_stty
1569     case TARGET_NR_stty:
1570         goto unimplemented;
1571 #endif
1572 #ifdef TARGET_NR_gtty
1573     case TARGET_NR_gtty:
1574         goto unimplemented;
1575 #endif
1576     case TARGET_NR_access:
1577         ret = get_errno(access((const char *)arg1, arg2));
1578         break;
1579     case TARGET_NR_nice:
1580         ret = get_errno(nice(arg1));
1581         break;
1582 #ifdef TARGET_NR_ftime
1583     case TARGET_NR_ftime:
1584         goto unimplemented;
1585 #endif
1586     case TARGET_NR_sync:
1587         sync();
1588         ret = 0;
1589         break;
1590     case TARGET_NR_kill:
1591         ret = get_errno(kill(arg1, arg2));
1592         break;
1593     case TARGET_NR_rename:
1594         ret = get_errno(rename((const char *)arg1, (const char *)arg2));
1595         break;
1596     case TARGET_NR_mkdir:
1597         ret = get_errno(mkdir((const char *)arg1, arg2));
1598         break;
1599     case TARGET_NR_rmdir:
1600         ret = get_errno(rmdir((const char *)arg1));
1601         break;
1602     case TARGET_NR_dup:
1603         ret = get_errno(dup(arg1));
1604         break;
1605     case TARGET_NR_pipe:
1606         {
1607             int *pipe_ptr = (int *)arg1;
1608             ret = get_errno(pipe(pipe_ptr));
1609             if (!is_error(ret)) {
1610                 tswap32s(&pipe_ptr[0]);
1611                 tswap32s(&pipe_ptr[1]);
1612             }
1613         }
1614         break;
1615     case TARGET_NR_times:
1616         {
1617             struct target_tms *tmsp = (void *)arg1;
1618             struct tms tms;
1619             ret = get_errno(times(&tms));
1620             if (tmsp) {
1621                 tmsp->tms_utime = tswapl(host_to_target_clock_t(tms.tms_utime));
1622                 tmsp->tms_stime = tswapl(host_to_target_clock_t(tms.tms_stime));
1623                 tmsp->tms_cutime = tswapl(host_to_target_clock_t(tms.tms_cutime));
1624                 tmsp->tms_cstime = tswapl(host_to_target_clock_t(tms.tms_cstime));
1625             }
1626             if (!is_error(ret))
1627                 ret = host_to_target_clock_t(ret);
1628         }
1629         break;
1630 #ifdef TARGET_NR_prof
1631     case TARGET_NR_prof:
1632         goto unimplemented;
1633 #endif
1634     case TARGET_NR_signal:
1635         goto unimplemented;
1636
1637     case TARGET_NR_acct:
1638         goto unimplemented;
1639     case TARGET_NR_umount2:
1640         ret = get_errno(umount2((const char *)arg1, arg2));
1641         break;
1642 #ifdef TARGET_NR_lock
1643     case TARGET_NR_lock:
1644         goto unimplemented;
1645 #endif
1646     case TARGET_NR_ioctl:
1647         ret = do_ioctl(arg1, arg2, arg3);
1648         break;
1649     case TARGET_NR_fcntl:
1650         ret = get_errno(do_fcntl(arg1, arg2, arg3));
1651         break;
1652 #ifdef TARGET_NR_mpx
1653     case TARGET_NR_mpx:
1654         goto unimplemented;
1655 #endif
1656     case TARGET_NR_setpgid:
1657         ret = get_errno(setpgid(arg1, arg2));
1658         break;
1659 #ifdef TARGET_NR_ulimit
1660     case TARGET_NR_ulimit:
1661         goto unimplemented;
1662 #endif
1663 #ifdef TARGET_NR_oldolduname
1664     case TARGET_NR_oldolduname:
1665         goto unimplemented;
1666 #endif
1667     case TARGET_NR_umask:
1668         ret = get_errno(umask(arg1));
1669         break;
1670     case TARGET_NR_chroot:
1671         ret = get_errno(chroot((const char *)arg1));
1672         break;
1673     case TARGET_NR_ustat:
1674         goto unimplemented;
1675     case TARGET_NR_dup2:
1676         ret = get_errno(dup2(arg1, arg2));
1677         break;
1678     case TARGET_NR_getppid:
1679         ret = get_errno(getppid());
1680         break;
1681     case TARGET_NR_getpgrp:
1682         ret = get_errno(getpgrp());
1683         break;
1684     case TARGET_NR_setsid:
1685         ret = get_errno(setsid());
1686         break;
1687     case TARGET_NR_sigaction:
1688         {
1689             struct target_old_sigaction *old_act = (void *)arg2;
1690             struct target_old_sigaction *old_oact = (void *)arg3;
1691             struct target_sigaction act, oact, *pact;
1692             if (old_act) {
1693                 act._sa_handler = old_act->_sa_handler;
1694                 target_siginitset(&act.sa_mask, old_act->sa_mask);
1695                 act.sa_flags = old_act->sa_flags;
1696                 act.sa_restorer = old_act->sa_restorer;
1697                 pact = &act;
1698             } else {
1699                 pact = NULL;
1700             }
1701             ret = get_errno(do_sigaction(arg1, pact, &oact));
1702             if (!is_error(ret) && old_oact) {
1703                 old_oact->_sa_handler = oact._sa_handler;
1704                 old_oact->sa_mask = oact.sa_mask.sig[0];
1705                 old_oact->sa_flags = oact.sa_flags;
1706                 old_oact->sa_restorer = oact.sa_restorer;
1707             }
1708         }
1709         break;
1710     case TARGET_NR_rt_sigaction:
1711         ret = get_errno(do_sigaction(arg1, (void *)arg2, (void *)arg3));
1712         break;
1713     case TARGET_NR_sgetmask:
1714         {
1715             sigset_t cur_set;
1716             target_ulong target_set;
1717             sigprocmask(0, NULL, &cur_set);
1718             host_to_target_old_sigset(&target_set, &cur_set);
1719             ret = target_set;
1720         }
1721         break;
1722     case TARGET_NR_ssetmask:
1723         {
1724             sigset_t set, oset, cur_set;
1725             target_ulong target_set = arg1;
1726             sigprocmask(0, NULL, &cur_set);
1727             target_to_host_old_sigset(&set, &target_set);
1728             sigorset(&set, &set, &cur_set);
1729             sigprocmask(SIG_SETMASK, &set, &oset);
1730             host_to_target_old_sigset(&target_set, &oset);
1731             ret = target_set;
1732         }
1733         break;
1734     case TARGET_NR_sigprocmask:
1735         {
1736             int how = arg1;
1737             sigset_t set, oldset, *set_ptr;
1738             target_ulong *pset = (void *)arg2, *poldset = (void *)arg3;
1739
1740             if (pset) {
1741                 switch(how) {
1742                 case TARGET_SIG_BLOCK:
1743                     how = SIG_BLOCK;
1744                     break;
1745                 case TARGET_SIG_UNBLOCK:
1746                     how = SIG_UNBLOCK;
1747                     break;
1748                 case TARGET_SIG_SETMASK:
1749                     how = SIG_SETMASK;
1750                     break;
1751                 default:
1752                     ret = -EINVAL;
1753                     goto fail;
1754                 }
1755                 target_to_host_old_sigset(&set, pset);
1756                 set_ptr = &set;
1757             } else {
1758                 how = 0;
1759                 set_ptr = NULL;
1760             }
1761             ret = get_errno(sigprocmask(arg1, set_ptr, &oldset));
1762             if (!is_error(ret) && poldset) {
1763                 host_to_target_old_sigset(poldset, &oldset);
1764             }
1765         }
1766         break;
1767     case TARGET_NR_rt_sigprocmask:
1768         {
1769             int how = arg1;
1770             sigset_t set, oldset, *set_ptr;
1771             target_sigset_t *pset = (void *)arg2;
1772             target_sigset_t *poldset = (void *)arg3;
1773
1774             if (pset) {
1775                 switch(how) {
1776                 case TARGET_SIG_BLOCK:
1777                     how = SIG_BLOCK;
1778                     break;
1779                 case TARGET_SIG_UNBLOCK:
1780                     how = SIG_UNBLOCK;
1781                     break;
1782                 case TARGET_SIG_SETMASK:
1783                     how = SIG_SETMASK;
1784                     break;
1785                 default:
1786                     ret = -EINVAL;
1787                     goto fail;
1788                 }
1789                 target_to_host_sigset(&set, pset);
1790                 set_ptr = &set;
1791             } else {
1792                 how = 0;
1793                 set_ptr = NULL;
1794             }
1795             ret = get_errno(sigprocmask(how, set_ptr, &oldset));
1796             if (!is_error(ret) && poldset) {
1797                 host_to_target_sigset(poldset, &oldset);
1798             }
1799         }
1800         break;
1801     case TARGET_NR_sigpending:
1802         {
1803             sigset_t set;
1804             ret = get_errno(sigpending(&set));
1805             if (!is_error(ret)) {
1806                 host_to_target_old_sigset((target_ulong *)arg1, &set);
1807             }
1808         }
1809         break;
1810     case TARGET_NR_rt_sigpending:
1811         {
1812             sigset_t set;
1813             ret = get_errno(sigpending(&set));
1814             if (!is_error(ret)) {
1815                 host_to_target_sigset((target_sigset_t *)arg1, &set);
1816             }
1817         }
1818         break;
1819     case TARGET_NR_sigsuspend:
1820         {
1821             sigset_t set;
1822             target_to_host_old_sigset(&set, (target_ulong *)arg1);
1823             ret = get_errno(sigsuspend(&set));
1824         }
1825         break;
1826     case TARGET_NR_rt_sigsuspend:
1827         {
1828             sigset_t set;
1829             target_to_host_sigset(&set, (target_sigset_t *)arg1);
1830             ret = get_errno(sigsuspend(&set));
1831         }
1832         break;
1833     case TARGET_NR_rt_sigtimedwait:
1834         {
1835             target_sigset_t *target_set = (void *)arg1;
1836             target_siginfo_t *target_uinfo = (void *)arg2;
1837             struct target_timespec *target_uts = (void *)arg3;
1838             sigset_t set;
1839             struct timespec uts, *puts;
1840             siginfo_t uinfo;
1841
1842             target_to_host_sigset(&set, target_set);
1843             if (target_uts) {
1844                 puts = &uts;
1845                 puts->tv_sec = tswapl(target_uts->tv_sec);
1846                 puts->tv_nsec = tswapl(target_uts->tv_nsec);
1847             } else {
1848                 puts = NULL;
1849             }
1850             ret = get_errno(sigtimedwait(&set, &uinfo, puts));
1851             if (!is_error(ret) && target_uinfo) {
1852                 host_to_target_siginfo(target_uinfo, &uinfo);
1853             }
1854         }
1855         break;
1856     case TARGET_NR_rt_sigqueueinfo:
1857         {
1858             siginfo_t uinfo;
1859             target_to_host_siginfo(&uinfo, (target_siginfo_t *)arg3);
1860             ret = get_errno(sys_rt_sigqueueinfo(arg1, arg2, &uinfo));
1861         }
1862         break;
1863     case TARGET_NR_sigreturn:
1864         /* NOTE: ret is eax, so not transcoding must be done */
1865         ret = do_sigreturn(cpu_env);
1866         break;
1867     case TARGET_NR_rt_sigreturn:
1868         /* NOTE: ret is eax, so not transcoding must be done */
1869         ret = do_rt_sigreturn(cpu_env);
1870         break;
1871     case TARGET_NR_sethostname:
1872         ret = get_errno(sethostname((const char *)arg1, arg2));
1873         break;
1874     case TARGET_NR_setrlimit:
1875         {
1876             /* XXX: convert resource ? */
1877             int resource = arg1;
1878             struct target_rlimit *target_rlim = (void *)arg2;
1879             struct rlimit rlim;
1880             rlim.rlim_cur = tswapl(target_rlim->rlim_cur);
1881             rlim.rlim_max = tswapl(target_rlim->rlim_max);
1882             ret = get_errno(setrlimit(resource, &rlim));
1883         }
1884         break;
1885     case TARGET_NR_getrlimit:
1886         {
1887             /* XXX: convert resource ? */
1888             int resource = arg1;
1889             struct target_rlimit *target_rlim = (void *)arg2;
1890             struct rlimit rlim;
1891
1892             ret = get_errno(getrlimit(resource, &rlim));
1893             if (!is_error(ret)) {
1894                 target_rlim->rlim_cur = tswapl(rlim.rlim_cur);
1895                 target_rlim->rlim_max = tswapl(rlim.rlim_max);
1896             }
1897         }
1898         break;
1899     case TARGET_NR_getrusage:
1900         {
1901             struct rusage rusage;
1902             struct target_rusage *target_rusage = (void *)arg2;
1903             ret = get_errno(getrusage(arg1, &rusage));
1904             if (!is_error(ret)) {
1905                 host_to_target_rusage(target_rusage, &rusage);
1906             }
1907         }
1908         break;
1909     case TARGET_NR_gettimeofday:
1910         {
1911             struct target_timeval *target_tv = (void *)arg1;
1912             struct timeval tv;
1913             ret = get_errno(gettimeofday(&tv, NULL));
1914             if (!is_error(ret)) {
1915                 host_to_target_timeval(target_tv, &tv);
1916             }
1917         }
1918         break;
1919     case TARGET_NR_settimeofday:
1920         {
1921             struct target_timeval *target_tv = (void *)arg1;
1922             struct timeval tv;
1923             target_to_host_timeval(&tv, target_tv);
1924             ret = get_errno(settimeofday(&tv, NULL));
1925         }
1926         break;
1927     case TARGET_NR_select:
1928         {
1929             struct target_sel_arg_struct *sel = (void *)arg1;
1930             sel->n = tswapl(sel->n);
1931             sel->inp = tswapl(sel->inp);
1932             sel->outp = tswapl(sel->outp);
1933             sel->exp = tswapl(sel->exp);
1934             sel->tvp = tswapl(sel->tvp);
1935             ret = do_select(sel->n, (void *)sel->inp, (void *)sel->outp,
1936                             (void *)sel->exp, (void *)sel->tvp);
1937         }
1938         break;
1939     case TARGET_NR_symlink:
1940         ret = get_errno(symlink((const char *)arg1, (const char *)arg2));
1941         break;
1942 #ifdef TARGET_NR_oldlstat
1943     case TARGET_NR_oldlstat:
1944         goto unimplemented;
1945 #endif
1946     case TARGET_NR_readlink:
1947         ret = get_errno(readlink(path((const char *)arg1), (char *)arg2, arg3));
1948         break;
1949     case TARGET_NR_uselib:
1950         goto unimplemented;
1951     case TARGET_NR_swapon:
1952         ret = get_errno(swapon((const char *)arg1, arg2));
1953         break;
1954     case TARGET_NR_reboot:
1955         goto unimplemented;
1956     case TARGET_NR_readdir:
1957         goto unimplemented;
1958     case TARGET_NR_mmap:
1959 #if defined(TARGET_I386) || defined(TARGET_ARM)
1960         {
1961             uint32_t v1, v2, v3, v4, v5, v6, *vptr;
1962             vptr = (uint32_t *)arg1;
1963             v1 = tswap32(vptr[0]);
1964             v2 = tswap32(vptr[1]);
1965             v3 = tswap32(vptr[2]);
1966             v4 = tswap32(vptr[3]);
1967             v5 = tswap32(vptr[4]);
1968             v6 = tswap32(vptr[5]);
1969             ret = get_errno(target_mmap(v1, v2, v3,
1970                                         target_to_host_bitmask(v4, mmap_flags_tbl),
1971                                         v5, v6));
1972         }
1973 #else
1974         ret = get_errno(target_mmap(arg1, arg2, arg3,
1975                                     target_to_host_bitmask(arg4, mmap_flags_tbl),
1976                                     arg5,
1977                                     arg6));
1978 #endif
1979         break;
1980     case TARGET_NR_mmap2:
1981         ret = get_errno(target_mmap(arg1, arg2, arg3,
1982                                     target_to_host_bitmask(arg4, mmap_flags_tbl),
1983                                     arg5,
1984                                     arg6 << TARGET_PAGE_BITS));
1985         break;
1986     case TARGET_NR_munmap:
1987         ret = get_errno(target_munmap(arg1, arg2));
1988         break;
1989     case TARGET_NR_mprotect:
1990         ret = get_errno(target_mprotect(arg1, arg2, arg3));
1991         break;
1992     case TARGET_NR_mremap:
1993         ret = get_errno(target_mremap(arg1, arg2, arg3, arg4, arg5));
1994         break;
1995     case TARGET_NR_msync:
1996         ret = get_errno(msync((void *)arg1, arg2, arg3));
1997         break;
1998     case TARGET_NR_mlock:
1999         ret = get_errno(mlock((void *)arg1, arg2));
2000         break;
2001     case TARGET_NR_munlock:
2002         ret = get_errno(munlock((void *)arg1, arg2));
2003         break;
2004     case TARGET_NR_mlockall:
2005         ret = get_errno(mlockall(arg1));
2006         break;
2007     case TARGET_NR_munlockall:
2008         ret = get_errno(munlockall());
2009         break;
2010     case TARGET_NR_truncate:
2011         ret = get_errno(truncate((const char *)arg1, arg2));
2012         break;
2013     case TARGET_NR_ftruncate:
2014         ret = get_errno(ftruncate(arg1, arg2));
2015         break;
2016     case TARGET_NR_fchmod:
2017         ret = get_errno(fchmod(arg1, arg2));
2018         break;
2019     case TARGET_NR_getpriority:
2020         ret = get_errno(getpriority(arg1, arg2));
2021         break;
2022     case TARGET_NR_setpriority:
2023         ret = get_errno(setpriority(arg1, arg2, arg3));
2024         break;
2025 #ifdef TARGET_NR_profil
2026     case TARGET_NR_profil:
2027         goto unimplemented;
2028 #endif
2029     case TARGET_NR_statfs:
2030         stfs = (void *)arg2;
2031         ret = get_errno(sys_statfs(path((const char *)arg1), stfs));
2032     convert_statfs:
2033         if (!is_error(ret)) {
2034             tswap32s(&stfs->f_type);
2035             tswap32s(&stfs->f_bsize);
2036             tswap32s(&stfs->f_blocks);
2037             tswap32s(&stfs->f_bfree);
2038             tswap32s(&stfs->f_bavail);
2039             tswap32s(&stfs->f_files);
2040             tswap32s(&stfs->f_ffree);
2041             tswap32s(&stfs->f_fsid.val[0]);
2042             tswap32s(&stfs->f_fsid.val[1]);
2043             tswap32s(&stfs->f_namelen);
2044         }
2045         break;
2046     case TARGET_NR_fstatfs:
2047         stfs = (void *)arg2;
2048         ret = get_errno(sys_fstatfs(arg1, stfs));
2049         goto convert_statfs;
2050 #ifdef TARGET_NR_ioperm
2051     case TARGET_NR_ioperm:
2052         goto unimplemented;
2053 #endif
2054     case TARGET_NR_socketcall:
2055         ret = do_socketcall(arg1, (int32_t *)arg2);
2056         break;
2057     case TARGET_NR_syslog:
2058         goto unimplemented;
2059     case TARGET_NR_setitimer:
2060         {
2061             struct target_itimerval *target_value = (void *)arg2;
2062             struct target_itimerval *target_ovalue = (void *)arg3;
2063             struct itimerval value, ovalue, *pvalue;
2064
2065             if (target_value) {
2066                 pvalue = &value;
2067                 target_to_host_timeval(&pvalue->it_interval,
2068                                        &target_value->it_interval);
2069                 target_to_host_timeval(&pvalue->it_value,
2070                                        &target_value->it_value);
2071             } else {
2072                 pvalue = NULL;
2073             }
2074             ret = get_errno(setitimer(arg1, pvalue, &ovalue));
2075             if (!is_error(ret) && target_ovalue) {
2076                 host_to_target_timeval(&target_ovalue->it_interval,
2077                                        &ovalue.it_interval);
2078                 host_to_target_timeval(&target_ovalue->it_value,
2079                                        &ovalue.it_value);
2080             }
2081         }
2082         break;
2083     case TARGET_NR_getitimer:
2084         {
2085             struct target_itimerval *target_value = (void *)arg2;
2086             struct itimerval value;
2087
2088             ret = get_errno(getitimer(arg1, &value));
2089             if (!is_error(ret) && target_value) {
2090                 host_to_target_timeval(&target_value->it_interval,
2091                                        &value.it_interval);
2092                 host_to_target_timeval(&target_value->it_value,
2093                                        &value.it_value);
2094             }
2095         }
2096         break;
2097     case TARGET_NR_stat:
2098         ret = get_errno(stat(path((const char *)arg1), &st));
2099         goto do_stat;
2100     case TARGET_NR_lstat:
2101         ret = get_errno(lstat(path((const char *)arg1), &st));
2102         goto do_stat;
2103     case TARGET_NR_fstat:
2104         {
2105             ret = get_errno(fstat(arg1, &st));
2106         do_stat:
2107             if (!is_error(ret)) {
2108                 struct target_stat *target_st = (void *)arg2;
2109                 target_st->st_dev = tswap16(st.st_dev);
2110                 target_st->st_ino = tswapl(st.st_ino);
2111 #if defined(TARGET_PPC)
2112                 target_st->st_mode = tswapl(st.st_mode); /* XXX: check this */
2113                 target_st->st_uid = tswap32(st.st_uid);
2114                 target_st->st_gid = tswap32(st.st_gid);
2115 #else
2116                 target_st->st_mode = tswap16(st.st_mode);
2117                 target_st->st_uid = tswap16(st.st_uid);
2118                 target_st->st_gid = tswap16(st.st_gid);
2119 #endif
2120                 target_st->st_nlink = tswap16(st.st_nlink);
2121                 target_st->st_rdev = tswap16(st.st_rdev);
2122                 target_st->st_size = tswapl(st.st_size);
2123                 target_st->st_blksize = tswapl(st.st_blksize);
2124                 target_st->st_blocks = tswapl(st.st_blocks);
2125                 target_st->target_st_atime = tswapl(st.st_atime);
2126                 target_st->target_st_mtime = tswapl(st.st_mtime);
2127                 target_st->target_st_ctime = tswapl(st.st_ctime);
2128             }
2129         }
2130         break;
2131 #ifdef TARGET_NR_olduname
2132     case TARGET_NR_olduname:
2133         goto unimplemented;
2134 #endif
2135 #ifdef TARGET_NR_iopl
2136     case TARGET_NR_iopl:
2137         goto unimplemented;
2138 #endif
2139     case TARGET_NR_vhangup:
2140         ret = get_errno(vhangup());
2141         break;
2142 #ifdef TARGET_NR_idle
2143     case TARGET_NR_idle:
2144         goto unimplemented;
2145 #endif
2146     case TARGET_NR_wait4:
2147         {
2148             int status;
2149             target_long *status_ptr = (void *)arg2;
2150             struct rusage rusage, *rusage_ptr;
2151             struct target_rusage *target_rusage = (void *)arg4;
2152             if (target_rusage)
2153                 rusage_ptr = &rusage;
2154             else
2155                 rusage_ptr = NULL;
2156             ret = get_errno(wait4(arg1, &status, arg3, rusage_ptr));
2157             if (!is_error(ret)) {
2158                 if (status_ptr)
2159                     *status_ptr = tswap32(status);
2160                 if (target_rusage) {
2161                     host_to_target_rusage(target_rusage, &rusage);
2162                 }
2163             }
2164         }
2165         break;
2166     case TARGET_NR_swapoff:
2167         ret = get_errno(swapoff((const char *)arg1));
2168         break;
2169     case TARGET_NR_sysinfo:
2170         goto unimplemented;
2171     case TARGET_NR_ipc:
2172         goto unimplemented;
2173     case TARGET_NR_fsync:
2174         ret = get_errno(fsync(arg1));
2175         break;
2176     case TARGET_NR_clone:
2177         ret = get_errno(do_fork(cpu_env, arg1, arg2));
2178         break;
2179 #ifdef __NR_exit_group
2180         /* new thread calls */
2181     case TARGET_NR_exit_group:
2182         ret = get_errno(exit_group(arg1));
2183         break;
2184 #endif
2185     case TARGET_NR_setdomainname:
2186         ret = get_errno(setdomainname((const char *)arg1, arg2));
2187         break;
2188     case TARGET_NR_uname:
2189         /* no need to transcode because we use the linux syscall */
2190         ret = get_errno(sys_uname((struct new_utsname *)arg1));
2191         break;
2192 #ifdef TARGET_I386
2193     case TARGET_NR_modify_ldt:
2194         ret = get_errno(do_modify_ldt(cpu_env, arg1, (void *)arg2, arg3));
2195         break;
2196     case TARGET_NR_vm86old:
2197         goto unimplemented;
2198     case TARGET_NR_vm86:
2199         ret = do_vm86(cpu_env, arg1, (void *)arg2);
2200         break;
2201 #endif
2202     case TARGET_NR_adjtimex:
2203         goto unimplemented;
2204     case TARGET_NR_create_module:
2205     case TARGET_NR_init_module:
2206     case TARGET_NR_delete_module:
2207     case TARGET_NR_get_kernel_syms:
2208         goto unimplemented;
2209     case TARGET_NR_quotactl:
2210         goto unimplemented;
2211     case TARGET_NR_getpgid:
2212         ret = get_errno(getpgid(arg1));
2213         break;
2214     case TARGET_NR_fchdir:
2215         ret = get_errno(fchdir(arg1));
2216         break;
2217     case TARGET_NR_bdflush:
2218         goto unimplemented;
2219     case TARGET_NR_sysfs:
2220         goto unimplemented;
2221     case TARGET_NR_personality:
2222         ret = get_errno(personality(arg1));
2223         break;
2224     case TARGET_NR_afs_syscall:
2225         goto unimplemented;
2226     case TARGET_NR__llseek:
2227         {
2228             int64_t res;
2229             ret = get_errno(_llseek(arg1, arg2, arg3, &res, arg5));
2230             *(int64_t *)arg4 = tswap64(res);
2231         }
2232         break;
2233     case TARGET_NR_getdents:
2234 #if TARGET_LONG_SIZE != 4
2235 #error not supported
2236 #elif TARGET_LONG_SIZE == 4 && HOST_LONG_SIZE == 8
2237         {
2238             struct target_dirent *target_dirp = (void *)arg2;
2239             struct dirent *dirp;
2240             long count = arg3;
2241
2242             dirp = malloc(count);
2243             if (!dirp)
2244                 return -ENOMEM;
2245
2246             ret = get_errno(sys_getdents(arg1, dirp, count));
2247             if (!is_error(ret)) {
2248                 struct dirent *de;
2249                 struct target_dirent *tde;
2250                 int len = ret;
2251                 int reclen, treclen;
2252                 int count1, tnamelen;
2253
2254                 count1 = 0;
2255                 de = dirp;
2256                 tde = target_dirp;
2257                 while (len > 0) {
2258                     reclen = de->d_reclen;
2259                     treclen = reclen - (2 * (sizeof(long) - sizeof(target_long)));
2260                     tde->d_reclen = tswap16(treclen);
2261                     tde->d_ino = tswapl(de->d_ino);
2262                     tde->d_off = tswapl(de->d_off);
2263                     tnamelen = treclen - (2 * sizeof(target_long) + 2);
2264                     if (tnamelen > 256)
2265                         tnamelen = 256;
2266                     strncpy(tde->d_name, de->d_name, tnamelen);
2267                     de = (struct dirent *)((char *)de + reclen);
2268                     len -= reclen;
2269                     tde = (struct dirent *)((char *)tde + treclen);
2270                     count1 += treclen;
2271                 }
2272                 ret = count1;
2273             }
2274             free(dirp);
2275         }
2276 #else
2277         {
2278             struct dirent *dirp = (void *)arg2;
2279             long count = arg3;
2280
2281             ret = get_errno(sys_getdents(arg1, dirp, count));
2282             if (!is_error(ret)) {
2283                 struct dirent *de;
2284                 int len = ret;
2285                 int reclen;
2286                 de = dirp;
2287                 while (len > 0) {
2288                     reclen = de->d_reclen;
2289                     if (reclen > len)
2290                         break;
2291                     de->d_reclen = tswap16(reclen);
2292                     tswapls(&de->d_ino);
2293                     tswapls(&de->d_off);
2294                     de = (struct dirent *)((char *)de + reclen);
2295                     len -= reclen;
2296                 }
2297             }
2298         }
2299 #endif
2300         break;
2301     case TARGET_NR_getdents64:
2302         {
2303             struct dirent64 *dirp = (void *)arg2;
2304             long count = arg3;
2305             ret = get_errno(sys_getdents64(arg1, dirp, count));
2306             if (!is_error(ret)) {
2307                 struct dirent64 *de;
2308                 int len = ret;
2309                 int reclen;
2310                 de = dirp;
2311                 while (len > 0) {
2312                     reclen = de->d_reclen;
2313                     if (reclen > len)
2314                         break;
2315                     de->d_reclen = tswap16(reclen);
2316                     tswap64s(&de->d_ino);
2317                     tswap64s(&de->d_off);
2318                     de = (struct dirent64 *)((char *)de + reclen);
2319                     len -= reclen;
2320                 }
2321             }
2322         }
2323         break;
2324     case TARGET_NR__newselect:
2325         ret = do_select(arg1, (void *)arg2, (void *)arg3, (void *)arg4,
2326                         (void *)arg5);
2327         break;
2328     case TARGET_NR_poll:
2329         {
2330             struct target_pollfd *target_pfd = (void *)arg1;
2331             unsigned int nfds = arg2;
2332             int timeout = arg3;
2333             struct pollfd *pfd;
2334             unsigned int i;
2335
2336             pfd = alloca(sizeof(struct pollfd) * nfds);
2337             for(i = 0; i < nfds; i++) {
2338                 pfd[i].fd = tswap32(target_pfd[i].fd);
2339                 pfd[i].events = tswap16(target_pfd[i].events);
2340             }
2341             ret = get_errno(poll(pfd, nfds, timeout));
2342             if (!is_error(ret)) {
2343                 for(i = 0; i < nfds; i++) {
2344                     target_pfd[i].revents = tswap16(pfd[i].revents);
2345                 }
2346             }
2347         }
2348         break;
2349     case TARGET_NR_flock:
2350         /* NOTE: the flock constant seems to be the same for every
2351            Linux platform */
2352         ret = get_errno(flock(arg1, arg2));
2353         break;
2354     case TARGET_NR_readv:
2355         {
2356             int count = arg3;
2357             int i;
2358             struct iovec *vec;
2359             struct target_iovec *target_vec = (void *)arg2;
2360
2361             vec = alloca(count * sizeof(struct iovec));
2362             for(i = 0;i < count; i++) {
2363                 vec[i].iov_base = (void *)tswapl(target_vec[i].iov_base);
2364                 vec[i].iov_len = tswapl(target_vec[i].iov_len);
2365             }
2366             ret = get_errno(readv(arg1, vec, count));
2367         }
2368         break;
2369     case TARGET_NR_writev:
2370         {
2371             int count = arg3;
2372             int i;
2373             struct iovec *vec;
2374             struct target_iovec *target_vec = (void *)arg2;
2375
2376             vec = alloca(count * sizeof(struct iovec));
2377             for(i = 0;i < count; i++) {
2378                 vec[i].iov_base = (void *)tswapl(target_vec[i].iov_base);
2379                 vec[i].iov_len = tswapl(target_vec[i].iov_len);
2380             }
2381             ret = get_errno(writev(arg1, vec, count));
2382         }
2383         break;
2384     case TARGET_NR_getsid:
2385         ret = get_errno(getsid(arg1));
2386         break;
2387     case TARGET_NR_fdatasync:
2388         ret = get_errno(fdatasync(arg1));
2389         break;
2390     case TARGET_NR__sysctl:
2391         goto unimplemented;
2392     case TARGET_NR_sched_setparam:
2393         {
2394             struct sched_param *target_schp = (void *)arg2;
2395             struct sched_param schp;
2396             schp.sched_priority = tswap32(target_schp->sched_priority);
2397             ret = get_errno(sched_setparam(arg1, &schp));
2398         }
2399         break;
2400     case TARGET_NR_sched_getparam:
2401         {
2402             struct sched_param *target_schp = (void *)arg2;
2403             struct sched_param schp;
2404             ret = get_errno(sched_getparam(arg1, &schp));
2405             if (!is_error(ret)) {
2406                 target_schp->sched_priority = tswap32(schp.sched_priority);
2407             }
2408         }
2409         break;
2410     case TARGET_NR_sched_setscheduler:
2411         {
2412             struct sched_param *target_schp = (void *)arg3;
2413             struct sched_param schp;
2414             schp.sched_priority = tswap32(target_schp->sched_priority);
2415             ret = get_errno(sched_setscheduler(arg1, arg2, &schp));
2416         }
2417         break;
2418     case TARGET_NR_sched_getscheduler:
2419         ret = get_errno(sched_getscheduler(arg1));
2420         break;
2421     case TARGET_NR_sched_yield:
2422         ret = get_errno(sched_yield());
2423         break;
2424     case TARGET_NR_sched_get_priority_max:
2425         ret = get_errno(sched_get_priority_max(arg1));
2426         break;
2427     case TARGET_NR_sched_get_priority_min:
2428         ret = get_errno(sched_get_priority_min(arg1));
2429         break;
2430     case TARGET_NR_sched_rr_get_interval:
2431         {
2432             struct target_timespec *target_ts = (void *)arg2;
2433             struct timespec ts;
2434             ret = get_errno(sched_rr_get_interval(arg1, &ts));
2435             if (!is_error(ret)) {
2436                 target_ts->tv_sec = tswapl(ts.tv_sec);
2437                 target_ts->tv_nsec = tswapl(ts.tv_nsec);
2438             }
2439         }
2440         break;
2441     case TARGET_NR_nanosleep:
2442         {
2443             struct target_timespec *target_req = (void *)arg1;
2444             struct target_timespec *target_rem = (void *)arg2;
2445             struct timespec req, rem;
2446             req.tv_sec = tswapl(target_req->tv_sec);
2447             req.tv_nsec = tswapl(target_req->tv_nsec);
2448             ret = get_errno(nanosleep(&req, &rem));
2449             if (is_error(ret) && target_rem) {
2450                 target_rem->tv_sec = tswapl(rem.tv_sec);
2451                 target_rem->tv_nsec = tswapl(rem.tv_nsec);
2452             }
2453         }
2454         break;
2455     case TARGET_NR_query_module:
2456         goto unimplemented;
2457     case TARGET_NR_nfsservctl:
2458         goto unimplemented;
2459     case TARGET_NR_prctl:
2460         goto unimplemented;
2461 #ifdef TARGET_NR_pread
2462     case TARGET_NR_pread:
2463         page_unprotect_range((void *)arg2, arg3);
2464         ret = get_errno(pread(arg1, (void *)arg2, arg3, arg4));
2465         break;
2466     case TARGET_NR_pwrite:
2467         ret = get_errno(pwrite(arg1, (void *)arg2, arg3, arg4));
2468         break;
2469 #endif
2470     case TARGET_NR_getcwd:
2471         ret = get_errno(sys_getcwd1((char *)arg1, arg2));
2472         break;
2473     case TARGET_NR_capget:
2474         goto unimplemented;
2475     case TARGET_NR_capset:
2476         goto unimplemented;
2477     case TARGET_NR_sigaltstack:
2478         goto unimplemented;
2479     case TARGET_NR_sendfile:
2480         goto unimplemented;
2481 #ifdef TARGET_NR_getpmsg
2482     case TARGET_NR_getpmsg:
2483         goto unimplemented;
2484 #endif
2485 #ifdef TARGET_NR_putpmsg
2486     case TARGET_NR_putpmsg:
2487         goto unimplemented;
2488 #endif
2489     case TARGET_NR_vfork:
2490         ret = get_errno(do_fork(cpu_env, CLONE_VFORK | CLONE_VM | SIGCHLD, 0));
2491         break;
2492 #ifdef TARGET_NR_ugetrlimit
2493     case TARGET_NR_ugetrlimit:
2494     {
2495         struct rlimit rlim;
2496         ret = get_errno(getrlimit(arg1, &rlim));
2497         if (!is_error(ret)) {
2498             struct target_rlimit *target_rlim = (void *)arg2;
2499             target_rlim->rlim_cur = tswapl(rlim.rlim_cur);
2500             target_rlim->rlim_max = tswapl(rlim.rlim_max);
2501         }
2502         break;
2503     }
2504 #endif
2505     case TARGET_NR_truncate64:
2506         goto unimplemented;
2507     case TARGET_NR_ftruncate64:
2508         goto unimplemented;
2509     case TARGET_NR_stat64:
2510         ret = get_errno(stat(path((const char *)arg1), &st));
2511         goto do_stat64;
2512     case TARGET_NR_lstat64:
2513         ret = get_errno(lstat(path((const char *)arg1), &st));
2514         goto do_stat64;
2515     case TARGET_NR_fstat64:
2516         {
2517             ret = get_errno(fstat(arg1, &st));
2518         do_stat64:
2519             if (!is_error(ret)) {
2520                 struct target_stat64 *target_st = (void *)arg2;
2521                 memset(target_st, 0, sizeof(struct target_stat64));
2522                 target_st->st_dev = tswap16(st.st_dev);
2523                 target_st->st_ino = tswap64(st.st_ino);
2524 #ifdef TARGET_STAT64_HAS_BROKEN_ST_INO
2525                 target_st->__st_ino = tswapl(st.st_ino);
2526 #endif
2527                 target_st->st_mode = tswap32(st.st_mode);
2528                 target_st->st_nlink = tswap32(st.st_nlink);
2529                 target_st->st_uid = tswapl(st.st_uid);
2530                 target_st->st_gid = tswapl(st.st_gid);
2531                 target_st->st_rdev = tswap16(st.st_rdev);
2532                 /* XXX: better use of kernel struct */
2533                 target_st->st_size = tswap64(st.st_size);
2534                 target_st->st_blksize = tswapl(st.st_blksize);
2535                 target_st->st_blocks = tswapl(st.st_blocks);
2536                 target_st->target_st_atime = tswapl(st.st_atime);
2537                 target_st->target_st_mtime = tswapl(st.st_mtime);
2538                 target_st->target_st_ctime = tswapl(st.st_ctime);
2539             }
2540         }
2541         break;
2542
2543 #ifdef USE_UID16
2544     case TARGET_NR_lchown:
2545         ret = get_errno(lchown((const char *)arg1, low2highuid(arg2), low2highgid(arg3)));
2546         break;
2547     case TARGET_NR_getuid:
2548         ret = get_errno(high2lowuid(getuid()));
2549         break;
2550     case TARGET_NR_getgid:
2551         ret = get_errno(high2lowgid(getgid()));
2552         break;
2553     case TARGET_NR_geteuid:
2554         ret = get_errno(high2lowuid(geteuid()));
2555         break;
2556     case TARGET_NR_getegid:
2557         ret = get_errno(high2lowgid(getegid()));
2558         break;
2559     case TARGET_NR_setreuid:
2560         ret = get_errno(setreuid(low2highuid(arg1), low2highuid(arg2)));
2561         break;
2562     case TARGET_NR_setregid:
2563         ret = get_errno(setregid(low2highgid(arg1), low2highgid(arg2)));
2564         break;
2565     case TARGET_NR_getgroups:
2566         {
2567             int gidsetsize = arg1;
2568             uint16_t *target_grouplist = (void *)arg2;
2569             gid_t *grouplist;
2570             int i;
2571
2572             grouplist = alloca(gidsetsize * sizeof(gid_t));
2573             ret = get_errno(getgroups(gidsetsize, grouplist));
2574             if (!is_error(ret)) {
2575                 for(i = 0;i < gidsetsize; i++)
2576                     target_grouplist[i] = tswap16(grouplist[i]);
2577             }
2578         }
2579         break;
2580     case TARGET_NR_setgroups:
2581         {
2582             int gidsetsize = arg1;
2583             uint16_t *target_grouplist = (void *)arg2;
2584             gid_t *grouplist;
2585             int i;
2586
2587             grouplist = alloca(gidsetsize * sizeof(gid_t));
2588             for(i = 0;i < gidsetsize; i++)
2589                 grouplist[i] = tswap16(target_grouplist[i]);
2590             ret = get_errno(setgroups(gidsetsize, grouplist));
2591         }
2592         break;
2593     case TARGET_NR_fchown:
2594         ret = get_errno(fchown(arg1, low2highuid(arg2), low2highgid(arg3)));
2595         break;
2596 #ifdef TARGET_NR_setresuid
2597     case TARGET_NR_setresuid:
2598         ret = get_errno(setresuid(low2highuid(arg1),
2599                                   low2highuid(arg2),
2600                                   low2highuid(arg3)));
2601         break;
2602 #endif
2603 #ifdef TARGET_NR_getresuid
2604     case TARGET_NR_getresuid:
2605         {
2606             int ruid, euid, suid;
2607             ret = get_errno(getresuid(&ruid, &euid, &suid));
2608             if (!is_error(ret)) {
2609                 *(uint16_t *)arg1 = tswap16(high2lowuid(ruid));
2610                 *(uint16_t *)arg2 = tswap16(high2lowuid(euid));
2611                 *(uint16_t *)arg3 = tswap16(high2lowuid(suid));
2612             }
2613         }
2614         break;
2615 #endif
2616 #ifdef TARGET_NR_getresgid
2617     case TARGET_NR_setresgid:
2618         ret = get_errno(setresgid(low2highgid(arg1),
2619                                   low2highgid(arg2),
2620                                   low2highgid(arg3)));
2621         break;
2622 #endif
2623 #ifdef TARGET_NR_getresgid
2624     case TARGET_NR_getresgid:
2625         {
2626             int rgid, egid, sgid;
2627             ret = get_errno(getresgid(&rgid, &egid, &sgid));
2628             if (!is_error(ret)) {
2629                 *(uint16_t *)arg1 = tswap16(high2lowgid(rgid));
2630                 *(uint16_t *)arg2 = tswap16(high2lowgid(egid));
2631                 *(uint16_t *)arg3 = tswap16(high2lowgid(sgid));
2632             }
2633         }
2634         break;
2635 #endif
2636     case TARGET_NR_chown:
2637         ret = get_errno(chown((const char *)arg1, low2highuid(arg2), low2highgid(arg3)));
2638         break;
2639     case TARGET_NR_setuid:
2640         ret = get_errno(setuid(low2highuid(arg1)));
2641         break;
2642     case TARGET_NR_setgid:
2643         ret = get_errno(setgid(low2highgid(arg1)));
2644         break;
2645     case TARGET_NR_setfsuid:
2646         ret = get_errno(setfsuid(arg1));
2647         break;
2648     case TARGET_NR_setfsgid:
2649         ret = get_errno(setfsgid(arg1));
2650         break;
2651 #endif /* USE_UID16 */
2652
2653     case TARGET_NR_lchown32:
2654         ret = get_errno(lchown((const char *)arg1, arg2, arg3));
2655         break;
2656     case TARGET_NR_getuid32:
2657         ret = get_errno(getuid());
2658         break;
2659     case TARGET_NR_getgid32:
2660         ret = get_errno(getgid());
2661         break;
2662     case TARGET_NR_geteuid32:
2663         ret = get_errno(geteuid());
2664         break;
2665     case TARGET_NR_getegid32:
2666         ret = get_errno(getegid());
2667         break;
2668     case TARGET_NR_setreuid32:
2669         ret = get_errno(setreuid(arg1, arg2));
2670         break;
2671     case TARGET_NR_setregid32:
2672         ret = get_errno(setregid(arg1, arg2));
2673         break;
2674     case TARGET_NR_getgroups32:
2675         goto unimplemented;
2676     case TARGET_NR_setgroups32:
2677         goto unimplemented;
2678     case TARGET_NR_fchown32:
2679         ret = get_errno(fchown(arg1, arg2, arg3));
2680         break;
2681     case TARGET_NR_setresuid32:
2682         ret = get_errno(setresuid(arg1, arg2, arg3));
2683         break;
2684     case TARGET_NR_getresuid32:
2685         {
2686             int ruid, euid, suid;
2687             ret = get_errno(getresuid(&ruid, &euid, &suid));
2688             if (!is_error(ret)) {
2689                 *(uint32_t *)arg1 = tswap32(ruid);
2690                 *(uint32_t *)arg2 = tswap32(euid);
2691                 *(uint32_t *)arg3 = tswap32(suid);
2692             }
2693         }
2694         break;
2695     case TARGET_NR_setresgid32:
2696         ret = get_errno(setresgid(arg1, arg2, arg3));
2697         break;
2698     case TARGET_NR_getresgid32:
2699         {
2700             int rgid, egid, sgid;
2701             ret = get_errno(getresgid(&rgid, &egid, &sgid));
2702             if (!is_error(ret)) {
2703                 *(uint32_t *)arg1 = tswap32(rgid);
2704                 *(uint32_t *)arg2 = tswap32(egid);
2705                 *(uint32_t *)arg3 = tswap32(sgid);
2706             }
2707         }
2708         break;
2709     case TARGET_NR_chown32:
2710         ret = get_errno(chown((const char *)arg1, arg2, arg3));
2711         break;
2712     case TARGET_NR_setuid32:
2713         ret = get_errno(setuid(arg1));
2714         break;
2715     case TARGET_NR_setgid32:
2716         ret = get_errno(setgid(arg1));
2717         break;
2718     case TARGET_NR_setfsuid32:
2719         ret = get_errno(setfsuid(arg1));
2720         break;
2721     case TARGET_NR_setfsgid32:
2722         ret = get_errno(setfsgid(arg1));
2723         break;
2724
2725     case TARGET_NR_pivot_root:
2726         goto unimplemented;
2727     case TARGET_NR_mincore:
2728         goto unimplemented;
2729     case TARGET_NR_madvise:
2730         goto unimplemented;
2731 #if TARGET_LONG_BITS == 32
2732     case TARGET_NR_fcntl64:
2733     {
2734         struct flock64 fl;
2735         struct target_flock64 *target_fl = (void *)arg3;
2736
2737         switch(arg2) {
2738         case F_GETLK64:
2739             ret = get_errno(fcntl(arg1, arg2, &fl));
2740             if (ret == 0) {
2741                 target_fl->l_type = tswap16(fl.l_type);
2742                 target_fl->l_whence = tswap16(fl.l_whence);
2743                 target_fl->l_start = tswap64(fl.l_start);
2744                 target_fl->l_len = tswap64(fl.l_len);
2745                 target_fl->l_pid = tswapl(fl.l_pid);
2746             }
2747             break;
2748
2749         case F_SETLK64:
2750         case F_SETLKW64:
2751             fl.l_type = tswap16(target_fl->l_type);
2752             fl.l_whence = tswap16(target_fl->l_whence);
2753             fl.l_start = tswap64(target_fl->l_start);
2754             fl.l_len = tswap64(target_fl->l_len);
2755             fl.l_pid = tswapl(target_fl->l_pid);
2756             ret = get_errno(fcntl(arg1, arg2, &fl));
2757             break;
2758         default:
2759             ret = get_errno(do_fcntl(arg1, arg2, arg3));
2760             break;
2761         }
2762         break;
2763     }
2764 #endif
2765 #ifdef TARGET_NR_security
2766     case TARGET_NR_security:
2767         goto unimplemented;
2768 #endif
2769     case TARGET_NR_gettid:
2770         ret = get_errno(gettid());
2771         break;
2772     case TARGET_NR_readahead:
2773         goto unimplemented;
2774 #ifdef TARGET_NR_setxattr
2775     case TARGET_NR_setxattr:
2776     case TARGET_NR_lsetxattr:
2777     case TARGET_NR_fsetxattr:
2778     case TARGET_NR_getxattr:
2779     case TARGET_NR_lgetxattr:
2780     case TARGET_NR_fgetxattr:
2781     case TARGET_NR_listxattr:
2782     case TARGET_NR_llistxattr:
2783     case TARGET_NR_flistxattr:
2784     case TARGET_NR_removexattr:
2785     case TARGET_NR_lremovexattr:
2786     case TARGET_NR_fremovexattr:
2787         goto unimplemented_nowarn;
2788 #endif
2789 #ifdef TARGET_NR_set_thread_area
2790     case TARGET_NR_set_thread_area:
2791     case TARGET_NR_get_thread_area:
2792         goto unimplemented_nowarn;
2793 #endif
2794     default:
2795     unimplemented:
2796         gemu_log("qemu: Unsupported syscall: %d\n", num);
2797     unimplemented_nowarn:
2798         ret = -ENOSYS;
2799         break;
2800     }
2801  fail:
2802     return ret;
2803 }
2804