]> Git Repo - qemu.git/blame - linux-user/syscall.c
projects / qemu.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
nbd: Group all Linux-specific ioctl code in one place
[qemu.git] / linux-user / syscall.c
CommitLineData
31e31b8a
FB		 1/*
2 * Linux syscalls
5fafdf24 3 *
31e31b8a
FB		 4 * Copyright (c) 2003 Fabrice Bellard
5 *
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
10 *
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License
8167ee88 17 * along with this program; if not, see <http://www.gnu.org/licenses/>.
31e31b8a 18 */
d5b3a9b6 19#define _ATFILE_SOURCE
d39594e9 20#include "qemu/osdep.h"
f348b6d1
VB		 21#include "qemu/cutils.h"
22#include "qemu/path.h"
31e31b8a
FB		 23#include <elf.h>
24#include <endian.h>
c56dc774 25#include <grp.h>
d08d3bb8
TS		 26#include <sys/ipc.h>
27#include <sys/msg.h>
31e31b8a 28#include <sys/wait.h>
31e31b8a 29#include <sys/mount.h>
586b0bef
JS		 30#include <sys/file.h>
31#include <sys/fsuid.h>
32#include <sys/personality.h>
39b9aae1 33#include <sys/prctl.h>
31e31b8a 34#include <sys/resource.h>
31e31b8a 35#include <sys/swap.h>
e0eb210e 36#include <linux/capability.h>
31e31b8a 37#include <sched.h>
60e99246
AJ		 38#ifdef __ia64__
39int __clone2(int (*fn)(void *), void *child_stack_base,
40 size_t stack_size, int flags, void *arg, ...);
41#endif
31e31b8a 42#include <sys/socket.h>
607175e0 43#include <sys/un.h>
31e31b8a 44#include <sys/uio.h>
9de5e440 45#include <sys/poll.h>
32f36bce 46#include <sys/times.h>
8853f86e 47#include <sys/shm.h>
fa294816 48#include <sys/sem.h>
56c8f68f 49#include <sys/statfs.h>
ebc05488 50#include <utime.h>
a5448a7d 51#include <sys/sysinfo.h>
e36800c9 52#include <sys/signalfd.h>
72f03900 53//#include <sys/user.h>
8853f86e 54#include <netinet/ip.h>
7854b056 55#include <netinet/tcp.h>
86fcd946 56#include <linux/wireless.h>
920394db 57#include <linux/icmp.h>
5a61cb60 58#include "qemu-common.h"
d80a1905
RV		 59#ifdef CONFIG_TIMERFD
60#include <sys/timerfd.h>
61#endif
9788c9ca 62#ifdef TARGET_GPROF
6d946cda
AJ		 63#include <sys/gmon.h>
64#endif
c2882b96
RV		 65#ifdef CONFIG_EVENTFD
66#include <sys/eventfd.h>
67#endif
3b6edd16
PM		 68#ifdef CONFIG_EPOLL
69#include <sys/epoll.h>
70#endif
a790ae38 71#ifdef CONFIG_ATTR
1de7afc9 72#include "qemu/xattr.h"
a790ae38 73#endif
a8fd1aba
PM		 74#ifdef CONFIG_SENDFILE
75#include <sys/sendfile.h>
76#endif
31e31b8a
FB		 77
78#define termios host_termios
79#define winsize host_winsize
80#define termio host_termio
04369ff2
FB		 81#define sgttyb host_sgttyb /* same as target */
82#define tchars host_tchars /* same as target */
83#define ltchars host_ltchars /* same as target */
31e31b8a
FB		 84
85#include <linux/termios.h>
86#include <linux/unistd.h>
31e31b8a
FB		 87#include <linux/cdrom.h>
88#include <linux/hdreg.h>
89#include <linux/soundcard.h>
19b84f3c 90#include <linux/kd.h>
8fbd6b52 91#include <linux/mtio.h>
350d1779 92#include <linux/fs.h>
dace20dc 93#if defined(CONFIG_FIEMAP)
285da2b9 94#include <linux/fiemap.h>
dace20dc 95#endif
f7680a55
UH		 96#include <linux/fb.h>
97#include <linux/vt.h>
56e904ec 98#include <linux/dm-ioctl.h>
c07ecc68 99#include <linux/reboot.h>
7ff7b666 100#include <linux/route.h>
f57d4192 101#include <linux/filter.h>
fff8c539 102#include <linux/blkpg.h>
6c5b5645 103#include <linux/netlink.h>
575b22b1 104#ifdef CONFIG_RTNETLINK
6c5b5645 105#include <linux/rtnetlink.h>
575b22b1 106#endif
5ce9bb59 107#include <linux/audit.h>
d7e4036e 108#include "linux_loop.h"
18cb0088 109#include "uname.h"
31e31b8a 110
3ef693a0 111#include "qemu.h"
31e31b8a 112
d865bab5
PB		 113#define CLONE_NPTL_FLAGS2 (CLONE_SETTLS | \
114 CLONE_PARENT_SETTID | CLONE_CHILD_SETTID | CLONE_CHILD_CLEARTID)
30813cea 115
72f03900 116//#define DEBUG
71a8f7fe
TB		 117/* Define DEBUG_ERESTARTSYS to force every syscall to be restarted
118 * once. This exercises the codepaths for restart.
119 */
120//#define DEBUG_ERESTARTSYS
31e31b8a 121
1a9353d2 122//#include <linux/msdos_fs.h>
6556a833
AJ		 123#define VFAT_IOCTL_READDIR_BOTH _IOR('r', 1, struct linux_dirent [2])
124#define VFAT_IOCTL_READDIR_SHORT _IOR('r', 2, struct linux_dirent [2])
1a9353d2 125
b28a1f33
PM		 126/* This is the size of the host kernel's sigset_t, needed where we make
127 * direct system calls that take a sigset_t pointer and a size.
128 */
129#define SIGSET_T_SIZE (_NSIG / 8)
70a194b9 130
70a194b9
FB		 131#undef _syscall0
132#undef _syscall1
133#undef _syscall2
134#undef _syscall3
135#undef _syscall4
136#undef _syscall5
83fcb515 137#undef _syscall6
70a194b9 138
83fcb515 139#define _syscall0(type,name) \
8fcd3692 140static type name (void) \
83fcb515
FB		 141{ \
142 return syscall(__NR_##name); \
143}
70a194b9 144
83fcb515 145#define _syscall1(type,name,type1,arg1) \
8fcd3692 146static type name (type1 arg1) \
83fcb515
FB		 147{ \
148 return syscall(__NR_##name, arg1); \
70a194b9
FB		 149}
150
83fcb515 151#define _syscall2(type,name,type1,arg1,type2,arg2) \
8fcd3692 152static type name (type1 arg1,type2 arg2) \
83fcb515
FB		 153{ \
154 return syscall(__NR_##name, arg1, arg2); \
70a194b9
FB		 155}
156
83fcb515 157#define _syscall3(type,name,type1,arg1,type2,arg2,type3,arg3) \
8fcd3692 158static type name (type1 arg1,type2 arg2,type3 arg3) \
83fcb515
FB		 159{ \
160 return syscall(__NR_##name, arg1, arg2, arg3); \
70a194b9
FB		 161}
162
83fcb515 163#define _syscall4(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4) \
8fcd3692 164static type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4) \
83fcb515
FB		 165{ \
166 return syscall(__NR_##name, arg1, arg2, arg3, arg4); \
70a194b9
FB		 167}
168
83fcb515
FB		 169#define _syscall5(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4, \
170 type5,arg5) \
8fcd3692 171static type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4,type5 arg5) \
83fcb515
FB		 172{ \
173 return syscall(__NR_##name, arg1, arg2, arg3, arg4, arg5); \
70a194b9
FB		 174}
175
83fcb515
FB		 176
177#define _syscall6(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4, \
178 type5,arg5,type6,arg6) \
8fcd3692
BS		 179static type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4,type5 arg5, \
180 type6 arg6) \
83fcb515
FB		 181{ \
182 return syscall(__NR_##name, arg1, arg2, arg3, arg4, arg5, arg6); \
70a194b9 183}
83fcb515 184
70a194b9 185
31e31b8a 186#define __NR_sys_uname __NR_uname
72f03900 187#define __NR_sys_getcwd1 __NR_getcwd
72f03900 188#define __NR_sys_getdents __NR_getdents
dab2ed99 189#define __NR_sys_getdents64 __NR_getdents64
c6cda17a 190#define __NR_sys_getpriority __NR_getpriority
66fb9763 191#define __NR_sys_rt_sigqueueinfo __NR_rt_sigqueueinfo
7494b0f9 192#define __NR_sys_syslog __NR_syslog
bd0c5661 193#define __NR_sys_futex __NR_futex
39b59763
AJ		 194#define __NR_sys_inotify_init __NR_inotify_init
195#define __NR_sys_inotify_add_watch __NR_inotify_add_watch
196#define __NR_sys_inotify_rm_watch __NR_inotify_rm_watch
31e31b8a 197
42a39fbe
AG		 198#if defined(__alpha__) || defined (__ia64__) || defined(__x86_64__) || \
199 defined(__s390x__)
9af9eaaa
FB		 200#define __NR__llseek __NR_lseek
201#endif
202
a29e5ba2
JH		 203/* Newer kernel ports have llseek() instead of _llseek() */
204#if defined(TARGET_NR_llseek) && !defined(TARGET_NR__llseek)
205#define TARGET_NR__llseek TARGET_NR_llseek
206#endif
207
72f03900 208#ifdef __NR_gettid
31e31b8a 209_syscall0(int, gettid)
72f03900 210#else
0da46a6e
TS		 211/* This is a replacement for the host gettid() and must return a host
212 errno. */
72f03900
FB		 213static int gettid(void) {
214 return -ENOSYS;
215}
216#endif
704eff6c 217#if defined(TARGET_NR_getdents) && defined(__NR_getdents)
3b3f24ad 218_syscall3(int, sys_getdents, uint, fd, struct linux_dirent *, dirp, uint, count);
3307e236
PM		 219#endif
220#if !defined(__NR_getdents) || \
221 (defined(TARGET_NR_getdents64) && defined(__NR_getdents64))
3b3f24ad
AJ		 222_syscall3(int, sys_getdents64, uint, fd, struct linux_dirent64 *, dirp, uint, count);
223#endif
d35b261c 224#if defined(TARGET_NR__llseek) && defined(__NR_llseek)
3b3f24ad
AJ		 225_syscall5(int, _llseek, uint, fd, ulong, hi, ulong, lo,
226 loff_t *, res, uint, wh);
227#endif
228_syscall3(int,sys_rt_sigqueueinfo,int,pid,int,sig,siginfo_t *,uinfo)
229_syscall3(int,sys_syslog,int,type,char*,bufp,int,len)
3b3f24ad
AJ		 230#ifdef __NR_exit_group
231_syscall1(int,exit_group,int,error_code)
232#endif
233#if defined(TARGET_NR_set_tid_address) && defined(__NR_set_tid_address)
234_syscall1(int,set_tid_address,int *,tidptr)
235#endif
3b3f24ad
AJ		 236#if defined(TARGET_NR_futex) && defined(__NR_futex)
237_syscall6(int,sys_futex,int *,uaddr,int,op,int,val,
238 const struct timespec *,timeout,int *,uaddr2,int,val3)
239#endif
737de1d1
MF		 240#define __NR_sys_sched_getaffinity __NR_sched_getaffinity
241_syscall3(int, sys_sched_getaffinity, pid_t, pid, unsigned int, len,
242 unsigned long *, user_mask_ptr);
243#define __NR_sys_sched_setaffinity __NR_sched_setaffinity
244_syscall3(int, sys_sched_setaffinity, pid_t, pid, unsigned int, len,
245 unsigned long *, user_mask_ptr);
0f6b4d21
AG		 246_syscall4(int, reboot, int, magic1, int, magic2, unsigned int, cmd,
247 void *, arg);
e0eb210e
PM		 248_syscall2(int, capget, struct __user_cap_header_struct *, header,
249 struct __user_cap_data_struct *, data);
250_syscall2(int, capset, struct __user_cap_header_struct *, header,
251 struct __user_cap_data_struct *, data);
ab31cda3
PB		 252#if defined(TARGET_NR_ioprio_get) && defined(__NR_ioprio_get)
253_syscall2(int, ioprio_get, int, which, int, who)
254#endif
255#if defined(TARGET_NR_ioprio_set) && defined(__NR_ioprio_set)
256_syscall3(int, ioprio_set, int, which, int, who, int, ioprio)
257#endif
f894efd1
LV		 258#if defined(TARGET_NR_getrandom) && defined(__NR_getrandom)
259_syscall3(int, getrandom, void *, buf, size_t, buflen, unsigned int, flags)
260#endif
3b3f24ad
AJ		 261
262static bitmask_transtbl fcntl_flags_tbl[] = {
263 { TARGET_O_ACCMODE, TARGET_O_WRONLY, O_ACCMODE, O_WRONLY, },
264 { TARGET_O_ACCMODE, TARGET_O_RDWR, O_ACCMODE, O_RDWR, },
265 { TARGET_O_CREAT, TARGET_O_CREAT, O_CREAT, O_CREAT, },
266 { TARGET_O_EXCL, TARGET_O_EXCL, O_EXCL, O_EXCL, },
267 { TARGET_O_NOCTTY, TARGET_O_NOCTTY, O_NOCTTY, O_NOCTTY, },
268 { TARGET_O_TRUNC, TARGET_O_TRUNC, O_TRUNC, O_TRUNC, },
269 { TARGET_O_APPEND, TARGET_O_APPEND, O_APPEND, O_APPEND, },
270 { TARGET_O_NONBLOCK, TARGET_O_NONBLOCK, O_NONBLOCK, O_NONBLOCK, },
afc8763f 271 { TARGET_O_SYNC, TARGET_O_DSYNC, O_SYNC, O_DSYNC, },
3b3f24ad
AJ		 272 { TARGET_O_SYNC, TARGET_O_SYNC, O_SYNC, O_SYNC, },
273 { TARGET_FASYNC, TARGET_FASYNC, FASYNC, FASYNC, },
274 { TARGET_O_DIRECTORY, TARGET_O_DIRECTORY, O_DIRECTORY, O_DIRECTORY, },
275 { TARGET_O_NOFOLLOW, TARGET_O_NOFOLLOW, O_NOFOLLOW, O_NOFOLLOW, },
3b3f24ad
AJ		 276#if defined(O_DIRECT)
277 { TARGET_O_DIRECT, TARGET_O_DIRECT, O_DIRECT, O_DIRECT, },
afc8763f
RH		 278#endif
279#if defined(O_NOATIME)
280 { TARGET_O_NOATIME, TARGET_O_NOATIME, O_NOATIME, O_NOATIME },
281#endif
282#if defined(O_CLOEXEC)
283 { TARGET_O_CLOEXEC, TARGET_O_CLOEXEC, O_CLOEXEC, O_CLOEXEC },
284#endif
285#if defined(O_PATH)
286 { TARGET_O_PATH, TARGET_O_PATH, O_PATH, O_PATH },
287#endif
288 /* Don't terminate the list prematurely on 64-bit host+guest. */
289#if TARGET_O_LARGEFILE != 0 || O_LARGEFILE != 0
290 { TARGET_O_LARGEFILE, TARGET_O_LARGEFILE, O_LARGEFILE, O_LARGEFILE, },
3b3f24ad
AJ		 291#endif
292 { 0, 0, 0, 0 }
293};
294
5d4d3665 295typedef abi_long (*TargetFdDataFunc)(void *, size_t);
7b36f782 296typedef abi_long (*TargetFdAddrFunc)(void *, abi_ulong, socklen_t);
e36800c9 297typedef struct TargetFdTrans {
5d4d3665
LV		 298 TargetFdDataFunc host_to_target_data;
299 TargetFdDataFunc target_to_host_data;
7b36f782 300 TargetFdAddrFunc target_to_host_addr;
e36800c9
LV		 301} TargetFdTrans;
302
303static TargetFdTrans **target_fd_trans;
304
305static unsigned int target_fd_max;
306
6c5b5645
LV		 307static TargetFdDataFunc fd_trans_target_to_host_data(int fd)
308{
309 if (fd >= 0 && fd < target_fd_max && target_fd_trans[fd]) {
310 return target_fd_trans[fd]->target_to_host_data;
311 }
312 return NULL;
313}
314
5d4d3665 315static TargetFdDataFunc fd_trans_host_to_target_data(int fd)
e36800c9 316{
861d72cd 317 if (fd >= 0 && fd < target_fd_max && target_fd_trans[fd]) {
5d4d3665 318 return target_fd_trans[fd]->host_to_target_data;
e36800c9
LV		 319 }
320 return NULL;
321}
322
7b36f782
LV		 323static TargetFdAddrFunc fd_trans_target_to_host_addr(int fd)
324{
861d72cd 325 if (fd >= 0 && fd < target_fd_max && target_fd_trans[fd]) {
7b36f782
LV		 326 return target_fd_trans[fd]->target_to_host_addr;
327 }
328 return NULL;
329}
330
e36800c9
LV		 331static void fd_trans_register(int fd, TargetFdTrans *trans)
332{
333 unsigned int oldmax;
334
335 if (fd >= target_fd_max) {
336 oldmax = target_fd_max;
337 target_fd_max = ((fd >> 6) + 1) << 6; /* by slice of 64 entries */
5089c7ce
LV		 338 target_fd_trans = g_renew(TargetFdTrans *,
339 target_fd_trans, target_fd_max);
e36800c9
LV		 340 memset((void *)(target_fd_trans + oldmax), 0,
341 (target_fd_max - oldmax) * sizeof(TargetFdTrans *));
342 }
343 target_fd_trans[fd] = trans;
344}
345
346static void fd_trans_unregister(int fd)
347{
348 if (fd >= 0 && fd < target_fd_max) {
349 target_fd_trans[fd] = NULL;
350 }
351}
352
353static void fd_trans_dup(int oldfd, int newfd)
354{
355 fd_trans_unregister(newfd);
356 if (oldfd < target_fd_max && target_fd_trans[oldfd]) {
357 fd_trans_register(newfd, target_fd_trans[oldfd]);
358 }
359}
360
3b3f24ad
AJ		 361static int sys_getcwd1(char *buf, size_t size)
362{
363 if (getcwd(buf, size) == NULL) {
364 /* getcwd() sets errno */
365 return (-1);
366 }
aaf4ad39 367 return strlen(buf)+1;
3b3f24ad
AJ		 368}
369
1acae9f2 370#ifdef TARGET_NR_utimensat
ebc996f3
RV		 371#ifdef CONFIG_UTIMENSAT
372static int sys_utimensat(int dirfd, const char *pathname,
373 const struct timespec times[2], int flags)
374{
375 if (pathname == NULL)
376 return futimens(dirfd, times);
377 else
378 return utimensat(dirfd, pathname, times, flags);
379}
1acae9f2
PM		 380#elif defined(__NR_utimensat)
381#define __NR_sys_utimensat __NR_utimensat
9007f0ef
TS		 382_syscall4(int,sys_utimensat,int,dirfd,const char *,pathname,
383 const struct timespec *,tsp,int,flags)
1acae9f2
PM		 384#else
385static int sys_utimensat(int dirfd, const char *pathname,
386 const struct timespec times[2], int flags)
387{
388 errno = ENOSYS;
389 return -1;
390}
9007f0ef 391#endif
1acae9f2 392#endif /* TARGET_NR_utimensat */
3b3f24ad
AJ		 393
394#ifdef CONFIG_INOTIFY
8690e420 395#include <sys/inotify.h>
3b3f24ad 396
39b59763 397#if defined(TARGET_NR_inotify_init) && defined(__NR_inotify_init)
3b3f24ad
AJ		 398static int sys_inotify_init(void)
399{
400 return (inotify_init());
401}
39b59763
AJ		 402#endif
403#if defined(TARGET_NR_inotify_add_watch) && defined(__NR_inotify_add_watch)
3b3f24ad
AJ		 404static int sys_inotify_add_watch(int fd,const char *pathname, int32_t mask)
405{
406 return (inotify_add_watch(fd, pathname, mask));
407}
39b59763
AJ		 408#endif
409#if defined(TARGET_NR_inotify_rm_watch) && defined(__NR_inotify_rm_watch)
3b3f24ad
AJ		 410static int sys_inotify_rm_watch(int fd, int32_t wd)
411{
8690e420 412 return (inotify_rm_watch(fd, wd));
3b3f24ad 413}
bd0c5661 414#endif
c05c7a73
RV		 415#ifdef CONFIG_INOTIFY1
416#if defined(TARGET_NR_inotify_init1) && defined(__NR_inotify_init1)
417static int sys_inotify_init1(int flags)
418{
419 return (inotify_init1(flags));
420}
421#endif
422#endif
3b3f24ad
AJ		 423#else
424/* Userspace can usually survive runtime without inotify */
425#undef TARGET_NR_inotify_init
c05c7a73 426#undef TARGET_NR_inotify_init1
3b3f24ad
AJ		 427#undef TARGET_NR_inotify_add_watch
428#undef TARGET_NR_inotify_rm_watch
429#endif /* CONFIG_INOTIFY */
430
163a05a8
PM		 431#if defined(TARGET_NR_prlimit64)
432#ifndef __NR_prlimit64
433# define __NR_prlimit64 -1
434#endif
435#define __NR_sys_prlimit64 __NR_prlimit64
436/* The glibc rlimit structure may not be that used by the underlying syscall */
437struct host_rlimit64 {
438 uint64_t rlim_cur;
439 uint64_t rlim_max;
440};
441_syscall4(int, sys_prlimit64, pid_t, pid, int, resource,
442 const struct host_rlimit64 *, new_limit,
443 struct host_rlimit64 *, old_limit)
444#endif
445
f4f1e10a
ECL		 446
447#if defined(TARGET_NR_timer_create)
448/* Maxiumum of 32 active POSIX timers allowed at any one time. */
449static timer_t g_posix_timers[32] = { 0, } ;
450
451static inline int next_free_host_timer(void)
452{
453 int k ;
454 /* FIXME: Does finding the next free slot require a lock? */
455 for (k = 0; k < ARRAY_SIZE(g_posix_timers); k++) {
456 if (g_posix_timers[k] == 0) {
457 g_posix_timers[k] = (timer_t) 1;
458 return k;
459 }
460 }
461 return -1;
462}
463#endif
464
48e515d4 465/* ARM EABI and MIPS expect 64bit types aligned even on pairs or registers */
4a1def4e 466#ifdef TARGET_ARM
48e515d4
RV		 467static inline int regpairs_aligned(void *cpu_env) {
468 return ((((CPUARMState *)cpu_env)->eabi) == 1) ;
469}
470#elif defined(TARGET_MIPS)
471static inline int regpairs_aligned(void *cpu_env) { return 1; }
4a1def4e
AG		 472#elif defined(TARGET_PPC) && !defined(TARGET_PPC64)
473/* SysV AVI for PPC32 expects 64bit parameters to be passed on odd/even pairs
474 * of registers which translates to the same as ARM/MIPS, because we start with
475 * r3 as arg1 */
476static inline int regpairs_aligned(void *cpu_env) { return 1; }
48e515d4
RV		 477#else
478static inline int regpairs_aligned(void *cpu_env) { return 0; }
479#endif
480
b92c47c1
TS		 481#define ERRNO_TABLE_SIZE 1200
482
483/* target_to_host_errno_table[] is initialized from
484 * host_to_target_errno_table[] in syscall_init(). */
485static uint16_t target_to_host_errno_table[ERRNO_TABLE_SIZE] = {
486};
487
637947f1 488/*
fe8f096b 489 * This list is the union of errno values overridden in asm-<arch>/errno.h
637947f1
TS		 490 * minus the errnos that are not actually generic to all archs.
491 */
b92c47c1 492static uint16_t host_to_target_errno_table[ERRNO_TABLE_SIZE] = {
08703b9f 493 [EAGAIN] = TARGET_EAGAIN,
637947f1
TS		 494 [EIDRM] = TARGET_EIDRM,
495 [ECHRNG] = TARGET_ECHRNG,
496 [EL2NSYNC] = TARGET_EL2NSYNC,
497 [EL3HLT] = TARGET_EL3HLT,
498 [EL3RST] = TARGET_EL3RST,
499 [ELNRNG] = TARGET_ELNRNG,
500 [EUNATCH] = TARGET_EUNATCH,
501 [ENOCSI] = TARGET_ENOCSI,
502 [EL2HLT] = TARGET_EL2HLT,
503 [EDEADLK] = TARGET_EDEADLK,
504 [ENOLCK] = TARGET_ENOLCK,
505 [EBADE] = TARGET_EBADE,
506 [EBADR] = TARGET_EBADR,
507 [EXFULL] = TARGET_EXFULL,
508 [ENOANO] = TARGET_ENOANO,
509 [EBADRQC] = TARGET_EBADRQC,
510 [EBADSLT] = TARGET_EBADSLT,
511 [EBFONT] = TARGET_EBFONT,
512 [ENOSTR] = TARGET_ENOSTR,
513 [ENODATA] = TARGET_ENODATA,
514 [ETIME] = TARGET_ETIME,
515 [ENOSR] = TARGET_ENOSR,
516 [ENONET] = TARGET_ENONET,
517 [ENOPKG] = TARGET_ENOPKG,
518 [EREMOTE] = TARGET_EREMOTE,
519 [ENOLINK] = TARGET_ENOLINK,
520 [EADV] = TARGET_EADV,
521 [ESRMNT] = TARGET_ESRMNT,
522 [ECOMM] = TARGET_ECOMM,
523 [EPROTO] = TARGET_EPROTO,
524 [EDOTDOT] = TARGET_EDOTDOT,
525 [EMULTIHOP] = TARGET_EMULTIHOP,
526 [EBADMSG] = TARGET_EBADMSG,
527 [ENAMETOOLONG] = TARGET_ENAMETOOLONG,
528 [EOVERFLOW] = TARGET_EOVERFLOW,
529 [ENOTUNIQ] = TARGET_ENOTUNIQ,
530 [EBADFD] = TARGET_EBADFD,
531 [EREMCHG] = TARGET_EREMCHG,
532 [ELIBACC] = TARGET_ELIBACC,
533 [ELIBBAD] = TARGET_ELIBBAD,
534 [ELIBSCN] = TARGET_ELIBSCN,
535 [ELIBMAX] = TARGET_ELIBMAX,
536 [ELIBEXEC] = TARGET_ELIBEXEC,
537 [EILSEQ] = TARGET_EILSEQ,
538 [ENOSYS] = TARGET_ENOSYS,
539 [ELOOP] = TARGET_ELOOP,
540 [ERESTART] = TARGET_ERESTART,
541 [ESTRPIPE] = TARGET_ESTRPIPE,
542 [ENOTEMPTY] = TARGET_ENOTEMPTY,
543 [EUSERS] = TARGET_EUSERS,
544 [ENOTSOCK] = TARGET_ENOTSOCK,
545 [EDESTADDRREQ] = TARGET_EDESTADDRREQ,
546 [EMSGSIZE] = TARGET_EMSGSIZE,
547 [EPROTOTYPE] = TARGET_EPROTOTYPE,
548 [ENOPROTOOPT] = TARGET_ENOPROTOOPT,
549 [EPROTONOSUPPORT] = TARGET_EPROTONOSUPPORT,
550 [ESOCKTNOSUPPORT] = TARGET_ESOCKTNOSUPPORT,
551 [EOPNOTSUPP] = TARGET_EOPNOTSUPP,
552 [EPFNOSUPPORT] = TARGET_EPFNOSUPPORT,
553 [EAFNOSUPPORT] = TARGET_EAFNOSUPPORT,
554 [EADDRINUSE] = TARGET_EADDRINUSE,
555 [EADDRNOTAVAIL] = TARGET_EADDRNOTAVAIL,
556 [ENETDOWN] = TARGET_ENETDOWN,
557 [ENETUNREACH] = TARGET_ENETUNREACH,
558 [ENETRESET] = TARGET_ENETRESET,
559 [ECONNABORTED] = TARGET_ECONNABORTED,
560 [ECONNRESET] = TARGET_ECONNRESET,
561 [ENOBUFS] = TARGET_ENOBUFS,
562 [EISCONN] = TARGET_EISCONN,
563 [ENOTCONN] = TARGET_ENOTCONN,
564 [EUCLEAN] = TARGET_EUCLEAN,
565 [ENOTNAM] = TARGET_ENOTNAM,
566 [ENAVAIL] = TARGET_ENAVAIL,
567 [EISNAM] = TARGET_EISNAM,
568 [EREMOTEIO] = TARGET_EREMOTEIO,
569 [ESHUTDOWN] = TARGET_ESHUTDOWN,
570 [ETOOMANYREFS] = TARGET_ETOOMANYREFS,
571 [ETIMEDOUT] = TARGET_ETIMEDOUT,
572 [ECONNREFUSED] = TARGET_ECONNREFUSED,
573 [EHOSTDOWN] = TARGET_EHOSTDOWN,
574 [EHOSTUNREACH] = TARGET_EHOSTUNREACH,
575 [EALREADY] = TARGET_EALREADY,
576 [EINPROGRESS] = TARGET_EINPROGRESS,
577 [ESTALE] = TARGET_ESTALE,
578 [ECANCELED] = TARGET_ECANCELED,
579 [ENOMEDIUM] = TARGET_ENOMEDIUM,
580 [EMEDIUMTYPE] = TARGET_EMEDIUMTYPE,
b7fe5db7 581#ifdef ENOKEY
637947f1 582 [ENOKEY] = TARGET_ENOKEY,
b7fe5db7
TS		 583#endif
584#ifdef EKEYEXPIRED
637947f1 585 [EKEYEXPIRED] = TARGET_EKEYEXPIRED,
b7fe5db7
TS		 586#endif
587#ifdef EKEYREVOKED
637947f1 588 [EKEYREVOKED] = TARGET_EKEYREVOKED,
b7fe5db7
TS		 589#endif
590#ifdef EKEYREJECTED
637947f1 591 [EKEYREJECTED] = TARGET_EKEYREJECTED,
b7fe5db7
TS		 592#endif
593#ifdef EOWNERDEAD
637947f1 594 [EOWNERDEAD] = TARGET_EOWNERDEAD,
b7fe5db7
TS		 595#endif
596#ifdef ENOTRECOVERABLE
637947f1 597 [ENOTRECOVERABLE] = TARGET_ENOTRECOVERABLE,
b7fe5db7 598#endif
b92c47c1 599};
637947f1
TS		 600
601static inline int host_to_target_errno(int err)
602{
2466119c
TB		 603 if (err >= 0 && err < ERRNO_TABLE_SIZE &&
604 host_to_target_errno_table[err]) {
637947f1 605 return host_to_target_errno_table[err];
2466119c 606 }
637947f1
TS		 607 return err;
608}
609
b92c47c1
TS		 610static inline int target_to_host_errno(int err)
611{
2466119c
TB		 612 if (err >= 0 && err < ERRNO_TABLE_SIZE &&
613 target_to_host_errno_table[err]) {
b92c47c1 614 return target_to_host_errno_table[err];
2466119c 615 }
b92c47c1
TS		 616 return err;
617}
618
992f48a0 619static inline abi_long get_errno(abi_long ret)
31e31b8a
FB		 620{
621 if (ret == -1)
637947f1 622 return -host_to_target_errno(errno);
31e31b8a
FB		 623 else
624 return ret;
625}
626
992f48a0 627static inline int is_error(abi_long ret)
31e31b8a 628{
992f48a0 629 return (abi_ulong)ret >= (abi_ulong)(-4096);
31e31b8a
FB		 630}
631
7dcdaeaf 632const char *target_strerror(int err)
b92c47c1 633{
da2a34f7
PM		 634 if (err == TARGET_ERESTARTSYS) {
635 return "To be restarted";
636 }
637 if (err == TARGET_QEMU_ESIGRETURN) {
638 return "Successful exit from sigreturn";
639 }
640
962b289e
AG		 641 if ((err >= ERRNO_TABLE_SIZE) || (err < 0)) {
642 return NULL;
643 }
b92c47c1
TS		 644 return strerror(target_to_host_errno(err));
645}
646
4d330cee
TB		 647#define safe_syscall0(type, name) \
648static type safe_##name(void) \
649{ \
650 return safe_syscall(__NR_##name); \
651}
652
653#define safe_syscall1(type, name, type1, arg1) \
654static type safe_##name(type1 arg1) \
655{ \
656 return safe_syscall(__NR_##name, arg1); \
657}
658
659#define safe_syscall2(type, name, type1, arg1, type2, arg2) \
660static type safe_##name(type1 arg1, type2 arg2) \
661{ \
662 return safe_syscall(__NR_##name, arg1, arg2); \
663}
664
665#define safe_syscall3(type, name, type1, arg1, type2, arg2, type3, arg3) \
666static type safe_##name(type1 arg1, type2 arg2, type3 arg3) \
667{ \
668 return safe_syscall(__NR_##name, arg1, arg2, arg3); \
669}
670
671#define safe_syscall4(type, name, type1, arg1, type2, arg2, type3, arg3, \
672 type4, arg4) \
673static type safe_##name(type1 arg1, type2 arg2, type3 arg3, type4 arg4) \
674{ \
675 return safe_syscall(__NR_##name, arg1, arg2, arg3, arg4); \
676}
677
678#define safe_syscall5(type, name, type1, arg1, type2, arg2, type3, arg3, \
679 type4, arg4, type5, arg5) \
680static type safe_##name(type1 arg1, type2 arg2, type3 arg3, type4 arg4, \
681 type5 arg5) \
682{ \
683 return safe_syscall(__NR_##name, arg1, arg2, arg3, arg4, arg5); \
684}
685
686#define safe_syscall6(type, name, type1, arg1, type2, arg2, type3, arg3, \
687 type4, arg4, type5, arg5, type6, arg6) \
688static type safe_##name(type1 arg1, type2 arg2, type3 arg3, type4 arg4, \
689 type5 arg5, type6 arg6) \
690{ \
691 return safe_syscall(__NR_##name, arg1, arg2, arg3, arg4, arg5, arg6); \
692}
693
50afd02b
TB		 694safe_syscall3(ssize_t, read, int, fd, void *, buff, size_t, count)
695safe_syscall3(ssize_t, write, int, fd, const void *, buff, size_t, count)
c10a0738
TB		 696safe_syscall4(int, openat, int, dirfd, const char *, pathname, \
697 int, flags, mode_t, mode)
4af80a37
TB		 698safe_syscall4(pid_t, wait4, pid_t, pid, int *, status, int, options, \
699 struct rusage *, rusage)
700safe_syscall5(int, waitid, idtype_t, idtype, id_t, id, siginfo_t *, infop, \
701 int, options, struct rusage *, rusage)
ffdcbe22 702safe_syscall3(int, execve, const char *, filename, char **, argv, char **, envp)
6df9d38d
PM		 703safe_syscall6(int, pselect6, int, nfds, fd_set *, readfds, fd_set *, writefds, \
704 fd_set *, exceptfds, struct timespec *, timeout, void *, sig)
a6130237
PM		 705safe_syscall5(int, ppoll, struct pollfd *, ufds, unsigned int, nfds,
706 struct timespec *, tsp, const sigset_t *, sigmask,
707 size_t, sigsetsize)
227f0214
PM		 708safe_syscall6(int, epoll_pwait, int, epfd, struct epoll_event *, events,
709 int, maxevents, int, timeout, const sigset_t *, sigmask,
710 size_t, sigsetsize)
d509eeb1
PM		 711safe_syscall6(int,futex,int *,uaddr,int,op,int,val, \
712 const struct timespec *,timeout,int *,uaddr2,int,val3)
2fe4fba1 713safe_syscall2(int, rt_sigsuspend, sigset_t *, newset, size_t, sigsetsize)
bef653d9
PM		 714safe_syscall2(int, kill, pid_t, pid, int, sig)
715safe_syscall2(int, tkill, int, tid, int, sig)
716safe_syscall3(int, tgkill, int, tgid, int, pid, int, sig)
918c03ed
PM		 717safe_syscall3(ssize_t, readv, int, fd, const struct iovec *, iov, int, iovcnt)
718safe_syscall3(ssize_t, writev, int, fd, const struct iovec *, iov, int, iovcnt)
2a3c7619
PM		 719safe_syscall3(int, connect, int, fd, const struct sockaddr *, addr,
720 socklen_t, addrlen)
66687530
PM		 721safe_syscall6(ssize_t, sendto, int, fd, const void *, buf, size_t, len,
722 int, flags, const struct sockaddr *, addr, socklen_t, addrlen)
723safe_syscall6(ssize_t, recvfrom, int, fd, void *, buf, size_t, len,
724 int, flags, struct sockaddr *, addr, socklen_t *, addrlen)
725safe_syscall3(ssize_t, sendmsg, int, fd, const struct msghdr *, msg, int, flags)
726safe_syscall3(ssize_t, recvmsg, int, fd, struct msghdr *, msg, int, flags)
2a845989 727safe_syscall2(int, flock, int, fd, int, operation)
b3f82330
PM		 728safe_syscall4(int, rt_sigtimedwait, const sigset_t *, these, siginfo_t *, uinfo,
729 const struct timespec *, uts, size_t, sigsetsize)
ff6dc130
PM		 730safe_syscall4(int, accept4, int, fd, struct sockaddr *, addr, socklen_t *, len,
731 int, flags)
9e518226
PM		 732safe_syscall2(int, nanosleep, const struct timespec *, req,
733 struct timespec *, rem)
734#ifdef TARGET_NR_clock_nanosleep
735safe_syscall4(int, clock_nanosleep, const clockid_t, clock, int, flags,
736 const struct timespec *, req, struct timespec *, rem)
737#endif
89f9fe44
PM		 738#ifdef __NR_msgsnd
739safe_syscall4(int, msgsnd, int, msgid, const void *, msgp, size_t, sz,
740 int, flags)
741safe_syscall5(int, msgrcv, int, msgid, void *, msgp, size_t, sz,
742 long, msgtype, int, flags)
ffb7ee79
PM		 743safe_syscall4(int, semtimedop, int, semid, struct sembuf *, tsops,
744 unsigned, nsops, const struct timespec *, timeout)
89f9fe44
PM		 745#else
746/* This host kernel architecture uses a single ipc syscall; fake up
747 * wrappers for the sub-operations to hide this implementation detail.
748 * Annoyingly we can't include linux/ipc.h to get the constant definitions
749 * for the call parameter because some structs in there conflict with the
750 * sys/ipc.h ones. So we just define them here, and rely on them being
751 * the same for all host architectures.
752 */
ffb7ee79 753#define Q_SEMTIMEDOP 4
89f9fe44
PM		 754#define Q_MSGSND 11
755#define Q_MSGRCV 12
756#define Q_IPCCALL(VERSION, OP) ((VERSION) << 16 | (OP))
757
758safe_syscall6(int, ipc, int, call, long, first, long, second, long, third,
759 void *, ptr, long, fifth)
760static int safe_msgsnd(int msgid, const void *msgp, size_t sz, int flags)
761{
762 return safe_ipc(Q_IPCCALL(0, Q_MSGSND), msgid, sz, flags, (void *)msgp, 0);
763}
764static int safe_msgrcv(int msgid, void *msgp, size_t sz, long type, int flags)
765{
766 return safe_ipc(Q_IPCCALL(1, Q_MSGRCV), msgid, sz, flags, msgp, type);
767}
ffb7ee79
PM		 768static int safe_semtimedop(int semid, struct sembuf *tsops, unsigned nsops,
769 const struct timespec *timeout)
770{
771 return safe_ipc(Q_IPCCALL(0, Q_SEMTIMEDOP), semid, nsops, 0, tsops,
772 (long)timeout);
773}
89f9fe44 774#endif
d40ecd66
PM		 775#if defined(TARGET_NR_mq_open) && defined(__NR_mq_open)
776safe_syscall5(int, mq_timedsend, int, mqdes, const char *, msg_ptr,
777 size_t, len, unsigned, prio, const struct timespec *, timeout)
778safe_syscall5(int, mq_timedreceive, int, mqdes, char *, msg_ptr,
779 size_t, len, unsigned *, prio, const struct timespec *, timeout)
780#endif
49ca6f3e
PM		 781/* We do ioctl like this rather than via safe_syscall3 to preserve the
782 * "third argument might be integer or pointer or not present" behaviour of
783 * the libc function.
784 */
785#define safe_ioctl(...) safe_syscall(__NR_ioctl, __VA_ARGS__)
50afd02b 786
8289d112
PB		 787static inline int host_to_target_sock_type(int host_type)
788{
789 int target_type;
790
791 switch (host_type & 0xf /* SOCK_TYPE_MASK */) {
792 case SOCK_DGRAM:
793 target_type = TARGET_SOCK_DGRAM;
794 break;
795 case SOCK_STREAM:
796 target_type = TARGET_SOCK_STREAM;
797 break;
798 default:
799 target_type = host_type & 0xf /* SOCK_TYPE_MASK */;
800 break;
801 }
802
803#if defined(SOCK_CLOEXEC)
804 if (host_type & SOCK_CLOEXEC) {
805 target_type |= TARGET_SOCK_CLOEXEC;
806 }
807#endif
808
809#if defined(SOCK_NONBLOCK)
810 if (host_type & SOCK_NONBLOCK) {
811 target_type |= TARGET_SOCK_NONBLOCK;
812 }
813#endif
814
815 return target_type;
816}
817
992f48a0
BS		 818static abi_ulong target_brk;
819static abi_ulong target_original_brk;
4d1de87c 820static abi_ulong brk_page;
31e31b8a 821
992f48a0 822void target_set_brk(abi_ulong new_brk)
31e31b8a 823{
4c1de73d 824 target_original_brk = target_brk = HOST_PAGE_ALIGN(new_brk);
4d1de87c 825 brk_page = HOST_PAGE_ALIGN(target_brk);
31e31b8a
FB		 826}
827
4d1de87c
CV		 828//#define DEBUGF_BRK(message, args...) do { fprintf(stderr, (message), ## args); } while (0)
829#define DEBUGF_BRK(message, args...)
830
0da46a6e 831/* do_brk() must return target values and target errnos. */
992f48a0 832abi_long do_brk(abi_ulong new_brk)
31e31b8a 833{
992f48a0 834 abi_long mapped_addr;
31e31b8a
FB		 835 int new_alloc_size;
836
3a0c6c4a 837 DEBUGF_BRK("do_brk(" TARGET_ABI_FMT_lx ") -> ", new_brk);
4d1de87c
CV		 838
839 if (!new_brk) {
3a0c6c4a 840 DEBUGF_BRK(TARGET_ABI_FMT_lx " (!new_brk)\n", target_brk);
53a5960a 841 return target_brk;
4d1de87c
CV		 842 }
843 if (new_brk < target_original_brk) {
3a0c6c4a
PB		 844 DEBUGF_BRK(TARGET_ABI_FMT_lx " (new_brk < target_original_brk)\n",
845 target_brk);
7ab240ad 846 return target_brk;
4d1de87c 847 }
3b46e624 848
4d1de87c
CV		 849 /* If the new brk is less than the highest page reserved to the
850 * target heap allocation, set it and we're almost done... */
851 if (new_brk <= brk_page) {
852 /* Heap contents are initialized to zero, as for anonymous
853 * mapped pages. */
854 if (new_brk > target_brk) {
855 memset(g2h(target_brk), 0, new_brk - target_brk);
856 }
31e31b8a 857 target_brk = new_brk;
3a0c6c4a 858 DEBUGF_BRK(TARGET_ABI_FMT_lx " (new_brk <= brk_page)\n", target_brk);
53a5960a 859 return target_brk;
31e31b8a
FB		 860 }
861
00faf08c
PM		 862 /* We need to allocate more memory after the brk... Note that
863 * we don't use MAP_FIXED because that will map over the top of
864 * any existing mapping (like the one with the host libc or qemu
865 * itself); instead we treat "mapped but at wrong address" as
866 * a failure and unmap again.
867 */
4d1de87c 868 new_alloc_size = HOST_PAGE_ALIGN(new_brk - brk_page);
5fafdf24 869 mapped_addr = get_errno(target_mmap(brk_page, new_alloc_size,
54936004 870 PROT_READ|PROT_WRITE,
00faf08c
PM		 871 MAP_ANON|MAP_PRIVATE, 0, 0));
872
873 if (mapped_addr == brk_page) {
70afc343
CV		 874 /* Heap contents are initialized to zero, as for anonymous
875 * mapped pages. Technically the new pages are already
876 * initialized to zero since they *are* anonymous mapped
877 * pages, however we have to take care with the contents that
878 * come from the remaining part of the previous page: it may
879 * contains garbage data due to a previous heap usage (grown
880 * then shrunken). */
881 memset(g2h(target_brk), 0, brk_page - target_brk);
882
00faf08c 883 target_brk = new_brk;
4d1de87c 884 brk_page = HOST_PAGE_ALIGN(target_brk);
3a0c6c4a
PB		 885 DEBUGF_BRK(TARGET_ABI_FMT_lx " (mapped_addr == brk_page)\n",
886 target_brk);
00faf08c
PM		 887 return target_brk;
888 } else if (mapped_addr != -1) {
889 /* Mapped but at wrong address, meaning there wasn't actually
890 * enough space for this brk.
891 */
892 target_munmap(mapped_addr, new_alloc_size);
893 mapped_addr = -1;
3a0c6c4a 894 DEBUGF_BRK(TARGET_ABI_FMT_lx " (mapped_addr != -1)\n", target_brk);
4d1de87c
CV		 895 }
896 else {
3a0c6c4a 897 DEBUGF_BRK(TARGET_ABI_FMT_lx " (otherwise)\n", target_brk);
00faf08c 898 }
7ab240ad 899
7dd46c02
RH		 900#if defined(TARGET_ALPHA)
901 /* We (partially) emulate OSF/1 on Alpha, which requires we
902 return a proper errno, not an unchanged brk value. */
00faf08c 903 return -TARGET_ENOMEM;
7dd46c02 904#endif
00faf08c 905 /* For everything else, return the previous break. */
7ab240ad 906 return target_brk;
31e31b8a
FB		 907}
908
26edcf41
TS		 909static inline abi_long copy_from_user_fdset(fd_set *fds,
910 abi_ulong target_fds_addr,
911 int n)
31e31b8a 912{
26edcf41
TS		 913 int i, nw, j, k;
914 abi_ulong b, *target_fds;
915
b1b2db29 916 nw = DIV_ROUND_UP(n, TARGET_ABI_BITS);
26edcf41
TS		 917 if (!(target_fds = lock_user(VERIFY_READ,
918 target_fds_addr,
919 sizeof(abi_ulong) * nw,
920 1)))
921 return -TARGET_EFAULT;
922
923 FD_ZERO(fds);
924 k = 0;
925 for (i = 0; i < nw; i++) {
926 /* grab the abi_ulong */
927 __get_user(b, &target_fds[i]);
928 for (j = 0; j < TARGET_ABI_BITS; j++) {
929 /* check the bit inside the abi_ulong */
930 if ((b >> j) & 1)
931 FD_SET(k, fds);
932 k++;
31e31b8a 933 }
31e31b8a 934 }
26edcf41
TS		 935
936 unlock_user(target_fds, target_fds_addr, 0);
937
938 return 0;
31e31b8a
FB		 939}
940
055e0906
MF		 941static inline abi_ulong copy_from_user_fdset_ptr(fd_set *fds, fd_set **fds_ptr,
942 abi_ulong target_fds_addr,
943 int n)
944{
945 if (target_fds_addr) {
946 if (copy_from_user_fdset(fds, target_fds_addr, n))
947 return -TARGET_EFAULT;
948 *fds_ptr = fds;
949 } else {
950 *fds_ptr = NULL;
951 }
952 return 0;
953}
954
26edcf41
TS		 955static inline abi_long copy_to_user_fdset(abi_ulong target_fds_addr,
956 const fd_set *fds,
957 int n)
31e31b8a 958{
31e31b8a 959 int i, nw, j, k;
992f48a0 960 abi_long v;
26edcf41 961 abi_ulong *target_fds;
31e31b8a 962
b1b2db29 963 nw = DIV_ROUND_UP(n, TARGET_ABI_BITS);
26edcf41
TS		 964 if (!(target_fds = lock_user(VERIFY_WRITE,
965 target_fds_addr,
966 sizeof(abi_ulong) * nw,
967 0)))
968 return -TARGET_EFAULT;
969
970 k = 0;
971 for (i = 0; i < nw; i++) {
972 v = 0;
973 for (j = 0; j < TARGET_ABI_BITS; j++) {
9ab709be 974 v |= ((abi_ulong)(FD_ISSET(k, fds) != 0) << j);
26edcf41 975 k++;
31e31b8a 976 }
26edcf41 977 __put_user(v, &target_fds[i]);
31e31b8a 978 }
26edcf41
TS		 979
980 unlock_user(target_fds, target_fds_addr, sizeof(abi_ulong) * nw);
981
982 return 0;
31e31b8a
FB		 983}
984
c596ed17
FB		 985#if defined(__alpha__)
986#define HOST_HZ 1024
987#else
988#define HOST_HZ 100
989#endif
990
992f48a0 991static inline abi_long host_to_target_clock_t(long ticks)
c596ed17
FB		 992{
993#if HOST_HZ == TARGET_HZ
994 return ticks;
995#else
996 return ((int64_t)ticks * TARGET_HZ) / HOST_HZ;
997#endif
998}
999
579a97f7
FB		 1000static inline abi_long host_to_target_rusage(abi_ulong target_addr,
1001 const struct rusage *rusage)
b409186b 1002{
53a5960a
PB		 1003 struct target_rusage *target_rusage;
1004
579a97f7
FB		 1005 if (!lock_user_struct(VERIFY_WRITE, target_rusage, target_addr, 0))
1006 return -TARGET_EFAULT;
cbb21eed
MB		 1007 target_rusage->ru_utime.tv_sec = tswapal(rusage->ru_utime.tv_sec);
1008 target_rusage->ru_utime.tv_usec = tswapal(rusage->ru_utime.tv_usec);
1009 target_rusage->ru_stime.tv_sec = tswapal(rusage->ru_stime.tv_sec);
1010 target_rusage->ru_stime.tv_usec = tswapal(rusage->ru_stime.tv_usec);
1011 target_rusage->ru_maxrss = tswapal(rusage->ru_maxrss);
1012 target_rusage->ru_ixrss = tswapal(rusage->ru_ixrss);
1013 target_rusage->ru_idrss = tswapal(rusage->ru_idrss);
1014 target_rusage->ru_isrss = tswapal(rusage->ru_isrss);
1015 target_rusage->ru_minflt = tswapal(rusage->ru_minflt);
1016 target_rusage->ru_majflt = tswapal(rusage->ru_majflt);
1017 target_rusage->ru_nswap = tswapal(rusage->ru_nswap);
1018 target_rusage->ru_inblock = tswapal(rusage->ru_inblock);
1019 target_rusage->ru_oublock = tswapal(rusage->ru_oublock);
1020 target_rusage->ru_msgsnd = tswapal(rusage->ru_msgsnd);
1021 target_rusage->ru_msgrcv = tswapal(rusage->ru_msgrcv);
1022 target_rusage->ru_nsignals = tswapal(rusage->ru_nsignals);
1023 target_rusage->ru_nvcsw = tswapal(rusage->ru_nvcsw);
1024 target_rusage->ru_nivcsw = tswapal(rusage->ru_nivcsw);
53a5960a 1025 unlock_user_struct(target_rusage, target_addr, 1);
579a97f7
FB		 1026
1027 return 0;
b409186b
FB		 1028}
1029
cbb21eed 1030static inline rlim_t target_to_host_rlim(abi_ulong target_rlim)
81bbe906 1031{
cbb21eed 1032 abi_ulong target_rlim_swap;
95b33b2f
WT		 1033 rlim_t result;
1034
cbb21eed
MB		 1035 target_rlim_swap = tswapal(target_rlim);
1036 if (target_rlim_swap == TARGET_RLIM_INFINITY)
1037 return RLIM_INFINITY;
1038
1039 result = target_rlim_swap;
1040 if (target_rlim_swap != (rlim_t)result)
1041 return RLIM_INFINITY;
95b33b2f
WT		 1042
1043 return result;
81bbe906
TY		 1044}
1045
cbb21eed 1046static inline abi_ulong host_to_target_rlim(rlim_t rlim)
81bbe906 1047{
cbb21eed
MB		 1048 abi_ulong target_rlim_swap;
1049 abi_ulong result;
95b33b2f 1050
cbb21eed 1051 if (rlim == RLIM_INFINITY || rlim != (abi_long)rlim)
95b33b2f 1052 target_rlim_swap = TARGET_RLIM_INFINITY;
81bbe906 1053 else
95b33b2f 1054 target_rlim_swap = rlim;
cbb21eed 1055 result = tswapal(target_rlim_swap);
95b33b2f
WT		 1056
1057 return result;
81bbe906
TY		 1058}
1059
e22b7015
WT		 1060static inline int target_to_host_resource(int code)
1061{
1062 switch (code) {
1063 case TARGET_RLIMIT_AS:
1064 return RLIMIT_AS;
1065 case TARGET_RLIMIT_CORE:
1066 return RLIMIT_CORE;
1067 case TARGET_RLIMIT_CPU:
1068 return RLIMIT_CPU;
1069 case TARGET_RLIMIT_DATA:
1070 return RLIMIT_DATA;
1071 case TARGET_RLIMIT_FSIZE:
1072 return RLIMIT_FSIZE;
1073 case TARGET_RLIMIT_LOCKS:
1074 return RLIMIT_LOCKS;
1075 case TARGET_RLIMIT_MEMLOCK:
1076 return RLIMIT_MEMLOCK;
1077 case TARGET_RLIMIT_MSGQUEUE:
1078 return RLIMIT_MSGQUEUE;
1079 case TARGET_RLIMIT_NICE:
1080 return RLIMIT_NICE;
1081 case TARGET_RLIMIT_NOFILE:
1082 return RLIMIT_NOFILE;
1083 case TARGET_RLIMIT_NPROC:
1084 return RLIMIT_NPROC;
1085 case TARGET_RLIMIT_RSS:
1086 return RLIMIT_RSS;
1087 case TARGET_RLIMIT_RTPRIO:
1088 return RLIMIT_RTPRIO;
1089 case TARGET_RLIMIT_SIGPENDING:
1090 return RLIMIT_SIGPENDING;
1091 case TARGET_RLIMIT_STACK:
1092 return RLIMIT_STACK;
1093 default:
1094 return code;
1095 }
1096}
1097
788f5ec4
TS		 1098static inline abi_long copy_from_user_timeval(struct timeval *tv,
1099 abi_ulong target_tv_addr)
31e31b8a 1100{
53a5960a
PB		 1101 struct target_timeval *target_tv;
1102
788f5ec4 1103 if (!lock_user_struct(VERIFY_READ, target_tv, target_tv_addr, 1))
579a97f7 1104 return -TARGET_EFAULT;
788f5ec4
TS		 1105
1106 __get_user(tv->tv_sec, &target_tv->tv_sec);
1107 __get_user(tv->tv_usec, &target_tv->tv_usec);
1108
1109 unlock_user_struct(target_tv, target_tv_addr, 0);
579a97f7
FB		 1110
1111 return 0;
31e31b8a
FB		 1112}
1113
788f5ec4
TS		 1114static inline abi_long copy_to_user_timeval(abi_ulong target_tv_addr,
1115 const struct timeval *tv)
31e31b8a 1116{
53a5960a
PB		 1117 struct target_timeval *target_tv;
1118
788f5ec4 1119 if (!lock_user_struct(VERIFY_WRITE, target_tv, target_tv_addr, 0))
579a97f7 1120 return -TARGET_EFAULT;
788f5ec4
TS		 1121
1122 __put_user(tv->tv_sec, &target_tv->tv_sec);
1123 __put_user(tv->tv_usec, &target_tv->tv_usec);
1124
1125 unlock_user_struct(target_tv, target_tv_addr, 1);
579a97f7
FB		 1126
1127 return 0;
31e31b8a
FB		 1128}
1129
ef4467e9
PB		 1130static inline abi_long copy_from_user_timezone(struct timezone *tz,
1131 abi_ulong target_tz_addr)
1132{
1133 struct target_timezone *target_tz;
1134
1135 if (!lock_user_struct(VERIFY_READ, target_tz, target_tz_addr, 1)) {
1136 return -TARGET_EFAULT;
1137 }
1138
1139 __get_user(tz->tz_minuteswest, &target_tz->tz_minuteswest);
1140 __get_user(tz->tz_dsttime, &target_tz->tz_dsttime);
1141
1142 unlock_user_struct(target_tz, target_tz_addr, 0);
1143
1144 return 0;
1145}
1146
8ec9cf89
NF		 1147#if defined(TARGET_NR_mq_open) && defined(__NR_mq_open)
1148#include <mqueue.h>
1149
24e1003a
AJ		 1150static inline abi_long copy_from_user_mq_attr(struct mq_attr *attr,
1151 abi_ulong target_mq_attr_addr)
1152{
1153 struct target_mq_attr *target_mq_attr;
1154
1155 if (!lock_user_struct(VERIFY_READ, target_mq_attr,
1156 target_mq_attr_addr, 1))
1157 return -TARGET_EFAULT;
1158
1159 __get_user(attr->mq_flags, &target_mq_attr->mq_flags);
1160 __get_user(attr->mq_maxmsg, &target_mq_attr->mq_maxmsg);
1161 __get_user(attr->mq_msgsize, &target_mq_attr->mq_msgsize);
1162 __get_user(attr->mq_curmsgs, &target_mq_attr->mq_curmsgs);
1163
1164 unlock_user_struct(target_mq_attr, target_mq_attr_addr, 0);
1165
1166 return 0;
1167}
1168
1169static inline abi_long copy_to_user_mq_attr(abi_ulong target_mq_attr_addr,
1170 const struct mq_attr *attr)
1171{
1172 struct target_mq_attr *target_mq_attr;
1173
1174 if (!lock_user_struct(VERIFY_WRITE, target_mq_attr,
1175 target_mq_attr_addr, 0))
1176 return -TARGET_EFAULT;
1177
1178 __put_user(attr->mq_flags, &target_mq_attr->mq_flags);
1179 __put_user(attr->mq_maxmsg, &target_mq_attr->mq_maxmsg);
1180 __put_user(attr->mq_msgsize, &target_mq_attr->mq_msgsize);
1181 __put_user(attr->mq_curmsgs, &target_mq_attr->mq_curmsgs);
1182
1183 unlock_user_struct(target_mq_attr, target_mq_attr_addr, 1);
1184
1185 return 0;
1186}
8ec9cf89 1187#endif
31e31b8a 1188
055e0906 1189#if defined(TARGET_NR_select) || defined(TARGET_NR__newselect)
0da46a6e 1190/* do_select() must return target values and target errnos. */
992f48a0 1191static abi_long do_select(int n,
26edcf41
TS		 1192 abi_ulong rfd_addr, abi_ulong wfd_addr,
1193 abi_ulong efd_addr, abi_ulong target_tv_addr)
31e31b8a
FB		 1194{
1195 fd_set rfds, wfds, efds;
1196 fd_set *rfds_ptr, *wfds_ptr, *efds_ptr;
6df9d38d
PM		 1197 struct timeval tv;
1198 struct timespec ts, *ts_ptr;
992f48a0 1199 abi_long ret;
31e31b8a 1200
055e0906
MF		 1201 ret = copy_from_user_fdset_ptr(&rfds, &rfds_ptr, rfd_addr, n);
1202 if (ret) {
1203 return ret;
53a5960a 1204 }
055e0906
MF		 1205 ret = copy_from_user_fdset_ptr(&wfds, &wfds_ptr, wfd_addr, n);
1206 if (ret) {
1207 return ret;
53a5960a 1208 }
055e0906
MF		 1209 ret = copy_from_user_fdset_ptr(&efds, &efds_ptr, efd_addr, n);
1210 if (ret) {
1211 return ret;
53a5960a 1212 }
3b46e624 1213
26edcf41 1214 if (target_tv_addr) {
788f5ec4
TS		 1215 if (copy_from_user_timeval(&tv, target_tv_addr))
1216 return -TARGET_EFAULT;
6df9d38d
PM		 1217 ts.tv_sec = tv.tv_sec;
1218 ts.tv_nsec = tv.tv_usec * 1000;
1219 ts_ptr = &ts;
31e31b8a 1220 } else {
6df9d38d 1221 ts_ptr = NULL;
31e31b8a 1222 }
26edcf41 1223
6df9d38d
PM		 1224 ret = get_errno(safe_pselect6(n, rfds_ptr, wfds_ptr, efds_ptr,
1225 ts_ptr, NULL));
53a5960a 1226
26edcf41
TS		 1227 if (!is_error(ret)) {
1228 if (rfd_addr && copy_to_user_fdset(rfd_addr, &rfds, n))
1229 return -TARGET_EFAULT;
1230 if (wfd_addr && copy_to_user_fdset(wfd_addr, &wfds, n))
1231 return -TARGET_EFAULT;
1232 if (efd_addr && copy_to_user_fdset(efd_addr, &efds, n))
1233 return -TARGET_EFAULT;
31e31b8a 1234
6df9d38d
PM		 1235 if (target_tv_addr) {
1236 tv.tv_sec = ts.tv_sec;
1237 tv.tv_usec = ts.tv_nsec / 1000;
1238 if (copy_to_user_timeval(target_tv_addr, &tv)) {
1239 return -TARGET_EFAULT;
1240 }
1241 }
31e31b8a 1242 }
579a97f7 1243
31e31b8a
FB		 1244 return ret;
1245}
055e0906 1246#endif
31e31b8a 1247
099d6b0f
RV		 1248static abi_long do_pipe2(int host_pipe[], int flags)
1249{
1250#ifdef CONFIG_PIPE2
1251 return pipe2(host_pipe, flags);
1252#else
1253 return -ENOSYS;
1254#endif
1255}
1256
fb41a66e
RH		 1257static abi_long do_pipe(void *cpu_env, abi_ulong pipedes,
1258 int flags, int is_pipe2)
099d6b0f
RV		 1259{
1260 int host_pipe[2];
1261 abi_long ret;
1262 ret = flags ? do_pipe2(host_pipe, flags) : pipe(host_pipe);
1263
1264 if (is_error(ret))
1265 return get_errno(ret);
fb41a66e
RH		 1266
1267 /* Several targets have special calling conventions for the original
1268 pipe syscall, but didn't replicate this into the pipe2 syscall. */
1269 if (!is_pipe2) {
1270#if defined(TARGET_ALPHA)
1271 ((CPUAlphaState *)cpu_env)->ir[IR_A4] = host_pipe[1];
1272 return host_pipe[0];
1273#elif defined(TARGET_MIPS)
1274 ((CPUMIPSState*)cpu_env)->active_tc.gpr[3] = host_pipe[1];
1275 return host_pipe[0];
1276#elif defined(TARGET_SH4)
597c0212 1277 ((CPUSH4State*)cpu_env)->gregs[1] = host_pipe[1];
fb41a66e 1278 return host_pipe[0];
82f05b69
PM		 1279#elif defined(TARGET_SPARC)
1280 ((CPUSPARCState*)cpu_env)->regwptr[1] = host_pipe[1];
1281 return host_pipe[0];
597c0212 1282#endif
fb41a66e
RH		 1283 }
1284
099d6b0f
RV		 1285 if (put_user_s32(host_pipe[0], pipedes)
1286 || put_user_s32(host_pipe[1], pipedes + sizeof(host_pipe[0])))
1287 return -TARGET_EFAULT;
099d6b0f
RV		 1288 return get_errno(ret);
1289}
1290
b975b83b
LL		 1291static inline abi_long target_to_host_ip_mreq(struct ip_mreqn *mreqn,
1292 abi_ulong target_addr,
1293 socklen_t len)
1294{
1295 struct target_ip_mreqn *target_smreqn;
1296
1297 target_smreqn = lock_user(VERIFY_READ, target_addr, len, 1);
1298 if (!target_smreqn)
1299 return -TARGET_EFAULT;
1300 mreqn->imr_multiaddr.s_addr = target_smreqn->imr_multiaddr.s_addr;
1301 mreqn->imr_address.s_addr = target_smreqn->imr_address.s_addr;
1302 if (len == sizeof(struct target_ip_mreqn))
cbb21eed 1303 mreqn->imr_ifindex = tswapal(target_smreqn->imr_ifindex);
b975b83b
LL		 1304 unlock_user(target_smreqn, target_addr, 0);
1305
1306 return 0;
1307}
1308
7b36f782 1309static inline abi_long target_to_host_sockaddr(int fd, struct sockaddr *addr,
579a97f7
FB		 1310 abi_ulong target_addr,
1311 socklen_t len)
7854b056 1312{
607175e0
AJ		 1313 const socklen_t unix_maxlen = sizeof (struct sockaddr_un);
1314 sa_family_t sa_family;
53a5960a
PB		 1315 struct target_sockaddr *target_saddr;
1316
7b36f782
LV		 1317 if (fd_trans_target_to_host_addr(fd)) {
1318 return fd_trans_target_to_host_addr(fd)(addr, target_addr, len);
1319 }
1320
579a97f7
FB		 1321 target_saddr = lock_user(VERIFY_READ, target_addr, len, 1);
1322 if (!target_saddr)
1323 return -TARGET_EFAULT;
607175e0
AJ		 1324
1325 sa_family = tswap16(target_saddr->sa_family);
1326
1327 /* Oops. The caller might send a incomplete sun_path; sun_path
1328 * must be terminated by \0 (see the manual page), but
1329 * unfortunately it is quite common to specify sockaddr_un
1330 * length as "strlen(x->sun_path)" while it should be
1331 * "strlen(...) + 1". We'll fix that here if needed.
1332 * Linux kernel has a similar feature.
1333 */
1334
1335 if (sa_family == AF_UNIX) {
1336 if (len < unix_maxlen && len > 0) {
1337 char *cp = (char*)target_saddr;
1338
1339 if ( cp[len-1] && !cp[len] )
1340 len++;
1341 }
1342 if (len > unix_maxlen)
1343 len = unix_maxlen;
1344 }
1345
53a5960a 1346 memcpy(addr, target_saddr, len);
607175e0 1347 addr->sa_family = sa_family;
6c5b5645
LV		 1348 if (sa_family == AF_NETLINK) {
1349 struct sockaddr_nl *nladdr;
1350
1351 nladdr = (struct sockaddr_nl *)addr;
1352 nladdr->nl_pid = tswap32(nladdr->nl_pid);
1353 nladdr->nl_groups = tswap32(nladdr->nl_groups);
1354 } else if (sa_family == AF_PACKET) {
33a29b51
JT		 1355 struct target_sockaddr_ll *lladdr;
1356
1357 lladdr = (struct target_sockaddr_ll *)addr;
1358 lladdr->sll_ifindex = tswap32(lladdr->sll_ifindex);
1359 lladdr->sll_hatype = tswap16(lladdr->sll_hatype);
1360 }
53a5960a 1361 unlock_user(target_saddr, target_addr, 0);
579a97f7
FB		 1362
1363 return 0;
7854b056
FB		 1364}
1365
579a97f7
FB		 1366static inline abi_long host_to_target_sockaddr(abi_ulong target_addr,
1367 struct sockaddr *addr,
1368 socklen_t len)
7854b056 1369{
53a5960a
PB		 1370 struct target_sockaddr *target_saddr;
1371
579a97f7
FB		 1372 target_saddr = lock_user(VERIFY_WRITE, target_addr, len, 0);
1373 if (!target_saddr)
1374 return -TARGET_EFAULT;
53a5960a
PB		 1375 memcpy(target_saddr, addr, len);
1376 target_saddr->sa_family = tswap16(addr->sa_family);
6c5b5645
LV		 1377 if (addr->sa_family == AF_NETLINK) {
1378 struct sockaddr_nl *target_nl = (struct sockaddr_nl *)target_saddr;
1379 target_nl->nl_pid = tswap32(target_nl->nl_pid);
1380 target_nl->nl_groups = tswap32(target_nl->nl_groups);
1381 }
53a5960a 1382 unlock_user(target_saddr, target_addr, len);
579a97f7
FB		 1383
1384 return 0;
7854b056
FB		 1385}
1386
5a4a898d
FB		 1387static inline abi_long target_to_host_cmsg(struct msghdr *msgh,
1388 struct target_msghdr *target_msgh)
7854b056
FB		 1389{
1390 struct cmsghdr *cmsg = CMSG_FIRSTHDR(msgh);
5a4a898d
FB		 1391 abi_long msg_controllen;
1392 abi_ulong target_cmsg_addr;
ee104587 1393 struct target_cmsghdr *target_cmsg, *target_cmsg_start;
7854b056 1394 socklen_t space = 0;
5a4a898d 1395
cbb21eed 1396 msg_controllen = tswapal(target_msgh->msg_controllen);
5a4a898d
FB		 1397 if (msg_controllen < sizeof (struct target_cmsghdr))
1398 goto the_end;
cbb21eed 1399 target_cmsg_addr = tswapal(target_msgh->msg_control);
5a4a898d 1400 target_cmsg = lock_user(VERIFY_READ, target_cmsg_addr, msg_controllen, 1);
ee104587 1401 target_cmsg_start = target_cmsg;
5a4a898d
FB		 1402 if (!target_cmsg)
1403 return -TARGET_EFAULT;
7854b056
FB		 1404
1405 while (cmsg && target_cmsg) {
1406 void *data = CMSG_DATA(cmsg);
1407 void *target_data = TARGET_CMSG_DATA(target_cmsg);
1408
cbb21eed 1409 int len = tswapal(target_cmsg->cmsg_len)
7854b056
FB		 1410 - TARGET_CMSG_ALIGN(sizeof (struct target_cmsghdr));
1411
1412 space += CMSG_SPACE(len);
1413 if (space > msgh->msg_controllen) {
1414 space -= CMSG_SPACE(len);
c2aeb258
PM		 1415 /* This is a QEMU bug, since we allocated the payload
1416 * area ourselves (unlike overflow in host-to-target
1417 * conversion, which is just the guest giving us a buffer
1418 * that's too small). It can't happen for the payload types
1419 * we currently support; if it becomes an issue in future
1420 * we would need to improve our allocation strategy to
1421 * something more intelligent than "twice the size of the
1422 * target buffer we're reading from".
1423 */
31febb71 1424 gemu_log("Host cmsg overflow\n");
7854b056
FB		 1425 break;
1426 }
1427
dbf4f796
PJ		 1428 if (tswap32(target_cmsg->cmsg_level) == TARGET_SOL_SOCKET) {
1429 cmsg->cmsg_level = SOL_SOCKET;
1430 } else {
1431 cmsg->cmsg_level = tswap32(target_cmsg->cmsg_level);
1432 }
7854b056
FB		 1433 cmsg->cmsg_type = tswap32(target_cmsg->cmsg_type);
1434 cmsg->cmsg_len = CMSG_LEN(len);
1435
30b8b68e 1436 if (cmsg->cmsg_level == SOL_SOCKET && cmsg->cmsg_type == SCM_RIGHTS) {
7854b056
FB		 1437 int *fd = (int *)data;
1438 int *target_fd = (int *)target_data;
1439 int i, numfds = len / sizeof(int);
1440
876e23cb
PM		 1441 for (i = 0; i < numfds; i++) {
1442 __get_user(fd[i], target_fd + i);
1443 }
30b8b68e
AS		 1444 } else if (cmsg->cmsg_level == SOL_SOCKET
1445 && cmsg->cmsg_type == SCM_CREDENTIALS) {
1446 struct ucred *cred = (struct ucred *)data;
1447 struct target_ucred *target_cred =
1448 (struct target_ucred *)target_data;
1449
876e23cb
PM		 1450 __get_user(cred->pid, &target_cred->pid);
1451 __get_user(cred->uid, &target_cred->uid);
1452 __get_user(cred->gid, &target_cred->gid);
30b8b68e
AS		 1453 } else {
1454 gemu_log("Unsupported ancillary data: %d/%d\n",
1455 cmsg->cmsg_level, cmsg->cmsg_type);
1456 memcpy(data, target_data, len);
7854b056
FB		 1457 }
1458
1459 cmsg = CMSG_NXTHDR(msgh, cmsg);
ee104587
JN		 1460 target_cmsg = TARGET_CMSG_NXTHDR(target_msgh, target_cmsg,
1461 target_cmsg_start);
7854b056 1462 }
5a4a898d
FB		 1463 unlock_user(target_cmsg, target_cmsg_addr, 0);
1464 the_end:
7854b056 1465 msgh->msg_controllen = space;
5a4a898d 1466 return 0;
7854b056
FB		 1467}
1468
5a4a898d
FB		 1469static inline abi_long host_to_target_cmsg(struct target_msghdr *target_msgh,
1470 struct msghdr *msgh)
7854b056
FB		 1471{
1472 struct cmsghdr *cmsg = CMSG_FIRSTHDR(msgh);
5a4a898d
FB		 1473 abi_long msg_controllen;
1474 abi_ulong target_cmsg_addr;
ee104587 1475 struct target_cmsghdr *target_cmsg, *target_cmsg_start;
7854b056
FB		 1476 socklen_t space = 0;
1477
cbb21eed 1478 msg_controllen = tswapal(target_msgh->msg_controllen);
5a4a898d
FB		 1479 if (msg_controllen < sizeof (struct target_cmsghdr))
1480 goto the_end;
cbb21eed 1481 target_cmsg_addr = tswapal(target_msgh->msg_control);
5a4a898d 1482 target_cmsg = lock_user(VERIFY_WRITE, target_cmsg_addr, msg_controllen, 0);
ee104587 1483 target_cmsg_start = target_cmsg;
5a4a898d
FB		 1484 if (!target_cmsg)
1485 return -TARGET_EFAULT;
1486
7854b056
FB		 1487 while (cmsg && target_cmsg) {
1488 void *data = CMSG_DATA(cmsg);
1489 void *target_data = TARGET_CMSG_DATA(target_cmsg);
1490
1491 int len = cmsg->cmsg_len - CMSG_ALIGN(sizeof (struct cmsghdr));
c2aeb258 1492 int tgt_len, tgt_space;
7854b056 1493
c2aeb258
PM		 1494 /* We never copy a half-header but may copy half-data;
1495 * this is Linux's behaviour in put_cmsg(). Note that
1496 * truncation here is a guest problem (which we report
1497 * to the guest via the CTRUNC bit), unlike truncation
1498 * in target_to_host_cmsg, which is a QEMU bug.
1499 */
1500 if (msg_controllen < sizeof(struct cmsghdr)) {
1501 target_msgh->msg_flags |= tswap32(MSG_CTRUNC);
7854b056
FB		 1502 break;
1503 }
1504
dbf4f796
PJ		 1505 if (cmsg->cmsg_level == SOL_SOCKET) {
1506 target_cmsg->cmsg_level = tswap32(TARGET_SOL_SOCKET);
1507 } else {
1508 target_cmsg->cmsg_level = tswap32(cmsg->cmsg_level);
1509 }
7854b056 1510 target_cmsg->cmsg_type = tswap32(cmsg->cmsg_type);
7854b056 1511
c2aeb258
PM		 1512 tgt_len = TARGET_CMSG_LEN(len);
1513
1514 /* Payload types which need a different size of payload on
1515 * the target must adjust tgt_len here.
1516 */
1517 switch (cmsg->cmsg_level) {
1518 case SOL_SOCKET:
1519 switch (cmsg->cmsg_type) {
1520 case SO_TIMESTAMP:
1521 tgt_len = sizeof(struct target_timeval);
1522 break;
1523 default:
1524 break;
1525 }
1526 default:
1527 break;
1528 }
1529
1530 if (msg_controllen < tgt_len) {
1531 target_msgh->msg_flags |= tswap32(MSG_CTRUNC);
1532 tgt_len = msg_controllen;
1533 }
1534
1535 /* We must now copy-and-convert len bytes of payload
1536 * into tgt_len bytes of destination space. Bear in mind
1537 * that in both source and destination we may be dealing
1538 * with a truncated value!
1539 */
52b65494
HD		 1540 switch (cmsg->cmsg_level) {
1541 case SOL_SOCKET:
1542 switch (cmsg->cmsg_type) {
1543 case SCM_RIGHTS:
1544 {
1545 int *fd = (int *)data;
1546 int *target_fd = (int *)target_data;
c2aeb258 1547 int i, numfds = tgt_len / sizeof(int);
52b65494 1548
876e23cb
PM		 1549 for (i = 0; i < numfds; i++) {
1550 __put_user(fd[i], target_fd + i);
1551 }
52b65494
HD		 1552 break;
1553 }
1554 case SO_TIMESTAMP:
1555 {
1556 struct timeval *tv = (struct timeval *)data;
1557 struct target_timeval *target_tv =
1558 (struct target_timeval *)target_data;
1559
c2aeb258
PM		 1560 if (len != sizeof(struct timeval) ||
1561 tgt_len != sizeof(struct target_timeval)) {
52b65494 1562 goto unimplemented;
c2aeb258 1563 }
52b65494
HD		 1564
1565 /* copy struct timeval to target */
876e23cb
PM		 1566 __put_user(tv->tv_sec, &target_tv->tv_sec);
1567 __put_user(tv->tv_usec, &target_tv->tv_usec);
52b65494
HD		 1568 break;
1569 }
4bc29756
HD		 1570 case SCM_CREDENTIALS:
1571 {
1572 struct ucred *cred = (struct ucred *)data;
1573 struct target_ucred *target_cred =
1574 (struct target_ucred *)target_data;
1575
1576 __put_user(cred->pid, &target_cred->pid);
1577 __put_user(cred->uid, &target_cred->uid);
1578 __put_user(cred->gid, &target_cred->gid);
1579 break;
1580 }
52b65494
HD		 1581 default:
1582 goto unimplemented;
1583 }
1584 break;
7854b056 1585
52b65494
HD		 1586 default:
1587 unimplemented:
aebf5bc7
JH		 1588 gemu_log("Unsupported ancillary data: %d/%d\n",
1589 cmsg->cmsg_level, cmsg->cmsg_type);
c2aeb258
PM		 1590 memcpy(target_data, data, MIN(len, tgt_len));
1591 if (tgt_len > len) {
1592 memset(target_data + len, 0, tgt_len - len);
1593 }
7854b056
FB		 1594 }
1595
c2aeb258 1596 target_cmsg->cmsg_len = tswapal(tgt_len);
ee104587 1597 tgt_space = TARGET_CMSG_SPACE(len);
c2aeb258
PM		 1598 if (msg_controllen < tgt_space) {
1599 tgt_space = msg_controllen;
1600 }
1601 msg_controllen -= tgt_space;
1602 space += tgt_space;
7854b056 1603 cmsg = CMSG_NXTHDR(msgh, cmsg);
ee104587
JN		 1604 target_cmsg = TARGET_CMSG_NXTHDR(target_msgh, target_cmsg,
1605 target_cmsg_start);
7854b056 1606 }
5a4a898d
FB		 1607 unlock_user(target_cmsg, target_cmsg_addr, space);
1608 the_end:
cbb21eed 1609 target_msgh->msg_controllen = tswapal(space);
5a4a898d 1610 return 0;
7854b056
FB		 1611}
1612
6c5b5645
LV		 1613static void tswap_nlmsghdr(struct nlmsghdr *nlh)
1614{
1615 nlh->nlmsg_len = tswap32(nlh->nlmsg_len);
1616 nlh->nlmsg_type = tswap16(nlh->nlmsg_type);
1617 nlh->nlmsg_flags = tswap16(nlh->nlmsg_flags);
1618 nlh->nlmsg_seq = tswap32(nlh->nlmsg_seq);
1619 nlh->nlmsg_pid = tswap32(nlh->nlmsg_pid);
1620}
1621
1622static abi_long host_to_target_for_each_nlmsg(struct nlmsghdr *nlh,
1623 size_t len,
1624 abi_long (*host_to_target_nlmsg)
1625 (struct nlmsghdr *))
1626{
1627 uint32_t nlmsg_len;
1628 abi_long ret;
1629
1630 while (len > sizeof(struct nlmsghdr)) {
1631
1632 nlmsg_len = nlh->nlmsg_len;
1633 if (nlmsg_len < sizeof(struct nlmsghdr) ||
1634 nlmsg_len > len) {
1635 break;
1636 }
1637
1638 switch (nlh->nlmsg_type) {
1639 case NLMSG_DONE:
1640 tswap_nlmsghdr(nlh);
1641 return 0;
1642 case NLMSG_NOOP:
1643 break;
1644 case NLMSG_ERROR:
1645 {
1646 struct nlmsgerr *e = NLMSG_DATA(nlh);
1647 e->error = tswap32(e->error);
1648 tswap_nlmsghdr(&e->msg);
1649 tswap_nlmsghdr(nlh);
1650 return 0;
1651 }
1652 default:
1653 ret = host_to_target_nlmsg(nlh);
1654 if (ret < 0) {
1655 tswap_nlmsghdr(nlh);
1656 return ret;
1657 }
1658 break;
1659 }
1660 tswap_nlmsghdr(nlh);
1661 len -= NLMSG_ALIGN(nlmsg_len);
1662 nlh = (struct nlmsghdr *)(((char*)nlh) + NLMSG_ALIGN(nlmsg_len));
1663 }
1664 return 0;
1665}
1666
1667static abi_long target_to_host_for_each_nlmsg(struct nlmsghdr *nlh,
1668 size_t len,
1669 abi_long (*target_to_host_nlmsg)
1670 (struct nlmsghdr *))
1671{
1672 int ret;
1673
1674 while (len > sizeof(struct nlmsghdr)) {
1675 if (tswap32(nlh->nlmsg_len) < sizeof(struct nlmsghdr) ||
1676 tswap32(nlh->nlmsg_len) > len) {
1677 break;
1678 }
1679 tswap_nlmsghdr(nlh);
1680 switch (nlh->nlmsg_type) {
1681 case NLMSG_DONE:
1682 return 0;
1683 case NLMSG_NOOP:
1684 break;
1685 case NLMSG_ERROR:
1686 {
1687 struct nlmsgerr *e = NLMSG_DATA(nlh);
1688 e->error = tswap32(e->error);
1689 tswap_nlmsghdr(&e->msg);
1690 }
1691 default:
1692 ret = target_to_host_nlmsg(nlh);
1693 if (ret < 0) {
1694 return ret;
1695 }
1696 }
1697 len -= NLMSG_ALIGN(nlh->nlmsg_len);
1698 nlh = (struct nlmsghdr *)(((char *)nlh) + NLMSG_ALIGN(nlh->nlmsg_len));
1699 }
1700 return 0;
1701}
1702
575b22b1 1703#ifdef CONFIG_RTNETLINK
6c5b5645
LV		 1704static abi_long host_to_target_for_each_rtattr(struct rtattr *rtattr,
1705 size_t len,
1706 abi_long (*host_to_target_rtattr)
1707 (struct rtattr *))
1708{
1709 unsigned short rta_len;
1710 abi_long ret;
1711
1712 while (len > sizeof(struct rtattr)) {
1713 rta_len = rtattr->rta_len;
1714 if (rta_len < sizeof(struct rtattr) ||
1715 rta_len > len) {
1716 break;
1717 }
1718 ret = host_to_target_rtattr(rtattr);
1719 rtattr->rta_len = tswap16(rtattr->rta_len);
1720 rtattr->rta_type = tswap16(rtattr->rta_type);
1721 if (ret < 0) {
1722 return ret;
1723 }
1724 len -= RTA_ALIGN(rta_len);
1725 rtattr = (struct rtattr *)(((char *)rtattr) + RTA_ALIGN(rta_len));
1726 }
1727 return 0;
1728}
1729
1730static abi_long host_to_target_data_link_rtattr(struct rtattr *rtattr)
1731{
1732 uint32_t *u32;
1733 struct rtnl_link_stats *st;
1734 struct rtnl_link_stats64 *st64;
1735 struct rtnl_link_ifmap *map;
1736
1737 switch (rtattr->rta_type) {
1738 /* binary stream */
1739 case IFLA_ADDRESS:
1740 case IFLA_BROADCAST:
1741 /* string */
1742 case IFLA_IFNAME:
1743 case IFLA_QDISC:
1744 break;
1745 /* uin8_t */
1746 case IFLA_OPERSTATE:
1747 case IFLA_LINKMODE:
1748 case IFLA_CARRIER:
1749 case IFLA_PROTO_DOWN:
1750 break;
1751 /* uint32_t */
1752 case IFLA_MTU:
1753 case IFLA_LINK:
1754 case IFLA_WEIGHT:
1755 case IFLA_TXQLEN:
1756 case IFLA_CARRIER_CHANGES:
1757 case IFLA_NUM_RX_QUEUES:
1758 case IFLA_NUM_TX_QUEUES:
1759 case IFLA_PROMISCUITY:
1760 case IFLA_EXT_MASK:
1761 case IFLA_LINK_NETNSID:
1762 case IFLA_GROUP:
1763 case IFLA_MASTER:
1764 case IFLA_NUM_VF:
1765 u32 = RTA_DATA(rtattr);
1766 *u32 = tswap32(*u32);
1767 break;
1768 /* struct rtnl_link_stats */
1769 case IFLA_STATS:
1770 st = RTA_DATA(rtattr);
1771 st->rx_packets = tswap32(st->rx_packets);
1772 st->tx_packets = tswap32(st->tx_packets);
1773 st->rx_bytes = tswap32(st->rx_bytes);
1774 st->tx_bytes = tswap32(st->tx_bytes);
1775 st->rx_errors = tswap32(st->rx_errors);
1776 st->tx_errors = tswap32(st->tx_errors);
1777 st->rx_dropped = tswap32(st->rx_dropped);
1778 st->tx_dropped = tswap32(st->tx_dropped);
1779 st->multicast = tswap32(st->multicast);
1780 st->collisions = tswap32(st->collisions);
1781
1782 /* detailed rx_errors: */
1783 st->rx_length_errors = tswap32(st->rx_length_errors);
1784 st->rx_over_errors = tswap32(st->rx_over_errors);
1785 st->rx_crc_errors = tswap32(st->rx_crc_errors);
1786 st->rx_frame_errors = tswap32(st->rx_frame_errors);
1787 st->rx_fifo_errors = tswap32(st->rx_fifo_errors);
1788 st->rx_missed_errors = tswap32(st->rx_missed_errors);
1789
1790 /* detailed tx_errors */
1791 st->tx_aborted_errors = tswap32(st->tx_aborted_errors);
1792 st->tx_carrier_errors = tswap32(st->tx_carrier_errors);
1793 st->tx_fifo_errors = tswap32(st->tx_fifo_errors);
1794 st->tx_heartbeat_errors = tswap32(st->tx_heartbeat_errors);
1795 st->tx_window_errors = tswap32(st->tx_window_errors);
1796
1797 /* for cslip etc */
1798 st->rx_compressed = tswap32(st->rx_compressed);
1799 st->tx_compressed = tswap32(st->tx_compressed);
1800 break;
1801 /* struct rtnl_link_stats64 */
1802 case IFLA_STATS64:
1803 st64 = RTA_DATA(rtattr);
1804 st64->rx_packets = tswap64(st64->rx_packets);
1805 st64->tx_packets = tswap64(st64->tx_packets);
1806 st64->rx_bytes = tswap64(st64->rx_bytes);
1807 st64->tx_bytes = tswap64(st64->tx_bytes);
1808 st64->rx_errors = tswap64(st64->rx_errors);
1809 st64->tx_errors = tswap64(st64->tx_errors);
1810 st64->rx_dropped = tswap64(st64->rx_dropped);
1811 st64->tx_dropped = tswap64(st64->tx_dropped);
1812 st64->multicast = tswap64(st64->multicast);
1813 st64->collisions = tswap64(st64->collisions);
1814
1815 /* detailed rx_errors: */
1816 st64->rx_length_errors = tswap64(st64->rx_length_errors);
1817 st64->rx_over_errors = tswap64(st64->rx_over_errors);
1818 st64->rx_crc_errors = tswap64(st64->rx_crc_errors);
1819 st64->rx_frame_errors = tswap64(st64->rx_frame_errors);
1820 st64->rx_fifo_errors = tswap64(st64->rx_fifo_errors);
1821 st64->rx_missed_errors = tswap64(st64->rx_missed_errors);
1822
1823 /* detailed tx_errors */
1824 st64->tx_aborted_errors = tswap64(st64->tx_aborted_errors);
1825 st64->tx_carrier_errors = tswap64(st64->tx_carrier_errors);
1826 st64->tx_fifo_errors = tswap64(st64->tx_fifo_errors);
1827 st64->tx_heartbeat_errors = tswap64(st64->tx_heartbeat_errors);
1828 st64->tx_window_errors = tswap64(st64->tx_window_errors);
1829
1830 /* for cslip etc */
1831 st64->rx_compressed = tswap64(st64->rx_compressed);
1832 st64->tx_compressed = tswap64(st64->tx_compressed);
1833 break;
1834 /* struct rtnl_link_ifmap */
1835 case IFLA_MAP:
1836 map = RTA_DATA(rtattr);
1837 map->mem_start = tswap64(map->mem_start);
1838 map->mem_end = tswap64(map->mem_end);
1839 map->base_addr = tswap64(map->base_addr);
1840 map->irq = tswap16(map->irq);
1841 break;
1842 /* nested */
1843 case IFLA_AF_SPEC:
1844 case IFLA_LINKINFO:
1845 /* FIXME: implement nested type */
1846 gemu_log("Unimplemented nested type %d\n", rtattr->rta_type);
1847 break;
1848 default:
1849 gemu_log("Unknown host IFLA type: %d\n", rtattr->rta_type);
1850 break;
1851 }
1852 return 0;
1853}
1854
1855static abi_long host_to_target_data_addr_rtattr(struct rtattr *rtattr)
1856{
1857 uint32_t *u32;
1858 struct ifa_cacheinfo *ci;
1859
1860 switch (rtattr->rta_type) {
1861 /* binary: depends on family type */
1862 case IFA_ADDRESS:
1863 case IFA_LOCAL:
1864 break;
1865 /* string */
1866 case IFA_LABEL:
1867 break;
1868 /* u32 */
1869 case IFA_FLAGS:
1870 case IFA_BROADCAST:
1871 u32 = RTA_DATA(rtattr);
1872 *u32 = tswap32(*u32);
1873 break;
1874 /* struct ifa_cacheinfo */
1875 case IFA_CACHEINFO:
1876 ci = RTA_DATA(rtattr);
1877 ci->ifa_prefered = tswap32(ci->ifa_prefered);
1878 ci->ifa_valid = tswap32(ci->ifa_valid);
1879 ci->cstamp = tswap32(ci->cstamp);
1880 ci->tstamp = tswap32(ci->tstamp);
1881 break;
1882 default:
1883 gemu_log("Unknown host IFA type: %d\n", rtattr->rta_type);
1884 break;
1885 }
1886 return 0;
1887}
1888
1889static abi_long host_to_target_data_route_rtattr(struct rtattr *rtattr)
1890{
1891 uint32_t *u32;
1892 switch (rtattr->rta_type) {
1893 /* binary: depends on family type */
1894 case RTA_GATEWAY:
1895 case RTA_DST:
1896 case RTA_PREFSRC:
1897 break;
1898 /* u32 */
1899 case RTA_PRIORITY:
1900 case RTA_TABLE:
1901 case RTA_OIF:
1902 u32 = RTA_DATA(rtattr);
1903 *u32 = tswap32(*u32);
1904 break;
1905 default:
1906 gemu_log("Unknown host RTA type: %d\n", rtattr->rta_type);
1907 break;
1908 }
1909 return 0;
1910}
1911
1912static abi_long host_to_target_link_rtattr(struct rtattr *rtattr,
1913 uint32_t rtattr_len)
1914{
1915 return host_to_target_for_each_rtattr(rtattr, rtattr_len,
1916 host_to_target_data_link_rtattr);
1917}
1918
1919static abi_long host_to_target_addr_rtattr(struct rtattr *rtattr,
1920 uint32_t rtattr_len)
1921{
1922 return host_to_target_for_each_rtattr(rtattr, rtattr_len,
1923 host_to_target_data_addr_rtattr);
1924}
1925
1926static abi_long host_to_target_route_rtattr(struct rtattr *rtattr,
1927 uint32_t rtattr_len)
1928{
1929 return host_to_target_for_each_rtattr(rtattr, rtattr_len,
1930 host_to_target_data_route_rtattr);
1931}
1932
1933static abi_long host_to_target_data_route(struct nlmsghdr *nlh)
1934{
1935 uint32_t nlmsg_len;
1936 struct ifinfomsg *ifi;
1937 struct ifaddrmsg *ifa;
1938 struct rtmsg *rtm;
1939
1940 nlmsg_len = nlh->nlmsg_len;
1941 switch (nlh->nlmsg_type) {
1942 case RTM_NEWLINK:
1943 case RTM_DELLINK:
1944 case RTM_GETLINK:
1945 ifi = NLMSG_DATA(nlh);
1946 ifi->ifi_type = tswap16(ifi->ifi_type);
1947 ifi->ifi_index = tswap32(ifi->ifi_index);
1948 ifi->ifi_flags = tswap32(ifi->ifi_flags);
1949 ifi->ifi_change = tswap32(ifi->ifi_change);
1950 host_to_target_link_rtattr(IFLA_RTA(ifi),
1951 nlmsg_len - NLMSG_LENGTH(sizeof(*ifi)));
1952 break;
1953 case RTM_NEWADDR:
1954 case RTM_DELADDR:
1955 case RTM_GETADDR:
1956 ifa = NLMSG_DATA(nlh);
1957 ifa->ifa_index = tswap32(ifa->ifa_index);
1958 host_to_target_addr_rtattr(IFA_RTA(ifa),
1959 nlmsg_len - NLMSG_LENGTH(sizeof(*ifa)));
1960 break;
1961 case RTM_NEWROUTE:
1962 case RTM_DELROUTE:
1963 case RTM_GETROUTE:
1964 rtm = NLMSG_DATA(nlh);
1965 rtm->rtm_flags = tswap32(rtm->rtm_flags);
1966 host_to_target_route_rtattr(RTM_RTA(rtm),
1967 nlmsg_len - NLMSG_LENGTH(sizeof(*rtm)));
1968 break;
1969 default:
1970 return -TARGET_EINVAL;
1971 }
1972 return 0;
1973}
1974
1975static inline abi_long host_to_target_nlmsg_route(struct nlmsghdr *nlh,
1976 size_t len)
1977{
1978 return host_to_target_for_each_nlmsg(nlh, len, host_to_target_data_route);
1979}
1980
1981static abi_long target_to_host_for_each_rtattr(struct rtattr *rtattr,
1982 size_t len,
1983 abi_long (*target_to_host_rtattr)
1984 (struct rtattr *))
1985{
1986 abi_long ret;
1987
1988 while (len >= sizeof(struct rtattr)) {
1989 if (tswap16(rtattr->rta_len) < sizeof(struct rtattr) ||
1990 tswap16(rtattr->rta_len) > len) {
1991 break;
1992 }
1993 rtattr->rta_len = tswap16(rtattr->rta_len);
1994 rtattr->rta_type = tswap16(rtattr->rta_type);
1995 ret = target_to_host_rtattr(rtattr);
1996 if (ret < 0) {
1997 return ret;
1998 }
1999 len -= RTA_ALIGN(rtattr->rta_len);
2000 rtattr = (struct rtattr *)(((char *)rtattr) +
2001 RTA_ALIGN(rtattr->rta_len));
2002 }
2003 return 0;
2004}
2005
2006static abi_long target_to_host_data_link_rtattr(struct rtattr *rtattr)
2007{
2008 switch (rtattr->rta_type) {
2009 default:
2010 gemu_log("Unknown target IFLA type: %d\n", rtattr->rta_type);
2011 break;
2012 }
2013 return 0;
2014}
2015
2016static abi_long target_to_host_data_addr_rtattr(struct rtattr *rtattr)
2017{
2018 switch (rtattr->rta_type) {
2019 /* binary: depends on family type */
2020 case IFA_LOCAL:
2021 case IFA_ADDRESS:
2022 break;
2023 default:
2024 gemu_log("Unknown target IFA type: %d\n", rtattr->rta_type);
2025 break;
2026 }
2027 return 0;
2028}
2029
2030static abi_long target_to_host_data_route_rtattr(struct rtattr *rtattr)
2031{
2032 uint32_t *u32;
2033 switch (rtattr->rta_type) {
2034 /* binary: depends on family type */
2035 case RTA_DST:
2036 case RTA_SRC:
2037 case RTA_GATEWAY:
2038 break;
2039 /* u32 */
2040 case RTA_OIF:
2041 u32 = RTA_DATA(rtattr);
2042 *u32 = tswap32(*u32);
2043 break;
2044 default:
2045 gemu_log("Unknown target RTA type: %d\n", rtattr->rta_type);
2046 break;
2047 }
2048 return 0;
2049}
2050
2051static void target_to_host_link_rtattr(struct rtattr *rtattr,
2052 uint32_t rtattr_len)
2053{
2054 target_to_host_for_each_rtattr(rtattr, rtattr_len,
2055 target_to_host_data_link_rtattr);
2056}
2057
2058static void target_to_host_addr_rtattr(struct rtattr *rtattr,
2059 uint32_t rtattr_len)
2060{
2061 target_to_host_for_each_rtattr(rtattr, rtattr_len,
2062 target_to_host_data_addr_rtattr);
2063}
2064
2065static void target_to_host_route_rtattr(struct rtattr *rtattr,
2066 uint32_t rtattr_len)
2067{
2068 target_to_host_for_each_rtattr(rtattr, rtattr_len,
2069 target_to_host_data_route_rtattr);
2070}
2071
2072static abi_long target_to_host_data_route(struct nlmsghdr *nlh)
2073{
2074 struct ifinfomsg *ifi;
2075 struct ifaddrmsg *ifa;
2076 struct rtmsg *rtm;
2077
2078 switch (nlh->nlmsg_type) {
2079 case RTM_GETLINK:
2080 break;
2081 case RTM_NEWLINK:
2082 case RTM_DELLINK:
2083 ifi = NLMSG_DATA(nlh);
2084 ifi->ifi_type = tswap16(ifi->ifi_type);
2085 ifi->ifi_index = tswap32(ifi->ifi_index);
2086 ifi->ifi_flags = tswap32(ifi->ifi_flags);
2087 ifi->ifi_change = tswap32(ifi->ifi_change);
2088 target_to_host_link_rtattr(IFLA_RTA(ifi), nlh->nlmsg_len -
2089 NLMSG_LENGTH(sizeof(*ifi)));
2090 break;
2091 case RTM_GETADDR:
2092 case RTM_NEWADDR:
2093 case RTM_DELADDR:
2094 ifa = NLMSG_DATA(nlh);
2095 ifa->ifa_index = tswap32(ifa->ifa_index);
2096 target_to_host_addr_rtattr(IFA_RTA(ifa), nlh->nlmsg_len -
2097 NLMSG_LENGTH(sizeof(*ifa)));
2098 break;
2099 case RTM_GETROUTE:
2100 break;
2101 case RTM_NEWROUTE:
2102 case RTM_DELROUTE:
2103 rtm = NLMSG_DATA(nlh);
2104 rtm->rtm_flags = tswap32(rtm->rtm_flags);
2105 target_to_host_route_rtattr(RTM_RTA(rtm), nlh->nlmsg_len -
2106 NLMSG_LENGTH(sizeof(*rtm)));
2107 break;
2108 default:
2109 return -TARGET_EOPNOTSUPP;
2110 }
2111 return 0;
2112}
2113
2114static abi_long target_to_host_nlmsg_route(struct nlmsghdr *nlh, size_t len)
2115{
2116 return target_to_host_for_each_nlmsg(nlh, len, target_to_host_data_route);
2117}
575b22b1 2118#endif /* CONFIG_RTNETLINK */
6c5b5645 2119
5ce9bb59
LV		 2120static abi_long host_to_target_data_audit(struct nlmsghdr *nlh)
2121{
2122 switch (nlh->nlmsg_type) {
2123 default:
2124 gemu_log("Unknown host audit message type %d\n",
2125 nlh->nlmsg_type);
2126 return -TARGET_EINVAL;
2127 }
2128 return 0;
2129}
2130
2131static inline abi_long host_to_target_nlmsg_audit(struct nlmsghdr *nlh,
2132 size_t len)
2133{
2134 return host_to_target_for_each_nlmsg(nlh, len, host_to_target_data_audit);
2135}
2136
2137static abi_long target_to_host_data_audit(struct nlmsghdr *nlh)
2138{
2139 switch (nlh->nlmsg_type) {
2140 case AUDIT_USER:
2141 case AUDIT_FIRST_USER_MSG ... AUDIT_LAST_USER_MSG:
2142 case AUDIT_FIRST_USER_MSG2 ... AUDIT_LAST_USER_MSG2:
2143 break;
2144 default:
2145 gemu_log("Unknown target audit message type %d\n",
2146 nlh->nlmsg_type);
2147 return -TARGET_EINVAL;
2148 }
2149
2150 return 0;
2151}
2152
2153static abi_long target_to_host_nlmsg_audit(struct nlmsghdr *nlh, size_t len)
2154{
2155 return target_to_host_for_each_nlmsg(nlh, len, target_to_host_data_audit);
2156}
2157
0da46a6e 2158/* do_setsockopt() Must return target values and target errnos. */
992f48a0 2159static abi_long do_setsockopt(int sockfd, int level, int optname,
2f619698 2160 abi_ulong optval_addr, socklen_t optlen)
7854b056 2161{
992f48a0 2162 abi_long ret;
32407103 2163 int val;
b975b83b 2164 struct ip_mreqn *ip_mreq;
6e3cb58f 2165 struct ip_mreq_source *ip_mreq_source;
3b46e624 2166
8853f86e
FB		 2167 switch(level) {
2168 case SOL_TCP:
7854b056 2169 /* TCP options all take an 'int' value. */
7854b056 2170 if (optlen < sizeof(uint32_t))
0da46a6e 2171 return -TARGET_EINVAL;
3b46e624 2172
2f619698
FB		 2173 if (get_user_u32(val, optval_addr))
2174 return -TARGET_EFAULT;
8853f86e
FB		 2175 ret = get_errno(setsockopt(sockfd, level, optname, &val, sizeof(val)));
2176 break;
2177 case SOL_IP:
2178 switch(optname) {
2efbe911
FB		 2179 case IP_TOS:
2180 case IP_TTL:
8853f86e 2181 case IP_HDRINCL:
2efbe911
FB		 2182 case IP_ROUTER_ALERT:
2183 case IP_RECVOPTS:
2184 case IP_RETOPTS:
2185 case IP_PKTINFO:
2186 case IP_MTU_DISCOVER:
2187 case IP_RECVERR:
2188 case IP_RECVTOS:
2189#ifdef IP_FREEBIND
2190 case IP_FREEBIND:
2191#endif
2192 case IP_MULTICAST_TTL:
2193 case IP_MULTICAST_LOOP:
8853f86e
FB		 2194 val = 0;
2195 if (optlen >= sizeof(uint32_t)) {
2f619698
FB		 2196 if (get_user_u32(val, optval_addr))
2197 return -TARGET_EFAULT;
8853f86e 2198 } else if (optlen >= 1) {
2f619698
FB		 2199 if (get_user_u8(val, optval_addr))
2200 return -TARGET_EFAULT;
8853f86e
FB		 2201 }
2202 ret = get_errno(setsockopt(sockfd, level, optname, &val, sizeof(val)));
2203 break;
b975b83b
LL		 2204 case IP_ADD_MEMBERSHIP:
2205 case IP_DROP_MEMBERSHIP:
2206 if (optlen < sizeof (struct target_ip_mreq) ||
2207 optlen > sizeof (struct target_ip_mreqn))
2208 return -TARGET_EINVAL;
2209
2210 ip_mreq = (struct ip_mreqn *) alloca(optlen);
2211 target_to_host_ip_mreq(ip_mreq, optval_addr, optlen);
2212 ret = get_errno(setsockopt(sockfd, level, optname, ip_mreq, optlen));
2213 break;
2214
6e3cb58f
LL		 2215 case IP_BLOCK_SOURCE:
2216 case IP_UNBLOCK_SOURCE:
2217 case IP_ADD_SOURCE_MEMBERSHIP:
2218 case IP_DROP_SOURCE_MEMBERSHIP:
2219 if (optlen != sizeof (struct target_ip_mreq_source))
2220 return -TARGET_EINVAL;
2221
2222 ip_mreq_source = lock_user(VERIFY_READ, optval_addr, optlen, 1);
2223 ret = get_errno(setsockopt(sockfd, level, optname, ip_mreq_source, optlen));
2224 unlock_user (ip_mreq_source, optval_addr, 0);
2225 break;
2226
920394db
JH		 2227 default:
2228 goto unimplemented;
2229 }
2230 break;
0d78b3b5
LV		 2231 case SOL_IPV6:
2232 switch (optname) {
2233 case IPV6_MTU_DISCOVER:
2234 case IPV6_MTU:
2235 case IPV6_V6ONLY:
2236 case IPV6_RECVPKTINFO:
2237 val = 0;
2238 if (optlen < sizeof(uint32_t)) {
2239 return -TARGET_EINVAL;
2240 }
2241 if (get_user_u32(val, optval_addr)) {
2242 return -TARGET_EFAULT;
2243 }
2244 ret = get_errno(setsockopt(sockfd, level, optname,
2245 &val, sizeof(val)));
2246 break;
2247 default:
2248 goto unimplemented;
2249 }
2250 break;
920394db
JH		 2251 case SOL_RAW:
2252 switch (optname) {
2253 case ICMP_FILTER:
2254 /* struct icmp_filter takes an u32 value */
2255 if (optlen < sizeof(uint32_t)) {
2256 return -TARGET_EINVAL;
2257 }
2258
2259 if (get_user_u32(val, optval_addr)) {
2260 return -TARGET_EFAULT;
2261 }
2262 ret = get_errno(setsockopt(sockfd, level, optname,
2263 &val, sizeof(val)));
2264 break;
2265
8853f86e
FB		 2266 default:
2267 goto unimplemented;
2268 }
2269 break;
3532fa74 2270 case TARGET_SOL_SOCKET:
8853f86e 2271 switch (optname) {
1b09aeb9
LV		 2272 case TARGET_SO_RCVTIMEO:
2273 {
2274 struct timeval tv;
2275
2276 optname = SO_RCVTIMEO;
2277
2278set_timeout:
2279 if (optlen != sizeof(struct target_timeval)) {
2280 return -TARGET_EINVAL;
2281 }
2282
2283 if (copy_from_user_timeval(&tv, optval_addr)) {
2284 return -TARGET_EFAULT;
2285 }
2286
2287 ret = get_errno(setsockopt(sockfd, SOL_SOCKET, optname,
2288 &tv, sizeof(tv)));
2289 return ret;
2290 }
2291 case TARGET_SO_SNDTIMEO:
2292 optname = SO_SNDTIMEO;
2293 goto set_timeout;
f57d4192
LV		 2294 case TARGET_SO_ATTACH_FILTER:
2295 {
2296 struct target_sock_fprog *tfprog;
2297 struct target_sock_filter *tfilter;
2298 struct sock_fprog fprog;
2299 struct sock_filter *filter;
2300 int i;
2301
2302 if (optlen != sizeof(*tfprog)) {
2303 return -TARGET_EINVAL;
2304 }
2305 if (!lock_user_struct(VERIFY_READ, tfprog, optval_addr, 0)) {
2306 return -TARGET_EFAULT;
2307 }
2308 if (!lock_user_struct(VERIFY_READ, tfilter,
2309 tswapal(tfprog->filter), 0)) {
2310 unlock_user_struct(tfprog, optval_addr, 1);
2311 return -TARGET_EFAULT;
2312 }
2313
2314 fprog.len = tswap16(tfprog->len);
0e173b24 2315 filter = g_try_new(struct sock_filter, fprog.len);
f57d4192
LV		 2316 if (filter == NULL) {
2317 unlock_user_struct(tfilter, tfprog->filter, 1);
2318 unlock_user_struct(tfprog, optval_addr, 1);
2319 return -TARGET_ENOMEM;
2320 }
2321 for (i = 0; i < fprog.len; i++) {
2322 filter[i].code = tswap16(tfilter[i].code);
2323 filter[i].jt = tfilter[i].jt;
2324 filter[i].jf = tfilter[i].jf;
2325 filter[i].k = tswap32(tfilter[i].k);
2326 }
2327 fprog.filter = filter;
2328
2329 ret = get_errno(setsockopt(sockfd, SOL_SOCKET,
2330 SO_ATTACH_FILTER, &fprog, sizeof(fprog)));
0e173b24 2331 g_free(filter);
f57d4192
LV		 2332
2333 unlock_user_struct(tfilter, tfprog->filter, 1);
2334 unlock_user_struct(tfprog, optval_addr, 1);
2335 return ret;
2336 }
451aaf68
JT		 2337 case TARGET_SO_BINDTODEVICE:
2338 {
2339 char *dev_ifname, *addr_ifname;
2340
2341 if (optlen > IFNAMSIZ - 1) {
2342 optlen = IFNAMSIZ - 1;
2343 }
2344 dev_ifname = lock_user(VERIFY_READ, optval_addr, optlen, 1);
2345 if (!dev_ifname) {
2346 return -TARGET_EFAULT;
2347 }
2348 optname = SO_BINDTODEVICE;
2349 addr_ifname = alloca(IFNAMSIZ);
2350 memcpy(addr_ifname, dev_ifname, optlen);
2351 addr_ifname[optlen] = 0;
fad6c58a
CG		 2352 ret = get_errno(setsockopt(sockfd, SOL_SOCKET, optname,
2353 addr_ifname, optlen));
451aaf68
JT		 2354 unlock_user (dev_ifname, optval_addr, 0);
2355 return ret;
2356 }
8853f86e 2357 /* Options with 'int' argument. */
3532fa74
FB		 2358 case TARGET_SO_DEBUG:
2359 optname = SO_DEBUG;
2360 break;
2361 case TARGET_SO_REUSEADDR:
2362 optname = SO_REUSEADDR;
2363 break;
2364 case TARGET_SO_TYPE:
2365 optname = SO_TYPE;
2366 break;
2367 case TARGET_SO_ERROR:
2368 optname = SO_ERROR;
2369 break;
2370 case TARGET_SO_DONTROUTE:
2371 optname = SO_DONTROUTE;
2372 break;
2373 case TARGET_SO_BROADCAST:
2374 optname = SO_BROADCAST;
2375 break;
2376 case TARGET_SO_SNDBUF:
2377 optname = SO_SNDBUF;
2378 break;
d79b6cc4
PB		 2379 case TARGET_SO_SNDBUFFORCE:
2380 optname = SO_SNDBUFFORCE;
2381 break;
3532fa74
FB		 2382 case TARGET_SO_RCVBUF:
2383 optname = SO_RCVBUF;
2384 break;
d79b6cc4
PB		 2385 case TARGET_SO_RCVBUFFORCE:
2386 optname = SO_RCVBUFFORCE;
2387 break;
3532fa74
FB		 2388 case TARGET_SO_KEEPALIVE:
2389 optname = SO_KEEPALIVE;
2390 break;
2391 case TARGET_SO_OOBINLINE:
2392 optname = SO_OOBINLINE;
2393 break;
2394 case TARGET_SO_NO_CHECK:
2395 optname = SO_NO_CHECK;
2396 break;
2397 case TARGET_SO_PRIORITY:
2398 optname = SO_PRIORITY;
2399 break;
5e83e8e3 2400#ifdef SO_BSDCOMPAT
3532fa74
FB		 2401 case TARGET_SO_BSDCOMPAT:
2402 optname = SO_BSDCOMPAT;
2403 break;
5e83e8e3 2404#endif
3532fa74
FB		 2405 case TARGET_SO_PASSCRED:
2406 optname = SO_PASSCRED;
2407 break;
82d0fe6b
PB		 2408 case TARGET_SO_PASSSEC:
2409 optname = SO_PASSSEC;
2410 break;
3532fa74
FB		 2411 case TARGET_SO_TIMESTAMP:
2412 optname = SO_TIMESTAMP;
2413 break;
2414 case TARGET_SO_RCVLOWAT:
2415 optname = SO_RCVLOWAT;
2416 break;
8853f86e
FB		 2417 break;
2418 default:
2419 goto unimplemented;
2420 }
3532fa74 2421 if (optlen < sizeof(uint32_t))
2f619698 2422 return -TARGET_EINVAL;
3532fa74 2423
2f619698
FB		 2424 if (get_user_u32(val, optval_addr))
2425 return -TARGET_EFAULT;
3532fa74 2426 ret = get_errno(setsockopt(sockfd, SOL_SOCKET, optname, &val, sizeof(val)));
8853f86e 2427 break;
7854b056 2428 default:
8853f86e 2429 unimplemented:
b2bedb21 2430 gemu_log("Unsupported setsockopt level=%d optname=%d\n", level, optname);
6fa13c17 2431 ret = -TARGET_ENOPROTOOPT;
7854b056 2432 }
8853f86e 2433 return ret;
7854b056
FB		 2434}
2435
0da46a6e 2436/* do_getsockopt() Must return target values and target errnos. */
992f48a0 2437static abi_long do_getsockopt(int sockfd, int level, int optname,
2f619698 2438 abi_ulong optval_addr, abi_ulong optlen)
7854b056 2439{
992f48a0 2440 abi_long ret;
b55266b5
BS		 2441 int len, val;
2442 socklen_t lv;
8853f86e
FB		 2443
2444 switch(level) {
3532fa74 2445 case TARGET_SOL_SOCKET:
f3b974cd
JL		 2446 level = SOL_SOCKET;
2447 switch (optname) {
2448 /* These don't just return a single integer */
2449 case TARGET_SO_LINGER:
2450 case TARGET_SO_RCVTIMEO:
2451 case TARGET_SO_SNDTIMEO:
f3b974cd
JL		 2452 case TARGET_SO_PEERNAME:
2453 goto unimplemented;
583359a6
AP		 2454 case TARGET_SO_PEERCRED: {
2455 struct ucred cr;
2456 socklen_t crlen;
2457 struct target_ucred *tcr;
2458
2459 if (get_user_u32(len, optlen)) {
2460 return -TARGET_EFAULT;
2461 }
2462 if (len < 0) {
2463 return -TARGET_EINVAL;
2464 }
2465
2466 crlen = sizeof(cr);
2467 ret = get_errno(getsockopt(sockfd, level, SO_PEERCRED,
2468 &cr, &crlen));
2469 if (ret < 0) {
2470 return ret;
2471 }
2472 if (len > crlen) {
2473 len = crlen;
2474 }
2475 if (!lock_user_struct(VERIFY_WRITE, tcr, optval_addr, 0)) {
2476 return -TARGET_EFAULT;
2477 }
2478 __put_user(cr.pid, &tcr->pid);
2479 __put_user(cr.uid, &tcr->uid);
2480 __put_user(cr.gid, &tcr->gid);
2481 unlock_user_struct(tcr, optval_addr, 1);
2482 if (put_user_u32(len, optlen)) {
2483 return -TARGET_EFAULT;
2484 }
2485 break;
2486 }
f3b974cd
JL		 2487 /* Options with 'int' argument. */
2488 case TARGET_SO_DEBUG:
2489 optname = SO_DEBUG;
2490 goto int_case;
2491 case TARGET_SO_REUSEADDR:
2492 optname = SO_REUSEADDR;
2493 goto int_case;
2494 case TARGET_SO_TYPE:
2495 optname = SO_TYPE;
2496 goto int_case;
2497 case TARGET_SO_ERROR:
2498 optname = SO_ERROR;
2499 goto int_case;
2500 case TARGET_SO_DONTROUTE:
2501 optname = SO_DONTROUTE;
2502 goto int_case;
2503 case TARGET_SO_BROADCAST:
2504 optname = SO_BROADCAST;
2505 goto int_case;
2506 case TARGET_SO_SNDBUF:
2507 optname = SO_SNDBUF;
2508 goto int_case;
2509 case TARGET_SO_RCVBUF:
2510 optname = SO_RCVBUF;
2511 goto int_case;
2512 case TARGET_SO_KEEPALIVE:
2513 optname = SO_KEEPALIVE;
2514 goto int_case;
2515 case TARGET_SO_OOBINLINE:
2516 optname = SO_OOBINLINE;
2517 goto int_case;
2518 case TARGET_SO_NO_CHECK:
2519 optname = SO_NO_CHECK;
2520 goto int_case;
2521 case TARGET_SO_PRIORITY:
2522 optname = SO_PRIORITY;
2523 goto int_case;
2524#ifdef SO_BSDCOMPAT
2525 case TARGET_SO_BSDCOMPAT:
2526 optname = SO_BSDCOMPAT;
2527 goto int_case;
2528#endif
2529 case TARGET_SO_PASSCRED:
2530 optname = SO_PASSCRED;
2531 goto int_case;
2532 case TARGET_SO_TIMESTAMP:
2533 optname = SO_TIMESTAMP;
2534 goto int_case;
2535 case TARGET_SO_RCVLOWAT:
2536 optname = SO_RCVLOWAT;
2537 goto int_case;
aec1ca41
PB		 2538 case TARGET_SO_ACCEPTCONN:
2539 optname = SO_ACCEPTCONN;
2540 goto int_case;
8853f86e 2541 default:
2efbe911
FB		 2542 goto int_case;
2543 }
2544 break;
2545 case SOL_TCP:
2546 /* TCP options all take an 'int' value. */
2547 int_case:
2f619698
FB		 2548 if (get_user_u32(len, optlen))
2549 return -TARGET_EFAULT;
2efbe911 2550 if (len < 0)
0da46a6e 2551 return -TARGET_EINVAL;
73160d95 2552 lv = sizeof(lv);
2efbe911
FB		 2553 ret = get_errno(getsockopt(sockfd, level, optname, &val, &lv));
2554 if (ret < 0)
2555 return ret;
8289d112
PB		 2556 if (optname == SO_TYPE) {
2557 val = host_to_target_sock_type(val);
2558 }
2efbe911
FB		 2559 if (len > lv)
2560 len = lv;
2f619698
FB		 2561 if (len == 4) {
2562 if (put_user_u32(val, optval_addr))
2563 return -TARGET_EFAULT;
2564 } else {
2565 if (put_user_u8(val, optval_addr))
2566 return -TARGET_EFAULT;
f3b974cd 2567 }
2f619698
FB		 2568 if (put_user_u32(len, optlen))
2569 return -TARGET_EFAULT;
2efbe911
FB		 2570 break;
2571 case SOL_IP:
2572 switch(optname) {
2573 case IP_TOS:
2574 case IP_TTL:
2575 case IP_HDRINCL:
2576 case IP_ROUTER_ALERT:
2577 case IP_RECVOPTS:
2578 case IP_RETOPTS:
2579 case IP_PKTINFO:
2580 case IP_MTU_DISCOVER:
2581 case IP_RECVERR:
2582 case IP_RECVTOS:
2583#ifdef IP_FREEBIND
2584 case IP_FREEBIND:
2585#endif
2586 case IP_MULTICAST_TTL:
2587 case IP_MULTICAST_LOOP:
2f619698
FB		 2588 if (get_user_u32(len, optlen))
2589 return -TARGET_EFAULT;
8853f86e 2590 if (len < 0)
0da46a6e 2591 return -TARGET_EINVAL;
73160d95 2592 lv = sizeof(lv);
8853f86e
FB		 2593 ret = get_errno(getsockopt(sockfd, level, optname, &val, &lv));
2594 if (ret < 0)
2595 return ret;
2efbe911 2596 if (len < sizeof(int) && len > 0 && val >= 0 && val < 255) {
2efbe911 2597 len = 1;
2f619698
FB		 2598 if (put_user_u32(len, optlen)
2599 || put_user_u8(val, optval_addr))
2600 return -TARGET_EFAULT;
2efbe911 2601 } else {
2efbe911
FB		 2602 if (len > sizeof(int))
2603 len = sizeof(int);
2f619698
FB		 2604 if (put_user_u32(len, optlen)
2605 || put_user_u32(val, optval_addr))
2606 return -TARGET_EFAULT;
2efbe911 2607 }
8853f86e 2608 break;
2efbe911 2609 default:
c02f499e
TS		 2610 ret = -TARGET_ENOPROTOOPT;
2611 break;
8853f86e
FB		 2612 }
2613 break;
2614 default:
2615 unimplemented:
2616 gemu_log("getsockopt level=%d optname=%d not yet supported\n",
2617 level, optname);
c02f499e 2618 ret = -TARGET_EOPNOTSUPP;
8853f86e
FB		 2619 break;
2620 }
2621 return ret;
7854b056
FB		 2622}
2623
f287b2c2
RH		 2624static struct iovec *lock_iovec(int type, abi_ulong target_addr,
2625 int count, int copy)
53a5960a
PB		 2626{
2627 struct target_iovec *target_vec;
f287b2c2
RH		 2628 struct iovec *vec;
2629 abi_ulong total_len, max_len;
d732dcb4 2630 int i;
501bb4b0 2631 int err = 0;
29560a6c 2632 bool bad_address = false;
53a5960a 2633
f287b2c2
RH		 2634 if (count == 0) {
2635 errno = 0;
2636 return NULL;
2637 }
dfae8e00 2638 if (count < 0 || count > IOV_MAX) {
f287b2c2
RH		 2639 errno = EINVAL;
2640 return NULL;
2641 }
2642
0e173b24 2643 vec = g_try_new0(struct iovec, count);
f287b2c2
RH		 2644 if (vec == NULL) {
2645 errno = ENOMEM;
2646 return NULL;
2647 }
2648
2649 target_vec = lock_user(VERIFY_READ, target_addr,
2650 count * sizeof(struct target_iovec), 1);
2651 if (target_vec == NULL) {
501bb4b0 2652 err = EFAULT;
f287b2c2
RH		 2653 goto fail2;
2654 }
2655
2656 /* ??? If host page size > target page size, this will result in a
2657 value larger than what we can actually support. */
2658 max_len = 0x7fffffff & TARGET_PAGE_MASK;
2659 total_len = 0;
2660
2661 for (i = 0; i < count; i++) {
2662 abi_ulong base = tswapal(target_vec[i].iov_base);
2663 abi_long len = tswapal(target_vec[i].iov_len);
2664
2665 if (len < 0) {
501bb4b0 2666 err = EINVAL;
f287b2c2
RH		 2667 goto fail;
2668 } else if (len == 0) {
2669 /* Zero length pointer is ignored. */
2670 vec[i].iov_base = 0;
41df8411 2671 } else {
f287b2c2 2672 vec[i].iov_base = lock_user(type, base, len, copy);
29560a6c
TM		 2673 /* If the first buffer pointer is bad, this is a fault. But
2674 * subsequent bad buffers will result in a partial write; this
2675 * is realized by filling the vector with null pointers and
2676 * zero lengths. */
f287b2c2 2677 if (!vec[i].iov_base) {
29560a6c
TM		 2678 if (i == 0) {
2679 err = EFAULT;
2680 goto fail;
2681 } else {
2682 bad_address = true;
2683 }
2684 }
2685 if (bad_address) {
2686 len = 0;
f287b2c2
RH		 2687 }
2688 if (len > max_len - total_len) {
2689 len = max_len - total_len;
2690 }
41df8411 2691 }
f287b2c2
RH		 2692 vec[i].iov_len = len;
2693 total_len += len;
579a97f7 2694 }
f287b2c2
RH		 2695
2696 unlock_user(target_vec, target_addr, 0);
2697 return vec;
2698
2699 fail:
7eff518b
CG		 2700 while (--i >= 0) {
2701 if (tswapal(target_vec[i].iov_len) > 0) {
2702 unlock_user(vec[i].iov_base, tswapal(target_vec[i].iov_base), 0);
2703 }
2704 }
f287b2c2 2705 unlock_user(target_vec, target_addr, 0);
501bb4b0 2706 fail2:
0e173b24 2707 g_free(vec);
501bb4b0 2708 errno = err;
f287b2c2 2709 return NULL;
53a5960a
PB		 2710}
2711
f287b2c2
RH		 2712static void unlock_iovec(struct iovec *vec, abi_ulong target_addr,
2713 int count, int copy)
53a5960a
PB		 2714{
2715 struct target_iovec *target_vec;
53a5960a
PB		 2716 int i;
2717
f287b2c2
RH		 2718 target_vec = lock_user(VERIFY_READ, target_addr,
2719 count * sizeof(struct target_iovec), 1);
2720 if (target_vec) {
2721 for (i = 0; i < count; i++) {
2722 abi_ulong base = tswapal(target_vec[i].iov_base);
71ec7cef 2723 abi_long len = tswapal(target_vec[i].iov_len);
f287b2c2
RH		 2724 if (len < 0) {
2725 break;
2726 }
d732dcb4
AZ		 2727 unlock_user(vec[i].iov_base, base, copy ? vec[i].iov_len : 0);
2728 }
f287b2c2 2729 unlock_user(target_vec, target_addr, 0);
53a5960a 2730 }
579a97f7 2731
0e173b24 2732 g_free(vec);
53a5960a
PB		 2733}
2734
53d09b76 2735static inline int target_to_host_sock_type(int *type)
3532fa74 2736{
f651e6ae
PJ		 2737 int host_type = 0;
2738 int target_type = *type;
2739
2740 switch (target_type & TARGET_SOCK_TYPE_MASK) {
3532fa74 2741 case TARGET_SOCK_DGRAM:
f651e6ae 2742 host_type = SOCK_DGRAM;
3532fa74
FB		 2743 break;
2744 case TARGET_SOCK_STREAM:
f651e6ae 2745 host_type = SOCK_STREAM;
3532fa74 2746 break;
f651e6ae
PJ		 2747 default:
2748 host_type = target_type & TARGET_SOCK_TYPE_MASK;
3532fa74
FB		 2749 break;
2750 }
f651e6ae 2751 if (target_type & TARGET_SOCK_CLOEXEC) {
53d09b76 2752#if defined(SOCK_CLOEXEC)
f651e6ae 2753 host_type |= SOCK_CLOEXEC;
53d09b76
EI		 2754#else
2755 return -TARGET_EINVAL;
2756#endif
f651e6ae
PJ		 2757 }
2758 if (target_type & TARGET_SOCK_NONBLOCK) {
53d09b76 2759#if defined(SOCK_NONBLOCK)
f651e6ae 2760 host_type |= SOCK_NONBLOCK;
53d09b76
EI		 2761#elif !defined(O_NONBLOCK)
2762 return -TARGET_EINVAL;
2763#endif
f651e6ae
PJ		 2764 }
2765 *type = host_type;
53d09b76
EI		 2766 return 0;
2767}
2768
2769/* Try to emulate socket type flags after socket creation. */
2770static int sock_flags_fixup(int fd, int target_type)
2771{
2772#if !defined(SOCK_NONBLOCK) && defined(O_NONBLOCK)
2773 if (target_type & TARGET_SOCK_NONBLOCK) {
2774 int flags = fcntl(fd, F_GETFL);
2775 if (fcntl(fd, F_SETFL, O_NONBLOCK | flags) == -1) {
2776 close(fd);
2777 return -TARGET_EINVAL;
2778 }
2779 }
2780#endif
2781 return fd;
f651e6ae
PJ		 2782}
2783
0cf22722
LV		 2784static abi_long packet_target_to_host_sockaddr(void *host_addr,
2785 abi_ulong target_addr,
2786 socklen_t len)
2787{
2788 struct sockaddr *addr = host_addr;
2789 struct target_sockaddr *target_saddr;
2790
2791 target_saddr = lock_user(VERIFY_READ, target_addr, len, 1);
2792 if (!target_saddr) {
2793 return -TARGET_EFAULT;
2794 }
2795
2796 memcpy(addr, target_saddr, len);
2797 addr->sa_family = tswap16(target_saddr->sa_family);
2798 /* spkt_protocol is big-endian */
2799
2800 unlock_user(target_saddr, target_addr, 0);
2801 return 0;
2802}
2803
2804static TargetFdTrans target_packet_trans = {
2805 .target_to_host_addr = packet_target_to_host_sockaddr,
2806};
2807
575b22b1 2808#ifdef CONFIG_RTNETLINK
6c5b5645
LV		 2809static abi_long netlink_route_target_to_host(void *buf, size_t len)
2810{
2811 return target_to_host_nlmsg_route(buf, len);
2812}
2813
2814static abi_long netlink_route_host_to_target(void *buf, size_t len)
2815{
2816 return host_to_target_nlmsg_route(buf, len);
2817}
2818
2819static TargetFdTrans target_netlink_route_trans = {
2820 .target_to_host_data = netlink_route_target_to_host,
2821 .host_to_target_data = netlink_route_host_to_target,
2822};
575b22b1 2823#endif /* CONFIG_RTNETLINK */
6c5b5645 2824
5ce9bb59
LV		 2825static abi_long netlink_audit_target_to_host(void *buf, size_t len)
2826{
2827 return target_to_host_nlmsg_audit(buf, len);
2828}
2829
2830static abi_long netlink_audit_host_to_target(void *buf, size_t len)
2831{
2832 return host_to_target_nlmsg_audit(buf, len);
2833}
2834
2835static TargetFdTrans target_netlink_audit_trans = {
2836 .target_to_host_data = netlink_audit_target_to_host,
2837 .host_to_target_data = netlink_audit_host_to_target,
2838};
2839
f651e6ae
PJ		 2840/* do_socket() Must return target values and target errnos. */
2841static abi_long do_socket(int domain, int type, int protocol)
2842{
53d09b76
EI		 2843 int target_type = type;
2844 int ret;
2845
2846 ret = target_to_host_sock_type(&type);
2847 if (ret) {
2848 return ret;
2849 }
f651e6ae 2850
575b22b1
LV		 2851 if (domain == PF_NETLINK && !(
2852#ifdef CONFIG_RTNETLINK
2853 protocol == NETLINK_ROUTE ||
2854#endif
2855 protocol == NETLINK_KOBJECT_UEVENT ||
2856 protocol == NETLINK_AUDIT)) {
6c5b5645
LV		 2857 return -EPFNOSUPPORT;
2858 }
ff626f2d
LV		 2859
2860 if (domain == AF_PACKET ||
2861 (domain == AF_INET && type == SOCK_PACKET)) {
2862 protocol = tswap16(protocol);
2863 }
2864
53d09b76
EI		 2865 ret = get_errno(socket(domain, type, protocol));
2866 if (ret >= 0) {
2867 ret = sock_flags_fixup(ret, target_type);
0cf22722
LV		 2868 if (type == SOCK_PACKET) {
2869 /* Manage an obsolete case :
2870 * if socket type is SOCK_PACKET, bind by name
2871 */
2872 fd_trans_register(ret, &target_packet_trans);
6c5b5645
LV		 2873 } else if (domain == PF_NETLINK) {
2874 switch (protocol) {
575b22b1 2875#ifdef CONFIG_RTNETLINK
6c5b5645
LV		 2876 case NETLINK_ROUTE:
2877 fd_trans_register(ret, &target_netlink_route_trans);
2878 break;
575b22b1 2879#endif
b265620b
LV		 2880 case NETLINK_KOBJECT_UEVENT:
2881 /* nothing to do: messages are strings */
2882 break;
5ce9bb59
LV		 2883 case NETLINK_AUDIT:
2884 fd_trans_register(ret, &target_netlink_audit_trans);
2885 break;
6c5b5645
LV		 2886 default:
2887 g_assert_not_reached();
2888 }
0cf22722 2889 }
53d09b76
EI		 2890 }
2891 return ret;
3532fa74
FB		 2892}
2893
0da46a6e 2894/* do_bind() Must return target values and target errnos. */
992f48a0
BS		 2895static abi_long do_bind(int sockfd, abi_ulong target_addr,
2896 socklen_t addrlen)
3532fa74 2897{
8f7aeaf6 2898 void *addr;
917507b0 2899 abi_long ret;
8f7aeaf6 2900
38724253 2901 if ((int)addrlen < 0) {
8f7aeaf6 2902 return -TARGET_EINVAL;
38724253 2903 }
8f7aeaf6 2904
607175e0 2905 addr = alloca(addrlen+1);
3b46e624 2906
7b36f782 2907 ret = target_to_host_sockaddr(sockfd, addr, target_addr, addrlen);
917507b0
AP		 2908 if (ret)
2909 return ret;
2910
3532fa74
FB		 2911 return get_errno(bind(sockfd, addr, addrlen));
2912}
2913
0da46a6e 2914/* do_connect() Must return target values and target errnos. */
992f48a0
BS		 2915static abi_long do_connect(int sockfd, abi_ulong target_addr,
2916 socklen_t addrlen)
3532fa74 2917{
8f7aeaf6 2918 void *addr;
917507b0 2919 abi_long ret;
8f7aeaf6 2920
38724253 2921 if ((int)addrlen < 0) {
8f7aeaf6 2922 return -TARGET_EINVAL;
38724253 2923 }
8f7aeaf6 2924
2dd08dfd 2925 addr = alloca(addrlen+1);
3b46e624 2926
7b36f782 2927 ret = target_to_host_sockaddr(sockfd, addr, target_addr, addrlen);
917507b0
AP		 2928 if (ret)
2929 return ret;
2930
2a3c7619 2931 return get_errno(safe_connect(sockfd, addr, addrlen));
3532fa74
FB		 2932}
2933
f19e00d7
AG		 2934/* do_sendrecvmsg_locked() Must return target values and target errnos. */
2935static abi_long do_sendrecvmsg_locked(int fd, struct target_msghdr *msgp,
2936 int flags, int send)
3532fa74 2937{
6de645c7 2938 abi_long ret, len;
3532fa74
FB		 2939 struct msghdr msg;
2940 int count;
2941 struct iovec *vec;
992f48a0 2942 abi_ulong target_vec;
3532fa74 2943
3532fa74
FB		 2944 if (msgp->msg_name) {
2945 msg.msg_namelen = tswap32(msgp->msg_namelen);
2dd08dfd 2946 msg.msg_name = alloca(msg.msg_namelen+1);
7b36f782
LV		 2947 ret = target_to_host_sockaddr(fd, msg.msg_name,
2948 tswapal(msgp->msg_name),
2949 msg.msg_namelen);
917507b0 2950 if (ret) {
f287b2c2 2951 goto out2;
917507b0 2952 }
3532fa74
FB		 2953 } else {
2954 msg.msg_name = NULL;
2955 msg.msg_namelen = 0;
2956 }
cbb21eed 2957 msg.msg_controllen = 2 * tswapal(msgp->msg_controllen);
3532fa74
FB		 2958 msg.msg_control = alloca(msg.msg_controllen);
2959 msg.msg_flags = tswap32(msgp->msg_flags);
3b46e624 2960
cbb21eed 2961 count = tswapal(msgp->msg_iovlen);
cbb21eed 2962 target_vec = tswapal(msgp->msg_iov);
f287b2c2
RH		 2963 vec = lock_iovec(send ? VERIFY_READ : VERIFY_WRITE,
2964 target_vec, count, send);
2965 if (vec == NULL) {
2966 ret = -host_to_target_errno(errno);
2967 goto out2;
2968 }
3532fa74
FB		 2969 msg.msg_iovlen = count;
2970 msg.msg_iov = vec;
3b46e624 2971
3532fa74 2972 if (send) {
6c5b5645
LV		 2973 if (fd_trans_target_to_host_data(fd)) {
2974 ret = fd_trans_target_to_host_data(fd)(msg.msg_iov->iov_base,
2975 msg.msg_iov->iov_len);
2976 } else {
2977 ret = target_to_host_cmsg(&msg, msgp);
2978 }
2979 if (ret == 0) {
66687530 2980 ret = get_errno(safe_sendmsg(fd, &msg, flags));
6c5b5645 2981 }
3532fa74 2982 } else {
66687530 2983 ret = get_errno(safe_recvmsg(fd, &msg, flags));
6de645c7
AZ		 2984 if (!is_error(ret)) {
2985 len = ret;
6c5b5645
LV		 2986 if (fd_trans_host_to_target_data(fd)) {
2987 ret = fd_trans_host_to_target_data(fd)(msg.msg_iov->iov_base,
2988 msg.msg_iov->iov_len);
2989 } else {
2990 ret = host_to_target_cmsg(msgp, &msg);
2991 }
ca619067
JH		 2992 if (!is_error(ret)) {
2993 msgp->msg_namelen = tswap32(msg.msg_namelen);
2994 if (msg.msg_name != NULL) {
2995 ret = host_to_target_sockaddr(tswapal(msgp->msg_name),
2996 msg.msg_name, msg.msg_namelen);
2997 if (ret) {
2998 goto out;
2999 }
3000 }
3001
6de645c7 3002 ret = len;
ca619067 3003 }
6de645c7 3004 }
3532fa74 3005 }
ca619067
JH		 3006
3007out:
3532fa74 3008 unlock_iovec(vec, target_vec, count, !send);
f287b2c2 3009out2:
f19e00d7
AG		 3010 return ret;
3011}
3012
3013static abi_long do_sendrecvmsg(int fd, abi_ulong target_msg,
3014 int flags, int send)
3015{
3016 abi_long ret;
3017 struct target_msghdr *msgp;
3018
3019 if (!lock_user_struct(send ? VERIFY_READ : VERIFY_WRITE,
3020 msgp,
3021 target_msg,
3022 send ? 1 : 0)) {
3023 return -TARGET_EFAULT;
3024 }
3025 ret = do_sendrecvmsg_locked(fd, msgp, flags, send);
579a97f7 3026 unlock_user_struct(msgp, target_msg, send ? 0 : 1);
3532fa74
FB		 3027 return ret;
3028}
3029
f19e00d7
AG		 3030/* We don't rely on the C library to have sendmmsg/recvmmsg support,
3031 * so it might not have this *mmsg-specific flag either.
3032 */
3033#ifndef MSG_WAITFORONE
3034#define MSG_WAITFORONE 0x10000
3035#endif
3036
3037static abi_long do_sendrecvmmsg(int fd, abi_ulong target_msgvec,
3038 unsigned int vlen, unsigned int flags,
3039 int send)
3040{
3041 struct target_mmsghdr *mmsgp;
3042 abi_long ret = 0;
3043 int i;
3044
3045 if (vlen > UIO_MAXIOV) {
3046 vlen = UIO_MAXIOV;
3047 }
3048
3049 mmsgp = lock_user(VERIFY_WRITE, target_msgvec, sizeof(*mmsgp) * vlen, 1);
3050 if (!mmsgp) {
3051 return -TARGET_EFAULT;
3052 }
3053
3054 for (i = 0; i < vlen; i++) {
3055 ret = do_sendrecvmsg_locked(fd, &mmsgp[i].msg_hdr, flags, send);
3056 if (is_error(ret)) {
3057 break;
3058 }
3059 mmsgp[i].msg_len = tswap32(ret);
3060 /* MSG_WAITFORONE turns on MSG_DONTWAIT after one packet */
3061 if (flags & MSG_WAITFORONE) {
3062 flags |= MSG_DONTWAIT;
3063 }
3064 }
3065
3066 unlock_user(mmsgp, target_msgvec, sizeof(*mmsgp) * i);
3067
3068 /* Return number of datagrams sent if we sent any at all;
3069 * otherwise return the error.
3070 */
3071 if (i) {
3072 return i;
3073 }
3074 return ret;
3075}
f19e00d7 3076
a94b4987
PM		 3077/* do_accept4() Must return target values and target errnos. */
3078static abi_long do_accept4(int fd, abi_ulong target_addr,
3079 abi_ulong target_addrlen_addr, int flags)
1be9e1dc 3080{
2f619698
FB		 3081 socklen_t addrlen;
3082 void *addr;
992f48a0 3083 abi_long ret;
d25295d4
PJ		 3084 int host_flags;
3085
3086 host_flags = target_to_host_bitmask(flags, fcntl_flags_tbl);
1be9e1dc 3087
a94b4987 3088 if (target_addr == 0) {
ff6dc130 3089 return get_errno(safe_accept4(fd, NULL, NULL, host_flags));
a94b4987 3090 }
917507b0
AP		 3091
3092 /* linux returns EINVAL if addrlen pointer is invalid */
2f619698 3093 if (get_user_u32(addrlen, target_addrlen_addr))
917507b0 3094 return -TARGET_EINVAL;
2f619698 3095
38724253 3096 if ((int)addrlen < 0) {
8f7aeaf6 3097 return -TARGET_EINVAL;
38724253 3098 }
8f7aeaf6 3099
917507b0
AP		 3100 if (!access_ok(VERIFY_WRITE, target_addr, addrlen))
3101 return -TARGET_EINVAL;
3102
2f619698
FB		 3103 addr = alloca(addrlen);
3104
ff6dc130 3105 ret = get_errno(safe_accept4(fd, addr, &addrlen, host_flags));
1be9e1dc
PB		 3106 if (!is_error(ret)) {
3107 host_to_target_sockaddr(target_addr, addr, addrlen);
2f619698
FB		 3108 if (put_user_u32(addrlen, target_addrlen_addr))
3109 ret = -TARGET_EFAULT;
1be9e1dc
PB		 3110 }
3111 return ret;
3112}
3113
0da46a6e 3114/* do_getpeername() Must return target values and target errnos. */
992f48a0 3115static abi_long do_getpeername(int fd, abi_ulong target_addr,
2f619698 3116 abi_ulong target_addrlen_addr)
1be9e1dc 3117{
2f619698
FB		 3118 socklen_t addrlen;
3119 void *addr;
992f48a0 3120 abi_long ret;
1be9e1dc 3121
2f619698
FB		 3122 if (get_user_u32(addrlen, target_addrlen_addr))
3123 return -TARGET_EFAULT;
3124
38724253 3125 if ((int)addrlen < 0) {
8f7aeaf6 3126 return -TARGET_EINVAL;
38724253 3127 }
8f7aeaf6 3128
917507b0
AP		 3129 if (!access_ok(VERIFY_WRITE, target_addr, addrlen))
3130 return -TARGET_EFAULT;
3131
2f619698
FB		 3132 addr = alloca(addrlen);
3133
1be9e1dc
PB		 3134 ret = get_errno(getpeername(fd, addr, &addrlen));
3135 if (!is_error(ret)) {
3136 host_to_target_sockaddr(target_addr, addr, addrlen);
2f619698
FB		 3137 if (put_user_u32(addrlen, target_addrlen_addr))
3138 ret = -TARGET_EFAULT;
1be9e1dc
PB		 3139 }
3140 return ret;
3141}
3142
0da46a6e 3143/* do_getsockname() Must return target values and target errnos. */
992f48a0 3144static abi_long do_getsockname(int fd, abi_ulong target_addr,
2f619698 3145 abi_ulong target_addrlen_addr)
1be9e1dc 3146{
2f619698
FB		 3147 socklen_t addrlen;
3148 void *addr;
992f48a0 3149 abi_long ret;
1be9e1dc 3150
2f619698
FB		 3151 if (get_user_u32(addrlen, target_addrlen_addr))
3152 return -TARGET_EFAULT;
3153
38724253 3154 if ((int)addrlen < 0) {
8f7aeaf6 3155 return -TARGET_EINVAL;
38724253 3156 }
8f7aeaf6 3157
917507b0
AP		 3158 if (!access_ok(VERIFY_WRITE, target_addr, addrlen))
3159 return -TARGET_EFAULT;
3160
2f619698
FB		 3161 addr = alloca(addrlen);
3162
1be9e1dc
PB		 3163 ret = get_errno(getsockname(fd, addr, &addrlen));
3164 if (!is_error(ret)) {
3165 host_to_target_sockaddr(target_addr, addr, addrlen);
2f619698
FB		 3166 if (put_user_u32(addrlen, target_addrlen_addr))
3167 ret = -TARGET_EFAULT;
1be9e1dc
PB		 3168 }
3169 return ret;
3170}
3171
0da46a6e 3172/* do_socketpair() Must return target values and target errnos. */
992f48a0 3173static abi_long do_socketpair(int domain, int type, int protocol,
2f619698 3174 abi_ulong target_tab_addr)
1be9e1dc
PB		 3175{
3176 int tab[2];
992f48a0 3177 abi_long ret;
1be9e1dc 3178
f651e6ae
PJ		 3179 target_to_host_sock_type(&type);
3180
1be9e1dc
PB		 3181 ret = get_errno(socketpair(domain, type, protocol, tab));
3182 if (!is_error(ret)) {
2f619698
FB		 3183 if (put_user_s32(tab[0], target_tab_addr)
3184 || put_user_s32(tab[1], target_tab_addr + sizeof(tab[0])))
3185 ret = -TARGET_EFAULT;
1be9e1dc
PB		 3186 }
3187 return ret;
3188}
3189
0da46a6e 3190/* do_sendto() Must return target values and target errnos. */
992f48a0
BS		 3191static abi_long do_sendto(int fd, abi_ulong msg, size_t len, int flags,
3192 abi_ulong target_addr, socklen_t addrlen)
1be9e1dc
PB		 3193{
3194 void *addr;
3195 void *host_msg;
992f48a0 3196 abi_long ret;
1be9e1dc 3197
38724253 3198 if ((int)addrlen < 0) {
8f7aeaf6 3199 return -TARGET_EINVAL;
38724253 3200 }
8f7aeaf6 3201
579a97f7
FB		 3202 host_msg = lock_user(VERIFY_READ, msg, len, 1);
3203 if (!host_msg)
3204 return -TARGET_EFAULT;
6c5b5645
LV		 3205 if (fd_trans_target_to_host_data(fd)) {
3206 ret = fd_trans_target_to_host_data(fd)(host_msg, len);
3207 if (ret < 0) {
3208 unlock_user(host_msg, msg, 0);
3209 return ret;
3210 }
3211 }
1be9e1dc 3212 if (target_addr) {
2dd08dfd 3213 addr = alloca(addrlen+1);
7b36f782 3214 ret = target_to_host_sockaddr(fd, addr, target_addr, addrlen);
917507b0
AP		 3215 if (ret) {
3216 unlock_user(host_msg, msg, 0);
3217 return ret;
3218 }
66687530 3219 ret = get_errno(safe_sendto(fd, host_msg, len, flags, addr, addrlen));
1be9e1dc 3220 } else {
66687530 3221 ret = get_errno(safe_sendto(fd, host_msg, len, flags, NULL, 0));
1be9e1dc
PB		 3222 }
3223 unlock_user(host_msg, msg, 0);
3224 return ret;
3225}
3226
0da46a6e 3227/* do_recvfrom() Must return target values and target errnos. */
992f48a0
BS		 3228static abi_long do_recvfrom(int fd, abi_ulong msg, size_t len, int flags,
3229 abi_ulong target_addr,
3230 abi_ulong target_addrlen)
1be9e1dc
PB		 3231{
3232 socklen_t addrlen;
3233 void *addr;
3234 void *host_msg;
992f48a0 3235 abi_long ret;
1be9e1dc 3236
579a97f7
FB		 3237 host_msg = lock_user(VERIFY_WRITE, msg, len, 0);
3238 if (!host_msg)
3239 return -TARGET_EFAULT;
1be9e1dc 3240 if (target_addr) {
2f619698
FB		 3241 if (get_user_u32(addrlen, target_addrlen)) {
3242 ret = -TARGET_EFAULT;
3243 goto fail;
3244 }
38724253 3245 if ((int)addrlen < 0) {
8f7aeaf6
AJ		 3246 ret = -TARGET_EINVAL;
3247 goto fail;
3248 }
1be9e1dc 3249 addr = alloca(addrlen);
66687530
PM		 3250 ret = get_errno(safe_recvfrom(fd, host_msg, len, flags,
3251 addr, &addrlen));
1be9e1dc
PB		 3252 } else {
3253 addr = NULL; /* To keep compiler quiet. */
66687530 3254 ret = get_errno(safe_recvfrom(fd, host_msg, len, flags, NULL, 0));
1be9e1dc
PB		 3255 }
3256 if (!is_error(ret)) {
3257 if (target_addr) {
3258 host_to_target_sockaddr(target_addr, addr, addrlen);
2f619698
FB		 3259 if (put_user_u32(addrlen, target_addrlen)) {
3260 ret = -TARGET_EFAULT;
3261 goto fail;
3262 }
1be9e1dc
PB		 3263 }
3264 unlock_user(host_msg, msg, len);
3265 } else {
2f619698 3266fail:
1be9e1dc
PB		 3267 unlock_user(host_msg, msg, 0);
3268 }
3269 return ret;
3270}
3271
32407103 3272#ifdef TARGET_NR_socketcall
0da46a6e 3273/* do_socketcall() Must return target values and target errnos. */
992f48a0 3274static abi_long do_socketcall(int num, abi_ulong vptr)
31e31b8a 3275{
62dc90c6
MT		 3276 static const unsigned ac[] = { /* number of arguments per call */
3277 [SOCKOP_socket] = 3, /* domain, type, protocol */
3278 [SOCKOP_bind] = 3, /* sockfd, addr, addrlen */
3279 [SOCKOP_connect] = 3, /* sockfd, addr, addrlen */
3280 [SOCKOP_listen] = 2, /* sockfd, backlog */
3281 [SOCKOP_accept] = 3, /* sockfd, addr, addrlen */
3282 [SOCKOP_accept4] = 4, /* sockfd, addr, addrlen, flags */
3283 [SOCKOP_getsockname] = 3, /* sockfd, addr, addrlen */
3284 [SOCKOP_getpeername] = 3, /* sockfd, addr, addrlen */
3285 [SOCKOP_socketpair] = 4, /* domain, type, protocol, tab */
3286 [SOCKOP_send] = 4, /* sockfd, msg, len, flags */
3287 [SOCKOP_recv] = 4, /* sockfd, msg, len, flags */
3288 [SOCKOP_sendto] = 6, /* sockfd, msg, len, flags, addr, addrlen */
3289 [SOCKOP_recvfrom] = 6, /* sockfd, msg, len, flags, addr, addrlen */
3290 [SOCKOP_shutdown] = 2, /* sockfd, how */
3291 [SOCKOP_sendmsg] = 3, /* sockfd, msg, flags */
3292 [SOCKOP_recvmsg] = 3, /* sockfd, msg, flags */
5a53dc50
JPAG		 3293 [SOCKOP_sendmmsg] = 4, /* sockfd, msgvec, vlen, flags */
3294 [SOCKOP_recvmmsg] = 4, /* sockfd, msgvec, vlen, flags */
62dc90c6
MT		 3295 [SOCKOP_setsockopt] = 5, /* sockfd, level, optname, optval, optlen */
3296 [SOCKOP_getsockopt] = 5, /* sockfd, level, optname, optval, optlen */
3297 };
3298 abi_long a[6]; /* max 6 args */
3299
3300 /* first, collect the arguments in a[] according to ac[] */
3301 if (num >= 0 && num < ARRAY_SIZE(ac)) {
3302 unsigned i;
3303 assert(ARRAY_SIZE(a) >= ac[num]); /* ensure we have space for args */
3304 for (i = 0; i < ac[num]; ++i) {
3305 if (get_user_ual(a[i], vptr + i * sizeof(abi_long)) != 0) {
b9d36eb2
AH		 3306 return -TARGET_EFAULT;
3307 }
31e31b8a 3308 }
62dc90c6 3309 }
7854b056 3310
62dc90c6
MT		 3311 /* now when we have the args, actually handle the call */
3312 switch (num) {
3313 case SOCKOP_socket: /* domain, type, protocol */
3314 return do_socket(a[0], a[1], a[2]);
3315 case SOCKOP_bind: /* sockfd, addr, addrlen */
3316 return do_bind(a[0], a[1], a[2]);
3317 case SOCKOP_connect: /* sockfd, addr, addrlen */
3318 return do_connect(a[0], a[1], a[2]);
3319 case SOCKOP_listen: /* sockfd, backlog */
3320 return get_errno(listen(a[0], a[1]));
3321 case SOCKOP_accept: /* sockfd, addr, addrlen */
3322 return do_accept4(a[0], a[1], a[2], 0);
3323 case SOCKOP_accept4: /* sockfd, addr, addrlen, flags */
3324 return do_accept4(a[0], a[1], a[2], a[3]);
3325 case SOCKOP_getsockname: /* sockfd, addr, addrlen */
3326 return do_getsockname(a[0], a[1], a[2]);
3327 case SOCKOP_getpeername: /* sockfd, addr, addrlen */
3328 return do_getpeername(a[0], a[1], a[2]);
3329 case SOCKOP_socketpair: /* domain, type, protocol, tab */
3330 return do_socketpair(a[0], a[1], a[2], a[3]);
3331 case SOCKOP_send: /* sockfd, msg, len, flags */
3332 return do_sendto(a[0], a[1], a[2], a[3], 0, 0);
3333 case SOCKOP_recv: /* sockfd, msg, len, flags */
3334 return do_recvfrom(a[0], a[1], a[2], a[3], 0, 0);
3335 case SOCKOP_sendto: /* sockfd, msg, len, flags, addr, addrlen */
3336 return do_sendto(a[0], a[1], a[2], a[3], a[4], a[5]);
3337 case SOCKOP_recvfrom: /* sockfd, msg, len, flags, addr, addrlen */
3338 return do_recvfrom(a[0], a[1], a[2], a[3], a[4], a[5]);
3339 case SOCKOP_shutdown: /* sockfd, how */
3340 return get_errno(shutdown(a[0], a[1]));
3341 case SOCKOP_sendmsg: /* sockfd, msg, flags */
3342 return do_sendrecvmsg(a[0], a[1], a[2], 1);
3343 case SOCKOP_recvmsg: /* sockfd, msg, flags */
3344 return do_sendrecvmsg(a[0], a[1], a[2], 0);
5a53dc50
JPAG		 3345 case SOCKOP_sendmmsg: /* sockfd, msgvec, vlen, flags */
3346 return do_sendrecvmmsg(a[0], a[1], a[2], a[3], 1);
3347 case SOCKOP_recvmmsg: /* sockfd, msgvec, vlen, flags */
3348 return do_sendrecvmmsg(a[0], a[1], a[2], a[3], 0);
62dc90c6
MT		 3349 case SOCKOP_setsockopt: /* sockfd, level, optname, optval, optlen */
3350 return do_setsockopt(a[0], a[1], a[2], a[3], a[4]);
3351 case SOCKOP_getsockopt: /* sockfd, level, optname, optval, optlen */
3352 return do_getsockopt(a[0], a[1], a[2], a[3], a[4]);
31e31b8a
FB		 3353 default:
3354 gemu_log("Unsupported socketcall: %d\n", num);
62dc90c6 3355 return -TARGET_ENOSYS;
31e31b8a 3356 }
31e31b8a 3357}
32407103 3358#endif
31e31b8a 3359
8853f86e
FB		 3360#define N_SHM_REGIONS 32
3361
3362static struct shm_region {
b6e17875
PM		 3363 abi_ulong start;
3364 abi_ulong size;
3365 bool in_use;
8853f86e
FB		 3366} shm_regions[N_SHM_REGIONS];
3367
3eb6b044
TS		 3368struct target_semid_ds
3369{
3370 struct target_ipc_perm sem_perm;
992f48a0 3371 abi_ulong sem_otime;
03527344 3372#if !defined(TARGET_PPC64)
992f48a0 3373 abi_ulong __unused1;
03527344 3374#endif
992f48a0 3375 abi_ulong sem_ctime;
03527344 3376#if !defined(TARGET_PPC64)
992f48a0 3377 abi_ulong __unused2;
03527344 3378#endif
992f48a0
BS		 3379 abi_ulong sem_nsems;
3380 abi_ulong __unused3;
3381 abi_ulong __unused4;
3eb6b044
TS		 3382};
3383
579a97f7
FB		 3384static inline abi_long target_to_host_ipc_perm(struct ipc_perm *host_ip,
3385 abi_ulong target_addr)
3eb6b044
TS		 3386{
3387 struct target_ipc_perm *target_ip;
3388 struct target_semid_ds *target_sd;
3389
579a97f7
FB		 3390 if (!lock_user_struct(VERIFY_READ, target_sd, target_addr, 1))
3391 return -TARGET_EFAULT;
e8bbe36c 3392 target_ip = &(target_sd->sem_perm);
55a2b163
PJ		 3393 host_ip->__key = tswap32(target_ip->__key);
3394 host_ip->uid = tswap32(target_ip->uid);
3395 host_ip->gid = tswap32(target_ip->gid);
3396 host_ip->cuid = tswap32(target_ip->cuid);
3397 host_ip->cgid = tswap32(target_ip->cgid);
3398#if defined(TARGET_ALPHA) || defined(TARGET_MIPS) || defined(TARGET_PPC)
3399 host_ip->mode = tswap32(target_ip->mode);
3400#else
cbb21eed 3401 host_ip->mode = tswap16(target_ip->mode);
55a2b163
PJ		 3402#endif
3403#if defined(TARGET_PPC)
3404 host_ip->__seq = tswap32(target_ip->__seq);
3405#else
3406 host_ip->__seq = tswap16(target_ip->__seq);
3407#endif
3eb6b044 3408 unlock_user_struct(target_sd, target_addr, 0);
579a97f7 3409 return 0;
3eb6b044
TS		 3410}
3411
579a97f7
FB		 3412static inline abi_long host_to_target_ipc_perm(abi_ulong target_addr,
3413 struct ipc_perm *host_ip)
3eb6b044
TS		 3414{
3415 struct target_ipc_perm *target_ip;
3416 struct target_semid_ds *target_sd;
3417
579a97f7
FB		 3418 if (!lock_user_struct(VERIFY_WRITE, target_sd, target_addr, 0))
3419 return -TARGET_EFAULT;
3eb6b044 3420 target_ip = &(target_sd->sem_perm);
55a2b163
PJ		 3421 target_ip->__key = tswap32(host_ip->__key);
3422 target_ip->uid = tswap32(host_ip->uid);
3423 target_ip->gid = tswap32(host_ip->gid);
3424 target_ip->cuid = tswap32(host_ip->cuid);
3425 target_ip->cgid = tswap32(host_ip->cgid);
3426#if defined(TARGET_ALPHA) || defined(TARGET_MIPS) || defined(TARGET_PPC)
3427 target_ip->mode = tswap32(host_ip->mode);
3428#else
cbb21eed 3429 target_ip->mode = tswap16(host_ip->mode);
55a2b163
PJ		 3430#endif
3431#if defined(TARGET_PPC)
3432 target_ip->__seq = tswap32(host_ip->__seq);
3433#else
3434 target_ip->__seq = tswap16(host_ip->__seq);
3435#endif
3eb6b044 3436 unlock_user_struct(target_sd, target_addr, 1);
579a97f7 3437 return 0;
3eb6b044
TS		 3438}
3439
579a97f7
FB		 3440static inline abi_long target_to_host_semid_ds(struct semid_ds *host_sd,
3441 abi_ulong target_addr)
3eb6b044
TS		 3442{
3443 struct target_semid_ds *target_sd;
3444
579a97f7
FB		 3445 if (!lock_user_struct(VERIFY_READ, target_sd, target_addr, 1))
3446 return -TARGET_EFAULT;
e5289087
AJ		 3447 if (target_to_host_ipc_perm(&(host_sd->sem_perm),target_addr))
3448 return -TARGET_EFAULT;
cbb21eed
MB		 3449 host_sd->sem_nsems = tswapal(target_sd->sem_nsems);
3450 host_sd->sem_otime = tswapal(target_sd->sem_otime);
3451 host_sd->sem_ctime = tswapal(target_sd->sem_ctime);
3eb6b044 3452 unlock_user_struct(target_sd, target_addr, 0);
579a97f7 3453 return 0;
3eb6b044
TS		 3454}
3455
579a97f7
FB		 3456static inline abi_long host_to_target_semid_ds(abi_ulong target_addr,
3457 struct semid_ds *host_sd)
3eb6b044
TS		 3458{
3459 struct target_semid_ds *target_sd;
3460
579a97f7
FB		 3461 if (!lock_user_struct(VERIFY_WRITE, target_sd, target_addr, 0))
3462 return -TARGET_EFAULT;
e5289087 3463 if (host_to_target_ipc_perm(target_addr,&(host_sd->sem_perm)))
3a93113a 3464 return -TARGET_EFAULT;
cbb21eed
MB		 3465 target_sd->sem_nsems = tswapal(host_sd->sem_nsems);
3466 target_sd->sem_otime = tswapal(host_sd->sem_otime);
3467 target_sd->sem_ctime = tswapal(host_sd->sem_ctime);
3eb6b044 3468 unlock_user_struct(target_sd, target_addr, 1);
579a97f7 3469 return 0;
3eb6b044
TS		 3470}
3471
e5289087
AJ		 3472struct target_seminfo {
3473 int semmap;
3474 int semmni;
3475 int semmns;
3476 int semmnu;
3477 int semmsl;
3478 int semopm;
3479 int semume;
3480 int semusz;
3481 int semvmx;
3482 int semaem;
3483};
3484
3485static inline abi_long host_to_target_seminfo(abi_ulong target_addr,
3486 struct seminfo *host_seminfo)
3487{
3488 struct target_seminfo *target_seminfo;
3489 if (!lock_user_struct(VERIFY_WRITE, target_seminfo, target_addr, 0))
3490 return -TARGET_EFAULT;
3491 __put_user(host_seminfo->semmap, &target_seminfo->semmap);
3492 __put_user(host_seminfo->semmni, &target_seminfo->semmni);
3493 __put_user(host_seminfo->semmns, &target_seminfo->semmns);
3494 __put_user(host_seminfo->semmnu, &target_seminfo->semmnu);
3495 __put_user(host_seminfo->semmsl, &target_seminfo->semmsl);
3496 __put_user(host_seminfo->semopm, &target_seminfo->semopm);
3497 __put_user(host_seminfo->semume, &target_seminfo->semume);
3498 __put_user(host_seminfo->semusz, &target_seminfo->semusz);
3499 __put_user(host_seminfo->semvmx, &target_seminfo->semvmx);
3500 __put_user(host_seminfo->semaem, &target_seminfo->semaem);
3501 unlock_user_struct(target_seminfo, target_addr, 1);
3502 return 0;
3503}
3504
fa294816
TS		 3505union semun {
3506 int val;
3eb6b044 3507 struct semid_ds *buf;
fa294816 3508 unsigned short *array;
e5289087 3509 struct seminfo *__buf;
fa294816
TS		 3510};
3511
3eb6b044
TS		 3512union target_semun {
3513 int val;
e5289087
AJ		 3514 abi_ulong buf;
3515 abi_ulong array;
3516 abi_ulong __buf;
3eb6b044
TS		 3517};
3518
e5289087
AJ		 3519static inline abi_long target_to_host_semarray(int semid, unsigned short **host_array,
3520 abi_ulong target_addr)
3eb6b044 3521{
e5289087
AJ		 3522 int nsems;
3523 unsigned short *array;
3524 union semun semun;
3525 struct semid_ds semid_ds;
3526 int i, ret;
3eb6b044 3527
e5289087
AJ		 3528 semun.buf = &semid_ds;
3529
3530 ret = semctl(semid, 0, IPC_STAT, semun);
3531 if (ret == -1)
3532 return get_errno(ret);
3533
3534 nsems = semid_ds.sem_nsems;
3535
0e173b24 3536 *host_array = g_try_new(unsigned short, nsems);
69d4c703
PM		 3537 if (!*host_array) {
3538 return -TARGET_ENOMEM;
3539 }
e5289087
AJ		 3540 array = lock_user(VERIFY_READ, target_addr,
3541 nsems*sizeof(unsigned short), 1);
69d4c703 3542 if (!array) {
0e173b24 3543 g_free(*host_array);
e5289087 3544 return -TARGET_EFAULT;
69d4c703 3545 }
e5289087
AJ		 3546
3547 for(i=0; i<nsems; i++) {
3548 __get_user((*host_array)[i], &array[i]);
3eb6b044 3549 }
e5289087
AJ		 3550 unlock_user(array, target_addr, 0);
3551
579a97f7 3552 return 0;
3eb6b044
TS		 3553}
3554
e5289087
AJ		 3555static inline abi_long host_to_target_semarray(int semid, abi_ulong target_addr,
3556 unsigned short **host_array)
3eb6b044 3557{
e5289087
AJ		 3558 int nsems;
3559 unsigned short *array;
3560 union semun semun;
3561 struct semid_ds semid_ds;
3562 int i, ret;
3eb6b044 3563
e5289087
AJ		 3564 semun.buf = &semid_ds;
3565
3566 ret = semctl(semid, 0, IPC_STAT, semun);
3567 if (ret == -1)
3568 return get_errno(ret);
3569
3570 nsems = semid_ds.sem_nsems;
3571
3572 array = lock_user(VERIFY_WRITE, target_addr,
3573 nsems*sizeof(unsigned short), 0);
3574 if (!array)
3575 return -TARGET_EFAULT;
3576
3577 for(i=0; i<nsems; i++) {
3578 __put_user((*host_array)[i], &array[i]);
3eb6b044 3579 }
0e173b24 3580 g_free(*host_array);
e5289087
AJ		 3581 unlock_user(array, target_addr, 1);
3582
579a97f7 3583 return 0;
3eb6b044
TS		 3584}
3585
e5289087 3586static inline abi_long do_semctl(int semid, int semnum, int cmd,
d1c002b6 3587 abi_ulong target_arg)
3eb6b044 3588{
d1c002b6 3589 union target_semun target_su = { .buf = target_arg };
3eb6b044
TS		 3590 union semun arg;
3591 struct semid_ds dsarg;
7b8118e8 3592 unsigned short *array = NULL;
e5289087
AJ		 3593 struct seminfo seminfo;
3594 abi_long ret = -TARGET_EINVAL;
3595 abi_long err;
3596 cmd &= 0xff;
3eb6b044
TS		 3597
3598 switch( cmd ) {
3599 case GETVAL:
3eb6b044 3600 case SETVAL:
5464baec
TM		 3601 /* In 64 bit cross-endian situations, we will erroneously pick up
3602 * the wrong half of the union for the "val" element. To rectify
3603 * this, the entire 8-byte structure is byteswapped, followed by
3604 * a swap of the 4 byte val field. In other cases, the data is
3605 * already in proper host byte order. */
3606 if (sizeof(target_su.val) != (sizeof(target_su.buf))) {
3607 target_su.buf = tswapal(target_su.buf);
3608 arg.val = tswap32(target_su.val);
3609 } else {
3610 arg.val = target_su.val;
3611 }
e5289087 3612 ret = get_errno(semctl(semid, semnum, cmd, arg));
3eb6b044
TS		 3613 break;
3614 case GETALL:
3eb6b044 3615 case SETALL:
e5289087
AJ		 3616 err = target_to_host_semarray(semid, &array, target_su.array);
3617 if (err)
3618 return err;
3619 arg.array = array;
3620 ret = get_errno(semctl(semid, semnum, cmd, arg));
3621 err = host_to_target_semarray(semid, target_su.array, &array);
3622 if (err)
3623 return err;
3eb6b044
TS		 3624 break;
3625 case IPC_STAT:
3eb6b044 3626 case IPC_SET:
e5289087
AJ		 3627 case SEM_STAT:
3628 err = target_to_host_semid_ds(&dsarg, target_su.buf);
3629 if (err)
3630 return err;
3631 arg.buf = &dsarg;
3632 ret = get_errno(semctl(semid, semnum, cmd, arg));
3633 err = host_to_target_semid_ds(target_su.buf, &dsarg);
3634 if (err)
3635 return err;
3636 break;
3637 case IPC_INFO:
3638 case SEM_INFO:
3639 arg.__buf = &seminfo;
3640 ret = get_errno(semctl(semid, semnum, cmd, arg));
3641 err = host_to_target_seminfo(target_su.__buf, &seminfo);
3642 if (err)
3643 return err;
3644 break;
3645 case IPC_RMID:
3646 case GETPID:
3647 case GETNCNT:
3648 case GETZCNT:
3649 ret = get_errno(semctl(semid, semnum, cmd, NULL));
3eb6b044 3650 break;
3eb6b044
TS		 3651 }
3652
3653 return ret;
3654}
3655
e5289087
AJ		 3656struct target_sembuf {
3657 unsigned short sem_num;
3658 short sem_op;
3659 short sem_flg;
3660};
3661
3662static inline abi_long target_to_host_sembuf(struct sembuf *host_sembuf,
3663 abi_ulong target_addr,
3664 unsigned nsops)
3665{
3666 struct target_sembuf *target_sembuf;
3667 int i;
3668
3669 target_sembuf = lock_user(VERIFY_READ, target_addr,
3670 nsops*sizeof(struct target_sembuf), 1);
3671 if (!target_sembuf)
3672 return -TARGET_EFAULT;
3673
3674 for(i=0; i<nsops; i++) {
3675 __get_user(host_sembuf[i].sem_num, &target_sembuf[i].sem_num);
3676 __get_user(host_sembuf[i].sem_op, &target_sembuf[i].sem_op);
3677 __get_user(host_sembuf[i].sem_flg, &target_sembuf[i].sem_flg);
3678 }
3679
3680 unlock_user(target_sembuf, target_addr, 0);
3681
3682 return 0;
3683}
3684
3685static inline abi_long do_semop(int semid, abi_long ptr, unsigned nsops)
3686{
3687 struct sembuf sops[nsops];
3688
3689 if (target_to_host_sembuf(sops, ptr, nsops))
3690 return -TARGET_EFAULT;
3691
ffb7ee79 3692 return get_errno(safe_semtimedop(semid, sops, nsops, NULL));
e5289087
AJ		 3693}
3694
1bc012f6
TS		 3695struct target_msqid_ds
3696{
1c54ff97
AJ		 3697 struct target_ipc_perm msg_perm;
3698 abi_ulong msg_stime;
3699#if TARGET_ABI_BITS == 32
3700 abi_ulong __unused1;
3701#endif
3702 abi_ulong msg_rtime;
3703#if TARGET_ABI_BITS == 32
3704 abi_ulong __unused2;
3705#endif
3706 abi_ulong msg_ctime;
3707#if TARGET_ABI_BITS == 32
3708 abi_ulong __unused3;
3709#endif
3710 abi_ulong __msg_cbytes;
3711 abi_ulong msg_qnum;
3712 abi_ulong msg_qbytes;
3713 abi_ulong msg_lspid;
3714 abi_ulong msg_lrpid;
3715 abi_ulong __unused4;
3716 abi_ulong __unused5;
1bc012f6
TS		 3717};
3718
579a97f7
FB		 3719static inline abi_long target_to_host_msqid_ds(struct msqid_ds *host_md,
3720 abi_ulong target_addr)
1bc012f6
TS		 3721{
3722 struct target_msqid_ds *target_md;
3723
579a97f7
FB		 3724 if (!lock_user_struct(VERIFY_READ, target_md, target_addr, 1))
3725 return -TARGET_EFAULT;
1c54ff97
AJ		 3726 if (target_to_host_ipc_perm(&(host_md->msg_perm),target_addr))
3727 return -TARGET_EFAULT;
cbb21eed
MB		 3728 host_md->msg_stime = tswapal(target_md->msg_stime);
3729 host_md->msg_rtime = tswapal(target_md->msg_rtime);
3730 host_md->msg_ctime = tswapal(target_md->msg_ctime);
3731 host_md->__msg_cbytes = tswapal(target_md->__msg_cbytes);
3732 host_md->msg_qnum = tswapal(target_md->msg_qnum);
3733 host_md->msg_qbytes = tswapal(target_md->msg_qbytes);
3734 host_md->msg_lspid = tswapal(target_md->msg_lspid);
3735 host_md->msg_lrpid = tswapal(target_md->msg_lrpid);
1bc012f6 3736 unlock_user_struct(target_md, target_addr, 0);
579a97f7 3737 return 0;
1bc012f6
TS		 3738}
3739
579a97f7
FB		 3740static inline abi_long host_to_target_msqid_ds(abi_ulong target_addr,
3741 struct msqid_ds *host_md)
1bc012f6
TS		 3742{
3743 struct target_msqid_ds *target_md;
3744
579a97f7
FB		 3745 if (!lock_user_struct(VERIFY_WRITE, target_md, target_addr, 0))
3746 return -TARGET_EFAULT;
1c54ff97
AJ		 3747 if (host_to_target_ipc_perm(target_addr,&(host_md->msg_perm)))
3748 return -TARGET_EFAULT;
cbb21eed
MB		 3749 target_md->msg_stime = tswapal(host_md->msg_stime);
3750 target_md->msg_rtime = tswapal(host_md->msg_rtime);
3751 target_md->msg_ctime = tswapal(host_md->msg_ctime);
3752 target_md->__msg_cbytes = tswapal(host_md->__msg_cbytes);
3753 target_md->msg_qnum = tswapal(host_md->msg_qnum);
3754 target_md->msg_qbytes = tswapal(host_md->msg_qbytes);
3755 target_md->msg_lspid = tswapal(host_md->msg_lspid);
3756 target_md->msg_lrpid = tswapal(host_md->msg_lrpid);
1bc012f6 3757 unlock_user_struct(target_md, target_addr, 1);
579a97f7 3758 return 0;
1bc012f6
TS		 3759}
3760
1c54ff97
AJ		 3761struct target_msginfo {
3762 int msgpool;
3763 int msgmap;
3764 int msgmax;
3765 int msgmnb;
3766 int msgmni;
3767 int msgssz;
3768 int msgtql;
3769 unsigned short int msgseg;
3770};
3771
3772static inline abi_long host_to_target_msginfo(abi_ulong target_addr,
3773 struct msginfo *host_msginfo)
3774{
3775 struct target_msginfo *target_msginfo;
3776 if (!lock_user_struct(VERIFY_WRITE, target_msginfo, target_addr, 0))
3777 return -TARGET_EFAULT;
3778 __put_user(host_msginfo->msgpool, &target_msginfo->msgpool);
3779 __put_user(host_msginfo->msgmap, &target_msginfo->msgmap);
3780 __put_user(host_msginfo->msgmax, &target_msginfo->msgmax);
3781 __put_user(host_msginfo->msgmnb, &target_msginfo->msgmnb);
3782 __put_user(host_msginfo->msgmni, &target_msginfo->msgmni);
3783 __put_user(host_msginfo->msgssz, &target_msginfo->msgssz);
3784 __put_user(host_msginfo->msgtql, &target_msginfo->msgtql);
3785 __put_user(host_msginfo->msgseg, &target_msginfo->msgseg);
3786 unlock_user_struct(target_msginfo, target_addr, 1);
00b229ac 3787 return 0;
1c54ff97
AJ		 3788}
3789
3790static inline abi_long do_msgctl(int msgid, int cmd, abi_long ptr)
1bc012f6
TS		 3791{
3792 struct msqid_ds dsarg;
1c54ff97
AJ		 3793 struct msginfo msginfo;
3794 abi_long ret = -TARGET_EINVAL;
3795
3796 cmd &= 0xff;
3797
3798 switch (cmd) {
1bc012f6
TS		 3799 case IPC_STAT:
3800 case IPC_SET:
1c54ff97
AJ		 3801 case MSG_STAT:
3802 if (target_to_host_msqid_ds(&dsarg,ptr))
3803 return -TARGET_EFAULT;
3804 ret = get_errno(msgctl(msgid, cmd, &dsarg));
3805 if (host_to_target_msqid_ds(ptr,&dsarg))
3806 return -TARGET_EFAULT;
3807 break;
3808 case IPC_RMID:
3809 ret = get_errno(msgctl(msgid, cmd, NULL));
3810 break;
3811 case IPC_INFO:
3812 case MSG_INFO:
3813 ret = get_errno(msgctl(msgid, cmd, (struct msqid_ds *)&msginfo));
3814 if (host_to_target_msginfo(ptr, &msginfo))
3815 return -TARGET_EFAULT;
3816 break;
1bc012f6 3817 }
1c54ff97 3818
1bc012f6
TS		 3819 return ret;
3820}
3821
3822struct target_msgbuf {
1c54ff97
AJ		 3823 abi_long mtype;
3824 char mtext[1];
1bc012f6
TS		 3825};
3826
992f48a0 3827static inline abi_long do_msgsnd(int msqid, abi_long msgp,
edcc5f9d 3828 ssize_t msgsz, int msgflg)
1bc012f6
TS		 3829{
3830 struct target_msgbuf *target_mb;
3831 struct msgbuf *host_mb;
992f48a0 3832 abi_long ret = 0;
1bc012f6 3833
edcc5f9d
TM		 3834 if (msgsz < 0) {
3835 return -TARGET_EINVAL;
3836 }
3837
579a97f7
FB		 3838 if (!lock_user_struct(VERIFY_READ, target_mb, msgp, 0))
3839 return -TARGET_EFAULT;
0e173b24 3840 host_mb = g_try_malloc(msgsz + sizeof(long));
29e03fcb
HZ		 3841 if (!host_mb) {
3842 unlock_user_struct(target_mb, msgp, 0);
3843 return -TARGET_ENOMEM;
3844 }
cbb21eed 3845 host_mb->mtype = (abi_long) tswapal(target_mb->mtype);
1c54ff97 3846 memcpy(host_mb->mtext, target_mb->mtext, msgsz);
89f9fe44 3847 ret = get_errno(safe_msgsnd(msqid, host_mb, msgsz, msgflg));
0e173b24 3848 g_free(host_mb);
1bc012f6
TS		 3849 unlock_user_struct(target_mb, msgp, 0);
3850
3851 return ret;
3852}
3853
992f48a0 3854static inline abi_long do_msgrcv(int msqid, abi_long msgp,
99874f65 3855 ssize_t msgsz, abi_long msgtyp,
992f48a0 3856 int msgflg)
1bc012f6
TS		 3857{
3858 struct target_msgbuf *target_mb;
579a97f7 3859 char *target_mtext;
1bc012f6 3860 struct msgbuf *host_mb;
992f48a0 3861 abi_long ret = 0;
1bc012f6 3862
99874f65
PM		 3863 if (msgsz < 0) {
3864 return -TARGET_EINVAL;
3865 }
3866
579a97f7
FB		 3867 if (!lock_user_struct(VERIFY_WRITE, target_mb, msgp, 0))
3868 return -TARGET_EFAULT;
1c54ff97 3869
415d8471
PM		 3870 host_mb = g_try_malloc(msgsz + sizeof(long));
3871 if (!host_mb) {
3872 ret = -TARGET_ENOMEM;
3873 goto end;
3874 }
89f9fe44 3875 ret = get_errno(safe_msgrcv(msqid, host_mb, msgsz, msgtyp, msgflg));
1c54ff97 3876
579a97f7
FB		 3877 if (ret > 0) {
3878 abi_ulong target_mtext_addr = msgp + sizeof(abi_ulong);
3879 target_mtext = lock_user(VERIFY_WRITE, target_mtext_addr, ret, 0);
3880 if (!target_mtext) {
3881 ret = -TARGET_EFAULT;
3882 goto end;
3883 }
1c54ff97 3884 memcpy(target_mb->mtext, host_mb->mtext, ret);
579a97f7
FB		 3885 unlock_user(target_mtext, target_mtext_addr, ret);
3886 }
1c54ff97 3887
cbb21eed 3888 target_mb->mtype = tswapal(host_mb->mtype);
1bc012f6 3889
579a97f7
FB		 3890end:
3891 if (target_mb)
3892 unlock_user_struct(target_mb, msgp, 1);
0d07fe47 3893 g_free(host_mb);
1bc012f6
TS		 3894 return ret;
3895}
3896
88a8c984
RV		 3897static inline abi_long target_to_host_shmid_ds(struct shmid_ds *host_sd,
3898 abi_ulong target_addr)
3899{
3900 struct target_shmid_ds *target_sd;
3901
3902 if (!lock_user_struct(VERIFY_READ, target_sd, target_addr, 1))
3903 return -TARGET_EFAULT;
3904 if (target_to_host_ipc_perm(&(host_sd->shm_perm), target_addr))
3905 return -TARGET_EFAULT;
3906 __get_user(host_sd->shm_segsz, &target_sd->shm_segsz);
3907 __get_user(host_sd->shm_atime, &target_sd->shm_atime);
3908 __get_user(host_sd->shm_dtime, &target_sd->shm_dtime);
3909 __get_user(host_sd->shm_ctime, &target_sd->shm_ctime);
3910 __get_user(host_sd->shm_cpid, &target_sd->shm_cpid);
3911 __get_user(host_sd->shm_lpid, &target_sd->shm_lpid);
3912 __get_user(host_sd->shm_nattch, &target_sd->shm_nattch);
3913 unlock_user_struct(target_sd, target_addr, 0);
3914 return 0;
3915}
3916
3917static inline abi_long host_to_target_shmid_ds(abi_ulong target_addr,
3918 struct shmid_ds *host_sd)
3919{
3920 struct target_shmid_ds *target_sd;
3921
3922 if (!lock_user_struct(VERIFY_WRITE, target_sd, target_addr, 0))
3923 return -TARGET_EFAULT;
3924 if (host_to_target_ipc_perm(target_addr, &(host_sd->shm_perm)))
3925 return -TARGET_EFAULT;
3926 __put_user(host_sd->shm_segsz, &target_sd->shm_segsz);
3927 __put_user(host_sd->shm_atime, &target_sd->shm_atime);
3928 __put_user(host_sd->shm_dtime, &target_sd->shm_dtime);
3929 __put_user(host_sd->shm_ctime, &target_sd->shm_ctime);
3930 __put_user(host_sd->shm_cpid, &target_sd->shm_cpid);
3931 __put_user(host_sd->shm_lpid, &target_sd->shm_lpid);
3932 __put_user(host_sd->shm_nattch, &target_sd->shm_nattch);
3933 unlock_user_struct(target_sd, target_addr, 1);
3934 return 0;
3935}
3936
3937struct target_shminfo {
3938 abi_ulong shmmax;
3939 abi_ulong shmmin;
3940 abi_ulong shmmni;
3941 abi_ulong shmseg;
3942 abi_ulong shmall;
3943};
3944
3945static inline abi_long host_to_target_shminfo(abi_ulong target_addr,
3946 struct shminfo *host_shminfo)
3947{
3948 struct target_shminfo *target_shminfo;
3949 if (!lock_user_struct(VERIFY_WRITE, target_shminfo, target_addr, 0))
3950 return -TARGET_EFAULT;
3951 __put_user(host_shminfo->shmmax, &target_shminfo->shmmax);
3952 __put_user(host_shminfo->shmmin, &target_shminfo->shmmin);
3953 __put_user(host_shminfo->shmmni, &target_shminfo->shmmni);
3954 __put_user(host_shminfo->shmseg, &target_shminfo->shmseg);
3955 __put_user(host_shminfo->shmall, &target_shminfo->shmall);
3956 unlock_user_struct(target_shminfo, target_addr, 1);
3957 return 0;
3958}
3959
3960struct target_shm_info {
3961 int used_ids;
3962 abi_ulong shm_tot;
3963 abi_ulong shm_rss;
3964 abi_ulong shm_swp;
3965 abi_ulong swap_attempts;
3966 abi_ulong swap_successes;
3967};
3968
3969static inline abi_long host_to_target_shm_info(abi_ulong target_addr,
3970 struct shm_info *host_shm_info)
3971{
3972 struct target_shm_info *target_shm_info;
3973 if (!lock_user_struct(VERIFY_WRITE, target_shm_info, target_addr, 0))
3974 return -TARGET_EFAULT;
3975 __put_user(host_shm_info->used_ids, &target_shm_info->used_ids);
3976 __put_user(host_shm_info->shm_tot, &target_shm_info->shm_tot);
3977 __put_user(host_shm_info->shm_rss, &target_shm_info->shm_rss);
3978 __put_user(host_shm_info->shm_swp, &target_shm_info->shm_swp);
3979 __put_user(host_shm_info->swap_attempts, &target_shm_info->swap_attempts);
3980 __put_user(host_shm_info->swap_successes, &target_shm_info->swap_successes);
3981 unlock_user_struct(target_shm_info, target_addr, 1);
3982 return 0;
3983}
3984
3985static inline abi_long do_shmctl(int shmid, int cmd, abi_long buf)
3986{
3987 struct shmid_ds dsarg;
3988 struct shminfo shminfo;
3989 struct shm_info shm_info;
3990 abi_long ret = -TARGET_EINVAL;
3991
3992 cmd &= 0xff;
3993
3994 switch(cmd) {
3995 case IPC_STAT:
3996 case IPC_SET:
3997 case SHM_STAT:
3998 if (target_to_host_shmid_ds(&dsarg, buf))
3999 return -TARGET_EFAULT;
4000 ret = get_errno(shmctl(shmid, cmd, &dsarg));
4001 if (host_to_target_shmid_ds(buf, &dsarg))
4002 return -TARGET_EFAULT;
4003 break;
4004 case IPC_INFO:
4005 ret = get_errno(shmctl(shmid, cmd, (struct shmid_ds *)&shminfo));
4006 if (host_to_target_shminfo(buf, &shminfo))
4007 return -TARGET_EFAULT;
4008 break;
4009 case SHM_INFO:
4010 ret = get_errno(shmctl(shmid, cmd, (struct shmid_ds *)&shm_info));
4011 if (host_to_target_shm_info(buf, &shm_info))
4012 return -TARGET_EFAULT;
4013 break;
4014 case IPC_RMID:
4015 case SHM_LOCK:
4016 case SHM_UNLOCK:
4017 ret = get_errno(shmctl(shmid, cmd, NULL));
4018 break;
4019 }
4020
4021 return ret;
4022}
4023
4024static inline abi_ulong do_shmat(int shmid, abi_ulong shmaddr, int shmflg)
4025{
4026 abi_long raddr;
4027 void *host_raddr;
4028 struct shmid_ds shm_info;
4029 int i,ret;
4030
4031 /* find out the length of the shared memory segment */
4032 ret = get_errno(shmctl(shmid, IPC_STAT, &shm_info));
4033 if (is_error(ret)) {
4034 /* can't get length, bail out */
4035 return ret;
4036 }
4037
4038 mmap_lock();
4039
4040 if (shmaddr)
4041 host_raddr = shmat(shmid, (void *)g2h(shmaddr), shmflg);
4042 else {
4043 abi_ulong mmap_start;
4044
4045 mmap_start = mmap_find_vma(0, shm_info.shm_segsz);
4046
4047 if (mmap_start == -1) {
4048 errno = ENOMEM;
4049 host_raddr = (void *)-1;
4050 } else
4051 host_raddr = shmat(shmid, g2h(mmap_start), shmflg | SHM_REMAP);
4052 }
4053
4054 if (host_raddr == (void *)-1) {
4055 mmap_unlock();
4056 return get_errno((long)host_raddr);
4057 }
4058 raddr=h2g((unsigned long)host_raddr);
4059
4060 page_set_flags(raddr, raddr + shm_info.shm_segsz,
4061 PAGE_VALID | PAGE_READ |
4062 ((shmflg & SHM_RDONLY)? 0 : PAGE_WRITE));
4063
4064 for (i = 0; i < N_SHM_REGIONS; i++) {
b6e17875
PM		 4065 if (!shm_regions[i].in_use) {
4066 shm_regions[i].in_use = true;
88a8c984
RV		 4067 shm_regions[i].start = raddr;
4068 shm_regions[i].size = shm_info.shm_segsz;
4069 break;
4070 }
4071 }
4072
4073 mmap_unlock();
4074 return raddr;
4075
4076}
4077
4078static inline abi_long do_shmdt(abi_ulong shmaddr)
4079{
4080 int i;
4081
4082 for (i = 0; i < N_SHM_REGIONS; ++i) {
b6e17875
PM		 4083 if (shm_regions[i].in_use && shm_regions[i].start == shmaddr) {
4084 shm_regions[i].in_use = false;
e00ac249 4085 page_set_flags(shmaddr, shmaddr + shm_regions[i].size, 0);
88a8c984
RV		 4086 break;
4087 }
4088 }
4089
4090 return get_errno(shmdt(g2h(shmaddr)));
4091}
4092
1c54ff97 4093#ifdef TARGET_NR_ipc
53a5960a 4094/* ??? This only works with linear mappings. */
0da46a6e 4095/* do_ipc() must return target values and target errnos. */
37ed0956
TM		 4096static abi_long do_ipc(unsigned int call, abi_long first,
4097 abi_long second, abi_long third,
992f48a0 4098 abi_long ptr, abi_long fifth)
8853f86e
FB		 4099{
4100 int version;
992f48a0 4101 abi_long ret = 0;
8853f86e
FB		 4102
4103 version = call >> 16;
4104 call &= 0xffff;
4105
4106 switch (call) {
fa294816 4107 case IPCOP_semop:
e5289087 4108 ret = do_semop(first, ptr, second);
fa294816
TS		 4109 break;
4110
4111 case IPCOP_semget:
4112 ret = get_errno(semget(first, second, third));
4113 break;
4114
5d2fa8eb
TM		 4115 case IPCOP_semctl: {
4116 /* The semun argument to semctl is passed by value, so dereference the
4117 * ptr argument. */
4118 abi_ulong atptr;
37ed0956 4119 get_user_ual(atptr, ptr);
d1c002b6 4120 ret = do_semctl(first, second, third, atptr);
fa294816 4121 break;
5d2fa8eb 4122 }
d96372ef 4123
1c54ff97
AJ		 4124 case IPCOP_msgget:
4125 ret = get_errno(msgget(first, second));
4126 break;
d96372ef 4127
1c54ff97
AJ		 4128 case IPCOP_msgsnd:
4129 ret = do_msgsnd(first, ptr, second, third);
4130 break;
d96372ef 4131
1c54ff97
AJ		 4132 case IPCOP_msgctl:
4133 ret = do_msgctl(first, second, ptr);
4134 break;
d96372ef 4135
1c54ff97
AJ		 4136 case IPCOP_msgrcv:
4137 switch (version) {
4138 case 0:
4139 {
4140 struct target_ipc_kludge {
4141 abi_long msgp;
4142 abi_long msgtyp;
4143 } *tmp;
4144
4145 if (!lock_user_struct(VERIFY_READ, tmp, ptr, 1)) {
4146 ret = -TARGET_EFAULT;
4147 break;
4148 }
d96372ef 4149
79dd77de 4150 ret = do_msgrcv(first, tswapal(tmp->msgp), second, tswapal(tmp->msgtyp), third);
d96372ef 4151
1c54ff97
AJ		 4152 unlock_user_struct(tmp, ptr, 0);
4153 break;
4154 }
4155 default:
4156 ret = do_msgrcv(first, ptr, second, fifth, third);
4157 }
4158 break;
d96372ef 4159
8853f86e 4160 case IPCOP_shmat:
88a8c984
RV		 4161 switch (version) {
4162 default:
5a4a898d
FB		 4163 {
4164 abi_ulong raddr;
88a8c984
RV		 4165 raddr = do_shmat(first, ptr, second);
4166 if (is_error(raddr))
4167 return get_errno(raddr);
2f619698 4168 if (put_user_ual(raddr, third))
5a4a898d 4169 return -TARGET_EFAULT;
88a8c984
RV		 4170 break;
4171 }
4172 case 1:
4173 ret = -TARGET_EINVAL;
4174 break;
5a4a898d 4175 }
8853f86e
FB		 4176 break;
4177 case IPCOP_shmdt:
88a8c984 4178 ret = do_shmdt(ptr);
8853f86e
FB		 4179 break;
4180
4181 case IPCOP_shmget:
4182 /* IPC_* flag values are the same on all linux platforms */
4183 ret = get_errno(shmget(first, second, third));
4184 break;
4185
4186 /* IPC_* and SHM_* command values are the same on all linux platforms */
4187 case IPCOP_shmctl:
a2926784 4188 ret = do_shmctl(first, second, ptr);
8853f86e
FB		 4189 break;
4190 default:
32407103 4191 gemu_log("Unsupported ipc call: %d (version %d)\n", call, version);
0da46a6e 4192 ret = -TARGET_ENOSYS;
8853f86e
FB		 4193 break;
4194 }
4195 return ret;
4196}
32407103 4197#endif
8853f86e 4198
31e31b8a 4199/* kernel structure types definitions */
31e31b8a 4200
001faf32 4201#define STRUCT(name, ...) STRUCT_ ## name,
31e31b8a
FB		 4202#define STRUCT_SPECIAL(name) STRUCT_ ## name,
4203enum {
4204#include "syscall_types.h"
8be656b8 4205STRUCT_MAX
31e31b8a
FB		 4206};
4207#undef STRUCT
4208#undef STRUCT_SPECIAL
4209
001faf32 4210#define STRUCT(name, ...) static const argtype struct_ ## name ## _def[] = { __VA_ARGS__, TYPE_NULL };
31e31b8a
FB		 4211#define STRUCT_SPECIAL(name)
4212#include "syscall_types.h"
4213#undef STRUCT
4214#undef STRUCT_SPECIAL
4215
d2ef05bb
PM		 4216typedef struct IOCTLEntry IOCTLEntry;
4217
4218typedef abi_long do_ioctl_fn(const IOCTLEntry *ie, uint8_t *buf_temp,
45c874eb 4219 int fd, int cmd, abi_long arg);
d2ef05bb
PM		 4220
4221struct IOCTLEntry {
9c6bf9c7 4222 int target_cmd;
2ab83ea7 4223 unsigned int host_cmd;
31e31b8a
FB		 4224 const char *name;
4225 int access;
d2ef05bb 4226 do_ioctl_fn *do_ioctl;
1a9353d2 4227 const argtype arg_type[5];
d2ef05bb 4228};
31e31b8a
FB		 4229
4230#define IOC_R 0x0001
4231#define IOC_W 0x0002
4232#define IOC_RW (IOC_R | IOC_W)
4233
4234#define MAX_STRUCT_SIZE 4096
4235
dace20dc 4236#ifdef CONFIG_FIEMAP
285da2b9
PM		 4237/* So fiemap access checks don't overflow on 32 bit systems.
4238 * This is very slightly smaller than the limit imposed by
4239 * the underlying kernel.
4240 */
4241#define FIEMAP_MAX_EXTENTS ((UINT_MAX - sizeof(struct fiemap)) \
4242 / sizeof(struct fiemap_extent))
4243
4244static abi_long do_ioctl_fs_ioc_fiemap(const IOCTLEntry *ie, uint8_t *buf_temp,
45c874eb 4245 int fd, int cmd, abi_long arg)
285da2b9
PM		 4246{
4247 /* The parameter for this ioctl is a struct fiemap followed
4248 * by an array of struct fiemap_extent whose size is set
4249 * in fiemap->fm_extent_count. The array is filled in by the
4250 * ioctl.
4251 */
4252 int target_size_in, target_size_out;
4253 struct fiemap *fm;
4254 const argtype *arg_type = ie->arg_type;
4255 const argtype extent_arg_type[] = { MK_STRUCT(STRUCT_fiemap_extent) };
4256 void *argptr, *p;
4257 abi_long ret;
4258 int i, extent_size = thunk_type_size(extent_arg_type, 0);
4259 uint32_t outbufsz;
4260 int free_fm = 0;
4261
4262 assert(arg_type[0] == TYPE_PTR);
4263 assert(ie->access == IOC_RW);
4264 arg_type++;
4265 target_size_in = thunk_type_size(arg_type, 0);
4266 argptr = lock_user(VERIFY_READ, arg, target_size_in, 1);
4267 if (!argptr) {
4268 return -TARGET_EFAULT;
4269 }
4270 thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
4271 unlock_user(argptr, arg, 0);
4272 fm = (struct fiemap *)buf_temp;
4273 if (fm->fm_extent_count > FIEMAP_MAX_EXTENTS) {
4274 return -TARGET_EINVAL;
4275 }
4276
4277 outbufsz = sizeof (*fm) +
4278 (sizeof(struct fiemap_extent) * fm->fm_extent_count);
4279
4280 if (outbufsz > MAX_STRUCT_SIZE) {
4281 /* We can't fit all the extents into the fixed size buffer.
4282 * Allocate one that is large enough and use it instead.
4283 */
0e173b24 4284 fm = g_try_malloc(outbufsz);
285da2b9
PM		 4285 if (!fm) {
4286 return -TARGET_ENOMEM;
4287 }
4288 memcpy(fm, buf_temp, sizeof(struct fiemap));
4289 free_fm = 1;
4290 }
49ca6f3e 4291 ret = get_errno(safe_ioctl(fd, ie->host_cmd, fm));
285da2b9
PM		 4292 if (!is_error(ret)) {
4293 target_size_out = target_size_in;
4294 /* An extent_count of 0 means we were only counting the extents
4295 * so there are no structs to copy
4296 */
4297 if (fm->fm_extent_count != 0) {
4298 target_size_out += fm->fm_mapped_extents * extent_size;
4299 }
4300 argptr = lock_user(VERIFY_WRITE, arg, target_size_out, 0);
4301 if (!argptr) {
4302 ret = -TARGET_EFAULT;
4303 } else {
4304 /* Convert the struct fiemap */
4305 thunk_convert(argptr, fm, arg_type, THUNK_TARGET);
4306 if (fm->fm_extent_count != 0) {
4307 p = argptr + target_size_in;
4308 /* ...and then all the struct fiemap_extents */
4309 for (i = 0; i < fm->fm_mapped_extents; i++) {
4310 thunk_convert(p, &fm->fm_extents[i], extent_arg_type,
4311 THUNK_TARGET);
4312 p += extent_size;
4313 }
4314 }
4315 unlock_user(argptr, arg, target_size_out);
4316 }
4317 }
4318 if (free_fm) {
0e173b24 4319 g_free(fm);
285da2b9
PM		 4320 }
4321 return ret;
4322}
dace20dc 4323#endif
285da2b9 4324
059c2f2c 4325static abi_long do_ioctl_ifconf(const IOCTLEntry *ie, uint8_t *buf_temp,
45c874eb 4326 int fd, int cmd, abi_long arg)
059c2f2c
LV		 4327{
4328 const argtype *arg_type = ie->arg_type;
4329 int target_size;
4330 void *argptr;
4331 int ret;
4332 struct ifconf *host_ifconf;
4333 uint32_t outbufsz;
4334 const argtype ifreq_arg_type[] = { MK_STRUCT(STRUCT_sockaddr_ifreq) };
4335 int target_ifreq_size;
4336 int nb_ifreq;
4337 int free_buf = 0;
4338 int i;
4339 int target_ifc_len;
4340 abi_long target_ifc_buf;
4341 int host_ifc_len;
4342 char *host_ifc_buf;
4343
4344 assert(arg_type[0] == TYPE_PTR);
4345 assert(ie->access == IOC_RW);
4346
4347 arg_type++;
4348 target_size = thunk_type_size(arg_type, 0);
4349
4350 argptr = lock_user(VERIFY_READ, arg, target_size, 1);
4351 if (!argptr)
4352 return -TARGET_EFAULT;
4353 thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
4354 unlock_user(argptr, arg, 0);
4355
4356 host_ifconf = (struct ifconf *)(unsigned long)buf_temp;
4357 target_ifc_len = host_ifconf->ifc_len;
4358 target_ifc_buf = (abi_long)(unsigned long)host_ifconf->ifc_buf;
4359
4360 target_ifreq_size = thunk_type_size(ifreq_arg_type, 0);
4361 nb_ifreq = target_ifc_len / target_ifreq_size;
4362 host_ifc_len = nb_ifreq * sizeof(struct ifreq);
4363
4364 outbufsz = sizeof(*host_ifconf) + host_ifc_len;
4365 if (outbufsz > MAX_STRUCT_SIZE) {
4366 /* We can't fit all the extents into the fixed size buffer.
4367 * Allocate one that is large enough and use it instead.
4368 */
4369 host_ifconf = malloc(outbufsz);
4370 if (!host_ifconf) {
4371 return -TARGET_ENOMEM;
4372 }
4373 memcpy(host_ifconf, buf_temp, sizeof(*host_ifconf));
4374 free_buf = 1;
4375 }
4376 host_ifc_buf = (char*)host_ifconf + sizeof(*host_ifconf);
4377
4378 host_ifconf->ifc_len = host_ifc_len;
4379 host_ifconf->ifc_buf = host_ifc_buf;
4380
49ca6f3e 4381 ret = get_errno(safe_ioctl(fd, ie->host_cmd, host_ifconf));
059c2f2c
LV		 4382 if (!is_error(ret)) {
4383 /* convert host ifc_len to target ifc_len */
4384
4385 nb_ifreq = host_ifconf->ifc_len / sizeof(struct ifreq);
4386 target_ifc_len = nb_ifreq * target_ifreq_size;
4387 host_ifconf->ifc_len = target_ifc_len;
4388
4389 /* restore target ifc_buf */
4390
4391 host_ifconf->ifc_buf = (char *)(unsigned long)target_ifc_buf;
4392
4393 /* copy struct ifconf to target user */
4394
4395 argptr = lock_user(VERIFY_WRITE, arg, target_size, 0);
4396 if (!argptr)
4397 return -TARGET_EFAULT;
4398 thunk_convert(argptr, host_ifconf, arg_type, THUNK_TARGET);
4399 unlock_user(argptr, arg, target_size);
4400
4401 /* copy ifreq[] to target user */
4402
4403 argptr = lock_user(VERIFY_WRITE, target_ifc_buf, target_ifc_len, 0);
4404 for (i = 0; i < nb_ifreq ; i++) {
4405 thunk_convert(argptr + i * target_ifreq_size,
4406 host_ifc_buf + i * sizeof(struct ifreq),
4407 ifreq_arg_type, THUNK_TARGET);
4408 }
4409 unlock_user(argptr, target_ifc_buf, target_ifc_len);
4410 }
4411
4412 if (free_buf) {
4413 free(host_ifconf);
4414 }
4415
4416 return ret;
4417}
4418
56e904ec 4419static abi_long do_ioctl_dm(const IOCTLEntry *ie, uint8_t *buf_temp, int fd,
45c874eb 4420 int cmd, abi_long arg)
56e904ec
AG		 4421{
4422 void *argptr;
4423 struct dm_ioctl *host_dm;
4424 abi_long guest_data;
4425 uint32_t guest_data_size;
4426 int target_size;
4427 const argtype *arg_type = ie->arg_type;
4428 abi_long ret;
4429 void *big_buf = NULL;
4430 char *host_data;
4431
4432 arg_type++;
4433 target_size = thunk_type_size(arg_type, 0);
4434 argptr = lock_user(VERIFY_READ, arg, target_size, 1);
4435 if (!argptr) {
4436 ret = -TARGET_EFAULT;
4437 goto out;
4438 }
4439 thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
4440 unlock_user(argptr, arg, 0);
4441
4442 /* buf_temp is too small, so fetch things into a bigger buffer */
4443 big_buf = g_malloc0(((struct dm_ioctl*)buf_temp)->data_size * 2);
4444 memcpy(big_buf, buf_temp, target_size);
4445 buf_temp = big_buf;
4446 host_dm = big_buf;
4447
4448 guest_data = arg + host_dm->data_start;
4449 if ((guest_data - arg) < 0) {
4450 ret = -EINVAL;
4451 goto out;
4452 }
4453 guest_data_size = host_dm->data_size - host_dm->data_start;
4454 host_data = (char*)host_dm + host_dm->data_start;
4455
4456 argptr = lock_user(VERIFY_READ, guest_data, guest_data_size, 1);
4457 switch (ie->host_cmd) {
4458 case DM_REMOVE_ALL:
4459 case DM_LIST_DEVICES:
4460 case DM_DEV_CREATE:
4461 case DM_DEV_REMOVE:
4462 case DM_DEV_SUSPEND:
4463 case DM_DEV_STATUS:
4464 case DM_DEV_WAIT:
4465 case DM_TABLE_STATUS:
4466 case DM_TABLE_CLEAR:
4467 case DM_TABLE_DEPS:
4468 case DM_LIST_VERSIONS:
4469 /* no input data */
4470 break;
4471 case DM_DEV_RENAME:
4472 case DM_DEV_SET_GEOMETRY:
4473 /* data contains only strings */
4474 memcpy(host_data, argptr, guest_data_size);
4475 break;
4476 case DM_TARGET_MSG:
4477 memcpy(host_data, argptr, guest_data_size);
4478 *(uint64_t*)host_data = tswap64(*(uint64_t*)argptr);
4479 break;
4480 case DM_TABLE_LOAD:
4481 {
4482 void *gspec = argptr;
4483 void *cur_data = host_data;
4484 const argtype arg_type[] = { MK_STRUCT(STRUCT_dm_target_spec) };
4485 int spec_size = thunk_type_size(arg_type, 0);
4486 int i;
4487
4488 for (i = 0; i < host_dm->target_count; i++) {
4489 struct dm_target_spec *spec = cur_data;
4490 uint32_t next;
4491 int slen;
4492
4493 thunk_convert(spec, gspec, arg_type, THUNK_HOST);
4494 slen = strlen((char*)gspec + spec_size) + 1;
4495 next = spec->next;
4496 spec->next = sizeof(*spec) + slen;
4497 strcpy((char*)&spec[1], gspec + spec_size);
4498 gspec += next;
4499 cur_data += spec->next;
4500 }
4501 break;
4502 }
4503 default:
4504 ret = -TARGET_EINVAL;
dec0473d 4505 unlock_user(argptr, guest_data, 0);
56e904ec
AG		 4506 goto out;
4507 }
4508 unlock_user(argptr, guest_data, 0);
4509
49ca6f3e 4510 ret = get_errno(safe_ioctl(fd, ie->host_cmd, buf_temp));
56e904ec
AG		 4511 if (!is_error(ret)) {
4512 guest_data = arg + host_dm->data_start;
4513 guest_data_size = host_dm->data_size - host_dm->data_start;
4514 argptr = lock_user(VERIFY_WRITE, guest_data, guest_data_size, 0);
4515 switch (ie->host_cmd) {
4516 case DM_REMOVE_ALL:
4517 case DM_DEV_CREATE:
4518 case DM_DEV_REMOVE:
4519 case DM_DEV_RENAME:
4520 case DM_DEV_SUSPEND:
4521 case DM_DEV_STATUS:
4522 case DM_TABLE_LOAD:
4523 case DM_TABLE_CLEAR:
4524 case DM_TARGET_MSG:
4525 case DM_DEV_SET_GEOMETRY:
4526 /* no return data */
4527 break;
4528 case DM_LIST_DEVICES:
4529 {
4530 struct dm_name_list *nl = (void*)host_dm + host_dm->data_start;
4531 uint32_t remaining_data = guest_data_size;
4532 void *cur_data = argptr;
4533 const argtype arg_type[] = { MK_STRUCT(STRUCT_dm_name_list) };
4534 int nl_size = 12; /* can't use thunk_size due to alignment */
4535
4536 while (1) {
4537 uint32_t next = nl->next;
4538 if (next) {
4539 nl->next = nl_size + (strlen(nl->name) + 1);
4540 }
4541 if (remaining_data < nl->next) {
4542 host_dm->flags |= DM_BUFFER_FULL_FLAG;
4543 break;
4544 }
4545 thunk_convert(cur_data, nl, arg_type, THUNK_TARGET);
4546 strcpy(cur_data + nl_size, nl->name);
4547 cur_data += nl->next;
4548 remaining_data -= nl->next;
4549 if (!next) {
4550 break;
4551 }
4552 nl = (void*)nl + next;
4553 }
4554 break;
4555 }
4556 case DM_DEV_WAIT:
4557 case DM_TABLE_STATUS:
4558 {
4559 struct dm_target_spec *spec = (void*)host_dm + host_dm->data_start;
4560 void *cur_data = argptr;
4561 const argtype arg_type[] = { MK_STRUCT(STRUCT_dm_target_spec) };
4562 int spec_size = thunk_type_size(arg_type, 0);
4563 int i;
4564
4565 for (i = 0; i < host_dm->target_count; i++) {
4566 uint32_t next = spec->next;
4567 int slen = strlen((char*)&spec[1]) + 1;
4568 spec->next = (cur_data - argptr) + spec_size + slen;
4569 if (guest_data_size < spec->next) {
4570 host_dm->flags |= DM_BUFFER_FULL_FLAG;
4571 break;
4572 }
4573 thunk_convert(cur_data, spec, arg_type, THUNK_TARGET);
4574 strcpy(cur_data + spec_size, (char*)&spec[1]);
4575 cur_data = argptr + spec->next;
4576 spec = (void*)host_dm + host_dm->data_start + next;
4577 }
4578 break;
4579 }
4580 case DM_TABLE_DEPS:
4581 {
4582 void *hdata = (void*)host_dm + host_dm->data_start;
4583 int count = *(uint32_t*)hdata;
4584 uint64_t *hdev = hdata + 8;
4585 uint64_t *gdev = argptr + 8;
4586 int i;
4587
4588 *(uint32_t*)argptr = tswap32(count);
4589 for (i = 0; i < count; i++) {
4590 *gdev = tswap64(*hdev);
4591 gdev++;
4592 hdev++;
4593 }
4594 break;
4595 }
4596 case DM_LIST_VERSIONS:
4597 {
4598 struct dm_target_versions *vers = (void*)host_dm + host_dm->data_start;
4599 uint32_t remaining_data = guest_data_size;
4600 void *cur_data = argptr;
4601 const argtype arg_type[] = { MK_STRUCT(STRUCT_dm_target_versions) };
4602 int vers_size = thunk_type_size(arg_type, 0);
4603
4604 while (1) {
4605 uint32_t next = vers->next;
4606 if (next) {
4607 vers->next = vers_size + (strlen(vers->name) + 1);
4608 }
4609 if (remaining_data < vers->next) {
4610 host_dm->flags |= DM_BUFFER_FULL_FLAG;
4611 break;
4612 }
4613 thunk_convert(cur_data, vers, arg_type, THUNK_TARGET);
4614 strcpy(cur_data + vers_size, vers->name);
4615 cur_data += vers->next;
4616 remaining_data -= vers->next;
4617 if (!next) {
4618 break;
4619 }
4620 vers = (void*)vers + next;
4621 }
4622 break;
4623 }
4624 default:
dec0473d 4625 unlock_user(argptr, guest_data, 0);
56e904ec
AG		 4626 ret = -TARGET_EINVAL;
4627 goto out;
4628 }
4629 unlock_user(argptr, guest_data, guest_data_size);
4630
4631 argptr = lock_user(VERIFY_WRITE, arg, target_size, 0);
4632 if (!argptr) {
4633 ret = -TARGET_EFAULT;
4634 goto out;
4635 }
4636 thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET);
4637 unlock_user(argptr, arg, target_size);
4638 }
4639out:
ad11ad77 4640 g_free(big_buf);
56e904ec
AG		 4641 return ret;
4642}
4643
a59b5e35 4644static abi_long do_ioctl_blkpg(const IOCTLEntry *ie, uint8_t *buf_temp, int fd,
45c874eb 4645 int cmd, abi_long arg)
a59b5e35
AG		 4646{
4647 void *argptr;
4648 int target_size;
4649 const argtype *arg_type = ie->arg_type;
4650 const argtype part_arg_type[] = { MK_STRUCT(STRUCT_blkpg_partition) };
4651 abi_long ret;
4652
4653 struct blkpg_ioctl_arg *host_blkpg = (void*)buf_temp;
4654 struct blkpg_partition host_part;
4655
4656 /* Read and convert blkpg */
4657 arg_type++;
4658 target_size = thunk_type_size(arg_type, 0);
4659 argptr = lock_user(VERIFY_READ, arg, target_size, 1);
4660 if (!argptr) {
4661 ret = -TARGET_EFAULT;
4662 goto out;
4663 }
4664 thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
4665 unlock_user(argptr, arg, 0);
4666
4667 switch (host_blkpg->op) {
4668 case BLKPG_ADD_PARTITION:
4669 case BLKPG_DEL_PARTITION:
4670 /* payload is struct blkpg_partition */
4671 break;
4672 default:
4673 /* Unknown opcode */
4674 ret = -TARGET_EINVAL;
4675 goto out;
4676 }
4677
4678 /* Read and convert blkpg->data */
4679 arg = (abi_long)(uintptr_t)host_blkpg->data;
4680 target_size = thunk_type_size(part_arg_type, 0);
4681 argptr = lock_user(VERIFY_READ, arg, target_size, 1);
4682 if (!argptr) {
4683 ret = -TARGET_EFAULT;
4684 goto out;
4685 }
4686 thunk_convert(&host_part, argptr, part_arg_type, THUNK_HOST);
4687 unlock_user(argptr, arg, 0);
4688
4689 /* Swizzle the data pointer to our local copy and call! */
4690 host_blkpg->data = &host_part;
49ca6f3e 4691 ret = get_errno(safe_ioctl(fd, ie->host_cmd, host_blkpg));
a59b5e35
AG		 4692
4693out:
4694 return ret;
4695}
4696
7ff7b666 4697static abi_long do_ioctl_rt(const IOCTLEntry *ie, uint8_t *buf_temp,
45c874eb 4698 int fd, int cmd, abi_long arg)
7ff7b666
LV		 4699{
4700 const argtype *arg_type = ie->arg_type;
4701 const StructEntry *se;
4702 const argtype *field_types;
4703 const int *dst_offsets, *src_offsets;
4704 int target_size;
4705 void *argptr;
4706 abi_ulong *target_rt_dev_ptr;
4707 unsigned long *host_rt_dev_ptr;
4708 abi_long ret;
4709 int i;
4710
4711 assert(ie->access == IOC_W);
4712 assert(*arg_type == TYPE_PTR);
4713 arg_type++;
4714 assert(*arg_type == TYPE_STRUCT);
4715 target_size = thunk_type_size(arg_type, 0);
4716 argptr = lock_user(VERIFY_READ, arg, target_size, 1);
4717 if (!argptr) {
4718 return -TARGET_EFAULT;
4719 }
4720 arg_type++;
4721 assert(*arg_type == (int)STRUCT_rtentry);
4722 se = struct_entries + *arg_type++;
4723 assert(se->convert[0] == NULL);
4724 /* convert struct here to be able to catch rt_dev string */
4725 field_types = se->field_types;
4726 dst_offsets = se->field_offsets[THUNK_HOST];
4727 src_offsets = se->field_offsets[THUNK_TARGET];
4728 for (i = 0; i < se->nb_fields; i++) {
4729 if (dst_offsets[i] == offsetof(struct rtentry, rt_dev)) {
4730 assert(*field_types == TYPE_PTRVOID);
4731 target_rt_dev_ptr = (abi_ulong *)(argptr + src_offsets[i]);
4732 host_rt_dev_ptr = (unsigned long *)(buf_temp + dst_offsets[i]);
4733 if (*target_rt_dev_ptr != 0) {
4734 *host_rt_dev_ptr = (unsigned long)lock_user_string(
4735 tswapal(*target_rt_dev_ptr));
4736 if (!*host_rt_dev_ptr) {
4737 unlock_user(argptr, arg, 0);
4738 return -TARGET_EFAULT;
4739 }
4740 } else {
4741 *host_rt_dev_ptr = 0;
4742 }
4743 field_types++;
4744 continue;
4745 }
4746 field_types = thunk_convert(buf_temp + dst_offsets[i],
4747 argptr + src_offsets[i],
4748 field_types, THUNK_HOST);
4749 }
4750 unlock_user(argptr, arg, 0);
4751
49ca6f3e 4752 ret = get_errno(safe_ioctl(fd, ie->host_cmd, buf_temp));
7ff7b666
LV		 4753 if (*host_rt_dev_ptr != 0) {
4754 unlock_user((void *)*host_rt_dev_ptr,
4755 *target_rt_dev_ptr, 0);
4756 }
4757 return ret;
4758}
4759
ca56f5b5 4760static abi_long do_ioctl_kdsigaccept(const IOCTLEntry *ie, uint8_t *buf_temp,
45c874eb 4761 int fd, int cmd, abi_long arg)
ca56f5b5
PB		 4762{
4763 int sig = target_to_host_signal(arg);
49ca6f3e 4764 return get_errno(safe_ioctl(fd, ie->host_cmd, sig));
ca56f5b5
PB		 4765}
4766
9f106a75 4767static IOCTLEntry ioctl_entries[] = {
001faf32 4768#define IOCTL(cmd, access, ...) \
d2ef05bb
PM		 4769 { TARGET_ ## cmd, cmd, #cmd, access, 0, { __VA_ARGS__ } },
4770#define IOCTL_SPECIAL(cmd, access, dofn, ...) \
4771 { TARGET_ ## cmd, cmd, #cmd, access, dofn, { __VA_ARGS__ } },
31e31b8a
FB		 4772#include "ioctls.h"
4773 { 0, 0, },
4774};
4775
53a5960a 4776/* ??? Implement proper locking for ioctls. */
0da46a6e 4777/* do_ioctl() Must return target values and target errnos. */
45c874eb 4778static abi_long do_ioctl(int fd, int cmd, abi_long arg)
31e31b8a
FB		 4779{
4780 const IOCTLEntry *ie;
4781 const argtype *arg_type;
992f48a0 4782 abi_long ret;
31e31b8a 4783 uint8_t buf_temp[MAX_STRUCT_SIZE];
53a5960a
PB		 4784 int target_size;
4785 void *argptr;
31e31b8a
FB		 4786
4787 ie = ioctl_entries;
4788 for(;;) {
4789 if (ie->target_cmd == 0) {
32407103 4790 gemu_log("Unsupported ioctl: cmd=0x%04lx\n", (long)cmd);
0da46a6e 4791 return -TARGET_ENOSYS;
31e31b8a
FB		 4792 }
4793 if (ie->target_cmd == cmd)
4794 break;
4795 ie++;
4796 }
4797 arg_type = ie->arg_type;
9de5e440 4798#if defined(DEBUG)
32407103 4799 gemu_log("ioctl: cmd=0x%04lx (%s)\n", (long)cmd, ie->name);
72f03900 4800#endif
d2ef05bb
PM		 4801 if (ie->do_ioctl) {
4802 return ie->do_ioctl(ie, buf_temp, fd, cmd, arg);
4803 }
4804
31e31b8a
FB		 4805 switch(arg_type[0]) {
4806 case TYPE_NULL:
4807 /* no argument */
49ca6f3e 4808 ret = get_errno(safe_ioctl(fd, ie->host_cmd));
31e31b8a
FB		 4809 break;
4810 case TYPE_PTRVOID:
4811 case TYPE_INT:
49ca6f3e 4812 ret = get_errno(safe_ioctl(fd, ie->host_cmd, arg));
31e31b8a
FB		 4813 break;
4814 case TYPE_PTR:
4815 arg_type++;
53a5960a 4816 target_size = thunk_type_size(arg_type, 0);
31e31b8a
FB		 4817 switch(ie->access) {
4818 case IOC_R:
49ca6f3e 4819 ret = get_errno(safe_ioctl(fd, ie->host_cmd, buf_temp));
31e31b8a 4820 if (!is_error(ret)) {
579a97f7
FB		 4821 argptr = lock_user(VERIFY_WRITE, arg, target_size, 0);
4822 if (!argptr)
4823 return -TARGET_EFAULT;
53a5960a
PB		 4824 thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET);
4825 unlock_user(argptr, arg, target_size);
31e31b8a
FB		 4826 }
4827 break;
4828 case IOC_W:
579a97f7
FB		 4829 argptr = lock_user(VERIFY_READ, arg, target_size, 1);
4830 if (!argptr)
4831 return -TARGET_EFAULT;
53a5960a
PB		 4832 thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
4833 unlock_user(argptr, arg, 0);
49ca6f3e 4834 ret = get_errno(safe_ioctl(fd, ie->host_cmd, buf_temp));
31e31b8a
FB		 4835 break;
4836 default:
4837 case IOC_RW:
579a97f7
FB		 4838 argptr = lock_user(VERIFY_READ, arg, target_size, 1);
4839 if (!argptr)
4840 return -TARGET_EFAULT;
53a5960a
PB		 4841 thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
4842 unlock_user(argptr, arg, 0);
49ca6f3e 4843 ret = get_errno(safe_ioctl(fd, ie->host_cmd, buf_temp));
31e31b8a 4844 if (!is_error(ret)) {
579a97f7
FB		 4845 argptr = lock_user(VERIFY_WRITE, arg, target_size, 0);
4846 if (!argptr)
4847 return -TARGET_EFAULT;
53a5960a
PB		 4848 thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET);
4849 unlock_user(argptr, arg, target_size);
31e31b8a
FB		 4850 }
4851 break;
4852 }
4853 break;
4854 default:
32407103
JM		 4855 gemu_log("Unsupported ioctl type: cmd=0x%04lx type=%d\n",
4856 (long)cmd, arg_type[0]);
0da46a6e 4857 ret = -TARGET_ENOSYS;
31e31b8a
FB		 4858 break;
4859 }
4860 return ret;
4861}
4862
b39bc503 4863static const bitmask_transtbl iflag_tbl[] = {
31e31b8a
FB		 4864 { TARGET_IGNBRK, TARGET_IGNBRK, IGNBRK, IGNBRK },
4865 { TARGET_BRKINT, TARGET_BRKINT, BRKINT, BRKINT },
4866 { TARGET_IGNPAR, TARGET_IGNPAR, IGNPAR, IGNPAR },
4867 { TARGET_PARMRK, TARGET_PARMRK, PARMRK, PARMRK },
4868 { TARGET_INPCK, TARGET_INPCK, INPCK, INPCK },
4869 { TARGET_ISTRIP, TARGET_ISTRIP, ISTRIP, ISTRIP },
4870 { TARGET_INLCR, TARGET_INLCR, INLCR, INLCR },
4871 { TARGET_IGNCR, TARGET_IGNCR, IGNCR, IGNCR },
4872 { TARGET_ICRNL, TARGET_ICRNL, ICRNL, ICRNL },
4873 { TARGET_IUCLC, TARGET_IUCLC, IUCLC, IUCLC },
4874 { TARGET_IXON, TARGET_IXON, IXON, IXON },
4875 { TARGET_IXANY, TARGET_IXANY, IXANY, IXANY },
4876 { TARGET_IXOFF, TARGET_IXOFF, IXOFF, IXOFF },
4877 { TARGET_IMAXBEL, TARGET_IMAXBEL, IMAXBEL, IMAXBEL },
4878 { 0, 0, 0, 0 }
4879};
4880
b39bc503 4881static const bitmask_transtbl oflag_tbl[] = {
31e31b8a
FB		 4882 { TARGET_OPOST, TARGET_OPOST, OPOST, OPOST },
4883 { TARGET_OLCUC, TARGET_OLCUC, OLCUC, OLCUC },
4884 { TARGET_ONLCR, TARGET_ONLCR, ONLCR, ONLCR },
4885 { TARGET_OCRNL, TARGET_OCRNL, OCRNL, OCRNL },
4886 { TARGET_ONOCR, TARGET_ONOCR, ONOCR, ONOCR },
4887 { TARGET_ONLRET, TARGET_ONLRET, ONLRET, ONLRET },
4888 { TARGET_OFILL, TARGET_OFILL, OFILL, OFILL },
4889 { TARGET_OFDEL, TARGET_OFDEL, OFDEL, OFDEL },
4890 { TARGET_NLDLY, TARGET_NL0, NLDLY, NL0 },
4891 { TARGET_NLDLY, TARGET_NL1, NLDLY, NL1 },
4892 { TARGET_CRDLY, TARGET_CR0, CRDLY, CR0 },
4893 { TARGET_CRDLY, TARGET_CR1, CRDLY, CR1 },
4894 { TARGET_CRDLY, TARGET_CR2, CRDLY, CR2 },
4895 { TARGET_CRDLY, TARGET_CR3, CRDLY, CR3 },
4896 { TARGET_TABDLY, TARGET_TAB0, TABDLY, TAB0 },
4897 { TARGET_TABDLY, TARGET_TAB1, TABDLY, TAB1 },
4898 { TARGET_TABDLY, TARGET_TAB2, TABDLY, TAB2 },
4899 { TARGET_TABDLY, TARGET_TAB3, TABDLY, TAB3 },
4900 { TARGET_BSDLY, TARGET_BS0, BSDLY, BS0 },
4901 { TARGET_BSDLY, TARGET_BS1, BSDLY, BS1 },
4902 { TARGET_VTDLY, TARGET_VT0, VTDLY, VT0 },
4903 { TARGET_VTDLY, TARGET_VT1, VTDLY, VT1 },
4904 { TARGET_FFDLY, TARGET_FF0, FFDLY, FF0 },
4905 { TARGET_FFDLY, TARGET_FF1, FFDLY, FF1 },
4906 { 0, 0, 0, 0 }
4907};
4908
b39bc503 4909static const bitmask_transtbl cflag_tbl[] = {
31e31b8a
FB		 4910 { TARGET_CBAUD, TARGET_B0, CBAUD, B0 },
4911 { TARGET_CBAUD, TARGET_B50, CBAUD, B50 },
4912 { TARGET_CBAUD, TARGET_B75, CBAUD, B75 },
4913 { TARGET_CBAUD, TARGET_B110, CBAUD, B110 },
4914 { TARGET_CBAUD, TARGET_B134, CBAUD, B134 },
4915 { TARGET_CBAUD, TARGET_B150, CBAUD, B150 },
4916 { TARGET_CBAUD, TARGET_B200, CBAUD, B200 },
4917 { TARGET_CBAUD, TARGET_B300, CBAUD, B300 },
4918 { TARGET_CBAUD, TARGET_B600, CBAUD, B600 },
4919 { TARGET_CBAUD, TARGET_B1200, CBAUD, B1200 },
4920 { TARGET_CBAUD, TARGET_B1800, CBAUD, B1800 },
4921 { TARGET_CBAUD, TARGET_B2400, CBAUD, B2400 },
4922 { TARGET_CBAUD, TARGET_B4800, CBAUD, B4800 },
4923 { TARGET_CBAUD, TARGET_B9600, CBAUD, B9600 },
4924 { TARGET_CBAUD, TARGET_B19200, CBAUD, B19200 },
4925 { TARGET_CBAUD, TARGET_B38400, CBAUD, B38400 },
4926 { TARGET_CBAUD, TARGET_B57600, CBAUD, B57600 },
4927 { TARGET_CBAUD, TARGET_B115200, CBAUD, B115200 },
4928 { TARGET_CBAUD, TARGET_B230400, CBAUD, B230400 },
4929 { TARGET_CBAUD, TARGET_B460800, CBAUD, B460800 },
4930 { TARGET_CSIZE, TARGET_CS5, CSIZE, CS5 },
4931 { TARGET_CSIZE, TARGET_CS6, CSIZE, CS6 },
4932 { TARGET_CSIZE, TARGET_CS7, CSIZE, CS7 },
4933 { TARGET_CSIZE, TARGET_CS8, CSIZE, CS8 },
4934 { TARGET_CSTOPB, TARGET_CSTOPB, CSTOPB, CSTOPB },
4935 { TARGET_CREAD, TARGET_CREAD, CREAD, CREAD },
4936 { TARGET_PARENB, TARGET_PARENB, PARENB, PARENB },
4937 { TARGET_PARODD, TARGET_PARODD, PARODD, PARODD },
4938 { TARGET_HUPCL, TARGET_HUPCL, HUPCL, HUPCL },
4939 { TARGET_CLOCAL, TARGET_CLOCAL, CLOCAL, CLOCAL },
4940 { TARGET_CRTSCTS, TARGET_CRTSCTS, CRTSCTS, CRTSCTS },
4941 { 0, 0, 0, 0 }
4942};
4943
b39bc503 4944static const bitmask_transtbl lflag_tbl[] = {
31e31b8a
FB		 4945 { TARGET_ISIG, TARGET_ISIG, ISIG, ISIG },
4946 { TARGET_ICANON, TARGET_ICANON, ICANON, ICANON },
4947 { TARGET_XCASE, TARGET_XCASE, XCASE, XCASE },
4948 { TARGET_ECHO, TARGET_ECHO, ECHO, ECHO },
4949 { TARGET_ECHOE, TARGET_ECHOE, ECHOE, ECHOE },
4950 { TARGET_ECHOK, TARGET_ECHOK, ECHOK, ECHOK },
4951 { TARGET_ECHONL, TARGET_ECHONL, ECHONL, ECHONL },
4952 { TARGET_NOFLSH, TARGET_NOFLSH, NOFLSH, NOFLSH },
4953 { TARGET_TOSTOP, TARGET_TOSTOP, TOSTOP, TOSTOP },
4954 { TARGET_ECHOCTL, TARGET_ECHOCTL, ECHOCTL, ECHOCTL },
4955 { TARGET_ECHOPRT, TARGET_ECHOPRT, ECHOPRT, ECHOPRT },
4956 { TARGET_ECHOKE, TARGET_ECHOKE, ECHOKE, ECHOKE },
4957 { TARGET_FLUSHO, TARGET_FLUSHO, FLUSHO, FLUSHO },
4958 { TARGET_PENDIN, TARGET_PENDIN, PENDIN, PENDIN },
4959 { TARGET_IEXTEN, TARGET_IEXTEN, IEXTEN, IEXTEN },
4960 { 0, 0, 0, 0 }
4961};
4962
4963static void target_to_host_termios (void *dst, const void *src)
4964{
4965 struct host_termios *host = dst;
4966 const struct target_termios *target = src;
3b46e624 4967
5fafdf24 4968 host->c_iflag =
31e31b8a 4969 target_to_host_bitmask(tswap32(target->c_iflag), iflag_tbl);
5fafdf24 4970 host->c_oflag =
31e31b8a 4971 target_to_host_bitmask(tswap32(target->c_oflag), oflag_tbl);
5fafdf24 4972 host->c_cflag =
31e31b8a 4973 target_to_host_bitmask(tswap32(target->c_cflag), cflag_tbl);
5fafdf24 4974 host->c_lflag =
31e31b8a
FB		 4975 target_to_host_bitmask(tswap32(target->c_lflag), lflag_tbl);
4976 host->c_line = target->c_line;
3b46e624 4977
44607123 4978 memset(host->c_cc, 0, sizeof(host->c_cc));
5fafdf24
TS		 4979 host->c_cc[VINTR] = target->c_cc[TARGET_VINTR];
4980 host->c_cc[VQUIT] = target->c_cc[TARGET_VQUIT];
3b46e624 4981 host->c_cc[VERASE] = target->c_cc[TARGET_VERASE];
5fafdf24 4982 host->c_cc[VKILL] = target->c_cc[TARGET_VKILL];
3b46e624 4983 host->c_cc[VEOF] = target->c_cc[TARGET_VEOF];
5fafdf24 4984 host->c_cc[VTIME] = target->c_cc[TARGET_VTIME];
3b46e624 4985 host->c_cc[VMIN] = target->c_cc[TARGET_VMIN];
5fafdf24 4986 host->c_cc[VSWTC] = target->c_cc[TARGET_VSWTC];
3b46e624 4987 host->c_cc[VSTART] = target->c_cc[TARGET_VSTART];
5fafdf24
TS		 4988 host->c_cc[VSTOP] = target->c_cc[TARGET_VSTOP];
4989 host->c_cc[VSUSP] = target->c_cc[TARGET_VSUSP];
3b46e624
TS		 4990 host->c_cc[VEOL] = target->c_cc[TARGET_VEOL];
4991 host->c_cc[VREPRINT] = target->c_cc[TARGET_VREPRINT];
4992 host->c_cc[VDISCARD] = target->c_cc[TARGET_VDISCARD];
4993 host->c_cc[VWERASE] = target->c_cc[TARGET_VWERASE];
4994 host->c_cc[VLNEXT] = target->c_cc[TARGET_VLNEXT];
5fafdf24 4995 host->c_cc[VEOL2] = target->c_cc[TARGET_VEOL2];
31e31b8a 4996}
3b46e624 4997
31e31b8a
FB		 4998static void host_to_target_termios (void *dst, const void *src)
4999{
5000 struct target_termios *target = dst;
5001 const struct host_termios *host = src;
5002
5fafdf24 5003 target->c_iflag =
31e31b8a 5004 tswap32(host_to_target_bitmask(host->c_iflag, iflag_tbl));
5fafdf24 5005 target->c_oflag =
31e31b8a 5006 tswap32(host_to_target_bitmask(host->c_oflag, oflag_tbl));
5fafdf24 5007 target->c_cflag =
31e31b8a 5008 tswap32(host_to_target_bitmask(host->c_cflag, cflag_tbl));
5fafdf24 5009 target->c_lflag =
31e31b8a
FB		 5010 tswap32(host_to_target_bitmask(host->c_lflag, lflag_tbl));
5011 target->c_line = host->c_line;
3b46e624 5012
44607123 5013 memset(target->c_cc, 0, sizeof(target->c_cc));
31e31b8a
FB		 5014 target->c_cc[TARGET_VINTR] = host->c_cc[VINTR];
5015 target->c_cc[TARGET_VQUIT] = host->c_cc[VQUIT];
5016 target->c_cc[TARGET_VERASE] = host->c_cc[VERASE];
5017 target->c_cc[TARGET_VKILL] = host->c_cc[VKILL];
5018 target->c_cc[TARGET_VEOF] = host->c_cc[VEOF];
5019 target->c_cc[TARGET_VTIME] = host->c_cc[VTIME];
5020 target->c_cc[TARGET_VMIN] = host->c_cc[VMIN];
5021 target->c_cc[TARGET_VSWTC] = host->c_cc[VSWTC];
5022 target->c_cc[TARGET_VSTART] = host->c_cc[VSTART];
5023 target->c_cc[TARGET_VSTOP] = host->c_cc[VSTOP];
5024 target->c_cc[TARGET_VSUSP] = host->c_cc[VSUSP];
5025 target->c_cc[TARGET_VEOL] = host->c_cc[VEOL];
5026 target->c_cc[TARGET_VREPRINT] = host->c_cc[VREPRINT];
5027 target->c_cc[TARGET_VDISCARD] = host->c_cc[VDISCARD];
5028 target->c_cc[TARGET_VWERASE] = host->c_cc[VWERASE];
5029 target->c_cc[TARGET_VLNEXT] = host->c_cc[VLNEXT];
5030 target->c_cc[TARGET_VEOL2] = host->c_cc[VEOL2];
5031}
5032
8e853dc7 5033static const StructEntry struct_termios_def = {
31e31b8a
FB		 5034 .convert = { host_to_target_termios, target_to_host_termios },
5035 .size = { sizeof(struct target_termios), sizeof(struct host_termios) },
5036 .align = { __alignof__(struct target_termios), __alignof__(struct host_termios) },
5037};
5038
5286db75
FB		 5039static bitmask_transtbl mmap_flags_tbl[] = {
5040 { TARGET_MAP_SHARED, TARGET_MAP_SHARED, MAP_SHARED, MAP_SHARED },
5041 { TARGET_MAP_PRIVATE, TARGET_MAP_PRIVATE, MAP_PRIVATE, MAP_PRIVATE },
5042 { TARGET_MAP_FIXED, TARGET_MAP_FIXED, MAP_FIXED, MAP_FIXED },
5043 { TARGET_MAP_ANONYMOUS, TARGET_MAP_ANONYMOUS, MAP_ANONYMOUS, MAP_ANONYMOUS },
5044 { TARGET_MAP_GROWSDOWN, TARGET_MAP_GROWSDOWN, MAP_GROWSDOWN, MAP_GROWSDOWN },
5045 { TARGET_MAP_DENYWRITE, TARGET_MAP_DENYWRITE, MAP_DENYWRITE, MAP_DENYWRITE },
5046 { TARGET_MAP_EXECUTABLE, TARGET_MAP_EXECUTABLE, MAP_EXECUTABLE, MAP_EXECUTABLE },
5047 { TARGET_MAP_LOCKED, TARGET_MAP_LOCKED, MAP_LOCKED, MAP_LOCKED },
e8efd8e7
CL		 5048 { TARGET_MAP_NORESERVE, TARGET_MAP_NORESERVE, MAP_NORESERVE,
5049 MAP_NORESERVE },
5286db75
FB		 5050 { 0, 0, 0, 0 }
5051};
5052
2ab83ea7 5053#if defined(TARGET_I386)
6dbad63e
FB		 5054
5055/* NOTE: there is really one LDT for all the threads */
b1d8e52e 5056static uint8_t *ldt_table;
6dbad63e 5057
03acab66 5058static abi_long read_ldt(abi_ulong ptr, unsigned long bytecount)
6dbad63e
FB		 5059{
5060 int size;
53a5960a 5061 void *p;
6dbad63e
FB		 5062
5063 if (!ldt_table)
5064 return 0;
5065 size = TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE;
5066 if (size > bytecount)
5067 size = bytecount;
579a97f7
FB		 5068 p = lock_user(VERIFY_WRITE, ptr, size, 0);
5069 if (!p)
03acab66 5070 return -TARGET_EFAULT;
579a97f7 5071 /* ??? Should this by byteswapped? */
53a5960a
PB		 5072 memcpy(p, ldt_table, size);
5073 unlock_user(p, ptr, size);
6dbad63e
FB		 5074 return size;
5075}
5076
5077/* XXX: add locking support */
03acab66
FB		 5078static abi_long write_ldt(CPUX86State *env,
5079 abi_ulong ptr, unsigned long bytecount, int oldmode)
6dbad63e
FB		 5080{
5081 struct target_modify_ldt_ldt_s ldt_info;
53a5960a 5082 struct target_modify_ldt_ldt_s *target_ldt_info;
6dbad63e 5083 int seg_32bit, contents, read_exec_only, limit_in_pages;
8d18e893 5084 int seg_not_present, useable, lm;
6dbad63e
FB		 5085 uint32_t *lp, entry_1, entry_2;
5086
5087 if (bytecount != sizeof(ldt_info))
03acab66 5088 return -TARGET_EINVAL;
579a97f7 5089 if (!lock_user_struct(VERIFY_READ, target_ldt_info, ptr, 1))
03acab66 5090 return -TARGET_EFAULT;
53a5960a 5091 ldt_info.entry_number = tswap32(target_ldt_info->entry_number);
cbb21eed 5092 ldt_info.base_addr = tswapal(target_ldt_info->base_addr);
53a5960a
PB		 5093 ldt_info.limit = tswap32(target_ldt_info->limit);
5094 ldt_info.flags = tswap32(target_ldt_info->flags);
5095 unlock_user_struct(target_ldt_info, ptr, 0);
3b46e624 5096
6dbad63e 5097 if (ldt_info.entry_number >= TARGET_LDT_ENTRIES)
03acab66 5098 return -TARGET_EINVAL;
6dbad63e
FB		 5099 seg_32bit = ldt_info.flags & 1;
5100 contents = (ldt_info.flags >> 1) & 3;
5101 read_exec_only = (ldt_info.flags >> 3) & 1;
5102 limit_in_pages = (ldt_info.flags >> 4) & 1;
5103 seg_not_present = (ldt_info.flags >> 5) & 1;
5104 useable = (ldt_info.flags >> 6) & 1;
8d18e893
FB		 5105#ifdef TARGET_ABI32
5106 lm = 0;
5107#else
5108 lm = (ldt_info.flags >> 7) & 1;
5109#endif
6dbad63e
FB		 5110 if (contents == 3) {
5111 if (oldmode)
03acab66 5112 return -TARGET_EINVAL;
6dbad63e 5113 if (seg_not_present == 0)
03acab66 5114 return -TARGET_EINVAL;
6dbad63e
FB		 5115 }
5116 /* allocate the LDT */
5117 if (!ldt_table) {
e441570f
AZ		 5118 env->ldt.base = target_mmap(0,
5119 TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE,
5120 PROT_READ|PROT_WRITE,
5121 MAP_ANONYMOUS|MAP_PRIVATE, -1, 0);
5122 if (env->ldt.base == -1)
03acab66 5123 return -TARGET_ENOMEM;
e441570f
AZ		 5124 memset(g2h(env->ldt.base), 0,
5125 TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE);
6dbad63e 5126 env->ldt.limit = 0xffff;
e441570f 5127 ldt_table = g2h(env->ldt.base);
6dbad63e
FB		 5128 }
5129
5130 /* NOTE: same code as Linux kernel */
5131 /* Allow LDTs to be cleared by the user. */
5132 if (ldt_info.base_addr == 0 && ldt_info.limit == 0) {
5133 if (oldmode ||
5134 (contents == 0 &&
5135 read_exec_only == 1 &&
5136 seg_32bit == 0 &&
5137 limit_in_pages == 0 &&
5138 seg_not_present == 1 &&
5139 useable == 0 )) {
5140 entry_1 = 0;
5141 entry_2 = 0;
5142 goto install;
5143 }
5144 }
3b46e624 5145
6dbad63e
FB		 5146 entry_1 = ((ldt_info.base_addr & 0x0000ffff) << 16) |
5147 (ldt_info.limit & 0x0ffff);
5148 entry_2 = (ldt_info.base_addr & 0xff000000) |
5149 ((ldt_info.base_addr & 0x00ff0000) >> 16) |
5150 (ldt_info.limit & 0xf0000) |
5151 ((read_exec_only ^ 1) << 9) |
5152 (contents << 10) |
5153 ((seg_not_present ^ 1) << 15) |
5154 (seg_32bit << 22) |
5155 (limit_in_pages << 23) |
8d18e893 5156 (lm << 21) |
6dbad63e
FB		 5157 0x7000;
5158 if (!oldmode)
5159 entry_2 |= (useable << 20);
14ae3ba7 5160
6dbad63e
FB		 5161 /* Install the new entry ... */
5162install:
5163 lp = (uint32_t *)(ldt_table + (ldt_info.entry_number << 3));
5164 lp[0] = tswap32(entry_1);
5165 lp[1] = tswap32(entry_2);
5166 return 0;
5167}
5168
5169/* specific and weird i386 syscalls */
8fcd3692
BS		 5170static abi_long do_modify_ldt(CPUX86State *env, int func, abi_ulong ptr,
5171 unsigned long bytecount)
6dbad63e 5172{
03acab66 5173 abi_long ret;
3b46e624 5174
6dbad63e
FB		 5175 switch (func) {
5176 case 0:
5177 ret = read_ldt(ptr, bytecount);
5178 break;
5179 case 1:
5180 ret = write_ldt(env, ptr, bytecount, 1);
5181 break;
5182 case 0x11:
5183 ret = write_ldt(env, ptr, bytecount, 0);
5184 break;
03acab66
FB		 5185 default:
5186 ret = -TARGET_ENOSYS;
5187 break;
6dbad63e
FB		 5188 }
5189 return ret;
5190}
1b6b029e 5191
4583f589 5192#if defined(TARGET_I386) && defined(TARGET_ABI32)
bc22eb44 5193abi_long do_set_thread_area(CPUX86State *env, abi_ulong ptr)
8d18e893
FB		 5194{
5195 uint64_t *gdt_table = g2h(env->gdt.base);
5196 struct target_modify_ldt_ldt_s ldt_info;
5197 struct target_modify_ldt_ldt_s *target_ldt_info;
5198 int seg_32bit, contents, read_exec_only, limit_in_pages;
5199 int seg_not_present, useable, lm;
5200 uint32_t *lp, entry_1, entry_2;
5201 int i;
5202
5203 lock_user_struct(VERIFY_WRITE, target_ldt_info, ptr, 1);
5204 if (!target_ldt_info)
5205 return -TARGET_EFAULT;
5206 ldt_info.entry_number = tswap32(target_ldt_info->entry_number);
cbb21eed 5207 ldt_info.base_addr = tswapal(target_ldt_info->base_addr);
8d18e893
FB		 5208 ldt_info.limit = tswap32(target_ldt_info->limit);
5209 ldt_info.flags = tswap32(target_ldt_info->flags);
5210 if (ldt_info.entry_number == -1) {
5211 for (i=TARGET_GDT_ENTRY_TLS_MIN; i<=TARGET_GDT_ENTRY_TLS_MAX; i++) {
5212 if (gdt_table[i] == 0) {
5213 ldt_info.entry_number = i;
5214 target_ldt_info->entry_number = tswap32(i);
5215 break;
5216 }
5217 }
5218 }
5219 unlock_user_struct(target_ldt_info, ptr, 1);
5220
5221 if (ldt_info.entry_number < TARGET_GDT_ENTRY_TLS_MIN ||
5222 ldt_info.entry_number > TARGET_GDT_ENTRY_TLS_MAX)
5223 return -TARGET_EINVAL;
5224 seg_32bit = ldt_info.flags & 1;
5225 contents = (ldt_info.flags >> 1) & 3;
5226 read_exec_only = (ldt_info.flags >> 3) & 1;
5227 limit_in_pages = (ldt_info.flags >> 4) & 1;
5228 seg_not_present = (ldt_info.flags >> 5) & 1;
5229 useable = (ldt_info.flags >> 6) & 1;
5230#ifdef TARGET_ABI32
5231 lm = 0;
5232#else
5233 lm = (ldt_info.flags >> 7) & 1;
5234#endif
5235
5236 if (contents == 3) {
5237 if (seg_not_present == 0)
5238 return -TARGET_EINVAL;
5239 }
5240
5241 /* NOTE: same code as Linux kernel */
5242 /* Allow LDTs to be cleared by the user. */
5243 if (ldt_info.base_addr == 0 && ldt_info.limit == 0) {
5244 if ((contents == 0 &&
5245 read_exec_only == 1 &&
5246 seg_32bit == 0 &&
5247 limit_in_pages == 0 &&
5248 seg_not_present == 1 &&
5249 useable == 0 )) {
5250 entry_1 = 0;
5251 entry_2 = 0;
5252 goto install;
5253 }
5254 }
5255
5256 entry_1 = ((ldt_info.base_addr & 0x0000ffff) << 16) |
5257 (ldt_info.limit & 0x0ffff);
5258 entry_2 = (ldt_info.base_addr & 0xff000000) |
5259 ((ldt_info.base_addr & 0x00ff0000) >> 16) |
5260 (ldt_info.limit & 0xf0000) |
5261 ((read_exec_only ^ 1) << 9) |
5262 (contents << 10) |
5263 ((seg_not_present ^ 1) << 15) |
5264 (seg_32bit << 22) |
5265 (limit_in_pages << 23) |
5266 (useable << 20) |
5267 (lm << 21) |
5268 0x7000;
5269
5270 /* Install the new entry ... */
5271install:
5272 lp = (uint32_t *)(gdt_table + ldt_info.entry_number);
5273 lp[0] = tswap32(entry_1);
5274 lp[1] = tswap32(entry_2);
5275 return 0;
5276}
5277
8fcd3692 5278static abi_long do_get_thread_area(CPUX86State *env, abi_ulong ptr)
8d18e893
FB		 5279{
5280 struct target_modify_ldt_ldt_s *target_ldt_info;
5281 uint64_t *gdt_table = g2h(env->gdt.base);
5282 uint32_t base_addr, limit, flags;
5283 int seg_32bit, contents, read_exec_only, limit_in_pages, idx;
5284 int seg_not_present, useable, lm;
5285 uint32_t *lp, entry_1, entry_2;
5286
5287 lock_user_struct(VERIFY_WRITE, target_ldt_info, ptr, 1);
5288 if (!target_ldt_info)
5289 return -TARGET_EFAULT;
5290 idx = tswap32(target_ldt_info->entry_number);
5291 if (idx < TARGET_GDT_ENTRY_TLS_MIN ||
5292 idx > TARGET_GDT_ENTRY_TLS_MAX) {
5293 unlock_user_struct(target_ldt_info, ptr, 1);
5294 return -TARGET_EINVAL;
5295 }
5296 lp = (uint32_t *)(gdt_table + idx);
5297 entry_1 = tswap32(lp[0]);
5298 entry_2 = tswap32(lp[1]);
5299
5300 read_exec_only = ((entry_2 >> 9) & 1) ^ 1;
5301 contents = (entry_2 >> 10) & 3;
5302 seg_not_present = ((entry_2 >> 15) & 1) ^ 1;
5303 seg_32bit = (entry_2 >> 22) & 1;
5304 limit_in_pages = (entry_2 >> 23) & 1;
5305 useable = (entry_2 >> 20) & 1;
5306#ifdef TARGET_ABI32
5307 lm = 0;
5308#else
5309 lm = (entry_2 >> 21) & 1;
5310#endif
5311 flags = (seg_32bit << 0) | (contents << 1) |
5312 (read_exec_only << 3) | (limit_in_pages << 4) |
5313 (seg_not_present << 5) | (useable << 6) | (lm << 7);
5314 limit = (entry_1 & 0xffff) | (entry_2 & 0xf0000);
5315 base_addr = (entry_1 >> 16) |
5316 (entry_2 & 0xff000000) |
5317 ((entry_2 & 0xff) << 16);
cbb21eed 5318 target_ldt_info->base_addr = tswapal(base_addr);
8d18e893
FB		 5319 target_ldt_info->limit = tswap32(limit);
5320 target_ldt_info->flags = tswap32(flags);
5321 unlock_user_struct(target_ldt_info, ptr, 1);
5322 return 0;
5323}
4583f589 5324#endif /* TARGET_I386 && TARGET_ABI32 */
8d18e893 5325
d2fd1af7 5326#ifndef TARGET_ABI32
2667e71c 5327abi_long do_arch_prctl(CPUX86State *env, int code, abi_ulong addr)
d2fd1af7 5328{
1add8698 5329 abi_long ret = 0;
d2fd1af7
FB		 5330 abi_ulong val;
5331 int idx;
1add8698 5332
d2fd1af7
FB		 5333 switch(code) {
5334 case TARGET_ARCH_SET_GS:
5335 case TARGET_ARCH_SET_FS:
5336 if (code == TARGET_ARCH_SET_GS)
5337 idx = R_GS;
5338 else
5339 idx = R_FS;
5340 cpu_x86_load_seg(env, idx, 0);
5341 env->segs[idx].base = addr;
5342 break;
5343 case TARGET_ARCH_GET_GS:
5344 case TARGET_ARCH_GET_FS:
5345 if (code == TARGET_ARCH_GET_GS)
5346 idx = R_GS;
5347 else
5348 idx = R_FS;
5349 val = env->segs[idx].base;
5350 if (put_user(val, addr, abi_ulong))
1add8698 5351 ret = -TARGET_EFAULT;
d2fd1af7
FB		 5352 break;
5353 default:
5354 ret = -TARGET_EINVAL;
5355 break;
5356 }
1add8698 5357 return ret;
d2fd1af7
FB		 5358}
5359#endif
5360
2ab83ea7
FB		 5361#endif /* defined(TARGET_I386) */
5362
05098a93 5363#define NEW_STACK_SIZE 0x40000
d865bab5 5364
d865bab5
PB		 5365
5366static pthread_mutex_t clone_lock = PTHREAD_MUTEX_INITIALIZER;
5367typedef struct {
9349b4f9 5368 CPUArchState *env;
d865bab5
PB		 5369 pthread_mutex_t mutex;
5370 pthread_cond_t cond;
5371 pthread_t thread;
5372 uint32_t tid;
5373 abi_ulong child_tidptr;
5374 abi_ulong parent_tidptr;
5375 sigset_t sigmask;
5376} new_thread_info;
5377
5378static void *clone_func(void *arg)
5379{
5380 new_thread_info *info = arg;
9349b4f9 5381 CPUArchState *env;
0d34282f 5382 CPUState *cpu;
edf8e2af 5383 TaskState *ts;
d865bab5 5384
70903763 5385 rcu_register_thread();
d865bab5 5386 env = info->env;
0d34282f 5387 cpu = ENV_GET_CPU(env);
a2247f8e 5388 thread_cpu = cpu;
0429a971 5389 ts = (TaskState *)cpu->opaque;
d865bab5 5390 info->tid = gettid();
0d34282f 5391 cpu->host_tid = info->tid;
edf8e2af 5392 task_settid(ts);
d865bab5
PB		 5393 if (info->child_tidptr)
5394 put_user_u32(info->tid, info->child_tidptr);
5395 if (info->parent_tidptr)
5396 put_user_u32(info->tid, info->parent_tidptr);
5397 /* Enable signals. */
5398 sigprocmask(SIG_SETMASK, &info->sigmask, NULL);
5399 /* Signal to the parent that we're ready. */
5400 pthread_mutex_lock(&info->mutex);
5401 pthread_cond_broadcast(&info->cond);
5402 pthread_mutex_unlock(&info->mutex);
5403 /* Wait until the parent has finshed initializing the tls state. */
5404 pthread_mutex_lock(&clone_lock);
5405 pthread_mutex_unlock(&clone_lock);
5406 cpu_loop(env);
5407 /* never exits */
5408 return NULL;
5409}
1b6b029e 5410
0da46a6e
TS		 5411/* do_fork() Must return host values and target errnos (unlike most
5412 do_*() functions). */
9349b4f9 5413static int do_fork(CPUArchState *env, unsigned int flags, abi_ulong newsp,
d865bab5
PB		 5414 abi_ulong parent_tidptr, target_ulong newtls,
5415 abi_ulong child_tidptr)
1b6b029e 5416{
0429a971 5417 CPUState *cpu = ENV_GET_CPU(env);
1b6b029e 5418 int ret;
5cd4393b 5419 TaskState *ts;
0429a971 5420 CPUState *new_cpu;
9349b4f9 5421 CPUArchState *new_env;
d865bab5
PB		 5422 unsigned int nptl_flags;
5423 sigset_t sigmask;
3b46e624 5424
436d124b
AZ		 5425 /* Emulate vfork() with fork() */
5426 if (flags & CLONE_VFORK)
5427 flags &= ~(CLONE_VFORK | CLONE_VM);
5428
1b6b029e 5429 if (flags & CLONE_VM) {
0429a971 5430 TaskState *parent_ts = (TaskState *)cpu->opaque;
d865bab5
PB		 5431 new_thread_info info;
5432 pthread_attr_t attr;
24cb36a6 5433
c78d65e8 5434 ts = g_new0(TaskState, 1);
624f7979 5435 init_task_state(ts);
1b6b029e 5436 /* we create a new CPU instance. */
c5be9f08 5437 new_env = cpu_copy(env);
6e68e076
PB		 5438 /* Init regs that differ from the parent. */
5439 cpu_clone_regs(new_env, newsp);
0429a971
AF		 5440 new_cpu = ENV_GET_CPU(new_env);
5441 new_cpu->opaque = ts;
edf8e2af
MW		 5442 ts->bprm = parent_ts->bprm;
5443 ts->info = parent_ts->info;
3d3efba0 5444 ts->signal_mask = parent_ts->signal_mask;
d865bab5
PB		 5445 nptl_flags = flags;
5446 flags &= ~CLONE_NPTL_FLAGS2;
5447
c2764719
PB		 5448 if (nptl_flags & CLONE_CHILD_CLEARTID) {
5449 ts->child_tidptr = child_tidptr;
5450 }
5451
d865bab5
PB		 5452 if (nptl_flags & CLONE_SETTLS)
5453 cpu_set_tls (new_env, newtls);
5454
5455 /* Grab a mutex so that thread setup appears atomic. */
5456 pthread_mutex_lock(&clone_lock);
5457
5458 memset(&info, 0, sizeof(info));
5459 pthread_mutex_init(&info.mutex, NULL);
5460 pthread_mutex_lock(&info.mutex);
5461 pthread_cond_init(&info.cond, NULL);
5462 info.env = new_env;
5463 if (nptl_flags & CLONE_CHILD_SETTID)
5464 info.child_tidptr = child_tidptr;
5465 if (nptl_flags & CLONE_PARENT_SETTID)
5466 info.parent_tidptr = parent_tidptr;
5467
5468 ret = pthread_attr_init(&attr);
48e15fc2
NF		 5469 ret = pthread_attr_setstacksize(&attr, NEW_STACK_SIZE);
5470 ret = pthread_attr_setdetachstate(&attr, PTHREAD_CREATE_DETACHED);
d865bab5
PB		 5471 /* It is not safe to deliver signals until the child has finished
5472 initializing, so temporarily block all signals. */
5473 sigfillset(&sigmask);
5474 sigprocmask(SIG_BLOCK, &sigmask, &info.sigmask);
5475
5476 ret = pthread_create(&info.thread, &attr, clone_func, &info);
c2764719 5477 /* TODO: Free new CPU state if thread creation failed. */
d865bab5
PB		 5478
5479 sigprocmask(SIG_SETMASK, &info.sigmask, NULL);
5480 pthread_attr_destroy(&attr);
5481 if (ret == 0) {
5482 /* Wait for the child to initialize. */
5483 pthread_cond_wait(&info.cond, &info.mutex);
5484 ret = info.tid;
5485 if (flags & CLONE_PARENT_SETTID)
5486 put_user_u32(ret, parent_tidptr);
5487 } else {
5488 ret = -1;
5489 }
5490 pthread_mutex_unlock(&info.mutex);
5491 pthread_cond_destroy(&info.cond);
5492 pthread_mutex_destroy(&info.mutex);
5493 pthread_mutex_unlock(&clone_lock);
1b6b029e
FB		 5494 } else {
5495 /* if no CLONE_VM, we consider it is a fork */
93b4eff8
TB		 5496 if ((flags & ~(CSIGNAL | CLONE_NPTL_FLAGS2)) != 0) {
5497 return -TARGET_EINVAL;
5498 }
7d92d34e
TB		 5499
5500 if (block_signals()) {
5501 return -TARGET_ERESTARTSYS;
5502 }
5503
d865bab5 5504 fork_start();
1b6b029e 5505 ret = fork();
d865bab5 5506 if (ret == 0) {
2b1319c8 5507 /* Child Process. */
a59629fc 5508 rcu_after_fork();
d865bab5
PB		 5509 cpu_clone_regs(env, newsp);
5510 fork_end(1);
2b1319c8
AJ		 5511 /* There is a race condition here. The parent process could
5512 theoretically read the TID in the child process before the child
5513 tid is set. This would require using either ptrace
5514 (not implemented) or having *_tidptr to point at a shared memory
5515 mapping. We can't repeat the spinlock hack used above because
5516 the child process gets its own copy of the lock. */
d865bab5
PB		 5517 if (flags & CLONE_CHILD_SETTID)
5518 put_user_u32(gettid(), child_tidptr);
5519 if (flags & CLONE_PARENT_SETTID)
5520 put_user_u32(gettid(), parent_tidptr);
0429a971 5521 ts = (TaskState *)cpu->opaque;
d865bab5
PB		 5522 if (flags & CLONE_SETTLS)
5523 cpu_set_tls (env, newtls);
c2764719
PB		 5524 if (flags & CLONE_CHILD_CLEARTID)
5525 ts->child_tidptr = child_tidptr;
d865bab5
PB		 5526 } else {
5527 fork_end(0);
5528 }
1b6b029e
FB		 5529 }
5530 return ret;
5531}
5532
5f106811
APR		 5533/* warning : doesn't handle linux specific flags... */
5534static int target_to_host_fcntl_cmd(int cmd)
5535{
5536 switch(cmd) {
5537 case TARGET_F_DUPFD:
5538 case TARGET_F_GETFD:
5539 case TARGET_F_SETFD:
5540 case TARGET_F_GETFL:
5541 case TARGET_F_SETFL:
5542 return cmd;
5543 case TARGET_F_GETLK:
5544 return F_GETLK;
5545 case TARGET_F_SETLK:
5546 return F_SETLK;
5547 case TARGET_F_SETLKW:
5548 return F_SETLKW;
5549 case TARGET_F_GETOWN:
5550 return F_GETOWN;
5551 case TARGET_F_SETOWN:
5552 return F_SETOWN;
5553 case TARGET_F_GETSIG:
5554 return F_GETSIG;
5555 case TARGET_F_SETSIG:
5556 return F_SETSIG;
5557#if TARGET_ABI_BITS == 32
5558 case TARGET_F_GETLK64:
5559 return F_GETLK64;
5560 case TARGET_F_SETLK64:
5561 return F_SETLK64;
5562 case TARGET_F_SETLKW64:
5563 return F_SETLKW64;
5564#endif
7e22e546
UH		 5565 case TARGET_F_SETLEASE:
5566 return F_SETLEASE;
5567 case TARGET_F_GETLEASE:
5568 return F_GETLEASE;
fbd5de9b 5569#ifdef F_DUPFD_CLOEXEC
7e22e546
UH		 5570 case TARGET_F_DUPFD_CLOEXEC:
5571 return F_DUPFD_CLOEXEC;
fbd5de9b 5572#endif
7e22e546
UH		 5573 case TARGET_F_NOTIFY:
5574 return F_NOTIFY;
8d5d3004
AS		 5575#ifdef F_GETOWN_EX
5576 case TARGET_F_GETOWN_EX:
5577 return F_GETOWN_EX;
5578#endif
5579#ifdef F_SETOWN_EX
5580 case TARGET_F_SETOWN_EX:
5581 return F_SETOWN_EX;
5582#endif
5f106811
APR		 5583 default:
5584 return -TARGET_EINVAL;
5585 }
5586 return -TARGET_EINVAL;
5587}
5588
2ba7f730
LV		 5589#define TRANSTBL_CONVERT(a) { -1, TARGET_##a, -1, a }
5590static const bitmask_transtbl flock_tbl[] = {
5591 TRANSTBL_CONVERT(F_RDLCK),
5592 TRANSTBL_CONVERT(F_WRLCK),
5593 TRANSTBL_CONVERT(F_UNLCK),
5594 TRANSTBL_CONVERT(F_EXLCK),
5595 TRANSTBL_CONVERT(F_SHLCK),
5596 { 0, 0, 0, 0 }
5597};
5598
992f48a0 5599static abi_long do_fcntl(int fd, int cmd, abi_ulong arg)
7775e9ec
FB		 5600{
5601 struct flock fl;
53a5960a 5602 struct target_flock *target_fl;
43f238d7
TS		 5603 struct flock64 fl64;
5604 struct target_flock64 *target_fl64;
8d5d3004
AS		 5605#ifdef F_GETOWN_EX
5606 struct f_owner_ex fox;
5607 struct target_f_owner_ex *target_fox;
5608#endif
992f48a0 5609 abi_long ret;
5f106811
APR		 5610 int host_cmd = target_to_host_fcntl_cmd(cmd);
5611
5612 if (host_cmd == -TARGET_EINVAL)
5613 return host_cmd;
53a5960a 5614
7775e9ec
FB		 5615 switch(cmd) {
5616 case TARGET_F_GETLK:
579a97f7
FB		 5617 if (!lock_user_struct(VERIFY_READ, target_fl, arg, 1))
5618 return -TARGET_EFAULT;
2ba7f730
LV		 5619 fl.l_type =
5620 target_to_host_bitmask(tswap16(target_fl->l_type), flock_tbl);
5813427b 5621 fl.l_whence = tswap16(target_fl->l_whence);
cbb21eed
MB		 5622 fl.l_start = tswapal(target_fl->l_start);
5623 fl.l_len = tswapal(target_fl->l_len);
7e22e546 5624 fl.l_pid = tswap32(target_fl->l_pid);
5813427b 5625 unlock_user_struct(target_fl, arg, 0);
5f106811 5626 ret = get_errno(fcntl(fd, host_cmd, &fl));
7775e9ec 5627 if (ret == 0) {
579a97f7
FB		 5628 if (!lock_user_struct(VERIFY_WRITE, target_fl, arg, 0))
5629 return -TARGET_EFAULT;
2ba7f730
LV		 5630 target_fl->l_type =
5631 host_to_target_bitmask(tswap16(fl.l_type), flock_tbl);
7775e9ec 5632 target_fl->l_whence = tswap16(fl.l_whence);
cbb21eed
MB		 5633 target_fl->l_start = tswapal(fl.l_start);
5634 target_fl->l_len = tswapal(fl.l_len);
7e22e546 5635 target_fl->l_pid = tswap32(fl.l_pid);
53a5960a 5636 unlock_user_struct(target_fl, arg, 1);
7775e9ec
FB		 5637 }
5638 break;
3b46e624 5639
7775e9ec
FB		 5640 case TARGET_F_SETLK:
5641 case TARGET_F_SETLKW:
579a97f7
FB		 5642 if (!lock_user_struct(VERIFY_READ, target_fl, arg, 1))
5643 return -TARGET_EFAULT;
2ba7f730
LV		 5644 fl.l_type =
5645 target_to_host_bitmask(tswap16(target_fl->l_type), flock_tbl);
7775e9ec 5646 fl.l_whence = tswap16(target_fl->l_whence);
cbb21eed
MB		 5647 fl.l_start = tswapal(target_fl->l_start);
5648 fl.l_len = tswapal(target_fl->l_len);
7e22e546 5649 fl.l_pid = tswap32(target_fl->l_pid);
53a5960a 5650 unlock_user_struct(target_fl, arg, 0);
5f106811 5651 ret = get_errno(fcntl(fd, host_cmd, &fl));
7775e9ec 5652 break;
3b46e624 5653
7775e9ec 5654 case TARGET_F_GETLK64:
579a97f7
FB		 5655 if (!lock_user_struct(VERIFY_READ, target_fl64, arg, 1))
5656 return -TARGET_EFAULT;
2ba7f730
LV		 5657 fl64.l_type =
5658 target_to_host_bitmask(tswap16(target_fl64->l_type), flock_tbl) >> 1;
5813427b 5659 fl64.l_whence = tswap16(target_fl64->l_whence);
cbb21eed
MB		 5660 fl64.l_start = tswap64(target_fl64->l_start);
5661 fl64.l_len = tswap64(target_fl64->l_len);
7e22e546 5662 fl64.l_pid = tswap32(target_fl64->l_pid);
5813427b 5663 unlock_user_struct(target_fl64, arg, 0);
5f106811 5664 ret = get_errno(fcntl(fd, host_cmd, &fl64));
43f238d7 5665 if (ret == 0) {
579a97f7
FB		 5666 if (!lock_user_struct(VERIFY_WRITE, target_fl64, arg, 0))
5667 return -TARGET_EFAULT;
2ba7f730
LV		 5668 target_fl64->l_type =
5669 host_to_target_bitmask(tswap16(fl64.l_type), flock_tbl) >> 1;
43f238d7 5670 target_fl64->l_whence = tswap16(fl64.l_whence);
cbb21eed
MB		 5671 target_fl64->l_start = tswap64(fl64.l_start);
5672 target_fl64->l_len = tswap64(fl64.l_len);
7e22e546 5673 target_fl64->l_pid = tswap32(fl64.l_pid);
43f238d7
TS		 5674 unlock_user_struct(target_fl64, arg, 1);
5675 }
9ee1fa2c 5676 break;
7775e9ec
FB		 5677 case TARGET_F_SETLK64:
5678 case TARGET_F_SETLKW64:
579a97f7
FB		 5679 if (!lock_user_struct(VERIFY_READ, target_fl64, arg, 1))
5680 return -TARGET_EFAULT;
2ba7f730
LV		 5681 fl64.l_type =
5682 target_to_host_bitmask(tswap16(target_fl64->l_type), flock_tbl) >> 1;
43f238d7 5683 fl64.l_whence = tswap16(target_fl64->l_whence);
cbb21eed
MB		 5684 fl64.l_start = tswap64(target_fl64->l_start);
5685 fl64.l_len = tswap64(target_fl64->l_len);
7e22e546 5686 fl64.l_pid = tswap32(target_fl64->l_pid);
43f238d7 5687 unlock_user_struct(target_fl64, arg, 0);
5f106811 5688 ret = get_errno(fcntl(fd, host_cmd, &fl64));
7775e9ec
FB		 5689 break;
5690
5f106811
APR		 5691 case TARGET_F_GETFL:
5692 ret = get_errno(fcntl(fd, host_cmd, arg));
9ee1fa2c
FB		 5693 if (ret >= 0) {
5694 ret = host_to_target_bitmask(ret, fcntl_flags_tbl);
5695 }
ffa65c3b
FB		 5696 break;
5697
5f106811
APR		 5698 case TARGET_F_SETFL:
5699 ret = get_errno(fcntl(fd, host_cmd, target_to_host_bitmask(arg, fcntl_flags_tbl)));
5700 break;
5701
8d5d3004
AS		 5702#ifdef F_GETOWN_EX
5703 case TARGET_F_GETOWN_EX:
5704 ret = get_errno(fcntl(fd, host_cmd, &fox));
5705 if (ret >= 0) {
5706 if (!lock_user_struct(VERIFY_WRITE, target_fox, arg, 0))
5707 return -TARGET_EFAULT;
5708 target_fox->type = tswap32(fox.type);
5709 target_fox->pid = tswap32(fox.pid);
5710 unlock_user_struct(target_fox, arg, 1);
5711 }
5712 break;
5713#endif
5714
5715#ifdef F_SETOWN_EX
5716 case TARGET_F_SETOWN_EX:
5717 if (!lock_user_struct(VERIFY_READ, target_fox, arg, 1))
5718 return -TARGET_EFAULT;
5719 fox.type = tswap32(target_fox->type);
5720 fox.pid = tswap32(target_fox->pid);
5721 unlock_user_struct(target_fox, arg, 0);
5722 ret = get_errno(fcntl(fd, host_cmd, &fox));
5723 break;
5724#endif
5725
5f106811
APR		 5726 case TARGET_F_SETOWN:
5727 case TARGET_F_GETOWN:
5728 case TARGET_F_SETSIG:
5729 case TARGET_F_GETSIG:
7e22e546
UH		 5730 case TARGET_F_SETLEASE:
5731 case TARGET_F_GETLEASE:
5f106811 5732 ret = get_errno(fcntl(fd, host_cmd, arg));
ffa65c3b
FB		 5733 break;
5734
7775e9ec 5735 default:
9ee1fa2c 5736 ret = get_errno(fcntl(fd, cmd, arg));
7775e9ec
FB		 5737 break;
5738 }
5739 return ret;
5740}
5741
67867308 5742#ifdef USE_UID16
7775e9ec 5743
67867308
FB		 5744static inline int high2lowuid(int uid)
5745{
5746 if (uid > 65535)
5747 return 65534;
5748 else
5749 return uid;
5750}
5751
5752static inline int high2lowgid(int gid)
5753{
5754 if (gid > 65535)
5755 return 65534;
5756 else
5757 return gid;
5758}
5759
5760static inline int low2highuid(int uid)
5761{
5762 if ((int16_t)uid == -1)
5763 return -1;
5764 else
5765 return uid;
5766}
5767
5768static inline int low2highgid(int gid)
5769{
5770 if ((int16_t)gid == -1)
5771 return -1;
5772 else
5773 return gid;
5774}
0c866a7e
RV		 5775static inline int tswapid(int id)
5776{
5777 return tswap16(id);
5778}
76ca310a
PM		 5779
5780#define put_user_id(x, gaddr) put_user_u16(x, gaddr)
5781
0c866a7e
RV		 5782#else /* !USE_UID16 */
5783static inline int high2lowuid(int uid)
5784{
5785 return uid;
5786}
5787static inline int high2lowgid(int gid)
5788{
5789 return gid;
5790}
5791static inline int low2highuid(int uid)
5792{
5793 return uid;
5794}
5795static inline int low2highgid(int gid)
5796{
5797 return gid;
5798}
5799static inline int tswapid(int id)
5800{
5801 return tswap32(id);
5802}
76ca310a
PM		 5803
5804#define put_user_id(x, gaddr) put_user_u32(x, gaddr)
5805
67867308 5806#endif /* USE_UID16 */
1b6b029e 5807
fd6f7798
PM		 5808/* We must do direct syscalls for setting UID/GID, because we want to
5809 * implement the Linux system call semantics of "change only for this thread",
5810 * not the libc/POSIX semantics of "change for all threads in process".
5811 * (See http://ewontfix.com/17/ for more details.)
5812 * We use the 32-bit version of the syscalls if present; if it is not
5813 * then either the host architecture supports 32-bit UIDs natively with
5814 * the standard syscall, or the 16-bit UID is the best we can do.
5815 */
5816#ifdef __NR_setuid32
5817#define __NR_sys_setuid __NR_setuid32
5818#else
5819#define __NR_sys_setuid __NR_setuid
5820#endif
5821#ifdef __NR_setgid32
5822#define __NR_sys_setgid __NR_setgid32
5823#else
5824#define __NR_sys_setgid __NR_setgid
5825#endif
5826#ifdef __NR_setresuid32
5827#define __NR_sys_setresuid __NR_setresuid32
5828#else
5829#define __NR_sys_setresuid __NR_setresuid
5830#endif
5831#ifdef __NR_setresgid32
5832#define __NR_sys_setresgid __NR_setresgid32
5833#else
5834#define __NR_sys_setresgid __NR_setresgid
5835#endif
5836
5837_syscall1(int, sys_setuid, uid_t, uid)
5838_syscall1(int, sys_setgid, gid_t, gid)
5839_syscall3(int, sys_setresuid, uid_t, ruid, uid_t, euid, uid_t, suid)
5840_syscall3(int, sys_setresgid, gid_t, rgid, gid_t, egid, gid_t, sgid)
5841
31e31b8a
FB		 5842void syscall_init(void)
5843{
2ab83ea7
FB		 5844 IOCTLEntry *ie;
5845 const argtype *arg_type;
5846 int size;
b92c47c1 5847 int i;
2ab83ea7 5848
8be656b8
AG		 5849 thunk_init(STRUCT_MAX);
5850
001faf32 5851#define STRUCT(name, ...) thunk_register_struct(STRUCT_ ## name, #name, struct_ ## name ## _def);
5fafdf24 5852#define STRUCT_SPECIAL(name) thunk_register_struct_direct(STRUCT_ ## name, #name, &struct_ ## name ## _def);
31e31b8a
FB		 5853#include "syscall_types.h"
5854#undef STRUCT
5855#undef STRUCT_SPECIAL
2ab83ea7 5856
dd6e957a
PM		 5857 /* Build target_to_host_errno_table[] table from
5858 * host_to_target_errno_table[]. */
5859 for (i = 0; i < ERRNO_TABLE_SIZE; i++) {
5860 target_to_host_errno_table[host_to_target_errno_table[i]] = i;
5861 }
5862
2ab83ea7
FB		 5863 /* we patch the ioctl size if necessary. We rely on the fact that
5864 no ioctl has all the bits at '1' in the size field */
5865 ie = ioctl_entries;
5866 while (ie->target_cmd != 0) {
5867 if (((ie->target_cmd >> TARGET_IOC_SIZESHIFT) & TARGET_IOC_SIZEMASK) ==
5868 TARGET_IOC_SIZEMASK) {
5869 arg_type = ie->arg_type;
5870 if (arg_type[0] != TYPE_PTR) {
5fafdf24 5871 fprintf(stderr, "cannot patch size for ioctl 0x%x\n",
2ab83ea7
FB		 5872 ie->target_cmd);
5873 exit(1);
5874 }
5875 arg_type++;
5876 size = thunk_type_size(arg_type, 0);
5fafdf24 5877 ie->target_cmd = (ie->target_cmd &
2ab83ea7
FB		 5878 ~(TARGET_IOC_SIZEMASK << TARGET_IOC_SIZESHIFT)) |
5879 (size << TARGET_IOC_SIZESHIFT);
5880 }
b92c47c1 5881
2ab83ea7 5882 /* automatic consistency check if same arch */
872ea0c0
AZ		 5883#if (defined(__i386__) && defined(TARGET_I386) && defined(TARGET_ABI32)) || \
5884 (defined(__x86_64__) && defined(TARGET_X86_64))
5885 if (unlikely(ie->target_cmd != ie->host_cmd)) {
5886 fprintf(stderr, "ERROR: ioctl(%s): target=0x%x host=0x%x\n",
5887 ie->name, ie->target_cmd, ie->host_cmd);
2ab83ea7
FB		 5888 }
5889#endif
5890 ie++;
5891 }
31e31b8a 5892}
c573ff67 5893
992f48a0 5894#if TARGET_ABI_BITS == 32
ce4defa0
PB		 5895static inline uint64_t target_offset64(uint32_t word0, uint32_t word1)
5896{
af325d36 5897#ifdef TARGET_WORDS_BIGENDIAN
ce4defa0
PB		 5898 return ((uint64_t)word0 << 32) | word1;
5899#else
5900 return ((uint64_t)word1 << 32) | word0;
5901#endif
5902}
992f48a0 5903#else /* TARGET_ABI_BITS == 32 */
32407103
JM		 5904static inline uint64_t target_offset64(uint64_t word0, uint64_t word1)
5905{
5906 return word0;
5907}
992f48a0 5908#endif /* TARGET_ABI_BITS != 32 */
ce4defa0
PB		 5909
5910#ifdef TARGET_NR_truncate64
992f48a0
BS		 5911static inline abi_long target_truncate64(void *cpu_env, const char *arg1,
5912 abi_long arg2,
5913 abi_long arg3,
5914 abi_long arg4)
ce4defa0 5915{
48e515d4 5916 if (regpairs_aligned(cpu_env)) {
ce4defa0
PB		 5917 arg2 = arg3;
5918 arg3 = arg4;
48e515d4 5919 }
ce4defa0
PB		 5920 return get_errno(truncate64(arg1, target_offset64(arg2, arg3)));
5921}
5922#endif
5923
5924#ifdef TARGET_NR_ftruncate64
992f48a0
BS		 5925static inline abi_long target_ftruncate64(void *cpu_env, abi_long arg1,
5926 abi_long arg2,
5927 abi_long arg3,
5928 abi_long arg4)
ce4defa0 5929{
48e515d4 5930 if (regpairs_aligned(cpu_env)) {
ce4defa0
PB		 5931 arg2 = arg3;
5932 arg3 = arg4;
48e515d4 5933 }
ce4defa0
PB		 5934 return get_errno(ftruncate64(arg1, target_offset64(arg2, arg3)));
5935}
5936#endif
5937
579a97f7
FB		 5938static inline abi_long target_to_host_timespec(struct timespec *host_ts,
5939 abi_ulong target_addr)
53a5960a
PB		 5940{
5941 struct target_timespec *target_ts;
5942
579a97f7
FB		 5943 if (!lock_user_struct(VERIFY_READ, target_ts, target_addr, 1))
5944 return -TARGET_EFAULT;
c7e35da3
PM		 5945 __get_user(host_ts->tv_sec, &target_ts->tv_sec);
5946 __get_user(host_ts->tv_nsec, &target_ts->tv_nsec);
53a5960a 5947 unlock_user_struct(target_ts, target_addr, 0);
b255bfa8 5948 return 0;
53a5960a
PB		 5949}
5950
579a97f7
FB		 5951static inline abi_long host_to_target_timespec(abi_ulong target_addr,
5952 struct timespec *host_ts)
53a5960a
PB		 5953{
5954 struct target_timespec *target_ts;
5955
579a97f7
FB		 5956 if (!lock_user_struct(VERIFY_WRITE, target_ts, target_addr, 0))
5957 return -TARGET_EFAULT;
c7e35da3
PM		 5958 __put_user(host_ts->tv_sec, &target_ts->tv_sec);
5959 __put_user(host_ts->tv_nsec, &target_ts->tv_nsec);
53a5960a 5960 unlock_user_struct(target_ts, target_addr, 1);
b255bfa8 5961 return 0;
53a5960a
PB		 5962}
5963
f4f1e10a
ECL		 5964static inline abi_long target_to_host_itimerspec(struct itimerspec *host_itspec,
5965 abi_ulong target_addr)
5966{
5967 struct target_itimerspec *target_itspec;
5968
5969 if (!lock_user_struct(VERIFY_READ, target_itspec, target_addr, 1)) {
5970 return -TARGET_EFAULT;
5971 }
5972
5973 host_itspec->it_interval.tv_sec =
5974 tswapal(target_itspec->it_interval.tv_sec);
5975 host_itspec->it_interval.tv_nsec =
5976 tswapal(target_itspec->it_interval.tv_nsec);
5977 host_itspec->it_value.tv_sec = tswapal(target_itspec->it_value.tv_sec);
5978 host_itspec->it_value.tv_nsec = tswapal(target_itspec->it_value.tv_nsec);
5979
5980 unlock_user_struct(target_itspec, target_addr, 1);
5981 return 0;
5982}
5983
5984static inline abi_long host_to_target_itimerspec(abi_ulong target_addr,
5985 struct itimerspec *host_its)
5986{
5987 struct target_itimerspec *target_itspec;
5988
5989 if (!lock_user_struct(VERIFY_WRITE, target_itspec, target_addr, 0)) {
5990 return -TARGET_EFAULT;
5991 }
5992
5993 target_itspec->it_interval.tv_sec = tswapal(host_its->it_interval.tv_sec);
5994 target_itspec->it_interval.tv_nsec = tswapal(host_its->it_interval.tv_nsec);
5995
5996 target_itspec->it_value.tv_sec = tswapal(host_its->it_value.tv_sec);
5997 target_itspec->it_value.tv_nsec = tswapal(host_its->it_value.tv_nsec);
5998
5999 unlock_user_struct(target_itspec, target_addr, 0);
6000 return 0;
6001}
6002
c065976f
PM		 6003static inline abi_long target_to_host_sigevent(struct sigevent *host_sevp,
6004 abi_ulong target_addr)
6005{
6006 struct target_sigevent *target_sevp;
6007
6008 if (!lock_user_struct(VERIFY_READ, target_sevp, target_addr, 1)) {
6009 return -TARGET_EFAULT;
6010 }
6011
6012 /* This union is awkward on 64 bit systems because it has a 32 bit
6013 * integer and a pointer in it; we follow the conversion approach
6014 * used for handling sigval types in signal.c so the guest should get
6015 * the correct value back even if we did a 64 bit byteswap and it's
6016 * using the 32 bit integer.
6017 */
6018 host_sevp->sigev_value.sival_ptr =
6019 (void *)(uintptr_t)tswapal(target_sevp->sigev_value.sival_ptr);
6020 host_sevp->sigev_signo =
6021 target_to_host_signal(tswap32(target_sevp->sigev_signo));
6022 host_sevp->sigev_notify = tswap32(target_sevp->sigev_notify);
6023 host_sevp->_sigev_un._tid = tswap32(target_sevp->_sigev_un._tid);
6024
6025 unlock_user_struct(target_sevp, target_addr, 1);
6026 return 0;
6027}
6028
6f6a4032
TM		 6029#if defined(TARGET_NR_mlockall)
6030static inline int target_to_host_mlockall_arg(int arg)
6031{
6032 int result = 0;
6033
6034 if (arg & TARGET_MLOCKALL_MCL_CURRENT) {
6035 result |= MCL_CURRENT;
6036 }
6037 if (arg & TARGET_MLOCKALL_MCL_FUTURE) {
6038 result |= MCL_FUTURE;
6039 }
6040 return result;
6041}
6042#endif
6043
6a24a778
AZ		 6044static inline abi_long host_to_target_stat64(void *cpu_env,
6045 abi_ulong target_addr,
6046 struct stat *host_st)
6047{
09701199 6048#if defined(TARGET_ARM) && defined(TARGET_ABI32)
6a24a778
AZ		 6049 if (((CPUARMState *)cpu_env)->eabi) {
6050 struct target_eabi_stat64 *target_st;
6051
6052 if (!lock_user_struct(VERIFY_WRITE, target_st, target_addr, 0))
6053 return -TARGET_EFAULT;
6054 memset(target_st, 0, sizeof(struct target_eabi_stat64));
6055 __put_user(host_st->st_dev, &target_st->st_dev);
6056 __put_user(host_st->st_ino, &target_st->st_ino);
6057#ifdef TARGET_STAT64_HAS_BROKEN_ST_INO
6058 __put_user(host_st->st_ino, &target_st->__st_ino);
6059#endif
6060 __put_user(host_st->st_mode, &target_st->st_mode);
6061 __put_user(host_st->st_nlink, &target_st->st_nlink);
6062 __put_user(host_st->st_uid, &target_st->st_uid);
6063 __put_user(host_st->st_gid, &target_st->st_gid);
6064 __put_user(host_st->st_rdev, &target_st->st_rdev);
6065 __put_user(host_st->st_size, &target_st->st_size);
6066 __put_user(host_st->st_blksize, &target_st->st_blksize);
6067 __put_user(host_st->st_blocks, &target_st->st_blocks);
6068 __put_user(host_st->st_atime, &target_st->target_st_atime);
6069 __put_user(host_st->st_mtime, &target_st->target_st_mtime);
6070 __put_user(host_st->st_ctime, &target_st->target_st_ctime);
6071 unlock_user_struct(target_st, target_addr, 1);
6072 } else
6073#endif
6074 {
20d155bc 6075#if defined(TARGET_HAS_STRUCT_STAT64)
6a24a778 6076 struct target_stat64 *target_st;
20d155bc
SW		 6077#else
6078 struct target_stat *target_st;
9d33b76b 6079#endif
6a24a778
AZ		 6080
6081 if (!lock_user_struct(VERIFY_WRITE, target_st, target_addr, 0))
6082 return -TARGET_EFAULT;
9d33b76b 6083 memset(target_st, 0, sizeof(*target_st));
6a24a778
AZ		 6084 __put_user(host_st->st_dev, &target_st->st_dev);
6085 __put_user(host_st->st_ino, &target_st->st_ino);
6086#ifdef TARGET_STAT64_HAS_BROKEN_ST_INO
6087 __put_user(host_st->st_ino, &target_st->__st_ino);
6088#endif
6089 __put_user(host_st->st_mode, &target_st->st_mode);
6090 __put_user(host_st->st_nlink, &target_st->st_nlink);
6091 __put_user(host_st->st_uid, &target_st->st_uid);
6092 __put_user(host_st->st_gid, &target_st->st_gid);
6093 __put_user(host_st->st_rdev, &target_st->st_rdev);
6094 /* XXX: better use of kernel struct */
6095 __put_user(host_st->st_size, &target_st->st_size);
6096 __put_user(host_st->st_blksize, &target_st->st_blksize);
6097 __put_user(host_st->st_blocks, &target_st->st_blocks);
6098 __put_user(host_st->st_atime, &target_st->target_st_atime);
6099 __put_user(host_st->st_mtime, &target_st->target_st_mtime);
6100 __put_user(host_st->st_ctime, &target_st->target_st_ctime);
6101 unlock_user_struct(target_st, target_addr, 1);
6102 }
6103
6104 return 0;
6105}
6a24a778 6106
bd0c5661
PB		 6107/* ??? Using host futex calls even when target atomic operations
6108 are not really atomic probably breaks things. However implementing
6109 futexes locally would make futexes shared between multiple processes
6110 tricky. However they're probably useless because guest atomic
6111 operations won't work either. */
8fcd3692
BS		 6112static int do_futex(target_ulong uaddr, int op, int val, target_ulong timeout,
6113 target_ulong uaddr2, int val3)
bd0c5661
PB		 6114{
6115 struct timespec ts, *pts;
a16aae0c 6116 int base_op;
bd0c5661
PB		 6117
6118 /* ??? We assume FUTEX_* constants are the same on both host
6119 and target. */
a29ccd63 6120#ifdef FUTEX_CMD_MASK
a16aae0c 6121 base_op = op & FUTEX_CMD_MASK;
a29ccd63 6122#else
a16aae0c 6123 base_op = op;
a29ccd63 6124#endif
a16aae0c 6125 switch (base_op) {
bd0c5661 6126 case FUTEX_WAIT:
cce246e0 6127 case FUTEX_WAIT_BITSET:
bd0c5661
PB		 6128 if (timeout) {
6129 pts = &ts;
6130 target_to_host_timespec(pts, timeout);
6131 } else {
6132 pts = NULL;
6133 }
d509eeb1 6134 return get_errno(safe_futex(g2h(uaddr), op, tswap32(val),
cce246e0 6135 pts, NULL, val3));
bd0c5661 6136 case FUTEX_WAKE:
d509eeb1 6137 return get_errno(safe_futex(g2h(uaddr), op, val, NULL, NULL, 0));
bd0c5661 6138 case FUTEX_FD:
d509eeb1 6139 return get_errno(safe_futex(g2h(uaddr), op, val, NULL, NULL, 0));
bd0c5661 6140 case FUTEX_REQUEUE:
bd0c5661 6141 case FUTEX_CMP_REQUEUE:
a16aae0c
NF		 6142 case FUTEX_WAKE_OP:
6143 /* For FUTEX_REQUEUE, FUTEX_CMP_REQUEUE, and FUTEX_WAKE_OP, the
6144 TIMEOUT parameter is interpreted as a uint32_t by the kernel.
6145 But the prototype takes a `struct timespec *'; insert casts
6146 to satisfy the compiler. We do not need to tswap TIMEOUT
6147 since it's not compared to guest memory. */
6148 pts = (struct timespec *)(uintptr_t) timeout;
d509eeb1
PM		 6149 return get_errno(safe_futex(g2h(uaddr), op, val, pts,
6150 g2h(uaddr2),
6151 (base_op == FUTEX_CMP_REQUEUE
6152 ? tswap32(val3)
6153 : val3)));
bd0c5661
PB		 6154 default:
6155 return -TARGET_ENOSYS;
6156 }
6157}
0f0426f3
LV		 6158#if defined(TARGET_NR_name_to_handle_at) && defined(CONFIG_OPEN_BY_HANDLE)
6159static abi_long do_name_to_handle_at(abi_long dirfd, abi_long pathname,
6160 abi_long handle, abi_long mount_id,
6161 abi_long flags)
6162{
6163 struct file_handle *target_fh;
6164 struct file_handle *fh;
6165 int mid = 0;
6166 abi_long ret;
6167 char *name;
6168 unsigned int size, total_size;
6169
6170 if (get_user_s32(size, handle)) {
6171 return -TARGET_EFAULT;
6172 }
6173
6174 name = lock_user_string(pathname);
6175 if (!name) {
6176 return -TARGET_EFAULT;
6177 }
6178
6179 total_size = sizeof(struct file_handle) + size;
6180 target_fh = lock_user(VERIFY_WRITE, handle, total_size, 0);
6181 if (!target_fh) {
6182 unlock_user(name, pathname, 0);
6183 return -TARGET_EFAULT;
6184 }
6185
6186 fh = g_malloc0(total_size);
6187 fh->handle_bytes = size;
6188
6189 ret = get_errno(name_to_handle_at(dirfd, path(name), fh, &mid, flags));
6190 unlock_user(name, pathname, 0);
6191
6192 /* man name_to_handle_at(2):
6193 * Other than the use of the handle_bytes field, the caller should treat
6194 * the file_handle structure as an opaque data type
6195 */
6196
6197 memcpy(target_fh, fh, total_size);
6198 target_fh->handle_bytes = tswap32(fh->handle_bytes);
6199 target_fh->handle_type = tswap32(fh->handle_type);
6200 g_free(fh);
6201 unlock_user(target_fh, handle, total_size);
6202
6203 if (put_user_s32(mid, mount_id)) {
6204 return -TARGET_EFAULT;
6205 }
6206
6207 return ret;
6208
6209}
6210#endif
6211
6212#if defined(TARGET_NR_open_by_handle_at) && defined(CONFIG_OPEN_BY_HANDLE)
6213static abi_long do_open_by_handle_at(abi_long mount_fd, abi_long handle,
6214 abi_long flags)
6215{
6216 struct file_handle *target_fh;
6217 struct file_handle *fh;
6218 unsigned int size, total_size;
6219 abi_long ret;
6220
6221 if (get_user_s32(size, handle)) {
6222 return -TARGET_EFAULT;
6223 }
6224
6225 total_size = sizeof(struct file_handle) + size;
6226 target_fh = lock_user(VERIFY_READ, handle, total_size, 1);
6227 if (!target_fh) {
6228 return -TARGET_EFAULT;
6229 }
6230
e9d49d51 6231 fh = g_memdup(target_fh, total_size);
0f0426f3
LV		 6232 fh->handle_bytes = size;
6233 fh->handle_type = tswap32(target_fh->handle_type);
6234
6235 ret = get_errno(open_by_handle_at(mount_fd, fh,
6236 target_to_host_bitmask(flags, fcntl_flags_tbl)));
6237
6238 g_free(fh);
6239
6240 unlock_user(target_fh, handle, total_size);
6241
6242 return ret;
6243}
6244#endif
bd0c5661 6245
e36800c9
LV		 6246#if defined(TARGET_NR_signalfd) || defined(TARGET_NR_signalfd4)
6247
6248/* signalfd siginfo conversion */
6249
6250static void
6251host_to_target_signalfd_siginfo(struct signalfd_siginfo *tinfo,
6252 const struct signalfd_siginfo *info)
6253{
6254 int sig = host_to_target_signal(info->ssi_signo);
6255
6256 /* linux/signalfd.h defines a ssi_addr_lsb
6257 * not defined in sys/signalfd.h but used by some kernels
6258 */
6259
6260#ifdef BUS_MCEERR_AO
6261 if (tinfo->ssi_signo == SIGBUS &&
6262 (tinfo->ssi_code == BUS_MCEERR_AR ||
6263 tinfo->ssi_code == BUS_MCEERR_AO)) {
6264 uint16_t *ssi_addr_lsb = (uint16_t *)(&info->ssi_addr + 1);
6265 uint16_t *tssi_addr_lsb = (uint16_t *)(&tinfo->ssi_addr + 1);
6266 *tssi_addr_lsb = tswap16(*ssi_addr_lsb);
6267 }
6268#endif
6269
6270 tinfo->ssi_signo = tswap32(sig);
6271 tinfo->ssi_errno = tswap32(tinfo->ssi_errno);
6272 tinfo->ssi_code = tswap32(info->ssi_code);
6273 tinfo->ssi_pid = tswap32(info->ssi_pid);
6274 tinfo->ssi_uid = tswap32(info->ssi_uid);
6275 tinfo->ssi_fd = tswap32(info->ssi_fd);
6276 tinfo->ssi_tid = tswap32(info->ssi_tid);
6277 tinfo->ssi_band = tswap32(info->ssi_band);
6278 tinfo->ssi_overrun = tswap32(info->ssi_overrun);
6279 tinfo->ssi_trapno = tswap32(info->ssi_trapno);
6280 tinfo->ssi_status = tswap32(info->ssi_status);
6281 tinfo->ssi_int = tswap32(info->ssi_int);
6282 tinfo->ssi_ptr = tswap64(info->ssi_ptr);
6283 tinfo->ssi_utime = tswap64(info->ssi_utime);
6284 tinfo->ssi_stime = tswap64(info->ssi_stime);
6285 tinfo->ssi_addr = tswap64(info->ssi_addr);
6286}
6287
5d4d3665 6288static abi_long host_to_target_data_signalfd(void *buf, size_t len)
e36800c9
LV		 6289{
6290 int i;
6291
6292 for (i = 0; i < len; i += sizeof(struct signalfd_siginfo)) {
6293 host_to_target_signalfd_siginfo(buf + i, buf + i);
6294 }
6295
6296 return len;
6297}
6298
6299static TargetFdTrans target_signalfd_trans = {
5d4d3665 6300 .host_to_target_data = host_to_target_data_signalfd,
e36800c9
LV		 6301};
6302
6303static abi_long do_signalfd4(int fd, abi_long mask, int flags)
6304{
6305 int host_flags;
6306 target_sigset_t *target_mask;
6307 sigset_t host_mask;
6308 abi_long ret;
6309
6310 if (flags & ~(TARGET_O_NONBLOCK | TARGET_O_CLOEXEC)) {
6311 return -TARGET_EINVAL;
6312 }
6313 if (!lock_user_struct(VERIFY_READ, target_mask, mask, 1)) {
6314 return -TARGET_EFAULT;
6315 }
6316
6317 target_to_host_sigset(&host_mask, target_mask);
6318
6319 host_flags = target_to_host_bitmask(flags, fcntl_flags_tbl);
6320
6321 ret = get_errno(signalfd(fd, &host_mask, host_flags));
6322 if (ret >= 0) {
6323 fd_trans_register(ret, &target_signalfd_trans);
6324 }
6325
6326 unlock_user_struct(target_mask, mask, 0);
6327
6328 return ret;
6329}
6330#endif
6331
1d9d8b55
PB		 6332/* Map host to target signal numbers for the wait family of syscalls.
6333 Assume all other status bits are the same. */
a05c6409 6334int host_to_target_waitstatus(int status)
1d9d8b55
PB		 6335{
6336 if (WIFSIGNALED(status)) {
6337 return host_to_target_signal(WTERMSIG(status)) | (status & ~0x7f);
6338 }
6339 if (WIFSTOPPED(status)) {
6340 return (host_to_target_signal(WSTOPSIG(status)) << 8)
6341 | (status & 0xff);
6342 }
6343 return status;
6344}
6345
76b94245
WVS		 6346static int open_self_cmdline(void *cpu_env, int fd)
6347{
6348 int fd_orig = -1;
6349 bool word_skipped = false;
6350
6351 fd_orig = open("/proc/self/cmdline", O_RDONLY);
6352 if (fd_orig < 0) {
6353 return fd_orig;
6354 }
6355
6356 while (true) {
6357 ssize_t nb_read;
6358 char buf[128];
6359 char *cp_buf = buf;
6360
6361 nb_read = read(fd_orig, buf, sizeof(buf));
6362 if (nb_read < 0) {
a3ca7bb2 6363 int e = errno;
76b94245 6364 fd_orig = close(fd_orig);
a3ca7bb2 6365 errno = e;
76b94245
WVS		 6366 return -1;
6367 } else if (nb_read == 0) {
6368 break;
6369 }
6370
6371 if (!word_skipped) {
6372 /* Skip the first string, which is the path to qemu-*-static
6373 instead of the actual command. */
6374 cp_buf = memchr(buf, 0, sizeof(buf));
6375 if (cp_buf) {
6376 /* Null byte found, skip one string */
6377 cp_buf++;
6378 nb_read -= cp_buf - buf;
6379 word_skipped = true;
6380 }
6381 }
6382
6383 if (word_skipped) {
6384 if (write(fd, cp_buf, nb_read) != nb_read) {
a3ca7bb2 6385 int e = errno;
680dfde9 6386 close(fd_orig);
a3ca7bb2 6387 errno = e;
76b94245
WVS		 6388 return -1;
6389 }
6390 }
6391 }
6392
6393 return close(fd_orig);
6394}
6395
36c08d49
AG		 6396static int open_self_maps(void *cpu_env, int fd)
6397{
0429a971
AF		 6398 CPUState *cpu = ENV_GET_CPU((CPUArchState *)cpu_env);
6399 TaskState *ts = cpu->opaque;
1a49ef2a
AG		 6400 FILE *fp;
6401 char *line = NULL;
6402 size_t len = 0;
6403 ssize_t read;
6404
6405 fp = fopen("/proc/self/maps", "r");
6406 if (fp == NULL) {
a3ca7bb2 6407 return -1;
1a49ef2a 6408 }
36c08d49 6409
1a49ef2a
AG		 6410 while ((read = getline(&line, &len, fp)) != -1) {
6411 int fields, dev_maj, dev_min, inode;
6412 uint64_t min, max, offset;
6413 char flag_r, flag_w, flag_x, flag_p;
6414 char path[512] = "";
6415 fields = sscanf(line, "%"PRIx64"-%"PRIx64" %c%c%c%c %"PRIx64" %x:%x %d"
6416 " %512s", &min, &max, &flag_r, &flag_w, &flag_x,
6417 &flag_p, &offset, &dev_maj, &dev_min, &inode, path);
6418
6419 if ((fields < 10) || (fields > 11)) {
6420 continue;
6421 }
d67f4aaa
MI		 6422 if (h2g_valid(min)) {
6423 int flags = page_get_flags(h2g(min));
6424 max = h2g_valid(max - 1) ? max : (uintptr_t)g2h(GUEST_ADDR_MAX);
6425 if (page_check_range(h2g(min), max - min, flags) == -1) {
6426 continue;
6427 }
6428 if (h2g(min) == ts->info->stack_limit) {
6429 pstrcpy(path, sizeof(path), " [stack]");
6430 }
1a49ef2a 6431 dprintf(fd, TARGET_ABI_FMT_lx "-" TARGET_ABI_FMT_lx
e24fed4e 6432 " %c%c%c%c %08" PRIx64 " %02x:%02x %d %s%s\n",
d67f4aaa 6433 h2g(min), h2g(max - 1) + 1, flag_r, flag_w,
1a49ef2a 6434 flag_x, flag_p, offset, dev_maj, dev_min, inode,
e24fed4e 6435 path[0] ? " " : "", path);
1a49ef2a
AG		 6436 }
6437 }
6438
6439 free(line);
6440 fclose(fp);
6441
36c08d49
AG		 6442 return 0;
6443}
6444
480b8e7d
AG		 6445static int open_self_stat(void *cpu_env, int fd)
6446{
0429a971
AF		 6447 CPUState *cpu = ENV_GET_CPU((CPUArchState *)cpu_env);
6448 TaskState *ts = cpu->opaque;
480b8e7d
AG		 6449 abi_ulong start_stack = ts->info->start_stack;
6450 int i;
6451
6452 for (i = 0; i < 44; i++) {
6453 char buf[128];
6454 int len;
6455 uint64_t val = 0;
6456
e0e65bee
FE		 6457 if (i == 0) {
6458 /* pid */
6459 val = getpid();
6460 snprintf(buf, sizeof(buf), "%"PRId64 " ", val);
6461 } else if (i == 1) {
6462 /* app name */
6463 snprintf(buf, sizeof(buf), "(%s) ", ts->bprm->argv[0]);
6464 } else if (i == 27) {
6465 /* stack bottom */
6466 val = start_stack;
6467 snprintf(buf, sizeof(buf), "%"PRId64 " ", val);
6468 } else {
6469 /* for the rest, there is MasterCard */
6470 snprintf(buf, sizeof(buf), "0%c", i == 43 ? '\n' : ' ');
480b8e7d 6471 }
e0e65bee 6472
480b8e7d
AG		 6473 len = strlen(buf);
6474 if (write(fd, buf, len) != len) {
6475 return -1;
6476 }
6477 }
6478
6479 return 0;
6480}
6481
257450ee
AG		 6482static int open_self_auxv(void *cpu_env, int fd)
6483{
0429a971
AF		 6484 CPUState *cpu = ENV_GET_CPU((CPUArchState *)cpu_env);
6485 TaskState *ts = cpu->opaque;
257450ee
AG		 6486 abi_ulong auxv = ts->info->saved_auxv;
6487 abi_ulong len = ts->info->auxv_len;
6488 char *ptr;
6489
6490 /*
6491 * Auxiliary vector is stored in target process stack.
6492 * read in whole auxv vector and copy it to file
6493 */
6494 ptr = lock_user(VERIFY_READ, auxv, len, 0);
6495 if (ptr != NULL) {
6496 while (len > 0) {
6497 ssize_t r;
6498 r = write(fd, ptr, len);
6499 if (r <= 0) {
6500 break;
6501 }
6502 len -= r;
6503 ptr += r;
6504 }
6505 lseek(fd, 0, SEEK_SET);
6506 unlock_user(ptr, auxv, len);
6507 }
6508
6509 return 0;
6510}
6511
463d8e73
AS		 6512static int is_proc_myself(const char *filename, const char *entry)
6513{
6514 if (!strncmp(filename, "/proc/", strlen("/proc/"))) {
6515 filename += strlen("/proc/");
6516 if (!strncmp(filename, "self/", strlen("self/"))) {
6517 filename += strlen("self/");
6518 } else if (*filename >= '1' && *filename <= '9') {
6519 char myself[80];
6520 snprintf(myself, sizeof(myself), "%d/", getpid());
6521 if (!strncmp(filename, myself, strlen(myself))) {
6522 filename += strlen(myself);
6523 } else {
6524 return 0;
6525 }
6526 } else {
6527 return 0;
6528 }
6529 if (!strcmp(filename, entry)) {
6530 return 1;
6531 }
6532 }
6533 return 0;
6534}
6535
de6b9933
LV		 6536#if defined(HOST_WORDS_BIGENDIAN) != defined(TARGET_WORDS_BIGENDIAN)
6537static int is_proc(const char *filename, const char *entry)
6538{
6539 return strcmp(filename, entry) == 0;
6540}
6541
6542static int open_net_route(void *cpu_env, int fd)
6543{
6544 FILE *fp;
6545 char *line = NULL;
6546 size_t len = 0;
6547 ssize_t read;
6548
6549 fp = fopen("/proc/net/route", "r");
6550 if (fp == NULL) {
a3ca7bb2 6551 return -1;
de6b9933
LV		 6552 }
6553
6554 /* read header */
6555
6556 read = getline(&line, &len, fp);
6557 dprintf(fd, "%s", line);
6558
6559 /* read routes */
6560
6561 while ((read = getline(&line, &len, fp)) != -1) {
6562 char iface[16];
6563 uint32_t dest, gw, mask;
6564 unsigned int flags, refcnt, use, metric, mtu, window, irtt;
6565 sscanf(line, "%s\t%08x\t%08x\t%04x\t%d\t%d\t%d\t%08x\t%d\t%u\t%u\n",
6566 iface, &dest, &gw, &flags, &refcnt, &use, &metric,
6567 &mask, &mtu, &window, &irtt);
6568 dprintf(fd, "%s\t%08x\t%08x\t%04x\t%d\t%d\t%d\t%08x\t%d\t%u\t%u\n",
6569 iface, tswap32(dest), tswap32(gw), flags, refcnt, use,
6570 metric, tswap32(mask), mtu, window, irtt);
6571 }
6572
6573 free(line);
6574 fclose(fp);
6575
6576 return 0;
6577}
6578#endif
6579
0b2effd7 6580static int do_openat(void *cpu_env, int dirfd, const char *pathname, int flags, mode_t mode)
3be14d05
AG		 6581{
6582 struct fake_open {
6583 const char *filename;
6584 int (*fill)(void *cpu_env, int fd);
de6b9933 6585 int (*cmp)(const char *s1, const char *s2);
3be14d05
AG		 6586 };
6587 const struct fake_open *fake_open;
6588 static const struct fake_open fakes[] = {
de6b9933
LV		 6589 { "maps", open_self_maps, is_proc_myself },
6590 { "stat", open_self_stat, is_proc_myself },
6591 { "auxv", open_self_auxv, is_proc_myself },
76b94245 6592 { "cmdline", open_self_cmdline, is_proc_myself },
de6b9933
LV		 6593#if defined(HOST_WORDS_BIGENDIAN) != defined(TARGET_WORDS_BIGENDIAN)
6594 { "/proc/net/route", open_net_route, is_proc },
6595#endif
6596 { NULL, NULL, NULL }
3be14d05
AG		 6597 };
6598
aa07f5ec
MO		 6599 if (is_proc_myself(pathname, "exe")) {
6600 int execfd = qemu_getauxval(AT_EXECFD);
c10a0738 6601 return execfd ? execfd : safe_openat(dirfd, exec_path, flags, mode);
aa07f5ec
MO		 6602 }
6603
3be14d05 6604 for (fake_open = fakes; fake_open->filename; fake_open++) {
de6b9933 6605 if (fake_open->cmp(pathname, fake_open->filename)) {
3be14d05
AG		 6606 break;
6607 }
6608 }
6609
6610 if (fake_open->filename) {
6611 const char *tmpdir;
6612 char filename[PATH_MAX];
6613 int fd, r;
6614
6615 /* create temporary file to map stat to */
6616 tmpdir = getenv("TMPDIR");
6617 if (!tmpdir)
6618 tmpdir = "/tmp";
6619 snprintf(filename, sizeof(filename), "%s/qemu-open.XXXXXX", tmpdir);
6620 fd = mkstemp(filename);
6621 if (fd < 0) {
6622 return fd;
6623 }
6624 unlink(filename);
6625
6626 if ((r = fake_open->fill(cpu_env, fd))) {
a3ca7bb2 6627 int e = errno;
3be14d05 6628 close(fd);
a3ca7bb2 6629 errno = e;
3be14d05
AG		 6630 return r;
6631 }
6632 lseek(fd, 0, SEEK_SET);
6633
6634 return fd;
6635 }
6636
c10a0738 6637 return safe_openat(dirfd, path(pathname), flags, mode);
3be14d05
AG		 6638}
6639
aecc8861
AG		 6640#define TIMER_MAGIC 0x0caf0000
6641#define TIMER_MAGIC_MASK 0xffff0000
6642
6643/* Convert QEMU provided timer ID back to internal 16bit index format */
6644static target_timer_t get_timer_id(abi_long arg)
6645{
6646 target_timer_t timerid = arg;
6647
6648 if ((timerid & TIMER_MAGIC_MASK) != TIMER_MAGIC) {
6649 return -TARGET_EINVAL;
6650 }
6651
6652 timerid &= 0xffff;
6653
6654 if (timerid >= ARRAY_SIZE(g_posix_timers)) {
6655 return -TARGET_EINVAL;
6656 }
6657
6658 return timerid;
6659}
6660
0da46a6e
TS		 6661/* do_syscall() should always have a single exit point at the end so
6662 that actions, such as logging of syscall results, can be performed.
6663 All errnos that do_syscall() returns must be -TARGET_<errcode>. */
992f48a0
BS		 6664abi_long do_syscall(void *cpu_env, int num, abi_long arg1,
6665 abi_long arg2, abi_long arg3, abi_long arg4,
5945cfcb
PM		 6666 abi_long arg5, abi_long arg6, abi_long arg7,
6667 abi_long arg8)
31e31b8a 6668{
182735ef 6669 CPUState *cpu = ENV_GET_CPU(cpu_env);
992f48a0 6670 abi_long ret;
31e31b8a 6671 struct stat st;
56c8f68f 6672 struct statfs stfs;
53a5960a 6673 void *p;
3b46e624 6674
71a8f7fe
TB		 6675#if defined(DEBUG_ERESTARTSYS)
6676 /* Debug-only code for exercising the syscall-restart code paths
6677 * in the per-architecture cpu main loops: restart every syscall
6678 * the guest makes once before letting it through.
6679 */
6680 {
6681 static int flag;
6682
6683 flag = !flag;
6684 if (flag) {
6685 return -TARGET_ERESTARTSYS;
6686 }
6687 }
6688#endif
6689
72f03900 6690#ifdef DEBUG
c573ff67 6691 gemu_log("syscall %d", num);
72f03900 6692#endif
b92c47c1
TS		 6693 if(do_strace)
6694 print_syscall(num, arg1, arg2, arg3, arg4, arg5, arg6);
6695
31e31b8a
FB		 6696 switch(num) {
6697 case TARGET_NR_exit:
9b056fcc
AF		 6698 /* In old applications this may be used to implement _exit(2).
6699 However in threaded applictions it is used for thread termination,
6700 and _exit_group is used for application termination.
6701 Do thread termination if we have more then one thread. */
a0995886
TB		 6702
6703 if (block_signals()) {
6704 ret = -TARGET_ERESTARTSYS;
6705 break;
6706 }
6707
bdc44640 6708 if (CPU_NEXT(first_cpu)) {
9b056fcc 6709 TaskState *ts;
9b056fcc
AF		 6710
6711 cpu_list_lock();
9b056fcc 6712 /* Remove the CPU from the list. */
bdc44640 6713 QTAILQ_REMOVE(&cpus, cpu, node);
9b056fcc 6714 cpu_list_unlock();
0429a971 6715 ts = cpu->opaque;
9b056fcc
AF		 6716 if (ts->child_tidptr) {
6717 put_user_u32(0, ts->child_tidptr);
6718 sys_futex(g2h(ts->child_tidptr), FUTEX_WAKE, INT_MAX,
6719 NULL, NULL, 0);
6720 }
a2247f8e 6721 thread_cpu = NULL;
0429a971 6722 object_unref(OBJECT(cpu));
9b056fcc 6723 g_free(ts);
70903763 6724 rcu_unregister_thread();
9b056fcc
AF		 6725 pthread_exit(NULL);
6726 }
9788c9ca 6727#ifdef TARGET_GPROF
7d13299d
FB		 6728 _mcleanup();
6729#endif
e9009676 6730 gdb_exit(cpu_env, arg1);
c2764719 6731 _exit(arg1);
31e31b8a
FB		 6732 ret = 0; /* avoid warning */
6733 break;
6734 case TARGET_NR_read:
38d840e6
AJ		 6735 if (arg3 == 0)
6736 ret = 0;
6737 else {
6738 if (!(p = lock_user(VERIFY_WRITE, arg2, arg3, 0)))
6739 goto efault;
50afd02b 6740 ret = get_errno(safe_read(arg1, p, arg3));
e36800c9 6741 if (ret >= 0 &&
5d4d3665
LV		 6742 fd_trans_host_to_target_data(arg1)) {
6743 ret = fd_trans_host_to_target_data(arg1)(p, ret);
e36800c9 6744 }
38d840e6
AJ		 6745 unlock_user(p, arg2, ret);
6746 }
31e31b8a
FB		 6747 break;
6748 case TARGET_NR_write:
579a97f7
FB		 6749 if (!(p = lock_user(VERIFY_READ, arg2, arg3, 1)))
6750 goto efault;
50afd02b 6751 ret = get_errno(safe_write(arg1, p, arg3));
53a5960a 6752 unlock_user(p, arg2, 0);
31e31b8a 6753 break;
704eff6c 6754#ifdef TARGET_NR_open
31e31b8a 6755 case TARGET_NR_open:
2f619698
FB		 6756 if (!(p = lock_user_string(arg1)))
6757 goto efault;
0b2effd7
RV		 6758 ret = get_errno(do_openat(cpu_env, AT_FDCWD, p,
6759 target_to_host_bitmask(arg2, fcntl_flags_tbl),
6760 arg3));
e36800c9 6761 fd_trans_unregister(ret);
53a5960a 6762 unlock_user(p, arg1, 0);
31e31b8a 6763 break;
704eff6c 6764#endif
82424832 6765 case TARGET_NR_openat:
579a97f7
FB		 6766 if (!(p = lock_user_string(arg2)))
6767 goto efault;
0b2effd7
RV		 6768 ret = get_errno(do_openat(cpu_env, arg1, p,
6769 target_to_host_bitmask(arg3, fcntl_flags_tbl),
6770 arg4));
e36800c9 6771 fd_trans_unregister(ret);
579a97f7 6772 unlock_user(p, arg2, 0);
82424832 6773 break;
0f0426f3
LV		 6774#if defined(TARGET_NR_name_to_handle_at) && defined(CONFIG_OPEN_BY_HANDLE)
6775 case TARGET_NR_name_to_handle_at:
6776 ret = do_name_to_handle_at(arg1, arg2, arg3, arg4, arg5);
6777 break;
6778#endif
6779#if defined(TARGET_NR_open_by_handle_at) && defined(CONFIG_OPEN_BY_HANDLE)
6780 case TARGET_NR_open_by_handle_at:
6781 ret = do_open_by_handle_at(arg1, arg2, arg3);
e36800c9 6782 fd_trans_unregister(ret);
0f0426f3
LV		 6783 break;
6784#endif
31e31b8a 6785 case TARGET_NR_close:
e36800c9 6786 fd_trans_unregister(arg1);
31e31b8a
FB		 6787 ret = get_errno(close(arg1));
6788 break;
6789 case TARGET_NR_brk:
53a5960a 6790 ret = do_brk(arg1);
31e31b8a 6791 break;
704eff6c 6792#ifdef TARGET_NR_fork
31e31b8a 6793 case TARGET_NR_fork:
d865bab5 6794 ret = get_errno(do_fork(cpu_env, SIGCHLD, 0, 0, 0, 0));
31e31b8a 6795 break;
704eff6c 6796#endif
e5febef5 6797#ifdef TARGET_NR_waitpid
31e31b8a
FB		 6798 case TARGET_NR_waitpid:
6799 {
53a5960a 6800 int status;
4af80a37 6801 ret = get_errno(safe_wait4(arg1, &status, arg3, 0));
5379557b 6802 if (!is_error(ret) && arg2 && ret
1d9d8b55 6803 && put_user_s32(host_to_target_waitstatus(status), arg2))
2f619698 6804 goto efault;
31e31b8a
FB		 6805 }
6806 break;
e5febef5 6807#endif
f0cbb613
PB		 6808#ifdef TARGET_NR_waitid
6809 case TARGET_NR_waitid:
6810 {
6811 siginfo_t info;
6812 info.si_pid = 0;
4af80a37 6813 ret = get_errno(safe_waitid(arg1, arg2, &info, arg4, NULL));
f0cbb613 6814 if (!is_error(ret) && arg3 && info.si_pid != 0) {
c227f099 6815 if (!(p = lock_user(VERIFY_WRITE, arg3, sizeof(target_siginfo_t), 0)))
f0cbb613
PB		 6816 goto efault;
6817 host_to_target_siginfo(p, &info);
c227f099 6818 unlock_user(p, arg3, sizeof(target_siginfo_t));
f0cbb613
PB		 6819 }
6820 }
6821 break;
6822#endif
7a3148a9 6823#ifdef TARGET_NR_creat /* not on alpha */
31e31b8a 6824 case TARGET_NR_creat:
579a97f7
FB		 6825 if (!(p = lock_user_string(arg1)))
6826 goto efault;
53a5960a 6827 ret = get_errno(creat(p, arg2));
e36800c9 6828 fd_trans_unregister(ret);
53a5960a 6829 unlock_user(p, arg1, 0);
31e31b8a 6830 break;
7a3148a9 6831#endif
704eff6c 6832#ifdef TARGET_NR_link
31e31b8a 6833 case TARGET_NR_link:
53a5960a
PB		 6834 {
6835 void * p2;
6836 p = lock_user_string(arg1);
6837 p2 = lock_user_string(arg2);
579a97f7
FB		 6838 if (!p || !p2)
6839 ret = -TARGET_EFAULT;
6840 else
6841 ret = get_errno(link(p, p2));
53a5960a
PB		 6842 unlock_user(p2, arg2, 0);
6843 unlock_user(p, arg1, 0);
6844 }
31e31b8a 6845 break;
704eff6c 6846#endif
c0d472b1 6847#if defined(TARGET_NR_linkat)
64f0ce4c 6848 case TARGET_NR_linkat:
64f0ce4c
TS		 6849 {
6850 void * p2 = NULL;
579a97f7
FB		 6851 if (!arg2 || !arg4)
6852 goto efault;
64f0ce4c
TS		 6853 p = lock_user_string(arg2);
6854 p2 = lock_user_string(arg4);
579a97f7 6855 if (!p || !p2)
0da46a6e 6856 ret = -TARGET_EFAULT;
64f0ce4c 6857 else
c0d472b1 6858 ret = get_errno(linkat(arg1, p, arg3, p2, arg5));
579a97f7
FB		 6859 unlock_user(p, arg2, 0);
6860 unlock_user(p2, arg4, 0);
64f0ce4c
TS		 6861 }
6862 break;
6863#endif
704eff6c 6864#ifdef TARGET_NR_unlink
31e31b8a 6865 case TARGET_NR_unlink:
579a97f7
FB		 6866 if (!(p = lock_user_string(arg1)))
6867 goto efault;
53a5960a
PB		 6868 ret = get_errno(unlink(p));
6869 unlock_user(p, arg1, 0);
31e31b8a 6870 break;
704eff6c 6871#endif
c0d472b1 6872#if defined(TARGET_NR_unlinkat)
8170f56b 6873 case TARGET_NR_unlinkat:
579a97f7
FB		 6874 if (!(p = lock_user_string(arg2)))
6875 goto efault;
c0d472b1 6876 ret = get_errno(unlinkat(arg1, p, arg3));
579a97f7 6877 unlock_user(p, arg2, 0);
ed494d87 6878 break;
b7d35e65 6879#endif
31e31b8a 6880 case TARGET_NR_execve:
7854b056
FB		 6881 {
6882 char **argp, **envp;
f7341ff4 6883 int argc, envc;
992f48a0
BS		 6884 abi_ulong gp;
6885 abi_ulong guest_argp;
6886 abi_ulong guest_envp;
6887 abi_ulong addr;
7854b056 6888 char **q;
a6f79cc9 6889 int total_size = 0;
7854b056 6890
f7341ff4 6891 argc = 0;
53a5960a 6892 guest_argp = arg2;
da94d263 6893 for (gp = guest_argp; gp; gp += sizeof(abi_ulong)) {
03aa1976 6894 if (get_user_ual(addr, gp))
2f619698 6895 goto efault;
03aa1976 6896 if (!addr)
2f619698 6897 break;
7854b056 6898 argc++;
2f619698 6899 }
f7341ff4 6900 envc = 0;
53a5960a 6901 guest_envp = arg3;
da94d263 6902 for (gp = guest_envp; gp; gp += sizeof(abi_ulong)) {
03aa1976 6903 if (get_user_ual(addr, gp))
2f619698 6904 goto efault;
03aa1976 6905 if (!addr)
2f619698 6906 break;
7854b056 6907 envc++;
2f619698 6908 }
7854b056 6909
f7341ff4
FB		 6910 argp = alloca((argc + 1) * sizeof(void *));
6911 envp = alloca((envc + 1) * sizeof(void *));
7854b056 6912
da94d263 6913 for (gp = guest_argp, q = argp; gp;
992f48a0 6914 gp += sizeof(abi_ulong), q++) {
2f619698
FB		 6915 if (get_user_ual(addr, gp))
6916 goto execve_efault;
53a5960a
PB		 6917 if (!addr)
6918 break;
2f619698
FB		 6919 if (!(*q = lock_user_string(addr)))
6920 goto execve_efault;
a6f79cc9 6921 total_size += strlen(*q) + 1;
53a5960a 6922 }
f7341ff4
FB		 6923 *q = NULL;
6924
da94d263 6925 for (gp = guest_envp, q = envp; gp;
992f48a0 6926 gp += sizeof(abi_ulong), q++) {
2f619698
FB		 6927 if (get_user_ual(addr, gp))
6928 goto execve_efault;
53a5960a
PB		 6929 if (!addr)
6930 break;
2f619698
FB		 6931 if (!(*q = lock_user_string(addr)))
6932 goto execve_efault;
a6f79cc9 6933 total_size += strlen(*q) + 1;
53a5960a 6934 }
f7341ff4 6935 *q = NULL;
7854b056 6936
2f619698
FB		 6937 if (!(p = lock_user_string(arg1)))
6938 goto execve_efault;
ffdcbe22
TB		 6939 /* Although execve() is not an interruptible syscall it is
6940 * a special case where we must use the safe_syscall wrapper:
6941 * if we allow a signal to happen before we make the host
6942 * syscall then we will 'lose' it, because at the point of
6943 * execve the process leaves QEMU's control. So we use the
6944 * safe syscall wrapper to ensure that we either take the
6945 * signal as a guest signal, or else it does not happen
6946 * before the execve completes and makes it the other
6947 * program's problem.
6948 */
6949 ret = get_errno(safe_execve(p, argp, envp));
53a5960a
PB		 6950 unlock_user(p, arg1, 0);
6951
2f619698
FB		 6952 goto execve_end;
6953
6954 execve_efault:
6955 ret = -TARGET_EFAULT;
6956
6957 execve_end:
53a5960a 6958 for (gp = guest_argp, q = argp; *q;
992f48a0 6959 gp += sizeof(abi_ulong), q++) {
2f619698
FB		 6960 if (get_user_ual(addr, gp)
6961 || !addr)
6962 break;
53a5960a
PB		 6963 unlock_user(*q, addr, 0);
6964 }
6965 for (gp = guest_envp, q = envp; *q;
992f48a0 6966 gp += sizeof(abi_ulong), q++) {
2f619698
FB		 6967 if (get_user_ual(addr, gp)
6968 || !addr)
6969 break;
53a5960a
PB		 6970 unlock_user(*q, addr, 0);
6971 }
7854b056 6972 }
31e31b8a
FB		 6973 break;
6974 case TARGET_NR_chdir:
579a97f7
FB		 6975 if (!(p = lock_user_string(arg1)))
6976 goto efault;
53a5960a
PB		 6977 ret = get_errno(chdir(p));
6978 unlock_user(p, arg1, 0);
31e31b8a 6979 break;
a315a145 6980#ifdef TARGET_NR_time
31e31b8a
FB		 6981 case TARGET_NR_time:
6982 {
53a5960a
PB		 6983 time_t host_time;
6984 ret = get_errno(time(&host_time));
2f619698
FB		 6985 if (!is_error(ret)
6986 && arg1
6987 && put_user_sal(host_time, arg1))
6988 goto efault;
31e31b8a
FB		 6989 }
6990 break;
a315a145 6991#endif
704eff6c 6992#ifdef TARGET_NR_mknod
31e31b8a 6993 case TARGET_NR_mknod:
579a97f7
FB		 6994 if (!(p = lock_user_string(arg1)))
6995 goto efault;
53a5960a
PB		 6996 ret = get_errno(mknod(p, arg2, arg3));
6997 unlock_user(p, arg1, 0);
31e31b8a 6998 break;
704eff6c 6999#endif
c0d472b1 7000#if defined(TARGET_NR_mknodat)
75ac37a0 7001 case TARGET_NR_mknodat:
579a97f7
FB		 7002 if (!(p = lock_user_string(arg2)))
7003 goto efault;
c0d472b1 7004 ret = get_errno(mknodat(arg1, p, arg3, arg4));
579a97f7 7005 unlock_user(p, arg2, 0);
75ac37a0
TS		 7006 break;
7007#endif
704eff6c 7008#ifdef TARGET_NR_chmod
31e31b8a 7009 case TARGET_NR_chmod:
579a97f7
FB		 7010 if (!(p = lock_user_string(arg1)))
7011 goto efault;
53a5960a
PB		 7012 ret = get_errno(chmod(p, arg2));
7013 unlock_user(p, arg1, 0);
31e31b8a 7014 break;
704eff6c 7015#endif
ebc05488 7016#ifdef TARGET_NR_break
31e31b8a
FB		 7017 case TARGET_NR_break:
7018 goto unimplemented;
ebc05488
FB		 7019#endif
7020#ifdef TARGET_NR_oldstat
31e31b8a
FB		 7021 case TARGET_NR_oldstat:
7022 goto unimplemented;
ebc05488 7023#endif
31e31b8a
FB		 7024 case TARGET_NR_lseek:
7025 ret = get_errno(lseek(arg1, arg2, arg3));
7026 break;
9231733a
RH		 7027#if defined(TARGET_NR_getxpid) && defined(TARGET_ALPHA)
7028 /* Alpha specific */
7a3148a9 7029 case TARGET_NR_getxpid:
9231733a
RH		 7030 ((CPUAlphaState *)cpu_env)->ir[IR_A4] = getppid();
7031 ret = get_errno(getpid());
7032 break;
7a3148a9 7033#endif
9231733a
RH		 7034#ifdef TARGET_NR_getpid
7035 case TARGET_NR_getpid:
31e31b8a
FB		 7036 ret = get_errno(getpid());
7037 break;
9231733a 7038#endif
31e31b8a 7039 case TARGET_NR_mount:
356d771b
PB		 7040 {
7041 /* need to look at the data field */
7042 void *p2, *p3;
7043
7044 if (arg1) {
7045 p = lock_user_string(arg1);
7046 if (!p) {
7047 goto efault;
7048 }
7049 } else {
7050 p = NULL;
7051 }
7052
7053 p2 = lock_user_string(arg2);
7054 if (!p2) {
7055 if (arg1) {
7056 unlock_user(p, arg1, 0);
7057 }
7058 goto efault;
7059 }
7060
7061 if (arg3) {
7062 p3 = lock_user_string(arg3);
7063 if (!p3) {
7064 if (arg1) {
579a97f7 7065 unlock_user(p, arg1, 0);
356d771b
PB		 7066 }
7067 unlock_user(p2, arg2, 0);
7068 goto efault;
7069 }
7070 } else {
7071 p3 = NULL;
7072 }
7073
7074 /* FIXME - arg5 should be locked, but it isn't clear how to
7075 * do that since it's not guaranteed to be a NULL-terminated
7076 * string.
7077 */
7078 if (!arg5) {
7079 ret = mount(p, p2, p3, (unsigned long)arg4, NULL);
7080 } else {
7081 ret = mount(p, p2, p3, (unsigned long)arg4, g2h(arg5));
7082 }
7083 ret = get_errno(ret);
7084
7085 if (arg1) {
7086 unlock_user(p, arg1, 0);
7087 }
7088 unlock_user(p2, arg2, 0);
7089 if (arg3) {
7090 unlock_user(p3, arg3, 0);
7091 }
7092 }
7093 break;
e5febef5 7094#ifdef TARGET_NR_umount
31e31b8a 7095 case TARGET_NR_umount:
579a97f7
FB		 7096 if (!(p = lock_user_string(arg1)))
7097 goto efault;
53a5960a
PB		 7098 ret = get_errno(umount(p));
7099 unlock_user(p, arg1, 0);
31e31b8a 7100 break;
e5febef5 7101#endif
7a3148a9 7102#ifdef TARGET_NR_stime /* not on alpha */
31e31b8a
FB		 7103 case TARGET_NR_stime:
7104 {
53a5960a 7105 time_t host_time;
2f619698
FB		 7106 if (get_user_sal(host_time, arg1))
7107 goto efault;
53a5960a 7108 ret = get_errno(stime(&host_time));
31e31b8a
FB		 7109 }
7110 break;
7a3148a9 7111#endif
31e31b8a
FB		 7112 case TARGET_NR_ptrace:
7113 goto unimplemented;
7a3148a9 7114#ifdef TARGET_NR_alarm /* not on alpha */
31e31b8a
FB		 7115 case TARGET_NR_alarm:
7116 ret = alarm(arg1);
7117 break;
7a3148a9 7118#endif
ebc05488 7119#ifdef TARGET_NR_oldfstat
31e31b8a
FB		 7120 case TARGET_NR_oldfstat:
7121 goto unimplemented;
ebc05488 7122#endif
7a3148a9 7123#ifdef TARGET_NR_pause /* not on alpha */
31e31b8a 7124 case TARGET_NR_pause:
f59ec606
TB		 7125 if (!block_signals()) {
7126 sigsuspend(&((TaskState *)cpu->opaque)->signal_mask);
7127 }
7128 ret = -TARGET_EINTR;
31e31b8a 7129 break;
7a3148a9 7130#endif
e5febef5 7131#ifdef TARGET_NR_utime
31e31b8a 7132 case TARGET_NR_utime:
ebc05488 7133 {
53a5960a
PB		 7134 struct utimbuf tbuf, *host_tbuf;
7135 struct target_utimbuf *target_tbuf;
7136 if (arg2) {
579a97f7
FB		 7137 if (!lock_user_struct(VERIFY_READ, target_tbuf, arg2, 1))
7138 goto efault;
cbb21eed
MB		 7139 tbuf.actime = tswapal(target_tbuf->actime);
7140 tbuf.modtime = tswapal(target_tbuf->modtime);
53a5960a
PB		 7141 unlock_user_struct(target_tbuf, arg2, 0);
7142 host_tbuf = &tbuf;
f72e8ff4 7143 } else {
53a5960a 7144 host_tbuf = NULL;
f72e8ff4 7145 }
579a97f7
FB		 7146 if (!(p = lock_user_string(arg1)))
7147 goto efault;
53a5960a
PB		 7148 ret = get_errno(utime(p, host_tbuf));
7149 unlock_user(p, arg1, 0);
ebc05488
FB		 7150 }
7151 break;
e5febef5 7152#endif
704eff6c 7153#ifdef TARGET_NR_utimes
978a66ff
FB		 7154 case TARGET_NR_utimes:
7155 {
978a66ff 7156 struct timeval *tvp, tv[2];
53a5960a 7157 if (arg2) {
788f5ec4
TS		 7158 if (copy_from_user_timeval(&tv[0], arg2)
7159 || copy_from_user_timeval(&tv[1],
7160 arg2 + sizeof(struct target_timeval)))
7161 goto efault;
978a66ff
FB		 7162 tvp = tv;
7163 } else {
7164 tvp = NULL;
7165 }
579a97f7
FB		 7166 if (!(p = lock_user_string(arg1)))
7167 goto efault;
53a5960a
PB		 7168 ret = get_errno(utimes(p, tvp));
7169 unlock_user(p, arg1, 0);
978a66ff
FB		 7170 }
7171 break;
704eff6c 7172#endif
c0d472b1 7173#if defined(TARGET_NR_futimesat)
ac8a6556
AZ		 7174 case TARGET_NR_futimesat:
7175 {
7176 struct timeval *tvp, tv[2];
7177 if (arg3) {
7178 if (copy_from_user_timeval(&tv[0], arg3)
7179 || copy_from_user_timeval(&tv[1],
7180 arg3 + sizeof(struct target_timeval)))
7181 goto efault;
7182 tvp = tv;
7183 } else {
7184 tvp = NULL;
7185 }
7186 if (!(p = lock_user_string(arg2)))
7187 goto efault;
c0d472b1 7188 ret = get_errno(futimesat(arg1, path(p), tvp));
ac8a6556
AZ		 7189 unlock_user(p, arg2, 0);
7190 }
7191 break;
7192#endif
ebc05488 7193#ifdef TARGET_NR_stty
31e31b8a
FB		 7194 case TARGET_NR_stty:
7195 goto unimplemented;
ebc05488
FB		 7196#endif
7197#ifdef TARGET_NR_gtty
31e31b8a
FB		 7198 case TARGET_NR_gtty:
7199 goto unimplemented;
ebc05488 7200#endif
704eff6c 7201#ifdef TARGET_NR_access
31e31b8a 7202 case TARGET_NR_access:
579a97f7
FB		 7203 if (!(p = lock_user_string(arg1)))
7204 goto efault;
719f908e 7205 ret = get_errno(access(path(p), arg2));
53a5960a 7206 unlock_user(p, arg1, 0);
31e31b8a 7207 break;
704eff6c 7208#endif
92a34c10
TS		 7209#if defined(TARGET_NR_faccessat) && defined(__NR_faccessat)
7210 case TARGET_NR_faccessat:
579a97f7
FB		 7211 if (!(p = lock_user_string(arg2)))
7212 goto efault;
c0d472b1 7213 ret = get_errno(faccessat(arg1, p, arg3, 0));
579a97f7 7214 unlock_user(p, arg2, 0);
92a34c10
TS		 7215 break;
7216#endif
7a3148a9 7217#ifdef TARGET_NR_nice /* not on alpha */
31e31b8a
FB		 7218 case TARGET_NR_nice:
7219 ret = get_errno(nice(arg1));
7220 break;
7a3148a9 7221#endif
ebc05488 7222#ifdef TARGET_NR_ftime
31e31b8a
FB		 7223 case TARGET_NR_ftime:
7224 goto unimplemented;
ebc05488 7225#endif
31e31b8a 7226 case TARGET_NR_sync:
04369ff2
FB		 7227 sync();
7228 ret = 0;
31e31b8a
FB		 7229 break;
7230 case TARGET_NR_kill:
bef653d9 7231 ret = get_errno(safe_kill(arg1, target_to_host_signal(arg2)));
31e31b8a 7232 break;
704eff6c 7233#ifdef TARGET_NR_rename
31e31b8a 7234 case TARGET_NR_rename:
53a5960a
PB		 7235 {
7236 void *p2;
7237 p = lock_user_string(arg1);
7238 p2 = lock_user_string(arg2);
579a97f7
FB		 7239 if (!p || !p2)
7240 ret = -TARGET_EFAULT;
7241 else
7242 ret = get_errno(rename(p, p2));
53a5960a
PB		 7243 unlock_user(p2, arg2, 0);
7244 unlock_user(p, arg1, 0);
7245 }
31e31b8a 7246 break;
704eff6c 7247#endif
c0d472b1 7248#if defined(TARGET_NR_renameat)
722183f6 7249 case TARGET_NR_renameat:
722183f6 7250 {
579a97f7 7251 void *p2;
722183f6
TS		 7252 p = lock_user_string(arg2);
7253 p2 = lock_user_string(arg4);
579a97f7 7254 if (!p || !p2)
0da46a6e 7255 ret = -TARGET_EFAULT;
722183f6 7256 else
c0d472b1 7257 ret = get_errno(renameat(arg1, p, arg3, p2));
579a97f7
FB		 7258 unlock_user(p2, arg4, 0);
7259 unlock_user(p, arg2, 0);
722183f6
TS		 7260 }
7261 break;
7262#endif
704eff6c 7263#ifdef TARGET_NR_mkdir
31e31b8a 7264 case TARGET_NR_mkdir:
579a97f7
FB		 7265 if (!(p = lock_user_string(arg1)))
7266 goto efault;
53a5960a
PB		 7267 ret = get_errno(mkdir(p, arg2));
7268 unlock_user(p, arg1, 0);
31e31b8a 7269 break;
704eff6c 7270#endif
c0d472b1 7271#if defined(TARGET_NR_mkdirat)
4472ad0d 7272 case TARGET_NR_mkdirat:
579a97f7
FB		 7273 if (!(p = lock_user_string(arg2)))
7274 goto efault;
c0d472b1 7275 ret = get_errno(mkdirat(arg1, p, arg3));
579a97f7 7276 unlock_user(p, arg2, 0);
4472ad0d
TS		 7277 break;
7278#endif
704eff6c 7279#ifdef TARGET_NR_rmdir
31e31b8a 7280 case TARGET_NR_rmdir:
579a97f7
FB		 7281 if (!(p = lock_user_string(arg1)))
7282 goto efault;
53a5960a
PB		 7283 ret = get_errno(rmdir(p));
7284 unlock_user(p, arg1, 0);
31e31b8a 7285 break;
704eff6c 7286#endif
31e31b8a
FB		 7287 case TARGET_NR_dup:
7288 ret = get_errno(dup(arg1));
e36800c9
LV		 7289 if (ret >= 0) {
7290 fd_trans_dup(arg1, ret);
7291 }
31e31b8a 7292 break;
704eff6c 7293#ifdef TARGET_NR_pipe
31e31b8a 7294 case TARGET_NR_pipe:
fb41a66e 7295 ret = do_pipe(cpu_env, arg1, 0, 0);
099d6b0f 7296 break;
704eff6c 7297#endif
099d6b0f
RV		 7298#ifdef TARGET_NR_pipe2
7299 case TARGET_NR_pipe2:
e7ea6cbe
RH		 7300 ret = do_pipe(cpu_env, arg1,
7301 target_to_host_bitmask(arg2, fcntl_flags_tbl), 1);
31e31b8a 7302 break;
099d6b0f 7303#endif
31e31b8a 7304 case TARGET_NR_times:
32f36bce 7305 {
53a5960a 7306 struct target_tms *tmsp;
32f36bce
FB		 7307 struct tms tms;
7308 ret = get_errno(times(&tms));
53a5960a 7309 if (arg1) {
579a97f7
FB		 7310 tmsp = lock_user(VERIFY_WRITE, arg1, sizeof(struct target_tms), 0);
7311 if (!tmsp)
7312 goto efault;
cbb21eed
MB		 7313 tmsp->tms_utime = tswapal(host_to_target_clock_t(tms.tms_utime));
7314 tmsp->tms_stime = tswapal(host_to_target_clock_t(tms.tms_stime));
7315 tmsp->tms_cutime = tswapal(host_to_target_clock_t(tms.tms_cutime));
7316 tmsp->tms_cstime = tswapal(host_to_target_clock_t(tms.tms_cstime));
32f36bce 7317 }
c596ed17
FB		 7318 if (!is_error(ret))
7319 ret = host_to_target_clock_t(ret);
32f36bce
FB		 7320 }
7321 break;
ebc05488 7322#ifdef TARGET_NR_prof
31e31b8a
FB		 7323 case TARGET_NR_prof:
7324 goto unimplemented;
ebc05488 7325#endif
e5febef5 7326#ifdef TARGET_NR_signal
31e31b8a
FB		 7327 case TARGET_NR_signal:
7328 goto unimplemented;
e5febef5 7329#endif
31e31b8a 7330 case TARGET_NR_acct:
38d840e6
AJ		 7331 if (arg1 == 0) {
7332 ret = get_errno(acct(NULL));
7333 } else {
7334 if (!(p = lock_user_string(arg1)))
7335 goto efault;
7336 ret = get_errno(acct(path(p)));
7337 unlock_user(p, arg1, 0);
7338 }
24836689 7339 break;
8070e7be 7340#ifdef TARGET_NR_umount2
31e31b8a 7341 case TARGET_NR_umount2:
579a97f7
FB		 7342 if (!(p = lock_user_string(arg1)))
7343 goto efault;
53a5960a
PB		 7344 ret = get_errno(umount2(p, arg2));
7345 unlock_user(p, arg1, 0);
31e31b8a 7346 break;
7a3148a9 7347#endif
ebc05488 7348#ifdef TARGET_NR_lock
31e31b8a
FB		 7349 case TARGET_NR_lock:
7350 goto unimplemented;
ebc05488 7351#endif
31e31b8a
FB		 7352 case TARGET_NR_ioctl:
7353 ret = do_ioctl(arg1, arg2, arg3);
7354 break;
7355 case TARGET_NR_fcntl:
9ee1fa2c 7356 ret = do_fcntl(arg1, arg2, arg3);
31e31b8a 7357 break;
ebc05488 7358#ifdef TARGET_NR_mpx
31e31b8a
FB		 7359 case TARGET_NR_mpx:
7360 goto unimplemented;
ebc05488 7361#endif
31e31b8a
FB		 7362 case TARGET_NR_setpgid:
7363 ret = get_errno(setpgid(arg1, arg2));
7364 break;
ebc05488 7365#ifdef TARGET_NR_ulimit
31e31b8a
FB		 7366 case TARGET_NR_ulimit:
7367 goto unimplemented;
ebc05488
FB		 7368#endif
7369#ifdef TARGET_NR_oldolduname
31e31b8a
FB		 7370 case TARGET_NR_oldolduname:
7371 goto unimplemented;
ebc05488 7372#endif
31e31b8a
FB		 7373 case TARGET_NR_umask:
7374 ret = get_errno(umask(arg1));
7375 break;
7376 case TARGET_NR_chroot:
579a97f7
FB		 7377 if (!(p = lock_user_string(arg1)))
7378 goto efault;
53a5960a
PB		 7379 ret = get_errno(chroot(p));
7380 unlock_user(p, arg1, 0);
31e31b8a 7381 break;
704eff6c 7382#ifdef TARGET_NR_ustat
31e31b8a
FB		 7383 case TARGET_NR_ustat:
7384 goto unimplemented;
704eff6c
CG		 7385#endif
7386#ifdef TARGET_NR_dup2
31e31b8a
FB		 7387 case TARGET_NR_dup2:
7388 ret = get_errno(dup2(arg1, arg2));
e36800c9
LV		 7389 if (ret >= 0) {
7390 fd_trans_dup(arg1, arg2);
7391 }
31e31b8a 7392 break;
704eff6c 7393#endif
d0927938
UH		 7394#if defined(CONFIG_DUP3) && defined(TARGET_NR_dup3)
7395 case TARGET_NR_dup3:
7396 ret = get_errno(dup3(arg1, arg2, arg3));
e36800c9
LV		 7397 if (ret >= 0) {
7398 fd_trans_dup(arg1, arg2);
7399 }
d0927938
UH		 7400 break;
7401#endif
7a3148a9 7402#ifdef TARGET_NR_getppid /* not on alpha */
31e31b8a
FB		 7403 case TARGET_NR_getppid:
7404 ret = get_errno(getppid());
7405 break;
7a3148a9 7406#endif
704eff6c 7407#ifdef TARGET_NR_getpgrp
31e31b8a
FB		 7408 case TARGET_NR_getpgrp:
7409 ret = get_errno(getpgrp());
7410 break;
704eff6c 7411#endif
31e31b8a
FB		 7412 case TARGET_NR_setsid:
7413 ret = get_errno(setsid());
7414 break;
e5febef5 7415#ifdef TARGET_NR_sigaction
31e31b8a 7416 case TARGET_NR_sigaction:
31e31b8a 7417 {
6049f4f8
RH		 7418#if defined(TARGET_ALPHA)
7419 struct target_sigaction act, oact, *pact = 0;
53a5960a 7420 struct target_old_sigaction *old_act;
53a5960a 7421 if (arg2) {
579a97f7
FB		 7422 if (!lock_user_struct(VERIFY_READ, old_act, arg2, 1))
7423 goto efault;
66fb9763
FB		 7424 act._sa_handler = old_act->_sa_handler;
7425 target_siginitset(&act.sa_mask, old_act->sa_mask);
7426 act.sa_flags = old_act->sa_flags;
6049f4f8 7427 act.sa_restorer = 0;
53a5960a 7428 unlock_user_struct(old_act, arg2, 0);
66fb9763 7429 pact = &act;
66fb9763
FB		 7430 }
7431 ret = get_errno(do_sigaction(arg1, pact, &oact));
53a5960a 7432 if (!is_error(ret) && arg3) {
579a97f7
FB		 7433 if (!lock_user_struct(VERIFY_WRITE, old_act, arg3, 0))
7434 goto efault;
53a5960a
PB		 7435 old_act->_sa_handler = oact._sa_handler;
7436 old_act->sa_mask = oact.sa_mask.sig[0];
7437 old_act->sa_flags = oact.sa_flags;
53a5960a 7438 unlock_user_struct(old_act, arg3, 1);
66fb9763 7439 }
6049f4f8 7440#elif defined(TARGET_MIPS)
106ec879
FB		 7441 struct target_sigaction act, oact, *pact, *old_act;
7442
7443 if (arg2) {
579a97f7
FB		 7444 if (!lock_user_struct(VERIFY_READ, old_act, arg2, 1))
7445 goto efault;
106ec879
FB		 7446 act._sa_handler = old_act->_sa_handler;
7447 target_siginitset(&act.sa_mask, old_act->sa_mask.sig[0]);
7448 act.sa_flags = old_act->sa_flags;
7449 unlock_user_struct(old_act, arg2, 0);
7450 pact = &act;
7451 } else {
7452 pact = NULL;
7453 }
7454
7455 ret = get_errno(do_sigaction(arg1, pact, &oact));
7456
7457 if (!is_error(ret) && arg3) {
579a97f7
FB		 7458 if (!lock_user_struct(VERIFY_WRITE, old_act, arg3, 0))
7459 goto efault;
106ec879
FB		 7460 old_act->_sa_handler = oact._sa_handler;
7461 old_act->sa_flags = oact.sa_flags;
7462 old_act->sa_mask.sig[0] = oact.sa_mask.sig[0];
7463 old_act->sa_mask.sig[1] = 0;
7464 old_act->sa_mask.sig[2] = 0;
7465 old_act->sa_mask.sig[3] = 0;
7466 unlock_user_struct(old_act, arg3, 1);
7467 }
6049f4f8
RH		 7468#else
7469 struct target_old_sigaction *old_act;
7470 struct target_sigaction act, oact, *pact;
7471 if (arg2) {
7472 if (!lock_user_struct(VERIFY_READ, old_act, arg2, 1))
7473 goto efault;
7474 act._sa_handler = old_act->_sa_handler;
7475 target_siginitset(&act.sa_mask, old_act->sa_mask);
7476 act.sa_flags = old_act->sa_flags;
7477 act.sa_restorer = old_act->sa_restorer;
7478 unlock_user_struct(old_act, arg2, 0);
7479 pact = &act;
7480 } else {
7481 pact = NULL;
7482 }
7483 ret = get_errno(do_sigaction(arg1, pact, &oact));
7484 if (!is_error(ret) && arg3) {
7485 if (!lock_user_struct(VERIFY_WRITE, old_act, arg3, 0))
7486 goto efault;
7487 old_act->_sa_handler = oact._sa_handler;
7488 old_act->sa_mask = oact.sa_mask.sig[0];
7489 old_act->sa_flags = oact.sa_flags;
7490 old_act->sa_restorer = oact.sa_restorer;
7491 unlock_user_struct(old_act, arg3, 1);
7492 }
388bb21a 7493#endif
31e31b8a
FB		 7494 }
7495 break;
e5febef5 7496#endif
66fb9763 7497 case TARGET_NR_rt_sigaction:
53a5960a 7498 {
6049f4f8
RH		 7499#if defined(TARGET_ALPHA)
7500 struct target_sigaction act, oact, *pact = 0;
7501 struct target_rt_sigaction *rt_act;
7502 /* ??? arg4 == sizeof(sigset_t). */
7503 if (arg2) {
7504 if (!lock_user_struct(VERIFY_READ, rt_act, arg2, 1))
7505 goto efault;
7506 act._sa_handler = rt_act->_sa_handler;
7507 act.sa_mask = rt_act->sa_mask;
7508 act.sa_flags = rt_act->sa_flags;
7509 act.sa_restorer = arg5;
7510 unlock_user_struct(rt_act, arg2, 0);
7511 pact = &act;
7512 }
7513 ret = get_errno(do_sigaction(arg1, pact, &oact));
7514 if (!is_error(ret) && arg3) {
7515 if (!lock_user_struct(VERIFY_WRITE, rt_act, arg3, 0))
7516 goto efault;
7517 rt_act->_sa_handler = oact._sa_handler;
7518 rt_act->sa_mask = oact.sa_mask;
7519 rt_act->sa_flags = oact.sa_flags;
7520 unlock_user_struct(rt_act, arg3, 1);
7521 }
7522#else
53a5960a
PB		 7523 struct target_sigaction *act;
7524 struct target_sigaction *oact;
7525
579a97f7
FB		 7526 if (arg2) {
7527 if (!lock_user_struct(VERIFY_READ, act, arg2, 1))
7528 goto efault;
7529 } else
53a5960a 7530 act = NULL;
579a97f7
FB		 7531 if (arg3) {
7532 if (!lock_user_struct(VERIFY_WRITE, oact, arg3, 0)) {
7533 ret = -TARGET_EFAULT;
7534 goto rt_sigaction_fail;
7535 }
7536 } else
53a5960a
PB		 7537 oact = NULL;
7538 ret = get_errno(do_sigaction(arg1, act, oact));
579a97f7
FB		 7539 rt_sigaction_fail:
7540 if (act)
53a5960a 7541 unlock_user_struct(act, arg2, 0);
579a97f7 7542 if (oact)
53a5960a 7543 unlock_user_struct(oact, arg3, 1);
6049f4f8 7544#endif
53a5960a 7545 }
66fb9763 7546 break;
7a3148a9 7547#ifdef TARGET_NR_sgetmask /* not on alpha */
31e31b8a 7548 case TARGET_NR_sgetmask:
66fb9763
FB		 7549 {
7550 sigset_t cur_set;
992f48a0 7551 abi_ulong target_set;
3d3efba0
PM		 7552 ret = do_sigprocmask(0, NULL, &cur_set);
7553 if (!ret) {
7554 host_to_target_old_sigset(&target_set, &cur_set);
7555 ret = target_set;
7556 }
66fb9763
FB		 7557 }
7558 break;
7a3148a9
JM		 7559#endif
7560#ifdef TARGET_NR_ssetmask /* not on alpha */
31e31b8a 7561 case TARGET_NR_ssetmask:
66fb9763
FB		 7562 {
7563 sigset_t set, oset, cur_set;
992f48a0 7564 abi_ulong target_set = arg1;
3d3efba0
PM		 7565 /* We only have one word of the new mask so we must read
7566 * the rest of it with do_sigprocmask() and OR in this word.
7567 * We are guaranteed that a do_sigprocmask() that only queries
7568 * the signal mask will not fail.
7569 */
7570 ret = do_sigprocmask(0, NULL, &cur_set);
7571 assert(!ret);
66fb9763
FB		 7572 target_to_host_old_sigset(&set, &target_set);
7573 sigorset(&set, &set, &cur_set);
3d3efba0
PM		 7574 ret = do_sigprocmask(SIG_SETMASK, &set, &oset);
7575 if (!ret) {
7576 host_to_target_old_sigset(&target_set, &oset);
7577 ret = target_set;
7578 }
66fb9763
FB		 7579 }
7580 break;
7a3148a9 7581#endif
e5febef5 7582#ifdef TARGET_NR_sigprocmask
66fb9763
FB		 7583 case TARGET_NR_sigprocmask:
7584 {
a5b3b13b
RH		 7585#if defined(TARGET_ALPHA)
7586 sigset_t set, oldset;
7587 abi_ulong mask;
7588 int how;
7589
7590 switch (arg1) {
7591 case TARGET_SIG_BLOCK:
7592 how = SIG_BLOCK;
7593 break;
7594 case TARGET_SIG_UNBLOCK:
7595 how = SIG_UNBLOCK;
7596 break;
7597 case TARGET_SIG_SETMASK:
7598 how = SIG_SETMASK;
7599 break;
7600 default:
7601 ret = -TARGET_EINVAL;
7602 goto fail;
7603 }
7604 mask = arg2;
7605 target_to_host_old_sigset(&set, &mask);
7606
3d3efba0 7607 ret = do_sigprocmask(how, &set, &oldset);
a5b3b13b
RH		 7608 if (!is_error(ret)) {
7609 host_to_target_old_sigset(&mask, &oldset);
7610 ret = mask;
0229f5a3 7611 ((CPUAlphaState *)cpu_env)->ir[IR_V0] = 0; /* force no error */
a5b3b13b
RH		 7612 }
7613#else
66fb9763 7614 sigset_t set, oldset, *set_ptr;
a5b3b13b 7615 int how;
3b46e624 7616
53a5960a 7617 if (arg2) {
a5b3b13b 7618 switch (arg1) {
66fb9763
FB		 7619 case TARGET_SIG_BLOCK:
7620 how = SIG_BLOCK;
7621 break;
7622 case TARGET_SIG_UNBLOCK:
7623 how = SIG_UNBLOCK;
7624 break;
7625 case TARGET_SIG_SETMASK:
7626 how = SIG_SETMASK;
7627 break;
7628 default:
0da46a6e 7629 ret = -TARGET_EINVAL;
66fb9763
FB		 7630 goto fail;
7631 }
c227f099 7632 if (!(p = lock_user(VERIFY_READ, arg2, sizeof(target_sigset_t), 1)))
579a97f7 7633 goto efault;
53a5960a
PB		 7634 target_to_host_old_sigset(&set, p);
7635 unlock_user(p, arg2, 0);
66fb9763
FB		 7636 set_ptr = &set;
7637 } else {
7638 how = 0;
7639 set_ptr = NULL;
7640 }
3d3efba0 7641 ret = do_sigprocmask(how, set_ptr, &oldset);
53a5960a 7642 if (!is_error(ret) && arg3) {
c227f099 7643 if (!(p = lock_user(VERIFY_WRITE, arg3, sizeof(target_sigset_t), 0)))
579a97f7 7644 goto efault;
53a5960a 7645 host_to_target_old_sigset(p, &oldset);
c227f099 7646 unlock_user(p, arg3, sizeof(target_sigset_t));
66fb9763 7647 }
a5b3b13b 7648#endif
66fb9763
FB		 7649 }
7650 break;
e5febef5 7651#endif
66fb9763
FB		 7652 case TARGET_NR_rt_sigprocmask:
7653 {
7654 int how = arg1;
7655 sigset_t set, oldset, *set_ptr;
3b46e624 7656
53a5960a 7657 if (arg2) {
66fb9763
FB		 7658 switch(how) {
7659 case TARGET_SIG_BLOCK:
7660 how = SIG_BLOCK;
7661 break;
7662 case TARGET_SIG_UNBLOCK:
7663 how = SIG_UNBLOCK;
7664 break;
7665 case TARGET_SIG_SETMASK:
7666 how = SIG_SETMASK;
7667 break;
7668 default:
0da46a6e 7669 ret = -TARGET_EINVAL;
66fb9763
FB		 7670 goto fail;
7671 }
c227f099 7672 if (!(p = lock_user(VERIFY_READ, arg2, sizeof(target_sigset_t), 1)))
579a97f7 7673 goto efault;
53a5960a
PB		 7674 target_to_host_sigset(&set, p);
7675 unlock_user(p, arg2, 0);
66fb9763
FB		 7676 set_ptr = &set;
7677 } else {
7678 how = 0;
7679 set_ptr = NULL;
7680 }
3d3efba0 7681 ret = do_sigprocmask(how, set_ptr, &oldset);
53a5960a 7682 if (!is_error(ret) && arg3) {
c227f099 7683 if (!(p = lock_user(VERIFY_WRITE, arg3, sizeof(target_sigset_t), 0)))
579a97f7 7684 goto efault;
53a5960a 7685 host_to_target_sigset(p, &oldset);
c227f099 7686 unlock_user(p, arg3, sizeof(target_sigset_t));
66fb9763
FB		 7687 }
7688 }
7689 break;
e5febef5 7690#ifdef TARGET_NR_sigpending
66fb9763
FB		 7691 case TARGET_NR_sigpending:
7692 {
7693 sigset_t set;
7694 ret = get_errno(sigpending(&set));
7695 if (!is_error(ret)) {
c227f099 7696 if (!(p = lock_user(VERIFY_WRITE, arg1, sizeof(target_sigset_t), 0)))
579a97f7 7697 goto efault;
53a5960a 7698 host_to_target_old_sigset(p, &set);
c227f099 7699 unlock_user(p, arg1, sizeof(target_sigset_t));
66fb9763
FB		 7700 }
7701 }
7702 break;
e5febef5 7703#endif
66fb9763
FB		 7704 case TARGET_NR_rt_sigpending:
7705 {
7706 sigset_t set;
7707 ret = get_errno(sigpending(&set));
7708 if (!is_error(ret)) {
c227f099 7709 if (!(p = lock_user(VERIFY_WRITE, arg1, sizeof(target_sigset_t), 0)))
579a97f7 7710 goto efault;
53a5960a 7711 host_to_target_sigset(p, &set);
c227f099 7712 unlock_user(p, arg1, sizeof(target_sigset_t));
66fb9763
FB		 7713 }
7714 }
7715 break;
e5febef5 7716#ifdef TARGET_NR_sigsuspend
66fb9763
FB		 7717 case TARGET_NR_sigsuspend:
7718 {
3d3efba0 7719 TaskState *ts = cpu->opaque;
f43ce12b
RH		 7720#if defined(TARGET_ALPHA)
7721 abi_ulong mask = arg1;
3d3efba0 7722 target_to_host_old_sigset(&ts->sigsuspend_mask, &mask);
f43ce12b 7723#else
c227f099 7724 if (!(p = lock_user(VERIFY_READ, arg1, sizeof(target_sigset_t), 1)))
579a97f7 7725 goto efault;
3d3efba0 7726 target_to_host_old_sigset(&ts->sigsuspend_mask, p);
53a5960a 7727 unlock_user(p, arg1, 0);
f43ce12b 7728#endif
3d3efba0
PM		 7729 ret = get_errno(safe_rt_sigsuspend(&ts->sigsuspend_mask,
7730 SIGSET_T_SIZE));
7731 if (ret != -TARGET_ERESTARTSYS) {
7732 ts->in_sigsuspend = 1;
7733 }
66fb9763
FB		 7734 }
7735 break;
e5febef5 7736#endif
66fb9763
FB		 7737 case TARGET_NR_rt_sigsuspend:
7738 {
3d3efba0 7739 TaskState *ts = cpu->opaque;
c227f099 7740 if (!(p = lock_user(VERIFY_READ, arg1, sizeof(target_sigset_t), 1)))
579a97f7 7741 goto efault;
3d3efba0 7742 target_to_host_sigset(&ts->sigsuspend_mask, p);
53a5960a 7743 unlock_user(p, arg1, 0);
3d3efba0
PM		 7744 ret = get_errno(safe_rt_sigsuspend(&ts->sigsuspend_mask,
7745 SIGSET_T_SIZE));
7746 if (ret != -TARGET_ERESTARTSYS) {
7747 ts->in_sigsuspend = 1;
7748 }
66fb9763
FB		 7749 }
7750 break;
7751 case TARGET_NR_rt_sigtimedwait:
7752 {
66fb9763
FB		 7753 sigset_t set;
7754 struct timespec uts, *puts;
7755 siginfo_t uinfo;
3b46e624 7756
c227f099 7757 if (!(p = lock_user(VERIFY_READ, arg1, sizeof(target_sigset_t), 1)))
579a97f7 7758 goto efault;
53a5960a
PB		 7759 target_to_host_sigset(&set, p);
7760 unlock_user(p, arg1, 0);
7761 if (arg3) {
66fb9763 7762 puts = &uts;
53a5960a 7763 target_to_host_timespec(puts, arg3);
66fb9763
FB		 7764 } else {
7765 puts = NULL;
7766 }
b3f82330
PM		 7767 ret = get_errno(safe_rt_sigtimedwait(&set, &uinfo, puts,
7768 SIGSET_T_SIZE));
974a196d
PJ		 7769 if (!is_error(ret)) {
7770 if (arg2) {
7771 p = lock_user(VERIFY_WRITE, arg2, sizeof(target_siginfo_t),
7772 0);
7773 if (!p) {
7774 goto efault;
7775 }
7776 host_to_target_siginfo(p, &uinfo);
7777 unlock_user(p, arg2, sizeof(target_siginfo_t));
7778 }
7779 ret = host_to_target_signal(ret);
66fb9763
FB		 7780 }
7781 }
7782 break;
7783 case TARGET_NR_rt_sigqueueinfo:
7784 {
7785 siginfo_t uinfo;
c227f099 7786 if (!(p = lock_user(VERIFY_READ, arg3, sizeof(target_sigset_t), 1)))
579a97f7 7787 goto efault;
53a5960a
PB		 7788 target_to_host_siginfo(&uinfo, p);
7789 unlock_user(p, arg1, 0);
66fb9763
FB		 7790 ret = get_errno(sys_rt_sigqueueinfo(arg1, arg2, &uinfo));
7791 }
7792 break;
e5febef5 7793#ifdef TARGET_NR_sigreturn
66fb9763 7794 case TARGET_NR_sigreturn:
3d3efba0
PM		 7795 if (block_signals()) {
7796 ret = -TARGET_ERESTARTSYS;
7797 } else {
7798 ret = do_sigreturn(cpu_env);
7799 }
66fb9763 7800 break;
e5febef5 7801#endif
66fb9763 7802 case TARGET_NR_rt_sigreturn:
3d3efba0
PM		 7803 if (block_signals()) {
7804 ret = -TARGET_ERESTARTSYS;
7805 } else {
7806 ret = do_rt_sigreturn(cpu_env);
7807 }
66fb9763 7808 break;
31e31b8a 7809 case TARGET_NR_sethostname:
579a97f7
FB		 7810 if (!(p = lock_user_string(arg1)))
7811 goto efault;
53a5960a
PB		 7812 ret = get_errno(sethostname(p, arg2));
7813 unlock_user(p, arg1, 0);
31e31b8a
FB		 7814 break;
7815 case TARGET_NR_setrlimit:
9de5e440 7816 {
e22b7015 7817 int resource = target_to_host_resource(arg1);
53a5960a 7818 struct target_rlimit *target_rlim;
9de5e440 7819 struct rlimit rlim;
579a97f7
FB		 7820 if (!lock_user_struct(VERIFY_READ, target_rlim, arg2, 1))
7821 goto efault;
81bbe906
TY		 7822 rlim.rlim_cur = target_to_host_rlim(target_rlim->rlim_cur);
7823 rlim.rlim_max = target_to_host_rlim(target_rlim->rlim_max);
53a5960a 7824 unlock_user_struct(target_rlim, arg2, 0);
9de5e440
FB		 7825 ret = get_errno(setrlimit(resource, &rlim));
7826 }
7827 break;
31e31b8a 7828 case TARGET_NR_getrlimit:
9de5e440 7829 {
e22b7015 7830 int resource = target_to_host_resource(arg1);
53a5960a 7831 struct target_rlimit *target_rlim;
9de5e440 7832 struct rlimit rlim;
3b46e624 7833
9de5e440
FB		 7834 ret = get_errno(getrlimit(resource, &rlim));
7835 if (!is_error(ret)) {
579a97f7
FB		 7836 if (!lock_user_struct(VERIFY_WRITE, target_rlim, arg2, 0))
7837 goto efault;
81bbe906
TY		 7838 target_rlim->rlim_cur = host_to_target_rlim(rlim.rlim_cur);
7839 target_rlim->rlim_max = host_to_target_rlim(rlim.rlim_max);
53a5960a 7840 unlock_user_struct(target_rlim, arg2, 1);
9de5e440
FB		 7841 }
7842 }
7843 break;
31e31b8a 7844 case TARGET_NR_getrusage:
b409186b
FB		 7845 {
7846 struct rusage rusage;
b409186b
FB		 7847 ret = get_errno(getrusage(arg1, &rusage));
7848 if (!is_error(ret)) {
a39fb273 7849 ret = host_to_target_rusage(arg2, &rusage);
b409186b
FB		 7850 }
7851 }
7852 break;
31e31b8a
FB		 7853 case TARGET_NR_gettimeofday:
7854 {
31e31b8a
FB		 7855 struct timeval tv;
7856 ret = get_errno(gettimeofday(&tv, NULL));
7857 if (!is_error(ret)) {
788f5ec4
TS		 7858 if (copy_to_user_timeval(arg1, &tv))
7859 goto efault;
31e31b8a
FB		 7860 }
7861 }
7862 break;
7863 case TARGET_NR_settimeofday:
7864 {
b67d8031 7865 struct timeval tv, *ptv = NULL;
ef4467e9
PB		 7866 struct timezone tz, *ptz = NULL;
7867
b67d8031
PB		 7868 if (arg1) {
7869 if (copy_from_user_timeval(&tv, arg1)) {
7870 goto efault;
7871 }
7872 ptv = &tv;
7873 }
ef4467e9
PB		 7874
7875 if (arg2) {
7876 if (copy_from_user_timezone(&tz, arg2)) {
7877 goto efault;
7878 }
7879 ptz = &tz;
7880 }
7881
b67d8031 7882 ret = get_errno(settimeofday(ptv, ptz));
31e31b8a
FB		 7883 }
7884 break;
9468a5d4 7885#if defined(TARGET_NR_select)
31e31b8a 7886 case TARGET_NR_select:
9468a5d4
LV		 7887#if defined(TARGET_S390X) || defined(TARGET_ALPHA)
7888 ret = do_select(arg1, arg2, arg3, arg4, arg5);
7889#else
f2674e31 7890 {
53a5960a 7891 struct target_sel_arg_struct *sel;
992f48a0 7892 abi_ulong inp, outp, exp, tvp;
53a5960a
PB		 7893 long nsel;
7894
579a97f7
FB		 7895 if (!lock_user_struct(VERIFY_READ, sel, arg1, 1))
7896 goto efault;
cbb21eed
MB		 7897 nsel = tswapal(sel->n);
7898 inp = tswapal(sel->inp);
7899 outp = tswapal(sel->outp);
7900 exp = tswapal(sel->exp);
7901 tvp = tswapal(sel->tvp);
53a5960a
PB		 7902 unlock_user_struct(sel, arg1, 0);
7903 ret = do_select(nsel, inp, outp, exp, tvp);
f2674e31 7904 }
9468a5d4 7905#endif
f2674e31 7906 break;
9e42382f
RV		 7907#endif
7908#ifdef TARGET_NR_pselect6
7909 case TARGET_NR_pselect6:
055e0906
MF		 7910 {
7911 abi_long rfd_addr, wfd_addr, efd_addr, n, ts_addr;
7912 fd_set rfds, wfds, efds;
7913 fd_set *rfds_ptr, *wfds_ptr, *efds_ptr;
7914 struct timespec ts, *ts_ptr;
7915
7916 /*
7917 * The 6th arg is actually two args smashed together,
7918 * so we cannot use the C library.
7919 */
7920 sigset_t set;
7921 struct {
7922 sigset_t *set;
7923 size_t size;
7924 } sig, *sig_ptr;
7925
7926 abi_ulong arg_sigset, arg_sigsize, *arg7;
7927 target_sigset_t *target_sigset;
7928
7929 n = arg1;
7930 rfd_addr = arg2;
7931 wfd_addr = arg3;
7932 efd_addr = arg4;
7933 ts_addr = arg5;
7934
7935 ret = copy_from_user_fdset_ptr(&rfds, &rfds_ptr, rfd_addr, n);
7936 if (ret) {
7937 goto fail;
7938 }
7939 ret = copy_from_user_fdset_ptr(&wfds, &wfds_ptr, wfd_addr, n);
7940 if (ret) {
7941 goto fail;
7942 }
7943 ret = copy_from_user_fdset_ptr(&efds, &efds_ptr, efd_addr, n);
7944 if (ret) {
7945 goto fail;
7946 }
7947
7948 /*
7949 * This takes a timespec, and not a timeval, so we cannot
7950 * use the do_select() helper ...
7951 */
7952 if (ts_addr) {
7953 if (target_to_host_timespec(&ts, ts_addr)) {
7954 goto efault;
7955 }
7956 ts_ptr = &ts;
7957 } else {
7958 ts_ptr = NULL;
7959 }
7960
7961 /* Extract the two packed args for the sigset */
7962 if (arg6) {
7963 sig_ptr = &sig;
b28a1f33 7964 sig.size = SIGSET_T_SIZE;
055e0906
MF		 7965
7966 arg7 = lock_user(VERIFY_READ, arg6, sizeof(*arg7) * 2, 1);
7967 if (!arg7) {
7968 goto efault;
7969 }
cbb21eed
MB		 7970 arg_sigset = tswapal(arg7[0]);
7971 arg_sigsize = tswapal(arg7[1]);
055e0906
MF		 7972 unlock_user(arg7, arg6, 0);
7973
7974 if (arg_sigset) {
7975 sig.set = &set;
8f04eeb3
PM		 7976 if (arg_sigsize != sizeof(*target_sigset)) {
7977 /* Like the kernel, we enforce correct size sigsets */
7978 ret = -TARGET_EINVAL;
7979 goto fail;
7980 }
055e0906
MF		 7981 target_sigset = lock_user(VERIFY_READ, arg_sigset,
7982 sizeof(*target_sigset), 1);
7983 if (!target_sigset) {
7984 goto efault;
7985 }
7986 target_to_host_sigset(&set, target_sigset);
7987 unlock_user(target_sigset, arg_sigset, 0);
7988 } else {
7989 sig.set = NULL;
7990 }
7991 } else {
7992 sig_ptr = NULL;
7993 }
7994
6df9d38d
PM		 7995 ret = get_errno(safe_pselect6(n, rfds_ptr, wfds_ptr, efds_ptr,
7996 ts_ptr, sig_ptr));
055e0906
MF		 7997
7998 if (!is_error(ret)) {
7999 if (rfd_addr && copy_to_user_fdset(rfd_addr, &rfds, n))
8000 goto efault;
8001 if (wfd_addr && copy_to_user_fdset(wfd_addr, &wfds, n))
8002 goto efault;
8003 if (efd_addr && copy_to_user_fdset(efd_addr, &efds, n))
8004 goto efault;
8005
8006 if (ts_addr && host_to_target_timespec(ts_addr, &ts))
8007 goto efault;
8008 }
8009 }
8010 break;
048f6b4d 8011#endif
704eff6c 8012#ifdef TARGET_NR_symlink
31e31b8a 8013 case TARGET_NR_symlink:
53a5960a
PB		 8014 {
8015 void *p2;
8016 p = lock_user_string(arg1);
8017 p2 = lock_user_string(arg2);
579a97f7
FB		 8018 if (!p || !p2)
8019 ret = -TARGET_EFAULT;
8020 else
8021 ret = get_errno(symlink(p, p2));
53a5960a
PB		 8022 unlock_user(p2, arg2, 0);
8023 unlock_user(p, arg1, 0);
8024 }
31e31b8a 8025 break;
704eff6c 8026#endif
c0d472b1 8027#if defined(TARGET_NR_symlinkat)
f0b6243d 8028 case TARGET_NR_symlinkat:
f0b6243d 8029 {
579a97f7 8030 void *p2;
f0b6243d
TS		 8031 p = lock_user_string(arg1);
8032 p2 = lock_user_string(arg3);
579a97f7 8033 if (!p || !p2)
0da46a6e 8034 ret = -TARGET_EFAULT;
f0b6243d 8035 else
c0d472b1 8036 ret = get_errno(symlinkat(p, arg2, p2));
579a97f7
FB		 8037 unlock_user(p2, arg3, 0);
8038 unlock_user(p, arg1, 0);
f0b6243d
TS		 8039 }
8040 break;
8041#endif
ebc05488 8042#ifdef TARGET_NR_oldlstat
31e31b8a
FB		 8043 case TARGET_NR_oldlstat:
8044 goto unimplemented;
ebc05488 8045#endif
704eff6c 8046#ifdef TARGET_NR_readlink
31e31b8a 8047 case TARGET_NR_readlink:
53a5960a 8048 {
463d8e73 8049 void *p2;
53a5960a 8050 p = lock_user_string(arg1);
579a97f7 8051 p2 = lock_user(VERIFY_WRITE, arg2, arg3, 0);
463d8e73 8052 if (!p || !p2) {
579a97f7 8053 ret = -TARGET_EFAULT;
f17f4989
MF		 8054 } else if (!arg3) {
8055 /* Short circuit this for the magic exe check. */
8056 ret = -TARGET_EINVAL;
463d8e73
AS		 8057 } else if (is_proc_myself((const char *)p, "exe")) {
8058 char real[PATH_MAX], *temp;
8059 temp = realpath(exec_path, real);
f17f4989
MF		 8060 /* Return value is # of bytes that we wrote to the buffer. */
8061 if (temp == NULL) {
8062 ret = get_errno(-1);
8063 } else {
8064 /* Don't worry about sign mismatch as earlier mapping
8065 * logic would have thrown a bad address error. */
8066 ret = MIN(strlen(real), arg3);
8067 /* We cannot NUL terminate the string. */
8068 memcpy(p2, real, ret);
8069 }
463d8e73
AS		 8070 } else {
8071 ret = get_errno(readlink(path(p), p2, arg3));
d088d664 8072 }
53a5960a
PB		 8073 unlock_user(p2, arg2, ret);
8074 unlock_user(p, arg1, 0);
8075 }
31e31b8a 8076 break;
704eff6c 8077#endif
c0d472b1 8078#if defined(TARGET_NR_readlinkat)
5e0ccb18 8079 case TARGET_NR_readlinkat:
5e0ccb18 8080 {
579a97f7 8081 void *p2;
5e0ccb18 8082 p = lock_user_string(arg2);
579a97f7 8083 p2 = lock_user(VERIFY_WRITE, arg3, arg4, 0);
463d8e73
AS		 8084 if (!p || !p2) {
8085 ret = -TARGET_EFAULT;
8086 } else if (is_proc_myself((const char *)p, "exe")) {
8087 char real[PATH_MAX], *temp;
8088 temp = realpath(exec_path, real);
8089 ret = temp == NULL ? get_errno(-1) : strlen(real) ;
8090 snprintf((char *)p2, arg4, "%s", real);
8091 } else {
c0d472b1 8092 ret = get_errno(readlinkat(arg1, path(p), p2, arg4));
463d8e73 8093 }
579a97f7
FB		 8094 unlock_user(p2, arg3, ret);
8095 unlock_user(p, arg2, 0);
5e0ccb18
TS		 8096 }
8097 break;
8098#endif
e5febef5 8099#ifdef TARGET_NR_uselib
31e31b8a
FB		 8100 case TARGET_NR_uselib:
8101 goto unimplemented;
e5febef5
TS		 8102#endif
8103#ifdef TARGET_NR_swapon
31e31b8a 8104 case TARGET_NR_swapon:
579a97f7
FB		 8105 if (!(p = lock_user_string(arg1)))
8106 goto efault;
53a5960a
PB		 8107 ret = get_errno(swapon(p, arg2));
8108 unlock_user(p, arg1, 0);
31e31b8a 8109 break;
e5febef5 8110#endif
31e31b8a 8111 case TARGET_NR_reboot:
c07ecc68
LV		 8112 if (arg3 == LINUX_REBOOT_CMD_RESTART2) {
8113 /* arg4 must be ignored in all other cases */
8114 p = lock_user_string(arg4);
8115 if (!p) {
8116 goto efault;
8117 }
8118 ret = get_errno(reboot(arg1, arg2, arg3, p));
8119 unlock_user(p, arg4, 0);
8120 } else {
8121 ret = get_errno(reboot(arg1, arg2, arg3, NULL));
8122 }
0f6b4d21 8123 break;
e5febef5 8124#ifdef TARGET_NR_readdir
31e31b8a
FB		 8125 case TARGET_NR_readdir:
8126 goto unimplemented;
e5febef5
TS		 8127#endif
8128#ifdef TARGET_NR_mmap
31e31b8a 8129 case TARGET_NR_mmap:
09701199
AG		 8130#if (defined(TARGET_I386) && defined(TARGET_ABI32)) || \
8131 (defined(TARGET_ARM) && defined(TARGET_ABI32)) || \
a4c075f1
UH		 8132 defined(TARGET_M68K) || defined(TARGET_CRIS) || defined(TARGET_MICROBLAZE) \
8133 || defined(TARGET_S390X)
31e31b8a 8134 {
992f48a0
BS		 8135 abi_ulong *v;
8136 abi_ulong v1, v2, v3, v4, v5, v6;
579a97f7
FB		 8137 if (!(v = lock_user(VERIFY_READ, arg1, 6 * sizeof(abi_ulong), 1)))
8138 goto efault;
cbb21eed
MB		 8139 v1 = tswapal(v[0]);
8140 v2 = tswapal(v[1]);
8141 v3 = tswapal(v[2]);
8142 v4 = tswapal(v[3]);
8143 v5 = tswapal(v[4]);
8144 v6 = tswapal(v[5]);
53a5960a 8145 unlock_user(v, arg1, 0);
5fafdf24 8146 ret = get_errno(target_mmap(v1, v2, v3,
5286db75
FB		 8147 target_to_host_bitmask(v4, mmap_flags_tbl),
8148 v5, v6));
31e31b8a 8149 }
31e31b8a 8150#else
5fafdf24
TS		 8151 ret = get_errno(target_mmap(arg1, arg2, arg3,
8152 target_to_host_bitmask(arg4, mmap_flags_tbl),
6fb883e8
FB		 8153 arg5,
8154 arg6));
31e31b8a 8155#endif
6fb883e8 8156 break;
e5febef5 8157#endif
a315a145 8158#ifdef TARGET_NR_mmap2
6fb883e8 8159 case TARGET_NR_mmap2:
bb7ec043 8160#ifndef MMAP_SHIFT
c573ff67 8161#define MMAP_SHIFT 12
c573ff67 8162#endif
5fafdf24
TS		 8163 ret = get_errno(target_mmap(arg1, arg2, arg3,
8164 target_to_host_bitmask(arg4, mmap_flags_tbl),
5286db75 8165 arg5,
c573ff67 8166 arg6 << MMAP_SHIFT));
31e31b8a 8167 break;
a315a145 8168#endif
31e31b8a 8169 case TARGET_NR_munmap:
54936004 8170 ret = get_errno(target_munmap(arg1, arg2));
31e31b8a 8171 break;
9de5e440 8172 case TARGET_NR_mprotect:
97374d38 8173 {
0429a971 8174 TaskState *ts = cpu->opaque;
97374d38
PB		 8175 /* Special hack to detect libc making the stack executable. */
8176 if ((arg3 & PROT_GROWSDOWN)
8177 && arg1 >= ts->info->stack_limit
8178 && arg1 <= ts->info->start_stack) {
8179 arg3 &= ~PROT_GROWSDOWN;
8180 arg2 = arg2 + arg1 - ts->info->stack_limit;
8181 arg1 = ts->info->stack_limit;
8182 }
8183 }
54936004 8184 ret = get_errno(target_mprotect(arg1, arg2, arg3));
9de5e440 8185 break;
e5febef5 8186#ifdef TARGET_NR_mremap
9de5e440 8187 case TARGET_NR_mremap:
54936004 8188 ret = get_errno(target_mremap(arg1, arg2, arg3, arg4, arg5));
9de5e440 8189 break;
e5febef5 8190#endif
53a5960a 8191 /* ??? msync/mlock/munlock are broken for softmmu. */
e5febef5 8192#ifdef TARGET_NR_msync
9de5e440 8193 case TARGET_NR_msync:
53a5960a 8194 ret = get_errno(msync(g2h(arg1), arg2, arg3));
9de5e440 8195 break;
e5febef5
TS		 8196#endif
8197#ifdef TARGET_NR_mlock
9de5e440 8198 case TARGET_NR_mlock:
53a5960a 8199 ret = get_errno(mlock(g2h(arg1), arg2));
9de5e440 8200 break;
e5febef5
TS		 8201#endif
8202#ifdef TARGET_NR_munlock
9de5e440 8203 case TARGET_NR_munlock:
53a5960a 8204 ret = get_errno(munlock(g2h(arg1), arg2));
9de5e440 8205 break;
e5febef5
TS		 8206#endif
8207#ifdef TARGET_NR_mlockall
9de5e440 8208 case TARGET_NR_mlockall:
6f6a4032 8209 ret = get_errno(mlockall(target_to_host_mlockall_arg(arg1)));
9de5e440 8210 break;
e5febef5
TS		 8211#endif
8212#ifdef TARGET_NR_munlockall
9de5e440
FB		 8213 case TARGET_NR_munlockall:
8214 ret = get_errno(munlockall());
8215 break;
e5febef5 8216#endif
31e31b8a 8217 case TARGET_NR_truncate:
579a97f7
FB		 8218 if (!(p = lock_user_string(arg1)))
8219 goto efault;
53a5960a
PB		 8220 ret = get_errno(truncate(p, arg2));
8221 unlock_user(p, arg1, 0);
31e31b8a
FB		 8222 break;
8223 case TARGET_NR_ftruncate:
8224 ret = get_errno(ftruncate(arg1, arg2));
8225 break;
8226 case TARGET_NR_fchmod:
8227 ret = get_errno(fchmod(arg1, arg2));
8228 break;
c0d472b1 8229#if defined(TARGET_NR_fchmodat)
814d7977 8230 case TARGET_NR_fchmodat:
579a97f7
FB		 8231 if (!(p = lock_user_string(arg2)))
8232 goto efault;
c0d472b1 8233 ret = get_errno(fchmodat(arg1, p, arg3, 0));
579a97f7 8234 unlock_user(p, arg2, 0);
814d7977
TS		 8235 break;
8236#endif
31e31b8a 8237 case TARGET_NR_getpriority:
95c09828
RH		 8238 /* Note that negative values are valid for getpriority, so we must
8239 differentiate based on errno settings. */
8240 errno = 0;
8241 ret = getpriority(arg1, arg2);
8242 if (ret == -1 && errno != 0) {
8243 ret = -host_to_target_errno(errno);
8244 break;
8245 }
8246#ifdef TARGET_ALPHA
8247 /* Return value is the unbiased priority. Signal no error. */
8248 ((CPUAlphaState *)cpu_env)->ir[IR_V0] = 0;
8249#else
8250 /* Return value is a biased priority to avoid negative numbers. */
8251 ret = 20 - ret;
8252#endif
31e31b8a
FB		 8253 break;
8254 case TARGET_NR_setpriority:
8255 ret = get_errno(setpriority(arg1, arg2, arg3));
8256 break;
ebc05488 8257#ifdef TARGET_NR_profil
31e31b8a
FB		 8258 case TARGET_NR_profil:
8259 goto unimplemented;
ebc05488 8260#endif
31e31b8a 8261 case TARGET_NR_statfs:
579a97f7
FB		 8262 if (!(p = lock_user_string(arg1)))
8263 goto efault;
53a5960a
PB		 8264 ret = get_errno(statfs(path(p), &stfs));
8265 unlock_user(p, arg1, 0);
31e31b8a
FB		 8266 convert_statfs:
8267 if (!is_error(ret)) {
53a5960a 8268 struct target_statfs *target_stfs;
3b46e624 8269
579a97f7
FB		 8270 if (!lock_user_struct(VERIFY_WRITE, target_stfs, arg2, 0))
8271 goto efault;
8272 __put_user(stfs.f_type, &target_stfs->f_type);
8273 __put_user(stfs.f_bsize, &target_stfs->f_bsize);
8274 __put_user(stfs.f_blocks, &target_stfs->f_blocks);
8275 __put_user(stfs.f_bfree, &target_stfs->f_bfree);
8276 __put_user(stfs.f_bavail, &target_stfs->f_bavail);
8277 __put_user(stfs.f_files, &target_stfs->f_files);
8278 __put_user(stfs.f_ffree, &target_stfs->f_ffree);
8279 __put_user(stfs.f_fsid.__val[0], &target_stfs->f_fsid.val[0]);
8280 __put_user(stfs.f_fsid.__val[1], &target_stfs->f_fsid.val[1]);
8281 __put_user(stfs.f_namelen, &target_stfs->f_namelen);
229d3376
AG		 8282 __put_user(stfs.f_frsize, &target_stfs->f_frsize);
8283 memset(target_stfs->f_spare, 0, sizeof(target_stfs->f_spare));
53a5960a 8284 unlock_user_struct(target_stfs, arg2, 1);
31e31b8a
FB		 8285 }
8286 break;
8287 case TARGET_NR_fstatfs:
56c8f68f 8288 ret = get_errno(fstatfs(arg1, &stfs));
31e31b8a 8289 goto convert_statfs;
56c8f68f
FB		 8290#ifdef TARGET_NR_statfs64
8291 case TARGET_NR_statfs64:
579a97f7
FB		 8292 if (!(p = lock_user_string(arg1)))
8293 goto efault;
53a5960a
PB		 8294 ret = get_errno(statfs(path(p), &stfs));
8295 unlock_user(p, arg1, 0);
56c8f68f
FB		 8296 convert_statfs64:
8297 if (!is_error(ret)) {
53a5960a 8298 struct target_statfs64 *target_stfs;
3b46e624 8299
579a97f7
FB		 8300 if (!lock_user_struct(VERIFY_WRITE, target_stfs, arg3, 0))
8301 goto efault;
8302 __put_user(stfs.f_type, &target_stfs->f_type);
8303 __put_user(stfs.f_bsize, &target_stfs->f_bsize);
8304 __put_user(stfs.f_blocks, &target_stfs->f_blocks);
8305 __put_user(stfs.f_bfree, &target_stfs->f_bfree);
8306 __put_user(stfs.f_bavail, &target_stfs->f_bavail);
8307 __put_user(stfs.f_files, &target_stfs->f_files);
8308 __put_user(stfs.f_ffree, &target_stfs->f_ffree);
8309 __put_user(stfs.f_fsid.__val[0], &target_stfs->f_fsid.val[0]);
8310 __put_user(stfs.f_fsid.__val[1], &target_stfs->f_fsid.val[1]);
8311 __put_user(stfs.f_namelen, &target_stfs->f_namelen);
229d3376
AG		 8312 __put_user(stfs.f_frsize, &target_stfs->f_frsize);
8313 memset(target_stfs->f_spare, 0, sizeof(target_stfs->f_spare));
579a97f7 8314 unlock_user_struct(target_stfs, arg3, 1);
56c8f68f
FB		 8315 }
8316 break;
8317 case TARGET_NR_fstatfs64:
8318 ret = get_errno(fstatfs(arg1, &stfs));
8319 goto convert_statfs64;
8320#endif
ebc05488 8321#ifdef TARGET_NR_ioperm
31e31b8a
FB		 8322 case TARGET_NR_ioperm:
8323 goto unimplemented;
ebc05488 8324#endif
e5febef5 8325#ifdef TARGET_NR_socketcall
31e31b8a 8326 case TARGET_NR_socketcall:
53a5960a 8327 ret = do_socketcall(arg1, arg2);
31e31b8a 8328 break;
e5febef5 8329#endif
3532fa74
FB		 8330#ifdef TARGET_NR_accept
8331 case TARGET_NR_accept:
a94b4987
PM		 8332 ret = do_accept4(arg1, arg2, arg3, 0);
8333 break;
8334#endif
8335#ifdef TARGET_NR_accept4
8336 case TARGET_NR_accept4:
a94b4987 8337 ret = do_accept4(arg1, arg2, arg3, arg4);
3532fa74
FB		 8338 break;
8339#endif
8340#ifdef TARGET_NR_bind
8341 case TARGET_NR_bind:
8342 ret = do_bind(arg1, arg2, arg3);
8343 break;
8344#endif
8345#ifdef TARGET_NR_connect
8346 case TARGET_NR_connect:
8347 ret = do_connect(arg1, arg2, arg3);
8348 break;
8349#endif
8350#ifdef TARGET_NR_getpeername
8351 case TARGET_NR_getpeername:
1be9e1dc 8352 ret = do_getpeername(arg1, arg2, arg3);
3532fa74
FB		 8353 break;
8354#endif
8355#ifdef TARGET_NR_getsockname
8356 case TARGET_NR_getsockname:
1be9e1dc 8357 ret = do_getsockname(arg1, arg2, arg3);
3532fa74
FB		 8358 break;
8359#endif
8360#ifdef TARGET_NR_getsockopt
8361 case TARGET_NR_getsockopt:
8362 ret = do_getsockopt(arg1, arg2, arg3, arg4, arg5);
8363 break;
8364#endif
8365#ifdef TARGET_NR_listen
8366 case TARGET_NR_listen:
1be9e1dc 8367 ret = get_errno(listen(arg1, arg2));
3532fa74
FB		 8368 break;
8369#endif
8370#ifdef TARGET_NR_recv
8371 case TARGET_NR_recv:
214201bd 8372 ret = do_recvfrom(arg1, arg2, arg3, arg4, 0, 0);
3532fa74
FB		 8373 break;
8374#endif
8375#ifdef TARGET_NR_recvfrom
8376 case TARGET_NR_recvfrom:
214201bd 8377 ret = do_recvfrom(arg1, arg2, arg3, arg4, arg5, arg6);
3532fa74
FB		 8378 break;
8379#endif
8380#ifdef TARGET_NR_recvmsg
8381 case TARGET_NR_recvmsg:
8382 ret = do_sendrecvmsg(arg1, arg2, arg3, 0);
8383 break;
8384#endif
8385#ifdef TARGET_NR_send
8386 case TARGET_NR_send:
1be9e1dc 8387 ret = do_sendto(arg1, arg2, arg3, arg4, 0, 0);
3532fa74
FB		 8388 break;
8389#endif
8390#ifdef TARGET_NR_sendmsg
8391 case TARGET_NR_sendmsg:
8392 ret = do_sendrecvmsg(arg1, arg2, arg3, 1);
8393 break;
8394#endif
f19e00d7
AG		 8395#ifdef TARGET_NR_sendmmsg
8396 case TARGET_NR_sendmmsg:
8397 ret = do_sendrecvmmsg(arg1, arg2, arg3, arg4, 1);
8398 break;
8399 case TARGET_NR_recvmmsg:
8400 ret = do_sendrecvmmsg(arg1, arg2, arg3, arg4, 0);
8401 break;
8402#endif
3532fa74
FB		 8403#ifdef TARGET_NR_sendto
8404 case TARGET_NR_sendto:
1be9e1dc 8405 ret = do_sendto(arg1, arg2, arg3, arg4, arg5, arg6);
3532fa74
FB		 8406 break;
8407#endif
8408#ifdef TARGET_NR_shutdown
8409 case TARGET_NR_shutdown:
1be9e1dc 8410 ret = get_errno(shutdown(arg1, arg2));
3532fa74
FB		 8411 break;
8412#endif
f894efd1
LV		 8413#if defined(TARGET_NR_getrandom) && defined(__NR_getrandom)
8414 case TARGET_NR_getrandom:
8415 p = lock_user(VERIFY_WRITE, arg1, arg2, 0);
8416 if (!p) {
8417 goto efault;
8418 }
8419 ret = get_errno(getrandom(p, arg2, arg3));
8420 unlock_user(p, arg1, ret);
8421 break;
8422#endif
3532fa74
FB		 8423#ifdef TARGET_NR_socket
8424 case TARGET_NR_socket:
8425 ret = do_socket(arg1, arg2, arg3);
e36800c9 8426 fd_trans_unregister(ret);
3532fa74
FB		 8427 break;
8428#endif
8429#ifdef TARGET_NR_socketpair
8430 case TARGET_NR_socketpair:
1be9e1dc 8431 ret = do_socketpair(arg1, arg2, arg3, arg4);
3532fa74
FB		 8432 break;
8433#endif
8434#ifdef TARGET_NR_setsockopt
8435 case TARGET_NR_setsockopt:
8436 ret = do_setsockopt(arg1, arg2, arg3, arg4, (socklen_t) arg5);
8437 break;
8438#endif
7494b0f9 8439
31e31b8a 8440 case TARGET_NR_syslog:
579a97f7
FB		 8441 if (!(p = lock_user_string(arg2)))
8442 goto efault;
e5574487
TS		 8443 ret = get_errno(sys_syslog((int)arg1, p, (int)arg3));
8444 unlock_user(p, arg2, 0);
7494b0f9
TS		 8445 break;
8446
31e31b8a 8447 case TARGET_NR_setitimer:
66fb9763 8448 {
66fb9763
FB		 8449 struct itimerval value, ovalue, *pvalue;
8450
53a5960a 8451 if (arg2) {
66fb9763 8452 pvalue = &value;
788f5ec4
TS		 8453 if (copy_from_user_timeval(&pvalue->it_interval, arg2)
8454 || copy_from_user_timeval(&pvalue->it_value,
8455 arg2 + sizeof(struct target_timeval)))
8456 goto efault;
66fb9763
FB		 8457 } else {
8458 pvalue = NULL;
8459 }
8460 ret = get_errno(setitimer(arg1, pvalue, &ovalue));
53a5960a 8461 if (!is_error(ret) && arg3) {
788f5ec4
TS		 8462 if (copy_to_user_timeval(arg3,
8463 &ovalue.it_interval)
8464 || copy_to_user_timeval(arg3 + sizeof(struct target_timeval),
8465 &ovalue.it_value))
8466 goto efault;
66fb9763
FB		 8467 }
8468 }
8469 break;
31e31b8a 8470 case TARGET_NR_getitimer:
66fb9763 8471 {
66fb9763 8472 struct itimerval value;
3b46e624 8473
66fb9763 8474 ret = get_errno(getitimer(arg1, &value));
53a5960a 8475 if (!is_error(ret) && arg2) {
788f5ec4
TS		 8476 if (copy_to_user_timeval(arg2,
8477 &value.it_interval)
8478 || copy_to_user_timeval(arg2 + sizeof(struct target_timeval),
8479 &value.it_value))
8480 goto efault;
66fb9763
FB		 8481 }
8482 }
8483 break;
704eff6c 8484#ifdef TARGET_NR_stat
31e31b8a 8485 case TARGET_NR_stat:
579a97f7
FB		 8486 if (!(p = lock_user_string(arg1)))
8487 goto efault;
53a5960a
PB		 8488 ret = get_errno(stat(path(p), &st));
8489 unlock_user(p, arg1, 0);
31e31b8a 8490 goto do_stat;
704eff6c
CG		 8491#endif
8492#ifdef TARGET_NR_lstat
31e31b8a 8493 case TARGET_NR_lstat:
579a97f7
FB		 8494 if (!(p = lock_user_string(arg1)))
8495 goto efault;
53a5960a
PB		 8496 ret = get_errno(lstat(path(p), &st));
8497 unlock_user(p, arg1, 0);
31e31b8a 8498 goto do_stat;
704eff6c 8499#endif
31e31b8a
FB		 8500 case TARGET_NR_fstat:
8501 {
8502 ret = get_errno(fstat(arg1, &st));
704eff6c 8503#if defined(TARGET_NR_stat) || defined(TARGET_NR_lstat)
31e31b8a 8504 do_stat:
704eff6c 8505#endif
31e31b8a 8506 if (!is_error(ret)) {
53a5960a 8507 struct target_stat *target_st;
e3584658 8508
579a97f7
FB		 8509 if (!lock_user_struct(VERIFY_WRITE, target_st, arg2, 0))
8510 goto efault;
12727917 8511 memset(target_st, 0, sizeof(*target_st));
d2fd1af7
FB		 8512 __put_user(st.st_dev, &target_st->st_dev);
8513 __put_user(st.st_ino, &target_st->st_ino);
8514 __put_user(st.st_mode, &target_st->st_mode);
8515 __put_user(st.st_uid, &target_st->st_uid);
8516 __put_user(st.st_gid, &target_st->st_gid);
8517 __put_user(st.st_nlink, &target_st->st_nlink);
8518 __put_user(st.st_rdev, &target_st->st_rdev);
8519 __put_user(st.st_size, &target_st->st_size);
8520 __put_user(st.st_blksize, &target_st->st_blksize);
8521 __put_user(st.st_blocks, &target_st->st_blocks);
8522 __put_user(st.st_atime, &target_st->target_st_atime);
8523 __put_user(st.st_mtime, &target_st->target_st_mtime);
8524 __put_user(st.st_ctime, &target_st->target_st_ctime);
53a5960a 8525 unlock_user_struct(target_st, arg2, 1);
31e31b8a
FB		 8526 }
8527 }
8528 break;
ebc05488 8529#ifdef TARGET_NR_olduname
31e31b8a
FB		 8530 case TARGET_NR_olduname:
8531 goto unimplemented;
ebc05488
FB		 8532#endif
8533#ifdef TARGET_NR_iopl
31e31b8a
FB		 8534 case TARGET_NR_iopl:
8535 goto unimplemented;
ebc05488 8536#endif
31e31b8a
FB		 8537 case TARGET_NR_vhangup:
8538 ret = get_errno(vhangup());
8539 break;
ebc05488 8540#ifdef TARGET_NR_idle
31e31b8a
FB		 8541 case TARGET_NR_idle:
8542 goto unimplemented;
42ad6ae9
FB		 8543#endif
8544#ifdef TARGET_NR_syscall
8545 case TARGET_NR_syscall:
5945cfcb
PM		 8546 ret = do_syscall(cpu_env, arg1 & 0xffff, arg2, arg3, arg4, arg5,
8547 arg6, arg7, arg8, 0);
8548 break;
ebc05488 8549#endif
31e31b8a
FB		 8550 case TARGET_NR_wait4:
8551 {
8552 int status;
992f48a0 8553 abi_long status_ptr = arg2;
31e31b8a 8554 struct rusage rusage, *rusage_ptr;
992f48a0 8555 abi_ulong target_rusage = arg4;
a39fb273 8556 abi_long rusage_err;
31e31b8a
FB		 8557 if (target_rusage)
8558 rusage_ptr = &rusage;
8559 else
8560 rusage_ptr = NULL;
4af80a37 8561 ret = get_errno(safe_wait4(arg1, &status, arg3, rusage_ptr));
31e31b8a 8562 if (!is_error(ret)) {
5379557b 8563 if (status_ptr && ret) {
1d9d8b55 8564 status = host_to_target_waitstatus(status);
2f619698
FB		 8565 if (put_user_s32(status, status_ptr))
8566 goto efault;
31e31b8a 8567 }
a39fb273
PJ		 8568 if (target_rusage) {
8569 rusage_err = host_to_target_rusage(target_rusage, &rusage);
8570 if (rusage_err) {
8571 ret = rusage_err;
8572 }
8573 }
31e31b8a
FB		 8574 }
8575 }
8576 break;
e5febef5 8577#ifdef TARGET_NR_swapoff
31e31b8a 8578 case TARGET_NR_swapoff:
579a97f7
FB		 8579 if (!(p = lock_user_string(arg1)))
8580 goto efault;
53a5960a
PB		 8581 ret = get_errno(swapoff(p));
8582 unlock_user(p, arg1, 0);
31e31b8a 8583 break;
e5febef5 8584#endif
31e31b8a 8585 case TARGET_NR_sysinfo:
a5448a7d 8586 {
53a5960a 8587 struct target_sysinfo *target_value;
a5448a7d
FB		 8588 struct sysinfo value;
8589 ret = get_errno(sysinfo(&value));
53a5960a 8590 if (!is_error(ret) && arg1)
a5448a7d 8591 {
579a97f7
FB		 8592 if (!lock_user_struct(VERIFY_WRITE, target_value, arg1, 0))
8593 goto efault;
a5448a7d
FB		 8594 __put_user(value.uptime, &target_value->uptime);
8595 __put_user(value.loads[0], &target_value->loads[0]);
8596 __put_user(value.loads[1], &target_value->loads[1]);
8597 __put_user(value.loads[2], &target_value->loads[2]);
8598 __put_user(value.totalram, &target_value->totalram);
8599 __put_user(value.freeram, &target_value->freeram);
8600 __put_user(value.sharedram, &target_value->sharedram);
8601 __put_user(value.bufferram, &target_value->bufferram);
8602 __put_user(value.totalswap, &target_value->totalswap);
8603 __put_user(value.freeswap, &target_value->freeswap);
8604 __put_user(value.procs, &target_value->procs);
8605 __put_user(value.totalhigh, &target_value->totalhigh);
8606 __put_user(value.freehigh, &target_value->freehigh);
8607 __put_user(value.mem_unit, &target_value->mem_unit);
53a5960a 8608 unlock_user_struct(target_value, arg1, 1);
a5448a7d
FB		 8609 }
8610 }
8611 break;
e5febef5 8612#ifdef TARGET_NR_ipc
31e31b8a 8613 case TARGET_NR_ipc:
8853f86e
FB		 8614 ret = do_ipc(arg1, arg2, arg3, arg4, arg5, arg6);
8615 break;
e5febef5 8616#endif
e5289087
AJ		 8617#ifdef TARGET_NR_semget
8618 case TARGET_NR_semget:
8619 ret = get_errno(semget(arg1, arg2, arg3));
8620 break;
8621#endif
8622#ifdef TARGET_NR_semop
8623 case TARGET_NR_semop:
c7128c9f 8624 ret = do_semop(arg1, arg2, arg3);
e5289087
AJ		 8625 break;
8626#endif
8627#ifdef TARGET_NR_semctl
8628 case TARGET_NR_semctl:
d1c002b6 8629 ret = do_semctl(arg1, arg2, arg3, arg4);
e5289087
AJ		 8630 break;
8631#endif
eeb438c1
AJ		 8632#ifdef TARGET_NR_msgctl
8633 case TARGET_NR_msgctl:
8634 ret = do_msgctl(arg1, arg2, arg3);
8635 break;
8636#endif
8637#ifdef TARGET_NR_msgget
8638 case TARGET_NR_msgget:
8639 ret = get_errno(msgget(arg1, arg2));
8640 break;
8641#endif
8642#ifdef TARGET_NR_msgrcv
8643 case TARGET_NR_msgrcv:
8644 ret = do_msgrcv(arg1, arg2, arg3, arg4, arg5);
8645 break;
8646#endif
8647#ifdef TARGET_NR_msgsnd
8648 case TARGET_NR_msgsnd:
8649 ret = do_msgsnd(arg1, arg2, arg3, arg4);
8650 break;
88a8c984
RV		 8651#endif
8652#ifdef TARGET_NR_shmget
8653 case TARGET_NR_shmget:
8654 ret = get_errno(shmget(arg1, arg2, arg3));
8655 break;
8656#endif
8657#ifdef TARGET_NR_shmctl
8658 case TARGET_NR_shmctl:
8659 ret = do_shmctl(arg1, arg2, arg3);
8660 break;
8661#endif
8662#ifdef TARGET_NR_shmat
8663 case TARGET_NR_shmat:
8664 ret = do_shmat(arg1, arg2, arg3);
8665 break;
8666#endif
8667#ifdef TARGET_NR_shmdt
8668 case TARGET_NR_shmdt:
8669 ret = do_shmdt(arg1);
8670 break;
eeb438c1 8671#endif
31e31b8a
FB		 8672 case TARGET_NR_fsync:
8673 ret = get_errno(fsync(arg1));
8674 break;
31e31b8a 8675 case TARGET_NR_clone:
4ce6243d
PM		 8676 /* Linux manages to have three different orderings for its
8677 * arguments to clone(); the BACKWARDS and BACKWARDS2 defines
8678 * match the kernel's CONFIG_CLONE_* settings.
8679 * Microblaze is further special in that it uses a sixth
8680 * implicit argument to clone for the TLS pointer.
8681 */
8682#if defined(TARGET_MICROBLAZE)
a5b3bdcb 8683 ret = get_errno(do_fork(cpu_env, arg1, arg2, arg4, arg6, arg5));
4ce6243d
PM		 8684#elif defined(TARGET_CLONE_BACKWARDS)
8685 ret = get_errno(do_fork(cpu_env, arg1, arg2, arg3, arg4, arg5));
8686#elif defined(TARGET_CLONE_BACKWARDS2)
a4c075f1 8687 ret = get_errno(do_fork(cpu_env, arg2, arg1, arg3, arg5, arg4));
0b6d3ae0 8688#else
4ce6243d 8689 ret = get_errno(do_fork(cpu_env, arg1, arg2, arg3, arg5, arg4));
0b6d3ae0 8690#endif
1b6b029e 8691 break;
ec86b0fb
FB		 8692#ifdef __NR_exit_group
8693 /* new thread calls */
8694 case TARGET_NR_exit_group:
9788c9ca 8695#ifdef TARGET_GPROF
6d946cda
AJ		 8696 _mcleanup();
8697#endif
e9009676 8698 gdb_exit(cpu_env, arg1);
ec86b0fb
FB		 8699 ret = get_errno(exit_group(arg1));
8700 break;
8701#endif
31e31b8a 8702 case TARGET_NR_setdomainname:
579a97f7
FB		 8703 if (!(p = lock_user_string(arg1)))
8704 goto efault;
53a5960a
PB		 8705 ret = get_errno(setdomainname(p, arg2));
8706 unlock_user(p, arg1, 0);
31e31b8a
FB		 8707 break;
8708 case TARGET_NR_uname:
8709 /* no need to transcode because we use the linux syscall */
29e619b1
FB		 8710 {
8711 struct new_utsname * buf;
3b46e624 8712
579a97f7
FB		 8713 if (!lock_user_struct(VERIFY_WRITE, buf, arg1, 0))
8714 goto efault;
29e619b1
FB		 8715 ret = get_errno(sys_uname(buf));
8716 if (!is_error(ret)) {
8717 /* Overrite the native machine name with whatever is being
8718 emulated. */
da79030f 8719 strcpy (buf->machine, cpu_to_uname_machine(cpu_env));
c5937220
PB		 8720 /* Allow the user to override the reported release. */
8721 if (qemu_uname_release && *qemu_uname_release)
8722 strcpy (buf->release, qemu_uname_release);
29e619b1 8723 }
53a5960a 8724 unlock_user_struct(buf, arg1, 1);
29e619b1 8725 }
31e31b8a 8726 break;
6dbad63e 8727#ifdef TARGET_I386
31e31b8a 8728 case TARGET_NR_modify_ldt:
03acab66 8729 ret = do_modify_ldt(cpu_env, arg1, arg2, arg3);
5cd4393b 8730 break;
84409ddb 8731#if !defined(TARGET_X86_64)
5cd4393b
FB		 8732 case TARGET_NR_vm86old:
8733 goto unimplemented;
8734 case TARGET_NR_vm86:
53a5960a 8735 ret = do_vm86(cpu_env, arg1, arg2);
6dbad63e 8736 break;
84409ddb 8737#endif
6dbad63e 8738#endif
31e31b8a
FB		 8739 case TARGET_NR_adjtimex:
8740 goto unimplemented;
e5febef5 8741#ifdef TARGET_NR_create_module
31e31b8a 8742 case TARGET_NR_create_module:
e5febef5 8743#endif
31e31b8a
FB		 8744 case TARGET_NR_init_module:
8745 case TARGET_NR_delete_module:
e5febef5 8746#ifdef TARGET_NR_get_kernel_syms
31e31b8a 8747 case TARGET_NR_get_kernel_syms:
e5febef5 8748#endif
31e31b8a
FB		 8749 goto unimplemented;
8750 case TARGET_NR_quotactl:
8751 goto unimplemented;
8752 case TARGET_NR_getpgid:
8753 ret = get_errno(getpgid(arg1));
8754 break;
8755 case TARGET_NR_fchdir:
8756 ret = get_errno(fchdir(arg1));
8757 break;
84409ddb 8758#ifdef TARGET_NR_bdflush /* not on x86_64 */
31e31b8a
FB		 8759 case TARGET_NR_bdflush:
8760 goto unimplemented;
84409ddb 8761#endif
e5febef5 8762#ifdef TARGET_NR_sysfs
31e31b8a
FB		 8763 case TARGET_NR_sysfs:
8764 goto unimplemented;
e5febef5 8765#endif
31e31b8a 8766 case TARGET_NR_personality:
1b6b029e 8767 ret = get_errno(personality(arg1));
31e31b8a 8768 break;
e5febef5 8769#ifdef TARGET_NR_afs_syscall
31e31b8a
FB		 8770 case TARGET_NR_afs_syscall:
8771 goto unimplemented;
e5febef5 8772#endif
7a3148a9 8773#ifdef TARGET_NR__llseek /* Not on alpha */
31e31b8a
FB		 8774 case TARGET_NR__llseek:
8775 {
0c1592d9 8776 int64_t res;
d35b261c 8777#if !defined(__NR_llseek)
0c1592d9
PM		 8778 res = lseek(arg1, ((uint64_t)arg2 << 32) | arg3, arg5);
8779 if (res == -1) {
8780 ret = get_errno(res);
8781 } else {
8782 ret = 0;
8783 }
4f2ac237 8784#else
31e31b8a 8785 ret = get_errno(_llseek(arg1, arg2, arg3, &res, arg5));
4f2ac237 8786#endif
0c1592d9
PM		 8787 if ((ret == 0) && put_user_s64(res, arg4)) {
8788 goto efault;
8789 }
31e31b8a
FB		 8790 }
8791 break;
7a3148a9 8792#endif
704eff6c 8793#ifdef TARGET_NR_getdents
31e31b8a 8794 case TARGET_NR_getdents:
3307e236 8795#ifdef __NR_getdents
d83c8733 8796#if TARGET_ABI_BITS == 32 && HOST_LONG_BITS == 64
4add45b4 8797 {
53a5960a 8798 struct target_dirent *target_dirp;
6556a833 8799 struct linux_dirent *dirp;
992f48a0 8800 abi_long count = arg3;
4add45b4 8801
0e173b24
HK		 8802 dirp = g_try_malloc(count);
8803 if (!dirp) {
579a97f7 8804 ret = -TARGET_ENOMEM;
0da46a6e
TS		 8805 goto fail;
8806 }
3b46e624 8807
4add45b4
FB		 8808 ret = get_errno(sys_getdents(arg1, dirp, count));
8809 if (!is_error(ret)) {
6556a833 8810 struct linux_dirent *de;
4add45b4
FB		 8811 struct target_dirent *tde;
8812 int len = ret;
8813 int reclen, treclen;
8814 int count1, tnamelen;
8815
8816 count1 = 0;
8817 de = dirp;
579a97f7
FB		 8818 if (!(target_dirp = lock_user(VERIFY_WRITE, arg2, count, 0)))
8819 goto efault;
4add45b4
FB		 8820 tde = target_dirp;
8821 while (len > 0) {
8822 reclen = de->d_reclen;
333858b7
DL		 8823 tnamelen = reclen - offsetof(struct linux_dirent, d_name);
8824 assert(tnamelen >= 0);
8825 treclen = tnamelen + offsetof(struct target_dirent, d_name);
8826 assert(count1 + treclen <= count);
4add45b4 8827 tde->d_reclen = tswap16(treclen);
cbb21eed
MB		 8828 tde->d_ino = tswapal(de->d_ino);
8829 tde->d_off = tswapal(de->d_off);
333858b7 8830 memcpy(tde->d_name, de->d_name, tnamelen);
6556a833 8831 de = (struct linux_dirent *)((char *)de + reclen);
4add45b4 8832 len -= reclen;
1c5bf3bf 8833 tde = (struct target_dirent *)((char *)tde + treclen);
4add45b4
FB		 8834 count1 += treclen;
8835 }
8836 ret = count1;
579a97f7 8837 unlock_user(target_dirp, arg2, ret);
4add45b4 8838 }
0e173b24 8839 g_free(dirp);
4add45b4
FB		 8840 }
8841#else
31e31b8a 8842 {
6556a833 8843 struct linux_dirent *dirp;
992f48a0 8844 abi_long count = arg3;
dab2ed99 8845
579a97f7
FB		 8846 if (!(dirp = lock_user(VERIFY_WRITE, arg2, count, 0)))
8847 goto efault;
72f03900 8848 ret = get_errno(sys_getdents(arg1, dirp, count));
31e31b8a 8849 if (!is_error(ret)) {
6556a833 8850 struct linux_dirent *de;
31e31b8a
FB		 8851 int len = ret;
8852 int reclen;
8853 de = dirp;
8854 while (len > 0) {
8083a3e5 8855 reclen = de->d_reclen;
31e31b8a
FB		 8856 if (reclen > len)
8857 break;
8083a3e5 8858 de->d_reclen = tswap16(reclen);
31e31b8a
FB		 8859 tswapls(&de->d_ino);
8860 tswapls(&de->d_off);
6556a833 8861 de = (struct linux_dirent *)((char *)de + reclen);
31e31b8a
FB		 8862 len -= reclen;
8863 }
8864 }
53a5960a 8865 unlock_user(dirp, arg2, ret);
3307e236
PM		 8866 }
8867#endif
8868#else
8869 /* Implement getdents in terms of getdents64 */
8870 {
8871 struct linux_dirent64 *dirp;
8872 abi_long count = arg3;
8873
8874 dirp = lock_user(VERIFY_WRITE, arg2, count, 0);
8875 if (!dirp) {
8876 goto efault;
8877 }
8878 ret = get_errno(sys_getdents64(arg1, dirp, count));
8879 if (!is_error(ret)) {
8880 /* Convert the dirent64 structs to target dirent. We do this
8881 * in-place, since we can guarantee that a target_dirent is no
8882 * larger than a dirent64; however this means we have to be
8883 * careful to read everything before writing in the new format.
8884 */
8885 struct linux_dirent64 *de;
8886 struct target_dirent *tde;
8887 int len = ret;
8888 int tlen = 0;
8889
8890 de = dirp;
8891 tde = (struct target_dirent *)dirp;
8892 while (len > 0) {
8893 int namelen, treclen;
8894 int reclen = de->d_reclen;
8895 uint64_t ino = de->d_ino;
8896 int64_t off = de->d_off;
8897 uint8_t type = de->d_type;
8898
8899 namelen = strlen(de->d_name);
8900 treclen = offsetof(struct target_dirent, d_name)
8901 + namelen + 2;
8902 treclen = QEMU_ALIGN_UP(treclen, sizeof(abi_long));
8903
8904 memmove(tde->d_name, de->d_name, namelen + 1);
8905 tde->d_ino = tswapal(ino);
8906 tde->d_off = tswapal(off);
8907 tde->d_reclen = tswap16(treclen);
8908 /* The target_dirent type is in what was formerly a padding
8909 * byte at the end of the structure:
8910 */
8911 *(((char *)tde) + treclen - 1) = type;
8912
8913 de = (struct linux_dirent64 *)((char *)de + reclen);
8914 tde = (struct target_dirent *)((char *)tde + treclen);
8915 len -= reclen;
8916 tlen += treclen;
8917 }
8918 ret = tlen;
8919 }
8920 unlock_user(dirp, arg2, ret);
31e31b8a 8921 }
4add45b4 8922#endif
31e31b8a 8923 break;
704eff6c 8924#endif /* TARGET_NR_getdents */
3ae43202 8925#if defined(TARGET_NR_getdents64) && defined(__NR_getdents64)
dab2ed99
FB		 8926 case TARGET_NR_getdents64:
8927 {
6556a833 8928 struct linux_dirent64 *dirp;
992f48a0 8929 abi_long count = arg3;
579a97f7
FB		 8930 if (!(dirp = lock_user(VERIFY_WRITE, arg2, count, 0)))
8931 goto efault;
dab2ed99
FB		 8932 ret = get_errno(sys_getdents64(arg1, dirp, count));
8933 if (!is_error(ret)) {
6556a833 8934 struct linux_dirent64 *de;
dab2ed99
FB		 8935 int len = ret;
8936 int reclen;
8937 de = dirp;
8938 while (len > 0) {
8083a3e5 8939 reclen = de->d_reclen;
dab2ed99
FB		 8940 if (reclen > len)
8941 break;
8083a3e5 8942 de->d_reclen = tswap16(reclen);
8582a53a
FB		 8943 tswap64s((uint64_t *)&de->d_ino);
8944 tswap64s((uint64_t *)&de->d_off);
6556a833 8945 de = (struct linux_dirent64 *)((char *)de + reclen);
dab2ed99
FB		 8946 len -= reclen;
8947 }
8948 }
53a5960a 8949 unlock_user(dirp, arg2, ret);
dab2ed99
FB		 8950 }
8951 break;
a541f297 8952#endif /* TARGET_NR_getdents64 */
9468a5d4 8953#if defined(TARGET_NR__newselect)
31e31b8a 8954 case TARGET_NR__newselect:
53a5960a 8955 ret = do_select(arg1, arg2, arg3, arg4, arg5);
31e31b8a 8956 break;
e5febef5 8957#endif
d8035d4c
MF		 8958#if defined(TARGET_NR_poll) || defined(TARGET_NR_ppoll)
8959# ifdef TARGET_NR_poll
9de5e440 8960 case TARGET_NR_poll:
d8035d4c
MF		 8961# endif
8962# ifdef TARGET_NR_ppoll
8963 case TARGET_NR_ppoll:
8964# endif
9de5e440 8965 {
53a5960a 8966 struct target_pollfd *target_pfd;
9de5e440 8967 unsigned int nfds = arg2;
9de5e440 8968 struct pollfd *pfd;
7854b056 8969 unsigned int i;
9de5e440 8970
3e24bb3f
LV		 8971 pfd = NULL;
8972 target_pfd = NULL;
8973 if (nfds) {
8974 target_pfd = lock_user(VERIFY_WRITE, arg1,
8975 sizeof(struct target_pollfd) * nfds, 1);
8976 if (!target_pfd) {
8977 goto efault;
8978 }
d8035d4c 8979
3e24bb3f
LV		 8980 pfd = alloca(sizeof(struct pollfd) * nfds);
8981 for (i = 0; i < nfds; i++) {
8982 pfd[i].fd = tswap32(target_pfd[i].fd);
8983 pfd[i].events = tswap16(target_pfd[i].events);
8984 }
9de5e440 8985 }
d8035d4c 8986
a6130237 8987 switch (num) {
d8035d4c 8988# ifdef TARGET_NR_ppoll
a6130237
PM		 8989 case TARGET_NR_ppoll:
8990 {
d8035d4c
MF		 8991 struct timespec _timeout_ts, *timeout_ts = &_timeout_ts;
8992 target_sigset_t *target_set;
8993 sigset_t _set, *set = &_set;
8994
8995 if (arg3) {
8996 if (target_to_host_timespec(timeout_ts, arg3)) {
8997 unlock_user(target_pfd, arg1, 0);
8998 goto efault;
8999 }
9000 } else {
9001 timeout_ts = NULL;
9002 }
9003
9004 if (arg4) {
9005 target_set = lock_user(VERIFY_READ, arg4, sizeof(target_sigset_t), 1);
9006 if (!target_set) {
9007 unlock_user(target_pfd, arg1, 0);
9008 goto efault;
9009 }
9010 target_to_host_sigset(set, target_set);
9011 } else {
9012 set = NULL;
9013 }
9014
a6130237
PM		 9015 ret = get_errno(safe_ppoll(pfd, nfds, timeout_ts,
9016 set, SIGSET_T_SIZE));
d8035d4c
MF		 9017
9018 if (!is_error(ret) && arg3) {
9019 host_to_target_timespec(arg3, timeout_ts);
9020 }
9021 if (arg4) {
9022 unlock_user(target_set, arg4, 0);
9023 }
a6130237
PM		 9024 break;
9025 }
d8035d4c 9026# endif
a6130237
PM		 9027# ifdef TARGET_NR_poll
9028 case TARGET_NR_poll:
9029 {
9030 struct timespec ts, *pts;
9031
9032 if (arg3 >= 0) {
9033 /* Convert ms to secs, ns */
9034 ts.tv_sec = arg3 / 1000;
9035 ts.tv_nsec = (arg3 % 1000) * 1000000LL;
9036 pts = &ts;
9037 } else {
9038 /* -ve poll() timeout means "infinite" */
9039 pts = NULL;
9040 }
9041 ret = get_errno(safe_ppoll(pfd, nfds, pts, NULL, 0));
9042 break;
9043 }
d8035d4c 9044# endif
a6130237
PM		 9045 default:
9046 g_assert_not_reached();
9047 }
d8035d4c 9048
9de5e440
FB		 9049 if (!is_error(ret)) {
9050 for(i = 0; i < nfds; i++) {
5cd4393b 9051 target_pfd[i].revents = tswap16(pfd[i].revents);
9de5e440
FB		 9052 }
9053 }
30cb4cde 9054 unlock_user(target_pfd, arg1, sizeof(struct target_pollfd) * nfds);
9de5e440
FB		 9055 }
9056 break;
e5febef5 9057#endif
31e31b8a 9058 case TARGET_NR_flock:
9de5e440
FB		 9059 /* NOTE: the flock constant seems to be the same for every
9060 Linux platform */
2a845989 9061 ret = get_errno(safe_flock(arg1, arg2));
31e31b8a
FB		 9062 break;
9063 case TARGET_NR_readv:
9064 {
f287b2c2
RH		 9065 struct iovec *vec = lock_iovec(VERIFY_WRITE, arg2, arg3, 0);
9066 if (vec != NULL) {
918c03ed 9067 ret = get_errno(safe_readv(arg1, vec, arg3));
f287b2c2
RH		 9068 unlock_iovec(vec, arg2, arg3, 1);
9069 } else {
9070 ret = -host_to_target_errno(errno);
9071 }
31e31b8a
FB		 9072 }
9073 break;
9074 case TARGET_NR_writev:
9075 {
f287b2c2
RH		 9076 struct iovec *vec = lock_iovec(VERIFY_READ, arg2, arg3, 1);
9077 if (vec != NULL) {
918c03ed 9078 ret = get_errno(safe_writev(arg1, vec, arg3));
f287b2c2
RH		 9079 unlock_iovec(vec, arg2, arg3, 0);
9080 } else {
9081 ret = -host_to_target_errno(errno);
9082 }
31e31b8a
FB		 9083 }
9084 break;
9085 case TARGET_NR_getsid:
9086 ret = get_errno(getsid(arg1));
9087 break;
7a3148a9 9088#if defined(TARGET_NR_fdatasync) /* Not on alpha (osf_datasync ?) */
31e31b8a 9089 case TARGET_NR_fdatasync:
5cd4393b
FB		 9090 ret = get_errno(fdatasync(arg1));
9091 break;
7a3148a9 9092#endif
704eff6c 9093#ifdef TARGET_NR__sysctl
31e31b8a 9094 case TARGET_NR__sysctl:
0da46a6e 9095 /* We don't implement this, but ENOTDIR is always a safe
29e619b1 9096 return value. */
0da46a6e
TS		 9097 ret = -TARGET_ENOTDIR;
9098 break;
704eff6c 9099#endif
737de1d1
MF		 9100 case TARGET_NR_sched_getaffinity:
9101 {
9102 unsigned int mask_size;
9103 unsigned long *mask;
9104
9105 /*
9106 * sched_getaffinity needs multiples of ulong, so need to take
9107 * care of mismatches between target ulong and host ulong sizes.
9108 */
9109 if (arg2 & (sizeof(abi_ulong) - 1)) {
9110 ret = -TARGET_EINVAL;
9111 break;
9112 }
9113 mask_size = (arg2 + (sizeof(*mask) - 1)) & ~(sizeof(*mask) - 1);
9114
9115 mask = alloca(mask_size);
9116 ret = get_errno(sys_sched_getaffinity(arg1, mask_size, mask));
9117
9118 if (!is_error(ret)) {
be3bd286
PM		 9119 if (ret > arg2) {
9120 /* More data returned than the caller's buffer will fit.
9121 * This only happens if sizeof(abi_long) < sizeof(long)
9122 * and the caller passed us a buffer holding an odd number
9123 * of abi_longs. If the host kernel is actually using the
9124 * extra 4 bytes then fail EINVAL; otherwise we can just
9125 * ignore them and only copy the interesting part.
9126 */
9127 int numcpus = sysconf(_SC_NPROCESSORS_CONF);
9128 if (numcpus > arg2 * 8) {
9129 ret = -TARGET_EINVAL;
9130 break;
9131 }
9132 ret = arg2;
9133 }
9134
cd18f05e 9135 if (copy_to_user(arg3, mask, ret)) {
737de1d1
MF		 9136 goto efault;
9137 }
737de1d1
MF		 9138 }
9139 }
9140 break;
9141 case TARGET_NR_sched_setaffinity:
9142 {
9143 unsigned int mask_size;
9144 unsigned long *mask;
9145
9146 /*
9147 * sched_setaffinity needs multiples of ulong, so need to take
9148 * care of mismatches between target ulong and host ulong sizes.
9149 */
9150 if (arg2 & (sizeof(abi_ulong) - 1)) {
9151 ret = -TARGET_EINVAL;
9152 break;
9153 }
9154 mask_size = (arg2 + (sizeof(*mask) - 1)) & ~(sizeof(*mask) - 1);
9155
9156 mask = alloca(mask_size);
9157 if (!lock_user_struct(VERIFY_READ, p, arg3, 1)) {
9158 goto efault;
9159 }
9160 memcpy(mask, p, arg2);
9161 unlock_user_struct(p, arg2, 0);
9162
9163 ret = get_errno(sys_sched_setaffinity(arg1, mask_size, mask));
9164 }
9165 break;
31e31b8a 9166 case TARGET_NR_sched_setparam:
5cd4393b 9167 {
53a5960a 9168 struct sched_param *target_schp;
5cd4393b 9169 struct sched_param schp;
53a5960a 9170
a1d5c5b2
TM		 9171 if (arg2 == 0) {
9172 return -TARGET_EINVAL;
9173 }
579a97f7
FB		 9174 if (!lock_user_struct(VERIFY_READ, target_schp, arg2, 1))
9175 goto efault;
5cd4393b 9176 schp.sched_priority = tswap32(target_schp->sched_priority);
53a5960a 9177 unlock_user_struct(target_schp, arg2, 0);
5cd4393b
FB		 9178 ret = get_errno(sched_setparam(arg1, &schp));
9179 }
9180 break;
31e31b8a 9181 case TARGET_NR_sched_getparam:
5cd4393b 9182 {
53a5960a 9183 struct sched_param *target_schp;
5cd4393b 9184 struct sched_param schp;
a1d5c5b2
TM		 9185
9186 if (arg2 == 0) {
9187 return -TARGET_EINVAL;
9188 }
5cd4393b
FB		 9189 ret = get_errno(sched_getparam(arg1, &schp));
9190 if (!is_error(ret)) {
579a97f7
FB		 9191 if (!lock_user_struct(VERIFY_WRITE, target_schp, arg2, 0))
9192 goto efault;
5cd4393b 9193 target_schp->sched_priority = tswap32(schp.sched_priority);
53a5960a 9194 unlock_user_struct(target_schp, arg2, 1);
5cd4393b
FB		 9195 }
9196 }
9197 break;
31e31b8a 9198 case TARGET_NR_sched_setscheduler:
5cd4393b 9199 {
53a5960a 9200 struct sched_param *target_schp;
5cd4393b 9201 struct sched_param schp;
a1d5c5b2
TM		 9202 if (arg3 == 0) {
9203 return -TARGET_EINVAL;
9204 }
579a97f7
FB		 9205 if (!lock_user_struct(VERIFY_READ, target_schp, arg3, 1))
9206 goto efault;
5cd4393b 9207 schp.sched_priority = tswap32(target_schp->sched_priority);
53a5960a 9208 unlock_user_struct(target_schp, arg3, 0);
5cd4393b
FB		 9209 ret = get_errno(sched_setscheduler(arg1, arg2, &schp));
9210 }
9211 break;
31e31b8a 9212 case TARGET_NR_sched_getscheduler:
5cd4393b
FB		 9213 ret = get_errno(sched_getscheduler(arg1));
9214 break;
31e31b8a
FB		 9215 case TARGET_NR_sched_yield:
9216 ret = get_errno(sched_yield());
9217 break;
9218 case TARGET_NR_sched_get_priority_max:
5cd4393b
FB		 9219 ret = get_errno(sched_get_priority_max(arg1));
9220 break;
31e31b8a 9221 case TARGET_NR_sched_get_priority_min:
5cd4393b
FB		 9222 ret = get_errno(sched_get_priority_min(arg1));
9223 break;
31e31b8a 9224 case TARGET_NR_sched_rr_get_interval:
5cd4393b 9225 {
5cd4393b
FB		 9226 struct timespec ts;
9227 ret = get_errno(sched_rr_get_interval(arg1, &ts));
9228 if (!is_error(ret)) {
d4290c40 9229 ret = host_to_target_timespec(arg2, &ts);
5cd4393b
FB		 9230 }
9231 }
9232 break;
31e31b8a 9233 case TARGET_NR_nanosleep:
1b6b029e 9234 {
1b6b029e 9235 struct timespec req, rem;
53a5960a 9236 target_to_host_timespec(&req, arg1);
9e518226 9237 ret = get_errno(safe_nanosleep(&req, &rem));
53a5960a
PB		 9238 if (is_error(ret) && arg2) {
9239 host_to_target_timespec(arg2, &rem);
1b6b029e
FB		 9240 }
9241 }
9242 break;
e5febef5 9243#ifdef TARGET_NR_query_module
31e31b8a 9244 case TARGET_NR_query_module:
5cd4393b 9245 goto unimplemented;
e5febef5
TS		 9246#endif
9247#ifdef TARGET_NR_nfsservctl
31e31b8a 9248 case TARGET_NR_nfsservctl:
5cd4393b 9249 goto unimplemented;
e5febef5 9250#endif
31e31b8a 9251 case TARGET_NR_prctl:
1e6722f8
PM		 9252 switch (arg1) {
9253 case PR_GET_PDEATHSIG:
9254 {
9255 int deathsig;
9256 ret = get_errno(prctl(arg1, &deathsig, arg3, arg4, arg5));
9257 if (!is_error(ret) && arg2
9258 && put_user_ual(deathsig, arg2)) {
9259 goto efault;
e5574487 9260 }
1e6722f8
PM		 9261 break;
9262 }
db9526b1
PM		 9263#ifdef PR_GET_NAME
9264 case PR_GET_NAME:
9265 {
9266 void *name = lock_user(VERIFY_WRITE, arg2, 16, 1);
9267 if (!name) {
9268 goto efault;
9269 }
9270 ret = get_errno(prctl(arg1, (unsigned long)name,
9271 arg3, arg4, arg5));
9272 unlock_user(name, arg2, 16);
9273 break;
9274 }
9275 case PR_SET_NAME:
9276 {
9277 void *name = lock_user(VERIFY_READ, arg2, 16, 1);
9278 if (!name) {
9279 goto efault;
9280 }
9281 ret = get_errno(prctl(arg1, (unsigned long)name,
9282 arg3, arg4, arg5));
9283 unlock_user(name, arg2, 0);
9284 break;
9285 }
9286#endif
1e6722f8
PM		 9287 default:
9288 /* Most prctl options have no pointer arguments */
9289 ret = get_errno(prctl(arg1, arg2, arg3, arg4, arg5));
9290 break;
9291 }
39b9aae1 9292 break;
d2fd1af7
FB		 9293#ifdef TARGET_NR_arch_prctl
9294 case TARGET_NR_arch_prctl:
9295#if defined(TARGET_I386) && !defined(TARGET_ABI32)
9296 ret = do_arch_prctl(cpu_env, arg1, arg2);
9297 break;
9298#else
9299 goto unimplemented;
9300#endif
9301#endif
f2c7ba15
AJ		 9302#ifdef TARGET_NR_pread64
9303 case TARGET_NR_pread64:
ae017a5b
AG		 9304 if (regpairs_aligned(cpu_env)) {
9305 arg4 = arg5;
9306 arg5 = arg6;
9307 }
f2c7ba15
AJ		 9308 if (!(p = lock_user(VERIFY_WRITE, arg2, arg3, 0)))
9309 goto efault;
9310 ret = get_errno(pread64(arg1, p, arg3, target_offset64(arg4, arg5)));
9311 unlock_user(p, arg2, ret);
9312 break;
9313 case TARGET_NR_pwrite64:
ae017a5b
AG		 9314 if (regpairs_aligned(cpu_env)) {
9315 arg4 = arg5;
9316 arg5 = arg6;
9317 }
f2c7ba15
AJ		 9318 if (!(p = lock_user(VERIFY_READ, arg2, arg3, 1)))
9319 goto efault;
9320 ret = get_errno(pwrite64(arg1, p, arg3, target_offset64(arg4, arg5)));
9321 unlock_user(p, arg2, 0);
9322 break;
67867308 9323#endif
31e31b8a 9324 case TARGET_NR_getcwd:
579a97f7
FB		 9325 if (!(p = lock_user(VERIFY_WRITE, arg1, arg2, 0)))
9326 goto efault;
53a5960a
PB		 9327 ret = get_errno(sys_getcwd1(p, arg2));
9328 unlock_user(p, arg1, ret);
31e31b8a
FB		 9329 break;
9330 case TARGET_NR_capget:
9331 case TARGET_NR_capset:
e0eb210e
PM		 9332 {
9333 struct target_user_cap_header *target_header;
9334 struct target_user_cap_data *target_data = NULL;
9335 struct __user_cap_header_struct header;
9336 struct __user_cap_data_struct data[2];
9337 struct __user_cap_data_struct *dataptr = NULL;
9338 int i, target_datalen;
9339 int data_items = 1;
9340
9341 if (!lock_user_struct(VERIFY_WRITE, target_header, arg1, 1)) {
9342 goto efault;
9343 }
9344 header.version = tswap32(target_header->version);
9345 header.pid = tswap32(target_header->pid);
9346
ec864874 9347 if (header.version != _LINUX_CAPABILITY_VERSION) {
e0eb210e
PM		 9348 /* Version 2 and up takes pointer to two user_data structs */
9349 data_items = 2;
9350 }
9351
9352 target_datalen = sizeof(*target_data) * data_items;
9353
9354 if (arg2) {
9355 if (num == TARGET_NR_capget) {
9356 target_data = lock_user(VERIFY_WRITE, arg2, target_datalen, 0);
9357 } else {
9358 target_data = lock_user(VERIFY_READ, arg2, target_datalen, 1);
9359 }
9360 if (!target_data) {
9361 unlock_user_struct(target_header, arg1, 0);
9362 goto efault;
9363 }
9364
9365 if (num == TARGET_NR_capset) {
9366 for (i = 0; i < data_items; i++) {
9367 data[i].effective = tswap32(target_data[i].effective);
9368 data[i].permitted = tswap32(target_data[i].permitted);
9369 data[i].inheritable = tswap32(target_data[i].inheritable);
9370 }
9371 }
9372
9373 dataptr = data;
9374 }
9375
9376 if (num == TARGET_NR_capget) {
9377 ret = get_errno(capget(&header, dataptr));
9378 } else {
9379 ret = get_errno(capset(&header, dataptr));
9380 }
9381
9382 /* The kernel always updates version for both capget and capset */
9383 target_header->version = tswap32(header.version);
9384 unlock_user_struct(target_header, arg1, 1);
9385
9386 if (arg2) {
9387 if (num == TARGET_NR_capget) {
9388 for (i = 0; i < data_items; i++) {
9389 target_data[i].effective = tswap32(data[i].effective);
9390 target_data[i].permitted = tswap32(data[i].permitted);
9391 target_data[i].inheritable = tswap32(data[i].inheritable);
9392 }
9393 unlock_user(target_data, arg2, target_datalen);
9394 } else {
9395 unlock_user(target_data, arg2, 0);
9396 }
9397 }
9398 break;
9399 }
31e31b8a 9400 case TARGET_NR_sigaltstack:
9349b4f9 9401 ret = do_sigaltstack(arg1, arg2, get_sp_from_cpustate((CPUArchState *)cpu_env));
a04e134a 9402 break;
a8fd1aba
PM		 9403
9404#ifdef CONFIG_SENDFILE
9405 case TARGET_NR_sendfile:
9406 {
9407 off_t *offp = NULL;
9408 off_t off;
9409 if (arg3) {
9410 ret = get_user_sal(off, arg3);
9411 if (is_error(ret)) {
9412 break;
9413 }
9414 offp = &off;
9415 }
9416 ret = get_errno(sendfile(arg1, arg2, offp, arg4));
9417 if (!is_error(ret) && arg3) {
9418 abi_long ret2 = put_user_sal(off, arg3);
9419 if (is_error(ret2)) {
9420 ret = ret2;
9421 }
9422 }
9423 break;
9424 }
9425#ifdef TARGET_NR_sendfile64
9426 case TARGET_NR_sendfile64:
9427 {
9428 off_t *offp = NULL;
9429 off_t off;
9430 if (arg3) {
9431 ret = get_user_s64(off, arg3);
9432 if (is_error(ret)) {
9433 break;
9434 }
9435 offp = &off;
9436 }
9437 ret = get_errno(sendfile(arg1, arg2, offp, arg4));
9438 if (!is_error(ret) && arg3) {
9439 abi_long ret2 = put_user_s64(off, arg3);
9440 if (is_error(ret2)) {
9441 ret = ret2;
9442 }
9443 }
9444 break;
9445 }
9446#endif
9447#else
31e31b8a 9448 case TARGET_NR_sendfile:
7edd2cf1 9449#ifdef TARGET_NR_sendfile64
a8fd1aba
PM		 9450 case TARGET_NR_sendfile64:
9451#endif
5cd4393b 9452 goto unimplemented;
a8fd1aba
PM		 9453#endif
9454
ebc05488 9455#ifdef TARGET_NR_getpmsg
31e31b8a 9456 case TARGET_NR_getpmsg:
5cd4393b 9457 goto unimplemented;
ebc05488
FB		 9458#endif
9459#ifdef TARGET_NR_putpmsg
31e31b8a 9460 case TARGET_NR_putpmsg:
5cd4393b 9461 goto unimplemented;
ebc05488 9462#endif
048f6b4d 9463#ifdef TARGET_NR_vfork
31e31b8a 9464 case TARGET_NR_vfork:
d865bab5
PB		 9465 ret = get_errno(do_fork(cpu_env, CLONE_VFORK | CLONE_VM | SIGCHLD,
9466 0, 0, 0, 0));
31e31b8a 9467 break;
048f6b4d 9468#endif
ebc05488 9469#ifdef TARGET_NR_ugetrlimit
31e31b8a 9470 case TARGET_NR_ugetrlimit:
728584be
FB		 9471 {
9472 struct rlimit rlim;
e22b7015
WT		 9473 int resource = target_to_host_resource(arg1);
9474 ret = get_errno(getrlimit(resource, &rlim));
728584be 9475 if (!is_error(ret)) {
53a5960a 9476 struct target_rlimit *target_rlim;
579a97f7
FB		 9477 if (!lock_user_struct(VERIFY_WRITE, target_rlim, arg2, 0))
9478 goto efault;
81bbe906
TY		 9479 target_rlim->rlim_cur = host_to_target_rlim(rlim.rlim_cur);
9480 target_rlim->rlim_max = host_to_target_rlim(rlim.rlim_max);
53a5960a 9481 unlock_user_struct(target_rlim, arg2, 1);
728584be
FB		 9482 }
9483 break;
9484 }
ebc05488 9485#endif
a315a145 9486#ifdef TARGET_NR_truncate64
31e31b8a 9487 case TARGET_NR_truncate64:
579a97f7
FB		 9488 if (!(p = lock_user_string(arg1)))
9489 goto efault;
53a5960a
PB		 9490 ret = target_truncate64(cpu_env, p, arg2, arg3, arg4);
9491 unlock_user(p, arg1, 0);
667f38b1 9492 break;
a315a145
FB		 9493#endif
9494#ifdef TARGET_NR_ftruncate64
31e31b8a 9495 case TARGET_NR_ftruncate64:
ce4defa0 9496 ret = target_ftruncate64(cpu_env, arg1, arg2, arg3, arg4);
667f38b1 9497 break;
a315a145
FB		 9498#endif
9499#ifdef TARGET_NR_stat64
31e31b8a 9500 case TARGET_NR_stat64:
579a97f7
FB		 9501 if (!(p = lock_user_string(arg1)))
9502 goto efault;
53a5960a
PB		 9503 ret = get_errno(stat(path(p), &st));
9504 unlock_user(p, arg1, 0);
6a24a778
AZ		 9505 if (!is_error(ret))
9506 ret = host_to_target_stat64(cpu_env, arg2, &st);
9507 break;
a315a145
FB		 9508#endif
9509#ifdef TARGET_NR_lstat64
31e31b8a 9510 case TARGET_NR_lstat64:
579a97f7
FB		 9511 if (!(p = lock_user_string(arg1)))
9512 goto efault;
53a5960a
PB		 9513 ret = get_errno(lstat(path(p), &st));
9514 unlock_user(p, arg1, 0);
6a24a778
AZ		 9515 if (!is_error(ret))
9516 ret = host_to_target_stat64(cpu_env, arg2, &st);
9517 break;
a315a145
FB		 9518#endif
9519#ifdef TARGET_NR_fstat64
31e31b8a 9520 case TARGET_NR_fstat64:
6a24a778
AZ		 9521 ret = get_errno(fstat(arg1, &st));
9522 if (!is_error(ret))
9523 ret = host_to_target_stat64(cpu_env, arg2, &st);
9524 break;
ce4defa0 9525#endif
c0d472b1 9526#if (defined(TARGET_NR_fstatat64) || defined(TARGET_NR_newfstatat))
9d33b76b 9527#ifdef TARGET_NR_fstatat64
6a24a778 9528 case TARGET_NR_fstatat64:
9d33b76b
AJ		 9529#endif
9530#ifdef TARGET_NR_newfstatat
9531 case TARGET_NR_newfstatat:
9532#endif
6a24a778
AZ		 9533 if (!(p = lock_user_string(arg2)))
9534 goto efault;
c0d472b1 9535 ret = get_errno(fstatat(arg1, path(p), &st, arg4));
6a24a778
AZ		 9536 if (!is_error(ret))
9537 ret = host_to_target_stat64(cpu_env, arg3, &st);
60cd49d5 9538 break;
a315a145 9539#endif
704eff6c 9540#ifdef TARGET_NR_lchown
67867308 9541 case TARGET_NR_lchown:
579a97f7
FB		 9542 if (!(p = lock_user_string(arg1)))
9543 goto efault;
53a5960a
PB		 9544 ret = get_errno(lchown(p, low2highuid(arg2), low2highgid(arg3)));
9545 unlock_user(p, arg1, 0);
67867308 9546 break;
704eff6c 9547#endif
0c866a7e 9548#ifdef TARGET_NR_getuid
67867308
FB		 9549 case TARGET_NR_getuid:
9550 ret = get_errno(high2lowuid(getuid()));
9551 break;
0c866a7e
RV		 9552#endif
9553#ifdef TARGET_NR_getgid
67867308
FB		 9554 case TARGET_NR_getgid:
9555 ret = get_errno(high2lowgid(getgid()));
9556 break;
0c866a7e
RV		 9557#endif
9558#ifdef TARGET_NR_geteuid
67867308
FB		 9559 case TARGET_NR_geteuid:
9560 ret = get_errno(high2lowuid(geteuid()));
9561 break;
0c866a7e
RV		 9562#endif
9563#ifdef TARGET_NR_getegid
67867308
FB		 9564 case TARGET_NR_getegid:
9565 ret = get_errno(high2lowgid(getegid()));
9566 break;
0c866a7e 9567#endif
67867308
FB		 9568 case TARGET_NR_setreuid:
9569 ret = get_errno(setreuid(low2highuid(arg1), low2highuid(arg2)));
9570 break;
9571 case TARGET_NR_setregid:
9572 ret = get_errno(setregid(low2highgid(arg1), low2highgid(arg2)));
9573 break;
9574 case TARGET_NR_getgroups:
9575 {
9576 int gidsetsize = arg1;
0c866a7e 9577 target_id *target_grouplist;
67867308
FB		 9578 gid_t *grouplist;
9579 int i;
9580
9581 grouplist = alloca(gidsetsize * sizeof(gid_t));
9582 ret = get_errno(getgroups(gidsetsize, grouplist));
cb3bc233
AZ		 9583 if (gidsetsize == 0)
9584 break;
67867308 9585 if (!is_error(ret)) {
03903ffc 9586 target_grouplist = lock_user(VERIFY_WRITE, arg2, gidsetsize * sizeof(target_id), 0);
579a97f7
FB		 9587 if (!target_grouplist)
9588 goto efault;
a2155fcc 9589 for(i = 0;i < ret; i++)
0c866a7e 9590 target_grouplist[i] = tswapid(high2lowgid(grouplist[i]));
03903ffc 9591 unlock_user(target_grouplist, arg2, gidsetsize * sizeof(target_id));
67867308
FB		 9592 }
9593 }
9594 break;
9595 case TARGET_NR_setgroups:
9596 {
9597 int gidsetsize = arg1;
0c866a7e 9598 target_id *target_grouplist;
f2b79ce9 9599 gid_t *grouplist = NULL;
67867308 9600 int i;
f2b79ce9
DA		 9601 if (gidsetsize) {
9602 grouplist = alloca(gidsetsize * sizeof(gid_t));
03903ffc 9603 target_grouplist = lock_user(VERIFY_READ, arg2, gidsetsize * sizeof(target_id), 1);
f2b79ce9
DA		 9604 if (!target_grouplist) {
9605 ret = -TARGET_EFAULT;
9606 goto fail;
9607 }
9608 for (i = 0; i < gidsetsize; i++) {
9609 grouplist[i] = low2highgid(tswapid(target_grouplist[i]));
9610 }
9611 unlock_user(target_grouplist, arg2, 0);
579a97f7 9612 }
67867308
FB		 9613 ret = get_errno(setgroups(gidsetsize, grouplist));
9614 }
9615 break;
9616 case TARGET_NR_fchown:
9617 ret = get_errno(fchown(arg1, low2highuid(arg2), low2highgid(arg3)));
9618 break;
c0d472b1 9619#if defined(TARGET_NR_fchownat)
ccfa72b7 9620 case TARGET_NR_fchownat:
579a97f7
FB		 9621 if (!(p = lock_user_string(arg2)))
9622 goto efault;
c0d472b1
PM		 9623 ret = get_errno(fchownat(arg1, p, low2highuid(arg3),
9624 low2highgid(arg4), arg5));
579a97f7 9625 unlock_user(p, arg2, 0);
ccfa72b7
TS		 9626 break;
9627#endif
67867308
FB		 9628#ifdef TARGET_NR_setresuid
9629 case TARGET_NR_setresuid:
fd6f7798
PM		 9630 ret = get_errno(sys_setresuid(low2highuid(arg1),
9631 low2highuid(arg2),
9632 low2highuid(arg3)));
67867308
FB		 9633 break;
9634#endif
9635#ifdef TARGET_NR_getresuid
9636 case TARGET_NR_getresuid:
9637 {
53a5960a 9638 uid_t ruid, euid, suid;
67867308
FB		 9639 ret = get_errno(getresuid(&ruid, &euid, &suid));
9640 if (!is_error(ret)) {
76ca310a
PM		 9641 if (put_user_id(high2lowuid(ruid), arg1)
9642 || put_user_id(high2lowuid(euid), arg2)
9643 || put_user_id(high2lowuid(suid), arg3))
2f619698 9644 goto efault;
67867308
FB		 9645 }
9646 }
9647 break;
9648#endif
9649#ifdef TARGET_NR_getresgid
9650 case TARGET_NR_setresgid:
fd6f7798
PM		 9651 ret = get_errno(sys_setresgid(low2highgid(arg1),
9652 low2highgid(arg2),
9653 low2highgid(arg3)));
67867308
FB		 9654 break;
9655#endif
9656#ifdef TARGET_NR_getresgid
9657 case TARGET_NR_getresgid:
9658 {
53a5960a 9659 gid_t rgid, egid, sgid;
67867308
FB		 9660 ret = get_errno(getresgid(&rgid, &egid, &sgid));
9661 if (!is_error(ret)) {
76ca310a
PM		 9662 if (put_user_id(high2lowgid(rgid), arg1)
9663 || put_user_id(high2lowgid(egid), arg2)
9664 || put_user_id(high2lowgid(sgid), arg3))
2f619698 9665 goto efault;
67867308
FB		 9666 }
9667 }
9668 break;
9669#endif
704eff6c 9670#ifdef TARGET_NR_chown
67867308 9671 case TARGET_NR_chown:
579a97f7
FB		 9672 if (!(p = lock_user_string(arg1)))
9673 goto efault;
53a5960a
PB		 9674 ret = get_errno(chown(p, low2highuid(arg2), low2highgid(arg3)));
9675 unlock_user(p, arg1, 0);
67867308 9676 break;
704eff6c 9677#endif
67867308 9678 case TARGET_NR_setuid:
fd6f7798 9679 ret = get_errno(sys_setuid(low2highuid(arg1)));
67867308
FB		 9680 break;
9681 case TARGET_NR_setgid:
fd6f7798 9682 ret = get_errno(sys_setgid(low2highgid(arg1)));
67867308
FB		 9683 break;
9684 case TARGET_NR_setfsuid:
9685 ret = get_errno(setfsuid(arg1));
9686 break;
9687 case TARGET_NR_setfsgid:
9688 ret = get_errno(setfsgid(arg1));
9689 break;
67867308 9690
a315a145 9691#ifdef TARGET_NR_lchown32
31e31b8a 9692 case TARGET_NR_lchown32:
579a97f7
FB		 9693 if (!(p = lock_user_string(arg1)))
9694 goto efault;
53a5960a
PB		 9695 ret = get_errno(lchown(p, arg2, arg3));
9696 unlock_user(p, arg1, 0);
b03c60f3 9697 break;
a315a145
FB		 9698#endif
9699#ifdef TARGET_NR_getuid32
31e31b8a 9700 case TARGET_NR_getuid32:
b03c60f3
FB		 9701 ret = get_errno(getuid());
9702 break;
a315a145 9703#endif
64b4d28c
AJ		 9704
9705#if defined(TARGET_NR_getxuid) && defined(TARGET_ALPHA)
9706 /* Alpha specific */
9707 case TARGET_NR_getxuid:
ba0e276d
RH		 9708 {
9709 uid_t euid;
9710 euid=geteuid();
9711 ((CPUAlphaState *)cpu_env)->ir[IR_A4]=euid;
9712 }
64b4d28c
AJ		 9713 ret = get_errno(getuid());
9714 break;
9715#endif
9716#if defined(TARGET_NR_getxgid) && defined(TARGET_ALPHA)
9717 /* Alpha specific */
9718 case TARGET_NR_getxgid:
ba0e276d
RH		 9719 {
9720 uid_t egid;
9721 egid=getegid();
9722 ((CPUAlphaState *)cpu_env)->ir[IR_A4]=egid;
9723 }
64b4d28c
AJ		 9724 ret = get_errno(getgid());
9725 break;
9726#endif
ba0e276d
RH		 9727#if defined(TARGET_NR_osf_getsysinfo) && defined(TARGET_ALPHA)
9728 /* Alpha specific */
9729 case TARGET_NR_osf_getsysinfo:
9730 ret = -TARGET_EOPNOTSUPP;
9731 switch (arg1) {
9732 case TARGET_GSI_IEEE_FP_CONTROL:
9733 {
9734 uint64_t swcr, fpcr = cpu_alpha_load_fpcr (cpu_env);
9735
9736 /* Copied from linux ieee_fpcr_to_swcr. */
9737 swcr = (fpcr >> 35) & SWCR_STATUS_MASK;
9738 swcr |= (fpcr >> 36) & SWCR_MAP_DMZ;
9739 swcr |= (~fpcr >> 48) & (SWCR_TRAP_ENABLE_INV
9740 | SWCR_TRAP_ENABLE_DZE
9741 | SWCR_TRAP_ENABLE_OVF);
9742 swcr |= (~fpcr >> 57) & (SWCR_TRAP_ENABLE_UNF
9743 | SWCR_TRAP_ENABLE_INE);
9744 swcr |= (fpcr >> 47) & SWCR_MAP_UMZ;
9745 swcr |= (~fpcr >> 41) & SWCR_TRAP_ENABLE_DNO;
9746
9747 if (put_user_u64 (swcr, arg2))
9748 goto efault;
9749 ret = 0;
9750 }
9751 break;
9752
9753 /* case GSI_IEEE_STATE_AT_SIGNAL:
9754 -- Not implemented in linux kernel.
9755 case GSI_UACPROC:
9756 -- Retrieves current unaligned access state; not much used.
9757 case GSI_PROC_TYPE:
9758 -- Retrieves implver information; surely not used.
9759 case GSI_GET_HWRPB:
9760 -- Grabs a copy of the HWRPB; surely not used.
9761 */
9762 }
9763 break;
9764#endif
9765#if defined(TARGET_NR_osf_setsysinfo) && defined(TARGET_ALPHA)
9766 /* Alpha specific */
9767 case TARGET_NR_osf_setsysinfo:
9768 ret = -TARGET_EOPNOTSUPP;
9769 switch (arg1) {
9770 case TARGET_SSI_IEEE_FP_CONTROL:
ba0e276d
RH		 9771 {
9772 uint64_t swcr, fpcr, orig_fpcr;
9773
6e06d515 9774 if (get_user_u64 (swcr, arg2)) {
ba0e276d 9775 goto efault;
6e06d515
RH		 9776 }
9777 orig_fpcr = cpu_alpha_load_fpcr(cpu_env);
ba0e276d
RH		 9778 fpcr = orig_fpcr & FPCR_DYN_MASK;
9779
9780 /* Copied from linux ieee_swcr_to_fpcr. */
9781 fpcr |= (swcr & SWCR_STATUS_MASK) << 35;
9782 fpcr |= (swcr & SWCR_MAP_DMZ) << 36;
9783 fpcr |= (~swcr & (SWCR_TRAP_ENABLE_INV
9784 | SWCR_TRAP_ENABLE_DZE
9785 | SWCR_TRAP_ENABLE_OVF)) << 48;
9786 fpcr |= (~swcr & (SWCR_TRAP_ENABLE_UNF
9787 | SWCR_TRAP_ENABLE_INE)) << 57;
9788 fpcr |= (swcr & SWCR_MAP_UMZ ? FPCR_UNDZ | FPCR_UNFD : 0);
9789 fpcr |= (~swcr & SWCR_TRAP_ENABLE_DNO) << 41;
9790
6e06d515 9791 cpu_alpha_store_fpcr(cpu_env, fpcr);
ba0e276d 9792 ret = 0;
6e06d515
RH		 9793 }
9794 break;
9795
9796 case TARGET_SSI_IEEE_RAISE_EXCEPTION:
9797 {
9798 uint64_t exc, fpcr, orig_fpcr;
9799 int si_code;
9800
9801 if (get_user_u64(exc, arg2)) {
9802 goto efault;
9803 }
ba0e276d 9804
6e06d515 9805 orig_fpcr = cpu_alpha_load_fpcr(cpu_env);
ba0e276d 9806
6e06d515
RH		 9807 /* We only add to the exception status here. */
9808 fpcr = orig_fpcr | ((exc & SWCR_STATUS_MASK) << 35);
9809
9810 cpu_alpha_store_fpcr(cpu_env, fpcr);
9811 ret = 0;
9812
9813 /* Old exceptions are not signaled. */
9814 fpcr &= ~(orig_fpcr & FPCR_STATUS_MASK);
9815
9816 /* If any exceptions set by this call,
9817 and are unmasked, send a signal. */
9818 si_code = 0;
9819 if ((fpcr & (FPCR_INE | FPCR_INED)) == FPCR_INE) {
9820 si_code = TARGET_FPE_FLTRES;
9821 }
9822 if ((fpcr & (FPCR_UNF | FPCR_UNFD)) == FPCR_UNF) {
9823 si_code = TARGET_FPE_FLTUND;
9824 }
9825 if ((fpcr & (FPCR_OVF | FPCR_OVFD)) == FPCR_OVF) {
9826 si_code = TARGET_FPE_FLTOVF;
9827 }
9828 if ((fpcr & (FPCR_DZE | FPCR_DZED)) == FPCR_DZE) {
9829 si_code = TARGET_FPE_FLTDIV;
9830 }
9831 if ((fpcr & (FPCR_INV | FPCR_INVD)) == FPCR_INV) {
9832 si_code = TARGET_FPE_FLTINV;
9833 }
9834 if (si_code != 0) {
9835 target_siginfo_t info;
9836 info.si_signo = SIGFPE;
9837 info.si_errno = 0;
9838 info.si_code = si_code;
9839 info._sifields._sigfault._addr
9840 = ((CPUArchState *)cpu_env)->pc;
9841 queue_signal((CPUArchState *)cpu_env, info.si_signo, &info);
ba0e276d
RH		 9842 }
9843 }
9844 break;
9845
9846 /* case SSI_NVPAIRS:
9847 -- Used with SSIN_UACPROC to enable unaligned accesses.
9848 case SSI_IEEE_STATE_AT_SIGNAL:
9849 case SSI_IEEE_IGNORE_STATE_AT_SIGNAL:
9850 -- Not implemented in linux kernel
9851 */
9852 }
9853 break;
9854#endif
9855#ifdef TARGET_NR_osf_sigprocmask
9856 /* Alpha specific. */
9857 case TARGET_NR_osf_sigprocmask:
9858 {
9859 abi_ulong mask;
bc088ba1 9860 int how;
ba0e276d
RH		 9861 sigset_t set, oldset;
9862
9863 switch(arg1) {
9864 case TARGET_SIG_BLOCK:
9865 how = SIG_BLOCK;
9866 break;
9867 case TARGET_SIG_UNBLOCK:
9868 how = SIG_UNBLOCK;
9869 break;
9870 case TARGET_SIG_SETMASK:
9871 how = SIG_SETMASK;
9872 break;
9873 default:
9874 ret = -TARGET_EINVAL;
9875 goto fail;
9876 }
9877 mask = arg2;
9878 target_to_host_old_sigset(&set, &mask);
3d3efba0
PM		 9879 ret = do_sigprocmask(how, &set, &oldset);
9880 if (!ret) {
9881 host_to_target_old_sigset(&mask, &oldset);
9882 ret = mask;
9883 }
ba0e276d
RH		 9884 }
9885 break;
9886#endif
64b4d28c 9887
a315a145 9888#ifdef TARGET_NR_getgid32
31e31b8a 9889 case TARGET_NR_getgid32:
b03c60f3
FB		 9890 ret = get_errno(getgid());
9891 break;
a315a145
FB		 9892#endif
9893#ifdef TARGET_NR_geteuid32
31e31b8a 9894 case TARGET_NR_geteuid32:
b03c60f3
FB		 9895 ret = get_errno(geteuid());
9896 break;
a315a145
FB		 9897#endif
9898#ifdef TARGET_NR_getegid32
31e31b8a 9899 case TARGET_NR_getegid32:
b03c60f3
FB		 9900 ret = get_errno(getegid());
9901 break;
a315a145
FB		 9902#endif
9903#ifdef TARGET_NR_setreuid32
31e31b8a 9904 case TARGET_NR_setreuid32:
b03c60f3
FB		 9905 ret = get_errno(setreuid(arg1, arg2));
9906 break;
a315a145
FB		 9907#endif
9908#ifdef TARGET_NR_setregid32
31e31b8a 9909 case TARGET_NR_setregid32:
b03c60f3
FB		 9910 ret = get_errno(setregid(arg1, arg2));
9911 break;
a315a145
FB		 9912#endif
9913#ifdef TARGET_NR_getgroups32
31e31b8a 9914 case TARGET_NR_getgroups32:
99c475ab
FB		 9915 {
9916 int gidsetsize = arg1;
53a5960a 9917 uint32_t *target_grouplist;
99c475ab
FB		 9918 gid_t *grouplist;
9919 int i;
9920
9921 grouplist = alloca(gidsetsize * sizeof(gid_t));
9922 ret = get_errno(getgroups(gidsetsize, grouplist));
cb3bc233
AZ		 9923 if (gidsetsize == 0)
9924 break;
99c475ab 9925 if (!is_error(ret)) {
579a97f7
FB		 9926 target_grouplist = lock_user(VERIFY_WRITE, arg2, gidsetsize * 4, 0);
9927 if (!target_grouplist) {
9928 ret = -TARGET_EFAULT;
9929 goto fail;
9930 }
a2155fcc 9931 for(i = 0;i < ret; i++)
53a5960a
PB		 9932 target_grouplist[i] = tswap32(grouplist[i]);
9933 unlock_user(target_grouplist, arg2, gidsetsize * 4);
99c475ab
FB		 9934 }
9935 }
9936 break;
a315a145
FB		 9937#endif
9938#ifdef TARGET_NR_setgroups32
31e31b8a 9939 case TARGET_NR_setgroups32:
99c475ab
FB		 9940 {
9941 int gidsetsize = arg1;
53a5960a 9942 uint32_t *target_grouplist;
99c475ab
FB		 9943 gid_t *grouplist;
9944 int i;
3b46e624 9945
99c475ab 9946 grouplist = alloca(gidsetsize * sizeof(gid_t));
579a97f7
FB		 9947 target_grouplist = lock_user(VERIFY_READ, arg2, gidsetsize * 4, 1);
9948 if (!target_grouplist) {
9949 ret = -TARGET_EFAULT;
9950 goto fail;
9951 }
99c475ab 9952 for(i = 0;i < gidsetsize; i++)
53a5960a
PB		 9953 grouplist[i] = tswap32(target_grouplist[i]);
9954 unlock_user(target_grouplist, arg2, 0);
99c475ab
FB		 9955 ret = get_errno(setgroups(gidsetsize, grouplist));
9956 }
9957 break;
a315a145
FB		 9958#endif
9959#ifdef TARGET_NR_fchown32
31e31b8a 9960 case TARGET_NR_fchown32:
b03c60f3
FB		 9961 ret = get_errno(fchown(arg1, arg2, arg3));
9962 break;
a315a145
FB		 9963#endif
9964#ifdef TARGET_NR_setresuid32
31e31b8a 9965 case TARGET_NR_setresuid32:
fd6f7798 9966 ret = get_errno(sys_setresuid(arg1, arg2, arg3));
b03c60f3 9967 break;
a315a145
FB		 9968#endif
9969#ifdef TARGET_NR_getresuid32
31e31b8a 9970 case TARGET_NR_getresuid32:
b03c60f3 9971 {
53a5960a 9972 uid_t ruid, euid, suid;
b03c60f3
FB		 9973 ret = get_errno(getresuid(&ruid, &euid, &suid));
9974 if (!is_error(ret)) {
2f619698
FB		 9975 if (put_user_u32(ruid, arg1)
9976 || put_user_u32(euid, arg2)
9977 || put_user_u32(suid, arg3))
9978 goto efault;
b03c60f3
FB		 9979 }
9980 }
9981 break;
a315a145
FB		 9982#endif
9983#ifdef TARGET_NR_setresgid32
31e31b8a 9984 case TARGET_NR_setresgid32:
fd6f7798 9985 ret = get_errno(sys_setresgid(arg1, arg2, arg3));
b03c60f3 9986 break;
a315a145
FB		 9987#endif
9988#ifdef TARGET_NR_getresgid32
31e31b8a 9989 case TARGET_NR_getresgid32:
b03c60f3 9990 {
53a5960a 9991 gid_t rgid, egid, sgid;
b03c60f3
FB		 9992 ret = get_errno(getresgid(&rgid, &egid, &sgid));
9993 if (!is_error(ret)) {
2f619698
FB		 9994 if (put_user_u32(rgid, arg1)
9995 || put_user_u32(egid, arg2)
9996 || put_user_u32(sgid, arg3))
9997 goto efault;
b03c60f3
FB		 9998 }
9999 }
10000 break;
a315a145
FB		 10001#endif
10002#ifdef TARGET_NR_chown32
31e31b8a 10003 case TARGET_NR_chown32:
579a97f7
FB		 10004 if (!(p = lock_user_string(arg1)))
10005 goto efault;
53a5960a
PB		 10006 ret = get_errno(chown(p, arg2, arg3));
10007 unlock_user(p, arg1, 0);
b03c60f3 10008 break;
a315a145
FB		 10009#endif
10010#ifdef TARGET_NR_setuid32
31e31b8a 10011 case TARGET_NR_setuid32:
fd6f7798 10012 ret = get_errno(sys_setuid(arg1));
b03c60f3 10013 break;
a315a145
FB		 10014#endif
10015#ifdef TARGET_NR_setgid32
31e31b8a 10016 case TARGET_NR_setgid32:
fd6f7798 10017 ret = get_errno(sys_setgid(arg1));
b03c60f3 10018 break;
a315a145
FB		 10019#endif
10020#ifdef TARGET_NR_setfsuid32
31e31b8a 10021 case TARGET_NR_setfsuid32:
b03c60f3
FB		 10022 ret = get_errno(setfsuid(arg1));
10023 break;
a315a145
FB		 10024#endif
10025#ifdef TARGET_NR_setfsgid32
31e31b8a 10026 case TARGET_NR_setfsgid32:
b03c60f3
FB		 10027 ret = get_errno(setfsgid(arg1));
10028 break;
a315a145 10029#endif
67867308 10030
31e31b8a 10031 case TARGET_NR_pivot_root:
b03c60f3 10032 goto unimplemented;
ffa65c3b 10033#ifdef TARGET_NR_mincore
31e31b8a 10034 case TARGET_NR_mincore:
04bb9ace
AJ		 10035 {
10036 void *a;
10037 ret = -TARGET_EFAULT;
10038 if (!(a = lock_user(VERIFY_READ, arg1,arg2, 0)))
10039 goto efault;
10040 if (!(p = lock_user_string(arg3)))
10041 goto mincore_fail;
10042 ret = get_errno(mincore(a, arg2, p));
10043 unlock_user(p, arg3, ret);
10044 mincore_fail:
10045 unlock_user(a, arg1, 0);
10046 }
10047 break;
ffa65c3b 10048#endif
408321b6
AJ		 10049#ifdef TARGET_NR_arm_fadvise64_64
10050 case TARGET_NR_arm_fadvise64_64:
e0156a9d
PM		 10051 /* arm_fadvise64_64 looks like fadvise64_64 but
10052 * with different argument order: fd, advice, offset, len
10053 * rather than the usual fd, offset, len, advice.
10054 * Note that offset and len are both 64-bit so appear as
10055 * pairs of 32-bit registers.
10056 */
10057 ret = posix_fadvise(arg1, target_offset64(arg3, arg4),
10058 target_offset64(arg5, arg6), arg2);
10059 ret = -host_to_target_errno(ret);
10060 break;
408321b6 10061#endif
badd3cd8
PM		 10062
10063#if TARGET_ABI_BITS == 32
10064
10065#ifdef TARGET_NR_fadvise64_64
10066 case TARGET_NR_fadvise64_64:
10067 /* 6 args: fd, offset (high, low), len (high, low), advice */
10068 if (regpairs_aligned(cpu_env)) {
10069 /* offset is in (3,4), len in (5,6) and advice in 7 */
10070 arg2 = arg3;
10071 arg3 = arg4;
10072 arg4 = arg5;
10073 arg5 = arg6;
10074 arg6 = arg7;
10075 }
10076 ret = -host_to_target_errno(posix_fadvise(arg1,
10077 target_offset64(arg2, arg3),
10078 target_offset64(arg4, arg5),
10079 arg6));
10080 break;
10081#endif
10082
10083#ifdef TARGET_NR_fadvise64
10084 case TARGET_NR_fadvise64:
10085 /* 5 args: fd, offset (high, low), len, advice */
10086 if (regpairs_aligned(cpu_env)) {
10087 /* offset is in (3,4), len in 5 and advice in 6 */
10088 arg2 = arg3;
10089 arg3 = arg4;
10090 arg4 = arg5;
10091 arg5 = arg6;
10092 }
10093 ret = -host_to_target_errno(posix_fadvise(arg1,
10094 target_offset64(arg2, arg3),
10095 arg4, arg5));
10096 break;
408321b6 10097#endif
badd3cd8
PM		 10098
10099#else /* not a 32-bit ABI */
e0156a9d 10100#if defined(TARGET_NR_fadvise64_64) || defined(TARGET_NR_fadvise64)
408321b6
AJ		 10101#ifdef TARGET_NR_fadvise64_64
10102 case TARGET_NR_fadvise64_64:
10103#endif
e72d2cc7
UH		 10104#ifdef TARGET_NR_fadvise64
10105 case TARGET_NR_fadvise64:
10106#endif
10107#ifdef TARGET_S390X
10108 switch (arg4) {
10109 case 4: arg4 = POSIX_FADV_NOREUSE + 1; break; /* make sure it's an invalid value */
10110 case 5: arg4 = POSIX_FADV_NOREUSE + 2; break; /* ditto */
10111 case 6: arg4 = POSIX_FADV_DONTNEED; break;
10112 case 7: arg4 = POSIX_FADV_NOREUSE; break;
10113 default: break;
10114 }
10115#endif
977d8241
PM		 10116 ret = -host_to_target_errno(posix_fadvise(arg1, arg2, arg3, arg4));
10117 break;
408321b6 10118#endif
badd3cd8
PM		 10119#endif /* end of 64-bit ABI fadvise handling */
10120
ffa65c3b 10121#ifdef TARGET_NR_madvise
31e31b8a 10122 case TARGET_NR_madvise:
24836689 10123 /* A straight passthrough may not be safe because qemu sometimes
d2d6b857 10124 turns private file-backed mappings into anonymous mappings.
24836689
PB		 10125 This will break MADV_DONTNEED.
10126 This is a hint, so ignoring and returning success is ok. */
10127 ret = get_errno(0);
10128 break;
ffa65c3b 10129#endif
992f48a0 10130#if TARGET_ABI_BITS == 32
31e31b8a 10131 case TARGET_NR_fcntl64:
77e4672d 10132 {
b1e341eb 10133 int cmd;
77e4672d 10134 struct flock64 fl;
53a5960a 10135 struct target_flock64 *target_fl;
ce4defa0 10136#ifdef TARGET_ARM
53a5960a 10137 struct target_eabi_flock64 *target_efl;
ce4defa0 10138#endif
77e4672d 10139
5f106811 10140 cmd = target_to_host_fcntl_cmd(arg2);
31b63193
PM		 10141 if (cmd == -TARGET_EINVAL) {
10142 ret = cmd;
10143 break;
10144 }
b1e341eb 10145
60cd49d5 10146 switch(arg2) {
b1e341eb 10147 case TARGET_F_GETLK64:
5813427b
TS		 10148#ifdef TARGET_ARM
10149 if (((CPUARMState *)cpu_env)->eabi) {
9ee1fa2c
FB		 10150 if (!lock_user_struct(VERIFY_READ, target_efl, arg3, 1))
10151 goto efault;
5813427b
TS		 10152 fl.l_type = tswap16(target_efl->l_type);
10153 fl.l_whence = tswap16(target_efl->l_whence);
10154 fl.l_start = tswap64(target_efl->l_start);
10155 fl.l_len = tswap64(target_efl->l_len);
7e22e546 10156 fl.l_pid = tswap32(target_efl->l_pid);
5813427b
TS		 10157 unlock_user_struct(target_efl, arg3, 0);
10158 } else
10159#endif
10160 {
9ee1fa2c
FB		 10161 if (!lock_user_struct(VERIFY_READ, target_fl, arg3, 1))
10162 goto efault;
5813427b
TS		 10163 fl.l_type = tswap16(target_fl->l_type);
10164 fl.l_whence = tswap16(target_fl->l_whence);
10165 fl.l_start = tswap64(target_fl->l_start);
10166 fl.l_len = tswap64(target_fl->l_len);
7e22e546 10167 fl.l_pid = tswap32(target_fl->l_pid);
5813427b
TS		 10168 unlock_user_struct(target_fl, arg3, 0);
10169 }
b1e341eb 10170 ret = get_errno(fcntl(arg1, cmd, &fl));
77e4672d 10171 if (ret == 0) {
ce4defa0
PB		 10172#ifdef TARGET_ARM
10173 if (((CPUARMState *)cpu_env)->eabi) {
9ee1fa2c
FB		 10174 if (!lock_user_struct(VERIFY_WRITE, target_efl, arg3, 0))
10175 goto efault;
ce4defa0
PB		 10176 target_efl->l_type = tswap16(fl.l_type);
10177 target_efl->l_whence = tswap16(fl.l_whence);
10178 target_efl->l_start = tswap64(fl.l_start);
10179 target_efl->l_len = tswap64(fl.l_len);
7e22e546 10180 target_efl->l_pid = tswap32(fl.l_pid);
53a5960a 10181 unlock_user_struct(target_efl, arg3, 1);
ce4defa0
PB		 10182 } else
10183#endif
10184 {
9ee1fa2c
FB		 10185 if (!lock_user_struct(VERIFY_WRITE, target_fl, arg3, 0))
10186 goto efault;
ce4defa0
PB		 10187 target_fl->l_type = tswap16(fl.l_type);
10188 target_fl->l_whence = tswap16(fl.l_whence);
10189 target_fl->l_start = tswap64(fl.l_start);
10190 target_fl->l_len = tswap64(fl.l_len);
7e22e546 10191 target_fl->l_pid = tswap32(fl.l_pid);
53a5960a 10192 unlock_user_struct(target_fl, arg3, 1);
ce4defa0 10193 }
77e4672d
FB		 10194 }
10195 break;
10196
b1e341eb
TS		 10197 case TARGET_F_SETLK64:
10198 case TARGET_F_SETLKW64:
ce4defa0
PB		 10199#ifdef TARGET_ARM
10200 if (((CPUARMState *)cpu_env)->eabi) {
9ee1fa2c
FB		 10201 if (!lock_user_struct(VERIFY_READ, target_efl, arg3, 1))
10202 goto efault;
ce4defa0
PB		 10203 fl.l_type = tswap16(target_efl->l_type);
10204 fl.l_whence = tswap16(target_efl->l_whence);
10205 fl.l_start = tswap64(target_efl->l_start);
10206 fl.l_len = tswap64(target_efl->l_len);
7e22e546 10207 fl.l_pid = tswap32(target_efl->l_pid);
53a5960a 10208 unlock_user_struct(target_efl, arg3, 0);
ce4defa0
PB		 10209 } else
10210#endif
10211 {
9ee1fa2c
FB		 10212 if (!lock_user_struct(VERIFY_READ, target_fl, arg3, 1))
10213 goto efault;
ce4defa0
PB		 10214 fl.l_type = tswap16(target_fl->l_type);
10215 fl.l_whence = tswap16(target_fl->l_whence);
10216 fl.l_start = tswap64(target_fl->l_start);
10217 fl.l_len = tswap64(target_fl->l_len);
7e22e546 10218 fl.l_pid = tswap32(target_fl->l_pid);
53a5960a 10219 unlock_user_struct(target_fl, arg3, 0);
ce4defa0 10220 }
b1e341eb 10221 ret = get_errno(fcntl(arg1, cmd, &fl));
77e4672d 10222 break;
60cd49d5 10223 default:
5f106811 10224 ret = do_fcntl(arg1, arg2, arg3);
60cd49d5
FB		 10225 break;
10226 }
77e4672d
FB		 10227 break;
10228 }
60cd49d5 10229#endif
7d600c80
TS		 10230#ifdef TARGET_NR_cacheflush
10231 case TARGET_NR_cacheflush:
10232 /* self-modifying code is handled automatically, so nothing needed */
10233 ret = 0;
10234 break;
10235#endif
ebc05488 10236#ifdef TARGET_NR_security
31e31b8a
FB		 10237 case TARGET_NR_security:
10238 goto unimplemented;
c573ff67
FB		 10239#endif
10240#ifdef TARGET_NR_getpagesize
10241 case TARGET_NR_getpagesize:
10242 ret = TARGET_PAGE_SIZE;
10243 break;
ebc05488 10244#endif
31e31b8a
FB		 10245 case TARGET_NR_gettid:
10246 ret = get_errno(gettid());
10247 break;
e5febef5 10248#ifdef TARGET_NR_readahead
31e31b8a 10249 case TARGET_NR_readahead:
2054ac9b 10250#if TARGET_ABI_BITS == 32
48e515d4 10251 if (regpairs_aligned(cpu_env)) {
2054ac9b
AJ		 10252 arg2 = arg3;
10253 arg3 = arg4;
10254 arg4 = arg5;
10255 }
2054ac9b
AJ		 10256 ret = get_errno(readahead(arg1, ((off64_t)arg3 << 32) | arg2, arg4));
10257#else
10258 ret = get_errno(readahead(arg1, arg2, arg3));
10259#endif
10260 break;
e5febef5 10261#endif
a790ae38 10262#ifdef CONFIG_ATTR
ebc05488 10263#ifdef TARGET_NR_setxattr
31e31b8a
FB		 10264 case TARGET_NR_listxattr:
10265 case TARGET_NR_llistxattr:
fb5590f7
PM		 10266 {
10267 void *p, *b = 0;
10268 if (arg2) {
10269 b = lock_user(VERIFY_WRITE, arg2, arg3, 0);
10270 if (!b) {
10271 ret = -TARGET_EFAULT;
10272 break;
10273 }
10274 }
10275 p = lock_user_string(arg1);
10276 if (p) {
10277 if (num == TARGET_NR_listxattr) {
10278 ret = get_errno(listxattr(p, b, arg3));
10279 } else {
10280 ret = get_errno(llistxattr(p, b, arg3));
10281 }
10282 } else {
10283 ret = -TARGET_EFAULT;
10284 }
10285 unlock_user(p, arg1, 0);
10286 unlock_user(b, arg2, arg3);
10287 break;
10288 }
31e31b8a 10289 case TARGET_NR_flistxattr:
fb5590f7
PM		 10290 {
10291 void *b = 0;
10292 if (arg2) {
10293 b = lock_user(VERIFY_WRITE, arg2, arg3, 0);
10294 if (!b) {
10295 ret = -TARGET_EFAULT;
10296 break;
10297 }
10298 }
10299 ret = get_errno(flistxattr(arg1, b, arg3));
10300 unlock_user(b, arg2, arg3);
6f932f91 10301 break;
fb5590f7 10302 }
a790ae38 10303 case TARGET_NR_setxattr:
30297b55 10304 case TARGET_NR_lsetxattr:
a790ae38 10305 {
e3c33ec6
PM		 10306 void *p, *n, *v = 0;
10307 if (arg3) {
10308 v = lock_user(VERIFY_READ, arg3, arg4, 1);
10309 if (!v) {
10310 ret = -TARGET_EFAULT;
10311 break;
10312 }
10313 }
a790ae38
ACH		 10314 p = lock_user_string(arg1);
10315 n = lock_user_string(arg2);
e3c33ec6 10316 if (p && n) {
30297b55
PM		 10317 if (num == TARGET_NR_setxattr) {
10318 ret = get_errno(setxattr(p, n, v, arg4, arg5));
10319 } else {
10320 ret = get_errno(lsetxattr(p, n, v, arg4, arg5));
10321 }
a790ae38
ACH		 10322 } else {
10323 ret = -TARGET_EFAULT;
10324 }
10325 unlock_user(p, arg1, 0);
10326 unlock_user(n, arg2, 0);
10327 unlock_user(v, arg3, 0);
10328 }
10329 break;
30297b55
PM		 10330 case TARGET_NR_fsetxattr:
10331 {
10332 void *n, *v = 0;
10333 if (arg3) {
10334 v = lock_user(VERIFY_READ, arg3, arg4, 1);
10335 if (!v) {
10336 ret = -TARGET_EFAULT;
10337 break;
10338 }
10339 }
10340 n = lock_user_string(arg2);
10341 if (n) {
10342 ret = get_errno(fsetxattr(arg1, n, v, arg4, arg5));
10343 } else {
10344 ret = -TARGET_EFAULT;
10345 }
10346 unlock_user(n, arg2, 0);
10347 unlock_user(v, arg3, 0);
10348 }
10349 break;
a790ae38 10350 case TARGET_NR_getxattr:
30297b55 10351 case TARGET_NR_lgetxattr:
a790ae38 10352 {
e3c33ec6
PM		 10353 void *p, *n, *v = 0;
10354 if (arg3) {
10355 v = lock_user(VERIFY_WRITE, arg3, arg4, 0);
10356 if (!v) {
10357 ret = -TARGET_EFAULT;
10358 break;
10359 }
10360 }
a790ae38
ACH		 10361 p = lock_user_string(arg1);
10362 n = lock_user_string(arg2);
e3c33ec6 10363 if (p && n) {
30297b55
PM		 10364 if (num == TARGET_NR_getxattr) {
10365 ret = get_errno(getxattr(p, n, v, arg4));
10366 } else {
10367 ret = get_errno(lgetxattr(p, n, v, arg4));
10368 }
a790ae38
ACH		 10369 } else {
10370 ret = -TARGET_EFAULT;
10371 }
10372 unlock_user(p, arg1, 0);
10373 unlock_user(n, arg2, 0);
10374 unlock_user(v, arg3, arg4);
10375 }
10376 break;
30297b55
PM		 10377 case TARGET_NR_fgetxattr:
10378 {
10379 void *n, *v = 0;
10380 if (arg3) {
10381 v = lock_user(VERIFY_WRITE, arg3, arg4, 0);
10382 if (!v) {
10383 ret = -TARGET_EFAULT;
10384 break;
10385 }
10386 }
10387 n = lock_user_string(arg2);
10388 if (n) {
10389 ret = get_errno(fgetxattr(arg1, n, v, arg4));
10390 } else {
10391 ret = -TARGET_EFAULT;
10392 }
10393 unlock_user(n, arg2, 0);
10394 unlock_user(v, arg3, arg4);
10395 }
10396 break;
a790ae38 10397 case TARGET_NR_removexattr:
30297b55 10398 case TARGET_NR_lremovexattr:
a790ae38
ACH		 10399 {
10400 void *p, *n;
10401 p = lock_user_string(arg1);
10402 n = lock_user_string(arg2);
10403 if (p && n) {
30297b55
PM		 10404 if (num == TARGET_NR_removexattr) {
10405 ret = get_errno(removexattr(p, n));
10406 } else {
10407 ret = get_errno(lremovexattr(p, n));
10408 }
a790ae38
ACH		 10409 } else {
10410 ret = -TARGET_EFAULT;
10411 }
10412 unlock_user(p, arg1, 0);
10413 unlock_user(n, arg2, 0);
10414 }
10415 break;
30297b55
PM		 10416 case TARGET_NR_fremovexattr:
10417 {
10418 void *n;
10419 n = lock_user_string(arg2);
10420 if (n) {
10421 ret = get_errno(fremovexattr(arg1, n));
10422 } else {
10423 ret = -TARGET_EFAULT;
10424 }
10425 unlock_user(n, arg2, 0);
10426 }
10427 break;
ebc05488 10428#endif
a790ae38 10429#endif /* CONFIG_ATTR */
ebc05488 10430#ifdef TARGET_NR_set_thread_area
5cd4393b 10431 case TARGET_NR_set_thread_area:
8d18e893 10432#if defined(TARGET_MIPS)
d279279e 10433 ((CPUMIPSState *) cpu_env)->active_tc.CP0_UserLocal = arg1;
6f5b89a0
TS		 10434 ret = 0;
10435 break;
ef96779b
EI		 10436#elif defined(TARGET_CRIS)
10437 if (arg1 & 0xff)
10438 ret = -TARGET_EINVAL;
10439 else {
10440 ((CPUCRISState *) cpu_env)->pregs[PR_PID] = arg1;
10441 ret = 0;
10442 }
10443 break;
8d18e893
FB		 10444#elif defined(TARGET_I386) && defined(TARGET_ABI32)
10445 ret = do_set_thread_area(cpu_env, arg1);
10446 break;
1ccd9374
PM		 10447#elif defined(TARGET_M68K)
10448 {
0429a971 10449 TaskState *ts = cpu->opaque;
1ccd9374 10450 ts->tp_value = arg1;
95c1eb19 10451 ret = 0;
1ccd9374
PM		 10452 break;
10453 }
6f5b89a0
TS		 10454#else
10455 goto unimplemented_nowarn;
10456#endif
10457#endif
10458#ifdef TARGET_NR_get_thread_area
5cd4393b 10459 case TARGET_NR_get_thread_area:
8d18e893
FB		 10460#if defined(TARGET_I386) && defined(TARGET_ABI32)
10461 ret = do_get_thread_area(cpu_env, arg1);
d312bbe1 10462 break;
1ccd9374
PM		 10463#elif defined(TARGET_M68K)
10464 {
0429a971 10465 TaskState *ts = cpu->opaque;
1ccd9374
PM		 10466 ret = ts->tp_value;
10467 break;
10468 }
8d18e893 10469#else
5cd4393b 10470 goto unimplemented_nowarn;
48dc41eb 10471#endif
8d18e893 10472#endif
48dc41eb
FB		 10473#ifdef TARGET_NR_getdomainname
10474 case TARGET_NR_getdomainname:
10475 goto unimplemented_nowarn;
ebc05488 10476#endif
6f5b89a0 10477
b5906f95
TS		 10478#ifdef TARGET_NR_clock_gettime
10479 case TARGET_NR_clock_gettime:
10480 {
10481 struct timespec ts;
10482 ret = get_errno(clock_gettime(arg1, &ts));
10483 if (!is_error(ret)) {
10484 host_to_target_timespec(arg2, &ts);
10485 }
10486 break;
10487 }
10488#endif
10489#ifdef TARGET_NR_clock_getres
10490 case TARGET_NR_clock_getres:
10491 {
10492 struct timespec ts;
10493 ret = get_errno(clock_getres(arg1, &ts));
10494 if (!is_error(ret)) {
10495 host_to_target_timespec(arg2, &ts);
10496 }
10497 break;
10498 }
10499#endif
63d7651b
PB		 10500#ifdef TARGET_NR_clock_nanosleep
10501 case TARGET_NR_clock_nanosleep:
10502 {
10503 struct timespec ts;
10504 target_to_host_timespec(&ts, arg3);
9e518226
PM		 10505 ret = get_errno(safe_clock_nanosleep(arg1, arg2,
10506 &ts, arg4 ? &ts : NULL));
63d7651b
PB		 10507 if (arg4)
10508 host_to_target_timespec(arg4, &ts);
8fbe8fdf
TM		 10509
10510#if defined(TARGET_PPC)
10511 /* clock_nanosleep is odd in that it returns positive errno values.
10512 * On PPC, CR0 bit 3 should be set in such a situation. */
9e518226 10513 if (ret && ret != -TARGET_ERESTARTSYS) {
8fbe8fdf
TM		 10514 ((CPUPPCState *)cpu_env)->crf[0] |= 1;
10515 }
10516#endif
63d7651b
PB		 10517 break;
10518 }
10519#endif
b5906f95 10520
6f5b89a0
TS		 10521#if defined(TARGET_NR_set_tid_address) && defined(__NR_set_tid_address)
10522 case TARGET_NR_set_tid_address:
579a97f7
FB		 10523 ret = get_errno(set_tid_address((int *)g2h(arg1)));
10524 break;
6f5b89a0
TS		 10525#endif
10526
4cae1d16 10527 case TARGET_NR_tkill:
bef653d9 10528 ret = get_errno(safe_tkill((int)arg1, target_to_host_signal(arg2)));
4cae1d16 10529 break;
4cae1d16 10530
71455574 10531 case TARGET_NR_tgkill:
bef653d9 10532 ret = get_errno(safe_tgkill((int)arg1, (int)arg2,
4cb05961 10533 target_to_host_signal(arg3)));
bef653d9 10534 break;
71455574 10535
4f2b1fe8
TS		 10536#ifdef TARGET_NR_set_robust_list
10537 case TARGET_NR_set_robust_list:
e9a970a8
PM		 10538 case TARGET_NR_get_robust_list:
10539 /* The ABI for supporting robust futexes has userspace pass
10540 * the kernel a pointer to a linked list which is updated by
10541 * userspace after the syscall; the list is walked by the kernel
10542 * when the thread exits. Since the linked list in QEMU guest
10543 * memory isn't a valid linked list for the host and we have
10544 * no way to reliably intercept the thread-death event, we can't
10545 * support these. Silently return ENOSYS so that guest userspace
10546 * falls back to a non-robust futex implementation (which should
10547 * be OK except in the corner case of the guest crashing while
10548 * holding a mutex that is shared with another process via
10549 * shared memory).
10550 */
10551 goto unimplemented_nowarn;
4f2b1fe8
TS		 10552#endif
10553
1acae9f2 10554#if defined(TARGET_NR_utimensat)
9007f0ef
TS		 10555 case TARGET_NR_utimensat:
10556 {
ebc996f3
RV		 10557 struct timespec *tsp, ts[2];
10558 if (!arg3) {
10559 tsp = NULL;
10560 } else {
10561 target_to_host_timespec(ts, arg3);
10562 target_to_host_timespec(ts+1, arg3+sizeof(struct target_timespec));
10563 tsp = ts;
10564 }
9007f0ef 10565 if (!arg2)
ebc996f3 10566 ret = get_errno(sys_utimensat(arg1, NULL, tsp, arg4));
9007f0ef 10567 else {
579a97f7 10568 if (!(p = lock_user_string(arg2))) {
0da46a6e 10569 ret = -TARGET_EFAULT;
579a97f7
FB		 10570 goto fail;
10571 }
ebc996f3 10572 ret = get_errno(sys_utimensat(arg1, path(p), tsp, arg4));
579a97f7 10573 unlock_user(p, arg2, 0);
9007f0ef
TS		 10574 }
10575 }
10576 break;
10577#endif
bd0c5661
PB		 10578 case TARGET_NR_futex:
10579 ret = do_futex(arg1, arg2, arg3, arg4, arg5, arg6);
10580 break;
dbfe4c36 10581#if defined(TARGET_NR_inotify_init) && defined(__NR_inotify_init)
39b59763
AJ		 10582 case TARGET_NR_inotify_init:
10583 ret = get_errno(sys_inotify_init());
10584 break;
10585#endif
a1606b0b 10586#ifdef CONFIG_INOTIFY1
c05c7a73
RV		 10587#if defined(TARGET_NR_inotify_init1) && defined(__NR_inotify_init1)
10588 case TARGET_NR_inotify_init1:
10589 ret = get_errno(sys_inotify_init1(arg1));
10590 break;
10591#endif
a1606b0b 10592#endif
dbfe4c36 10593#if defined(TARGET_NR_inotify_add_watch) && defined(__NR_inotify_add_watch)
39b59763
AJ		 10594 case TARGET_NR_inotify_add_watch:
10595 p = lock_user_string(arg2);
10596 ret = get_errno(sys_inotify_add_watch(arg1, path(p), arg3));
10597 unlock_user(p, arg2, 0);
10598 break;
10599#endif
dbfe4c36 10600#if defined(TARGET_NR_inotify_rm_watch) && defined(__NR_inotify_rm_watch)
39b59763
AJ		 10601 case TARGET_NR_inotify_rm_watch:
10602 ret = get_errno(sys_inotify_rm_watch(arg1, arg2));
10603 break;
10604#endif
9007f0ef 10605
8ec9cf89 10606#if defined(TARGET_NR_mq_open) && defined(__NR_mq_open)
24e1003a
AJ		 10607 case TARGET_NR_mq_open:
10608 {
b6ce1f6b 10609 struct mq_attr posix_mq_attr, *attrp;
24e1003a
AJ		 10610
10611 p = lock_user_string(arg1 - 1);
b6ce1f6b 10612 if (arg4 != 0) {
24e1003a 10613 copy_from_user_mq_attr (&posix_mq_attr, arg4);
b6ce1f6b
TM		 10614 attrp = &posix_mq_attr;
10615 } else {
10616 attrp = 0;
10617 }
10618 ret = get_errno(mq_open(p, arg2, arg3, attrp));
24e1003a
AJ		 10619 unlock_user (p, arg1, 0);
10620 }
10621 break;
10622
10623 case TARGET_NR_mq_unlink:
10624 p = lock_user_string(arg1 - 1);
10625 ret = get_errno(mq_unlink(p));
10626 unlock_user (p, arg1, 0);
10627 break;
10628
10629 case TARGET_NR_mq_timedsend:
10630 {
10631 struct timespec ts;
10632
10633 p = lock_user (VERIFY_READ, arg2, arg3, 1);
10634 if (arg5 != 0) {
10635 target_to_host_timespec(&ts, arg5);
d40ecd66 10636 ret = get_errno(safe_mq_timedsend(arg1, p, arg3, arg4, &ts));
24e1003a 10637 host_to_target_timespec(arg5, &ts);
d40ecd66
PM		 10638 } else {
10639 ret = get_errno(safe_mq_timedsend(arg1, p, arg3, arg4, NULL));
24e1003a 10640 }
24e1003a
AJ		 10641 unlock_user (p, arg2, arg3);
10642 }
10643 break;
10644
10645 case TARGET_NR_mq_timedreceive:
10646 {
10647 struct timespec ts;
10648 unsigned int prio;
10649
10650 p = lock_user (VERIFY_READ, arg2, arg3, 1);
10651 if (arg5 != 0) {
10652 target_to_host_timespec(&ts, arg5);
d40ecd66
PM		 10653 ret = get_errno(safe_mq_timedreceive(arg1, p, arg3,
10654 &prio, &ts));
24e1003a 10655 host_to_target_timespec(arg5, &ts);
d40ecd66
PM		 10656 } else {
10657 ret = get_errno(safe_mq_timedreceive(arg1, p, arg3,
10658 &prio, NULL));
24e1003a 10659 }
24e1003a
AJ		 10660 unlock_user (p, arg2, arg3);
10661 if (arg4 != 0)
10662 put_user_u32(prio, arg4);
10663 }
10664 break;
10665
10666 /* Not implemented for now... */
10667/* case TARGET_NR_mq_notify: */
10668/* break; */
10669
10670 case TARGET_NR_mq_getsetattr:
10671 {
10672 struct mq_attr posix_mq_attr_in, posix_mq_attr_out;
10673 ret = 0;
10674 if (arg3 != 0) {
10675 ret = mq_getattr(arg1, &posix_mq_attr_out);
10676 copy_to_user_mq_attr(arg3, &posix_mq_attr_out);
10677 }
10678 if (arg2 != 0) {
10679 copy_from_user_mq_attr(&posix_mq_attr_in, arg2);
10680 ret |= mq_setattr(arg1, &posix_mq_attr_in, &posix_mq_attr_out);
10681 }
10682
10683 }
10684 break;
10685#endif
10686
3ce34dfb
VS		 10687#ifdef CONFIG_SPLICE
10688#ifdef TARGET_NR_tee
10689 case TARGET_NR_tee:
10690 {
10691 ret = get_errno(tee(arg1,arg2,arg3,arg4));
10692 }
10693 break;
10694#endif
10695#ifdef TARGET_NR_splice
10696 case TARGET_NR_splice:
10697 {
10698 loff_t loff_in, loff_out;
10699 loff_t *ploff_in = NULL, *ploff_out = NULL;
17644b36
AS		 10700 if (arg2) {
10701 if (get_user_u64(loff_in, arg2)) {
10702 goto efault;
10703 }
3ce34dfb
VS		 10704 ploff_in = &loff_in;
10705 }
17644b36
AS		 10706 if (arg4) {
10707 if (get_user_u64(loff_out, arg4)) {
10708 goto efault;
10709 }
3ce34dfb
VS		 10710 ploff_out = &loff_out;
10711 }
10712 ret = get_errno(splice(arg1, ploff_in, arg3, ploff_out, arg5, arg6));
17644b36
AS		 10713 if (arg2) {
10714 if (put_user_u64(loff_in, arg2)) {
10715 goto efault;
10716 }
10717 }
10718 if (arg4) {
10719 if (put_user_u64(loff_out, arg4)) {
10720 goto efault;
10721 }
10722 }
3ce34dfb
VS		 10723 }
10724 break;
10725#endif
10726#ifdef TARGET_NR_vmsplice
10727 case TARGET_NR_vmsplice:
10728 {
f287b2c2
RH		 10729 struct iovec *vec = lock_iovec(VERIFY_READ, arg2, arg3, 1);
10730 if (vec != NULL) {
10731 ret = get_errno(vmsplice(arg1, vec, arg3, arg4));
10732 unlock_iovec(vec, arg2, arg3, 0);
10733 } else {
10734 ret = -host_to_target_errno(errno);
10735 }
3ce34dfb
VS		 10736 }
10737 break;
10738#endif
10739#endif /* CONFIG_SPLICE */
c2882b96
RV		 10740#ifdef CONFIG_EVENTFD
10741#if defined(TARGET_NR_eventfd)
10742 case TARGET_NR_eventfd:
10743 ret = get_errno(eventfd(arg1, 0));
e36800c9 10744 fd_trans_unregister(ret);
c2882b96
RV		 10745 break;
10746#endif
10747#if defined(TARGET_NR_eventfd2)
10748 case TARGET_NR_eventfd2:
5947c697
PJ		 10749 {
10750 int host_flags = arg2 & (~(TARGET_O_NONBLOCK | TARGET_O_CLOEXEC));
10751 if (arg2 & TARGET_O_NONBLOCK) {
10752 host_flags |= O_NONBLOCK;
10753 }
10754 if (arg2 & TARGET_O_CLOEXEC) {
10755 host_flags |= O_CLOEXEC;
10756 }
10757 ret = get_errno(eventfd(arg1, host_flags));
e36800c9 10758 fd_trans_unregister(ret);
c2882b96 10759 break;
5947c697 10760 }
c2882b96
RV		 10761#endif
10762#endif /* CONFIG_EVENTFD */
d0927938
UH		 10763#if defined(CONFIG_FALLOCATE) && defined(TARGET_NR_fallocate)
10764 case TARGET_NR_fallocate:
20249ae1
AG		 10765#if TARGET_ABI_BITS == 32
10766 ret = get_errno(fallocate(arg1, arg2, target_offset64(arg3, arg4),
10767 target_offset64(arg5, arg6)));
10768#else
d0927938 10769 ret = get_errno(fallocate(arg1, arg2, arg3, arg4));
20249ae1 10770#endif
d0927938 10771 break;
c727f47d
PM		 10772#endif
10773#if defined(CONFIG_SYNC_FILE_RANGE)
10774#if defined(TARGET_NR_sync_file_range)
10775 case TARGET_NR_sync_file_range:
10776#if TARGET_ABI_BITS == 32
bfcedc57
RV		 10777#if defined(TARGET_MIPS)
10778 ret = get_errno(sync_file_range(arg1, target_offset64(arg3, arg4),
10779 target_offset64(arg5, arg6), arg7));
10780#else
c727f47d
PM		 10781 ret = get_errno(sync_file_range(arg1, target_offset64(arg2, arg3),
10782 target_offset64(arg4, arg5), arg6));
bfcedc57 10783#endif /* !TARGET_MIPS */
c727f47d
PM		 10784#else
10785 ret = get_errno(sync_file_range(arg1, arg2, arg3, arg4));
10786#endif
10787 break;
10788#endif
10789#if defined(TARGET_NR_sync_file_range2)
10790 case TARGET_NR_sync_file_range2:
10791 /* This is like sync_file_range but the arguments are reordered */
10792#if TARGET_ABI_BITS == 32
10793 ret = get_errno(sync_file_range(arg1, target_offset64(arg3, arg4),
10794 target_offset64(arg5, arg6), arg2));
10795#else
10796 ret = get_errno(sync_file_range(arg1, arg3, arg4, arg2));
10797#endif
10798 break;
10799#endif
3b6edd16 10800#endif
e36800c9
LV		 10801#if defined(TARGET_NR_signalfd4)
10802 case TARGET_NR_signalfd4:
10803 ret = do_signalfd4(arg1, arg2, arg4);
10804 break;
10805#endif
10806#if defined(TARGET_NR_signalfd)
10807 case TARGET_NR_signalfd:
10808 ret = do_signalfd4(arg1, arg2, 0);
10809 break;
10810#endif
3b6edd16
PM		 10811#if defined(CONFIG_EPOLL)
10812#if defined(TARGET_NR_epoll_create)
10813 case TARGET_NR_epoll_create:
10814 ret = get_errno(epoll_create(arg1));
10815 break;
10816#endif
10817#if defined(TARGET_NR_epoll_create1) && defined(CONFIG_EPOLL_CREATE1)
10818 case TARGET_NR_epoll_create1:
10819 ret = get_errno(epoll_create1(arg1));
10820 break;
10821#endif
10822#if defined(TARGET_NR_epoll_ctl)
10823 case TARGET_NR_epoll_ctl:
10824 {
10825 struct epoll_event ep;
10826 struct epoll_event *epp = 0;
10827 if (arg4) {
10828 struct target_epoll_event *target_ep;
10829 if (!lock_user_struct(VERIFY_READ, target_ep, arg4, 1)) {
10830 goto efault;
10831 }
10832 ep.events = tswap32(target_ep->events);
10833 /* The epoll_data_t union is just opaque data to the kernel,
10834 * so we transfer all 64 bits across and need not worry what
10835 * actual data type it is.
10836 */
10837 ep.data.u64 = tswap64(target_ep->data.u64);
10838 unlock_user_struct(target_ep, arg4, 0);
10839 epp = &ep;
10840 }
10841 ret = get_errno(epoll_ctl(arg1, arg2, arg3, epp));
10842 break;
10843 }
10844#endif
10845
227f0214 10846#if defined(TARGET_NR_epoll_wait) || defined(TARGET_NR_epoll_pwait)
3b6edd16
PM		 10847#if defined(TARGET_NR_epoll_wait)
10848 case TARGET_NR_epoll_wait:
10849#endif
227f0214 10850#if defined(TARGET_NR_epoll_pwait)
3b6edd16
PM		 10851 case TARGET_NR_epoll_pwait:
10852#endif
10853 {
10854 struct target_epoll_event *target_ep;
10855 struct epoll_event *ep;
10856 int epfd = arg1;
10857 int maxevents = arg3;
10858 int timeout = arg4;
10859
10860 target_ep = lock_user(VERIFY_WRITE, arg2,
10861 maxevents * sizeof(struct target_epoll_event), 1);
10862 if (!target_ep) {
10863 goto efault;
10864 }
10865
10866 ep = alloca(maxevents * sizeof(struct epoll_event));
10867
10868 switch (num) {
227f0214 10869#if defined(TARGET_NR_epoll_pwait)
3b6edd16
PM		 10870 case TARGET_NR_epoll_pwait:
10871 {
10872 target_sigset_t *target_set;
10873 sigset_t _set, *set = &_set;
10874
10875 if (arg5) {
10876 target_set = lock_user(VERIFY_READ, arg5,
10877 sizeof(target_sigset_t), 1);
10878 if (!target_set) {
10879 unlock_user(target_ep, arg2, 0);
10880 goto efault;
10881 }
10882 target_to_host_sigset(set, target_set);
10883 unlock_user(target_set, arg5, 0);
10884 } else {
10885 set = NULL;
10886 }
10887
227f0214
PM		 10888 ret = get_errno(safe_epoll_pwait(epfd, ep, maxevents, timeout,
10889 set, SIGSET_T_SIZE));
3b6edd16
PM		 10890 break;
10891 }
10892#endif
10893#if defined(TARGET_NR_epoll_wait)
10894 case TARGET_NR_epoll_wait:
227f0214
PM		 10895 ret = get_errno(safe_epoll_pwait(epfd, ep, maxevents, timeout,
10896 NULL, 0));
3b6edd16
PM		 10897 break;
10898#endif
10899 default:
10900 ret = -TARGET_ENOSYS;
10901 }
10902 if (!is_error(ret)) {
10903 int i;
10904 for (i = 0; i < ret; i++) {
10905 target_ep[i].events = tswap32(ep[i].events);
10906 target_ep[i].data.u64 = tswap64(ep[i].data.u64);
10907 }
10908 }
10909 unlock_user(target_ep, arg2, ret * sizeof(struct target_epoll_event));
10910 break;
10911 }
10912#endif
163a05a8
PM		 10913#endif
10914#ifdef TARGET_NR_prlimit64
10915 case TARGET_NR_prlimit64:
10916 {
10917 /* args: pid, resource number, ptr to new rlimit, ptr to old rlimit */
10918 struct target_rlimit64 *target_rnew, *target_rold;
10919 struct host_rlimit64 rnew, rold, *rnewp = 0;
95018018 10920 int resource = target_to_host_resource(arg2);
163a05a8
PM		 10921 if (arg3) {
10922 if (!lock_user_struct(VERIFY_READ, target_rnew, arg3, 1)) {
10923 goto efault;
10924 }
10925 rnew.rlim_cur = tswap64(target_rnew->rlim_cur);
10926 rnew.rlim_max = tswap64(target_rnew->rlim_max);
10927 unlock_user_struct(target_rnew, arg3, 0);
10928 rnewp = &rnew;
10929 }
10930
95018018 10931 ret = get_errno(sys_prlimit64(arg1, resource, rnewp, arg4 ? &rold : 0));
163a05a8
PM		 10932 if (!is_error(ret) && arg4) {
10933 if (!lock_user_struct(VERIFY_WRITE, target_rold, arg4, 1)) {
10934 goto efault;
10935 }
10936 target_rold->rlim_cur = tswap64(rold.rlim_cur);
10937 target_rold->rlim_max = tswap64(rold.rlim_max);
10938 unlock_user_struct(target_rold, arg4, 1);
10939 }
10940 break;
10941 }
3d21d29c
RH		 10942#endif
10943#ifdef TARGET_NR_gethostname
10944 case TARGET_NR_gethostname:
10945 {
10946 char *name = lock_user(VERIFY_WRITE, arg1, arg2, 0);
10947 if (name) {
10948 ret = get_errno(gethostname(name, arg2));
10949 unlock_user(name, arg1, arg2);
10950 } else {
10951 ret = -TARGET_EFAULT;
10952 }
10953 break;
10954 }
89aaf1a6
RV		 10955#endif
10956#ifdef TARGET_NR_atomic_cmpxchg_32
10957 case TARGET_NR_atomic_cmpxchg_32:
10958 {
10959 /* should use start_exclusive from main.c */
10960 abi_ulong mem_value;
10961 if (get_user_u32(mem_value, arg6)) {
10962 target_siginfo_t info;
10963 info.si_signo = SIGSEGV;
10964 info.si_errno = 0;
10965 info.si_code = TARGET_SEGV_MAPERR;
10966 info._sifields._sigfault._addr = arg6;
10967 queue_signal((CPUArchState *)cpu_env, info.si_signo, &info);
10968 ret = 0xdeadbeef;
10969
10970 }
10971 if (mem_value == arg2)
10972 put_user_u32(arg1, arg6);
10973 ret = mem_value;
10974 break;
10975 }
10976#endif
10977#ifdef TARGET_NR_atomic_barrier
10978 case TARGET_NR_atomic_barrier:
10979 {
10980 /* Like the kernel implementation and the qemu arm barrier, no-op this? */
3b899ea7 10981 ret = 0;
89aaf1a6
RV		 10982 break;
10983 }
d0927938 10984#endif
f4f1e10a
ECL		 10985
10986#ifdef TARGET_NR_timer_create
10987 case TARGET_NR_timer_create:
10988 {
10989 /* args: clockid_t clockid, struct sigevent *sevp, timer_t *timerid */
10990
10991 struct sigevent host_sevp = { {0}, }, *phost_sevp = NULL;
f4f1e10a
ECL		 10992
10993 int clkid = arg1;
10994 int timer_index = next_free_host_timer();
10995
10996 if (timer_index < 0) {
10997 ret = -TARGET_EAGAIN;
10998 } else {
10999 timer_t *phtimer = g_posix_timers + timer_index;
11000
11001 if (arg2) {
f4f1e10a 11002 phost_sevp = &host_sevp;
c065976f
PM		 11003 ret = target_to_host_sigevent(phost_sevp, arg2);
11004 if (ret != 0) {
11005 break;
11006 }
f4f1e10a
ECL		 11007 }
11008
11009 ret = get_errno(timer_create(clkid, phost_sevp, phtimer));
11010 if (ret) {
11011 phtimer = NULL;
11012 } else {
aecc8861 11013 if (put_user(TIMER_MAGIC | timer_index, arg3, target_timer_t)) {
f4f1e10a
ECL		 11014 goto efault;
11015 }
f4f1e10a
ECL		 11016 }
11017 }
11018 break;
11019 }
11020#endif
11021
11022#ifdef TARGET_NR_timer_settime
11023 case TARGET_NR_timer_settime:
11024 {
11025 /* args: timer_t timerid, int flags, const struct itimerspec *new_value,
11026 * struct itimerspec * old_value */
aecc8861 11027 target_timer_t timerid = get_timer_id(arg1);
e52a99f7 11028
aecc8861
AG		 11029 if (timerid < 0) {
11030 ret = timerid;
11031 } else if (arg3 == 0) {
f4f1e10a
ECL		 11032 ret = -TARGET_EINVAL;
11033 } else {
e52a99f7 11034 timer_t htimer = g_posix_timers[timerid];
f4f1e10a
ECL		 11035 struct itimerspec hspec_new = {{0},}, hspec_old = {{0},};
11036
11037 target_to_host_itimerspec(&hspec_new, arg3);
11038 ret = get_errno(
11039 timer_settime(htimer, arg2, &hspec_new, &hspec_old));
11040 host_to_target_itimerspec(arg2, &hspec_old);
11041 }
11042 break;
11043 }
11044#endif
11045
11046#ifdef TARGET_NR_timer_gettime
11047 case TARGET_NR_timer_gettime:
11048 {
11049 /* args: timer_t timerid, struct itimerspec *curr_value */
aecc8861 11050 target_timer_t timerid = get_timer_id(arg1);
e52a99f7 11051
aecc8861
AG		 11052 if (timerid < 0) {
11053 ret = timerid;
11054 } else if (!arg2) {
11055 ret = -TARGET_EFAULT;
f4f1e10a 11056 } else {
e52a99f7 11057 timer_t htimer = g_posix_timers[timerid];
f4f1e10a
ECL		 11058 struct itimerspec hspec;
11059 ret = get_errno(timer_gettime(htimer, &hspec));
11060
11061 if (host_to_target_itimerspec(arg2, &hspec)) {
11062 ret = -TARGET_EFAULT;
11063 }
11064 }
11065 break;
11066 }
11067#endif
11068
11069#ifdef TARGET_NR_timer_getoverrun
11070 case TARGET_NR_timer_getoverrun:
11071 {
11072 /* args: timer_t timerid */
aecc8861 11073 target_timer_t timerid = get_timer_id(arg1);
e52a99f7 11074
aecc8861
AG		 11075 if (timerid < 0) {
11076 ret = timerid;
f4f1e10a 11077 } else {
e52a99f7 11078 timer_t htimer = g_posix_timers[timerid];
f4f1e10a
ECL		 11079 ret = get_errno(timer_getoverrun(htimer));
11080 }
e36800c9 11081 fd_trans_unregister(ret);
f4f1e10a
ECL		 11082 break;
11083 }
11084#endif
11085
11086#ifdef TARGET_NR_timer_delete
11087 case TARGET_NR_timer_delete:
11088 {
11089 /* args: timer_t timerid */
aecc8861 11090 target_timer_t timerid = get_timer_id(arg1);
e52a99f7 11091
aecc8861
AG		 11092 if (timerid < 0) {
11093 ret = timerid;
f4f1e10a 11094 } else {
e52a99f7 11095 timer_t htimer = g_posix_timers[timerid];
f4f1e10a 11096 ret = get_errno(timer_delete(htimer));
e52a99f7 11097 g_posix_timers[timerid] = 0;
f4f1e10a
ECL		 11098 }
11099 break;
11100 }
11101#endif
11102
51834341
RV		 11103#if defined(TARGET_NR_timerfd_create) && defined(CONFIG_TIMERFD)
11104 case TARGET_NR_timerfd_create:
11105 ret = get_errno(timerfd_create(arg1,
11106 target_to_host_bitmask(arg2, fcntl_flags_tbl)));
11107 break;
11108#endif
11109
11110#if defined(TARGET_NR_timerfd_gettime) && defined(CONFIG_TIMERFD)
11111 case TARGET_NR_timerfd_gettime:
11112 {
11113 struct itimerspec its_curr;
11114
11115 ret = get_errno(timerfd_gettime(arg1, &its_curr));
11116
11117 if (arg2 && host_to_target_itimerspec(arg2, &its_curr)) {
11118 goto efault;
11119 }
11120 }
11121 break;
11122#endif
11123
11124#if defined(TARGET_NR_timerfd_settime) && defined(CONFIG_TIMERFD)
11125 case TARGET_NR_timerfd_settime:
11126 {
11127 struct itimerspec its_new, its_old, *p_new;
11128
11129 if (arg3) {
11130 if (target_to_host_itimerspec(&its_new, arg3)) {
11131 goto efault;
11132 }
11133 p_new = &its_new;
11134 } else {
11135 p_new = NULL;
11136 }
11137
11138 ret = get_errno(timerfd_settime(arg1, arg2, p_new, &its_old));
11139
11140 if (arg4 && host_to_target_itimerspec(arg4, &its_old)) {
11141 goto efault;
11142 }
11143 }
11144 break;
11145#endif
11146
ab31cda3
PB		 11147#if defined(TARGET_NR_ioprio_get) && defined(__NR_ioprio_get)
11148 case TARGET_NR_ioprio_get:
11149 ret = get_errno(ioprio_get(arg1, arg2));
11150 break;
11151#endif
11152
11153#if defined(TARGET_NR_ioprio_set) && defined(__NR_ioprio_set)
11154 case TARGET_NR_ioprio_set:
11155 ret = get_errno(ioprio_set(arg1, arg2, arg3));
11156 break;
11157#endif
11158
9af5c906
RV		 11159#if defined(TARGET_NR_setns) && defined(CONFIG_SETNS)
11160 case TARGET_NR_setns:
11161 ret = get_errno(setns(arg1, arg2));
11162 break;
11163#endif
11164#if defined(TARGET_NR_unshare) && defined(CONFIG_SETNS)
11165 case TARGET_NR_unshare:
11166 ret = get_errno(unshare(arg1));
11167 break;
11168#endif
11169
31e31b8a
FB		 11170 default:
11171 unimplemented:
5cd4393b 11172 gemu_log("qemu: Unsupported syscall: %d\n", num);
4f2b1fe8 11173#if defined(TARGET_NR_setxattr) || defined(TARGET_NR_get_thread_area) || defined(TARGET_NR_getdomainname) || defined(TARGET_NR_set_robust_list)
5cd4393b 11174 unimplemented_nowarn:
80a9d035 11175#endif
0da46a6e 11176 ret = -TARGET_ENOSYS;
31e31b8a
FB		 11177 break;
11178 }
579a97f7 11179fail:
c573ff67 11180#ifdef DEBUG
0bf9e31a 11181 gemu_log(" = " TARGET_ABI_FMT_ld "\n", ret);
c573ff67 11182#endif
b92c47c1
TS		 11183 if(do_strace)
11184 print_syscall_ret(num, ret);
31e31b8a 11185 return ret;
579a97f7
FB		 11186efault:
11187 ret = -TARGET_EFAULT;
11188 goto fail;
31e31b8a 11189}
Empty description
This page took 2.729064 seconds and 4 git commands to generate.