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