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