]> git.proxmox.com Git - qemu.git/blame - linux-user/syscall.c
projects / qemu.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Thumb shifter carry flag fixes.
[qemu.git] / linux-user / syscall.c
CommitLineData
31e31b8a
FB		 1/*
2 * Linux syscalls
3 *
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
18 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
19 */
20#include <stdlib.h>
21#include <stdio.h>
22#include <stdarg.h>
04369ff2 23#include <string.h>
31e31b8a
FB		 24#include <elf.h>
25#include <endian.h>
26#include <errno.h>
27#include <unistd.h>
28#include <fcntl.h>
7854b056 29#include <time.h>
31e31b8a 30#include <sys/types.h>
d08d3bb8
TS		 31#include <sys/ipc.h>
32#include <sys/msg.h>
31e31b8a
FB		 33#include <sys/wait.h>
34#include <sys/time.h>
35#include <sys/stat.h>
36#include <sys/mount.h>
39b9aae1 37#include <sys/prctl.h>
31e31b8a
FB		 38#include <sys/resource.h>
39#include <sys/mman.h>
40#include <sys/swap.h>
41#include <signal.h>
42#include <sched.h>
43#include <sys/socket.h>
44#include <sys/uio.h>
9de5e440 45#include <sys/poll.h>
32f36bce 46#include <sys/times.h>
8853f86e 47#include <sys/shm.h>
fa294816 48#include <sys/sem.h>
56c8f68f 49#include <sys/statfs.h>
ebc05488 50#include <utime.h>
a5448a7d 51#include <sys/sysinfo.h>
72f03900 52//#include <sys/user.h>
8853f86e 53#include <netinet/ip.h>
7854b056 54#include <netinet/tcp.h>
31e31b8a
FB		 55
56#define termios host_termios
57#define winsize host_winsize
58#define termio host_termio
04369ff2
FB		 59#define sgttyb host_sgttyb /* same as target */
60#define tchars host_tchars /* same as target */
61#define ltchars host_ltchars /* same as target */
31e31b8a
FB		 62
63#include <linux/termios.h>
64#include <linux/unistd.h>
65#include <linux/utsname.h>
66#include <linux/cdrom.h>
67#include <linux/hdreg.h>
68#include <linux/soundcard.h>
dab2ed99 69#include <linux/dirent.h>
19b84f3c 70#include <linux/kd.h>
31e31b8a 71
3ef693a0 72#include "qemu.h"
31e31b8a 73
72f03900 74//#define DEBUG
31e31b8a 75
e6e5906b 76#if defined(TARGET_I386) || defined(TARGET_ARM) || defined(TARGET_SPARC) \
56e0794a 77 || defined(TARGET_M68K) || defined(TARGET_SH4)
67867308
FB		 78/* 16 bit uid wrappers emulation */
79#define USE_UID16
80#endif
81
1a9353d2
FB		 82//#include <linux/msdos_fs.h>
83#define VFAT_IOCTL_READDIR_BOTH _IOR('r', 1, struct dirent [2])
84#define VFAT_IOCTL_READDIR_SHORT _IOR('r', 2, struct dirent [2])
85
70a194b9 86
70a194b9
FB		 87#undef _syscall0
88#undef _syscall1
89#undef _syscall2
90#undef _syscall3
91#undef _syscall4
92#undef _syscall5
83fcb515 93#undef _syscall6
70a194b9 94
83fcb515
FB		 95#define _syscall0(type,name) \
96type name (void) \
97{ \
98 return syscall(__NR_##name); \
99}
70a194b9 100
83fcb515
FB		 101#define _syscall1(type,name,type1,arg1) \
102type name (type1 arg1) \
103{ \
104 return syscall(__NR_##name, arg1); \
70a194b9
FB		 105}
106
83fcb515
FB		 107#define _syscall2(type,name,type1,arg1,type2,arg2) \
108type name (type1 arg1,type2 arg2) \
109{ \
110 return syscall(__NR_##name, arg1, arg2); \
70a194b9
FB		 111}
112
83fcb515
FB		 113#define _syscall3(type,name,type1,arg1,type2,arg2,type3,arg3) \
114type name (type1 arg1,type2 arg2,type3 arg3) \
115{ \
116 return syscall(__NR_##name, arg1, arg2, arg3); \
70a194b9
FB		 117}
118
83fcb515
FB		 119#define _syscall4(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4) \
120type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4) \
121{ \
122 return syscall(__NR_##name, arg1, arg2, arg3, arg4); \
70a194b9
FB		 123}
124
83fcb515
FB		 125#define _syscall5(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4, \
126 type5,arg5) \
127type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4,type5 arg5) \
128{ \
129 return syscall(__NR_##name, arg1, arg2, arg3, arg4, arg5); \
70a194b9
FB		 130}
131
83fcb515
FB		 132
133#define _syscall6(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4, \
134 type5,arg5,type6,arg6) \
135type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4,type5 arg5,type6 arg6) \
136{ \
137 return syscall(__NR_##name, arg1, arg2, arg3, arg4, arg5, arg6); \
70a194b9 138}
83fcb515 139
70a194b9 140
31e31b8a 141#define __NR_sys_uname __NR_uname
72f03900 142#define __NR_sys_getcwd1 __NR_getcwd
72f03900 143#define __NR_sys_getdents __NR_getdents
dab2ed99 144#define __NR_sys_getdents64 __NR_getdents64
66fb9763 145#define __NR_sys_rt_sigqueueinfo __NR_rt_sigqueueinfo
7494b0f9 146#define __NR_sys_syslog __NR_syslog
71455574 147#define __NR_sys_tgkill __NR_tgkill
4cae1d16 148#define __NR_sys_tkill __NR_tkill
31e31b8a 149
bc51c5c9 150#if defined(__alpha__) || defined (__ia64__) || defined(__x86_64__)
9af9eaaa
FB		 151#define __NR__llseek __NR_lseek
152#endif
153
72f03900 154#ifdef __NR_gettid
31e31b8a 155_syscall0(int, gettid)
72f03900
FB		 156#else
157static int gettid(void) {
158 return -ENOSYS;
159}
160#endif
31e31b8a 161_syscall1(int,sys_uname,struct new_utsname *,buf)
72f03900
FB		 162_syscall2(int,sys_getcwd1,char *,buf,size_t,size)
163_syscall3(int, sys_getdents, uint, fd, struct dirent *, dirp, uint, count);
dab2ed99 164_syscall3(int, sys_getdents64, uint, fd, struct dirent64 *, dirp, uint, count);
31e31b8a
FB		 165_syscall5(int, _llseek, uint, fd, ulong, hi, ulong, lo,
166 loff_t *, res, uint, wh);
66fb9763 167_syscall3(int,sys_rt_sigqueueinfo,int,pid,int,sig,siginfo_t *,uinfo)
7494b0f9 168_syscall3(int,sys_syslog,int,type,char*,bufp,int,len)
4cae1d16 169#ifdef TARGET_NR_tgkill
71455574 170_syscall3(int,sys_tgkill,int,tgid,int,pid,int,sig)
4cae1d16
TS		 171#endif
172#ifdef TARGET_NR_tkill
173_syscall2(int,sys_tkill,int,tid,int,sig)
174#endif
ec86b0fb
FB		 175#ifdef __NR_exit_group
176_syscall1(int,exit_group,int,error_code)
177#endif
6f5b89a0
TS		 178#if defined(TARGET_NR_set_tid_address) && defined(__NR_set_tid_address)
179_syscall1(int,set_tid_address,int *,tidptr)
180#endif
66fb9763
FB		 181
182extern int personality(int);
9de5e440
FB		 183extern int flock(int, int);
184extern int setfsuid(int);
185extern int setfsgid(int);
5cd4393b
FB		 186extern int setresuid(uid_t, uid_t, uid_t);
187extern int getresuid(uid_t *, uid_t *, uid_t *);
188extern int setresgid(gid_t, gid_t, gid_t);
189extern int getresgid(gid_t *, gid_t *, gid_t *);
19b84f3c 190extern int setgroups(int, gid_t *);
31e31b8a 191
637947f1 192/*
fe8f096b 193 * This list is the union of errno values overridden in asm-<arch>/errno.h
637947f1
TS		 194 * minus the errnos that are not actually generic to all archs.
195 */
196static uint16_t host_to_target_errno_table[1200] = {
197 [EIDRM] = TARGET_EIDRM,
198 [ECHRNG] = TARGET_ECHRNG,
199 [EL2NSYNC] = TARGET_EL2NSYNC,
200 [EL3HLT] = TARGET_EL3HLT,
201 [EL3RST] = TARGET_EL3RST,
202 [ELNRNG] = TARGET_ELNRNG,
203 [EUNATCH] = TARGET_EUNATCH,
204 [ENOCSI] = TARGET_ENOCSI,
205 [EL2HLT] = TARGET_EL2HLT,
206 [EDEADLK] = TARGET_EDEADLK,
207 [ENOLCK] = TARGET_ENOLCK,
208 [EBADE] = TARGET_EBADE,
209 [EBADR] = TARGET_EBADR,
210 [EXFULL] = TARGET_EXFULL,
211 [ENOANO] = TARGET_ENOANO,
212 [EBADRQC] = TARGET_EBADRQC,
213 [EBADSLT] = TARGET_EBADSLT,
214 [EBFONT] = TARGET_EBFONT,
215 [ENOSTR] = TARGET_ENOSTR,
216 [ENODATA] = TARGET_ENODATA,
217 [ETIME] = TARGET_ETIME,
218 [ENOSR] = TARGET_ENOSR,
219 [ENONET] = TARGET_ENONET,
220 [ENOPKG] = TARGET_ENOPKG,
221 [EREMOTE] = TARGET_EREMOTE,
222 [ENOLINK] = TARGET_ENOLINK,
223 [EADV] = TARGET_EADV,
224 [ESRMNT] = TARGET_ESRMNT,
225 [ECOMM] = TARGET_ECOMM,
226 [EPROTO] = TARGET_EPROTO,
227 [EDOTDOT] = TARGET_EDOTDOT,
228 [EMULTIHOP] = TARGET_EMULTIHOP,
229 [EBADMSG] = TARGET_EBADMSG,
230 [ENAMETOOLONG] = TARGET_ENAMETOOLONG,
231 [EOVERFLOW] = TARGET_EOVERFLOW,
232 [ENOTUNIQ] = TARGET_ENOTUNIQ,
233 [EBADFD] = TARGET_EBADFD,
234 [EREMCHG] = TARGET_EREMCHG,
235 [ELIBACC] = TARGET_ELIBACC,
236 [ELIBBAD] = TARGET_ELIBBAD,
237 [ELIBSCN] = TARGET_ELIBSCN,
238 [ELIBMAX] = TARGET_ELIBMAX,
239 [ELIBEXEC] = TARGET_ELIBEXEC,
240 [EILSEQ] = TARGET_EILSEQ,
241 [ENOSYS] = TARGET_ENOSYS,
242 [ELOOP] = TARGET_ELOOP,
243 [ERESTART] = TARGET_ERESTART,
244 [ESTRPIPE] = TARGET_ESTRPIPE,
245 [ENOTEMPTY] = TARGET_ENOTEMPTY,
246 [EUSERS] = TARGET_EUSERS,
247 [ENOTSOCK] = TARGET_ENOTSOCK,
248 [EDESTADDRREQ] = TARGET_EDESTADDRREQ,
249 [EMSGSIZE] = TARGET_EMSGSIZE,
250 [EPROTOTYPE] = TARGET_EPROTOTYPE,
251 [ENOPROTOOPT] = TARGET_ENOPROTOOPT,
252 [EPROTONOSUPPORT] = TARGET_EPROTONOSUPPORT,
253 [ESOCKTNOSUPPORT] = TARGET_ESOCKTNOSUPPORT,
254 [EOPNOTSUPP] = TARGET_EOPNOTSUPP,
255 [EPFNOSUPPORT] = TARGET_EPFNOSUPPORT,
256 [EAFNOSUPPORT] = TARGET_EAFNOSUPPORT,
257 [EADDRINUSE] = TARGET_EADDRINUSE,
258 [EADDRNOTAVAIL] = TARGET_EADDRNOTAVAIL,
259 [ENETDOWN] = TARGET_ENETDOWN,
260 [ENETUNREACH] = TARGET_ENETUNREACH,
261 [ENETRESET] = TARGET_ENETRESET,
262 [ECONNABORTED] = TARGET_ECONNABORTED,
263 [ECONNRESET] = TARGET_ECONNRESET,
264 [ENOBUFS] = TARGET_ENOBUFS,
265 [EISCONN] = TARGET_EISCONN,
266 [ENOTCONN] = TARGET_ENOTCONN,
267 [EUCLEAN] = TARGET_EUCLEAN,
268 [ENOTNAM] = TARGET_ENOTNAM,
269 [ENAVAIL] = TARGET_ENAVAIL,
270 [EISNAM] = TARGET_EISNAM,
271 [EREMOTEIO] = TARGET_EREMOTEIO,
272 [ESHUTDOWN] = TARGET_ESHUTDOWN,
273 [ETOOMANYREFS] = TARGET_ETOOMANYREFS,
274 [ETIMEDOUT] = TARGET_ETIMEDOUT,
275 [ECONNREFUSED] = TARGET_ECONNREFUSED,
276 [EHOSTDOWN] = TARGET_EHOSTDOWN,
277 [EHOSTUNREACH] = TARGET_EHOSTUNREACH,
278 [EALREADY] = TARGET_EALREADY,
279 [EINPROGRESS] = TARGET_EINPROGRESS,
280 [ESTALE] = TARGET_ESTALE,
281 [ECANCELED] = TARGET_ECANCELED,
282 [ENOMEDIUM] = TARGET_ENOMEDIUM,
283 [EMEDIUMTYPE] = TARGET_EMEDIUMTYPE,
284 [ENOKEY] = TARGET_ENOKEY,
285 [EKEYEXPIRED] = TARGET_EKEYEXPIRED,
286 [EKEYREVOKED] = TARGET_EKEYREVOKED,
287 [EKEYREJECTED] = TARGET_EKEYREJECTED,
288 [EOWNERDEAD] = TARGET_EOWNERDEAD,
289 [ENOTRECOVERABLE] = TARGET_ENOTRECOVERABLE,
290 };
291
292static inline int host_to_target_errno(int err)
293{
294 if(host_to_target_errno_table[err])
295 return host_to_target_errno_table[err];
296 return err;
297}
298
31e31b8a
FB		 299static inline long get_errno(long ret)
300{
301 if (ret == -1)
637947f1 302 return -host_to_target_errno(errno);
31e31b8a
FB		 303 else
304 return ret;
305}
306
307static inline int is_error(long ret)
308{
309 return (unsigned long)ret >= (unsigned long)(-4096);
310}
311
53a5960a
PB		 312static target_ulong target_brk;
313static target_ulong target_original_brk;
31e31b8a 314
53a5960a 315void target_set_brk(target_ulong new_brk)
31e31b8a 316{
4c1de73d 317 target_original_brk = target_brk = HOST_PAGE_ALIGN(new_brk);
31e31b8a
FB		 318}
319
53a5960a 320long do_brk(target_ulong new_brk)
31e31b8a 321{
53a5960a 322 target_ulong brk_page;
31e31b8a
FB		 323 long mapped_addr;
324 int new_alloc_size;
325
326 if (!new_brk)
53a5960a 327 return target_brk;
31e31b8a
FB		 328 if (new_brk < target_original_brk)
329 return -ENOMEM;
330
53a5960a 331 brk_page = HOST_PAGE_ALIGN(target_brk);
31e31b8a
FB		 332
333 /* If the new brk is less than this, set it and we're done... */
334 if (new_brk < brk_page) {
335 target_brk = new_brk;
53a5960a 336 return target_brk;
31e31b8a
FB		 337 }
338
339 /* We need to allocate more memory after the brk... */
54936004 340 new_alloc_size = HOST_PAGE_ALIGN(new_brk - brk_page + 1);
53a5960a 341 mapped_addr = get_errno(target_mmap(brk_page, new_alloc_size,
54936004
FB		 342 PROT_READ|PROT_WRITE,
343 MAP_ANON|MAP_FIXED|MAP_PRIVATE, 0, 0));
31e31b8a
FB		 344 if (is_error(mapped_addr)) {
345 return mapped_addr;
346 } else {
347 target_brk = new_brk;
53a5960a 348 return target_brk;
31e31b8a
FB		 349 }
350}
351
352static inline fd_set *target_to_host_fds(fd_set *fds,
353 target_long *target_fds, int n)
354{
7854b056 355#if !defined(BSWAP_NEEDED) && !defined(WORDS_BIGENDIAN)
31e31b8a
FB		 356 return (fd_set *)target_fds;
357#else
358 int i, b;
359 if (target_fds) {
360 FD_ZERO(fds);
361 for(i = 0;i < n; i++) {
362 b = (tswapl(target_fds[i / TARGET_LONG_BITS]) >>
363 (i & (TARGET_LONG_BITS - 1))) & 1;
364 if (b)
365 FD_SET(i, fds);
366 }
367 return fds;
368 } else {
369 return NULL;
370 }
371#endif
372}
373
374static inline void host_to_target_fds(target_long *target_fds,
375 fd_set *fds, int n)
376{
7854b056 377#if !defined(BSWAP_NEEDED) && !defined(WORDS_BIGENDIAN)
31e31b8a
FB		 378 /* nothing to do */
379#else
380 int i, nw, j, k;
381 target_long v;
382
383 if (target_fds) {
8853f86e 384 nw = (n + TARGET_LONG_BITS - 1) / TARGET_LONG_BITS;
31e31b8a
FB		 385 k = 0;
386 for(i = 0;i < nw; i++) {
387 v = 0;
388 for(j = 0; j < TARGET_LONG_BITS; j++) {
389 v |= ((FD_ISSET(k, fds) != 0) << j);
390 k++;
391 }
392 target_fds[i] = tswapl(v);
393 }
394 }
395#endif
396}
397
c596ed17
FB		 398#if defined(__alpha__)
399#define HOST_HZ 1024
400#else
401#define HOST_HZ 100
402#endif
403
404static inline long host_to_target_clock_t(long ticks)
405{
406#if HOST_HZ == TARGET_HZ
407 return ticks;
408#else
409 return ((int64_t)ticks * TARGET_HZ) / HOST_HZ;
410#endif
411}
412
53a5960a 413static inline void host_to_target_rusage(target_ulong target_addr,
b409186b
FB		 414 const struct rusage *rusage)
415{
53a5960a
PB		 416 struct target_rusage *target_rusage;
417
418 lock_user_struct(target_rusage, target_addr, 0);
b409186b
FB		 419 target_rusage->ru_utime.tv_sec = tswapl(rusage->ru_utime.tv_sec);
420 target_rusage->ru_utime.tv_usec = tswapl(rusage->ru_utime.tv_usec);
421 target_rusage->ru_stime.tv_sec = tswapl(rusage->ru_stime.tv_sec);
422 target_rusage->ru_stime.tv_usec = tswapl(rusage->ru_stime.tv_usec);
423 target_rusage->ru_maxrss = tswapl(rusage->ru_maxrss);
424 target_rusage->ru_ixrss = tswapl(rusage->ru_ixrss);
425 target_rusage->ru_idrss = tswapl(rusage->ru_idrss);
426 target_rusage->ru_isrss = tswapl(rusage->ru_isrss);
427 target_rusage->ru_minflt = tswapl(rusage->ru_minflt);
428 target_rusage->ru_majflt = tswapl(rusage->ru_majflt);
429 target_rusage->ru_nswap = tswapl(rusage->ru_nswap);
430 target_rusage->ru_inblock = tswapl(rusage->ru_inblock);
431 target_rusage->ru_oublock = tswapl(rusage->ru_oublock);
432 target_rusage->ru_msgsnd = tswapl(rusage->ru_msgsnd);
433 target_rusage->ru_msgrcv = tswapl(rusage->ru_msgrcv);
434 target_rusage->ru_nsignals = tswapl(rusage->ru_nsignals);
435 target_rusage->ru_nvcsw = tswapl(rusage->ru_nvcsw);
436 target_rusage->ru_nivcsw = tswapl(rusage->ru_nivcsw);
53a5960a 437 unlock_user_struct(target_rusage, target_addr, 1);
b409186b
FB		 438}
439
53a5960a
PB		 440static inline void target_to_host_timeval(struct timeval *tv,
441 target_ulong target_addr)
31e31b8a 442{
53a5960a
PB		 443 struct target_timeval *target_tv;
444
445 lock_user_struct(target_tv, target_addr, 1);
66fb9763
FB		 446 tv->tv_sec = tswapl(target_tv->tv_sec);
447 tv->tv_usec = tswapl(target_tv->tv_usec);
53a5960a 448 unlock_user_struct(target_tv, target_addr, 0);
31e31b8a
FB		 449}
450
53a5960a 451static inline void host_to_target_timeval(target_ulong target_addr,
5cd4393b 452 const struct timeval *tv)
31e31b8a 453{
53a5960a
PB		 454 struct target_timeval *target_tv;
455
456 lock_user_struct(target_tv, target_addr, 0);
66fb9763
FB		 457 target_tv->tv_sec = tswapl(tv->tv_sec);
458 target_tv->tv_usec = tswapl(tv->tv_usec);
53a5960a 459 unlock_user_struct(target_tv, target_addr, 1);
31e31b8a
FB		 460}
461
462
463static long do_select(long n,
53a5960a
PB		 464 target_ulong rfd_p, target_ulong wfd_p,
465 target_ulong efd_p, target_ulong target_tv)
31e31b8a
FB		 466{
467 fd_set rfds, wfds, efds;
468 fd_set *rfds_ptr, *wfds_ptr, *efds_ptr;
53a5960a 469 target_long *target_rfds, *target_wfds, *target_efds;
31e31b8a
FB		 470 struct timeval tv, *tv_ptr;
471 long ret;
53a5960a 472 int ok;
31e31b8a 473
53a5960a
PB		 474 if (rfd_p) {
475 target_rfds = lock_user(rfd_p, sizeof(target_long) * n, 1);
476 rfds_ptr = target_to_host_fds(&rfds, target_rfds, n);
477 } else {
478 target_rfds = NULL;
479 rfds_ptr = NULL;
480 }
481 if (wfd_p) {
482 target_wfds = lock_user(wfd_p, sizeof(target_long) * n, 1);
483 wfds_ptr = target_to_host_fds(&wfds, target_wfds, n);
484 } else {
485 target_wfds = NULL;
486 wfds_ptr = NULL;
487 }
488 if (efd_p) {
489 target_efds = lock_user(efd_p, sizeof(target_long) * n, 1);
490 efds_ptr = target_to_host_fds(&efds, target_efds, n);
491 } else {
492 target_efds = NULL;
493 efds_ptr = NULL;
494 }
31e31b8a
FB		 495
496 if (target_tv) {
5cd4393b 497 target_to_host_timeval(&tv, target_tv);
31e31b8a
FB		 498 tv_ptr = &tv;
499 } else {
500 tv_ptr = NULL;
501 }
502 ret = get_errno(select(n, rfds_ptr, wfds_ptr, efds_ptr, tv_ptr));
53a5960a
PB		 503 ok = !is_error(ret);
504
505 if (ok) {
31e31b8a
FB		 506 host_to_target_fds(target_rfds, rfds_ptr, n);
507 host_to_target_fds(target_wfds, wfds_ptr, n);
508 host_to_target_fds(target_efds, efds_ptr, n);
509
510 if (target_tv) {
5cd4393b 511 host_to_target_timeval(target_tv, &tv);
31e31b8a
FB		 512 }
513 }
53a5960a
PB		 514 if (target_rfds)
515 unlock_user(target_rfds, rfd_p, ok ? sizeof(target_long) * n : 0);
516 if (target_wfds)
517 unlock_user(target_wfds, wfd_p, ok ? sizeof(target_long) * n : 0);
518 if (target_efds)
519 unlock_user(target_efds, efd_p, ok ? sizeof(target_long) * n : 0);
520
31e31b8a
FB		 521 return ret;
522}
523
7854b056 524static inline void target_to_host_sockaddr(struct sockaddr *addr,
53a5960a 525 target_ulong target_addr,
7854b056
FB		 526 socklen_t len)
527{
53a5960a
PB		 528 struct target_sockaddr *target_saddr;
529
530 target_saddr = lock_user(target_addr, len, 1);
531 memcpy(addr, target_saddr, len);
532 addr->sa_family = tswap16(target_saddr->sa_family);
533 unlock_user(target_saddr, target_addr, 0);
7854b056
FB		 534}
535
53a5960a 536static inline void host_to_target_sockaddr(target_ulong target_addr,
7854b056
FB		 537 struct sockaddr *addr,
538 socklen_t len)
539{
53a5960a
PB		 540 struct target_sockaddr *target_saddr;
541
542 target_saddr = lock_user(target_addr, len, 0);
543 memcpy(target_saddr, addr, len);
544 target_saddr->sa_family = tswap16(addr->sa_family);
545 unlock_user(target_saddr, target_addr, len);
7854b056
FB		 546}
547
53a5960a 548/* ??? Should this also swap msgh->name? */
7854b056
FB		 549static inline void target_to_host_cmsg(struct msghdr *msgh,
550 struct target_msghdr *target_msgh)
551{
552 struct cmsghdr *cmsg = CMSG_FIRSTHDR(msgh);
553 struct target_cmsghdr *target_cmsg = TARGET_CMSG_FIRSTHDR(target_msgh);
554 socklen_t space = 0;
555
556 while (cmsg && target_cmsg) {
557 void *data = CMSG_DATA(cmsg);
558 void *target_data = TARGET_CMSG_DATA(target_cmsg);
559
560 int len = tswapl(target_cmsg->cmsg_len)
561 - TARGET_CMSG_ALIGN(sizeof (struct target_cmsghdr));
562
563 space += CMSG_SPACE(len);
564 if (space > msgh->msg_controllen) {
565 space -= CMSG_SPACE(len);
31febb71 566 gemu_log("Host cmsg overflow\n");
7854b056
FB		 567 break;
568 }
569
570 cmsg->cmsg_level = tswap32(target_cmsg->cmsg_level);
571 cmsg->cmsg_type = tswap32(target_cmsg->cmsg_type);
572 cmsg->cmsg_len = CMSG_LEN(len);
573
3532fa74 574 if (cmsg->cmsg_level != TARGET_SOL_SOCKET || cmsg->cmsg_type != SCM_RIGHTS) {
7854b056
FB		 575 gemu_log("Unsupported ancillary data: %d/%d\n", cmsg->cmsg_level, cmsg->cmsg_type);
576 memcpy(data, target_data, len);
577 } else {
578 int *fd = (int *)data;
579 int *target_fd = (int *)target_data;
580 int i, numfds = len / sizeof(int);
581
582 for (i = 0; i < numfds; i++)
583 fd[i] = tswap32(target_fd[i]);
584 }
585
586 cmsg = CMSG_NXTHDR(msgh, cmsg);
587 target_cmsg = TARGET_CMSG_NXTHDR(target_msgh, target_cmsg);
588 }
589
590 msgh->msg_controllen = space;
591}
592
53a5960a 593/* ??? Should this also swap msgh->name? */
7854b056
FB		 594static inline void host_to_target_cmsg(struct target_msghdr *target_msgh,
595 struct msghdr *msgh)
596{
597 struct cmsghdr *cmsg = CMSG_FIRSTHDR(msgh);
598 struct target_cmsghdr *target_cmsg = TARGET_CMSG_FIRSTHDR(target_msgh);
599 socklen_t space = 0;
600
601 while (cmsg && target_cmsg) {
602 void *data = CMSG_DATA(cmsg);
603 void *target_data = TARGET_CMSG_DATA(target_cmsg);
604
605 int len = cmsg->cmsg_len - CMSG_ALIGN(sizeof (struct cmsghdr));
606
607 space += TARGET_CMSG_SPACE(len);
608 if (space > tswapl(target_msgh->msg_controllen)) {
609 space -= TARGET_CMSG_SPACE(len);
31febb71 610 gemu_log("Target cmsg overflow\n");
7854b056
FB		 611 break;
612 }
613
614 target_cmsg->cmsg_level = tswap32(cmsg->cmsg_level);
615 target_cmsg->cmsg_type = tswap32(cmsg->cmsg_type);
616 target_cmsg->cmsg_len = tswapl(TARGET_CMSG_LEN(len));
617
3532fa74 618 if (cmsg->cmsg_level != TARGET_SOL_SOCKET || cmsg->cmsg_type != SCM_RIGHTS) {
7854b056
FB		 619 gemu_log("Unsupported ancillary data: %d/%d\n", cmsg->cmsg_level, cmsg->cmsg_type);
620 memcpy(target_data, data, len);
621 } else {
622 int *fd = (int *)data;
623 int *target_fd = (int *)target_data;
624 int i, numfds = len / sizeof(int);
625
626 for (i = 0; i < numfds; i++)
627 target_fd[i] = tswap32(fd[i]);
628 }
629
630 cmsg = CMSG_NXTHDR(msgh, cmsg);
631 target_cmsg = TARGET_CMSG_NXTHDR(target_msgh, target_cmsg);
632 }
633
634 msgh->msg_controllen = tswapl(space);
635}
636
637static long do_setsockopt(int sockfd, int level, int optname,
53a5960a 638 target_ulong optval, socklen_t optlen)
7854b056 639{
8853f86e
FB		 640 int val, ret;
641
642 switch(level) {
643 case SOL_TCP:
7854b056 644 /* TCP options all take an 'int' value. */
7854b056
FB		 645 if (optlen < sizeof(uint32_t))
646 return -EINVAL;
8853f86e 647
53a5960a 648 val = tget32(optval);
8853f86e
FB		 649 ret = get_errno(setsockopt(sockfd, level, optname, &val, sizeof(val)));
650 break;
651 case SOL_IP:
652 switch(optname) {
2efbe911
FB		 653 case IP_TOS:
654 case IP_TTL:
8853f86e 655 case IP_HDRINCL:
2efbe911
FB		 656 case IP_ROUTER_ALERT:
657 case IP_RECVOPTS:
658 case IP_RETOPTS:
659 case IP_PKTINFO:
660 case IP_MTU_DISCOVER:
661 case IP_RECVERR:
662 case IP_RECVTOS:
663#ifdef IP_FREEBIND
664 case IP_FREEBIND:
665#endif
666 case IP_MULTICAST_TTL:
667 case IP_MULTICAST_LOOP:
8853f86e
FB		 668 val = 0;
669 if (optlen >= sizeof(uint32_t)) {
53a5960a 670 val = tget32(optval);
8853f86e 671 } else if (optlen >= 1) {
53a5960a 672 val = tget8(optval);
8853f86e
FB		 673 }
674 ret = get_errno(setsockopt(sockfd, level, optname, &val, sizeof(val)));
675 break;
676 default:
677 goto unimplemented;
678 }
679 break;
3532fa74 680 case TARGET_SOL_SOCKET:
8853f86e
FB		 681 switch (optname) {
682 /* Options with 'int' argument. */
3532fa74
FB		 683 case TARGET_SO_DEBUG:
684 optname = SO_DEBUG;
685 break;
686 case TARGET_SO_REUSEADDR:
687 optname = SO_REUSEADDR;
688 break;
689 case TARGET_SO_TYPE:
690 optname = SO_TYPE;
691 break;
692 case TARGET_SO_ERROR:
693 optname = SO_ERROR;
694 break;
695 case TARGET_SO_DONTROUTE:
696 optname = SO_DONTROUTE;
697 break;
698 case TARGET_SO_BROADCAST:
699 optname = SO_BROADCAST;
700 break;
701 case TARGET_SO_SNDBUF:
702 optname = SO_SNDBUF;
703 break;
704 case TARGET_SO_RCVBUF:
705 optname = SO_RCVBUF;
706 break;
707 case TARGET_SO_KEEPALIVE:
708 optname = SO_KEEPALIVE;
709 break;
710 case TARGET_SO_OOBINLINE:
711 optname = SO_OOBINLINE;
712 break;
713 case TARGET_SO_NO_CHECK:
714 optname = SO_NO_CHECK;
715 break;
716 case TARGET_SO_PRIORITY:
717 optname = SO_PRIORITY;
718 break;
5e83e8e3 719#ifdef SO_BSDCOMPAT
3532fa74
FB		 720 case TARGET_SO_BSDCOMPAT:
721 optname = SO_BSDCOMPAT;
722 break;
5e83e8e3 723#endif
3532fa74
FB		 724 case TARGET_SO_PASSCRED:
725 optname = SO_PASSCRED;
726 break;
727 case TARGET_SO_TIMESTAMP:
728 optname = SO_TIMESTAMP;
729 break;
730 case TARGET_SO_RCVLOWAT:
731 optname = SO_RCVLOWAT;
732 break;
733 case TARGET_SO_RCVTIMEO:
734 optname = SO_RCVTIMEO;
735 break;
736 case TARGET_SO_SNDTIMEO:
737 optname = SO_SNDTIMEO;
738 break;
8853f86e
FB		 739 break;
740 default:
741 goto unimplemented;
742 }
3532fa74
FB		 743 if (optlen < sizeof(uint32_t))
744 return -EINVAL;
745
746 val = tget32(optval);
747 ret = get_errno(setsockopt(sockfd, SOL_SOCKET, optname, &val, sizeof(val)));
8853f86e 748 break;
7854b056 749 default:
8853f86e
FB		 750 unimplemented:
751 gemu_log("Unsupported setsockopt level=%d optname=%d \n", level, optname);
752 ret = -ENOSYS;
7854b056 753 }
8853f86e 754 return ret;
7854b056
FB		 755}
756
757static long do_getsockopt(int sockfd, int level, int optname,
53a5960a 758 target_ulong optval, target_ulong optlen)
7854b056 759{
8853f86e
FB		 760 int len, lv, val, ret;
761
762 switch(level) {
3532fa74
FB		 763 case TARGET_SOL_SOCKET:
764 level = SOL_SOCKET;
8853f86e 765 switch (optname) {
3532fa74
FB		 766 case TARGET_SO_LINGER:
767 case TARGET_SO_RCVTIMEO:
768 case TARGET_SO_SNDTIMEO:
769 case TARGET_SO_PEERCRED:
770 case TARGET_SO_PEERNAME:
8853f86e
FB		 771 /* These don't just return a single integer */
772 goto unimplemented;
773 default:
2efbe911
FB		 774 goto int_case;
775 }
776 break;
777 case SOL_TCP:
778 /* TCP options all take an 'int' value. */
779 int_case:
53a5960a 780 len = tget32(optlen);
2efbe911
FB		 781 if (len < 0)
782 return -EINVAL;
783 lv = sizeof(int);
784 ret = get_errno(getsockopt(sockfd, level, optname, &val, &lv));
785 if (ret < 0)
786 return ret;
787 val = tswap32(val);
788 if (len > lv)
789 len = lv;
53a5960a
PB		 790 if (len == 4)
791 tput32(optval, val);
792 else
793 tput8(optval, val);
794 tput32(optlen, len);
2efbe911
FB		 795 break;
796 case SOL_IP:
797 switch(optname) {
798 case IP_TOS:
799 case IP_TTL:
800 case IP_HDRINCL:
801 case IP_ROUTER_ALERT:
802 case IP_RECVOPTS:
803 case IP_RETOPTS:
804 case IP_PKTINFO:
805 case IP_MTU_DISCOVER:
806 case IP_RECVERR:
807 case IP_RECVTOS:
808#ifdef IP_FREEBIND
809 case IP_FREEBIND:
810#endif
811 case IP_MULTICAST_TTL:
812 case IP_MULTICAST_LOOP:
53a5960a 813 len = tget32(optlen);
8853f86e
FB		 814 if (len < 0)
815 return -EINVAL;
816 lv = sizeof(int);
817 ret = get_errno(getsockopt(sockfd, level, optname, &val, &lv));
818 if (ret < 0)
819 return ret;
2efbe911 820 if (len < sizeof(int) && len > 0 && val >= 0 && val < 255) {
2efbe911 821 len = 1;
53a5960a
PB		 822 tput32(optlen, len);
823 tput8(optval, val);
2efbe911 824 } else {
2efbe911
FB		 825 if (len > sizeof(int))
826 len = sizeof(int);
53a5960a
PB		 827 tput32(optlen, len);
828 tput32(optval, val);
2efbe911 829 }
8853f86e 830 break;
2efbe911
FB		 831 default:
832 goto unimplemented;
8853f86e
FB		 833 }
834 break;
835 default:
836 unimplemented:
837 gemu_log("getsockopt level=%d optname=%d not yet supported\n",
838 level, optname);
839 ret = -ENOSYS;
840 break;
841 }
842 return ret;
7854b056
FB		 843}
844
53a5960a
PB		 845static void lock_iovec(struct iovec *vec, target_ulong target_addr,
846 int count, int copy)
847{
848 struct target_iovec *target_vec;
849 target_ulong base;
850 int i;
851
852 target_vec = lock_user(target_addr, count * sizeof(struct target_iovec), 1);
853 for(i = 0;i < count; i++) {
854 base = tswapl(target_vec[i].iov_base);
855 vec[i].iov_len = tswapl(target_vec[i].iov_len);
856 vec[i].iov_base = lock_user(base, vec[i].iov_len, copy);
857 }
858 unlock_user (target_vec, target_addr, 0);
859}
860
861static void unlock_iovec(struct iovec *vec, target_ulong target_addr,
862 int count, int copy)
863{
864 struct target_iovec *target_vec;
865 target_ulong base;
866 int i;
867
868 target_vec = lock_user(target_addr, count * sizeof(struct target_iovec), 1);
869 for(i = 0;i < count; i++) {
870 base = tswapl(target_vec[i].iov_base);
871 unlock_user(vec[i].iov_base, base, copy ? vec[i].iov_len : 0);
872 }
873 unlock_user (target_vec, target_addr, 0);
874}
875
3532fa74
FB		 876static long do_socket(int domain, int type, int protocol)
877{
878#if defined(TARGET_MIPS)
879 switch(type) {
880 case TARGET_SOCK_DGRAM:
881 type = SOCK_DGRAM;
882 break;
883 case TARGET_SOCK_STREAM:
884 type = SOCK_STREAM;
885 break;
886 case TARGET_SOCK_RAW:
887 type = SOCK_RAW;
888 break;
889 case TARGET_SOCK_RDM:
890 type = SOCK_RDM;
891 break;
892 case TARGET_SOCK_SEQPACKET:
893 type = SOCK_SEQPACKET;
894 break;
895 case TARGET_SOCK_PACKET:
896 type = SOCK_PACKET;
897 break;
898 }
899#endif
900 return get_errno(socket(domain, type, protocol));
901}
902
903static long do_bind(int sockfd, target_ulong target_addr,
904 socklen_t addrlen)
905{
906 void *addr = alloca(addrlen);
907
908 target_to_host_sockaddr(addr, target_addr, addrlen);
909 return get_errno(bind(sockfd, addr, addrlen));
910}
911
912static long do_connect(int sockfd, target_ulong target_addr,
913 socklen_t addrlen)
914{
915 void *addr = alloca(addrlen);
916
917 target_to_host_sockaddr(addr, target_addr, addrlen);
918 return get_errno(connect(sockfd, addr, addrlen));
919}
920
921static long do_sendrecvmsg(int fd, target_ulong target_msg,
922 int flags, int send)
923{
924 long ret;
925 struct target_msghdr *msgp;
926 struct msghdr msg;
927 int count;
928 struct iovec *vec;
929 target_ulong target_vec;
930
931 lock_user_struct(msgp, target_msg, 1);
932 if (msgp->msg_name) {
933 msg.msg_namelen = tswap32(msgp->msg_namelen);
934 msg.msg_name = alloca(msg.msg_namelen);
935 target_to_host_sockaddr(msg.msg_name, tswapl(msgp->msg_name),
936 msg.msg_namelen);
937 } else {
938 msg.msg_name = NULL;
939 msg.msg_namelen = 0;
940 }
941 msg.msg_controllen = 2 * tswapl(msgp->msg_controllen);
942 msg.msg_control = alloca(msg.msg_controllen);
943 msg.msg_flags = tswap32(msgp->msg_flags);
944
945 count = tswapl(msgp->msg_iovlen);
946 vec = alloca(count * sizeof(struct iovec));
947 target_vec = tswapl(msgp->msg_iov);
948 lock_iovec(vec, target_vec, count, send);
949 msg.msg_iovlen = count;
950 msg.msg_iov = vec;
951
952 if (send) {
953 target_to_host_cmsg(&msg, msgp);
954 ret = get_errno(sendmsg(fd, &msg, flags));
955 } else {
956 ret = get_errno(recvmsg(fd, &msg, flags));
957 if (!is_error(ret))
958 host_to_target_cmsg(msgp, &msg);
959 }
960 unlock_iovec(vec, target_vec, count, !send);
961 return ret;
962}
963
1be9e1dc
PB		 964static long do_accept(int fd, target_ulong target_addr,
965 target_ulong target_addrlen)
966{
967 socklen_t addrlen = tget32(target_addrlen);
197ea35a 968 void *addr = alloca(addrlen);
1be9e1dc
PB		 969 long ret;
970
971 ret = get_errno(accept(fd, addr, &addrlen));
972 if (!is_error(ret)) {
973 host_to_target_sockaddr(target_addr, addr, addrlen);
974 tput32(target_addrlen, addrlen);
975 }
976 return ret;
977}
978
979static long do_getpeername(int fd, target_ulong target_addr,
980 target_ulong target_addrlen)
981{
982 socklen_t addrlen = tget32(target_addrlen);
01c227fb 983 void *addr = alloca(addrlen);
1be9e1dc
PB		 984 long ret;
985
986 ret = get_errno(getpeername(fd, addr, &addrlen));
987 if (!is_error(ret)) {
988 host_to_target_sockaddr(target_addr, addr, addrlen);
989 tput32(target_addrlen, addrlen);
990 }
991 return ret;
992}
993
994static long do_getsockname(int fd, target_ulong target_addr,
995 target_ulong target_addrlen)
996{
997 socklen_t addrlen = tget32(target_addrlen);
01c227fb 998 void *addr = alloca(addrlen);
1be9e1dc
PB		 999 long ret;
1000
1001 ret = get_errno(getsockname(fd, addr, &addrlen));
1002 if (!is_error(ret)) {
1003 host_to_target_sockaddr(target_addr, addr, addrlen);
1004 tput32(target_addrlen, addrlen);
1005 }
1006 return ret;
1007}
1008
1009static long do_socketpair(int domain, int type, int protocol,
1010 target_ulong target_tab)
1011{
1012 int tab[2];
1013 long ret;
1014
1015 ret = get_errno(socketpair(domain, type, protocol, tab));
1016 if (!is_error(ret)) {
1017 tput32(target_tab, tab[0]);
1018 tput32(target_tab + 4, tab[1]);
1019 }
1020 return ret;
1021}
1022
1023static long do_sendto(int fd, target_ulong msg, size_t len, int flags,
1024 target_ulong target_addr, socklen_t addrlen)
1025{
1026 void *addr;
1027 void *host_msg;
1028 long ret;
1029
1030 host_msg = lock_user(msg, len, 1);
1031 if (target_addr) {
1032 addr = alloca(addrlen);
1033 target_to_host_sockaddr(addr, target_addr, addrlen);
1034 ret = get_errno(sendto(fd, host_msg, len, flags, addr, addrlen));
1035 } else {
1036 ret = get_errno(send(fd, host_msg, len, flags));
1037 }
1038 unlock_user(host_msg, msg, 0);
1039 return ret;
1040}
1041
1042static long do_recvfrom(int fd, target_ulong msg, size_t len, int flags,
1043 target_ulong target_addr, target_ulong target_addrlen)
1044{
1045 socklen_t addrlen;
1046 void *addr;
1047 void *host_msg;
1048 long ret;
1049
1050 host_msg = lock_user(msg, len, 0);
1051 if (target_addr) {
1052 addrlen = tget32(target_addrlen);
1053 addr = alloca(addrlen);
1054 ret = get_errno(recvfrom(fd, host_msg, len, flags, addr, &addrlen));
1055 } else {
1056 addr = NULL; /* To keep compiler quiet. */
1057 ret = get_errno(recv(fd, host_msg, len, flags));
1058 }
1059 if (!is_error(ret)) {
1060 if (target_addr) {
1061 host_to_target_sockaddr(target_addr, addr, addrlen);
1062 tput32(target_addrlen, addrlen);
1063 }
1064 unlock_user(host_msg, msg, len);
1065 } else {
1066 unlock_user(host_msg, msg, 0);
1067 }
1068 return ret;
1069}
1070
85aa199a 1071static long do_socketcall(int num, target_ulong vptr)
31e31b8a
FB		 1072{
1073 long ret;
53a5960a 1074 const int n = sizeof(target_ulong);
31e31b8a
FB		 1075
1076 switch(num) {
1077 case SOCKOP_socket:
7854b056 1078 {
53a5960a
PB		 1079 int domain = tgetl(vptr);
1080 int type = tgetl(vptr + n);
1081 int protocol = tgetl(vptr + 2 * n);
3532fa74 1082 ret = do_socket(domain, type, protocol);
7854b056 1083 }
31e31b8a
FB		 1084 break;
1085 case SOCKOP_bind:
7854b056 1086 {
53a5960a
PB		 1087 int sockfd = tgetl(vptr);
1088 target_ulong target_addr = tgetl(vptr + n);
1089 socklen_t addrlen = tgetl(vptr + 2 * n);
3532fa74 1090 ret = do_bind(sockfd, target_addr, addrlen);
7854b056 1091 }
31e31b8a
FB		 1092 break;
1093 case SOCKOP_connect:
7854b056 1094 {
53a5960a
PB		 1095 int sockfd = tgetl(vptr);
1096 target_ulong target_addr = tgetl(vptr + n);
1097 socklen_t addrlen = tgetl(vptr + 2 * n);
3532fa74 1098 ret = do_connect(sockfd, target_addr, addrlen);
7854b056 1099 }
31e31b8a
FB		 1100 break;
1101 case SOCKOP_listen:
7854b056 1102 {
53a5960a
PB		 1103 int sockfd = tgetl(vptr);
1104 int backlog = tgetl(vptr + n);
7854b056
FB		 1105 ret = get_errno(listen(sockfd, backlog));
1106 }
31e31b8a
FB		 1107 break;
1108 case SOCKOP_accept:
1109 {
53a5960a
PB		 1110 int sockfd = tgetl(vptr);
1111 target_ulong target_addr = tgetl(vptr + n);
1112 target_ulong target_addrlen = tgetl(vptr + 2 * n);
1be9e1dc 1113 ret = do_accept(sockfd, target_addr, target_addrlen);
31e31b8a
FB		 1114 }
1115 break;
1116 case SOCKOP_getsockname:
1117 {
53a5960a
PB		 1118 int sockfd = tgetl(vptr);
1119 target_ulong target_addr = tgetl(vptr + n);
1120 target_ulong target_addrlen = tgetl(vptr + 2 * n);
1be9e1dc 1121 ret = do_getsockname(sockfd, target_addr, target_addrlen);
31e31b8a
FB		 1122 }
1123 break;
1124 case SOCKOP_getpeername:
1125 {
53a5960a
PB		 1126 int sockfd = tgetl(vptr);
1127 target_ulong target_addr = tgetl(vptr + n);
1128 target_ulong target_addrlen = tgetl(vptr + 2 * n);
1be9e1dc 1129 ret = do_getpeername(sockfd, target_addr, target_addrlen);
31e31b8a
FB		 1130 }
1131 break;
1132 case SOCKOP_socketpair:
1133 {
53a5960a
PB		 1134 int domain = tgetl(vptr);
1135 int type = tgetl(vptr + n);
1136 int protocol = tgetl(vptr + 2 * n);
1be9e1dc
PB		 1137 target_ulong tab = tgetl(vptr + 3 * n);
1138 ret = do_socketpair(domain, type, protocol, tab);
31e31b8a
FB		 1139 }
1140 break;
1141 case SOCKOP_send:
7854b056 1142 {
53a5960a
PB		 1143 int sockfd = tgetl(vptr);
1144 target_ulong msg = tgetl(vptr + n);
1145 size_t len = tgetl(vptr + 2 * n);
1146 int flags = tgetl(vptr + 3 * n);
1be9e1dc 1147 ret = do_sendto(sockfd, msg, len, flags, 0, 0);
7854b056 1148 }
31e31b8a
FB		 1149 break;
1150 case SOCKOP_recv:
7854b056 1151 {
53a5960a
PB		 1152 int sockfd = tgetl(vptr);
1153 target_ulong msg = tgetl(vptr + n);
1154 size_t len = tgetl(vptr + 2 * n);
1155 int flags = tgetl(vptr + 3 * n);
1be9e1dc 1156 ret = do_recvfrom(sockfd, msg, len, flags, 0, 0);
7854b056 1157 }
31e31b8a
FB		 1158 break;
1159 case SOCKOP_sendto:
7854b056 1160 {
53a5960a
PB		 1161 int sockfd = tgetl(vptr);
1162 target_ulong msg = tgetl(vptr + n);
1163 size_t len = tgetl(vptr + 2 * n);
1164 int flags = tgetl(vptr + 3 * n);
1be9e1dc 1165 target_ulong addr = tgetl(vptr + 4 * n);
53a5960a 1166 socklen_t addrlen = tgetl(vptr + 5 * n);
1be9e1dc 1167 ret = do_sendto(sockfd, msg, len, flags, addr, addrlen);
7854b056 1168 }
31e31b8a
FB		 1169 break;
1170 case SOCKOP_recvfrom:
1171 {
53a5960a
PB		 1172 int sockfd = tgetl(vptr);
1173 target_ulong msg = tgetl(vptr + n);
1174 size_t len = tgetl(vptr + 2 * n);
1175 int flags = tgetl(vptr + 3 * n);
1be9e1dc
PB		 1176 target_ulong addr = tgetl(vptr + 4 * n);
1177 target_ulong addrlen = tgetl(vptr + 5 * n);
1178 ret = do_recvfrom(sockfd, msg, len, flags, addr, addrlen);
31e31b8a
FB		 1179 }
1180 break;
1181 case SOCKOP_shutdown:
7854b056 1182 {
53a5960a
PB		 1183 int sockfd = tgetl(vptr);
1184 int how = tgetl(vptr + n);
7854b056
FB		 1185
1186 ret = get_errno(shutdown(sockfd, how));
1187 }
31e31b8a
FB		 1188 break;
1189 case SOCKOP_sendmsg:
1190 case SOCKOP_recvmsg:
1a9353d2
FB		 1191 {
1192 int fd;
53a5960a 1193 target_ulong target_msg;
3532fa74 1194 int flags;
1a9353d2 1195
53a5960a 1196 fd = tgetl(vptr);
3532fa74 1197 target_msg = tgetl(vptr + n);
53a5960a 1198 flags = tgetl(vptr + 2 * n);
3532fa74
FB		 1199
1200 ret = do_sendrecvmsg(fd, target_msg, flags,
1201 (num == SOCKOP_sendmsg));
1a9353d2
FB		 1202 }
1203 break;
31e31b8a 1204 case SOCKOP_setsockopt:
7854b056 1205 {
53a5960a
PB		 1206 int sockfd = tgetl(vptr);
1207 int level = tgetl(vptr + n);
1208 int optname = tgetl(vptr + 2 * n);
1209 target_ulong optval = tgetl(vptr + 3 * n);
1210 socklen_t optlen = tgetl(vptr + 4 * n);
7854b056
FB		 1211
1212 ret = do_setsockopt(sockfd, level, optname, optval, optlen);
1213 }
1214 break;
31e31b8a 1215 case SOCKOP_getsockopt:
7854b056 1216 {
53a5960a
PB		 1217 int sockfd = tgetl(vptr);
1218 int level = tgetl(vptr + n);
1219 int optname = tgetl(vptr + 2 * n);
1220 target_ulong optval = tgetl(vptr + 3 * n);
1221 target_ulong poptlen = tgetl(vptr + 4 * n);
7854b056 1222
8853f86e 1223 ret = do_getsockopt(sockfd, level, optname, optval, poptlen);
7854b056
FB		 1224 }
1225 break;
31e31b8a
FB		 1226 default:
1227 gemu_log("Unsupported socketcall: %d\n", num);
1228 ret = -ENOSYS;
1229 break;
1230 }
1231 return ret;
1232}
1233
8853f86e
FB		 1234#define N_SHM_REGIONS 32
1235
1236static struct shm_region {
1237 uint32_t start;
1238 uint32_t size;
1239} shm_regions[N_SHM_REGIONS];
1240
3eb6b044
TS		 1241struct target_ipc_perm
1242{
1243 target_long __key;
1244 target_ulong uid;
1245 target_ulong gid;
1246 target_ulong cuid;
1247 target_ulong cgid;
1248 unsigned short int mode;
1249 unsigned short int __pad1;
1250 unsigned short int __seq;
1251 unsigned short int __pad2;
1252 target_ulong __unused1;
1253 target_ulong __unused2;
1254};
1255
1256struct target_semid_ds
1257{
1258 struct target_ipc_perm sem_perm;
1259 target_ulong sem_otime;
1260 target_ulong __unused1;
1261 target_ulong sem_ctime;
1262 target_ulong __unused2;
1263 target_ulong sem_nsems;
1264 target_ulong __unused3;
1265 target_ulong __unused4;
1266};
1267
1268static inline void target_to_host_ipc_perm(struct ipc_perm *host_ip,
1269 target_ulong target_addr)
1270{
1271 struct target_ipc_perm *target_ip;
1272 struct target_semid_ds *target_sd;
1273
1274 lock_user_struct(target_sd, target_addr, 1);
1275 target_ip=&(target_sd->sem_perm);
1276 host_ip->__key = tswapl(target_ip->__key);
1277 host_ip->uid = tswapl(target_ip->uid);
1278 host_ip->gid = tswapl(target_ip->gid);
1279 host_ip->cuid = tswapl(target_ip->cuid);
1280 host_ip->cgid = tswapl(target_ip->cgid);
1281 host_ip->mode = tswapl(target_ip->mode);
1282 unlock_user_struct(target_sd, target_addr, 0);
1283}
1284
1285static inline void host_to_target_ipc_perm(target_ulong target_addr,
1286 struct ipc_perm *host_ip)
1287{
1288 struct target_ipc_perm *target_ip;
1289 struct target_semid_ds *target_sd;
1290
1291 lock_user_struct(target_sd, target_addr, 0);
1292 target_ip = &(target_sd->sem_perm);
1293 target_ip->__key = tswapl(host_ip->__key);
1294 target_ip->uid = tswapl(host_ip->uid);
1295 target_ip->gid = tswapl(host_ip->gid);
1296 target_ip->cuid = tswapl(host_ip->cuid);
1297 target_ip->cgid = tswapl(host_ip->cgid);
1298 target_ip->mode = tswapl(host_ip->mode);
1299 unlock_user_struct(target_sd, target_addr, 1);
1300}
1301
1302static inline void target_to_host_semid_ds(struct semid_ds *host_sd,
1303 target_ulong target_addr)
1304{
1305 struct target_semid_ds *target_sd;
1306
1307 lock_user_struct(target_sd, target_addr, 1);
1308 target_to_host_ipc_perm(&(host_sd->sem_perm),target_addr);
1309 host_sd->sem_nsems = tswapl(target_sd->sem_nsems);
1310 host_sd->sem_otime = tswapl(target_sd->sem_otime);
1311 host_sd->sem_ctime = tswapl(target_sd->sem_ctime);
1312 unlock_user_struct(target_sd, target_addr, 0);
1313}
1314
1315static inline void host_to_target_semid_ds(target_ulong target_addr,
1316 struct semid_ds *host_sd)
1317{
1318 struct target_semid_ds *target_sd;
1319
1320 lock_user_struct(target_sd, target_addr, 0);
1321 host_to_target_ipc_perm(target_addr,&(host_sd->sem_perm));
1322 target_sd->sem_nsems = tswapl(host_sd->sem_nsems);
1323 target_sd->sem_otime = tswapl(host_sd->sem_otime);
1324 target_sd->sem_ctime = tswapl(host_sd->sem_ctime);
1325 unlock_user_struct(target_sd, target_addr, 1);
1326}
1327
fa294816
TS		 1328union semun {
1329 int val;
3eb6b044 1330 struct semid_ds *buf;
fa294816
TS		 1331 unsigned short *array;
1332};
1333
3eb6b044
TS		 1334union target_semun {
1335 int val;
1336 target_long buf;
1337 unsigned short int *array;
1338};
1339
1340static inline void target_to_host_semun(unsigned long cmd,
1341 union semun *host_su,
1342 target_ulong target_addr,
1343 struct semid_ds *ds)
1344{
1345 union target_semun *target_su;
1346
1347 switch( cmd ) {
1348 case IPC_STAT:
1349 case IPC_SET:
1350 lock_user_struct(target_su, target_addr, 1);
1351 target_to_host_semid_ds(ds,target_su->buf);
1352 host_su->buf = ds;
1353 unlock_user_struct(target_su, target_addr, 0);
1354 break;
1355 case GETVAL:
1356 case SETVAL:
1357 lock_user_struct(target_su, target_addr, 1);
1358 host_su->val = tswapl(target_su->val);
1359 unlock_user_struct(target_su, target_addr, 0);
1360 break;
1361 case GETALL:
1362 case SETALL:
1363 lock_user_struct(target_su, target_addr, 1);
1364 *host_su->array = tswap16(*target_su->array);
1365 unlock_user_struct(target_su, target_addr, 0);
1366 break;
1367 default:
1368 gemu_log("semun operation not fully supported: %d\n", (int)cmd);
1369 }
1370}
1371
1372static inline void host_to_target_semun(unsigned long cmd,
1373 target_ulong target_addr,
1374 union semun *host_su,
1375 struct semid_ds *ds)
1376{
1377 union target_semun *target_su;
1378
1379 switch( cmd ) {
1380 case IPC_STAT:
1381 case IPC_SET:
1382 lock_user_struct(target_su, target_addr, 0);
1383 host_to_target_semid_ds(target_su->buf,ds);
1384 unlock_user_struct(target_su, target_addr, 1);
1385 break;
1386 case GETVAL:
1387 case SETVAL:
1388 lock_user_struct(target_su, target_addr, 0);
1389 target_su->val = tswapl(host_su->val);
1390 unlock_user_struct(target_su, target_addr, 1);
1391 break;
1392 case GETALL:
1393 case SETALL:
1394 lock_user_struct(target_su, target_addr, 0);
1395 *target_su->array = tswap16(*host_su->array);
1396 unlock_user_struct(target_su, target_addr, 1);
1397 break;
1398 default:
1399 gemu_log("semun operation not fully supported: %d\n", (int)cmd);
1400 }
1401}
1402
1403static inline long do_semctl(long first, long second, long third, long ptr)
1404{
1405 union semun arg;
1406 struct semid_ds dsarg;
1407 int cmd = third&0xff;
1408 long ret = 0;
1409
1410 switch( cmd ) {
1411 case GETVAL:
1412 target_to_host_semun(cmd,&arg,ptr,&dsarg);
1413 ret = get_errno(semctl(first, second, cmd, arg));
1414 host_to_target_semun(cmd,ptr,&arg,&dsarg);
1415 break;
1416 case SETVAL:
1417 target_to_host_semun(cmd,&arg,ptr,&dsarg);
1418 ret = get_errno(semctl(first, second, cmd, arg));
1419 host_to_target_semun(cmd,ptr,&arg,&dsarg);
1420 break;
1421 case GETALL:
1422 target_to_host_semun(cmd,&arg,ptr,&dsarg);
1423 ret = get_errno(semctl(first, second, cmd, arg));
1424 host_to_target_semun(cmd,ptr,&arg,&dsarg);
1425 break;
1426 case SETALL:
1427 target_to_host_semun(cmd,&arg,ptr,&dsarg);
1428 ret = get_errno(semctl(first, second, cmd, arg));
1429 host_to_target_semun(cmd,ptr,&arg,&dsarg);
1430 break;
1431 case IPC_STAT:
1432 target_to_host_semun(cmd,&arg,ptr,&dsarg);
1433 ret = get_errno(semctl(first, second, cmd, arg));
1434 host_to_target_semun(cmd,ptr,&arg,&dsarg);
1435 break;
1436 case IPC_SET:
1437 target_to_host_semun(cmd,&arg,ptr,&dsarg);
1438 ret = get_errno(semctl(first, second, cmd, arg));
1439 host_to_target_semun(cmd,ptr,&arg,&dsarg);
1440 break;
1441 default:
1442 ret = get_errno(semctl(first, second, cmd, arg));
1443 }
1444
1445 return ret;
1446}
1447
1bc012f6
TS		 1448struct target_msqid_ds
1449{
1450 struct target_ipc_perm msg_perm;
1451 target_ulong msg_stime;
1452 target_ulong __unused1;
1453 target_ulong msg_rtime;
1454 target_ulong __unused2;
1455 target_ulong msg_ctime;
1456 target_ulong __unused3;
1457 target_ulong __msg_cbytes;
1458 target_ulong msg_qnum;
1459 target_ulong msg_qbytes;
1460 target_ulong msg_lspid;
1461 target_ulong msg_lrpid;
1462 target_ulong __unused4;
1463 target_ulong __unused5;
1464};
1465
1466static inline void target_to_host_msqid_ds(struct msqid_ds *host_md,
1467 target_ulong target_addr)
1468{
1469 struct target_msqid_ds *target_md;
1470
1471 lock_user_struct(target_md, target_addr, 1);
1472 target_to_host_ipc_perm(&(host_md->msg_perm),target_addr);
1473 host_md->msg_stime = tswapl(target_md->msg_stime);
1474 host_md->msg_rtime = tswapl(target_md->msg_rtime);
1475 host_md->msg_ctime = tswapl(target_md->msg_ctime);
1476 host_md->__msg_cbytes = tswapl(target_md->__msg_cbytes);
1477 host_md->msg_qnum = tswapl(target_md->msg_qnum);
1478 host_md->msg_qbytes = tswapl(target_md->msg_qbytes);
1479 host_md->msg_lspid = tswapl(target_md->msg_lspid);
1480 host_md->msg_lrpid = tswapl(target_md->msg_lrpid);
1481 unlock_user_struct(target_md, target_addr, 0);
1482}
1483
1484static inline void host_to_target_msqid_ds(target_ulong target_addr,
1485 struct msqid_ds *host_md)
1486{
1487 struct target_msqid_ds *target_md;
1488
1489 lock_user_struct(target_md, target_addr, 0);
1490 host_to_target_ipc_perm(target_addr,&(host_md->msg_perm));
1491 target_md->msg_stime = tswapl(host_md->msg_stime);
1492 target_md->msg_rtime = tswapl(host_md->msg_rtime);
1493 target_md->msg_ctime = tswapl(host_md->msg_ctime);
1494 target_md->__msg_cbytes = tswapl(host_md->__msg_cbytes);
1495 target_md->msg_qnum = tswapl(host_md->msg_qnum);
1496 target_md->msg_qbytes = tswapl(host_md->msg_qbytes);
1497 target_md->msg_lspid = tswapl(host_md->msg_lspid);
1498 target_md->msg_lrpid = tswapl(host_md->msg_lrpid);
1499 unlock_user_struct(target_md, target_addr, 1);
1500}
1501
1502static inline long do_msgctl(long first, long second, long ptr)
1503{
1504 struct msqid_ds dsarg;
1505 int cmd = second&0xff;
1506 long ret = 0;
1507 switch( cmd ) {
1508 case IPC_STAT:
1509 case IPC_SET:
1510 target_to_host_msqid_ds(&dsarg,ptr);
1511 ret = get_errno(msgctl(first, cmd, &dsarg));
1512 host_to_target_msqid_ds(ptr,&dsarg);
1513 default:
1514 ret = get_errno(msgctl(first, cmd, &dsarg));
1515 }
1516 return ret;
1517}
1518
1519struct target_msgbuf {
1520 target_ulong mtype;
1521 char mtext[1];
1522};
1523
1524static inline long do_msgsnd(long msqid, long msgp, long msgsz, long msgflg)
1525{
1526 struct target_msgbuf *target_mb;
1527 struct msgbuf *host_mb;
1528 long ret = 0;
1529
1530 lock_user_struct(target_mb,msgp,0);
1531 host_mb = malloc(msgsz+sizeof(long));
1532 host_mb->mtype = tswapl(target_mb->mtype);
1533 memcpy(host_mb->mtext,target_mb->mtext,msgsz);
1534 ret = get_errno(msgsnd(msqid, host_mb, msgsz, msgflg));
1535 free(host_mb);
1536 unlock_user_struct(target_mb, msgp, 0);
1537
1538 return ret;
1539}
1540
1541static inline long do_msgrcv(long msqid, long msgp, long msgsz, long msgtype, long msgflg)
1542{
1543 struct target_msgbuf *target_mb;
1544 struct msgbuf *host_mb;
1545 long ret = 0;
1546
1547 lock_user_struct(target_mb, msgp, 0);
1548 host_mb = malloc(msgsz+sizeof(long));
1549 ret = get_errno(msgrcv(msqid, host_mb, msgsz, 1, msgflg));
1550 if (ret > 0)
1551 memcpy(target_mb->mtext, host_mb->mtext, ret);
1552 target_mb->mtype = tswapl(host_mb->mtype);
1553 free(host_mb);
1554 unlock_user_struct(target_mb, msgp, 0);
1555
1556 return ret;
1557}
1558
53a5960a 1559/* ??? This only works with linear mappings. */
8853f86e
FB		 1560static long do_ipc(long call, long first, long second, long third,
1561 long ptr, long fifth)
1562{
1563 int version;
1564 long ret = 0;
1565 unsigned long raddr;
1566 struct shmid_ds shm_info;
1567 int i;
1568
1569 version = call >> 16;
1570 call &= 0xffff;
1571
1572 switch (call) {
fa294816
TS		 1573 case IPCOP_semop:
1574 ret = get_errno(semop(first,(struct sembuf *) ptr, second));
1575 break;
1576
1577 case IPCOP_semget:
1578 ret = get_errno(semget(first, second, third));
1579 break;
1580
1581 case IPCOP_semctl:
3eb6b044 1582 ret = do_semctl(first, second, third, ptr);
fa294816
TS		 1583 break;
1584
1585 case IPCOP_semtimedop:
1586 gemu_log("Unsupported ipc call: %ld (version %d)\n", call, version);
1587 ret = -ENOSYS;
1588 break;
d96372ef
TS		 1589
1590 case IPCOP_msgget:
1591 ret = get_errno(msgget(first, second));
1592 break;
1593
1594 case IPCOP_msgsnd:
1bc012f6 1595 ret = do_msgsnd(first, ptr, second, third);
d96372ef
TS		 1596 break;
1597
1598 case IPCOP_msgctl:
1bc012f6 1599 ret = do_msgctl(first, second, ptr);
d96372ef
TS		 1600 break;
1601
1602 case IPCOP_msgrcv:
1bc012f6
TS		 1603 {
1604 struct ipc_kludge
1605 {
1606 void *__unbounded msgp;
1607 long int msgtyp;
1608 };
d96372ef 1609
1bc012f6
TS		 1610 struct ipc_kludge *foo = (struct ipc_kludge *) ptr;
1611 struct msgbuf *msgp = (struct msgbuf *) foo->msgp;
d96372ef 1612
1bc012f6 1613 ret = do_msgrcv(first, (long)msgp, second, 0, third);
d96372ef 1614
1bc012f6 1615 }
d96372ef
TS		 1616 break;
1617
8853f86e
FB		 1618 case IPCOP_shmat:
1619 /* SHM_* flags are the same on all linux platforms */
1620 ret = get_errno((long) shmat(first, (void *) ptr, second));
1621 if (is_error(ret))
1622 break;
1623 raddr = ret;
1624 /* find out the length of the shared memory segment */
1625
1626 ret = get_errno(shmctl(first, IPC_STAT, &shm_info));
1627 if (is_error(ret)) {
1628 /* can't get length, bail out */
1629 shmdt((void *) raddr);
1630 break;
1631 }
1632 page_set_flags(raddr, raddr + shm_info.shm_segsz,
1633 PAGE_VALID | PAGE_READ |
1634 ((second & SHM_RDONLY)? 0: PAGE_WRITE));
1635 for (i = 0; i < N_SHM_REGIONS; ++i) {
1636 if (shm_regions[i].start == 0) {
1637 shm_regions[i].start = raddr;
1638 shm_regions[i].size = shm_info.shm_segsz;
1639 break;
1640 }
1641 }
1642 if (put_user(raddr, (uint32_t *)third))
1643 return -EFAULT;
1644 ret = 0;
1645 break;
1646 case IPCOP_shmdt:
1647 for (i = 0; i < N_SHM_REGIONS; ++i) {
1648 if (shm_regions[i].start == ptr) {
1649 shm_regions[i].start = 0;
1650 page_set_flags(ptr, shm_regions[i].size, 0);
1651 break;
1652 }
1653 }
1654 ret = get_errno(shmdt((void *) ptr));
1655 break;
1656
1657 case IPCOP_shmget:
1658 /* IPC_* flag values are the same on all linux platforms */
1659 ret = get_errno(shmget(first, second, third));
1660 break;
1661
1662 /* IPC_* and SHM_* command values are the same on all linux platforms */
1663 case IPCOP_shmctl:
1664 switch(second) {
1665 case IPC_RMID:
1666 case SHM_LOCK:
1667 case SHM_UNLOCK:
1668 ret = get_errno(shmctl(first, second, NULL));
1669 break;
1670 default:
1671 goto unimplemented;
1672 }
1673 break;
1674 default:
1675 unimplemented:
1676 gemu_log("Unsupported ipc call: %ld (version %d)\n", call, version);
1677 ret = -ENOSYS;
1678 break;
1679 }
1680 return ret;
1681}
1682
31e31b8a
FB		 1683/* kernel structure types definitions */
1684#define IFNAMSIZ 16
1685
1686#define STRUCT(name, list...) STRUCT_ ## name,
1687#define STRUCT_SPECIAL(name) STRUCT_ ## name,
1688enum {
1689#include "syscall_types.h"
1690};
1691#undef STRUCT
1692#undef STRUCT_SPECIAL
1693
1694#define STRUCT(name, list...) const argtype struct_ ## name ## _def[] = { list, TYPE_NULL };
1695#define STRUCT_SPECIAL(name)
1696#include "syscall_types.h"
1697#undef STRUCT
1698#undef STRUCT_SPECIAL
1699
1700typedef struct IOCTLEntry {
2ab83ea7
FB		 1701 unsigned int target_cmd;
1702 unsigned int host_cmd;
31e31b8a
FB		 1703 const char *name;
1704 int access;
1a9353d2 1705 const argtype arg_type[5];
31e31b8a
FB		 1706} IOCTLEntry;
1707
1708#define IOC_R 0x0001
1709#define IOC_W 0x0002
1710#define IOC_RW (IOC_R | IOC_W)
1711
1712#define MAX_STRUCT_SIZE 4096
1713
2ab83ea7 1714IOCTLEntry ioctl_entries[] = {
31e31b8a
FB		 1715#define IOCTL(cmd, access, types...) \
1716 { TARGET_ ## cmd, cmd, #cmd, access, { types } },
1717#include "ioctls.h"
1718 { 0, 0, },
1719};
1720
53a5960a 1721/* ??? Implement proper locking for ioctls. */
31e31b8a
FB		 1722static long do_ioctl(long fd, long cmd, long arg)
1723{
1724 const IOCTLEntry *ie;
1725 const argtype *arg_type;
1726 long ret;
1727 uint8_t buf_temp[MAX_STRUCT_SIZE];
53a5960a
PB		 1728 int target_size;
1729 void *argptr;
31e31b8a
FB		 1730
1731 ie = ioctl_entries;
1732 for(;;) {
1733 if (ie->target_cmd == 0) {
1734 gemu_log("Unsupported ioctl: cmd=0x%04lx\n", cmd);
1735 return -ENOSYS;
1736 }
1737 if (ie->target_cmd == cmd)
1738 break;
1739 ie++;
1740 }
1741 arg_type = ie->arg_type;
9de5e440 1742#if defined(DEBUG)
72f03900
FB		 1743 gemu_log("ioctl: cmd=0x%04lx (%s)\n", cmd, ie->name);
1744#endif
31e31b8a
FB		 1745 switch(arg_type[0]) {
1746 case TYPE_NULL:
1747 /* no argument */
1748 ret = get_errno(ioctl(fd, ie->host_cmd));
1749 break;
1750 case TYPE_PTRVOID:
1751 case TYPE_INT:
1752 /* int argment */
1753 ret = get_errno(ioctl(fd, ie->host_cmd, arg));
1754 break;
1755 case TYPE_PTR:
1756 arg_type++;
53a5960a 1757 target_size = thunk_type_size(arg_type, 0);
31e31b8a
FB		 1758 switch(ie->access) {
1759 case IOC_R:
1760 ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
1761 if (!is_error(ret)) {
53a5960a
PB		 1762 argptr = lock_user(arg, target_size, 0);
1763 thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET);
1764 unlock_user(argptr, arg, target_size);
31e31b8a
FB		 1765 }
1766 break;
1767 case IOC_W:
53a5960a
PB		 1768 argptr = lock_user(arg, target_size, 1);
1769 thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
1770 unlock_user(argptr, arg, 0);
31e31b8a
FB		 1771 ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
1772 break;
1773 default:
1774 case IOC_RW:
53a5960a
PB		 1775 argptr = lock_user(arg, target_size, 1);
1776 thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
1777 unlock_user(argptr, arg, 0);
31e31b8a
FB		 1778 ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
1779 if (!is_error(ret)) {
53a5960a
PB		 1780 argptr = lock_user(arg, target_size, 0);
1781 thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET);
1782 unlock_user(argptr, arg, target_size);
31e31b8a
FB		 1783 }
1784 break;
1785 }
1786 break;
1787 default:
1788 gemu_log("Unsupported ioctl type: cmd=0x%04lx type=%d\n", cmd, arg_type[0]);
1789 ret = -ENOSYS;
1790 break;
1791 }
1792 return ret;
1793}
1794
1795bitmask_transtbl iflag_tbl[] = {
1796 { TARGET_IGNBRK, TARGET_IGNBRK, IGNBRK, IGNBRK },
1797 { TARGET_BRKINT, TARGET_BRKINT, BRKINT, BRKINT },
1798 { TARGET_IGNPAR, TARGET_IGNPAR, IGNPAR, IGNPAR },
1799 { TARGET_PARMRK, TARGET_PARMRK, PARMRK, PARMRK },
1800 { TARGET_INPCK, TARGET_INPCK, INPCK, INPCK },
1801 { TARGET_ISTRIP, TARGET_ISTRIP, ISTRIP, ISTRIP },
1802 { TARGET_INLCR, TARGET_INLCR, INLCR, INLCR },
1803 { TARGET_IGNCR, TARGET_IGNCR, IGNCR, IGNCR },
1804 { TARGET_ICRNL, TARGET_ICRNL, ICRNL, ICRNL },
1805 { TARGET_IUCLC, TARGET_IUCLC, IUCLC, IUCLC },
1806 { TARGET_IXON, TARGET_IXON, IXON, IXON },
1807 { TARGET_IXANY, TARGET_IXANY, IXANY, IXANY },
1808 { TARGET_IXOFF, TARGET_IXOFF, IXOFF, IXOFF },
1809 { TARGET_IMAXBEL, TARGET_IMAXBEL, IMAXBEL, IMAXBEL },
1810 { 0, 0, 0, 0 }
1811};
1812
1813bitmask_transtbl oflag_tbl[] = {
1814 { TARGET_OPOST, TARGET_OPOST, OPOST, OPOST },
1815 { TARGET_OLCUC, TARGET_OLCUC, OLCUC, OLCUC },
1816 { TARGET_ONLCR, TARGET_ONLCR, ONLCR, ONLCR },
1817 { TARGET_OCRNL, TARGET_OCRNL, OCRNL, OCRNL },
1818 { TARGET_ONOCR, TARGET_ONOCR, ONOCR, ONOCR },
1819 { TARGET_ONLRET, TARGET_ONLRET, ONLRET, ONLRET },
1820 { TARGET_OFILL, TARGET_OFILL, OFILL, OFILL },
1821 { TARGET_OFDEL, TARGET_OFDEL, OFDEL, OFDEL },
1822 { TARGET_NLDLY, TARGET_NL0, NLDLY, NL0 },
1823 { TARGET_NLDLY, TARGET_NL1, NLDLY, NL1 },
1824 { TARGET_CRDLY, TARGET_CR0, CRDLY, CR0 },
1825 { TARGET_CRDLY, TARGET_CR1, CRDLY, CR1 },
1826 { TARGET_CRDLY, TARGET_CR2, CRDLY, CR2 },
1827 { TARGET_CRDLY, TARGET_CR3, CRDLY, CR3 },
1828 { TARGET_TABDLY, TARGET_TAB0, TABDLY, TAB0 },
1829 { TARGET_TABDLY, TARGET_TAB1, TABDLY, TAB1 },
1830 { TARGET_TABDLY, TARGET_TAB2, TABDLY, TAB2 },
1831 { TARGET_TABDLY, TARGET_TAB3, TABDLY, TAB3 },
1832 { TARGET_BSDLY, TARGET_BS0, BSDLY, BS0 },
1833 { TARGET_BSDLY, TARGET_BS1, BSDLY, BS1 },
1834 { TARGET_VTDLY, TARGET_VT0, VTDLY, VT0 },
1835 { TARGET_VTDLY, TARGET_VT1, VTDLY, VT1 },
1836 { TARGET_FFDLY, TARGET_FF0, FFDLY, FF0 },
1837 { TARGET_FFDLY, TARGET_FF1, FFDLY, FF1 },
1838 { 0, 0, 0, 0 }
1839};
1840
1841bitmask_transtbl cflag_tbl[] = {
1842 { TARGET_CBAUD, TARGET_B0, CBAUD, B0 },
1843 { TARGET_CBAUD, TARGET_B50, CBAUD, B50 },
1844 { TARGET_CBAUD, TARGET_B75, CBAUD, B75 },
1845 { TARGET_CBAUD, TARGET_B110, CBAUD, B110 },
1846 { TARGET_CBAUD, TARGET_B134, CBAUD, B134 },
1847 { TARGET_CBAUD, TARGET_B150, CBAUD, B150 },
1848 { TARGET_CBAUD, TARGET_B200, CBAUD, B200 },
1849 { TARGET_CBAUD, TARGET_B300, CBAUD, B300 },
1850 { TARGET_CBAUD, TARGET_B600, CBAUD, B600 },
1851 { TARGET_CBAUD, TARGET_B1200, CBAUD, B1200 },
1852 { TARGET_CBAUD, TARGET_B1800, CBAUD, B1800 },
1853 { TARGET_CBAUD, TARGET_B2400, CBAUD, B2400 },
1854 { TARGET_CBAUD, TARGET_B4800, CBAUD, B4800 },
1855 { TARGET_CBAUD, TARGET_B9600, CBAUD, B9600 },
1856 { TARGET_CBAUD, TARGET_B19200, CBAUD, B19200 },
1857 { TARGET_CBAUD, TARGET_B38400, CBAUD, B38400 },
1858 { TARGET_CBAUD, TARGET_B57600, CBAUD, B57600 },
1859 { TARGET_CBAUD, TARGET_B115200, CBAUD, B115200 },
1860 { TARGET_CBAUD, TARGET_B230400, CBAUD, B230400 },
1861 { TARGET_CBAUD, TARGET_B460800, CBAUD, B460800 },
1862 { TARGET_CSIZE, TARGET_CS5, CSIZE, CS5 },
1863 { TARGET_CSIZE, TARGET_CS6, CSIZE, CS6 },
1864 { TARGET_CSIZE, TARGET_CS7, CSIZE, CS7 },
1865 { TARGET_CSIZE, TARGET_CS8, CSIZE, CS8 },
1866 { TARGET_CSTOPB, TARGET_CSTOPB, CSTOPB, CSTOPB },
1867 { TARGET_CREAD, TARGET_CREAD, CREAD, CREAD },
1868 { TARGET_PARENB, TARGET_PARENB, PARENB, PARENB },
1869 { TARGET_PARODD, TARGET_PARODD, PARODD, PARODD },
1870 { TARGET_HUPCL, TARGET_HUPCL, HUPCL, HUPCL },
1871 { TARGET_CLOCAL, TARGET_CLOCAL, CLOCAL, CLOCAL },
1872 { TARGET_CRTSCTS, TARGET_CRTSCTS, CRTSCTS, CRTSCTS },
1873 { 0, 0, 0, 0 }
1874};
1875
1876bitmask_transtbl lflag_tbl[] = {
1877 { TARGET_ISIG, TARGET_ISIG, ISIG, ISIG },
1878 { TARGET_ICANON, TARGET_ICANON, ICANON, ICANON },
1879 { TARGET_XCASE, TARGET_XCASE, XCASE, XCASE },
1880 { TARGET_ECHO, TARGET_ECHO, ECHO, ECHO },
1881 { TARGET_ECHOE, TARGET_ECHOE, ECHOE, ECHOE },
1882 { TARGET_ECHOK, TARGET_ECHOK, ECHOK, ECHOK },
1883 { TARGET_ECHONL, TARGET_ECHONL, ECHONL, ECHONL },
1884 { TARGET_NOFLSH, TARGET_NOFLSH, NOFLSH, NOFLSH },
1885 { TARGET_TOSTOP, TARGET_TOSTOP, TOSTOP, TOSTOP },
1886 { TARGET_ECHOCTL, TARGET_ECHOCTL, ECHOCTL, ECHOCTL },
1887 { TARGET_ECHOPRT, TARGET_ECHOPRT, ECHOPRT, ECHOPRT },
1888 { TARGET_ECHOKE, TARGET_ECHOKE, ECHOKE, ECHOKE },
1889 { TARGET_FLUSHO, TARGET_FLUSHO, FLUSHO, FLUSHO },
1890 { TARGET_PENDIN, TARGET_PENDIN, PENDIN, PENDIN },
1891 { TARGET_IEXTEN, TARGET_IEXTEN, IEXTEN, IEXTEN },
1892 { 0, 0, 0, 0 }
1893};
1894
1895static void target_to_host_termios (void *dst, const void *src)
1896{
1897 struct host_termios *host = dst;
1898 const struct target_termios *target = src;
1899
1900 host->c_iflag =
1901 target_to_host_bitmask(tswap32(target->c_iflag), iflag_tbl);
1902 host->c_oflag =
1903 target_to_host_bitmask(tswap32(target->c_oflag), oflag_tbl);
1904 host->c_cflag =
1905 target_to_host_bitmask(tswap32(target->c_cflag), cflag_tbl);
1906 host->c_lflag =
1907 target_to_host_bitmask(tswap32(target->c_lflag), lflag_tbl);
1908 host->c_line = target->c_line;
1909
1910 host->c_cc[VINTR] = target->c_cc[TARGET_VINTR];
1911 host->c_cc[VQUIT] = target->c_cc[TARGET_VQUIT];
1912 host->c_cc[VERASE] = target->c_cc[TARGET_VERASE];
1913 host->c_cc[VKILL] = target->c_cc[TARGET_VKILL];
1914 host->c_cc[VEOF] = target->c_cc[TARGET_VEOF];
1915 host->c_cc[VTIME] = target->c_cc[TARGET_VTIME];
1916 host->c_cc[VMIN] = target->c_cc[TARGET_VMIN];
1917 host->c_cc[VSWTC] = target->c_cc[TARGET_VSWTC];
1918 host->c_cc[VSTART] = target->c_cc[TARGET_VSTART];
1919 host->c_cc[VSTOP] = target->c_cc[TARGET_VSTOP];
1920 host->c_cc[VSUSP] = target->c_cc[TARGET_VSUSP];
1921 host->c_cc[VEOL] = target->c_cc[TARGET_VEOL];
1922 host->c_cc[VREPRINT] = target->c_cc[TARGET_VREPRINT];
1923 host->c_cc[VDISCARD] = target->c_cc[TARGET_VDISCARD];
1924 host->c_cc[VWERASE] = target->c_cc[TARGET_VWERASE];
1925 host->c_cc[VLNEXT] = target->c_cc[TARGET_VLNEXT];
1926 host->c_cc[VEOL2] = target->c_cc[TARGET_VEOL2];
1927}
1928
1929static void host_to_target_termios (void *dst, const void *src)
1930{
1931 struct target_termios *target = dst;
1932 const struct host_termios *host = src;
1933
1934 target->c_iflag =
1935 tswap32(host_to_target_bitmask(host->c_iflag, iflag_tbl));
1936 target->c_oflag =
1937 tswap32(host_to_target_bitmask(host->c_oflag, oflag_tbl));
1938 target->c_cflag =
1939 tswap32(host_to_target_bitmask(host->c_cflag, cflag_tbl));
1940 target->c_lflag =
1941 tswap32(host_to_target_bitmask(host->c_lflag, lflag_tbl));
1942 target->c_line = host->c_line;
1943
1944 target->c_cc[TARGET_VINTR] = host->c_cc[VINTR];
1945 target->c_cc[TARGET_VQUIT] = host->c_cc[VQUIT];
1946 target->c_cc[TARGET_VERASE] = host->c_cc[VERASE];
1947 target->c_cc[TARGET_VKILL] = host->c_cc[VKILL];
1948 target->c_cc[TARGET_VEOF] = host->c_cc[VEOF];
1949 target->c_cc[TARGET_VTIME] = host->c_cc[VTIME];
1950 target->c_cc[TARGET_VMIN] = host->c_cc[VMIN];
1951 target->c_cc[TARGET_VSWTC] = host->c_cc[VSWTC];
1952 target->c_cc[TARGET_VSTART] = host->c_cc[VSTART];
1953 target->c_cc[TARGET_VSTOP] = host->c_cc[VSTOP];
1954 target->c_cc[TARGET_VSUSP] = host->c_cc[VSUSP];
1955 target->c_cc[TARGET_VEOL] = host->c_cc[VEOL];
1956 target->c_cc[TARGET_VREPRINT] = host->c_cc[VREPRINT];
1957 target->c_cc[TARGET_VDISCARD] = host->c_cc[VDISCARD];
1958 target->c_cc[TARGET_VWERASE] = host->c_cc[VWERASE];
1959 target->c_cc[TARGET_VLNEXT] = host->c_cc[VLNEXT];
1960 target->c_cc[TARGET_VEOL2] = host->c_cc[VEOL2];
1961}
1962
1963StructEntry struct_termios_def = {
1964 .convert = { host_to_target_termios, target_to_host_termios },
1965 .size = { sizeof(struct target_termios), sizeof(struct host_termios) },
1966 .align = { __alignof__(struct target_termios), __alignof__(struct host_termios) },
1967};
1968
5286db75
FB		 1969static bitmask_transtbl mmap_flags_tbl[] = {
1970 { TARGET_MAP_SHARED, TARGET_MAP_SHARED, MAP_SHARED, MAP_SHARED },
1971 { TARGET_MAP_PRIVATE, TARGET_MAP_PRIVATE, MAP_PRIVATE, MAP_PRIVATE },
1972 { TARGET_MAP_FIXED, TARGET_MAP_FIXED, MAP_FIXED, MAP_FIXED },
1973 { TARGET_MAP_ANONYMOUS, TARGET_MAP_ANONYMOUS, MAP_ANONYMOUS, MAP_ANONYMOUS },
1974 { TARGET_MAP_GROWSDOWN, TARGET_MAP_GROWSDOWN, MAP_GROWSDOWN, MAP_GROWSDOWN },
1975 { TARGET_MAP_DENYWRITE, TARGET_MAP_DENYWRITE, MAP_DENYWRITE, MAP_DENYWRITE },
1976 { TARGET_MAP_EXECUTABLE, TARGET_MAP_EXECUTABLE, MAP_EXECUTABLE, MAP_EXECUTABLE },
1977 { TARGET_MAP_LOCKED, TARGET_MAP_LOCKED, MAP_LOCKED, MAP_LOCKED },
1978 { 0, 0, 0, 0 }
1979};
1980
ffa65c3b
FB		 1981static bitmask_transtbl fcntl_flags_tbl[] = {
1982 { TARGET_O_ACCMODE, TARGET_O_WRONLY, O_ACCMODE, O_WRONLY, },
1983 { TARGET_O_ACCMODE, TARGET_O_RDWR, O_ACCMODE, O_RDWR, },
1984 { TARGET_O_CREAT, TARGET_O_CREAT, O_CREAT, O_CREAT, },
1985 { TARGET_O_EXCL, TARGET_O_EXCL, O_EXCL, O_EXCL, },
1986 { TARGET_O_NOCTTY, TARGET_O_NOCTTY, O_NOCTTY, O_NOCTTY, },
1987 { TARGET_O_TRUNC, TARGET_O_TRUNC, O_TRUNC, O_TRUNC, },
1988 { TARGET_O_APPEND, TARGET_O_APPEND, O_APPEND, O_APPEND, },
1989 { TARGET_O_NONBLOCK, TARGET_O_NONBLOCK, O_NONBLOCK, O_NONBLOCK, },
1990 { TARGET_O_SYNC, TARGET_O_SYNC, O_SYNC, O_SYNC, },
1991 { TARGET_FASYNC, TARGET_FASYNC, FASYNC, FASYNC, },
1992 { TARGET_O_DIRECTORY, TARGET_O_DIRECTORY, O_DIRECTORY, O_DIRECTORY, },
1993 { TARGET_O_NOFOLLOW, TARGET_O_NOFOLLOW, O_NOFOLLOW, O_NOFOLLOW, },
1994 { TARGET_O_LARGEFILE, TARGET_O_LARGEFILE, O_LARGEFILE, O_LARGEFILE, },
121061dc 1995#if defined(O_DIRECT)
ffa65c3b 1996 { TARGET_O_DIRECT, TARGET_O_DIRECT, O_DIRECT, O_DIRECT, },
121061dc 1997#endif
ffa65c3b
FB		 1998 { 0, 0, 0, 0 }
1999};
2000
2ab83ea7 2001#if defined(TARGET_I386)
6dbad63e
FB		 2002
2003/* NOTE: there is really one LDT for all the threads */
2004uint8_t *ldt_table;
2005
53a5960a 2006static int read_ldt(target_ulong ptr, unsigned long bytecount)
6dbad63e
FB		 2007{
2008 int size;
53a5960a 2009 void *p;
6dbad63e
FB		 2010
2011 if (!ldt_table)
2012 return 0;
2013 size = TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE;
2014 if (size > bytecount)
2015 size = bytecount;
53a5960a
PB		 2016 p = lock_user(ptr, size, 0);
2017 /* ??? Shoudl this by byteswapped? */
2018 memcpy(p, ldt_table, size);
2019 unlock_user(p, ptr, size);
6dbad63e
FB		 2020 return size;
2021}
2022
2023/* XXX: add locking support */
2024static int write_ldt(CPUX86State *env,
53a5960a 2025 target_ulong ptr, unsigned long bytecount, int oldmode)
6dbad63e
FB		 2026{
2027 struct target_modify_ldt_ldt_s ldt_info;
53a5960a 2028 struct target_modify_ldt_ldt_s *target_ldt_info;
6dbad63e
FB		 2029 int seg_32bit, contents, read_exec_only, limit_in_pages;
2030 int seg_not_present, useable;
2031 uint32_t *lp, entry_1, entry_2;
2032
2033 if (bytecount != sizeof(ldt_info))
2034 return -EINVAL;
53a5960a
PB		 2035 lock_user_struct(target_ldt_info, ptr, 1);
2036 ldt_info.entry_number = tswap32(target_ldt_info->entry_number);
2037 ldt_info.base_addr = tswapl(target_ldt_info->base_addr);
2038 ldt_info.limit = tswap32(target_ldt_info->limit);
2039 ldt_info.flags = tswap32(target_ldt_info->flags);
2040 unlock_user_struct(target_ldt_info, ptr, 0);
6dbad63e
FB		 2041
2042 if (ldt_info.entry_number >= TARGET_LDT_ENTRIES)
2043 return -EINVAL;
2044 seg_32bit = ldt_info.flags & 1;
2045 contents = (ldt_info.flags >> 1) & 3;
2046 read_exec_only = (ldt_info.flags >> 3) & 1;
2047 limit_in_pages = (ldt_info.flags >> 4) & 1;
2048 seg_not_present = (ldt_info.flags >> 5) & 1;
2049 useable = (ldt_info.flags >> 6) & 1;
2050
2051 if (contents == 3) {
2052 if (oldmode)
2053 return -EINVAL;
2054 if (seg_not_present == 0)
2055 return -EINVAL;
2056 }
2057 /* allocate the LDT */
2058 if (!ldt_table) {
2059 ldt_table = malloc(TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE);
2060 if (!ldt_table)
2061 return -ENOMEM;
2062 memset(ldt_table, 0, TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE);
53a5960a 2063 env->ldt.base = h2g(ldt_table);
6dbad63e
FB		 2064 env->ldt.limit = 0xffff;
2065 }
2066
2067 /* NOTE: same code as Linux kernel */
2068 /* Allow LDTs to be cleared by the user. */
2069 if (ldt_info.base_addr == 0 && ldt_info.limit == 0) {
2070 if (oldmode ||
2071 (contents == 0 &&
2072 read_exec_only == 1 &&
2073 seg_32bit == 0 &&
2074 limit_in_pages == 0 &&
2075 seg_not_present == 1 &&
2076 useable == 0 )) {
2077 entry_1 = 0;
2078 entry_2 = 0;
2079 goto install;
2080 }
2081 }
2082
2083 entry_1 = ((ldt_info.base_addr & 0x0000ffff) << 16) |
2084 (ldt_info.limit & 0x0ffff);
2085 entry_2 = (ldt_info.base_addr & 0xff000000) |
2086 ((ldt_info.base_addr & 0x00ff0000) >> 16) |
2087 (ldt_info.limit & 0xf0000) |
2088 ((read_exec_only ^ 1) << 9) |
2089 (contents << 10) |
2090 ((seg_not_present ^ 1) << 15) |
2091 (seg_32bit << 22) |
2092 (limit_in_pages << 23) |
2093 0x7000;
2094 if (!oldmode)
2095 entry_2 |= (useable << 20);
14ae3ba7 2096
6dbad63e
FB		 2097 /* Install the new entry ... */
2098install:
2099 lp = (uint32_t *)(ldt_table + (ldt_info.entry_number << 3));
2100 lp[0] = tswap32(entry_1);
2101 lp[1] = tswap32(entry_2);
2102 return 0;
2103}
2104
2105/* specific and weird i386 syscalls */
53a5960a 2106int do_modify_ldt(CPUX86State *env, int func, target_ulong ptr, unsigned long bytecount)
6dbad63e
FB		 2107{
2108 int ret = -ENOSYS;
2109
2110 switch (func) {
2111 case 0:
2112 ret = read_ldt(ptr, bytecount);
2113 break;
2114 case 1:
2115 ret = write_ldt(env, ptr, bytecount, 1);
2116 break;
2117 case 0x11:
2118 ret = write_ldt(env, ptr, bytecount, 0);
2119 break;
2120 }
2121 return ret;
2122}
1b6b029e 2123
2ab83ea7
FB		 2124#endif /* defined(TARGET_I386) */
2125
1b6b029e
FB		 2126/* this stack is the equivalent of the kernel stack associated with a
2127 thread/process */
2128#define NEW_STACK_SIZE 8192
2129
2130static int clone_func(void *arg)
2131{
2ab83ea7 2132 CPUState *env = arg;
1b6b029e
FB		 2133 cpu_loop(env);
2134 /* never exits */
2135 return 0;
2136}
2137
2ab83ea7 2138int do_fork(CPUState *env, unsigned int flags, unsigned long newsp)
1b6b029e
FB		 2139{
2140 int ret;
5cd4393b 2141 TaskState *ts;
1b6b029e 2142 uint8_t *new_stack;
2ab83ea7 2143 CPUState *new_env;
1b6b029e
FB		 2144
2145 if (flags & CLONE_VM) {
5cd4393b
FB		 2146 ts = malloc(sizeof(TaskState) + NEW_STACK_SIZE);
2147 memset(ts, 0, sizeof(TaskState));
2148 new_stack = ts->stack;
2149 ts->used = 1;
2150 /* add in task state list */
2151 ts->next = first_task_state;
2152 first_task_state = ts;
1b6b029e 2153 /* we create a new CPU instance. */
c5be9f08 2154 new_env = cpu_copy(env);
2ab83ea7
FB		 2155#if defined(TARGET_I386)
2156 if (!newsp)
2157 newsp = env->regs[R_ESP];
1b6b029e
FB		 2158 new_env->regs[R_ESP] = newsp;
2159 new_env->regs[R_EAX] = 0;
2ab83ea7
FB		 2160#elif defined(TARGET_ARM)
2161 if (!newsp)
2162 newsp = env->regs[13];
2163 new_env->regs[13] = newsp;
2164 new_env->regs[0] = 0;
ebc05488 2165#elif defined(TARGET_SPARC)
48dc41eb
FB		 2166 if (!newsp)
2167 newsp = env->regwptr[22];
2168 new_env->regwptr[22] = newsp;
2169 new_env->regwptr[0] = 0;
2170 /* XXXXX */
67867308 2171 printf ("HELPME: %s:%d\n", __FILE__, __LINE__);
e6e5906b
PB		 2172#elif defined(TARGET_M68K)
2173 if (!newsp)
2174 newsp = env->aregs[7];
2175 new_env->aregs[7] = newsp;
2176 new_env->dregs[0] = 0;
2177 /* ??? is this sufficient? */
048f6b4d 2178#elif defined(TARGET_MIPS)
388bb21a
TS		 2179 if (!newsp)
2180 newsp = env->gpr[29];
2181 new_env->gpr[29] = newsp;
67867308
FB		 2182#elif defined(TARGET_PPC)
2183 if (!newsp)
2184 newsp = env->gpr[1];
2185 new_env->gpr[1] = newsp;
2186 {
2187 int i;
2188 for (i = 7; i < 32; i++)
2189 new_env->gpr[i] = 0;
2190 }
fdf9b3e8
FB		 2191#elif defined(TARGET_SH4)
2192 if (!newsp)
2193 newsp = env->gregs[15];
2194 new_env->gregs[15] = newsp;
2195 /* XXXXX */
7a3148a9
JM		 2196#elif defined(TARGET_ALPHA)
2197 if (!newsp)
2198 newsp = env->ir[30];
2199 new_env->ir[30] = newsp;
2200 /* ? */
2201 {
2202 int i;
2203 for (i = 7; i < 30; i++)
2204 new_env->ir[i] = 0;
2205 }
2ab83ea7
FB		 2206#else
2207#error unsupported target CPU
2208#endif
5cd4393b 2209 new_env->opaque = ts;
27725c1d 2210#ifdef __ia64__
fd4a43e4 2211 ret = __clone2(clone_func, new_stack + NEW_STACK_SIZE, flags, new_env);
27725c1d
FB		 2212#else
2213 ret = clone(clone_func, new_stack + NEW_STACK_SIZE, flags, new_env);
2214#endif
1b6b029e
FB		 2215 } else {
2216 /* if no CLONE_VM, we consider it is a fork */
2217 if ((flags & ~CSIGNAL) != 0)
2218 return -EINVAL;
2219 ret = fork();
2220 }
2221 return ret;
2222}
2223
53a5960a 2224static long do_fcntl(int fd, int cmd, target_ulong arg)
7775e9ec
FB		 2225{
2226 struct flock fl;
53a5960a 2227 struct target_flock *target_fl;
43f238d7
TS		 2228 struct flock64 fl64;
2229 struct target_flock64 *target_fl64;
7775e9ec 2230 long ret;
53a5960a 2231
7775e9ec
FB		 2232 switch(cmd) {
2233 case TARGET_F_GETLK:
5813427b
TS		 2234 lock_user_struct(target_fl, arg, 1);
2235 fl.l_type = tswap16(target_fl->l_type);
2236 fl.l_whence = tswap16(target_fl->l_whence);
2237 fl.l_start = tswapl(target_fl->l_start);
2238 fl.l_len = tswapl(target_fl->l_len);
2239 fl.l_pid = tswapl(target_fl->l_pid);
2240 unlock_user_struct(target_fl, arg, 0);
7775e9ec
FB		 2241 ret = fcntl(fd, cmd, &fl);
2242 if (ret == 0) {
53a5960a 2243 lock_user_struct(target_fl, arg, 0);
7775e9ec
FB		 2244 target_fl->l_type = tswap16(fl.l_type);
2245 target_fl->l_whence = tswap16(fl.l_whence);
2246 target_fl->l_start = tswapl(fl.l_start);
2247 target_fl->l_len = tswapl(fl.l_len);
2248 target_fl->l_pid = tswapl(fl.l_pid);
53a5960a 2249 unlock_user_struct(target_fl, arg, 1);
7775e9ec
FB		 2250 }
2251 break;
2252
2253 case TARGET_F_SETLK:
2254 case TARGET_F_SETLKW:
53a5960a 2255 lock_user_struct(target_fl, arg, 1);
7775e9ec
FB		 2256 fl.l_type = tswap16(target_fl->l_type);
2257 fl.l_whence = tswap16(target_fl->l_whence);
2258 fl.l_start = tswapl(target_fl->l_start);
2259 fl.l_len = tswapl(target_fl->l_len);
2260 fl.l_pid = tswapl(target_fl->l_pid);
53a5960a 2261 unlock_user_struct(target_fl, arg, 0);
7775e9ec
FB		 2262 ret = fcntl(fd, cmd, &fl);
2263 break;
2264
2265 case TARGET_F_GETLK64:
5813427b
TS		 2266 lock_user_struct(target_fl64, arg, 1);
2267 fl64.l_type = tswap16(target_fl64->l_type) >> 1;
2268 fl64.l_whence = tswap16(target_fl64->l_whence);
2269 fl64.l_start = tswapl(target_fl64->l_start);
2270 fl64.l_len = tswapl(target_fl64->l_len);
2271 fl64.l_pid = tswap16(target_fl64->l_pid);
2272 unlock_user_struct(target_fl64, arg, 0);
43f238d7
TS		 2273 ret = fcntl(fd, cmd >> 1, &fl64);
2274 if (ret == 0) {
2275 lock_user_struct(target_fl64, arg, 0);
2276 target_fl64->l_type = tswap16(fl64.l_type) >> 1;
2277 target_fl64->l_whence = tswap16(fl64.l_whence);
2278 target_fl64->l_start = tswapl(fl64.l_start);
2279 target_fl64->l_len = tswapl(fl64.l_len);
2280 target_fl64->l_pid = tswapl(fl64.l_pid);
2281 unlock_user_struct(target_fl64, arg, 1);
2282 }
2283 break;
7775e9ec
FB		 2284 case TARGET_F_SETLK64:
2285 case TARGET_F_SETLKW64:
43f238d7
TS		 2286 lock_user_struct(target_fl64, arg, 1);
2287 fl64.l_type = tswap16(target_fl64->l_type) >> 1;
2288 fl64.l_whence = tswap16(target_fl64->l_whence);
2289 fl64.l_start = tswapl(target_fl64->l_start);
2290 fl64.l_len = tswapl(target_fl64->l_len);
2291 fl64.l_pid = tswap16(target_fl64->l_pid);
2292 unlock_user_struct(target_fl64, arg, 0);
2293 ret = fcntl(fd, cmd >> 1, &fl64);
7775e9ec
FB		 2294 break;
2295
ffa65c3b
FB		 2296 case F_GETFL:
2297 ret = fcntl(fd, cmd, arg);
2298 ret = host_to_target_bitmask(ret, fcntl_flags_tbl);
2299 break;
2300
2301 case F_SETFL:
2302 ret = fcntl(fd, cmd, target_to_host_bitmask(arg, fcntl_flags_tbl));
2303 break;
2304
7775e9ec
FB		 2305 default:
2306 ret = fcntl(fd, cmd, arg);
2307 break;
2308 }
2309 return ret;
2310}
2311
67867308 2312#ifdef USE_UID16
7775e9ec 2313
67867308
FB		 2314static inline int high2lowuid(int uid)
2315{
2316 if (uid > 65535)
2317 return 65534;
2318 else
2319 return uid;
2320}
2321
2322static inline int high2lowgid(int gid)
2323{
2324 if (gid > 65535)
2325 return 65534;
2326 else
2327 return gid;
2328}
2329
2330static inline int low2highuid(int uid)
2331{
2332 if ((int16_t)uid == -1)
2333 return -1;
2334 else
2335 return uid;
2336}
2337
2338static inline int low2highgid(int gid)
2339{
2340 if ((int16_t)gid == -1)
2341 return -1;
2342 else
2343 return gid;
2344}
2345
2346#endif /* USE_UID16 */
1b6b029e 2347
31e31b8a
FB		 2348void syscall_init(void)
2349{
2ab83ea7
FB		 2350 IOCTLEntry *ie;
2351 const argtype *arg_type;
2352 int size;
2353
31e31b8a
FB		 2354#define STRUCT(name, list...) thunk_register_struct(STRUCT_ ## name, #name, struct_ ## name ## _def);
2355#define STRUCT_SPECIAL(name) thunk_register_struct_direct(STRUCT_ ## name, #name, &struct_ ## name ## _def);
2356#include "syscall_types.h"
2357#undef STRUCT
2358#undef STRUCT_SPECIAL
2ab83ea7
FB		 2359
2360 /* we patch the ioctl size if necessary. We rely on the fact that
2361 no ioctl has all the bits at '1' in the size field */
2362 ie = ioctl_entries;
2363 while (ie->target_cmd != 0) {
2364 if (((ie->target_cmd >> TARGET_IOC_SIZESHIFT) & TARGET_IOC_SIZEMASK) ==
2365 TARGET_IOC_SIZEMASK) {
2366 arg_type = ie->arg_type;
2367 if (arg_type[0] != TYPE_PTR) {
2368 fprintf(stderr, "cannot patch size for ioctl 0x%x\n",
2369 ie->target_cmd);
2370 exit(1);
2371 }
2372 arg_type++;
2373 size = thunk_type_size(arg_type, 0);
2374 ie->target_cmd = (ie->target_cmd &
2375 ~(TARGET_IOC_SIZEMASK << TARGET_IOC_SIZESHIFT)) |
2376 (size << TARGET_IOC_SIZESHIFT);
2377 }
2378 /* automatic consistency check if same arch */
2379#if defined(__i386__) && defined(TARGET_I386)
2380 if (ie->target_cmd != ie->host_cmd) {
2381 fprintf(stderr, "ERROR: ioctl: target=0x%x host=0x%x\n",
2382 ie->target_cmd, ie->host_cmd);
2383 }
2384#endif
2385 ie++;
2386 }
31e31b8a 2387}
c573ff67 2388
ce4defa0
PB		 2389static inline uint64_t target_offset64(uint32_t word0, uint32_t word1)
2390{
2391#ifdef TARGET_WORDS_BIG_ENDIAN
2392 return ((uint64_t)word0 << 32) | word1;
2393#else
2394 return ((uint64_t)word1 << 32) | word0;
2395#endif
2396}
2397
2398#ifdef TARGET_NR_truncate64
2399static inline long target_truncate64(void *cpu_env, const char *arg1,
2400 long arg2, long arg3, long arg4)
2401{
2402#ifdef TARGET_ARM
2403 if (((CPUARMState *)cpu_env)->eabi)
2404 {
2405 arg2 = arg3;
2406 arg3 = arg4;
2407 }
2408#endif
2409 return get_errno(truncate64(arg1, target_offset64(arg2, arg3)));
2410}
2411#endif
2412
2413#ifdef TARGET_NR_ftruncate64
2414static inline long target_ftruncate64(void *cpu_env, long arg1, long arg2,
2415 long arg3, long arg4)
2416{
2417#ifdef TARGET_ARM
2418 if (((CPUARMState *)cpu_env)->eabi)
2419 {
2420 arg2 = arg3;
2421 arg3 = arg4;
2422 }
2423#endif
2424 return get_errno(ftruncate64(arg1, target_offset64(arg2, arg3)));
2425}
2426#endif
2427
53a5960a
PB		 2428static inline void target_to_host_timespec(struct timespec *host_ts,
2429 target_ulong target_addr)
2430{
2431 struct target_timespec *target_ts;
2432
2433 lock_user_struct(target_ts, target_addr, 1);
2434 host_ts->tv_sec = tswapl(target_ts->tv_sec);
2435 host_ts->tv_nsec = tswapl(target_ts->tv_nsec);
2436 unlock_user_struct(target_ts, target_addr, 0);
2437}
2438
2439static inline void host_to_target_timespec(target_ulong target_addr,
2440 struct timespec *host_ts)
2441{
2442 struct target_timespec *target_ts;
2443
2444 lock_user_struct(target_ts, target_addr, 0);
2445 target_ts->tv_sec = tswapl(host_ts->tv_sec);
2446 target_ts->tv_nsec = tswapl(host_ts->tv_nsec);
2447 unlock_user_struct(target_ts, target_addr, 1);
2448}
2449
6dbad63e 2450long do_syscall(void *cpu_env, int num, long arg1, long arg2, long arg3,
31e31b8a
FB		 2451 long arg4, long arg5, long arg6)
2452{
2453 long ret;
2454 struct stat st;
56c8f68f 2455 struct statfs stfs;
53a5960a 2456 void *p;
31e31b8a 2457
72f03900 2458#ifdef DEBUG
c573ff67 2459 gemu_log("syscall %d", num);
72f03900 2460#endif
31e31b8a
FB		 2461 switch(num) {
2462 case TARGET_NR_exit:
7d13299d
FB		 2463#ifdef HAVE_GPROF
2464 _mcleanup();
2465#endif
e9009676 2466 gdb_exit(cpu_env, arg1);
1b6b029e 2467 /* XXX: should free thread stack and CPU env */
31e31b8a
FB		 2468 _exit(arg1);
2469 ret = 0; /* avoid warning */
2470 break;
2471 case TARGET_NR_read:
53a5960a
PB		 2472 page_unprotect_range(arg2, arg3);
2473 p = lock_user(arg2, arg3, 0);
2474 ret = get_errno(read(arg1, p, arg3));
2475 unlock_user(p, arg2, ret);
31e31b8a
FB		 2476 break;
2477 case TARGET_NR_write:
53a5960a
PB		 2478 p = lock_user(arg2, arg3, 1);
2479 ret = get_errno(write(arg1, p, arg3));
2480 unlock_user(p, arg2, 0);
31e31b8a
FB		 2481 break;
2482 case TARGET_NR_open:
53a5960a
PB		 2483 p = lock_user_string(arg1);
2484 ret = get_errno(open(path(p),
ffa65c3b
FB		 2485 target_to_host_bitmask(arg2, fcntl_flags_tbl),
2486 arg3));
53a5960a 2487 unlock_user(p, arg1, 0);
31e31b8a
FB		 2488 break;
2489 case TARGET_NR_close:
2490 ret = get_errno(close(arg1));
2491 break;
2492 case TARGET_NR_brk:
53a5960a 2493 ret = do_brk(arg1);
31e31b8a
FB		 2494 break;
2495 case TARGET_NR_fork:
1b6b029e 2496 ret = get_errno(do_fork(cpu_env, SIGCHLD, 0));
31e31b8a 2497 break;
e5febef5 2498#ifdef TARGET_NR_waitpid
31e31b8a
FB		 2499 case TARGET_NR_waitpid:
2500 {
53a5960a
PB		 2501 int status;
2502 ret = get_errno(waitpid(arg1, &status, arg3));
2503 if (!is_error(ret) && arg2)
2504 tput32(arg2, status);
31e31b8a
FB		 2505 }
2506 break;
e5febef5 2507#endif
7a3148a9 2508#ifdef TARGET_NR_creat /* not on alpha */
31e31b8a 2509 case TARGET_NR_creat:
53a5960a
PB		 2510 p = lock_user_string(arg1);
2511 ret = get_errno(creat(p, arg2));
2512 unlock_user(p, arg1, 0);
31e31b8a 2513 break;
7a3148a9 2514#endif
31e31b8a 2515 case TARGET_NR_link:
53a5960a
PB		 2516 {
2517 void * p2;
2518 p = lock_user_string(arg1);
2519 p2 = lock_user_string(arg2);
2520 ret = get_errno(link(p, p2));
2521 unlock_user(p2, arg2, 0);
2522 unlock_user(p, arg1, 0);
2523 }
31e31b8a
FB		 2524 break;
2525 case TARGET_NR_unlink:
53a5960a
PB		 2526 p = lock_user_string(arg1);
2527 ret = get_errno(unlink(p));
2528 unlock_user(p, arg1, 0);
31e31b8a
FB		 2529 break;
2530 case TARGET_NR_execve:
7854b056
FB		 2531 {
2532 char **argp, **envp;
f7341ff4 2533 int argc, envc;
53a5960a
PB		 2534 target_ulong gp;
2535 target_ulong guest_argp;
2536 target_ulong guest_envp;
2537 target_ulong addr;
7854b056
FB		 2538 char **q;
2539
f7341ff4 2540 argc = 0;
53a5960a
PB		 2541 guest_argp = arg2;
2542 for (gp = guest_argp; tgetl(gp); gp++)
7854b056 2543 argc++;
f7341ff4 2544 envc = 0;
53a5960a
PB		 2545 guest_envp = arg3;
2546 for (gp = guest_envp; tgetl(gp); gp++)
7854b056
FB		 2547 envc++;
2548
f7341ff4
FB		 2549 argp = alloca((argc + 1) * sizeof(void *));
2550 envp = alloca((envc + 1) * sizeof(void *));
7854b056 2551
53a5960a
PB		 2552 for (gp = guest_argp, q = argp; ;
2553 gp += sizeof(target_ulong), q++) {
2554 addr = tgetl(gp);
2555 if (!addr)
2556 break;
2557 *q = lock_user_string(addr);
2558 }
f7341ff4
FB		 2559 *q = NULL;
2560
53a5960a
PB		 2561 for (gp = guest_envp, q = envp; ;
2562 gp += sizeof(target_ulong), q++) {
2563 addr = tgetl(gp);
2564 if (!addr)
2565 break;
2566 *q = lock_user_string(addr);
2567 }
f7341ff4 2568 *q = NULL;
7854b056 2569
53a5960a
PB		 2570 p = lock_user_string(arg1);
2571 ret = get_errno(execve(p, argp, envp));
2572 unlock_user(p, arg1, 0);
2573
2574 for (gp = guest_argp, q = argp; *q;
2575 gp += sizeof(target_ulong), q++) {
2576 addr = tgetl(gp);
2577 unlock_user(*q, addr, 0);
2578 }
2579 for (gp = guest_envp, q = envp; *q;
2580 gp += sizeof(target_ulong), q++) {
2581 addr = tgetl(gp);
2582 unlock_user(*q, addr, 0);
2583 }
7854b056 2584 }
31e31b8a
FB		 2585 break;
2586 case TARGET_NR_chdir:
53a5960a
PB		 2587 p = lock_user_string(arg1);
2588 ret = get_errno(chdir(p));
2589 unlock_user(p, arg1, 0);
31e31b8a 2590 break;
a315a145 2591#ifdef TARGET_NR_time
31e31b8a
FB		 2592 case TARGET_NR_time:
2593 {
53a5960a
PB		 2594 time_t host_time;
2595 ret = get_errno(time(&host_time));
2596 if (!is_error(ret) && arg1)
2597 tputl(arg1, host_time);
31e31b8a
FB		 2598 }
2599 break;
a315a145 2600#endif
31e31b8a 2601 case TARGET_NR_mknod:
53a5960a
PB		 2602 p = lock_user_string(arg1);
2603 ret = get_errno(mknod(p, arg2, arg3));
2604 unlock_user(p, arg1, 0);
31e31b8a
FB		 2605 break;
2606 case TARGET_NR_chmod:
53a5960a
PB		 2607 p = lock_user_string(arg1);
2608 ret = get_errno(chmod(p, arg2));
2609 unlock_user(p, arg1, 0);
31e31b8a 2610 break;
ebc05488 2611#ifdef TARGET_NR_break
31e31b8a
FB		 2612 case TARGET_NR_break:
2613 goto unimplemented;
ebc05488
FB		 2614#endif
2615#ifdef TARGET_NR_oldstat
31e31b8a
FB		 2616 case TARGET_NR_oldstat:
2617 goto unimplemented;
ebc05488 2618#endif
31e31b8a
FB		 2619 case TARGET_NR_lseek:
2620 ret = get_errno(lseek(arg1, arg2, arg3));
2621 break;
7a3148a9
JM		 2622#ifdef TARGET_NR_getxpid
2623 case TARGET_NR_getxpid:
2624#else
31e31b8a 2625 case TARGET_NR_getpid:
7a3148a9 2626#endif
31e31b8a
FB		 2627 ret = get_errno(getpid());
2628 break;
2629 case TARGET_NR_mount:
80265918
TS		 2630 {
2631 /* need to look at the data field */
2632 void *p2, *p3;
2633 p = lock_user_string(arg1);
2634 p2 = lock_user_string(arg2);
2635 p3 = lock_user_string(arg3);
2636 ret = get_errno(mount(p, p2, p3, (unsigned long)arg4, (const void *)arg5));
2637 unlock_user(p, arg1, 0);
2638 unlock_user(p2, arg2, 0);
2639 unlock_user(p3, arg3, 0);
2640 break;
2641 }
e5febef5 2642#ifdef TARGET_NR_umount
31e31b8a 2643 case TARGET_NR_umount:
53a5960a
PB		 2644 p = lock_user_string(arg1);
2645 ret = get_errno(umount(p));
2646 unlock_user(p, arg1, 0);
31e31b8a 2647 break;
e5febef5 2648#endif
7a3148a9 2649#ifdef TARGET_NR_stime /* not on alpha */
31e31b8a
FB		 2650 case TARGET_NR_stime:
2651 {
53a5960a
PB		 2652 time_t host_time;
2653 host_time = tgetl(arg1);
2654 ret = get_errno(stime(&host_time));
31e31b8a
FB		 2655 }
2656 break;
7a3148a9 2657#endif
31e31b8a
FB		 2658 case TARGET_NR_ptrace:
2659 goto unimplemented;
7a3148a9 2660#ifdef TARGET_NR_alarm /* not on alpha */
31e31b8a
FB		 2661 case TARGET_NR_alarm:
2662 ret = alarm(arg1);
2663 break;
7a3148a9 2664#endif
ebc05488 2665#ifdef TARGET_NR_oldfstat
31e31b8a
FB		 2666 case TARGET_NR_oldfstat:
2667 goto unimplemented;
ebc05488 2668#endif
7a3148a9 2669#ifdef TARGET_NR_pause /* not on alpha */
31e31b8a
FB		 2670 case TARGET_NR_pause:
2671 ret = get_errno(pause());
2672 break;
7a3148a9 2673#endif
e5febef5 2674#ifdef TARGET_NR_utime
31e31b8a 2675 case TARGET_NR_utime:
ebc05488 2676 {
53a5960a
PB		 2677 struct utimbuf tbuf, *host_tbuf;
2678 struct target_utimbuf *target_tbuf;
2679 if (arg2) {
2680 lock_user_struct(target_tbuf, arg2, 1);
2681 tbuf.actime = tswapl(target_tbuf->actime);
2682 tbuf.modtime = tswapl(target_tbuf->modtime);
2683 unlock_user_struct(target_tbuf, arg2, 0);
2684 host_tbuf = &tbuf;
f72e8ff4 2685 } else {
53a5960a 2686 host_tbuf = NULL;
f72e8ff4 2687 }
53a5960a
PB		 2688 p = lock_user_string(arg1);
2689 ret = get_errno(utime(p, host_tbuf));
2690 unlock_user(p, arg1, 0);
ebc05488
FB		 2691 }
2692 break;
e5febef5 2693#endif
978a66ff
FB		 2694 case TARGET_NR_utimes:
2695 {
978a66ff 2696 struct timeval *tvp, tv[2];
53a5960a
PB		 2697 if (arg2) {
2698 target_to_host_timeval(&tv[0], arg2);
2699 target_to_host_timeval(&tv[1],
2700 arg2 + sizeof (struct target_timeval));
978a66ff
FB		 2701 tvp = tv;
2702 } else {
2703 tvp = NULL;
2704 }
53a5960a
PB		 2705 p = lock_user_string(arg1);
2706 ret = get_errno(utimes(p, tvp));
2707 unlock_user(p, arg1, 0);
978a66ff
FB		 2708 }
2709 break;
ebc05488 2710#ifdef TARGET_NR_stty
31e31b8a
FB		 2711 case TARGET_NR_stty:
2712 goto unimplemented;
ebc05488
FB		 2713#endif
2714#ifdef TARGET_NR_gtty
31e31b8a
FB		 2715 case TARGET_NR_gtty:
2716 goto unimplemented;
ebc05488 2717#endif
31e31b8a 2718 case TARGET_NR_access:
53a5960a
PB		 2719 p = lock_user_string(arg1);
2720 ret = get_errno(access(p, arg2));
2721 unlock_user(p, arg1, 0);
31e31b8a 2722 break;
7a3148a9 2723#ifdef TARGET_NR_nice /* not on alpha */
31e31b8a
FB		 2724 case TARGET_NR_nice:
2725 ret = get_errno(nice(arg1));
2726 break;
7a3148a9 2727#endif
ebc05488 2728#ifdef TARGET_NR_ftime
31e31b8a
FB		 2729 case TARGET_NR_ftime:
2730 goto unimplemented;
ebc05488 2731#endif
31e31b8a 2732 case TARGET_NR_sync:
04369ff2
FB		 2733 sync();
2734 ret = 0;
31e31b8a
FB		 2735 break;
2736 case TARGET_NR_kill:
2737 ret = get_errno(kill(arg1, arg2));
2738 break;
2739 case TARGET_NR_rename:
53a5960a
PB		 2740 {
2741 void *p2;
2742 p = lock_user_string(arg1);
2743 p2 = lock_user_string(arg2);
2744 ret = get_errno(rename(p, p2));
2745 unlock_user(p2, arg2, 0);
2746 unlock_user(p, arg1, 0);
2747 }
31e31b8a
FB		 2748 break;
2749 case TARGET_NR_mkdir:
53a5960a
PB		 2750 p = lock_user_string(arg1);
2751 ret = get_errno(mkdir(p, arg2));
2752 unlock_user(p, arg1, 0);
31e31b8a
FB		 2753 break;
2754 case TARGET_NR_rmdir:
53a5960a
PB		 2755 p = lock_user_string(arg1);
2756 ret = get_errno(rmdir(p));
2757 unlock_user(p, arg1, 0);
31e31b8a
FB		 2758 break;
2759 case TARGET_NR_dup:
2760 ret = get_errno(dup(arg1));
2761 break;
2762 case TARGET_NR_pipe:
2763 {
53a5960a
PB		 2764 int host_pipe[2];
2765 ret = get_errno(pipe(host_pipe));
31e31b8a 2766 if (!is_error(ret)) {
c12ab05c
TS		 2767#if defined(TARGET_MIPS)
2768 ((CPUMIPSState*)cpu_env)->gpr[3] = host_pipe[1];
2769 ret = host_pipe[0];
2770#else
53a5960a
PB		 2771 tput32(arg1, host_pipe[0]);
2772 tput32(arg1 + 4, host_pipe[1]);
c12ab05c 2773#endif
31e31b8a
FB		 2774 }
2775 }
2776 break;
2777 case TARGET_NR_times:
32f36bce 2778 {
53a5960a 2779 struct target_tms *tmsp;
32f36bce
FB		 2780 struct tms tms;
2781 ret = get_errno(times(&tms));
53a5960a
PB		 2782 if (arg1) {
2783 tmsp = lock_user(arg1, sizeof(struct target_tms), 0);
c596ed17
FB		 2784 tmsp->tms_utime = tswapl(host_to_target_clock_t(tms.tms_utime));
2785 tmsp->tms_stime = tswapl(host_to_target_clock_t(tms.tms_stime));
2786 tmsp->tms_cutime = tswapl(host_to_target_clock_t(tms.tms_cutime));
2787 tmsp->tms_cstime = tswapl(host_to_target_clock_t(tms.tms_cstime));
32f36bce 2788 }
c596ed17
FB		 2789 if (!is_error(ret))
2790 ret = host_to_target_clock_t(ret);
32f36bce
FB		 2791 }
2792 break;
ebc05488 2793#ifdef TARGET_NR_prof
31e31b8a
FB		 2794 case TARGET_NR_prof:
2795 goto unimplemented;
ebc05488 2796#endif
e5febef5 2797#ifdef TARGET_NR_signal
31e31b8a
FB		 2798 case TARGET_NR_signal:
2799 goto unimplemented;
e5febef5 2800#endif
31e31b8a 2801 case TARGET_NR_acct:
24836689
PB		 2802 p = lock_user_string(arg1);
2803 ret = get_errno(acct(path(p)));
2804 unlock_user(p, arg1, 0);
2805 break;
7a3148a9 2806#ifdef TARGET_NR_umount2 /* not on alpha */
31e31b8a 2807 case TARGET_NR_umount2:
53a5960a
PB		 2808 p = lock_user_string(arg1);
2809 ret = get_errno(umount2(p, arg2));
2810 unlock_user(p, arg1, 0);
31e31b8a 2811 break;
7a3148a9 2812#endif
ebc05488 2813#ifdef TARGET_NR_lock
31e31b8a
FB		 2814 case TARGET_NR_lock:
2815 goto unimplemented;
ebc05488 2816#endif
31e31b8a
FB		 2817 case TARGET_NR_ioctl:
2818 ret = do_ioctl(arg1, arg2, arg3);
2819 break;
2820 case TARGET_NR_fcntl:
7775e9ec 2821 ret = get_errno(do_fcntl(arg1, arg2, arg3));
31e31b8a 2822 break;
ebc05488 2823#ifdef TARGET_NR_mpx
31e31b8a
FB		 2824 case TARGET_NR_mpx:
2825 goto unimplemented;
ebc05488 2826#endif
31e31b8a
FB		 2827 case TARGET_NR_setpgid:
2828 ret = get_errno(setpgid(arg1, arg2));
2829 break;
ebc05488 2830#ifdef TARGET_NR_ulimit
31e31b8a
FB		 2831 case TARGET_NR_ulimit:
2832 goto unimplemented;
ebc05488
FB		 2833#endif
2834#ifdef TARGET_NR_oldolduname
31e31b8a
FB		 2835 case TARGET_NR_oldolduname:
2836 goto unimplemented;
ebc05488 2837#endif
31e31b8a
FB		 2838 case TARGET_NR_umask:
2839 ret = get_errno(umask(arg1));
2840 break;
2841 case TARGET_NR_chroot:
53a5960a
PB		 2842 p = lock_user_string(arg1);
2843 ret = get_errno(chroot(p));
2844 unlock_user(p, arg1, 0);
31e31b8a
FB		 2845 break;
2846 case TARGET_NR_ustat:
2847 goto unimplemented;
2848 case TARGET_NR_dup2:
2849 ret = get_errno(dup2(arg1, arg2));
2850 break;
7a3148a9 2851#ifdef TARGET_NR_getppid /* not on alpha */
31e31b8a
FB		 2852 case TARGET_NR_getppid:
2853 ret = get_errno(getppid());
2854 break;
7a3148a9 2855#endif
31e31b8a
FB		 2856 case TARGET_NR_getpgrp:
2857 ret = get_errno(getpgrp());
2858 break;
2859 case TARGET_NR_setsid:
2860 ret = get_errno(setsid());
2861 break;
e5febef5 2862#ifdef TARGET_NR_sigaction
31e31b8a 2863 case TARGET_NR_sigaction:
31e31b8a 2864 {
388bb21a 2865#if !defined(TARGET_MIPS)
53a5960a 2866 struct target_old_sigaction *old_act;
66fb9763 2867 struct target_sigaction act, oact, *pact;
53a5960a
PB		 2868 if (arg2) {
2869 lock_user_struct(old_act, arg2, 1);
66fb9763
FB		 2870 act._sa_handler = old_act->_sa_handler;
2871 target_siginitset(&act.sa_mask, old_act->sa_mask);
2872 act.sa_flags = old_act->sa_flags;
2873 act.sa_restorer = old_act->sa_restorer;
53a5960a 2874 unlock_user_struct(old_act, arg2, 0);
66fb9763
FB		 2875 pact = &act;
2876 } else {
2877 pact = NULL;
2878 }
2879 ret = get_errno(do_sigaction(arg1, pact, &oact));
53a5960a
PB		 2880 if (!is_error(ret) && arg3) {
2881 lock_user_struct(old_act, arg3, 0);
2882 old_act->_sa_handler = oact._sa_handler;
2883 old_act->sa_mask = oact.sa_mask.sig[0];
2884 old_act->sa_flags = oact.sa_flags;
2885 old_act->sa_restorer = oact.sa_restorer;
2886 unlock_user_struct(old_act, arg3, 1);
66fb9763 2887 }
388bb21a 2888#else
106ec879
FB		 2889 struct target_sigaction act, oact, *pact, *old_act;
2890
2891 if (arg2) {
2892 lock_user_struct(old_act, arg2, 1);
2893 act._sa_handler = old_act->_sa_handler;
2894 target_siginitset(&act.sa_mask, old_act->sa_mask.sig[0]);
2895 act.sa_flags = old_act->sa_flags;
2896 unlock_user_struct(old_act, arg2, 0);
2897 pact = &act;
2898 } else {
2899 pact = NULL;
2900 }
2901
2902 ret = get_errno(do_sigaction(arg1, pact, &oact));
2903
2904 if (!is_error(ret) && arg3) {
2905 lock_user_struct(old_act, arg3, 0);
2906 old_act->_sa_handler = oact._sa_handler;
2907 old_act->sa_flags = oact.sa_flags;
2908 old_act->sa_mask.sig[0] = oact.sa_mask.sig[0];
2909 old_act->sa_mask.sig[1] = 0;
2910 old_act->sa_mask.sig[2] = 0;
2911 old_act->sa_mask.sig[3] = 0;
2912 unlock_user_struct(old_act, arg3, 1);
2913 }
388bb21a 2914#endif
31e31b8a
FB		 2915 }
2916 break;
e5febef5 2917#endif
66fb9763 2918 case TARGET_NR_rt_sigaction:
53a5960a
PB		 2919 {
2920 struct target_sigaction *act;
2921 struct target_sigaction *oact;
2922
2923 if (arg2)
2924 lock_user_struct(act, arg2, 1);
2925 else
2926 act = NULL;
2927 if (arg3)
2928 lock_user_struct(oact, arg3, 0);
2929 else
2930 oact = NULL;
2931 ret = get_errno(do_sigaction(arg1, act, oact));
2932 if (arg2)
2933 unlock_user_struct(act, arg2, 0);
2934 if (arg3)
2935 unlock_user_struct(oact, arg3, 1);
2936 }
66fb9763 2937 break;
7a3148a9 2938#ifdef TARGET_NR_sgetmask /* not on alpha */
31e31b8a 2939 case TARGET_NR_sgetmask:
66fb9763
FB		 2940 {
2941 sigset_t cur_set;
2942 target_ulong target_set;
2943 sigprocmask(0, NULL, &cur_set);
2944 host_to_target_old_sigset(&target_set, &cur_set);
2945 ret = target_set;
2946 }
2947 break;
7a3148a9
JM		 2948#endif
2949#ifdef TARGET_NR_ssetmask /* not on alpha */
31e31b8a 2950 case TARGET_NR_ssetmask:
66fb9763
FB		 2951 {
2952 sigset_t set, oset, cur_set;
2953 target_ulong target_set = arg1;
2954 sigprocmask(0, NULL, &cur_set);
2955 target_to_host_old_sigset(&set, &target_set);
2956 sigorset(&set, &set, &cur_set);
2957 sigprocmask(SIG_SETMASK, &set, &oset);
2958 host_to_target_old_sigset(&target_set, &oset);
2959 ret = target_set;
2960 }
2961 break;
7a3148a9 2962#endif
e5febef5 2963#ifdef TARGET_NR_sigprocmask
66fb9763
FB		 2964 case TARGET_NR_sigprocmask:
2965 {
2966 int how = arg1;
2967 sigset_t set, oldset, *set_ptr;
66fb9763 2968
53a5960a 2969 if (arg2) {
66fb9763
FB		 2970 switch(how) {
2971 case TARGET_SIG_BLOCK:
2972 how = SIG_BLOCK;
2973 break;
2974 case TARGET_SIG_UNBLOCK:
2975 how = SIG_UNBLOCK;
2976 break;
2977 case TARGET_SIG_SETMASK:
2978 how = SIG_SETMASK;
2979 break;
2980 default:
2981 ret = -EINVAL;
2982 goto fail;
2983 }
53a5960a
PB		 2984 p = lock_user(arg2, sizeof(target_sigset_t), 1);
2985 target_to_host_old_sigset(&set, p);
2986 unlock_user(p, arg2, 0);
66fb9763
FB		 2987 set_ptr = &set;
2988 } else {
2989 how = 0;
2990 set_ptr = NULL;
2991 }
2992 ret = get_errno(sigprocmask(arg1, set_ptr, &oldset));
53a5960a
PB		 2993 if (!is_error(ret) && arg3) {
2994 p = lock_user(arg3, sizeof(target_sigset_t), 0);
2995 host_to_target_old_sigset(p, &oldset);
2996 unlock_user(p, arg3, sizeof(target_sigset_t));
66fb9763
FB		 2997 }
2998 }
2999 break;
e5febef5 3000#endif
66fb9763
FB		 3001 case TARGET_NR_rt_sigprocmask:
3002 {
3003 int how = arg1;
3004 sigset_t set, oldset, *set_ptr;
66fb9763 3005
53a5960a 3006 if (arg2) {
66fb9763
FB		 3007 switch(how) {
3008 case TARGET_SIG_BLOCK:
3009 how = SIG_BLOCK;
3010 break;
3011 case TARGET_SIG_UNBLOCK:
3012 how = SIG_UNBLOCK;
3013 break;
3014 case TARGET_SIG_SETMASK:
3015 how = SIG_SETMASK;
3016 break;
3017 default:
3018 ret = -EINVAL;
3019 goto fail;
3020 }
53a5960a
PB		 3021 p = lock_user(arg2, sizeof(target_sigset_t), 1);
3022 target_to_host_sigset(&set, p);
3023 unlock_user(p, arg2, 0);
66fb9763
FB		 3024 set_ptr = &set;
3025 } else {
3026 how = 0;
3027 set_ptr = NULL;
3028 }
3029 ret = get_errno(sigprocmask(how, set_ptr, &oldset));
53a5960a
PB		 3030 if (!is_error(ret) && arg3) {
3031 p = lock_user(arg3, sizeof(target_sigset_t), 0);
3032 host_to_target_sigset(p, &oldset);
3033 unlock_user(p, arg3, sizeof(target_sigset_t));
66fb9763
FB		 3034 }
3035 }
3036 break;
e5febef5 3037#ifdef TARGET_NR_sigpending
66fb9763
FB		 3038 case TARGET_NR_sigpending:
3039 {
3040 sigset_t set;
3041 ret = get_errno(sigpending(&set));
3042 if (!is_error(ret)) {
53a5960a
PB		 3043 p = lock_user(arg1, sizeof(target_sigset_t), 0);
3044 host_to_target_old_sigset(p, &set);
3045 unlock_user(p, arg1, sizeof(target_sigset_t));
66fb9763
FB		 3046 }
3047 }
3048 break;
e5febef5 3049#endif
66fb9763
FB		 3050 case TARGET_NR_rt_sigpending:
3051 {
3052 sigset_t set;
3053 ret = get_errno(sigpending(&set));
3054 if (!is_error(ret)) {
53a5960a
PB		 3055 p = lock_user(arg1, sizeof(target_sigset_t), 0);
3056 host_to_target_sigset(p, &set);
3057 unlock_user(p, arg1, sizeof(target_sigset_t));
66fb9763
FB		 3058 }
3059 }
3060 break;
e5febef5 3061#ifdef TARGET_NR_sigsuspend
66fb9763
FB		 3062 case TARGET_NR_sigsuspend:
3063 {
3064 sigset_t set;
53a5960a
PB		 3065 p = lock_user(arg1, sizeof(target_sigset_t), 1);
3066 target_to_host_old_sigset(&set, p);
3067 unlock_user(p, arg1, 0);
66fb9763
FB		 3068 ret = get_errno(sigsuspend(&set));
3069 }
3070 break;
e5febef5 3071#endif
66fb9763
FB		 3072 case TARGET_NR_rt_sigsuspend:
3073 {
3074 sigset_t set;
53a5960a
PB		 3075 p = lock_user(arg1, sizeof(target_sigset_t), 1);
3076 target_to_host_sigset(&set, p);
3077 unlock_user(p, arg1, 0);
66fb9763
FB		 3078 ret = get_errno(sigsuspend(&set));
3079 }
3080 break;
3081 case TARGET_NR_rt_sigtimedwait:
3082 {
66fb9763
FB		 3083 sigset_t set;
3084 struct timespec uts, *puts;
3085 siginfo_t uinfo;
3086
53a5960a
PB		 3087 p = lock_user(arg1, sizeof(target_sigset_t), 1);
3088 target_to_host_sigset(&set, p);
3089 unlock_user(p, arg1, 0);
3090 if (arg3) {
66fb9763 3091 puts = &uts;
53a5960a 3092 target_to_host_timespec(puts, arg3);
66fb9763
FB		 3093 } else {
3094 puts = NULL;
3095 }
3096 ret = get_errno(sigtimedwait(&set, &uinfo, puts));
53a5960a
PB		 3097 if (!is_error(ret) && arg2) {
3098 p = lock_user(arg2, sizeof(target_sigset_t), 0);
3099 host_to_target_siginfo(p, &uinfo);
3100 unlock_user(p, arg2, sizeof(target_sigset_t));
66fb9763
FB		 3101 }
3102 }
3103 break;
3104 case TARGET_NR_rt_sigqueueinfo:
3105 {
3106 siginfo_t uinfo;
53a5960a
PB		 3107 p = lock_user(arg3, sizeof(target_sigset_t), 1);
3108 target_to_host_siginfo(&uinfo, p);
3109 unlock_user(p, arg1, 0);
66fb9763
FB		 3110 ret = get_errno(sys_rt_sigqueueinfo(arg1, arg2, &uinfo));
3111 }
3112 break;
e5febef5 3113#ifdef TARGET_NR_sigreturn
66fb9763
FB		 3114 case TARGET_NR_sigreturn:
3115 /* NOTE: ret is eax, so not transcoding must be done */
3116 ret = do_sigreturn(cpu_env);
3117 break;
e5febef5 3118#endif
66fb9763
FB		 3119 case TARGET_NR_rt_sigreturn:
3120 /* NOTE: ret is eax, so not transcoding must be done */
3121 ret = do_rt_sigreturn(cpu_env);
3122 break;
31e31b8a 3123 case TARGET_NR_sethostname:
53a5960a
PB		 3124 p = lock_user_string(arg1);
3125 ret = get_errno(sethostname(p, arg2));
3126 unlock_user(p, arg1, 0);
31e31b8a
FB		 3127 break;
3128 case TARGET_NR_setrlimit:
9de5e440
FB		 3129 {
3130 /* XXX: convert resource ? */
3131 int resource = arg1;
53a5960a 3132 struct target_rlimit *target_rlim;
9de5e440 3133 struct rlimit rlim;
53a5960a 3134 lock_user_struct(target_rlim, arg2, 1);
9de5e440
FB		 3135 rlim.rlim_cur = tswapl(target_rlim->rlim_cur);
3136 rlim.rlim_max = tswapl(target_rlim->rlim_max);
53a5960a 3137 unlock_user_struct(target_rlim, arg2, 0);
9de5e440
FB		 3138 ret = get_errno(setrlimit(resource, &rlim));
3139 }
3140 break;
31e31b8a 3141 case TARGET_NR_getrlimit:
9de5e440
FB		 3142 {
3143 /* XXX: convert resource ? */
3144 int resource = arg1;
53a5960a 3145 struct target_rlimit *target_rlim;
9de5e440
FB		 3146 struct rlimit rlim;
3147
3148 ret = get_errno(getrlimit(resource, &rlim));
3149 if (!is_error(ret)) {
53a5960a
PB		 3150 lock_user_struct(target_rlim, arg2, 0);
3151 rlim.rlim_cur = tswapl(target_rlim->rlim_cur);
3152 rlim.rlim_max = tswapl(target_rlim->rlim_max);
3153 unlock_user_struct(target_rlim, arg2, 1);
9de5e440
FB		 3154 }
3155 }
3156 break;
31e31b8a 3157 case TARGET_NR_getrusage:
b409186b
FB		 3158 {
3159 struct rusage rusage;
b409186b
FB		 3160 ret = get_errno(getrusage(arg1, &rusage));
3161 if (!is_error(ret)) {
53a5960a 3162 host_to_target_rusage(arg2, &rusage);
b409186b
FB		 3163 }
3164 }
3165 break;
31e31b8a
FB		 3166 case TARGET_NR_gettimeofday:
3167 {
31e31b8a
FB		 3168 struct timeval tv;
3169 ret = get_errno(gettimeofday(&tv, NULL));
3170 if (!is_error(ret)) {
53a5960a 3171 host_to_target_timeval(arg1, &tv);
31e31b8a
FB		 3172 }
3173 }
3174 break;
3175 case TARGET_NR_settimeofday:
3176 {
31e31b8a 3177 struct timeval tv;
53a5960a 3178 target_to_host_timeval(&tv, arg1);
31e31b8a
FB		 3179 ret = get_errno(settimeofday(&tv, NULL));
3180 }
3181 break;
048f6b4d 3182#ifdef TARGET_NR_select
31e31b8a 3183 case TARGET_NR_select:
f2674e31 3184 {
53a5960a
PB		 3185 struct target_sel_arg_struct *sel;
3186 target_ulong inp, outp, exp, tvp;
3187 long nsel;
3188
3189 lock_user_struct(sel, arg1, 1);
3190 nsel = tswapl(sel->n);
3191 inp = tswapl(sel->inp);
3192 outp = tswapl(sel->outp);
3193 exp = tswapl(sel->exp);
3194 tvp = tswapl(sel->tvp);
3195 unlock_user_struct(sel, arg1, 0);
3196 ret = do_select(nsel, inp, outp, exp, tvp);
f2674e31
FB		 3197 }
3198 break;
048f6b4d 3199#endif
31e31b8a 3200 case TARGET_NR_symlink:
53a5960a
PB		 3201 {
3202 void *p2;
3203 p = lock_user_string(arg1);
3204 p2 = lock_user_string(arg2);
3205 ret = get_errno(symlink(p, p2));
3206 unlock_user(p2, arg2, 0);
3207 unlock_user(p, arg1, 0);
3208 }
31e31b8a 3209 break;
ebc05488 3210#ifdef TARGET_NR_oldlstat
31e31b8a
FB		 3211 case TARGET_NR_oldlstat:
3212 goto unimplemented;
ebc05488 3213#endif
31e31b8a 3214 case TARGET_NR_readlink:
53a5960a
PB		 3215 {
3216 void *p2;
3217 p = lock_user_string(arg1);
3218 p2 = lock_user(arg2, arg3, 0);
3219 ret = get_errno(readlink(path(p), p2, arg3));
3220 unlock_user(p2, arg2, ret);
3221 unlock_user(p, arg1, 0);
3222 }
31e31b8a 3223 break;
e5febef5 3224#ifdef TARGET_NR_uselib
31e31b8a
FB		 3225 case TARGET_NR_uselib:
3226 goto unimplemented;
e5febef5
TS		 3227#endif
3228#ifdef TARGET_NR_swapon
31e31b8a 3229 case TARGET_NR_swapon:
53a5960a
PB		 3230 p = lock_user_string(arg1);
3231 ret = get_errno(swapon(p, arg2));
3232 unlock_user(p, arg1, 0);
31e31b8a 3233 break;
e5febef5 3234#endif
31e31b8a
FB		 3235 case TARGET_NR_reboot:
3236 goto unimplemented;
e5febef5 3237#ifdef TARGET_NR_readdir
31e31b8a
FB		 3238 case TARGET_NR_readdir:
3239 goto unimplemented;
e5febef5
TS		 3240#endif
3241#ifdef TARGET_NR_mmap
31e31b8a 3242 case TARGET_NR_mmap:
e6e5906b 3243#if defined(TARGET_I386) || defined(TARGET_ARM) || defined(TARGET_M68K)
31e31b8a 3244 {
53a5960a
PB		 3245 target_ulong *v;
3246 target_ulong v1, v2, v3, v4, v5, v6;
3247 v = lock_user(arg1, 6 * sizeof(target_ulong), 1);
3248 v1 = tswapl(v[0]);
3249 v2 = tswapl(v[1]);
3250 v3 = tswapl(v[2]);
3251 v4 = tswapl(v[3]);
3252 v5 = tswapl(v[4]);
3253 v6 = tswapl(v[5]);
3254 unlock_user(v, arg1, 0);
5286db75
FB		 3255 ret = get_errno(target_mmap(v1, v2, v3,
3256 target_to_host_bitmask(v4, mmap_flags_tbl),
3257 v5, v6));
31e31b8a 3258 }
31e31b8a 3259#else
6fb883e8
FB		 3260 ret = get_errno(target_mmap(arg1, arg2, arg3,
3261 target_to_host_bitmask(arg4, mmap_flags_tbl),
3262 arg5,
3263 arg6));
31e31b8a 3264#endif
6fb883e8 3265 break;
e5febef5 3266#endif
a315a145 3267#ifdef TARGET_NR_mmap2
6fb883e8 3268 case TARGET_NR_mmap2:
0d3267a7 3269#if defined(TARGET_SPARC) || defined(TARGET_MIPS)
c573ff67
FB		 3270#define MMAP_SHIFT 12
3271#else
3272#define MMAP_SHIFT TARGET_PAGE_BITS
3273#endif
5286db75
FB		 3274 ret = get_errno(target_mmap(arg1, arg2, arg3,
3275 target_to_host_bitmask(arg4, mmap_flags_tbl),
3276 arg5,
c573ff67 3277 arg6 << MMAP_SHIFT));
31e31b8a 3278 break;
a315a145 3279#endif
31e31b8a 3280 case TARGET_NR_munmap:
54936004 3281 ret = get_errno(target_munmap(arg1, arg2));
31e31b8a 3282 break;
9de5e440 3283 case TARGET_NR_mprotect:
54936004 3284 ret = get_errno(target_mprotect(arg1, arg2, arg3));
9de5e440 3285 break;
e5febef5 3286#ifdef TARGET_NR_mremap
9de5e440 3287 case TARGET_NR_mremap:
54936004 3288 ret = get_errno(target_mremap(arg1, arg2, arg3, arg4, arg5));
9de5e440 3289 break;
e5febef5 3290#endif
53a5960a 3291 /* ??? msync/mlock/munlock are broken for softmmu. */
e5febef5 3292#ifdef TARGET_NR_msync
9de5e440 3293 case TARGET_NR_msync:
53a5960a 3294 ret = get_errno(msync(g2h(arg1), arg2, arg3));
9de5e440 3295 break;
e5febef5
TS		 3296#endif
3297#ifdef TARGET_NR_mlock
9de5e440 3298 case TARGET_NR_mlock:
53a5960a 3299 ret = get_errno(mlock(g2h(arg1), arg2));
9de5e440 3300 break;
e5febef5
TS		 3301#endif
3302#ifdef TARGET_NR_munlock
9de5e440 3303 case TARGET_NR_munlock:
53a5960a 3304 ret = get_errno(munlock(g2h(arg1), arg2));
9de5e440 3305 break;
e5febef5
TS		 3306#endif
3307#ifdef TARGET_NR_mlockall
9de5e440
FB		 3308 case TARGET_NR_mlockall:
3309 ret = get_errno(mlockall(arg1));
3310 break;
e5febef5
TS		 3311#endif
3312#ifdef TARGET_NR_munlockall
9de5e440
FB		 3313 case TARGET_NR_munlockall:
3314 ret = get_errno(munlockall());
3315 break;
e5febef5 3316#endif
31e31b8a 3317 case TARGET_NR_truncate:
53a5960a
PB		 3318 p = lock_user_string(arg1);
3319 ret = get_errno(truncate(p, arg2));
3320 unlock_user(p, arg1, 0);
31e31b8a
FB		 3321 break;
3322 case TARGET_NR_ftruncate:
3323 ret = get_errno(ftruncate(arg1, arg2));
3324 break;
3325 case TARGET_NR_fchmod:
3326 ret = get_errno(fchmod(arg1, arg2));
3327 break;
31e31b8a
FB		 3328 case TARGET_NR_getpriority:
3329 ret = get_errno(getpriority(arg1, arg2));
3330 break;
3331 case TARGET_NR_setpriority:
3332 ret = get_errno(setpriority(arg1, arg2, arg3));
3333 break;
ebc05488 3334#ifdef TARGET_NR_profil
31e31b8a
FB		 3335 case TARGET_NR_profil:
3336 goto unimplemented;
ebc05488 3337#endif
31e31b8a 3338 case TARGET_NR_statfs:
53a5960a
PB		 3339 p = lock_user_string(arg1);
3340 ret = get_errno(statfs(path(p), &stfs));
3341 unlock_user(p, arg1, 0);
31e31b8a
FB		 3342 convert_statfs:
3343 if (!is_error(ret)) {
53a5960a 3344 struct target_statfs *target_stfs;
56c8f68f 3345
53a5960a
PB		 3346 lock_user_struct(target_stfs, arg2, 0);
3347 /* ??? put_user is probably wrong. */
56c8f68f
FB		 3348 put_user(stfs.f_type, &target_stfs->f_type);
3349 put_user(stfs.f_bsize, &target_stfs->f_bsize);
3350 put_user(stfs.f_blocks, &target_stfs->f_blocks);
3351 put_user(stfs.f_bfree, &target_stfs->f_bfree);
3352 put_user(stfs.f_bavail, &target_stfs->f_bavail);
3353 put_user(stfs.f_files, &target_stfs->f_files);
3354 put_user(stfs.f_ffree, &target_stfs->f_ffree);
4ce6f8de
TS		 3355 put_user(stfs.f_fsid.__val[0], &target_stfs->f_fsid.val[0]);
3356 put_user(stfs.f_fsid.__val[1], &target_stfs->f_fsid.val[1]);
56c8f68f 3357 put_user(stfs.f_namelen, &target_stfs->f_namelen);
53a5960a 3358 unlock_user_struct(target_stfs, arg2, 1);
31e31b8a
FB		 3359 }
3360 break;
3361 case TARGET_NR_fstatfs:
56c8f68f 3362 ret = get_errno(fstatfs(arg1, &stfs));
31e31b8a 3363 goto convert_statfs;
56c8f68f
FB		 3364#ifdef TARGET_NR_statfs64
3365 case TARGET_NR_statfs64:
53a5960a
PB		 3366 p = lock_user_string(arg1);
3367 ret = get_errno(statfs(path(p), &stfs));
3368 unlock_user(p, arg1, 0);
56c8f68f
FB		 3369 convert_statfs64:
3370 if (!is_error(ret)) {
53a5960a
PB		 3371 struct target_statfs64 *target_stfs;
3372
3373 lock_user_struct(target_stfs, arg3, 0);
3374 /* ??? put_user is probably wrong. */
56c8f68f
FB		 3375 put_user(stfs.f_type, &target_stfs->f_type);
3376 put_user(stfs.f_bsize, &target_stfs->f_bsize);
3377 put_user(stfs.f_blocks, &target_stfs->f_blocks);
3378 put_user(stfs.f_bfree, &target_stfs->f_bfree);
3379 put_user(stfs.f_bavail, &target_stfs->f_bavail);
3380 put_user(stfs.f_files, &target_stfs->f_files);
3381 put_user(stfs.f_ffree, &target_stfs->f_ffree);
4ce6f8de
TS		 3382 put_user(stfs.f_fsid.__val[0], &target_stfs->f_fsid.val[0]);
3383 put_user(stfs.f_fsid.__val[1], &target_stfs->f_fsid.val[1]);
56c8f68f 3384 put_user(stfs.f_namelen, &target_stfs->f_namelen);
53a5960a 3385 unlock_user_struct(target_stfs, arg3, 0);
56c8f68f
FB		 3386 }
3387 break;
3388 case TARGET_NR_fstatfs64:
3389 ret = get_errno(fstatfs(arg1, &stfs));
3390 goto convert_statfs64;
3391#endif
ebc05488 3392#ifdef TARGET_NR_ioperm
31e31b8a
FB		 3393 case TARGET_NR_ioperm:
3394 goto unimplemented;
ebc05488 3395#endif
e5febef5 3396#ifdef TARGET_NR_socketcall
31e31b8a 3397 case TARGET_NR_socketcall:
53a5960a 3398 ret = do_socketcall(arg1, arg2);
31e31b8a 3399 break;
e5febef5 3400#endif
3532fa74
FB		 3401#ifdef TARGET_NR_accept
3402 case TARGET_NR_accept:
1be9e1dc 3403 ret = do_accept(arg1, arg2, arg3);
3532fa74
FB		 3404 break;
3405#endif
3406#ifdef TARGET_NR_bind
3407 case TARGET_NR_bind:
3408 ret = do_bind(arg1, arg2, arg3);
3409 break;
3410#endif
3411#ifdef TARGET_NR_connect
3412 case TARGET_NR_connect:
3413 ret = do_connect(arg1, arg2, arg3);
3414 break;
3415#endif
3416#ifdef TARGET_NR_getpeername
3417 case TARGET_NR_getpeername:
1be9e1dc 3418 ret = do_getpeername(arg1, arg2, arg3);
3532fa74
FB		 3419 break;
3420#endif
3421#ifdef TARGET_NR_getsockname
3422 case TARGET_NR_getsockname:
1be9e1dc 3423 ret = do_getsockname(arg1, arg2, arg3);
3532fa74
FB		 3424 break;
3425#endif
3426#ifdef TARGET_NR_getsockopt
3427 case TARGET_NR_getsockopt:
3428 ret = do_getsockopt(arg1, arg2, arg3, arg4, arg5);
3429 break;
3430#endif
3431#ifdef TARGET_NR_listen
3432 case TARGET_NR_listen:
1be9e1dc 3433 ret = get_errno(listen(arg1, arg2));
3532fa74
FB		 3434 break;
3435#endif
3436#ifdef TARGET_NR_recv
3437 case TARGET_NR_recv:
214201bd 3438 ret = do_recvfrom(arg1, arg2, arg3, arg4, 0, 0);
3532fa74
FB		 3439 break;
3440#endif
3441#ifdef TARGET_NR_recvfrom
3442 case TARGET_NR_recvfrom:
214201bd 3443 ret = do_recvfrom(arg1, arg2, arg3, arg4, arg5, arg6);
3532fa74
FB		 3444 break;
3445#endif
3446#ifdef TARGET_NR_recvmsg
3447 case TARGET_NR_recvmsg:
3448 ret = do_sendrecvmsg(arg1, arg2, arg3, 0);
3449 break;
3450#endif
3451#ifdef TARGET_NR_send
3452 case TARGET_NR_send:
1be9e1dc 3453 ret = do_sendto(arg1, arg2, arg3, arg4, 0, 0);
3532fa74
FB		 3454 break;
3455#endif
3456#ifdef TARGET_NR_sendmsg
3457 case TARGET_NR_sendmsg:
3458 ret = do_sendrecvmsg(arg1, arg2, arg3, 1);
3459 break;
3460#endif
3461#ifdef TARGET_NR_sendto
3462 case TARGET_NR_sendto:
1be9e1dc 3463 ret = do_sendto(arg1, arg2, arg3, arg4, arg5, arg6);
3532fa74
FB		 3464 break;
3465#endif
3466#ifdef TARGET_NR_shutdown
3467 case TARGET_NR_shutdown:
1be9e1dc 3468 ret = get_errno(shutdown(arg1, arg2));
3532fa74
FB		 3469 break;
3470#endif
3471#ifdef TARGET_NR_socket
3472 case TARGET_NR_socket:
3473 ret = do_socket(arg1, arg2, arg3);
3474 break;
3475#endif
3476#ifdef TARGET_NR_socketpair
3477 case TARGET_NR_socketpair:
1be9e1dc 3478 ret = do_socketpair(arg1, arg2, arg3, arg4);
3532fa74
FB		 3479 break;
3480#endif
3481#ifdef TARGET_NR_setsockopt
3482 case TARGET_NR_setsockopt:
3483 ret = do_setsockopt(arg1, arg2, arg3, arg4, (socklen_t) arg5);
3484 break;
3485#endif
7494b0f9 3486
31e31b8a 3487 case TARGET_NR_syslog:
e5574487
TS		 3488 p = lock_user_string(arg2);
3489 ret = get_errno(sys_syslog((int)arg1, p, (int)arg3));
3490 unlock_user(p, arg2, 0);
7494b0f9
TS		 3491 break;
3492
31e31b8a 3493 case TARGET_NR_setitimer:
66fb9763 3494 {
66fb9763
FB		 3495 struct itimerval value, ovalue, *pvalue;
3496
53a5960a 3497 if (arg2) {
66fb9763
FB		 3498 pvalue = &value;
3499 target_to_host_timeval(&pvalue->it_interval,
53a5960a 3500 arg2);
66fb9763 3501 target_to_host_timeval(&pvalue->it_value,
53a5960a 3502 arg2 + sizeof(struct target_timeval));
66fb9763
FB		 3503 } else {
3504 pvalue = NULL;
3505 }
3506 ret = get_errno(setitimer(arg1, pvalue, &ovalue));
53a5960a
PB		 3507 if (!is_error(ret) && arg3) {
3508 host_to_target_timeval(arg3,
66fb9763 3509 &ovalue.it_interval);
53a5960a 3510 host_to_target_timeval(arg3 + sizeof(struct target_timeval),
66fb9763
FB		 3511 &ovalue.it_value);
3512 }
3513 }
3514 break;
31e31b8a 3515 case TARGET_NR_getitimer:
66fb9763 3516 {
66fb9763
FB		 3517 struct itimerval value;
3518
3519 ret = get_errno(getitimer(arg1, &value));
53a5960a
PB		 3520 if (!is_error(ret) && arg2) {
3521 host_to_target_timeval(arg2,
66fb9763 3522 &value.it_interval);
53a5960a 3523 host_to_target_timeval(arg2 + sizeof(struct target_timeval),
66fb9763
FB		 3524 &value.it_value);
3525 }
3526 }
3527 break;
31e31b8a 3528 case TARGET_NR_stat:
53a5960a
PB		 3529 p = lock_user_string(arg1);
3530 ret = get_errno(stat(path(p), &st));
3531 unlock_user(p, arg1, 0);
31e31b8a
FB		 3532 goto do_stat;
3533 case TARGET_NR_lstat:
53a5960a
PB		 3534 p = lock_user_string(arg1);
3535 ret = get_errno(lstat(path(p), &st));
3536 unlock_user(p, arg1, 0);
31e31b8a
FB		 3537 goto do_stat;
3538 case TARGET_NR_fstat:
3539 {
3540 ret = get_errno(fstat(arg1, &st));
3541 do_stat:
3542 if (!is_error(ret)) {
53a5960a 3543 struct target_stat *target_st;
e3584658 3544
53a5960a 3545 lock_user_struct(target_st, arg2, 0);
1b8dd648 3546#if defined(TARGET_MIPS) || defined(TARGET_SPARC64)
e3584658
TS		 3547 target_st->st_dev = tswap32(st.st_dev);
3548#else
31e31b8a 3549 target_st->st_dev = tswap16(st.st_dev);
e3584658 3550#endif
31e31b8a 3551 target_st->st_ino = tswapl(st.st_ino);
7d600c80 3552#if defined(TARGET_PPC) || defined(TARGET_MIPS)
67867308
FB		 3553 target_st->st_mode = tswapl(st.st_mode); /* XXX: check this */
3554 target_st->st_uid = tswap32(st.st_uid);
3555 target_st->st_gid = tswap32(st.st_gid);
1b8dd648
BS		 3556#elif defined(TARGET_SPARC64)
3557 target_st->st_mode = tswap32(st.st_mode);
3558 target_st->st_uid = tswap32(st.st_uid);
3559 target_st->st_gid = tswap32(st.st_gid);
67867308 3560#else
ec86b0fb 3561 target_st->st_mode = tswap16(st.st_mode);
31e31b8a
FB		 3562 target_st->st_uid = tswap16(st.st_uid);
3563 target_st->st_gid = tswap16(st.st_gid);
67867308 3564#endif
e3584658
TS		 3565#if defined(TARGET_MIPS)
3566 /* If this is the same on PPC, then just merge w/ the above ifdef */
3567 target_st->st_nlink = tswapl(st.st_nlink);
3568 target_st->st_rdev = tswapl(st.st_rdev);
1b8dd648
BS		 3569#elif defined(TARGET_SPARC64)
3570 target_st->st_nlink = tswap32(st.st_nlink);
3571 target_st->st_rdev = tswap32(st.st_rdev);
e3584658 3572#else
67867308 3573 target_st->st_nlink = tswap16(st.st_nlink);
31e31b8a 3574 target_st->st_rdev = tswap16(st.st_rdev);
e3584658 3575#endif
31e31b8a
FB		 3576 target_st->st_size = tswapl(st.st_size);
3577 target_st->st_blksize = tswapl(st.st_blksize);
3578 target_st->st_blocks = tswapl(st.st_blocks);
7854b056
FB		 3579 target_st->target_st_atime = tswapl(st.st_atime);
3580 target_st->target_st_mtime = tswapl(st.st_mtime);
3581 target_st->target_st_ctime = tswapl(st.st_ctime);
53a5960a 3582 unlock_user_struct(target_st, arg2, 1);
31e31b8a
FB		 3583 }
3584 }
3585 break;
ebc05488 3586#ifdef TARGET_NR_olduname
31e31b8a
FB		 3587 case TARGET_NR_olduname:
3588 goto unimplemented;
ebc05488
FB		 3589#endif
3590#ifdef TARGET_NR_iopl
31e31b8a
FB		 3591 case TARGET_NR_iopl:
3592 goto unimplemented;
ebc05488 3593#endif
31e31b8a
FB		 3594 case TARGET_NR_vhangup:
3595 ret = get_errno(vhangup());
3596 break;
ebc05488 3597#ifdef TARGET_NR_idle
31e31b8a
FB		 3598 case TARGET_NR_idle:
3599 goto unimplemented;
42ad6ae9
FB		 3600#endif
3601#ifdef TARGET_NR_syscall
3602 case TARGET_NR_syscall:
3603 ret = do_syscall(cpu_env,arg1 & 0xffff,arg2,arg3,arg4,arg5,arg6,0);
3604 break;
ebc05488 3605#endif
31e31b8a
FB		 3606 case TARGET_NR_wait4:
3607 {
3608 int status;
53a5960a 3609 target_long status_ptr = arg2;
31e31b8a 3610 struct rusage rusage, *rusage_ptr;
53a5960a 3611 target_ulong target_rusage = arg4;
31e31b8a
FB		 3612 if (target_rusage)
3613 rusage_ptr = &rusage;
3614 else
3615 rusage_ptr = NULL;
3616 ret = get_errno(wait4(arg1, &status, arg3, rusage_ptr));
3617 if (!is_error(ret)) {
3618 if (status_ptr)
53a5960a 3619 tputl(status_ptr, status);
31e31b8a 3620 if (target_rusage) {
b409186b 3621 host_to_target_rusage(target_rusage, &rusage);
31e31b8a
FB		 3622 }
3623 }
3624 }
3625 break;
e5febef5 3626#ifdef TARGET_NR_swapoff
31e31b8a 3627 case TARGET_NR_swapoff:
53a5960a
PB		 3628 p = lock_user_string(arg1);
3629 ret = get_errno(swapoff(p));
3630 unlock_user(p, arg1, 0);
31e31b8a 3631 break;
e5febef5 3632#endif
31e31b8a 3633 case TARGET_NR_sysinfo:
a5448a7d 3634 {
53a5960a 3635 struct target_sysinfo *target_value;
a5448a7d
FB		 3636 struct sysinfo value;
3637 ret = get_errno(sysinfo(&value));
53a5960a 3638 if (!is_error(ret) && arg1)
a5448a7d 3639 {
53a5960a
PB		 3640 /* ??? __put_user is probably wrong. */
3641 lock_user_struct(target_value, arg1, 0);
a5448a7d
FB		 3642 __put_user(value.uptime, &target_value->uptime);
3643 __put_user(value.loads[0], &target_value->loads[0]);
3644 __put_user(value.loads[1], &target_value->loads[1]);
3645 __put_user(value.loads[2], &target_value->loads[2]);
3646 __put_user(value.totalram, &target_value->totalram);
3647 __put_user(value.freeram, &target_value->freeram);
3648 __put_user(value.sharedram, &target_value->sharedram);
3649 __put_user(value.bufferram, &target_value->bufferram);
3650 __put_user(value.totalswap, &target_value->totalswap);
3651 __put_user(value.freeswap, &target_value->freeswap);
3652 __put_user(value.procs, &target_value->procs);
3653 __put_user(value.totalhigh, &target_value->totalhigh);
3654 __put_user(value.freehigh, &target_value->freehigh);
3655 __put_user(value.mem_unit, &target_value->mem_unit);
53a5960a 3656 unlock_user_struct(target_value, arg1, 1);
a5448a7d
FB		 3657 }
3658 }
3659 break;
e5febef5 3660#ifdef TARGET_NR_ipc
31e31b8a 3661 case TARGET_NR_ipc:
8853f86e
FB		 3662 ret = do_ipc(arg1, arg2, arg3, arg4, arg5, arg6);
3663 break;
e5febef5 3664#endif
31e31b8a
FB		 3665 case TARGET_NR_fsync:
3666 ret = get_errno(fsync(arg1));
3667 break;
31e31b8a 3668 case TARGET_NR_clone:
1b6b029e
FB		 3669 ret = get_errno(do_fork(cpu_env, arg1, arg2));
3670 break;
ec86b0fb
FB		 3671#ifdef __NR_exit_group
3672 /* new thread calls */
3673 case TARGET_NR_exit_group:
e9009676 3674 gdb_exit(cpu_env, arg1);
ec86b0fb
FB		 3675 ret = get_errno(exit_group(arg1));
3676 break;
3677#endif
31e31b8a 3678 case TARGET_NR_setdomainname:
53a5960a
PB		 3679 p = lock_user_string(arg1);
3680 ret = get_errno(setdomainname(p, arg2));
3681 unlock_user(p, arg1, 0);
31e31b8a
FB		 3682 break;
3683 case TARGET_NR_uname:
3684 /* no need to transcode because we use the linux syscall */
29e619b1
FB		 3685 {
3686 struct new_utsname * buf;
3687
53a5960a 3688 lock_user_struct(buf, arg1, 0);
29e619b1
FB		 3689 ret = get_errno(sys_uname(buf));
3690 if (!is_error(ret)) {
3691 /* Overrite the native machine name with whatever is being
3692 emulated. */
3693 strcpy (buf->machine, UNAME_MACHINE);
c5937220
PB		 3694 /* Allow the user to override the reported release. */
3695 if (qemu_uname_release && *qemu_uname_release)
3696 strcpy (buf->release, qemu_uname_release);
29e619b1 3697 }
53a5960a 3698 unlock_user_struct(buf, arg1, 1);
29e619b1 3699 }
31e31b8a 3700 break;
6dbad63e 3701#ifdef TARGET_I386
31e31b8a 3702 case TARGET_NR_modify_ldt:
53a5960a 3703 ret = get_errno(do_modify_ldt(cpu_env, arg1, arg2, arg3));
5cd4393b 3704 break;
84409ddb 3705#if !defined(TARGET_X86_64)
5cd4393b
FB		 3706 case TARGET_NR_vm86old:
3707 goto unimplemented;
3708 case TARGET_NR_vm86:
53a5960a 3709 ret = do_vm86(cpu_env, arg1, arg2);
6dbad63e 3710 break;
84409ddb 3711#endif
6dbad63e 3712#endif
31e31b8a
FB		 3713 case TARGET_NR_adjtimex:
3714 goto unimplemented;
e5febef5 3715#ifdef TARGET_NR_create_module
31e31b8a 3716 case TARGET_NR_create_module:
e5febef5 3717#endif
31e31b8a
FB		 3718 case TARGET_NR_init_module:
3719 case TARGET_NR_delete_module:
e5febef5 3720#ifdef TARGET_NR_get_kernel_syms
31e31b8a 3721 case TARGET_NR_get_kernel_syms:
e5febef5 3722#endif
31e31b8a
FB		 3723 goto unimplemented;
3724 case TARGET_NR_quotactl:
3725 goto unimplemented;
3726 case TARGET_NR_getpgid:
3727 ret = get_errno(getpgid(arg1));
3728 break;
3729 case TARGET_NR_fchdir:
3730 ret = get_errno(fchdir(arg1));
3731 break;
84409ddb 3732#ifdef TARGET_NR_bdflush /* not on x86_64 */
31e31b8a
FB		 3733 case TARGET_NR_bdflush:
3734 goto unimplemented;
84409ddb 3735#endif
e5febef5 3736#ifdef TARGET_NR_sysfs
31e31b8a
FB		 3737 case TARGET_NR_sysfs:
3738 goto unimplemented;
e5febef5 3739#endif
31e31b8a 3740 case TARGET_NR_personality:
1b6b029e 3741 ret = get_errno(personality(arg1));
31e31b8a 3742 break;
e5febef5 3743#ifdef TARGET_NR_afs_syscall
31e31b8a
FB		 3744 case TARGET_NR_afs_syscall:
3745 goto unimplemented;
e5febef5 3746#endif
7a3148a9 3747#ifdef TARGET_NR__llseek /* Not on alpha */
31e31b8a
FB		 3748 case TARGET_NR__llseek:
3749 {
4f2ac237
FB		 3750#if defined (__x86_64__)
3751 ret = get_errno(lseek(arg1, ((uint64_t )arg2 << 32) | arg3, arg5));
53a5960a 3752 tput64(arg4, ret);
4f2ac237 3753#else
31e31b8a
FB		 3754 int64_t res;
3755 ret = get_errno(_llseek(arg1, arg2, arg3, &res, arg5));
53a5960a 3756 tput64(arg4, res);
4f2ac237 3757#endif
31e31b8a
FB		 3758 }
3759 break;
7a3148a9 3760#endif
31e31b8a
FB		 3761 case TARGET_NR_getdents:
3762#if TARGET_LONG_SIZE != 4
53a5960a 3763 goto unimplemented;
a315a145 3764#warning not supported
4add45b4
FB		 3765#elif TARGET_LONG_SIZE == 4 && HOST_LONG_SIZE == 8
3766 {
53a5960a 3767 struct target_dirent *target_dirp;
4add45b4
FB		 3768 struct dirent *dirp;
3769 long count = arg3;
3770
3771 dirp = malloc(count);
3772 if (!dirp)
3773 return -ENOMEM;
3774
3775 ret = get_errno(sys_getdents(arg1, dirp, count));
3776 if (!is_error(ret)) {
3777 struct dirent *de;
3778 struct target_dirent *tde;
3779 int len = ret;
3780 int reclen, treclen;
3781 int count1, tnamelen;
3782
3783 count1 = 0;
3784 de = dirp;
53a5960a 3785 target_dirp = lock_user(arg2, count, 0);
4add45b4
FB		 3786 tde = target_dirp;
3787 while (len > 0) {
3788 reclen = de->d_reclen;
3789 treclen = reclen - (2 * (sizeof(long) - sizeof(target_long)));
3790 tde->d_reclen = tswap16(treclen);
3791 tde->d_ino = tswapl(de->d_ino);
3792 tde->d_off = tswapl(de->d_off);
3793 tnamelen = treclen - (2 * sizeof(target_long) + 2);
3794 if (tnamelen > 256)
3795 tnamelen = 256;
80a9d035 3796 /* XXX: may not be correct */
4add45b4
FB		 3797 strncpy(tde->d_name, de->d_name, tnamelen);
3798 de = (struct dirent *)((char *)de + reclen);
3799 len -= reclen;
1c5bf3bf 3800 tde = (struct target_dirent *)((char *)tde + treclen);
4add45b4
FB		 3801 count1 += treclen;
3802 }
3803 ret = count1;
3804 }
53a5960a 3805 unlock_user(target_dirp, arg2, ret);
4add45b4
FB		 3806 free(dirp);
3807 }
3808#else
31e31b8a 3809 {
53a5960a 3810 struct dirent *dirp;
31e31b8a 3811 long count = arg3;
dab2ed99 3812
53a5960a 3813 dirp = lock_user(arg2, count, 0);
72f03900 3814 ret = get_errno(sys_getdents(arg1, dirp, count));
31e31b8a
FB		 3815 if (!is_error(ret)) {
3816 struct dirent *de;
3817 int len = ret;
3818 int reclen;
3819 de = dirp;
3820 while (len > 0) {
8083a3e5 3821 reclen = de->d_reclen;
31e31b8a
FB		 3822 if (reclen > len)
3823 break;
8083a3e5 3824 de->d_reclen = tswap16(reclen);
31e31b8a
FB		 3825 tswapls(&de->d_ino);
3826 tswapls(&de->d_off);
3827 de = (struct dirent *)((char *)de + reclen);
3828 len -= reclen;
3829 }
3830 }
53a5960a 3831 unlock_user(dirp, arg2, ret);
31e31b8a 3832 }
4add45b4 3833#endif
31e31b8a 3834 break;
a541f297 3835#ifdef TARGET_NR_getdents64
dab2ed99
FB		 3836 case TARGET_NR_getdents64:
3837 {
53a5960a 3838 struct dirent64 *dirp;
dab2ed99 3839 long count = arg3;
53a5960a 3840 dirp = lock_user(arg2, count, 0);
dab2ed99
FB		 3841 ret = get_errno(sys_getdents64(arg1, dirp, count));
3842 if (!is_error(ret)) {
3843 struct dirent64 *de;
3844 int len = ret;
3845 int reclen;
3846 de = dirp;
3847 while (len > 0) {
8083a3e5 3848 reclen = de->d_reclen;
dab2ed99
FB		 3849 if (reclen > len)
3850 break;
8083a3e5 3851 de->d_reclen = tswap16(reclen);
dab2ed99
FB		 3852 tswap64s(&de->d_ino);
3853 tswap64s(&de->d_off);
3854 de = (struct dirent64 *)((char *)de + reclen);
3855 len -= reclen;
3856 }
3857 }
53a5960a 3858 unlock_user(dirp, arg2, ret);
dab2ed99
FB		 3859 }
3860 break;
a541f297 3861#endif /* TARGET_NR_getdents64 */
e5febef5 3862#ifdef TARGET_NR__newselect
31e31b8a 3863 case TARGET_NR__newselect:
53a5960a 3864 ret = do_select(arg1, arg2, arg3, arg4, arg5);
31e31b8a 3865 break;
e5febef5
TS		 3866#endif
3867#ifdef TARGET_NR_poll
9de5e440
FB		 3868 case TARGET_NR_poll:
3869 {
53a5960a 3870 struct target_pollfd *target_pfd;
9de5e440
FB		 3871 unsigned int nfds = arg2;
3872 int timeout = arg3;
3873 struct pollfd *pfd;
7854b056 3874 unsigned int i;
9de5e440 3875
53a5960a 3876 target_pfd = lock_user(arg1, sizeof(struct target_pollfd) * nfds, 1);
9de5e440
FB		 3877 pfd = alloca(sizeof(struct pollfd) * nfds);
3878 for(i = 0; i < nfds; i++) {
5cd4393b
FB		 3879 pfd[i].fd = tswap32(target_pfd[i].fd);
3880 pfd[i].events = tswap16(target_pfd[i].events);
9de5e440
FB		 3881 }
3882 ret = get_errno(poll(pfd, nfds, timeout));
3883 if (!is_error(ret)) {
3884 for(i = 0; i < nfds; i++) {
5cd4393b 3885 target_pfd[i].revents = tswap16(pfd[i].revents);
9de5e440 3886 }
53a5960a
PB		 3887 ret += nfds * (sizeof(struct target_pollfd)
3888 - sizeof(struct pollfd));
9de5e440 3889 }
53a5960a 3890 unlock_user(target_pfd, arg1, ret);
9de5e440
FB		 3891 }
3892 break;
e5febef5 3893#endif
31e31b8a 3894 case TARGET_NR_flock:
9de5e440
FB		 3895 /* NOTE: the flock constant seems to be the same for every
3896 Linux platform */
3897 ret = get_errno(flock(arg1, arg2));
31e31b8a
FB		 3898 break;
3899 case TARGET_NR_readv:
3900 {
3901 int count = arg3;
31e31b8a 3902 struct iovec *vec;
31e31b8a
FB		 3903
3904 vec = alloca(count * sizeof(struct iovec));
53a5960a 3905 lock_iovec(vec, arg2, count, 0);
31e31b8a 3906 ret = get_errno(readv(arg1, vec, count));
53a5960a 3907 unlock_iovec(vec, arg2, count, 1);
31e31b8a
FB		 3908 }
3909 break;
3910 case TARGET_NR_writev:
3911 {
3912 int count = arg3;
31e31b8a 3913 struct iovec *vec;
31e31b8a
FB		 3914
3915 vec = alloca(count * sizeof(struct iovec));
53a5960a 3916 lock_iovec(vec, arg2, count, 1);
31e31b8a 3917 ret = get_errno(writev(arg1, vec, count));
53a5960a 3918 unlock_iovec(vec, arg2, count, 0);
31e31b8a
FB		 3919 }
3920 break;
3921 case TARGET_NR_getsid:
3922 ret = get_errno(getsid(arg1));
3923 break;
7a3148a9 3924#if defined(TARGET_NR_fdatasync) /* Not on alpha (osf_datasync ?) */
31e31b8a 3925 case TARGET_NR_fdatasync:
5cd4393b
FB		 3926 ret = get_errno(fdatasync(arg1));
3927 break;
7a3148a9 3928#endif
31e31b8a 3929 case TARGET_NR__sysctl:
29e619b1
FB		 3930 /* We don't implement this, but ENODIR is always a safe
3931 return value. */
3932 return -ENOTDIR;
31e31b8a 3933 case TARGET_NR_sched_setparam:
5cd4393b 3934 {
53a5960a 3935 struct sched_param *target_schp;
5cd4393b 3936 struct sched_param schp;
53a5960a
PB		 3937
3938 lock_user_struct(target_schp, arg2, 1);
5cd4393b 3939 schp.sched_priority = tswap32(target_schp->sched_priority);
53a5960a 3940 unlock_user_struct(target_schp, arg2, 0);
5cd4393b
FB		 3941 ret = get_errno(sched_setparam(arg1, &schp));
3942 }
3943 break;
31e31b8a 3944 case TARGET_NR_sched_getparam:
5cd4393b 3945 {
53a5960a 3946 struct sched_param *target_schp;
5cd4393b
FB		 3947 struct sched_param schp;
3948 ret = get_errno(sched_getparam(arg1, &schp));
3949 if (!is_error(ret)) {
53a5960a 3950 lock_user_struct(target_schp, arg2, 0);
5cd4393b 3951 target_schp->sched_priority = tswap32(schp.sched_priority);
53a5960a 3952 unlock_user_struct(target_schp, arg2, 1);
5cd4393b
FB		 3953 }
3954 }
3955 break;
31e31b8a 3956 case TARGET_NR_sched_setscheduler:
5cd4393b 3957 {
53a5960a 3958 struct sched_param *target_schp;
5cd4393b 3959 struct sched_param schp;
53a5960a 3960 lock_user_struct(target_schp, arg3, 1);
5cd4393b 3961 schp.sched_priority = tswap32(target_schp->sched_priority);
53a5960a 3962 unlock_user_struct(target_schp, arg3, 0);
5cd4393b
FB		 3963 ret = get_errno(sched_setscheduler(arg1, arg2, &schp));
3964 }
3965 break;
31e31b8a 3966 case TARGET_NR_sched_getscheduler:
5cd4393b
FB		 3967 ret = get_errno(sched_getscheduler(arg1));
3968 break;
31e31b8a
FB		 3969 case TARGET_NR_sched_yield:
3970 ret = get_errno(sched_yield());
3971 break;
3972 case TARGET_NR_sched_get_priority_max:
5cd4393b
FB		 3973 ret = get_errno(sched_get_priority_max(arg1));
3974 break;
31e31b8a 3975 case TARGET_NR_sched_get_priority_min:
5cd4393b
FB		 3976 ret = get_errno(sched_get_priority_min(arg1));
3977 break;
31e31b8a 3978 case TARGET_NR_sched_rr_get_interval:
5cd4393b 3979 {
5cd4393b
FB		 3980 struct timespec ts;
3981 ret = get_errno(sched_rr_get_interval(arg1, &ts));
3982 if (!is_error(ret)) {
53a5960a 3983 host_to_target_timespec(arg2, &ts);
5cd4393b
FB		 3984 }
3985 }
3986 break;
31e31b8a 3987 case TARGET_NR_nanosleep:
1b6b029e 3988 {
1b6b029e 3989 struct timespec req, rem;
53a5960a 3990 target_to_host_timespec(&req, arg1);
1b6b029e 3991 ret = get_errno(nanosleep(&req, &rem));
53a5960a
PB		 3992 if (is_error(ret) && arg2) {
3993 host_to_target_timespec(arg2, &rem);
1b6b029e
FB		 3994 }
3995 }
3996 break;
e5febef5 3997#ifdef TARGET_NR_query_module
31e31b8a 3998 case TARGET_NR_query_module:
5cd4393b 3999 goto unimplemented;
e5febef5
TS		 4000#endif
4001#ifdef TARGET_NR_nfsservctl
31e31b8a 4002 case TARGET_NR_nfsservctl:
5cd4393b 4003 goto unimplemented;
e5febef5 4004#endif
31e31b8a 4005 case TARGET_NR_prctl:
e5574487
TS		 4006 switch (arg1)
4007 {
4008 case PR_GET_PDEATHSIG:
4009 {
4010 int deathsig;
4011 ret = get_errno(prctl(arg1, &deathsig, arg3, arg4, arg5));
4012 if (!is_error(ret) && arg2)
4013 tput32(arg2, deathsig);
4014 }
4015 break;
4016 default:
4017 ret = get_errno(prctl(arg1, arg2, arg3, arg4, arg5));
4018 break;
4019 }
39b9aae1 4020 break;
67867308 4021#ifdef TARGET_NR_pread
31e31b8a 4022 case TARGET_NR_pread:
53a5960a
PB		 4023 page_unprotect_range(arg2, arg3);
4024 p = lock_user(arg2, arg3, 0);
4025 ret = get_errno(pread(arg1, p, arg3, arg4));
4026 unlock_user(p, arg2, ret);
206f0fa7 4027 break;
31e31b8a 4028 case TARGET_NR_pwrite:
53a5960a
PB		 4029 p = lock_user(arg2, arg3, 1);
4030 ret = get_errno(pwrite(arg1, p, arg3, arg4));
4031 unlock_user(p, arg2, 0);
206f0fa7 4032 break;
67867308 4033#endif
31e31b8a 4034 case TARGET_NR_getcwd:
53a5960a
PB		 4035 p = lock_user(arg1, arg2, 0);
4036 ret = get_errno(sys_getcwd1(p, arg2));
4037 unlock_user(p, arg1, ret);
31e31b8a
FB		 4038 break;
4039 case TARGET_NR_capget:
5cd4393b 4040 goto unimplemented;
31e31b8a 4041 case TARGET_NR_capset:
5cd4393b 4042 goto unimplemented;
31e31b8a 4043 case TARGET_NR_sigaltstack:
5cd4393b 4044 goto unimplemented;
31e31b8a 4045 case TARGET_NR_sendfile:
5cd4393b 4046 goto unimplemented;
ebc05488 4047#ifdef TARGET_NR_getpmsg
31e31b8a 4048 case TARGET_NR_getpmsg:
5cd4393b 4049 goto unimplemented;
ebc05488
FB		 4050#endif
4051#ifdef TARGET_NR_putpmsg
31e31b8a 4052 case TARGET_NR_putpmsg:
5cd4393b 4053 goto unimplemented;
ebc05488 4054#endif
048f6b4d 4055#ifdef TARGET_NR_vfork
31e31b8a 4056 case TARGET_NR_vfork:
1b6b029e 4057 ret = get_errno(do_fork(cpu_env, CLONE_VFORK | CLONE_VM | SIGCHLD, 0));
31e31b8a 4058 break;
048f6b4d 4059#endif
ebc05488 4060#ifdef TARGET_NR_ugetrlimit
31e31b8a 4061 case TARGET_NR_ugetrlimit:
728584be
FB		 4062 {
4063 struct rlimit rlim;
4064 ret = get_errno(getrlimit(arg1, &rlim));
4065 if (!is_error(ret)) {
53a5960a
PB		 4066 struct target_rlimit *target_rlim;
4067 lock_user_struct(target_rlim, arg2, 0);
728584be
FB		 4068 target_rlim->rlim_cur = tswapl(rlim.rlim_cur);
4069 target_rlim->rlim_max = tswapl(rlim.rlim_max);
53a5960a 4070 unlock_user_struct(target_rlim, arg2, 1);
728584be
FB		 4071 }
4072 break;
4073 }
ebc05488 4074#endif
a315a145 4075#ifdef TARGET_NR_truncate64
31e31b8a 4076 case TARGET_NR_truncate64:
53a5960a
PB		 4077 p = lock_user_string(arg1);
4078 ret = target_truncate64(cpu_env, p, arg2, arg3, arg4);
4079 unlock_user(p, arg1, 0);
667f38b1 4080 break;
a315a145
FB		 4081#endif
4082#ifdef TARGET_NR_ftruncate64
31e31b8a 4083 case TARGET_NR_ftruncate64:
ce4defa0 4084 ret = target_ftruncate64(cpu_env, arg1, arg2, arg3, arg4);
667f38b1 4085 break;
a315a145
FB		 4086#endif
4087#ifdef TARGET_NR_stat64
31e31b8a 4088 case TARGET_NR_stat64:
53a5960a
PB		 4089 p = lock_user_string(arg1);
4090 ret = get_errno(stat(path(p), &st));
4091 unlock_user(p, arg1, 0);
60cd49d5 4092 goto do_stat64;
a315a145
FB		 4093#endif
4094#ifdef TARGET_NR_lstat64
31e31b8a 4095 case TARGET_NR_lstat64:
53a5960a
PB		 4096 p = lock_user_string(arg1);
4097 ret = get_errno(lstat(path(p), &st));
4098 unlock_user(p, arg1, 0);
60cd49d5 4099 goto do_stat64;
a315a145
FB		 4100#endif
4101#ifdef TARGET_NR_fstat64
31e31b8a 4102 case TARGET_NR_fstat64:
60cd49d5
FB		 4103 {
4104 ret = get_errno(fstat(arg1, &st));
4105 do_stat64:
4106 if (!is_error(ret)) {
ce4defa0
PB		 4107#ifdef TARGET_ARM
4108 if (((CPUARMState *)cpu_env)->eabi) {
53a5960a
PB		 4109 struct target_eabi_stat64 *target_st;
4110 lock_user_struct(target_st, arg2, 1);
ce4defa0 4111 memset(target_st, 0, sizeof(struct target_eabi_stat64));
53a5960a 4112 /* put_user is probably wrong. */
ce4defa0
PB		 4113 put_user(st.st_dev, &target_st->st_dev);
4114 put_user(st.st_ino, &target_st->st_ino);
4115#ifdef TARGET_STAT64_HAS_BROKEN_ST_INO
4116 put_user(st.st_ino, &target_st->__st_ino);
4117#endif
4118 put_user(st.st_mode, &target_st->st_mode);
4119 put_user(st.st_nlink, &target_st->st_nlink);
4120 put_user(st.st_uid, &target_st->st_uid);
4121 put_user(st.st_gid, &target_st->st_gid);
4122 put_user(st.st_rdev, &target_st->st_rdev);
4123 /* XXX: better use of kernel struct */
4124 put_user(st.st_size, &target_st->st_size);
4125 put_user(st.st_blksize, &target_st->st_blksize);
4126 put_user(st.st_blocks, &target_st->st_blocks);
4127 put_user(st.st_atime, &target_st->target_st_atime);
4128 put_user(st.st_mtime, &target_st->target_st_mtime);
4129 put_user(st.st_ctime, &target_st->target_st_ctime);
53a5960a 4130 unlock_user_struct(target_st, arg2, 0);
ce4defa0
PB		 4131 } else
4132#endif
4133 {
53a5960a
PB		 4134 struct target_stat64 *target_st;
4135 lock_user_struct(target_st, arg2, 1);
ce4defa0 4136 memset(target_st, 0, sizeof(struct target_stat64));
53a5960a 4137 /* ??? put_user is probably wrong. */
ce4defa0
PB		 4138 put_user(st.st_dev, &target_st->st_dev);
4139 put_user(st.st_ino, &target_st->st_ino);
ec86b0fb 4140#ifdef TARGET_STAT64_HAS_BROKEN_ST_INO
ce4defa0
PB		 4141 put_user(st.st_ino, &target_st->__st_ino);
4142#endif
4143 put_user(st.st_mode, &target_st->st_mode);
4144 put_user(st.st_nlink, &target_st->st_nlink);
4145 put_user(st.st_uid, &target_st->st_uid);
4146 put_user(st.st_gid, &target_st->st_gid);
4147 put_user(st.st_rdev, &target_st->st_rdev);
4148 /* XXX: better use of kernel struct */
4149 put_user(st.st_size, &target_st->st_size);
4150 put_user(st.st_blksize, &target_st->st_blksize);
4151 put_user(st.st_blocks, &target_st->st_blocks);
4152 put_user(st.st_atime, &target_st->target_st_atime);
4153 put_user(st.st_mtime, &target_st->target_st_mtime);
4154 put_user(st.st_ctime, &target_st->target_st_ctime);
53a5960a 4155 unlock_user_struct(target_st, arg2, 0);
ce4defa0 4156 }
60cd49d5
FB		 4157 }
4158 }
4159 break;
a315a145 4160#endif
67867308
FB		 4161#ifdef USE_UID16
4162 case TARGET_NR_lchown:
53a5960a
PB		 4163 p = lock_user_string(arg1);
4164 ret = get_errno(lchown(p, low2highuid(arg2), low2highgid(arg3)));
4165 unlock_user(p, arg1, 0);
67867308
FB		 4166 break;
4167 case TARGET_NR_getuid:
4168 ret = get_errno(high2lowuid(getuid()));
4169 break;
4170 case TARGET_NR_getgid:
4171 ret = get_errno(high2lowgid(getgid()));
4172 break;
4173 case TARGET_NR_geteuid:
4174 ret = get_errno(high2lowuid(geteuid()));
4175 break;
4176 case TARGET_NR_getegid:
4177 ret = get_errno(high2lowgid(getegid()));
4178 break;
4179 case TARGET_NR_setreuid:
4180 ret = get_errno(setreuid(low2highuid(arg1), low2highuid(arg2)));
4181 break;
4182 case TARGET_NR_setregid:
4183 ret = get_errno(setregid(low2highgid(arg1), low2highgid(arg2)));
4184 break;
4185 case TARGET_NR_getgroups:
4186 {
4187 int gidsetsize = arg1;
53a5960a 4188 uint16_t *target_grouplist;
67867308
FB		 4189 gid_t *grouplist;
4190 int i;
4191
4192 grouplist = alloca(gidsetsize * sizeof(gid_t));
4193 ret = get_errno(getgroups(gidsetsize, grouplist));
4194 if (!is_error(ret)) {
53a5960a 4195 target_grouplist = lock_user(arg2, gidsetsize * 2, 0);
67867308
FB		 4196 for(i = 0;i < gidsetsize; i++)
4197 target_grouplist[i] = tswap16(grouplist[i]);
53a5960a 4198 unlock_user(target_grouplist, arg2, gidsetsize * 2);
67867308
FB		 4199 }
4200 }
4201 break;
4202 case TARGET_NR_setgroups:
4203 {
4204 int gidsetsize = arg1;
53a5960a 4205 uint16_t *target_grouplist;
67867308
FB		 4206 gid_t *grouplist;
4207 int i;
4208
4209 grouplist = alloca(gidsetsize * sizeof(gid_t));
53a5960a 4210 target_grouplist = lock_user(arg2, gidsetsize * 2, 1);
67867308
FB		 4211 for(i = 0;i < gidsetsize; i++)
4212 grouplist[i] = tswap16(target_grouplist[i]);
53a5960a 4213 unlock_user(target_grouplist, arg2, 0);
67867308
FB		 4214 ret = get_errno(setgroups(gidsetsize, grouplist));
4215 }
4216 break;
4217 case TARGET_NR_fchown:
4218 ret = get_errno(fchown(arg1, low2highuid(arg2), low2highgid(arg3)));
4219 break;
4220#ifdef TARGET_NR_setresuid
4221 case TARGET_NR_setresuid:
4222 ret = get_errno(setresuid(low2highuid(arg1),
4223 low2highuid(arg2),
4224 low2highuid(arg3)));
4225 break;
4226#endif
4227#ifdef TARGET_NR_getresuid
4228 case TARGET_NR_getresuid:
4229 {
53a5960a 4230 uid_t ruid, euid, suid;
67867308
FB		 4231 ret = get_errno(getresuid(&ruid, &euid, &suid));
4232 if (!is_error(ret)) {
53a5960a
PB		 4233 tput16(arg1, tswap16(high2lowuid(ruid)));
4234 tput16(arg2, tswap16(high2lowuid(euid)));
4235 tput16(arg3, tswap16(high2lowuid(suid)));
67867308
FB		 4236 }
4237 }
4238 break;
4239#endif
4240#ifdef TARGET_NR_getresgid
4241 case TARGET_NR_setresgid:
4242 ret = get_errno(setresgid(low2highgid(arg1),
4243 low2highgid(arg2),
4244 low2highgid(arg3)));
4245 break;
4246#endif
4247#ifdef TARGET_NR_getresgid
4248 case TARGET_NR_getresgid:
4249 {
53a5960a 4250 gid_t rgid, egid, sgid;
67867308
FB		 4251 ret = get_errno(getresgid(&rgid, &egid, &sgid));
4252 if (!is_error(ret)) {
53a5960a
PB		 4253 tput16(arg1, tswap16(high2lowgid(rgid)));
4254 tput16(arg2, tswap16(high2lowgid(egid)));
4255 tput16(arg3, tswap16(high2lowgid(sgid)));
67867308
FB		 4256 }
4257 }
4258 break;
4259#endif
4260 case TARGET_NR_chown:
53a5960a
PB		 4261 p = lock_user_string(arg1);
4262 ret = get_errno(chown(p, low2highuid(arg2), low2highgid(arg3)));
4263 unlock_user(p, arg1, 0);
67867308
FB		 4264 break;
4265 case TARGET_NR_setuid:
4266 ret = get_errno(setuid(low2highuid(arg1)));
4267 break;
4268 case TARGET_NR_setgid:
4269 ret = get_errno(setgid(low2highgid(arg1)));
4270 break;
4271 case TARGET_NR_setfsuid:
4272 ret = get_errno(setfsuid(arg1));
4273 break;
4274 case TARGET_NR_setfsgid:
4275 ret = get_errno(setfsgid(arg1));
4276 break;
4277#endif /* USE_UID16 */
4278
a315a145 4279#ifdef TARGET_NR_lchown32
31e31b8a 4280 case TARGET_NR_lchown32:
53a5960a
PB		 4281 p = lock_user_string(arg1);
4282 ret = get_errno(lchown(p, arg2, arg3));
4283 unlock_user(p, arg1, 0);
b03c60f3 4284 break;
a315a145
FB		 4285#endif
4286#ifdef TARGET_NR_getuid32
31e31b8a 4287 case TARGET_NR_getuid32:
b03c60f3
FB		 4288 ret = get_errno(getuid());
4289 break;
a315a145
FB		 4290#endif
4291#ifdef TARGET_NR_getgid32
31e31b8a 4292 case TARGET_NR_getgid32:
b03c60f3
FB		 4293 ret = get_errno(getgid());
4294 break;
a315a145
FB		 4295#endif
4296#ifdef TARGET_NR_geteuid32
31e31b8a 4297 case TARGET_NR_geteuid32:
b03c60f3
FB		 4298 ret = get_errno(geteuid());
4299 break;
a315a145
FB		 4300#endif
4301#ifdef TARGET_NR_getegid32
31e31b8a 4302 case TARGET_NR_getegid32:
b03c60f3
FB		 4303 ret = get_errno(getegid());
4304 break;
a315a145
FB		 4305#endif
4306#ifdef TARGET_NR_setreuid32
31e31b8a 4307 case TARGET_NR_setreuid32:
b03c60f3
FB		 4308 ret = get_errno(setreuid(arg1, arg2));
4309 break;
a315a145
FB		 4310#endif
4311#ifdef TARGET_NR_setregid32
31e31b8a 4312 case TARGET_NR_setregid32:
b03c60f3
FB		 4313 ret = get_errno(setregid(arg1, arg2));
4314 break;
a315a145
FB		 4315#endif
4316#ifdef TARGET_NR_getgroups32
31e31b8a 4317 case TARGET_NR_getgroups32:
99c475ab
FB		 4318 {
4319 int gidsetsize = arg1;
53a5960a 4320 uint32_t *target_grouplist;
99c475ab
FB		 4321 gid_t *grouplist;
4322 int i;
4323
4324 grouplist = alloca(gidsetsize * sizeof(gid_t));
4325 ret = get_errno(getgroups(gidsetsize, grouplist));
4326 if (!is_error(ret)) {
53a5960a 4327 target_grouplist = lock_user(arg2, gidsetsize * 4, 0);
99c475ab 4328 for(i = 0;i < gidsetsize; i++)
53a5960a
PB		 4329 target_grouplist[i] = tswap32(grouplist[i]);
4330 unlock_user(target_grouplist, arg2, gidsetsize * 4);
99c475ab
FB		 4331 }
4332 }
4333 break;
a315a145
FB		 4334#endif
4335#ifdef TARGET_NR_setgroups32
31e31b8a 4336 case TARGET_NR_setgroups32:
99c475ab
FB		 4337 {
4338 int gidsetsize = arg1;
53a5960a 4339 uint32_t *target_grouplist;
99c475ab
FB		 4340 gid_t *grouplist;
4341 int i;
4342
4343 grouplist = alloca(gidsetsize * sizeof(gid_t));
53a5960a 4344 target_grouplist = lock_user(arg2, gidsetsize * 4, 1);
99c475ab 4345 for(i = 0;i < gidsetsize; i++)
53a5960a
PB		 4346 grouplist[i] = tswap32(target_grouplist[i]);
4347 unlock_user(target_grouplist, arg2, 0);
99c475ab
FB		 4348 ret = get_errno(setgroups(gidsetsize, grouplist));
4349 }
4350 break;
a315a145
FB		 4351#endif
4352#ifdef TARGET_NR_fchown32
31e31b8a 4353 case TARGET_NR_fchown32:
b03c60f3
FB		 4354 ret = get_errno(fchown(arg1, arg2, arg3));
4355 break;
a315a145
FB		 4356#endif
4357#ifdef TARGET_NR_setresuid32
31e31b8a 4358 case TARGET_NR_setresuid32:
b03c60f3
FB		 4359 ret = get_errno(setresuid(arg1, arg2, arg3));
4360 break;
a315a145
FB		 4361#endif
4362#ifdef TARGET_NR_getresuid32
31e31b8a 4363 case TARGET_NR_getresuid32:
b03c60f3 4364 {
53a5960a 4365 uid_t ruid, euid, suid;
b03c60f3
FB		 4366 ret = get_errno(getresuid(&ruid, &euid, &suid));
4367 if (!is_error(ret)) {
53a5960a
PB		 4368 tput32(arg1, tswap32(ruid));
4369 tput32(arg2, tswap32(euid));
4370 tput32(arg3, tswap32(suid));
b03c60f3
FB		 4371 }
4372 }
4373 break;
a315a145
FB		 4374#endif
4375#ifdef TARGET_NR_setresgid32
31e31b8a 4376 case TARGET_NR_setresgid32:
b03c60f3
FB		 4377 ret = get_errno(setresgid(arg1, arg2, arg3));
4378 break;
a315a145
FB		 4379#endif
4380#ifdef TARGET_NR_getresgid32
31e31b8a 4381 case TARGET_NR_getresgid32:
b03c60f3 4382 {
53a5960a 4383 gid_t rgid, egid, sgid;
b03c60f3
FB		 4384 ret = get_errno(getresgid(&rgid, &egid, &sgid));
4385 if (!is_error(ret)) {
53a5960a
PB		 4386 tput32(arg1, tswap32(rgid));
4387 tput32(arg2, tswap32(egid));
4388 tput32(arg3, tswap32(sgid));
b03c60f3
FB		 4389 }
4390 }
4391 break;
a315a145
FB		 4392#endif
4393#ifdef TARGET_NR_chown32
31e31b8a 4394 case TARGET_NR_chown32:
53a5960a
PB		 4395 p = lock_user_string(arg1);
4396 ret = get_errno(chown(p, arg2, arg3));
4397 unlock_user(p, arg1, 0);
b03c60f3 4398 break;
a315a145
FB		 4399#endif
4400#ifdef TARGET_NR_setuid32
31e31b8a 4401 case TARGET_NR_setuid32:
b03c60f3
FB		 4402 ret = get_errno(setuid(arg1));
4403 break;
a315a145
FB		 4404#endif
4405#ifdef TARGET_NR_setgid32
31e31b8a 4406 case TARGET_NR_setgid32:
b03c60f3
FB		 4407 ret = get_errno(setgid(arg1));
4408 break;
a315a145
FB		 4409#endif
4410#ifdef TARGET_NR_setfsuid32
31e31b8a 4411 case TARGET_NR_setfsuid32:
b03c60f3
FB		 4412 ret = get_errno(setfsuid(arg1));
4413 break;
a315a145
FB		 4414#endif
4415#ifdef TARGET_NR_setfsgid32
31e31b8a 4416 case TARGET_NR_setfsgid32:
b03c60f3
FB		 4417 ret = get_errno(setfsgid(arg1));
4418 break;
a315a145 4419#endif
67867308 4420
31e31b8a 4421 case TARGET_NR_pivot_root:
b03c60f3 4422 goto unimplemented;
ffa65c3b 4423#ifdef TARGET_NR_mincore
31e31b8a 4424 case TARGET_NR_mincore:
b03c60f3 4425 goto unimplemented;
ffa65c3b
FB		 4426#endif
4427#ifdef TARGET_NR_madvise
31e31b8a 4428 case TARGET_NR_madvise:
24836689
PB		 4429 /* A straight passthrough may not be safe because qemu sometimes
4430 turns private flie-backed mappings into anonymous mappings.
4431 This will break MADV_DONTNEED.
4432 This is a hint, so ignoring and returning success is ok. */
4433 ret = get_errno(0);
4434 break;
ffa65c3b 4435#endif
60cd49d5 4436#if TARGET_LONG_BITS == 32
31e31b8a 4437 case TARGET_NR_fcntl64:
77e4672d 4438 {
b1e341eb 4439 int cmd;
77e4672d 4440 struct flock64 fl;
53a5960a 4441 struct target_flock64 *target_fl;
ce4defa0 4442#ifdef TARGET_ARM
53a5960a 4443 struct target_eabi_flock64 *target_efl;
ce4defa0 4444#endif
77e4672d 4445
b1e341eb
TS		 4446 switch(arg2){
4447 case TARGET_F_GETLK64:
4448 cmd = F_GETLK64;
a7222580 4449 break;
b1e341eb
TS		 4450 case TARGET_F_SETLK64:
4451 cmd = F_SETLK64;
a7222580 4452 break;
b1e341eb
TS		 4453 case TARGET_F_SETLKW64:
4454 cmd = F_SETLK64;
a7222580 4455 break;
b1e341eb
TS		 4456 default:
4457 cmd = arg2;
a7222580 4458 break;
b1e341eb
TS		 4459 }
4460
60cd49d5 4461 switch(arg2) {
b1e341eb 4462 case TARGET_F_GETLK64:
5813427b
TS		 4463#ifdef TARGET_ARM
4464 if (((CPUARMState *)cpu_env)->eabi) {
4465 lock_user_struct(target_efl, arg3, 1);
4466 fl.l_type = tswap16(target_efl->l_type);
4467 fl.l_whence = tswap16(target_efl->l_whence);
4468 fl.l_start = tswap64(target_efl->l_start);
4469 fl.l_len = tswap64(target_efl->l_len);
4470 fl.l_pid = tswapl(target_efl->l_pid);
4471 unlock_user_struct(target_efl, arg3, 0);
4472 } else
4473#endif
4474 {
4475 lock_user_struct(target_fl, arg3, 1);
4476 fl.l_type = tswap16(target_fl->l_type);
4477 fl.l_whence = tswap16(target_fl->l_whence);
4478 fl.l_start = tswap64(target_fl->l_start);
4479 fl.l_len = tswap64(target_fl->l_len);
4480 fl.l_pid = tswapl(target_fl->l_pid);
4481 unlock_user_struct(target_fl, arg3, 0);
4482 }
b1e341eb 4483 ret = get_errno(fcntl(arg1, cmd, &fl));
77e4672d 4484 if (ret == 0) {
ce4defa0
PB		 4485#ifdef TARGET_ARM
4486 if (((CPUARMState *)cpu_env)->eabi) {
53a5960a 4487 lock_user_struct(target_efl, arg3, 0);
ce4defa0
PB		 4488 target_efl->l_type = tswap16(fl.l_type);
4489 target_efl->l_whence = tswap16(fl.l_whence);
4490 target_efl->l_start = tswap64(fl.l_start);
4491 target_efl->l_len = tswap64(fl.l_len);
4492 target_efl->l_pid = tswapl(fl.l_pid);
53a5960a 4493 unlock_user_struct(target_efl, arg3, 1);
ce4defa0
PB		 4494 } else
4495#endif
4496 {
53a5960a 4497 lock_user_struct(target_fl, arg3, 0);
ce4defa0
PB		 4498 target_fl->l_type = tswap16(fl.l_type);
4499 target_fl->l_whence = tswap16(fl.l_whence);
4500 target_fl->l_start = tswap64(fl.l_start);
4501 target_fl->l_len = tswap64(fl.l_len);
4502 target_fl->l_pid = tswapl(fl.l_pid);
53a5960a 4503 unlock_user_struct(target_fl, arg3, 1);
ce4defa0 4504 }
77e4672d
FB		 4505 }
4506 break;
4507
b1e341eb
TS		 4508 case TARGET_F_SETLK64:
4509 case TARGET_F_SETLKW64:
ce4defa0
PB		 4510#ifdef TARGET_ARM
4511 if (((CPUARMState *)cpu_env)->eabi) {
53a5960a 4512 lock_user_struct(target_efl, arg3, 1);
ce4defa0
PB		 4513 fl.l_type = tswap16(target_efl->l_type);
4514 fl.l_whence = tswap16(target_efl->l_whence);
4515 fl.l_start = tswap64(target_efl->l_start);
4516 fl.l_len = tswap64(target_efl->l_len);
4517 fl.l_pid = tswapl(target_efl->l_pid);
53a5960a 4518 unlock_user_struct(target_efl, arg3, 0);
ce4defa0
PB		 4519 } else
4520#endif
4521 {
53a5960a 4522 lock_user_struct(target_fl, arg3, 1);
ce4defa0
PB		 4523 fl.l_type = tswap16(target_fl->l_type);
4524 fl.l_whence = tswap16(target_fl->l_whence);
4525 fl.l_start = tswap64(target_fl->l_start);
4526 fl.l_len = tswap64(target_fl->l_len);
4527 fl.l_pid = tswapl(target_fl->l_pid);
53a5960a 4528 unlock_user_struct(target_fl, arg3, 0);
ce4defa0 4529 }
b1e341eb 4530 ret = get_errno(fcntl(arg1, cmd, &fl));
77e4672d 4531 break;
60cd49d5 4532 default:
b1e341eb 4533 ret = get_errno(do_fcntl(arg1, cmd, arg3));
60cd49d5
FB		 4534 break;
4535 }
77e4672d
FB		 4536 break;
4537 }
60cd49d5 4538#endif
7d600c80
TS		 4539#ifdef TARGET_NR_cacheflush
4540 case TARGET_NR_cacheflush:
4541 /* self-modifying code is handled automatically, so nothing needed */
4542 ret = 0;
4543 break;
4544#endif
ebc05488 4545#ifdef TARGET_NR_security
31e31b8a
FB		 4546 case TARGET_NR_security:
4547 goto unimplemented;
c573ff67
FB		 4548#endif
4549#ifdef TARGET_NR_getpagesize
4550 case TARGET_NR_getpagesize:
4551 ret = TARGET_PAGE_SIZE;
4552 break;
ebc05488 4553#endif
31e31b8a
FB		 4554 case TARGET_NR_gettid:
4555 ret = get_errno(gettid());
4556 break;
e5febef5 4557#ifdef TARGET_NR_readahead
31e31b8a 4558 case TARGET_NR_readahead:
5cd4393b 4559 goto unimplemented;
e5febef5 4560#endif
ebc05488 4561#ifdef TARGET_NR_setxattr
31e31b8a
FB		 4562 case TARGET_NR_setxattr:
4563 case TARGET_NR_lsetxattr:
4564 case TARGET_NR_fsetxattr:
4565 case TARGET_NR_getxattr:
4566 case TARGET_NR_lgetxattr:
4567 case TARGET_NR_fgetxattr:
4568 case TARGET_NR_listxattr:
4569 case TARGET_NR_llistxattr:
4570 case TARGET_NR_flistxattr:
4571 case TARGET_NR_removexattr:
4572 case TARGET_NR_lremovexattr:
4573 case TARGET_NR_fremovexattr:
5cd4393b 4574 goto unimplemented_nowarn;
ebc05488
FB		 4575#endif
4576#ifdef TARGET_NR_set_thread_area
5cd4393b 4577 case TARGET_NR_set_thread_area:
6f5b89a0
TS		 4578#ifdef TARGET_MIPS
4579 ((CPUMIPSState *) cpu_env)->tls_value = arg1;
4580 ret = 0;
4581 break;
4582#else
4583 goto unimplemented_nowarn;
4584#endif
4585#endif
4586#ifdef TARGET_NR_get_thread_area
5cd4393b
FB		 4587 case TARGET_NR_get_thread_area:
4588 goto unimplemented_nowarn;
48dc41eb
FB		 4589#endif
4590#ifdef TARGET_NR_getdomainname
4591 case TARGET_NR_getdomainname:
4592 goto unimplemented_nowarn;
ebc05488 4593#endif
6f5b89a0 4594
b5906f95
TS		 4595#ifdef TARGET_NR_clock_gettime
4596 case TARGET_NR_clock_gettime:
4597 {
4598 struct timespec ts;
4599 ret = get_errno(clock_gettime(arg1, &ts));
4600 if (!is_error(ret)) {
4601 host_to_target_timespec(arg2, &ts);
4602 }
4603 break;
4604 }
4605#endif
4606#ifdef TARGET_NR_clock_getres
4607 case TARGET_NR_clock_getres:
4608 {
4609 struct timespec ts;
4610 ret = get_errno(clock_getres(arg1, &ts));
4611 if (!is_error(ret)) {
4612 host_to_target_timespec(arg2, &ts);
4613 }
4614 break;
4615 }
4616#endif
4617
6f5b89a0
TS		 4618#if defined(TARGET_NR_set_tid_address) && defined(__NR_set_tid_address)
4619 case TARGET_NR_set_tid_address:
4620 ret = get_errno(set_tid_address((int *) arg1));
4621 break;
4622#endif
4623
4cae1d16
TS		 4624#ifdef TARGET_NR_tkill
4625 case TARGET_NR_tkill:
4626 ret = get_errno(sys_tkill((int)arg1, (int)arg2));
4627 break;
4628#endif
4629
71455574
TS		 4630#ifdef TARGET_NR_tgkill
4631 case TARGET_NR_tgkill:
4632 ret = get_errno(sys_tgkill((int)arg1, (int)arg2, (int)arg3));
4633 break;
4634#endif
4635
4f2b1fe8
TS		 4636#ifdef TARGET_NR_set_robust_list
4637 case TARGET_NR_set_robust_list:
4638 goto unimplemented_nowarn;
4639#endif
4640
31e31b8a
FB		 4641 default:
4642 unimplemented:
5cd4393b 4643 gemu_log("qemu: Unsupported syscall: %d\n", num);
4f2b1fe8 4644#if defined(TARGET_NR_setxattr) || defined(TARGET_NR_get_thread_area) || defined(TARGET_NR_getdomainname) || defined(TARGET_NR_set_robust_list)
5cd4393b 4645 unimplemented_nowarn:
80a9d035 4646#endif
31e31b8a
FB		 4647 ret = -ENOSYS;
4648 break;
4649 }
4650 fail:
c573ff67
FB		 4651#ifdef DEBUG
4652 gemu_log(" = %ld\n", ret);
4653#endif
31e31b8a
FB		 4654 return ret;
4655}
4656
Qemu copy for testing