]> git.proxmox.com Git - qemu.git/blame - linux-user/syscall.c
ARM back-end: Fix encode_imm
[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
31e31b8a
FB
20#include <stdlib.h>
21#include <stdio.h>
22#include <stdarg.h>
04369ff2 23#include <string.h>
31e31b8a
FB
24#include <elf.h>
25#include <endian.h>
26#include <errno.h>
27#include <unistd.h>
28#include <fcntl.h>
7854b056 29#include <time.h>
82e671d9 30#include <limits.h>
24e1003a 31#include <mqueue.h>
31e31b8a 32#include <sys/types.h>
d08d3bb8
TS
33#include <sys/ipc.h>
34#include <sys/msg.h>
31e31b8a
FB
35#include <sys/wait.h>
36#include <sys/time.h>
37#include <sys/stat.h>
38#include <sys/mount.h>
39b9aae1 39#include <sys/prctl.h>
31e31b8a
FB
40#include <sys/resource.h>
41#include <sys/mman.h>
42#include <sys/swap.h>
43#include <signal.h>
44#include <sched.h>
45#include <sys/socket.h>
607175e0 46#include <sys/un.h>
31e31b8a 47#include <sys/uio.h>
9de5e440 48#include <sys/poll.h>
32f36bce 49#include <sys/times.h>
8853f86e 50#include <sys/shm.h>
fa294816 51#include <sys/sem.h>
56c8f68f 52#include <sys/statfs.h>
ebc05488 53#include <utime.h>
a5448a7d 54#include <sys/sysinfo.h>
3b3f24ad 55#include <sys/utsname.h>
72f03900 56//#include <sys/user.h>
8853f86e 57#include <netinet/ip.h>
7854b056 58#include <netinet/tcp.h>
0b6d3ae0 59#include <qemu-common.h>
9788c9ca 60#ifdef TARGET_GPROF
6d946cda
AJ
61#include <sys/gmon.h>
62#endif
31e31b8a
FB
63
64#define termios host_termios
65#define winsize host_winsize
66#define termio host_termio
04369ff2
FB
67#define sgttyb host_sgttyb /* same as target */
68#define tchars host_tchars /* same as target */
69#define ltchars host_ltchars /* same as target */
31e31b8a
FB
70
71#include <linux/termios.h>
72#include <linux/unistd.h>
73#include <linux/utsname.h>
74#include <linux/cdrom.h>
75#include <linux/hdreg.h>
76#include <linux/soundcard.h>
19b84f3c 77#include <linux/kd.h>
8fbd6b52 78#include <linux/mtio.h>
350d1779 79#include <linux/fs.h>
d7e4036e 80#include "linux_loop.h"
31e31b8a 81
3ef693a0 82#include "qemu.h"
526ccb7a 83#include "qemu-common.h"
31e31b8a 84
2f7bb878 85#if defined(CONFIG_USE_NPTL)
d865bab5
PB
86#define CLONE_NPTL_FLAGS2 (CLONE_SETTLS | \
87 CLONE_PARENT_SETTID | CLONE_CHILD_SETTID | CLONE_CHILD_CLEARTID)
88#else
89/* XXX: Hardcode the above values. */
90#define CLONE_NPTL_FLAGS2 0
30813cea
PB
91#endif
92
72f03900 93//#define DEBUG
31e31b8a 94
1a9353d2 95//#include <linux/msdos_fs.h>
6556a833
AJ
96#define VFAT_IOCTL_READDIR_BOTH _IOR('r', 1, struct linux_dirent [2])
97#define VFAT_IOCTL_READDIR_SHORT _IOR('r', 2, struct linux_dirent [2])
1a9353d2 98
70a194b9 99
70a194b9
FB
100#undef _syscall0
101#undef _syscall1
102#undef _syscall2
103#undef _syscall3
104#undef _syscall4
105#undef _syscall5
83fcb515 106#undef _syscall6
70a194b9 107
83fcb515 108#define _syscall0(type,name) \
8fcd3692 109static type name (void) \
83fcb515
FB
110{ \
111 return syscall(__NR_##name); \
112}
70a194b9 113
83fcb515 114#define _syscall1(type,name,type1,arg1) \
8fcd3692 115static type name (type1 arg1) \
83fcb515
FB
116{ \
117 return syscall(__NR_##name, arg1); \
70a194b9
FB
118}
119
83fcb515 120#define _syscall2(type,name,type1,arg1,type2,arg2) \
8fcd3692 121static type name (type1 arg1,type2 arg2) \
83fcb515
FB
122{ \
123 return syscall(__NR_##name, arg1, arg2); \
70a194b9
FB
124}
125
83fcb515 126#define _syscall3(type,name,type1,arg1,type2,arg2,type3,arg3) \
8fcd3692 127static type name (type1 arg1,type2 arg2,type3 arg3) \
83fcb515
FB
128{ \
129 return syscall(__NR_##name, arg1, arg2, arg3); \
70a194b9
FB
130}
131
83fcb515 132#define _syscall4(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4) \
8fcd3692 133static type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4) \
83fcb515
FB
134{ \
135 return syscall(__NR_##name, arg1, arg2, arg3, arg4); \
70a194b9
FB
136}
137
83fcb515
FB
138#define _syscall5(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4, \
139 type5,arg5) \
8fcd3692 140static type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4,type5 arg5) \
83fcb515
FB
141{ \
142 return syscall(__NR_##name, arg1, arg2, arg3, arg4, arg5); \
70a194b9
FB
143}
144
83fcb515
FB
145
146#define _syscall6(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4, \
147 type5,arg5,type6,arg6) \
8fcd3692
BS
148static type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4,type5 arg5, \
149 type6 arg6) \
83fcb515
FB
150{ \
151 return syscall(__NR_##name, arg1, arg2, arg3, arg4, arg5, arg6); \
70a194b9 152}
83fcb515 153
70a194b9 154
31e31b8a 155#define __NR_sys_uname __NR_uname
92a34c10 156#define __NR_sys_faccessat __NR_faccessat
814d7977 157#define __NR_sys_fchmodat __NR_fchmodat
ccfa72b7 158#define __NR_sys_fchownat __NR_fchownat
6a24a778 159#define __NR_sys_fstatat64 __NR_fstatat64
ac8a6556 160#define __NR_sys_futimesat __NR_futimesat
72f03900 161#define __NR_sys_getcwd1 __NR_getcwd
72f03900 162#define __NR_sys_getdents __NR_getdents
dab2ed99 163#define __NR_sys_getdents64 __NR_getdents64
c6cda17a 164#define __NR_sys_getpriority __NR_getpriority
64f0ce4c 165#define __NR_sys_linkat __NR_linkat
4472ad0d 166#define __NR_sys_mkdirat __NR_mkdirat
75ac37a0 167#define __NR_sys_mknodat __NR_mknodat
9d33b76b 168#define __NR_sys_newfstatat __NR_newfstatat
82424832 169#define __NR_sys_openat __NR_openat
5e0ccb18 170#define __NR_sys_readlinkat __NR_readlinkat
722183f6 171#define __NR_sys_renameat __NR_renameat
66fb9763 172#define __NR_sys_rt_sigqueueinfo __NR_rt_sigqueueinfo
f0b6243d 173#define __NR_sys_symlinkat __NR_symlinkat
7494b0f9 174#define __NR_sys_syslog __NR_syslog
71455574 175#define __NR_sys_tgkill __NR_tgkill
4cae1d16 176#define __NR_sys_tkill __NR_tkill
8170f56b 177#define __NR_sys_unlinkat __NR_unlinkat
9007f0ef 178#define __NR_sys_utimensat __NR_utimensat
bd0c5661 179#define __NR_sys_futex __NR_futex
39b59763
AJ
180#define __NR_sys_inotify_init __NR_inotify_init
181#define __NR_sys_inotify_add_watch __NR_inotify_add_watch
182#define __NR_sys_inotify_rm_watch __NR_inotify_rm_watch
31e31b8a 183
bc51c5c9 184#if defined(__alpha__) || defined (__ia64__) || defined(__x86_64__)
9af9eaaa
FB
185#define __NR__llseek __NR_lseek
186#endif
187
72f03900 188#ifdef __NR_gettid
31e31b8a 189_syscall0(int, gettid)
72f03900 190#else
0da46a6e
TS
191/* This is a replacement for the host gettid() and must return a host
192 errno. */
72f03900
FB
193static int gettid(void) {
194 return -ENOSYS;
195}
196#endif
3b3f24ad
AJ
197#if TARGET_ABI_BITS == 32
198_syscall3(int, sys_getdents, uint, fd, struct linux_dirent *, dirp, uint, count);
199#endif
200#if defined(TARGET_NR_getdents64) && defined(__NR_getdents64)
201_syscall3(int, sys_getdents64, uint, fd, struct linux_dirent64 *, dirp, uint, count);
202#endif
203_syscall2(int, sys_getpriority, int, which, int, who);
909b69cf 204#if defined(TARGET_NR__llseek) && !defined (__x86_64__)
3b3f24ad
AJ
205_syscall5(int, _llseek, uint, fd, ulong, hi, ulong, lo,
206 loff_t *, res, uint, wh);
207#endif
208_syscall3(int,sys_rt_sigqueueinfo,int,pid,int,sig,siginfo_t *,uinfo)
209_syscall3(int,sys_syslog,int,type,char*,bufp,int,len)
210#if defined(TARGET_NR_tgkill) && defined(__NR_tgkill)
211_syscall3(int,sys_tgkill,int,tgid,int,pid,int,sig)
212#endif
213#if defined(TARGET_NR_tkill) && defined(__NR_tkill)
214_syscall2(int,sys_tkill,int,tid,int,sig)
215#endif
216#ifdef __NR_exit_group
217_syscall1(int,exit_group,int,error_code)
218#endif
219#if defined(TARGET_NR_set_tid_address) && defined(__NR_set_tid_address)
220_syscall1(int,set_tid_address,int *,tidptr)
221#endif
2f7bb878 222#if defined(CONFIG_USE_NPTL)
3b3f24ad
AJ
223#if defined(TARGET_NR_futex) && defined(__NR_futex)
224_syscall6(int,sys_futex,int *,uaddr,int,op,int,val,
225 const struct timespec *,timeout,int *,uaddr2,int,val3)
226#endif
227#endif
228
229static bitmask_transtbl fcntl_flags_tbl[] = {
230 { TARGET_O_ACCMODE, TARGET_O_WRONLY, O_ACCMODE, O_WRONLY, },
231 { TARGET_O_ACCMODE, TARGET_O_RDWR, O_ACCMODE, O_RDWR, },
232 { TARGET_O_CREAT, TARGET_O_CREAT, O_CREAT, O_CREAT, },
233 { TARGET_O_EXCL, TARGET_O_EXCL, O_EXCL, O_EXCL, },
234 { TARGET_O_NOCTTY, TARGET_O_NOCTTY, O_NOCTTY, O_NOCTTY, },
235 { TARGET_O_TRUNC, TARGET_O_TRUNC, O_TRUNC, O_TRUNC, },
236 { TARGET_O_APPEND, TARGET_O_APPEND, O_APPEND, O_APPEND, },
237 { TARGET_O_NONBLOCK, TARGET_O_NONBLOCK, O_NONBLOCK, O_NONBLOCK, },
238 { TARGET_O_SYNC, TARGET_O_SYNC, O_SYNC, O_SYNC, },
239 { TARGET_FASYNC, TARGET_FASYNC, FASYNC, FASYNC, },
240 { TARGET_O_DIRECTORY, TARGET_O_DIRECTORY, O_DIRECTORY, O_DIRECTORY, },
241 { TARGET_O_NOFOLLOW, TARGET_O_NOFOLLOW, O_NOFOLLOW, O_NOFOLLOW, },
242 { TARGET_O_LARGEFILE, TARGET_O_LARGEFILE, O_LARGEFILE, O_LARGEFILE, },
243#if defined(O_DIRECT)
244 { TARGET_O_DIRECT, TARGET_O_DIRECT, O_DIRECT, O_DIRECT, },
245#endif
246 { 0, 0, 0, 0 }
247};
248
249#define COPY_UTSNAME_FIELD(dest, src) \
250 do { \
251 /* __NEW_UTS_LEN doesn't include terminating null */ \
252 (void) strncpy((dest), (src), __NEW_UTS_LEN); \
253 (dest)[__NEW_UTS_LEN] = '\0'; \
254 } while (0)
255
256static int sys_uname(struct new_utsname *buf)
257{
258 struct utsname uts_buf;
259
260 if (uname(&uts_buf) < 0)
261 return (-1);
262
263 /*
264 * Just in case these have some differences, we
265 * translate utsname to new_utsname (which is the
266 * struct linux kernel uses).
267 */
268
269 bzero(buf, sizeof (*buf));
270 COPY_UTSNAME_FIELD(buf->sysname, uts_buf.sysname);
271 COPY_UTSNAME_FIELD(buf->nodename, uts_buf.nodename);
272 COPY_UTSNAME_FIELD(buf->release, uts_buf.release);
273 COPY_UTSNAME_FIELD(buf->version, uts_buf.version);
274 COPY_UTSNAME_FIELD(buf->machine, uts_buf.machine);
275#ifdef _GNU_SOURCE
276 COPY_UTSNAME_FIELD(buf->domainname, uts_buf.domainname);
277#endif
278 return (0);
279
280#undef COPY_UTSNAME_FIELD
281}
282
283static int sys_getcwd1(char *buf, size_t size)
284{
285 if (getcwd(buf, size) == NULL) {
286 /* getcwd() sets errno */
287 return (-1);
288 }
aaf4ad39 289 return strlen(buf)+1;
3b3f24ad
AJ
290}
291
292#ifdef CONFIG_ATFILE
293/*
294 * Host system seems to have atfile syscall stubs available. We
295 * now enable them one by one as specified by target syscall_nr.h.
296 */
297
298#ifdef TARGET_NR_faccessat
465c9f06 299static int sys_faccessat(int dirfd, const char *pathname, int mode)
3b3f24ad 300{
465c9f06 301 return (faccessat(dirfd, pathname, mode, 0));
3b3f24ad
AJ
302}
303#endif
304#ifdef TARGET_NR_fchmodat
465c9f06 305static int sys_fchmodat(int dirfd, const char *pathname, mode_t mode)
3b3f24ad 306{
465c9f06 307 return (fchmodat(dirfd, pathname, mode, 0));
3b3f24ad
AJ
308}
309#endif
fda33744 310#if defined(TARGET_NR_fchownat) && defined(USE_UID16)
3b3f24ad
AJ
311static int sys_fchownat(int dirfd, const char *pathname, uid_t owner,
312 gid_t group, int flags)
313{
314 return (fchownat(dirfd, pathname, owner, group, flags));
315}
316#endif
317#ifdef __NR_fstatat64
318static int sys_fstatat64(int dirfd, const char *pathname, struct stat *buf,
319 int flags)
320{
321 return (fstatat(dirfd, pathname, buf, flags));
322}
323#endif
324#ifdef __NR_newfstatat
325static int sys_newfstatat(int dirfd, const char *pathname, struct stat *buf,
326 int flags)
327{
328 return (fstatat(dirfd, pathname, buf, flags));
329}
330#endif
331#ifdef TARGET_NR_futimesat
332static int sys_futimesat(int dirfd, const char *pathname,
333 const struct timeval times[2])
334{
335 return (futimesat(dirfd, pathname, times));
336}
337#endif
338#ifdef TARGET_NR_linkat
339static int sys_linkat(int olddirfd, const char *oldpath,
340 int newdirfd, const char *newpath, int flags)
341{
342 return (linkat(olddirfd, oldpath, newdirfd, newpath, flags));
343}
344#endif
345#ifdef TARGET_NR_mkdirat
346static int sys_mkdirat(int dirfd, const char *pathname, mode_t mode)
347{
348 return (mkdirat(dirfd, pathname, mode));
349}
350#endif
351#ifdef TARGET_NR_mknodat
352static int sys_mknodat(int dirfd, const char *pathname, mode_t mode,
353 dev_t dev)
354{
355 return (mknodat(dirfd, pathname, mode, dev));
356}
357#endif
358#ifdef TARGET_NR_openat
359static int sys_openat(int dirfd, const char *pathname, int flags, ...)
360{
361 /*
362 * open(2) has extra parameter 'mode' when called with
363 * flag O_CREAT.
364 */
365 if ((flags & O_CREAT) != 0) {
366 va_list ap;
367 mode_t mode;
368
369 /*
370 * Get the 'mode' parameter and translate it to
371 * host bits.
372 */
373 va_start(ap, flags);
374 mode = va_arg(ap, mode_t);
375 mode = target_to_host_bitmask(mode, fcntl_flags_tbl);
376 va_end(ap);
377
378 return (openat(dirfd, pathname, flags, mode));
379 }
380 return (openat(dirfd, pathname, flags));
381}
382#endif
383#ifdef TARGET_NR_readlinkat
384static int sys_readlinkat(int dirfd, const char *pathname, char *buf, size_t bufsiz)
385{
386 return (readlinkat(dirfd, pathname, buf, bufsiz));
387}
388#endif
389#ifdef TARGET_NR_renameat
390static int sys_renameat(int olddirfd, const char *oldpath,
391 int newdirfd, const char *newpath)
392{
393 return (renameat(olddirfd, oldpath, newdirfd, newpath));
394}
395#endif
396#ifdef TARGET_NR_symlinkat
397static int sys_symlinkat(const char *oldpath, int newdirfd, const char *newpath)
398{
399 return (symlinkat(oldpath, newdirfd, newpath));
400}
401#endif
402#ifdef TARGET_NR_unlinkat
403static int sys_unlinkat(int dirfd, const char *pathname, int flags)
404{
405 return (unlinkat(dirfd, pathname, flags));
406}
407#endif
3b3f24ad
AJ
408#else /* !CONFIG_ATFILE */
409
410/*
411 * Try direct syscalls instead
412 */
92a34c10 413#if defined(TARGET_NR_faccessat) && defined(__NR_faccessat)
465c9f06 414_syscall3(int,sys_faccessat,int,dirfd,const char *,pathname,int,mode)
92a34c10 415#endif
814d7977 416#if defined(TARGET_NR_fchmodat) && defined(__NR_fchmodat)
465c9f06 417_syscall3(int,sys_fchmodat,int,dirfd,const char *,pathname, mode_t,mode)
814d7977 418#endif
4583f589 419#if defined(TARGET_NR_fchownat) && defined(__NR_fchownat) && defined(USE_UID16)
ccfa72b7
TS
420_syscall5(int,sys_fchownat,int,dirfd,const char *,pathname,
421 uid_t,owner,gid_t,group,int,flags)
422#endif
9d33b76b
AJ
423#if (defined(TARGET_NR_fstatat64) || defined(TARGET_NR_newfstatat)) && \
424 defined(__NR_fstatat64)
6a24a778
AZ
425_syscall4(int,sys_fstatat64,int,dirfd,const char *,pathname,
426 struct stat *,buf,int,flags)
427#endif
ac8a6556
AZ
428#if defined(TARGET_NR_futimesat) && defined(__NR_futimesat)
429_syscall3(int,sys_futimesat,int,dirfd,const char *,pathname,
430 const struct timeval *,times)
431#endif
3b3f24ad
AJ
432#if (defined(TARGET_NR_newfstatat) || defined(TARGET_NR_fstatat64) ) && \
433 defined(__NR_newfstatat)
434_syscall4(int,sys_newfstatat,int,dirfd,const char *,pathname,
435 struct stat *,buf,int,flags)
8fcd3692 436#endif
64f0ce4c
TS
437#if defined(TARGET_NR_linkat) && defined(__NR_linkat)
438_syscall5(int,sys_linkat,int,olddirfd,const char *,oldpath,
3b3f24ad 439 int,newdirfd,const char *,newpath,int,flags)
64f0ce4c 440#endif
4472ad0d
TS
441#if defined(TARGET_NR_mkdirat) && defined(__NR_mkdirat)
442_syscall3(int,sys_mkdirat,int,dirfd,const char *,pathname,mode_t,mode)
443#endif
75ac37a0
TS
444#if defined(TARGET_NR_mknodat) && defined(__NR_mknodat)
445_syscall4(int,sys_mknodat,int,dirfd,const char *,pathname,
446 mode_t,mode,dev_t,dev)
447#endif
82424832
TS
448#if defined(TARGET_NR_openat) && defined(__NR_openat)
449_syscall4(int,sys_openat,int,dirfd,const char *,pathname,int,flags,mode_t,mode)
450#endif
5e0ccb18
TS
451#if defined(TARGET_NR_readlinkat) && defined(__NR_readlinkat)
452_syscall4(int,sys_readlinkat,int,dirfd,const char *,pathname,
453 char *,buf,size_t,bufsize)
454#endif
722183f6
TS
455#if defined(TARGET_NR_renameat) && defined(__NR_renameat)
456_syscall4(int,sys_renameat,int,olddirfd,const char *,oldpath,
457 int,newdirfd,const char *,newpath)
458#endif
b51eaa82 459#if defined(TARGET_NR_symlinkat) && defined(__NR_symlinkat)
f0b6243d
TS
460_syscall3(int,sys_symlinkat,const char *,oldpath,
461 int,newdirfd,const char *,newpath)
462#endif
8170f56b
TS
463#if defined(TARGET_NR_unlinkat) && defined(__NR_unlinkat)
464_syscall3(int,sys_unlinkat,int,dirfd,const char *,pathname,int,flags)
465#endif
ebc996f3
RV
466
467#endif /* CONFIG_ATFILE */
468
469#ifdef CONFIG_UTIMENSAT
470static int sys_utimensat(int dirfd, const char *pathname,
471 const struct timespec times[2], int flags)
472{
473 if (pathname == NULL)
474 return futimens(dirfd, times);
475 else
476 return utimensat(dirfd, pathname, times, flags);
477}
478#else
9007f0ef
TS
479#if defined(TARGET_NR_utimensat) && defined(__NR_utimensat)
480_syscall4(int,sys_utimensat,int,dirfd,const char *,pathname,
481 const struct timespec *,tsp,int,flags)
482#endif
ebc996f3 483#endif /* CONFIG_UTIMENSAT */
3b3f24ad
AJ
484
485#ifdef CONFIG_INOTIFY
8690e420 486#include <sys/inotify.h>
3b3f24ad 487
39b59763 488#if defined(TARGET_NR_inotify_init) && defined(__NR_inotify_init)
3b3f24ad
AJ
489static int sys_inotify_init(void)
490{
491 return (inotify_init());
492}
39b59763
AJ
493#endif
494#if defined(TARGET_NR_inotify_add_watch) && defined(__NR_inotify_add_watch)
3b3f24ad
AJ
495static int sys_inotify_add_watch(int fd,const char *pathname, int32_t mask)
496{
497 return (inotify_add_watch(fd, pathname, mask));
498}
39b59763
AJ
499#endif
500#if defined(TARGET_NR_inotify_rm_watch) && defined(__NR_inotify_rm_watch)
3b3f24ad
AJ
501static int sys_inotify_rm_watch(int fd, int32_t wd)
502{
8690e420 503 return (inotify_rm_watch(fd, wd));
3b3f24ad 504}
bd0c5661 505#endif
3b3f24ad
AJ
506#else
507/* Userspace can usually survive runtime without inotify */
508#undef TARGET_NR_inotify_init
509#undef TARGET_NR_inotify_add_watch
510#undef TARGET_NR_inotify_rm_watch
511#endif /* CONFIG_INOTIFY */
512
66fb9763
FB
513
514extern int personality(int);
9de5e440
FB
515extern int flock(int, int);
516extern int setfsuid(int);
517extern int setfsgid(int);
19b84f3c 518extern int setgroups(int, gid_t *);
31e31b8a 519
b92c47c1
TS
520#define ERRNO_TABLE_SIZE 1200
521
522/* target_to_host_errno_table[] is initialized from
523 * host_to_target_errno_table[] in syscall_init(). */
524static uint16_t target_to_host_errno_table[ERRNO_TABLE_SIZE] = {
525};
526
637947f1 527/*
fe8f096b 528 * This list is the union of errno values overridden in asm-<arch>/errno.h
637947f1
TS
529 * minus the errnos that are not actually generic to all archs.
530 */
b92c47c1 531static uint16_t host_to_target_errno_table[ERRNO_TABLE_SIZE] = {
637947f1
TS
532 [EIDRM] = TARGET_EIDRM,
533 [ECHRNG] = TARGET_ECHRNG,
534 [EL2NSYNC] = TARGET_EL2NSYNC,
535 [EL3HLT] = TARGET_EL3HLT,
536 [EL3RST] = TARGET_EL3RST,
537 [ELNRNG] = TARGET_ELNRNG,
538 [EUNATCH] = TARGET_EUNATCH,
539 [ENOCSI] = TARGET_ENOCSI,
540 [EL2HLT] = TARGET_EL2HLT,
541 [EDEADLK] = TARGET_EDEADLK,
542 [ENOLCK] = TARGET_ENOLCK,
543 [EBADE] = TARGET_EBADE,
544 [EBADR] = TARGET_EBADR,
545 [EXFULL] = TARGET_EXFULL,
546 [ENOANO] = TARGET_ENOANO,
547 [EBADRQC] = TARGET_EBADRQC,
548 [EBADSLT] = TARGET_EBADSLT,
549 [EBFONT] = TARGET_EBFONT,
550 [ENOSTR] = TARGET_ENOSTR,
551 [ENODATA] = TARGET_ENODATA,
552 [ETIME] = TARGET_ETIME,
553 [ENOSR] = TARGET_ENOSR,
554 [ENONET] = TARGET_ENONET,
555 [ENOPKG] = TARGET_ENOPKG,
556 [EREMOTE] = TARGET_EREMOTE,
557 [ENOLINK] = TARGET_ENOLINK,
558 [EADV] = TARGET_EADV,
559 [ESRMNT] = TARGET_ESRMNT,
560 [ECOMM] = TARGET_ECOMM,
561 [EPROTO] = TARGET_EPROTO,
562 [EDOTDOT] = TARGET_EDOTDOT,
563 [EMULTIHOP] = TARGET_EMULTIHOP,
564 [EBADMSG] = TARGET_EBADMSG,
565 [ENAMETOOLONG] = TARGET_ENAMETOOLONG,
566 [EOVERFLOW] = TARGET_EOVERFLOW,
567 [ENOTUNIQ] = TARGET_ENOTUNIQ,
568 [EBADFD] = TARGET_EBADFD,
569 [EREMCHG] = TARGET_EREMCHG,
570 [ELIBACC] = TARGET_ELIBACC,
571 [ELIBBAD] = TARGET_ELIBBAD,
572 [ELIBSCN] = TARGET_ELIBSCN,
573 [ELIBMAX] = TARGET_ELIBMAX,
574 [ELIBEXEC] = TARGET_ELIBEXEC,
575 [EILSEQ] = TARGET_EILSEQ,
576 [ENOSYS] = TARGET_ENOSYS,
577 [ELOOP] = TARGET_ELOOP,
578 [ERESTART] = TARGET_ERESTART,
579 [ESTRPIPE] = TARGET_ESTRPIPE,
580 [ENOTEMPTY] = TARGET_ENOTEMPTY,
581 [EUSERS] = TARGET_EUSERS,
582 [ENOTSOCK] = TARGET_ENOTSOCK,
583 [EDESTADDRREQ] = TARGET_EDESTADDRREQ,
584 [EMSGSIZE] = TARGET_EMSGSIZE,
585 [EPROTOTYPE] = TARGET_EPROTOTYPE,
586 [ENOPROTOOPT] = TARGET_ENOPROTOOPT,
587 [EPROTONOSUPPORT] = TARGET_EPROTONOSUPPORT,
588 [ESOCKTNOSUPPORT] = TARGET_ESOCKTNOSUPPORT,
589 [EOPNOTSUPP] = TARGET_EOPNOTSUPP,
590 [EPFNOSUPPORT] = TARGET_EPFNOSUPPORT,
591 [EAFNOSUPPORT] = TARGET_EAFNOSUPPORT,
592 [EADDRINUSE] = TARGET_EADDRINUSE,
593 [EADDRNOTAVAIL] = TARGET_EADDRNOTAVAIL,
594 [ENETDOWN] = TARGET_ENETDOWN,
595 [ENETUNREACH] = TARGET_ENETUNREACH,
596 [ENETRESET] = TARGET_ENETRESET,
597 [ECONNABORTED] = TARGET_ECONNABORTED,
598 [ECONNRESET] = TARGET_ECONNRESET,
599 [ENOBUFS] = TARGET_ENOBUFS,
600 [EISCONN] = TARGET_EISCONN,
601 [ENOTCONN] = TARGET_ENOTCONN,
602 [EUCLEAN] = TARGET_EUCLEAN,
603 [ENOTNAM] = TARGET_ENOTNAM,
604 [ENAVAIL] = TARGET_ENAVAIL,
605 [EISNAM] = TARGET_EISNAM,
606 [EREMOTEIO] = TARGET_EREMOTEIO,
607 [ESHUTDOWN] = TARGET_ESHUTDOWN,
608 [ETOOMANYREFS] = TARGET_ETOOMANYREFS,
609 [ETIMEDOUT] = TARGET_ETIMEDOUT,
610 [ECONNREFUSED] = TARGET_ECONNREFUSED,
611 [EHOSTDOWN] = TARGET_EHOSTDOWN,
612 [EHOSTUNREACH] = TARGET_EHOSTUNREACH,
613 [EALREADY] = TARGET_EALREADY,
614 [EINPROGRESS] = TARGET_EINPROGRESS,
615 [ESTALE] = TARGET_ESTALE,
616 [ECANCELED] = TARGET_ECANCELED,
617 [ENOMEDIUM] = TARGET_ENOMEDIUM,
618 [EMEDIUMTYPE] = TARGET_EMEDIUMTYPE,
b7fe5db7 619#ifdef ENOKEY
637947f1 620 [ENOKEY] = TARGET_ENOKEY,
b7fe5db7
TS
621#endif
622#ifdef EKEYEXPIRED
637947f1 623 [EKEYEXPIRED] = TARGET_EKEYEXPIRED,
b7fe5db7
TS
624#endif
625#ifdef EKEYREVOKED
637947f1 626 [EKEYREVOKED] = TARGET_EKEYREVOKED,
b7fe5db7
TS
627#endif
628#ifdef EKEYREJECTED
637947f1 629 [EKEYREJECTED] = TARGET_EKEYREJECTED,
b7fe5db7
TS
630#endif
631#ifdef EOWNERDEAD
637947f1 632 [EOWNERDEAD] = TARGET_EOWNERDEAD,
b7fe5db7
TS
633#endif
634#ifdef ENOTRECOVERABLE
637947f1 635 [ENOTRECOVERABLE] = TARGET_ENOTRECOVERABLE,
b7fe5db7 636#endif
b92c47c1 637};
637947f1
TS
638
639static inline int host_to_target_errno(int err)
640{
641 if(host_to_target_errno_table[err])
642 return host_to_target_errno_table[err];
643 return err;
644}
645
b92c47c1
TS
646static inline int target_to_host_errno(int err)
647{
648 if (target_to_host_errno_table[err])
649 return target_to_host_errno_table[err];
650 return err;
651}
652
992f48a0 653static inline abi_long get_errno(abi_long ret)
31e31b8a
FB
654{
655 if (ret == -1)
637947f1 656 return -host_to_target_errno(errno);
31e31b8a
FB
657 else
658 return ret;
659}
660
992f48a0 661static inline int is_error(abi_long ret)
31e31b8a 662{
992f48a0 663 return (abi_ulong)ret >= (abi_ulong)(-4096);
31e31b8a
FB
664}
665
b92c47c1
TS
666char *target_strerror(int err)
667{
668 return strerror(target_to_host_errno(err));
669}
670
992f48a0
BS
671static abi_ulong target_brk;
672static abi_ulong target_original_brk;
31e31b8a 673
992f48a0 674void target_set_brk(abi_ulong new_brk)
31e31b8a 675{
4c1de73d 676 target_original_brk = target_brk = HOST_PAGE_ALIGN(new_brk);
31e31b8a
FB
677}
678
0da46a6e 679/* do_brk() must return target values and target errnos. */
992f48a0 680abi_long do_brk(abi_ulong new_brk)
31e31b8a 681{
992f48a0
BS
682 abi_ulong brk_page;
683 abi_long mapped_addr;
31e31b8a
FB
684 int new_alloc_size;
685
686 if (!new_brk)
53a5960a 687 return target_brk;
31e31b8a 688 if (new_brk < target_original_brk)
7ab240ad 689 return target_brk;
3b46e624 690
53a5960a 691 brk_page = HOST_PAGE_ALIGN(target_brk);
31e31b8a
FB
692
693 /* If the new brk is less than this, set it and we're done... */
694 if (new_brk < brk_page) {
695 target_brk = new_brk;
53a5960a 696 return target_brk;
31e31b8a
FB
697 }
698
699 /* We need to allocate more memory after the brk... */
54936004 700 new_alloc_size = HOST_PAGE_ALIGN(new_brk - brk_page + 1);
5fafdf24 701 mapped_addr = get_errno(target_mmap(brk_page, new_alloc_size,
54936004
FB
702 PROT_READ|PROT_WRITE,
703 MAP_ANON|MAP_FIXED|MAP_PRIVATE, 0, 0));
7ab240ad
AZ
704
705 if (!is_error(mapped_addr))
31e31b8a 706 target_brk = new_brk;
7ab240ad
AZ
707
708 return target_brk;
31e31b8a
FB
709}
710
26edcf41
TS
711static inline abi_long copy_from_user_fdset(fd_set *fds,
712 abi_ulong target_fds_addr,
713 int n)
31e31b8a 714{
26edcf41
TS
715 int i, nw, j, k;
716 abi_ulong b, *target_fds;
717
718 nw = (n + TARGET_ABI_BITS - 1) / TARGET_ABI_BITS;
719 if (!(target_fds = lock_user(VERIFY_READ,
720 target_fds_addr,
721 sizeof(abi_ulong) * nw,
722 1)))
723 return -TARGET_EFAULT;
724
725 FD_ZERO(fds);
726 k = 0;
727 for (i = 0; i < nw; i++) {
728 /* grab the abi_ulong */
729 __get_user(b, &target_fds[i]);
730 for (j = 0; j < TARGET_ABI_BITS; j++) {
731 /* check the bit inside the abi_ulong */
732 if ((b >> j) & 1)
733 FD_SET(k, fds);
734 k++;
31e31b8a 735 }
31e31b8a 736 }
26edcf41
TS
737
738 unlock_user(target_fds, target_fds_addr, 0);
739
740 return 0;
31e31b8a
FB
741}
742
26edcf41
TS
743static inline abi_long copy_to_user_fdset(abi_ulong target_fds_addr,
744 const fd_set *fds,
745 int n)
31e31b8a 746{
31e31b8a 747 int i, nw, j, k;
992f48a0 748 abi_long v;
26edcf41 749 abi_ulong *target_fds;
31e31b8a 750
26edcf41
TS
751 nw = (n + TARGET_ABI_BITS - 1) / TARGET_ABI_BITS;
752 if (!(target_fds = lock_user(VERIFY_WRITE,
753 target_fds_addr,
754 sizeof(abi_ulong) * nw,
755 0)))
756 return -TARGET_EFAULT;
757
758 k = 0;
759 for (i = 0; i < nw; i++) {
760 v = 0;
761 for (j = 0; j < TARGET_ABI_BITS; j++) {
762 v |= ((FD_ISSET(k, fds) != 0) << j);
763 k++;
31e31b8a 764 }
26edcf41 765 __put_user(v, &target_fds[i]);
31e31b8a 766 }
26edcf41
TS
767
768 unlock_user(target_fds, target_fds_addr, sizeof(abi_ulong) * nw);
769
770 return 0;
31e31b8a
FB
771}
772
c596ed17
FB
773#if defined(__alpha__)
774#define HOST_HZ 1024
775#else
776#define HOST_HZ 100
777#endif
778
992f48a0 779static inline abi_long host_to_target_clock_t(long ticks)
c596ed17
FB
780{
781#if HOST_HZ == TARGET_HZ
782 return ticks;
783#else
784 return ((int64_t)ticks * TARGET_HZ) / HOST_HZ;
785#endif
786}
787
579a97f7
FB
788static inline abi_long host_to_target_rusage(abi_ulong target_addr,
789 const struct rusage *rusage)
b409186b 790{
53a5960a
PB
791 struct target_rusage *target_rusage;
792
579a97f7
FB
793 if (!lock_user_struct(VERIFY_WRITE, target_rusage, target_addr, 0))
794 return -TARGET_EFAULT;
b409186b
FB
795 target_rusage->ru_utime.tv_sec = tswapl(rusage->ru_utime.tv_sec);
796 target_rusage->ru_utime.tv_usec = tswapl(rusage->ru_utime.tv_usec);
797 target_rusage->ru_stime.tv_sec = tswapl(rusage->ru_stime.tv_sec);
798 target_rusage->ru_stime.tv_usec = tswapl(rusage->ru_stime.tv_usec);
799 target_rusage->ru_maxrss = tswapl(rusage->ru_maxrss);
800 target_rusage->ru_ixrss = tswapl(rusage->ru_ixrss);
801 target_rusage->ru_idrss = tswapl(rusage->ru_idrss);
802 target_rusage->ru_isrss = tswapl(rusage->ru_isrss);
803 target_rusage->ru_minflt = tswapl(rusage->ru_minflt);
804 target_rusage->ru_majflt = tswapl(rusage->ru_majflt);
805 target_rusage->ru_nswap = tswapl(rusage->ru_nswap);
806 target_rusage->ru_inblock = tswapl(rusage->ru_inblock);
807 target_rusage->ru_oublock = tswapl(rusage->ru_oublock);
808 target_rusage->ru_msgsnd = tswapl(rusage->ru_msgsnd);
809 target_rusage->ru_msgrcv = tswapl(rusage->ru_msgrcv);
810 target_rusage->ru_nsignals = tswapl(rusage->ru_nsignals);
811 target_rusage->ru_nvcsw = tswapl(rusage->ru_nvcsw);
812 target_rusage->ru_nivcsw = tswapl(rusage->ru_nivcsw);
53a5960a 813 unlock_user_struct(target_rusage, target_addr, 1);
579a97f7
FB
814
815 return 0;
b409186b
FB
816}
817
788f5ec4
TS
818static inline abi_long copy_from_user_timeval(struct timeval *tv,
819 abi_ulong target_tv_addr)
31e31b8a 820{
53a5960a
PB
821 struct target_timeval *target_tv;
822
788f5ec4 823 if (!lock_user_struct(VERIFY_READ, target_tv, target_tv_addr, 1))
579a97f7 824 return -TARGET_EFAULT;
788f5ec4
TS
825
826 __get_user(tv->tv_sec, &target_tv->tv_sec);
827 __get_user(tv->tv_usec, &target_tv->tv_usec);
828
829 unlock_user_struct(target_tv, target_tv_addr, 0);
579a97f7
FB
830
831 return 0;
31e31b8a
FB
832}
833
788f5ec4
TS
834static inline abi_long copy_to_user_timeval(abi_ulong target_tv_addr,
835 const struct timeval *tv)
31e31b8a 836{
53a5960a
PB
837 struct target_timeval *target_tv;
838
788f5ec4 839 if (!lock_user_struct(VERIFY_WRITE, target_tv, target_tv_addr, 0))
579a97f7 840 return -TARGET_EFAULT;
788f5ec4
TS
841
842 __put_user(tv->tv_sec, &target_tv->tv_sec);
843 __put_user(tv->tv_usec, &target_tv->tv_usec);
844
845 unlock_user_struct(target_tv, target_tv_addr, 1);
579a97f7
FB
846
847 return 0;
31e31b8a
FB
848}
849
24e1003a
AJ
850static inline abi_long copy_from_user_mq_attr(struct mq_attr *attr,
851 abi_ulong target_mq_attr_addr)
852{
853 struct target_mq_attr *target_mq_attr;
854
855 if (!lock_user_struct(VERIFY_READ, target_mq_attr,
856 target_mq_attr_addr, 1))
857 return -TARGET_EFAULT;
858
859 __get_user(attr->mq_flags, &target_mq_attr->mq_flags);
860 __get_user(attr->mq_maxmsg, &target_mq_attr->mq_maxmsg);
861 __get_user(attr->mq_msgsize, &target_mq_attr->mq_msgsize);
862 __get_user(attr->mq_curmsgs, &target_mq_attr->mq_curmsgs);
863
864 unlock_user_struct(target_mq_attr, target_mq_attr_addr, 0);
865
866 return 0;
867}
868
869static inline abi_long copy_to_user_mq_attr(abi_ulong target_mq_attr_addr,
870 const struct mq_attr *attr)
871{
872 struct target_mq_attr *target_mq_attr;
873
874 if (!lock_user_struct(VERIFY_WRITE, target_mq_attr,
875 target_mq_attr_addr, 0))
876 return -TARGET_EFAULT;
877
878 __put_user(attr->mq_flags, &target_mq_attr->mq_flags);
879 __put_user(attr->mq_maxmsg, &target_mq_attr->mq_maxmsg);
880 __put_user(attr->mq_msgsize, &target_mq_attr->mq_msgsize);
881 __put_user(attr->mq_curmsgs, &target_mq_attr->mq_curmsgs);
882
883 unlock_user_struct(target_mq_attr, target_mq_attr_addr, 1);
884
885 return 0;
886}
31e31b8a 887
0da46a6e 888/* do_select() must return target values and target errnos. */
992f48a0 889static abi_long do_select(int n,
26edcf41
TS
890 abi_ulong rfd_addr, abi_ulong wfd_addr,
891 abi_ulong efd_addr, abi_ulong target_tv_addr)
31e31b8a
FB
892{
893 fd_set rfds, wfds, efds;
894 fd_set *rfds_ptr, *wfds_ptr, *efds_ptr;
895 struct timeval tv, *tv_ptr;
992f48a0 896 abi_long ret;
31e31b8a 897
26edcf41
TS
898 if (rfd_addr) {
899 if (copy_from_user_fdset(&rfds, rfd_addr, n))
900 return -TARGET_EFAULT;
901 rfds_ptr = &rfds;
53a5960a 902 } else {
53a5960a
PB
903 rfds_ptr = NULL;
904 }
26edcf41
TS
905 if (wfd_addr) {
906 if (copy_from_user_fdset(&wfds, wfd_addr, n))
907 return -TARGET_EFAULT;
908 wfds_ptr = &wfds;
53a5960a 909 } else {
53a5960a
PB
910 wfds_ptr = NULL;
911 }
26edcf41
TS
912 if (efd_addr) {
913 if (copy_from_user_fdset(&efds, efd_addr, n))
914 return -TARGET_EFAULT;
915 efds_ptr = &efds;
53a5960a 916 } else {
53a5960a
PB
917 efds_ptr = NULL;
918 }
3b46e624 919
26edcf41 920 if (target_tv_addr) {
788f5ec4
TS
921 if (copy_from_user_timeval(&tv, target_tv_addr))
922 return -TARGET_EFAULT;
31e31b8a
FB
923 tv_ptr = &tv;
924 } else {
925 tv_ptr = NULL;
926 }
26edcf41 927
31e31b8a 928 ret = get_errno(select(n, rfds_ptr, wfds_ptr, efds_ptr, tv_ptr));
53a5960a 929
26edcf41
TS
930 if (!is_error(ret)) {
931 if (rfd_addr && copy_to_user_fdset(rfd_addr, &rfds, n))
932 return -TARGET_EFAULT;
933 if (wfd_addr && copy_to_user_fdset(wfd_addr, &wfds, n))
934 return -TARGET_EFAULT;
935 if (efd_addr && copy_to_user_fdset(efd_addr, &efds, n))
936 return -TARGET_EFAULT;
31e31b8a 937
788f5ec4
TS
938 if (target_tv_addr && copy_to_user_timeval(target_tv_addr, &tv))
939 return -TARGET_EFAULT;
31e31b8a 940 }
579a97f7 941
31e31b8a
FB
942 return ret;
943}
944
099d6b0f
RV
945static abi_long do_pipe2(int host_pipe[], int flags)
946{
947#ifdef CONFIG_PIPE2
948 return pipe2(host_pipe, flags);
949#else
950 return -ENOSYS;
951#endif
952}
953
784ccfdb 954static abi_long do_pipe(void *cpu_env, abi_ulong pipedes, int flags)
099d6b0f
RV
955{
956 int host_pipe[2];
957 abi_long ret;
958 ret = flags ? do_pipe2(host_pipe, flags) : pipe(host_pipe);
959
960 if (is_error(ret))
961 return get_errno(ret);
962#if defined(TARGET_MIPS)
963 ((CPUMIPSState*)cpu_env)->active_tc.gpr[3] = host_pipe[1];
964 ret = host_pipe[0];
965#elif defined(TARGET_SH4)
966 ((CPUSH4State*)cpu_env)->gregs[1] = host_pipe[1];
967 ret = host_pipe[0];
968#else
969 if (put_user_s32(host_pipe[0], pipedes)
970 || put_user_s32(host_pipe[1], pipedes + sizeof(host_pipe[0])))
971 return -TARGET_EFAULT;
972#endif
973 return get_errno(ret);
974}
975
b975b83b
LL
976static inline abi_long target_to_host_ip_mreq(struct ip_mreqn *mreqn,
977 abi_ulong target_addr,
978 socklen_t len)
979{
980 struct target_ip_mreqn *target_smreqn;
981
982 target_smreqn = lock_user(VERIFY_READ, target_addr, len, 1);
983 if (!target_smreqn)
984 return -TARGET_EFAULT;
985 mreqn->imr_multiaddr.s_addr = target_smreqn->imr_multiaddr.s_addr;
986 mreqn->imr_address.s_addr = target_smreqn->imr_address.s_addr;
987 if (len == sizeof(struct target_ip_mreqn))
988 mreqn->imr_ifindex = tswapl(target_smreqn->imr_ifindex);
989 unlock_user(target_smreqn, target_addr, 0);
990
991 return 0;
992}
993
579a97f7
FB
994static inline abi_long target_to_host_sockaddr(struct sockaddr *addr,
995 abi_ulong target_addr,
996 socklen_t len)
7854b056 997{
607175e0
AJ
998 const socklen_t unix_maxlen = sizeof (struct sockaddr_un);
999 sa_family_t sa_family;
53a5960a
PB
1000 struct target_sockaddr *target_saddr;
1001
579a97f7
FB
1002 target_saddr = lock_user(VERIFY_READ, target_addr, len, 1);
1003 if (!target_saddr)
1004 return -TARGET_EFAULT;
607175e0
AJ
1005
1006 sa_family = tswap16(target_saddr->sa_family);
1007
1008 /* Oops. The caller might send a incomplete sun_path; sun_path
1009 * must be terminated by \0 (see the manual page), but
1010 * unfortunately it is quite common to specify sockaddr_un
1011 * length as "strlen(x->sun_path)" while it should be
1012 * "strlen(...) + 1". We'll fix that here if needed.
1013 * Linux kernel has a similar feature.
1014 */
1015
1016 if (sa_family == AF_UNIX) {
1017 if (len < unix_maxlen && len > 0) {
1018 char *cp = (char*)target_saddr;
1019
1020 if ( cp[len-1] && !cp[len] )
1021 len++;
1022 }
1023 if (len > unix_maxlen)
1024 len = unix_maxlen;
1025 }
1026
53a5960a 1027 memcpy(addr, target_saddr, len);
607175e0 1028 addr->sa_family = sa_family;
53a5960a 1029 unlock_user(target_saddr, target_addr, 0);
579a97f7
FB
1030
1031 return 0;
7854b056
FB
1032}
1033
579a97f7
FB
1034static inline abi_long host_to_target_sockaddr(abi_ulong target_addr,
1035 struct sockaddr *addr,
1036 socklen_t len)
7854b056 1037{
53a5960a
PB
1038 struct target_sockaddr *target_saddr;
1039
579a97f7
FB
1040 target_saddr = lock_user(VERIFY_WRITE, target_addr, len, 0);
1041 if (!target_saddr)
1042 return -TARGET_EFAULT;
53a5960a
PB
1043 memcpy(target_saddr, addr, len);
1044 target_saddr->sa_family = tswap16(addr->sa_family);
1045 unlock_user(target_saddr, target_addr, len);
579a97f7
FB
1046
1047 return 0;
7854b056
FB
1048}
1049
53a5960a 1050/* ??? Should this also swap msgh->name? */
5a4a898d
FB
1051static inline abi_long target_to_host_cmsg(struct msghdr *msgh,
1052 struct target_msghdr *target_msgh)
7854b056
FB
1053{
1054 struct cmsghdr *cmsg = CMSG_FIRSTHDR(msgh);
5a4a898d
FB
1055 abi_long msg_controllen;
1056 abi_ulong target_cmsg_addr;
1057 struct target_cmsghdr *target_cmsg;
7854b056 1058 socklen_t space = 0;
5a4a898d
FB
1059
1060 msg_controllen = tswapl(target_msgh->msg_controllen);
1061 if (msg_controllen < sizeof (struct target_cmsghdr))
1062 goto the_end;
1063 target_cmsg_addr = tswapl(target_msgh->msg_control);
1064 target_cmsg = lock_user(VERIFY_READ, target_cmsg_addr, msg_controllen, 1);
1065 if (!target_cmsg)
1066 return -TARGET_EFAULT;
7854b056
FB
1067
1068 while (cmsg && target_cmsg) {
1069 void *data = CMSG_DATA(cmsg);
1070 void *target_data = TARGET_CMSG_DATA(target_cmsg);
1071
5fafdf24 1072 int len = tswapl(target_cmsg->cmsg_len)
7854b056
FB
1073 - TARGET_CMSG_ALIGN(sizeof (struct target_cmsghdr));
1074
1075 space += CMSG_SPACE(len);
1076 if (space > msgh->msg_controllen) {
1077 space -= CMSG_SPACE(len);
31febb71 1078 gemu_log("Host cmsg overflow\n");
7854b056
FB
1079 break;
1080 }
1081
1082 cmsg->cmsg_level = tswap32(target_cmsg->cmsg_level);
1083 cmsg->cmsg_type = tswap32(target_cmsg->cmsg_type);
1084 cmsg->cmsg_len = CMSG_LEN(len);
1085
3532fa74 1086 if (cmsg->cmsg_level != TARGET_SOL_SOCKET || cmsg->cmsg_type != SCM_RIGHTS) {
7854b056
FB
1087 gemu_log("Unsupported ancillary data: %d/%d\n", cmsg->cmsg_level, cmsg->cmsg_type);
1088 memcpy(data, target_data, len);
1089 } else {
1090 int *fd = (int *)data;
1091 int *target_fd = (int *)target_data;
1092 int i, numfds = len / sizeof(int);
1093
1094 for (i = 0; i < numfds; i++)
1095 fd[i] = tswap32(target_fd[i]);
1096 }
1097
1098 cmsg = CMSG_NXTHDR(msgh, cmsg);
1099 target_cmsg = TARGET_CMSG_NXTHDR(target_msgh, target_cmsg);
1100 }
5a4a898d
FB
1101 unlock_user(target_cmsg, target_cmsg_addr, 0);
1102 the_end:
7854b056 1103 msgh->msg_controllen = space;
5a4a898d 1104 return 0;
7854b056
FB
1105}
1106
53a5960a 1107/* ??? Should this also swap msgh->name? */
5a4a898d
FB
1108static inline abi_long host_to_target_cmsg(struct target_msghdr *target_msgh,
1109 struct msghdr *msgh)
7854b056
FB
1110{
1111 struct cmsghdr *cmsg = CMSG_FIRSTHDR(msgh);
5a4a898d
FB
1112 abi_long msg_controllen;
1113 abi_ulong target_cmsg_addr;
1114 struct target_cmsghdr *target_cmsg;
7854b056
FB
1115 socklen_t space = 0;
1116
5a4a898d
FB
1117 msg_controllen = tswapl(target_msgh->msg_controllen);
1118 if (msg_controllen < sizeof (struct target_cmsghdr))
1119 goto the_end;
1120 target_cmsg_addr = tswapl(target_msgh->msg_control);
1121 target_cmsg = lock_user(VERIFY_WRITE, target_cmsg_addr, msg_controllen, 0);
1122 if (!target_cmsg)
1123 return -TARGET_EFAULT;
1124
7854b056
FB
1125 while (cmsg && target_cmsg) {
1126 void *data = CMSG_DATA(cmsg);
1127 void *target_data = TARGET_CMSG_DATA(target_cmsg);
1128
1129 int len = cmsg->cmsg_len - CMSG_ALIGN(sizeof (struct cmsghdr));
1130
1131 space += TARGET_CMSG_SPACE(len);
5a4a898d 1132 if (space > msg_controllen) {
7854b056 1133 space -= TARGET_CMSG_SPACE(len);
31febb71 1134 gemu_log("Target cmsg overflow\n");
7854b056
FB
1135 break;
1136 }
1137
1138 target_cmsg->cmsg_level = tswap32(cmsg->cmsg_level);
1139 target_cmsg->cmsg_type = tswap32(cmsg->cmsg_type);
1140 target_cmsg->cmsg_len = tswapl(TARGET_CMSG_LEN(len));
1141
3532fa74 1142 if (cmsg->cmsg_level != TARGET_SOL_SOCKET || cmsg->cmsg_type != SCM_RIGHTS) {
7854b056
FB
1143 gemu_log("Unsupported ancillary data: %d/%d\n", cmsg->cmsg_level, cmsg->cmsg_type);
1144 memcpy(target_data, data, len);
1145 } else {
1146 int *fd = (int *)data;
1147 int *target_fd = (int *)target_data;
1148 int i, numfds = len / sizeof(int);
1149
1150 for (i = 0; i < numfds; i++)
1151 target_fd[i] = tswap32(fd[i]);
1152 }
1153
1154 cmsg = CMSG_NXTHDR(msgh, cmsg);
1155 target_cmsg = TARGET_CMSG_NXTHDR(target_msgh, target_cmsg);
1156 }
5a4a898d
FB
1157 unlock_user(target_cmsg, target_cmsg_addr, space);
1158 the_end:
1159 target_msgh->msg_controllen = tswapl(space);
1160 return 0;
7854b056
FB
1161}
1162
0da46a6e 1163/* do_setsockopt() Must return target values and target errnos. */
992f48a0 1164static abi_long do_setsockopt(int sockfd, int level, int optname,
2f619698 1165 abi_ulong optval_addr, socklen_t optlen)
7854b056 1166{
992f48a0 1167 abi_long ret;
32407103 1168 int val;
b975b83b 1169 struct ip_mreqn *ip_mreq;
6e3cb58f 1170 struct ip_mreq_source *ip_mreq_source;
3b46e624 1171
8853f86e
FB
1172 switch(level) {
1173 case SOL_TCP:
7854b056 1174 /* TCP options all take an 'int' value. */
7854b056 1175 if (optlen < sizeof(uint32_t))
0da46a6e 1176 return -TARGET_EINVAL;
3b46e624 1177
2f619698
FB
1178 if (get_user_u32(val, optval_addr))
1179 return -TARGET_EFAULT;
8853f86e
FB
1180 ret = get_errno(setsockopt(sockfd, level, optname, &val, sizeof(val)));
1181 break;
1182 case SOL_IP:
1183 switch(optname) {
2efbe911
FB
1184 case IP_TOS:
1185 case IP_TTL:
8853f86e 1186 case IP_HDRINCL:
2efbe911
FB
1187 case IP_ROUTER_ALERT:
1188 case IP_RECVOPTS:
1189 case IP_RETOPTS:
1190 case IP_PKTINFO:
1191 case IP_MTU_DISCOVER:
1192 case IP_RECVERR:
1193 case IP_RECVTOS:
1194#ifdef IP_FREEBIND
1195 case IP_FREEBIND:
1196#endif
1197 case IP_MULTICAST_TTL:
1198 case IP_MULTICAST_LOOP:
8853f86e
FB
1199 val = 0;
1200 if (optlen >= sizeof(uint32_t)) {
2f619698
FB
1201 if (get_user_u32(val, optval_addr))
1202 return -TARGET_EFAULT;
8853f86e 1203 } else if (optlen >= 1) {
2f619698
FB
1204 if (get_user_u8(val, optval_addr))
1205 return -TARGET_EFAULT;
8853f86e
FB
1206 }
1207 ret = get_errno(setsockopt(sockfd, level, optname, &val, sizeof(val)));
1208 break;
b975b83b
LL
1209 case IP_ADD_MEMBERSHIP:
1210 case IP_DROP_MEMBERSHIP:
1211 if (optlen < sizeof (struct target_ip_mreq) ||
1212 optlen > sizeof (struct target_ip_mreqn))
1213 return -TARGET_EINVAL;
1214
1215 ip_mreq = (struct ip_mreqn *) alloca(optlen);
1216 target_to_host_ip_mreq(ip_mreq, optval_addr, optlen);
1217 ret = get_errno(setsockopt(sockfd, level, optname, ip_mreq, optlen));
1218 break;
1219
6e3cb58f
LL
1220 case IP_BLOCK_SOURCE:
1221 case IP_UNBLOCK_SOURCE:
1222 case IP_ADD_SOURCE_MEMBERSHIP:
1223 case IP_DROP_SOURCE_MEMBERSHIP:
1224 if (optlen != sizeof (struct target_ip_mreq_source))
1225 return -TARGET_EINVAL;
1226
1227 ip_mreq_source = lock_user(VERIFY_READ, optval_addr, optlen, 1);
1228 ret = get_errno(setsockopt(sockfd, level, optname, ip_mreq_source, optlen));
1229 unlock_user (ip_mreq_source, optval_addr, 0);
1230 break;
1231
8853f86e
FB
1232 default:
1233 goto unimplemented;
1234 }
1235 break;
3532fa74 1236 case TARGET_SOL_SOCKET:
8853f86e
FB
1237 switch (optname) {
1238 /* Options with 'int' argument. */
3532fa74
FB
1239 case TARGET_SO_DEBUG:
1240 optname = SO_DEBUG;
1241 break;
1242 case TARGET_SO_REUSEADDR:
1243 optname = SO_REUSEADDR;
1244 break;
1245 case TARGET_SO_TYPE:
1246 optname = SO_TYPE;
1247 break;
1248 case TARGET_SO_ERROR:
1249 optname = SO_ERROR;
1250 break;
1251 case TARGET_SO_DONTROUTE:
1252 optname = SO_DONTROUTE;
1253 break;
1254 case TARGET_SO_BROADCAST:
1255 optname = SO_BROADCAST;
1256 break;
1257 case TARGET_SO_SNDBUF:
1258 optname = SO_SNDBUF;
1259 break;
1260 case TARGET_SO_RCVBUF:
1261 optname = SO_RCVBUF;
1262 break;
1263 case TARGET_SO_KEEPALIVE:
1264 optname = SO_KEEPALIVE;
1265 break;
1266 case TARGET_SO_OOBINLINE:
1267 optname = SO_OOBINLINE;
1268 break;
1269 case TARGET_SO_NO_CHECK:
1270 optname = SO_NO_CHECK;
1271 break;
1272 case TARGET_SO_PRIORITY:
1273 optname = SO_PRIORITY;
1274 break;
5e83e8e3 1275#ifdef SO_BSDCOMPAT
3532fa74
FB
1276 case TARGET_SO_BSDCOMPAT:
1277 optname = SO_BSDCOMPAT;
1278 break;
5e83e8e3 1279#endif
3532fa74
FB
1280 case TARGET_SO_PASSCRED:
1281 optname = SO_PASSCRED;
1282 break;
1283 case TARGET_SO_TIMESTAMP:
1284 optname = SO_TIMESTAMP;
1285 break;
1286 case TARGET_SO_RCVLOWAT:
1287 optname = SO_RCVLOWAT;
1288 break;
1289 case TARGET_SO_RCVTIMEO:
1290 optname = SO_RCVTIMEO;
1291 break;
1292 case TARGET_SO_SNDTIMEO:
1293 optname = SO_SNDTIMEO;
1294 break;
8853f86e
FB
1295 break;
1296 default:
1297 goto unimplemented;
1298 }
3532fa74 1299 if (optlen < sizeof(uint32_t))
2f619698 1300 return -TARGET_EINVAL;
3532fa74 1301
2f619698
FB
1302 if (get_user_u32(val, optval_addr))
1303 return -TARGET_EFAULT;
3532fa74 1304 ret = get_errno(setsockopt(sockfd, SOL_SOCKET, optname, &val, sizeof(val)));
8853f86e 1305 break;
7854b056 1306 default:
8853f86e
FB
1307 unimplemented:
1308 gemu_log("Unsupported setsockopt level=%d optname=%d \n", level, optname);
6fa13c17 1309 ret = -TARGET_ENOPROTOOPT;
7854b056 1310 }
8853f86e 1311 return ret;
7854b056
FB
1312}
1313
0da46a6e 1314/* do_getsockopt() Must return target values and target errnos. */
992f48a0 1315static abi_long do_getsockopt(int sockfd, int level, int optname,
2f619698 1316 abi_ulong optval_addr, abi_ulong optlen)
7854b056 1317{
992f48a0 1318 abi_long ret;
b55266b5
BS
1319 int len, val;
1320 socklen_t lv;
8853f86e
FB
1321
1322 switch(level) {
3532fa74
FB
1323 case TARGET_SOL_SOCKET:
1324 level = SOL_SOCKET;
8853f86e 1325 switch (optname) {
3532fa74
FB
1326 case TARGET_SO_LINGER:
1327 case TARGET_SO_RCVTIMEO:
1328 case TARGET_SO_SNDTIMEO:
1329 case TARGET_SO_PEERCRED:
1330 case TARGET_SO_PEERNAME:
8853f86e
FB
1331 /* These don't just return a single integer */
1332 goto unimplemented;
1333 default:
2efbe911
FB
1334 goto int_case;
1335 }
1336 break;
1337 case SOL_TCP:
1338 /* TCP options all take an 'int' value. */
1339 int_case:
2f619698
FB
1340 if (get_user_u32(len, optlen))
1341 return -TARGET_EFAULT;
2efbe911 1342 if (len < 0)
0da46a6e 1343 return -TARGET_EINVAL;
2efbe911
FB
1344 lv = sizeof(int);
1345 ret = get_errno(getsockopt(sockfd, level, optname, &val, &lv));
1346 if (ret < 0)
1347 return ret;
2efbe911
FB
1348 if (len > lv)
1349 len = lv;
2f619698
FB
1350 if (len == 4) {
1351 if (put_user_u32(val, optval_addr))
1352 return -TARGET_EFAULT;
1353 } else {
1354 if (put_user_u8(val, optval_addr))
1355 return -TARGET_EFAULT;
1356 }
1357 if (put_user_u32(len, optlen))
1358 return -TARGET_EFAULT;
2efbe911
FB
1359 break;
1360 case SOL_IP:
1361 switch(optname) {
1362 case IP_TOS:
1363 case IP_TTL:
1364 case IP_HDRINCL:
1365 case IP_ROUTER_ALERT:
1366 case IP_RECVOPTS:
1367 case IP_RETOPTS:
1368 case IP_PKTINFO:
1369 case IP_MTU_DISCOVER:
1370 case IP_RECVERR:
1371 case IP_RECVTOS:
1372#ifdef IP_FREEBIND
1373 case IP_FREEBIND:
1374#endif
1375 case IP_MULTICAST_TTL:
1376 case IP_MULTICAST_LOOP:
2f619698
FB
1377 if (get_user_u32(len, optlen))
1378 return -TARGET_EFAULT;
8853f86e 1379 if (len < 0)
0da46a6e 1380 return -TARGET_EINVAL;
8853f86e
FB
1381 lv = sizeof(int);
1382 ret = get_errno(getsockopt(sockfd, level, optname, &val, &lv));
1383 if (ret < 0)
1384 return ret;
2efbe911 1385 if (len < sizeof(int) && len > 0 && val >= 0 && val < 255) {
2efbe911 1386 len = 1;
2f619698
FB
1387 if (put_user_u32(len, optlen)
1388 || put_user_u8(val, optval_addr))
1389 return -TARGET_EFAULT;
2efbe911 1390 } else {
2efbe911
FB
1391 if (len > sizeof(int))
1392 len = sizeof(int);
2f619698
FB
1393 if (put_user_u32(len, optlen)
1394 || put_user_u32(val, optval_addr))
1395 return -TARGET_EFAULT;
2efbe911 1396 }
8853f86e 1397 break;
2efbe911 1398 default:
c02f499e
TS
1399 ret = -TARGET_ENOPROTOOPT;
1400 break;
8853f86e
FB
1401 }
1402 break;
1403 default:
1404 unimplemented:
1405 gemu_log("getsockopt level=%d optname=%d not yet supported\n",
1406 level, optname);
c02f499e 1407 ret = -TARGET_EOPNOTSUPP;
8853f86e
FB
1408 break;
1409 }
1410 return ret;
7854b056
FB
1411}
1412
579a97f7
FB
1413/* FIXME
1414 * lock_iovec()/unlock_iovec() have a return code of 0 for success where
1415 * other lock functions have a return code of 0 for failure.
1416 */
1417static abi_long lock_iovec(int type, struct iovec *vec, abi_ulong target_addr,
1418 int count, int copy)
53a5960a
PB
1419{
1420 struct target_iovec *target_vec;
992f48a0 1421 abi_ulong base;
d732dcb4 1422 int i;
53a5960a 1423
579a97f7
FB
1424 target_vec = lock_user(VERIFY_READ, target_addr, count * sizeof(struct target_iovec), 1);
1425 if (!target_vec)
1426 return -TARGET_EFAULT;
53a5960a
PB
1427 for(i = 0;i < count; i++) {
1428 base = tswapl(target_vec[i].iov_base);
1429 vec[i].iov_len = tswapl(target_vec[i].iov_len);
41df8411
FB
1430 if (vec[i].iov_len != 0) {
1431 vec[i].iov_base = lock_user(type, base, vec[i].iov_len, copy);
d732dcb4
AZ
1432 /* Don't check lock_user return value. We must call writev even
1433 if a element has invalid base address. */
41df8411
FB
1434 } else {
1435 /* zero length pointer is ignored */
1436 vec[i].iov_base = NULL;
1437 }
579a97f7
FB
1438 }
1439 unlock_user (target_vec, target_addr, 0);
1440 return 0;
53a5960a
PB
1441}
1442
579a97f7
FB
1443static abi_long unlock_iovec(struct iovec *vec, abi_ulong target_addr,
1444 int count, int copy)
53a5960a
PB
1445{
1446 struct target_iovec *target_vec;
992f48a0 1447 abi_ulong base;
53a5960a
PB
1448 int i;
1449
579a97f7
FB
1450 target_vec = lock_user(VERIFY_READ, target_addr, count * sizeof(struct target_iovec), 1);
1451 if (!target_vec)
1452 return -TARGET_EFAULT;
53a5960a 1453 for(i = 0;i < count; i++) {
d732dcb4
AZ
1454 if (target_vec[i].iov_base) {
1455 base = tswapl(target_vec[i].iov_base);
1456 unlock_user(vec[i].iov_base, base, copy ? vec[i].iov_len : 0);
1457 }
53a5960a
PB
1458 }
1459 unlock_user (target_vec, target_addr, 0);
579a97f7
FB
1460
1461 return 0;
53a5960a
PB
1462}
1463
0da46a6e 1464/* do_socket() Must return target values and target errnos. */
992f48a0 1465static abi_long do_socket(int domain, int type, int protocol)
3532fa74
FB
1466{
1467#if defined(TARGET_MIPS)
1468 switch(type) {
1469 case TARGET_SOCK_DGRAM:
1470 type = SOCK_DGRAM;
1471 break;
1472 case TARGET_SOCK_STREAM:
1473 type = SOCK_STREAM;
1474 break;
1475 case TARGET_SOCK_RAW:
1476 type = SOCK_RAW;
1477 break;
1478 case TARGET_SOCK_RDM:
1479 type = SOCK_RDM;
1480 break;
1481 case TARGET_SOCK_SEQPACKET:
1482 type = SOCK_SEQPACKET;
1483 break;
1484 case TARGET_SOCK_PACKET:
1485 type = SOCK_PACKET;
1486 break;
1487 }
1488#endif
12bc92ab
AZ
1489 if (domain == PF_NETLINK)
1490 return -EAFNOSUPPORT; /* do not NETLINK socket connections possible */
3532fa74
FB
1491 return get_errno(socket(domain, type, protocol));
1492}
1493
0da46a6e 1494/* do_bind() Must return target values and target errnos. */
992f48a0
BS
1495static abi_long do_bind(int sockfd, abi_ulong target_addr,
1496 socklen_t addrlen)
3532fa74 1497{
8f7aeaf6 1498 void *addr;
917507b0 1499 abi_long ret;
8f7aeaf6 1500
be09ac41 1501 if (addrlen < 0)
8f7aeaf6
AJ
1502 return -TARGET_EINVAL;
1503
607175e0 1504 addr = alloca(addrlen+1);
3b46e624 1505
917507b0
AP
1506 ret = target_to_host_sockaddr(addr, target_addr, addrlen);
1507 if (ret)
1508 return ret;
1509
3532fa74
FB
1510 return get_errno(bind(sockfd, addr, addrlen));
1511}
1512
0da46a6e 1513/* do_connect() Must return target values and target errnos. */
992f48a0
BS
1514static abi_long do_connect(int sockfd, abi_ulong target_addr,
1515 socklen_t addrlen)
3532fa74 1516{
8f7aeaf6 1517 void *addr;
917507b0 1518 abi_long ret;
8f7aeaf6 1519
be09ac41 1520 if (addrlen < 0)
8f7aeaf6
AJ
1521 return -TARGET_EINVAL;
1522
1523 addr = alloca(addrlen);
3b46e624 1524
917507b0
AP
1525 ret = target_to_host_sockaddr(addr, target_addr, addrlen);
1526 if (ret)
1527 return ret;
1528
3532fa74
FB
1529 return get_errno(connect(sockfd, addr, addrlen));
1530}
1531
0da46a6e 1532/* do_sendrecvmsg() Must return target values and target errnos. */
992f48a0
BS
1533static abi_long do_sendrecvmsg(int fd, abi_ulong target_msg,
1534 int flags, int send)
3532fa74 1535{
6de645c7 1536 abi_long ret, len;
3532fa74
FB
1537 struct target_msghdr *msgp;
1538 struct msghdr msg;
1539 int count;
1540 struct iovec *vec;
992f48a0 1541 abi_ulong target_vec;
3532fa74 1542
579a97f7
FB
1543 /* FIXME */
1544 if (!lock_user_struct(send ? VERIFY_READ : VERIFY_WRITE,
1545 msgp,
1546 target_msg,
1547 send ? 1 : 0))
1548 return -TARGET_EFAULT;
3532fa74
FB
1549 if (msgp->msg_name) {
1550 msg.msg_namelen = tswap32(msgp->msg_namelen);
1551 msg.msg_name = alloca(msg.msg_namelen);
917507b0 1552 ret = target_to_host_sockaddr(msg.msg_name, tswapl(msgp->msg_name),
3532fa74 1553 msg.msg_namelen);
917507b0
AP
1554 if (ret) {
1555 unlock_user_struct(msgp, target_msg, send ? 0 : 1);
1556 return ret;
1557 }
3532fa74
FB
1558 } else {
1559 msg.msg_name = NULL;
1560 msg.msg_namelen = 0;
1561 }
1562 msg.msg_controllen = 2 * tswapl(msgp->msg_controllen);
1563 msg.msg_control = alloca(msg.msg_controllen);
1564 msg.msg_flags = tswap32(msgp->msg_flags);
3b46e624 1565
3532fa74
FB
1566 count = tswapl(msgp->msg_iovlen);
1567 vec = alloca(count * sizeof(struct iovec));
1568 target_vec = tswapl(msgp->msg_iov);
579a97f7 1569 lock_iovec(send ? VERIFY_READ : VERIFY_WRITE, vec, target_vec, count, send);
3532fa74
FB
1570 msg.msg_iovlen = count;
1571 msg.msg_iov = vec;
3b46e624 1572
3532fa74 1573 if (send) {
5a4a898d
FB
1574 ret = target_to_host_cmsg(&msg, msgp);
1575 if (ret == 0)
1576 ret = get_errno(sendmsg(fd, &msg, flags));
3532fa74
FB
1577 } else {
1578 ret = get_errno(recvmsg(fd, &msg, flags));
6de645c7
AZ
1579 if (!is_error(ret)) {
1580 len = ret;
5a4a898d 1581 ret = host_to_target_cmsg(msgp, &msg);
6de645c7
AZ
1582 if (!is_error(ret))
1583 ret = len;
1584 }
3532fa74
FB
1585 }
1586 unlock_iovec(vec, target_vec, count, !send);
579a97f7 1587 unlock_user_struct(msgp, target_msg, send ? 0 : 1);
3532fa74
FB
1588 return ret;
1589}
1590
0da46a6e 1591/* do_accept() Must return target values and target errnos. */
992f48a0 1592static abi_long do_accept(int fd, abi_ulong target_addr,
2f619698 1593 abi_ulong target_addrlen_addr)
1be9e1dc 1594{
2f619698
FB
1595 socklen_t addrlen;
1596 void *addr;
992f48a0 1597 abi_long ret;
1be9e1dc 1598
917507b0
AP
1599 if (target_addr == 0)
1600 return get_errno(accept(fd, NULL, NULL));
1601
1602 /* linux returns EINVAL if addrlen pointer is invalid */
2f619698 1603 if (get_user_u32(addrlen, target_addrlen_addr))
917507b0 1604 return -TARGET_EINVAL;
2f619698 1605
be09ac41 1606 if (addrlen < 0)
8f7aeaf6
AJ
1607 return -TARGET_EINVAL;
1608
917507b0
AP
1609 if (!access_ok(VERIFY_WRITE, target_addr, addrlen))
1610 return -TARGET_EINVAL;
1611
2f619698
FB
1612 addr = alloca(addrlen);
1613
1be9e1dc
PB
1614 ret = get_errno(accept(fd, addr, &addrlen));
1615 if (!is_error(ret)) {
1616 host_to_target_sockaddr(target_addr, addr, addrlen);
2f619698
FB
1617 if (put_user_u32(addrlen, target_addrlen_addr))
1618 ret = -TARGET_EFAULT;
1be9e1dc
PB
1619 }
1620 return ret;
1621}
1622
0da46a6e 1623/* do_getpeername() Must return target values and target errnos. */
992f48a0 1624static abi_long do_getpeername(int fd, abi_ulong target_addr,
2f619698 1625 abi_ulong target_addrlen_addr)
1be9e1dc 1626{
2f619698
FB
1627 socklen_t addrlen;
1628 void *addr;
992f48a0 1629 abi_long ret;
1be9e1dc 1630
2f619698
FB
1631 if (get_user_u32(addrlen, target_addrlen_addr))
1632 return -TARGET_EFAULT;
1633
be09ac41 1634 if (addrlen < 0)
8f7aeaf6
AJ
1635 return -TARGET_EINVAL;
1636
917507b0
AP
1637 if (!access_ok(VERIFY_WRITE, target_addr, addrlen))
1638 return -TARGET_EFAULT;
1639
2f619698
FB
1640 addr = alloca(addrlen);
1641
1be9e1dc
PB
1642 ret = get_errno(getpeername(fd, addr, &addrlen));
1643 if (!is_error(ret)) {
1644 host_to_target_sockaddr(target_addr, addr, addrlen);
2f619698
FB
1645 if (put_user_u32(addrlen, target_addrlen_addr))
1646 ret = -TARGET_EFAULT;
1be9e1dc
PB
1647 }
1648 return ret;
1649}
1650
0da46a6e 1651/* do_getsockname() Must return target values and target errnos. */
992f48a0 1652static abi_long do_getsockname(int fd, abi_ulong target_addr,
2f619698 1653 abi_ulong target_addrlen_addr)
1be9e1dc 1654{
2f619698
FB
1655 socklen_t addrlen;
1656 void *addr;
992f48a0 1657 abi_long ret;
1be9e1dc 1658
2f619698
FB
1659 if (get_user_u32(addrlen, target_addrlen_addr))
1660 return -TARGET_EFAULT;
1661
be09ac41 1662 if (addrlen < 0)
8f7aeaf6
AJ
1663 return -TARGET_EINVAL;
1664
917507b0
AP
1665 if (!access_ok(VERIFY_WRITE, target_addr, addrlen))
1666 return -TARGET_EFAULT;
1667
2f619698
FB
1668 addr = alloca(addrlen);
1669
1be9e1dc
PB
1670 ret = get_errno(getsockname(fd, addr, &addrlen));
1671 if (!is_error(ret)) {
1672 host_to_target_sockaddr(target_addr, addr, addrlen);
2f619698
FB
1673 if (put_user_u32(addrlen, target_addrlen_addr))
1674 ret = -TARGET_EFAULT;
1be9e1dc
PB
1675 }
1676 return ret;
1677}
1678
0da46a6e 1679/* do_socketpair() Must return target values and target errnos. */
992f48a0 1680static abi_long do_socketpair(int domain, int type, int protocol,
2f619698 1681 abi_ulong target_tab_addr)
1be9e1dc
PB
1682{
1683 int tab[2];
992f48a0 1684 abi_long ret;
1be9e1dc
PB
1685
1686 ret = get_errno(socketpair(domain, type, protocol, tab));
1687 if (!is_error(ret)) {
2f619698
FB
1688 if (put_user_s32(tab[0], target_tab_addr)
1689 || put_user_s32(tab[1], target_tab_addr + sizeof(tab[0])))
1690 ret = -TARGET_EFAULT;
1be9e1dc
PB
1691 }
1692 return ret;
1693}
1694
0da46a6e 1695/* do_sendto() Must return target values and target errnos. */
992f48a0
BS
1696static abi_long do_sendto(int fd, abi_ulong msg, size_t len, int flags,
1697 abi_ulong target_addr, socklen_t addrlen)
1be9e1dc
PB
1698{
1699 void *addr;
1700 void *host_msg;
992f48a0 1701 abi_long ret;
1be9e1dc 1702
be09ac41 1703 if (addrlen < 0)
8f7aeaf6
AJ
1704 return -TARGET_EINVAL;
1705
579a97f7
FB
1706 host_msg = lock_user(VERIFY_READ, msg, len, 1);
1707 if (!host_msg)
1708 return -TARGET_EFAULT;
1be9e1dc
PB
1709 if (target_addr) {
1710 addr = alloca(addrlen);
917507b0
AP
1711 ret = target_to_host_sockaddr(addr, target_addr, addrlen);
1712 if (ret) {
1713 unlock_user(host_msg, msg, 0);
1714 return ret;
1715 }
1be9e1dc
PB
1716 ret = get_errno(sendto(fd, host_msg, len, flags, addr, addrlen));
1717 } else {
1718 ret = get_errno(send(fd, host_msg, len, flags));
1719 }
1720 unlock_user(host_msg, msg, 0);
1721 return ret;
1722}
1723
0da46a6e 1724/* do_recvfrom() Must return target values and target errnos. */
992f48a0
BS
1725static abi_long do_recvfrom(int fd, abi_ulong msg, size_t len, int flags,
1726 abi_ulong target_addr,
1727 abi_ulong target_addrlen)
1be9e1dc
PB
1728{
1729 socklen_t addrlen;
1730 void *addr;
1731 void *host_msg;
992f48a0 1732 abi_long ret;
1be9e1dc 1733
579a97f7
FB
1734 host_msg = lock_user(VERIFY_WRITE, msg, len, 0);
1735 if (!host_msg)
1736 return -TARGET_EFAULT;
1be9e1dc 1737 if (target_addr) {
2f619698
FB
1738 if (get_user_u32(addrlen, target_addrlen)) {
1739 ret = -TARGET_EFAULT;
1740 goto fail;
1741 }
be09ac41 1742 if (addrlen < 0) {
8f7aeaf6
AJ
1743 ret = -TARGET_EINVAL;
1744 goto fail;
1745 }
1be9e1dc
PB
1746 addr = alloca(addrlen);
1747 ret = get_errno(recvfrom(fd, host_msg, len, flags, addr, &addrlen));
1748 } else {
1749 addr = NULL; /* To keep compiler quiet. */
1750 ret = get_errno(recv(fd, host_msg, len, flags));
1751 }
1752 if (!is_error(ret)) {
1753 if (target_addr) {
1754 host_to_target_sockaddr(target_addr, addr, addrlen);
2f619698
FB
1755 if (put_user_u32(addrlen, target_addrlen)) {
1756 ret = -TARGET_EFAULT;
1757 goto fail;
1758 }
1be9e1dc
PB
1759 }
1760 unlock_user(host_msg, msg, len);
1761 } else {
2f619698 1762fail:
1be9e1dc
PB
1763 unlock_user(host_msg, msg, 0);
1764 }
1765 return ret;
1766}
1767
32407103 1768#ifdef TARGET_NR_socketcall
0da46a6e 1769/* do_socketcall() Must return target values and target errnos. */
992f48a0 1770static abi_long do_socketcall(int num, abi_ulong vptr)
31e31b8a 1771{
992f48a0
BS
1772 abi_long ret;
1773 const int n = sizeof(abi_ulong);
31e31b8a
FB
1774
1775 switch(num) {
1776 case SOCKOP_socket:
7854b056 1777 {
98818189 1778 abi_ulong domain, type, protocol;
2f619698 1779
98818189
UH
1780 if (get_user_ual(domain, vptr)
1781 || get_user_ual(type, vptr + n)
1782 || get_user_ual(protocol, vptr + 2 * n))
2f619698
FB
1783 return -TARGET_EFAULT;
1784
3532fa74 1785 ret = do_socket(domain, type, protocol);
7854b056 1786 }
31e31b8a
FB
1787 break;
1788 case SOCKOP_bind:
7854b056 1789 {
98818189 1790 abi_ulong sockfd;
2f619698
FB
1791 abi_ulong target_addr;
1792 socklen_t addrlen;
1793
98818189 1794 if (get_user_ual(sockfd, vptr)
2f619698 1795 || get_user_ual(target_addr, vptr + n)
98818189 1796 || get_user_ual(addrlen, vptr + 2 * n))
2f619698
FB
1797 return -TARGET_EFAULT;
1798
3532fa74 1799 ret = do_bind(sockfd, target_addr, addrlen);
7854b056 1800 }
31e31b8a
FB
1801 break;
1802 case SOCKOP_connect:
7854b056 1803 {
98818189 1804 abi_ulong sockfd;
2f619698
FB
1805 abi_ulong target_addr;
1806 socklen_t addrlen;
1807
98818189 1808 if (get_user_ual(sockfd, vptr)
2f619698 1809 || get_user_ual(target_addr, vptr + n)
98818189 1810 || get_user_ual(addrlen, vptr + 2 * n))
2f619698
FB
1811 return -TARGET_EFAULT;
1812
3532fa74 1813 ret = do_connect(sockfd, target_addr, addrlen);
7854b056 1814 }
31e31b8a
FB
1815 break;
1816 case SOCKOP_listen:
7854b056 1817 {
98818189 1818 abi_ulong sockfd, backlog;
2f619698 1819
98818189
UH
1820 if (get_user_ual(sockfd, vptr)
1821 || get_user_ual(backlog, vptr + n))
2f619698
FB
1822 return -TARGET_EFAULT;
1823
7854b056
FB
1824 ret = get_errno(listen(sockfd, backlog));
1825 }
31e31b8a
FB
1826 break;
1827 case SOCKOP_accept:
1828 {
98818189 1829 abi_ulong sockfd;
2f619698
FB
1830 abi_ulong target_addr, target_addrlen;
1831
98818189 1832 if (get_user_ual(sockfd, vptr)
2f619698 1833 || get_user_ual(target_addr, vptr + n)
98818189 1834 || get_user_ual(target_addrlen, vptr + 2 * n))
2f619698
FB
1835 return -TARGET_EFAULT;
1836
1be9e1dc 1837 ret = do_accept(sockfd, target_addr, target_addrlen);
31e31b8a
FB
1838 }
1839 break;
1840 case SOCKOP_getsockname:
1841 {
98818189 1842 abi_ulong sockfd;
2f619698
FB
1843 abi_ulong target_addr, target_addrlen;
1844
98818189 1845 if (get_user_ual(sockfd, vptr)
2f619698 1846 || get_user_ual(target_addr, vptr + n)
98818189 1847 || get_user_ual(target_addrlen, vptr + 2 * n))
2f619698
FB
1848 return -TARGET_EFAULT;
1849
1be9e1dc 1850 ret = do_getsockname(sockfd, target_addr, target_addrlen);
31e31b8a
FB
1851 }
1852 break;
1853 case SOCKOP_getpeername:
1854 {
98818189 1855 abi_ulong sockfd;
2f619698
FB
1856 abi_ulong target_addr, target_addrlen;
1857
98818189 1858 if (get_user_ual(sockfd, vptr)
2f619698 1859 || get_user_ual(target_addr, vptr + n)
98818189 1860 || get_user_ual(target_addrlen, vptr + 2 * n))
2f619698
FB
1861 return -TARGET_EFAULT;
1862
1be9e1dc 1863 ret = do_getpeername(sockfd, target_addr, target_addrlen);
31e31b8a
FB
1864 }
1865 break;
1866 case SOCKOP_socketpair:
1867 {
98818189 1868 abi_ulong domain, type, protocol;
2f619698
FB
1869 abi_ulong tab;
1870
98818189
UH
1871 if (get_user_ual(domain, vptr)
1872 || get_user_ual(type, vptr + n)
1873 || get_user_ual(protocol, vptr + 2 * n)
2f619698
FB
1874 || get_user_ual(tab, vptr + 3 * n))
1875 return -TARGET_EFAULT;
1876
1be9e1dc 1877 ret = do_socketpair(domain, type, protocol, tab);
31e31b8a
FB
1878 }
1879 break;
1880 case SOCKOP_send:
7854b056 1881 {
98818189 1882 abi_ulong sockfd;
2f619698
FB
1883 abi_ulong msg;
1884 size_t len;
98818189 1885 abi_ulong flags;
2f619698 1886
98818189 1887 if (get_user_ual(sockfd, vptr)
2f619698
FB
1888 || get_user_ual(msg, vptr + n)
1889 || get_user_ual(len, vptr + 2 * n)
98818189 1890 || get_user_ual(flags, vptr + 3 * n))
2f619698
FB
1891 return -TARGET_EFAULT;
1892
1be9e1dc 1893 ret = do_sendto(sockfd, msg, len, flags, 0, 0);
7854b056 1894 }
31e31b8a
FB
1895 break;
1896 case SOCKOP_recv:
7854b056 1897 {
98818189 1898 abi_ulong sockfd;
2f619698
FB
1899 abi_ulong msg;
1900 size_t len;
98818189 1901 abi_ulong flags;
2f619698 1902
98818189 1903 if (get_user_ual(sockfd, vptr)
2f619698
FB
1904 || get_user_ual(msg, vptr + n)
1905 || get_user_ual(len, vptr + 2 * n)
98818189 1906 || get_user_ual(flags, vptr + 3 * n))
2f619698
FB
1907 return -TARGET_EFAULT;
1908
1be9e1dc 1909 ret = do_recvfrom(sockfd, msg, len, flags, 0, 0);
7854b056 1910 }
31e31b8a
FB
1911 break;
1912 case SOCKOP_sendto:
7854b056 1913 {
98818189 1914 abi_ulong sockfd;
2f619698
FB
1915 abi_ulong msg;
1916 size_t len;
98818189 1917 abi_ulong flags;
2f619698
FB
1918 abi_ulong addr;
1919 socklen_t addrlen;
1920
98818189 1921 if (get_user_ual(sockfd, vptr)
2f619698
FB
1922 || get_user_ual(msg, vptr + n)
1923 || get_user_ual(len, vptr + 2 * n)
98818189 1924 || get_user_ual(flags, vptr + 3 * n)
2f619698 1925 || get_user_ual(addr, vptr + 4 * n)
98818189 1926 || get_user_ual(addrlen, vptr + 5 * n))
2f619698
FB
1927 return -TARGET_EFAULT;
1928
1be9e1dc 1929 ret = do_sendto(sockfd, msg, len, flags, addr, addrlen);
7854b056 1930 }
31e31b8a
FB
1931 break;
1932 case SOCKOP_recvfrom:
1933 {
98818189 1934 abi_ulong sockfd;
2f619698
FB
1935 abi_ulong msg;
1936 size_t len;
98818189 1937 abi_ulong flags;
2f619698
FB
1938 abi_ulong addr;
1939 socklen_t addrlen;
1940
98818189 1941 if (get_user_ual(sockfd, vptr)
2f619698
FB
1942 || get_user_ual(msg, vptr + n)
1943 || get_user_ual(len, vptr + 2 * n)
98818189 1944 || get_user_ual(flags, vptr + 3 * n)
2f619698 1945 || get_user_ual(addr, vptr + 4 * n)
98818189 1946 || get_user_ual(addrlen, vptr + 5 * n))
2f619698
FB
1947 return -TARGET_EFAULT;
1948
1be9e1dc 1949 ret = do_recvfrom(sockfd, msg, len, flags, addr, addrlen);
31e31b8a
FB
1950 }
1951 break;
1952 case SOCKOP_shutdown:
7854b056 1953 {
98818189 1954 abi_ulong sockfd, how;
2f619698 1955
98818189
UH
1956 if (get_user_ual(sockfd, vptr)
1957 || get_user_ual(how, vptr + n))
2f619698 1958 return -TARGET_EFAULT;
7854b056
FB
1959
1960 ret = get_errno(shutdown(sockfd, how));
1961 }
31e31b8a
FB
1962 break;
1963 case SOCKOP_sendmsg:
1964 case SOCKOP_recvmsg:
1a9353d2 1965 {
98818189 1966 abi_ulong fd;
992f48a0 1967 abi_ulong target_msg;
98818189 1968 abi_ulong flags;
1a9353d2 1969
98818189 1970 if (get_user_ual(fd, vptr)
2f619698 1971 || get_user_ual(target_msg, vptr + n)
98818189 1972 || get_user_ual(flags, vptr + 2 * n))
2f619698 1973 return -TARGET_EFAULT;
3532fa74 1974
5fafdf24 1975 ret = do_sendrecvmsg(fd, target_msg, flags,
3532fa74 1976 (num == SOCKOP_sendmsg));
1a9353d2
FB
1977 }
1978 break;
31e31b8a 1979 case SOCKOP_setsockopt:
7854b056 1980 {
98818189
UH
1981 abi_ulong sockfd;
1982 abi_ulong level;
1983 abi_ulong optname;
2f619698
FB
1984 abi_ulong optval;
1985 socklen_t optlen;
1986
98818189
UH
1987 if (get_user_ual(sockfd, vptr)
1988 || get_user_ual(level, vptr + n)
1989 || get_user_ual(optname, vptr + 2 * n)
2f619698 1990 || get_user_ual(optval, vptr + 3 * n)
98818189 1991 || get_user_ual(optlen, vptr + 4 * n))
2f619698 1992 return -TARGET_EFAULT;
7854b056
FB
1993
1994 ret = do_setsockopt(sockfd, level, optname, optval, optlen);
1995 }
1996 break;
31e31b8a 1997 case SOCKOP_getsockopt:
7854b056 1998 {
98818189
UH
1999 abi_ulong sockfd;
2000 abi_ulong level;
2001 abi_ulong optname;
2f619698
FB
2002 abi_ulong optval;
2003 socklen_t optlen;
2004
98818189
UH
2005 if (get_user_ual(sockfd, vptr)
2006 || get_user_ual(level, vptr + n)
2007 || get_user_ual(optname, vptr + 2 * n)
2f619698 2008 || get_user_ual(optval, vptr + 3 * n)
98818189 2009 || get_user_ual(optlen, vptr + 4 * n))
2f619698 2010 return -TARGET_EFAULT;
7854b056 2011
2f619698 2012 ret = do_getsockopt(sockfd, level, optname, optval, optlen);
7854b056
FB
2013 }
2014 break;
31e31b8a
FB
2015 default:
2016 gemu_log("Unsupported socketcall: %d\n", num);
0da46a6e 2017 ret = -TARGET_ENOSYS;
31e31b8a
FB
2018 break;
2019 }
2020 return ret;
2021}
32407103 2022#endif
31e31b8a 2023
8853f86e
FB
2024#define N_SHM_REGIONS 32
2025
2026static struct shm_region {
5a4a898d
FB
2027 abi_ulong start;
2028 abi_ulong size;
8853f86e
FB
2029} shm_regions[N_SHM_REGIONS];
2030
3eb6b044
TS
2031struct target_ipc_perm
2032{
992f48a0
BS
2033 abi_long __key;
2034 abi_ulong uid;
2035 abi_ulong gid;
2036 abi_ulong cuid;
2037 abi_ulong cgid;
3eb6b044
TS
2038 unsigned short int mode;
2039 unsigned short int __pad1;
2040 unsigned short int __seq;
2041 unsigned short int __pad2;
992f48a0
BS
2042 abi_ulong __unused1;
2043 abi_ulong __unused2;
3eb6b044
TS
2044};
2045
2046struct target_semid_ds
2047{
2048 struct target_ipc_perm sem_perm;
992f48a0
BS
2049 abi_ulong sem_otime;
2050 abi_ulong __unused1;
2051 abi_ulong sem_ctime;
2052 abi_ulong __unused2;
2053 abi_ulong sem_nsems;
2054 abi_ulong __unused3;
2055 abi_ulong __unused4;
3eb6b044
TS
2056};
2057
579a97f7
FB
2058static inline abi_long target_to_host_ipc_perm(struct ipc_perm *host_ip,
2059 abi_ulong target_addr)
3eb6b044
TS
2060{
2061 struct target_ipc_perm *target_ip;
2062 struct target_semid_ds *target_sd;
2063
579a97f7
FB
2064 if (!lock_user_struct(VERIFY_READ, target_sd, target_addr, 1))
2065 return -TARGET_EFAULT;
3eb6b044
TS
2066 target_ip=&(target_sd->sem_perm);
2067 host_ip->__key = tswapl(target_ip->__key);
2068 host_ip->uid = tswapl(target_ip->uid);
2069 host_ip->gid = tswapl(target_ip->gid);
2070 host_ip->cuid = tswapl(target_ip->cuid);
2071 host_ip->cgid = tswapl(target_ip->cgid);
2072 host_ip->mode = tswapl(target_ip->mode);
2073 unlock_user_struct(target_sd, target_addr, 0);
579a97f7 2074 return 0;
3eb6b044
TS
2075}
2076
579a97f7
FB
2077static inline abi_long host_to_target_ipc_perm(abi_ulong target_addr,
2078 struct ipc_perm *host_ip)
3eb6b044
TS
2079{
2080 struct target_ipc_perm *target_ip;
2081 struct target_semid_ds *target_sd;
2082
579a97f7
FB
2083 if (!lock_user_struct(VERIFY_WRITE, target_sd, target_addr, 0))
2084 return -TARGET_EFAULT;
3eb6b044
TS
2085 target_ip = &(target_sd->sem_perm);
2086 target_ip->__key = tswapl(host_ip->__key);
2087 target_ip->uid = tswapl(host_ip->uid);
2088 target_ip->gid = tswapl(host_ip->gid);
2089 target_ip->cuid = tswapl(host_ip->cuid);
2090 target_ip->cgid = tswapl(host_ip->cgid);
2091 target_ip->mode = tswapl(host_ip->mode);
2092 unlock_user_struct(target_sd, target_addr, 1);
579a97f7 2093 return 0;
3eb6b044
TS
2094}
2095
579a97f7
FB
2096static inline abi_long target_to_host_semid_ds(struct semid_ds *host_sd,
2097 abi_ulong target_addr)
3eb6b044
TS
2098{
2099 struct target_semid_ds *target_sd;
2100
579a97f7
FB
2101 if (!lock_user_struct(VERIFY_READ, target_sd, target_addr, 1))
2102 return -TARGET_EFAULT;
e5289087
AJ
2103 if (target_to_host_ipc_perm(&(host_sd->sem_perm),target_addr))
2104 return -TARGET_EFAULT;
3eb6b044
TS
2105 host_sd->sem_nsems = tswapl(target_sd->sem_nsems);
2106 host_sd->sem_otime = tswapl(target_sd->sem_otime);
2107 host_sd->sem_ctime = tswapl(target_sd->sem_ctime);
2108 unlock_user_struct(target_sd, target_addr, 0);
579a97f7 2109 return 0;
3eb6b044
TS
2110}
2111
579a97f7
FB
2112static inline abi_long host_to_target_semid_ds(abi_ulong target_addr,
2113 struct semid_ds *host_sd)
3eb6b044
TS
2114{
2115 struct target_semid_ds *target_sd;
2116
579a97f7
FB
2117 if (!lock_user_struct(VERIFY_WRITE, target_sd, target_addr, 0))
2118 return -TARGET_EFAULT;
e5289087
AJ
2119 if (host_to_target_ipc_perm(target_addr,&(host_sd->sem_perm)))
2120 return -TARGET_EFAULT;;
3eb6b044
TS
2121 target_sd->sem_nsems = tswapl(host_sd->sem_nsems);
2122 target_sd->sem_otime = tswapl(host_sd->sem_otime);
2123 target_sd->sem_ctime = tswapl(host_sd->sem_ctime);
2124 unlock_user_struct(target_sd, target_addr, 1);
579a97f7 2125 return 0;
3eb6b044
TS
2126}
2127
e5289087
AJ
2128struct target_seminfo {
2129 int semmap;
2130 int semmni;
2131 int semmns;
2132 int semmnu;
2133 int semmsl;
2134 int semopm;
2135 int semume;
2136 int semusz;
2137 int semvmx;
2138 int semaem;
2139};
2140
2141static inline abi_long host_to_target_seminfo(abi_ulong target_addr,
2142 struct seminfo *host_seminfo)
2143{
2144 struct target_seminfo *target_seminfo;
2145 if (!lock_user_struct(VERIFY_WRITE, target_seminfo, target_addr, 0))
2146 return -TARGET_EFAULT;
2147 __put_user(host_seminfo->semmap, &target_seminfo->semmap);
2148 __put_user(host_seminfo->semmni, &target_seminfo->semmni);
2149 __put_user(host_seminfo->semmns, &target_seminfo->semmns);
2150 __put_user(host_seminfo->semmnu, &target_seminfo->semmnu);
2151 __put_user(host_seminfo->semmsl, &target_seminfo->semmsl);
2152 __put_user(host_seminfo->semopm, &target_seminfo->semopm);
2153 __put_user(host_seminfo->semume, &target_seminfo->semume);
2154 __put_user(host_seminfo->semusz, &target_seminfo->semusz);
2155 __put_user(host_seminfo->semvmx, &target_seminfo->semvmx);
2156 __put_user(host_seminfo->semaem, &target_seminfo->semaem);
2157 unlock_user_struct(target_seminfo, target_addr, 1);
2158 return 0;
2159}
2160
fa294816
TS
2161union semun {
2162 int val;
3eb6b044 2163 struct semid_ds *buf;
fa294816 2164 unsigned short *array;
e5289087 2165 struct seminfo *__buf;
fa294816
TS
2166};
2167
3eb6b044
TS
2168union target_semun {
2169 int val;
e5289087
AJ
2170 abi_ulong buf;
2171 abi_ulong array;
2172 abi_ulong __buf;
3eb6b044
TS
2173};
2174
e5289087
AJ
2175static inline abi_long target_to_host_semarray(int semid, unsigned short **host_array,
2176 abi_ulong target_addr)
3eb6b044 2177{
e5289087
AJ
2178 int nsems;
2179 unsigned short *array;
2180 union semun semun;
2181 struct semid_ds semid_ds;
2182 int i, ret;
3eb6b044 2183
e5289087
AJ
2184 semun.buf = &semid_ds;
2185
2186 ret = semctl(semid, 0, IPC_STAT, semun);
2187 if (ret == -1)
2188 return get_errno(ret);
2189
2190 nsems = semid_ds.sem_nsems;
2191
2192 *host_array = malloc(nsems*sizeof(unsigned short));
2193 array = lock_user(VERIFY_READ, target_addr,
2194 nsems*sizeof(unsigned short), 1);
2195 if (!array)
2196 return -TARGET_EFAULT;
2197
2198 for(i=0; i<nsems; i++) {
2199 __get_user((*host_array)[i], &array[i]);
3eb6b044 2200 }
e5289087
AJ
2201 unlock_user(array, target_addr, 0);
2202
579a97f7 2203 return 0;
3eb6b044
TS
2204}
2205
e5289087
AJ
2206static inline abi_long host_to_target_semarray(int semid, abi_ulong target_addr,
2207 unsigned short **host_array)
3eb6b044 2208{
e5289087
AJ
2209 int nsems;
2210 unsigned short *array;
2211 union semun semun;
2212 struct semid_ds semid_ds;
2213 int i, ret;
3eb6b044 2214
e5289087
AJ
2215 semun.buf = &semid_ds;
2216
2217 ret = semctl(semid, 0, IPC_STAT, semun);
2218 if (ret == -1)
2219 return get_errno(ret);
2220
2221 nsems = semid_ds.sem_nsems;
2222
2223 array = lock_user(VERIFY_WRITE, target_addr,
2224 nsems*sizeof(unsigned short), 0);
2225 if (!array)
2226 return -TARGET_EFAULT;
2227
2228 for(i=0; i<nsems; i++) {
2229 __put_user((*host_array)[i], &array[i]);
3eb6b044 2230 }
e5289087
AJ
2231 free(*host_array);
2232 unlock_user(array, target_addr, 1);
2233
579a97f7 2234 return 0;
3eb6b044
TS
2235}
2236
e5289087
AJ
2237static inline abi_long do_semctl(int semid, int semnum, int cmd,
2238 union target_semun target_su)
3eb6b044
TS
2239{
2240 union semun arg;
2241 struct semid_ds dsarg;
7b8118e8 2242 unsigned short *array = NULL;
e5289087
AJ
2243 struct seminfo seminfo;
2244 abi_long ret = -TARGET_EINVAL;
2245 abi_long err;
2246 cmd &= 0xff;
3eb6b044
TS
2247
2248 switch( cmd ) {
2249 case GETVAL:
3eb6b044 2250 case SETVAL:
e5289087
AJ
2251 arg.val = tswapl(target_su.val);
2252 ret = get_errno(semctl(semid, semnum, cmd, arg));
2253 target_su.val = tswapl(arg.val);
3eb6b044
TS
2254 break;
2255 case GETALL:
3eb6b044 2256 case SETALL:
e5289087
AJ
2257 err = target_to_host_semarray(semid, &array, target_su.array);
2258 if (err)
2259 return err;
2260 arg.array = array;
2261 ret = get_errno(semctl(semid, semnum, cmd, arg));
2262 err = host_to_target_semarray(semid, target_su.array, &array);
2263 if (err)
2264 return err;
3eb6b044
TS
2265 break;
2266 case IPC_STAT:
3eb6b044 2267 case IPC_SET:
e5289087
AJ
2268 case SEM_STAT:
2269 err = target_to_host_semid_ds(&dsarg, target_su.buf);
2270 if (err)
2271 return err;
2272 arg.buf = &dsarg;
2273 ret = get_errno(semctl(semid, semnum, cmd, arg));
2274 err = host_to_target_semid_ds(target_su.buf, &dsarg);
2275 if (err)
2276 return err;
2277 break;
2278 case IPC_INFO:
2279 case SEM_INFO:
2280 arg.__buf = &seminfo;
2281 ret = get_errno(semctl(semid, semnum, cmd, arg));
2282 err = host_to_target_seminfo(target_su.__buf, &seminfo);
2283 if (err)
2284 return err;
2285 break;
2286 case IPC_RMID:
2287 case GETPID:
2288 case GETNCNT:
2289 case GETZCNT:
2290 ret = get_errno(semctl(semid, semnum, cmd, NULL));
3eb6b044 2291 break;
3eb6b044
TS
2292 }
2293
2294 return ret;
2295}
2296
e5289087
AJ
2297struct target_sembuf {
2298 unsigned short sem_num;
2299 short sem_op;
2300 short sem_flg;
2301};
2302
2303static inline abi_long target_to_host_sembuf(struct sembuf *host_sembuf,
2304 abi_ulong target_addr,
2305 unsigned nsops)
2306{
2307 struct target_sembuf *target_sembuf;
2308 int i;
2309
2310 target_sembuf = lock_user(VERIFY_READ, target_addr,
2311 nsops*sizeof(struct target_sembuf), 1);
2312 if (!target_sembuf)
2313 return -TARGET_EFAULT;
2314
2315 for(i=0; i<nsops; i++) {
2316 __get_user(host_sembuf[i].sem_num, &target_sembuf[i].sem_num);
2317 __get_user(host_sembuf[i].sem_op, &target_sembuf[i].sem_op);
2318 __get_user(host_sembuf[i].sem_flg, &target_sembuf[i].sem_flg);
2319 }
2320
2321 unlock_user(target_sembuf, target_addr, 0);
2322
2323 return 0;
2324}
2325
2326static inline abi_long do_semop(int semid, abi_long ptr, unsigned nsops)
2327{
2328 struct sembuf sops[nsops];
2329
2330 if (target_to_host_sembuf(sops, ptr, nsops))
2331 return -TARGET_EFAULT;
2332
2333 return semop(semid, sops, nsops);
2334}
2335
1bc012f6
TS
2336struct target_msqid_ds
2337{
1c54ff97
AJ
2338 struct target_ipc_perm msg_perm;
2339 abi_ulong msg_stime;
2340#if TARGET_ABI_BITS == 32
2341 abi_ulong __unused1;
2342#endif
2343 abi_ulong msg_rtime;
2344#if TARGET_ABI_BITS == 32
2345 abi_ulong __unused2;
2346#endif
2347 abi_ulong msg_ctime;
2348#if TARGET_ABI_BITS == 32
2349 abi_ulong __unused3;
2350#endif
2351 abi_ulong __msg_cbytes;
2352 abi_ulong msg_qnum;
2353 abi_ulong msg_qbytes;
2354 abi_ulong msg_lspid;
2355 abi_ulong msg_lrpid;
2356 abi_ulong __unused4;
2357 abi_ulong __unused5;
1bc012f6
TS
2358};
2359
579a97f7
FB
2360static inline abi_long target_to_host_msqid_ds(struct msqid_ds *host_md,
2361 abi_ulong target_addr)
1bc012f6
TS
2362{
2363 struct target_msqid_ds *target_md;
2364
579a97f7
FB
2365 if (!lock_user_struct(VERIFY_READ, target_md, target_addr, 1))
2366 return -TARGET_EFAULT;
1c54ff97
AJ
2367 if (target_to_host_ipc_perm(&(host_md->msg_perm),target_addr))
2368 return -TARGET_EFAULT;
1bc012f6
TS
2369 host_md->msg_stime = tswapl(target_md->msg_stime);
2370 host_md->msg_rtime = tswapl(target_md->msg_rtime);
2371 host_md->msg_ctime = tswapl(target_md->msg_ctime);
2372 host_md->__msg_cbytes = tswapl(target_md->__msg_cbytes);
2373 host_md->msg_qnum = tswapl(target_md->msg_qnum);
2374 host_md->msg_qbytes = tswapl(target_md->msg_qbytes);
2375 host_md->msg_lspid = tswapl(target_md->msg_lspid);
2376 host_md->msg_lrpid = tswapl(target_md->msg_lrpid);
2377 unlock_user_struct(target_md, target_addr, 0);
579a97f7 2378 return 0;
1bc012f6
TS
2379}
2380
579a97f7
FB
2381static inline abi_long host_to_target_msqid_ds(abi_ulong target_addr,
2382 struct msqid_ds *host_md)
1bc012f6
TS
2383{
2384 struct target_msqid_ds *target_md;
2385
579a97f7
FB
2386 if (!lock_user_struct(VERIFY_WRITE, target_md, target_addr, 0))
2387 return -TARGET_EFAULT;
1c54ff97
AJ
2388 if (host_to_target_ipc_perm(target_addr,&(host_md->msg_perm)))
2389 return -TARGET_EFAULT;
1bc012f6
TS
2390 target_md->msg_stime = tswapl(host_md->msg_stime);
2391 target_md->msg_rtime = tswapl(host_md->msg_rtime);
2392 target_md->msg_ctime = tswapl(host_md->msg_ctime);
2393 target_md->__msg_cbytes = tswapl(host_md->__msg_cbytes);
2394 target_md->msg_qnum = tswapl(host_md->msg_qnum);
2395 target_md->msg_qbytes = tswapl(host_md->msg_qbytes);
2396 target_md->msg_lspid = tswapl(host_md->msg_lspid);
2397 target_md->msg_lrpid = tswapl(host_md->msg_lrpid);
2398 unlock_user_struct(target_md, target_addr, 1);
579a97f7 2399 return 0;
1bc012f6
TS
2400}
2401
1c54ff97
AJ
2402struct target_msginfo {
2403 int msgpool;
2404 int msgmap;
2405 int msgmax;
2406 int msgmnb;
2407 int msgmni;
2408 int msgssz;
2409 int msgtql;
2410 unsigned short int msgseg;
2411};
2412
2413static inline abi_long host_to_target_msginfo(abi_ulong target_addr,
2414 struct msginfo *host_msginfo)
2415{
2416 struct target_msginfo *target_msginfo;
2417 if (!lock_user_struct(VERIFY_WRITE, target_msginfo, target_addr, 0))
2418 return -TARGET_EFAULT;
2419 __put_user(host_msginfo->msgpool, &target_msginfo->msgpool);
2420 __put_user(host_msginfo->msgmap, &target_msginfo->msgmap);
2421 __put_user(host_msginfo->msgmax, &target_msginfo->msgmax);
2422 __put_user(host_msginfo->msgmnb, &target_msginfo->msgmnb);
2423 __put_user(host_msginfo->msgmni, &target_msginfo->msgmni);
2424 __put_user(host_msginfo->msgssz, &target_msginfo->msgssz);
2425 __put_user(host_msginfo->msgtql, &target_msginfo->msgtql);
2426 __put_user(host_msginfo->msgseg, &target_msginfo->msgseg);
2427 unlock_user_struct(target_msginfo, target_addr, 1);
00b229ac 2428 return 0;
1c54ff97
AJ
2429}
2430
2431static inline abi_long do_msgctl(int msgid, int cmd, abi_long ptr)
1bc012f6
TS
2432{
2433 struct msqid_ds dsarg;
1c54ff97
AJ
2434 struct msginfo msginfo;
2435 abi_long ret = -TARGET_EINVAL;
2436
2437 cmd &= 0xff;
2438
2439 switch (cmd) {
1bc012f6
TS
2440 case IPC_STAT:
2441 case IPC_SET:
1c54ff97
AJ
2442 case MSG_STAT:
2443 if (target_to_host_msqid_ds(&dsarg,ptr))
2444 return -TARGET_EFAULT;
2445 ret = get_errno(msgctl(msgid, cmd, &dsarg));
2446 if (host_to_target_msqid_ds(ptr,&dsarg))
2447 return -TARGET_EFAULT;
2448 break;
2449 case IPC_RMID:
2450 ret = get_errno(msgctl(msgid, cmd, NULL));
2451 break;
2452 case IPC_INFO:
2453 case MSG_INFO:
2454 ret = get_errno(msgctl(msgid, cmd, (struct msqid_ds *)&msginfo));
2455 if (host_to_target_msginfo(ptr, &msginfo))
2456 return -TARGET_EFAULT;
2457 break;
1bc012f6 2458 }
1c54ff97 2459
1bc012f6
TS
2460 return ret;
2461}
2462
2463struct target_msgbuf {
1c54ff97
AJ
2464 abi_long mtype;
2465 char mtext[1];
1bc012f6
TS
2466};
2467
992f48a0
BS
2468static inline abi_long do_msgsnd(int msqid, abi_long msgp,
2469 unsigned int msgsz, int msgflg)
1bc012f6
TS
2470{
2471 struct target_msgbuf *target_mb;
2472 struct msgbuf *host_mb;
992f48a0 2473 abi_long ret = 0;
1bc012f6 2474
579a97f7
FB
2475 if (!lock_user_struct(VERIFY_READ, target_mb, msgp, 0))
2476 return -TARGET_EFAULT;
1bc012f6 2477 host_mb = malloc(msgsz+sizeof(long));
1c54ff97
AJ
2478 host_mb->mtype = (abi_long) tswapl(target_mb->mtype);
2479 memcpy(host_mb->mtext, target_mb->mtext, msgsz);
1bc012f6
TS
2480 ret = get_errno(msgsnd(msqid, host_mb, msgsz, msgflg));
2481 free(host_mb);
2482 unlock_user_struct(target_mb, msgp, 0);
2483
2484 return ret;
2485}
2486
992f48a0 2487static inline abi_long do_msgrcv(int msqid, abi_long msgp,
1c54ff97 2488 unsigned int msgsz, abi_long msgtyp,
992f48a0 2489 int msgflg)
1bc012f6
TS
2490{
2491 struct target_msgbuf *target_mb;
579a97f7 2492 char *target_mtext;
1bc012f6 2493 struct msgbuf *host_mb;
992f48a0 2494 abi_long ret = 0;
1bc012f6 2495
579a97f7
FB
2496 if (!lock_user_struct(VERIFY_WRITE, target_mb, msgp, 0))
2497 return -TARGET_EFAULT;
1c54ff97 2498
1bc012f6 2499 host_mb = malloc(msgsz+sizeof(long));
1c54ff97
AJ
2500 ret = get_errno(msgrcv(msqid, host_mb, msgsz, tswapl(msgtyp), msgflg));
2501
579a97f7
FB
2502 if (ret > 0) {
2503 abi_ulong target_mtext_addr = msgp + sizeof(abi_ulong);
2504 target_mtext = lock_user(VERIFY_WRITE, target_mtext_addr, ret, 0);
2505 if (!target_mtext) {
2506 ret = -TARGET_EFAULT;
2507 goto end;
2508 }
1c54ff97 2509 memcpy(target_mb->mtext, host_mb->mtext, ret);
579a97f7
FB
2510 unlock_user(target_mtext, target_mtext_addr, ret);
2511 }
1c54ff97 2512
1bc012f6
TS
2513 target_mb->mtype = tswapl(host_mb->mtype);
2514 free(host_mb);
1bc012f6 2515
579a97f7
FB
2516end:
2517 if (target_mb)
2518 unlock_user_struct(target_mb, msgp, 1);
1bc012f6
TS
2519 return ret;
2520}
2521
88a8c984
RV
2522struct target_shmid_ds
2523{
2524 struct target_ipc_perm shm_perm;
2525 abi_ulong shm_segsz;
2526 abi_ulong shm_atime;
2527#if TARGET_ABI_BITS == 32
2528 abi_ulong __unused1;
2529#endif
2530 abi_ulong shm_dtime;
2531#if TARGET_ABI_BITS == 32
2532 abi_ulong __unused2;
2533#endif
2534 abi_ulong shm_ctime;
2535#if TARGET_ABI_BITS == 32
2536 abi_ulong __unused3;
2537#endif
2538 int shm_cpid;
2539 int shm_lpid;
2540 abi_ulong shm_nattch;
2541 unsigned long int __unused4;
2542 unsigned long int __unused5;
2543};
2544
2545static inline abi_long target_to_host_shmid_ds(struct shmid_ds *host_sd,
2546 abi_ulong target_addr)
2547{
2548 struct target_shmid_ds *target_sd;
2549
2550 if (!lock_user_struct(VERIFY_READ, target_sd, target_addr, 1))
2551 return -TARGET_EFAULT;
2552 if (target_to_host_ipc_perm(&(host_sd->shm_perm), target_addr))
2553 return -TARGET_EFAULT;
2554 __get_user(host_sd->shm_segsz, &target_sd->shm_segsz);
2555 __get_user(host_sd->shm_atime, &target_sd->shm_atime);
2556 __get_user(host_sd->shm_dtime, &target_sd->shm_dtime);
2557 __get_user(host_sd->shm_ctime, &target_sd->shm_ctime);
2558 __get_user(host_sd->shm_cpid, &target_sd->shm_cpid);
2559 __get_user(host_sd->shm_lpid, &target_sd->shm_lpid);
2560 __get_user(host_sd->shm_nattch, &target_sd->shm_nattch);
2561 unlock_user_struct(target_sd, target_addr, 0);
2562 return 0;
2563}
2564
2565static inline abi_long host_to_target_shmid_ds(abi_ulong target_addr,
2566 struct shmid_ds *host_sd)
2567{
2568 struct target_shmid_ds *target_sd;
2569
2570 if (!lock_user_struct(VERIFY_WRITE, target_sd, target_addr, 0))
2571 return -TARGET_EFAULT;
2572 if (host_to_target_ipc_perm(target_addr, &(host_sd->shm_perm)))
2573 return -TARGET_EFAULT;
2574 __put_user(host_sd->shm_segsz, &target_sd->shm_segsz);
2575 __put_user(host_sd->shm_atime, &target_sd->shm_atime);
2576 __put_user(host_sd->shm_dtime, &target_sd->shm_dtime);
2577 __put_user(host_sd->shm_ctime, &target_sd->shm_ctime);
2578 __put_user(host_sd->shm_cpid, &target_sd->shm_cpid);
2579 __put_user(host_sd->shm_lpid, &target_sd->shm_lpid);
2580 __put_user(host_sd->shm_nattch, &target_sd->shm_nattch);
2581 unlock_user_struct(target_sd, target_addr, 1);
2582 return 0;
2583}
2584
2585struct target_shminfo {
2586 abi_ulong shmmax;
2587 abi_ulong shmmin;
2588 abi_ulong shmmni;
2589 abi_ulong shmseg;
2590 abi_ulong shmall;
2591};
2592
2593static inline abi_long host_to_target_shminfo(abi_ulong target_addr,
2594 struct shminfo *host_shminfo)
2595{
2596 struct target_shminfo *target_shminfo;
2597 if (!lock_user_struct(VERIFY_WRITE, target_shminfo, target_addr, 0))
2598 return -TARGET_EFAULT;
2599 __put_user(host_shminfo->shmmax, &target_shminfo->shmmax);
2600 __put_user(host_shminfo->shmmin, &target_shminfo->shmmin);
2601 __put_user(host_shminfo->shmmni, &target_shminfo->shmmni);
2602 __put_user(host_shminfo->shmseg, &target_shminfo->shmseg);
2603 __put_user(host_shminfo->shmall, &target_shminfo->shmall);
2604 unlock_user_struct(target_shminfo, target_addr, 1);
2605 return 0;
2606}
2607
2608struct target_shm_info {
2609 int used_ids;
2610 abi_ulong shm_tot;
2611 abi_ulong shm_rss;
2612 abi_ulong shm_swp;
2613 abi_ulong swap_attempts;
2614 abi_ulong swap_successes;
2615};
2616
2617static inline abi_long host_to_target_shm_info(abi_ulong target_addr,
2618 struct shm_info *host_shm_info)
2619{
2620 struct target_shm_info *target_shm_info;
2621 if (!lock_user_struct(VERIFY_WRITE, target_shm_info, target_addr, 0))
2622 return -TARGET_EFAULT;
2623 __put_user(host_shm_info->used_ids, &target_shm_info->used_ids);
2624 __put_user(host_shm_info->shm_tot, &target_shm_info->shm_tot);
2625 __put_user(host_shm_info->shm_rss, &target_shm_info->shm_rss);
2626 __put_user(host_shm_info->shm_swp, &target_shm_info->shm_swp);
2627 __put_user(host_shm_info->swap_attempts, &target_shm_info->swap_attempts);
2628 __put_user(host_shm_info->swap_successes, &target_shm_info->swap_successes);
2629 unlock_user_struct(target_shm_info, target_addr, 1);
2630 return 0;
2631}
2632
2633static inline abi_long do_shmctl(int shmid, int cmd, abi_long buf)
2634{
2635 struct shmid_ds dsarg;
2636 struct shminfo shminfo;
2637 struct shm_info shm_info;
2638 abi_long ret = -TARGET_EINVAL;
2639
2640 cmd &= 0xff;
2641
2642 switch(cmd) {
2643 case IPC_STAT:
2644 case IPC_SET:
2645 case SHM_STAT:
2646 if (target_to_host_shmid_ds(&dsarg, buf))
2647 return -TARGET_EFAULT;
2648 ret = get_errno(shmctl(shmid, cmd, &dsarg));
2649 if (host_to_target_shmid_ds(buf, &dsarg))
2650 return -TARGET_EFAULT;
2651 break;
2652 case IPC_INFO:
2653 ret = get_errno(shmctl(shmid, cmd, (struct shmid_ds *)&shminfo));
2654 if (host_to_target_shminfo(buf, &shminfo))
2655 return -TARGET_EFAULT;
2656 break;
2657 case SHM_INFO:
2658 ret = get_errno(shmctl(shmid, cmd, (struct shmid_ds *)&shm_info));
2659 if (host_to_target_shm_info(buf, &shm_info))
2660 return -TARGET_EFAULT;
2661 break;
2662 case IPC_RMID:
2663 case SHM_LOCK:
2664 case SHM_UNLOCK:
2665 ret = get_errno(shmctl(shmid, cmd, NULL));
2666 break;
2667 }
2668
2669 return ret;
2670}
2671
2672static inline abi_ulong do_shmat(int shmid, abi_ulong shmaddr, int shmflg)
2673{
2674 abi_long raddr;
2675 void *host_raddr;
2676 struct shmid_ds shm_info;
2677 int i,ret;
2678
2679 /* find out the length of the shared memory segment */
2680 ret = get_errno(shmctl(shmid, IPC_STAT, &shm_info));
2681 if (is_error(ret)) {
2682 /* can't get length, bail out */
2683 return ret;
2684 }
2685
2686 mmap_lock();
2687
2688 if (shmaddr)
2689 host_raddr = shmat(shmid, (void *)g2h(shmaddr), shmflg);
2690 else {
2691 abi_ulong mmap_start;
2692
2693 mmap_start = mmap_find_vma(0, shm_info.shm_segsz);
2694
2695 if (mmap_start == -1) {
2696 errno = ENOMEM;
2697 host_raddr = (void *)-1;
2698 } else
2699 host_raddr = shmat(shmid, g2h(mmap_start), shmflg | SHM_REMAP);
2700 }
2701
2702 if (host_raddr == (void *)-1) {
2703 mmap_unlock();
2704 return get_errno((long)host_raddr);
2705 }
2706 raddr=h2g((unsigned long)host_raddr);
2707
2708 page_set_flags(raddr, raddr + shm_info.shm_segsz,
2709 PAGE_VALID | PAGE_READ |
2710 ((shmflg & SHM_RDONLY)? 0 : PAGE_WRITE));
2711
2712 for (i = 0; i < N_SHM_REGIONS; i++) {
2713 if (shm_regions[i].start == 0) {
2714 shm_regions[i].start = raddr;
2715 shm_regions[i].size = shm_info.shm_segsz;
2716 break;
2717 }
2718 }
2719
2720 mmap_unlock();
2721 return raddr;
2722
2723}
2724
2725static inline abi_long do_shmdt(abi_ulong shmaddr)
2726{
2727 int i;
2728
2729 for (i = 0; i < N_SHM_REGIONS; ++i) {
2730 if (shm_regions[i].start == shmaddr) {
2731 shm_regions[i].start = 0;
2732 page_set_flags(shmaddr, shm_regions[i].size, 0);
2733 break;
2734 }
2735 }
2736
2737 return get_errno(shmdt(g2h(shmaddr)));
2738}
2739
1c54ff97 2740#ifdef TARGET_NR_ipc
53a5960a 2741/* ??? This only works with linear mappings. */
0da46a6e 2742/* do_ipc() must return target values and target errnos. */
992f48a0
BS
2743static abi_long do_ipc(unsigned int call, int first,
2744 int second, int third,
2745 abi_long ptr, abi_long fifth)
8853f86e
FB
2746{
2747 int version;
992f48a0 2748 abi_long ret = 0;
8853f86e
FB
2749
2750 version = call >> 16;
2751 call &= 0xffff;
2752
2753 switch (call) {
fa294816 2754 case IPCOP_semop:
e5289087 2755 ret = do_semop(first, ptr, second);
fa294816
TS
2756 break;
2757
2758 case IPCOP_semget:
2759 ret = get_errno(semget(first, second, third));
2760 break;
2761
2762 case IPCOP_semctl:
e5289087 2763 ret = do_semctl(first, second, third, (union target_semun)(abi_ulong) ptr);
fa294816 2764 break;
d96372ef 2765
1c54ff97
AJ
2766 case IPCOP_msgget:
2767 ret = get_errno(msgget(first, second));
2768 break;
d96372ef 2769
1c54ff97
AJ
2770 case IPCOP_msgsnd:
2771 ret = do_msgsnd(first, ptr, second, third);
2772 break;
d96372ef 2773
1c54ff97
AJ
2774 case IPCOP_msgctl:
2775 ret = do_msgctl(first, second, ptr);
2776 break;
d96372ef 2777
1c54ff97
AJ
2778 case IPCOP_msgrcv:
2779 switch (version) {
2780 case 0:
2781 {
2782 struct target_ipc_kludge {
2783 abi_long msgp;
2784 abi_long msgtyp;
2785 } *tmp;
2786
2787 if (!lock_user_struct(VERIFY_READ, tmp, ptr, 1)) {
2788 ret = -TARGET_EFAULT;
2789 break;
2790 }
d96372ef 2791
1c54ff97 2792 ret = do_msgrcv(first, tmp->msgp, second, tmp->msgtyp, third);
d96372ef 2793
1c54ff97
AJ
2794 unlock_user_struct(tmp, ptr, 0);
2795 break;
2796 }
2797 default:
2798 ret = do_msgrcv(first, ptr, second, fifth, third);
2799 }
2800 break;
d96372ef 2801
8853f86e 2802 case IPCOP_shmat:
88a8c984
RV
2803 switch (version) {
2804 default:
5a4a898d
FB
2805 {
2806 abi_ulong raddr;
88a8c984
RV
2807 raddr = do_shmat(first, ptr, second);
2808 if (is_error(raddr))
2809 return get_errno(raddr);
2f619698 2810 if (put_user_ual(raddr, third))
5a4a898d 2811 return -TARGET_EFAULT;
88a8c984
RV
2812 break;
2813 }
2814 case 1:
2815 ret = -TARGET_EINVAL;
2816 break;
5a4a898d 2817 }
8853f86e
FB
2818 break;
2819 case IPCOP_shmdt:
88a8c984 2820 ret = do_shmdt(ptr);
8853f86e
FB
2821 break;
2822
2823 case IPCOP_shmget:
2824 /* IPC_* flag values are the same on all linux platforms */
2825 ret = get_errno(shmget(first, second, third));
2826 break;
2827
2828 /* IPC_* and SHM_* command values are the same on all linux platforms */
2829 case IPCOP_shmctl:
88a8c984 2830 ret = do_shmctl(first, second, third);
8853f86e
FB
2831 break;
2832 default:
32407103 2833 gemu_log("Unsupported ipc call: %d (version %d)\n", call, version);
0da46a6e 2834 ret = -TARGET_ENOSYS;
8853f86e
FB
2835 break;
2836 }
2837 return ret;
2838}
32407103 2839#endif
8853f86e 2840
31e31b8a
FB
2841/* kernel structure types definitions */
2842#define IFNAMSIZ 16
2843
001faf32 2844#define STRUCT(name, ...) STRUCT_ ## name,
31e31b8a
FB
2845#define STRUCT_SPECIAL(name) STRUCT_ ## name,
2846enum {
2847#include "syscall_types.h"
2848};
2849#undef STRUCT
2850#undef STRUCT_SPECIAL
2851
001faf32 2852#define STRUCT(name, ...) static const argtype struct_ ## name ## _def[] = { __VA_ARGS__, TYPE_NULL };
31e31b8a
FB
2853#define STRUCT_SPECIAL(name)
2854#include "syscall_types.h"
2855#undef STRUCT
2856#undef STRUCT_SPECIAL
2857
2858typedef struct IOCTLEntry {
2ab83ea7
FB
2859 unsigned int target_cmd;
2860 unsigned int host_cmd;
31e31b8a
FB
2861 const char *name;
2862 int access;
1a9353d2 2863 const argtype arg_type[5];
31e31b8a
FB
2864} IOCTLEntry;
2865
2866#define IOC_R 0x0001
2867#define IOC_W 0x0002
2868#define IOC_RW (IOC_R | IOC_W)
2869
2870#define MAX_STRUCT_SIZE 4096
2871
9f106a75 2872static IOCTLEntry ioctl_entries[] = {
001faf32
BS
2873#define IOCTL(cmd, access, ...) \
2874 { TARGET_ ## cmd, cmd, #cmd, access, { __VA_ARGS__ } },
31e31b8a
FB
2875#include "ioctls.h"
2876 { 0, 0, },
2877};
2878
53a5960a 2879/* ??? Implement proper locking for ioctls. */
0da46a6e 2880/* do_ioctl() Must return target values and target errnos. */
992f48a0 2881static abi_long do_ioctl(int fd, abi_long cmd, abi_long arg)
31e31b8a
FB
2882{
2883 const IOCTLEntry *ie;
2884 const argtype *arg_type;
992f48a0 2885 abi_long ret;
31e31b8a 2886 uint8_t buf_temp[MAX_STRUCT_SIZE];
53a5960a
PB
2887 int target_size;
2888 void *argptr;
31e31b8a
FB
2889
2890 ie = ioctl_entries;
2891 for(;;) {
2892 if (ie->target_cmd == 0) {
32407103 2893 gemu_log("Unsupported ioctl: cmd=0x%04lx\n", (long)cmd);
0da46a6e 2894 return -TARGET_ENOSYS;
31e31b8a
FB
2895 }
2896 if (ie->target_cmd == cmd)
2897 break;
2898 ie++;
2899 }
2900 arg_type = ie->arg_type;
9de5e440 2901#if defined(DEBUG)
32407103 2902 gemu_log("ioctl: cmd=0x%04lx (%s)\n", (long)cmd, ie->name);
72f03900 2903#endif
31e31b8a
FB
2904 switch(arg_type[0]) {
2905 case TYPE_NULL:
2906 /* no argument */
2907 ret = get_errno(ioctl(fd, ie->host_cmd));
2908 break;
2909 case TYPE_PTRVOID:
2910 case TYPE_INT:
2911 /* int argment */
2912 ret = get_errno(ioctl(fd, ie->host_cmd, arg));
2913 break;
2914 case TYPE_PTR:
2915 arg_type++;
53a5960a 2916 target_size = thunk_type_size(arg_type, 0);
31e31b8a
FB
2917 switch(ie->access) {
2918 case IOC_R:
2919 ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
2920 if (!is_error(ret)) {
579a97f7
FB
2921 argptr = lock_user(VERIFY_WRITE, arg, target_size, 0);
2922 if (!argptr)
2923 return -TARGET_EFAULT;
53a5960a
PB
2924 thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET);
2925 unlock_user(argptr, arg, target_size);
31e31b8a
FB
2926 }
2927 break;
2928 case IOC_W:
579a97f7
FB
2929 argptr = lock_user(VERIFY_READ, arg, target_size, 1);
2930 if (!argptr)
2931 return -TARGET_EFAULT;
53a5960a
PB
2932 thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
2933 unlock_user(argptr, arg, 0);
31e31b8a
FB
2934 ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
2935 break;
2936 default:
2937 case IOC_RW:
579a97f7
FB
2938 argptr = lock_user(VERIFY_READ, arg, target_size, 1);
2939 if (!argptr)
2940 return -TARGET_EFAULT;
53a5960a
PB
2941 thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
2942 unlock_user(argptr, arg, 0);
31e31b8a
FB
2943 ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
2944 if (!is_error(ret)) {
579a97f7
FB
2945 argptr = lock_user(VERIFY_WRITE, arg, target_size, 0);
2946 if (!argptr)
2947 return -TARGET_EFAULT;
53a5960a
PB
2948 thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET);
2949 unlock_user(argptr, arg, target_size);
31e31b8a
FB
2950 }
2951 break;
2952 }
2953 break;
2954 default:
32407103
JM
2955 gemu_log("Unsupported ioctl type: cmd=0x%04lx type=%d\n",
2956 (long)cmd, arg_type[0]);
0da46a6e 2957 ret = -TARGET_ENOSYS;
31e31b8a
FB
2958 break;
2959 }
2960 return ret;
2961}
2962
b39bc503 2963static const bitmask_transtbl iflag_tbl[] = {
31e31b8a
FB
2964 { TARGET_IGNBRK, TARGET_IGNBRK, IGNBRK, IGNBRK },
2965 { TARGET_BRKINT, TARGET_BRKINT, BRKINT, BRKINT },
2966 { TARGET_IGNPAR, TARGET_IGNPAR, IGNPAR, IGNPAR },
2967 { TARGET_PARMRK, TARGET_PARMRK, PARMRK, PARMRK },
2968 { TARGET_INPCK, TARGET_INPCK, INPCK, INPCK },
2969 { TARGET_ISTRIP, TARGET_ISTRIP, ISTRIP, ISTRIP },
2970 { TARGET_INLCR, TARGET_INLCR, INLCR, INLCR },
2971 { TARGET_IGNCR, TARGET_IGNCR, IGNCR, IGNCR },
2972 { TARGET_ICRNL, TARGET_ICRNL, ICRNL, ICRNL },
2973 { TARGET_IUCLC, TARGET_IUCLC, IUCLC, IUCLC },
2974 { TARGET_IXON, TARGET_IXON, IXON, IXON },
2975 { TARGET_IXANY, TARGET_IXANY, IXANY, IXANY },
2976 { TARGET_IXOFF, TARGET_IXOFF, IXOFF, IXOFF },
2977 { TARGET_IMAXBEL, TARGET_IMAXBEL, IMAXBEL, IMAXBEL },
2978 { 0, 0, 0, 0 }
2979};
2980
b39bc503 2981static const bitmask_transtbl oflag_tbl[] = {
31e31b8a
FB
2982 { TARGET_OPOST, TARGET_OPOST, OPOST, OPOST },
2983 { TARGET_OLCUC, TARGET_OLCUC, OLCUC, OLCUC },
2984 { TARGET_ONLCR, TARGET_ONLCR, ONLCR, ONLCR },
2985 { TARGET_OCRNL, TARGET_OCRNL, OCRNL, OCRNL },
2986 { TARGET_ONOCR, TARGET_ONOCR, ONOCR, ONOCR },
2987 { TARGET_ONLRET, TARGET_ONLRET, ONLRET, ONLRET },
2988 { TARGET_OFILL, TARGET_OFILL, OFILL, OFILL },
2989 { TARGET_OFDEL, TARGET_OFDEL, OFDEL, OFDEL },
2990 { TARGET_NLDLY, TARGET_NL0, NLDLY, NL0 },
2991 { TARGET_NLDLY, TARGET_NL1, NLDLY, NL1 },
2992 { TARGET_CRDLY, TARGET_CR0, CRDLY, CR0 },
2993 { TARGET_CRDLY, TARGET_CR1, CRDLY, CR1 },
2994 { TARGET_CRDLY, TARGET_CR2, CRDLY, CR2 },
2995 { TARGET_CRDLY, TARGET_CR3, CRDLY, CR3 },
2996 { TARGET_TABDLY, TARGET_TAB0, TABDLY, TAB0 },
2997 { TARGET_TABDLY, TARGET_TAB1, TABDLY, TAB1 },
2998 { TARGET_TABDLY, TARGET_TAB2, TABDLY, TAB2 },
2999 { TARGET_TABDLY, TARGET_TAB3, TABDLY, TAB3 },
3000 { TARGET_BSDLY, TARGET_BS0, BSDLY, BS0 },
3001 { TARGET_BSDLY, TARGET_BS1, BSDLY, BS1 },
3002 { TARGET_VTDLY, TARGET_VT0, VTDLY, VT0 },
3003 { TARGET_VTDLY, TARGET_VT1, VTDLY, VT1 },
3004 { TARGET_FFDLY, TARGET_FF0, FFDLY, FF0 },
3005 { TARGET_FFDLY, TARGET_FF1, FFDLY, FF1 },
3006 { 0, 0, 0, 0 }
3007};
3008
b39bc503 3009static const bitmask_transtbl cflag_tbl[] = {
31e31b8a
FB
3010 { TARGET_CBAUD, TARGET_B0, CBAUD, B0 },
3011 { TARGET_CBAUD, TARGET_B50, CBAUD, B50 },
3012 { TARGET_CBAUD, TARGET_B75, CBAUD, B75 },
3013 { TARGET_CBAUD, TARGET_B110, CBAUD, B110 },
3014 { TARGET_CBAUD, TARGET_B134, CBAUD, B134 },
3015 { TARGET_CBAUD, TARGET_B150, CBAUD, B150 },
3016 { TARGET_CBAUD, TARGET_B200, CBAUD, B200 },
3017 { TARGET_CBAUD, TARGET_B300, CBAUD, B300 },
3018 { TARGET_CBAUD, TARGET_B600, CBAUD, B600 },
3019 { TARGET_CBAUD, TARGET_B1200, CBAUD, B1200 },
3020 { TARGET_CBAUD, TARGET_B1800, CBAUD, B1800 },
3021 { TARGET_CBAUD, TARGET_B2400, CBAUD, B2400 },
3022 { TARGET_CBAUD, TARGET_B4800, CBAUD, B4800 },
3023 { TARGET_CBAUD, TARGET_B9600, CBAUD, B9600 },
3024 { TARGET_CBAUD, TARGET_B19200, CBAUD, B19200 },
3025 { TARGET_CBAUD, TARGET_B38400, CBAUD, B38400 },
3026 { TARGET_CBAUD, TARGET_B57600, CBAUD, B57600 },
3027 { TARGET_CBAUD, TARGET_B115200, CBAUD, B115200 },
3028 { TARGET_CBAUD, TARGET_B230400, CBAUD, B230400 },
3029 { TARGET_CBAUD, TARGET_B460800, CBAUD, B460800 },
3030 { TARGET_CSIZE, TARGET_CS5, CSIZE, CS5 },
3031 { TARGET_CSIZE, TARGET_CS6, CSIZE, CS6 },
3032 { TARGET_CSIZE, TARGET_CS7, CSIZE, CS7 },
3033 { TARGET_CSIZE, TARGET_CS8, CSIZE, CS8 },
3034 { TARGET_CSTOPB, TARGET_CSTOPB, CSTOPB, CSTOPB },
3035 { TARGET_CREAD, TARGET_CREAD, CREAD, CREAD },
3036 { TARGET_PARENB, TARGET_PARENB, PARENB, PARENB },
3037 { TARGET_PARODD, TARGET_PARODD, PARODD, PARODD },
3038 { TARGET_HUPCL, TARGET_HUPCL, HUPCL, HUPCL },
3039 { TARGET_CLOCAL, TARGET_CLOCAL, CLOCAL, CLOCAL },
3040 { TARGET_CRTSCTS, TARGET_CRTSCTS, CRTSCTS, CRTSCTS },
3041 { 0, 0, 0, 0 }
3042};
3043
b39bc503 3044static const bitmask_transtbl lflag_tbl[] = {
31e31b8a
FB
3045 { TARGET_ISIG, TARGET_ISIG, ISIG, ISIG },
3046 { TARGET_ICANON, TARGET_ICANON, ICANON, ICANON },
3047 { TARGET_XCASE, TARGET_XCASE, XCASE, XCASE },
3048 { TARGET_ECHO, TARGET_ECHO, ECHO, ECHO },
3049 { TARGET_ECHOE, TARGET_ECHOE, ECHOE, ECHOE },
3050 { TARGET_ECHOK, TARGET_ECHOK, ECHOK, ECHOK },
3051 { TARGET_ECHONL, TARGET_ECHONL, ECHONL, ECHONL },
3052 { TARGET_NOFLSH, TARGET_NOFLSH, NOFLSH, NOFLSH },
3053 { TARGET_TOSTOP, TARGET_TOSTOP, TOSTOP, TOSTOP },
3054 { TARGET_ECHOCTL, TARGET_ECHOCTL, ECHOCTL, ECHOCTL },
3055 { TARGET_ECHOPRT, TARGET_ECHOPRT, ECHOPRT, ECHOPRT },
3056 { TARGET_ECHOKE, TARGET_ECHOKE, ECHOKE, ECHOKE },
3057 { TARGET_FLUSHO, TARGET_FLUSHO, FLUSHO, FLUSHO },
3058 { TARGET_PENDIN, TARGET_PENDIN, PENDIN, PENDIN },
3059 { TARGET_IEXTEN, TARGET_IEXTEN, IEXTEN, IEXTEN },
3060 { 0, 0, 0, 0 }
3061};
3062
3063static void target_to_host_termios (void *dst, const void *src)
3064{
3065 struct host_termios *host = dst;
3066 const struct target_termios *target = src;
3b46e624 3067
5fafdf24 3068 host->c_iflag =
31e31b8a 3069 target_to_host_bitmask(tswap32(target->c_iflag), iflag_tbl);
5fafdf24 3070 host->c_oflag =
31e31b8a 3071 target_to_host_bitmask(tswap32(target->c_oflag), oflag_tbl);
5fafdf24 3072 host->c_cflag =
31e31b8a 3073 target_to_host_bitmask(tswap32(target->c_cflag), cflag_tbl);
5fafdf24 3074 host->c_lflag =
31e31b8a
FB
3075 target_to_host_bitmask(tswap32(target->c_lflag), lflag_tbl);
3076 host->c_line = target->c_line;
3b46e624 3077
44607123 3078 memset(host->c_cc, 0, sizeof(host->c_cc));
5fafdf24
TS
3079 host->c_cc[VINTR] = target->c_cc[TARGET_VINTR];
3080 host->c_cc[VQUIT] = target->c_cc[TARGET_VQUIT];
3b46e624 3081 host->c_cc[VERASE] = target->c_cc[TARGET_VERASE];
5fafdf24 3082 host->c_cc[VKILL] = target->c_cc[TARGET_VKILL];
3b46e624 3083 host->c_cc[VEOF] = target->c_cc[TARGET_VEOF];
5fafdf24 3084 host->c_cc[VTIME] = target->c_cc[TARGET_VTIME];
3b46e624 3085 host->c_cc[VMIN] = target->c_cc[TARGET_VMIN];
5fafdf24 3086 host->c_cc[VSWTC] = target->c_cc[TARGET_VSWTC];
3b46e624 3087 host->c_cc[VSTART] = target->c_cc[TARGET_VSTART];
5fafdf24
TS
3088 host->c_cc[VSTOP] = target->c_cc[TARGET_VSTOP];
3089 host->c_cc[VSUSP] = target->c_cc[TARGET_VSUSP];
3b46e624
TS
3090 host->c_cc[VEOL] = target->c_cc[TARGET_VEOL];
3091 host->c_cc[VREPRINT] = target->c_cc[TARGET_VREPRINT];
3092 host->c_cc[VDISCARD] = target->c_cc[TARGET_VDISCARD];
3093 host->c_cc[VWERASE] = target->c_cc[TARGET_VWERASE];
3094 host->c_cc[VLNEXT] = target->c_cc[TARGET_VLNEXT];
5fafdf24 3095 host->c_cc[VEOL2] = target->c_cc[TARGET_VEOL2];
31e31b8a 3096}
3b46e624 3097
31e31b8a
FB
3098static void host_to_target_termios (void *dst, const void *src)
3099{
3100 struct target_termios *target = dst;
3101 const struct host_termios *host = src;
3102
5fafdf24 3103 target->c_iflag =
31e31b8a 3104 tswap32(host_to_target_bitmask(host->c_iflag, iflag_tbl));
5fafdf24 3105 target->c_oflag =
31e31b8a 3106 tswap32(host_to_target_bitmask(host->c_oflag, oflag_tbl));
5fafdf24 3107 target->c_cflag =
31e31b8a 3108 tswap32(host_to_target_bitmask(host->c_cflag, cflag_tbl));
5fafdf24 3109 target->c_lflag =
31e31b8a
FB
3110 tswap32(host_to_target_bitmask(host->c_lflag, lflag_tbl));
3111 target->c_line = host->c_line;
3b46e624 3112
44607123 3113 memset(target->c_cc, 0, sizeof(target->c_cc));
31e31b8a
FB
3114 target->c_cc[TARGET_VINTR] = host->c_cc[VINTR];
3115 target->c_cc[TARGET_VQUIT] = host->c_cc[VQUIT];
3116 target->c_cc[TARGET_VERASE] = host->c_cc[VERASE];
3117 target->c_cc[TARGET_VKILL] = host->c_cc[VKILL];
3118 target->c_cc[TARGET_VEOF] = host->c_cc[VEOF];
3119 target->c_cc[TARGET_VTIME] = host->c_cc[VTIME];
3120 target->c_cc[TARGET_VMIN] = host->c_cc[VMIN];
3121 target->c_cc[TARGET_VSWTC] = host->c_cc[VSWTC];
3122 target->c_cc[TARGET_VSTART] = host->c_cc[VSTART];
3123 target->c_cc[TARGET_VSTOP] = host->c_cc[VSTOP];
3124 target->c_cc[TARGET_VSUSP] = host->c_cc[VSUSP];
3125 target->c_cc[TARGET_VEOL] = host->c_cc[VEOL];
3126 target->c_cc[TARGET_VREPRINT] = host->c_cc[VREPRINT];
3127 target->c_cc[TARGET_VDISCARD] = host->c_cc[VDISCARD];
3128 target->c_cc[TARGET_VWERASE] = host->c_cc[VWERASE];
3129 target->c_cc[TARGET_VLNEXT] = host->c_cc[VLNEXT];
3130 target->c_cc[TARGET_VEOL2] = host->c_cc[VEOL2];
3131}
3132
8e853dc7 3133static const StructEntry struct_termios_def = {
31e31b8a
FB
3134 .convert = { host_to_target_termios, target_to_host_termios },
3135 .size = { sizeof(struct target_termios), sizeof(struct host_termios) },
3136 .align = { __alignof__(struct target_termios), __alignof__(struct host_termios) },
3137};
3138
5286db75
FB
3139static bitmask_transtbl mmap_flags_tbl[] = {
3140 { TARGET_MAP_SHARED, TARGET_MAP_SHARED, MAP_SHARED, MAP_SHARED },
3141 { TARGET_MAP_PRIVATE, TARGET_MAP_PRIVATE, MAP_PRIVATE, MAP_PRIVATE },
3142 { TARGET_MAP_FIXED, TARGET_MAP_FIXED, MAP_FIXED, MAP_FIXED },
3143 { TARGET_MAP_ANONYMOUS, TARGET_MAP_ANONYMOUS, MAP_ANONYMOUS, MAP_ANONYMOUS },
3144 { TARGET_MAP_GROWSDOWN, TARGET_MAP_GROWSDOWN, MAP_GROWSDOWN, MAP_GROWSDOWN },
3145 { TARGET_MAP_DENYWRITE, TARGET_MAP_DENYWRITE, MAP_DENYWRITE, MAP_DENYWRITE },
3146 { TARGET_MAP_EXECUTABLE, TARGET_MAP_EXECUTABLE, MAP_EXECUTABLE, MAP_EXECUTABLE },
3147 { TARGET_MAP_LOCKED, TARGET_MAP_LOCKED, MAP_LOCKED, MAP_LOCKED },
3148 { 0, 0, 0, 0 }
3149};
3150
2ab83ea7 3151#if defined(TARGET_I386)
6dbad63e
FB
3152
3153/* NOTE: there is really one LDT for all the threads */
b1d8e52e 3154static uint8_t *ldt_table;
6dbad63e 3155
03acab66 3156static abi_long read_ldt(abi_ulong ptr, unsigned long bytecount)
6dbad63e
FB
3157{
3158 int size;
53a5960a 3159 void *p;
6dbad63e
FB
3160
3161 if (!ldt_table)
3162 return 0;
3163 size = TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE;
3164 if (size > bytecount)
3165 size = bytecount;
579a97f7
FB
3166 p = lock_user(VERIFY_WRITE, ptr, size, 0);
3167 if (!p)
03acab66 3168 return -TARGET_EFAULT;
579a97f7 3169 /* ??? Should this by byteswapped? */
53a5960a
PB
3170 memcpy(p, ldt_table, size);
3171 unlock_user(p, ptr, size);
6dbad63e
FB
3172 return size;
3173}
3174
3175/* XXX: add locking support */
03acab66
FB
3176static abi_long write_ldt(CPUX86State *env,
3177 abi_ulong ptr, unsigned long bytecount, int oldmode)
6dbad63e
FB
3178{
3179 struct target_modify_ldt_ldt_s ldt_info;
53a5960a 3180 struct target_modify_ldt_ldt_s *target_ldt_info;
6dbad63e 3181 int seg_32bit, contents, read_exec_only, limit_in_pages;
8d18e893 3182 int seg_not_present, useable, lm;
6dbad63e
FB
3183 uint32_t *lp, entry_1, entry_2;
3184
3185 if (bytecount != sizeof(ldt_info))
03acab66 3186 return -TARGET_EINVAL;
579a97f7 3187 if (!lock_user_struct(VERIFY_READ, target_ldt_info, ptr, 1))
03acab66 3188 return -TARGET_EFAULT;
53a5960a
PB
3189 ldt_info.entry_number = tswap32(target_ldt_info->entry_number);
3190 ldt_info.base_addr = tswapl(target_ldt_info->base_addr);
3191 ldt_info.limit = tswap32(target_ldt_info->limit);
3192 ldt_info.flags = tswap32(target_ldt_info->flags);
3193 unlock_user_struct(target_ldt_info, ptr, 0);
3b46e624 3194
6dbad63e 3195 if (ldt_info.entry_number >= TARGET_LDT_ENTRIES)
03acab66 3196 return -TARGET_EINVAL;
6dbad63e
FB
3197 seg_32bit = ldt_info.flags & 1;
3198 contents = (ldt_info.flags >> 1) & 3;
3199 read_exec_only = (ldt_info.flags >> 3) & 1;
3200 limit_in_pages = (ldt_info.flags >> 4) & 1;
3201 seg_not_present = (ldt_info.flags >> 5) & 1;
3202 useable = (ldt_info.flags >> 6) & 1;
8d18e893
FB
3203#ifdef TARGET_ABI32
3204 lm = 0;
3205#else
3206 lm = (ldt_info.flags >> 7) & 1;
3207#endif
6dbad63e
FB
3208 if (contents == 3) {
3209 if (oldmode)
03acab66 3210 return -TARGET_EINVAL;
6dbad63e 3211 if (seg_not_present == 0)
03acab66 3212 return -TARGET_EINVAL;
6dbad63e
FB
3213 }
3214 /* allocate the LDT */
3215 if (!ldt_table) {
e441570f
AZ
3216 env->ldt.base = target_mmap(0,
3217 TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE,
3218 PROT_READ|PROT_WRITE,
3219 MAP_ANONYMOUS|MAP_PRIVATE, -1, 0);
3220 if (env->ldt.base == -1)
03acab66 3221 return -TARGET_ENOMEM;
e441570f
AZ
3222 memset(g2h(env->ldt.base), 0,
3223 TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE);
6dbad63e 3224 env->ldt.limit = 0xffff;
e441570f 3225 ldt_table = g2h(env->ldt.base);
6dbad63e
FB
3226 }
3227
3228 /* NOTE: same code as Linux kernel */
3229 /* Allow LDTs to be cleared by the user. */
3230 if (ldt_info.base_addr == 0 && ldt_info.limit == 0) {
3231 if (oldmode ||
3232 (contents == 0 &&
3233 read_exec_only == 1 &&
3234 seg_32bit == 0 &&
3235 limit_in_pages == 0 &&
3236 seg_not_present == 1 &&
3237 useable == 0 )) {
3238 entry_1 = 0;
3239 entry_2 = 0;
3240 goto install;
3241 }
3242 }
3b46e624 3243
6dbad63e
FB
3244 entry_1 = ((ldt_info.base_addr & 0x0000ffff) << 16) |
3245 (ldt_info.limit & 0x0ffff);
3246 entry_2 = (ldt_info.base_addr & 0xff000000) |
3247 ((ldt_info.base_addr & 0x00ff0000) >> 16) |
3248 (ldt_info.limit & 0xf0000) |
3249 ((read_exec_only ^ 1) << 9) |
3250 (contents << 10) |
3251 ((seg_not_present ^ 1) << 15) |
3252 (seg_32bit << 22) |
3253 (limit_in_pages << 23) |
8d18e893 3254 (lm << 21) |
6dbad63e
FB
3255 0x7000;
3256 if (!oldmode)
3257 entry_2 |= (useable << 20);
14ae3ba7 3258
6dbad63e
FB
3259 /* Install the new entry ... */
3260install:
3261 lp = (uint32_t *)(ldt_table + (ldt_info.entry_number << 3));
3262 lp[0] = tswap32(entry_1);
3263 lp[1] = tswap32(entry_2);
3264 return 0;
3265}
3266
3267/* specific and weird i386 syscalls */
8fcd3692
BS
3268static abi_long do_modify_ldt(CPUX86State *env, int func, abi_ulong ptr,
3269 unsigned long bytecount)
6dbad63e 3270{
03acab66 3271 abi_long ret;
3b46e624 3272
6dbad63e
FB
3273 switch (func) {
3274 case 0:
3275 ret = read_ldt(ptr, bytecount);
3276 break;
3277 case 1:
3278 ret = write_ldt(env, ptr, bytecount, 1);
3279 break;
3280 case 0x11:
3281 ret = write_ldt(env, ptr, bytecount, 0);
3282 break;
03acab66
FB
3283 default:
3284 ret = -TARGET_ENOSYS;
3285 break;
6dbad63e
FB
3286 }
3287 return ret;
3288}
1b6b029e 3289
4583f589 3290#if defined(TARGET_I386) && defined(TARGET_ABI32)
8fcd3692 3291static abi_long do_set_thread_area(CPUX86State *env, abi_ulong ptr)
8d18e893
FB
3292{
3293 uint64_t *gdt_table = g2h(env->gdt.base);
3294 struct target_modify_ldt_ldt_s ldt_info;
3295 struct target_modify_ldt_ldt_s *target_ldt_info;
3296 int seg_32bit, contents, read_exec_only, limit_in_pages;
3297 int seg_not_present, useable, lm;
3298 uint32_t *lp, entry_1, entry_2;
3299 int i;
3300
3301 lock_user_struct(VERIFY_WRITE, target_ldt_info, ptr, 1);
3302 if (!target_ldt_info)
3303 return -TARGET_EFAULT;
3304 ldt_info.entry_number = tswap32(target_ldt_info->entry_number);
3305 ldt_info.base_addr = tswapl(target_ldt_info->base_addr);
3306 ldt_info.limit = tswap32(target_ldt_info->limit);
3307 ldt_info.flags = tswap32(target_ldt_info->flags);
3308 if (ldt_info.entry_number == -1) {
3309 for (i=TARGET_GDT_ENTRY_TLS_MIN; i<=TARGET_GDT_ENTRY_TLS_MAX; i++) {
3310 if (gdt_table[i] == 0) {
3311 ldt_info.entry_number = i;
3312 target_ldt_info->entry_number = tswap32(i);
3313 break;
3314 }
3315 }
3316 }
3317 unlock_user_struct(target_ldt_info, ptr, 1);
3318
3319 if (ldt_info.entry_number < TARGET_GDT_ENTRY_TLS_MIN ||
3320 ldt_info.entry_number > TARGET_GDT_ENTRY_TLS_MAX)
3321 return -TARGET_EINVAL;
3322 seg_32bit = ldt_info.flags & 1;
3323 contents = (ldt_info.flags >> 1) & 3;
3324 read_exec_only = (ldt_info.flags >> 3) & 1;
3325 limit_in_pages = (ldt_info.flags >> 4) & 1;
3326 seg_not_present = (ldt_info.flags >> 5) & 1;
3327 useable = (ldt_info.flags >> 6) & 1;
3328#ifdef TARGET_ABI32
3329 lm = 0;
3330#else
3331 lm = (ldt_info.flags >> 7) & 1;
3332#endif
3333
3334 if (contents == 3) {
3335 if (seg_not_present == 0)
3336 return -TARGET_EINVAL;
3337 }
3338
3339 /* NOTE: same code as Linux kernel */
3340 /* Allow LDTs to be cleared by the user. */
3341 if (ldt_info.base_addr == 0 && ldt_info.limit == 0) {
3342 if ((contents == 0 &&
3343 read_exec_only == 1 &&
3344 seg_32bit == 0 &&
3345 limit_in_pages == 0 &&
3346 seg_not_present == 1 &&
3347 useable == 0 )) {
3348 entry_1 = 0;
3349 entry_2 = 0;
3350 goto install;
3351 }
3352 }
3353
3354 entry_1 = ((ldt_info.base_addr & 0x0000ffff) << 16) |
3355 (ldt_info.limit & 0x0ffff);
3356 entry_2 = (ldt_info.base_addr & 0xff000000) |
3357 ((ldt_info.base_addr & 0x00ff0000) >> 16) |
3358 (ldt_info.limit & 0xf0000) |
3359 ((read_exec_only ^ 1) << 9) |
3360 (contents << 10) |
3361 ((seg_not_present ^ 1) << 15) |
3362 (seg_32bit << 22) |
3363 (limit_in_pages << 23) |
3364 (useable << 20) |
3365 (lm << 21) |
3366 0x7000;
3367
3368 /* Install the new entry ... */
3369install:
3370 lp = (uint32_t *)(gdt_table + ldt_info.entry_number);
3371 lp[0] = tswap32(entry_1);
3372 lp[1] = tswap32(entry_2);
3373 return 0;
3374}
3375
8fcd3692 3376static abi_long do_get_thread_area(CPUX86State *env, abi_ulong ptr)
8d18e893
FB
3377{
3378 struct target_modify_ldt_ldt_s *target_ldt_info;
3379 uint64_t *gdt_table = g2h(env->gdt.base);
3380 uint32_t base_addr, limit, flags;
3381 int seg_32bit, contents, read_exec_only, limit_in_pages, idx;
3382 int seg_not_present, useable, lm;
3383 uint32_t *lp, entry_1, entry_2;
3384
3385 lock_user_struct(VERIFY_WRITE, target_ldt_info, ptr, 1);
3386 if (!target_ldt_info)
3387 return -TARGET_EFAULT;
3388 idx = tswap32(target_ldt_info->entry_number);
3389 if (idx < TARGET_GDT_ENTRY_TLS_MIN ||
3390 idx > TARGET_GDT_ENTRY_TLS_MAX) {
3391 unlock_user_struct(target_ldt_info, ptr, 1);
3392 return -TARGET_EINVAL;
3393 }
3394 lp = (uint32_t *)(gdt_table + idx);
3395 entry_1 = tswap32(lp[0]);
3396 entry_2 = tswap32(lp[1]);
3397
3398 read_exec_only = ((entry_2 >> 9) & 1) ^ 1;
3399 contents = (entry_2 >> 10) & 3;
3400 seg_not_present = ((entry_2 >> 15) & 1) ^ 1;
3401 seg_32bit = (entry_2 >> 22) & 1;
3402 limit_in_pages = (entry_2 >> 23) & 1;
3403 useable = (entry_2 >> 20) & 1;
3404#ifdef TARGET_ABI32
3405 lm = 0;
3406#else
3407 lm = (entry_2 >> 21) & 1;
3408#endif
3409 flags = (seg_32bit << 0) | (contents << 1) |
3410 (read_exec_only << 3) | (limit_in_pages << 4) |
3411 (seg_not_present << 5) | (useable << 6) | (lm << 7);
3412 limit = (entry_1 & 0xffff) | (entry_2 & 0xf0000);
3413 base_addr = (entry_1 >> 16) |
3414 (entry_2 & 0xff000000) |
3415 ((entry_2 & 0xff) << 16);
3416 target_ldt_info->base_addr = tswapl(base_addr);
3417 target_ldt_info->limit = tswap32(limit);
3418 target_ldt_info->flags = tswap32(flags);
3419 unlock_user_struct(target_ldt_info, ptr, 1);
3420 return 0;
3421}
4583f589 3422#endif /* TARGET_I386 && TARGET_ABI32 */
8d18e893 3423
d2fd1af7 3424#ifndef TARGET_ABI32
8fcd3692 3425static abi_long do_arch_prctl(CPUX86State *env, int code, abi_ulong addr)
d2fd1af7
FB
3426{
3427 abi_long ret;
3428 abi_ulong val;
3429 int idx;
3430
3431 switch(code) {
3432 case TARGET_ARCH_SET_GS:
3433 case TARGET_ARCH_SET_FS:
3434 if (code == TARGET_ARCH_SET_GS)
3435 idx = R_GS;
3436 else
3437 idx = R_FS;
3438 cpu_x86_load_seg(env, idx, 0);
3439 env->segs[idx].base = addr;
3440 break;
3441 case TARGET_ARCH_GET_GS:
3442 case TARGET_ARCH_GET_FS:
3443 if (code == TARGET_ARCH_GET_GS)
3444 idx = R_GS;
3445 else
3446 idx = R_FS;
3447 val = env->segs[idx].base;
3448 if (put_user(val, addr, abi_ulong))
3449 return -TARGET_EFAULT;
3450 break;
3451 default:
3452 ret = -TARGET_EINVAL;
3453 break;
3454 }
3455 return 0;
3456}
3457#endif
3458
2ab83ea7
FB
3459#endif /* defined(TARGET_I386) */
3460
2f7bb878 3461#if defined(CONFIG_USE_NPTL)
d865bab5
PB
3462
3463#define NEW_STACK_SIZE PTHREAD_STACK_MIN
3464
3465static pthread_mutex_t clone_lock = PTHREAD_MUTEX_INITIALIZER;
3466typedef struct {
3467 CPUState *env;
3468 pthread_mutex_t mutex;
3469 pthread_cond_t cond;
3470 pthread_t thread;
3471 uint32_t tid;
3472 abi_ulong child_tidptr;
3473 abi_ulong parent_tidptr;
3474 sigset_t sigmask;
3475} new_thread_info;
3476
3477static void *clone_func(void *arg)
3478{
3479 new_thread_info *info = arg;
3480 CPUState *env;
edf8e2af 3481 TaskState *ts;
d865bab5
PB
3482
3483 env = info->env;
3484 thread_env = env;
edf8e2af 3485 ts = (TaskState *)thread_env->opaque;
d865bab5 3486 info->tid = gettid();
1e9fa730 3487 env->host_tid = info->tid;
edf8e2af 3488 task_settid(ts);
d865bab5
PB
3489 if (info->child_tidptr)
3490 put_user_u32(info->tid, info->child_tidptr);
3491 if (info->parent_tidptr)
3492 put_user_u32(info->tid, info->parent_tidptr);
3493 /* Enable signals. */
3494 sigprocmask(SIG_SETMASK, &info->sigmask, NULL);
3495 /* Signal to the parent that we're ready. */
3496 pthread_mutex_lock(&info->mutex);
3497 pthread_cond_broadcast(&info->cond);
3498 pthread_mutex_unlock(&info->mutex);
3499 /* Wait until the parent has finshed initializing the tls state. */
3500 pthread_mutex_lock(&clone_lock);
3501 pthread_mutex_unlock(&clone_lock);
3502 cpu_loop(env);
3503 /* never exits */
3504 return NULL;
3505}
3506#else
1b6b029e
FB
3507/* this stack is the equivalent of the kernel stack associated with a
3508 thread/process */
3509#define NEW_STACK_SIZE 8192
3510
3511static int clone_func(void *arg)
3512{
2ab83ea7 3513 CPUState *env = arg;
1b6b029e
FB
3514 cpu_loop(env);
3515 /* never exits */
3516 return 0;
3517}
d865bab5 3518#endif
1b6b029e 3519
0da46a6e
TS
3520/* do_fork() Must return host values and target errnos (unlike most
3521 do_*() functions). */
d865bab5
PB
3522static int do_fork(CPUState *env, unsigned int flags, abi_ulong newsp,
3523 abi_ulong parent_tidptr, target_ulong newtls,
3524 abi_ulong child_tidptr)
1b6b029e
FB
3525{
3526 int ret;
5cd4393b 3527 TaskState *ts;
1b6b029e 3528 uint8_t *new_stack;
2ab83ea7 3529 CPUState *new_env;
2f7bb878 3530#if defined(CONFIG_USE_NPTL)
d865bab5
PB
3531 unsigned int nptl_flags;
3532 sigset_t sigmask;
3533#endif
3b46e624 3534
436d124b
AZ
3535 /* Emulate vfork() with fork() */
3536 if (flags & CLONE_VFORK)
3537 flags &= ~(CLONE_VFORK | CLONE_VM);
3538
1b6b029e 3539 if (flags & CLONE_VM) {
edf8e2af 3540 TaskState *parent_ts = (TaskState *)env->opaque;
2f7bb878 3541#if defined(CONFIG_USE_NPTL)
d865bab5
PB
3542 new_thread_info info;
3543 pthread_attr_t attr;
bd0c5661 3544#endif
c3a92833 3545 ts = qemu_mallocz(sizeof(TaskState) + NEW_STACK_SIZE);
624f7979 3546 init_task_state(ts);
5cd4393b 3547 new_stack = ts->stack;
1b6b029e 3548 /* we create a new CPU instance. */
c5be9f08 3549 new_env = cpu_copy(env);
6e68e076
PB
3550 /* Init regs that differ from the parent. */
3551 cpu_clone_regs(new_env, newsp);
5cd4393b 3552 new_env->opaque = ts;
edf8e2af
MW
3553 ts->bprm = parent_ts->bprm;
3554 ts->info = parent_ts->info;
2f7bb878 3555#if defined(CONFIG_USE_NPTL)
d865bab5
PB
3556 nptl_flags = flags;
3557 flags &= ~CLONE_NPTL_FLAGS2;
3558
c2764719
PB
3559 if (nptl_flags & CLONE_CHILD_CLEARTID) {
3560 ts->child_tidptr = child_tidptr;
3561 }
3562
d865bab5
PB
3563 if (nptl_flags & CLONE_SETTLS)
3564 cpu_set_tls (new_env, newtls);
3565
3566 /* Grab a mutex so that thread setup appears atomic. */
3567 pthread_mutex_lock(&clone_lock);
3568
3569 memset(&info, 0, sizeof(info));
3570 pthread_mutex_init(&info.mutex, NULL);
3571 pthread_mutex_lock(&info.mutex);
3572 pthread_cond_init(&info.cond, NULL);
3573 info.env = new_env;
3574 if (nptl_flags & CLONE_CHILD_SETTID)
3575 info.child_tidptr = child_tidptr;
3576 if (nptl_flags & CLONE_PARENT_SETTID)
3577 info.parent_tidptr = parent_tidptr;
3578
3579 ret = pthread_attr_init(&attr);
3580 ret = pthread_attr_setstack(&attr, new_stack, NEW_STACK_SIZE);
3581 /* It is not safe to deliver signals until the child has finished
3582 initializing, so temporarily block all signals. */
3583 sigfillset(&sigmask);
3584 sigprocmask(SIG_BLOCK, &sigmask, &info.sigmask);
3585
3586 ret = pthread_create(&info.thread, &attr, clone_func, &info);
c2764719 3587 /* TODO: Free new CPU state if thread creation failed. */
d865bab5
PB
3588
3589 sigprocmask(SIG_SETMASK, &info.sigmask, NULL);
3590 pthread_attr_destroy(&attr);
3591 if (ret == 0) {
3592 /* Wait for the child to initialize. */
3593 pthread_cond_wait(&info.cond, &info.mutex);
3594 ret = info.tid;
3595 if (flags & CLONE_PARENT_SETTID)
3596 put_user_u32(ret, parent_tidptr);
3597 } else {
3598 ret = -1;
3599 }
3600 pthread_mutex_unlock(&info.mutex);
3601 pthread_cond_destroy(&info.cond);
3602 pthread_mutex_destroy(&info.mutex);
3603 pthread_mutex_unlock(&clone_lock);
3604#else
3605 if (flags & CLONE_NPTL_FLAGS2)
3606 return -EINVAL;
3607 /* This is probably going to die very quickly, but do it anyway. */
27725c1d 3608#ifdef __ia64__
fd4a43e4 3609 ret = __clone2(clone_func, new_stack + NEW_STACK_SIZE, flags, new_env);
27725c1d
FB
3610#else
3611 ret = clone(clone_func, new_stack + NEW_STACK_SIZE, flags, new_env);
d865bab5 3612#endif
27725c1d 3613#endif
1b6b029e
FB
3614 } else {
3615 /* if no CLONE_VM, we consider it is a fork */
d865bab5 3616 if ((flags & ~(CSIGNAL | CLONE_NPTL_FLAGS2)) != 0)
1b6b029e 3617 return -EINVAL;
d865bab5 3618 fork_start();
1b6b029e 3619 ret = fork();
d865bab5 3620 if (ret == 0) {
2b1319c8 3621 /* Child Process. */
d865bab5
PB
3622 cpu_clone_regs(env, newsp);
3623 fork_end(1);
2f7bb878 3624#if defined(CONFIG_USE_NPTL)
2b1319c8
AJ
3625 /* There is a race condition here. The parent process could
3626 theoretically read the TID in the child process before the child
3627 tid is set. This would require using either ptrace
3628 (not implemented) or having *_tidptr to point at a shared memory
3629 mapping. We can't repeat the spinlock hack used above because
3630 the child process gets its own copy of the lock. */
d865bab5
PB
3631 if (flags & CLONE_CHILD_SETTID)
3632 put_user_u32(gettid(), child_tidptr);
3633 if (flags & CLONE_PARENT_SETTID)
3634 put_user_u32(gettid(), parent_tidptr);
3635 ts = (TaskState *)env->opaque;
3636 if (flags & CLONE_SETTLS)
3637 cpu_set_tls (env, newtls);
c2764719
PB
3638 if (flags & CLONE_CHILD_CLEARTID)
3639 ts->child_tidptr = child_tidptr;
2b1319c8 3640#endif
d865bab5
PB
3641 } else {
3642 fork_end(0);
3643 }
1b6b029e
FB
3644 }
3645 return ret;
3646}
3647
5f106811
APR
3648/* warning : doesn't handle linux specific flags... */
3649static int target_to_host_fcntl_cmd(int cmd)
3650{
3651 switch(cmd) {
3652 case TARGET_F_DUPFD:
3653 case TARGET_F_GETFD:
3654 case TARGET_F_SETFD:
3655 case TARGET_F_GETFL:
3656 case TARGET_F_SETFL:
3657 return cmd;
3658 case TARGET_F_GETLK:
3659 return F_GETLK;
3660 case TARGET_F_SETLK:
3661 return F_SETLK;
3662 case TARGET_F_SETLKW:
3663 return F_SETLKW;
3664 case TARGET_F_GETOWN:
3665 return F_GETOWN;
3666 case TARGET_F_SETOWN:
3667 return F_SETOWN;
3668 case TARGET_F_GETSIG:
3669 return F_GETSIG;
3670 case TARGET_F_SETSIG:
3671 return F_SETSIG;
3672#if TARGET_ABI_BITS == 32
3673 case TARGET_F_GETLK64:
3674 return F_GETLK64;
3675 case TARGET_F_SETLK64:
3676 return F_SETLK64;
3677 case TARGET_F_SETLKW64:
3678 return F_SETLKW64;
3679#endif
3680 default:
3681 return -TARGET_EINVAL;
3682 }
3683 return -TARGET_EINVAL;
3684}
3685
992f48a0 3686static abi_long do_fcntl(int fd, int cmd, abi_ulong arg)
7775e9ec
FB
3687{
3688 struct flock fl;
53a5960a 3689 struct target_flock *target_fl;
43f238d7
TS
3690 struct flock64 fl64;
3691 struct target_flock64 *target_fl64;
992f48a0 3692 abi_long ret;
5f106811
APR
3693 int host_cmd = target_to_host_fcntl_cmd(cmd);
3694
3695 if (host_cmd == -TARGET_EINVAL)
3696 return host_cmd;
53a5960a 3697
7775e9ec
FB
3698 switch(cmd) {
3699 case TARGET_F_GETLK:
579a97f7
FB
3700 if (!lock_user_struct(VERIFY_READ, target_fl, arg, 1))
3701 return -TARGET_EFAULT;
5813427b
TS
3702 fl.l_type = tswap16(target_fl->l_type);
3703 fl.l_whence = tswap16(target_fl->l_whence);
3704 fl.l_start = tswapl(target_fl->l_start);
3705 fl.l_len = tswapl(target_fl->l_len);
3706 fl.l_pid = tswapl(target_fl->l_pid);
3707 unlock_user_struct(target_fl, arg, 0);
5f106811 3708 ret = get_errno(fcntl(fd, host_cmd, &fl));
7775e9ec 3709 if (ret == 0) {
579a97f7
FB
3710 if (!lock_user_struct(VERIFY_WRITE, target_fl, arg, 0))
3711 return -TARGET_EFAULT;
7775e9ec
FB
3712 target_fl->l_type = tswap16(fl.l_type);
3713 target_fl->l_whence = tswap16(fl.l_whence);
3714 target_fl->l_start = tswapl(fl.l_start);
3715 target_fl->l_len = tswapl(fl.l_len);
3716 target_fl->l_pid = tswapl(fl.l_pid);
53a5960a 3717 unlock_user_struct(target_fl, arg, 1);
7775e9ec
FB
3718 }
3719 break;
3b46e624 3720
7775e9ec
FB
3721 case TARGET_F_SETLK:
3722 case TARGET_F_SETLKW:
579a97f7
FB
3723 if (!lock_user_struct(VERIFY_READ, target_fl, arg, 1))
3724 return -TARGET_EFAULT;
7775e9ec
FB
3725 fl.l_type = tswap16(target_fl->l_type);
3726 fl.l_whence = tswap16(target_fl->l_whence);
3727 fl.l_start = tswapl(target_fl->l_start);
3728 fl.l_len = tswapl(target_fl->l_len);
3729 fl.l_pid = tswapl(target_fl->l_pid);
53a5960a 3730 unlock_user_struct(target_fl, arg, 0);
5f106811 3731 ret = get_errno(fcntl(fd, host_cmd, &fl));
7775e9ec 3732 break;
3b46e624 3733
7775e9ec 3734 case TARGET_F_GETLK64:
579a97f7
FB
3735 if (!lock_user_struct(VERIFY_READ, target_fl64, arg, 1))
3736 return -TARGET_EFAULT;
5813427b
TS
3737 fl64.l_type = tswap16(target_fl64->l_type) >> 1;
3738 fl64.l_whence = tswap16(target_fl64->l_whence);
3739 fl64.l_start = tswapl(target_fl64->l_start);
3740 fl64.l_len = tswapl(target_fl64->l_len);
3741 fl64.l_pid = tswap16(target_fl64->l_pid);
3742 unlock_user_struct(target_fl64, arg, 0);
5f106811 3743 ret = get_errno(fcntl(fd, host_cmd, &fl64));
43f238d7 3744 if (ret == 0) {
579a97f7
FB
3745 if (!lock_user_struct(VERIFY_WRITE, target_fl64, arg, 0))
3746 return -TARGET_EFAULT;
43f238d7
TS
3747 target_fl64->l_type = tswap16(fl64.l_type) >> 1;
3748 target_fl64->l_whence = tswap16(fl64.l_whence);
3749 target_fl64->l_start = tswapl(fl64.l_start);
3750 target_fl64->l_len = tswapl(fl64.l_len);
3751 target_fl64->l_pid = tswapl(fl64.l_pid);
3752 unlock_user_struct(target_fl64, arg, 1);
3753 }
9ee1fa2c 3754 break;
7775e9ec
FB
3755 case TARGET_F_SETLK64:
3756 case TARGET_F_SETLKW64:
579a97f7
FB
3757 if (!lock_user_struct(VERIFY_READ, target_fl64, arg, 1))
3758 return -TARGET_EFAULT;
43f238d7
TS
3759 fl64.l_type = tswap16(target_fl64->l_type) >> 1;
3760 fl64.l_whence = tswap16(target_fl64->l_whence);
3761 fl64.l_start = tswapl(target_fl64->l_start);
3762 fl64.l_len = tswapl(target_fl64->l_len);
3763 fl64.l_pid = tswap16(target_fl64->l_pid);
3764 unlock_user_struct(target_fl64, arg, 0);
5f106811 3765 ret = get_errno(fcntl(fd, host_cmd, &fl64));
7775e9ec
FB
3766 break;
3767
5f106811
APR
3768 case TARGET_F_GETFL:
3769 ret = get_errno(fcntl(fd, host_cmd, arg));
9ee1fa2c
FB
3770 if (ret >= 0) {
3771 ret = host_to_target_bitmask(ret, fcntl_flags_tbl);
3772 }
ffa65c3b
FB
3773 break;
3774
5f106811
APR
3775 case TARGET_F_SETFL:
3776 ret = get_errno(fcntl(fd, host_cmd, target_to_host_bitmask(arg, fcntl_flags_tbl)));
3777 break;
3778
3779 case TARGET_F_SETOWN:
3780 case TARGET_F_GETOWN:
3781 case TARGET_F_SETSIG:
3782 case TARGET_F_GETSIG:
3783 ret = get_errno(fcntl(fd, host_cmd, arg));
ffa65c3b
FB
3784 break;
3785
7775e9ec 3786 default:
9ee1fa2c 3787 ret = get_errno(fcntl(fd, cmd, arg));
7775e9ec
FB
3788 break;
3789 }
3790 return ret;
3791}
3792
67867308 3793#ifdef USE_UID16
7775e9ec 3794
67867308
FB
3795static inline int high2lowuid(int uid)
3796{
3797 if (uid > 65535)
3798 return 65534;
3799 else
3800 return uid;
3801}
3802
3803static inline int high2lowgid(int gid)
3804{
3805 if (gid > 65535)
3806 return 65534;
3807 else
3808 return gid;
3809}
3810
3811static inline int low2highuid(int uid)
3812{
3813 if ((int16_t)uid == -1)
3814 return -1;
3815 else
3816 return uid;
3817}
3818
3819static inline int low2highgid(int gid)
3820{
3821 if ((int16_t)gid == -1)
3822 return -1;
3823 else
3824 return gid;
3825}
3826
3827#endif /* USE_UID16 */
1b6b029e 3828
31e31b8a
FB
3829void syscall_init(void)
3830{
2ab83ea7
FB
3831 IOCTLEntry *ie;
3832 const argtype *arg_type;
3833 int size;
b92c47c1 3834 int i;
2ab83ea7 3835
001faf32 3836#define STRUCT(name, ...) thunk_register_struct(STRUCT_ ## name, #name, struct_ ## name ## _def);
5fafdf24 3837#define STRUCT_SPECIAL(name) thunk_register_struct_direct(STRUCT_ ## name, #name, &struct_ ## name ## _def);
31e31b8a
FB
3838#include "syscall_types.h"
3839#undef STRUCT
3840#undef STRUCT_SPECIAL
2ab83ea7
FB
3841
3842 /* we patch the ioctl size if necessary. We rely on the fact that
3843 no ioctl has all the bits at '1' in the size field */
3844 ie = ioctl_entries;
3845 while (ie->target_cmd != 0) {
3846 if (((ie->target_cmd >> TARGET_IOC_SIZESHIFT) & TARGET_IOC_SIZEMASK) ==
3847 TARGET_IOC_SIZEMASK) {
3848 arg_type = ie->arg_type;
3849 if (arg_type[0] != TYPE_PTR) {
5fafdf24 3850 fprintf(stderr, "cannot patch size for ioctl 0x%x\n",
2ab83ea7
FB
3851 ie->target_cmd);
3852 exit(1);
3853 }
3854 arg_type++;
3855 size = thunk_type_size(arg_type, 0);
5fafdf24 3856 ie->target_cmd = (ie->target_cmd &
2ab83ea7
FB
3857 ~(TARGET_IOC_SIZEMASK << TARGET_IOC_SIZESHIFT)) |
3858 (size << TARGET_IOC_SIZESHIFT);
3859 }
b92c47c1
TS
3860
3861 /* Build target_to_host_errno_table[] table from
3862 * host_to_target_errno_table[]. */
3863 for (i=0; i < ERRNO_TABLE_SIZE; i++)
3864 target_to_host_errno_table[host_to_target_errno_table[i]] = i;
3865
2ab83ea7 3866 /* automatic consistency check if same arch */
872ea0c0
AZ
3867#if (defined(__i386__) && defined(TARGET_I386) && defined(TARGET_ABI32)) || \
3868 (defined(__x86_64__) && defined(TARGET_X86_64))
3869 if (unlikely(ie->target_cmd != ie->host_cmd)) {
3870 fprintf(stderr, "ERROR: ioctl(%s): target=0x%x host=0x%x\n",
3871 ie->name, ie->target_cmd, ie->host_cmd);
2ab83ea7
FB
3872 }
3873#endif
3874 ie++;
3875 }
31e31b8a 3876}
c573ff67 3877
992f48a0 3878#if TARGET_ABI_BITS == 32
ce4defa0
PB
3879static inline uint64_t target_offset64(uint32_t word0, uint32_t word1)
3880{
af325d36 3881#ifdef TARGET_WORDS_BIGENDIAN
ce4defa0
PB
3882 return ((uint64_t)word0 << 32) | word1;
3883#else
3884 return ((uint64_t)word1 << 32) | word0;
3885#endif
3886}
992f48a0 3887#else /* TARGET_ABI_BITS == 32 */
32407103
JM
3888static inline uint64_t target_offset64(uint64_t word0, uint64_t word1)
3889{
3890 return word0;
3891}
992f48a0 3892#endif /* TARGET_ABI_BITS != 32 */
ce4defa0
PB
3893
3894#ifdef TARGET_NR_truncate64
992f48a0
BS
3895static inline abi_long target_truncate64(void *cpu_env, const char *arg1,
3896 abi_long arg2,
3897 abi_long arg3,
3898 abi_long arg4)
ce4defa0
PB
3899{
3900#ifdef TARGET_ARM
3901 if (((CPUARMState *)cpu_env)->eabi)
3902 {
3903 arg2 = arg3;
3904 arg3 = arg4;
3905 }
3906#endif
3907 return get_errno(truncate64(arg1, target_offset64(arg2, arg3)));
3908}
3909#endif
3910
3911#ifdef TARGET_NR_ftruncate64
992f48a0
BS
3912static inline abi_long target_ftruncate64(void *cpu_env, abi_long arg1,
3913 abi_long arg2,
3914 abi_long arg3,
3915 abi_long arg4)
ce4defa0
PB
3916{
3917#ifdef TARGET_ARM
3918 if (((CPUARMState *)cpu_env)->eabi)
3919 {
3920 arg2 = arg3;
3921 arg3 = arg4;
3922 }
3923#endif
3924 return get_errno(ftruncate64(arg1, target_offset64(arg2, arg3)));
3925}
3926#endif
3927
579a97f7
FB
3928static inline abi_long target_to_host_timespec(struct timespec *host_ts,
3929 abi_ulong target_addr)
53a5960a
PB
3930{
3931 struct target_timespec *target_ts;
3932
579a97f7
FB
3933 if (!lock_user_struct(VERIFY_READ, target_ts, target_addr, 1))
3934 return -TARGET_EFAULT;
53a5960a
PB
3935 host_ts->tv_sec = tswapl(target_ts->tv_sec);
3936 host_ts->tv_nsec = tswapl(target_ts->tv_nsec);
3937 unlock_user_struct(target_ts, target_addr, 0);
b255bfa8 3938 return 0;
53a5960a
PB
3939}
3940
579a97f7
FB
3941static inline abi_long host_to_target_timespec(abi_ulong target_addr,
3942 struct timespec *host_ts)
53a5960a
PB
3943{
3944 struct target_timespec *target_ts;
3945
579a97f7
FB
3946 if (!lock_user_struct(VERIFY_WRITE, target_ts, target_addr, 0))
3947 return -TARGET_EFAULT;
53a5960a
PB
3948 target_ts->tv_sec = tswapl(host_ts->tv_sec);
3949 target_ts->tv_nsec = tswapl(host_ts->tv_nsec);
3950 unlock_user_struct(target_ts, target_addr, 1);
b255bfa8 3951 return 0;
53a5960a
PB
3952}
3953
9d33b76b 3954#if defined(TARGET_NR_stat64) || defined(TARGET_NR_newfstatat)
6a24a778
AZ
3955static inline abi_long host_to_target_stat64(void *cpu_env,
3956 abi_ulong target_addr,
3957 struct stat *host_st)
3958{
3959#ifdef TARGET_ARM
3960 if (((CPUARMState *)cpu_env)->eabi) {
3961 struct target_eabi_stat64 *target_st;
3962
3963 if (!lock_user_struct(VERIFY_WRITE, target_st, target_addr, 0))
3964 return -TARGET_EFAULT;
3965 memset(target_st, 0, sizeof(struct target_eabi_stat64));
3966 __put_user(host_st->st_dev, &target_st->st_dev);
3967 __put_user(host_st->st_ino, &target_st->st_ino);
3968#ifdef TARGET_STAT64_HAS_BROKEN_ST_INO
3969 __put_user(host_st->st_ino, &target_st->__st_ino);
3970#endif
3971 __put_user(host_st->st_mode, &target_st->st_mode);
3972 __put_user(host_st->st_nlink, &target_st->st_nlink);
3973 __put_user(host_st->st_uid, &target_st->st_uid);
3974 __put_user(host_st->st_gid, &target_st->st_gid);
3975 __put_user(host_st->st_rdev, &target_st->st_rdev);
3976 __put_user(host_st->st_size, &target_st->st_size);
3977 __put_user(host_st->st_blksize, &target_st->st_blksize);
3978 __put_user(host_st->st_blocks, &target_st->st_blocks);
3979 __put_user(host_st->st_atime, &target_st->target_st_atime);
3980 __put_user(host_st->st_mtime, &target_st->target_st_mtime);
3981 __put_user(host_st->st_ctime, &target_st->target_st_ctime);
3982 unlock_user_struct(target_st, target_addr, 1);
3983 } else
3984#endif
3985 {
9d33b76b
AJ
3986#if TARGET_LONG_BITS == 64
3987 struct target_stat *target_st;
3988#else
6a24a778 3989 struct target_stat64 *target_st;
9d33b76b 3990#endif
6a24a778
AZ
3991
3992 if (!lock_user_struct(VERIFY_WRITE, target_st, target_addr, 0))
3993 return -TARGET_EFAULT;
9d33b76b 3994 memset(target_st, 0, sizeof(*target_st));
6a24a778
AZ
3995 __put_user(host_st->st_dev, &target_st->st_dev);
3996 __put_user(host_st->st_ino, &target_st->st_ino);
3997#ifdef TARGET_STAT64_HAS_BROKEN_ST_INO
3998 __put_user(host_st->st_ino, &target_st->__st_ino);
3999#endif
4000 __put_user(host_st->st_mode, &target_st->st_mode);
4001 __put_user(host_st->st_nlink, &target_st->st_nlink);
4002 __put_user(host_st->st_uid, &target_st->st_uid);
4003 __put_user(host_st->st_gid, &target_st->st_gid);
4004 __put_user(host_st->st_rdev, &target_st->st_rdev);
4005 /* XXX: better use of kernel struct */
4006 __put_user(host_st->st_size, &target_st->st_size);
4007 __put_user(host_st->st_blksize, &target_st->st_blksize);
4008 __put_user(host_st->st_blocks, &target_st->st_blocks);
4009 __put_user(host_st->st_atime, &target_st->target_st_atime);
4010 __put_user(host_st->st_mtime, &target_st->target_st_mtime);
4011 __put_user(host_st->st_ctime, &target_st->target_st_ctime);
4012 unlock_user_struct(target_st, target_addr, 1);
4013 }
4014
4015 return 0;
4016}
4017#endif
4018
2f7bb878 4019#if defined(CONFIG_USE_NPTL)
bd0c5661
PB
4020/* ??? Using host futex calls even when target atomic operations
4021 are not really atomic probably breaks things. However implementing
4022 futexes locally would make futexes shared between multiple processes
4023 tricky. However they're probably useless because guest atomic
4024 operations won't work either. */
8fcd3692
BS
4025static int do_futex(target_ulong uaddr, int op, int val, target_ulong timeout,
4026 target_ulong uaddr2, int val3)
bd0c5661
PB
4027{
4028 struct timespec ts, *pts;
a16aae0c 4029 int base_op;
bd0c5661
PB
4030
4031 /* ??? We assume FUTEX_* constants are the same on both host
4032 and target. */
a29ccd63 4033#ifdef FUTEX_CMD_MASK
a16aae0c 4034 base_op = op & FUTEX_CMD_MASK;
a29ccd63 4035#else
a16aae0c 4036 base_op = op;
a29ccd63 4037#endif
a16aae0c 4038 switch (base_op) {
bd0c5661
PB
4039 case FUTEX_WAIT:
4040 if (timeout) {
4041 pts = &ts;
4042 target_to_host_timespec(pts, timeout);
4043 } else {
4044 pts = NULL;
4045 }
a29ccd63 4046 return get_errno(sys_futex(g2h(uaddr), op, tswap32(val),
bd0c5661
PB
4047 pts, NULL, 0));
4048 case FUTEX_WAKE:
a29ccd63 4049 return get_errno(sys_futex(g2h(uaddr), op, val, NULL, NULL, 0));
bd0c5661 4050 case FUTEX_FD:
a29ccd63 4051 return get_errno(sys_futex(g2h(uaddr), op, val, NULL, NULL, 0));
bd0c5661 4052 case FUTEX_REQUEUE:
bd0c5661 4053 case FUTEX_CMP_REQUEUE:
a16aae0c
NF
4054 case FUTEX_WAKE_OP:
4055 /* For FUTEX_REQUEUE, FUTEX_CMP_REQUEUE, and FUTEX_WAKE_OP, the
4056 TIMEOUT parameter is interpreted as a uint32_t by the kernel.
4057 But the prototype takes a `struct timespec *'; insert casts
4058 to satisfy the compiler. We do not need to tswap TIMEOUT
4059 since it's not compared to guest memory. */
4060 pts = (struct timespec *)(uintptr_t) timeout;
4061 return get_errno(sys_futex(g2h(uaddr), op, val, pts,
4062 g2h(uaddr2),
4063 (base_op == FUTEX_CMP_REQUEUE
4064 ? tswap32(val3)
4065 : val3)));
bd0c5661
PB
4066 default:
4067 return -TARGET_ENOSYS;
4068 }
4069}
4070#endif
4071
1d9d8b55
PB
4072/* Map host to target signal numbers for the wait family of syscalls.
4073 Assume all other status bits are the same. */
4074static int host_to_target_waitstatus(int status)
4075{
4076 if (WIFSIGNALED(status)) {
4077 return host_to_target_signal(WTERMSIG(status)) | (status & ~0x7f);
4078 }
4079 if (WIFSTOPPED(status)) {
4080 return (host_to_target_signal(WSTOPSIG(status)) << 8)
4081 | (status & 0xff);
4082 }
4083 return status;
4084}
4085
a745ec6d
PB
4086int get_osversion(void)
4087{
4088 static int osversion;
4089 struct new_utsname buf;
4090 const char *s;
4091 int i, n, tmp;
4092 if (osversion)
4093 return osversion;
4094 if (qemu_uname_release && *qemu_uname_release) {
4095 s = qemu_uname_release;
4096 } else {
4097 if (sys_uname(&buf))
4098 return 0;
4099 s = buf.release;
4100 }
4101 tmp = 0;
4102 for (i = 0; i < 3; i++) {
4103 n = 0;
4104 while (*s >= '0' && *s <= '9') {
4105 n *= 10;
4106 n += *s - '0';
4107 s++;
4108 }
4109 tmp = (tmp << 8) + n;
4110 if (*s == '.')
4111 s++;
4112 }
4113 osversion = tmp;
4114 return osversion;
4115}
4116
0da46a6e
TS
4117/* do_syscall() should always have a single exit point at the end so
4118 that actions, such as logging of syscall results, can be performed.
4119 All errnos that do_syscall() returns must be -TARGET_<errcode>. */
992f48a0
BS
4120abi_long do_syscall(void *cpu_env, int num, abi_long arg1,
4121 abi_long arg2, abi_long arg3, abi_long arg4,
4122 abi_long arg5, abi_long arg6)
31e31b8a 4123{
992f48a0 4124 abi_long ret;
31e31b8a 4125 struct stat st;
56c8f68f 4126 struct statfs stfs;
53a5960a 4127 void *p;
3b46e624 4128
72f03900 4129#ifdef DEBUG
c573ff67 4130 gemu_log("syscall %d", num);
72f03900 4131#endif
b92c47c1
TS
4132 if(do_strace)
4133 print_syscall(num, arg1, arg2, arg3, arg4, arg5, arg6);
4134
31e31b8a
FB
4135 switch(num) {
4136 case TARGET_NR_exit:
2f7bb878 4137#ifdef CONFIG_USE_NPTL
c2764719
PB
4138 /* In old applications this may be used to implement _exit(2).
4139 However in threaded applictions it is used for thread termination,
4140 and _exit_group is used for application termination.
4141 Do thread termination if we have more then one thread. */
4142 /* FIXME: This probably breaks if a signal arrives. We should probably
4143 be disabling signals. */
4144 if (first_cpu->next_cpu) {
1e9fa730 4145 TaskState *ts;
c2764719
PB
4146 CPUState **lastp;
4147 CPUState *p;
4148
4149 cpu_list_lock();
4150 lastp = &first_cpu;
4151 p = first_cpu;
4152 while (p && p != (CPUState *)cpu_env) {
4153 lastp = &p->next_cpu;
4154 p = p->next_cpu;
4155 }
4156 /* If we didn't find the CPU for this thread then something is
4157 horribly wrong. */
4158 if (!p)
4159 abort();
4160 /* Remove the CPU from the list. */
4161 *lastp = p->next_cpu;
4162 cpu_list_unlock();
1e9fa730 4163 ts = ((CPUState *)cpu_env)->opaque;
c2764719
PB
4164 if (ts->child_tidptr) {
4165 put_user_u32(0, ts->child_tidptr);
4166 sys_futex(g2h(ts->child_tidptr), FUTEX_WAKE, INT_MAX,
4167 NULL, NULL, 0);
4168 }
4169 /* TODO: Free CPU state. */
4170 pthread_exit(NULL);
4171 }
4172#endif
9788c9ca 4173#ifdef TARGET_GPROF
7d13299d
FB
4174 _mcleanup();
4175#endif
e9009676 4176 gdb_exit(cpu_env, arg1);
c2764719 4177 _exit(arg1);
31e31b8a
FB
4178 ret = 0; /* avoid warning */
4179 break;
4180 case TARGET_NR_read:
38d840e6
AJ
4181 if (arg3 == 0)
4182 ret = 0;
4183 else {
4184 if (!(p = lock_user(VERIFY_WRITE, arg2, arg3, 0)))
4185 goto efault;
4186 ret = get_errno(read(arg1, p, arg3));
4187 unlock_user(p, arg2, ret);
4188 }
31e31b8a
FB
4189 break;
4190 case TARGET_NR_write:
579a97f7
FB
4191 if (!(p = lock_user(VERIFY_READ, arg2, arg3, 1)))
4192 goto efault;
53a5960a
PB
4193 ret = get_errno(write(arg1, p, arg3));
4194 unlock_user(p, arg2, 0);
31e31b8a
FB
4195 break;
4196 case TARGET_NR_open:
2f619698
FB
4197 if (!(p = lock_user_string(arg1)))
4198 goto efault;
53a5960a 4199 ret = get_errno(open(path(p),
ffa65c3b
FB
4200 target_to_host_bitmask(arg2, fcntl_flags_tbl),
4201 arg3));
53a5960a 4202 unlock_user(p, arg1, 0);
31e31b8a 4203 break;
82424832
TS
4204#if defined(TARGET_NR_openat) && defined(__NR_openat)
4205 case TARGET_NR_openat:
579a97f7
FB
4206 if (!(p = lock_user_string(arg2)))
4207 goto efault;
4208 ret = get_errno(sys_openat(arg1,
4209 path(p),
4210 target_to_host_bitmask(arg3, fcntl_flags_tbl),
4211 arg4));
4212 unlock_user(p, arg2, 0);
82424832
TS
4213 break;
4214#endif
31e31b8a
FB
4215 case TARGET_NR_close:
4216 ret = get_errno(close(arg1));
4217 break;
4218 case TARGET_NR_brk:
53a5960a 4219 ret = do_brk(arg1);
31e31b8a
FB
4220 break;
4221 case TARGET_NR_fork:
d865bab5 4222 ret = get_errno(do_fork(cpu_env, SIGCHLD, 0, 0, 0, 0));
31e31b8a 4223 break;
e5febef5 4224#ifdef TARGET_NR_waitpid
31e31b8a
FB
4225 case TARGET_NR_waitpid:
4226 {
53a5960a
PB
4227 int status;
4228 ret = get_errno(waitpid(arg1, &status, arg3));
2f619698 4229 if (!is_error(ret) && arg2
1d9d8b55 4230 && put_user_s32(host_to_target_waitstatus(status), arg2))
2f619698 4231 goto efault;
31e31b8a
FB
4232 }
4233 break;
e5febef5 4234#endif
f0cbb613
PB
4235#ifdef TARGET_NR_waitid
4236 case TARGET_NR_waitid:
4237 {
4238 siginfo_t info;
4239 info.si_pid = 0;
4240 ret = get_errno(waitid(arg1, arg2, &info, arg4));
4241 if (!is_error(ret) && arg3 && info.si_pid != 0) {
4242 if (!(p = lock_user(VERIFY_WRITE, arg3, sizeof(target_siginfo_t), 0)))
4243 goto efault;
4244 host_to_target_siginfo(p, &info);
4245 unlock_user(p, arg3, sizeof(target_siginfo_t));
4246 }
4247 }
4248 break;
4249#endif
7a3148a9 4250#ifdef TARGET_NR_creat /* not on alpha */
31e31b8a 4251 case TARGET_NR_creat:
579a97f7
FB
4252 if (!(p = lock_user_string(arg1)))
4253 goto efault;
53a5960a
PB
4254 ret = get_errno(creat(p, arg2));
4255 unlock_user(p, arg1, 0);
31e31b8a 4256 break;
7a3148a9 4257#endif
31e31b8a 4258 case TARGET_NR_link:
53a5960a
PB
4259 {
4260 void * p2;
4261 p = lock_user_string(arg1);
4262 p2 = lock_user_string(arg2);
579a97f7
FB
4263 if (!p || !p2)
4264 ret = -TARGET_EFAULT;
4265 else
4266 ret = get_errno(link(p, p2));
53a5960a
PB
4267 unlock_user(p2, arg2, 0);
4268 unlock_user(p, arg1, 0);
4269 }
31e31b8a 4270 break;
64f0ce4c
TS
4271#if defined(TARGET_NR_linkat) && defined(__NR_linkat)
4272 case TARGET_NR_linkat:
64f0ce4c
TS
4273 {
4274 void * p2 = NULL;
579a97f7
FB
4275 if (!arg2 || !arg4)
4276 goto efault;
64f0ce4c
TS
4277 p = lock_user_string(arg2);
4278 p2 = lock_user_string(arg4);
579a97f7 4279 if (!p || !p2)
0da46a6e 4280 ret = -TARGET_EFAULT;
64f0ce4c
TS
4281 else
4282 ret = get_errno(sys_linkat(arg1, p, arg3, p2, arg5));
579a97f7
FB
4283 unlock_user(p, arg2, 0);
4284 unlock_user(p2, arg4, 0);
64f0ce4c
TS
4285 }
4286 break;
4287#endif
31e31b8a 4288 case TARGET_NR_unlink:
579a97f7
FB
4289 if (!(p = lock_user_string(arg1)))
4290 goto efault;
53a5960a
PB
4291 ret = get_errno(unlink(p));
4292 unlock_user(p, arg1, 0);
31e31b8a 4293 break;
8170f56b
TS
4294#if defined(TARGET_NR_unlinkat) && defined(__NR_unlinkat)
4295 case TARGET_NR_unlinkat:
579a97f7
FB
4296 if (!(p = lock_user_string(arg2)))
4297 goto efault;
4298 ret = get_errno(sys_unlinkat(arg1, p, arg3));
4299 unlock_user(p, arg2, 0);
ed494d87 4300 break;
b7d35e65 4301#endif
31e31b8a 4302 case TARGET_NR_execve:
7854b056
FB
4303 {
4304 char **argp, **envp;
f7341ff4 4305 int argc, envc;
992f48a0
BS
4306 abi_ulong gp;
4307 abi_ulong guest_argp;
4308 abi_ulong guest_envp;
4309 abi_ulong addr;
7854b056
FB
4310 char **q;
4311
f7341ff4 4312 argc = 0;
53a5960a 4313 guest_argp = arg2;
da94d263 4314 for (gp = guest_argp; gp; gp += sizeof(abi_ulong)) {
03aa1976 4315 if (get_user_ual(addr, gp))
2f619698 4316 goto efault;
03aa1976 4317 if (!addr)
2f619698 4318 break;
7854b056 4319 argc++;
2f619698 4320 }
f7341ff4 4321 envc = 0;
53a5960a 4322 guest_envp = arg3;
da94d263 4323 for (gp = guest_envp; gp; gp += sizeof(abi_ulong)) {
03aa1976 4324 if (get_user_ual(addr, gp))
2f619698 4325 goto efault;
03aa1976 4326 if (!addr)
2f619698 4327 break;
7854b056 4328 envc++;
2f619698 4329 }
7854b056 4330
f7341ff4
FB
4331 argp = alloca((argc + 1) * sizeof(void *));
4332 envp = alloca((envc + 1) * sizeof(void *));
7854b056 4333
da94d263 4334 for (gp = guest_argp, q = argp; gp;
992f48a0 4335 gp += sizeof(abi_ulong), q++) {
2f619698
FB
4336 if (get_user_ual(addr, gp))
4337 goto execve_efault;
53a5960a
PB
4338 if (!addr)
4339 break;
2f619698
FB
4340 if (!(*q = lock_user_string(addr)))
4341 goto execve_efault;
53a5960a 4342 }
f7341ff4
FB
4343 *q = NULL;
4344
da94d263 4345 for (gp = guest_envp, q = envp; gp;
992f48a0 4346 gp += sizeof(abi_ulong), q++) {
2f619698
FB
4347 if (get_user_ual(addr, gp))
4348 goto execve_efault;
53a5960a
PB
4349 if (!addr)
4350 break;
2f619698
FB
4351 if (!(*q = lock_user_string(addr)))
4352 goto execve_efault;
53a5960a 4353 }
f7341ff4 4354 *q = NULL;
7854b056 4355
2f619698
FB
4356 if (!(p = lock_user_string(arg1)))
4357 goto execve_efault;
53a5960a
PB
4358 ret = get_errno(execve(p, argp, envp));
4359 unlock_user(p, arg1, 0);
4360
2f619698
FB
4361 goto execve_end;
4362
4363 execve_efault:
4364 ret = -TARGET_EFAULT;
4365
4366 execve_end:
53a5960a 4367 for (gp = guest_argp, q = argp; *q;
992f48a0 4368 gp += sizeof(abi_ulong), q++) {
2f619698
FB
4369 if (get_user_ual(addr, gp)
4370 || !addr)
4371 break;
53a5960a
PB
4372 unlock_user(*q, addr, 0);
4373 }
4374 for (gp = guest_envp, q = envp; *q;
992f48a0 4375 gp += sizeof(abi_ulong), q++) {
2f619698
FB
4376 if (get_user_ual(addr, gp)
4377 || !addr)
4378 break;
53a5960a
PB
4379 unlock_user(*q, addr, 0);
4380 }
7854b056 4381 }
31e31b8a
FB
4382 break;
4383 case TARGET_NR_chdir:
579a97f7
FB
4384 if (!(p = lock_user_string(arg1)))
4385 goto efault;
53a5960a
PB
4386 ret = get_errno(chdir(p));
4387 unlock_user(p, arg1, 0);
31e31b8a 4388 break;
a315a145 4389#ifdef TARGET_NR_time
31e31b8a
FB
4390 case TARGET_NR_time:
4391 {
53a5960a
PB
4392 time_t host_time;
4393 ret = get_errno(time(&host_time));
2f619698
FB
4394 if (!is_error(ret)
4395 && arg1
4396 && put_user_sal(host_time, arg1))
4397 goto efault;
31e31b8a
FB
4398 }
4399 break;
a315a145 4400#endif
31e31b8a 4401 case TARGET_NR_mknod:
579a97f7
FB
4402 if (!(p = lock_user_string(arg1)))
4403 goto efault;
53a5960a
PB
4404 ret = get_errno(mknod(p, arg2, arg3));
4405 unlock_user(p, arg1, 0);
31e31b8a 4406 break;
75ac37a0
TS
4407#if defined(TARGET_NR_mknodat) && defined(__NR_mknodat)
4408 case TARGET_NR_mknodat:
579a97f7
FB
4409 if (!(p = lock_user_string(arg2)))
4410 goto efault;
4411 ret = get_errno(sys_mknodat(arg1, p, arg3, arg4));
4412 unlock_user(p, arg2, 0);
75ac37a0
TS
4413 break;
4414#endif
31e31b8a 4415 case TARGET_NR_chmod:
579a97f7
FB
4416 if (!(p = lock_user_string(arg1)))
4417 goto efault;
53a5960a
PB
4418 ret = get_errno(chmod(p, arg2));
4419 unlock_user(p, arg1, 0);
31e31b8a 4420 break;
ebc05488 4421#ifdef TARGET_NR_break
31e31b8a
FB
4422 case TARGET_NR_break:
4423 goto unimplemented;
ebc05488
FB
4424#endif
4425#ifdef TARGET_NR_oldstat
31e31b8a
FB
4426 case TARGET_NR_oldstat:
4427 goto unimplemented;
ebc05488 4428#endif
31e31b8a
FB
4429 case TARGET_NR_lseek:
4430 ret = get_errno(lseek(arg1, arg2, arg3));
4431 break;
7a3148a9
JM
4432#ifdef TARGET_NR_getxpid
4433 case TARGET_NR_getxpid:
4434#else
31e31b8a 4435 case TARGET_NR_getpid:
7a3148a9 4436#endif
31e31b8a
FB
4437 ret = get_errno(getpid());
4438 break;
4439 case TARGET_NR_mount:
80265918
TS
4440 {
4441 /* need to look at the data field */
4442 void *p2, *p3;
4443 p = lock_user_string(arg1);
4444 p2 = lock_user_string(arg2);
4445 p3 = lock_user_string(arg3);
579a97f7
FB
4446 if (!p || !p2 || !p3)
4447 ret = -TARGET_EFAULT;
4448 else
4449 /* FIXME - arg5 should be locked, but it isn't clear how to
4450 * do that since it's not guaranteed to be a NULL-terminated
4451 * string.
4452 */
4453 ret = get_errno(mount(p, p2, p3, (unsigned long)arg4, g2h(arg5)));
4454 unlock_user(p, arg1, 0);
4455 unlock_user(p2, arg2, 0);
4456 unlock_user(p3, arg3, 0);
80265918
TS
4457 break;
4458 }
e5febef5 4459#ifdef TARGET_NR_umount
31e31b8a 4460 case TARGET_NR_umount:
579a97f7
FB
4461 if (!(p = lock_user_string(arg1)))
4462 goto efault;
53a5960a
PB
4463 ret = get_errno(umount(p));
4464 unlock_user(p, arg1, 0);
31e31b8a 4465 break;
e5febef5 4466#endif
7a3148a9 4467#ifdef TARGET_NR_stime /* not on alpha */
31e31b8a
FB
4468 case TARGET_NR_stime:
4469 {
53a5960a 4470 time_t host_time;
2f619698
FB
4471 if (get_user_sal(host_time, arg1))
4472 goto efault;
53a5960a 4473 ret = get_errno(stime(&host_time));
31e31b8a
FB
4474 }
4475 break;
7a3148a9 4476#endif
31e31b8a
FB
4477 case TARGET_NR_ptrace:
4478 goto unimplemented;
7a3148a9 4479#ifdef TARGET_NR_alarm /* not on alpha */
31e31b8a
FB
4480 case TARGET_NR_alarm:
4481 ret = alarm(arg1);
4482 break;
7a3148a9 4483#endif
ebc05488 4484#ifdef TARGET_NR_oldfstat
31e31b8a
FB
4485 case TARGET_NR_oldfstat:
4486 goto unimplemented;
ebc05488 4487#endif
7a3148a9 4488#ifdef TARGET_NR_pause /* not on alpha */
31e31b8a
FB
4489 case TARGET_NR_pause:
4490 ret = get_errno(pause());
4491 break;
7a3148a9 4492#endif
e5febef5 4493#ifdef TARGET_NR_utime
31e31b8a 4494 case TARGET_NR_utime:
ebc05488 4495 {
53a5960a
PB
4496 struct utimbuf tbuf, *host_tbuf;
4497 struct target_utimbuf *target_tbuf;
4498 if (arg2) {
579a97f7
FB
4499 if (!lock_user_struct(VERIFY_READ, target_tbuf, arg2, 1))
4500 goto efault;
53a5960a
PB
4501 tbuf.actime = tswapl(target_tbuf->actime);
4502 tbuf.modtime = tswapl(target_tbuf->modtime);
4503 unlock_user_struct(target_tbuf, arg2, 0);
4504 host_tbuf = &tbuf;
f72e8ff4 4505 } else {
53a5960a 4506 host_tbuf = NULL;
f72e8ff4 4507 }
579a97f7
FB
4508 if (!(p = lock_user_string(arg1)))
4509 goto efault;
53a5960a
PB
4510 ret = get_errno(utime(p, host_tbuf));
4511 unlock_user(p, arg1, 0);
ebc05488
FB
4512 }
4513 break;
e5febef5 4514#endif
978a66ff
FB
4515 case TARGET_NR_utimes:
4516 {
978a66ff 4517 struct timeval *tvp, tv[2];
53a5960a 4518 if (arg2) {
788f5ec4
TS
4519 if (copy_from_user_timeval(&tv[0], arg2)
4520 || copy_from_user_timeval(&tv[1],
4521 arg2 + sizeof(struct target_timeval)))
4522 goto efault;
978a66ff
FB
4523 tvp = tv;
4524 } else {
4525 tvp = NULL;
4526 }
579a97f7
FB
4527 if (!(p = lock_user_string(arg1)))
4528 goto efault;
53a5960a
PB
4529 ret = get_errno(utimes(p, tvp));
4530 unlock_user(p, arg1, 0);
978a66ff
FB
4531 }
4532 break;
ac8a6556
AZ
4533#if defined(TARGET_NR_futimesat) && defined(__NR_futimesat)
4534 case TARGET_NR_futimesat:
4535 {
4536 struct timeval *tvp, tv[2];
4537 if (arg3) {
4538 if (copy_from_user_timeval(&tv[0], arg3)
4539 || copy_from_user_timeval(&tv[1],
4540 arg3 + sizeof(struct target_timeval)))
4541 goto efault;
4542 tvp = tv;
4543 } else {
4544 tvp = NULL;
4545 }
4546 if (!(p = lock_user_string(arg2)))
4547 goto efault;
4548 ret = get_errno(sys_futimesat(arg1, path(p), tvp));
4549 unlock_user(p, arg2, 0);
4550 }
4551 break;
4552#endif
ebc05488 4553#ifdef TARGET_NR_stty
31e31b8a
FB
4554 case TARGET_NR_stty:
4555 goto unimplemented;
ebc05488
FB
4556#endif
4557#ifdef TARGET_NR_gtty
31e31b8a
FB
4558 case TARGET_NR_gtty:
4559 goto unimplemented;
ebc05488 4560#endif
31e31b8a 4561 case TARGET_NR_access:
579a97f7
FB
4562 if (!(p = lock_user_string(arg1)))
4563 goto efault;
719f908e 4564 ret = get_errno(access(path(p), arg2));
53a5960a 4565 unlock_user(p, arg1, 0);
31e31b8a 4566 break;
92a34c10
TS
4567#if defined(TARGET_NR_faccessat) && defined(__NR_faccessat)
4568 case TARGET_NR_faccessat:
579a97f7
FB
4569 if (!(p = lock_user_string(arg2)))
4570 goto efault;
465c9f06 4571 ret = get_errno(sys_faccessat(arg1, p, arg3));
579a97f7 4572 unlock_user(p, arg2, 0);
92a34c10
TS
4573 break;
4574#endif
7a3148a9 4575#ifdef TARGET_NR_nice /* not on alpha */
31e31b8a
FB
4576 case TARGET_NR_nice:
4577 ret = get_errno(nice(arg1));
4578 break;
7a3148a9 4579#endif
ebc05488 4580#ifdef TARGET_NR_ftime
31e31b8a
FB
4581 case TARGET_NR_ftime:
4582 goto unimplemented;
ebc05488 4583#endif
31e31b8a 4584 case TARGET_NR_sync:
04369ff2
FB
4585 sync();
4586 ret = 0;
31e31b8a
FB
4587 break;
4588 case TARGET_NR_kill:
4cb05961 4589 ret = get_errno(kill(arg1, target_to_host_signal(arg2)));
31e31b8a
FB
4590 break;
4591 case TARGET_NR_rename:
53a5960a
PB
4592 {
4593 void *p2;
4594 p = lock_user_string(arg1);
4595 p2 = lock_user_string(arg2);
579a97f7
FB
4596 if (!p || !p2)
4597 ret = -TARGET_EFAULT;
4598 else
4599 ret = get_errno(rename(p, p2));
53a5960a
PB
4600 unlock_user(p2, arg2, 0);
4601 unlock_user(p, arg1, 0);
4602 }
31e31b8a 4603 break;
722183f6
TS
4604#if defined(TARGET_NR_renameat) && defined(__NR_renameat)
4605 case TARGET_NR_renameat:
722183f6 4606 {
579a97f7 4607 void *p2;
722183f6
TS
4608 p = lock_user_string(arg2);
4609 p2 = lock_user_string(arg4);
579a97f7 4610 if (!p || !p2)
0da46a6e 4611 ret = -TARGET_EFAULT;
722183f6
TS
4612 else
4613 ret = get_errno(sys_renameat(arg1, p, arg3, p2));
579a97f7
FB
4614 unlock_user(p2, arg4, 0);
4615 unlock_user(p, arg2, 0);
722183f6
TS
4616 }
4617 break;
4618#endif
31e31b8a 4619 case TARGET_NR_mkdir:
579a97f7
FB
4620 if (!(p = lock_user_string(arg1)))
4621 goto efault;
53a5960a
PB
4622 ret = get_errno(mkdir(p, arg2));
4623 unlock_user(p, arg1, 0);
31e31b8a 4624 break;
4472ad0d
TS
4625#if defined(TARGET_NR_mkdirat) && defined(__NR_mkdirat)
4626 case TARGET_NR_mkdirat:
579a97f7
FB
4627 if (!(p = lock_user_string(arg2)))
4628 goto efault;
4629 ret = get_errno(sys_mkdirat(arg1, p, arg3));
4630 unlock_user(p, arg2, 0);
4472ad0d
TS
4631 break;
4632#endif
31e31b8a 4633 case TARGET_NR_rmdir:
579a97f7
FB
4634 if (!(p = lock_user_string(arg1)))
4635 goto efault;
53a5960a
PB
4636 ret = get_errno(rmdir(p));
4637 unlock_user(p, arg1, 0);
31e31b8a
FB
4638 break;
4639 case TARGET_NR_dup:
4640 ret = get_errno(dup(arg1));
4641 break;
4642 case TARGET_NR_pipe:
099d6b0f
RV
4643 ret = do_pipe(cpu_env, arg1, 0);
4644 break;
4645#ifdef TARGET_NR_pipe2
4646 case TARGET_NR_pipe2:
4647 ret = do_pipe(cpu_env, arg1, arg2);
31e31b8a 4648 break;
099d6b0f 4649#endif
31e31b8a 4650 case TARGET_NR_times:
32f36bce 4651 {
53a5960a 4652 struct target_tms *tmsp;
32f36bce
FB
4653 struct tms tms;
4654 ret = get_errno(times(&tms));
53a5960a 4655 if (arg1) {
579a97f7
FB
4656 tmsp = lock_user(VERIFY_WRITE, arg1, sizeof(struct target_tms), 0);
4657 if (!tmsp)
4658 goto efault;
c596ed17
FB
4659 tmsp->tms_utime = tswapl(host_to_target_clock_t(tms.tms_utime));
4660 tmsp->tms_stime = tswapl(host_to_target_clock_t(tms.tms_stime));
4661 tmsp->tms_cutime = tswapl(host_to_target_clock_t(tms.tms_cutime));
4662 tmsp->tms_cstime = tswapl(host_to_target_clock_t(tms.tms_cstime));
32f36bce 4663 }
c596ed17
FB
4664 if (!is_error(ret))
4665 ret = host_to_target_clock_t(ret);
32f36bce
FB
4666 }
4667 break;
ebc05488 4668#ifdef TARGET_NR_prof
31e31b8a
FB
4669 case TARGET_NR_prof:
4670 goto unimplemented;
ebc05488 4671#endif
e5febef5 4672#ifdef TARGET_NR_signal
31e31b8a
FB
4673 case TARGET_NR_signal:
4674 goto unimplemented;
e5febef5 4675#endif
31e31b8a 4676 case TARGET_NR_acct:
38d840e6
AJ
4677 if (arg1 == 0) {
4678 ret = get_errno(acct(NULL));
4679 } else {
4680 if (!(p = lock_user_string(arg1)))
4681 goto efault;
4682 ret = get_errno(acct(path(p)));
4683 unlock_user(p, arg1, 0);
4684 }
24836689 4685 break;
7a3148a9 4686#ifdef TARGET_NR_umount2 /* not on alpha */
31e31b8a 4687 case TARGET_NR_umount2:
579a97f7
FB
4688 if (!(p = lock_user_string(arg1)))
4689 goto efault;
53a5960a
PB
4690 ret = get_errno(umount2(p, arg2));
4691 unlock_user(p, arg1, 0);
31e31b8a 4692 break;
7a3148a9 4693#endif
ebc05488 4694#ifdef TARGET_NR_lock
31e31b8a
FB
4695 case TARGET_NR_lock:
4696 goto unimplemented;
ebc05488 4697#endif
31e31b8a
FB
4698 case TARGET_NR_ioctl:
4699 ret = do_ioctl(arg1, arg2, arg3);
4700 break;
4701 case TARGET_NR_fcntl:
9ee1fa2c 4702 ret = do_fcntl(arg1, arg2, arg3);
31e31b8a 4703 break;
ebc05488 4704#ifdef TARGET_NR_mpx
31e31b8a
FB
4705 case TARGET_NR_mpx:
4706 goto unimplemented;
ebc05488 4707#endif
31e31b8a
FB
4708 case TARGET_NR_setpgid:
4709 ret = get_errno(setpgid(arg1, arg2));
4710 break;
ebc05488 4711#ifdef TARGET_NR_ulimit
31e31b8a
FB
4712 case TARGET_NR_ulimit:
4713 goto unimplemented;
ebc05488
FB
4714#endif
4715#ifdef TARGET_NR_oldolduname
31e31b8a
FB
4716 case TARGET_NR_oldolduname:
4717 goto unimplemented;
ebc05488 4718#endif
31e31b8a
FB
4719 case TARGET_NR_umask:
4720 ret = get_errno(umask(arg1));
4721 break;
4722 case TARGET_NR_chroot:
579a97f7
FB
4723 if (!(p = lock_user_string(arg1)))
4724 goto efault;
53a5960a
PB
4725 ret = get_errno(chroot(p));
4726 unlock_user(p, arg1, 0);
31e31b8a
FB
4727 break;
4728 case TARGET_NR_ustat:
4729 goto unimplemented;
4730 case TARGET_NR_dup2:
4731 ret = get_errno(dup2(arg1, arg2));
4732 break;
7a3148a9 4733#ifdef TARGET_NR_getppid /* not on alpha */
31e31b8a
FB
4734 case TARGET_NR_getppid:
4735 ret = get_errno(getppid());
4736 break;
7a3148a9 4737#endif
31e31b8a
FB
4738 case TARGET_NR_getpgrp:
4739 ret = get_errno(getpgrp());
4740 break;
4741 case TARGET_NR_setsid:
4742 ret = get_errno(setsid());
4743 break;
e5febef5 4744#ifdef TARGET_NR_sigaction
31e31b8a 4745 case TARGET_NR_sigaction:
31e31b8a 4746 {
388bb21a 4747#if !defined(TARGET_MIPS)
53a5960a 4748 struct target_old_sigaction *old_act;
66fb9763 4749 struct target_sigaction act, oact, *pact;
53a5960a 4750 if (arg2) {
579a97f7
FB
4751 if (!lock_user_struct(VERIFY_READ, old_act, arg2, 1))
4752 goto efault;
66fb9763
FB
4753 act._sa_handler = old_act->_sa_handler;
4754 target_siginitset(&act.sa_mask, old_act->sa_mask);
4755 act.sa_flags = old_act->sa_flags;
4756 act.sa_restorer = old_act->sa_restorer;
53a5960a 4757 unlock_user_struct(old_act, arg2, 0);
66fb9763
FB
4758 pact = &act;
4759 } else {
4760 pact = NULL;
4761 }
4762 ret = get_errno(do_sigaction(arg1, pact, &oact));
53a5960a 4763 if (!is_error(ret) && arg3) {
579a97f7
FB
4764 if (!lock_user_struct(VERIFY_WRITE, old_act, arg3, 0))
4765 goto efault;
53a5960a
PB
4766 old_act->_sa_handler = oact._sa_handler;
4767 old_act->sa_mask = oact.sa_mask.sig[0];
4768 old_act->sa_flags = oact.sa_flags;
4769 old_act->sa_restorer = oact.sa_restorer;
4770 unlock_user_struct(old_act, arg3, 1);
66fb9763 4771 }
388bb21a 4772#else
106ec879
FB
4773 struct target_sigaction act, oact, *pact, *old_act;
4774
4775 if (arg2) {
579a97f7
FB
4776 if (!lock_user_struct(VERIFY_READ, old_act, arg2, 1))
4777 goto efault;
106ec879
FB
4778 act._sa_handler = old_act->_sa_handler;
4779 target_siginitset(&act.sa_mask, old_act->sa_mask.sig[0]);
4780 act.sa_flags = old_act->sa_flags;
4781 unlock_user_struct(old_act, arg2, 0);
4782 pact = &act;
4783 } else {
4784 pact = NULL;
4785 }
4786
4787 ret = get_errno(do_sigaction(arg1, pact, &oact));
4788
4789 if (!is_error(ret) && arg3) {
579a97f7
FB
4790 if (!lock_user_struct(VERIFY_WRITE, old_act, arg3, 0))
4791 goto efault;
106ec879
FB
4792 old_act->_sa_handler = oact._sa_handler;
4793 old_act->sa_flags = oact.sa_flags;
4794 old_act->sa_mask.sig[0] = oact.sa_mask.sig[0];
4795 old_act->sa_mask.sig[1] = 0;
4796 old_act->sa_mask.sig[2] = 0;
4797 old_act->sa_mask.sig[3] = 0;
4798 unlock_user_struct(old_act, arg3, 1);
4799 }
388bb21a 4800#endif
31e31b8a
FB
4801 }
4802 break;
e5febef5 4803#endif
66fb9763 4804 case TARGET_NR_rt_sigaction:
53a5960a
PB
4805 {
4806 struct target_sigaction *act;
4807 struct target_sigaction *oact;
4808
579a97f7
FB
4809 if (arg2) {
4810 if (!lock_user_struct(VERIFY_READ, act, arg2, 1))
4811 goto efault;
4812 } else
53a5960a 4813 act = NULL;
579a97f7
FB
4814 if (arg3) {
4815 if (!lock_user_struct(VERIFY_WRITE, oact, arg3, 0)) {
4816 ret = -TARGET_EFAULT;
4817 goto rt_sigaction_fail;
4818 }
4819 } else
53a5960a
PB
4820 oact = NULL;
4821 ret = get_errno(do_sigaction(arg1, act, oact));
579a97f7
FB
4822 rt_sigaction_fail:
4823 if (act)
53a5960a 4824 unlock_user_struct(act, arg2, 0);
579a97f7 4825 if (oact)
53a5960a
PB
4826 unlock_user_struct(oact, arg3, 1);
4827 }
66fb9763 4828 break;
7a3148a9 4829#ifdef TARGET_NR_sgetmask /* not on alpha */
31e31b8a 4830 case TARGET_NR_sgetmask:
66fb9763
FB
4831 {
4832 sigset_t cur_set;
992f48a0 4833 abi_ulong target_set;
66fb9763
FB
4834 sigprocmask(0, NULL, &cur_set);
4835 host_to_target_old_sigset(&target_set, &cur_set);
4836 ret = target_set;
4837 }
4838 break;
7a3148a9
JM
4839#endif
4840#ifdef TARGET_NR_ssetmask /* not on alpha */
31e31b8a 4841 case TARGET_NR_ssetmask:
66fb9763
FB
4842 {
4843 sigset_t set, oset, cur_set;
992f48a0 4844 abi_ulong target_set = arg1;
66fb9763
FB
4845 sigprocmask(0, NULL, &cur_set);
4846 target_to_host_old_sigset(&set, &target_set);
4847 sigorset(&set, &set, &cur_set);
4848 sigprocmask(SIG_SETMASK, &set, &oset);
4849 host_to_target_old_sigset(&target_set, &oset);
4850 ret = target_set;
4851 }
4852 break;
7a3148a9 4853#endif
e5febef5 4854#ifdef TARGET_NR_sigprocmask
66fb9763
FB
4855 case TARGET_NR_sigprocmask:
4856 {
4857 int how = arg1;
4858 sigset_t set, oldset, *set_ptr;
3b46e624 4859
53a5960a 4860 if (arg2) {
66fb9763
FB
4861 switch(how) {
4862 case TARGET_SIG_BLOCK:
4863 how = SIG_BLOCK;
4864 break;
4865 case TARGET_SIG_UNBLOCK:
4866 how = SIG_UNBLOCK;
4867 break;
4868 case TARGET_SIG_SETMASK:
4869 how = SIG_SETMASK;
4870 break;
4871 default:
0da46a6e 4872 ret = -TARGET_EINVAL;
66fb9763
FB
4873 goto fail;
4874 }
579a97f7
FB
4875 if (!(p = lock_user(VERIFY_READ, arg2, sizeof(target_sigset_t), 1)))
4876 goto efault;
53a5960a
PB
4877 target_to_host_old_sigset(&set, p);
4878 unlock_user(p, arg2, 0);
66fb9763
FB
4879 set_ptr = &set;
4880 } else {
4881 how = 0;
4882 set_ptr = NULL;
4883 }
4884 ret = get_errno(sigprocmask(arg1, set_ptr, &oldset));
53a5960a 4885 if (!is_error(ret) && arg3) {
579a97f7
FB
4886 if (!(p = lock_user(VERIFY_WRITE, arg3, sizeof(target_sigset_t), 0)))
4887 goto efault;
53a5960a
PB
4888 host_to_target_old_sigset(p, &oldset);
4889 unlock_user(p, arg3, sizeof(target_sigset_t));
66fb9763
FB
4890 }
4891 }
4892 break;
e5febef5 4893#endif
66fb9763
FB
4894 case TARGET_NR_rt_sigprocmask:
4895 {
4896 int how = arg1;
4897 sigset_t set, oldset, *set_ptr;
3b46e624 4898
53a5960a 4899 if (arg2) {
66fb9763
FB
4900 switch(how) {
4901 case TARGET_SIG_BLOCK:
4902 how = SIG_BLOCK;
4903 break;
4904 case TARGET_SIG_UNBLOCK:
4905 how = SIG_UNBLOCK;
4906 break;
4907 case TARGET_SIG_SETMASK:
4908 how = SIG_SETMASK;
4909 break;
4910 default:
0da46a6e 4911 ret = -TARGET_EINVAL;
66fb9763
FB
4912 goto fail;
4913 }
579a97f7
FB
4914 if (!(p = lock_user(VERIFY_READ, arg2, sizeof(target_sigset_t), 1)))
4915 goto efault;
53a5960a
PB
4916 target_to_host_sigset(&set, p);
4917 unlock_user(p, arg2, 0);
66fb9763
FB
4918 set_ptr = &set;
4919 } else {
4920 how = 0;
4921 set_ptr = NULL;
4922 }
4923 ret = get_errno(sigprocmask(how, set_ptr, &oldset));
53a5960a 4924 if (!is_error(ret) && arg3) {
579a97f7
FB
4925 if (!(p = lock_user(VERIFY_WRITE, arg3, sizeof(target_sigset_t), 0)))
4926 goto efault;
53a5960a
PB
4927 host_to_target_sigset(p, &oldset);
4928 unlock_user(p, arg3, sizeof(target_sigset_t));
66fb9763
FB
4929 }
4930 }
4931 break;
e5febef5 4932#ifdef TARGET_NR_sigpending
66fb9763
FB
4933 case TARGET_NR_sigpending:
4934 {
4935 sigset_t set;
4936 ret = get_errno(sigpending(&set));
4937 if (!is_error(ret)) {
579a97f7
FB
4938 if (!(p = lock_user(VERIFY_WRITE, arg1, sizeof(target_sigset_t), 0)))
4939 goto efault;
53a5960a
PB
4940 host_to_target_old_sigset(p, &set);
4941 unlock_user(p, arg1, sizeof(target_sigset_t));
66fb9763
FB
4942 }
4943 }
4944 break;
e5febef5 4945#endif
66fb9763
FB
4946 case TARGET_NR_rt_sigpending:
4947 {
4948 sigset_t set;
4949 ret = get_errno(sigpending(&set));
4950 if (!is_error(ret)) {
579a97f7
FB
4951 if (!(p = lock_user(VERIFY_WRITE, arg1, sizeof(target_sigset_t), 0)))
4952 goto efault;
53a5960a
PB
4953 host_to_target_sigset(p, &set);
4954 unlock_user(p, arg1, sizeof(target_sigset_t));
66fb9763
FB
4955 }
4956 }
4957 break;
e5febef5 4958#ifdef TARGET_NR_sigsuspend
66fb9763
FB
4959 case TARGET_NR_sigsuspend:
4960 {
4961 sigset_t set;
579a97f7
FB
4962 if (!(p = lock_user(VERIFY_READ, arg1, sizeof(target_sigset_t), 1)))
4963 goto efault;
53a5960a
PB
4964 target_to_host_old_sigset(&set, p);
4965 unlock_user(p, arg1, 0);
66fb9763
FB
4966 ret = get_errno(sigsuspend(&set));
4967 }
4968 break;
e5febef5 4969#endif
66fb9763
FB
4970 case TARGET_NR_rt_sigsuspend:
4971 {
4972 sigset_t set;
579a97f7
FB
4973 if (!(p = lock_user(VERIFY_READ, arg1, sizeof(target_sigset_t), 1)))
4974 goto efault;
53a5960a
PB
4975 target_to_host_sigset(&set, p);
4976 unlock_user(p, arg1, 0);
66fb9763
FB
4977 ret = get_errno(sigsuspend(&set));
4978 }
4979 break;
4980 case TARGET_NR_rt_sigtimedwait:
4981 {
66fb9763
FB
4982 sigset_t set;
4983 struct timespec uts, *puts;
4984 siginfo_t uinfo;
3b46e624 4985
579a97f7
FB
4986 if (!(p = lock_user(VERIFY_READ, arg1, sizeof(target_sigset_t), 1)))
4987 goto efault;
53a5960a
PB
4988 target_to_host_sigset(&set, p);
4989 unlock_user(p, arg1, 0);
4990 if (arg3) {
66fb9763 4991 puts = &uts;
53a5960a 4992 target_to_host_timespec(puts, arg3);
66fb9763
FB
4993 } else {
4994 puts = NULL;
4995 }
4996 ret = get_errno(sigtimedwait(&set, &uinfo, puts));
53a5960a 4997 if (!is_error(ret) && arg2) {
e1e3f30b 4998 if (!(p = lock_user(VERIFY_WRITE, arg2, sizeof(target_siginfo_t), 0)))
579a97f7 4999 goto efault;
53a5960a 5000 host_to_target_siginfo(p, &uinfo);
e1e3f30b 5001 unlock_user(p, arg2, sizeof(target_siginfo_t));
66fb9763
FB
5002 }
5003 }
5004 break;
5005 case TARGET_NR_rt_sigqueueinfo:
5006 {
5007 siginfo_t uinfo;
579a97f7
FB
5008 if (!(p = lock_user(VERIFY_READ, arg3, sizeof(target_sigset_t), 1)))
5009 goto efault;
53a5960a
PB
5010 target_to_host_siginfo(&uinfo, p);
5011 unlock_user(p, arg1, 0);
66fb9763
FB
5012 ret = get_errno(sys_rt_sigqueueinfo(arg1, arg2, &uinfo));
5013 }
5014 break;
e5febef5 5015#ifdef TARGET_NR_sigreturn
66fb9763
FB
5016 case TARGET_NR_sigreturn:
5017 /* NOTE: ret is eax, so not transcoding must be done */
5018 ret = do_sigreturn(cpu_env);
5019 break;
e5febef5 5020#endif
66fb9763
FB
5021 case TARGET_NR_rt_sigreturn:
5022 /* NOTE: ret is eax, so not transcoding must be done */
5023 ret = do_rt_sigreturn(cpu_env);
5024 break;
31e31b8a 5025 case TARGET_NR_sethostname:
579a97f7
FB
5026 if (!(p = lock_user_string(arg1)))
5027 goto efault;
53a5960a
PB
5028 ret = get_errno(sethostname(p, arg2));
5029 unlock_user(p, arg1, 0);
31e31b8a
FB
5030 break;
5031 case TARGET_NR_setrlimit:
9de5e440
FB
5032 {
5033 /* XXX: convert resource ? */
5034 int resource = arg1;
53a5960a 5035 struct target_rlimit *target_rlim;
9de5e440 5036 struct rlimit rlim;
579a97f7
FB
5037 if (!lock_user_struct(VERIFY_READ, target_rlim, arg2, 1))
5038 goto efault;
9de5e440
FB
5039 rlim.rlim_cur = tswapl(target_rlim->rlim_cur);
5040 rlim.rlim_max = tswapl(target_rlim->rlim_max);
53a5960a 5041 unlock_user_struct(target_rlim, arg2, 0);
9de5e440
FB
5042 ret = get_errno(setrlimit(resource, &rlim));
5043 }
5044 break;
31e31b8a 5045 case TARGET_NR_getrlimit:
9de5e440
FB
5046 {
5047 /* XXX: convert resource ? */
5048 int resource = arg1;
53a5960a 5049 struct target_rlimit *target_rlim;
9de5e440 5050 struct rlimit rlim;
3b46e624 5051
9de5e440
FB
5052 ret = get_errno(getrlimit(resource, &rlim));
5053 if (!is_error(ret)) {
579a97f7
FB
5054 if (!lock_user_struct(VERIFY_WRITE, target_rlim, arg2, 0))
5055 goto efault;
666bcd91
UH
5056 target_rlim->rlim_cur = tswapl(rlim.rlim_cur);
5057 target_rlim->rlim_max = tswapl(rlim.rlim_max);
53a5960a 5058 unlock_user_struct(target_rlim, arg2, 1);
9de5e440
FB
5059 }
5060 }
5061 break;
31e31b8a 5062 case TARGET_NR_getrusage:
b409186b
FB
5063 {
5064 struct rusage rusage;
b409186b
FB
5065 ret = get_errno(getrusage(arg1, &rusage));
5066 if (!is_error(ret)) {
53a5960a 5067 host_to_target_rusage(arg2, &rusage);
b409186b
FB
5068 }
5069 }
5070 break;
31e31b8a
FB
5071 case TARGET_NR_gettimeofday:
5072 {
31e31b8a
FB
5073 struct timeval tv;
5074 ret = get_errno(gettimeofday(&tv, NULL));
5075 if (!is_error(ret)) {
788f5ec4
TS
5076 if (copy_to_user_timeval(arg1, &tv))
5077 goto efault;
31e31b8a
FB
5078 }
5079 }
5080 break;
5081 case TARGET_NR_settimeofday:
5082 {
31e31b8a 5083 struct timeval tv;
788f5ec4
TS
5084 if (copy_from_user_timeval(&tv, arg1))
5085 goto efault;
31e31b8a
FB
5086 ret = get_errno(settimeofday(&tv, NULL));
5087 }
5088 break;
048f6b4d 5089#ifdef TARGET_NR_select
31e31b8a 5090 case TARGET_NR_select:
f2674e31 5091 {
53a5960a 5092 struct target_sel_arg_struct *sel;
992f48a0 5093 abi_ulong inp, outp, exp, tvp;
53a5960a
PB
5094 long nsel;
5095
579a97f7
FB
5096 if (!lock_user_struct(VERIFY_READ, sel, arg1, 1))
5097 goto efault;
53a5960a
PB
5098 nsel = tswapl(sel->n);
5099 inp = tswapl(sel->inp);
5100 outp = tswapl(sel->outp);
5101 exp = tswapl(sel->exp);
5102 tvp = tswapl(sel->tvp);
5103 unlock_user_struct(sel, arg1, 0);
5104 ret = do_select(nsel, inp, outp, exp, tvp);
f2674e31
FB
5105 }
5106 break;
048f6b4d 5107#endif
31e31b8a 5108 case TARGET_NR_symlink:
53a5960a
PB
5109 {
5110 void *p2;
5111 p = lock_user_string(arg1);
5112 p2 = lock_user_string(arg2);
579a97f7
FB
5113 if (!p || !p2)
5114 ret = -TARGET_EFAULT;
5115 else
5116 ret = get_errno(symlink(p, p2));
53a5960a
PB
5117 unlock_user(p2, arg2, 0);
5118 unlock_user(p, arg1, 0);
5119 }
31e31b8a 5120 break;
f0b6243d
TS
5121#if defined(TARGET_NR_symlinkat) && defined(__NR_symlinkat)
5122 case TARGET_NR_symlinkat:
f0b6243d 5123 {
579a97f7 5124 void *p2;
f0b6243d
TS
5125 p = lock_user_string(arg1);
5126 p2 = lock_user_string(arg3);
579a97f7 5127 if (!p || !p2)
0da46a6e 5128 ret = -TARGET_EFAULT;
f0b6243d
TS
5129 else
5130 ret = get_errno(sys_symlinkat(p, arg2, p2));
579a97f7
FB
5131 unlock_user(p2, arg3, 0);
5132 unlock_user(p, arg1, 0);
f0b6243d
TS
5133 }
5134 break;
5135#endif
ebc05488 5136#ifdef TARGET_NR_oldlstat
31e31b8a
FB
5137 case TARGET_NR_oldlstat:
5138 goto unimplemented;
ebc05488 5139#endif
31e31b8a 5140 case TARGET_NR_readlink:
53a5960a 5141 {
d088d664 5142 void *p2, *temp;
53a5960a 5143 p = lock_user_string(arg1);
579a97f7
FB
5144 p2 = lock_user(VERIFY_WRITE, arg2, arg3, 0);
5145 if (!p || !p2)
5146 ret = -TARGET_EFAULT;
d088d664
AJ
5147 else {
5148 if (strncmp((const char *)p, "/proc/self/exe", 14) == 0) {
5149 char real[PATH_MAX];
5150 temp = realpath(exec_path,real);
5151 ret = (temp==NULL) ? get_errno(-1) : strlen(real) ;
5152 snprintf((char *)p2, arg3, "%s", real);
5153 }
5154 else
5155 ret = get_errno(readlink(path(p), p2, arg3));
d088d664 5156 }
53a5960a
PB
5157 unlock_user(p2, arg2, ret);
5158 unlock_user(p, arg1, 0);
5159 }
31e31b8a 5160 break;
5e0ccb18
TS
5161#if defined(TARGET_NR_readlinkat) && defined(__NR_readlinkat)
5162 case TARGET_NR_readlinkat:
5e0ccb18 5163 {
579a97f7 5164 void *p2;
5e0ccb18 5165 p = lock_user_string(arg2);
579a97f7
FB
5166 p2 = lock_user(VERIFY_WRITE, arg3, arg4, 0);
5167 if (!p || !p2)
0da46a6e 5168 ret = -TARGET_EFAULT;
5e0ccb18
TS
5169 else
5170 ret = get_errno(sys_readlinkat(arg1, path(p), p2, arg4));
579a97f7
FB
5171 unlock_user(p2, arg3, ret);
5172 unlock_user(p, arg2, 0);
5e0ccb18
TS
5173 }
5174 break;
5175#endif
e5febef5 5176#ifdef TARGET_NR_uselib
31e31b8a
FB
5177 case TARGET_NR_uselib:
5178 goto unimplemented;
e5febef5
TS
5179#endif
5180#ifdef TARGET_NR_swapon
31e31b8a 5181 case TARGET_NR_swapon:
579a97f7
FB
5182 if (!(p = lock_user_string(arg1)))
5183 goto efault;
53a5960a
PB
5184 ret = get_errno(swapon(p, arg2));
5185 unlock_user(p, arg1, 0);
31e31b8a 5186 break;
e5febef5 5187#endif
31e31b8a
FB
5188 case TARGET_NR_reboot:
5189 goto unimplemented;
e5febef5 5190#ifdef TARGET_NR_readdir
31e31b8a
FB
5191 case TARGET_NR_readdir:
5192 goto unimplemented;
e5febef5
TS
5193#endif
5194#ifdef TARGET_NR_mmap
31e31b8a 5195 case TARGET_NR_mmap:
b779e29e 5196#if (defined(TARGET_I386) && defined(TARGET_ABI32)) || defined(TARGET_ARM) || defined(TARGET_M68K) || defined(TARGET_CRIS) || defined(TARGET_MICROBLAZE)
31e31b8a 5197 {
992f48a0
BS
5198 abi_ulong *v;
5199 abi_ulong v1, v2, v3, v4, v5, v6;
579a97f7
FB
5200 if (!(v = lock_user(VERIFY_READ, arg1, 6 * sizeof(abi_ulong), 1)))
5201 goto efault;
53a5960a
PB
5202 v1 = tswapl(v[0]);
5203 v2 = tswapl(v[1]);
5204 v3 = tswapl(v[2]);
5205 v4 = tswapl(v[3]);
5206 v5 = tswapl(v[4]);
5207 v6 = tswapl(v[5]);
5208 unlock_user(v, arg1, 0);
5fafdf24 5209 ret = get_errno(target_mmap(v1, v2, v3,
5286db75
FB
5210 target_to_host_bitmask(v4, mmap_flags_tbl),
5211 v5, v6));
31e31b8a 5212 }
31e31b8a 5213#else
5fafdf24
TS
5214 ret = get_errno(target_mmap(arg1, arg2, arg3,
5215 target_to_host_bitmask(arg4, mmap_flags_tbl),
6fb883e8
FB
5216 arg5,
5217 arg6));
31e31b8a 5218#endif
6fb883e8 5219 break;
e5febef5 5220#endif
a315a145 5221#ifdef TARGET_NR_mmap2
6fb883e8 5222 case TARGET_NR_mmap2:
bb7ec043 5223#ifndef MMAP_SHIFT
c573ff67 5224#define MMAP_SHIFT 12
c573ff67 5225#endif
5fafdf24
TS
5226 ret = get_errno(target_mmap(arg1, arg2, arg3,
5227 target_to_host_bitmask(arg4, mmap_flags_tbl),
5286db75 5228 arg5,
c573ff67 5229 arg6 << MMAP_SHIFT));
31e31b8a 5230 break;
a315a145 5231#endif
31e31b8a 5232 case TARGET_NR_munmap:
54936004 5233 ret = get_errno(target_munmap(arg1, arg2));
31e31b8a 5234 break;
9de5e440 5235 case TARGET_NR_mprotect:
54936004 5236 ret = get_errno(target_mprotect(arg1, arg2, arg3));
9de5e440 5237 break;
e5febef5 5238#ifdef TARGET_NR_mremap
9de5e440 5239 case TARGET_NR_mremap:
54936004 5240 ret = get_errno(target_mremap(arg1, arg2, arg3, arg4, arg5));
9de5e440 5241 break;
e5febef5 5242#endif
53a5960a 5243 /* ??? msync/mlock/munlock are broken for softmmu. */
e5febef5 5244#ifdef TARGET_NR_msync
9de5e440 5245 case TARGET_NR_msync:
53a5960a 5246 ret = get_errno(msync(g2h(arg1), arg2, arg3));
9de5e440 5247 break;
e5febef5
TS
5248#endif
5249#ifdef TARGET_NR_mlock
9de5e440 5250 case TARGET_NR_mlock:
53a5960a 5251 ret = get_errno(mlock(g2h(arg1), arg2));
9de5e440 5252 break;
e5febef5
TS
5253#endif
5254#ifdef TARGET_NR_munlock
9de5e440 5255 case TARGET_NR_munlock:
53a5960a 5256 ret = get_errno(munlock(g2h(arg1), arg2));
9de5e440 5257 break;
e5febef5
TS
5258#endif
5259#ifdef TARGET_NR_mlockall
9de5e440
FB
5260 case TARGET_NR_mlockall:
5261 ret = get_errno(mlockall(arg1));
5262 break;
e5febef5
TS
5263#endif
5264#ifdef TARGET_NR_munlockall
9de5e440
FB
5265 case TARGET_NR_munlockall:
5266 ret = get_errno(munlockall());
5267 break;
e5febef5 5268#endif
31e31b8a 5269 case TARGET_NR_truncate:
579a97f7
FB
5270 if (!(p = lock_user_string(arg1)))
5271 goto efault;
53a5960a
PB
5272 ret = get_errno(truncate(p, arg2));
5273 unlock_user(p, arg1, 0);
31e31b8a
FB
5274 break;
5275 case TARGET_NR_ftruncate:
5276 ret = get_errno(ftruncate(arg1, arg2));
5277 break;
5278 case TARGET_NR_fchmod:
5279 ret = get_errno(fchmod(arg1, arg2));
5280 break;
814d7977
TS
5281#if defined(TARGET_NR_fchmodat) && defined(__NR_fchmodat)
5282 case TARGET_NR_fchmodat:
579a97f7
FB
5283 if (!(p = lock_user_string(arg2)))
5284 goto efault;
465c9f06 5285 ret = get_errno(sys_fchmodat(arg1, p, arg3));
579a97f7 5286 unlock_user(p, arg2, 0);
814d7977
TS
5287 break;
5288#endif
31e31b8a 5289 case TARGET_NR_getpriority:
c6cda17a
TS
5290 /* libc does special remapping of the return value of
5291 * sys_getpriority() so it's just easiest to call
5292 * sys_getpriority() directly rather than through libc. */
5293 ret = sys_getpriority(arg1, arg2);
31e31b8a
FB
5294 break;
5295 case TARGET_NR_setpriority:
5296 ret = get_errno(setpriority(arg1, arg2, arg3));
5297 break;
ebc05488 5298#ifdef TARGET_NR_profil
31e31b8a
FB
5299 case TARGET_NR_profil:
5300 goto unimplemented;
ebc05488 5301#endif
31e31b8a 5302 case TARGET_NR_statfs:
579a97f7
FB
5303 if (!(p = lock_user_string(arg1)))
5304 goto efault;
53a5960a
PB
5305 ret = get_errno(statfs(path(p), &stfs));
5306 unlock_user(p, arg1, 0);
31e31b8a
FB
5307 convert_statfs:
5308 if (!is_error(ret)) {
53a5960a 5309 struct target_statfs *target_stfs;
3b46e624 5310
579a97f7
FB
5311 if (!lock_user_struct(VERIFY_WRITE, target_stfs, arg2, 0))
5312 goto efault;
5313 __put_user(stfs.f_type, &target_stfs->f_type);
5314 __put_user(stfs.f_bsize, &target_stfs->f_bsize);
5315 __put_user(stfs.f_blocks, &target_stfs->f_blocks);
5316 __put_user(stfs.f_bfree, &target_stfs->f_bfree);
5317 __put_user(stfs.f_bavail, &target_stfs->f_bavail);
5318 __put_user(stfs.f_files, &target_stfs->f_files);
5319 __put_user(stfs.f_ffree, &target_stfs->f_ffree);
5320 __put_user(stfs.f_fsid.__val[0], &target_stfs->f_fsid.val[0]);
5321 __put_user(stfs.f_fsid.__val[1], &target_stfs->f_fsid.val[1]);
5322 __put_user(stfs.f_namelen, &target_stfs->f_namelen);
53a5960a 5323 unlock_user_struct(target_stfs, arg2, 1);
31e31b8a
FB
5324 }
5325 break;
5326 case TARGET_NR_fstatfs:
56c8f68f 5327 ret = get_errno(fstatfs(arg1, &stfs));
31e31b8a 5328 goto convert_statfs;
56c8f68f
FB
5329#ifdef TARGET_NR_statfs64
5330 case TARGET_NR_statfs64:
579a97f7
FB
5331 if (!(p = lock_user_string(arg1)))
5332 goto efault;
53a5960a
PB
5333 ret = get_errno(statfs(path(p), &stfs));
5334 unlock_user(p, arg1, 0);
56c8f68f
FB
5335 convert_statfs64:
5336 if (!is_error(ret)) {
53a5960a 5337 struct target_statfs64 *target_stfs;
3b46e624 5338
579a97f7
FB
5339 if (!lock_user_struct(VERIFY_WRITE, target_stfs, arg3, 0))
5340 goto efault;
5341 __put_user(stfs.f_type, &target_stfs->f_type);
5342 __put_user(stfs.f_bsize, &target_stfs->f_bsize);
5343 __put_user(stfs.f_blocks, &target_stfs->f_blocks);
5344 __put_user(stfs.f_bfree, &target_stfs->f_bfree);
5345 __put_user(stfs.f_bavail, &target_stfs->f_bavail);
5346 __put_user(stfs.f_files, &target_stfs->f_files);
5347 __put_user(stfs.f_ffree, &target_stfs->f_ffree);
5348 __put_user(stfs.f_fsid.__val[0], &target_stfs->f_fsid.val[0]);
5349 __put_user(stfs.f_fsid.__val[1], &target_stfs->f_fsid.val[1]);
5350 __put_user(stfs.f_namelen, &target_stfs->f_namelen);
5351 unlock_user_struct(target_stfs, arg3, 1);
56c8f68f
FB
5352 }
5353 break;
5354 case TARGET_NR_fstatfs64:
5355 ret = get_errno(fstatfs(arg1, &stfs));
5356 goto convert_statfs64;
5357#endif
ebc05488 5358#ifdef TARGET_NR_ioperm
31e31b8a
FB
5359 case TARGET_NR_ioperm:
5360 goto unimplemented;
ebc05488 5361#endif
e5febef5 5362#ifdef TARGET_NR_socketcall
31e31b8a 5363 case TARGET_NR_socketcall:
53a5960a 5364 ret = do_socketcall(arg1, arg2);
31e31b8a 5365 break;
e5febef5 5366#endif
3532fa74
FB
5367#ifdef TARGET_NR_accept
5368 case TARGET_NR_accept:
1be9e1dc 5369 ret = do_accept(arg1, arg2, arg3);
3532fa74
FB
5370 break;
5371#endif
5372#ifdef TARGET_NR_bind
5373 case TARGET_NR_bind:
5374 ret = do_bind(arg1, arg2, arg3);
5375 break;
5376#endif
5377#ifdef TARGET_NR_connect
5378 case TARGET_NR_connect:
5379 ret = do_connect(arg1, arg2, arg3);
5380 break;
5381#endif
5382#ifdef TARGET_NR_getpeername
5383 case TARGET_NR_getpeername:
1be9e1dc 5384 ret = do_getpeername(arg1, arg2, arg3);
3532fa74
FB
5385 break;
5386#endif
5387#ifdef TARGET_NR_getsockname
5388 case TARGET_NR_getsockname:
1be9e1dc 5389 ret = do_getsockname(arg1, arg2, arg3);
3532fa74
FB
5390 break;
5391#endif
5392#ifdef TARGET_NR_getsockopt
5393 case TARGET_NR_getsockopt:
5394 ret = do_getsockopt(arg1, arg2, arg3, arg4, arg5);
5395 break;
5396#endif
5397#ifdef TARGET_NR_listen
5398 case TARGET_NR_listen:
1be9e1dc 5399 ret = get_errno(listen(arg1, arg2));
3532fa74
FB
5400 break;
5401#endif
5402#ifdef TARGET_NR_recv
5403 case TARGET_NR_recv:
214201bd 5404 ret = do_recvfrom(arg1, arg2, arg3, arg4, 0, 0);
3532fa74
FB
5405 break;
5406#endif
5407#ifdef TARGET_NR_recvfrom
5408 case TARGET_NR_recvfrom:
214201bd 5409 ret = do_recvfrom(arg1, arg2, arg3, arg4, arg5, arg6);
3532fa74
FB
5410 break;
5411#endif
5412#ifdef TARGET_NR_recvmsg
5413 case TARGET_NR_recvmsg:
5414 ret = do_sendrecvmsg(arg1, arg2, arg3, 0);
5415 break;
5416#endif
5417#ifdef TARGET_NR_send
5418 case TARGET_NR_send:
1be9e1dc 5419 ret = do_sendto(arg1, arg2, arg3, arg4, 0, 0);
3532fa74
FB
5420 break;
5421#endif
5422#ifdef TARGET_NR_sendmsg
5423 case TARGET_NR_sendmsg:
5424 ret = do_sendrecvmsg(arg1, arg2, arg3, 1);
5425 break;
5426#endif
5427#ifdef TARGET_NR_sendto
5428 case TARGET_NR_sendto:
1be9e1dc 5429 ret = do_sendto(arg1, arg2, arg3, arg4, arg5, arg6);
3532fa74
FB
5430 break;
5431#endif
5432#ifdef TARGET_NR_shutdown
5433 case TARGET_NR_shutdown:
1be9e1dc 5434 ret = get_errno(shutdown(arg1, arg2));
3532fa74
FB
5435 break;
5436#endif
5437#ifdef TARGET_NR_socket
5438 case TARGET_NR_socket:
5439 ret = do_socket(arg1, arg2, arg3);
5440 break;
5441#endif
5442#ifdef TARGET_NR_socketpair
5443 case TARGET_NR_socketpair:
1be9e1dc 5444 ret = do_socketpair(arg1, arg2, arg3, arg4);
3532fa74
FB
5445 break;
5446#endif
5447#ifdef TARGET_NR_setsockopt
5448 case TARGET_NR_setsockopt:
5449 ret = do_setsockopt(arg1, arg2, arg3, arg4, (socklen_t) arg5);
5450 break;
5451#endif
7494b0f9 5452
31e31b8a 5453 case TARGET_NR_syslog:
579a97f7
FB
5454 if (!(p = lock_user_string(arg2)))
5455 goto efault;
e5574487
TS
5456 ret = get_errno(sys_syslog((int)arg1, p, (int)arg3));
5457 unlock_user(p, arg2, 0);
7494b0f9
TS
5458 break;
5459
31e31b8a 5460 case TARGET_NR_setitimer:
66fb9763 5461 {
66fb9763
FB
5462 struct itimerval value, ovalue, *pvalue;
5463
53a5960a 5464 if (arg2) {
66fb9763 5465 pvalue = &value;
788f5ec4
TS
5466 if (copy_from_user_timeval(&pvalue->it_interval, arg2)
5467 || copy_from_user_timeval(&pvalue->it_value,
5468 arg2 + sizeof(struct target_timeval)))
5469 goto efault;
66fb9763
FB
5470 } else {
5471 pvalue = NULL;
5472 }
5473 ret = get_errno(setitimer(arg1, pvalue, &ovalue));
53a5960a 5474 if (!is_error(ret) && arg3) {
788f5ec4
TS
5475 if (copy_to_user_timeval(arg3,
5476 &ovalue.it_interval)
5477 || copy_to_user_timeval(arg3 + sizeof(struct target_timeval),
5478 &ovalue.it_value))
5479 goto efault;
66fb9763
FB
5480 }
5481 }
5482 break;
31e31b8a 5483 case TARGET_NR_getitimer:
66fb9763 5484 {
66fb9763 5485 struct itimerval value;
3b46e624 5486
66fb9763 5487 ret = get_errno(getitimer(arg1, &value));
53a5960a 5488 if (!is_error(ret) && arg2) {
788f5ec4
TS
5489 if (copy_to_user_timeval(arg2,
5490 &value.it_interval)
5491 || copy_to_user_timeval(arg2 + sizeof(struct target_timeval),
5492 &value.it_value))
5493 goto efault;
66fb9763
FB
5494 }
5495 }
5496 break;
31e31b8a 5497 case TARGET_NR_stat:
579a97f7
FB
5498 if (!(p = lock_user_string(arg1)))
5499 goto efault;
53a5960a
PB
5500 ret = get_errno(stat(path(p), &st));
5501 unlock_user(p, arg1, 0);
31e31b8a
FB
5502 goto do_stat;
5503 case TARGET_NR_lstat:
579a97f7
FB
5504 if (!(p = lock_user_string(arg1)))
5505 goto efault;
53a5960a
PB
5506 ret = get_errno(lstat(path(p), &st));
5507 unlock_user(p, arg1, 0);
31e31b8a
FB
5508 goto do_stat;
5509 case TARGET_NR_fstat:
5510 {
5511 ret = get_errno(fstat(arg1, &st));
5512 do_stat:
5513 if (!is_error(ret)) {
53a5960a 5514 struct target_stat *target_st;
e3584658 5515
579a97f7
FB
5516 if (!lock_user_struct(VERIFY_WRITE, target_st, arg2, 0))
5517 goto efault;
d2fd1af7
FB
5518 __put_user(st.st_dev, &target_st->st_dev);
5519 __put_user(st.st_ino, &target_st->st_ino);
5520 __put_user(st.st_mode, &target_st->st_mode);
5521 __put_user(st.st_uid, &target_st->st_uid);
5522 __put_user(st.st_gid, &target_st->st_gid);
5523 __put_user(st.st_nlink, &target_st->st_nlink);
5524 __put_user(st.st_rdev, &target_st->st_rdev);
5525 __put_user(st.st_size, &target_st->st_size);
5526 __put_user(st.st_blksize, &target_st->st_blksize);
5527 __put_user(st.st_blocks, &target_st->st_blocks);
5528 __put_user(st.st_atime, &target_st->target_st_atime);
5529 __put_user(st.st_mtime, &target_st->target_st_mtime);
5530 __put_user(st.st_ctime, &target_st->target_st_ctime);
53a5960a 5531 unlock_user_struct(target_st, arg2, 1);
31e31b8a
FB
5532 }
5533 }
5534 break;
ebc05488 5535#ifdef TARGET_NR_olduname
31e31b8a
FB
5536 case TARGET_NR_olduname:
5537 goto unimplemented;
ebc05488
FB
5538#endif
5539#ifdef TARGET_NR_iopl
31e31b8a
FB
5540 case TARGET_NR_iopl:
5541 goto unimplemented;
ebc05488 5542#endif
31e31b8a
FB
5543 case TARGET_NR_vhangup:
5544 ret = get_errno(vhangup());
5545 break;
ebc05488 5546#ifdef TARGET_NR_idle
31e31b8a
FB
5547 case TARGET_NR_idle:
5548 goto unimplemented;
42ad6ae9
FB
5549#endif
5550#ifdef TARGET_NR_syscall
5551 case TARGET_NR_syscall:
5552 ret = do_syscall(cpu_env,arg1 & 0xffff,arg2,arg3,arg4,arg5,arg6,0);
5553 break;
ebc05488 5554#endif
31e31b8a
FB
5555 case TARGET_NR_wait4:
5556 {
5557 int status;
992f48a0 5558 abi_long status_ptr = arg2;
31e31b8a 5559 struct rusage rusage, *rusage_ptr;
992f48a0 5560 abi_ulong target_rusage = arg4;
31e31b8a
FB
5561 if (target_rusage)
5562 rusage_ptr = &rusage;
5563 else
5564 rusage_ptr = NULL;
5565 ret = get_errno(wait4(arg1, &status, arg3, rusage_ptr));
5566 if (!is_error(ret)) {
2f619698 5567 if (status_ptr) {
1d9d8b55 5568 status = host_to_target_waitstatus(status);
2f619698
FB
5569 if (put_user_s32(status, status_ptr))
5570 goto efault;
31e31b8a 5571 }
2f619698
FB
5572 if (target_rusage)
5573 host_to_target_rusage(target_rusage, &rusage);
31e31b8a
FB
5574 }
5575 }
5576 break;
e5febef5 5577#ifdef TARGET_NR_swapoff
31e31b8a 5578 case TARGET_NR_swapoff:
579a97f7
FB
5579 if (!(p = lock_user_string(arg1)))
5580 goto efault;
53a5960a
PB
5581 ret = get_errno(swapoff(p));
5582 unlock_user(p, arg1, 0);
31e31b8a 5583 break;
e5febef5 5584#endif
31e31b8a 5585 case TARGET_NR_sysinfo:
a5448a7d 5586 {
53a5960a 5587 struct target_sysinfo *target_value;
a5448a7d
FB
5588 struct sysinfo value;
5589 ret = get_errno(sysinfo(&value));
53a5960a 5590 if (!is_error(ret) && arg1)
a5448a7d 5591 {
579a97f7
FB
5592 if (!lock_user_struct(VERIFY_WRITE, target_value, arg1, 0))
5593 goto efault;
a5448a7d
FB
5594 __put_user(value.uptime, &target_value->uptime);
5595 __put_user(value.loads[0], &target_value->loads[0]);
5596 __put_user(value.loads[1], &target_value->loads[1]);
5597 __put_user(value.loads[2], &target_value->loads[2]);
5598 __put_user(value.totalram, &target_value->totalram);
5599 __put_user(value.freeram, &target_value->freeram);
5600 __put_user(value.sharedram, &target_value->sharedram);
5601 __put_user(value.bufferram, &target_value->bufferram);
5602 __put_user(value.totalswap, &target_value->totalswap);
5603 __put_user(value.freeswap, &target_value->freeswap);
5604 __put_user(value.procs, &target_value->procs);
5605 __put_user(value.totalhigh, &target_value->totalhigh);
5606 __put_user(value.freehigh, &target_value->freehigh);
5607 __put_user(value.mem_unit, &target_value->mem_unit);
53a5960a 5608 unlock_user_struct(target_value, arg1, 1);
a5448a7d
FB
5609 }
5610 }
5611 break;
e5febef5 5612#ifdef TARGET_NR_ipc
31e31b8a 5613 case TARGET_NR_ipc:
8853f86e
FB
5614 ret = do_ipc(arg1, arg2, arg3, arg4, arg5, arg6);
5615 break;
e5febef5 5616#endif
e5289087
AJ
5617#ifdef TARGET_NR_semget
5618 case TARGET_NR_semget:
5619 ret = get_errno(semget(arg1, arg2, arg3));
5620 break;
5621#endif
5622#ifdef TARGET_NR_semop
5623 case TARGET_NR_semop:
5624 ret = get_errno(do_semop(arg1, arg2, arg3));
5625 break;
5626#endif
5627#ifdef TARGET_NR_semctl
5628 case TARGET_NR_semctl:
5629 ret = do_semctl(arg1, arg2, arg3, (union target_semun)(abi_ulong)arg4);
5630 break;
5631#endif
eeb438c1
AJ
5632#ifdef TARGET_NR_msgctl
5633 case TARGET_NR_msgctl:
5634 ret = do_msgctl(arg1, arg2, arg3);
5635 break;
5636#endif
5637#ifdef TARGET_NR_msgget
5638 case TARGET_NR_msgget:
5639 ret = get_errno(msgget(arg1, arg2));
5640 break;
5641#endif
5642#ifdef TARGET_NR_msgrcv
5643 case TARGET_NR_msgrcv:
5644 ret = do_msgrcv(arg1, arg2, arg3, arg4, arg5);
5645 break;
5646#endif
5647#ifdef TARGET_NR_msgsnd
5648 case TARGET_NR_msgsnd:
5649 ret = do_msgsnd(arg1, arg2, arg3, arg4);
5650 break;
88a8c984
RV
5651#endif
5652#ifdef TARGET_NR_shmget
5653 case TARGET_NR_shmget:
5654 ret = get_errno(shmget(arg1, arg2, arg3));
5655 break;
5656#endif
5657#ifdef TARGET_NR_shmctl
5658 case TARGET_NR_shmctl:
5659 ret = do_shmctl(arg1, arg2, arg3);
5660 break;
5661#endif
5662#ifdef TARGET_NR_shmat
5663 case TARGET_NR_shmat:
5664 ret = do_shmat(arg1, arg2, arg3);
5665 break;
5666#endif
5667#ifdef TARGET_NR_shmdt
5668 case TARGET_NR_shmdt:
5669 ret = do_shmdt(arg1);
5670 break;
eeb438c1 5671#endif
31e31b8a
FB
5672 case TARGET_NR_fsync:
5673 ret = get_errno(fsync(arg1));
5674 break;
31e31b8a 5675 case TARGET_NR_clone:
0b6d3ae0
AJ
5676#if defined(TARGET_SH4)
5677 ret = get_errno(do_fork(cpu_env, arg1, arg2, arg3, arg5, arg4));
b15ad61c
EI
5678#elif defined(TARGET_CRIS)
5679 ret = get_errno(do_fork(cpu_env, arg2, arg1, arg3, arg4, arg5));
0b6d3ae0 5680#else
d865bab5 5681 ret = get_errno(do_fork(cpu_env, arg1, arg2, arg3, arg4, arg5));
0b6d3ae0 5682#endif
1b6b029e 5683 break;
ec86b0fb
FB
5684#ifdef __NR_exit_group
5685 /* new thread calls */
5686 case TARGET_NR_exit_group:
9788c9ca 5687#ifdef TARGET_GPROF
6d946cda
AJ
5688 _mcleanup();
5689#endif
e9009676 5690 gdb_exit(cpu_env, arg1);
ec86b0fb
FB
5691 ret = get_errno(exit_group(arg1));
5692 break;
5693#endif
31e31b8a 5694 case TARGET_NR_setdomainname:
579a97f7
FB
5695 if (!(p = lock_user_string(arg1)))
5696 goto efault;
53a5960a
PB
5697 ret = get_errno(setdomainname(p, arg2));
5698 unlock_user(p, arg1, 0);
31e31b8a
FB
5699 break;
5700 case TARGET_NR_uname:
5701 /* no need to transcode because we use the linux syscall */
29e619b1
FB
5702 {
5703 struct new_utsname * buf;
3b46e624 5704
579a97f7
FB
5705 if (!lock_user_struct(VERIFY_WRITE, buf, arg1, 0))
5706 goto efault;
29e619b1
FB
5707 ret = get_errno(sys_uname(buf));
5708 if (!is_error(ret)) {
5709 /* Overrite the native machine name with whatever is being
5710 emulated. */
5711 strcpy (buf->machine, UNAME_MACHINE);
c5937220
PB
5712 /* Allow the user to override the reported release. */
5713 if (qemu_uname_release && *qemu_uname_release)
5714 strcpy (buf->release, qemu_uname_release);
29e619b1 5715 }
53a5960a 5716 unlock_user_struct(buf, arg1, 1);
29e619b1 5717 }
31e31b8a 5718 break;
6dbad63e 5719#ifdef TARGET_I386
31e31b8a 5720 case TARGET_NR_modify_ldt:
03acab66 5721 ret = do_modify_ldt(cpu_env, arg1, arg2, arg3);
5cd4393b 5722 break;
84409ddb 5723#if !defined(TARGET_X86_64)
5cd4393b
FB
5724 case TARGET_NR_vm86old:
5725 goto unimplemented;
5726 case TARGET_NR_vm86:
53a5960a 5727 ret = do_vm86(cpu_env, arg1, arg2);
6dbad63e 5728 break;
84409ddb 5729#endif
6dbad63e 5730#endif
31e31b8a
FB
5731 case TARGET_NR_adjtimex:
5732 goto unimplemented;
e5febef5 5733#ifdef TARGET_NR_create_module
31e31b8a 5734 case TARGET_NR_create_module:
e5febef5 5735#endif
31e31b8a
FB
5736 case TARGET_NR_init_module:
5737 case TARGET_NR_delete_module:
e5febef5 5738#ifdef TARGET_NR_get_kernel_syms
31e31b8a 5739 case TARGET_NR_get_kernel_syms:
e5febef5 5740#endif
31e31b8a
FB
5741 goto unimplemented;
5742 case TARGET_NR_quotactl:
5743 goto unimplemented;
5744 case TARGET_NR_getpgid:
5745 ret = get_errno(getpgid(arg1));
5746 break;
5747 case TARGET_NR_fchdir:
5748 ret = get_errno(fchdir(arg1));
5749 break;
84409ddb 5750#ifdef TARGET_NR_bdflush /* not on x86_64 */
31e31b8a
FB
5751 case TARGET_NR_bdflush:
5752 goto unimplemented;
84409ddb 5753#endif
e5febef5 5754#ifdef TARGET_NR_sysfs
31e31b8a
FB
5755 case TARGET_NR_sysfs:
5756 goto unimplemented;
e5febef5 5757#endif
31e31b8a 5758 case TARGET_NR_personality:
1b6b029e 5759 ret = get_errno(personality(arg1));
31e31b8a 5760 break;
e5febef5 5761#ifdef TARGET_NR_afs_syscall
31e31b8a
FB
5762 case TARGET_NR_afs_syscall:
5763 goto unimplemented;
e5febef5 5764#endif
7a3148a9 5765#ifdef TARGET_NR__llseek /* Not on alpha */
31e31b8a
FB
5766 case TARGET_NR__llseek:
5767 {
4f2ac237
FB
5768#if defined (__x86_64__)
5769 ret = get_errno(lseek(arg1, ((uint64_t )arg2 << 32) | arg3, arg5));
2f619698
FB
5770 if (put_user_s64(ret, arg4))
5771 goto efault;
4f2ac237 5772#else
31e31b8a
FB
5773 int64_t res;
5774 ret = get_errno(_llseek(arg1, arg2, arg3, &res, arg5));
2f619698
FB
5775 if (put_user_s64(res, arg4))
5776 goto efault;
4f2ac237 5777#endif
31e31b8a
FB
5778 }
5779 break;
7a3148a9 5780#endif
31e31b8a 5781 case TARGET_NR_getdents:
992f48a0 5782#if TARGET_ABI_BITS != 32
53a5960a 5783 goto unimplemented;
992f48a0 5784#elif TARGET_ABI_BITS == 32 && HOST_LONG_BITS == 64
4add45b4 5785 {
53a5960a 5786 struct target_dirent *target_dirp;
6556a833 5787 struct linux_dirent *dirp;
992f48a0 5788 abi_long count = arg3;
4add45b4
FB
5789
5790 dirp = malloc(count);
0da46a6e 5791 if (!dirp) {
579a97f7 5792 ret = -TARGET_ENOMEM;
0da46a6e
TS
5793 goto fail;
5794 }
3b46e624 5795
4add45b4
FB
5796 ret = get_errno(sys_getdents(arg1, dirp, count));
5797 if (!is_error(ret)) {
6556a833 5798 struct linux_dirent *de;
4add45b4
FB
5799 struct target_dirent *tde;
5800 int len = ret;
5801 int reclen, treclen;
5802 int count1, tnamelen;
5803
5804 count1 = 0;
5805 de = dirp;
579a97f7
FB
5806 if (!(target_dirp = lock_user(VERIFY_WRITE, arg2, count, 0)))
5807 goto efault;
4add45b4
FB
5808 tde = target_dirp;
5809 while (len > 0) {
5810 reclen = de->d_reclen;
992f48a0 5811 treclen = reclen - (2 * (sizeof(long) - sizeof(abi_long)));
4add45b4
FB
5812 tde->d_reclen = tswap16(treclen);
5813 tde->d_ino = tswapl(de->d_ino);
5814 tde->d_off = tswapl(de->d_off);
992f48a0 5815 tnamelen = treclen - (2 * sizeof(abi_long) + 2);
4add45b4
FB
5816 if (tnamelen > 256)
5817 tnamelen = 256;
80a9d035 5818 /* XXX: may not be correct */
be15b141 5819 pstrcpy(tde->d_name, tnamelen, de->d_name);
6556a833 5820 de = (struct linux_dirent *)((char *)de + reclen);
4add45b4 5821 len -= reclen;
1c5bf3bf 5822 tde = (struct target_dirent *)((char *)tde + treclen);
4add45b4
FB
5823 count1 += treclen;
5824 }
5825 ret = count1;
579a97f7 5826 unlock_user(target_dirp, arg2, ret);
4add45b4
FB
5827 }
5828 free(dirp);
5829 }
5830#else
31e31b8a 5831 {
6556a833 5832 struct linux_dirent *dirp;
992f48a0 5833 abi_long count = arg3;
dab2ed99 5834
579a97f7
FB
5835 if (!(dirp = lock_user(VERIFY_WRITE, arg2, count, 0)))
5836 goto efault;
72f03900 5837 ret = get_errno(sys_getdents(arg1, dirp, count));
31e31b8a 5838 if (!is_error(ret)) {
6556a833 5839 struct linux_dirent *de;
31e31b8a
FB
5840 int len = ret;
5841 int reclen;
5842 de = dirp;
5843 while (len > 0) {
8083a3e5 5844 reclen = de->d_reclen;
31e31b8a
FB
5845 if (reclen > len)
5846 break;
8083a3e5 5847 de->d_reclen = tswap16(reclen);
31e31b8a
FB
5848 tswapls(&de->d_ino);
5849 tswapls(&de->d_off);
6556a833 5850 de = (struct linux_dirent *)((char *)de + reclen);
31e31b8a
FB
5851 len -= reclen;
5852 }
5853 }
53a5960a 5854 unlock_user(dirp, arg2, ret);
31e31b8a 5855 }
4add45b4 5856#endif
31e31b8a 5857 break;
3ae43202 5858#if defined(TARGET_NR_getdents64) && defined(__NR_getdents64)
dab2ed99
FB
5859 case TARGET_NR_getdents64:
5860 {
6556a833 5861 struct linux_dirent64 *dirp;
992f48a0 5862 abi_long count = arg3;
579a97f7
FB
5863 if (!(dirp = lock_user(VERIFY_WRITE, arg2, count, 0)))
5864 goto efault;
dab2ed99
FB
5865 ret = get_errno(sys_getdents64(arg1, dirp, count));
5866 if (!is_error(ret)) {
6556a833 5867 struct linux_dirent64 *de;
dab2ed99
FB
5868 int len = ret;
5869 int reclen;
5870 de = dirp;
5871 while (len > 0) {
8083a3e5 5872 reclen = de->d_reclen;
dab2ed99
FB
5873 if (reclen > len)
5874 break;
8083a3e5 5875 de->d_reclen = tswap16(reclen);
8582a53a
FB
5876 tswap64s((uint64_t *)&de->d_ino);
5877 tswap64s((uint64_t *)&de->d_off);
6556a833 5878 de = (struct linux_dirent64 *)((char *)de + reclen);
dab2ed99
FB
5879 len -= reclen;
5880 }
5881 }
53a5960a 5882 unlock_user(dirp, arg2, ret);
dab2ed99
FB
5883 }
5884 break;
a541f297 5885#endif /* TARGET_NR_getdents64 */
e5febef5 5886#ifdef TARGET_NR__newselect
31e31b8a 5887 case TARGET_NR__newselect:
53a5960a 5888 ret = do_select(arg1, arg2, arg3, arg4, arg5);
31e31b8a 5889 break;
e5febef5
TS
5890#endif
5891#ifdef TARGET_NR_poll
9de5e440
FB
5892 case TARGET_NR_poll:
5893 {
53a5960a 5894 struct target_pollfd *target_pfd;
9de5e440
FB
5895 unsigned int nfds = arg2;
5896 int timeout = arg3;
5897 struct pollfd *pfd;
7854b056 5898 unsigned int i;
9de5e440 5899
579a97f7
FB
5900 target_pfd = lock_user(VERIFY_WRITE, arg1, sizeof(struct target_pollfd) * nfds, 1);
5901 if (!target_pfd)
5902 goto efault;
9de5e440
FB
5903 pfd = alloca(sizeof(struct pollfd) * nfds);
5904 for(i = 0; i < nfds; i++) {
5cd4393b
FB
5905 pfd[i].fd = tswap32(target_pfd[i].fd);
5906 pfd[i].events = tswap16(target_pfd[i].events);
9de5e440
FB
5907 }
5908 ret = get_errno(poll(pfd, nfds, timeout));
5909 if (!is_error(ret)) {
5910 for(i = 0; i < nfds; i++) {
5cd4393b 5911 target_pfd[i].revents = tswap16(pfd[i].revents);
9de5e440 5912 }
53a5960a
PB
5913 ret += nfds * (sizeof(struct target_pollfd)
5914 - sizeof(struct pollfd));
9de5e440 5915 }
53a5960a 5916 unlock_user(target_pfd, arg1, ret);
9de5e440
FB
5917 }
5918 break;
e5febef5 5919#endif
31e31b8a 5920 case TARGET_NR_flock:
9de5e440
FB
5921 /* NOTE: the flock constant seems to be the same for every
5922 Linux platform */
5923 ret = get_errno(flock(arg1, arg2));
31e31b8a
FB
5924 break;
5925 case TARGET_NR_readv:
5926 {
5927 int count = arg3;
31e31b8a 5928 struct iovec *vec;
31e31b8a
FB
5929
5930 vec = alloca(count * sizeof(struct iovec));
41df8411
FB
5931 if (lock_iovec(VERIFY_WRITE, vec, arg2, count, 0) < 0)
5932 goto efault;
31e31b8a 5933 ret = get_errno(readv(arg1, vec, count));
53a5960a 5934 unlock_iovec(vec, arg2, count, 1);
31e31b8a
FB
5935 }
5936 break;
5937 case TARGET_NR_writev:
5938 {
5939 int count = arg3;
31e31b8a 5940 struct iovec *vec;
31e31b8a
FB
5941
5942 vec = alloca(count * sizeof(struct iovec));
41df8411
FB
5943 if (lock_iovec(VERIFY_READ, vec, arg2, count, 1) < 0)
5944 goto efault;
31e31b8a 5945 ret = get_errno(writev(arg1, vec, count));
53a5960a 5946 unlock_iovec(vec, arg2, count, 0);
31e31b8a
FB
5947 }
5948 break;
5949 case TARGET_NR_getsid:
5950 ret = get_errno(getsid(arg1));
5951 break;
7a3148a9 5952#if defined(TARGET_NR_fdatasync) /* Not on alpha (osf_datasync ?) */
31e31b8a 5953 case TARGET_NR_fdatasync:
5cd4393b
FB
5954 ret = get_errno(fdatasync(arg1));
5955 break;
7a3148a9 5956#endif
31e31b8a 5957 case TARGET_NR__sysctl:
0da46a6e 5958 /* We don't implement this, but ENOTDIR is always a safe
29e619b1 5959 return value. */
0da46a6e
TS
5960 ret = -TARGET_ENOTDIR;
5961 break;
31e31b8a 5962 case TARGET_NR_sched_setparam:
5cd4393b 5963 {
53a5960a 5964 struct sched_param *target_schp;
5cd4393b 5965 struct sched_param schp;
53a5960a 5966
579a97f7
FB
5967 if (!lock_user_struct(VERIFY_READ, target_schp, arg2, 1))
5968 goto efault;
5cd4393b 5969 schp.sched_priority = tswap32(target_schp->sched_priority);
53a5960a 5970 unlock_user_struct(target_schp, arg2, 0);
5cd4393b
FB
5971 ret = get_errno(sched_setparam(arg1, &schp));
5972 }
5973 break;
31e31b8a 5974 case TARGET_NR_sched_getparam:
5cd4393b 5975 {
53a5960a 5976 struct sched_param *target_schp;
5cd4393b
FB
5977 struct sched_param schp;
5978 ret = get_errno(sched_getparam(arg1, &schp));
5979 if (!is_error(ret)) {
579a97f7
FB
5980 if (!lock_user_struct(VERIFY_WRITE, target_schp, arg2, 0))
5981 goto efault;
5cd4393b 5982 target_schp->sched_priority = tswap32(schp.sched_priority);
53a5960a 5983 unlock_user_struct(target_schp, arg2, 1);
5cd4393b
FB
5984 }
5985 }
5986 break;
31e31b8a 5987 case TARGET_NR_sched_setscheduler:
5cd4393b 5988 {
53a5960a 5989 struct sched_param *target_schp;
5cd4393b 5990 struct sched_param schp;
579a97f7
FB
5991 if (!lock_user_struct(VERIFY_READ, target_schp, arg3, 1))
5992 goto efault;
5cd4393b 5993 schp.sched_priority = tswap32(target_schp->sched_priority);
53a5960a 5994 unlock_user_struct(target_schp, arg3, 0);
5cd4393b
FB
5995 ret = get_errno(sched_setscheduler(arg1, arg2, &schp));
5996 }
5997 break;
31e31b8a 5998 case TARGET_NR_sched_getscheduler:
5cd4393b
FB
5999 ret = get_errno(sched_getscheduler(arg1));
6000 break;
31e31b8a
FB
6001 case TARGET_NR_sched_yield:
6002 ret = get_errno(sched_yield());
6003 break;
6004 case TARGET_NR_sched_get_priority_max:
5cd4393b
FB
6005 ret = get_errno(sched_get_priority_max(arg1));
6006 break;
31e31b8a 6007 case TARGET_NR_sched_get_priority_min:
5cd4393b
FB
6008 ret = get_errno(sched_get_priority_min(arg1));
6009 break;
31e31b8a 6010 case TARGET_NR_sched_rr_get_interval:
5cd4393b 6011 {
5cd4393b
FB
6012 struct timespec ts;
6013 ret = get_errno(sched_rr_get_interval(arg1, &ts));
6014 if (!is_error(ret)) {
53a5960a 6015 host_to_target_timespec(arg2, &ts);
5cd4393b
FB
6016 }
6017 }
6018 break;
31e31b8a 6019 case TARGET_NR_nanosleep:
1b6b029e 6020 {
1b6b029e 6021 struct timespec req, rem;
53a5960a 6022 target_to_host_timespec(&req, arg1);
1b6b029e 6023 ret = get_errno(nanosleep(&req, &rem));
53a5960a
PB
6024 if (is_error(ret) && arg2) {
6025 host_to_target_timespec(arg2, &rem);
1b6b029e
FB
6026 }
6027 }
6028 break;
e5febef5 6029#ifdef TARGET_NR_query_module
31e31b8a 6030 case TARGET_NR_query_module:
5cd4393b 6031 goto unimplemented;
e5febef5
TS
6032#endif
6033#ifdef TARGET_NR_nfsservctl
31e31b8a 6034 case TARGET_NR_nfsservctl:
5cd4393b 6035 goto unimplemented;
e5febef5 6036#endif
31e31b8a 6037 case TARGET_NR_prctl:
e5574487
TS
6038 switch (arg1)
6039 {
6040 case PR_GET_PDEATHSIG:
6041 {
6042 int deathsig;
6043 ret = get_errno(prctl(arg1, &deathsig, arg3, arg4, arg5));
2f619698
FB
6044 if (!is_error(ret) && arg2
6045 && put_user_ual(deathsig, arg2))
6046 goto efault;
e5574487
TS
6047 }
6048 break;
6049 default:
6050 ret = get_errno(prctl(arg1, arg2, arg3, arg4, arg5));
6051 break;
6052 }
39b9aae1 6053 break;
d2fd1af7
FB
6054#ifdef TARGET_NR_arch_prctl
6055 case TARGET_NR_arch_prctl:
6056#if defined(TARGET_I386) && !defined(TARGET_ABI32)
6057 ret = do_arch_prctl(cpu_env, arg1, arg2);
6058 break;
6059#else
6060 goto unimplemented;
6061#endif
6062#endif
67867308 6063#ifdef TARGET_NR_pread
31e31b8a 6064 case TARGET_NR_pread:
a4ae00bc
AZ
6065#ifdef TARGET_ARM
6066 if (((CPUARMState *)cpu_env)->eabi)
6067 arg4 = arg5;
6068#endif
579a97f7
FB
6069 if (!(p = lock_user(VERIFY_WRITE, arg2, arg3, 0)))
6070 goto efault;
53a5960a
PB
6071 ret = get_errno(pread(arg1, p, arg3, arg4));
6072 unlock_user(p, arg2, ret);
206f0fa7 6073 break;
31e31b8a 6074 case TARGET_NR_pwrite:
a4ae00bc
AZ
6075#ifdef TARGET_ARM
6076 if (((CPUARMState *)cpu_env)->eabi)
6077 arg4 = arg5;
6078#endif
579a97f7
FB
6079 if (!(p = lock_user(VERIFY_READ, arg2, arg3, 1)))
6080 goto efault;
53a5960a
PB
6081 ret = get_errno(pwrite(arg1, p, arg3, arg4));
6082 unlock_user(p, arg2, 0);
206f0fa7 6083 break;
f2c7ba15
AJ
6084#endif
6085#ifdef TARGET_NR_pread64
6086 case TARGET_NR_pread64:
6087 if (!(p = lock_user(VERIFY_WRITE, arg2, arg3, 0)))
6088 goto efault;
6089 ret = get_errno(pread64(arg1, p, arg3, target_offset64(arg4, arg5)));
6090 unlock_user(p, arg2, ret);
6091 break;
6092 case TARGET_NR_pwrite64:
6093 if (!(p = lock_user(VERIFY_READ, arg2, arg3, 1)))
6094 goto efault;
6095 ret = get_errno(pwrite64(arg1, p, arg3, target_offset64(arg4, arg5)));
6096 unlock_user(p, arg2, 0);
6097 break;
67867308 6098#endif
31e31b8a 6099 case TARGET_NR_getcwd:
579a97f7
FB
6100 if (!(p = lock_user(VERIFY_WRITE, arg1, arg2, 0)))
6101 goto efault;
53a5960a
PB
6102 ret = get_errno(sys_getcwd1(p, arg2));
6103 unlock_user(p, arg1, ret);
31e31b8a
FB
6104 break;
6105 case TARGET_NR_capget:
5cd4393b 6106 goto unimplemented;
31e31b8a 6107 case TARGET_NR_capset:
5cd4393b 6108 goto unimplemented;
31e31b8a 6109 case TARGET_NR_sigaltstack:
198a74de
TS
6110#if defined(TARGET_I386) || defined(TARGET_ARM) || defined(TARGET_MIPS) || \
6111 defined(TARGET_SPARC) || defined(TARGET_PPC) || defined(TARGET_ALPHA)
579a97f7 6112 ret = do_sigaltstack(arg1, arg2, get_sp_from_cpustate((CPUState *)cpu_env));
a04e134a
TS
6113 break;
6114#else
5cd4393b 6115 goto unimplemented;
a04e134a 6116#endif
31e31b8a 6117 case TARGET_NR_sendfile:
5cd4393b 6118 goto unimplemented;
ebc05488 6119#ifdef TARGET_NR_getpmsg
31e31b8a 6120 case TARGET_NR_getpmsg:
5cd4393b 6121 goto unimplemented;
ebc05488
FB
6122#endif
6123#ifdef TARGET_NR_putpmsg
31e31b8a 6124 case TARGET_NR_putpmsg:
5cd4393b 6125 goto unimplemented;
ebc05488 6126#endif
048f6b4d 6127#ifdef TARGET_NR_vfork
31e31b8a 6128 case TARGET_NR_vfork:
d865bab5
PB
6129 ret = get_errno(do_fork(cpu_env, CLONE_VFORK | CLONE_VM | SIGCHLD,
6130 0, 0, 0, 0));
31e31b8a 6131 break;
048f6b4d 6132#endif
ebc05488 6133#ifdef TARGET_NR_ugetrlimit
31e31b8a 6134 case TARGET_NR_ugetrlimit:
728584be
FB
6135 {
6136 struct rlimit rlim;
6137 ret = get_errno(getrlimit(arg1, &rlim));
6138 if (!is_error(ret)) {
53a5960a 6139 struct target_rlimit *target_rlim;
579a97f7
FB
6140 if (!lock_user_struct(VERIFY_WRITE, target_rlim, arg2, 0))
6141 goto efault;
728584be
FB
6142 target_rlim->rlim_cur = tswapl(rlim.rlim_cur);
6143 target_rlim->rlim_max = tswapl(rlim.rlim_max);
53a5960a 6144 unlock_user_struct(target_rlim, arg2, 1);
728584be
FB
6145 }
6146 break;
6147 }
ebc05488 6148#endif
a315a145 6149#ifdef TARGET_NR_truncate64
31e31b8a 6150 case TARGET_NR_truncate64:
579a97f7
FB
6151 if (!(p = lock_user_string(arg1)))
6152 goto efault;
53a5960a
PB
6153 ret = target_truncate64(cpu_env, p, arg2, arg3, arg4);
6154 unlock_user(p, arg1, 0);
667f38b1 6155 break;
a315a145
FB
6156#endif
6157#ifdef TARGET_NR_ftruncate64
31e31b8a 6158 case TARGET_NR_ftruncate64:
ce4defa0 6159 ret = target_ftruncate64(cpu_env, arg1, arg2, arg3, arg4);
667f38b1 6160 break;
a315a145
FB
6161#endif
6162#ifdef TARGET_NR_stat64
31e31b8a 6163 case TARGET_NR_stat64:
579a97f7
FB
6164 if (!(p = lock_user_string(arg1)))
6165 goto efault;
53a5960a
PB
6166 ret = get_errno(stat(path(p), &st));
6167 unlock_user(p, arg1, 0);
6a24a778
AZ
6168 if (!is_error(ret))
6169 ret = host_to_target_stat64(cpu_env, arg2, &st);
6170 break;
a315a145
FB
6171#endif
6172#ifdef TARGET_NR_lstat64
31e31b8a 6173 case TARGET_NR_lstat64:
579a97f7
FB
6174 if (!(p = lock_user_string(arg1)))
6175 goto efault;
53a5960a
PB
6176 ret = get_errno(lstat(path(p), &st));
6177 unlock_user(p, arg1, 0);
6a24a778
AZ
6178 if (!is_error(ret))
6179 ret = host_to_target_stat64(cpu_env, arg2, &st);
6180 break;
a315a145
FB
6181#endif
6182#ifdef TARGET_NR_fstat64
31e31b8a 6183 case TARGET_NR_fstat64:
6a24a778
AZ
6184 ret = get_errno(fstat(arg1, &st));
6185 if (!is_error(ret))
6186 ret = host_to_target_stat64(cpu_env, arg2, &st);
6187 break;
ce4defa0 6188#endif
9d33b76b
AJ
6189#if (defined(TARGET_NR_fstatat64) || defined(TARGET_NR_newfstatat)) && \
6190 (defined(__NR_fstatat64) || defined(__NR_newfstatat))
6191#ifdef TARGET_NR_fstatat64
6a24a778 6192 case TARGET_NR_fstatat64:
9d33b76b
AJ
6193#endif
6194#ifdef TARGET_NR_newfstatat
6195 case TARGET_NR_newfstatat:
6196#endif
6a24a778
AZ
6197 if (!(p = lock_user_string(arg2)))
6198 goto efault;
9d33b76b 6199#ifdef __NR_fstatat64
6a24a778 6200 ret = get_errno(sys_fstatat64(arg1, path(p), &st, arg4));
9d33b76b
AJ
6201#else
6202 ret = get_errno(sys_newfstatat(arg1, path(p), &st, arg4));
6203#endif
6a24a778
AZ
6204 if (!is_error(ret))
6205 ret = host_to_target_stat64(cpu_env, arg3, &st);
60cd49d5 6206 break;
a315a145 6207#endif
67867308
FB
6208#ifdef USE_UID16
6209 case TARGET_NR_lchown:
579a97f7
FB
6210 if (!(p = lock_user_string(arg1)))
6211 goto efault;
53a5960a
PB
6212 ret = get_errno(lchown(p, low2highuid(arg2), low2highgid(arg3)));
6213 unlock_user(p, arg1, 0);
67867308
FB
6214 break;
6215 case TARGET_NR_getuid:
6216 ret = get_errno(high2lowuid(getuid()));
6217 break;
6218 case TARGET_NR_getgid:
6219 ret = get_errno(high2lowgid(getgid()));
6220 break;
6221 case TARGET_NR_geteuid:
6222 ret = get_errno(high2lowuid(geteuid()));
6223 break;
6224 case TARGET_NR_getegid:
6225 ret = get_errno(high2lowgid(getegid()));
6226 break;
6227 case TARGET_NR_setreuid:
6228 ret = get_errno(setreuid(low2highuid(arg1), low2highuid(arg2)));
6229 break;
6230 case TARGET_NR_setregid:
6231 ret = get_errno(setregid(low2highgid(arg1), low2highgid(arg2)));
6232 break;
6233 case TARGET_NR_getgroups:
6234 {
6235 int gidsetsize = arg1;
53a5960a 6236 uint16_t *target_grouplist;
67867308
FB
6237 gid_t *grouplist;
6238 int i;
6239
6240 grouplist = alloca(gidsetsize * sizeof(gid_t));
6241 ret = get_errno(getgroups(gidsetsize, grouplist));
cb3bc233
AZ
6242 if (gidsetsize == 0)
6243 break;
67867308 6244 if (!is_error(ret)) {
579a97f7
FB
6245 target_grouplist = lock_user(VERIFY_WRITE, arg2, gidsetsize * 2, 0);
6246 if (!target_grouplist)
6247 goto efault;
a2155fcc 6248 for(i = 0;i < ret; i++)
67867308 6249 target_grouplist[i] = tswap16(grouplist[i]);
53a5960a 6250 unlock_user(target_grouplist, arg2, gidsetsize * 2);
67867308
FB
6251 }
6252 }
6253 break;
6254 case TARGET_NR_setgroups:
6255 {
6256 int gidsetsize = arg1;
53a5960a 6257 uint16_t *target_grouplist;
67867308
FB
6258 gid_t *grouplist;
6259 int i;
6260
6261 grouplist = alloca(gidsetsize * sizeof(gid_t));
579a97f7
FB
6262 target_grouplist = lock_user(VERIFY_READ, arg2, gidsetsize * 2, 1);
6263 if (!target_grouplist) {
6264 ret = -TARGET_EFAULT;
6265 goto fail;
6266 }
67867308
FB
6267 for(i = 0;i < gidsetsize; i++)
6268 grouplist[i] = tswap16(target_grouplist[i]);
53a5960a 6269 unlock_user(target_grouplist, arg2, 0);
67867308
FB
6270 ret = get_errno(setgroups(gidsetsize, grouplist));
6271 }
6272 break;
6273 case TARGET_NR_fchown:
6274 ret = get_errno(fchown(arg1, low2highuid(arg2), low2highgid(arg3)));
6275 break;
ccfa72b7
TS
6276#if defined(TARGET_NR_fchownat) && defined(__NR_fchownat)
6277 case TARGET_NR_fchownat:
579a97f7
FB
6278 if (!(p = lock_user_string(arg2)))
6279 goto efault;
6280 ret = get_errno(sys_fchownat(arg1, p, low2highuid(arg3), low2highgid(arg4), arg5));
6281 unlock_user(p, arg2, 0);
ccfa72b7
TS
6282 break;
6283#endif
67867308
FB
6284#ifdef TARGET_NR_setresuid
6285 case TARGET_NR_setresuid:
5fafdf24
TS
6286 ret = get_errno(setresuid(low2highuid(arg1),
6287 low2highuid(arg2),
67867308
FB
6288 low2highuid(arg3)));
6289 break;
6290#endif
6291#ifdef TARGET_NR_getresuid
6292 case TARGET_NR_getresuid:
6293 {
53a5960a 6294 uid_t ruid, euid, suid;
67867308
FB
6295 ret = get_errno(getresuid(&ruid, &euid, &suid));
6296 if (!is_error(ret)) {
2f619698
FB
6297 if (put_user_u16(high2lowuid(ruid), arg1)
6298 || put_user_u16(high2lowuid(euid), arg2)
6299 || put_user_u16(high2lowuid(suid), arg3))
6300 goto efault;
67867308
FB
6301 }
6302 }
6303 break;
6304#endif
6305#ifdef TARGET_NR_getresgid
6306 case TARGET_NR_setresgid:
5fafdf24
TS
6307 ret = get_errno(setresgid(low2highgid(arg1),
6308 low2highgid(arg2),
67867308
FB
6309 low2highgid(arg3)));
6310 break;
6311#endif
6312#ifdef TARGET_NR_getresgid
6313 case TARGET_NR_getresgid:
6314 {
53a5960a 6315 gid_t rgid, egid, sgid;
67867308
FB
6316 ret = get_errno(getresgid(&rgid, &egid, &sgid));
6317 if (!is_error(ret)) {
2f619698
FB
6318 if (put_user_u16(high2lowgid(rgid), arg1)
6319 || put_user_u16(high2lowgid(egid), arg2)
6320 || put_user_u16(high2lowgid(sgid), arg3))
6321 goto efault;
67867308
FB
6322 }
6323 }
6324 break;
6325#endif
6326 case TARGET_NR_chown:
579a97f7
FB
6327 if (!(p = lock_user_string(arg1)))
6328 goto efault;
53a5960a
PB
6329 ret = get_errno(chown(p, low2highuid(arg2), low2highgid(arg3)));
6330 unlock_user(p, arg1, 0);
67867308
FB
6331 break;
6332 case TARGET_NR_setuid:
6333 ret = get_errno(setuid(low2highuid(arg1)));
6334 break;
6335 case TARGET_NR_setgid:
6336 ret = get_errno(setgid(low2highgid(arg1)));
6337 break;
6338 case TARGET_NR_setfsuid:
6339 ret = get_errno(setfsuid(arg1));
6340 break;
6341 case TARGET_NR_setfsgid:
6342 ret = get_errno(setfsgid(arg1));
6343 break;
6344#endif /* USE_UID16 */
6345
a315a145 6346#ifdef TARGET_NR_lchown32
31e31b8a 6347 case TARGET_NR_lchown32:
579a97f7
FB
6348 if (!(p = lock_user_string(arg1)))
6349 goto efault;
53a5960a
PB
6350 ret = get_errno(lchown(p, arg2, arg3));
6351 unlock_user(p, arg1, 0);
b03c60f3 6352 break;
a315a145
FB
6353#endif
6354#ifdef TARGET_NR_getuid32
31e31b8a 6355 case TARGET_NR_getuid32:
b03c60f3
FB
6356 ret = get_errno(getuid());
6357 break;
a315a145 6358#endif
64b4d28c
AJ
6359
6360#if defined(TARGET_NR_getxuid) && defined(TARGET_ALPHA)
6361 /* Alpha specific */
6362 case TARGET_NR_getxuid:
6363 {
6364 uid_t euid;
6365 euid=geteuid();
6366 ((CPUAlphaState *)cpu_env)->ir[IR_A4]=euid;
6367 }
6368 ret = get_errno(getuid());
6369 break;
6370#endif
6371#if defined(TARGET_NR_getxgid) && defined(TARGET_ALPHA)
6372 /* Alpha specific */
6373 case TARGET_NR_getxgid:
6374 {
6375 uid_t egid;
6376 egid=getegid();
6377 ((CPUAlphaState *)cpu_env)->ir[IR_A4]=egid;
6378 }
6379 ret = get_errno(getgid());
6380 break;
6381#endif
6382
a315a145 6383#ifdef TARGET_NR_getgid32
31e31b8a 6384 case TARGET_NR_getgid32:
b03c60f3
FB
6385 ret = get_errno(getgid());
6386 break;
a315a145
FB
6387#endif
6388#ifdef TARGET_NR_geteuid32
31e31b8a 6389 case TARGET_NR_geteuid32:
b03c60f3
FB
6390 ret = get_errno(geteuid());
6391 break;
a315a145
FB
6392#endif
6393#ifdef TARGET_NR_getegid32
31e31b8a 6394 case TARGET_NR_getegid32:
b03c60f3
FB
6395 ret = get_errno(getegid());
6396 break;
a315a145
FB
6397#endif
6398#ifdef TARGET_NR_setreuid32
31e31b8a 6399 case TARGET_NR_setreuid32:
b03c60f3
FB
6400 ret = get_errno(setreuid(arg1, arg2));
6401 break;
a315a145
FB
6402#endif
6403#ifdef TARGET_NR_setregid32
31e31b8a 6404 case TARGET_NR_setregid32:
b03c60f3
FB
6405 ret = get_errno(setregid(arg1, arg2));
6406 break;
a315a145
FB
6407#endif
6408#ifdef TARGET_NR_getgroups32
31e31b8a 6409 case TARGET_NR_getgroups32:
99c475ab
FB
6410 {
6411 int gidsetsize = arg1;
53a5960a 6412 uint32_t *target_grouplist;
99c475ab
FB
6413 gid_t *grouplist;
6414 int i;
6415
6416 grouplist = alloca(gidsetsize * sizeof(gid_t));
6417 ret = get_errno(getgroups(gidsetsize, grouplist));
cb3bc233
AZ
6418 if (gidsetsize == 0)
6419 break;
99c475ab 6420 if (!is_error(ret)) {
579a97f7
FB
6421 target_grouplist = lock_user(VERIFY_WRITE, arg2, gidsetsize * 4, 0);
6422 if (!target_grouplist) {
6423 ret = -TARGET_EFAULT;
6424 goto fail;
6425 }
a2155fcc 6426 for(i = 0;i < ret; i++)
53a5960a
PB
6427 target_grouplist[i] = tswap32(grouplist[i]);
6428 unlock_user(target_grouplist, arg2, gidsetsize * 4);
99c475ab
FB
6429 }
6430 }
6431 break;
a315a145
FB
6432#endif
6433#ifdef TARGET_NR_setgroups32
31e31b8a 6434 case TARGET_NR_setgroups32:
99c475ab
FB
6435 {
6436 int gidsetsize = arg1;
53a5960a 6437 uint32_t *target_grouplist;
99c475ab
FB
6438 gid_t *grouplist;
6439 int i;
3b46e624 6440
99c475ab 6441 grouplist = alloca(gidsetsize * sizeof(gid_t));
579a97f7
FB
6442 target_grouplist = lock_user(VERIFY_READ, arg2, gidsetsize * 4, 1);
6443 if (!target_grouplist) {
6444 ret = -TARGET_EFAULT;
6445 goto fail;
6446 }
99c475ab 6447 for(i = 0;i < gidsetsize; i++)
53a5960a
PB
6448 grouplist[i] = tswap32(target_grouplist[i]);
6449 unlock_user(target_grouplist, arg2, 0);
99c475ab
FB
6450 ret = get_errno(setgroups(gidsetsize, grouplist));
6451 }
6452 break;
a315a145
FB
6453#endif
6454#ifdef TARGET_NR_fchown32
31e31b8a 6455 case TARGET_NR_fchown32:
b03c60f3
FB
6456 ret = get_errno(fchown(arg1, arg2, arg3));
6457 break;
a315a145
FB
6458#endif
6459#ifdef TARGET_NR_setresuid32
31e31b8a 6460 case TARGET_NR_setresuid32:
b03c60f3
FB
6461 ret = get_errno(setresuid(arg1, arg2, arg3));
6462 break;
a315a145
FB
6463#endif
6464#ifdef TARGET_NR_getresuid32
31e31b8a 6465 case TARGET_NR_getresuid32:
b03c60f3 6466 {
53a5960a 6467 uid_t ruid, euid, suid;
b03c60f3
FB
6468 ret = get_errno(getresuid(&ruid, &euid, &suid));
6469 if (!is_error(ret)) {
2f619698
FB
6470 if (put_user_u32(ruid, arg1)
6471 || put_user_u32(euid, arg2)
6472 || put_user_u32(suid, arg3))
6473 goto efault;
b03c60f3
FB
6474 }
6475 }
6476 break;
a315a145
FB
6477#endif
6478#ifdef TARGET_NR_setresgid32
31e31b8a 6479 case TARGET_NR_setresgid32:
b03c60f3
FB
6480 ret = get_errno(setresgid(arg1, arg2, arg3));
6481 break;
a315a145
FB
6482#endif
6483#ifdef TARGET_NR_getresgid32
31e31b8a 6484 case TARGET_NR_getresgid32:
b03c60f3 6485 {
53a5960a 6486 gid_t rgid, egid, sgid;
b03c60f3
FB
6487 ret = get_errno(getresgid(&rgid, &egid, &sgid));
6488 if (!is_error(ret)) {
2f619698
FB
6489 if (put_user_u32(rgid, arg1)
6490 || put_user_u32(egid, arg2)
6491 || put_user_u32(sgid, arg3))
6492 goto efault;
b03c60f3
FB
6493 }
6494 }
6495 break;
a315a145
FB
6496#endif
6497#ifdef TARGET_NR_chown32
31e31b8a 6498 case TARGET_NR_chown32:
579a97f7
FB
6499 if (!(p = lock_user_string(arg1)))
6500 goto efault;
53a5960a
PB
6501 ret = get_errno(chown(p, arg2, arg3));
6502 unlock_user(p, arg1, 0);
b03c60f3 6503 break;
a315a145
FB
6504#endif
6505#ifdef TARGET_NR_setuid32
31e31b8a 6506 case TARGET_NR_setuid32:
b03c60f3
FB
6507 ret = get_errno(setuid(arg1));
6508 break;
a315a145
FB
6509#endif
6510#ifdef TARGET_NR_setgid32
31e31b8a 6511 case TARGET_NR_setgid32:
b03c60f3
FB
6512 ret = get_errno(setgid(arg1));
6513 break;
a315a145
FB
6514#endif
6515#ifdef TARGET_NR_setfsuid32
31e31b8a 6516 case TARGET_NR_setfsuid32:
b03c60f3
FB
6517 ret = get_errno(setfsuid(arg1));
6518 break;
a315a145
FB
6519#endif
6520#ifdef TARGET_NR_setfsgid32
31e31b8a 6521 case TARGET_NR_setfsgid32:
b03c60f3
FB
6522 ret = get_errno(setfsgid(arg1));
6523 break;
a315a145 6524#endif
67867308 6525
31e31b8a 6526 case TARGET_NR_pivot_root:
b03c60f3 6527 goto unimplemented;
ffa65c3b 6528#ifdef TARGET_NR_mincore
31e31b8a 6529 case TARGET_NR_mincore:
04bb9ace
AJ
6530 {
6531 void *a;
6532 ret = -TARGET_EFAULT;
6533 if (!(a = lock_user(VERIFY_READ, arg1,arg2, 0)))
6534 goto efault;
6535 if (!(p = lock_user_string(arg3)))
6536 goto mincore_fail;
6537 ret = get_errno(mincore(a, arg2, p));
6538 unlock_user(p, arg3, ret);
6539 mincore_fail:
6540 unlock_user(a, arg1, 0);
6541 }
6542 break;
ffa65c3b 6543#endif
408321b6
AJ
6544#ifdef TARGET_NR_arm_fadvise64_64
6545 case TARGET_NR_arm_fadvise64_64:
6546 {
6547 /*
6548 * arm_fadvise64_64 looks like fadvise64_64 but
6549 * with different argument order
6550 */
6551 abi_long temp;
6552 temp = arg3;
6553 arg3 = arg4;
6554 arg4 = temp;
6555 }
6556#endif
6557#if defined(TARGET_NR_fadvise64_64) || defined(TARGET_NR_arm_fadvise64_64)
6558#ifdef TARGET_NR_fadvise64_64
6559 case TARGET_NR_fadvise64_64:
6560#endif
6561 /* This is a hint, so ignoring and returning success is ok. */
6562 ret = get_errno(0);
6563 break;
6564#endif
ffa65c3b 6565#ifdef TARGET_NR_madvise
31e31b8a 6566 case TARGET_NR_madvise:
24836689
PB
6567 /* A straight passthrough may not be safe because qemu sometimes
6568 turns private flie-backed mappings into anonymous mappings.
6569 This will break MADV_DONTNEED.
6570 This is a hint, so ignoring and returning success is ok. */
6571 ret = get_errno(0);
6572 break;
ffa65c3b 6573#endif
992f48a0 6574#if TARGET_ABI_BITS == 32
31e31b8a 6575 case TARGET_NR_fcntl64:
77e4672d 6576 {
b1e341eb 6577 int cmd;
77e4672d 6578 struct flock64 fl;
53a5960a 6579 struct target_flock64 *target_fl;
ce4defa0 6580#ifdef TARGET_ARM
53a5960a 6581 struct target_eabi_flock64 *target_efl;
ce4defa0 6582#endif
77e4672d 6583
5f106811
APR
6584 cmd = target_to_host_fcntl_cmd(arg2);
6585 if (cmd == -TARGET_EINVAL)
6586 return cmd;
b1e341eb 6587
60cd49d5 6588 switch(arg2) {
b1e341eb 6589 case TARGET_F_GETLK64:
5813427b
TS
6590#ifdef TARGET_ARM
6591 if (((CPUARMState *)cpu_env)->eabi) {
9ee1fa2c
FB
6592 if (!lock_user_struct(VERIFY_READ, target_efl, arg3, 1))
6593 goto efault;
5813427b
TS
6594 fl.l_type = tswap16(target_efl->l_type);
6595 fl.l_whence = tswap16(target_efl->l_whence);
6596 fl.l_start = tswap64(target_efl->l_start);
6597 fl.l_len = tswap64(target_efl->l_len);
6598 fl.l_pid = tswapl(target_efl->l_pid);
6599 unlock_user_struct(target_efl, arg3, 0);
6600 } else
6601#endif
6602 {
9ee1fa2c
FB
6603 if (!lock_user_struct(VERIFY_READ, target_fl, arg3, 1))
6604 goto efault;
5813427b
TS
6605 fl.l_type = tswap16(target_fl->l_type);
6606 fl.l_whence = tswap16(target_fl->l_whence);
6607 fl.l_start = tswap64(target_fl->l_start);
6608 fl.l_len = tswap64(target_fl->l_len);
6609 fl.l_pid = tswapl(target_fl->l_pid);
6610 unlock_user_struct(target_fl, arg3, 0);
6611 }
b1e341eb 6612 ret = get_errno(fcntl(arg1, cmd, &fl));
77e4672d 6613 if (ret == 0) {
ce4defa0
PB
6614#ifdef TARGET_ARM
6615 if (((CPUARMState *)cpu_env)->eabi) {
9ee1fa2c
FB
6616 if (!lock_user_struct(VERIFY_WRITE, target_efl, arg3, 0))
6617 goto efault;
ce4defa0
PB
6618 target_efl->l_type = tswap16(fl.l_type);
6619 target_efl->l_whence = tswap16(fl.l_whence);
6620 target_efl->l_start = tswap64(fl.l_start);
6621 target_efl->l_len = tswap64(fl.l_len);
6622 target_efl->l_pid = tswapl(fl.l_pid);
53a5960a 6623 unlock_user_struct(target_efl, arg3, 1);
ce4defa0
PB
6624 } else
6625#endif
6626 {
9ee1fa2c
FB
6627 if (!lock_user_struct(VERIFY_WRITE, target_fl, arg3, 0))
6628 goto efault;
ce4defa0
PB
6629 target_fl->l_type = tswap16(fl.l_type);
6630 target_fl->l_whence = tswap16(fl.l_whence);
6631 target_fl->l_start = tswap64(fl.l_start);
6632 target_fl->l_len = tswap64(fl.l_len);
6633 target_fl->l_pid = tswapl(fl.l_pid);
53a5960a 6634 unlock_user_struct(target_fl, arg3, 1);
ce4defa0 6635 }
77e4672d
FB
6636 }
6637 break;
6638
b1e341eb
TS
6639 case TARGET_F_SETLK64:
6640 case TARGET_F_SETLKW64:
ce4defa0
PB
6641#ifdef TARGET_ARM
6642 if (((CPUARMState *)cpu_env)->eabi) {
9ee1fa2c
FB
6643 if (!lock_user_struct(VERIFY_READ, target_efl, arg3, 1))
6644 goto efault;
ce4defa0
PB
6645 fl.l_type = tswap16(target_efl->l_type);
6646 fl.l_whence = tswap16(target_efl->l_whence);
6647 fl.l_start = tswap64(target_efl->l_start);
6648 fl.l_len = tswap64(target_efl->l_len);
6649 fl.l_pid = tswapl(target_efl->l_pid);
53a5960a 6650 unlock_user_struct(target_efl, arg3, 0);
ce4defa0
PB
6651 } else
6652#endif
6653 {
9ee1fa2c
FB
6654 if (!lock_user_struct(VERIFY_READ, target_fl, arg3, 1))
6655 goto efault;
ce4defa0
PB
6656 fl.l_type = tswap16(target_fl->l_type);
6657 fl.l_whence = tswap16(target_fl->l_whence);
6658 fl.l_start = tswap64(target_fl->l_start);
6659 fl.l_len = tswap64(target_fl->l_len);
6660 fl.l_pid = tswapl(target_fl->l_pid);
53a5960a 6661 unlock_user_struct(target_fl, arg3, 0);
ce4defa0 6662 }
b1e341eb 6663 ret = get_errno(fcntl(arg1, cmd, &fl));
77e4672d 6664 break;
60cd49d5 6665 default:
5f106811 6666 ret = do_fcntl(arg1, arg2, arg3);
60cd49d5
FB
6667 break;
6668 }
77e4672d
FB
6669 break;
6670 }
60cd49d5 6671#endif
7d600c80
TS
6672#ifdef TARGET_NR_cacheflush
6673 case TARGET_NR_cacheflush:
6674 /* self-modifying code is handled automatically, so nothing needed */
6675 ret = 0;
6676 break;
6677#endif
ebc05488 6678#ifdef TARGET_NR_security
31e31b8a
FB
6679 case TARGET_NR_security:
6680 goto unimplemented;
c573ff67
FB
6681#endif
6682#ifdef TARGET_NR_getpagesize
6683 case TARGET_NR_getpagesize:
6684 ret = TARGET_PAGE_SIZE;
6685 break;
ebc05488 6686#endif
31e31b8a
FB
6687 case TARGET_NR_gettid:
6688 ret = get_errno(gettid());
6689 break;
e5febef5 6690#ifdef TARGET_NR_readahead
31e31b8a 6691 case TARGET_NR_readahead:
2054ac9b
AJ
6692#if TARGET_ABI_BITS == 32
6693#ifdef TARGET_ARM
6694 if (((CPUARMState *)cpu_env)->eabi)
6695 {
6696 arg2 = arg3;
6697 arg3 = arg4;
6698 arg4 = arg5;
6699 }
6700#endif
6701 ret = get_errno(readahead(arg1, ((off64_t)arg3 << 32) | arg2, arg4));
6702#else
6703 ret = get_errno(readahead(arg1, arg2, arg3));
6704#endif
6705 break;
e5febef5 6706#endif
ebc05488 6707#ifdef TARGET_NR_setxattr
31e31b8a
FB
6708 case TARGET_NR_setxattr:
6709 case TARGET_NR_lsetxattr:
6710 case TARGET_NR_fsetxattr:
6711 case TARGET_NR_getxattr:
6712 case TARGET_NR_lgetxattr:
6713 case TARGET_NR_fgetxattr:
6714 case TARGET_NR_listxattr:
6715 case TARGET_NR_llistxattr:
6716 case TARGET_NR_flistxattr:
6717 case TARGET_NR_removexattr:
6718 case TARGET_NR_lremovexattr:
6719 case TARGET_NR_fremovexattr:
6f932f91
AP
6720 ret = -TARGET_EOPNOTSUPP;
6721 break;
ebc05488
FB
6722#endif
6723#ifdef TARGET_NR_set_thread_area
5cd4393b 6724 case TARGET_NR_set_thread_area:
8d18e893 6725#if defined(TARGET_MIPS)
6f5b89a0
TS
6726 ((CPUMIPSState *) cpu_env)->tls_value = arg1;
6727 ret = 0;
6728 break;
ef96779b
EI
6729#elif defined(TARGET_CRIS)
6730 if (arg1 & 0xff)
6731 ret = -TARGET_EINVAL;
6732 else {
6733 ((CPUCRISState *) cpu_env)->pregs[PR_PID] = arg1;
6734 ret = 0;
6735 }
6736 break;
8d18e893
FB
6737#elif defined(TARGET_I386) && defined(TARGET_ABI32)
6738 ret = do_set_thread_area(cpu_env, arg1);
6739 break;
6f5b89a0
TS
6740#else
6741 goto unimplemented_nowarn;
6742#endif
6743#endif
6744#ifdef TARGET_NR_get_thread_area
5cd4393b 6745 case TARGET_NR_get_thread_area:
8d18e893
FB
6746#if defined(TARGET_I386) && defined(TARGET_ABI32)
6747 ret = do_get_thread_area(cpu_env, arg1);
6748#else
5cd4393b 6749 goto unimplemented_nowarn;
48dc41eb 6750#endif
8d18e893 6751#endif
48dc41eb
FB
6752#ifdef TARGET_NR_getdomainname
6753 case TARGET_NR_getdomainname:
6754 goto unimplemented_nowarn;
ebc05488 6755#endif
6f5b89a0 6756
b5906f95
TS
6757#ifdef TARGET_NR_clock_gettime
6758 case TARGET_NR_clock_gettime:
6759 {
6760 struct timespec ts;
6761 ret = get_errno(clock_gettime(arg1, &ts));
6762 if (!is_error(ret)) {
6763 host_to_target_timespec(arg2, &ts);
6764 }
6765 break;
6766 }
6767#endif
6768#ifdef TARGET_NR_clock_getres
6769 case TARGET_NR_clock_getres:
6770 {
6771 struct timespec ts;
6772 ret = get_errno(clock_getres(arg1, &ts));
6773 if (!is_error(ret)) {
6774 host_to_target_timespec(arg2, &ts);
6775 }
6776 break;
6777 }
6778#endif
63d7651b
PB
6779#ifdef TARGET_NR_clock_nanosleep
6780 case TARGET_NR_clock_nanosleep:
6781 {
6782 struct timespec ts;
6783 target_to_host_timespec(&ts, arg3);
6784 ret = get_errno(clock_nanosleep(arg1, arg2, &ts, arg4 ? &ts : NULL));
6785 if (arg4)
6786 host_to_target_timespec(arg4, &ts);
6787 break;
6788 }
6789#endif
b5906f95 6790
6f5b89a0
TS
6791#if defined(TARGET_NR_set_tid_address) && defined(__NR_set_tid_address)
6792 case TARGET_NR_set_tid_address:
579a97f7
FB
6793 ret = get_errno(set_tid_address((int *)g2h(arg1)));
6794 break;
6f5b89a0
TS
6795#endif
6796
3ae43202 6797#if defined(TARGET_NR_tkill) && defined(__NR_tkill)
4cae1d16 6798 case TARGET_NR_tkill:
4cb05961 6799 ret = get_errno(sys_tkill((int)arg1, target_to_host_signal(arg2)));
4cae1d16
TS
6800 break;
6801#endif
6802
3ae43202 6803#if defined(TARGET_NR_tgkill) && defined(__NR_tgkill)
71455574 6804 case TARGET_NR_tgkill:
4cb05961
PB
6805 ret = get_errno(sys_tgkill((int)arg1, (int)arg2,
6806 target_to_host_signal(arg3)));
71455574
TS
6807 break;
6808#endif
6809
4f2b1fe8
TS
6810#ifdef TARGET_NR_set_robust_list
6811 case TARGET_NR_set_robust_list:
6812 goto unimplemented_nowarn;
6813#endif
6814
9007f0ef
TS
6815#if defined(TARGET_NR_utimensat) && defined(__NR_utimensat)
6816 case TARGET_NR_utimensat:
6817 {
ebc996f3
RV
6818 struct timespec *tsp, ts[2];
6819 if (!arg3) {
6820 tsp = NULL;
6821 } else {
6822 target_to_host_timespec(ts, arg3);
6823 target_to_host_timespec(ts+1, arg3+sizeof(struct target_timespec));
6824 tsp = ts;
6825 }
9007f0ef 6826 if (!arg2)
ebc996f3 6827 ret = get_errno(sys_utimensat(arg1, NULL, tsp, arg4));
9007f0ef 6828 else {
579a97f7 6829 if (!(p = lock_user_string(arg2))) {
0da46a6e 6830 ret = -TARGET_EFAULT;
579a97f7
FB
6831 goto fail;
6832 }
ebc996f3 6833 ret = get_errno(sys_utimensat(arg1, path(p), tsp, arg4));
579a97f7 6834 unlock_user(p, arg2, 0);
9007f0ef
TS
6835 }
6836 }
6837 break;
6838#endif
2f7bb878 6839#if defined(CONFIG_USE_NPTL)
bd0c5661
PB
6840 case TARGET_NR_futex:
6841 ret = do_futex(arg1, arg2, arg3, arg4, arg5, arg6);
6842 break;
6843#endif
dbfe4c36 6844#if defined(TARGET_NR_inotify_init) && defined(__NR_inotify_init)
39b59763
AJ
6845 case TARGET_NR_inotify_init:
6846 ret = get_errno(sys_inotify_init());
6847 break;
6848#endif
dbfe4c36 6849#if defined(TARGET_NR_inotify_add_watch) && defined(__NR_inotify_add_watch)
39b59763
AJ
6850 case TARGET_NR_inotify_add_watch:
6851 p = lock_user_string(arg2);
6852 ret = get_errno(sys_inotify_add_watch(arg1, path(p), arg3));
6853 unlock_user(p, arg2, 0);
6854 break;
6855#endif
dbfe4c36 6856#if defined(TARGET_NR_inotify_rm_watch) && defined(__NR_inotify_rm_watch)
39b59763
AJ
6857 case TARGET_NR_inotify_rm_watch:
6858 ret = get_errno(sys_inotify_rm_watch(arg1, arg2));
6859 break;
6860#endif
9007f0ef 6861
24e1003a
AJ
6862#ifdef TARGET_NR_mq_open
6863 case TARGET_NR_mq_open:
6864 {
6865 struct mq_attr posix_mq_attr;
6866
6867 p = lock_user_string(arg1 - 1);
6868 if (arg4 != 0)
6869 copy_from_user_mq_attr (&posix_mq_attr, arg4);
6870 ret = get_errno(mq_open(p, arg2, arg3, &posix_mq_attr));
6871 unlock_user (p, arg1, 0);
6872 }
6873 break;
6874
6875 case TARGET_NR_mq_unlink:
6876 p = lock_user_string(arg1 - 1);
6877 ret = get_errno(mq_unlink(p));
6878 unlock_user (p, arg1, 0);
6879 break;
6880
6881 case TARGET_NR_mq_timedsend:
6882 {
6883 struct timespec ts;
6884
6885 p = lock_user (VERIFY_READ, arg2, arg3, 1);
6886 if (arg5 != 0) {
6887 target_to_host_timespec(&ts, arg5);
6888 ret = get_errno(mq_timedsend(arg1, p, arg3, arg4, &ts));
6889 host_to_target_timespec(arg5, &ts);
6890 }
6891 else
6892 ret = get_errno(mq_send(arg1, p, arg3, arg4));
6893 unlock_user (p, arg2, arg3);
6894 }
6895 break;
6896
6897 case TARGET_NR_mq_timedreceive:
6898 {
6899 struct timespec ts;
6900 unsigned int prio;
6901
6902 p = lock_user (VERIFY_READ, arg2, arg3, 1);
6903 if (arg5 != 0) {
6904 target_to_host_timespec(&ts, arg5);
6905 ret = get_errno(mq_timedreceive(arg1, p, arg3, &prio, &ts));
6906 host_to_target_timespec(arg5, &ts);
6907 }
6908 else
6909 ret = get_errno(mq_receive(arg1, p, arg3, &prio));
6910 unlock_user (p, arg2, arg3);
6911 if (arg4 != 0)
6912 put_user_u32(prio, arg4);
6913 }
6914 break;
6915
6916 /* Not implemented for now... */
6917/* case TARGET_NR_mq_notify: */
6918/* break; */
6919
6920 case TARGET_NR_mq_getsetattr:
6921 {
6922 struct mq_attr posix_mq_attr_in, posix_mq_attr_out;
6923 ret = 0;
6924 if (arg3 != 0) {
6925 ret = mq_getattr(arg1, &posix_mq_attr_out);
6926 copy_to_user_mq_attr(arg3, &posix_mq_attr_out);
6927 }
6928 if (arg2 != 0) {
6929 copy_from_user_mq_attr(&posix_mq_attr_in, arg2);
6930 ret |= mq_setattr(arg1, &posix_mq_attr_in, &posix_mq_attr_out);
6931 }
6932
6933 }
6934 break;
6935#endif
6936
3ce34dfb 6937#ifdef CONFIG_SPLICE
6938#ifdef TARGET_NR_tee
6939 case TARGET_NR_tee:
6940 {
6941 ret = get_errno(tee(arg1,arg2,arg3,arg4));
6942 }
6943 break;
6944#endif
6945#ifdef TARGET_NR_splice
6946 case TARGET_NR_splice:
6947 {
6948 loff_t loff_in, loff_out;
6949 loff_t *ploff_in = NULL, *ploff_out = NULL;
6950 if(arg2) {
6951 get_user_u64(loff_in, arg2);
6952 ploff_in = &loff_in;
6953 }
6954 if(arg4) {
6955 get_user_u64(loff_out, arg2);
6956 ploff_out = &loff_out;
6957 }
6958 ret = get_errno(splice(arg1, ploff_in, arg3, ploff_out, arg5, arg6));
6959 }
6960 break;
6961#endif
6962#ifdef TARGET_NR_vmsplice
6963 case TARGET_NR_vmsplice:
6964 {
6965 int count = arg3;
6966 struct iovec *vec;
6967
6968 vec = alloca(count * sizeof(struct iovec));
6969 if (lock_iovec(VERIFY_READ, vec, arg2, count, 1) < 0)
6970 goto efault;
6971 ret = get_errno(vmsplice(arg1, vec, count, arg4));
6972 unlock_iovec(vec, arg2, count, 0);
6973 }
6974 break;
6975#endif
6976#endif /* CONFIG_SPLICE */
31e31b8a
FB
6977 default:
6978 unimplemented:
5cd4393b 6979 gemu_log("qemu: Unsupported syscall: %d\n", num);
4f2b1fe8 6980#if defined(TARGET_NR_setxattr) || defined(TARGET_NR_get_thread_area) || defined(TARGET_NR_getdomainname) || defined(TARGET_NR_set_robust_list)
5cd4393b 6981 unimplemented_nowarn:
80a9d035 6982#endif
0da46a6e 6983 ret = -TARGET_ENOSYS;
31e31b8a
FB
6984 break;
6985 }
579a97f7 6986fail:
c573ff67 6987#ifdef DEBUG
0bf9e31a 6988 gemu_log(" = " TARGET_ABI_FMT_ld "\n", ret);
c573ff67 6989#endif
b92c47c1
TS
6990 if(do_strace)
6991 print_syscall_ret(num, ret);
31e31b8a 6992 return ret;
579a97f7
FB
6993efault:
6994 ret = -TARGET_EFAULT;
6995 goto fail;
31e31b8a 6996}