syscall.c 306.5 KB
Newer Older
1 2
/*
 *  Linux syscalls
3
 *
4 5 6 7 8 9 10 11 12 13 14 15 16
 *  Copyright (c) 2003 Fabrice Bellard
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
17
 *  along with this program; if not, see <http://www.gnu.org/licenses/>.
18
 */
19
#define _ATFILE_SOURCE
20 21 22
#include <stdlib.h>
#include <stdio.h>
#include <stdarg.h>
B
bellard 已提交
23
#include <string.h>
24 25 26 27 28
#include <elf.h>
#include <endian.h>
#include <errno.h>
#include <unistd.h>
#include <fcntl.h>
B
bellard 已提交
29
#include <time.h>
30
#include <limits.h>
31
#include <grp.h>
32
#include <sys/types.h>
T
ths 已提交
33 34
#include <sys/ipc.h>
#include <sys/msg.h>
35 36 37 38
#include <sys/wait.h>
#include <sys/time.h>
#include <sys/stat.h>
#include <sys/mount.h>
39 40 41
#include <sys/file.h>
#include <sys/fsuid.h>
#include <sys/personality.h>
42
#include <sys/prctl.h>
43 44 45
#include <sys/resource.h>
#include <sys/mman.h>
#include <sys/swap.h>
46
#include <linux/capability.h>
47 48
#include <signal.h>
#include <sched.h>
49 50 51 52
#ifdef __ia64__
int __clone2(int (*fn)(void *), void *child_stack_base,
             size_t stack_size, int flags, void *arg, ...);
#endif
53
#include <sys/socket.h>
54
#include <sys/un.h>
55
#include <sys/uio.h>
B
bellard 已提交
56
#include <sys/poll.h>
B
bellard 已提交
57
#include <sys/times.h>
58
#include <sys/shm.h>
59
#include <sys/sem.h>
B
bellard 已提交
60
#include <sys/statfs.h>
61
#include <utime.h>
B
bellard 已提交
62
#include <sys/sysinfo.h>
B
bellard 已提交
63
//#include <sys/user.h>
64
#include <netinet/ip.h>
B
bellard 已提交
65
#include <netinet/tcp.h>
66
#include <linux/wireless.h>
67
#include <linux/icmp.h>
68
#include "qemu-common.h"
69 70 71
#ifdef CONFIG_TIMERFD
#include <sys/timerfd.h>
#endif
72
#ifdef TARGET_GPROF
A
aurel32 已提交
73 74
#include <sys/gmon.h>
#endif
R
Riku Voipio 已提交
75 76 77
#ifdef CONFIG_EVENTFD
#include <sys/eventfd.h>
#endif
78 79 80
#ifdef CONFIG_EPOLL
#include <sys/epoll.h>
#endif
81
#ifdef CONFIG_ATTR
82
#include "qemu/xattr.h"
83
#endif
84 85 86
#ifdef CONFIG_SENDFILE
#include <sys/sendfile.h>
#endif
87 88 89 90

#define termios host_termios
#define winsize host_winsize
#define termio host_termio
B
bellard 已提交
91 92 93
#define sgttyb host_sgttyb /* same as target */
#define tchars host_tchars /* same as target */
#define ltchars host_ltchars /* same as target */
94 95 96 97 98 99

#include <linux/termios.h>
#include <linux/unistd.h>
#include <linux/cdrom.h>
#include <linux/hdreg.h>
#include <linux/soundcard.h>
B
bellard 已提交
100
#include <linux/kd.h>
101
#include <linux/mtio.h>
M
Martin Mohring 已提交
102
#include <linux/fs.h>
103
#if defined(CONFIG_FIEMAP)
104
#include <linux/fiemap.h>
105
#endif
U
Ulrich Hecht 已提交
106 107
#include <linux/fb.h>
#include <linux/vt.h>
108
#include <linux/dm-ioctl.h>
L
Laurent Vivier 已提交
109
#include <linux/reboot.h>
110
#include <linux/route.h>
111
#include <linux/filter.h>
112
#include <linux/blkpg.h>
113
#include "linux_loop.h"
114
#include "uname.h"
115

B
bellard 已提交
116
#include "qemu.h"
117

P
pbrook 已提交
118 119
#define CLONE_NPTL_FLAGS2 (CLONE_SETTLS | \
    CLONE_PARENT_SETTID | CLONE_CHILD_SETTID | CLONE_CHILD_CLEARTID)
P
pbrook 已提交
120

B
bellard 已提交
121
//#define DEBUG
122

B
bellard 已提交
123
//#include <linux/msdos_fs.h>
A
aurel32 已提交
124 125
#define	VFAT_IOCTL_READDIR_BOTH		_IOR('r', 1, struct linux_dirent [2])
#define	VFAT_IOCTL_READDIR_SHORT	_IOR('r', 2, struct linux_dirent [2])
B
bellard 已提交
126

127 128 129 130 131 132 133

#undef _syscall0
#undef _syscall1
#undef _syscall2
#undef _syscall3
#undef _syscall4
#undef _syscall5
B
bellard 已提交
134
#undef _syscall6
135

B
bellard 已提交
136
#define _syscall0(type,name)		\
137
static type name (void)			\
B
bellard 已提交
138 139 140
{					\
	return syscall(__NR_##name);	\
}
141

B
bellard 已提交
142
#define _syscall1(type,name,type1,arg1)		\
143
static type name (type1 arg1)			\
B
bellard 已提交
144 145
{						\
	return syscall(__NR_##name, arg1);	\
146 147
}

B
bellard 已提交
148
#define _syscall2(type,name,type1,arg1,type2,arg2)	\
149
static type name (type1 arg1,type2 arg2)		\
B
bellard 已提交
150 151
{							\
	return syscall(__NR_##name, arg1, arg2);	\
152 153
}

B
bellard 已提交
154
#define _syscall3(type,name,type1,arg1,type2,arg2,type3,arg3)	\
155
static type name (type1 arg1,type2 arg2,type3 arg3)		\
B
bellard 已提交
156 157
{								\
	return syscall(__NR_##name, arg1, arg2, arg3);		\
158 159
}

B
bellard 已提交
160
#define _syscall4(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4)	\
161
static type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4)			\
B
bellard 已提交
162 163
{										\
	return syscall(__NR_##name, arg1, arg2, arg3, arg4);			\
164 165
}

B
bellard 已提交
166 167
#define _syscall5(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4,	\
		  type5,arg5)							\
168
static type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4,type5 arg5)	\
B
bellard 已提交
169 170
{										\
	return syscall(__NR_##name, arg1, arg2, arg3, arg4, arg5);		\
171 172
}

B
bellard 已提交
173 174 175

#define _syscall6(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4,	\
		  type5,arg5,type6,arg6)					\
176 177
static type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4,type5 arg5,	\
                  type6 arg6)							\
B
bellard 已提交
178 179
{										\
	return syscall(__NR_##name, arg1, arg2, arg3, arg4, arg5, arg6);	\
180
}
B
bellard 已提交
181

182

183
#define __NR_sys_uname __NR_uname
B
bellard 已提交
184 185
#define __NR_sys_getcwd1 __NR_getcwd
#define __NR_sys_getdents __NR_getdents
B
bellard 已提交
186
#define __NR_sys_getdents64 __NR_getdents64
187
#define __NR_sys_getpriority __NR_getpriority
B
bellard 已提交
188
#define __NR_sys_rt_sigqueueinfo __NR_rt_sigqueueinfo
189
#define __NR_sys_syslog __NR_syslog
T
ths 已提交
190
#define __NR_sys_tgkill __NR_tgkill
T
ths 已提交
191
#define __NR_sys_tkill __NR_tkill
192
#define __NR_sys_futex __NR_futex
A
aurel32 已提交
193 194 195
#define __NR_sys_inotify_init __NR_inotify_init
#define __NR_sys_inotify_add_watch __NR_inotify_add_watch
#define __NR_sys_inotify_rm_watch __NR_inotify_rm_watch
196

197 198
#if defined(__alpha__) || defined (__ia64__) || defined(__x86_64__) || \
    defined(__s390x__)
B
bellard 已提交
199 200 201
#define __NR__llseek __NR_lseek
#endif

202 203 204 205 206
/* Newer kernel ports have llseek() instead of _llseek() */
#if defined(TARGET_NR_llseek) && !defined(TARGET_NR__llseek)
#define TARGET_NR__llseek TARGET_NR_llseek
#endif

B
bellard 已提交
207
#ifdef __NR_gettid
208
_syscall0(int, gettid)
B
bellard 已提交
209
#else
210 211
/* This is a replacement for the host gettid() and must return a host
   errno. */
B
bellard 已提交
212 213 214 215
static int gettid(void) {
    return -ENOSYS;
}
#endif
216
#ifdef __NR_getdents
217
_syscall3(int, sys_getdents, uint, fd, struct linux_dirent *, dirp, uint, count);
218 219 220
#endif
#if !defined(__NR_getdents) || \
    (defined(TARGET_NR_getdents64) && defined(__NR_getdents64))
221 222
_syscall3(int, sys_getdents64, uint, fd, struct linux_dirent64 *, dirp, uint, count);
#endif
R
Richard Henderson 已提交
223
#if defined(TARGET_NR__llseek) && defined(__NR_llseek)
224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244
_syscall5(int, _llseek,  uint,  fd, ulong, hi, ulong, lo,
          loff_t *, res, uint, wh);
#endif
_syscall3(int,sys_rt_sigqueueinfo,int,pid,int,sig,siginfo_t *,uinfo)
_syscall3(int,sys_syslog,int,type,char*,bufp,int,len)
#if defined(TARGET_NR_tgkill) && defined(__NR_tgkill)
_syscall3(int,sys_tgkill,int,tgid,int,pid,int,sig)
#endif
#if defined(TARGET_NR_tkill) && defined(__NR_tkill)
_syscall2(int,sys_tkill,int,tid,int,sig)
#endif
#ifdef __NR_exit_group
_syscall1(int,exit_group,int,error_code)
#endif
#if defined(TARGET_NR_set_tid_address) && defined(__NR_set_tid_address)
_syscall1(int,set_tid_address,int *,tidptr)
#endif
#if defined(TARGET_NR_futex) && defined(__NR_futex)
_syscall6(int,sys_futex,int *,uaddr,int,op,int,val,
          const struct timespec *,timeout,int *,uaddr2,int,val3)
#endif
245 246 247 248 249 250
#define __NR_sys_sched_getaffinity __NR_sched_getaffinity
_syscall3(int, sys_sched_getaffinity, pid_t, pid, unsigned int, len,
          unsigned long *, user_mask_ptr);
#define __NR_sys_sched_setaffinity __NR_sched_setaffinity
_syscall3(int, sys_sched_setaffinity, pid_t, pid, unsigned int, len,
          unsigned long *, user_mask_ptr);
251 252
_syscall4(int, reboot, int, magic1, int, magic2, unsigned int, cmd,
          void *, arg);
253 254 255 256
_syscall2(int, capget, struct __user_cap_header_struct *, header,
          struct __user_cap_data_struct *, data);
_syscall2(int, capset, struct __user_cap_header_struct *, header,
          struct __user_cap_data_struct *, data);
257 258 259 260 261 262
#if defined(TARGET_NR_ioprio_get) && defined(__NR_ioprio_get)
_syscall2(int, ioprio_get, int, which, int, who)
#endif
#if defined(TARGET_NR_ioprio_set) && defined(__NR_ioprio_set)
_syscall3(int, ioprio_set, int, which, int, who, int, ioprio)
#endif
263 264 265 266 267 268 269 270 271 272

static bitmask_transtbl fcntl_flags_tbl[] = {
  { TARGET_O_ACCMODE,   TARGET_O_WRONLY,    O_ACCMODE,   O_WRONLY,    },
  { TARGET_O_ACCMODE,   TARGET_O_RDWR,      O_ACCMODE,   O_RDWR,      },
  { TARGET_O_CREAT,     TARGET_O_CREAT,     O_CREAT,     O_CREAT,     },
  { TARGET_O_EXCL,      TARGET_O_EXCL,      O_EXCL,      O_EXCL,      },
  { TARGET_O_NOCTTY,    TARGET_O_NOCTTY,    O_NOCTTY,    O_NOCTTY,    },
  { TARGET_O_TRUNC,     TARGET_O_TRUNC,     O_TRUNC,     O_TRUNC,     },
  { TARGET_O_APPEND,    TARGET_O_APPEND,    O_APPEND,    O_APPEND,    },
  { TARGET_O_NONBLOCK,  TARGET_O_NONBLOCK,  O_NONBLOCK,  O_NONBLOCK,  },
273
  { TARGET_O_SYNC,      TARGET_O_DSYNC,     O_SYNC,      O_DSYNC,     },
274 275 276 277 278 279
  { TARGET_O_SYNC,      TARGET_O_SYNC,      O_SYNC,      O_SYNC,      },
  { TARGET_FASYNC,      TARGET_FASYNC,      FASYNC,      FASYNC,      },
  { TARGET_O_DIRECTORY, TARGET_O_DIRECTORY, O_DIRECTORY, O_DIRECTORY, },
  { TARGET_O_NOFOLLOW,  TARGET_O_NOFOLLOW,  O_NOFOLLOW,  O_NOFOLLOW,  },
#if defined(O_DIRECT)
  { TARGET_O_DIRECT,    TARGET_O_DIRECT,    O_DIRECT,    O_DIRECT,    },
280 281 282 283 284 285 286 287 288 289 290 291 292
#endif
#if defined(O_NOATIME)
  { TARGET_O_NOATIME,   TARGET_O_NOATIME,   O_NOATIME,   O_NOATIME    },
#endif
#if defined(O_CLOEXEC)
  { TARGET_O_CLOEXEC,   TARGET_O_CLOEXEC,   O_CLOEXEC,   O_CLOEXEC    },
#endif
#if defined(O_PATH)
  { TARGET_O_PATH,      TARGET_O_PATH,      O_PATH,      O_PATH       },
#endif
  /* Don't terminate the list prematurely on 64-bit host+guest.  */
#if TARGET_O_LARGEFILE != 0 || O_LARGEFILE != 0
  { TARGET_O_LARGEFILE, TARGET_O_LARGEFILE, O_LARGEFILE, O_LARGEFILE, },
293 294 295 296 297 298 299 300 301 302
#endif
  { 0, 0, 0, 0 }
};

static int sys_getcwd1(char *buf, size_t size)
{
  if (getcwd(buf, size) == NULL) {
      /* getcwd() sets errno */
      return (-1);
  }
A
aurel32 已提交
303
  return strlen(buf)+1;
304 305
}

A
Alexander Graf 已提交
306
static int sys_openat(int dirfd, const char *pathname, int flags, mode_t mode)
307 308 309 310 311 312 313 314 315 316
{
  /*
   * open(2) has extra parameter 'mode' when called with
   * flag O_CREAT.
   */
  if ((flags & O_CREAT) != 0) {
      return (openat(dirfd, pathname, flags, mode));
  }
  return (openat(dirfd, pathname, flags));
}
R
Riku Voipio 已提交
317

318
#ifdef TARGET_NR_utimensat
R
Riku Voipio 已提交
319 320 321 322 323 324 325 326 327
#ifdef CONFIG_UTIMENSAT
static int sys_utimensat(int dirfd, const char *pathname,
    const struct timespec times[2], int flags)
{
    if (pathname == NULL)
        return futimens(dirfd, times);
    else
        return utimensat(dirfd, pathname, times, flags);
}
328 329
#elif defined(__NR_utimensat)
#define __NR_sys_utimensat __NR_utimensat
330 331
_syscall4(int,sys_utimensat,int,dirfd,const char *,pathname,
          const struct timespec *,tsp,int,flags)
332 333 334 335 336 337 338
#else
static int sys_utimensat(int dirfd, const char *pathname,
                         const struct timespec times[2], int flags)
{
    errno = ENOSYS;
    return -1;
}
339
#endif
340
#endif /* TARGET_NR_utimensat */
341 342

#ifdef CONFIG_INOTIFY
A
aurel32 已提交
343
#include <sys/inotify.h>
344

A
aurel32 已提交
345
#if defined(TARGET_NR_inotify_init) && defined(__NR_inotify_init)
346 347 348 349
static int sys_inotify_init(void)
{
  return (inotify_init());
}
A
aurel32 已提交
350 351
#endif
#if defined(TARGET_NR_inotify_add_watch) && defined(__NR_inotify_add_watch)
352 353 354 355
static int sys_inotify_add_watch(int fd,const char *pathname, int32_t mask)
{
  return (inotify_add_watch(fd, pathname, mask));
}
A
aurel32 已提交
356 357
#endif
#if defined(TARGET_NR_inotify_rm_watch) && defined(__NR_inotify_rm_watch)
358 359
static int sys_inotify_rm_watch(int fd, int32_t wd)
{
A
aurel32 已提交
360
  return (inotify_rm_watch(fd, wd));
361
}
362
#endif
363 364 365 366 367 368 369 370
#ifdef CONFIG_INOTIFY1
#if defined(TARGET_NR_inotify_init1) && defined(__NR_inotify_init1)
static int sys_inotify_init1(int flags)
{
  return (inotify_init1(flags));
}
#endif
#endif
371 372 373
#else
/* Userspace can usually survive runtime without inotify */
#undef TARGET_NR_inotify_init
374
#undef TARGET_NR_inotify_init1
375 376 377 378
#undef TARGET_NR_inotify_add_watch
#undef TARGET_NR_inotify_rm_watch
#endif /* CONFIG_INOTIFY  */

379 380 381 382 383 384
#if defined(TARGET_NR_ppoll)
#ifndef __NR_ppoll
# define __NR_ppoll -1
#endif
#define __NR_sys_ppoll __NR_ppoll
_syscall5(int, sys_ppoll, struct pollfd *, fds, nfds_t, nfds,
385
          struct timespec *, timeout, const sigset_t *, sigmask,
386 387
          size_t, sigsetsize)
#endif
B
bellard 已提交
388

389 390 391 392 393 394 395 396 397
#if defined(TARGET_NR_pselect6)
#ifndef __NR_pselect6
# define __NR_pselect6 -1
#endif
#define __NR_sys_pselect6 __NR_pselect6
_syscall6(int, sys_pselect6, int, nfds, fd_set *, readfds, fd_set *, writefds,
          fd_set *, exceptfds, struct timespec *, timeout, void *, sig);
#endif

398 399 400 401 402 403 404 405 406 407 408 409 410 411 412
#if defined(TARGET_NR_prlimit64)
#ifndef __NR_prlimit64
# define __NR_prlimit64 -1
#endif
#define __NR_sys_prlimit64 __NR_prlimit64
/* The glibc rlimit structure may not be that used by the underlying syscall */
struct host_rlimit64 {
    uint64_t rlim_cur;
    uint64_t rlim_max;
};
_syscall4(int, sys_prlimit64, pid_t, pid, int, resource,
          const struct host_rlimit64 *, new_limit,
          struct host_rlimit64 *, old_limit)
#endif

413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431

#if defined(TARGET_NR_timer_create)
/* Maxiumum of 32 active POSIX timers allowed at any one time. */
static timer_t g_posix_timers[32] = { 0, } ;

static inline int next_free_host_timer(void)
{
    int k ;
    /* FIXME: Does finding the next free slot require a lock? */
    for (k = 0; k < ARRAY_SIZE(g_posix_timers); k++) {
        if (g_posix_timers[k] == 0) {
            g_posix_timers[k] = (timer_t) 1;
            return k;
        }
    }
    return -1;
}
#endif

432
/* ARM EABI and MIPS expect 64bit types aligned even on pairs or registers */
433
#ifdef TARGET_ARM
434 435 436 437 438
static inline int regpairs_aligned(void *cpu_env) {
    return ((((CPUARMState *)cpu_env)->eabi) == 1) ;
}
#elif defined(TARGET_MIPS)
static inline int regpairs_aligned(void *cpu_env) { return 1; }
439 440 441 442 443
#elif defined(TARGET_PPC) && !defined(TARGET_PPC64)
/* SysV AVI for PPC32 expects 64bit parameters to be passed on odd/even pairs
 * of registers which translates to the same as ARM/MIPS, because we start with
 * r3 as arg1 */
static inline int regpairs_aligned(void *cpu_env) { return 1; }
444 445 446 447
#else
static inline int regpairs_aligned(void *cpu_env) { return 0; }
#endif

448 449 450 451 452 453 454
#define ERRNO_TABLE_SIZE 1200

/* target_to_host_errno_table[] is initialized from
 * host_to_target_errno_table[] in syscall_init(). */
static uint16_t target_to_host_errno_table[ERRNO_TABLE_SIZE] = {
};

455
/*
T
ths 已提交
456
 * This list is the union of errno values overridden in asm-<arch>/errno.h
457 458
 * minus the errnos that are not actually generic to all archs.
 */
459
static uint16_t host_to_target_errno_table[ERRNO_TABLE_SIZE] = {
460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546
    [EIDRM]		= TARGET_EIDRM,
    [ECHRNG]		= TARGET_ECHRNG,
    [EL2NSYNC]		= TARGET_EL2NSYNC,
    [EL3HLT]		= TARGET_EL3HLT,
    [EL3RST]		= TARGET_EL3RST,
    [ELNRNG]		= TARGET_ELNRNG,
    [EUNATCH]		= TARGET_EUNATCH,
    [ENOCSI]		= TARGET_ENOCSI,
    [EL2HLT]		= TARGET_EL2HLT,
    [EDEADLK]		= TARGET_EDEADLK,
    [ENOLCK]		= TARGET_ENOLCK,
    [EBADE]		= TARGET_EBADE,
    [EBADR]		= TARGET_EBADR,
    [EXFULL]		= TARGET_EXFULL,
    [ENOANO]		= TARGET_ENOANO,
    [EBADRQC]		= TARGET_EBADRQC,
    [EBADSLT]		= TARGET_EBADSLT,
    [EBFONT]		= TARGET_EBFONT,
    [ENOSTR]		= TARGET_ENOSTR,
    [ENODATA]		= TARGET_ENODATA,
    [ETIME]		= TARGET_ETIME,
    [ENOSR]		= TARGET_ENOSR,
    [ENONET]		= TARGET_ENONET,
    [ENOPKG]		= TARGET_ENOPKG,
    [EREMOTE]		= TARGET_EREMOTE,
    [ENOLINK]		= TARGET_ENOLINK,
    [EADV]		= TARGET_EADV,
    [ESRMNT]		= TARGET_ESRMNT,
    [ECOMM]		= TARGET_ECOMM,
    [EPROTO]		= TARGET_EPROTO,
    [EDOTDOT]		= TARGET_EDOTDOT,
    [EMULTIHOP]		= TARGET_EMULTIHOP,
    [EBADMSG]		= TARGET_EBADMSG,
    [ENAMETOOLONG]	= TARGET_ENAMETOOLONG,
    [EOVERFLOW]		= TARGET_EOVERFLOW,
    [ENOTUNIQ]		= TARGET_ENOTUNIQ,
    [EBADFD]		= TARGET_EBADFD,
    [EREMCHG]		= TARGET_EREMCHG,
    [ELIBACC]		= TARGET_ELIBACC,
    [ELIBBAD]		= TARGET_ELIBBAD,
    [ELIBSCN]		= TARGET_ELIBSCN,
    [ELIBMAX]		= TARGET_ELIBMAX,
    [ELIBEXEC]		= TARGET_ELIBEXEC,
    [EILSEQ]		= TARGET_EILSEQ,
    [ENOSYS]		= TARGET_ENOSYS,
    [ELOOP]		= TARGET_ELOOP,
    [ERESTART]		= TARGET_ERESTART,
    [ESTRPIPE]		= TARGET_ESTRPIPE,
    [ENOTEMPTY]		= TARGET_ENOTEMPTY,
    [EUSERS]		= TARGET_EUSERS,
    [ENOTSOCK]		= TARGET_ENOTSOCK,
    [EDESTADDRREQ]	= TARGET_EDESTADDRREQ,
    [EMSGSIZE]		= TARGET_EMSGSIZE,
    [EPROTOTYPE]	= TARGET_EPROTOTYPE,
    [ENOPROTOOPT]	= TARGET_ENOPROTOOPT,
    [EPROTONOSUPPORT]	= TARGET_EPROTONOSUPPORT,
    [ESOCKTNOSUPPORT]	= TARGET_ESOCKTNOSUPPORT,
    [EOPNOTSUPP]	= TARGET_EOPNOTSUPP,
    [EPFNOSUPPORT]	= TARGET_EPFNOSUPPORT,
    [EAFNOSUPPORT]	= TARGET_EAFNOSUPPORT,
    [EADDRINUSE]	= TARGET_EADDRINUSE,
    [EADDRNOTAVAIL]	= TARGET_EADDRNOTAVAIL,
    [ENETDOWN]		= TARGET_ENETDOWN,
    [ENETUNREACH]	= TARGET_ENETUNREACH,
    [ENETRESET]		= TARGET_ENETRESET,
    [ECONNABORTED]	= TARGET_ECONNABORTED,
    [ECONNRESET]	= TARGET_ECONNRESET,
    [ENOBUFS]		= TARGET_ENOBUFS,
    [EISCONN]		= TARGET_EISCONN,
    [ENOTCONN]		= TARGET_ENOTCONN,
    [EUCLEAN]		= TARGET_EUCLEAN,
    [ENOTNAM]		= TARGET_ENOTNAM,
    [ENAVAIL]		= TARGET_ENAVAIL,
    [EISNAM]		= TARGET_EISNAM,
    [EREMOTEIO]		= TARGET_EREMOTEIO,
    [ESHUTDOWN]		= TARGET_ESHUTDOWN,
    [ETOOMANYREFS]	= TARGET_ETOOMANYREFS,
    [ETIMEDOUT]		= TARGET_ETIMEDOUT,
    [ECONNREFUSED]	= TARGET_ECONNREFUSED,
    [EHOSTDOWN]		= TARGET_EHOSTDOWN,
    [EHOSTUNREACH]	= TARGET_EHOSTUNREACH,
    [EALREADY]		= TARGET_EALREADY,
    [EINPROGRESS]	= TARGET_EINPROGRESS,
    [ESTALE]		= TARGET_ESTALE,
    [ECANCELED]		= TARGET_ECANCELED,
    [ENOMEDIUM]		= TARGET_ENOMEDIUM,
    [EMEDIUMTYPE]	= TARGET_EMEDIUMTYPE,
T
ths 已提交
547
#ifdef ENOKEY
548
    [ENOKEY]		= TARGET_ENOKEY,
T
ths 已提交
549 550
#endif
#ifdef EKEYEXPIRED
551
    [EKEYEXPIRED]	= TARGET_EKEYEXPIRED,
T
ths 已提交
552 553
#endif
#ifdef EKEYREVOKED
554
    [EKEYREVOKED]	= TARGET_EKEYREVOKED,
T
ths 已提交
555 556
#endif
#ifdef EKEYREJECTED
557
    [EKEYREJECTED]	= TARGET_EKEYREJECTED,
T
ths 已提交
558 559
#endif
#ifdef EOWNERDEAD
560
    [EOWNERDEAD]	= TARGET_EOWNERDEAD,
T
ths 已提交
561 562
#endif
#ifdef ENOTRECOVERABLE
563
    [ENOTRECOVERABLE]	= TARGET_ENOTRECOVERABLE,
T
ths 已提交
564
#endif
565
};
566 567 568 569 570 571 572 573

static inline int host_to_target_errno(int err)
{
    if(host_to_target_errno_table[err])
        return host_to_target_errno_table[err];
    return err;
}

574 575 576 577 578 579 580
static inline int target_to_host_errno(int err)
{
    if (target_to_host_errno_table[err])
        return target_to_host_errno_table[err];
    return err;
}

581
static inline abi_long get_errno(abi_long ret)
582 583
{
    if (ret == -1)
584
        return -host_to_target_errno(errno);
585 586 587 588
    else
        return ret;
}

589
static inline int is_error(abi_long ret)
590
{
591
    return (abi_ulong)ret >= (abi_ulong)(-4096);
592 593
}

594 595
char *target_strerror(int err)
{
596 597 598
    if ((err >= ERRNO_TABLE_SIZE) || (err < 0)) {
        return NULL;
    }
599 600 601
    return strerror(target_to_host_errno(err));
}

602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632
static inline int host_to_target_sock_type(int host_type)
{
    int target_type;

    switch (host_type & 0xf /* SOCK_TYPE_MASK */) {
    case SOCK_DGRAM:
        target_type = TARGET_SOCK_DGRAM;
        break;
    case SOCK_STREAM:
        target_type = TARGET_SOCK_STREAM;
        break;
    default:
        target_type = host_type & 0xf /* SOCK_TYPE_MASK */;
        break;
    }

#if defined(SOCK_CLOEXEC)
    if (host_type & SOCK_CLOEXEC) {
        target_type |= TARGET_SOCK_CLOEXEC;
    }
#endif

#if defined(SOCK_NONBLOCK)
    if (host_type & SOCK_NONBLOCK) {
        target_type |= TARGET_SOCK_NONBLOCK;
    }
#endif

    return target_type;
}

633 634
static abi_ulong target_brk;
static abi_ulong target_original_brk;
635
static abi_ulong brk_page;
636

637
void target_set_brk(abi_ulong new_brk)
638
{
639
    target_original_brk = target_brk = HOST_PAGE_ALIGN(new_brk);
640
    brk_page = HOST_PAGE_ALIGN(target_brk);
641 642
}

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

646
/* do_brk() must return target values and target errnos. */
647
abi_long do_brk(abi_ulong new_brk)
648
{
649
    abi_long mapped_addr;
650 651
    int	new_alloc_size;

P
Paul Brook 已提交
652
    DEBUGF_BRK("do_brk(" TARGET_ABI_FMT_lx ") -> ", new_brk);
653 654

    if (!new_brk) {
P
Paul Brook 已提交
655
        DEBUGF_BRK(TARGET_ABI_FMT_lx " (!new_brk)\n", target_brk);
656
        return target_brk;
657 658
    }
    if (new_brk < target_original_brk) {
P
Paul Brook 已提交
659 660
        DEBUGF_BRK(TARGET_ABI_FMT_lx " (new_brk < target_original_brk)\n",
                   target_brk);
661
        return target_brk;
662
    }
663

664 665 666 667 668 669 670 671
    /* If the new brk is less than the highest page reserved to the
     * target heap allocation, set it and we're almost done...  */
    if (new_brk <= brk_page) {
        /* Heap contents are initialized to zero, as for anonymous
         * mapped pages.  */
        if (new_brk > target_brk) {
            memset(g2h(target_brk), 0, new_brk - target_brk);
        }
672
	target_brk = new_brk;
P
Paul Brook 已提交
673
        DEBUGF_BRK(TARGET_ABI_FMT_lx " (new_brk <= brk_page)\n", target_brk);
674
    	return target_brk;
675 676
    }

677 678 679 680 681 682
    /* We need to allocate more memory after the brk... Note that
     * we don't use MAP_FIXED because that will map over the top of
     * any existing mapping (like the one with the host libc or qemu
     * itself); instead we treat "mapped but at wrong address" as
     * a failure and unmap again.
     */
683
    new_alloc_size = HOST_PAGE_ALIGN(new_brk - brk_page);
684
    mapped_addr = get_errno(target_mmap(brk_page, new_alloc_size,
B
bellard 已提交
685
                                        PROT_READ|PROT_WRITE,
686 687 688
                                        MAP_ANON|MAP_PRIVATE, 0, 0));

    if (mapped_addr == brk_page) {
689 690 691 692 693 694 695 696 697
        /* Heap contents are initialized to zero, as for anonymous
         * mapped pages.  Technically the new pages are already
         * initialized to zero since they *are* anonymous mapped
         * pages, however we have to take care with the contents that
         * come from the remaining part of the previous page: it may
         * contains garbage data due to a previous heap usage (grown
         * then shrunken).  */
        memset(g2h(target_brk), 0, brk_page - target_brk);

698
        target_brk = new_brk;
699
        brk_page = HOST_PAGE_ALIGN(target_brk);
P
Paul Brook 已提交
700 701
        DEBUGF_BRK(TARGET_ABI_FMT_lx " (mapped_addr == brk_page)\n",
            target_brk);
702 703 704 705 706 707 708
        return target_brk;
    } else if (mapped_addr != -1) {
        /* Mapped but at wrong address, meaning there wasn't actually
         * enough space for this brk.
         */
        target_munmap(mapped_addr, new_alloc_size);
        mapped_addr = -1;
P
Paul Brook 已提交
709
        DEBUGF_BRK(TARGET_ABI_FMT_lx " (mapped_addr != -1)\n", target_brk);
710 711
    }
    else {
P
Paul Brook 已提交
712
        DEBUGF_BRK(TARGET_ABI_FMT_lx " (otherwise)\n", target_brk);
713
    }
714

715 716 717
#if defined(TARGET_ALPHA)
    /* We (partially) emulate OSF/1 on Alpha, which requires we
       return a proper errno, not an unchanged brk value.  */
718
    return -TARGET_ENOMEM;
719
#endif
720
    /* For everything else, return the previous break. */
721
    return target_brk;
722 723
}

724 725 726
static inline abi_long copy_from_user_fdset(fd_set *fds,
                                            abi_ulong target_fds_addr,
                                            int n)
727
{
728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745 746 747
    int i, nw, j, k;
    abi_ulong b, *target_fds;

    nw = (n + TARGET_ABI_BITS - 1) / TARGET_ABI_BITS;
    if (!(target_fds = lock_user(VERIFY_READ,
                                 target_fds_addr,
                                 sizeof(abi_ulong) * nw,
                                 1)))
        return -TARGET_EFAULT;

    FD_ZERO(fds);
    k = 0;
    for (i = 0; i < nw; i++) {
        /* grab the abi_ulong */
        __get_user(b, &target_fds[i]);
        for (j = 0; j < TARGET_ABI_BITS; j++) {
            /* check the bit inside the abi_ulong */
            if ((b >> j) & 1)
                FD_SET(k, fds);
            k++;
748 749
        }
    }
750 751 752 753

    unlock_user(target_fds, target_fds_addr, 0);

    return 0;
754 755
}

756 757 758 759 760 761 762 763 764 765 766 767 768 769
static inline abi_ulong copy_from_user_fdset_ptr(fd_set *fds, fd_set **fds_ptr,
                                                 abi_ulong target_fds_addr,
                                                 int n)
{
    if (target_fds_addr) {
        if (copy_from_user_fdset(fds, target_fds_addr, n))
            return -TARGET_EFAULT;
        *fds_ptr = fds;
    } else {
        *fds_ptr = NULL;
    }
    return 0;
}

770 771 772
static inline abi_long copy_to_user_fdset(abi_ulong target_fds_addr,
                                          const fd_set *fds,
                                          int n)
773 774
{
    int i, nw, j, k;
775
    abi_long v;
776
    abi_ulong *target_fds;
777

778 779 780 781 782 783 784 785 786 787 788
    nw = (n + TARGET_ABI_BITS - 1) / TARGET_ABI_BITS;
    if (!(target_fds = lock_user(VERIFY_WRITE,
                                 target_fds_addr,
                                 sizeof(abi_ulong) * nw,
                                 0)))
        return -TARGET_EFAULT;

    k = 0;
    for (i = 0; i < nw; i++) {
        v = 0;
        for (j = 0; j < TARGET_ABI_BITS; j++) {
789
            v |= ((abi_ulong)(FD_ISSET(k, fds) != 0) << j);
790
            k++;
791
        }
792
        __put_user(v, &target_fds[i]);
793
    }
794 795 796 797

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

    return 0;
798 799
}

B
bellard 已提交
800 801 802 803 804 805
#if defined(__alpha__)
#define HOST_HZ 1024
#else
#define HOST_HZ 100
#endif

806
static inline abi_long host_to_target_clock_t(long ticks)
B
bellard 已提交
807 808 809 810 811 812 813 814
{
#if HOST_HZ == TARGET_HZ
    return ticks;
#else
    return ((int64_t)ticks * TARGET_HZ) / HOST_HZ;
#endif
}

815 816
static inline abi_long host_to_target_rusage(abi_ulong target_addr,
                                             const struct rusage *rusage)
B
bellard 已提交
817
{
818 819
    struct target_rusage *target_rusage;

820 821
    if (!lock_user_struct(VERIFY_WRITE, target_rusage, target_addr, 0))
        return -TARGET_EFAULT;
822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839
    target_rusage->ru_utime.tv_sec = tswapal(rusage->ru_utime.tv_sec);
    target_rusage->ru_utime.tv_usec = tswapal(rusage->ru_utime.tv_usec);
    target_rusage->ru_stime.tv_sec = tswapal(rusage->ru_stime.tv_sec);
    target_rusage->ru_stime.tv_usec = tswapal(rusage->ru_stime.tv_usec);
    target_rusage->ru_maxrss = tswapal(rusage->ru_maxrss);
    target_rusage->ru_ixrss = tswapal(rusage->ru_ixrss);
    target_rusage->ru_idrss = tswapal(rusage->ru_idrss);
    target_rusage->ru_isrss = tswapal(rusage->ru_isrss);
    target_rusage->ru_minflt = tswapal(rusage->ru_minflt);
    target_rusage->ru_majflt = tswapal(rusage->ru_majflt);
    target_rusage->ru_nswap = tswapal(rusage->ru_nswap);
    target_rusage->ru_inblock = tswapal(rusage->ru_inblock);
    target_rusage->ru_oublock = tswapal(rusage->ru_oublock);
    target_rusage->ru_msgsnd = tswapal(rusage->ru_msgsnd);
    target_rusage->ru_msgrcv = tswapal(rusage->ru_msgrcv);
    target_rusage->ru_nsignals = tswapal(rusage->ru_nsignals);
    target_rusage->ru_nvcsw = tswapal(rusage->ru_nvcsw);
    target_rusage->ru_nivcsw = tswapal(rusage->ru_nivcsw);
840
    unlock_user_struct(target_rusage, target_addr, 1);
841 842

    return 0;
B
bellard 已提交
843 844
}

845
static inline rlim_t target_to_host_rlim(abi_ulong target_rlim)
846
{
847
    abi_ulong target_rlim_swap;
848 849
    rlim_t result;
    
850 851 852 853 854 855 856
    target_rlim_swap = tswapal(target_rlim);
    if (target_rlim_swap == TARGET_RLIM_INFINITY)
        return RLIM_INFINITY;

    result = target_rlim_swap;
    if (target_rlim_swap != (rlim_t)result)
        return RLIM_INFINITY;
857 858
    
    return result;
859 860
}

861
static inline abi_ulong host_to_target_rlim(rlim_t rlim)
862
{
863 864
    abi_ulong target_rlim_swap;
    abi_ulong result;
865
    
866
    if (rlim == RLIM_INFINITY || rlim != (abi_long)rlim)
867
        target_rlim_swap = TARGET_RLIM_INFINITY;
868
    else
869
        target_rlim_swap = rlim;
870
    result = tswapal(target_rlim_swap);
871 872
    
    return result;
873 874
}

875 876 877 878 879 880 881 882 883 884 885 886 887 888 889 890 891 892 893 894 895 896 897 898 899 900 901 902 903 904 905 906 907 908 909 910 911 912
static inline int target_to_host_resource(int code)
{
    switch (code) {
    case TARGET_RLIMIT_AS:
        return RLIMIT_AS;
    case TARGET_RLIMIT_CORE:
        return RLIMIT_CORE;
    case TARGET_RLIMIT_CPU:
        return RLIMIT_CPU;
    case TARGET_RLIMIT_DATA:
        return RLIMIT_DATA;
    case TARGET_RLIMIT_FSIZE:
        return RLIMIT_FSIZE;
    case TARGET_RLIMIT_LOCKS:
        return RLIMIT_LOCKS;
    case TARGET_RLIMIT_MEMLOCK:
        return RLIMIT_MEMLOCK;
    case TARGET_RLIMIT_MSGQUEUE:
        return RLIMIT_MSGQUEUE;
    case TARGET_RLIMIT_NICE:
        return RLIMIT_NICE;
    case TARGET_RLIMIT_NOFILE:
        return RLIMIT_NOFILE;
    case TARGET_RLIMIT_NPROC:
        return RLIMIT_NPROC;
    case TARGET_RLIMIT_RSS:
        return RLIMIT_RSS;
    case TARGET_RLIMIT_RTPRIO:
        return RLIMIT_RTPRIO;
    case TARGET_RLIMIT_SIGPENDING:
        return RLIMIT_SIGPENDING;
    case TARGET_RLIMIT_STACK:
        return RLIMIT_STACK;
    default:
        return code;
    }
}

913 914
static inline abi_long copy_from_user_timeval(struct timeval *tv,
                                              abi_ulong target_tv_addr)
915
{
916 917
    struct target_timeval *target_tv;

918
    if (!lock_user_struct(VERIFY_READ, target_tv, target_tv_addr, 1))
919
        return -TARGET_EFAULT;
920 921 922 923 924

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

    unlock_user_struct(target_tv, target_tv_addr, 0);
925 926

    return 0;
927 928
}

929 930
static inline abi_long copy_to_user_timeval(abi_ulong target_tv_addr,
                                            const struct timeval *tv)
931
{
932 933
    struct target_timeval *target_tv;

934
    if (!lock_user_struct(VERIFY_WRITE, target_tv, target_tv_addr, 0))
935
        return -TARGET_EFAULT;
936 937 938 939 940

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

    unlock_user_struct(target_tv, target_tv_addr, 1);
941 942

    return 0;
943 944
}

945 946 947 948 949 950 951 952 953 954 955 956 957 958 959 960 961
static inline abi_long copy_from_user_timezone(struct timezone *tz,
                                               abi_ulong target_tz_addr)
{
    struct target_timezone *target_tz;

    if (!lock_user_struct(VERIFY_READ, target_tz, target_tz_addr, 1)) {
        return -TARGET_EFAULT;
    }

    __get_user(tz->tz_minuteswest, &target_tz->tz_minuteswest);
    __get_user(tz->tz_dsttime, &target_tz->tz_dsttime);

    unlock_user_struct(target_tz, target_tz_addr, 0);

    return 0;
}

962 963 964
#if defined(TARGET_NR_mq_open) && defined(__NR_mq_open)
#include <mqueue.h>

965 966 967 968 969 970 971 972 973 974 975 976 977 978 979 980 981 982 983 984 985 986 987 988 989 990 991 992 993 994 995 996 997 998 999 1000 1001
static inline abi_long copy_from_user_mq_attr(struct mq_attr *attr,
                                              abi_ulong target_mq_attr_addr)
{
    struct target_mq_attr *target_mq_attr;

    if (!lock_user_struct(VERIFY_READ, target_mq_attr,
                          target_mq_attr_addr, 1))
        return -TARGET_EFAULT;

    __get_user(attr->mq_flags, &target_mq_attr->mq_flags);
    __get_user(attr->mq_maxmsg, &target_mq_attr->mq_maxmsg);
    __get_user(attr->mq_msgsize, &target_mq_attr->mq_msgsize);
    __get_user(attr->mq_curmsgs, &target_mq_attr->mq_curmsgs);

    unlock_user_struct(target_mq_attr, target_mq_attr_addr, 0);

    return 0;
}

static inline abi_long copy_to_user_mq_attr(abi_ulong target_mq_attr_addr,
                                            const struct mq_attr *attr)
{
    struct target_mq_attr *target_mq_attr;

    if (!lock_user_struct(VERIFY_WRITE, target_mq_attr,
                          target_mq_attr_addr, 0))
        return -TARGET_EFAULT;

    __put_user(attr->mq_flags, &target_mq_attr->mq_flags);
    __put_user(attr->mq_maxmsg, &target_mq_attr->mq_maxmsg);
    __put_user(attr->mq_msgsize, &target_mq_attr->mq_msgsize);
    __put_user(attr->mq_curmsgs, &target_mq_attr->mq_curmsgs);

    unlock_user_struct(target_mq_attr, target_mq_attr_addr, 1);

    return 0;
}
1002
#endif
1003

1004
#if defined(TARGET_NR_select) || defined(TARGET_NR__newselect)
1005
/* do_select() must return target values and target errnos. */
1006
static abi_long do_select(int n,
1007 1008
                          abi_ulong rfd_addr, abi_ulong wfd_addr,
                          abi_ulong efd_addr, abi_ulong target_tv_addr)
1009 1010 1011 1012
{
    fd_set rfds, wfds, efds;
    fd_set *rfds_ptr, *wfds_ptr, *efds_ptr;
    struct timeval tv, *tv_ptr;
1013
    abi_long ret;
1014

1015 1016 1017
    ret = copy_from_user_fdset_ptr(&rfds, &rfds_ptr, rfd_addr, n);
    if (ret) {
        return ret;
1018
    }
1019 1020 1021
    ret = copy_from_user_fdset_ptr(&wfds, &wfds_ptr, wfd_addr, n);
    if (ret) {
        return ret;
1022
    }
1023 1024 1025
    ret = copy_from_user_fdset_ptr(&efds, &efds_ptr, efd_addr, n);
    if (ret) {
        return ret;
1026
    }
1027

1028
    if (target_tv_addr) {
1029 1030
        if (copy_from_user_timeval(&tv, target_tv_addr))
            return -TARGET_EFAULT;
1031 1032 1033 1034
        tv_ptr = &tv;
    } else {
        tv_ptr = NULL;
    }
1035

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

1038 1039 1040 1041 1042 1043 1044
    if (!is_error(ret)) {
        if (rfd_addr && copy_to_user_fdset(rfd_addr, &rfds, n))
            return -TARGET_EFAULT;
        if (wfd_addr && copy_to_user_fdset(wfd_addr, &wfds, n))
            return -TARGET_EFAULT;
        if (efd_addr && copy_to_user_fdset(efd_addr, &efds, n))
            return -TARGET_EFAULT;
1045

1046 1047
        if (target_tv_addr && copy_to_user_timeval(target_tv_addr, &tv))
            return -TARGET_EFAULT;
1048
    }
1049

1050 1051
    return ret;
}
1052
#endif
1053

R
Riku Voipio 已提交
1054 1055 1056 1057 1058 1059 1060 1061 1062
static abi_long do_pipe2(int host_pipe[], int flags)
{
#ifdef CONFIG_PIPE2
    return pipe2(host_pipe, flags);
#else
    return -ENOSYS;
#endif
}

1063 1064
static abi_long do_pipe(void *cpu_env, abi_ulong pipedes,
                        int flags, int is_pipe2)
R
Riku Voipio 已提交
1065 1066 1067 1068 1069 1070 1071
{
    int host_pipe[2];
    abi_long ret;
    ret = flags ? do_pipe2(host_pipe, flags) : pipe(host_pipe);

    if (is_error(ret))
        return get_errno(ret);
1072 1073 1074 1075 1076 1077 1078 1079 1080 1081 1082

    /* Several targets have special calling conventions for the original
       pipe syscall, but didn't replicate this into the pipe2 syscall.  */
    if (!is_pipe2) {
#if defined(TARGET_ALPHA)
        ((CPUAlphaState *)cpu_env)->ir[IR_A4] = host_pipe[1];
        return host_pipe[0];
#elif defined(TARGET_MIPS)
        ((CPUMIPSState*)cpu_env)->active_tc.gpr[3] = host_pipe[1];
        return host_pipe[0];
#elif defined(TARGET_SH4)
1083
        ((CPUSH4State*)cpu_env)->gregs[1] = host_pipe[1];
1084
        return host_pipe[0];
1085 1086 1087
#elif defined(TARGET_SPARC)
        ((CPUSPARCState*)cpu_env)->regwptr[1] = host_pipe[1];
        return host_pipe[0];
1088
#endif
1089 1090
    }

R
Riku Voipio 已提交
1091 1092 1093 1094 1095 1096
    if (put_user_s32(host_pipe[0], pipedes)
        || put_user_s32(host_pipe[1], pipedes + sizeof(host_pipe[0])))
        return -TARGET_EFAULT;
    return get_errno(ret);
}

1097 1098 1099 1100 1101 1102 1103 1104 1105 1106 1107 1108
static inline abi_long target_to_host_ip_mreq(struct ip_mreqn *mreqn,
                                              abi_ulong target_addr,
                                              socklen_t len)
{
    struct target_ip_mreqn *target_smreqn;

    target_smreqn = lock_user(VERIFY_READ, target_addr, len, 1);
    if (!target_smreqn)
        return -TARGET_EFAULT;
    mreqn->imr_multiaddr.s_addr = target_smreqn->imr_multiaddr.s_addr;
    mreqn->imr_address.s_addr = target_smreqn->imr_address.s_addr;
    if (len == sizeof(struct target_ip_mreqn))
1109
        mreqn->imr_ifindex = tswapal(target_smreqn->imr_ifindex);
1110 1111 1112 1113 1114
    unlock_user(target_smreqn, target_addr, 0);

    return 0;
}

1115 1116 1117
static inline abi_long target_to_host_sockaddr(struct sockaddr *addr,
                                               abi_ulong target_addr,
                                               socklen_t len)
B
bellard 已提交
1118
{
1119 1120
    const socklen_t unix_maxlen = sizeof (struct sockaddr_un);
    sa_family_t sa_family;
1121 1122
    struct target_sockaddr *target_saddr;

1123 1124 1125
    target_saddr = lock_user(VERIFY_READ, target_addr, len, 1);
    if (!target_saddr)
        return -TARGET_EFAULT;
1126 1127 1128 1129 1130 1131 1132 1133 1134 1135 1136 1137 1138 1139 1140 1141 1142 1143 1144 1145 1146 1147

    sa_family = tswap16(target_saddr->sa_family);

    /* Oops. The caller might send a incomplete sun_path; sun_path
     * must be terminated by \0 (see the manual page), but
     * unfortunately it is quite common to specify sockaddr_un
     * length as "strlen(x->sun_path)" while it should be
     * "strlen(...) + 1". We'll fix that here if needed.
     * Linux kernel has a similar feature.
     */

    if (sa_family == AF_UNIX) {
        if (len < unix_maxlen && len > 0) {
            char *cp = (char*)target_saddr;

            if ( cp[len-1] && !cp[len] )
                len++;
        }
        if (len > unix_maxlen)
            len = unix_maxlen;
    }

1148
    memcpy(addr, target_saddr, len);
1149
    addr->sa_family = sa_family;
1150 1151 1152 1153 1154 1155 1156
    if (sa_family == AF_PACKET) {
	struct target_sockaddr_ll *lladdr;

	lladdr = (struct target_sockaddr_ll *)addr;
	lladdr->sll_ifindex = tswap32(lladdr->sll_ifindex);
	lladdr->sll_hatype = tswap16(lladdr->sll_hatype);
    }
1157
    unlock_user(target_saddr, target_addr, 0);
1158 1159

    return 0;
B
bellard 已提交
1160 1161
}

1162 1163 1164
static inline abi_long host_to_target_sockaddr(abi_ulong target_addr,
                                               struct sockaddr *addr,
                                               socklen_t len)
B
bellard 已提交
1165
{
1166 1167
    struct target_sockaddr *target_saddr;

1168 1169 1170
    target_saddr = lock_user(VERIFY_WRITE, target_addr, len, 0);
    if (!target_saddr)
        return -TARGET_EFAULT;
1171 1172 1173
    memcpy(target_saddr, addr, len);
    target_saddr->sa_family = tswap16(addr->sa_family);
    unlock_user(target_saddr, target_addr, len);
1174 1175

    return 0;
B
bellard 已提交
1176 1177
}

1178 1179
static inline abi_long target_to_host_cmsg(struct msghdr *msgh,
                                           struct target_msghdr *target_msgh)
B
bellard 已提交
1180 1181
{
    struct cmsghdr *cmsg = CMSG_FIRSTHDR(msgh);
1182 1183 1184
    abi_long msg_controllen;
    abi_ulong target_cmsg_addr;
    struct target_cmsghdr *target_cmsg;
B
bellard 已提交
1185
    socklen_t space = 0;
1186
    
1187
    msg_controllen = tswapal(target_msgh->msg_controllen);
1188 1189
    if (msg_controllen < sizeof (struct target_cmsghdr)) 
        goto the_end;
1190
    target_cmsg_addr = tswapal(target_msgh->msg_control);
1191 1192 1193
    target_cmsg = lock_user(VERIFY_READ, target_cmsg_addr, msg_controllen, 1);
    if (!target_cmsg)
        return -TARGET_EFAULT;
B
bellard 已提交
1194 1195 1196 1197 1198

    while (cmsg && target_cmsg) {
        void *data = CMSG_DATA(cmsg);
        void *target_data = TARGET_CMSG_DATA(target_cmsg);

1199
        int len = tswapal(target_cmsg->cmsg_len)
B
bellard 已提交
1200 1201 1202 1203 1204
                  - TARGET_CMSG_ALIGN(sizeof (struct target_cmsghdr));

        space += CMSG_SPACE(len);
        if (space > msgh->msg_controllen) {
            space -= CMSG_SPACE(len);
1205 1206 1207 1208 1209 1210 1211 1212 1213
            /* This is a QEMU bug, since we allocated the payload
             * area ourselves (unlike overflow in host-to-target
             * conversion, which is just the guest giving us a buffer
             * that's too small). It can't happen for the payload types
             * we currently support; if it becomes an issue in future
             * we would need to improve our allocation strategy to
             * something more intelligent than "twice the size of the
             * target buffer we're reading from".
             */
B
bellard 已提交
1214
            gemu_log("Host cmsg overflow\n");
B
bellard 已提交
1215 1216 1217
            break;
        }

1218 1219 1220 1221 1222
        if (tswap32(target_cmsg->cmsg_level) == TARGET_SOL_SOCKET) {
            cmsg->cmsg_level = SOL_SOCKET;
        } else {
            cmsg->cmsg_level = tswap32(target_cmsg->cmsg_level);
        }
B
bellard 已提交
1223 1224 1225
        cmsg->cmsg_type = tswap32(target_cmsg->cmsg_type);
        cmsg->cmsg_len = CMSG_LEN(len);

1226
        if (cmsg->cmsg_level == SOL_SOCKET && cmsg->cmsg_type == SCM_RIGHTS) {
B
bellard 已提交
1227 1228 1229 1230
            int *fd = (int *)data;
            int *target_fd = (int *)target_data;
            int i, numfds = len / sizeof(int);

1231 1232 1233
            for (i = 0; i < numfds; i++) {
                __get_user(fd[i], target_fd + i);
            }
1234 1235 1236 1237 1238 1239
        } else if (cmsg->cmsg_level == SOL_SOCKET
               &&  cmsg->cmsg_type == SCM_CREDENTIALS) {
            struct ucred *cred = (struct ucred *)data;
            struct target_ucred *target_cred =
                (struct target_ucred *)target_data;

1240 1241 1242
            __get_user(cred->pid, &target_cred->pid);
            __get_user(cred->uid, &target_cred->uid);
            __get_user(cred->gid, &target_cred->gid);
1243 1244 1245 1246
        } else {
            gemu_log("Unsupported ancillary data: %d/%d\n",
                                        cmsg->cmsg_level, cmsg->cmsg_type);
            memcpy(data, target_data, len);
B
bellard 已提交
1247 1248 1249 1250 1251
        }

        cmsg = CMSG_NXTHDR(msgh, cmsg);
        target_cmsg = TARGET_CMSG_NXTHDR(target_msgh, target_cmsg);
    }
1252 1253
    unlock_user(target_cmsg, target_cmsg_addr, 0);
 the_end:
B
bellard 已提交
1254
    msgh->msg_controllen = space;
1255
    return 0;
B
bellard 已提交
1256 1257
}

1258 1259
static inline abi_long host_to_target_cmsg(struct target_msghdr *target_msgh,
                                           struct msghdr *msgh)
B
bellard 已提交
1260 1261
{
    struct cmsghdr *cmsg = CMSG_FIRSTHDR(msgh);
1262 1263 1264
    abi_long msg_controllen;
    abi_ulong target_cmsg_addr;
    struct target_cmsghdr *target_cmsg;
B
bellard 已提交
1265 1266
    socklen_t space = 0;

1267
    msg_controllen = tswapal(target_msgh->msg_controllen);
1268 1269
    if (msg_controllen < sizeof (struct target_cmsghdr)) 
        goto the_end;
1270
    target_cmsg_addr = tswapal(target_msgh->msg_control);
1271 1272 1273 1274
    target_cmsg = lock_user(VERIFY_WRITE, target_cmsg_addr, msg_controllen, 0);
    if (!target_cmsg)
        return -TARGET_EFAULT;

B
bellard 已提交
1275 1276 1277 1278 1279
    while (cmsg && target_cmsg) {
        void *data = CMSG_DATA(cmsg);
        void *target_data = TARGET_CMSG_DATA(target_cmsg);

        int len = cmsg->cmsg_len - CMSG_ALIGN(sizeof (struct cmsghdr));
1280
        int tgt_len, tgt_space;
B
bellard 已提交
1281

1282 1283 1284 1285 1286 1287 1288 1289
        /* We never copy a half-header but may copy half-data;
         * this is Linux's behaviour in put_cmsg(). Note that
         * truncation here is a guest problem (which we report
         * to the guest via the CTRUNC bit), unlike truncation
         * in target_to_host_cmsg, which is a QEMU bug.
         */
        if (msg_controllen < sizeof(struct cmsghdr)) {
            target_msgh->msg_flags |= tswap32(MSG_CTRUNC);
B
bellard 已提交
1290 1291 1292
            break;
        }

1293 1294 1295 1296 1297
        if (cmsg->cmsg_level == SOL_SOCKET) {
            target_cmsg->cmsg_level = tswap32(TARGET_SOL_SOCKET);
        } else {
            target_cmsg->cmsg_level = tswap32(cmsg->cmsg_level);
        }
B
bellard 已提交
1298 1299
        target_cmsg->cmsg_type = tswap32(cmsg->cmsg_type);

1300 1301 1302 1303 1304 1305 1306 1307 1308 1309 1310 1311 1312 1313 1314 1315 1316 1317 1318 1319 1320 1321 1322 1323 1324 1325 1326 1327
        tgt_len = TARGET_CMSG_LEN(len);

        /* Payload types which need a different size of payload on
         * the target must adjust tgt_len here.
         */
        switch (cmsg->cmsg_level) {
        case SOL_SOCKET:
            switch (cmsg->cmsg_type) {
            case SO_TIMESTAMP:
                tgt_len = sizeof(struct target_timeval);
                break;
            default:
                break;
            }
        default:
            break;
        }

        if (msg_controllen < tgt_len) {
            target_msgh->msg_flags |= tswap32(MSG_CTRUNC);
            tgt_len = msg_controllen;
        }

        /* We must now copy-and-convert len bytes of payload
         * into tgt_len bytes of destination space. Bear in mind
         * that in both source and destination we may be dealing
         * with a truncated value!
         */
1328 1329 1330 1331 1332 1333 1334
        switch (cmsg->cmsg_level) {
        case SOL_SOCKET:
            switch (cmsg->cmsg_type) {
            case SCM_RIGHTS:
            {
                int *fd = (int *)data;
                int *target_fd = (int *)target_data;
1335
                int i, numfds = tgt_len / sizeof(int);
1336

1337 1338 1339
                for (i = 0; i < numfds; i++) {
                    __put_user(fd[i], target_fd + i);
                }
1340 1341 1342 1343 1344 1345 1346 1347
                break;
            }
            case SO_TIMESTAMP:
            {
                struct timeval *tv = (struct timeval *)data;
                struct target_timeval *target_tv =
                    (struct target_timeval *)target_data;

1348 1349
                if (len != sizeof(struct timeval) ||
                    tgt_len != sizeof(struct target_timeval)) {
1350
                    goto unimplemented;
1351
                }
1352 1353

                /* copy struct timeval to target */
1354 1355
                __put_user(tv->tv_sec, &target_tv->tv_sec);
                __put_user(tv->tv_usec, &target_tv->tv_usec);
1356 1357
                break;
            }
1358 1359 1360 1361 1362 1363 1364 1365 1366 1367 1368
            case SCM_CREDENTIALS:
            {
                struct ucred *cred = (struct ucred *)data;
                struct target_ucred *target_cred =
                    (struct target_ucred *)target_data;

                __put_user(cred->pid, &target_cred->pid);
                __put_user(cred->uid, &target_cred->uid);
                __put_user(cred->gid, &target_cred->gid);
                break;
            }
1369 1370 1371 1372
            default:
                goto unimplemented;
            }
            break;
B
bellard 已提交
1373

1374 1375
        default:
        unimplemented:
1376 1377
            gemu_log("Unsupported ancillary data: %d/%d\n",
                                        cmsg->cmsg_level, cmsg->cmsg_type);
1378 1379 1380 1381
            memcpy(target_data, data, MIN(len, tgt_len));
            if (tgt_len > len) {
                memset(target_data + len, 0, tgt_len - len);
            }
B
bellard 已提交
1382 1383
        }

1384 1385 1386 1387 1388 1389 1390
        target_cmsg->cmsg_len = tswapal(tgt_len);
        tgt_space = TARGET_CMSG_SPACE(tgt_len);
        if (msg_controllen < tgt_space) {
            tgt_space = msg_controllen;
        }
        msg_controllen -= tgt_space;
        space += tgt_space;
B
bellard 已提交
1391 1392 1393
        cmsg = CMSG_NXTHDR(msgh, cmsg);
        target_cmsg = TARGET_CMSG_NXTHDR(target_msgh, target_cmsg);
    }
1394 1395
    unlock_user(target_cmsg, target_cmsg_addr, space);
 the_end:
1396
    target_msgh->msg_controllen = tswapal(space);
1397
    return 0;
B
bellard 已提交
1398 1399
}

1400
/* do_setsockopt() Must return target values and target errnos. */
1401
static abi_long do_setsockopt(int sockfd, int level, int optname,
1402
                              abi_ulong optval_addr, socklen_t optlen)
B
bellard 已提交
1403
{
1404
    abi_long ret;
1405
    int val;
1406
    struct ip_mreqn *ip_mreq;
1407
    struct ip_mreq_source *ip_mreq_source;
1408

1409 1410
    switch(level) {
    case SOL_TCP:
B
bellard 已提交
1411 1412
        /* TCP options all take an 'int' value.  */
        if (optlen < sizeof(uint32_t))
1413
            return -TARGET_EINVAL;
1414

1415 1416
        if (get_user_u32(val, optval_addr))
            return -TARGET_EFAULT;
1417 1418 1419 1420
        ret = get_errno(setsockopt(sockfd, level, optname, &val, sizeof(val)));
        break;
    case SOL_IP:
        switch(optname) {
B
bellard 已提交
1421 1422
        case IP_TOS:
        case IP_TTL:
1423
        case IP_HDRINCL:
B
bellard 已提交
1424 1425 1426 1427 1428 1429 1430 1431 1432 1433 1434 1435
        case IP_ROUTER_ALERT:
        case IP_RECVOPTS:
        case IP_RETOPTS:
        case IP_PKTINFO:
        case IP_MTU_DISCOVER:
        case IP_RECVERR:
        case IP_RECVTOS:
#ifdef IP_FREEBIND
        case IP_FREEBIND:
#endif
        case IP_MULTICAST_TTL:
        case IP_MULTICAST_LOOP:
1436 1437
            val = 0;
            if (optlen >= sizeof(uint32_t)) {
1438 1439
                if (get_user_u32(val, optval_addr))
                    return -TARGET_EFAULT;
1440
            } else if (optlen >= 1) {
1441 1442
                if (get_user_u8(val, optval_addr))
                    return -TARGET_EFAULT;
1443 1444 1445
            }
            ret = get_errno(setsockopt(sockfd, level, optname, &val, sizeof(val)));
            break;
1446 1447 1448 1449 1450 1451 1452 1453 1454 1455 1456
        case IP_ADD_MEMBERSHIP:
        case IP_DROP_MEMBERSHIP:
            if (optlen < sizeof (struct target_ip_mreq) ||
                optlen > sizeof (struct target_ip_mreqn))
                return -TARGET_EINVAL;

            ip_mreq = (struct ip_mreqn *) alloca(optlen);
            target_to_host_ip_mreq(ip_mreq, optval_addr, optlen);
            ret = get_errno(setsockopt(sockfd, level, optname, ip_mreq, optlen));
            break;

1457 1458 1459 1460 1461 1462 1463 1464 1465 1466 1467 1468
        case IP_BLOCK_SOURCE:
        case IP_UNBLOCK_SOURCE:
        case IP_ADD_SOURCE_MEMBERSHIP:
        case IP_DROP_SOURCE_MEMBERSHIP:
            if (optlen != sizeof (struct target_ip_mreq_source))
                return -TARGET_EINVAL;

            ip_mreq_source = lock_user(VERIFY_READ, optval_addr, optlen, 1);
            ret = get_errno(setsockopt(sockfd, level, optname, ip_mreq_source, optlen));
            unlock_user (ip_mreq_source, optval_addr, 0);
            break;

1469 1470 1471 1472
        default:
            goto unimplemented;
        }
        break;
1473 1474 1475 1476 1477 1478 1479 1480 1481 1482 1483 1484 1485 1486 1487 1488 1489 1490 1491 1492
    case SOL_IPV6:
        switch (optname) {
        case IPV6_MTU_DISCOVER:
        case IPV6_MTU:
        case IPV6_V6ONLY:
        case IPV6_RECVPKTINFO:
            val = 0;
            if (optlen < sizeof(uint32_t)) {
                return -TARGET_EINVAL;
            }
            if (get_user_u32(val, optval_addr)) {
                return -TARGET_EFAULT;
            }
            ret = get_errno(setsockopt(sockfd, level, optname,
                                       &val, sizeof(val)));
            break;
        default:
            goto unimplemented;
        }
        break;
1493 1494 1495 1496 1497 1498 1499 1500 1501 1502 1503 1504 1505 1506 1507
    case SOL_RAW:
        switch (optname) {
        case ICMP_FILTER:
            /* struct icmp_filter takes an u32 value */
            if (optlen < sizeof(uint32_t)) {
                return -TARGET_EINVAL;
            }

            if (get_user_u32(val, optval_addr)) {
                return -TARGET_EFAULT;
            }
            ret = get_errno(setsockopt(sockfd, level, optname,
                                       &val, sizeof(val)));
            break;

1508 1509 1510 1511
        default:
            goto unimplemented;
        }
        break;
1512
    case TARGET_SOL_SOCKET:
1513
        switch (optname) {
1514 1515 1516 1517 1518 1519 1520 1521 1522 1523 1524 1525 1526 1527 1528 1529 1530 1531 1532 1533 1534 1535
        case TARGET_SO_RCVTIMEO:
        {
                struct timeval tv;

                optname = SO_RCVTIMEO;

set_timeout:
                if (optlen != sizeof(struct target_timeval)) {
                    return -TARGET_EINVAL;
                }

                if (copy_from_user_timeval(&tv, optval_addr)) {
                    return -TARGET_EFAULT;
                }

                ret = get_errno(setsockopt(sockfd, SOL_SOCKET, optname,
                                &tv, sizeof(tv)));
                return ret;
        }
        case TARGET_SO_SNDTIMEO:
                optname = SO_SNDTIMEO;
                goto set_timeout;
1536 1537 1538 1539 1540 1541 1542 1543 1544 1545 1546 1547 1548 1549 1550 1551 1552 1553 1554 1555 1556 1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569 1570 1571 1572 1573 1574 1575 1576 1577 1578
        case TARGET_SO_ATTACH_FILTER:
        {
                struct target_sock_fprog *tfprog;
                struct target_sock_filter *tfilter;
                struct sock_fprog fprog;
                struct sock_filter *filter;
                int i;

                if (optlen != sizeof(*tfprog)) {
                    return -TARGET_EINVAL;
                }
                if (!lock_user_struct(VERIFY_READ, tfprog, optval_addr, 0)) {
                    return -TARGET_EFAULT;
                }
                if (!lock_user_struct(VERIFY_READ, tfilter,
                                      tswapal(tfprog->filter), 0)) {
                    unlock_user_struct(tfprog, optval_addr, 1);
                    return -TARGET_EFAULT;
                }

                fprog.len = tswap16(tfprog->len);
                filter = malloc(fprog.len * sizeof(*filter));
                if (filter == NULL) {
                    unlock_user_struct(tfilter, tfprog->filter, 1);
                    unlock_user_struct(tfprog, optval_addr, 1);
                    return -TARGET_ENOMEM;
                }
                for (i = 0; i < fprog.len; i++) {
                    filter[i].code = tswap16(tfilter[i].code);
                    filter[i].jt = tfilter[i].jt;
                    filter[i].jf = tfilter[i].jf;
                    filter[i].k = tswap32(tfilter[i].k);
                }
                fprog.filter = filter;

                ret = get_errno(setsockopt(sockfd, SOL_SOCKET,
                                SO_ATTACH_FILTER, &fprog, sizeof(fprog)));
                free(filter);

                unlock_user_struct(tfilter, tfprog->filter, 1);
                unlock_user_struct(tfprog, optval_addr, 1);
                return ret;
        }
1579 1580 1581 1582 1583 1584 1585 1586 1587 1588 1589 1590 1591 1592 1593 1594 1595 1596 1597
	case TARGET_SO_BINDTODEVICE:
	{
		char *dev_ifname, *addr_ifname;

		if (optlen > IFNAMSIZ - 1) {
		    optlen = IFNAMSIZ - 1;
		}
		dev_ifname = lock_user(VERIFY_READ, optval_addr, optlen, 1);
		if (!dev_ifname) {
		    return -TARGET_EFAULT;
		}
		optname = SO_BINDTODEVICE;
		addr_ifname = alloca(IFNAMSIZ);
		memcpy(addr_ifname, dev_ifname, optlen);
		addr_ifname[optlen] = 0;
		ret = get_errno(setsockopt(sockfd, level, optname, addr_ifname, optlen));
		unlock_user (dev_ifname, optval_addr, 0);
		return ret;
	}
1598
            /* Options with 'int' argument.  */
1599 1600 1601 1602 1603 1604 1605 1606 1607 1608 1609 1610 1611 1612 1613 1614 1615 1616 1617 1618 1619
        case TARGET_SO_DEBUG:
		optname = SO_DEBUG;
		break;
        case TARGET_SO_REUSEADDR:
		optname = SO_REUSEADDR;
		break;
        case TARGET_SO_TYPE:
		optname = SO_TYPE;
		break;
        case TARGET_SO_ERROR:
		optname = SO_ERROR;
		break;
        case TARGET_SO_DONTROUTE:
		optname = SO_DONTROUTE;
		break;
        case TARGET_SO_BROADCAST:
		optname = SO_BROADCAST;
		break;
        case TARGET_SO_SNDBUF:
		optname = SO_SNDBUF;
		break;
1620 1621 1622
        case TARGET_SO_SNDBUFFORCE:
                optname = SO_SNDBUFFORCE;
                break;
1623 1624 1625
        case TARGET_SO_RCVBUF:
		optname = SO_RCVBUF;
		break;
1626 1627 1628
        case TARGET_SO_RCVBUFFORCE:
                optname = SO_RCVBUFFORCE;
                break;
1629 1630 1631 1632 1633 1634 1635 1636 1637 1638 1639 1640
        case TARGET_SO_KEEPALIVE:
		optname = SO_KEEPALIVE;
		break;
        case TARGET_SO_OOBINLINE:
		optname = SO_OOBINLINE;
		break;
        case TARGET_SO_NO_CHECK:
		optname = SO_NO_CHECK;
		break;
        case TARGET_SO_PRIORITY:
		optname = SO_PRIORITY;
		break;
B
bellard 已提交
1641
#ifdef SO_BSDCOMPAT
1642 1643 1644
        case TARGET_SO_BSDCOMPAT:
		optname = SO_BSDCOMPAT;
		break;
B
bellard 已提交
1645
#endif
1646 1647 1648
        case TARGET_SO_PASSCRED:
		optname = SO_PASSCRED;
		break;
1649 1650 1651
        case TARGET_SO_PASSSEC:
                optname = SO_PASSSEC;
                break;
1652 1653 1654 1655 1656 1657
        case TARGET_SO_TIMESTAMP:
		optname = SO_TIMESTAMP;
		break;
        case TARGET_SO_RCVLOWAT:
		optname = SO_RCVLOWAT;
		break;
1658 1659 1660 1661
            break;
        default:
            goto unimplemented;
        }
1662
	if (optlen < sizeof(uint32_t))
1663
            return -TARGET_EINVAL;
1664

1665 1666
	if (get_user_u32(val, optval_addr))
            return -TARGET_EFAULT;
1667
	ret = get_errno(setsockopt(sockfd, SOL_SOCKET, optname, &val, sizeof(val)));
1668
        break;
B
bellard 已提交
1669
    default:
1670
    unimplemented:
1671
        gemu_log("Unsupported setsockopt level=%d optname=%d\n", level, optname);
1672
        ret = -TARGET_ENOPROTOOPT;
B
bellard 已提交
1673
    }
1674
    return ret;
B
bellard 已提交
1675 1676
}

1677
/* do_getsockopt() Must return target values and target errnos. */
1678
static abi_long do_getsockopt(int sockfd, int level, int optname,
1679
                              abi_ulong optval_addr, abi_ulong optlen)
B
bellard 已提交
1680
{
1681
    abi_long ret;
1682 1683
    int len, val;
    socklen_t lv;
1684 1685

    switch(level) {
1686
    case TARGET_SOL_SOCKET:
1687 1688 1689 1690 1691 1692 1693 1694
        level = SOL_SOCKET;
        switch (optname) {
        /* These don't just return a single integer */
        case TARGET_SO_LINGER:
        case TARGET_SO_RCVTIMEO:
        case TARGET_SO_SNDTIMEO:
        case TARGET_SO_PEERNAME:
            goto unimplemented;
1695 1696 1697 1698 1699 1700 1701 1702 1703 1704 1705 1706 1707 1708 1709 1710 1711 1712 1713 1714 1715 1716 1717 1718 1719 1720 1721 1722 1723 1724 1725 1726 1727
        case TARGET_SO_PEERCRED: {
            struct ucred cr;
            socklen_t crlen;
            struct target_ucred *tcr;

            if (get_user_u32(len, optlen)) {
                return -TARGET_EFAULT;
            }
            if (len < 0) {
                return -TARGET_EINVAL;
            }

            crlen = sizeof(cr);
            ret = get_errno(getsockopt(sockfd, level, SO_PEERCRED,
                                       &cr, &crlen));
            if (ret < 0) {
                return ret;
            }
            if (len > crlen) {
                len = crlen;
            }
            if (!lock_user_struct(VERIFY_WRITE, tcr, optval_addr, 0)) {
                return -TARGET_EFAULT;
            }
            __put_user(cr.pid, &tcr->pid);
            __put_user(cr.uid, &tcr->uid);
            __put_user(cr.gid, &tcr->gid);
            unlock_user_struct(tcr, optval_addr, 1);
            if (put_user_u32(len, optlen)) {
                return -TARGET_EFAULT;
            }
            break;
        }
1728 1729 1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749 1750 1751 1752 1753 1754 1755 1756 1757 1758 1759 1760 1761 1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773 1774 1775 1776 1777 1778
        /* Options with 'int' argument.  */
        case TARGET_SO_DEBUG:
            optname = SO_DEBUG;
            goto int_case;
        case TARGET_SO_REUSEADDR:
            optname = SO_REUSEADDR;
            goto int_case;
        case TARGET_SO_TYPE:
            optname = SO_TYPE;
            goto int_case;
        case TARGET_SO_ERROR:
            optname = SO_ERROR;
            goto int_case;
        case TARGET_SO_DONTROUTE:
            optname = SO_DONTROUTE;
            goto int_case;
        case TARGET_SO_BROADCAST:
            optname = SO_BROADCAST;
            goto int_case;
        case TARGET_SO_SNDBUF:
            optname = SO_SNDBUF;
            goto int_case;
        case TARGET_SO_RCVBUF:
            optname = SO_RCVBUF;
            goto int_case;
        case TARGET_SO_KEEPALIVE:
            optname = SO_KEEPALIVE;
            goto int_case;
        case TARGET_SO_OOBINLINE:
            optname = SO_OOBINLINE;
            goto int_case;
        case TARGET_SO_NO_CHECK:
            optname = SO_NO_CHECK;
            goto int_case;
        case TARGET_SO_PRIORITY:
            optname = SO_PRIORITY;
            goto int_case;
#ifdef SO_BSDCOMPAT
        case TARGET_SO_BSDCOMPAT:
            optname = SO_BSDCOMPAT;
            goto int_case;
#endif
        case TARGET_SO_PASSCRED:
            optname = SO_PASSCRED;
            goto int_case;
        case TARGET_SO_TIMESTAMP:
            optname = SO_TIMESTAMP;
            goto int_case;
        case TARGET_SO_RCVLOWAT:
            optname = SO_RCVLOWAT;
            goto int_case;
1779 1780 1781
        case TARGET_SO_ACCEPTCONN:
            optname = SO_ACCEPTCONN;
            goto int_case;
1782
        default:
B
bellard 已提交
1783 1784 1785 1786 1787 1788
            goto int_case;
        }
        break;
    case SOL_TCP:
        /* TCP options all take an 'int' value.  */
    int_case:
1789 1790
        if (get_user_u32(len, optlen))
            return -TARGET_EFAULT;
B
bellard 已提交
1791
        if (len < 0)
1792
            return -TARGET_EINVAL;
1793
        lv = sizeof(lv);
B
bellard 已提交
1794 1795 1796
        ret = get_errno(getsockopt(sockfd, level, optname, &val, &lv));
        if (ret < 0)
            return ret;
1797 1798 1799
        if (optname == SO_TYPE) {
            val = host_to_target_sock_type(val);
        }
B
bellard 已提交
1800 1801
        if (len > lv)
            len = lv;
1802 1803 1804 1805 1806 1807
        if (len == 4) {
            if (put_user_u32(val, optval_addr))
                return -TARGET_EFAULT;
        } else {
            if (put_user_u8(val, optval_addr))
                return -TARGET_EFAULT;
1808
        }
1809 1810
        if (put_user_u32(len, optlen))
            return -TARGET_EFAULT;
B
bellard 已提交
1811 1812 1813 1814 1815 1816 1817 1818 1819 1820 1821 1822 1823 1824 1825 1826 1827 1828
        break;
    case SOL_IP:
        switch(optname) {
        case IP_TOS:
        case IP_TTL:
        case IP_HDRINCL:
        case IP_ROUTER_ALERT:
        case IP_RECVOPTS:
        case IP_RETOPTS:
        case IP_PKTINFO:
        case IP_MTU_DISCOVER:
        case IP_RECVERR:
        case IP_RECVTOS:
#ifdef IP_FREEBIND
        case IP_FREEBIND:
#endif
        case IP_MULTICAST_TTL:
        case IP_MULTICAST_LOOP:
1829 1830
            if (get_user_u32(len, optlen))
                return -TARGET_EFAULT;
1831
            if (len < 0)
1832
                return -TARGET_EINVAL;
1833
            lv = sizeof(lv);
1834 1835 1836
            ret = get_errno(getsockopt(sockfd, level, optname, &val, &lv));
            if (ret < 0)
                return ret;
B
bellard 已提交
1837 1838
            if (len < sizeof(int) && len > 0 && val >= 0 && val < 255) {
                len = 1;
1839 1840 1841
                if (put_user_u32(len, optlen)
                    || put_user_u8(val, optval_addr))
                    return -TARGET_EFAULT;
B
bellard 已提交
1842 1843 1844
            } else {
                if (len > sizeof(int))
                    len = sizeof(int);
1845 1846 1847
                if (put_user_u32(len, optlen)
                    || put_user_u32(val, optval_addr))
                    return -TARGET_EFAULT;
B
bellard 已提交
1848
            }
1849
            break;
B
bellard 已提交
1850
        default:
1851 1852
            ret = -TARGET_ENOPROTOOPT;
            break;
1853 1854 1855 1856 1857 1858
        }
        break;
    default:
    unimplemented:
        gemu_log("getsockopt level=%d optname=%d not yet supported\n",
                 level, optname);
1859
        ret = -TARGET_EOPNOTSUPP;
1860 1861 1862
        break;
    }
    return ret;
B
bellard 已提交
1863 1864
}

1865 1866
static struct iovec *lock_iovec(int type, abi_ulong target_addr,
                                int count, int copy)
1867 1868
{
    struct target_iovec *target_vec;
1869 1870
    struct iovec *vec;
    abi_ulong total_len, max_len;
1871
    int i;
1872
    int err = 0;
T
Tom Musta 已提交
1873
    bool bad_address = false;
1874

1875 1876 1877 1878
    if (count == 0) {
        errno = 0;
        return NULL;
    }
1879
    if (count < 0 || count > IOV_MAX) {
1880 1881 1882 1883 1884 1885 1886 1887 1888 1889 1890 1891 1892
        errno = EINVAL;
        return NULL;
    }

    vec = calloc(count, sizeof(struct iovec));
    if (vec == NULL) {
        errno = ENOMEM;
        return NULL;
    }

    target_vec = lock_user(VERIFY_READ, target_addr,
                           count * sizeof(struct target_iovec), 1);
    if (target_vec == NULL) {
1893
        err = EFAULT;
1894 1895 1896 1897 1898 1899 1900 1901 1902 1903 1904 1905 1906
        goto fail2;
    }

    /* ??? If host page size > target page size, this will result in a
       value larger than what we can actually support.  */
    max_len = 0x7fffffff & TARGET_PAGE_MASK;
    total_len = 0;

    for (i = 0; i < count; i++) {
        abi_ulong base = tswapal(target_vec[i].iov_base);
        abi_long len = tswapal(target_vec[i].iov_len);

        if (len < 0) {
1907
            err = EINVAL;
1908 1909 1910 1911
            goto fail;
        } else if (len == 0) {
            /* Zero length pointer is ignored.  */
            vec[i].iov_base = 0;
B
bellard 已提交
1912
        } else {
1913
            vec[i].iov_base = lock_user(type, base, len, copy);
T
Tom Musta 已提交
1914 1915 1916 1917
            /* If the first buffer pointer is bad, this is a fault.  But
             * subsequent bad buffers will result in a partial write; this
             * is realized by filling the vector with null pointers and
             * zero lengths. */
1918
            if (!vec[i].iov_base) {
T
Tom Musta 已提交
1919 1920 1921 1922 1923 1924 1925 1926 1927
                if (i == 0) {
                    err = EFAULT;
                    goto fail;
                } else {
                    bad_address = true;
                }
            }
            if (bad_address) {
                len = 0;
1928 1929 1930 1931
            }
            if (len > max_len - total_len) {
                len = max_len - total_len;
            }
B
bellard 已提交
1932
        }
1933 1934
        vec[i].iov_len = len;
        total_len += len;
1935
    }
1936 1937 1938 1939 1940

    unlock_user(target_vec, target_addr, 0);
    return vec;

 fail:
1941 1942 1943 1944 1945
    while (--i >= 0) {
        if (tswapal(target_vec[i].iov_len) > 0) {
            unlock_user(vec[i].iov_base, tswapal(target_vec[i].iov_base), 0);
        }
    }
1946
    unlock_user(target_vec, target_addr, 0);
1947 1948 1949
 fail2:
    free(vec);
    errno = err;
1950
    return NULL;
1951 1952
}

1953 1954
static void unlock_iovec(struct iovec *vec, abi_ulong target_addr,
                         int count, int copy)
1955 1956 1957 1958
{
    struct target_iovec *target_vec;
    int i;

1959 1960 1961 1962 1963
    target_vec = lock_user(VERIFY_READ, target_addr,
                           count * sizeof(struct target_iovec), 1);
    if (target_vec) {
        for (i = 0; i < count; i++) {
            abi_ulong base = tswapal(target_vec[i].iov_base);
1964
            abi_long len = tswapal(target_vec[i].iov_len);
1965 1966 1967
            if (len < 0) {
                break;
            }
1968 1969
            unlock_user(vec[i].iov_base, base, copy ? vec[i].iov_len : 0);
        }
1970
        unlock_user(target_vec, target_addr, 0);
1971
    }
1972

1973
    free(vec);
1974 1975
}

1976
static inline int target_to_host_sock_type(int *type)
1977
{
1978 1979 1980 1981
    int host_type = 0;
    int target_type = *type;

    switch (target_type & TARGET_SOCK_TYPE_MASK) {
1982
    case TARGET_SOCK_DGRAM:
1983
        host_type = SOCK_DGRAM;
1984 1985
        break;
    case TARGET_SOCK_STREAM:
1986
        host_type = SOCK_STREAM;
1987
        break;
1988 1989
    default:
        host_type = target_type & TARGET_SOCK_TYPE_MASK;
1990 1991
        break;
    }
1992
    if (target_type & TARGET_SOCK_CLOEXEC) {
1993
#if defined(SOCK_CLOEXEC)
1994
        host_type |= SOCK_CLOEXEC;
1995 1996 1997
#else
        return -TARGET_EINVAL;
#endif
1998 1999
    }
    if (target_type & TARGET_SOCK_NONBLOCK) {
2000
#if defined(SOCK_NONBLOCK)
2001
        host_type |= SOCK_NONBLOCK;
2002 2003 2004
#elif !defined(O_NONBLOCK)
        return -TARGET_EINVAL;
#endif
2005 2006
    }
    *type = host_type;
2007 2008 2009 2010 2011 2012 2013 2014 2015 2016 2017 2018 2019 2020 2021 2022
    return 0;
}

/* Try to emulate socket type flags after socket creation.  */
static int sock_flags_fixup(int fd, int target_type)
{
#if !defined(SOCK_NONBLOCK) && defined(O_NONBLOCK)
    if (target_type & TARGET_SOCK_NONBLOCK) {
        int flags = fcntl(fd, F_GETFL);
        if (fcntl(fd, F_SETFL, O_NONBLOCK | flags) == -1) {
            close(fd);
            return -TARGET_EINVAL;
        }
    }
#endif
    return fd;
2023 2024 2025 2026 2027
}

/* do_socket() Must return target values and target errnos. */
static abi_long do_socket(int domain, int type, int protocol)
{
2028 2029 2030 2031 2032 2033 2034
    int target_type = type;
    int ret;

    ret = target_to_host_sock_type(&type);
    if (ret) {
        return ret;
    }
2035

2036
    if (domain == PF_NETLINK)
2037
        return -TARGET_EAFNOSUPPORT;
2038 2039 2040 2041 2042
    ret = get_errno(socket(domain, type, protocol));
    if (ret >= 0) {
        ret = sock_flags_fixup(ret, target_type);
    }
    return ret;
2043 2044
}

2045
/* do_bind() Must return target values and target errnos. */
2046 2047
static abi_long do_bind(int sockfd, abi_ulong target_addr,
                        socklen_t addrlen)
2048
{
2049
    void *addr;
2050
    abi_long ret;
2051

2052
    if ((int)addrlen < 0) {
2053
        return -TARGET_EINVAL;
2054
    }
2055

2056
    addr = alloca(addrlen+1);
2057

2058 2059 2060 2061
    ret = target_to_host_sockaddr(addr, target_addr, addrlen);
    if (ret)
        return ret;

2062 2063 2064
    return get_errno(bind(sockfd, addr, addrlen));
}

2065
/* do_connect() Must return target values and target errnos. */
2066 2067
static abi_long do_connect(int sockfd, abi_ulong target_addr,
                           socklen_t addrlen)
2068
{
2069
    void *addr;
2070
    abi_long ret;
2071

2072
    if ((int)addrlen < 0) {
2073
        return -TARGET_EINVAL;
2074
    }
2075

J
Joakim Tjernlund 已提交
2076
    addr = alloca(addrlen+1);
2077

2078 2079 2080 2081
    ret = target_to_host_sockaddr(addr, target_addr, addrlen);
    if (ret)
        return ret;

2082 2083 2084
    return get_errno(connect(sockfd, addr, addrlen));
}

2085 2086 2087
/* do_sendrecvmsg_locked() Must return target values and target errnos. */
static abi_long do_sendrecvmsg_locked(int fd, struct target_msghdr *msgp,
                                      int flags, int send)
2088
{
2089
    abi_long ret, len;
2090 2091 2092
    struct msghdr msg;
    int count;
    struct iovec *vec;
2093
    abi_ulong target_vec;
2094 2095 2096

    if (msgp->msg_name) {
        msg.msg_namelen = tswap32(msgp->msg_namelen);
J
Joakim Tjernlund 已提交
2097
        msg.msg_name = alloca(msg.msg_namelen+1);
2098
        ret = target_to_host_sockaddr(msg.msg_name, tswapal(msgp->msg_name),
2099
                                msg.msg_namelen);
2100
        if (ret) {
2101
            goto out2;
2102
        }
2103 2104 2105 2106
    } else {
        msg.msg_name = NULL;
        msg.msg_namelen = 0;
    }
2107
    msg.msg_controllen = 2 * tswapal(msgp->msg_controllen);
2108 2109
    msg.msg_control = alloca(msg.msg_controllen);
    msg.msg_flags = tswap32(msgp->msg_flags);
2110

2111 2112
    count = tswapal(msgp->msg_iovlen);
    target_vec = tswapal(msgp->msg_iov);
2113 2114 2115 2116 2117 2118
    vec = lock_iovec(send ? VERIFY_READ : VERIFY_WRITE,
                     target_vec, count, send);
    if (vec == NULL) {
        ret = -host_to_target_errno(errno);
        goto out2;
    }
2119 2120
    msg.msg_iovlen = count;
    msg.msg_iov = vec;
2121

2122
    if (send) {
2123 2124 2125
        ret = target_to_host_cmsg(&msg, msgp);
        if (ret == 0)
            ret = get_errno(sendmsg(fd, &msg, flags));
2126 2127
    } else {
        ret = get_errno(recvmsg(fd, &msg, flags));
2128 2129
        if (!is_error(ret)) {
            len = ret;
2130
            ret = host_to_target_cmsg(msgp, &msg);
2131 2132 2133 2134 2135 2136 2137 2138 2139 2140
            if (!is_error(ret)) {
                msgp->msg_namelen = tswap32(msg.msg_namelen);
                if (msg.msg_name != NULL) {
                    ret = host_to_target_sockaddr(tswapal(msgp->msg_name),
                                    msg.msg_name, msg.msg_namelen);
                    if (ret) {
                        goto out;
                    }
                }

2141
                ret = len;
2142
            }
2143
        }
2144
    }
2145 2146

out:
2147
    unlock_iovec(vec, target_vec, count, !send);
2148
out2:
2149 2150 2151 2152 2153 2154 2155 2156 2157 2158 2159 2160 2161 2162 2163 2164
    return ret;
}

static abi_long do_sendrecvmsg(int fd, abi_ulong target_msg,
                               int flags, int send)
{
    abi_long ret;
    struct target_msghdr *msgp;

    if (!lock_user_struct(send ? VERIFY_READ : VERIFY_WRITE,
                          msgp,
                          target_msg,
                          send ? 1 : 0)) {
        return -TARGET_EFAULT;
    }
    ret = do_sendrecvmsg_locked(fd, msgp, flags, send);
2165
    unlock_user_struct(msgp, target_msg, send ? 0 : 1);
2166 2167 2168
    return ret;
}

2169 2170 2171 2172 2173 2174 2175 2176 2177 2178 2179 2180 2181 2182 2183 2184 2185 2186 2187 2188 2189 2190 2191 2192 2193 2194 2195 2196 2197 2198 2199 2200 2201 2202 2203 2204 2205 2206 2207 2208 2209 2210 2211 2212 2213 2214 2215 2216 2217
#ifdef TARGET_NR_sendmmsg
/* We don't rely on the C library to have sendmmsg/recvmmsg support,
 * so it might not have this *mmsg-specific flag either.
 */
#ifndef MSG_WAITFORONE
#define MSG_WAITFORONE 0x10000
#endif

static abi_long do_sendrecvmmsg(int fd, abi_ulong target_msgvec,
                                unsigned int vlen, unsigned int flags,
                                int send)
{
    struct target_mmsghdr *mmsgp;
    abi_long ret = 0;
    int i;

    if (vlen > UIO_MAXIOV) {
        vlen = UIO_MAXIOV;
    }

    mmsgp = lock_user(VERIFY_WRITE, target_msgvec, sizeof(*mmsgp) * vlen, 1);
    if (!mmsgp) {
        return -TARGET_EFAULT;
    }

    for (i = 0; i < vlen; i++) {
        ret = do_sendrecvmsg_locked(fd, &mmsgp[i].msg_hdr, flags, send);
        if (is_error(ret)) {
            break;
        }
        mmsgp[i].msg_len = tswap32(ret);
        /* MSG_WAITFORONE turns on MSG_DONTWAIT after one packet */
        if (flags & MSG_WAITFORONE) {
            flags |= MSG_DONTWAIT;
        }
    }

    unlock_user(mmsgp, target_msgvec, sizeof(*mmsgp) * i);

    /* Return number of datagrams sent if we sent any at all;
     * otherwise return the error.
     */
    if (i) {
        return i;
    }
    return ret;
}
#endif

P
Peter Maydell 已提交
2218 2219 2220 2221 2222 2223 2224 2225 2226 2227 2228 2229 2230 2231 2232 2233
/* If we don't have a system accept4() then just call accept.
 * The callsites to do_accept4() will ensure that they don't
 * pass a non-zero flags argument in this config.
 */
#ifndef CONFIG_ACCEPT4
static inline int accept4(int sockfd, struct sockaddr *addr,
                          socklen_t *addrlen, int flags)
{
    assert(flags == 0);
    return accept(sockfd, addr, addrlen);
}
#endif

/* do_accept4() Must return target values and target errnos. */
static abi_long do_accept4(int fd, abi_ulong target_addr,
                           abi_ulong target_addrlen_addr, int flags)
P
pbrook 已提交
2234
{
2235 2236
    socklen_t addrlen;
    void *addr;
2237
    abi_long ret;
2238 2239 2240
    int host_flags;

    host_flags = target_to_host_bitmask(flags, fcntl_flags_tbl);
P
pbrook 已提交
2241

P
Peter Maydell 已提交
2242
    if (target_addr == 0) {
2243
        return get_errno(accept4(fd, NULL, NULL, host_flags));
P
Peter Maydell 已提交
2244
    }
2245 2246

    /* linux returns EINVAL if addrlen pointer is invalid */
2247
    if (get_user_u32(addrlen, target_addrlen_addr))
2248
        return -TARGET_EINVAL;
2249

2250
    if ((int)addrlen < 0) {
2251
        return -TARGET_EINVAL;
2252
    }
2253

2254 2255 2256
    if (!access_ok(VERIFY_WRITE, target_addr, addrlen))
        return -TARGET_EINVAL;

2257 2258
    addr = alloca(addrlen);

2259
    ret = get_errno(accept4(fd, addr, &addrlen, host_flags));
P
pbrook 已提交
2260 2261
    if (!is_error(ret)) {
        host_to_target_sockaddr(target_addr, addr, addrlen);
2262 2263
        if (put_user_u32(addrlen, target_addrlen_addr))
            ret = -TARGET_EFAULT;
P
pbrook 已提交
2264 2265 2266 2267
    }
    return ret;
}

2268
/* do_getpeername() Must return target values and target errnos. */
2269
static abi_long do_getpeername(int fd, abi_ulong target_addr,
2270
                               abi_ulong target_addrlen_addr)
P
pbrook 已提交
2271
{
2272 2273
    socklen_t addrlen;
    void *addr;
2274
    abi_long ret;
P
pbrook 已提交
2275

2276 2277 2278
    if (get_user_u32(addrlen, target_addrlen_addr))
        return -TARGET_EFAULT;

2279
    if ((int)addrlen < 0) {
2280
        return -TARGET_EINVAL;
2281
    }
2282

2283 2284 2285
    if (!access_ok(VERIFY_WRITE, target_addr, addrlen))
        return -TARGET_EFAULT;

2286 2287
    addr = alloca(addrlen);

P
pbrook 已提交
2288 2289 2290
    ret = get_errno(getpeername(fd, addr, &addrlen));
    if (!is_error(ret)) {
        host_to_target_sockaddr(target_addr, addr, addrlen);
2291 2292
        if (put_user_u32(addrlen, target_addrlen_addr))
            ret = -TARGET_EFAULT;
P
pbrook 已提交
2293 2294 2295 2296
    }
    return ret;
}

2297
/* do_getsockname() Must return target values and target errnos. */
2298
static abi_long do_getsockname(int fd, abi_ulong target_addr,
2299
                               abi_ulong target_addrlen_addr)
P
pbrook 已提交
2300
{
2301 2302
    socklen_t addrlen;
    void *addr;
2303
    abi_long ret;
P
pbrook 已提交
2304

2305 2306 2307
    if (get_user_u32(addrlen, target_addrlen_addr))
        return -TARGET_EFAULT;

2308
    if ((int)addrlen < 0) {
2309
        return -TARGET_EINVAL;
2310
    }
2311

2312 2313 2314
    if (!access_ok(VERIFY_WRITE, target_addr, addrlen))
        return -TARGET_EFAULT;

2315 2316
    addr = alloca(addrlen);

P
pbrook 已提交
2317 2318 2319
    ret = get_errno(getsockname(fd, addr, &addrlen));
    if (!is_error(ret)) {
        host_to_target_sockaddr(target_addr, addr, addrlen);
2320 2321
        if (put_user_u32(addrlen, target_addrlen_addr))
            ret = -TARGET_EFAULT;
P
pbrook 已提交
2322 2323 2324 2325
    }
    return ret;
}

2326
/* do_socketpair() Must return target values and target errnos. */
2327
static abi_long do_socketpair(int domain, int type, int protocol,
2328
                              abi_ulong target_tab_addr)
P
pbrook 已提交
2329 2330
{
    int tab[2];
2331
    abi_long ret;
P
pbrook 已提交
2332

2333 2334
    target_to_host_sock_type(&type);

P
pbrook 已提交
2335 2336
    ret = get_errno(socketpair(domain, type, protocol, tab));
    if (!is_error(ret)) {
2337 2338 2339
        if (put_user_s32(tab[0], target_tab_addr)
            || put_user_s32(tab[1], target_tab_addr + sizeof(tab[0])))
            ret = -TARGET_EFAULT;
P
pbrook 已提交
2340 2341 2342 2343
    }
    return ret;
}

2344
/* do_sendto() Must return target values and target errnos. */
2345 2346
static abi_long do_sendto(int fd, abi_ulong msg, size_t len, int flags,
                          abi_ulong target_addr, socklen_t addrlen)
P
pbrook 已提交
2347 2348 2349
{
    void *addr;
    void *host_msg;
2350
    abi_long ret;
P
pbrook 已提交
2351

2352
    if ((int)addrlen < 0) {
2353
        return -TARGET_EINVAL;
2354
    }
2355

2356 2357 2358
    host_msg = lock_user(VERIFY_READ, msg, len, 1);
    if (!host_msg)
        return -TARGET_EFAULT;
P
pbrook 已提交
2359
    if (target_addr) {
J
Joakim Tjernlund 已提交
2360
        addr = alloca(addrlen+1);
2361 2362 2363 2364 2365
        ret = target_to_host_sockaddr(addr, target_addr, addrlen);
        if (ret) {
            unlock_user(host_msg, msg, 0);
            return ret;
        }
P
pbrook 已提交
2366 2367 2368 2369 2370 2371 2372 2373
        ret = get_errno(sendto(fd, host_msg, len, flags, addr, addrlen));
    } else {
        ret = get_errno(send(fd, host_msg, len, flags));
    }
    unlock_user(host_msg, msg, 0);
    return ret;
}

2374
/* do_recvfrom() Must return target values and target errnos. */
2375 2376 2377
static abi_long do_recvfrom(int fd, abi_ulong msg, size_t len, int flags,
                            abi_ulong target_addr,
                            abi_ulong target_addrlen)
P
pbrook 已提交
2378 2379 2380 2381
{
    socklen_t addrlen;
    void *addr;
    void *host_msg;
2382
    abi_long ret;
P
pbrook 已提交
2383

2384 2385 2386
    host_msg = lock_user(VERIFY_WRITE, msg, len, 0);
    if (!host_msg)
        return -TARGET_EFAULT;
P
pbrook 已提交
2387
    if (target_addr) {
2388 2389 2390 2391
        if (get_user_u32(addrlen, target_addrlen)) {
            ret = -TARGET_EFAULT;
            goto fail;
        }
2392
        if ((int)addrlen < 0) {
2393 2394 2395
            ret = -TARGET_EINVAL;
            goto fail;
        }
P
pbrook 已提交
2396 2397 2398 2399
        addr = alloca(addrlen);
        ret = get_errno(recvfrom(fd, host_msg, len, flags, addr, &addrlen));
    } else {
        addr = NULL; /* To keep compiler quiet.  */
B
Blue Swirl 已提交
2400
        ret = get_errno(qemu_recv(fd, host_msg, len, flags));
P
pbrook 已提交
2401 2402 2403 2404
    }
    if (!is_error(ret)) {
        if (target_addr) {
            host_to_target_sockaddr(target_addr, addr, addrlen);
2405 2406 2407 2408
            if (put_user_u32(addrlen, target_addrlen)) {
                ret = -TARGET_EFAULT;
                goto fail;
            }
P
pbrook 已提交
2409 2410 2411
        }
        unlock_user(host_msg, msg, len);
    } else {
2412
fail:
P
pbrook 已提交
2413 2414 2415 2416 2417
        unlock_user(host_msg, msg, 0);
    }
    return ret;
}

2418
#ifdef TARGET_NR_socketcall
2419
/* do_socketcall() Must return target values and target errnos. */
2420
static abi_long do_socketcall(int num, abi_ulong vptr)
2421
{
2422 2423 2424 2425 2426 2427 2428 2429 2430 2431 2432 2433 2434 2435 2436 2437 2438 2439 2440 2441 2442 2443 2444 2445 2446 2447 2448 2449
    static const unsigned ac[] = { /* number of arguments per call */
        [SOCKOP_socket] = 3,      /* domain, type, protocol */
        [SOCKOP_bind] = 3,        /* sockfd, addr, addrlen */
        [SOCKOP_connect] = 3,     /* sockfd, addr, addrlen */
        [SOCKOP_listen] = 2,      /* sockfd, backlog */
        [SOCKOP_accept] = 3,      /* sockfd, addr, addrlen */
        [SOCKOP_accept4] = 4,     /* sockfd, addr, addrlen, flags */
        [SOCKOP_getsockname] = 3, /* sockfd, addr, addrlen */
        [SOCKOP_getpeername] = 3, /* sockfd, addr, addrlen */
        [SOCKOP_socketpair] = 4,  /* domain, type, protocol, tab */
        [SOCKOP_send] = 4,        /* sockfd, msg, len, flags */
        [SOCKOP_recv] = 4,        /* sockfd, msg, len, flags */
        [SOCKOP_sendto] = 6,      /* sockfd, msg, len, flags, addr, addrlen */
        [SOCKOP_recvfrom] = 6,    /* sockfd, msg, len, flags, addr, addrlen */
        [SOCKOP_shutdown] = 2,    /* sockfd, how */
        [SOCKOP_sendmsg] = 3,     /* sockfd, msg, flags */
        [SOCKOP_recvmsg] = 3,     /* sockfd, msg, flags */
        [SOCKOP_setsockopt] = 5,  /* sockfd, level, optname, optval, optlen */
        [SOCKOP_getsockopt] = 5,  /* sockfd, level, optname, optval, optlen */
    };
    abi_long a[6]; /* max 6 args */

    /* first, collect the arguments in a[] according to ac[] */
    if (num >= 0 && num < ARRAY_SIZE(ac)) {
        unsigned i;
        assert(ARRAY_SIZE(a) >= ac[num]); /* ensure we have space for args */
        for (i = 0; i < ac[num]; ++i) {
            if (get_user_ual(a[i], vptr + i * sizeof(abi_long)) != 0) {
2450 2451
                return -TARGET_EFAULT;
            }
2452
        }
2453
    }
B
bellard 已提交
2454

2455 2456 2457 2458 2459 2460 2461 2462 2463 2464 2465 2466 2467 2468 2469 2470 2471 2472 2473 2474 2475 2476 2477 2478 2479 2480 2481 2482 2483 2484 2485 2486 2487 2488 2489 2490 2491 2492
    /* now when we have the args, actually handle the call */
    switch (num) {
    case SOCKOP_socket: /* domain, type, protocol */
        return do_socket(a[0], a[1], a[2]);
    case SOCKOP_bind: /* sockfd, addr, addrlen */
        return do_bind(a[0], a[1], a[2]);
    case SOCKOP_connect: /* sockfd, addr, addrlen */
        return do_connect(a[0], a[1], a[2]);
    case SOCKOP_listen: /* sockfd, backlog */
        return get_errno(listen(a[0], a[1]));
    case SOCKOP_accept: /* sockfd, addr, addrlen */
        return do_accept4(a[0], a[1], a[2], 0);
    case SOCKOP_accept4: /* sockfd, addr, addrlen, flags */
        return do_accept4(a[0], a[1], a[2], a[3]);
    case SOCKOP_getsockname: /* sockfd, addr, addrlen */
        return do_getsockname(a[0], a[1], a[2]);
    case SOCKOP_getpeername: /* sockfd, addr, addrlen */
        return do_getpeername(a[0], a[1], a[2]);
    case SOCKOP_socketpair: /* domain, type, protocol, tab */
        return do_socketpair(a[0], a[1], a[2], a[3]);
    case SOCKOP_send: /* sockfd, msg, len, flags */
        return do_sendto(a[0], a[1], a[2], a[3], 0, 0);
    case SOCKOP_recv: /* sockfd, msg, len, flags */
        return do_recvfrom(a[0], a[1], a[2], a[3], 0, 0);
    case SOCKOP_sendto: /* sockfd, msg, len, flags, addr, addrlen */
        return do_sendto(a[0], a[1], a[2], a[3], a[4], a[5]);
    case SOCKOP_recvfrom: /* sockfd, msg, len, flags, addr, addrlen */
        return do_recvfrom(a[0], a[1], a[2], a[3], a[4], a[5]);
    case SOCKOP_shutdown: /* sockfd, how */
        return get_errno(shutdown(a[0], a[1]));
    case SOCKOP_sendmsg: /* sockfd, msg, flags */
        return do_sendrecvmsg(a[0], a[1], a[2], 1);
    case SOCKOP_recvmsg: /* sockfd, msg, flags */
        return do_sendrecvmsg(a[0], a[1], a[2], 0);
    case SOCKOP_setsockopt: /* sockfd, level, optname, optval, optlen */
        return do_setsockopt(a[0], a[1], a[2], a[3], a[4]);
    case SOCKOP_getsockopt: /* sockfd, level, optname, optval, optlen */
        return do_getsockopt(a[0], a[1], a[2], a[3], a[4]);
2493 2494
    default:
        gemu_log("Unsupported socketcall: %d\n", num);
2495
        return -TARGET_ENOSYS;
2496 2497
    }
}
2498
#endif
2499

2500 2501 2502
#define N_SHM_REGIONS	32

static struct shm_region {
2503 2504
    abi_ulong	start;
    abi_ulong	size;
2505 2506
} shm_regions[N_SHM_REGIONS];

2507 2508 2509
struct target_semid_ds
{
  struct target_ipc_perm sem_perm;
2510
  abi_ulong sem_otime;
2511
#if !defined(TARGET_PPC64)
2512
  abi_ulong __unused1;
2513
#endif
2514
  abi_ulong sem_ctime;
2515
#if !defined(TARGET_PPC64)
2516
  abi_ulong __unused2;
2517
#endif
2518 2519 2520
  abi_ulong sem_nsems;
  abi_ulong __unused3;
  abi_ulong __unused4;
2521 2522
};

2523 2524
static inline abi_long target_to_host_ipc_perm(struct ipc_perm *host_ip,
                                               abi_ulong target_addr)
2525 2526 2527 2528
{
    struct target_ipc_perm *target_ip;
    struct target_semid_ds *target_sd;

2529 2530
    if (!lock_user_struct(VERIFY_READ, target_sd, target_addr, 1))
        return -TARGET_EFAULT;
2531
    target_ip = &(target_sd->sem_perm);
2532 2533 2534 2535 2536 2537 2538 2539
    host_ip->__key = tswap32(target_ip->__key);
    host_ip->uid = tswap32(target_ip->uid);
    host_ip->gid = tswap32(target_ip->gid);
    host_ip->cuid = tswap32(target_ip->cuid);
    host_ip->cgid = tswap32(target_ip->cgid);
#if defined(TARGET_ALPHA) || defined(TARGET_MIPS) || defined(TARGET_PPC)
    host_ip->mode = tswap32(target_ip->mode);
#else
2540
    host_ip->mode = tswap16(target_ip->mode);
2541 2542 2543 2544 2545 2546
#endif
#if defined(TARGET_PPC)
    host_ip->__seq = tswap32(target_ip->__seq);
#else
    host_ip->__seq = tswap16(target_ip->__seq);
#endif
2547
    unlock_user_struct(target_sd, target_addr, 0);
2548
    return 0;
2549 2550
}

2551 2552
static inline abi_long host_to_target_ipc_perm(abi_ulong target_addr,
                                               struct ipc_perm *host_ip)
2553 2554 2555 2556
{
    struct target_ipc_perm *target_ip;
    struct target_semid_ds *target_sd;

2557 2558
    if (!lock_user_struct(VERIFY_WRITE, target_sd, target_addr, 0))
        return -TARGET_EFAULT;
2559
    target_ip = &(target_sd->sem_perm);
2560 2561 2562 2563 2564 2565 2566 2567
    target_ip->__key = tswap32(host_ip->__key);
    target_ip->uid = tswap32(host_ip->uid);
    target_ip->gid = tswap32(host_ip->gid);
    target_ip->cuid = tswap32(host_ip->cuid);
    target_ip->cgid = tswap32(host_ip->cgid);
#if defined(TARGET_ALPHA) || defined(TARGET_MIPS) || defined(TARGET_PPC)
    target_ip->mode = tswap32(host_ip->mode);
#else
2568
    target_ip->mode = tswap16(host_ip->mode);
2569 2570 2571 2572 2573 2574
#endif
#if defined(TARGET_PPC)
    target_ip->__seq = tswap32(host_ip->__seq);
#else
    target_ip->__seq = tswap16(host_ip->__seq);
#endif
2575
    unlock_user_struct(target_sd, target_addr, 1);
2576
    return 0;
2577 2578
}

2579 2580
static inline abi_long target_to_host_semid_ds(struct semid_ds *host_sd,
                                               abi_ulong target_addr)
2581 2582 2583
{
    struct target_semid_ds *target_sd;

2584 2585
    if (!lock_user_struct(VERIFY_READ, target_sd, target_addr, 1))
        return -TARGET_EFAULT;
2586 2587
    if (target_to_host_ipc_perm(&(host_sd->sem_perm),target_addr))
        return -TARGET_EFAULT;
2588 2589 2590
    host_sd->sem_nsems = tswapal(target_sd->sem_nsems);
    host_sd->sem_otime = tswapal(target_sd->sem_otime);
    host_sd->sem_ctime = tswapal(target_sd->sem_ctime);
2591
    unlock_user_struct(target_sd, target_addr, 0);
2592
    return 0;
2593 2594
}

2595 2596
static inline abi_long host_to_target_semid_ds(abi_ulong target_addr,
                                               struct semid_ds *host_sd)
2597 2598 2599
{
    struct target_semid_ds *target_sd;

2600 2601
    if (!lock_user_struct(VERIFY_WRITE, target_sd, target_addr, 0))
        return -TARGET_EFAULT;
2602
    if (host_to_target_ipc_perm(target_addr,&(host_sd->sem_perm)))
2603
        return -TARGET_EFAULT;
2604 2605 2606
    target_sd->sem_nsems = tswapal(host_sd->sem_nsems);
    target_sd->sem_otime = tswapal(host_sd->sem_otime);
    target_sd->sem_ctime = tswapal(host_sd->sem_ctime);
2607
    unlock_user_struct(target_sd, target_addr, 1);
2608
    return 0;
2609 2610
}

2611 2612 2613 2614 2615 2616 2617 2618 2619 2620 2621 2622 2623 2624 2625 2626 2627 2628 2629 2630 2631 2632 2633 2634 2635 2636 2637 2638 2639 2640 2641 2642 2643
struct target_seminfo {
    int semmap;
    int semmni;
    int semmns;
    int semmnu;
    int semmsl;
    int semopm;
    int semume;
    int semusz;
    int semvmx;
    int semaem;
};

static inline abi_long host_to_target_seminfo(abi_ulong target_addr,
                                              struct seminfo *host_seminfo)
{
    struct target_seminfo *target_seminfo;
    if (!lock_user_struct(VERIFY_WRITE, target_seminfo, target_addr, 0))
        return -TARGET_EFAULT;
    __put_user(host_seminfo->semmap, &target_seminfo->semmap);
    __put_user(host_seminfo->semmni, &target_seminfo->semmni);
    __put_user(host_seminfo->semmns, &target_seminfo->semmns);
    __put_user(host_seminfo->semmnu, &target_seminfo->semmnu);
    __put_user(host_seminfo->semmsl, &target_seminfo->semmsl);
    __put_user(host_seminfo->semopm, &target_seminfo->semopm);
    __put_user(host_seminfo->semume, &target_seminfo->semume);
    __put_user(host_seminfo->semusz, &target_seminfo->semusz);
    __put_user(host_seminfo->semvmx, &target_seminfo->semvmx);
    __put_user(host_seminfo->semaem, &target_seminfo->semaem);
    unlock_user_struct(target_seminfo, target_addr, 1);
    return 0;
}

2644 2645
union semun {
	int val;
2646
	struct semid_ds *buf;
2647
	unsigned short *array;
2648
	struct seminfo *__buf;
2649 2650
};

2651 2652
union target_semun {
	int val;
2653 2654 2655
	abi_ulong buf;
	abi_ulong array;
	abi_ulong __buf;
2656 2657
};

2658 2659
static inline abi_long target_to_host_semarray(int semid, unsigned short **host_array,
                                               abi_ulong target_addr)
2660
{
2661 2662 2663 2664 2665
    int nsems;
    unsigned short *array;
    union semun semun;
    struct semid_ds semid_ds;
    int i, ret;
2666

2667 2668 2669 2670 2671 2672 2673 2674 2675
    semun.buf = &semid_ds;

    ret = semctl(semid, 0, IPC_STAT, semun);
    if (ret == -1)
        return get_errno(ret);

    nsems = semid_ds.sem_nsems;

    *host_array = malloc(nsems*sizeof(unsigned short));
2676 2677 2678
    if (!*host_array) {
        return -TARGET_ENOMEM;
    }
2679 2680
    array = lock_user(VERIFY_READ, target_addr,
                      nsems*sizeof(unsigned short), 1);
2681 2682
    if (!array) {
        free(*host_array);
2683
        return -TARGET_EFAULT;
2684
    }
2685 2686 2687

    for(i=0; i<nsems; i++) {
        __get_user((*host_array)[i], &array[i]);
2688
    }
2689 2690
    unlock_user(array, target_addr, 0);

2691
    return 0;
2692 2693
}

2694 2695
static inline abi_long host_to_target_semarray(int semid, abi_ulong target_addr,
                                               unsigned short **host_array)
2696
{
2697 2698 2699 2700 2701
    int nsems;
    unsigned short *array;
    union semun semun;
    struct semid_ds semid_ds;
    int i, ret;
2702

2703 2704 2705 2706 2707 2708 2709 2710 2711 2712 2713 2714 2715 2716 2717
    semun.buf = &semid_ds;

    ret = semctl(semid, 0, IPC_STAT, semun);
    if (ret == -1)
        return get_errno(ret);

    nsems = semid_ds.sem_nsems;

    array = lock_user(VERIFY_WRITE, target_addr,
                      nsems*sizeof(unsigned short), 0);
    if (!array)
        return -TARGET_EFAULT;

    for(i=0; i<nsems; i++) {
        __put_user((*host_array)[i], &array[i]);
2718
    }
2719 2720 2721
    free(*host_array);
    unlock_user(array, target_addr, 1);

2722
    return 0;
2723 2724
}

2725 2726
static inline abi_long do_semctl(int semid, int semnum, int cmd,
                                 union target_semun target_su)
2727 2728 2729
{
    union semun arg;
    struct semid_ds dsarg;
2730
    unsigned short *array = NULL;
2731 2732 2733 2734
    struct seminfo seminfo;
    abi_long ret = -TARGET_EINVAL;
    abi_long err;
    cmd &= 0xff;
2735 2736 2737 2738

    switch( cmd ) {
	case GETVAL:
	case SETVAL:
2739 2740 2741 2742 2743 2744 2745 2746 2747 2748 2749
            /* In 64 bit cross-endian situations, we will erroneously pick up
             * the wrong half of the union for the "val" element.  To rectify
             * this, the entire 8-byte structure is byteswapped, followed by
	     * a swap of the 4 byte val field. In other cases, the data is
	     * already in proper host byte order. */
	    if (sizeof(target_su.val) != (sizeof(target_su.buf))) {
		target_su.buf = tswapal(target_su.buf);
		arg.val = tswap32(target_su.val);
	    } else {
		arg.val = target_su.val;
	    }
2750
            ret = get_errno(semctl(semid, semnum, cmd, arg));
2751 2752 2753
            break;
	case GETALL:
	case SETALL:
2754 2755 2756 2757 2758 2759 2760 2761
            err = target_to_host_semarray(semid, &array, target_su.array);
            if (err)
                return err;
            arg.array = array;
            ret = get_errno(semctl(semid, semnum, cmd, arg));
            err = host_to_target_semarray(semid, target_su.array, &array);
            if (err)
                return err;
2762 2763 2764
            break;
	case IPC_STAT:
	case IPC_SET:
2765 2766 2767 2768 2769 2770 2771 2772 2773 2774 2775 2776 2777 2778 2779 2780 2781 2782 2783 2784 2785 2786 2787
	case SEM_STAT:
            err = target_to_host_semid_ds(&dsarg, target_su.buf);
            if (err)
                return err;
            arg.buf = &dsarg;
            ret = get_errno(semctl(semid, semnum, cmd, arg));
            err = host_to_target_semid_ds(target_su.buf, &dsarg);
            if (err)
                return err;
            break;
	case IPC_INFO:
	case SEM_INFO:
            arg.__buf = &seminfo;
            ret = get_errno(semctl(semid, semnum, cmd, arg));
            err = host_to_target_seminfo(target_su.__buf, &seminfo);
            if (err)
                return err;
            break;
	case IPC_RMID:
	case GETPID:
	case GETNCNT:
	case GETZCNT:
            ret = get_errno(semctl(semid, semnum, cmd, NULL));
2788 2789 2790 2791 2792 2793
            break;
    }

    return ret;
}

2794 2795 2796 2797 2798 2799 2800 2801 2802 2803 2804 2805 2806 2807 2808 2809 2810 2811 2812 2813 2814 2815 2816 2817 2818 2819 2820 2821 2822 2823 2824 2825 2826 2827 2828 2829
struct target_sembuf {
    unsigned short sem_num;
    short sem_op;
    short sem_flg;
};

static inline abi_long target_to_host_sembuf(struct sembuf *host_sembuf,
                                             abi_ulong target_addr,
                                             unsigned nsops)
{
    struct target_sembuf *target_sembuf;
    int i;

    target_sembuf = lock_user(VERIFY_READ, target_addr,
                              nsops*sizeof(struct target_sembuf), 1);
    if (!target_sembuf)
        return -TARGET_EFAULT;

    for(i=0; i<nsops; i++) {
        __get_user(host_sembuf[i].sem_num, &target_sembuf[i].sem_num);
        __get_user(host_sembuf[i].sem_op, &target_sembuf[i].sem_op);
        __get_user(host_sembuf[i].sem_flg, &target_sembuf[i].sem_flg);
    }

    unlock_user(target_sembuf, target_addr, 0);

    return 0;
}

static inline abi_long do_semop(int semid, abi_long ptr, unsigned nsops)
{
    struct sembuf sops[nsops];

    if (target_to_host_sembuf(sops, ptr, nsops))
        return -TARGET_EFAULT;

2830
    return get_errno(semop(semid, sops, nsops));
2831 2832
}

T
ths 已提交
2833 2834
struct target_msqid_ds
{
2835 2836 2837 2838 2839 2840 2841 2842 2843 2844 2845 2846 2847 2848 2849 2850 2851 2852 2853 2854
    struct target_ipc_perm msg_perm;
    abi_ulong msg_stime;
#if TARGET_ABI_BITS == 32
    abi_ulong __unused1;
#endif
    abi_ulong msg_rtime;
#if TARGET_ABI_BITS == 32
    abi_ulong __unused2;
#endif
    abi_ulong msg_ctime;
#if TARGET_ABI_BITS == 32
    abi_ulong __unused3;
#endif
    abi_ulong __msg_cbytes;
    abi_ulong msg_qnum;
    abi_ulong msg_qbytes;
    abi_ulong msg_lspid;
    abi_ulong msg_lrpid;
    abi_ulong __unused4;
    abi_ulong __unused5;
T
ths 已提交
2855 2856
};

2857 2858
static inline abi_long target_to_host_msqid_ds(struct msqid_ds *host_md,
                                               abi_ulong target_addr)
T
ths 已提交
2859 2860 2861
{
    struct target_msqid_ds *target_md;

2862 2863
    if (!lock_user_struct(VERIFY_READ, target_md, target_addr, 1))
        return -TARGET_EFAULT;
2864 2865
    if (target_to_host_ipc_perm(&(host_md->msg_perm),target_addr))
        return -TARGET_EFAULT;
2866 2867 2868 2869 2870 2871 2872 2873
    host_md->msg_stime = tswapal(target_md->msg_stime);
    host_md->msg_rtime = tswapal(target_md->msg_rtime);
    host_md->msg_ctime = tswapal(target_md->msg_ctime);
    host_md->__msg_cbytes = tswapal(target_md->__msg_cbytes);
    host_md->msg_qnum = tswapal(target_md->msg_qnum);
    host_md->msg_qbytes = tswapal(target_md->msg_qbytes);
    host_md->msg_lspid = tswapal(target_md->msg_lspid);
    host_md->msg_lrpid = tswapal(target_md->msg_lrpid);
T
ths 已提交
2874
    unlock_user_struct(target_md, target_addr, 0);
2875
    return 0;
T
ths 已提交
2876 2877
}

2878 2879
static inline abi_long host_to_target_msqid_ds(abi_ulong target_addr,
                                               struct msqid_ds *host_md)
T
ths 已提交
2880 2881 2882
{
    struct target_msqid_ds *target_md;

2883 2884
    if (!lock_user_struct(VERIFY_WRITE, target_md, target_addr, 0))
        return -TARGET_EFAULT;
2885 2886
    if (host_to_target_ipc_perm(target_addr,&(host_md->msg_perm)))
        return -TARGET_EFAULT;
2887 2888 2889 2890 2891 2892 2893 2894
    target_md->msg_stime = tswapal(host_md->msg_stime);
    target_md->msg_rtime = tswapal(host_md->msg_rtime);
    target_md->msg_ctime = tswapal(host_md->msg_ctime);
    target_md->__msg_cbytes = tswapal(host_md->__msg_cbytes);
    target_md->msg_qnum = tswapal(host_md->msg_qnum);
    target_md->msg_qbytes = tswapal(host_md->msg_qbytes);
    target_md->msg_lspid = tswapal(host_md->msg_lspid);
    target_md->msg_lrpid = tswapal(host_md->msg_lrpid);
T
ths 已提交
2895
    unlock_user_struct(target_md, target_addr, 1);
2896
    return 0;
T
ths 已提交
2897 2898
}

2899 2900 2901 2902 2903 2904 2905 2906 2907 2908 2909 2910 2911 2912 2913 2914 2915 2916 2917 2918 2919 2920 2921 2922 2923 2924
struct target_msginfo {
    int msgpool;
    int msgmap;
    int msgmax;
    int msgmnb;
    int msgmni;
    int msgssz;
    int msgtql;
    unsigned short int msgseg;
};

static inline abi_long host_to_target_msginfo(abi_ulong target_addr,
                                              struct msginfo *host_msginfo)
{
    struct target_msginfo *target_msginfo;
    if (!lock_user_struct(VERIFY_WRITE, target_msginfo, target_addr, 0))
        return -TARGET_EFAULT;
    __put_user(host_msginfo->msgpool, &target_msginfo->msgpool);
    __put_user(host_msginfo->msgmap, &target_msginfo->msgmap);
    __put_user(host_msginfo->msgmax, &target_msginfo->msgmax);
    __put_user(host_msginfo->msgmnb, &target_msginfo->msgmnb);
    __put_user(host_msginfo->msgmni, &target_msginfo->msgmni);
    __put_user(host_msginfo->msgssz, &target_msginfo->msgssz);
    __put_user(host_msginfo->msgtql, &target_msginfo->msgtql);
    __put_user(host_msginfo->msgseg, &target_msginfo->msgseg);
    unlock_user_struct(target_msginfo, target_addr, 1);
2925
    return 0;
2926 2927 2928
}

static inline abi_long do_msgctl(int msgid, int cmd, abi_long ptr)
T
ths 已提交
2929 2930
{
    struct msqid_ds dsarg;
2931 2932 2933 2934 2935 2936
    struct msginfo msginfo;
    abi_long ret = -TARGET_EINVAL;

    cmd &= 0xff;

    switch (cmd) {
T
ths 已提交
2937 2938
    case IPC_STAT:
    case IPC_SET:
2939 2940 2941 2942 2943 2944 2945 2946 2947 2948 2949 2950 2951 2952 2953 2954
    case MSG_STAT:
        if (target_to_host_msqid_ds(&dsarg,ptr))
            return -TARGET_EFAULT;
        ret = get_errno(msgctl(msgid, cmd, &dsarg));
        if (host_to_target_msqid_ds(ptr,&dsarg))
            return -TARGET_EFAULT;
        break;
    case IPC_RMID:
        ret = get_errno(msgctl(msgid, cmd, NULL));
        break;
    case IPC_INFO:
    case MSG_INFO:
        ret = get_errno(msgctl(msgid, cmd, (struct msqid_ds *)&msginfo));
        if (host_to_target_msginfo(ptr, &msginfo))
            return -TARGET_EFAULT;
        break;
T
ths 已提交
2955
    }
2956

T
ths 已提交
2957 2958 2959 2960
    return ret;
}

struct target_msgbuf {
2961 2962
    abi_long mtype;
    char	mtext[1];
T
ths 已提交
2963 2964
};

2965
static inline abi_long do_msgsnd(int msqid, abi_long msgp,
2966
                                 ssize_t msgsz, int msgflg)
T
ths 已提交
2967 2968 2969
{
    struct target_msgbuf *target_mb;
    struct msgbuf *host_mb;
2970
    abi_long ret = 0;
T
ths 已提交
2971

2972 2973 2974 2975
    if (msgsz < 0) {
        return -TARGET_EINVAL;
    }

2976 2977
    if (!lock_user_struct(VERIFY_READ, target_mb, msgp, 0))
        return -TARGET_EFAULT;
T
ths 已提交
2978
    host_mb = malloc(msgsz+sizeof(long));
2979 2980 2981 2982
    if (!host_mb) {
        unlock_user_struct(target_mb, msgp, 0);
        return -TARGET_ENOMEM;
    }
2983
    host_mb->mtype = (abi_long) tswapal(target_mb->mtype);
2984
    memcpy(host_mb->mtext, target_mb->mtext, msgsz);
T
ths 已提交
2985 2986 2987 2988 2989 2990 2991
    ret = get_errno(msgsnd(msqid, host_mb, msgsz, msgflg));
    free(host_mb);
    unlock_user_struct(target_mb, msgp, 0);

    return ret;
}

2992
static inline abi_long do_msgrcv(int msqid, abi_long msgp,
2993
                                 unsigned int msgsz, abi_long msgtyp,
2994
                                 int msgflg)
T
ths 已提交
2995 2996
{
    struct target_msgbuf *target_mb;
2997
    char *target_mtext;
T
ths 已提交
2998
    struct msgbuf *host_mb;
2999
    abi_long ret = 0;
T
ths 已提交
3000

3001 3002
    if (!lock_user_struct(VERIFY_WRITE, target_mb, msgp, 0))
        return -TARGET_EFAULT;
3003

3004
    host_mb = g_malloc(msgsz+sizeof(long));
L
Laurent Vivier 已提交
3005
    ret = get_errno(msgrcv(msqid, host_mb, msgsz, msgtyp, msgflg));
3006

3007 3008 3009 3010 3011 3012 3013
    if (ret > 0) {
        abi_ulong target_mtext_addr = msgp + sizeof(abi_ulong);
        target_mtext = lock_user(VERIFY_WRITE, target_mtext_addr, ret, 0);
        if (!target_mtext) {
            ret = -TARGET_EFAULT;
            goto end;
        }
3014
        memcpy(target_mb->mtext, host_mb->mtext, ret);
3015 3016
        unlock_user(target_mtext, target_mtext_addr, ret);
    }
3017

3018
    target_mb->mtype = tswapal(host_mb->mtype);
T
ths 已提交
3019

3020 3021 3022
end:
    if (target_mb)
        unlock_user_struct(target_mb, msgp, 1);
3023
    g_free(host_mb);
T
ths 已提交
3024 3025 3026
    return ret;
}

3027 3028 3029 3030 3031 3032 3033 3034 3035 3036 3037 3038 3039 3040 3041 3042 3043 3044 3045 3046 3047 3048 3049 3050 3051 3052 3053 3054 3055 3056 3057 3058 3059 3060 3061 3062 3063 3064 3065 3066 3067 3068 3069 3070 3071 3072 3073 3074 3075 3076 3077 3078 3079 3080 3081 3082 3083 3084 3085 3086 3087 3088 3089 3090 3091 3092 3093 3094 3095 3096 3097 3098 3099 3100 3101 3102 3103 3104 3105 3106 3107 3108 3109 3110 3111 3112 3113 3114 3115 3116 3117 3118 3119 3120 3121 3122 3123 3124 3125 3126 3127 3128 3129 3130 3131 3132 3133 3134 3135 3136 3137 3138 3139 3140 3141 3142 3143 3144 3145 3146 3147 3148 3149 3150 3151 3152 3153 3154 3155 3156 3157 3158 3159 3160 3161 3162 3163 3164 3165 3166 3167 3168 3169 3170 3171 3172 3173 3174 3175 3176 3177 3178 3179 3180 3181 3182 3183 3184 3185 3186 3187 3188 3189 3190 3191 3192 3193 3194 3195 3196 3197 3198 3199 3200 3201 3202 3203 3204 3205 3206 3207 3208 3209 3210 3211 3212 3213
static inline abi_long target_to_host_shmid_ds(struct shmid_ds *host_sd,
                                               abi_ulong target_addr)
{
    struct target_shmid_ds *target_sd;

    if (!lock_user_struct(VERIFY_READ, target_sd, target_addr, 1))
        return -TARGET_EFAULT;
    if (target_to_host_ipc_perm(&(host_sd->shm_perm), target_addr))
        return -TARGET_EFAULT;
    __get_user(host_sd->shm_segsz, &target_sd->shm_segsz);
    __get_user(host_sd->shm_atime, &target_sd->shm_atime);
    __get_user(host_sd->shm_dtime, &target_sd->shm_dtime);
    __get_user(host_sd->shm_ctime, &target_sd->shm_ctime);
    __get_user(host_sd->shm_cpid, &target_sd->shm_cpid);
    __get_user(host_sd->shm_lpid, &target_sd->shm_lpid);
    __get_user(host_sd->shm_nattch, &target_sd->shm_nattch);
    unlock_user_struct(target_sd, target_addr, 0);
    return 0;
}

static inline abi_long host_to_target_shmid_ds(abi_ulong target_addr,
                                               struct shmid_ds *host_sd)
{
    struct target_shmid_ds *target_sd;

    if (!lock_user_struct(VERIFY_WRITE, target_sd, target_addr, 0))
        return -TARGET_EFAULT;
    if (host_to_target_ipc_perm(target_addr, &(host_sd->shm_perm)))
        return -TARGET_EFAULT;
    __put_user(host_sd->shm_segsz, &target_sd->shm_segsz);
    __put_user(host_sd->shm_atime, &target_sd->shm_atime);
    __put_user(host_sd->shm_dtime, &target_sd->shm_dtime);
    __put_user(host_sd->shm_ctime, &target_sd->shm_ctime);
    __put_user(host_sd->shm_cpid, &target_sd->shm_cpid);
    __put_user(host_sd->shm_lpid, &target_sd->shm_lpid);
    __put_user(host_sd->shm_nattch, &target_sd->shm_nattch);
    unlock_user_struct(target_sd, target_addr, 1);
    return 0;
}

struct  target_shminfo {
    abi_ulong shmmax;
    abi_ulong shmmin;
    abi_ulong shmmni;
    abi_ulong shmseg;
    abi_ulong shmall;
};

static inline abi_long host_to_target_shminfo(abi_ulong target_addr,
                                              struct shminfo *host_shminfo)
{
    struct target_shminfo *target_shminfo;
    if (!lock_user_struct(VERIFY_WRITE, target_shminfo, target_addr, 0))
        return -TARGET_EFAULT;
    __put_user(host_shminfo->shmmax, &target_shminfo->shmmax);
    __put_user(host_shminfo->shmmin, &target_shminfo->shmmin);
    __put_user(host_shminfo->shmmni, &target_shminfo->shmmni);
    __put_user(host_shminfo->shmseg, &target_shminfo->shmseg);
    __put_user(host_shminfo->shmall, &target_shminfo->shmall);
    unlock_user_struct(target_shminfo, target_addr, 1);
    return 0;
}

struct target_shm_info {
    int used_ids;
    abi_ulong shm_tot;
    abi_ulong shm_rss;
    abi_ulong shm_swp;
    abi_ulong swap_attempts;
    abi_ulong swap_successes;
};

static inline abi_long host_to_target_shm_info(abi_ulong target_addr,
                                               struct shm_info *host_shm_info)
{
    struct target_shm_info *target_shm_info;
    if (!lock_user_struct(VERIFY_WRITE, target_shm_info, target_addr, 0))
        return -TARGET_EFAULT;
    __put_user(host_shm_info->used_ids, &target_shm_info->used_ids);
    __put_user(host_shm_info->shm_tot, &target_shm_info->shm_tot);
    __put_user(host_shm_info->shm_rss, &target_shm_info->shm_rss);
    __put_user(host_shm_info->shm_swp, &target_shm_info->shm_swp);
    __put_user(host_shm_info->swap_attempts, &target_shm_info->swap_attempts);
    __put_user(host_shm_info->swap_successes, &target_shm_info->swap_successes);
    unlock_user_struct(target_shm_info, target_addr, 1);
    return 0;
}

static inline abi_long do_shmctl(int shmid, int cmd, abi_long buf)
{
    struct shmid_ds dsarg;
    struct shminfo shminfo;
    struct shm_info shm_info;
    abi_long ret = -TARGET_EINVAL;

    cmd &= 0xff;

    switch(cmd) {
    case IPC_STAT:
    case IPC_SET:
    case SHM_STAT:
        if (target_to_host_shmid_ds(&dsarg, buf))
            return -TARGET_EFAULT;
        ret = get_errno(shmctl(shmid, cmd, &dsarg));
        if (host_to_target_shmid_ds(buf, &dsarg))
            return -TARGET_EFAULT;
        break;
    case IPC_INFO:
        ret = get_errno(shmctl(shmid, cmd, (struct shmid_ds *)&shminfo));
        if (host_to_target_shminfo(buf, &shminfo))
            return -TARGET_EFAULT;
        break;
    case SHM_INFO:
        ret = get_errno(shmctl(shmid, cmd, (struct shmid_ds *)&shm_info));
        if (host_to_target_shm_info(buf, &shm_info))
            return -TARGET_EFAULT;
        break;
    case IPC_RMID:
    case SHM_LOCK:
    case SHM_UNLOCK:
        ret = get_errno(shmctl(shmid, cmd, NULL));
        break;
    }

    return ret;
}

static inline abi_ulong do_shmat(int shmid, abi_ulong shmaddr, int shmflg)
{
    abi_long raddr;
    void *host_raddr;
    struct shmid_ds shm_info;
    int i,ret;

    /* find out the length of the shared memory segment */
    ret = get_errno(shmctl(shmid, IPC_STAT, &shm_info));
    if (is_error(ret)) {
        /* can't get length, bail out */
        return ret;
    }

    mmap_lock();

    if (shmaddr)
        host_raddr = shmat(shmid, (void *)g2h(shmaddr), shmflg);
    else {
        abi_ulong mmap_start;

        mmap_start = mmap_find_vma(0, shm_info.shm_segsz);

        if (mmap_start == -1) {
            errno = ENOMEM;
            host_raddr = (void *)-1;
        } else
            host_raddr = shmat(shmid, g2h(mmap_start), shmflg | SHM_REMAP);
    }

    if (host_raddr == (void *)-1) {
        mmap_unlock();
        return get_errno((long)host_raddr);
    }
    raddr=h2g((unsigned long)host_raddr);

    page_set_flags(raddr, raddr + shm_info.shm_segsz,
                   PAGE_VALID | PAGE_READ |
                   ((shmflg & SHM_RDONLY)? 0 : PAGE_WRITE));

    for (i = 0; i < N_SHM_REGIONS; i++) {
        if (shm_regions[i].start == 0) {
            shm_regions[i].start = raddr;
            shm_regions[i].size = shm_info.shm_segsz;
            break;
        }
    }

    mmap_unlock();
    return raddr;

}

static inline abi_long do_shmdt(abi_ulong shmaddr)
{
    int i;

    for (i = 0; i < N_SHM_REGIONS; ++i) {
        if (shm_regions[i].start == shmaddr) {
            shm_regions[i].start = 0;
3214
            page_set_flags(shmaddr, shmaddr + shm_regions[i].size, 0);
3215 3216 3217 3218 3219 3220 3221
            break;
        }
    }

    return get_errno(shmdt(g2h(shmaddr)));
}

3222
#ifdef TARGET_NR_ipc
3223
/* ??? This only works with linear mappings.  */
3224
/* do_ipc() must return target values and target errnos. */
3225 3226
static abi_long do_ipc(unsigned int call, abi_long first,
                       abi_long second, abi_long third,
3227
                       abi_long ptr, abi_long fifth)
3228 3229
{
    int version;
3230
    abi_long ret = 0;
3231 3232 3233 3234 3235

    version = call >> 16;
    call &= 0xffff;

    switch (call) {
3236
    case IPCOP_semop:
3237
        ret = do_semop(first, ptr, second);
3238 3239 3240 3241 3242 3243
        break;

    case IPCOP_semget:
        ret = get_errno(semget(first, second, third));
        break;

3244 3245 3246 3247
    case IPCOP_semctl: {
        /* The semun argument to semctl is passed by value, so dereference the
         * ptr argument. */
        abi_ulong atptr;
3248
        get_user_ual(atptr, ptr);
3249
        ret = do_semctl(first, second, third,
3250
                (union target_semun) atptr);
3251
        break;
3252
    }
3253

3254 3255 3256
    case IPCOP_msgget:
        ret = get_errno(msgget(first, second));
        break;
3257

3258 3259 3260
    case IPCOP_msgsnd:
        ret = do_msgsnd(first, ptr, second, third);
        break;
3261

3262 3263 3264
    case IPCOP_msgctl:
        ret = do_msgctl(first, second, ptr);
        break;
3265

3266 3267 3268 3269 3270 3271 3272 3273 3274 3275 3276 3277 3278
    case IPCOP_msgrcv:
        switch (version) {
        case 0:
            {
                struct target_ipc_kludge {
                    abi_long msgp;
                    abi_long msgtyp;
                } *tmp;

                if (!lock_user_struct(VERIFY_READ, tmp, ptr, 1)) {
                    ret = -TARGET_EFAULT;
                    break;
                }
3279

L
Laurent Vivier 已提交
3280
                ret = do_msgrcv(first, tswapal(tmp->msgp), second, tswapal(tmp->msgtyp), third);
3281

3282 3283 3284 3285 3286 3287 3288
                unlock_user_struct(tmp, ptr, 0);
                break;
            }
        default:
            ret = do_msgrcv(first, ptr, second, fifth, third);
        }
        break;
3289

3290
    case IPCOP_shmat:
3291 3292
        switch (version) {
        default:
3293 3294
        {
            abi_ulong raddr;
3295 3296 3297
            raddr = do_shmat(first, ptr, second);
            if (is_error(raddr))
                return get_errno(raddr);
3298
            if (put_user_ual(raddr, third))
3299
                return -TARGET_EFAULT;
3300 3301 3302 3303 3304
            break;
        }
        case 1:
            ret = -TARGET_EINVAL;
            break;
3305
        }
3306 3307
	break;
    case IPCOP_shmdt:
3308
        ret = do_shmdt(ptr);
3309 3310 3311 3312 3313 3314 3315 3316 3317
	break;

    case IPCOP_shmget:
	/* IPC_* flag values are the same on all linux platforms */
	ret = get_errno(shmget(first, second, third));
	break;

	/* IPC_* and SHM_* command values are the same on all linux platforms */
    case IPCOP_shmctl:
3318
        ret = do_shmctl(first, second, ptr);
3319 3320
        break;
    default:
3321
	gemu_log("Unsupported ipc call: %d (version %d)\n", call, version);
3322
	ret = -TARGET_ENOSYS;
3323 3324 3325 3326
	break;
    }
    return ret;
}
3327
#endif
3328

3329 3330
/* kernel structure types definitions */

3331
#define STRUCT(name, ...) STRUCT_ ## name,
3332 3333 3334
#define STRUCT_SPECIAL(name) STRUCT_ ## name,
enum {
#include "syscall_types.h"
3335
STRUCT_MAX
3336 3337 3338 3339
};
#undef STRUCT
#undef STRUCT_SPECIAL

3340
#define STRUCT(name, ...) static const argtype struct_ ## name ## _def[] = {  __VA_ARGS__, TYPE_NULL };
3341 3342 3343 3344 3345
#define STRUCT_SPECIAL(name)
#include "syscall_types.h"
#undef STRUCT
#undef STRUCT_SPECIAL

3346 3347 3348
typedef struct IOCTLEntry IOCTLEntry;

typedef abi_long do_ioctl_fn(const IOCTLEntry *ie, uint8_t *buf_temp,
3349
                             int fd, int cmd, abi_long arg);
3350 3351

struct IOCTLEntry {
3352
    int target_cmd;
3353
    unsigned int host_cmd;
3354 3355
    const char *name;
    int access;
3356
    do_ioctl_fn *do_ioctl;
B
bellard 已提交
3357
    const argtype arg_type[5];
3358
};
3359 3360 3361 3362 3363 3364 3365

#define IOC_R 0x0001
#define IOC_W 0x0002
#define IOC_RW (IOC_R | IOC_W)

#define MAX_STRUCT_SIZE 4096

3366
#ifdef CONFIG_FIEMAP
3367 3368 3369 3370 3371 3372 3373 3374
/* So fiemap access checks don't overflow on 32 bit systems.
 * This is very slightly smaller than the limit imposed by
 * the underlying kernel.
 */
#define FIEMAP_MAX_EXTENTS ((UINT_MAX - sizeof(struct fiemap))  \
                            / sizeof(struct fiemap_extent))

static abi_long do_ioctl_fs_ioc_fiemap(const IOCTLEntry *ie, uint8_t *buf_temp,
3375
                                       int fd, int cmd, abi_long arg)
3376 3377 3378 3379 3380 3381 3382 3383 3384 3385 3386 3387 3388 3389 3390 3391 3392 3393 3394 3395 3396 3397 3398 3399 3400 3401 3402 3403 3404 3405 3406 3407 3408 3409 3410 3411 3412 3413 3414 3415 3416 3417 3418 3419 3420 3421 3422 3423 3424 3425 3426 3427 3428 3429 3430 3431 3432 3433 3434 3435 3436 3437 3438 3439 3440 3441 3442 3443 3444 3445 3446 3447 3448 3449 3450 3451 3452
{
    /* The parameter for this ioctl is a struct fiemap followed
     * by an array of struct fiemap_extent whose size is set
     * in fiemap->fm_extent_count. The array is filled in by the
     * ioctl.
     */
    int target_size_in, target_size_out;
    struct fiemap *fm;
    const argtype *arg_type = ie->arg_type;
    const argtype extent_arg_type[] = { MK_STRUCT(STRUCT_fiemap_extent) };
    void *argptr, *p;
    abi_long ret;
    int i, extent_size = thunk_type_size(extent_arg_type, 0);
    uint32_t outbufsz;
    int free_fm = 0;

    assert(arg_type[0] == TYPE_PTR);
    assert(ie->access == IOC_RW);
    arg_type++;
    target_size_in = thunk_type_size(arg_type, 0);
    argptr = lock_user(VERIFY_READ, arg, target_size_in, 1);
    if (!argptr) {
        return -TARGET_EFAULT;
    }
    thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
    unlock_user(argptr, arg, 0);
    fm = (struct fiemap *)buf_temp;
    if (fm->fm_extent_count > FIEMAP_MAX_EXTENTS) {
        return -TARGET_EINVAL;
    }

    outbufsz = sizeof (*fm) +
        (sizeof(struct fiemap_extent) * fm->fm_extent_count);

    if (outbufsz > MAX_STRUCT_SIZE) {
        /* We can't fit all the extents into the fixed size buffer.
         * Allocate one that is large enough and use it instead.
         */
        fm = malloc(outbufsz);
        if (!fm) {
            return -TARGET_ENOMEM;
        }
        memcpy(fm, buf_temp, sizeof(struct fiemap));
        free_fm = 1;
    }
    ret = get_errno(ioctl(fd, ie->host_cmd, fm));
    if (!is_error(ret)) {
        target_size_out = target_size_in;
        /* An extent_count of 0 means we were only counting the extents
         * so there are no structs to copy
         */
        if (fm->fm_extent_count != 0) {
            target_size_out += fm->fm_mapped_extents * extent_size;
        }
        argptr = lock_user(VERIFY_WRITE, arg, target_size_out, 0);
        if (!argptr) {
            ret = -TARGET_EFAULT;
        } else {
            /* Convert the struct fiemap */
            thunk_convert(argptr, fm, arg_type, THUNK_TARGET);
            if (fm->fm_extent_count != 0) {
                p = argptr + target_size_in;
                /* ...and then all the struct fiemap_extents */
                for (i = 0; i < fm->fm_mapped_extents; i++) {
                    thunk_convert(p, &fm->fm_extents[i], extent_arg_type,
                                  THUNK_TARGET);
                    p += extent_size;
                }
            }
            unlock_user(argptr, arg, target_size_out);
        }
    }
    if (free_fm) {
        free(fm);
    }
    return ret;
}
3453
#endif
3454

3455
static abi_long do_ioctl_ifconf(const IOCTLEntry *ie, uint8_t *buf_temp,
3456
                                int fd, int cmd, abi_long arg)
3457 3458 3459 3460 3461 3462 3463 3464 3465 3466 3467 3468 3469 3470 3471 3472 3473 3474 3475 3476 3477 3478 3479 3480 3481 3482 3483 3484 3485 3486 3487 3488 3489 3490 3491 3492 3493 3494 3495 3496 3497 3498 3499 3500 3501 3502 3503 3504 3505 3506 3507 3508 3509 3510 3511 3512 3513 3514 3515 3516 3517 3518 3519 3520 3521 3522 3523 3524 3525 3526 3527 3528 3529 3530 3531 3532 3533 3534 3535 3536 3537 3538 3539 3540 3541 3542 3543 3544 3545 3546 3547 3548
{
    const argtype *arg_type = ie->arg_type;
    int target_size;
    void *argptr;
    int ret;
    struct ifconf *host_ifconf;
    uint32_t outbufsz;
    const argtype ifreq_arg_type[] = { MK_STRUCT(STRUCT_sockaddr_ifreq) };
    int target_ifreq_size;
    int nb_ifreq;
    int free_buf = 0;
    int i;
    int target_ifc_len;
    abi_long target_ifc_buf;
    int host_ifc_len;
    char *host_ifc_buf;

    assert(arg_type[0] == TYPE_PTR);
    assert(ie->access == IOC_RW);

    arg_type++;
    target_size = thunk_type_size(arg_type, 0);

    argptr = lock_user(VERIFY_READ, arg, target_size, 1);
    if (!argptr)
        return -TARGET_EFAULT;
    thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
    unlock_user(argptr, arg, 0);

    host_ifconf = (struct ifconf *)(unsigned long)buf_temp;
    target_ifc_len = host_ifconf->ifc_len;
    target_ifc_buf = (abi_long)(unsigned long)host_ifconf->ifc_buf;

    target_ifreq_size = thunk_type_size(ifreq_arg_type, 0);
    nb_ifreq = target_ifc_len / target_ifreq_size;
    host_ifc_len = nb_ifreq * sizeof(struct ifreq);

    outbufsz = sizeof(*host_ifconf) + host_ifc_len;
    if (outbufsz > MAX_STRUCT_SIZE) {
        /* We can't fit all the extents into the fixed size buffer.
         * Allocate one that is large enough and use it instead.
         */
        host_ifconf = malloc(outbufsz);
        if (!host_ifconf) {
            return -TARGET_ENOMEM;
        }
        memcpy(host_ifconf, buf_temp, sizeof(*host_ifconf));
        free_buf = 1;
    }
    host_ifc_buf = (char*)host_ifconf + sizeof(*host_ifconf);

    host_ifconf->ifc_len = host_ifc_len;
    host_ifconf->ifc_buf = host_ifc_buf;

    ret = get_errno(ioctl(fd, ie->host_cmd, host_ifconf));
    if (!is_error(ret)) {
	/* convert host ifc_len to target ifc_len */

        nb_ifreq = host_ifconf->ifc_len / sizeof(struct ifreq);
        target_ifc_len = nb_ifreq * target_ifreq_size;
        host_ifconf->ifc_len = target_ifc_len;

	/* restore target ifc_buf */

        host_ifconf->ifc_buf = (char *)(unsigned long)target_ifc_buf;

	/* copy struct ifconf to target user */

        argptr = lock_user(VERIFY_WRITE, arg, target_size, 0);
        if (!argptr)
            return -TARGET_EFAULT;
        thunk_convert(argptr, host_ifconf, arg_type, THUNK_TARGET);
        unlock_user(argptr, arg, target_size);

	/* copy ifreq[] to target user */

        argptr = lock_user(VERIFY_WRITE, target_ifc_buf, target_ifc_len, 0);
        for (i = 0; i < nb_ifreq ; i++) {
            thunk_convert(argptr + i * target_ifreq_size,
                          host_ifc_buf + i * sizeof(struct ifreq),
                          ifreq_arg_type, THUNK_TARGET);
        }
        unlock_user(argptr, target_ifc_buf, target_ifc_len);
    }

    if (free_buf) {
        free(host_ifconf);
    }

    return ret;
}

3549
static abi_long do_ioctl_dm(const IOCTLEntry *ie, uint8_t *buf_temp, int fd,
3550
                            int cmd, abi_long arg)
3551 3552 3553 3554 3555 3556 3557 3558 3559 3560 3561 3562 3563 3564 3565 3566 3567 3568 3569 3570 3571 3572 3573 3574 3575 3576 3577 3578 3579 3580 3581 3582 3583 3584 3585 3586 3587 3588 3589 3590 3591 3592 3593 3594 3595 3596 3597 3598 3599 3600 3601 3602 3603 3604 3605 3606 3607 3608 3609 3610 3611 3612 3613 3614 3615 3616 3617 3618 3619 3620 3621 3622 3623 3624 3625 3626 3627 3628 3629 3630 3631 3632 3633 3634
{
    void *argptr;
    struct dm_ioctl *host_dm;
    abi_long guest_data;
    uint32_t guest_data_size;
    int target_size;
    const argtype *arg_type = ie->arg_type;
    abi_long ret;
    void *big_buf = NULL;
    char *host_data;

    arg_type++;
    target_size = thunk_type_size(arg_type, 0);
    argptr = lock_user(VERIFY_READ, arg, target_size, 1);
    if (!argptr) {
        ret = -TARGET_EFAULT;
        goto out;
    }
    thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
    unlock_user(argptr, arg, 0);

    /* buf_temp is too small, so fetch things into a bigger buffer */
    big_buf = g_malloc0(((struct dm_ioctl*)buf_temp)->data_size * 2);
    memcpy(big_buf, buf_temp, target_size);
    buf_temp = big_buf;
    host_dm = big_buf;

    guest_data = arg + host_dm->data_start;
    if ((guest_data - arg) < 0) {
        ret = -EINVAL;
        goto out;
    }
    guest_data_size = host_dm->data_size - host_dm->data_start;
    host_data = (char*)host_dm + host_dm->data_start;

    argptr = lock_user(VERIFY_READ, guest_data, guest_data_size, 1);
    switch (ie->host_cmd) {
    case DM_REMOVE_ALL:
    case DM_LIST_DEVICES:
    case DM_DEV_CREATE:
    case DM_DEV_REMOVE:
    case DM_DEV_SUSPEND:
    case DM_DEV_STATUS:
    case DM_DEV_WAIT:
    case DM_TABLE_STATUS:
    case DM_TABLE_CLEAR:
    case DM_TABLE_DEPS:
    case DM_LIST_VERSIONS:
        /* no input data */
        break;
    case DM_DEV_RENAME:
    case DM_DEV_SET_GEOMETRY:
        /* data contains only strings */
        memcpy(host_data, argptr, guest_data_size);
        break;
    case DM_TARGET_MSG:
        memcpy(host_data, argptr, guest_data_size);
        *(uint64_t*)host_data = tswap64(*(uint64_t*)argptr);
        break;
    case DM_TABLE_LOAD:
    {
        void *gspec = argptr;
        void *cur_data = host_data;
        const argtype arg_type[] = { MK_STRUCT(STRUCT_dm_target_spec) };
        int spec_size = thunk_type_size(arg_type, 0);
        int i;

        for (i = 0; i < host_dm->target_count; i++) {
            struct dm_target_spec *spec = cur_data;
            uint32_t next;
            int slen;

            thunk_convert(spec, gspec, arg_type, THUNK_HOST);
            slen = strlen((char*)gspec + spec_size) + 1;
            next = spec->next;
            spec->next = sizeof(*spec) + slen;
            strcpy((char*)&spec[1], gspec + spec_size);
            gspec += next;
            cur_data += spec->next;
        }
        break;
    }
    default:
        ret = -TARGET_EINVAL;
3635
        unlock_user(argptr, guest_data, 0);
3636 3637 3638 3639 3640 3641 3642 3643 3644 3645 3646 3647 3648 3649 3650 3651 3652 3653 3654 3655 3656 3657 3658 3659 3660 3661 3662 3663 3664 3665 3666 3667 3668 3669 3670 3671 3672 3673 3674 3675 3676 3677 3678 3679 3680 3681 3682 3683 3684 3685 3686 3687 3688 3689 3690 3691 3692 3693 3694 3695 3696 3697 3698 3699 3700 3701 3702 3703 3704 3705 3706 3707 3708 3709 3710 3711 3712 3713 3714 3715 3716 3717 3718 3719 3720 3721 3722 3723 3724 3725 3726 3727 3728 3729 3730 3731 3732 3733 3734 3735 3736 3737 3738 3739 3740 3741 3742 3743 3744 3745 3746 3747 3748 3749 3750 3751 3752 3753 3754
        goto out;
    }
    unlock_user(argptr, guest_data, 0);

    ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
    if (!is_error(ret)) {
        guest_data = arg + host_dm->data_start;
        guest_data_size = host_dm->data_size - host_dm->data_start;
        argptr = lock_user(VERIFY_WRITE, guest_data, guest_data_size, 0);
        switch (ie->host_cmd) {
        case DM_REMOVE_ALL:
        case DM_DEV_CREATE:
        case DM_DEV_REMOVE:
        case DM_DEV_RENAME:
        case DM_DEV_SUSPEND:
        case DM_DEV_STATUS:
        case DM_TABLE_LOAD:
        case DM_TABLE_CLEAR:
        case DM_TARGET_MSG:
        case DM_DEV_SET_GEOMETRY:
            /* no return data */
            break;
        case DM_LIST_DEVICES:
        {
            struct dm_name_list *nl = (void*)host_dm + host_dm->data_start;
            uint32_t remaining_data = guest_data_size;
            void *cur_data = argptr;
            const argtype arg_type[] = { MK_STRUCT(STRUCT_dm_name_list) };
            int nl_size = 12; /* can't use thunk_size due to alignment */

            while (1) {
                uint32_t next = nl->next;
                if (next) {
                    nl->next = nl_size + (strlen(nl->name) + 1);
                }
                if (remaining_data < nl->next) {
                    host_dm->flags |= DM_BUFFER_FULL_FLAG;
                    break;
                }
                thunk_convert(cur_data, nl, arg_type, THUNK_TARGET);
                strcpy(cur_data + nl_size, nl->name);
                cur_data += nl->next;
                remaining_data -= nl->next;
                if (!next) {
                    break;
                }
                nl = (void*)nl + next;
            }
            break;
        }
        case DM_DEV_WAIT:
        case DM_TABLE_STATUS:
        {
            struct dm_target_spec *spec = (void*)host_dm + host_dm->data_start;
            void *cur_data = argptr;
            const argtype arg_type[] = { MK_STRUCT(STRUCT_dm_target_spec) };
            int spec_size = thunk_type_size(arg_type, 0);
            int i;

            for (i = 0; i < host_dm->target_count; i++) {
                uint32_t next = spec->next;
                int slen = strlen((char*)&spec[1]) + 1;
                spec->next = (cur_data - argptr) + spec_size + slen;
                if (guest_data_size < spec->next) {
                    host_dm->flags |= DM_BUFFER_FULL_FLAG;
                    break;
                }
                thunk_convert(cur_data, spec, arg_type, THUNK_TARGET);
                strcpy(cur_data + spec_size, (char*)&spec[1]);
                cur_data = argptr + spec->next;
                spec = (void*)host_dm + host_dm->data_start + next;
            }
            break;
        }
        case DM_TABLE_DEPS:
        {
            void *hdata = (void*)host_dm + host_dm->data_start;
            int count = *(uint32_t*)hdata;
            uint64_t *hdev = hdata + 8;
            uint64_t *gdev = argptr + 8;
            int i;

            *(uint32_t*)argptr = tswap32(count);
            for (i = 0; i < count; i++) {
                *gdev = tswap64(*hdev);
                gdev++;
                hdev++;
            }
            break;
        }
        case DM_LIST_VERSIONS:
        {
            struct dm_target_versions *vers = (void*)host_dm + host_dm->data_start;
            uint32_t remaining_data = guest_data_size;
            void *cur_data = argptr;
            const argtype arg_type[] = { MK_STRUCT(STRUCT_dm_target_versions) };
            int vers_size = thunk_type_size(arg_type, 0);

            while (1) {
                uint32_t next = vers->next;
                if (next) {
                    vers->next = vers_size + (strlen(vers->name) + 1);
                }
                if (remaining_data < vers->next) {
                    host_dm->flags |= DM_BUFFER_FULL_FLAG;
                    break;
                }
                thunk_convert(cur_data, vers, arg_type, THUNK_TARGET);
                strcpy(cur_data + vers_size, vers->name);
                cur_data += vers->next;
                remaining_data -= vers->next;
                if (!next) {
                    break;
                }
                vers = (void*)vers + next;
            }
            break;
        }
        default:
3755
            unlock_user(argptr, guest_data, 0);
3756 3757 3758 3759 3760 3761 3762 3763 3764 3765 3766 3767 3768 3769
            ret = -TARGET_EINVAL;
            goto out;
        }
        unlock_user(argptr, guest_data, guest_data_size);

        argptr = lock_user(VERIFY_WRITE, arg, target_size, 0);
        if (!argptr) {
            ret = -TARGET_EFAULT;
            goto out;
        }
        thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET);
        unlock_user(argptr, arg, target_size);
    }
out:
3770
    g_free(big_buf);
3771 3772 3773
    return ret;
}

3774
static abi_long do_ioctl_blkpg(const IOCTLEntry *ie, uint8_t *buf_temp, int fd,
3775
                               int cmd, abi_long arg)
3776 3777 3778 3779 3780 3781 3782 3783 3784 3785 3786 3787 3788 3789 3790 3791 3792 3793 3794 3795 3796 3797 3798 3799 3800 3801 3802 3803 3804 3805 3806 3807 3808 3809 3810 3811 3812 3813 3814 3815 3816 3817 3818 3819 3820 3821 3822 3823 3824 3825 3826
{
    void *argptr;
    int target_size;
    const argtype *arg_type = ie->arg_type;
    const argtype part_arg_type[] = { MK_STRUCT(STRUCT_blkpg_partition) };
    abi_long ret;

    struct blkpg_ioctl_arg *host_blkpg = (void*)buf_temp;
    struct blkpg_partition host_part;

    /* Read and convert blkpg */
    arg_type++;
    target_size = thunk_type_size(arg_type, 0);
    argptr = lock_user(VERIFY_READ, arg, target_size, 1);
    if (!argptr) {
        ret = -TARGET_EFAULT;
        goto out;
    }
    thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
    unlock_user(argptr, arg, 0);

    switch (host_blkpg->op) {
    case BLKPG_ADD_PARTITION:
    case BLKPG_DEL_PARTITION:
        /* payload is struct blkpg_partition */
        break;
    default:
        /* Unknown opcode */
        ret = -TARGET_EINVAL;
        goto out;
    }

    /* Read and convert blkpg->data */
    arg = (abi_long)(uintptr_t)host_blkpg->data;
    target_size = thunk_type_size(part_arg_type, 0);
    argptr = lock_user(VERIFY_READ, arg, target_size, 1);
    if (!argptr) {
        ret = -TARGET_EFAULT;
        goto out;
    }
    thunk_convert(&host_part, argptr, part_arg_type, THUNK_HOST);
    unlock_user(argptr, arg, 0);

    /* Swizzle the data pointer to our local copy and call! */
    host_blkpg->data = &host_part;
    ret = get_errno(ioctl(fd, ie->host_cmd, host_blkpg));

out:
    return ret;
}

3827
static abi_long do_ioctl_rt(const IOCTLEntry *ie, uint8_t *buf_temp,
3828
                                int fd, int cmd, abi_long arg)
3829 3830 3831 3832 3833 3834 3835 3836 3837 3838 3839 3840 3841 3842 3843 3844 3845 3846 3847 3848 3849 3850 3851 3852 3853 3854 3855 3856 3857 3858 3859 3860 3861 3862 3863 3864 3865 3866 3867 3868 3869 3870 3871 3872 3873 3874 3875 3876 3877 3878 3879 3880 3881 3882 3883 3884 3885 3886 3887 3888 3889
{
    const argtype *arg_type = ie->arg_type;
    const StructEntry *se;
    const argtype *field_types;
    const int *dst_offsets, *src_offsets;
    int target_size;
    void *argptr;
    abi_ulong *target_rt_dev_ptr;
    unsigned long *host_rt_dev_ptr;
    abi_long ret;
    int i;

    assert(ie->access == IOC_W);
    assert(*arg_type == TYPE_PTR);
    arg_type++;
    assert(*arg_type == TYPE_STRUCT);
    target_size = thunk_type_size(arg_type, 0);
    argptr = lock_user(VERIFY_READ, arg, target_size, 1);
    if (!argptr) {
        return -TARGET_EFAULT;
    }
    arg_type++;
    assert(*arg_type == (int)STRUCT_rtentry);
    se = struct_entries + *arg_type++;
    assert(se->convert[0] == NULL);
    /* convert struct here to be able to catch rt_dev string */
    field_types = se->field_types;
    dst_offsets = se->field_offsets[THUNK_HOST];
    src_offsets = se->field_offsets[THUNK_TARGET];
    for (i = 0; i < se->nb_fields; i++) {
        if (dst_offsets[i] == offsetof(struct rtentry, rt_dev)) {
            assert(*field_types == TYPE_PTRVOID);
            target_rt_dev_ptr = (abi_ulong *)(argptr + src_offsets[i]);
            host_rt_dev_ptr = (unsigned long *)(buf_temp + dst_offsets[i]);
            if (*target_rt_dev_ptr != 0) {
                *host_rt_dev_ptr = (unsigned long)lock_user_string(
                                                  tswapal(*target_rt_dev_ptr));
                if (!*host_rt_dev_ptr) {
                    unlock_user(argptr, arg, 0);
                    return -TARGET_EFAULT;
                }
            } else {
                *host_rt_dev_ptr = 0;
            }
            field_types++;
            continue;
        }
        field_types = thunk_convert(buf_temp + dst_offsets[i],
                                    argptr + src_offsets[i],
                                    field_types, THUNK_HOST);
    }
    unlock_user(argptr, arg, 0);

    ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
    if (*host_rt_dev_ptr != 0) {
        unlock_user((void *)*host_rt_dev_ptr,
                    *target_rt_dev_ptr, 0);
    }
    return ret;
}

3890
static abi_long do_ioctl_kdsigaccept(const IOCTLEntry *ie, uint8_t *buf_temp,
3891
                                     int fd, int cmd, abi_long arg)
3892 3893 3894 3895 3896
{
    int sig = target_to_host_signal(arg);
    return get_errno(ioctl(fd, ie->host_cmd, sig));
}

B
blueswir1 已提交
3897
static IOCTLEntry ioctl_entries[] = {
3898
#define IOCTL(cmd, access, ...) \
3899 3900 3901
    { TARGET_ ## cmd, cmd, #cmd, access, 0, {  __VA_ARGS__ } },
#define IOCTL_SPECIAL(cmd, access, dofn, ...)                      \
    { TARGET_ ## cmd, cmd, #cmd, access, dofn, {  __VA_ARGS__ } },
3902 3903 3904 3905
#include "ioctls.h"
    { 0, 0, },
};

3906
/* ??? Implement proper locking for ioctls.  */
3907
/* do_ioctl() Must return target values and target errnos. */
3908
static abi_long do_ioctl(int fd, int cmd, abi_long arg)
3909 3910 3911
{
    const IOCTLEntry *ie;
    const argtype *arg_type;
3912
    abi_long ret;
3913
    uint8_t buf_temp[MAX_STRUCT_SIZE];
3914 3915
    int target_size;
    void *argptr;
3916 3917 3918 3919

    ie = ioctl_entries;
    for(;;) {
        if (ie->target_cmd == 0) {
3920
            gemu_log("Unsupported ioctl: cmd=0x%04lx\n", (long)cmd);
3921
            return -TARGET_ENOSYS;
3922 3923 3924 3925 3926 3927
        }
        if (ie->target_cmd == cmd)
            break;
        ie++;
    }
    arg_type = ie->arg_type;
B
bellard 已提交
3928
#if defined(DEBUG)
3929
    gemu_log("ioctl: cmd=0x%04lx (%s)\n", (long)cmd, ie->name);
B
bellard 已提交
3930
#endif
3931 3932 3933 3934
    if (ie->do_ioctl) {
        return ie->do_ioctl(ie, buf_temp, fd, cmd, arg);
    }

3935 3936 3937 3938 3939 3940 3941 3942 3943 3944 3945 3946
    switch(arg_type[0]) {
    case TYPE_NULL:
        /* no argument */
        ret = get_errno(ioctl(fd, ie->host_cmd));
        break;
    case TYPE_PTRVOID:
    case TYPE_INT:
        /* int argment */
        ret = get_errno(ioctl(fd, ie->host_cmd, arg));
        break;
    case TYPE_PTR:
        arg_type++;
3947
        target_size = thunk_type_size(arg_type, 0);
3948 3949 3950 3951
        switch(ie->access) {
        case IOC_R:
            ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
            if (!is_error(ret)) {
3952 3953 3954
                argptr = lock_user(VERIFY_WRITE, arg, target_size, 0);
                if (!argptr)
                    return -TARGET_EFAULT;
3955 3956
                thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET);
                unlock_user(argptr, arg, target_size);
3957 3958 3959
            }
            break;
        case IOC_W:
3960 3961 3962
            argptr = lock_user(VERIFY_READ, arg, target_size, 1);
            if (!argptr)
                return -TARGET_EFAULT;
3963 3964
            thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
            unlock_user(argptr, arg, 0);
3965 3966 3967 3968
            ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
            break;
        default:
        case IOC_RW:
3969 3970 3971
            argptr = lock_user(VERIFY_READ, arg, target_size, 1);
            if (!argptr)
                return -TARGET_EFAULT;
3972 3973
            thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
            unlock_user(argptr, arg, 0);
3974 3975
            ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
            if (!is_error(ret)) {
3976 3977 3978
                argptr = lock_user(VERIFY_WRITE, arg, target_size, 0);
                if (!argptr)
                    return -TARGET_EFAULT;
3979 3980
                thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET);
                unlock_user(argptr, arg, target_size);
3981 3982 3983 3984 3985
            }
            break;
        }
        break;
    default:
3986 3987
        gemu_log("Unsupported ioctl type: cmd=0x%04lx type=%d\n",
                 (long)cmd, arg_type[0]);
3988
        ret = -TARGET_ENOSYS;
3989 3990 3991 3992 3993
        break;
    }
    return ret;
}

B
blueswir1 已提交
3994
static const bitmask_transtbl iflag_tbl[] = {
3995 3996 3997 3998 3999 4000 4001 4002 4003 4004 4005 4006 4007 4008 4009 4010 4011
        { TARGET_IGNBRK, TARGET_IGNBRK, IGNBRK, IGNBRK },
        { TARGET_BRKINT, TARGET_BRKINT, BRKINT, BRKINT },
        { TARGET_IGNPAR, TARGET_IGNPAR, IGNPAR, IGNPAR },
        { TARGET_PARMRK, TARGET_PARMRK, PARMRK, PARMRK },
        { TARGET_INPCK, TARGET_INPCK, INPCK, INPCK },
        { TARGET_ISTRIP, TARGET_ISTRIP, ISTRIP, ISTRIP },
        { TARGET_INLCR, TARGET_INLCR, INLCR, INLCR },
        { TARGET_IGNCR, TARGET_IGNCR, IGNCR, IGNCR },
        { TARGET_ICRNL, TARGET_ICRNL, ICRNL, ICRNL },
        { TARGET_IUCLC, TARGET_IUCLC, IUCLC, IUCLC },
        { TARGET_IXON, TARGET_IXON, IXON, IXON },
        { TARGET_IXANY, TARGET_IXANY, IXANY, IXANY },
        { TARGET_IXOFF, TARGET_IXOFF, IXOFF, IXOFF },
        { TARGET_IMAXBEL, TARGET_IMAXBEL, IMAXBEL, IMAXBEL },
        { 0, 0, 0, 0 }
};

B
blueswir1 已提交
4012
static const bitmask_transtbl oflag_tbl[] = {
4013 4014 4015 4016 4017 4018 4019 4020 4021 4022 4023 4024 4025 4026 4027 4028 4029 4030 4031 4032 4033 4034 4035 4036 4037 4038 4039
	{ TARGET_OPOST, TARGET_OPOST, OPOST, OPOST },
	{ TARGET_OLCUC, TARGET_OLCUC, OLCUC, OLCUC },
	{ TARGET_ONLCR, TARGET_ONLCR, ONLCR, ONLCR },
	{ TARGET_OCRNL, TARGET_OCRNL, OCRNL, OCRNL },
	{ TARGET_ONOCR, TARGET_ONOCR, ONOCR, ONOCR },
	{ TARGET_ONLRET, TARGET_ONLRET, ONLRET, ONLRET },
	{ TARGET_OFILL, TARGET_OFILL, OFILL, OFILL },
	{ TARGET_OFDEL, TARGET_OFDEL, OFDEL, OFDEL },
	{ TARGET_NLDLY, TARGET_NL0, NLDLY, NL0 },
	{ TARGET_NLDLY, TARGET_NL1, NLDLY, NL1 },
	{ TARGET_CRDLY, TARGET_CR0, CRDLY, CR0 },
	{ TARGET_CRDLY, TARGET_CR1, CRDLY, CR1 },
	{ TARGET_CRDLY, TARGET_CR2, CRDLY, CR2 },
	{ TARGET_CRDLY, TARGET_CR3, CRDLY, CR3 },
	{ TARGET_TABDLY, TARGET_TAB0, TABDLY, TAB0 },
	{ TARGET_TABDLY, TARGET_TAB1, TABDLY, TAB1 },
	{ TARGET_TABDLY, TARGET_TAB2, TABDLY, TAB2 },
	{ TARGET_TABDLY, TARGET_TAB3, TABDLY, TAB3 },
	{ TARGET_BSDLY, TARGET_BS0, BSDLY, BS0 },
	{ TARGET_BSDLY, TARGET_BS1, BSDLY, BS1 },
	{ TARGET_VTDLY, TARGET_VT0, VTDLY, VT0 },
	{ TARGET_VTDLY, TARGET_VT1, VTDLY, VT1 },
	{ TARGET_FFDLY, TARGET_FF0, FFDLY, FF0 },
	{ TARGET_FFDLY, TARGET_FF1, FFDLY, FF1 },
	{ 0, 0, 0, 0 }
};

B
blueswir1 已提交
4040
static const bitmask_transtbl cflag_tbl[] = {
4041 4042 4043 4044 4045 4046 4047 4048 4049 4050 4051 4052 4053 4054 4055 4056 4057 4058 4059 4060 4061 4062 4063 4064 4065 4066 4067 4068 4069 4070 4071 4072 4073 4074
	{ TARGET_CBAUD, TARGET_B0, CBAUD, B0 },
	{ TARGET_CBAUD, TARGET_B50, CBAUD, B50 },
	{ TARGET_CBAUD, TARGET_B75, CBAUD, B75 },
	{ TARGET_CBAUD, TARGET_B110, CBAUD, B110 },
	{ TARGET_CBAUD, TARGET_B134, CBAUD, B134 },
	{ TARGET_CBAUD, TARGET_B150, CBAUD, B150 },
	{ TARGET_CBAUD, TARGET_B200, CBAUD, B200 },
	{ TARGET_CBAUD, TARGET_B300, CBAUD, B300 },
	{ TARGET_CBAUD, TARGET_B600, CBAUD, B600 },
	{ TARGET_CBAUD, TARGET_B1200, CBAUD, B1200 },
	{ TARGET_CBAUD, TARGET_B1800, CBAUD, B1800 },
	{ TARGET_CBAUD, TARGET_B2400, CBAUD, B2400 },
	{ TARGET_CBAUD, TARGET_B4800, CBAUD, B4800 },
	{ TARGET_CBAUD, TARGET_B9600, CBAUD, B9600 },
	{ TARGET_CBAUD, TARGET_B19200, CBAUD, B19200 },
	{ TARGET_CBAUD, TARGET_B38400, CBAUD, B38400 },
	{ TARGET_CBAUD, TARGET_B57600, CBAUD, B57600 },
	{ TARGET_CBAUD, TARGET_B115200, CBAUD, B115200 },
	{ TARGET_CBAUD, TARGET_B230400, CBAUD, B230400 },
	{ TARGET_CBAUD, TARGET_B460800, CBAUD, B460800 },
	{ TARGET_CSIZE, TARGET_CS5, CSIZE, CS5 },
	{ TARGET_CSIZE, TARGET_CS6, CSIZE, CS6 },
	{ TARGET_CSIZE, TARGET_CS7, CSIZE, CS7 },
	{ TARGET_CSIZE, TARGET_CS8, CSIZE, CS8 },
	{ TARGET_CSTOPB, TARGET_CSTOPB, CSTOPB, CSTOPB },
	{ TARGET_CREAD, TARGET_CREAD, CREAD, CREAD },
	{ TARGET_PARENB, TARGET_PARENB, PARENB, PARENB },
	{ TARGET_PARODD, TARGET_PARODD, PARODD, PARODD },
	{ TARGET_HUPCL, TARGET_HUPCL, HUPCL, HUPCL },
	{ TARGET_CLOCAL, TARGET_CLOCAL, CLOCAL, CLOCAL },
	{ TARGET_CRTSCTS, TARGET_CRTSCTS, CRTSCTS, CRTSCTS },
	{ 0, 0, 0, 0 }
};

B
blueswir1 已提交
4075
static const bitmask_transtbl lflag_tbl[] = {
4076 4077 4078 4079 4080 4081 4082 4083 4084 4085 4086 4087 4088 4089 4090 4091 4092 4093 4094 4095 4096 4097
	{ TARGET_ISIG, TARGET_ISIG, ISIG, ISIG },
	{ TARGET_ICANON, TARGET_ICANON, ICANON, ICANON },
	{ TARGET_XCASE, TARGET_XCASE, XCASE, XCASE },
	{ TARGET_ECHO, TARGET_ECHO, ECHO, ECHO },
	{ TARGET_ECHOE, TARGET_ECHOE, ECHOE, ECHOE },
	{ TARGET_ECHOK, TARGET_ECHOK, ECHOK, ECHOK },
	{ TARGET_ECHONL, TARGET_ECHONL, ECHONL, ECHONL },
	{ TARGET_NOFLSH, TARGET_NOFLSH, NOFLSH, NOFLSH },
	{ TARGET_TOSTOP, TARGET_TOSTOP, TOSTOP, TOSTOP },
	{ TARGET_ECHOCTL, TARGET_ECHOCTL, ECHOCTL, ECHOCTL },
	{ TARGET_ECHOPRT, TARGET_ECHOPRT, ECHOPRT, ECHOPRT },
	{ TARGET_ECHOKE, TARGET_ECHOKE, ECHOKE, ECHOKE },
	{ TARGET_FLUSHO, TARGET_FLUSHO, FLUSHO, FLUSHO },
	{ TARGET_PENDIN, TARGET_PENDIN, PENDIN, PENDIN },
	{ TARGET_IEXTEN, TARGET_IEXTEN, IEXTEN, IEXTEN },
	{ 0, 0, 0, 0 }
};

static void target_to_host_termios (void *dst, const void *src)
{
    struct host_termios *host = dst;
    const struct target_termios *target = src;
4098

4099
    host->c_iflag =
4100
        target_to_host_bitmask(tswap32(target->c_iflag), iflag_tbl);
4101
    host->c_oflag =
4102
        target_to_host_bitmask(tswap32(target->c_oflag), oflag_tbl);
4103
    host->c_cflag =
4104
        target_to_host_bitmask(tswap32(target->c_cflag), cflag_tbl);
4105
    host->c_lflag =
4106 4107
        target_to_host_bitmask(tswap32(target->c_lflag), lflag_tbl);
    host->c_line = target->c_line;
4108

4109
    memset(host->c_cc, 0, sizeof(host->c_cc));
4110 4111
    host->c_cc[VINTR] = target->c_cc[TARGET_VINTR];
    host->c_cc[VQUIT] = target->c_cc[TARGET_VQUIT];
4112
    host->c_cc[VERASE] = target->c_cc[TARGET_VERASE];
4113
    host->c_cc[VKILL] = target->c_cc[TARGET_VKILL];
4114
    host->c_cc[VEOF] = target->c_cc[TARGET_VEOF];
4115
    host->c_cc[VTIME] = target->c_cc[TARGET_VTIME];
4116
    host->c_cc[VMIN] = target->c_cc[TARGET_VMIN];
4117
    host->c_cc[VSWTC] = target->c_cc[TARGET_VSWTC];
4118
    host->c_cc[VSTART] = target->c_cc[TARGET_VSTART];
4119 4120
    host->c_cc[VSTOP] = target->c_cc[TARGET_VSTOP];
    host->c_cc[VSUSP] = target->c_cc[TARGET_VSUSP];
4121 4122 4123 4124 4125
    host->c_cc[VEOL] = target->c_cc[TARGET_VEOL];
    host->c_cc[VREPRINT] = target->c_cc[TARGET_VREPRINT];
    host->c_cc[VDISCARD] = target->c_cc[TARGET_VDISCARD];
    host->c_cc[VWERASE] = target->c_cc[TARGET_VWERASE];
    host->c_cc[VLNEXT] = target->c_cc[TARGET_VLNEXT];
4126
    host->c_cc[VEOL2] = target->c_cc[TARGET_VEOL2];
4127
}
4128

4129 4130 4131 4132 4133
static void host_to_target_termios (void *dst, const void *src)
{
    struct target_termios *target = dst;
    const struct host_termios *host = src;

4134
    target->c_iflag =
4135
        tswap32(host_to_target_bitmask(host->c_iflag, iflag_tbl));
4136
    target->c_oflag =
4137
        tswap32(host_to_target_bitmask(host->c_oflag, oflag_tbl));
4138
    target->c_cflag =
4139
        tswap32(host_to_target_bitmask(host->c_cflag, cflag_tbl));
4140
    target->c_lflag =
4141 4142
        tswap32(host_to_target_bitmask(host->c_lflag, lflag_tbl));
    target->c_line = host->c_line;
4143

4144
    memset(target->c_cc, 0, sizeof(target->c_cc));
4145 4146 4147 4148 4149 4150 4151 4152 4153 4154 4155 4156 4157 4158 4159 4160 4161 4162 4163
    target->c_cc[TARGET_VINTR] = host->c_cc[VINTR];
    target->c_cc[TARGET_VQUIT] = host->c_cc[VQUIT];
    target->c_cc[TARGET_VERASE] = host->c_cc[VERASE];
    target->c_cc[TARGET_VKILL] = host->c_cc[VKILL];
    target->c_cc[TARGET_VEOF] = host->c_cc[VEOF];
    target->c_cc[TARGET_VTIME] = host->c_cc[VTIME];
    target->c_cc[TARGET_VMIN] = host->c_cc[VMIN];
    target->c_cc[TARGET_VSWTC] = host->c_cc[VSWTC];
    target->c_cc[TARGET_VSTART] = host->c_cc[VSTART];
    target->c_cc[TARGET_VSTOP] = host->c_cc[VSTOP];
    target->c_cc[TARGET_VSUSP] = host->c_cc[VSUSP];
    target->c_cc[TARGET_VEOL] = host->c_cc[VEOL];
    target->c_cc[TARGET_VREPRINT] = host->c_cc[VREPRINT];
    target->c_cc[TARGET_VDISCARD] = host->c_cc[VDISCARD];
    target->c_cc[TARGET_VWERASE] = host->c_cc[VWERASE];
    target->c_cc[TARGET_VLNEXT] = host->c_cc[VLNEXT];
    target->c_cc[TARGET_VEOL2] = host->c_cc[VEOL2];
}

B
blueswir1 已提交
4164
static const StructEntry struct_termios_def = {
4165 4166 4167 4168 4169
    .convert = { host_to_target_termios, target_to_host_termios },
    .size = { sizeof(struct target_termios), sizeof(struct host_termios) },
    .align = { __alignof__(struct target_termios), __alignof__(struct host_termios) },
};

B
bellard 已提交
4170 4171 4172 4173 4174 4175 4176 4177 4178
static bitmask_transtbl mmap_flags_tbl[] = {
	{ TARGET_MAP_SHARED, TARGET_MAP_SHARED, MAP_SHARED, MAP_SHARED },
	{ TARGET_MAP_PRIVATE, TARGET_MAP_PRIVATE, MAP_PRIVATE, MAP_PRIVATE },
	{ TARGET_MAP_FIXED, TARGET_MAP_FIXED, MAP_FIXED, MAP_FIXED },
	{ TARGET_MAP_ANONYMOUS, TARGET_MAP_ANONYMOUS, MAP_ANONYMOUS, MAP_ANONYMOUS },
	{ TARGET_MAP_GROWSDOWN, TARGET_MAP_GROWSDOWN, MAP_GROWSDOWN, MAP_GROWSDOWN },
	{ TARGET_MAP_DENYWRITE, TARGET_MAP_DENYWRITE, MAP_DENYWRITE, MAP_DENYWRITE },
	{ TARGET_MAP_EXECUTABLE, TARGET_MAP_EXECUTABLE, MAP_EXECUTABLE, MAP_EXECUTABLE },
	{ TARGET_MAP_LOCKED, TARGET_MAP_LOCKED, MAP_LOCKED, MAP_LOCKED },
4179 4180
        { TARGET_MAP_NORESERVE, TARGET_MAP_NORESERVE, MAP_NORESERVE,
          MAP_NORESERVE },
B
bellard 已提交
4181 4182 4183
	{ 0, 0, 0, 0 }
};

4184
#if defined(TARGET_I386)
B
bellard 已提交
4185 4186

/* NOTE: there is really one LDT for all the threads */
4187
static uint8_t *ldt_table;
B
bellard 已提交
4188

4189
static abi_long read_ldt(abi_ulong ptr, unsigned long bytecount)
B
bellard 已提交
4190 4191
{
    int size;
4192
    void *p;
B
bellard 已提交
4193 4194 4195 4196 4197 4198

    if (!ldt_table)
        return 0;
    size = TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE;
    if (size > bytecount)
        size = bytecount;
4199 4200
    p = lock_user(VERIFY_WRITE, ptr, size, 0);
    if (!p)
4201
        return -TARGET_EFAULT;
4202
    /* ??? Should this by byteswapped?  */
4203 4204
    memcpy(p, ldt_table, size);
    unlock_user(p, ptr, size);
B
bellard 已提交
4205 4206 4207 4208
    return size;
}

/* XXX: add locking support */
4209 4210
static abi_long write_ldt(CPUX86State *env,
                          abi_ulong ptr, unsigned long bytecount, int oldmode)
B
bellard 已提交
4211 4212
{
    struct target_modify_ldt_ldt_s ldt_info;
4213
    struct target_modify_ldt_ldt_s *target_ldt_info;
B
bellard 已提交
4214
    int seg_32bit, contents, read_exec_only, limit_in_pages;
B
bellard 已提交
4215
    int seg_not_present, useable, lm;
B
bellard 已提交
4216 4217 4218
    uint32_t *lp, entry_1, entry_2;

    if (bytecount != sizeof(ldt_info))
4219
        return -TARGET_EINVAL;
4220
    if (!lock_user_struct(VERIFY_READ, target_ldt_info, ptr, 1))
4221
        return -TARGET_EFAULT;
4222
    ldt_info.entry_number = tswap32(target_ldt_info->entry_number);
4223
    ldt_info.base_addr = tswapal(target_ldt_info->base_addr);
4224 4225 4226
    ldt_info.limit = tswap32(target_ldt_info->limit);
    ldt_info.flags = tswap32(target_ldt_info->flags);
    unlock_user_struct(target_ldt_info, ptr, 0);
4227

B
bellard 已提交
4228
    if (ldt_info.entry_number >= TARGET_LDT_ENTRIES)
4229
        return -TARGET_EINVAL;
B
bellard 已提交
4230 4231 4232 4233 4234 4235
    seg_32bit = ldt_info.flags & 1;
    contents = (ldt_info.flags >> 1) & 3;
    read_exec_only = (ldt_info.flags >> 3) & 1;
    limit_in_pages = (ldt_info.flags >> 4) & 1;
    seg_not_present = (ldt_info.flags >> 5) & 1;
    useable = (ldt_info.flags >> 6) & 1;
B
bellard 已提交
4236 4237 4238 4239 4240
#ifdef TARGET_ABI32
    lm = 0;
#else
    lm = (ldt_info.flags >> 7) & 1;
#endif
B
bellard 已提交
4241 4242
    if (contents == 3) {
        if (oldmode)
4243
            return -TARGET_EINVAL;
B
bellard 已提交
4244
        if (seg_not_present == 0)
4245
            return -TARGET_EINVAL;
B
bellard 已提交
4246 4247 4248
    }
    /* allocate the LDT */
    if (!ldt_table) {
4249 4250 4251 4252 4253
        env->ldt.base = target_mmap(0,
                                    TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE,
                                    PROT_READ|PROT_WRITE,
                                    MAP_ANONYMOUS|MAP_PRIVATE, -1, 0);
        if (env->ldt.base == -1)
4254
            return -TARGET_ENOMEM;
4255 4256
        memset(g2h(env->ldt.base), 0,
               TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE);
B
bellard 已提交
4257
        env->ldt.limit = 0xffff;
4258
        ldt_table = g2h(env->ldt.base);
B
bellard 已提交
4259 4260 4261 4262 4263 4264 4265 4266 4267 4268 4269 4270 4271 4272 4273 4274 4275
    }

    /* NOTE: same code as Linux kernel */
    /* Allow LDTs to be cleared by the user. */
    if (ldt_info.base_addr == 0 && ldt_info.limit == 0) {
        if (oldmode ||
            (contents == 0		&&
             read_exec_only == 1	&&
             seg_32bit == 0		&&
             limit_in_pages == 0	&&
             seg_not_present == 1	&&
             useable == 0 )) {
            entry_1 = 0;
            entry_2 = 0;
            goto install;
        }
    }
4276

B
bellard 已提交
4277 4278 4279 4280 4281 4282 4283 4284 4285 4286
    entry_1 = ((ldt_info.base_addr & 0x0000ffff) << 16) |
        (ldt_info.limit & 0x0ffff);
    entry_2 = (ldt_info.base_addr & 0xff000000) |
        ((ldt_info.base_addr & 0x00ff0000) >> 16) |
        (ldt_info.limit & 0xf0000) |
        ((read_exec_only ^ 1) << 9) |
        (contents << 10) |
        ((seg_not_present ^ 1) << 15) |
        (seg_32bit << 22) |
        (limit_in_pages << 23) |
B
bellard 已提交
4287
        (lm << 21) |
B
bellard 已提交
4288 4289 4290
        0x7000;
    if (!oldmode)
        entry_2 |= (useable << 20);
B
bellard 已提交
4291

B
bellard 已提交
4292 4293 4294 4295 4296 4297 4298 4299 4300
    /* Install the new entry ...  */
install:
    lp = (uint32_t *)(ldt_table + (ldt_info.entry_number << 3));
    lp[0] = tswap32(entry_1);
    lp[1] = tswap32(entry_2);
    return 0;
}

/* specific and weird i386 syscalls */
4301 4302
static abi_long do_modify_ldt(CPUX86State *env, int func, abi_ulong ptr,
                              unsigned long bytecount)
B
bellard 已提交
4303
{
4304
    abi_long ret;
4305

B
bellard 已提交
4306 4307 4308 4309 4310 4311 4312 4313 4314 4315
    switch (func) {
    case 0:
        ret = read_ldt(ptr, bytecount);
        break;
    case 1:
        ret = write_ldt(env, ptr, bytecount, 1);
        break;
    case 0x11:
        ret = write_ldt(env, ptr, bytecount, 0);
        break;
4316 4317 4318
    default:
        ret = -TARGET_ENOSYS;
        break;
B
bellard 已提交
4319 4320 4321
    }
    return ret;
}
B
bellard 已提交
4322

4323
#if defined(TARGET_I386) && defined(TARGET_ABI32)
A
Alexander Graf 已提交
4324
abi_long do_set_thread_area(CPUX86State *env, abi_ulong ptr)
B
bellard 已提交
4325 4326 4327 4328 4329 4330 4331 4332 4333 4334 4335 4336 4337
{
    uint64_t *gdt_table = g2h(env->gdt.base);
    struct target_modify_ldt_ldt_s ldt_info;
    struct target_modify_ldt_ldt_s *target_ldt_info;
    int seg_32bit, contents, read_exec_only, limit_in_pages;
    int seg_not_present, useable, lm;
    uint32_t *lp, entry_1, entry_2;
    int i;

    lock_user_struct(VERIFY_WRITE, target_ldt_info, ptr, 1);
    if (!target_ldt_info)
        return -TARGET_EFAULT;
    ldt_info.entry_number = tswap32(target_ldt_info->entry_number);
4338
    ldt_info.base_addr = tswapal(target_ldt_info->base_addr);
B
bellard 已提交
4339 4340 4341 4342 4343 4344 4345 4346 4347 4348 4349 4350 4351 4352 4353 4354 4355 4356 4357 4358 4359 4360 4361 4362 4363 4364 4365 4366 4367 4368 4369 4370 4371 4372 4373 4374 4375 4376 4377 4378 4379 4380 4381 4382 4383 4384 4385 4386 4387 4388 4389 4390 4391 4392 4393 4394 4395 4396 4397 4398 4399 4400 4401 4402 4403 4404 4405 4406 4407 4408
    ldt_info.limit = tswap32(target_ldt_info->limit);
    ldt_info.flags = tswap32(target_ldt_info->flags);
    if (ldt_info.entry_number == -1) {
        for (i=TARGET_GDT_ENTRY_TLS_MIN; i<=TARGET_GDT_ENTRY_TLS_MAX; i++) {
            if (gdt_table[i] == 0) {
                ldt_info.entry_number = i;
                target_ldt_info->entry_number = tswap32(i);
                break;
            }
        }
    }
    unlock_user_struct(target_ldt_info, ptr, 1);

    if (ldt_info.entry_number < TARGET_GDT_ENTRY_TLS_MIN || 
        ldt_info.entry_number > TARGET_GDT_ENTRY_TLS_MAX)
           return -TARGET_EINVAL;
    seg_32bit = ldt_info.flags & 1;
    contents = (ldt_info.flags >> 1) & 3;
    read_exec_only = (ldt_info.flags >> 3) & 1;
    limit_in_pages = (ldt_info.flags >> 4) & 1;
    seg_not_present = (ldt_info.flags >> 5) & 1;
    useable = (ldt_info.flags >> 6) & 1;
#ifdef TARGET_ABI32
    lm = 0;
#else
    lm = (ldt_info.flags >> 7) & 1;
#endif

    if (contents == 3) {
        if (seg_not_present == 0)
            return -TARGET_EINVAL;
    }

    /* NOTE: same code as Linux kernel */
    /* Allow LDTs to be cleared by the user. */
    if (ldt_info.base_addr == 0 && ldt_info.limit == 0) {
        if ((contents == 0             &&
             read_exec_only == 1       &&
             seg_32bit == 0            &&
             limit_in_pages == 0       &&
             seg_not_present == 1      &&
             useable == 0 )) {
            entry_1 = 0;
            entry_2 = 0;
            goto install;
        }
    }

    entry_1 = ((ldt_info.base_addr & 0x0000ffff) << 16) |
        (ldt_info.limit & 0x0ffff);
    entry_2 = (ldt_info.base_addr & 0xff000000) |
        ((ldt_info.base_addr & 0x00ff0000) >> 16) |
        (ldt_info.limit & 0xf0000) |
        ((read_exec_only ^ 1) << 9) |
        (contents << 10) |
        ((seg_not_present ^ 1) << 15) |
        (seg_32bit << 22) |
        (limit_in_pages << 23) |
        (useable << 20) |
        (lm << 21) |
        0x7000;

    /* Install the new entry ...  */
install:
    lp = (uint32_t *)(gdt_table + ldt_info.entry_number);
    lp[0] = tswap32(entry_1);
    lp[1] = tswap32(entry_2);
    return 0;
}

4409
static abi_long do_get_thread_area(CPUX86State *env, abi_ulong ptr)
B
bellard 已提交
4410 4411 4412 4413 4414 4415 4416 4417 4418 4419 4420 4421 4422 4423 4424 4425 4426 4427 4428 4429 4430 4431 4432 4433 4434 4435 4436 4437 4438 4439 4440 4441 4442 4443 4444 4445 4446 4447 4448
{
    struct target_modify_ldt_ldt_s *target_ldt_info;
    uint64_t *gdt_table = g2h(env->gdt.base);
    uint32_t base_addr, limit, flags;
    int seg_32bit, contents, read_exec_only, limit_in_pages, idx;
    int seg_not_present, useable, lm;
    uint32_t *lp, entry_1, entry_2;

    lock_user_struct(VERIFY_WRITE, target_ldt_info, ptr, 1);
    if (!target_ldt_info)
        return -TARGET_EFAULT;
    idx = tswap32(target_ldt_info->entry_number);
    if (idx < TARGET_GDT_ENTRY_TLS_MIN ||
        idx > TARGET_GDT_ENTRY_TLS_MAX) {
        unlock_user_struct(target_ldt_info, ptr, 1);
        return -TARGET_EINVAL;
    }
    lp = (uint32_t *)(gdt_table + idx);
    entry_1 = tswap32(lp[0]);
    entry_2 = tswap32(lp[1]);
    
    read_exec_only = ((entry_2 >> 9) & 1) ^ 1;
    contents = (entry_2 >> 10) & 3;
    seg_not_present = ((entry_2 >> 15) & 1) ^ 1;
    seg_32bit = (entry_2 >> 22) & 1;
    limit_in_pages = (entry_2 >> 23) & 1;
    useable = (entry_2 >> 20) & 1;
#ifdef TARGET_ABI32
    lm = 0;
#else
    lm = (entry_2 >> 21) & 1;
#endif
    flags = (seg_32bit << 0) | (contents << 1) |
        (read_exec_only << 3) | (limit_in_pages << 4) |
        (seg_not_present << 5) | (useable << 6) | (lm << 7);
    limit = (entry_1 & 0xffff) | (entry_2  & 0xf0000);
    base_addr = (entry_1 >> 16) | 
        (entry_2 & 0xff000000) | 
        ((entry_2 & 0xff) << 16);
4449
    target_ldt_info->base_addr = tswapal(base_addr);
B
bellard 已提交
4450 4451 4452 4453 4454
    target_ldt_info->limit = tswap32(limit);
    target_ldt_info->flags = tswap32(flags);
    unlock_user_struct(target_ldt_info, ptr, 1);
    return 0;
}
4455
#endif /* TARGET_I386 && TARGET_ABI32 */
B
bellard 已提交
4456

B
bellard 已提交
4457
#ifndef TARGET_ABI32
4458
abi_long do_arch_prctl(CPUX86State *env, int code, abi_ulong addr)
B
bellard 已提交
4459
{
J
Juan Quintela 已提交
4460
    abi_long ret = 0;
B
bellard 已提交
4461 4462
    abi_ulong val;
    int idx;
J
Juan Quintela 已提交
4463

B
bellard 已提交
4464 4465 4466 4467 4468 4469 4470 4471 4472 4473 4474 4475 4476 4477 4478 4479 4480 4481
    switch(code) {
    case TARGET_ARCH_SET_GS:
    case TARGET_ARCH_SET_FS:
        if (code == TARGET_ARCH_SET_GS)
            idx = R_GS;
        else
            idx = R_FS;
        cpu_x86_load_seg(env, idx, 0);
        env->segs[idx].base = addr;
        break;
    case TARGET_ARCH_GET_GS:
    case TARGET_ARCH_GET_FS:
        if (code == TARGET_ARCH_GET_GS)
            idx = R_GS;
        else
            idx = R_FS;
        val = env->segs[idx].base;
        if (put_user(val, addr, abi_ulong))
J
Juan Quintela 已提交
4482
            ret = -TARGET_EFAULT;
B
bellard 已提交
4483 4484 4485 4486 4487
        break;
    default:
        ret = -TARGET_EINVAL;
        break;
    }
J
Juan Quintela 已提交
4488
    return ret;
B
bellard 已提交
4489 4490 4491
}
#endif

4492 4493
#endif /* defined(TARGET_I386) */

4494
#define NEW_STACK_SIZE 0x40000
P
pbrook 已提交
4495 4496 4497 4498


static pthread_mutex_t clone_lock = PTHREAD_MUTEX_INITIALIZER;
typedef struct {
4499
    CPUArchState *env;
P
pbrook 已提交
4500 4501 4502 4503 4504 4505 4506 4507 4508 4509 4510 4511
    pthread_mutex_t mutex;
    pthread_cond_t cond;
    pthread_t thread;
    uint32_t tid;
    abi_ulong child_tidptr;
    abi_ulong parent_tidptr;
    sigset_t sigmask;
} new_thread_info;

static void *clone_func(void *arg)
{
    new_thread_info *info = arg;
4512
    CPUArchState *env;
4513
    CPUState *cpu;
4514
    TaskState *ts;
P
pbrook 已提交
4515 4516

    env = info->env;
4517
    cpu = ENV_GET_CPU(env);
4518
    thread_cpu = cpu;
4519
    ts = (TaskState *)cpu->opaque;
P
pbrook 已提交
4520
    info->tid = gettid();
4521
    cpu->host_tid = info->tid;
4522
    task_settid(ts);
P
pbrook 已提交
4523 4524 4525 4526 4527 4528 4529 4530 4531 4532 4533 4534 4535 4536 4537 4538 4539
    if (info->child_tidptr)
        put_user_u32(info->tid, info->child_tidptr);
    if (info->parent_tidptr)
        put_user_u32(info->tid, info->parent_tidptr);
    /* Enable signals.  */
    sigprocmask(SIG_SETMASK, &info->sigmask, NULL);
    /* Signal to the parent that we're ready.  */
    pthread_mutex_lock(&info->mutex);
    pthread_cond_broadcast(&info->cond);
    pthread_mutex_unlock(&info->mutex);
    /* Wait until the parent has finshed initializing the tls state.  */
    pthread_mutex_lock(&clone_lock);
    pthread_mutex_unlock(&clone_lock);
    cpu_loop(env);
    /* never exits */
    return NULL;
}
B
bellard 已提交
4540

4541 4542
/* do_fork() Must return host values and target errnos (unlike most
   do_*() functions). */
4543
static int do_fork(CPUArchState *env, unsigned int flags, abi_ulong newsp,
P
pbrook 已提交
4544 4545
                   abi_ulong parent_tidptr, target_ulong newtls,
                   abi_ulong child_tidptr)
B
bellard 已提交
4546
{
4547
    CPUState *cpu = ENV_GET_CPU(env);
B
bellard 已提交
4548
    int ret;
B
bellard 已提交
4549
    TaskState *ts;
4550
    CPUState *new_cpu;
4551
    CPUArchState *new_env;
P
pbrook 已提交
4552 4553
    unsigned int nptl_flags;
    sigset_t sigmask;
4554

4555 4556 4557 4558
    /* Emulate vfork() with fork() */
    if (flags & CLONE_VFORK)
        flags &= ~(CLONE_VFORK | CLONE_VM);

B
bellard 已提交
4559
    if (flags & CLONE_VM) {
4560
        TaskState *parent_ts = (TaskState *)cpu->opaque;
P
pbrook 已提交
4561 4562
        new_thread_info info;
        pthread_attr_t attr;
4563

4564
        ts = g_malloc0(sizeof(TaskState));
P
pbrook 已提交
4565
        init_task_state(ts);
B
bellard 已提交
4566
        /* we create a new CPU instance. */
4567
        new_env = cpu_copy(env);
4568 4569
        /* Init regs that differ from the parent.  */
        cpu_clone_regs(new_env, newsp);
4570 4571
        new_cpu = ENV_GET_CPU(new_env);
        new_cpu->opaque = ts;
4572 4573
        ts->bprm = parent_ts->bprm;
        ts->info = parent_ts->info;
P
pbrook 已提交
4574 4575 4576
        nptl_flags = flags;
        flags &= ~CLONE_NPTL_FLAGS2;

4577 4578 4579 4580
        if (nptl_flags & CLONE_CHILD_CLEARTID) {
            ts->child_tidptr = child_tidptr;
        }

P
pbrook 已提交
4581 4582 4583 4584 4585 4586 4587 4588 4589 4590 4591 4592 4593 4594 4595 4596 4597
        if (nptl_flags & CLONE_SETTLS)
            cpu_set_tls (new_env, newtls);

        /* Grab a mutex so that thread setup appears atomic.  */
        pthread_mutex_lock(&clone_lock);

        memset(&info, 0, sizeof(info));
        pthread_mutex_init(&info.mutex, NULL);
        pthread_mutex_lock(&info.mutex);
        pthread_cond_init(&info.cond, NULL);
        info.env = new_env;
        if (nptl_flags & CLONE_CHILD_SETTID)
            info.child_tidptr = child_tidptr;
        if (nptl_flags & CLONE_PARENT_SETTID)
            info.parent_tidptr = parent_tidptr;

        ret = pthread_attr_init(&attr);
4598 4599
        ret = pthread_attr_setstacksize(&attr, NEW_STACK_SIZE);
        ret = pthread_attr_setdetachstate(&attr, PTHREAD_CREATE_DETACHED);
P
pbrook 已提交
4600 4601 4602 4603 4604 4605
        /* It is not safe to deliver signals until the child has finished
           initializing, so temporarily block all signals.  */
        sigfillset(&sigmask);
        sigprocmask(SIG_BLOCK, &sigmask, &info.sigmask);

        ret = pthread_create(&info.thread, &attr, clone_func, &info);
4606
        /* TODO: Free new CPU state if thread creation failed.  */
P
pbrook 已提交
4607 4608 4609 4610 4611 4612 4613 4614 4615 4616 4617 4618 4619 4620 4621 4622

        sigprocmask(SIG_SETMASK, &info.sigmask, NULL);
        pthread_attr_destroy(&attr);
        if (ret == 0) {
            /* Wait for the child to initialize.  */
            pthread_cond_wait(&info.cond, &info.mutex);
            ret = info.tid;
            if (flags & CLONE_PARENT_SETTID)
                put_user_u32(ret, parent_tidptr);
        } else {
            ret = -1;
        }
        pthread_mutex_unlock(&info.mutex);
        pthread_cond_destroy(&info.cond);
        pthread_mutex_destroy(&info.mutex);
        pthread_mutex_unlock(&clone_lock);
B
bellard 已提交
4623 4624
    } else {
        /* if no CLONE_VM, we consider it is a fork */
P
pbrook 已提交
4625
        if ((flags & ~(CSIGNAL | CLONE_NPTL_FLAGS2)) != 0)
B
bellard 已提交
4626
            return -EINVAL;
P
pbrook 已提交
4627
        fork_start();
B
bellard 已提交
4628
        ret = fork();
P
pbrook 已提交
4629
        if (ret == 0) {
4630
            /* Child Process.  */
4631
            rcu_after_fork();
P
pbrook 已提交
4632 4633
            cpu_clone_regs(env, newsp);
            fork_end(1);
4634 4635 4636 4637 4638 4639
            /* There is a race condition here.  The parent process could
               theoretically read the TID in the child process before the child
               tid is set.  This would require using either ptrace
               (not implemented) or having *_tidptr to point at a shared memory
               mapping.  We can't repeat the spinlock hack used above because
               the child process gets its own copy of the lock.  */
P
pbrook 已提交
4640 4641 4642 4643
            if (flags & CLONE_CHILD_SETTID)
                put_user_u32(gettid(), child_tidptr);
            if (flags & CLONE_PARENT_SETTID)
                put_user_u32(gettid(), parent_tidptr);
4644
            ts = (TaskState *)cpu->opaque;
P
pbrook 已提交
4645 4646
            if (flags & CLONE_SETTLS)
                cpu_set_tls (env, newtls);
4647 4648
            if (flags & CLONE_CHILD_CLEARTID)
                ts->child_tidptr = child_tidptr;
P
pbrook 已提交
4649 4650 4651
        } else {
            fork_end(0);
        }
B
bellard 已提交
4652 4653 4654 4655
    }
    return ret;
}

4656 4657 4658 4659 4660 4661 4662 4663 4664 4665 4666 4667 4668 4669 4670 4671 4672 4673 4674 4675 4676 4677 4678 4679 4680 4681 4682 4683 4684 4685 4686 4687
/* warning : doesn't handle linux specific flags... */
static int target_to_host_fcntl_cmd(int cmd)
{
    switch(cmd) {
	case TARGET_F_DUPFD:
	case TARGET_F_GETFD:
	case TARGET_F_SETFD:
	case TARGET_F_GETFL:
	case TARGET_F_SETFL:
            return cmd;
        case TARGET_F_GETLK:
	    return F_GETLK;
	case TARGET_F_SETLK:
	    return F_SETLK;
	case TARGET_F_SETLKW:
	    return F_SETLKW;
	case TARGET_F_GETOWN:
	    return F_GETOWN;
	case TARGET_F_SETOWN:
	    return F_SETOWN;
	case TARGET_F_GETSIG:
	    return F_GETSIG;
	case TARGET_F_SETSIG:
	    return F_SETSIG;
#if TARGET_ABI_BITS == 32
        case TARGET_F_GETLK64:
	    return F_GETLK64;
	case TARGET_F_SETLK64:
	    return F_SETLK64;
	case TARGET_F_SETLKW64:
	    return F_SETLKW64;
#endif
U
Ulrich Hecht 已提交
4688 4689 4690 4691
        case TARGET_F_SETLEASE:
            return F_SETLEASE;
        case TARGET_F_GETLEASE:
            return F_GETLEASE;
4692
#ifdef F_DUPFD_CLOEXEC
U
Ulrich Hecht 已提交
4693 4694
        case TARGET_F_DUPFD_CLOEXEC:
            return F_DUPFD_CLOEXEC;
4695
#endif
U
Ulrich Hecht 已提交
4696 4697
        case TARGET_F_NOTIFY:
            return F_NOTIFY;
4698 4699 4700 4701 4702 4703 4704 4705
#ifdef F_GETOWN_EX
	case TARGET_F_GETOWN_EX:
	    return F_GETOWN_EX;
#endif
#ifdef F_SETOWN_EX
	case TARGET_F_SETOWN_EX:
	    return F_SETOWN_EX;
#endif
4706 4707 4708 4709 4710 4711
	default:
            return -TARGET_EINVAL;
    }
    return -TARGET_EINVAL;
}

4712 4713 4714 4715 4716 4717 4718 4719 4720 4721
#define TRANSTBL_CONVERT(a) { -1, TARGET_##a, -1, a }
static const bitmask_transtbl flock_tbl[] = {
    TRANSTBL_CONVERT(F_RDLCK),
    TRANSTBL_CONVERT(F_WRLCK),
    TRANSTBL_CONVERT(F_UNLCK),
    TRANSTBL_CONVERT(F_EXLCK),
    TRANSTBL_CONVERT(F_SHLCK),
    { 0, 0, 0, 0 }
};

4722
static abi_long do_fcntl(int fd, int cmd, abi_ulong arg)
B
bellard 已提交
4723 4724
{
    struct flock fl;
4725
    struct target_flock *target_fl;
4726 4727
    struct flock64 fl64;
    struct target_flock64 *target_fl64;
4728 4729 4730 4731
#ifdef F_GETOWN_EX
    struct f_owner_ex fox;
    struct target_f_owner_ex *target_fox;
#endif
4732
    abi_long ret;
4733 4734 4735 4736
    int host_cmd = target_to_host_fcntl_cmd(cmd);

    if (host_cmd == -TARGET_EINVAL)
	    return host_cmd;
4737

B
bellard 已提交
4738 4739
    switch(cmd) {
    case TARGET_F_GETLK:
4740 4741
        if (!lock_user_struct(VERIFY_READ, target_fl, arg, 1))
            return -TARGET_EFAULT;
4742 4743
        fl.l_type =
                  target_to_host_bitmask(tswap16(target_fl->l_type), flock_tbl);
T
ths 已提交
4744
        fl.l_whence = tswap16(target_fl->l_whence);
4745 4746
        fl.l_start = tswapal(target_fl->l_start);
        fl.l_len = tswapal(target_fl->l_len);
U
Ulrich Hecht 已提交
4747
        fl.l_pid = tswap32(target_fl->l_pid);
T
ths 已提交
4748
        unlock_user_struct(target_fl, arg, 0);
4749
        ret = get_errno(fcntl(fd, host_cmd, &fl));
B
bellard 已提交
4750
        if (ret == 0) {
4751 4752
            if (!lock_user_struct(VERIFY_WRITE, target_fl, arg, 0))
                return -TARGET_EFAULT;
4753 4754
            target_fl->l_type =
                          host_to_target_bitmask(tswap16(fl.l_type), flock_tbl);
B
bellard 已提交
4755
            target_fl->l_whence = tswap16(fl.l_whence);
4756 4757
            target_fl->l_start = tswapal(fl.l_start);
            target_fl->l_len = tswapal(fl.l_len);
U
Ulrich Hecht 已提交
4758
            target_fl->l_pid = tswap32(fl.l_pid);
4759
            unlock_user_struct(target_fl, arg, 1);
B
bellard 已提交
4760 4761
        }
        break;
4762

B
bellard 已提交
4763 4764
    case TARGET_F_SETLK:
    case TARGET_F_SETLKW:
4765 4766
        if (!lock_user_struct(VERIFY_READ, target_fl, arg, 1))
            return -TARGET_EFAULT;
4767 4768
        fl.l_type =
                  target_to_host_bitmask(tswap16(target_fl->l_type), flock_tbl);
B
bellard 已提交
4769
        fl.l_whence = tswap16(target_fl->l_whence);
4770 4771
        fl.l_start = tswapal(target_fl->l_start);
        fl.l_len = tswapal(target_fl->l_len);
U
Ulrich Hecht 已提交
4772
        fl.l_pid = tswap32(target_fl->l_pid);
4773
        unlock_user_struct(target_fl, arg, 0);
4774
        ret = get_errno(fcntl(fd, host_cmd, &fl));
B
bellard 已提交
4775
        break;
4776

B
bellard 已提交
4777
    case TARGET_F_GETLK64:
4778 4779
        if (!lock_user_struct(VERIFY_READ, target_fl64, arg, 1))
            return -TARGET_EFAULT;
4780 4781
        fl64.l_type =
           target_to_host_bitmask(tswap16(target_fl64->l_type), flock_tbl) >> 1;
T
ths 已提交
4782
        fl64.l_whence = tswap16(target_fl64->l_whence);
4783 4784
        fl64.l_start = tswap64(target_fl64->l_start);
        fl64.l_len = tswap64(target_fl64->l_len);
U
Ulrich Hecht 已提交
4785
        fl64.l_pid = tswap32(target_fl64->l_pid);
T
ths 已提交
4786
        unlock_user_struct(target_fl64, arg, 0);
4787
        ret = get_errno(fcntl(fd, host_cmd, &fl64));
4788
        if (ret == 0) {
4789 4790
            if (!lock_user_struct(VERIFY_WRITE, target_fl64, arg, 0))
                return -TARGET_EFAULT;
4791 4792
            target_fl64->l_type =
                   host_to_target_bitmask(tswap16(fl64.l_type), flock_tbl) >> 1;
4793
            target_fl64->l_whence = tswap16(fl64.l_whence);
4794 4795
            target_fl64->l_start = tswap64(fl64.l_start);
            target_fl64->l_len = tswap64(fl64.l_len);
U
Ulrich Hecht 已提交
4796
            target_fl64->l_pid = tswap32(fl64.l_pid);
4797 4798
            unlock_user_struct(target_fl64, arg, 1);
        }
B
bellard 已提交
4799
        break;
B
bellard 已提交
4800 4801
    case TARGET_F_SETLK64:
    case TARGET_F_SETLKW64:
4802 4803
        if (!lock_user_struct(VERIFY_READ, target_fl64, arg, 1))
            return -TARGET_EFAULT;
4804 4805
        fl64.l_type =
           target_to_host_bitmask(tswap16(target_fl64->l_type), flock_tbl) >> 1;
4806
        fl64.l_whence = tswap16(target_fl64->l_whence);
4807 4808
        fl64.l_start = tswap64(target_fl64->l_start);
        fl64.l_len = tswap64(target_fl64->l_len);
U
Ulrich Hecht 已提交
4809
        fl64.l_pid = tswap32(target_fl64->l_pid);
4810
        unlock_user_struct(target_fl64, arg, 0);
4811
        ret = get_errno(fcntl(fd, host_cmd, &fl64));
B
bellard 已提交
4812 4813
        break;

4814 4815
    case TARGET_F_GETFL:
        ret = get_errno(fcntl(fd, host_cmd, arg));
B
bellard 已提交
4816 4817 4818
        if (ret >= 0) {
            ret = host_to_target_bitmask(ret, fcntl_flags_tbl);
        }
B
bellard 已提交
4819 4820
        break;

4821 4822 4823 4824
    case TARGET_F_SETFL:
        ret = get_errno(fcntl(fd, host_cmd, target_to_host_bitmask(arg, fcntl_flags_tbl)));
        break;

4825 4826 4827 4828 4829 4830 4831 4832 4833 4834 4835 4836 4837 4838 4839 4840 4841 4842 4843 4844 4845 4846 4847 4848
#ifdef F_GETOWN_EX
    case TARGET_F_GETOWN_EX:
        ret = get_errno(fcntl(fd, host_cmd, &fox));
        if (ret >= 0) {
            if (!lock_user_struct(VERIFY_WRITE, target_fox, arg, 0))
                return -TARGET_EFAULT;
            target_fox->type = tswap32(fox.type);
            target_fox->pid = tswap32(fox.pid);
            unlock_user_struct(target_fox, arg, 1);
        }
        break;
#endif

#ifdef F_SETOWN_EX
    case TARGET_F_SETOWN_EX:
        if (!lock_user_struct(VERIFY_READ, target_fox, arg, 1))
            return -TARGET_EFAULT;
        fox.type = tswap32(target_fox->type);
        fox.pid = tswap32(target_fox->pid);
        unlock_user_struct(target_fox, arg, 0);
        ret = get_errno(fcntl(fd, host_cmd, &fox));
        break;
#endif

4849 4850 4851 4852
    case TARGET_F_SETOWN:
    case TARGET_F_GETOWN:
    case TARGET_F_SETSIG:
    case TARGET_F_GETSIG:
U
Ulrich Hecht 已提交
4853 4854
    case TARGET_F_SETLEASE:
    case TARGET_F_GETLEASE:
4855
        ret = get_errno(fcntl(fd, host_cmd, arg));
B
bellard 已提交
4856 4857
        break;

B
bellard 已提交
4858
    default:
B
bellard 已提交
4859
        ret = get_errno(fcntl(fd, cmd, arg));
B
bellard 已提交
4860 4861 4862 4863 4864
        break;
    }
    return ret;
}

4865
#ifdef USE_UID16
B
bellard 已提交
4866

4867 4868 4869 4870 4871 4872 4873 4874 4875 4876 4877 4878 4879 4880 4881 4882 4883 4884 4885 4886 4887 4888 4889 4890 4891 4892 4893 4894 4895 4896 4897
static inline int high2lowuid(int uid)
{
    if (uid > 65535)
        return 65534;
    else
        return uid;
}

static inline int high2lowgid(int gid)
{
    if (gid > 65535)
        return 65534;
    else
        return gid;
}

static inline int low2highuid(int uid)
{
    if ((int16_t)uid == -1)
        return -1;
    else
        return uid;
}

static inline int low2highgid(int gid)
{
    if ((int16_t)gid == -1)
        return -1;
    else
        return gid;
}
4898 4899 4900 4901
static inline int tswapid(int id)
{
    return tswap16(id);
}
4902 4903 4904

#define put_user_id(x, gaddr) put_user_u16(x, gaddr)

4905 4906 4907 4908 4909 4910 4911 4912 4913 4914 4915 4916 4917 4918 4919 4920 4921 4922 4923 4924 4925
#else /* !USE_UID16 */
static inline int high2lowuid(int uid)
{
    return uid;
}
static inline int high2lowgid(int gid)
{
    return gid;
}
static inline int low2highuid(int uid)
{
    return uid;
}
static inline int low2highgid(int gid)
{
    return gid;
}
static inline int tswapid(int id)
{
    return tswap32(id);
}
4926 4927 4928

#define put_user_id(x, gaddr) put_user_u32(x, gaddr)

4929
#endif /* USE_UID16 */
B
bellard 已提交
4930

4931 4932
void syscall_init(void)
{
4933 4934 4935
    IOCTLEntry *ie;
    const argtype *arg_type;
    int size;
4936
    int i;
4937

4938 4939
    thunk_init(STRUCT_MAX);

4940
#define STRUCT(name, ...) thunk_register_struct(STRUCT_ ## name, #name, struct_ ## name ## _def);
4941
#define STRUCT_SPECIAL(name) thunk_register_struct_direct(STRUCT_ ## name, #name, &struct_ ## name ## _def);
4942 4943 4944
#include "syscall_types.h"
#undef STRUCT
#undef STRUCT_SPECIAL
4945

4946 4947 4948 4949 4950 4951
    /* Build target_to_host_errno_table[] table from
     * host_to_target_errno_table[]. */
    for (i = 0; i < ERRNO_TABLE_SIZE; i++) {
        target_to_host_errno_table[host_to_target_errno_table[i]] = i;
    }

4952 4953 4954 4955 4956 4957 4958 4959
    /* we patch the ioctl size if necessary. We rely on the fact that
       no ioctl has all the bits at '1' in the size field */
    ie = ioctl_entries;
    while (ie->target_cmd != 0) {
        if (((ie->target_cmd >> TARGET_IOC_SIZESHIFT) & TARGET_IOC_SIZEMASK) ==
            TARGET_IOC_SIZEMASK) {
            arg_type = ie->arg_type;
            if (arg_type[0] != TYPE_PTR) {
4960
                fprintf(stderr, "cannot patch size for ioctl 0x%x\n",
4961 4962 4963 4964 4965
                        ie->target_cmd);
                exit(1);
            }
            arg_type++;
            size = thunk_type_size(arg_type, 0);
4966
            ie->target_cmd = (ie->target_cmd &
4967 4968 4969
                              ~(TARGET_IOC_SIZEMASK << TARGET_IOC_SIZESHIFT)) |
                (size << TARGET_IOC_SIZESHIFT);
        }
4970

4971
        /* automatic consistency check if same arch */
4972 4973 4974 4975 4976
#if (defined(__i386__) && defined(TARGET_I386) && defined(TARGET_ABI32)) || \
    (defined(__x86_64__) && defined(TARGET_X86_64))
        if (unlikely(ie->target_cmd != ie->host_cmd)) {
            fprintf(stderr, "ERROR: ioctl(%s): target=0x%x host=0x%x\n",
                    ie->name, ie->target_cmd, ie->host_cmd);
4977 4978 4979 4980
        }
#endif
        ie++;
    }
4981
}
B
bellard 已提交
4982

4983
#if TARGET_ABI_BITS == 32
P
pbrook 已提交
4984 4985
static inline uint64_t target_offset64(uint32_t word0, uint32_t word1)
{
T
ths 已提交
4986
#ifdef TARGET_WORDS_BIGENDIAN
P
pbrook 已提交
4987 4988 4989 4990 4991
    return ((uint64_t)word0 << 32) | word1;
#else
    return ((uint64_t)word1 << 32) | word0;
#endif
}
4992
#else /* TARGET_ABI_BITS == 32 */
4993 4994 4995 4996
static inline uint64_t target_offset64(uint64_t word0, uint64_t word1)
{
    return word0;
}
4997
#endif /* TARGET_ABI_BITS != 32 */
P
pbrook 已提交
4998 4999

#ifdef TARGET_NR_truncate64
5000 5001 5002 5003
static inline abi_long target_truncate64(void *cpu_env, const char *arg1,
                                         abi_long arg2,
                                         abi_long arg3,
                                         abi_long arg4)
P
pbrook 已提交
5004
{
5005
    if (regpairs_aligned(cpu_env)) {
P
pbrook 已提交
5006 5007
        arg2 = arg3;
        arg3 = arg4;
5008
    }
P
pbrook 已提交
5009 5010 5011 5012 5013
    return get_errno(truncate64(arg1, target_offset64(arg2, arg3)));
}
#endif

#ifdef TARGET_NR_ftruncate64
5014 5015 5016 5017
static inline abi_long target_ftruncate64(void *cpu_env, abi_long arg1,
                                          abi_long arg2,
                                          abi_long arg3,
                                          abi_long arg4)
P
pbrook 已提交
5018
{
5019
    if (regpairs_aligned(cpu_env)) {
P
pbrook 已提交
5020 5021
        arg2 = arg3;
        arg3 = arg4;
5022
    }
P
pbrook 已提交
5023 5024 5025 5026
    return get_errno(ftruncate64(arg1, target_offset64(arg2, arg3)));
}
#endif

5027 5028
static inline abi_long target_to_host_timespec(struct timespec *host_ts,
                                               abi_ulong target_addr)
5029 5030 5031
{
    struct target_timespec *target_ts;

5032 5033
    if (!lock_user_struct(VERIFY_READ, target_ts, target_addr, 1))
        return -TARGET_EFAULT;
5034 5035
    host_ts->tv_sec = tswapal(target_ts->tv_sec);
    host_ts->tv_nsec = tswapal(target_ts->tv_nsec);
5036
    unlock_user_struct(target_ts, target_addr, 0);
B
bellard 已提交
5037
    return 0;
5038 5039
}

5040 5041
static inline abi_long host_to_target_timespec(abi_ulong target_addr,
                                               struct timespec *host_ts)
5042 5043 5044
{
    struct target_timespec *target_ts;

5045 5046
    if (!lock_user_struct(VERIFY_WRITE, target_ts, target_addr, 0))
        return -TARGET_EFAULT;
5047 5048
    target_ts->tv_sec = tswapal(host_ts->tv_sec);
    target_ts->tv_nsec = tswapal(host_ts->tv_nsec);
5049
    unlock_user_struct(target_ts, target_addr, 1);
B
bellard 已提交
5050
    return 0;
5051 5052
}

5053 5054 5055 5056 5057 5058 5059 5060 5061 5062 5063 5064 5065 5066 5067 5068 5069 5070 5071 5072 5073 5074 5075 5076 5077 5078 5079 5080 5081 5082 5083 5084 5085 5086 5087 5088 5089 5090 5091
static inline abi_long target_to_host_itimerspec(struct itimerspec *host_itspec,
                                                 abi_ulong target_addr)
{
    struct target_itimerspec *target_itspec;

    if (!lock_user_struct(VERIFY_READ, target_itspec, target_addr, 1)) {
        return -TARGET_EFAULT;
    }

    host_itspec->it_interval.tv_sec =
                            tswapal(target_itspec->it_interval.tv_sec);
    host_itspec->it_interval.tv_nsec =
                            tswapal(target_itspec->it_interval.tv_nsec);
    host_itspec->it_value.tv_sec = tswapal(target_itspec->it_value.tv_sec);
    host_itspec->it_value.tv_nsec = tswapal(target_itspec->it_value.tv_nsec);

    unlock_user_struct(target_itspec, target_addr, 1);
    return 0;
}

static inline abi_long host_to_target_itimerspec(abi_ulong target_addr,
                                               struct itimerspec *host_its)
{
    struct target_itimerspec *target_itspec;

    if (!lock_user_struct(VERIFY_WRITE, target_itspec, target_addr, 0)) {
        return -TARGET_EFAULT;
    }

    target_itspec->it_interval.tv_sec = tswapal(host_its->it_interval.tv_sec);
    target_itspec->it_interval.tv_nsec = tswapal(host_its->it_interval.tv_nsec);

    target_itspec->it_value.tv_sec = tswapal(host_its->it_value.tv_sec);
    target_itspec->it_value.tv_nsec = tswapal(host_its->it_value.tv_nsec);

    unlock_user_struct(target_itspec, target_addr, 0);
    return 0;
}

5092 5093 5094 5095 5096 5097 5098 5099 5100 5101 5102 5103 5104 5105 5106 5107 5108 5109 5110 5111 5112 5113 5114 5115 5116 5117
static inline abi_long target_to_host_sigevent(struct sigevent *host_sevp,
                                               abi_ulong target_addr)
{
    struct target_sigevent *target_sevp;

    if (!lock_user_struct(VERIFY_READ, target_sevp, target_addr, 1)) {
        return -TARGET_EFAULT;
    }

    /* This union is awkward on 64 bit systems because it has a 32 bit
     * integer and a pointer in it; we follow the conversion approach
     * used for handling sigval types in signal.c so the guest should get
     * the correct value back even if we did a 64 bit byteswap and it's
     * using the 32 bit integer.
     */
    host_sevp->sigev_value.sival_ptr =
        (void *)(uintptr_t)tswapal(target_sevp->sigev_value.sival_ptr);
    host_sevp->sigev_signo =
        target_to_host_signal(tswap32(target_sevp->sigev_signo));
    host_sevp->sigev_notify = tswap32(target_sevp->sigev_notify);
    host_sevp->_sigev_un._tid = tswap32(target_sevp->_sigev_un._tid);

    unlock_user_struct(target_sevp, target_addr, 1);
    return 0;
}

5118 5119 5120 5121 5122 5123 5124 5125 5126 5127 5128 5129 5130 5131 5132
#if defined(TARGET_NR_mlockall)
static inline int target_to_host_mlockall_arg(int arg)
{
    int result = 0;

    if (arg & TARGET_MLOCKALL_MCL_CURRENT) {
        result |= MCL_CURRENT;
    }
    if (arg & TARGET_MLOCKALL_MCL_FUTURE) {
        result |= MCL_FUTURE;
    }
    return result;
}
#endif

5133
#if defined(TARGET_NR_stat64) || defined(TARGET_NR_newfstatat)
5134 5135 5136 5137
static inline abi_long host_to_target_stat64(void *cpu_env,
                                             abi_ulong target_addr,
                                             struct stat *host_st)
{
5138
#if defined(TARGET_ARM) && defined(TARGET_ABI32)
5139 5140 5141 5142 5143 5144 5145 5146 5147 5148 5149 5150 5151 5152 5153 5154 5155 5156 5157 5158 5159 5160 5161 5162 5163 5164
    if (((CPUARMState *)cpu_env)->eabi) {
        struct target_eabi_stat64 *target_st;

        if (!lock_user_struct(VERIFY_WRITE, target_st, target_addr, 0))
            return -TARGET_EFAULT;
        memset(target_st, 0, sizeof(struct target_eabi_stat64));
        __put_user(host_st->st_dev, &target_st->st_dev);
        __put_user(host_st->st_ino, &target_st->st_ino);
#ifdef TARGET_STAT64_HAS_BROKEN_ST_INO
        __put_user(host_st->st_ino, &target_st->__st_ino);
#endif
        __put_user(host_st->st_mode, &target_st->st_mode);
        __put_user(host_st->st_nlink, &target_st->st_nlink);
        __put_user(host_st->st_uid, &target_st->st_uid);
        __put_user(host_st->st_gid, &target_st->st_gid);
        __put_user(host_st->st_rdev, &target_st->st_rdev);
        __put_user(host_st->st_size, &target_st->st_size);
        __put_user(host_st->st_blksize, &target_st->st_blksize);
        __put_user(host_st->st_blocks, &target_st->st_blocks);
        __put_user(host_st->st_atime, &target_st->target_st_atime);
        __put_user(host_st->st_mtime, &target_st->target_st_mtime);
        __put_user(host_st->st_ctime, &target_st->target_st_ctime);
        unlock_user_struct(target_st, target_addr, 1);
    } else
#endif
    {
5165
#if defined(TARGET_HAS_STRUCT_STAT64)
5166
        struct target_stat64 *target_st;
5167 5168
#else
        struct target_stat *target_st;
5169
#endif
5170 5171 5172

        if (!lock_user_struct(VERIFY_WRITE, target_st, target_addr, 0))
            return -TARGET_EFAULT;
5173
        memset(target_st, 0, sizeof(*target_st));
5174 5175 5176 5177 5178 5179 5180 5181 5182 5183 5184 5185 5186 5187 5188 5189 5190 5191 5192 5193 5194 5195 5196 5197
        __put_user(host_st->st_dev, &target_st->st_dev);
        __put_user(host_st->st_ino, &target_st->st_ino);
#ifdef TARGET_STAT64_HAS_BROKEN_ST_INO
        __put_user(host_st->st_ino, &target_st->__st_ino);
#endif
        __put_user(host_st->st_mode, &target_st->st_mode);
        __put_user(host_st->st_nlink, &target_st->st_nlink);
        __put_user(host_st->st_uid, &target_st->st_uid);
        __put_user(host_st->st_gid, &target_st->st_gid);
        __put_user(host_st->st_rdev, &target_st->st_rdev);
        /* XXX: better use of kernel struct */
        __put_user(host_st->st_size, &target_st->st_size);
        __put_user(host_st->st_blksize, &target_st->st_blksize);
        __put_user(host_st->st_blocks, &target_st->st_blocks);
        __put_user(host_st->st_atime, &target_st->target_st_atime);
        __put_user(host_st->st_mtime, &target_st->target_st_mtime);
        __put_user(host_st->st_ctime, &target_st->target_st_ctime);
        unlock_user_struct(target_st, target_addr, 1);
    }

    return 0;
}
#endif

5198 5199 5200 5201 5202
/* ??? Using host futex calls even when target atomic operations
   are not really atomic probably breaks things.  However implementing
   futexes locally would make futexes shared between multiple processes
   tricky.  However they're probably useless because guest atomic
   operations won't work either.  */
5203 5204
static int do_futex(target_ulong uaddr, int op, int val, target_ulong timeout,
                    target_ulong uaddr2, int val3)
5205 5206
{
    struct timespec ts, *pts;
5207
    int base_op;
5208 5209 5210

    /* ??? We assume FUTEX_* constants are the same on both host
       and target.  */
5211
#ifdef FUTEX_CMD_MASK
5212
    base_op = op & FUTEX_CMD_MASK;
5213
#else
5214
    base_op = op;
5215
#endif
5216
    switch (base_op) {
5217
    case FUTEX_WAIT:
5218
    case FUTEX_WAIT_BITSET:
5219 5220 5221 5222 5223 5224
        if (timeout) {
            pts = &ts;
            target_to_host_timespec(pts, timeout);
        } else {
            pts = NULL;
        }
5225
        return get_errno(sys_futex(g2h(uaddr), op, tswap32(val),
5226
                         pts, NULL, val3));
5227
    case FUTEX_WAKE:
5228
        return get_errno(sys_futex(g2h(uaddr), op, val, NULL, NULL, 0));
5229
    case FUTEX_FD:
5230
        return get_errno(sys_futex(g2h(uaddr), op, val, NULL, NULL, 0));
5231 5232
    case FUTEX_REQUEUE:
    case FUTEX_CMP_REQUEUE:
5233 5234 5235 5236 5237 5238 5239 5240 5241 5242 5243 5244
    case FUTEX_WAKE_OP:
        /* For FUTEX_REQUEUE, FUTEX_CMP_REQUEUE, and FUTEX_WAKE_OP, the
           TIMEOUT parameter is interpreted as a uint32_t by the kernel.
           But the prototype takes a `struct timespec *'; insert casts
           to satisfy the compiler.  We do not need to tswap TIMEOUT
           since it's not compared to guest memory.  */
        pts = (struct timespec *)(uintptr_t) timeout;
        return get_errno(sys_futex(g2h(uaddr), op, val, pts,
                                   g2h(uaddr2),
                                   (base_op == FUTEX_CMP_REQUEUE
                                    ? tswap32(val3)
                                    : val3)));
5245 5246 5247 5248 5249
    default:
        return -TARGET_ENOSYS;
    }
}

P
pbrook 已提交
5250 5251
/* Map host to target signal numbers for the wait family of syscalls.
   Assume all other status bits are the same.  */
5252
int host_to_target_waitstatus(int status)
P
pbrook 已提交
5253 5254 5255 5256 5257 5258 5259 5260 5261 5262 5263
{
    if (WIFSIGNALED(status)) {
        return host_to_target_signal(WTERMSIG(status)) | (status & ~0x7f);
    }
    if (WIFSTOPPED(status)) {
        return (host_to_target_signal(WSTOPSIG(status)) << 8)
               | (status & 0xff);
    }
    return status;
}

5264 5265 5266 5267 5268 5269 5270 5271 5272 5273 5274 5275 5276 5277 5278 5279 5280 5281 5282 5283 5284 5285 5286 5287 5288 5289 5290 5291 5292 5293 5294 5295 5296 5297 5298 5299 5300
static int open_self_cmdline(void *cpu_env, int fd)
{
    int fd_orig = -1;
    bool word_skipped = false;

    fd_orig = open("/proc/self/cmdline", O_RDONLY);
    if (fd_orig < 0) {
        return fd_orig;
    }

    while (true) {
        ssize_t nb_read;
        char buf[128];
        char *cp_buf = buf;

        nb_read = read(fd_orig, buf, sizeof(buf));
        if (nb_read < 0) {
            fd_orig = close(fd_orig);
            return -1;
        } else if (nb_read == 0) {
            break;
        }

        if (!word_skipped) {
            /* Skip the first string, which is the path to qemu-*-static
               instead of the actual command. */
            cp_buf = memchr(buf, 0, sizeof(buf));
            if (cp_buf) {
                /* Null byte found, skip one string */
                cp_buf++;
                nb_read -= cp_buf - buf;
                word_skipped = true;
            }
        }

        if (word_skipped) {
            if (write(fd, cp_buf, nb_read) != nb_read) {
5301
                close(fd_orig);
5302 5303 5304 5305 5306 5307 5308 5309
                return -1;
            }
        }
    }

    return close(fd_orig);
}

5310 5311
static int open_self_maps(void *cpu_env, int fd)
{
5312 5313
    CPUState *cpu = ENV_GET_CPU((CPUArchState *)cpu_env);
    TaskState *ts = cpu->opaque;
5314 5315 5316 5317 5318 5319 5320 5321 5322
    FILE *fp;
    char *line = NULL;
    size_t len = 0;
    ssize_t read;

    fp = fopen("/proc/self/maps", "r");
    if (fp == NULL) {
        return -EACCES;
    }
5323

5324 5325 5326 5327 5328 5329 5330 5331 5332 5333 5334 5335
    while ((read = getline(&line, &len, fp)) != -1) {
        int fields, dev_maj, dev_min, inode;
        uint64_t min, max, offset;
        char flag_r, flag_w, flag_x, flag_p;
        char path[512] = "";
        fields = sscanf(line, "%"PRIx64"-%"PRIx64" %c%c%c%c %"PRIx64" %x:%x %d"
                        " %512s", &min, &max, &flag_r, &flag_w, &flag_x,
                        &flag_p, &offset, &dev_maj, &dev_min, &inode, path);

        if ((fields < 10) || (fields > 11)) {
            continue;
        }
5336 5337 5338 5339 5340 5341 5342 5343 5344
        if (h2g_valid(min)) {
            int flags = page_get_flags(h2g(min));
            max = h2g_valid(max - 1) ? max : (uintptr_t)g2h(GUEST_ADDR_MAX);
            if (page_check_range(h2g(min), max - min, flags) == -1) {
                continue;
            }
            if (h2g(min) == ts->info->stack_limit) {
                pstrcpy(path, sizeof(path), "      [stack]");
            }
5345
            dprintf(fd, TARGET_ABI_FMT_lx "-" TARGET_ABI_FMT_lx
C
Christophe Lyon 已提交
5346
                    " %c%c%c%c %08" PRIx64 " %02x:%02x %d %s%s\n",
5347
                    h2g(min), h2g(max - 1) + 1, flag_r, flag_w,
5348
                    flag_x, flag_p, offset, dev_maj, dev_min, inode,
C
Christophe Lyon 已提交
5349
                    path[0] ? "         " : "", path);
5350 5351 5352 5353 5354 5355
        }
    }

    free(line);
    fclose(fp);

5356 5357 5358
    return 0;
}

5359 5360
static int open_self_stat(void *cpu_env, int fd)
{
5361 5362
    CPUState *cpu = ENV_GET_CPU((CPUArchState *)cpu_env);
    TaskState *ts = cpu->opaque;
5363 5364 5365 5366 5367 5368 5369 5370
    abi_ulong start_stack = ts->info->start_stack;
    int i;

    for (i = 0; i < 44; i++) {
      char buf[128];
      int len;
      uint64_t val = 0;

5371 5372 5373 5374 5375 5376 5377 5378 5379 5380 5381 5382 5383 5384
      if (i == 0) {
        /* pid */
        val = getpid();
        snprintf(buf, sizeof(buf), "%"PRId64 " ", val);
      } else if (i == 1) {
        /* app name */
        snprintf(buf, sizeof(buf), "(%s) ", ts->bprm->argv[0]);
      } else if (i == 27) {
        /* stack bottom */
        val = start_stack;
        snprintf(buf, sizeof(buf), "%"PRId64 " ", val);
      } else {
        /* for the rest, there is MasterCard */
        snprintf(buf, sizeof(buf), "0%c", i == 43 ? '\n' : ' ');
5385
      }
5386

5387 5388 5389 5390 5391 5392 5393 5394 5395
      len = strlen(buf);
      if (write(fd, buf, len) != len) {
          return -1;
      }
    }

    return 0;
}

5396 5397
static int open_self_auxv(void *cpu_env, int fd)
{
5398 5399
    CPUState *cpu = ENV_GET_CPU((CPUArchState *)cpu_env);
    TaskState *ts = cpu->opaque;
5400 5401 5402 5403 5404 5405 5406 5407 5408 5409 5410 5411 5412 5413 5414 5415 5416 5417 5418 5419 5420 5421 5422 5423 5424 5425
    abi_ulong auxv = ts->info->saved_auxv;
    abi_ulong len = ts->info->auxv_len;
    char *ptr;

    /*
     * Auxiliary vector is stored in target process stack.
     * read in whole auxv vector and copy it to file
     */
    ptr = lock_user(VERIFY_READ, auxv, len, 0);
    if (ptr != NULL) {
        while (len > 0) {
            ssize_t r;
            r = write(fd, ptr, len);
            if (r <= 0) {
                break;
            }
            len -= r;
            ptr += r;
        }
        lseek(fd, 0, SEEK_SET);
        unlock_user(ptr, auxv, len);
    }

    return 0;
}

5426 5427 5428 5429 5430 5431 5432 5433 5434 5435 5436 5437 5438 5439 5440 5441 5442 5443 5444 5445 5446 5447 5448 5449
static int is_proc_myself(const char *filename, const char *entry)
{
    if (!strncmp(filename, "/proc/", strlen("/proc/"))) {
        filename += strlen("/proc/");
        if (!strncmp(filename, "self/", strlen("self/"))) {
            filename += strlen("self/");
        } else if (*filename >= '1' && *filename <= '9') {
            char myself[80];
            snprintf(myself, sizeof(myself), "%d/", getpid());
            if (!strncmp(filename, myself, strlen(myself))) {
                filename += strlen(myself);
            } else {
                return 0;
            }
        } else {
            return 0;
        }
        if (!strcmp(filename, entry)) {
            return 1;
        }
    }
    return 0;
}

5450 5451 5452 5453 5454 5455 5456 5457 5458 5459 5460 5461 5462 5463 5464 5465 5466 5467 5468 5469 5470 5471 5472 5473 5474 5475 5476 5477 5478 5479 5480 5481 5482 5483 5484 5485 5486 5487 5488 5489 5490 5491 5492 5493
#if defined(HOST_WORDS_BIGENDIAN) != defined(TARGET_WORDS_BIGENDIAN)
static int is_proc(const char *filename, const char *entry)
{
    return strcmp(filename, entry) == 0;
}

static int open_net_route(void *cpu_env, int fd)
{
    FILE *fp;
    char *line = NULL;
    size_t len = 0;
    ssize_t read;

    fp = fopen("/proc/net/route", "r");
    if (fp == NULL) {
        return -EACCES;
    }

    /* read header */

    read = getline(&line, &len, fp);
    dprintf(fd, "%s", line);

    /* read routes */

    while ((read = getline(&line, &len, fp)) != -1) {
        char iface[16];
        uint32_t dest, gw, mask;
        unsigned int flags, refcnt, use, metric, mtu, window, irtt;
        sscanf(line, "%s\t%08x\t%08x\t%04x\t%d\t%d\t%d\t%08x\t%d\t%u\t%u\n",
                     iface, &dest, &gw, &flags, &refcnt, &use, &metric,
                     &mask, &mtu, &window, &irtt);
        dprintf(fd, "%s\t%08x\t%08x\t%04x\t%d\t%d\t%d\t%08x\t%d\t%u\t%u\n",
                iface, tswap32(dest), tswap32(gw), flags, refcnt, use,
                metric, tswap32(mask), mtu, window, irtt);
    }

    free(line);
    fclose(fp);

    return 0;
}
#endif

R
Riku Voipio 已提交
5494
static int do_openat(void *cpu_env, int dirfd, const char *pathname, int flags, mode_t mode)
5495 5496 5497 5498
{
    struct fake_open {
        const char *filename;
        int (*fill)(void *cpu_env, int fd);
5499
        int (*cmp)(const char *s1, const char *s2);
5500 5501 5502
    };
    const struct fake_open *fake_open;
    static const struct fake_open fakes[] = {
5503 5504 5505
        { "maps", open_self_maps, is_proc_myself },
        { "stat", open_self_stat, is_proc_myself },
        { "auxv", open_self_auxv, is_proc_myself },
5506
        { "cmdline", open_self_cmdline, is_proc_myself },
5507 5508 5509 5510
#if defined(HOST_WORDS_BIGENDIAN) != defined(TARGET_WORDS_BIGENDIAN)
        { "/proc/net/route", open_net_route, is_proc },
#endif
        { NULL, NULL, NULL }
5511 5512
    };

5513 5514
    if (is_proc_myself(pathname, "exe")) {
        int execfd = qemu_getauxval(AT_EXECFD);
R
Riku Voipio 已提交
5515
        return execfd ? execfd : get_errno(sys_openat(dirfd, exec_path, flags, mode));
5516 5517
    }

5518
    for (fake_open = fakes; fake_open->filename; fake_open++) {
5519
        if (fake_open->cmp(pathname, fake_open->filename)) {
5520 5521 5522 5523 5524 5525 5526 5527 5528 5529 5530 5531 5532 5533 5534 5535 5536 5537 5538 5539 5540 5541 5542 5543 5544 5545 5546 5547 5548
            break;
        }
    }

    if (fake_open->filename) {
        const char *tmpdir;
        char filename[PATH_MAX];
        int fd, r;

        /* create temporary file to map stat to */
        tmpdir = getenv("TMPDIR");
        if (!tmpdir)
            tmpdir = "/tmp";
        snprintf(filename, sizeof(filename), "%s/qemu-open.XXXXXX", tmpdir);
        fd = mkstemp(filename);
        if (fd < 0) {
            return fd;
        }
        unlink(filename);

        if ((r = fake_open->fill(cpu_env, fd))) {
            close(fd);
            return r;
        }
        lseek(fd, 0, SEEK_SET);

        return fd;
    }

R
Riku Voipio 已提交
5549
    return get_errno(sys_openat(dirfd, path(pathname), flags, mode));
5550 5551
}

5552 5553 5554 5555 5556 5557 5558 5559 5560 5561 5562 5563 5564 5565 5566 5567 5568 5569 5570 5571 5572
#define TIMER_MAGIC 0x0caf0000
#define TIMER_MAGIC_MASK 0xffff0000

/* Convert QEMU provided timer ID back to internal 16bit index format */
static target_timer_t get_timer_id(abi_long arg)
{
    target_timer_t timerid = arg;

    if ((timerid & TIMER_MAGIC_MASK) != TIMER_MAGIC) {
        return -TARGET_EINVAL;
    }

    timerid &= 0xffff;

    if (timerid >= ARRAY_SIZE(g_posix_timers)) {
        return -TARGET_EINVAL;
    }

    return timerid;
}

5573 5574 5575
/* do_syscall() should always have a single exit point at the end so
   that actions, such as logging of syscall results, can be performed.
   All errnos that do_syscall() returns must be -TARGET_<errcode>. */
5576 5577
abi_long do_syscall(void *cpu_env, int num, abi_long arg1,
                    abi_long arg2, abi_long arg3, abi_long arg4,
5578 5579
                    abi_long arg5, abi_long arg6, abi_long arg7,
                    abi_long arg8)
5580
{
5581
    CPUState *cpu = ENV_GET_CPU(cpu_env);
5582
    abi_long ret;
5583
    struct stat st;
B
bellard 已提交
5584
    struct statfs stfs;
5585
    void *p;
5586

B
bellard 已提交
5587
#ifdef DEBUG
B
bellard 已提交
5588
    gemu_log("syscall %d", num);
B
bellard 已提交
5589
#endif
5590 5591 5592
    if(do_strace)
        print_syscall(num, arg1, arg2, arg3, arg4, arg5, arg6);

5593 5594
    switch(num) {
    case TARGET_NR_exit:
5595 5596 5597 5598 5599 5600
        /* In old applications this may be used to implement _exit(2).
           However in threaded applictions it is used for thread termination,
           and _exit_group is used for application termination.
           Do thread termination if we have more then one thread.  */
        /* FIXME: This probably breaks if a signal arrives.  We should probably
           be disabling signals.  */
A
Andreas Färber 已提交
5601
        if (CPU_NEXT(first_cpu)) {
5602 5603 5604 5605
            TaskState *ts;

            cpu_list_lock();
            /* Remove the CPU from the list.  */
A
Andreas Färber 已提交
5606
            QTAILQ_REMOVE(&cpus, cpu, node);
5607
            cpu_list_unlock();
5608
            ts = cpu->opaque;
5609 5610 5611 5612 5613
            if (ts->child_tidptr) {
                put_user_u32(0, ts->child_tidptr);
                sys_futex(g2h(ts->child_tidptr), FUTEX_WAKE, INT_MAX,
                          NULL, NULL, 0);
            }
5614
            thread_cpu = NULL;
5615
            object_unref(OBJECT(cpu));
5616 5617 5618
            g_free(ts);
            pthread_exit(NULL);
        }
5619
#ifdef TARGET_GPROF
B
bellard 已提交
5620 5621
        _mcleanup();
#endif
5622
        gdb_exit(cpu_env, arg1);
5623
        _exit(arg1);
5624 5625 5626
        ret = 0; /* avoid warning */
        break;
    case TARGET_NR_read:
5627 5628 5629 5630 5631 5632 5633 5634
        if (arg3 == 0)
            ret = 0;
        else {
            if (!(p = lock_user(VERIFY_WRITE, arg2, arg3, 0)))
                goto efault;
            ret = get_errno(read(arg1, p, arg3));
            unlock_user(p, arg2, ret);
        }
5635 5636
        break;
    case TARGET_NR_write:
5637 5638
        if (!(p = lock_user(VERIFY_READ, arg2, arg3, 1)))
            goto efault;
5639 5640
        ret = get_errno(write(arg1, p, arg3));
        unlock_user(p, arg2, 0);
5641 5642
        break;
    case TARGET_NR_open:
5643 5644
        if (!(p = lock_user_string(arg1)))
            goto efault;
R
Riku Voipio 已提交
5645 5646 5647
        ret = get_errno(do_openat(cpu_env, AT_FDCWD, p,
                                  target_to_host_bitmask(arg2, fcntl_flags_tbl),
                                  arg3));
5648
        unlock_user(p, arg1, 0);
5649
        break;
5650
    case TARGET_NR_openat:
5651 5652
        if (!(p = lock_user_string(arg2)))
            goto efault;
R
Riku Voipio 已提交
5653 5654 5655
        ret = get_errno(do_openat(cpu_env, arg1, p,
                                  target_to_host_bitmask(arg3, fcntl_flags_tbl),
                                  arg4));
5656
        unlock_user(p, arg2, 0);
5657
        break;
5658 5659 5660 5661
    case TARGET_NR_close:
        ret = get_errno(close(arg1));
        break;
    case TARGET_NR_brk:
5662
        ret = do_brk(arg1);
5663 5664
        break;
    case TARGET_NR_fork:
P
pbrook 已提交
5665
        ret = get_errno(do_fork(cpu_env, SIGCHLD, 0, 0, 0, 0));
5666
        break;
5667
#ifdef TARGET_NR_waitpid
5668 5669
    case TARGET_NR_waitpid:
        {
5670 5671
            int status;
            ret = get_errno(waitpid(arg1, &status, arg3));
5672
            if (!is_error(ret) && arg2 && ret
P
pbrook 已提交
5673
                && put_user_s32(host_to_target_waitstatus(status), arg2))
5674
                goto efault;
5675 5676
        }
        break;
5677
#endif
P
pbrook 已提交
5678 5679 5680 5681 5682 5683 5684
#ifdef TARGET_NR_waitid
    case TARGET_NR_waitid:
        {
            siginfo_t info;
            info.si_pid = 0;
            ret = get_errno(waitid(arg1, arg2, &info, arg4));
            if (!is_error(ret) && arg3 && info.si_pid != 0) {
A
Anthony Liguori 已提交
5685
                if (!(p = lock_user(VERIFY_WRITE, arg3, sizeof(target_siginfo_t), 0)))
P
pbrook 已提交
5686 5687
                    goto efault;
                host_to_target_siginfo(p, &info);
A
Anthony Liguori 已提交
5688
                unlock_user(p, arg3, sizeof(target_siginfo_t));
P
pbrook 已提交
5689 5690 5691 5692
            }
        }
        break;
#endif
5693
#ifdef TARGET_NR_creat /* not on alpha */
5694
    case TARGET_NR_creat:
5695 5696
        if (!(p = lock_user_string(arg1)))
            goto efault;
5697 5698
        ret = get_errno(creat(p, arg2));
        unlock_user(p, arg1, 0);
5699
        break;
5700
#endif
5701
    case TARGET_NR_link:
5702 5703 5704 5705
        {
            void * p2;
            p = lock_user_string(arg1);
            p2 = lock_user_string(arg2);
5706 5707 5708 5709
            if (!p || !p2)
                ret = -TARGET_EFAULT;
            else
                ret = get_errno(link(p, p2));
5710 5711 5712
            unlock_user(p2, arg2, 0);
            unlock_user(p, arg1, 0);
        }
5713
        break;
5714
#if defined(TARGET_NR_linkat)
5715 5716 5717
    case TARGET_NR_linkat:
        {
            void * p2 = NULL;
5718 5719
            if (!arg2 || !arg4)
                goto efault;
5720 5721
            p  = lock_user_string(arg2);
            p2 = lock_user_string(arg4);
5722
            if (!p || !p2)
5723
                ret = -TARGET_EFAULT;
5724
            else
5725
                ret = get_errno(linkat(arg1, p, arg3, p2, arg5));
5726 5727
            unlock_user(p, arg2, 0);
            unlock_user(p2, arg4, 0);
5728 5729 5730
        }
        break;
#endif
5731
    case TARGET_NR_unlink:
5732 5733
        if (!(p = lock_user_string(arg1)))
            goto efault;
5734 5735
        ret = get_errno(unlink(p));
        unlock_user(p, arg1, 0);
5736
        break;
5737
#if defined(TARGET_NR_unlinkat)
5738
    case TARGET_NR_unlinkat:
5739 5740
        if (!(p = lock_user_string(arg2)))
            goto efault;
5741
        ret = get_errno(unlinkat(arg1, p, arg3));
5742
        unlock_user(p, arg2, 0);
5743
        break;
5744
#endif
5745
    case TARGET_NR_execve:
B
bellard 已提交
5746 5747
        {
            char **argp, **envp;
B
bellard 已提交
5748
            int argc, envc;
5749 5750 5751 5752
            abi_ulong gp;
            abi_ulong guest_argp;
            abi_ulong guest_envp;
            abi_ulong addr;
B
bellard 已提交
5753
            char **q;
5754
            int total_size = 0;
B
bellard 已提交
5755

B
bellard 已提交
5756
            argc = 0;
5757
            guest_argp = arg2;
5758
            for (gp = guest_argp; gp; gp += sizeof(abi_ulong)) {
5759
                if (get_user_ual(addr, gp))
5760
                    goto efault;
5761
                if (!addr)
5762
                    break;
B
bellard 已提交
5763
                argc++;
5764
            }
B
bellard 已提交
5765
            envc = 0;
5766
            guest_envp = arg3;
5767
            for (gp = guest_envp; gp; gp += sizeof(abi_ulong)) {
5768
                if (get_user_ual(addr, gp))
5769
                    goto efault;
5770
                if (!addr)
5771
                    break;
B
bellard 已提交
5772
                envc++;
5773
            }
B
bellard 已提交
5774

B
bellard 已提交
5775 5776
            argp = alloca((argc + 1) * sizeof(void *));
            envp = alloca((envc + 1) * sizeof(void *));
B
bellard 已提交
5777

5778
            for (gp = guest_argp, q = argp; gp;
5779
                  gp += sizeof(abi_ulong), q++) {
5780 5781
                if (get_user_ual(addr, gp))
                    goto execve_efault;
5782 5783
                if (!addr)
                    break;
5784 5785
                if (!(*q = lock_user_string(addr)))
                    goto execve_efault;
5786
                total_size += strlen(*q) + 1;
5787
            }
B
bellard 已提交
5788 5789
            *q = NULL;

5790
            for (gp = guest_envp, q = envp; gp;
5791
                  gp += sizeof(abi_ulong), q++) {
5792 5793
                if (get_user_ual(addr, gp))
                    goto execve_efault;
5794 5795
                if (!addr)
                    break;
5796 5797
                if (!(*q = lock_user_string(addr)))
                    goto execve_efault;
5798
                total_size += strlen(*q) + 1;
5799
            }
B
bellard 已提交
5800
            *q = NULL;
B
bellard 已提交
5801

5802 5803 5804 5805 5806 5807
            /* This case will not be caught by the host's execve() if its
               page size is bigger than the target's. */
            if (total_size > MAX_ARG_PAGES * TARGET_PAGE_SIZE) {
                ret = -TARGET_E2BIG;
                goto execve_end;
            }
5808 5809
            if (!(p = lock_user_string(arg1)))
                goto execve_efault;
5810 5811 5812
            ret = get_errno(execve(p, argp, envp));
            unlock_user(p, arg1, 0);

5813 5814 5815 5816 5817 5818
            goto execve_end;

        execve_efault:
            ret = -TARGET_EFAULT;

        execve_end:
5819
            for (gp = guest_argp, q = argp; *q;
5820
                  gp += sizeof(abi_ulong), q++) {
5821 5822 5823
                if (get_user_ual(addr, gp)
                    || !addr)
                    break;
5824 5825 5826
                unlock_user(*q, addr, 0);
            }
            for (gp = guest_envp, q = envp; *q;
5827
                  gp += sizeof(abi_ulong), q++) {
5828 5829 5830
                if (get_user_ual(addr, gp)
                    || !addr)
                    break;
5831 5832
                unlock_user(*q, addr, 0);
            }
B
bellard 已提交
5833
        }
5834 5835
        break;
    case TARGET_NR_chdir:
5836 5837
        if (!(p = lock_user_string(arg1)))
            goto efault;
5838 5839
        ret = get_errno(chdir(p));
        unlock_user(p, arg1, 0);
5840
        break;
B
bellard 已提交
5841
#ifdef TARGET_NR_time
5842 5843
    case TARGET_NR_time:
        {
5844 5845
            time_t host_time;
            ret = get_errno(time(&host_time));
5846 5847 5848 5849
            if (!is_error(ret)
                && arg1
                && put_user_sal(host_time, arg1))
                goto efault;
5850 5851
        }
        break;
B
bellard 已提交
5852
#endif
5853
    case TARGET_NR_mknod:
5854 5855
        if (!(p = lock_user_string(arg1)))
            goto efault;
5856 5857
        ret = get_errno(mknod(p, arg2, arg3));
        unlock_user(p, arg1, 0);
5858
        break;
5859
#if defined(TARGET_NR_mknodat)
5860
    case TARGET_NR_mknodat:
5861 5862
        if (!(p = lock_user_string(arg2)))
            goto efault;
5863
        ret = get_errno(mknodat(arg1, p, arg3, arg4));
5864
        unlock_user(p, arg2, 0);
5865 5866
        break;
#endif
5867
    case TARGET_NR_chmod:
5868 5869
        if (!(p = lock_user_string(arg1)))
            goto efault;
5870 5871
        ret = get_errno(chmod(p, arg2));
        unlock_user(p, arg1, 0);
5872
        break;
5873
#ifdef TARGET_NR_break
5874 5875
    case TARGET_NR_break:
        goto unimplemented;
5876 5877
#endif
#ifdef TARGET_NR_oldstat
5878 5879
    case TARGET_NR_oldstat:
        goto unimplemented;
5880
#endif
5881 5882 5883
    case TARGET_NR_lseek:
        ret = get_errno(lseek(arg1, arg2, arg3));
        break;
5884 5885
#if defined(TARGET_NR_getxpid) && defined(TARGET_ALPHA)
    /* Alpha specific */
5886
    case TARGET_NR_getxpid:
5887 5888 5889
        ((CPUAlphaState *)cpu_env)->ir[IR_A4] = getppid();
        ret = get_errno(getpid());
        break;
5890
#endif
5891 5892
#ifdef TARGET_NR_getpid
    case TARGET_NR_getpid:
5893 5894
        ret = get_errno(getpid());
        break;
5895
#endif
5896
    case TARGET_NR_mount:
5897 5898 5899 5900 5901 5902 5903 5904 5905 5906 5907 5908 5909 5910 5911 5912 5913 5914 5915 5916 5917 5918 5919 5920 5921
        {
            /* need to look at the data field */
            void *p2, *p3;

            if (arg1) {
                p = lock_user_string(arg1);
                if (!p) {
                    goto efault;
                }
            } else {
                p = NULL;
            }

            p2 = lock_user_string(arg2);
            if (!p2) {
                if (arg1) {
                    unlock_user(p, arg1, 0);
                }
                goto efault;
            }

            if (arg3) {
                p3 = lock_user_string(arg3);
                if (!p3) {
                    if (arg1) {
5922
                        unlock_user(p, arg1, 0);
5923 5924 5925 5926 5927 5928 5929 5930 5931 5932 5933 5934 5935 5936 5937 5938 5939 5940 5941 5942 5943 5944 5945 5946 5947 5948 5949 5950
                    }
                    unlock_user(p2, arg2, 0);
                    goto efault;
                }
            } else {
                p3 = NULL;
            }

            /* FIXME - arg5 should be locked, but it isn't clear how to
             * do that since it's not guaranteed to be a NULL-terminated
             * string.
             */
            if (!arg5) {
                ret = mount(p, p2, p3, (unsigned long)arg4, NULL);
            } else {
                ret = mount(p, p2, p3, (unsigned long)arg4, g2h(arg5));
            }
            ret = get_errno(ret);

            if (arg1) {
                unlock_user(p, arg1, 0);
            }
            unlock_user(p2, arg2, 0);
            if (arg3) {
                unlock_user(p3, arg3, 0);
            }
        }
        break;
5951
#ifdef TARGET_NR_umount
5952
    case TARGET_NR_umount:
5953 5954
        if (!(p = lock_user_string(arg1)))
            goto efault;
5955 5956
        ret = get_errno(umount(p));
        unlock_user(p, arg1, 0);
5957
        break;
5958
#endif
5959
#ifdef TARGET_NR_stime /* not on alpha */
5960 5961
    case TARGET_NR_stime:
        {
5962
            time_t host_time;
5963 5964
            if (get_user_sal(host_time, arg1))
                goto efault;
5965
            ret = get_errno(stime(&host_time));
5966 5967
        }
        break;
5968
#endif
5969 5970
    case TARGET_NR_ptrace:
        goto unimplemented;
5971
#ifdef TARGET_NR_alarm /* not on alpha */
5972 5973 5974
    case TARGET_NR_alarm:
        ret = alarm(arg1);
        break;
5975
#endif
5976
#ifdef TARGET_NR_oldfstat
5977 5978
    case TARGET_NR_oldfstat:
        goto unimplemented;
5979
#endif
5980
#ifdef TARGET_NR_pause /* not on alpha */
5981 5982 5983
    case TARGET_NR_pause:
        ret = get_errno(pause());
        break;
5984
#endif
5985
#ifdef TARGET_NR_utime
5986
    case TARGET_NR_utime:
5987
        {
5988 5989 5990
            struct utimbuf tbuf, *host_tbuf;
            struct target_utimbuf *target_tbuf;
            if (arg2) {
5991 5992
                if (!lock_user_struct(VERIFY_READ, target_tbuf, arg2, 1))
                    goto efault;
5993 5994
                tbuf.actime = tswapal(target_tbuf->actime);
                tbuf.modtime = tswapal(target_tbuf->modtime);
5995 5996
                unlock_user_struct(target_tbuf, arg2, 0);
                host_tbuf = &tbuf;
B
bellard 已提交
5997
            } else {
5998
                host_tbuf = NULL;
B
bellard 已提交
5999
            }
6000 6001
            if (!(p = lock_user_string(arg1)))
                goto efault;
6002 6003
            ret = get_errno(utime(p, host_tbuf));
            unlock_user(p, arg1, 0);
6004 6005
        }
        break;
6006
#endif
B
bellard 已提交
6007 6008 6009
    case TARGET_NR_utimes:
        {
            struct timeval *tvp, tv[2];
6010
            if (arg2) {
6011 6012 6013 6014
                if (copy_from_user_timeval(&tv[0], arg2)
                    || copy_from_user_timeval(&tv[1],
                                              arg2 + sizeof(struct target_timeval)))
                    goto efault;
B
bellard 已提交
6015 6016 6017 6018
                tvp = tv;
            } else {
                tvp = NULL;
            }
6019 6020
            if (!(p = lock_user_string(arg1)))
                goto efault;
6021 6022
            ret = get_errno(utimes(p, tvp));
            unlock_user(p, arg1, 0);
B
bellard 已提交
6023 6024
        }
        break;
6025
#if defined(TARGET_NR_futimesat)
6026 6027 6028 6029 6030 6031 6032 6033 6034 6035 6036 6037 6038 6039
    case TARGET_NR_futimesat:
        {
            struct timeval *tvp, tv[2];
            if (arg3) {
                if (copy_from_user_timeval(&tv[0], arg3)
                    || copy_from_user_timeval(&tv[1],
                                              arg3 + sizeof(struct target_timeval)))
                    goto efault;
                tvp = tv;
            } else {
                tvp = NULL;
            }
            if (!(p = lock_user_string(arg2)))
                goto efault;
6040
            ret = get_errno(futimesat(arg1, path(p), tvp));
6041 6042 6043 6044
            unlock_user(p, arg2, 0);
        }
        break;
#endif
6045
#ifdef TARGET_NR_stty
6046 6047
    case TARGET_NR_stty:
        goto unimplemented;
6048 6049
#endif
#ifdef TARGET_NR_gtty
6050 6051
    case TARGET_NR_gtty:
        goto unimplemented;
6052
#endif
6053
    case TARGET_NR_access:
6054 6055
        if (!(p = lock_user_string(arg1)))
            goto efault;
U
Ulrich Hecht 已提交
6056
        ret = get_errno(access(path(p), arg2));
6057
        unlock_user(p, arg1, 0);
6058
        break;
6059 6060
#if defined(TARGET_NR_faccessat) && defined(__NR_faccessat)
    case TARGET_NR_faccessat:
6061 6062
        if (!(p = lock_user_string(arg2)))
            goto efault;
6063
        ret = get_errno(faccessat(arg1, p, arg3, 0));
6064
        unlock_user(p, arg2, 0);
6065 6066
        break;
#endif
6067
#ifdef TARGET_NR_nice /* not on alpha */
6068 6069 6070
    case TARGET_NR_nice:
        ret = get_errno(nice(arg1));
        break;
6071
#endif
6072
#ifdef TARGET_NR_ftime
6073 6074
    case TARGET_NR_ftime:
        goto unimplemented;
6075
#endif
6076
    case TARGET_NR_sync:
B
bellard 已提交
6077 6078
        sync();
        ret = 0;
6079 6080
        break;
    case TARGET_NR_kill:
6081
        ret = get_errno(kill(arg1, target_to_host_signal(arg2)));
6082 6083
        break;
    case TARGET_NR_rename:
6084 6085 6086 6087
        {
            void *p2;
            p = lock_user_string(arg1);
            p2 = lock_user_string(arg2);
6088 6089 6090 6091
            if (!p || !p2)
                ret = -TARGET_EFAULT;
            else
                ret = get_errno(rename(p, p2));
6092 6093 6094
            unlock_user(p2, arg2, 0);
            unlock_user(p, arg1, 0);
        }
6095
        break;
6096
#if defined(TARGET_NR_renameat)
6097 6098
    case TARGET_NR_renameat:
        {
6099
            void *p2;
6100 6101
            p  = lock_user_string(arg2);
            p2 = lock_user_string(arg4);
6102
            if (!p || !p2)
6103
                ret = -TARGET_EFAULT;
6104
            else
6105
                ret = get_errno(renameat(arg1, p, arg3, p2));
6106 6107
            unlock_user(p2, arg4, 0);
            unlock_user(p, arg2, 0);
6108 6109 6110
        }
        break;
#endif
6111
    case TARGET_NR_mkdir:
6112 6113
        if (!(p = lock_user_string(arg1)))
            goto efault;
6114 6115
        ret = get_errno(mkdir(p, arg2));
        unlock_user(p, arg1, 0);
6116
        break;
6117
#if defined(TARGET_NR_mkdirat)
6118
    case TARGET_NR_mkdirat:
6119 6120
        if (!(p = lock_user_string(arg2)))
            goto efault;
6121
        ret = get_errno(mkdirat(arg1, p, arg3));
6122
        unlock_user(p, arg2, 0);
6123 6124
        break;
#endif
6125
    case TARGET_NR_rmdir:
6126 6127
        if (!(p = lock_user_string(arg1)))
            goto efault;
6128 6129
        ret = get_errno(rmdir(p));
        unlock_user(p, arg1, 0);
6130 6131 6132 6133 6134
        break;
    case TARGET_NR_dup:
        ret = get_errno(dup(arg1));
        break;
    case TARGET_NR_pipe:
6135
        ret = do_pipe(cpu_env, arg1, 0, 0);
R
Riku Voipio 已提交
6136 6137 6138
        break;
#ifdef TARGET_NR_pipe2
    case TARGET_NR_pipe2:
6139 6140
        ret = do_pipe(cpu_env, arg1,
                      target_to_host_bitmask(arg2, fcntl_flags_tbl), 1);
6141
        break;
R
Riku Voipio 已提交
6142
#endif
6143
    case TARGET_NR_times:
B
bellard 已提交
6144
        {
6145
            struct target_tms *tmsp;
B
bellard 已提交
6146 6147
            struct tms tms;
            ret = get_errno(times(&tms));
6148
            if (arg1) {
6149 6150 6151
                tmsp = lock_user(VERIFY_WRITE, arg1, sizeof(struct target_tms), 0);
                if (!tmsp)
                    goto efault;
6152 6153 6154 6155
                tmsp->tms_utime = tswapal(host_to_target_clock_t(tms.tms_utime));
                tmsp->tms_stime = tswapal(host_to_target_clock_t(tms.tms_stime));
                tmsp->tms_cutime = tswapal(host_to_target_clock_t(tms.tms_cutime));
                tmsp->tms_cstime = tswapal(host_to_target_clock_t(tms.tms_cstime));
B
bellard 已提交
6156
            }
B
bellard 已提交
6157 6158
            if (!is_error(ret))
                ret = host_to_target_clock_t(ret);
B
bellard 已提交
6159 6160
        }
        break;
6161
#ifdef TARGET_NR_prof
6162 6163
    case TARGET_NR_prof:
        goto unimplemented;
6164
#endif
6165
#ifdef TARGET_NR_signal
6166 6167
    case TARGET_NR_signal:
        goto unimplemented;
6168
#endif
6169
    case TARGET_NR_acct:
6170 6171 6172 6173 6174 6175 6176 6177
        if (arg1 == 0) {
            ret = get_errno(acct(NULL));
        } else {
            if (!(p = lock_user_string(arg1)))
                goto efault;
            ret = get_errno(acct(path(p)));
            unlock_user(p, arg1, 0);
        }
6178
        break;
6179
#ifdef TARGET_NR_umount2
6180
    case TARGET_NR_umount2:
6181 6182
        if (!(p = lock_user_string(arg1)))
            goto efault;
6183 6184
        ret = get_errno(umount2(p, arg2));
        unlock_user(p, arg1, 0);
6185
        break;
6186
#endif
6187
#ifdef TARGET_NR_lock
6188 6189
    case TARGET_NR_lock:
        goto unimplemented;
6190
#endif
6191 6192 6193 6194
    case TARGET_NR_ioctl:
        ret = do_ioctl(arg1, arg2, arg3);
        break;
    case TARGET_NR_fcntl:
B
bellard 已提交
6195
        ret = do_fcntl(arg1, arg2, arg3);
6196
        break;
6197
#ifdef TARGET_NR_mpx
6198 6199
    case TARGET_NR_mpx:
        goto unimplemented;
6200
#endif
6201 6202 6203
    case TARGET_NR_setpgid:
        ret = get_errno(setpgid(arg1, arg2));
        break;
6204
#ifdef TARGET_NR_ulimit
6205 6206
    case TARGET_NR_ulimit:
        goto unimplemented;
6207 6208
#endif
#ifdef TARGET_NR_oldolduname
6209 6210
    case TARGET_NR_oldolduname:
        goto unimplemented;
6211
#endif
6212 6213 6214 6215
    case TARGET_NR_umask:
        ret = get_errno(umask(arg1));
        break;
    case TARGET_NR_chroot:
6216 6217
        if (!(p = lock_user_string(arg1)))
            goto efault;
6218 6219
        ret = get_errno(chroot(p));
        unlock_user(p, arg1, 0);
6220 6221 6222 6223 6224 6225
        break;
    case TARGET_NR_ustat:
        goto unimplemented;
    case TARGET_NR_dup2:
        ret = get_errno(dup2(arg1, arg2));
        break;
6226 6227 6228 6229 6230
#if defined(CONFIG_DUP3) && defined(TARGET_NR_dup3)
    case TARGET_NR_dup3:
        ret = get_errno(dup3(arg1, arg2, arg3));
        break;
#endif
6231
#ifdef TARGET_NR_getppid /* not on alpha */
6232 6233 6234
    case TARGET_NR_getppid:
        ret = get_errno(getppid());
        break;
6235
#endif
6236 6237 6238 6239 6240 6241
    case TARGET_NR_getpgrp:
        ret = get_errno(getpgrp());
        break;
    case TARGET_NR_setsid:
        ret = get_errno(setsid());
        break;
6242
#ifdef TARGET_NR_sigaction
6243 6244
    case TARGET_NR_sigaction:
        {
6245 6246
#if defined(TARGET_ALPHA)
            struct target_sigaction act, oact, *pact = 0;
6247 6248
            struct target_old_sigaction *old_act;
            if (arg2) {
6249 6250
                if (!lock_user_struct(VERIFY_READ, old_act, arg2, 1))
                    goto efault;
B
bellard 已提交
6251 6252 6253
                act._sa_handler = old_act->_sa_handler;
                target_siginitset(&act.sa_mask, old_act->sa_mask);
                act.sa_flags = old_act->sa_flags;
6254
                act.sa_restorer = 0;
6255
                unlock_user_struct(old_act, arg2, 0);
B
bellard 已提交
6256 6257 6258
                pact = &act;
            }
            ret = get_errno(do_sigaction(arg1, pact, &oact));
6259
            if (!is_error(ret) && arg3) {
6260 6261
                if (!lock_user_struct(VERIFY_WRITE, old_act, arg3, 0))
                    goto efault;
6262 6263 6264 6265
                old_act->_sa_handler = oact._sa_handler;
                old_act->sa_mask = oact.sa_mask.sig[0];
                old_act->sa_flags = oact.sa_flags;
                unlock_user_struct(old_act, arg3, 1);
B
bellard 已提交
6266
            }
6267
#elif defined(TARGET_MIPS)
6268 6269 6270
	    struct target_sigaction act, oact, *pact, *old_act;

	    if (arg2) {
6271 6272
                if (!lock_user_struct(VERIFY_READ, old_act, arg2, 1))
                    goto efault;
6273 6274 6275 6276 6277 6278 6279 6280 6281 6282 6283 6284
		act._sa_handler = old_act->_sa_handler;
		target_siginitset(&act.sa_mask, old_act->sa_mask.sig[0]);
		act.sa_flags = old_act->sa_flags;
		unlock_user_struct(old_act, arg2, 0);
		pact = &act;
	    } else {
		pact = NULL;
	    }

	    ret = get_errno(do_sigaction(arg1, pact, &oact));

	    if (!is_error(ret) && arg3) {
6285 6286
                if (!lock_user_struct(VERIFY_WRITE, old_act, arg3, 0))
                    goto efault;
6287 6288 6289 6290 6291 6292 6293 6294
		old_act->_sa_handler = oact._sa_handler;
		old_act->sa_flags = oact.sa_flags;
		old_act->sa_mask.sig[0] = oact.sa_mask.sig[0];
		old_act->sa_mask.sig[1] = 0;
		old_act->sa_mask.sig[2] = 0;
		old_act->sa_mask.sig[3] = 0;
		unlock_user_struct(old_act, arg3, 1);
	    }
6295 6296 6297 6298 6299 6300 6301 6302 6303 6304 6305 6306 6307 6308 6309 6310 6311 6312 6313 6314 6315 6316 6317 6318 6319
#else
            struct target_old_sigaction *old_act;
            struct target_sigaction act, oact, *pact;
            if (arg2) {
                if (!lock_user_struct(VERIFY_READ, old_act, arg2, 1))
                    goto efault;
                act._sa_handler = old_act->_sa_handler;
                target_siginitset(&act.sa_mask, old_act->sa_mask);
                act.sa_flags = old_act->sa_flags;
                act.sa_restorer = old_act->sa_restorer;
                unlock_user_struct(old_act, arg2, 0);
                pact = &act;
            } else {
                pact = NULL;
            }
            ret = get_errno(do_sigaction(arg1, pact, &oact));
            if (!is_error(ret) && arg3) {
                if (!lock_user_struct(VERIFY_WRITE, old_act, arg3, 0))
                    goto efault;
                old_act->_sa_handler = oact._sa_handler;
                old_act->sa_mask = oact.sa_mask.sig[0];
                old_act->sa_flags = oact.sa_flags;
                old_act->sa_restorer = oact.sa_restorer;
                unlock_user_struct(old_act, arg3, 1);
            }
T
ths 已提交
6320
#endif
6321 6322
        }
        break;
6323
#endif
B
bellard 已提交
6324
    case TARGET_NR_rt_sigaction:
6325
        {
6326 6327 6328 6329 6330 6331 6332 6333 6334 6335 6336 6337 6338 6339 6340 6341 6342 6343 6344 6345 6346 6347 6348 6349
#if defined(TARGET_ALPHA)
            struct target_sigaction act, oact, *pact = 0;
            struct target_rt_sigaction *rt_act;
            /* ??? arg4 == sizeof(sigset_t).  */
            if (arg2) {
                if (!lock_user_struct(VERIFY_READ, rt_act, arg2, 1))
                    goto efault;
                act._sa_handler = rt_act->_sa_handler;
                act.sa_mask = rt_act->sa_mask;
                act.sa_flags = rt_act->sa_flags;
                act.sa_restorer = arg5;
                unlock_user_struct(rt_act, arg2, 0);
                pact = &act;
            }
            ret = get_errno(do_sigaction(arg1, pact, &oact));
            if (!is_error(ret) && arg3) {
                if (!lock_user_struct(VERIFY_WRITE, rt_act, arg3, 0))
                    goto efault;
                rt_act->_sa_handler = oact._sa_handler;
                rt_act->sa_mask = oact.sa_mask;
                rt_act->sa_flags = oact.sa_flags;
                unlock_user_struct(rt_act, arg3, 1);
            }
#else
6350 6351 6352
            struct target_sigaction *act;
            struct target_sigaction *oact;

6353 6354 6355 6356
            if (arg2) {
                if (!lock_user_struct(VERIFY_READ, act, arg2, 1))
                    goto efault;
            } else
6357
                act = NULL;
6358 6359 6360 6361 6362 6363
            if (arg3) {
                if (!lock_user_struct(VERIFY_WRITE, oact, arg3, 0)) {
                    ret = -TARGET_EFAULT;
                    goto rt_sigaction_fail;
                }
            } else
6364 6365
                oact = NULL;
            ret = get_errno(do_sigaction(arg1, act, oact));
6366 6367
	rt_sigaction_fail:
            if (act)
6368
                unlock_user_struct(act, arg2, 0);
6369
            if (oact)
6370
                unlock_user_struct(oact, arg3, 1);
6371
#endif
6372
        }
B
bellard 已提交
6373
        break;
6374
#ifdef TARGET_NR_sgetmask /* not on alpha */
6375
    case TARGET_NR_sgetmask:
B
bellard 已提交
6376 6377
        {
            sigset_t cur_set;
6378
            abi_ulong target_set;
6379
            do_sigprocmask(0, NULL, &cur_set);
B
bellard 已提交
6380 6381 6382 6383
            host_to_target_old_sigset(&target_set, &cur_set);
            ret = target_set;
        }
        break;
6384 6385
#endif
#ifdef TARGET_NR_ssetmask /* not on alpha */
6386
    case TARGET_NR_ssetmask:
B
bellard 已提交
6387 6388
        {
            sigset_t set, oset, cur_set;
6389
            abi_ulong target_set = arg1;
6390
            do_sigprocmask(0, NULL, &cur_set);
B
bellard 已提交
6391 6392
            target_to_host_old_sigset(&set, &target_set);
            sigorset(&set, &set, &cur_set);
6393
            do_sigprocmask(SIG_SETMASK, &set, &oset);
B
bellard 已提交
6394 6395 6396 6397
            host_to_target_old_sigset(&target_set, &oset);
            ret = target_set;
        }
        break;
6398
#endif
6399
#ifdef TARGET_NR_sigprocmask
B
bellard 已提交
6400 6401
    case TARGET_NR_sigprocmask:
        {
6402 6403 6404 6405 6406 6407 6408 6409 6410 6411 6412 6413 6414 6415 6416 6417 6418 6419 6420 6421 6422 6423
#if defined(TARGET_ALPHA)
            sigset_t set, oldset;
            abi_ulong mask;
            int how;

            switch (arg1) {
            case TARGET_SIG_BLOCK:
                how = SIG_BLOCK;
                break;
            case TARGET_SIG_UNBLOCK:
                how = SIG_UNBLOCK;
                break;
            case TARGET_SIG_SETMASK:
                how = SIG_SETMASK;
                break;
            default:
                ret = -TARGET_EINVAL;
                goto fail;
            }
            mask = arg2;
            target_to_host_old_sigset(&set, &mask);

6424
            ret = get_errno(do_sigprocmask(how, &set, &oldset));
6425 6426 6427
            if (!is_error(ret)) {
                host_to_target_old_sigset(&mask, &oldset);
                ret = mask;
6428
                ((CPUAlphaState *)cpu_env)->ir[IR_V0] = 0; /* force no error */
6429 6430
            }
#else
B
bellard 已提交
6431
            sigset_t set, oldset, *set_ptr;
6432
            int how;
6433

6434
            if (arg2) {
6435
                switch (arg1) {
B
bellard 已提交
6436 6437 6438 6439 6440 6441 6442 6443 6444 6445
                case TARGET_SIG_BLOCK:
                    how = SIG_BLOCK;
                    break;
                case TARGET_SIG_UNBLOCK:
                    how = SIG_UNBLOCK;
                    break;
                case TARGET_SIG_SETMASK:
                    how = SIG_SETMASK;
                    break;
                default:
6446
                    ret = -TARGET_EINVAL;
B
bellard 已提交
6447 6448
                    goto fail;
                }
A
Anthony Liguori 已提交
6449
                if (!(p = lock_user(VERIFY_READ, arg2, sizeof(target_sigset_t), 1)))
6450
                    goto efault;
6451 6452
                target_to_host_old_sigset(&set, p);
                unlock_user(p, arg2, 0);
B
bellard 已提交
6453 6454 6455 6456 6457
                set_ptr = &set;
            } else {
                how = 0;
                set_ptr = NULL;
            }
6458
            ret = get_errno(do_sigprocmask(how, set_ptr, &oldset));
6459
            if (!is_error(ret) && arg3) {
A
Anthony Liguori 已提交
6460
                if (!(p = lock_user(VERIFY_WRITE, arg3, sizeof(target_sigset_t), 0)))
6461
                    goto efault;
6462
                host_to_target_old_sigset(p, &oldset);
A
Anthony Liguori 已提交
6463
                unlock_user(p, arg3, sizeof(target_sigset_t));
B
bellard 已提交
6464
            }
6465
#endif
B
bellard 已提交
6466 6467
        }
        break;
6468
#endif
B
bellard 已提交
6469 6470 6471 6472
    case TARGET_NR_rt_sigprocmask:
        {
            int how = arg1;
            sigset_t set, oldset, *set_ptr;
6473

6474
            if (arg2) {
B
bellard 已提交
6475 6476 6477 6478 6479 6480 6481 6482 6483 6484 6485
                switch(how) {
                case TARGET_SIG_BLOCK:
                    how = SIG_BLOCK;
                    break;
                case TARGET_SIG_UNBLOCK:
                    how = SIG_UNBLOCK;
                    break;
                case TARGET_SIG_SETMASK:
                    how = SIG_SETMASK;
                    break;
                default:
6486
                    ret = -TARGET_EINVAL;
B
bellard 已提交
6487 6488
                    goto fail;
                }
A
Anthony Liguori 已提交
6489
                if (!(p = lock_user(VERIFY_READ, arg2, sizeof(target_sigset_t), 1)))
6490
                    goto efault;
6491 6492
                target_to_host_sigset(&set, p);
                unlock_user(p, arg2, 0);
B
bellard 已提交
6493 6494 6495 6496 6497
                set_ptr = &set;
            } else {
                how = 0;
                set_ptr = NULL;
            }
6498
            ret = get_errno(do_sigprocmask(how, set_ptr, &oldset));
6499
            if (!is_error(ret) && arg3) {
A
Anthony Liguori 已提交
6500
                if (!(p = lock_user(VERIFY_WRITE, arg3, sizeof(target_sigset_t), 0)))
6501
                    goto efault;
6502
                host_to_target_sigset(p, &oldset);
A
Anthony Liguori 已提交
6503
                unlock_user(p, arg3, sizeof(target_sigset_t));
B
bellard 已提交
6504 6505 6506
            }
        }
        break;
6507
#ifdef TARGET_NR_sigpending
B
bellard 已提交
6508 6509 6510 6511 6512
    case TARGET_NR_sigpending:
        {
            sigset_t set;
            ret = get_errno(sigpending(&set));
            if (!is_error(ret)) {
A
Anthony Liguori 已提交
6513
                if (!(p = lock_user(VERIFY_WRITE, arg1, sizeof(target_sigset_t), 0)))
6514
                    goto efault;
6515
                host_to_target_old_sigset(p, &set);
A
Anthony Liguori 已提交
6516
                unlock_user(p, arg1, sizeof(target_sigset_t));
B
bellard 已提交
6517 6518 6519
            }
        }
        break;
6520
#endif
B
bellard 已提交
6521 6522 6523 6524 6525
    case TARGET_NR_rt_sigpending:
        {
            sigset_t set;
            ret = get_errno(sigpending(&set));
            if (!is_error(ret)) {
A
Anthony Liguori 已提交
6526
                if (!(p = lock_user(VERIFY_WRITE, arg1, sizeof(target_sigset_t), 0)))
6527
                    goto efault;
6528
                host_to_target_sigset(p, &set);
A
Anthony Liguori 已提交
6529
                unlock_user(p, arg1, sizeof(target_sigset_t));
B
bellard 已提交
6530 6531 6532
            }
        }
        break;
6533
#ifdef TARGET_NR_sigsuspend
B
bellard 已提交
6534 6535 6536
    case TARGET_NR_sigsuspend:
        {
            sigset_t set;
6537 6538 6539 6540
#if defined(TARGET_ALPHA)
            abi_ulong mask = arg1;
            target_to_host_old_sigset(&set, &mask);
#else
A
Anthony Liguori 已提交
6541
            if (!(p = lock_user(VERIFY_READ, arg1, sizeof(target_sigset_t), 1)))
6542
                goto efault;
6543 6544
            target_to_host_old_sigset(&set, p);
            unlock_user(p, arg1, 0);
6545
#endif
B
bellard 已提交
6546 6547 6548
            ret = get_errno(sigsuspend(&set));
        }
        break;
6549
#endif
B
bellard 已提交
6550 6551 6552
    case TARGET_NR_rt_sigsuspend:
        {
            sigset_t set;
A
Anthony Liguori 已提交
6553
            if (!(p = lock_user(VERIFY_READ, arg1, sizeof(target_sigset_t), 1)))
6554
                goto efault;
6555 6556
            target_to_host_sigset(&set, p);
            unlock_user(p, arg1, 0);
B
bellard 已提交
6557 6558 6559 6560 6561 6562 6563 6564
            ret = get_errno(sigsuspend(&set));
        }
        break;
    case TARGET_NR_rt_sigtimedwait:
        {
            sigset_t set;
            struct timespec uts, *puts;
            siginfo_t uinfo;
6565

A
Anthony Liguori 已提交
6566
            if (!(p = lock_user(VERIFY_READ, arg1, sizeof(target_sigset_t), 1)))
6567
                goto efault;
6568 6569 6570
            target_to_host_sigset(&set, p);
            unlock_user(p, arg1, 0);
            if (arg3) {
B
bellard 已提交
6571
                puts = &uts;
6572
                target_to_host_timespec(puts, arg3);
B
bellard 已提交
6573 6574 6575 6576
            } else {
                puts = NULL;
            }
            ret = get_errno(sigtimedwait(&set, &uinfo, puts));
6577 6578 6579 6580 6581 6582 6583 6584 6585 6586 6587
            if (!is_error(ret)) {
                if (arg2) {
                    p = lock_user(VERIFY_WRITE, arg2, sizeof(target_siginfo_t),
                                  0);
                    if (!p) {
                        goto efault;
                    }
                    host_to_target_siginfo(p, &uinfo);
                    unlock_user(p, arg2, sizeof(target_siginfo_t));
                }
                ret = host_to_target_signal(ret);
B
bellard 已提交
6588 6589 6590 6591 6592 6593
            }
        }
        break;
    case TARGET_NR_rt_sigqueueinfo:
        {
            siginfo_t uinfo;
A
Anthony Liguori 已提交
6594
            if (!(p = lock_user(VERIFY_READ, arg3, sizeof(target_sigset_t), 1)))
6595
                goto efault;
6596 6597
            target_to_host_siginfo(&uinfo, p);
            unlock_user(p, arg1, 0);
B
bellard 已提交
6598 6599 6600
            ret = get_errno(sys_rt_sigqueueinfo(arg1, arg2, &uinfo));
        }
        break;
6601
#ifdef TARGET_NR_sigreturn
B
bellard 已提交
6602 6603 6604 6605
    case TARGET_NR_sigreturn:
        /* NOTE: ret is eax, so not transcoding must be done */
        ret = do_sigreturn(cpu_env);
        break;
6606
#endif
B
bellard 已提交
6607 6608 6609 6610
    case TARGET_NR_rt_sigreturn:
        /* NOTE: ret is eax, so not transcoding must be done */
        ret = do_rt_sigreturn(cpu_env);
        break;
6611
    case TARGET_NR_sethostname:
6612 6613
        if (!(p = lock_user_string(arg1)))
            goto efault;
6614 6615
        ret = get_errno(sethostname(p, arg2));
        unlock_user(p, arg1, 0);
6616 6617
        break;
    case TARGET_NR_setrlimit:
B
bellard 已提交
6618
        {
6619
            int resource = target_to_host_resource(arg1);
6620
            struct target_rlimit *target_rlim;
B
bellard 已提交
6621
            struct rlimit rlim;
6622 6623
            if (!lock_user_struct(VERIFY_READ, target_rlim, arg2, 1))
                goto efault;
6624 6625
            rlim.rlim_cur = target_to_host_rlim(target_rlim->rlim_cur);
            rlim.rlim_max = target_to_host_rlim(target_rlim->rlim_max);
6626
            unlock_user_struct(target_rlim, arg2, 0);
B
bellard 已提交
6627 6628 6629
            ret = get_errno(setrlimit(resource, &rlim));
        }
        break;
6630
    case TARGET_NR_getrlimit:
B
bellard 已提交
6631
        {
6632
            int resource = target_to_host_resource(arg1);
6633
            struct target_rlimit *target_rlim;
B
bellard 已提交
6634
            struct rlimit rlim;
6635

B
bellard 已提交
6636 6637
            ret = get_errno(getrlimit(resource, &rlim));
            if (!is_error(ret)) {
6638 6639
                if (!lock_user_struct(VERIFY_WRITE, target_rlim, arg2, 0))
                    goto efault;
6640 6641
                target_rlim->rlim_cur = host_to_target_rlim(rlim.rlim_cur);
                target_rlim->rlim_max = host_to_target_rlim(rlim.rlim_max);
6642
                unlock_user_struct(target_rlim, arg2, 1);
B
bellard 已提交
6643 6644 6645
            }
        }
        break;
6646
    case TARGET_NR_getrusage:
B
bellard 已提交
6647 6648 6649 6650
        {
            struct rusage rusage;
            ret = get_errno(getrusage(arg1, &rusage));
            if (!is_error(ret)) {
6651
                ret = host_to_target_rusage(arg2, &rusage);
B
bellard 已提交
6652 6653 6654
            }
        }
        break;
6655 6656 6657 6658 6659
    case TARGET_NR_gettimeofday:
        {
            struct timeval tv;
            ret = get_errno(gettimeofday(&tv, NULL));
            if (!is_error(ret)) {
6660 6661
                if (copy_to_user_timeval(arg1, &tv))
                    goto efault;
6662 6663 6664 6665 6666
            }
        }
        break;
    case TARGET_NR_settimeofday:
        {
6667
            struct timeval tv, *ptv = NULL;
6668 6669
            struct timezone tz, *ptz = NULL;

6670 6671 6672 6673 6674 6675
            if (arg1) {
                if (copy_from_user_timeval(&tv, arg1)) {
                    goto efault;
                }
                ptv = &tv;
            }
6676 6677 6678 6679 6680 6681 6682 6683

            if (arg2) {
                if (copy_from_user_timezone(&tz, arg2)) {
                    goto efault;
                }
                ptz = &tz;
            }

6684
            ret = get_errno(settimeofday(ptv, ptz));
6685 6686
        }
        break;
6687
#if defined(TARGET_NR_select)
6688
    case TARGET_NR_select:
6689 6690 6691
#if defined(TARGET_S390X) || defined(TARGET_ALPHA)
        ret = do_select(arg1, arg2, arg3, arg4, arg5);
#else
B
bellard 已提交
6692
        {
6693
            struct target_sel_arg_struct *sel;
6694
            abi_ulong inp, outp, exp, tvp;
6695 6696
            long nsel;

6697 6698
            if (!lock_user_struct(VERIFY_READ, sel, arg1, 1))
                goto efault;
6699 6700 6701 6702 6703
            nsel = tswapal(sel->n);
            inp = tswapal(sel->inp);
            outp = tswapal(sel->outp);
            exp = tswapal(sel->exp);
            tvp = tswapal(sel->tvp);
6704 6705
            unlock_user_struct(sel, arg1, 0);
            ret = do_select(nsel, inp, outp, exp, tvp);
B
bellard 已提交
6706
        }
6707
#endif
B
bellard 已提交
6708
        break;
6709 6710 6711
#endif
#ifdef TARGET_NR_pselect6
    case TARGET_NR_pselect6:
6712 6713 6714 6715 6716 6717 6718 6719 6720 6721 6722 6723 6724 6725 6726 6727 6728 6729 6730 6731 6732 6733 6734 6735 6736 6737 6738 6739 6740 6741 6742 6743 6744 6745 6746 6747 6748 6749 6750 6751 6752 6753 6754 6755 6756 6757 6758 6759 6760 6761 6762 6763 6764 6765 6766 6767 6768 6769 6770 6771
        {
            abi_long rfd_addr, wfd_addr, efd_addr, n, ts_addr;
            fd_set rfds, wfds, efds;
            fd_set *rfds_ptr, *wfds_ptr, *efds_ptr;
            struct timespec ts, *ts_ptr;

            /*
             * The 6th arg is actually two args smashed together,
             * so we cannot use the C library.
             */
            sigset_t set;
            struct {
                sigset_t *set;
                size_t size;
            } sig, *sig_ptr;

            abi_ulong arg_sigset, arg_sigsize, *arg7;
            target_sigset_t *target_sigset;

            n = arg1;
            rfd_addr = arg2;
            wfd_addr = arg3;
            efd_addr = arg4;
            ts_addr = arg5;

            ret = copy_from_user_fdset_ptr(&rfds, &rfds_ptr, rfd_addr, n);
            if (ret) {
                goto fail;
            }
            ret = copy_from_user_fdset_ptr(&wfds, &wfds_ptr, wfd_addr, n);
            if (ret) {
                goto fail;
            }
            ret = copy_from_user_fdset_ptr(&efds, &efds_ptr, efd_addr, n);
            if (ret) {
                goto fail;
            }

            /*
             * This takes a timespec, and not a timeval, so we cannot
             * use the do_select() helper ...
             */
            if (ts_addr) {
                if (target_to_host_timespec(&ts, ts_addr)) {
                    goto efault;
                }
                ts_ptr = &ts;
            } else {
                ts_ptr = NULL;
            }

            /* Extract the two packed args for the sigset */
            if (arg6) {
                sig_ptr = &sig;
                sig.size = _NSIG / 8;

                arg7 = lock_user(VERIFY_READ, arg6, sizeof(*arg7) * 2, 1);
                if (!arg7) {
                    goto efault;
                }
6772 6773
                arg_sigset = tswapal(arg7[0]);
                arg_sigsize = tswapal(arg7[1]);
6774 6775 6776 6777
                unlock_user(arg7, arg6, 0);

                if (arg_sigset) {
                    sig.set = &set;
6778 6779 6780 6781 6782
                    if (arg_sigsize != sizeof(*target_sigset)) {
                        /* Like the kernel, we enforce correct size sigsets */
                        ret = -TARGET_EINVAL;
                        goto fail;
                    }
6783 6784 6785 6786 6787 6788 6789 6790 6791 6792 6793 6794 6795 6796 6797 6798 6799 6800 6801 6802 6803 6804 6805 6806 6807 6808 6809 6810 6811 6812
                    target_sigset = lock_user(VERIFY_READ, arg_sigset,
                                              sizeof(*target_sigset), 1);
                    if (!target_sigset) {
                        goto efault;
                    }
                    target_to_host_sigset(&set, target_sigset);
                    unlock_user(target_sigset, arg_sigset, 0);
                } else {
                    sig.set = NULL;
                }
            } else {
                sig_ptr = NULL;
            }

            ret = get_errno(sys_pselect6(n, rfds_ptr, wfds_ptr, efds_ptr,
                                         ts_ptr, sig_ptr));

            if (!is_error(ret)) {
                if (rfd_addr && copy_to_user_fdset(rfd_addr, &rfds, n))
                    goto efault;
                if (wfd_addr && copy_to_user_fdset(wfd_addr, &wfds, n))
                    goto efault;
                if (efd_addr && copy_to_user_fdset(efd_addr, &efds, n))
                    goto efault;

                if (ts_addr && host_to_target_timespec(ts_addr, &ts))
                    goto efault;
            }
        }
        break;
B
bellard 已提交
6813
#endif
6814
    case TARGET_NR_symlink:
6815 6816 6817 6818
        {
            void *p2;
            p = lock_user_string(arg1);
            p2 = lock_user_string(arg2);
6819 6820 6821 6822
            if (!p || !p2)
                ret = -TARGET_EFAULT;
            else
                ret = get_errno(symlink(p, p2));
6823 6824 6825
            unlock_user(p2, arg2, 0);
            unlock_user(p, arg1, 0);
        }
6826
        break;
6827
#if defined(TARGET_NR_symlinkat)
6828 6829
    case TARGET_NR_symlinkat:
        {
6830
            void *p2;
6831 6832
            p  = lock_user_string(arg1);
            p2 = lock_user_string(arg3);
6833
            if (!p || !p2)
6834
                ret = -TARGET_EFAULT;
6835
            else
6836
                ret = get_errno(symlinkat(p, arg2, p2));
6837 6838
            unlock_user(p2, arg3, 0);
            unlock_user(p, arg1, 0);
6839 6840 6841
        }
        break;
#endif
6842
#ifdef TARGET_NR_oldlstat
6843 6844
    case TARGET_NR_oldlstat:
        goto unimplemented;
6845
#endif
6846
    case TARGET_NR_readlink:
6847
        {
6848
            void *p2;
6849
            p = lock_user_string(arg1);
6850
            p2 = lock_user(VERIFY_WRITE, arg2, arg3, 0);
6851
            if (!p || !p2) {
6852
                ret = -TARGET_EFAULT;
6853 6854 6855
            } else if (!arg3) {
                /* Short circuit this for the magic exe check. */
                ret = -TARGET_EINVAL;
6856 6857 6858
            } else if (is_proc_myself((const char *)p, "exe")) {
                char real[PATH_MAX], *temp;
                temp = realpath(exec_path, real);
6859 6860 6861 6862 6863 6864 6865 6866 6867 6868
                /* Return value is # of bytes that we wrote to the buffer. */
                if (temp == NULL) {
                    ret = get_errno(-1);
                } else {
                    /* Don't worry about sign mismatch as earlier mapping
                     * logic would have thrown a bad address error. */
                    ret = MIN(strlen(real), arg3);
                    /* We cannot NUL terminate the string. */
                    memcpy(p2, real, ret);
                }
6869 6870
            } else {
                ret = get_errno(readlink(path(p), p2, arg3));
6871
            }
6872 6873 6874
            unlock_user(p2, arg2, ret);
            unlock_user(p, arg1, 0);
        }
6875
        break;
6876
#if defined(TARGET_NR_readlinkat)
6877 6878
    case TARGET_NR_readlinkat:
        {
6879
            void *p2;
6880
            p  = lock_user_string(arg2);
6881
            p2 = lock_user(VERIFY_WRITE, arg3, arg4, 0);
6882 6883 6884 6885 6886 6887 6888 6889
            if (!p || !p2) {
                ret = -TARGET_EFAULT;
            } else if (is_proc_myself((const char *)p, "exe")) {
                char real[PATH_MAX], *temp;
                temp = realpath(exec_path, real);
                ret = temp == NULL ? get_errno(-1) : strlen(real) ;
                snprintf((char *)p2, arg4, "%s", real);
            } else {
6890
                ret = get_errno(readlinkat(arg1, path(p), p2, arg4));
6891
            }
6892 6893
            unlock_user(p2, arg3, ret);
            unlock_user(p, arg2, 0);
6894 6895 6896
        }
        break;
#endif
6897
#ifdef TARGET_NR_uselib
6898 6899
    case TARGET_NR_uselib:
        goto unimplemented;
6900 6901
#endif
#ifdef TARGET_NR_swapon
6902
    case TARGET_NR_swapon:
6903 6904
        if (!(p = lock_user_string(arg1)))
            goto efault;
6905 6906
        ret = get_errno(swapon(p, arg2));
        unlock_user(p, arg1, 0);
6907
        break;
6908
#endif
6909
    case TARGET_NR_reboot:
L
Laurent Vivier 已提交
6910 6911 6912 6913 6914 6915 6916 6917 6918 6919 6920
        if (arg3 == LINUX_REBOOT_CMD_RESTART2) {
           /* arg4 must be ignored in all other cases */
           p = lock_user_string(arg4);
           if (!p) {
              goto efault;
           }
           ret = get_errno(reboot(arg1, arg2, arg3, p));
           unlock_user(p, arg4, 0);
        } else {
           ret = get_errno(reboot(arg1, arg2, arg3, NULL));
        }
6921
        break;
6922
#ifdef TARGET_NR_readdir
6923 6924
    case TARGET_NR_readdir:
        goto unimplemented;
6925 6926
#endif
#ifdef TARGET_NR_mmap
6927
    case TARGET_NR_mmap:
6928 6929
#if (defined(TARGET_I386) && defined(TARGET_ABI32)) || \
    (defined(TARGET_ARM) && defined(TARGET_ABI32)) || \
U
Ulrich Hecht 已提交
6930 6931
    defined(TARGET_M68K) || defined(TARGET_CRIS) || defined(TARGET_MICROBLAZE) \
    || defined(TARGET_S390X)
6932
        {
6933 6934
            abi_ulong *v;
            abi_ulong v1, v2, v3, v4, v5, v6;
6935 6936
            if (!(v = lock_user(VERIFY_READ, arg1, 6 * sizeof(abi_ulong), 1)))
                goto efault;
6937 6938 6939 6940 6941 6942
            v1 = tswapal(v[0]);
            v2 = tswapal(v[1]);
            v3 = tswapal(v[2]);
            v4 = tswapal(v[3]);
            v5 = tswapal(v[4]);
            v6 = tswapal(v[5]);
6943
            unlock_user(v, arg1, 0);
6944
            ret = get_errno(target_mmap(v1, v2, v3,
B
bellard 已提交
6945 6946
                                        target_to_host_bitmask(v4, mmap_flags_tbl),
                                        v5, v6));
6947 6948
        }
#else
6949 6950
        ret = get_errno(target_mmap(arg1, arg2, arg3,
                                    target_to_host_bitmask(arg4, mmap_flags_tbl),
B
bellard 已提交
6951 6952
                                    arg5,
                                    arg6));
6953
#endif
B
bellard 已提交
6954
        break;
6955
#endif
B
bellard 已提交
6956
#ifdef TARGET_NR_mmap2
B
bellard 已提交
6957
    case TARGET_NR_mmap2:
P
pbrook 已提交
6958
#ifndef MMAP_SHIFT
B
bellard 已提交
6959 6960
#define MMAP_SHIFT 12
#endif
6961 6962
        ret = get_errno(target_mmap(arg1, arg2, arg3,
                                    target_to_host_bitmask(arg4, mmap_flags_tbl),
B
bellard 已提交
6963
                                    arg5,
B
bellard 已提交
6964
                                    arg6 << MMAP_SHIFT));
6965
        break;
B
bellard 已提交
6966
#endif
6967
    case TARGET_NR_munmap:
B
bellard 已提交
6968
        ret = get_errno(target_munmap(arg1, arg2));
6969
        break;
B
bellard 已提交
6970
    case TARGET_NR_mprotect:
P
Paul Brook 已提交
6971
        {
6972
            TaskState *ts = cpu->opaque;
P
Paul Brook 已提交
6973 6974 6975 6976 6977 6978 6979 6980 6981
            /* Special hack to detect libc making the stack executable.  */
            if ((arg3 & PROT_GROWSDOWN)
                && arg1 >= ts->info->stack_limit
                && arg1 <= ts->info->start_stack) {
                arg3 &= ~PROT_GROWSDOWN;
                arg2 = arg2 + arg1 - ts->info->stack_limit;
                arg1 = ts->info->stack_limit;
            }
        }
B
bellard 已提交
6982
        ret = get_errno(target_mprotect(arg1, arg2, arg3));
B
bellard 已提交
6983
        break;
6984
#ifdef TARGET_NR_mremap
B
bellard 已提交
6985
    case TARGET_NR_mremap:
B
bellard 已提交
6986
        ret = get_errno(target_mremap(arg1, arg2, arg3, arg4, arg5));
B
bellard 已提交
6987
        break;
6988
#endif
6989
        /* ??? msync/mlock/munlock are broken for softmmu.  */
6990
#ifdef TARGET_NR_msync
B
bellard 已提交
6991
    case TARGET_NR_msync:
6992
        ret = get_errno(msync(g2h(arg1), arg2, arg3));
B
bellard 已提交
6993
        break;
6994 6995
#endif
#ifdef TARGET_NR_mlock
B
bellard 已提交
6996
    case TARGET_NR_mlock:
6997
        ret = get_errno(mlock(g2h(arg1), arg2));
B
bellard 已提交
6998
        break;
6999 7000
#endif
#ifdef TARGET_NR_munlock
B
bellard 已提交
7001
    case TARGET_NR_munlock:
7002
        ret = get_errno(munlock(g2h(arg1), arg2));
B
bellard 已提交
7003
        break;
7004 7005
#endif
#ifdef TARGET_NR_mlockall
B
bellard 已提交
7006
    case TARGET_NR_mlockall:
7007
        ret = get_errno(mlockall(target_to_host_mlockall_arg(arg1)));
B
bellard 已提交
7008
        break;
7009 7010
#endif
#ifdef TARGET_NR_munlockall
B
bellard 已提交
7011 7012 7013
    case TARGET_NR_munlockall:
        ret = get_errno(munlockall());
        break;
7014
#endif
7015
    case TARGET_NR_truncate:
7016 7017
        if (!(p = lock_user_string(arg1)))
            goto efault;
7018 7019
        ret = get_errno(truncate(p, arg2));
        unlock_user(p, arg1, 0);
7020 7021 7022 7023 7024 7025 7026
        break;
    case TARGET_NR_ftruncate:
        ret = get_errno(ftruncate(arg1, arg2));
        break;
    case TARGET_NR_fchmod:
        ret = get_errno(fchmod(arg1, arg2));
        break;
7027
#if defined(TARGET_NR_fchmodat)
7028
    case TARGET_NR_fchmodat:
7029 7030
        if (!(p = lock_user_string(arg2)))
            goto efault;
7031
        ret = get_errno(fchmodat(arg1, p, arg3, 0));
7032
        unlock_user(p, arg2, 0);
7033 7034
        break;
#endif
7035
    case TARGET_NR_getpriority:
7036 7037 7038 7039 7040 7041 7042 7043 7044 7045 7046 7047 7048 7049 7050
        /* Note that negative values are valid for getpriority, so we must
           differentiate based on errno settings.  */
        errno = 0;
        ret = getpriority(arg1, arg2);
        if (ret == -1 && errno != 0) {
            ret = -host_to_target_errno(errno);
            break;
        }
#ifdef TARGET_ALPHA
        /* Return value is the unbiased priority.  Signal no error.  */
        ((CPUAlphaState *)cpu_env)->ir[IR_V0] = 0;
#else
        /* Return value is a biased priority to avoid negative numbers.  */
        ret = 20 - ret;
#endif
7051 7052 7053 7054
        break;
    case TARGET_NR_setpriority:
        ret = get_errno(setpriority(arg1, arg2, arg3));
        break;
7055
#ifdef TARGET_NR_profil
7056 7057
    case TARGET_NR_profil:
        goto unimplemented;
7058
#endif
7059
    case TARGET_NR_statfs:
7060 7061
        if (!(p = lock_user_string(arg1)))
            goto efault;
7062 7063
        ret = get_errno(statfs(path(p), &stfs));
        unlock_user(p, arg1, 0);
7064 7065
    convert_statfs:
        if (!is_error(ret)) {
7066
            struct target_statfs *target_stfs;
7067

7068 7069 7070 7071 7072 7073 7074 7075 7076 7077 7078 7079
            if (!lock_user_struct(VERIFY_WRITE, target_stfs, arg2, 0))
                goto efault;
            __put_user(stfs.f_type, &target_stfs->f_type);
            __put_user(stfs.f_bsize, &target_stfs->f_bsize);
            __put_user(stfs.f_blocks, &target_stfs->f_blocks);
            __put_user(stfs.f_bfree, &target_stfs->f_bfree);
            __put_user(stfs.f_bavail, &target_stfs->f_bavail);
            __put_user(stfs.f_files, &target_stfs->f_files);
            __put_user(stfs.f_ffree, &target_stfs->f_ffree);
            __put_user(stfs.f_fsid.__val[0], &target_stfs->f_fsid.val[0]);
            __put_user(stfs.f_fsid.__val[1], &target_stfs->f_fsid.val[1]);
            __put_user(stfs.f_namelen, &target_stfs->f_namelen);
A
Alexander Graf 已提交
7080 7081
            __put_user(stfs.f_frsize, &target_stfs->f_frsize);
            memset(target_stfs->f_spare, 0, sizeof(target_stfs->f_spare));
7082
            unlock_user_struct(target_stfs, arg2, 1);
7083 7084 7085
        }
        break;
    case TARGET_NR_fstatfs:
B
bellard 已提交
7086
        ret = get_errno(fstatfs(arg1, &stfs));
7087
        goto convert_statfs;
B
bellard 已提交
7088 7089
#ifdef TARGET_NR_statfs64
    case TARGET_NR_statfs64:
7090 7091
        if (!(p = lock_user_string(arg1)))
            goto efault;
7092 7093
        ret = get_errno(statfs(path(p), &stfs));
        unlock_user(p, arg1, 0);
B
bellard 已提交
7094 7095
    convert_statfs64:
        if (!is_error(ret)) {
7096
            struct target_statfs64 *target_stfs;
7097

7098 7099 7100 7101 7102 7103 7104 7105 7106 7107 7108 7109
            if (!lock_user_struct(VERIFY_WRITE, target_stfs, arg3, 0))
                goto efault;
            __put_user(stfs.f_type, &target_stfs->f_type);
            __put_user(stfs.f_bsize, &target_stfs->f_bsize);
            __put_user(stfs.f_blocks, &target_stfs->f_blocks);
            __put_user(stfs.f_bfree, &target_stfs->f_bfree);
            __put_user(stfs.f_bavail, &target_stfs->f_bavail);
            __put_user(stfs.f_files, &target_stfs->f_files);
            __put_user(stfs.f_ffree, &target_stfs->f_ffree);
            __put_user(stfs.f_fsid.__val[0], &target_stfs->f_fsid.val[0]);
            __put_user(stfs.f_fsid.__val[1], &target_stfs->f_fsid.val[1]);
            __put_user(stfs.f_namelen, &target_stfs->f_namelen);
A
Alexander Graf 已提交
7110 7111
            __put_user(stfs.f_frsize, &target_stfs->f_frsize);
            memset(target_stfs->f_spare, 0, sizeof(target_stfs->f_spare));
7112
            unlock_user_struct(target_stfs, arg3, 1);
B
bellard 已提交
7113 7114 7115 7116 7117 7118
        }
        break;
    case TARGET_NR_fstatfs64:
        ret = get_errno(fstatfs(arg1, &stfs));
        goto convert_statfs64;
#endif
7119
#ifdef TARGET_NR_ioperm
7120 7121
    case TARGET_NR_ioperm:
        goto unimplemented;
7122
#endif
7123
#ifdef TARGET_NR_socketcall
7124
    case TARGET_NR_socketcall:
7125
        ret = do_socketcall(arg1, arg2);
7126
        break;
7127
#endif
7128 7129
#ifdef TARGET_NR_accept
    case TARGET_NR_accept:
P
Peter Maydell 已提交
7130 7131 7132 7133 7134 7135 7136 7137 7138 7139
        ret = do_accept4(arg1, arg2, arg3, 0);
        break;
#endif
#ifdef TARGET_NR_accept4
    case TARGET_NR_accept4:
#ifdef CONFIG_ACCEPT4
        ret = do_accept4(arg1, arg2, arg3, arg4);
#else
        goto unimplemented;
#endif
7140 7141 7142 7143 7144 7145 7146 7147 7148 7149 7150 7151 7152 7153
        break;
#endif
#ifdef TARGET_NR_bind
    case TARGET_NR_bind:
        ret = do_bind(arg1, arg2, arg3);
        break;
#endif
#ifdef TARGET_NR_connect
    case TARGET_NR_connect:
        ret = do_connect(arg1, arg2, arg3);
        break;
#endif
#ifdef TARGET_NR_getpeername
    case TARGET_NR_getpeername:
P
pbrook 已提交
7154
        ret = do_getpeername(arg1, arg2, arg3);
7155 7156 7157 7158
        break;
#endif
#ifdef TARGET_NR_getsockname
    case TARGET_NR_getsockname:
P
pbrook 已提交
7159
        ret = do_getsockname(arg1, arg2, arg3);
7160 7161 7162 7163 7164 7165 7166 7167 7168
        break;
#endif
#ifdef TARGET_NR_getsockopt
    case TARGET_NR_getsockopt:
        ret = do_getsockopt(arg1, arg2, arg3, arg4, arg5);
        break;
#endif
#ifdef TARGET_NR_listen
    case TARGET_NR_listen:
P
pbrook 已提交
7169
        ret = get_errno(listen(arg1, arg2));
7170 7171 7172 7173
        break;
#endif
#ifdef TARGET_NR_recv
    case TARGET_NR_recv:
P
pbrook 已提交
7174
        ret = do_recvfrom(arg1, arg2, arg3, arg4, 0, 0);
7175 7176 7177 7178
        break;
#endif
#ifdef TARGET_NR_recvfrom
    case TARGET_NR_recvfrom:
P
pbrook 已提交
7179
        ret = do_recvfrom(arg1, arg2, arg3, arg4, arg5, arg6);
7180 7181 7182 7183 7184 7185 7186 7187 7188
        break;
#endif
#ifdef TARGET_NR_recvmsg
    case TARGET_NR_recvmsg:
        ret = do_sendrecvmsg(arg1, arg2, arg3, 0);
        break;
#endif
#ifdef TARGET_NR_send
    case TARGET_NR_send:
P
pbrook 已提交
7189
        ret = do_sendto(arg1, arg2, arg3, arg4, 0, 0);
7190 7191 7192 7193 7194 7195 7196
        break;
#endif
#ifdef TARGET_NR_sendmsg
    case TARGET_NR_sendmsg:
        ret = do_sendrecvmsg(arg1, arg2, arg3, 1);
        break;
#endif
7197 7198 7199 7200 7201 7202 7203 7204
#ifdef TARGET_NR_sendmmsg
    case TARGET_NR_sendmmsg:
        ret = do_sendrecvmmsg(arg1, arg2, arg3, arg4, 1);
        break;
    case TARGET_NR_recvmmsg:
        ret = do_sendrecvmmsg(arg1, arg2, arg3, arg4, 0);
        break;
#endif
7205 7206
#ifdef TARGET_NR_sendto
    case TARGET_NR_sendto:
P
pbrook 已提交
7207
        ret = do_sendto(arg1, arg2, arg3, arg4, arg5, arg6);
7208 7209 7210 7211
        break;
#endif
#ifdef TARGET_NR_shutdown
    case TARGET_NR_shutdown:
P
pbrook 已提交
7212
        ret = get_errno(shutdown(arg1, arg2));
7213 7214 7215 7216 7217 7218 7219 7220 7221
        break;
#endif
#ifdef TARGET_NR_socket
    case TARGET_NR_socket:
        ret = do_socket(arg1, arg2, arg3);
        break;
#endif
#ifdef TARGET_NR_socketpair
    case TARGET_NR_socketpair:
P
pbrook 已提交
7222
        ret = do_socketpair(arg1, arg2, arg3, arg4);
7223 7224 7225 7226 7227 7228 7229
        break;
#endif
#ifdef TARGET_NR_setsockopt
    case TARGET_NR_setsockopt:
        ret = do_setsockopt(arg1, arg2, arg3, arg4, (socklen_t) arg5);
        break;
#endif
7230

7231
    case TARGET_NR_syslog:
7232 7233
        if (!(p = lock_user_string(arg2)))
            goto efault;
7234 7235
        ret = get_errno(sys_syslog((int)arg1, p, (int)arg3));
        unlock_user(p, arg2, 0);
7236 7237
        break;

7238
    case TARGET_NR_setitimer:
B
bellard 已提交
7239 7240 7241
        {
            struct itimerval value, ovalue, *pvalue;

7242
            if (arg2) {
B
bellard 已提交
7243
                pvalue = &value;
7244 7245 7246 7247
                if (copy_from_user_timeval(&pvalue->it_interval, arg2)
                    || copy_from_user_timeval(&pvalue->it_value,
                                              arg2 + sizeof(struct target_timeval)))
                    goto efault;
B
bellard 已提交
7248 7249 7250 7251
            } else {
                pvalue = NULL;
            }
            ret = get_errno(setitimer(arg1, pvalue, &ovalue));
7252
            if (!is_error(ret) && arg3) {
7253 7254 7255 7256 7257
                if (copy_to_user_timeval(arg3,
                                         &ovalue.it_interval)
                    || copy_to_user_timeval(arg3 + sizeof(struct target_timeval),
                                            &ovalue.it_value))
                    goto efault;
B
bellard 已提交
7258 7259 7260
            }
        }
        break;
7261
    case TARGET_NR_getitimer:
B
bellard 已提交
7262 7263
        {
            struct itimerval value;
7264

B
bellard 已提交
7265
            ret = get_errno(getitimer(arg1, &value));
7266
            if (!is_error(ret) && arg2) {
7267 7268 7269 7270 7271
                if (copy_to_user_timeval(arg2,
                                         &value.it_interval)
                    || copy_to_user_timeval(arg2 + sizeof(struct target_timeval),
                                            &value.it_value))
                    goto efault;
B
bellard 已提交
7272 7273 7274
            }
        }
        break;
7275
    case TARGET_NR_stat:
7276 7277
        if (!(p = lock_user_string(arg1)))
            goto efault;
7278 7279
        ret = get_errno(stat(path(p), &st));
        unlock_user(p, arg1, 0);
7280 7281
        goto do_stat;
    case TARGET_NR_lstat:
7282 7283
        if (!(p = lock_user_string(arg1)))
            goto efault;
7284 7285
        ret = get_errno(lstat(path(p), &st));
        unlock_user(p, arg1, 0);
7286 7287 7288 7289 7290 7291
        goto do_stat;
    case TARGET_NR_fstat:
        {
            ret = get_errno(fstat(arg1, &st));
        do_stat:
            if (!is_error(ret)) {
7292
                struct target_stat *target_st;
7293

7294 7295
                if (!lock_user_struct(VERIFY_WRITE, target_st, arg2, 0))
                    goto efault;
7296
                memset(target_st, 0, sizeof(*target_st));
B
bellard 已提交
7297 7298 7299 7300 7301 7302 7303 7304 7305 7306 7307 7308 7309
                __put_user(st.st_dev, &target_st->st_dev);
                __put_user(st.st_ino, &target_st->st_ino);
                __put_user(st.st_mode, &target_st->st_mode);
                __put_user(st.st_uid, &target_st->st_uid);
                __put_user(st.st_gid, &target_st->st_gid);
                __put_user(st.st_nlink, &target_st->st_nlink);
                __put_user(st.st_rdev, &target_st->st_rdev);
                __put_user(st.st_size, &target_st->st_size);
                __put_user(st.st_blksize, &target_st->st_blksize);
                __put_user(st.st_blocks, &target_st->st_blocks);
                __put_user(st.st_atime, &target_st->target_st_atime);
                __put_user(st.st_mtime, &target_st->target_st_mtime);
                __put_user(st.st_ctime, &target_st->target_st_ctime);
7310
                unlock_user_struct(target_st, arg2, 1);
7311 7312 7313
            }
        }
        break;
7314
#ifdef TARGET_NR_olduname
7315 7316
    case TARGET_NR_olduname:
        goto unimplemented;
7317 7318
#endif
#ifdef TARGET_NR_iopl
7319 7320
    case TARGET_NR_iopl:
        goto unimplemented;
7321
#endif
7322 7323 7324
    case TARGET_NR_vhangup:
        ret = get_errno(vhangup());
        break;
7325
#ifdef TARGET_NR_idle
7326 7327
    case TARGET_NR_idle:
        goto unimplemented;
B
bellard 已提交
7328 7329 7330
#endif
#ifdef TARGET_NR_syscall
    case TARGET_NR_syscall:
7331 7332 7333
        ret = do_syscall(cpu_env, arg1 & 0xffff, arg2, arg3, arg4, arg5,
                         arg6, arg7, arg8, 0);
        break;
7334
#endif
7335 7336 7337
    case TARGET_NR_wait4:
        {
            int status;
7338
            abi_long status_ptr = arg2;
7339
            struct rusage rusage, *rusage_ptr;
7340
            abi_ulong target_rusage = arg4;
7341
            abi_long rusage_err;
7342 7343 7344 7345 7346 7347
            if (target_rusage)
                rusage_ptr = &rusage;
            else
                rusage_ptr = NULL;
            ret = get_errno(wait4(arg1, &status, arg3, rusage_ptr));
            if (!is_error(ret)) {
7348
                if (status_ptr && ret) {
P
pbrook 已提交
7349
                    status = host_to_target_waitstatus(status);
7350 7351
                    if (put_user_s32(status, status_ptr))
                        goto efault;
7352
                }
7353 7354 7355 7356 7357 7358
                if (target_rusage) {
                    rusage_err = host_to_target_rusage(target_rusage, &rusage);
                    if (rusage_err) {
                        ret = rusage_err;
                    }
                }
7359 7360 7361
            }
        }
        break;
7362
#ifdef TARGET_NR_swapoff
7363
    case TARGET_NR_swapoff:
7364 7365
        if (!(p = lock_user_string(arg1)))
            goto efault;
7366 7367
        ret = get_errno(swapoff(p));
        unlock_user(p, arg1, 0);
7368
        break;
7369
#endif
7370
    case TARGET_NR_sysinfo:
B
bellard 已提交
7371
        {
7372
            struct target_sysinfo *target_value;
B
bellard 已提交
7373 7374
            struct sysinfo value;
            ret = get_errno(sysinfo(&value));
7375
            if (!is_error(ret) && arg1)
B
bellard 已提交
7376
            {
7377 7378
                if (!lock_user_struct(VERIFY_WRITE, target_value, arg1, 0))
                    goto efault;
B
bellard 已提交
7379 7380 7381 7382 7383 7384 7385 7386 7387 7388 7389 7390 7391 7392
                __put_user(value.uptime, &target_value->uptime);
                __put_user(value.loads[0], &target_value->loads[0]);
                __put_user(value.loads[1], &target_value->loads[1]);
                __put_user(value.loads[2], &target_value->loads[2]);
                __put_user(value.totalram, &target_value->totalram);
                __put_user(value.freeram, &target_value->freeram);
                __put_user(value.sharedram, &target_value->sharedram);
                __put_user(value.bufferram, &target_value->bufferram);
                __put_user(value.totalswap, &target_value->totalswap);
                __put_user(value.freeswap, &target_value->freeswap);
                __put_user(value.procs, &target_value->procs);
                __put_user(value.totalhigh, &target_value->totalhigh);
                __put_user(value.freehigh, &target_value->freehigh);
                __put_user(value.mem_unit, &target_value->mem_unit);
7393
                unlock_user_struct(target_value, arg1, 1);
B
bellard 已提交
7394 7395 7396
            }
        }
        break;
7397
#ifdef TARGET_NR_ipc
7398
    case TARGET_NR_ipc:
7399 7400
	ret = do_ipc(arg1, arg2, arg3, arg4, arg5, arg6);
	break;
7401
#endif
7402 7403 7404 7405 7406 7407 7408
#ifdef TARGET_NR_semget
    case TARGET_NR_semget:
        ret = get_errno(semget(arg1, arg2, arg3));
        break;
#endif
#ifdef TARGET_NR_semop
    case TARGET_NR_semop:
7409
        ret = do_semop(arg1, arg2, arg3);
7410 7411 7412 7413 7414 7415 7416
        break;
#endif
#ifdef TARGET_NR_semctl
    case TARGET_NR_semctl:
        ret = do_semctl(arg1, arg2, arg3, (union target_semun)(abi_ulong)arg4);
        break;
#endif
A
aurel32 已提交
7417 7418 7419 7420 7421 7422 7423 7424 7425 7426 7427 7428 7429 7430 7431 7432 7433 7434 7435
#ifdef TARGET_NR_msgctl
    case TARGET_NR_msgctl:
        ret = do_msgctl(arg1, arg2, arg3);
        break;
#endif
#ifdef TARGET_NR_msgget
    case TARGET_NR_msgget:
        ret = get_errno(msgget(arg1, arg2));
        break;
#endif
#ifdef TARGET_NR_msgrcv
    case TARGET_NR_msgrcv:
        ret = do_msgrcv(arg1, arg2, arg3, arg4, arg5);
        break;
#endif
#ifdef TARGET_NR_msgsnd
    case TARGET_NR_msgsnd:
        ret = do_msgsnd(arg1, arg2, arg3, arg4);
        break;
7436 7437 7438 7439 7440 7441 7442 7443 7444 7445 7446 7447 7448 7449 7450 7451 7452 7453 7454 7455
#endif
#ifdef TARGET_NR_shmget
    case TARGET_NR_shmget:
        ret = get_errno(shmget(arg1, arg2, arg3));
        break;
#endif
#ifdef TARGET_NR_shmctl
    case TARGET_NR_shmctl:
        ret = do_shmctl(arg1, arg2, arg3);
        break;
#endif
#ifdef TARGET_NR_shmat
    case TARGET_NR_shmat:
        ret = do_shmat(arg1, arg2, arg3);
        break;
#endif
#ifdef TARGET_NR_shmdt
    case TARGET_NR_shmdt:
        ret = do_shmdt(arg1);
        break;
A
aurel32 已提交
7456
#endif
7457 7458 7459 7460
    case TARGET_NR_fsync:
        ret = get_errno(fsync(arg1));
        break;
    case TARGET_NR_clone:
7461 7462 7463 7464 7465 7466 7467
        /* Linux manages to have three different orderings for its
         * arguments to clone(); the BACKWARDS and BACKWARDS2 defines
         * match the kernel's CONFIG_CLONE_* settings.
         * Microblaze is further special in that it uses a sixth
         * implicit argument to clone for the TLS pointer.
         */
#if defined(TARGET_MICROBLAZE)
7468
        ret = get_errno(do_fork(cpu_env, arg1, arg2, arg4, arg6, arg5));
7469 7470 7471
#elif defined(TARGET_CLONE_BACKWARDS)
        ret = get_errno(do_fork(cpu_env, arg1, arg2, arg3, arg4, arg5));
#elif defined(TARGET_CLONE_BACKWARDS2)
U
Ulrich Hecht 已提交
7472
        ret = get_errno(do_fork(cpu_env, arg2, arg1, arg3, arg5, arg4));
A
aurel32 已提交
7473
#else
7474
        ret = get_errno(do_fork(cpu_env, arg1, arg2, arg3, arg5, arg4));
A
aurel32 已提交
7475
#endif
B
bellard 已提交
7476
        break;
7477 7478 7479
#ifdef __NR_exit_group
        /* new thread calls */
    case TARGET_NR_exit_group:
7480
#ifdef TARGET_GPROF
A
aurel32 已提交
7481 7482
        _mcleanup();
#endif
7483
        gdb_exit(cpu_env, arg1);
7484 7485 7486
        ret = get_errno(exit_group(arg1));
        break;
#endif
7487
    case TARGET_NR_setdomainname:
7488 7489
        if (!(p = lock_user_string(arg1)))
            goto efault;
7490 7491
        ret = get_errno(setdomainname(p, arg2));
        unlock_user(p, arg1, 0);
7492 7493 7494
        break;
    case TARGET_NR_uname:
        /* no need to transcode because we use the linux syscall */
B
bellard 已提交
7495 7496
        {
            struct new_utsname * buf;
7497

7498 7499
            if (!lock_user_struct(VERIFY_WRITE, buf, arg1, 0))
                goto efault;
B
bellard 已提交
7500 7501 7502 7503
            ret = get_errno(sys_uname(buf));
            if (!is_error(ret)) {
                /* Overrite the native machine name with whatever is being
                   emulated. */
7504
                strcpy (buf->machine, cpu_to_uname_machine(cpu_env));
7505 7506 7507
                /* Allow the user to override the reported release.  */
                if (qemu_uname_release && *qemu_uname_release)
                  strcpy (buf->release, qemu_uname_release);
B
bellard 已提交
7508
            }
7509
            unlock_user_struct(buf, arg1, 1);
B
bellard 已提交
7510
        }
7511
        break;
B
bellard 已提交
7512
#ifdef TARGET_I386
7513
    case TARGET_NR_modify_ldt:
7514
        ret = do_modify_ldt(cpu_env, arg1, arg2, arg3);
B
bellard 已提交
7515
        break;
7516
#if !defined(TARGET_X86_64)
B
bellard 已提交
7517 7518 7519
    case TARGET_NR_vm86old:
        goto unimplemented;
    case TARGET_NR_vm86:
7520
        ret = do_vm86(cpu_env, arg1, arg2);
B
bellard 已提交
7521
        break;
7522
#endif
B
bellard 已提交
7523
#endif
7524 7525
    case TARGET_NR_adjtimex:
        goto unimplemented;
7526
#ifdef TARGET_NR_create_module
7527
    case TARGET_NR_create_module:
7528
#endif
7529 7530
    case TARGET_NR_init_module:
    case TARGET_NR_delete_module:
7531
#ifdef TARGET_NR_get_kernel_syms
7532
    case TARGET_NR_get_kernel_syms:
7533
#endif
7534 7535 7536 7537 7538 7539 7540 7541 7542
        goto unimplemented;
    case TARGET_NR_quotactl:
        goto unimplemented;
    case TARGET_NR_getpgid:
        ret = get_errno(getpgid(arg1));
        break;
    case TARGET_NR_fchdir:
        ret = get_errno(fchdir(arg1));
        break;
7543
#ifdef TARGET_NR_bdflush /* not on x86_64 */
7544 7545
    case TARGET_NR_bdflush:
        goto unimplemented;
7546
#endif
7547
#ifdef TARGET_NR_sysfs
7548 7549
    case TARGET_NR_sysfs:
        goto unimplemented;
7550
#endif
7551
    case TARGET_NR_personality:
B
bellard 已提交
7552
        ret = get_errno(personality(arg1));
7553
        break;
7554
#ifdef TARGET_NR_afs_syscall
7555 7556
    case TARGET_NR_afs_syscall:
        goto unimplemented;
7557
#endif
7558
#ifdef TARGET_NR__llseek /* Not on alpha */
7559 7560
    case TARGET_NR__llseek:
        {
7561
            int64_t res;
R
Richard Henderson 已提交
7562
#if !defined(__NR_llseek)
7563 7564 7565 7566 7567 7568
            res = lseek(arg1, ((uint64_t)arg2 << 32) | arg3, arg5);
            if (res == -1) {
                ret = get_errno(res);
            } else {
                ret = 0;
            }
B
bellard 已提交
7569
#else
7570
            ret = get_errno(_llseek(arg1, arg2, arg3, &res, arg5));
B
bellard 已提交
7571
#endif
7572 7573 7574
            if ((ret == 0) && put_user_s64(res, arg4)) {
                goto efault;
            }
7575 7576
        }
        break;
7577
#endif
7578
    case TARGET_NR_getdents:
7579
#ifdef __NR_getdents
7580
#if TARGET_ABI_BITS == 32 && HOST_LONG_BITS == 64
B
bellard 已提交
7581
        {
7582
            struct target_dirent *target_dirp;
A
aurel32 已提交
7583
            struct linux_dirent *dirp;
7584
            abi_long count = arg3;
B
bellard 已提交
7585 7586

	    dirp = malloc(count);
7587
	    if (!dirp) {
7588
                ret = -TARGET_ENOMEM;
7589 7590
                goto fail;
            }
7591

B
bellard 已提交
7592 7593
            ret = get_errno(sys_getdents(arg1, dirp, count));
            if (!is_error(ret)) {
A
aurel32 已提交
7594
                struct linux_dirent *de;
B
bellard 已提交
7595 7596 7597 7598 7599 7600 7601
		struct target_dirent *tde;
                int len = ret;
                int reclen, treclen;
		int count1, tnamelen;

		count1 = 0;
                de = dirp;
7602 7603
                if (!(target_dirp = lock_user(VERIFY_WRITE, arg2, count, 0)))
                    goto efault;
B
bellard 已提交
7604 7605 7606
		tde = target_dirp;
                while (len > 0) {
                    reclen = de->d_reclen;
7607 7608 7609 7610
                    tnamelen = reclen - offsetof(struct linux_dirent, d_name);
                    assert(tnamelen >= 0);
                    treclen = tnamelen + offsetof(struct target_dirent, d_name);
                    assert(count1 + treclen <= count);
B
bellard 已提交
7611
                    tde->d_reclen = tswap16(treclen);
7612 7613
                    tde->d_ino = tswapal(de->d_ino);
                    tde->d_off = tswapal(de->d_off);
7614
                    memcpy(tde->d_name, de->d_name, tnamelen);
A
aurel32 已提交
7615
                    de = (struct linux_dirent *)((char *)de + reclen);
B
bellard 已提交
7616
                    len -= reclen;
J
j_mayer 已提交
7617
                    tde = (struct target_dirent *)((char *)tde + treclen);
B
bellard 已提交
7618 7619 7620
		    count1 += treclen;
                }
		ret = count1;
7621
                unlock_user(target_dirp, arg2, ret);
B
bellard 已提交
7622 7623 7624 7625
            }
	    free(dirp);
        }
#else
7626
        {
A
aurel32 已提交
7627
            struct linux_dirent *dirp;
7628
            abi_long count = arg3;
B
bellard 已提交
7629

7630 7631
            if (!(dirp = lock_user(VERIFY_WRITE, arg2, count, 0)))
                goto efault;
B
bellard 已提交
7632
            ret = get_errno(sys_getdents(arg1, dirp, count));
7633
            if (!is_error(ret)) {
A
aurel32 已提交
7634
                struct linux_dirent *de;
7635 7636 7637 7638
                int len = ret;
                int reclen;
                de = dirp;
                while (len > 0) {
B
bellard 已提交
7639
                    reclen = de->d_reclen;
7640 7641
                    if (reclen > len)
                        break;
B
bellard 已提交
7642
                    de->d_reclen = tswap16(reclen);
7643 7644
                    tswapls(&de->d_ino);
                    tswapls(&de->d_off);
A
aurel32 已提交
7645
                    de = (struct linux_dirent *)((char *)de + reclen);
7646 7647 7648
                    len -= reclen;
                }
            }
7649
            unlock_user(dirp, arg2, ret);
7650 7651 7652 7653 7654 7655 7656 7657 7658 7659 7660 7661 7662 7663 7664 7665 7666 7667 7668 7669 7670 7671 7672 7673 7674 7675 7676 7677 7678 7679 7680 7681 7682 7683 7684 7685 7686 7687 7688 7689 7690 7691 7692 7693 7694 7695 7696 7697 7698 7699 7700 7701 7702 7703 7704
        }
#endif
#else
        /* Implement getdents in terms of getdents64 */
        {
            struct linux_dirent64 *dirp;
            abi_long count = arg3;

            dirp = lock_user(VERIFY_WRITE, arg2, count, 0);
            if (!dirp) {
                goto efault;
            }
            ret = get_errno(sys_getdents64(arg1, dirp, count));
            if (!is_error(ret)) {
                /* Convert the dirent64 structs to target dirent.  We do this
                 * in-place, since we can guarantee that a target_dirent is no
                 * larger than a dirent64; however this means we have to be
                 * careful to read everything before writing in the new format.
                 */
                struct linux_dirent64 *de;
                struct target_dirent *tde;
                int len = ret;
                int tlen = 0;

                de = dirp;
                tde = (struct target_dirent *)dirp;
                while (len > 0) {
                    int namelen, treclen;
                    int reclen = de->d_reclen;
                    uint64_t ino = de->d_ino;
                    int64_t off = de->d_off;
                    uint8_t type = de->d_type;

                    namelen = strlen(de->d_name);
                    treclen = offsetof(struct target_dirent, d_name)
                        + namelen + 2;
                    treclen = QEMU_ALIGN_UP(treclen, sizeof(abi_long));

                    memmove(tde->d_name, de->d_name, namelen + 1);
                    tde->d_ino = tswapal(ino);
                    tde->d_off = tswapal(off);
                    tde->d_reclen = tswap16(treclen);
                    /* The target_dirent type is in what was formerly a padding
                     * byte at the end of the structure:
                     */
                    *(((char *)tde) + treclen - 1) = type;

                    de = (struct linux_dirent64 *)((char *)de + reclen);
                    tde = (struct target_dirent *)((char *)tde + treclen);
                    len -= reclen;
                    tlen += treclen;
                }
                ret = tlen;
            }
            unlock_user(dirp, arg2, ret);
7705
        }
B
bellard 已提交
7706
#endif
7707
        break;
T
ths 已提交
7708
#if defined(TARGET_NR_getdents64) && defined(__NR_getdents64)
B
bellard 已提交
7709 7710
    case TARGET_NR_getdents64:
        {
A
aurel32 已提交
7711
            struct linux_dirent64 *dirp;
7712
            abi_long count = arg3;
7713 7714
            if (!(dirp = lock_user(VERIFY_WRITE, arg2, count, 0)))
                goto efault;
B
bellard 已提交
7715 7716
            ret = get_errno(sys_getdents64(arg1, dirp, count));
            if (!is_error(ret)) {
A
aurel32 已提交
7717
                struct linux_dirent64 *de;
B
bellard 已提交
7718 7719 7720 7721
                int len = ret;
                int reclen;
                de = dirp;
                while (len > 0) {
B
bellard 已提交
7722
                    reclen = de->d_reclen;
B
bellard 已提交
7723 7724
                    if (reclen > len)
                        break;
B
bellard 已提交
7725
                    de->d_reclen = tswap16(reclen);
B
bellard 已提交
7726 7727
                    tswap64s((uint64_t *)&de->d_ino);
                    tswap64s((uint64_t *)&de->d_off);
A
aurel32 已提交
7728
                    de = (struct linux_dirent64 *)((char *)de + reclen);
B
bellard 已提交
7729 7730 7731
                    len -= reclen;
                }
            }
7732
            unlock_user(dirp, arg2, ret);
B
bellard 已提交
7733 7734
        }
        break;
7735
#endif /* TARGET_NR_getdents64 */
7736
#if defined(TARGET_NR__newselect)
7737
    case TARGET_NR__newselect:
7738
        ret = do_select(arg1, arg2, arg3, arg4, arg5);
7739
        break;
7740
#endif
7741 7742
#if defined(TARGET_NR_poll) || defined(TARGET_NR_ppoll)
# ifdef TARGET_NR_poll
B
bellard 已提交
7743
    case TARGET_NR_poll:
7744 7745 7746 7747
# endif
# ifdef TARGET_NR_ppoll
    case TARGET_NR_ppoll:
# endif
B
bellard 已提交
7748
        {
7749
            struct target_pollfd *target_pfd;
B
bellard 已提交
7750 7751 7752
            unsigned int nfds = arg2;
            int timeout = arg3;
            struct pollfd *pfd;
B
bellard 已提交
7753
            unsigned int i;
B
bellard 已提交
7754

7755 7756 7757
            target_pfd = lock_user(VERIFY_WRITE, arg1, sizeof(struct target_pollfd) * nfds, 1);
            if (!target_pfd)
                goto efault;
7758

B
bellard 已提交
7759 7760
            pfd = alloca(sizeof(struct pollfd) * nfds);
            for(i = 0; i < nfds; i++) {
B
bellard 已提交
7761 7762
                pfd[i].fd = tswap32(target_pfd[i].fd);
                pfd[i].events = tswap16(target_pfd[i].events);
B
bellard 已提交
7763
            }
7764 7765 7766 7767 7768 7769 7770 7771 7772 7773 7774 7775 7776 7777 7778 7779 7780 7781 7782 7783 7784 7785 7786 7787 7788 7789 7790 7791 7792 7793 7794 7795 7796 7797 7798 7799 7800 7801 7802

# ifdef TARGET_NR_ppoll
            if (num == TARGET_NR_ppoll) {
                struct timespec _timeout_ts, *timeout_ts = &_timeout_ts;
                target_sigset_t *target_set;
                sigset_t _set, *set = &_set;

                if (arg3) {
                    if (target_to_host_timespec(timeout_ts, arg3)) {
                        unlock_user(target_pfd, arg1, 0);
                        goto efault;
                    }
                } else {
                    timeout_ts = NULL;
                }

                if (arg4) {
                    target_set = lock_user(VERIFY_READ, arg4, sizeof(target_sigset_t), 1);
                    if (!target_set) {
                        unlock_user(target_pfd, arg1, 0);
                        goto efault;
                    }
                    target_to_host_sigset(set, target_set);
                } else {
                    set = NULL;
                }

                ret = get_errno(sys_ppoll(pfd, nfds, timeout_ts, set, _NSIG/8));

                if (!is_error(ret) && arg3) {
                    host_to_target_timespec(arg3, timeout_ts);
                }
                if (arg4) {
                    unlock_user(target_set, arg4, 0);
                }
            } else
# endif
                ret = get_errno(poll(pfd, nfds, timeout));

B
bellard 已提交
7803 7804
            if (!is_error(ret)) {
                for(i = 0; i < nfds; i++) {
B
bellard 已提交
7805
                    target_pfd[i].revents = tswap16(pfd[i].revents);
B
bellard 已提交
7806 7807
                }
            }
7808
            unlock_user(target_pfd, arg1, sizeof(struct target_pollfd) * nfds);
B
bellard 已提交
7809 7810
        }
        break;
7811
#endif
7812
    case TARGET_NR_flock:
B
bellard 已提交
7813 7814 7815
        /* NOTE: the flock constant seems to be the same for every
           Linux platform */
        ret = get_errno(flock(arg1, arg2));
7816 7817 7818
        break;
    case TARGET_NR_readv:
        {
7819 7820 7821 7822 7823 7824 7825
            struct iovec *vec = lock_iovec(VERIFY_WRITE, arg2, arg3, 0);
            if (vec != NULL) {
                ret = get_errno(readv(arg1, vec, arg3));
                unlock_iovec(vec, arg2, arg3, 1);
            } else {
                ret = -host_to_target_errno(errno);
            }
7826 7827 7828 7829
        }
        break;
    case TARGET_NR_writev:
        {
7830 7831 7832 7833 7834 7835 7836
            struct iovec *vec = lock_iovec(VERIFY_READ, arg2, arg3, 1);
            if (vec != NULL) {
                ret = get_errno(writev(arg1, vec, arg3));
                unlock_iovec(vec, arg2, arg3, 0);
            } else {
                ret = -host_to_target_errno(errno);
            }
7837 7838 7839 7840 7841
        }
        break;
    case TARGET_NR_getsid:
        ret = get_errno(getsid(arg1));
        break;
7842
#if defined(TARGET_NR_fdatasync) /* Not on alpha (osf_datasync ?) */
7843
    case TARGET_NR_fdatasync:
B
bellard 已提交
7844 7845
        ret = get_errno(fdatasync(arg1));
        break;
7846
#endif
7847
    case TARGET_NR__sysctl:
7848
        /* We don't implement this, but ENOTDIR is always a safe
B
bellard 已提交
7849
           return value. */
7850 7851
        ret = -TARGET_ENOTDIR;
        break;
7852 7853 7854 7855 7856 7857 7858 7859 7860 7861 7862 7863 7864 7865 7866 7867 7868 7869 7870
    case TARGET_NR_sched_getaffinity:
        {
            unsigned int mask_size;
            unsigned long *mask;

            /*
             * sched_getaffinity needs multiples of ulong, so need to take
             * care of mismatches between target ulong and host ulong sizes.
             */
            if (arg2 & (sizeof(abi_ulong) - 1)) {
                ret = -TARGET_EINVAL;
                break;
            }
            mask_size = (arg2 + (sizeof(*mask) - 1)) & ~(sizeof(*mask) - 1);

            mask = alloca(mask_size);
            ret = get_errno(sys_sched_getaffinity(arg1, mask_size, mask));

            if (!is_error(ret)) {
7871 7872 7873 7874 7875 7876 7877 7878 7879 7880 7881 7882 7883 7884 7885 7886
                if (ret > arg2) {
                    /* More data returned than the caller's buffer will fit.
                     * This only happens if sizeof(abi_long) < sizeof(long)
                     * and the caller passed us a buffer holding an odd number
                     * of abi_longs. If the host kernel is actually using the
                     * extra 4 bytes then fail EINVAL; otherwise we can just
                     * ignore them and only copy the interesting part.
                     */
                    int numcpus = sysconf(_SC_NPROCESSORS_CONF);
                    if (numcpus > arg2 * 8) {
                        ret = -TARGET_EINVAL;
                        break;
                    }
                    ret = arg2;
                }

7887
                if (copy_to_user(arg3, mask, ret)) {
7888 7889 7890 7891 7892 7893 7894 7895 7896 7897 7898 7899 7900 7901 7902 7903 7904 7905 7906 7907 7908 7909 7910 7911 7912 7913 7914 7915 7916 7917
                    goto efault;
                }
            }
        }
        break;
    case TARGET_NR_sched_setaffinity:
        {
            unsigned int mask_size;
            unsigned long *mask;

            /*
             * sched_setaffinity needs multiples of ulong, so need to take
             * care of mismatches between target ulong and host ulong sizes.
             */
            if (arg2 & (sizeof(abi_ulong) - 1)) {
                ret = -TARGET_EINVAL;
                break;
            }
            mask_size = (arg2 + (sizeof(*mask) - 1)) & ~(sizeof(*mask) - 1);

            mask = alloca(mask_size);
            if (!lock_user_struct(VERIFY_READ, p, arg3, 1)) {
                goto efault;
            }
            memcpy(mask, p, arg2);
            unlock_user_struct(p, arg2, 0);

            ret = get_errno(sys_sched_setaffinity(arg1, mask_size, mask));
        }
        break;
7918
    case TARGET_NR_sched_setparam:
B
bellard 已提交
7919
        {
7920
            struct sched_param *target_schp;
B
bellard 已提交
7921
            struct sched_param schp;
7922

7923 7924 7925
            if (arg2 == 0) {
                return -TARGET_EINVAL;
            }
7926 7927
            if (!lock_user_struct(VERIFY_READ, target_schp, arg2, 1))
                goto efault;
B
bellard 已提交
7928
            schp.sched_priority = tswap32(target_schp->sched_priority);
7929
            unlock_user_struct(target_schp, arg2, 0);
B
bellard 已提交
7930 7931 7932
            ret = get_errno(sched_setparam(arg1, &schp));
        }
        break;
7933
    case TARGET_NR_sched_getparam:
B
bellard 已提交
7934
        {
7935
            struct sched_param *target_schp;
B
bellard 已提交
7936
            struct sched_param schp;
7937 7938 7939 7940

            if (arg2 == 0) {
                return -TARGET_EINVAL;
            }
B
bellard 已提交
7941 7942
            ret = get_errno(sched_getparam(arg1, &schp));
            if (!is_error(ret)) {
7943 7944
                if (!lock_user_struct(VERIFY_WRITE, target_schp, arg2, 0))
                    goto efault;
B
bellard 已提交
7945
                target_schp->sched_priority = tswap32(schp.sched_priority);
7946
                unlock_user_struct(target_schp, arg2, 1);
B
bellard 已提交
7947 7948 7949
            }
        }
        break;
7950
    case TARGET_NR_sched_setscheduler:
B
bellard 已提交
7951
        {
7952
            struct sched_param *target_schp;
B
bellard 已提交
7953
            struct sched_param schp;
7954 7955 7956
            if (arg3 == 0) {
                return -TARGET_EINVAL;
            }
7957 7958
            if (!lock_user_struct(VERIFY_READ, target_schp, arg3, 1))
                goto efault;
B
bellard 已提交
7959
            schp.sched_priority = tswap32(target_schp->sched_priority);
7960
            unlock_user_struct(target_schp, arg3, 0);
B
bellard 已提交
7961 7962 7963
            ret = get_errno(sched_setscheduler(arg1, arg2, &schp));
        }
        break;
7964
    case TARGET_NR_sched_getscheduler:
B
bellard 已提交
7965 7966
        ret = get_errno(sched_getscheduler(arg1));
        break;
7967 7968 7969 7970
    case TARGET_NR_sched_yield:
        ret = get_errno(sched_yield());
        break;
    case TARGET_NR_sched_get_priority_max:
B
bellard 已提交
7971 7972
        ret = get_errno(sched_get_priority_max(arg1));
        break;
7973
    case TARGET_NR_sched_get_priority_min:
B
bellard 已提交
7974 7975
        ret = get_errno(sched_get_priority_min(arg1));
        break;
7976
    case TARGET_NR_sched_rr_get_interval:
B
bellard 已提交
7977 7978 7979 7980
        {
            struct timespec ts;
            ret = get_errno(sched_rr_get_interval(arg1, &ts));
            if (!is_error(ret)) {
7981
                ret = host_to_target_timespec(arg2, &ts);
B
bellard 已提交
7982 7983 7984
            }
        }
        break;
7985
    case TARGET_NR_nanosleep:
B
bellard 已提交
7986 7987
        {
            struct timespec req, rem;
7988
            target_to_host_timespec(&req, arg1);
B
bellard 已提交
7989
            ret = get_errno(nanosleep(&req, &rem));
7990 7991
            if (is_error(ret) && arg2) {
                host_to_target_timespec(arg2, &rem);
B
bellard 已提交
7992 7993 7994
            }
        }
        break;
7995
#ifdef TARGET_NR_query_module
7996
    case TARGET_NR_query_module:
B
bellard 已提交
7997
        goto unimplemented;
7998 7999
#endif
#ifdef TARGET_NR_nfsservctl
8000
    case TARGET_NR_nfsservctl:
B
bellard 已提交
8001
        goto unimplemented;
8002
#endif
8003
    case TARGET_NR_prctl:
8004 8005 8006 8007 8008 8009 8010 8011
        switch (arg1) {
        case PR_GET_PDEATHSIG:
        {
            int deathsig;
            ret = get_errno(prctl(arg1, &deathsig, arg3, arg4, arg5));
            if (!is_error(ret) && arg2
                && put_user_ual(deathsig, arg2)) {
                goto efault;
8012
            }
8013 8014
            break;
        }
8015 8016 8017 8018 8019 8020 8021 8022 8023 8024 8025 8026 8027 8028 8029 8030 8031 8032 8033 8034 8035 8036 8037 8038
#ifdef PR_GET_NAME
        case PR_GET_NAME:
        {
            void *name = lock_user(VERIFY_WRITE, arg2, 16, 1);
            if (!name) {
                goto efault;
            }
            ret = get_errno(prctl(arg1, (unsigned long)name,
                                  arg3, arg4, arg5));
            unlock_user(name, arg2, 16);
            break;
        }
        case PR_SET_NAME:
        {
            void *name = lock_user(VERIFY_READ, arg2, 16, 1);
            if (!name) {
                goto efault;
            }
            ret = get_errno(prctl(arg1, (unsigned long)name,
                                  arg3, arg4, arg5));
            unlock_user(name, arg2, 0);
            break;
        }
#endif
8039 8040 8041 8042 8043
        default:
            /* Most prctl options have no pointer arguments */
            ret = get_errno(prctl(arg1, arg2, arg3, arg4, arg5));
            break;
        }
8044
        break;
B
bellard 已提交
8045 8046 8047 8048 8049 8050 8051 8052 8053
#ifdef TARGET_NR_arch_prctl
    case TARGET_NR_arch_prctl:
#if defined(TARGET_I386) && !defined(TARGET_ABI32)
        ret = do_arch_prctl(cpu_env, arg1, arg2);
        break;
#else
        goto unimplemented;
#endif
#endif
A
aurel32 已提交
8054 8055
#ifdef TARGET_NR_pread64
    case TARGET_NR_pread64:
8056 8057 8058 8059
        if (regpairs_aligned(cpu_env)) {
            arg4 = arg5;
            arg5 = arg6;
        }
A
aurel32 已提交
8060 8061 8062 8063 8064 8065
        if (!(p = lock_user(VERIFY_WRITE, arg2, arg3, 0)))
            goto efault;
        ret = get_errno(pread64(arg1, p, arg3, target_offset64(arg4, arg5)));
        unlock_user(p, arg2, ret);
        break;
    case TARGET_NR_pwrite64:
8066 8067 8068 8069
        if (regpairs_aligned(cpu_env)) {
            arg4 = arg5;
            arg5 = arg6;
        }
A
aurel32 已提交
8070 8071 8072 8073 8074
        if (!(p = lock_user(VERIFY_READ, arg2, arg3, 1)))
            goto efault;
        ret = get_errno(pwrite64(arg1, p, arg3, target_offset64(arg4, arg5)));
        unlock_user(p, arg2, 0);
        break;
8075
#endif
8076
    case TARGET_NR_getcwd:
8077 8078
        if (!(p = lock_user(VERIFY_WRITE, arg1, arg2, 0)))
            goto efault;
8079 8080
        ret = get_errno(sys_getcwd1(p, arg2));
        unlock_user(p, arg1, ret);
8081 8082 8083
        break;
    case TARGET_NR_capget:
    case TARGET_NR_capset:
8084 8085 8086 8087 8088 8089 8090 8091 8092 8093 8094 8095 8096 8097 8098
    {
        struct target_user_cap_header *target_header;
        struct target_user_cap_data *target_data = NULL;
        struct __user_cap_header_struct header;
        struct __user_cap_data_struct data[2];
        struct __user_cap_data_struct *dataptr = NULL;
        int i, target_datalen;
        int data_items = 1;

        if (!lock_user_struct(VERIFY_WRITE, target_header, arg1, 1)) {
            goto efault;
        }
        header.version = tswap32(target_header->version);
        header.pid = tswap32(target_header->pid);

8099
        if (header.version != _LINUX_CAPABILITY_VERSION) {
8100 8101 8102 8103 8104 8105 8106 8107 8108 8109 8110 8111 8112 8113 8114 8115 8116 8117 8118 8119 8120 8121 8122 8123 8124 8125 8126 8127 8128 8129 8130 8131 8132 8133 8134 8135 8136 8137 8138 8139 8140 8141 8142 8143 8144 8145 8146 8147 8148 8149 8150 8151
            /* Version 2 and up takes pointer to two user_data structs */
            data_items = 2;
        }

        target_datalen = sizeof(*target_data) * data_items;

        if (arg2) {
            if (num == TARGET_NR_capget) {
                target_data = lock_user(VERIFY_WRITE, arg2, target_datalen, 0);
            } else {
                target_data = lock_user(VERIFY_READ, arg2, target_datalen, 1);
            }
            if (!target_data) {
                unlock_user_struct(target_header, arg1, 0);
                goto efault;
            }

            if (num == TARGET_NR_capset) {
                for (i = 0; i < data_items; i++) {
                    data[i].effective = tswap32(target_data[i].effective);
                    data[i].permitted = tswap32(target_data[i].permitted);
                    data[i].inheritable = tswap32(target_data[i].inheritable);
                }
            }

            dataptr = data;
        }

        if (num == TARGET_NR_capget) {
            ret = get_errno(capget(&header, dataptr));
        } else {
            ret = get_errno(capset(&header, dataptr));
        }

        /* The kernel always updates version for both capget and capset */
        target_header->version = tswap32(header.version);
        unlock_user_struct(target_header, arg1, 1);

        if (arg2) {
            if (num == TARGET_NR_capget) {
                for (i = 0; i < data_items; i++) {
                    target_data[i].effective = tswap32(data[i].effective);
                    target_data[i].permitted = tswap32(data[i].permitted);
                    target_data[i].inheritable = tswap32(data[i].inheritable);
                }
                unlock_user(target_data, arg2, target_datalen);
            } else {
                unlock_user(target_data, arg2, 0);
            }
        }
        break;
    }
8152
    case TARGET_NR_sigaltstack:
8153
#if defined(TARGET_I386) || defined(TARGET_ARM) || defined(TARGET_MIPS) || \
8154
    defined(TARGET_SPARC) || defined(TARGET_PPC) || defined(TARGET_ALPHA) || \
J
Jia Liu 已提交
8155
    defined(TARGET_M68K) || defined(TARGET_S390X) || defined(TARGET_OPENRISC)
8156
        ret = do_sigaltstack(arg1, arg2, get_sp_from_cpustate((CPUArchState *)cpu_env));
8157 8158
        break;
#else
B
bellard 已提交
8159
        goto unimplemented;
8160
#endif
8161 8162 8163 8164 8165 8166 8167 8168 8169 8170 8171 8172 8173 8174 8175 8176 8177 8178 8179 8180 8181 8182 8183 8184 8185 8186 8187 8188 8189 8190 8191 8192 8193 8194 8195 8196 8197 8198 8199 8200 8201 8202 8203 8204 8205

#ifdef CONFIG_SENDFILE
    case TARGET_NR_sendfile:
    {
        off_t *offp = NULL;
        off_t off;
        if (arg3) {
            ret = get_user_sal(off, arg3);
            if (is_error(ret)) {
                break;
            }
            offp = &off;
        }
        ret = get_errno(sendfile(arg1, arg2, offp, arg4));
        if (!is_error(ret) && arg3) {
            abi_long ret2 = put_user_sal(off, arg3);
            if (is_error(ret2)) {
                ret = ret2;
            }
        }
        break;
    }
#ifdef TARGET_NR_sendfile64
    case TARGET_NR_sendfile64:
    {
        off_t *offp = NULL;
        off_t off;
        if (arg3) {
            ret = get_user_s64(off, arg3);
            if (is_error(ret)) {
                break;
            }
            offp = &off;
        }
        ret = get_errno(sendfile(arg1, arg2, offp, arg4));
        if (!is_error(ret) && arg3) {
            abi_long ret2 = put_user_s64(off, arg3);
            if (is_error(ret2)) {
                ret = ret2;
            }
        }
        break;
    }
#endif
#else
8206
    case TARGET_NR_sendfile:
8207
#ifdef TARGET_NR_sendfile64
8208 8209
    case TARGET_NR_sendfile64:
#endif
B
bellard 已提交
8210
        goto unimplemented;
8211 8212
#endif

8213
#ifdef TARGET_NR_getpmsg
8214
    case TARGET_NR_getpmsg:
B
bellard 已提交
8215
        goto unimplemented;
8216 8217
#endif
#ifdef TARGET_NR_putpmsg
8218
    case TARGET_NR_putpmsg:
B
bellard 已提交
8219
        goto unimplemented;
8220
#endif
B
bellard 已提交
8221
#ifdef TARGET_NR_vfork
8222
    case TARGET_NR_vfork:
P
pbrook 已提交
8223 8224
        ret = get_errno(do_fork(cpu_env, CLONE_VFORK | CLONE_VM | SIGCHLD,
                        0, 0, 0, 0));
8225
        break;
B
bellard 已提交
8226
#endif
8227
#ifdef TARGET_NR_ugetrlimit
8228
    case TARGET_NR_ugetrlimit:
B
bellard 已提交
8229 8230
    {
	struct rlimit rlim;
8231 8232
	int resource = target_to_host_resource(arg1);
	ret = get_errno(getrlimit(resource, &rlim));
B
bellard 已提交
8233
	if (!is_error(ret)) {
8234
	    struct target_rlimit *target_rlim;
8235 8236
            if (!lock_user_struct(VERIFY_WRITE, target_rlim, arg2, 0))
                goto efault;
8237 8238
	    target_rlim->rlim_cur = host_to_target_rlim(rlim.rlim_cur);
	    target_rlim->rlim_max = host_to_target_rlim(rlim.rlim_max);
8239
            unlock_user_struct(target_rlim, arg2, 1);
B
bellard 已提交
8240 8241 8242
	}
	break;
    }
8243
#endif
B
bellard 已提交
8244
#ifdef TARGET_NR_truncate64
8245
    case TARGET_NR_truncate64:
8246 8247
        if (!(p = lock_user_string(arg1)))
            goto efault;
8248 8249
	ret = target_truncate64(cpu_env, p, arg2, arg3, arg4);
        unlock_user(p, arg1, 0);
B
bellard 已提交
8250
	break;
B
bellard 已提交
8251 8252
#endif
#ifdef TARGET_NR_ftruncate64
8253
    case TARGET_NR_ftruncate64:
P
pbrook 已提交
8254
	ret = target_ftruncate64(cpu_env, arg1, arg2, arg3, arg4);
B
bellard 已提交
8255
	break;
B
bellard 已提交
8256 8257
#endif
#ifdef TARGET_NR_stat64
8258
    case TARGET_NR_stat64:
8259 8260
        if (!(p = lock_user_string(arg1)))
            goto efault;
8261 8262
        ret = get_errno(stat(path(p), &st));
        unlock_user(p, arg1, 0);
8263 8264 8265
        if (!is_error(ret))
            ret = host_to_target_stat64(cpu_env, arg2, &st);
        break;
B
bellard 已提交
8266 8267
#endif
#ifdef TARGET_NR_lstat64
8268
    case TARGET_NR_lstat64:
8269 8270
        if (!(p = lock_user_string(arg1)))
            goto efault;
8271 8272
        ret = get_errno(lstat(path(p), &st));
        unlock_user(p, arg1, 0);
8273 8274 8275
        if (!is_error(ret))
            ret = host_to_target_stat64(cpu_env, arg2, &st);
        break;
B
bellard 已提交
8276 8277
#endif
#ifdef TARGET_NR_fstat64
8278
    case TARGET_NR_fstat64:
8279 8280 8281 8282
        ret = get_errno(fstat(arg1, &st));
        if (!is_error(ret))
            ret = host_to_target_stat64(cpu_env, arg2, &st);
        break;
P
pbrook 已提交
8283
#endif
8284
#if (defined(TARGET_NR_fstatat64) || defined(TARGET_NR_newfstatat))
8285
#ifdef TARGET_NR_fstatat64
8286
    case TARGET_NR_fstatat64:
8287 8288 8289 8290
#endif
#ifdef TARGET_NR_newfstatat
    case TARGET_NR_newfstatat:
#endif
8291 8292
        if (!(p = lock_user_string(arg2)))
            goto efault;
8293
        ret = get_errno(fstatat(arg1, path(p), &st, arg4));
8294 8295
        if (!is_error(ret))
            ret = host_to_target_stat64(cpu_env, arg3, &st);
B
bellard 已提交
8296
        break;
B
bellard 已提交
8297
#endif
8298
    case TARGET_NR_lchown:
8299 8300
        if (!(p = lock_user_string(arg1)))
            goto efault;
8301 8302
        ret = get_errno(lchown(p, low2highuid(arg2), low2highgid(arg3)));
        unlock_user(p, arg1, 0);
8303
        break;
8304
#ifdef TARGET_NR_getuid
8305 8306 8307
    case TARGET_NR_getuid:
        ret = get_errno(high2lowuid(getuid()));
        break;
8308 8309
#endif
#ifdef TARGET_NR_getgid
8310 8311 8312
    case TARGET_NR_getgid:
        ret = get_errno(high2lowgid(getgid()));
        break;
8313 8314
#endif
#ifdef TARGET_NR_geteuid
8315 8316 8317
    case TARGET_NR_geteuid:
        ret = get_errno(high2lowuid(geteuid()));
        break;
8318 8319
#endif
#ifdef TARGET_NR_getegid
8320 8321 8322
    case TARGET_NR_getegid:
        ret = get_errno(high2lowgid(getegid()));
        break;
8323
#endif
8324 8325 8326 8327 8328 8329 8330 8331 8332
    case TARGET_NR_setreuid:
        ret = get_errno(setreuid(low2highuid(arg1), low2highuid(arg2)));
        break;
    case TARGET_NR_setregid:
        ret = get_errno(setregid(low2highgid(arg1), low2highgid(arg2)));
        break;
    case TARGET_NR_getgroups:
        {
            int gidsetsize = arg1;
8333
            target_id *target_grouplist;
8334 8335 8336 8337 8338
            gid_t *grouplist;
            int i;

            grouplist = alloca(gidsetsize * sizeof(gid_t));
            ret = get_errno(getgroups(gidsetsize, grouplist));
8339 8340
            if (gidsetsize == 0)
                break;
8341
            if (!is_error(ret)) {
8342
                target_grouplist = lock_user(VERIFY_WRITE, arg2, gidsetsize * sizeof(target_id), 0);
8343 8344
                if (!target_grouplist)
                    goto efault;
8345
                for(i = 0;i < ret; i++)
8346
                    target_grouplist[i] = tswapid(high2lowgid(grouplist[i]));
8347
                unlock_user(target_grouplist, arg2, gidsetsize * sizeof(target_id));
8348 8349 8350 8351 8352 8353
            }
        }
        break;
    case TARGET_NR_setgroups:
        {
            int gidsetsize = arg1;
8354
            target_id *target_grouplist;
8355
            gid_t *grouplist = NULL;
8356
            int i;
8357 8358
            if (gidsetsize) {
                grouplist = alloca(gidsetsize * sizeof(gid_t));
8359
                target_grouplist = lock_user(VERIFY_READ, arg2, gidsetsize * sizeof(target_id), 1);
8360 8361 8362 8363 8364 8365 8366 8367
                if (!target_grouplist) {
                    ret = -TARGET_EFAULT;
                    goto fail;
                }
                for (i = 0; i < gidsetsize; i++) {
                    grouplist[i] = low2highgid(tswapid(target_grouplist[i]));
                }
                unlock_user(target_grouplist, arg2, 0);
8368
            }
8369 8370 8371 8372 8373 8374
            ret = get_errno(setgroups(gidsetsize, grouplist));
        }
        break;
    case TARGET_NR_fchown:
        ret = get_errno(fchown(arg1, low2highuid(arg2), low2highgid(arg3)));
        break;
8375
#if defined(TARGET_NR_fchownat)
8376
    case TARGET_NR_fchownat:
8377 8378
        if (!(p = lock_user_string(arg2))) 
            goto efault;
8379 8380
        ret = get_errno(fchownat(arg1, p, low2highuid(arg3),
                                 low2highgid(arg4), arg5));
8381
        unlock_user(p, arg2, 0);
8382 8383
        break;
#endif
8384 8385
#ifdef TARGET_NR_setresuid
    case TARGET_NR_setresuid:
8386 8387
        ret = get_errno(setresuid(low2highuid(arg1),
                                  low2highuid(arg2),
8388 8389 8390 8391 8392 8393
                                  low2highuid(arg3)));
        break;
#endif
#ifdef TARGET_NR_getresuid
    case TARGET_NR_getresuid:
        {
8394
            uid_t ruid, euid, suid;
8395 8396
            ret = get_errno(getresuid(&ruid, &euid, &suid));
            if (!is_error(ret)) {
8397 8398 8399
                if (put_user_id(high2lowuid(ruid), arg1)
                    || put_user_id(high2lowuid(euid), arg2)
                    || put_user_id(high2lowuid(suid), arg3))
8400
                    goto efault;
8401 8402 8403 8404 8405 8406
            }
        }
        break;
#endif
#ifdef TARGET_NR_getresgid
    case TARGET_NR_setresgid:
8407 8408
        ret = get_errno(setresgid(low2highgid(arg1),
                                  low2highgid(arg2),
8409 8410 8411 8412 8413 8414
                                  low2highgid(arg3)));
        break;
#endif
#ifdef TARGET_NR_getresgid
    case TARGET_NR_getresgid:
        {
8415
            gid_t rgid, egid, sgid;
8416 8417
            ret = get_errno(getresgid(&rgid, &egid, &sgid));
            if (!is_error(ret)) {
8418 8419 8420
                if (put_user_id(high2lowgid(rgid), arg1)
                    || put_user_id(high2lowgid(egid), arg2)
                    || put_user_id(high2lowgid(sgid), arg3))
8421
                    goto efault;
8422 8423 8424 8425 8426
            }
        }
        break;
#endif
    case TARGET_NR_chown:
8427 8428
        if (!(p = lock_user_string(arg1)))
            goto efault;
8429 8430
        ret = get_errno(chown(p, low2highuid(arg2), low2highgid(arg3)));
        unlock_user(p, arg1, 0);
8431 8432 8433 8434 8435 8436 8437 8438 8439 8440 8441 8442 8443 8444
        break;
    case TARGET_NR_setuid:
        ret = get_errno(setuid(low2highuid(arg1)));
        break;
    case TARGET_NR_setgid:
        ret = get_errno(setgid(low2highgid(arg1)));
        break;
    case TARGET_NR_setfsuid:
        ret = get_errno(setfsuid(arg1));
        break;
    case TARGET_NR_setfsgid:
        ret = get_errno(setfsgid(arg1));
        break;

B
bellard 已提交
8445
#ifdef TARGET_NR_lchown32
8446
    case TARGET_NR_lchown32:
8447 8448
        if (!(p = lock_user_string(arg1)))
            goto efault;
8449 8450
        ret = get_errno(lchown(p, arg2, arg3));
        unlock_user(p, arg1, 0);
B
bellard 已提交
8451
        break;
B
bellard 已提交
8452 8453
#endif
#ifdef TARGET_NR_getuid32
8454
    case TARGET_NR_getuid32:
B
bellard 已提交
8455 8456
        ret = get_errno(getuid());
        break;
B
bellard 已提交
8457
#endif
8458 8459 8460 8461

#if defined(TARGET_NR_getxuid) && defined(TARGET_ALPHA)
   /* Alpha specific */
    case TARGET_NR_getxuid:
8462 8463 8464 8465 8466
         {
            uid_t euid;
            euid=geteuid();
            ((CPUAlphaState *)cpu_env)->ir[IR_A4]=euid;
         }
8467 8468 8469 8470 8471 8472
        ret = get_errno(getuid());
        break;
#endif
#if defined(TARGET_NR_getxgid) && defined(TARGET_ALPHA)
   /* Alpha specific */
    case TARGET_NR_getxgid:
8473 8474 8475 8476 8477
         {
            uid_t egid;
            egid=getegid();
            ((CPUAlphaState *)cpu_env)->ir[IR_A4]=egid;
         }
8478 8479 8480
        ret = get_errno(getgid());
        break;
#endif
8481 8482 8483 8484 8485 8486 8487 8488 8489 8490 8491 8492 8493 8494 8495 8496 8497 8498 8499 8500 8501 8502 8503 8504 8505 8506 8507 8508 8509 8510 8511 8512 8513 8514 8515 8516 8517 8518 8519 8520 8521 8522 8523 8524 8525 8526 8527
#if defined(TARGET_NR_osf_getsysinfo) && defined(TARGET_ALPHA)
    /* Alpha specific */
    case TARGET_NR_osf_getsysinfo:
        ret = -TARGET_EOPNOTSUPP;
        switch (arg1) {
          case TARGET_GSI_IEEE_FP_CONTROL:
            {
                uint64_t swcr, fpcr = cpu_alpha_load_fpcr (cpu_env);

                /* Copied from linux ieee_fpcr_to_swcr.  */
                swcr = (fpcr >> 35) & SWCR_STATUS_MASK;
                swcr |= (fpcr >> 36) & SWCR_MAP_DMZ;
                swcr |= (~fpcr >> 48) & (SWCR_TRAP_ENABLE_INV
                                        | SWCR_TRAP_ENABLE_DZE
                                        | SWCR_TRAP_ENABLE_OVF);
                swcr |= (~fpcr >> 57) & (SWCR_TRAP_ENABLE_UNF
                                        | SWCR_TRAP_ENABLE_INE);
                swcr |= (fpcr >> 47) & SWCR_MAP_UMZ;
                swcr |= (~fpcr >> 41) & SWCR_TRAP_ENABLE_DNO;

                if (put_user_u64 (swcr, arg2))
                        goto efault;
                ret = 0;
            }
            break;

          /* case GSI_IEEE_STATE_AT_SIGNAL:
             -- Not implemented in linux kernel.
             case GSI_UACPROC:
             -- Retrieves current unaligned access state; not much used.
             case GSI_PROC_TYPE:
             -- Retrieves implver information; surely not used.
             case GSI_GET_HWRPB:
             -- Grabs a copy of the HWRPB; surely not used.
          */
        }
        break;
#endif
#if defined(TARGET_NR_osf_setsysinfo) && defined(TARGET_ALPHA)
    /* Alpha specific */
    case TARGET_NR_osf_setsysinfo:
        ret = -TARGET_EOPNOTSUPP;
        switch (arg1) {
          case TARGET_SSI_IEEE_FP_CONTROL:
            {
                uint64_t swcr, fpcr, orig_fpcr;

8528
                if (get_user_u64 (swcr, arg2)) {
8529
                    goto efault;
8530 8531
                }
                orig_fpcr = cpu_alpha_load_fpcr(cpu_env);
8532 8533 8534 8535 8536 8537 8538 8539 8540 8541 8542 8543 8544
                fpcr = orig_fpcr & FPCR_DYN_MASK;

                /* Copied from linux ieee_swcr_to_fpcr.  */
                fpcr |= (swcr & SWCR_STATUS_MASK) << 35;
                fpcr |= (swcr & SWCR_MAP_DMZ) << 36;
                fpcr |= (~swcr & (SWCR_TRAP_ENABLE_INV
                                  | SWCR_TRAP_ENABLE_DZE
                                  | SWCR_TRAP_ENABLE_OVF)) << 48;
                fpcr |= (~swcr & (SWCR_TRAP_ENABLE_UNF
                                  | SWCR_TRAP_ENABLE_INE)) << 57;
                fpcr |= (swcr & SWCR_MAP_UMZ ? FPCR_UNDZ | FPCR_UNFD : 0);
                fpcr |= (~swcr & SWCR_TRAP_ENABLE_DNO) << 41;

8545
                cpu_alpha_store_fpcr(cpu_env, fpcr);
8546
                ret = 0;
8547 8548 8549 8550 8551 8552 8553 8554 8555 8556 8557
            }
            break;

          case TARGET_SSI_IEEE_RAISE_EXCEPTION:
            {
                uint64_t exc, fpcr, orig_fpcr;
                int si_code;

                if (get_user_u64(exc, arg2)) {
                    goto efault;
                }
8558

8559
                orig_fpcr = cpu_alpha_load_fpcr(cpu_env);
8560

8561 8562 8563 8564 8565 8566 8567 8568 8569 8570 8571 8572 8573 8574 8575 8576 8577 8578 8579 8580 8581 8582 8583 8584 8585 8586 8587 8588 8589 8590 8591 8592 8593 8594 8595
                /* We only add to the exception status here.  */
                fpcr = orig_fpcr | ((exc & SWCR_STATUS_MASK) << 35);

                cpu_alpha_store_fpcr(cpu_env, fpcr);
                ret = 0;

                /* Old exceptions are not signaled.  */
                fpcr &= ~(orig_fpcr & FPCR_STATUS_MASK);

                /* If any exceptions set by this call,
                   and are unmasked, send a signal.  */
                si_code = 0;
                if ((fpcr & (FPCR_INE | FPCR_INED)) == FPCR_INE) {
                    si_code = TARGET_FPE_FLTRES;
                }
                if ((fpcr & (FPCR_UNF | FPCR_UNFD)) == FPCR_UNF) {
                    si_code = TARGET_FPE_FLTUND;
                }
                if ((fpcr & (FPCR_OVF | FPCR_OVFD)) == FPCR_OVF) {
                    si_code = TARGET_FPE_FLTOVF;
                }
                if ((fpcr & (FPCR_DZE | FPCR_DZED)) == FPCR_DZE) {
                    si_code = TARGET_FPE_FLTDIV;
                }
                if ((fpcr & (FPCR_INV | FPCR_INVD)) == FPCR_INV) {
                    si_code = TARGET_FPE_FLTINV;
                }
                if (si_code != 0) {
                    target_siginfo_t info;
                    info.si_signo = SIGFPE;
                    info.si_errno = 0;
                    info.si_code = si_code;
                    info._sifields._sigfault._addr
                        = ((CPUArchState *)cpu_env)->pc;
                    queue_signal((CPUArchState *)cpu_env, info.si_signo, &info);
8596 8597 8598 8599 8600 8601 8602 8603 8604 8605 8606 8607 8608 8609 8610 8611 8612 8613
                }
            }
            break;

          /* case SSI_NVPAIRS:
             -- Used with SSIN_UACPROC to enable unaligned accesses.
             case SSI_IEEE_STATE_AT_SIGNAL:
             case SSI_IEEE_IGNORE_STATE_AT_SIGNAL:
             -- Not implemented in linux kernel
          */
        }
        break;
#endif
#ifdef TARGET_NR_osf_sigprocmask
    /* Alpha specific.  */
    case TARGET_NR_osf_sigprocmask:
        {
            abi_ulong mask;
8614
            int how;
8615 8616 8617 8618 8619 8620 8621 8622 8623 8624 8625 8626 8627 8628 8629 8630 8631 8632
            sigset_t set, oldset;

            switch(arg1) {
            case TARGET_SIG_BLOCK:
                how = SIG_BLOCK;
                break;
            case TARGET_SIG_UNBLOCK:
                how = SIG_UNBLOCK;
                break;
            case TARGET_SIG_SETMASK:
                how = SIG_SETMASK;
                break;
            default:
                ret = -TARGET_EINVAL;
                goto fail;
            }
            mask = arg2;
            target_to_host_old_sigset(&set, &mask);
8633
            do_sigprocmask(how, &set, &oldset);
8634 8635 8636 8637 8638
            host_to_target_old_sigset(&mask, &oldset);
            ret = mask;
        }
        break;
#endif
8639

B
bellard 已提交
8640
#ifdef TARGET_NR_getgid32
8641
    case TARGET_NR_getgid32:
B
bellard 已提交
8642 8643
        ret = get_errno(getgid());
        break;
B
bellard 已提交
8644 8645
#endif
#ifdef TARGET_NR_geteuid32
8646
    case TARGET_NR_geteuid32:
B
bellard 已提交
8647 8648
        ret = get_errno(geteuid());
        break;
B
bellard 已提交
8649 8650
#endif
#ifdef TARGET_NR_getegid32
8651
    case TARGET_NR_getegid32:
B
bellard 已提交
8652 8653
        ret = get_errno(getegid());
        break;
B
bellard 已提交
8654 8655
#endif
#ifdef TARGET_NR_setreuid32
8656
    case TARGET_NR_setreuid32:
B
bellard 已提交
8657 8658
        ret = get_errno(setreuid(arg1, arg2));
        break;
B
bellard 已提交
8659 8660
#endif
#ifdef TARGET_NR_setregid32
8661
    case TARGET_NR_setregid32:
B
bellard 已提交
8662 8663
        ret = get_errno(setregid(arg1, arg2));
        break;
B
bellard 已提交
8664 8665
#endif
#ifdef TARGET_NR_getgroups32
8666
    case TARGET_NR_getgroups32:
B
bellard 已提交
8667 8668
        {
            int gidsetsize = arg1;
8669
            uint32_t *target_grouplist;
B
bellard 已提交
8670 8671 8672 8673 8674
            gid_t *grouplist;
            int i;

            grouplist = alloca(gidsetsize * sizeof(gid_t));
            ret = get_errno(getgroups(gidsetsize, grouplist));
8675 8676
            if (gidsetsize == 0)
                break;
B
bellard 已提交
8677
            if (!is_error(ret)) {
8678 8679 8680 8681 8682
                target_grouplist = lock_user(VERIFY_WRITE, arg2, gidsetsize * 4, 0);
                if (!target_grouplist) {
                    ret = -TARGET_EFAULT;
                    goto fail;
                }
8683
                for(i = 0;i < ret; i++)
8684 8685
                    target_grouplist[i] = tswap32(grouplist[i]);
                unlock_user(target_grouplist, arg2, gidsetsize * 4);
B
bellard 已提交
8686 8687 8688
            }
        }
        break;
B
bellard 已提交
8689 8690
#endif
#ifdef TARGET_NR_setgroups32
8691
    case TARGET_NR_setgroups32:
B
bellard 已提交
8692 8693
        {
            int gidsetsize = arg1;
8694
            uint32_t *target_grouplist;
B
bellard 已提交
8695 8696
            gid_t *grouplist;
            int i;
8697

B
bellard 已提交
8698
            grouplist = alloca(gidsetsize * sizeof(gid_t));
8699 8700 8701 8702 8703
            target_grouplist = lock_user(VERIFY_READ, arg2, gidsetsize * 4, 1);
            if (!target_grouplist) {
                ret = -TARGET_EFAULT;
                goto fail;
            }
B
bellard 已提交
8704
            for(i = 0;i < gidsetsize; i++)
8705 8706
                grouplist[i] = tswap32(target_grouplist[i]);
            unlock_user(target_grouplist, arg2, 0);
B
bellard 已提交
8707 8708 8709
            ret = get_errno(setgroups(gidsetsize, grouplist));
        }
        break;
B
bellard 已提交
8710 8711
#endif
#ifdef TARGET_NR_fchown32
8712
    case TARGET_NR_fchown32:
B
bellard 已提交
8713 8714
        ret = get_errno(fchown(arg1, arg2, arg3));
        break;
B
bellard 已提交
8715 8716
#endif
#ifdef TARGET_NR_setresuid32
8717
    case TARGET_NR_setresuid32:
B
bellard 已提交
8718 8719
        ret = get_errno(setresuid(arg1, arg2, arg3));
        break;
B
bellard 已提交
8720 8721
#endif
#ifdef TARGET_NR_getresuid32
8722
    case TARGET_NR_getresuid32:
B
bellard 已提交
8723
        {
8724
            uid_t ruid, euid, suid;
B
bellard 已提交
8725 8726
            ret = get_errno(getresuid(&ruid, &euid, &suid));
            if (!is_error(ret)) {
8727 8728 8729 8730
                if (put_user_u32(ruid, arg1)
                    || put_user_u32(euid, arg2)
                    || put_user_u32(suid, arg3))
                    goto efault;
B
bellard 已提交
8731 8732 8733
            }
        }
        break;
B
bellard 已提交
8734 8735
#endif
#ifdef TARGET_NR_setresgid32
8736
    case TARGET_NR_setresgid32:
B
bellard 已提交
8737 8738
        ret = get_errno(setresgid(arg1, arg2, arg3));
        break;
B
bellard 已提交
8739 8740
#endif
#ifdef TARGET_NR_getresgid32
8741
    case TARGET_NR_getresgid32:
B
bellard 已提交
8742
        {
8743
            gid_t rgid, egid, sgid;
B
bellard 已提交
8744 8745
            ret = get_errno(getresgid(&rgid, &egid, &sgid));
            if (!is_error(ret)) {
8746 8747 8748 8749
                if (put_user_u32(rgid, arg1)
                    || put_user_u32(egid, arg2)
                    || put_user_u32(sgid, arg3))
                    goto efault;
B
bellard 已提交
8750 8751 8752
            }
        }
        break;
B
bellard 已提交
8753 8754
#endif
#ifdef TARGET_NR_chown32
8755
    case TARGET_NR_chown32:
8756 8757
        if (!(p = lock_user_string(arg1)))
            goto efault;
8758 8759
        ret = get_errno(chown(p, arg2, arg3));
        unlock_user(p, arg1, 0);
B
bellard 已提交
8760
        break;
B
bellard 已提交
8761 8762
#endif
#ifdef TARGET_NR_setuid32
8763
    case TARGET_NR_setuid32:
B
bellard 已提交
8764 8765
        ret = get_errno(setuid(arg1));
        break;
B
bellard 已提交
8766 8767
#endif
#ifdef TARGET_NR_setgid32
8768
    case TARGET_NR_setgid32:
B
bellard 已提交
8769 8770
        ret = get_errno(setgid(arg1));
        break;
B
bellard 已提交
8771 8772
#endif
#ifdef TARGET_NR_setfsuid32
8773
    case TARGET_NR_setfsuid32:
B
bellard 已提交
8774 8775
        ret = get_errno(setfsuid(arg1));
        break;
B
bellard 已提交
8776 8777
#endif
#ifdef TARGET_NR_setfsgid32
8778
    case TARGET_NR_setfsgid32:
B
bellard 已提交
8779 8780
        ret = get_errno(setfsgid(arg1));
        break;
B
bellard 已提交
8781
#endif
8782

8783
    case TARGET_NR_pivot_root:
B
bellard 已提交
8784
        goto unimplemented;
B
bellard 已提交
8785
#ifdef TARGET_NR_mincore
8786
    case TARGET_NR_mincore:
A
aurel32 已提交
8787 8788 8789 8790 8791 8792 8793 8794 8795 8796 8797 8798 8799
        {
            void *a;
            ret = -TARGET_EFAULT;
            if (!(a = lock_user(VERIFY_READ, arg1,arg2, 0)))
                goto efault;
            if (!(p = lock_user_string(arg3)))
                goto mincore_fail;
            ret = get_errno(mincore(a, arg2, p));
            unlock_user(p, arg3, ret);
            mincore_fail:
            unlock_user(a, arg1, 0);
        }
        break;
B
bellard 已提交
8800
#endif
A
aurel32 已提交
8801 8802 8803 8804 8805 8806 8807 8808 8809 8810 8811 8812 8813
#ifdef TARGET_NR_arm_fadvise64_64
    case TARGET_NR_arm_fadvise64_64:
	{
		/*
		 * arm_fadvise64_64 looks like fadvise64_64 but
		 * with different argument order
		 */
		abi_long temp;
		temp = arg3;
		arg3 = arg4;
		arg4 = temp;
	}
#endif
8814
#if defined(TARGET_NR_fadvise64_64) || defined(TARGET_NR_arm_fadvise64_64) || defined(TARGET_NR_fadvise64)
A
aurel32 已提交
8815 8816 8817
#ifdef TARGET_NR_fadvise64_64
    case TARGET_NR_fadvise64_64:
#endif
8818 8819 8820 8821 8822 8823 8824 8825 8826 8827 8828 8829 8830
#ifdef TARGET_NR_fadvise64
    case TARGET_NR_fadvise64:
#endif
#ifdef TARGET_S390X
        switch (arg4) {
        case 4: arg4 = POSIX_FADV_NOREUSE + 1; break; /* make sure it's an invalid value */
        case 5: arg4 = POSIX_FADV_NOREUSE + 2; break; /* ditto */
        case 6: arg4 = POSIX_FADV_DONTNEED; break;
        case 7: arg4 = POSIX_FADV_NOREUSE; break;
        default: break;
        }
#endif
        ret = -posix_fadvise(arg1, arg2, arg3, arg4);
A
aurel32 已提交
8831 8832
	break;
#endif
B
bellard 已提交
8833
#ifdef TARGET_NR_madvise
8834
    case TARGET_NR_madvise:
8835
        /* A straight passthrough may not be safe because qemu sometimes
L
Lei Li 已提交
8836
           turns private file-backed mappings into anonymous mappings.
8837 8838 8839 8840
           This will break MADV_DONTNEED.
           This is a hint, so ignoring and returning success is ok.  */
        ret = get_errno(0);
        break;
B
bellard 已提交
8841
#endif
8842
#if TARGET_ABI_BITS == 32
8843
    case TARGET_NR_fcntl64:
B
bellard 已提交
8844
    {
T
ths 已提交
8845
	int cmd;
B
bellard 已提交
8846
	struct flock64 fl;
8847
	struct target_flock64 *target_fl;
P
pbrook 已提交
8848
#ifdef TARGET_ARM
8849
	struct target_eabi_flock64 *target_efl;
P
pbrook 已提交
8850
#endif
B
bellard 已提交
8851

8852
	cmd = target_to_host_fcntl_cmd(arg2);
8853 8854 8855 8856
        if (cmd == -TARGET_EINVAL) {
            ret = cmd;
            break;
        }
T
ths 已提交
8857

B
bellard 已提交
8858
        switch(arg2) {
T
ths 已提交
8859
        case TARGET_F_GETLK64:
T
ths 已提交
8860 8861
#ifdef TARGET_ARM
            if (((CPUARMState *)cpu_env)->eabi) {
B
bellard 已提交
8862 8863
                if (!lock_user_struct(VERIFY_READ, target_efl, arg3, 1)) 
                    goto efault;
T
ths 已提交
8864 8865 8866 8867
                fl.l_type = tswap16(target_efl->l_type);
                fl.l_whence = tswap16(target_efl->l_whence);
                fl.l_start = tswap64(target_efl->l_start);
                fl.l_len = tswap64(target_efl->l_len);
U
Ulrich Hecht 已提交
8868
                fl.l_pid = tswap32(target_efl->l_pid);
T
ths 已提交
8869 8870 8871 8872
                unlock_user_struct(target_efl, arg3, 0);
            } else
#endif
            {
B
bellard 已提交
8873 8874
                if (!lock_user_struct(VERIFY_READ, target_fl, arg3, 1)) 
                    goto efault;
T
ths 已提交
8875 8876 8877 8878
                fl.l_type = tswap16(target_fl->l_type);
                fl.l_whence = tswap16(target_fl->l_whence);
                fl.l_start = tswap64(target_fl->l_start);
                fl.l_len = tswap64(target_fl->l_len);
U
Ulrich Hecht 已提交
8879
                fl.l_pid = tswap32(target_fl->l_pid);
T
ths 已提交
8880 8881
                unlock_user_struct(target_fl, arg3, 0);
            }
T
ths 已提交
8882
            ret = get_errno(fcntl(arg1, cmd, &fl));
B
bellard 已提交
8883
	    if (ret == 0) {
P
pbrook 已提交
8884 8885
#ifdef TARGET_ARM
                if (((CPUARMState *)cpu_env)->eabi) {
B
bellard 已提交
8886 8887
                    if (!lock_user_struct(VERIFY_WRITE, target_efl, arg3, 0)) 
                        goto efault;
P
pbrook 已提交
8888 8889 8890 8891
                    target_efl->l_type = tswap16(fl.l_type);
                    target_efl->l_whence = tswap16(fl.l_whence);
                    target_efl->l_start = tswap64(fl.l_start);
                    target_efl->l_len = tswap64(fl.l_len);
U
Ulrich Hecht 已提交
8892
                    target_efl->l_pid = tswap32(fl.l_pid);
8893
                    unlock_user_struct(target_efl, arg3, 1);
P
pbrook 已提交
8894 8895 8896
                } else
#endif
                {
B
bellard 已提交
8897 8898
                    if (!lock_user_struct(VERIFY_WRITE, target_fl, arg3, 0)) 
                        goto efault;
P
pbrook 已提交
8899 8900 8901 8902
                    target_fl->l_type = tswap16(fl.l_type);
                    target_fl->l_whence = tswap16(fl.l_whence);
                    target_fl->l_start = tswap64(fl.l_start);
                    target_fl->l_len = tswap64(fl.l_len);
U
Ulrich Hecht 已提交
8903
                    target_fl->l_pid = tswap32(fl.l_pid);
8904
                    unlock_user_struct(target_fl, arg3, 1);
P
pbrook 已提交
8905
                }
B
bellard 已提交
8906 8907 8908
	    }
	    break;

T
ths 已提交
8909 8910
        case TARGET_F_SETLK64:
        case TARGET_F_SETLKW64:
P
pbrook 已提交
8911 8912
#ifdef TARGET_ARM
            if (((CPUARMState *)cpu_env)->eabi) {
B
bellard 已提交
8913 8914
                if (!lock_user_struct(VERIFY_READ, target_efl, arg3, 1)) 
                    goto efault;
P
pbrook 已提交
8915 8916 8917 8918
                fl.l_type = tswap16(target_efl->l_type);
                fl.l_whence = tswap16(target_efl->l_whence);
                fl.l_start = tswap64(target_efl->l_start);
                fl.l_len = tswap64(target_efl->l_len);
U
Ulrich Hecht 已提交
8919
                fl.l_pid = tswap32(target_efl->l_pid);
8920
                unlock_user_struct(target_efl, arg3, 0);
P
pbrook 已提交
8921 8922 8923
            } else
#endif
            {
B
bellard 已提交
8924 8925
                if (!lock_user_struct(VERIFY_READ, target_fl, arg3, 1)) 
                    goto efault;
P
pbrook 已提交
8926 8927 8928 8929
                fl.l_type = tswap16(target_fl->l_type);
                fl.l_whence = tswap16(target_fl->l_whence);
                fl.l_start = tswap64(target_fl->l_start);
                fl.l_len = tswap64(target_fl->l_len);
U
Ulrich Hecht 已提交
8930
                fl.l_pid = tswap32(target_fl->l_pid);
8931
                unlock_user_struct(target_fl, arg3, 0);
P
pbrook 已提交
8932
            }
T
ths 已提交
8933
            ret = get_errno(fcntl(arg1, cmd, &fl));
B
bellard 已提交
8934
	    break;
B
bellard 已提交
8935
        default:
8936
            ret = do_fcntl(arg1, arg2, arg3);
B
bellard 已提交
8937 8938
            break;
        }
B
bellard 已提交
8939 8940
	break;
    }
B
bellard 已提交
8941
#endif
8942 8943 8944 8945 8946 8947
#ifdef TARGET_NR_cacheflush
    case TARGET_NR_cacheflush:
        /* self-modifying code is handled automatically, so nothing needed */
        ret = 0;
        break;
#endif
8948
#ifdef TARGET_NR_security
8949 8950
    case TARGET_NR_security:
        goto unimplemented;
B
bellard 已提交
8951 8952 8953 8954 8955
#endif
#ifdef TARGET_NR_getpagesize
    case TARGET_NR_getpagesize:
        ret = TARGET_PAGE_SIZE;
        break;
8956
#endif
8957 8958 8959
    case TARGET_NR_gettid:
        ret = get_errno(gettid());
        break;
8960
#ifdef TARGET_NR_readahead
8961
    case TARGET_NR_readahead:
A
aurel32 已提交
8962
#if TARGET_ABI_BITS == 32
8963
        if (regpairs_aligned(cpu_env)) {
A
aurel32 已提交
8964 8965 8966 8967 8968 8969 8970 8971 8972
            arg2 = arg3;
            arg3 = arg4;
            arg4 = arg5;
        }
        ret = get_errno(readahead(arg1, ((off64_t)arg3 << 32) | arg2, arg4));
#else
        ret = get_errno(readahead(arg1, arg2, arg3));
#endif
        break;
8973
#endif
8974
#ifdef CONFIG_ATTR
8975
#ifdef TARGET_NR_setxattr
8976 8977
    case TARGET_NR_listxattr:
    case TARGET_NR_llistxattr:
8978 8979 8980 8981 8982 8983 8984 8985 8986 8987 8988 8989 8990 8991 8992 8993 8994 8995 8996 8997 8998 8999 9000
    {
        void *p, *b = 0;
        if (arg2) {
            b = lock_user(VERIFY_WRITE, arg2, arg3, 0);
            if (!b) {
                ret = -TARGET_EFAULT;
                break;
            }
        }
        p = lock_user_string(arg1);
        if (p) {
            if (num == TARGET_NR_listxattr) {
                ret = get_errno(listxattr(p, b, arg3));
            } else {
                ret = get_errno(llistxattr(p, b, arg3));
            }
        } else {
            ret = -TARGET_EFAULT;
        }
        unlock_user(p, arg1, 0);
        unlock_user(b, arg2, arg3);
        break;
    }
9001
    case TARGET_NR_flistxattr:
9002 9003 9004 9005 9006 9007 9008 9009 9010 9011 9012
    {
        void *b = 0;
        if (arg2) {
            b = lock_user(VERIFY_WRITE, arg2, arg3, 0);
            if (!b) {
                ret = -TARGET_EFAULT;
                break;
            }
        }
        ret = get_errno(flistxattr(arg1, b, arg3));
        unlock_user(b, arg2, arg3);
9013
        break;
9014
    }
9015
    case TARGET_NR_setxattr:
9016
    case TARGET_NR_lsetxattr:
9017
        {
9018 9019 9020 9021 9022 9023 9024 9025
            void *p, *n, *v = 0;
            if (arg3) {
                v = lock_user(VERIFY_READ, arg3, arg4, 1);
                if (!v) {
                    ret = -TARGET_EFAULT;
                    break;
                }
            }
9026 9027
            p = lock_user_string(arg1);
            n = lock_user_string(arg2);
9028
            if (p && n) {
9029 9030 9031 9032 9033
                if (num == TARGET_NR_setxattr) {
                    ret = get_errno(setxattr(p, n, v, arg4, arg5));
                } else {
                    ret = get_errno(lsetxattr(p, n, v, arg4, arg5));
                }
9034 9035 9036 9037 9038 9039 9040 9041
            } else {
                ret = -TARGET_EFAULT;
            }
            unlock_user(p, arg1, 0);
            unlock_user(n, arg2, 0);
            unlock_user(v, arg3, 0);
        }
        break;
9042 9043 9044 9045 9046 9047 9048 9049 9050 9051 9052 9053 9054 9055 9056 9057 9058 9059 9060 9061
    case TARGET_NR_fsetxattr:
        {
            void *n, *v = 0;
            if (arg3) {
                v = lock_user(VERIFY_READ, arg3, arg4, 1);
                if (!v) {
                    ret = -TARGET_EFAULT;
                    break;
                }
            }
            n = lock_user_string(arg2);
            if (n) {
                ret = get_errno(fsetxattr(arg1, n, v, arg4, arg5));
            } else {
                ret = -TARGET_EFAULT;
            }
            unlock_user(n, arg2, 0);
            unlock_user(v, arg3, 0);
        }
        break;
9062
    case TARGET_NR_getxattr:
9063
    case TARGET_NR_lgetxattr:
9064
        {
9065 9066 9067 9068 9069 9070 9071 9072
            void *p, *n, *v = 0;
            if (arg3) {
                v = lock_user(VERIFY_WRITE, arg3, arg4, 0);
                if (!v) {
                    ret = -TARGET_EFAULT;
                    break;
                }
            }
9073 9074
            p = lock_user_string(arg1);
            n = lock_user_string(arg2);
9075
            if (p && n) {
9076 9077 9078 9079 9080
                if (num == TARGET_NR_getxattr) {
                    ret = get_errno(getxattr(p, n, v, arg4));
                } else {
                    ret = get_errno(lgetxattr(p, n, v, arg4));
                }
9081 9082 9083 9084 9085 9086 9087 9088
            } else {
                ret = -TARGET_EFAULT;
            }
            unlock_user(p, arg1, 0);
            unlock_user(n, arg2, 0);
            unlock_user(v, arg3, arg4);
        }
        break;
9089 9090 9091 9092 9093 9094 9095 9096 9097 9098 9099 9100 9101 9102 9103 9104 9105 9106 9107 9108
    case TARGET_NR_fgetxattr:
        {
            void *n, *v = 0;
            if (arg3) {
                v = lock_user(VERIFY_WRITE, arg3, arg4, 0);
                if (!v) {
                    ret = -TARGET_EFAULT;
                    break;
                }
            }
            n = lock_user_string(arg2);
            if (n) {
                ret = get_errno(fgetxattr(arg1, n, v, arg4));
            } else {
                ret = -TARGET_EFAULT;
            }
            unlock_user(n, arg2, 0);
            unlock_user(v, arg3, arg4);
        }
        break;
9109
    case TARGET_NR_removexattr:
9110
    case TARGET_NR_lremovexattr:
9111 9112 9113 9114 9115
        {
            void *p, *n;
            p = lock_user_string(arg1);
            n = lock_user_string(arg2);
            if (p && n) {
9116 9117 9118 9119 9120
                if (num == TARGET_NR_removexattr) {
                    ret = get_errno(removexattr(p, n));
                } else {
                    ret = get_errno(lremovexattr(p, n));
                }
9121 9122 9123 9124 9125 9126 9127
            } else {
                ret = -TARGET_EFAULT;
            }
            unlock_user(p, arg1, 0);
            unlock_user(n, arg2, 0);
        }
        break;
9128 9129 9130 9131 9132 9133 9134 9135 9136 9137 9138 9139
    case TARGET_NR_fremovexattr:
        {
            void *n;
            n = lock_user_string(arg2);
            if (n) {
                ret = get_errno(fremovexattr(arg1, n));
            } else {
                ret = -TARGET_EFAULT;
            }
            unlock_user(n, arg2, 0);
        }
        break;
9140
#endif
9141
#endif /* CONFIG_ATTR */
9142
#ifdef TARGET_NR_set_thread_area
B
bellard 已提交
9143
    case TARGET_NR_set_thread_area:
B
bellard 已提交
9144
#if defined(TARGET_MIPS)
9145
      ((CPUMIPSState *) cpu_env)->active_tc.CP0_UserLocal = arg1;
9146 9147
      ret = 0;
      break;
9148 9149 9150 9151 9152 9153 9154 9155
#elif defined(TARGET_CRIS)
      if (arg1 & 0xff)
          ret = -TARGET_EINVAL;
      else {
          ((CPUCRISState *) cpu_env)->pregs[PR_PID] = arg1;
          ret = 0;
      }
      break;
B
bellard 已提交
9156 9157 9158
#elif defined(TARGET_I386) && defined(TARGET_ABI32)
      ret = do_set_thread_area(cpu_env, arg1);
      break;
P
Peter Maydell 已提交
9159 9160
#elif defined(TARGET_M68K)
      {
9161
          TaskState *ts = cpu->opaque;
P
Peter Maydell 已提交
9162
          ts->tp_value = arg1;
9163
          ret = 0;
P
Peter Maydell 已提交
9164 9165
          break;
      }
9166 9167 9168 9169 9170
#else
      goto unimplemented_nowarn;
#endif
#endif
#ifdef TARGET_NR_get_thread_area
B
bellard 已提交
9171
    case TARGET_NR_get_thread_area:
B
bellard 已提交
9172 9173
#if defined(TARGET_I386) && defined(TARGET_ABI32)
        ret = do_get_thread_area(cpu_env, arg1);
9174
        break;
P
Peter Maydell 已提交
9175 9176
#elif defined(TARGET_M68K)
        {
9177
            TaskState *ts = cpu->opaque;
P
Peter Maydell 已提交
9178 9179 9180
            ret = ts->tp_value;
            break;
        }
B
bellard 已提交
9181
#else
B
bellard 已提交
9182
        goto unimplemented_nowarn;
B
bellard 已提交
9183
#endif
B
bellard 已提交
9184
#endif
B
bellard 已提交
9185 9186 9187
#ifdef TARGET_NR_getdomainname
    case TARGET_NR_getdomainname:
        goto unimplemented_nowarn;
9188
#endif
9189

9190 9191 9192 9193 9194 9195 9196 9197 9198 9199 9200 9201 9202 9203 9204 9205 9206 9207 9208 9209 9210 9211
#ifdef TARGET_NR_clock_gettime
    case TARGET_NR_clock_gettime:
    {
        struct timespec ts;
        ret = get_errno(clock_gettime(arg1, &ts));
        if (!is_error(ret)) {
            host_to_target_timespec(arg2, &ts);
        }
        break;
    }
#endif
#ifdef TARGET_NR_clock_getres
    case TARGET_NR_clock_getres:
    {
        struct timespec ts;
        ret = get_errno(clock_getres(arg1, &ts));
        if (!is_error(ret)) {
            host_to_target_timespec(arg2, &ts);
        }
        break;
    }
#endif
P
pbrook 已提交
9212 9213 9214 9215 9216 9217 9218 9219
#ifdef TARGET_NR_clock_nanosleep
    case TARGET_NR_clock_nanosleep:
    {
        struct timespec ts;
        target_to_host_timespec(&ts, arg3);
        ret = get_errno(clock_nanosleep(arg1, arg2, &ts, arg4 ? &ts : NULL));
        if (arg4)
            host_to_target_timespec(arg4, &ts);
9220 9221 9222 9223 9224 9225 9226 9227

#if defined(TARGET_PPC)
        /* clock_nanosleep is odd in that it returns positive errno values.
         * On PPC, CR0 bit 3 should be set in such a situation. */
        if (ret) {
            ((CPUPPCState *)cpu_env)->crf[0] |= 1;
        }
#endif
P
pbrook 已提交
9228 9229 9230
        break;
    }
#endif
9231

9232 9233
#if defined(TARGET_NR_set_tid_address) && defined(__NR_set_tid_address)
    case TARGET_NR_set_tid_address:
9234 9235
        ret = get_errno(set_tid_address((int *)g2h(arg1)));
        break;
9236 9237
#endif

T
ths 已提交
9238
#if defined(TARGET_NR_tkill) && defined(__NR_tkill)
T
ths 已提交
9239
    case TARGET_NR_tkill:
9240
        ret = get_errno(sys_tkill((int)arg1, target_to_host_signal(arg2)));
T
ths 已提交
9241 9242 9243
        break;
#endif

T
ths 已提交
9244
#if defined(TARGET_NR_tgkill) && defined(__NR_tgkill)
T
ths 已提交
9245
    case TARGET_NR_tgkill:
9246 9247
	ret = get_errno(sys_tgkill((int)arg1, (int)arg2,
                        target_to_host_signal(arg3)));
T
ths 已提交
9248 9249 9250
	break;
#endif

9251 9252
#ifdef TARGET_NR_set_robust_list
    case TARGET_NR_set_robust_list:
9253 9254 9255 9256 9257 9258 9259 9260 9261 9262 9263 9264 9265 9266
    case TARGET_NR_get_robust_list:
        /* The ABI for supporting robust futexes has userspace pass
         * the kernel a pointer to a linked list which is updated by
         * userspace after the syscall; the list is walked by the kernel
         * when the thread exits. Since the linked list in QEMU guest
         * memory isn't a valid linked list for the host and we have
         * no way to reliably intercept the thread-death event, we can't
         * support these. Silently return ENOSYS so that guest userspace
         * falls back to a non-robust futex implementation (which should
         * be OK except in the corner case of the guest crashing while
         * holding a mutex that is shared with another process via
         * shared memory).
         */
        goto unimplemented_nowarn;
9267 9268
#endif

9269
#if defined(TARGET_NR_utimensat)
9270 9271
    case TARGET_NR_utimensat:
        {
R
Riku Voipio 已提交
9272 9273 9274 9275 9276 9277 9278 9279
            struct timespec *tsp, ts[2];
            if (!arg3) {
                tsp = NULL;
            } else {
                target_to_host_timespec(ts, arg3);
                target_to_host_timespec(ts+1, arg3+sizeof(struct target_timespec));
                tsp = ts;
            }
9280
            if (!arg2)
R
Riku Voipio 已提交
9281
                ret = get_errno(sys_utimensat(arg1, NULL, tsp, arg4));
9282
            else {
9283
                if (!(p = lock_user_string(arg2))) {
9284
                    ret = -TARGET_EFAULT;
9285 9286
                    goto fail;
                }
R
Riku Voipio 已提交
9287
                ret = get_errno(sys_utimensat(arg1, path(p), tsp, arg4));
9288
                unlock_user(p, arg2, 0);
9289 9290 9291 9292
            }
        }
	break;
#endif
9293 9294 9295
    case TARGET_NR_futex:
        ret = do_futex(arg1, arg2, arg3, arg4, arg5, arg6);
        break;
9296
#if defined(TARGET_NR_inotify_init) && defined(__NR_inotify_init)
A
aurel32 已提交
9297 9298 9299 9300
    case TARGET_NR_inotify_init:
        ret = get_errno(sys_inotify_init());
        break;
#endif
9301
#ifdef CONFIG_INOTIFY1
9302 9303 9304 9305 9306
#if defined(TARGET_NR_inotify_init1) && defined(__NR_inotify_init1)
    case TARGET_NR_inotify_init1:
        ret = get_errno(sys_inotify_init1(arg1));
        break;
#endif
9307
#endif
9308
#if defined(TARGET_NR_inotify_add_watch) && defined(__NR_inotify_add_watch)
A
aurel32 已提交
9309 9310 9311 9312 9313 9314
    case TARGET_NR_inotify_add_watch:
        p = lock_user_string(arg2);
        ret = get_errno(sys_inotify_add_watch(arg1, path(p), arg3));
        unlock_user(p, arg2, 0);
        break;
#endif
9315
#if defined(TARGET_NR_inotify_rm_watch) && defined(__NR_inotify_rm_watch)
A
aurel32 已提交
9316 9317 9318 9319
    case TARGET_NR_inotify_rm_watch:
        ret = get_errno(sys_inotify_rm_watch(arg1, arg2));
        break;
#endif
9320

9321
#if defined(TARGET_NR_mq_open) && defined(__NR_mq_open)
9322 9323
    case TARGET_NR_mq_open:
        {
9324
            struct mq_attr posix_mq_attr, *attrp;
9325 9326

            p = lock_user_string(arg1 - 1);
9327
            if (arg4 != 0) {
9328
                copy_from_user_mq_attr (&posix_mq_attr, arg4);
9329 9330 9331 9332 9333
                attrp = &posix_mq_attr;
            } else {
                attrp = 0;
            }
            ret = get_errno(mq_open(p, arg2, arg3, attrp));
9334 9335 9336 9337 9338 9339 9340 9341 9342 9343 9344 9345 9346 9347 9348 9349 9350 9351 9352 9353 9354 9355 9356 9357 9358 9359 9360 9361 9362 9363 9364 9365 9366 9367 9368 9369 9370 9371 9372 9373 9374 9375 9376 9377 9378 9379 9380 9381 9382 9383 9384 9385 9386 9387 9388 9389 9390 9391 9392 9393 9394 9395 9396 9397 9398 9399
            unlock_user (p, arg1, 0);
        }
        break;

    case TARGET_NR_mq_unlink:
        p = lock_user_string(arg1 - 1);
        ret = get_errno(mq_unlink(p));
        unlock_user (p, arg1, 0);
        break;

    case TARGET_NR_mq_timedsend:
        {
            struct timespec ts;

            p = lock_user (VERIFY_READ, arg2, arg3, 1);
            if (arg5 != 0) {
                target_to_host_timespec(&ts, arg5);
                ret = get_errno(mq_timedsend(arg1, p, arg3, arg4, &ts));
                host_to_target_timespec(arg5, &ts);
            }
            else
                ret = get_errno(mq_send(arg1, p, arg3, arg4));
            unlock_user (p, arg2, arg3);
        }
        break;

    case TARGET_NR_mq_timedreceive:
        {
            struct timespec ts;
            unsigned int prio;

            p = lock_user (VERIFY_READ, arg2, arg3, 1);
            if (arg5 != 0) {
                target_to_host_timespec(&ts, arg5);
                ret = get_errno(mq_timedreceive(arg1, p, arg3, &prio, &ts));
                host_to_target_timespec(arg5, &ts);
            }
            else
                ret = get_errno(mq_receive(arg1, p, arg3, &prio));
            unlock_user (p, arg2, arg3);
            if (arg4 != 0)
                put_user_u32(prio, arg4);
        }
        break;

    /* Not implemented for now... */
/*     case TARGET_NR_mq_notify: */
/*         break; */

    case TARGET_NR_mq_getsetattr:
        {
            struct mq_attr posix_mq_attr_in, posix_mq_attr_out;
            ret = 0;
            if (arg3 != 0) {
                ret = mq_getattr(arg1, &posix_mq_attr_out);
                copy_to_user_mq_attr(arg3, &posix_mq_attr_out);
            }
            if (arg2 != 0) {
                copy_from_user_mq_attr(&posix_mq_attr_in, arg2);
                ret |= mq_setattr(arg1, &posix_mq_attr_in, &posix_mq_attr_out);
            }

        }
        break;
#endif

9400 9401 9402 9403 9404 9405 9406 9407 9408 9409 9410 9411 9412
#ifdef CONFIG_SPLICE
#ifdef TARGET_NR_tee
    case TARGET_NR_tee:
        {
            ret = get_errno(tee(arg1,arg2,arg3,arg4));
        }
        break;
#endif
#ifdef TARGET_NR_splice
    case TARGET_NR_splice:
        {
            loff_t loff_in, loff_out;
            loff_t *ploff_in = NULL, *ploff_out = NULL;
9413 9414 9415 9416
            if (arg2) {
                if (get_user_u64(loff_in, arg2)) {
                    goto efault;
                }
9417 9418
                ploff_in = &loff_in;
            }
9419 9420 9421 9422
            if (arg4) {
                if (get_user_u64(loff_out, arg4)) {
                    goto efault;
                }
9423 9424 9425
                ploff_out = &loff_out;
            }
            ret = get_errno(splice(arg1, ploff_in, arg3, ploff_out, arg5, arg6));
9426 9427 9428 9429 9430 9431 9432 9433 9434 9435
            if (arg2) {
                if (put_user_u64(loff_in, arg2)) {
                    goto efault;
                }
            }
            if (arg4) {
                if (put_user_u64(loff_out, arg4)) {
                    goto efault;
                }
            }
9436 9437 9438 9439 9440 9441
        }
        break;
#endif
#ifdef TARGET_NR_vmsplice
	case TARGET_NR_vmsplice:
        {
9442 9443 9444 9445 9446 9447 9448
            struct iovec *vec = lock_iovec(VERIFY_READ, arg2, arg3, 1);
            if (vec != NULL) {
                ret = get_errno(vmsplice(arg1, vec, arg3, arg4));
                unlock_iovec(vec, arg2, arg3, 0);
            } else {
                ret = -host_to_target_errno(errno);
            }
9449 9450 9451 9452
        }
        break;
#endif
#endif /* CONFIG_SPLICE */
R
Riku Voipio 已提交
9453 9454 9455 9456 9457 9458 9459 9460
#ifdef CONFIG_EVENTFD
#if defined(TARGET_NR_eventfd)
    case TARGET_NR_eventfd:
        ret = get_errno(eventfd(arg1, 0));
        break;
#endif
#if defined(TARGET_NR_eventfd2)
    case TARGET_NR_eventfd2:
9461 9462 9463 9464 9465 9466 9467 9468 9469
    {
        int host_flags = arg2 & (~(TARGET_O_NONBLOCK | TARGET_O_CLOEXEC));
        if (arg2 & TARGET_O_NONBLOCK) {
            host_flags |= O_NONBLOCK;
        }
        if (arg2 & TARGET_O_CLOEXEC) {
            host_flags |= O_CLOEXEC;
        }
        ret = get_errno(eventfd(arg1, host_flags));
R
Riku Voipio 已提交
9470
        break;
9471
    }
R
Riku Voipio 已提交
9472 9473
#endif
#endif /* CONFIG_EVENTFD  */
9474 9475
#if defined(CONFIG_FALLOCATE) && defined(TARGET_NR_fallocate)
    case TARGET_NR_fallocate:
A
Alexander Graf 已提交
9476 9477 9478 9479
#if TARGET_ABI_BITS == 32
        ret = get_errno(fallocate(arg1, arg2, target_offset64(arg3, arg4),
                                  target_offset64(arg5, arg6)));
#else
9480
        ret = get_errno(fallocate(arg1, arg2, arg3, arg4));
A
Alexander Graf 已提交
9481
#endif
9482
        break;
9483 9484 9485 9486 9487
#endif
#if defined(CONFIG_SYNC_FILE_RANGE)
#if defined(TARGET_NR_sync_file_range)
    case TARGET_NR_sync_file_range:
#if TARGET_ABI_BITS == 32
9488 9489 9490 9491
#if defined(TARGET_MIPS)
        ret = get_errno(sync_file_range(arg1, target_offset64(arg3, arg4),
                                        target_offset64(arg5, arg6), arg7));
#else
9492 9493
        ret = get_errno(sync_file_range(arg1, target_offset64(arg2, arg3),
                                        target_offset64(arg4, arg5), arg6));
9494
#endif /* !TARGET_MIPS */
9495 9496 9497 9498 9499 9500 9501 9502 9503 9504 9505 9506 9507 9508 9509 9510
#else
        ret = get_errno(sync_file_range(arg1, arg2, arg3, arg4));
#endif
        break;
#endif
#if defined(TARGET_NR_sync_file_range2)
    case TARGET_NR_sync_file_range2:
        /* This is like sync_file_range but the arguments are reordered */
#if TARGET_ABI_BITS == 32
        ret = get_errno(sync_file_range(arg1, target_offset64(arg3, arg4),
                                        target_offset64(arg5, arg6), arg2));
#else
        ret = get_errno(sync_file_range(arg1, arg3, arg4, arg2));
#endif
        break;
#endif
9511 9512 9513 9514 9515 9516 9517 9518 9519 9520 9521 9522 9523 9524 9525 9526 9527 9528 9529 9530 9531 9532 9533 9534 9535 9536 9537 9538 9539 9540 9541 9542 9543 9544 9545 9546 9547 9548 9549 9550 9551 9552 9553 9554 9555 9556 9557 9558 9559 9560 9561 9562 9563 9564 9565 9566 9567 9568 9569 9570 9571 9572 9573 9574 9575 9576 9577 9578 9579 9580 9581 9582 9583 9584 9585 9586 9587 9588 9589 9590 9591 9592 9593 9594 9595 9596 9597 9598 9599 9600 9601 9602 9603 9604 9605 9606 9607 9608 9609 9610 9611 9612 9613 9614
#endif
#if defined(CONFIG_EPOLL)
#if defined(TARGET_NR_epoll_create)
    case TARGET_NR_epoll_create:
        ret = get_errno(epoll_create(arg1));
        break;
#endif
#if defined(TARGET_NR_epoll_create1) && defined(CONFIG_EPOLL_CREATE1)
    case TARGET_NR_epoll_create1:
        ret = get_errno(epoll_create1(arg1));
        break;
#endif
#if defined(TARGET_NR_epoll_ctl)
    case TARGET_NR_epoll_ctl:
    {
        struct epoll_event ep;
        struct epoll_event *epp = 0;
        if (arg4) {
            struct target_epoll_event *target_ep;
            if (!lock_user_struct(VERIFY_READ, target_ep, arg4, 1)) {
                goto efault;
            }
            ep.events = tswap32(target_ep->events);
            /* The epoll_data_t union is just opaque data to the kernel,
             * so we transfer all 64 bits across and need not worry what
             * actual data type it is.
             */
            ep.data.u64 = tswap64(target_ep->data.u64);
            unlock_user_struct(target_ep, arg4, 0);
            epp = &ep;
        }
        ret = get_errno(epoll_ctl(arg1, arg2, arg3, epp));
        break;
    }
#endif

#if defined(TARGET_NR_epoll_pwait) && defined(CONFIG_EPOLL_PWAIT)
#define IMPLEMENT_EPOLL_PWAIT
#endif
#if defined(TARGET_NR_epoll_wait) || defined(IMPLEMENT_EPOLL_PWAIT)
#if defined(TARGET_NR_epoll_wait)
    case TARGET_NR_epoll_wait:
#endif
#if defined(IMPLEMENT_EPOLL_PWAIT)
    case TARGET_NR_epoll_pwait:
#endif
    {
        struct target_epoll_event *target_ep;
        struct epoll_event *ep;
        int epfd = arg1;
        int maxevents = arg3;
        int timeout = arg4;

        target_ep = lock_user(VERIFY_WRITE, arg2,
                              maxevents * sizeof(struct target_epoll_event), 1);
        if (!target_ep) {
            goto efault;
        }

        ep = alloca(maxevents * sizeof(struct epoll_event));

        switch (num) {
#if defined(IMPLEMENT_EPOLL_PWAIT)
        case TARGET_NR_epoll_pwait:
        {
            target_sigset_t *target_set;
            sigset_t _set, *set = &_set;

            if (arg5) {
                target_set = lock_user(VERIFY_READ, arg5,
                                       sizeof(target_sigset_t), 1);
                if (!target_set) {
                    unlock_user(target_ep, arg2, 0);
                    goto efault;
                }
                target_to_host_sigset(set, target_set);
                unlock_user(target_set, arg5, 0);
            } else {
                set = NULL;
            }

            ret = get_errno(epoll_pwait(epfd, ep, maxevents, timeout, set));
            break;
        }
#endif
#if defined(TARGET_NR_epoll_wait)
        case TARGET_NR_epoll_wait:
            ret = get_errno(epoll_wait(epfd, ep, maxevents, timeout));
            break;
#endif
        default:
            ret = -TARGET_ENOSYS;
        }
        if (!is_error(ret)) {
            int i;
            for (i = 0; i < ret; i++) {
                target_ep[i].events = tswap32(ep[i].events);
                target_ep[i].data.u64 = tswap64(ep[i].data.u64);
            }
        }
        unlock_user(target_ep, arg2, ret * sizeof(struct target_epoll_event));
        break;
    }
#endif
9615 9616 9617 9618 9619 9620 9621
#endif
#ifdef TARGET_NR_prlimit64
    case TARGET_NR_prlimit64:
    {
        /* args: pid, resource number, ptr to new rlimit, ptr to old rlimit */
        struct target_rlimit64 *target_rnew, *target_rold;
        struct host_rlimit64 rnew, rold, *rnewp = 0;
9622
        int resource = target_to_host_resource(arg2);
9623 9624 9625 9626 9627 9628 9629 9630 9631 9632
        if (arg3) {
            if (!lock_user_struct(VERIFY_READ, target_rnew, arg3, 1)) {
                goto efault;
            }
            rnew.rlim_cur = tswap64(target_rnew->rlim_cur);
            rnew.rlim_max = tswap64(target_rnew->rlim_max);
            unlock_user_struct(target_rnew, arg3, 0);
            rnewp = &rnew;
        }

9633
        ret = get_errno(sys_prlimit64(arg1, resource, rnewp, arg4 ? &rold : 0));
9634 9635 9636 9637 9638 9639 9640 9641 9642 9643
        if (!is_error(ret) && arg4) {
            if (!lock_user_struct(VERIFY_WRITE, target_rold, arg4, 1)) {
                goto efault;
            }
            target_rold->rlim_cur = tswap64(rold.rlim_cur);
            target_rold->rlim_max = tswap64(rold.rlim_max);
            unlock_user_struct(target_rold, arg4, 1);
        }
        break;
    }
9644 9645 9646 9647 9648 9649 9650 9651 9652 9653 9654 9655 9656
#endif
#ifdef TARGET_NR_gethostname
    case TARGET_NR_gethostname:
    {
        char *name = lock_user(VERIFY_WRITE, arg1, arg2, 0);
        if (name) {
            ret = get_errno(gethostname(name, arg2));
            unlock_user(name, arg1, arg2);
        } else {
            ret = -TARGET_EFAULT;
        }
        break;
    }
9657 9658 9659 9660 9661 9662 9663 9664 9665 9666 9667 9668 9669 9670 9671 9672 9673 9674 9675 9676 9677 9678 9679 9680 9681 9682
#endif
#ifdef TARGET_NR_atomic_cmpxchg_32
    case TARGET_NR_atomic_cmpxchg_32:
    {
        /* should use start_exclusive from main.c */
        abi_ulong mem_value;
        if (get_user_u32(mem_value, arg6)) {
            target_siginfo_t info;
            info.si_signo = SIGSEGV;
            info.si_errno = 0;
            info.si_code = TARGET_SEGV_MAPERR;
            info._sifields._sigfault._addr = arg6;
            queue_signal((CPUArchState *)cpu_env, info.si_signo, &info);
            ret = 0xdeadbeef;

        }
        if (mem_value == arg2)
            put_user_u32(arg1, arg6);
        ret = mem_value;
        break;
    }
#endif
#ifdef TARGET_NR_atomic_barrier
    case TARGET_NR_atomic_barrier:
    {
        /* Like the kernel implementation and the qemu arm barrier, no-op this? */
9683
        ret = 0;
9684 9685
        break;
    }
9686
#endif
9687 9688 9689 9690 9691 9692 9693 9694 9695 9696 9697 9698 9699 9700 9701 9702 9703 9704

#ifdef TARGET_NR_timer_create
    case TARGET_NR_timer_create:
    {
        /* args: clockid_t clockid, struct sigevent *sevp, timer_t *timerid */

        struct sigevent host_sevp = { {0}, }, *phost_sevp = NULL;

        int clkid = arg1;
        int timer_index = next_free_host_timer();

        if (timer_index < 0) {
            ret = -TARGET_EAGAIN;
        } else {
            timer_t *phtimer = g_posix_timers  + timer_index;

            if (arg2) {
                phost_sevp = &host_sevp;
9705 9706 9707 9708
                ret = target_to_host_sigevent(phost_sevp, arg2);
                if (ret != 0) {
                    break;
                }
9709 9710 9711 9712 9713 9714
            }

            ret = get_errno(timer_create(clkid, phost_sevp, phtimer));
            if (ret) {
                phtimer = NULL;
            } else {
9715
                if (put_user(TIMER_MAGIC | timer_index, arg3, target_timer_t)) {
9716 9717 9718 9719 9720 9721 9722 9723 9724 9725 9726 9727 9728
                    goto efault;
                }
            }
        }
        break;
    }
#endif

#ifdef TARGET_NR_timer_settime
    case TARGET_NR_timer_settime:
    {
        /* args: timer_t timerid, int flags, const struct itimerspec *new_value,
         * struct itimerspec * old_value */
9729
        target_timer_t timerid = get_timer_id(arg1);
9730

9731 9732 9733
        if (timerid < 0) {
            ret = timerid;
        } else if (arg3 == 0) {
9734 9735
            ret = -TARGET_EINVAL;
        } else {
9736
            timer_t htimer = g_posix_timers[timerid];
9737 9738 9739 9740 9741 9742 9743 9744 9745 9746 9747 9748 9749 9750 9751
            struct itimerspec hspec_new = {{0},}, hspec_old = {{0},};

            target_to_host_itimerspec(&hspec_new, arg3);
            ret = get_errno(
                          timer_settime(htimer, arg2, &hspec_new, &hspec_old));
            host_to_target_itimerspec(arg2, &hspec_old);
        }
        break;
    }
#endif

#ifdef TARGET_NR_timer_gettime
    case TARGET_NR_timer_gettime:
    {
        /* args: timer_t timerid, struct itimerspec *curr_value */
9752
        target_timer_t timerid = get_timer_id(arg1);
9753

9754 9755 9756 9757
        if (timerid < 0) {
            ret = timerid;
        } else if (!arg2) {
            ret = -TARGET_EFAULT;
9758
        } else {
9759
            timer_t htimer = g_posix_timers[timerid];
9760 9761 9762 9763 9764 9765 9766 9767 9768 9769 9770 9771 9772 9773 9774
            struct itimerspec hspec;
            ret = get_errno(timer_gettime(htimer, &hspec));

            if (host_to_target_itimerspec(arg2, &hspec)) {
                ret = -TARGET_EFAULT;
            }
        }
        break;
    }
#endif

#ifdef TARGET_NR_timer_getoverrun
    case TARGET_NR_timer_getoverrun:
    {
        /* args: timer_t timerid */
9775
        target_timer_t timerid = get_timer_id(arg1);
9776

9777 9778
        if (timerid < 0) {
            ret = timerid;
9779
        } else {
9780
            timer_t htimer = g_posix_timers[timerid];
9781 9782 9783 9784 9785 9786 9787 9788 9789 9790
            ret = get_errno(timer_getoverrun(htimer));
        }
        break;
    }
#endif

#ifdef TARGET_NR_timer_delete
    case TARGET_NR_timer_delete:
    {
        /* args: timer_t timerid */
9791
        target_timer_t timerid = get_timer_id(arg1);
9792

9793 9794
        if (timerid < 0) {
            ret = timerid;
9795
        } else {
9796
            timer_t htimer = g_posix_timers[timerid];
9797
            ret = get_errno(timer_delete(htimer));
9798
            g_posix_timers[timerid] = 0;
9799 9800 9801 9802 9803
        }
        break;
    }
#endif

9804 9805 9806 9807 9808 9809 9810 9811 9812 9813 9814 9815 9816 9817 9818 9819 9820 9821 9822 9823 9824 9825 9826 9827 9828 9829 9830 9831 9832 9833 9834 9835 9836 9837 9838 9839 9840 9841 9842 9843 9844 9845 9846 9847
#if defined(TARGET_NR_timerfd_create) && defined(CONFIG_TIMERFD)
    case TARGET_NR_timerfd_create:
        ret = get_errno(timerfd_create(arg1,
                target_to_host_bitmask(arg2, fcntl_flags_tbl)));
        break;
#endif

#if defined(TARGET_NR_timerfd_gettime) && defined(CONFIG_TIMERFD)
    case TARGET_NR_timerfd_gettime:
        {
            struct itimerspec its_curr;

            ret = get_errno(timerfd_gettime(arg1, &its_curr));

            if (arg2 && host_to_target_itimerspec(arg2, &its_curr)) {
                goto efault;
            }
        }
        break;
#endif

#if defined(TARGET_NR_timerfd_settime) && defined(CONFIG_TIMERFD)
    case TARGET_NR_timerfd_settime:
        {
            struct itimerspec its_new, its_old, *p_new;

            if (arg3) {
                if (target_to_host_itimerspec(&its_new, arg3)) {
                    goto efault;
                }
                p_new = &its_new;
            } else {
                p_new = NULL;
            }

            ret = get_errno(timerfd_settime(arg1, arg2, p_new, &its_old));

            if (arg4 && host_to_target_itimerspec(arg4, &its_old)) {
                goto efault;
            }
        }
        break;
#endif

9848 9849 9850 9851 9852 9853 9854 9855 9856 9857 9858 9859
#if defined(TARGET_NR_ioprio_get) && defined(__NR_ioprio_get)
    case TARGET_NR_ioprio_get:
        ret = get_errno(ioprio_get(arg1, arg2));
        break;
#endif

#if defined(TARGET_NR_ioprio_set) && defined(__NR_ioprio_set)
    case TARGET_NR_ioprio_set:
        ret = get_errno(ioprio_set(arg1, arg2, arg3));
        break;
#endif

R
Riku Voipio 已提交
9860 9861 9862 9863 9864 9865 9866 9867 9868 9869 9870
#if defined(TARGET_NR_setns) && defined(CONFIG_SETNS)
    case TARGET_NR_setns:
        ret = get_errno(setns(arg1, arg2));
        break;
#endif
#if defined(TARGET_NR_unshare) && defined(CONFIG_SETNS)
    case TARGET_NR_unshare:
        ret = get_errno(unshare(arg1));
        break;
#endif

9871 9872
    default:
    unimplemented:
B
bellard 已提交
9873
        gemu_log("qemu: Unsupported syscall: %d\n", num);
9874
#if defined(TARGET_NR_setxattr) || defined(TARGET_NR_get_thread_area) || defined(TARGET_NR_getdomainname) || defined(TARGET_NR_set_robust_list)
B
bellard 已提交
9875
    unimplemented_nowarn:
B
bellard 已提交
9876
#endif
9877
        ret = -TARGET_ENOSYS;
9878 9879
        break;
    }
9880
fail:
B
bellard 已提交
9881
#ifdef DEBUG
9882
    gemu_log(" = " TARGET_ABI_FMT_ld "\n", ret);
B
bellard 已提交
9883
#endif
9884 9885
    if(do_strace)
        print_syscall_ret(num, ret);
9886
    return ret;
9887 9888 9889
efault:
    ret = -TARGET_EFAULT;
    goto fail;
9890
}