xref: /qemu/linux-user/syscall.c (revision ca61e750)
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, see <http://www.gnu.org/licenses/>.
18  */
19 #define _ATFILE_SOURCE
20 #include "qemu/osdep.h"
21 #include "qemu/cutils.h"
22 #include "qemu/path.h"
23 #include "qemu/memfd.h"
24 #include "qemu/queue.h"
25 #include <elf.h>
26 #include <endian.h>
27 #include <grp.h>
28 #include <sys/ipc.h>
29 #include <sys/msg.h>
30 #include <sys/wait.h>
31 #include <sys/mount.h>
32 #include <sys/file.h>
33 #include <sys/fsuid.h>
34 #include <sys/personality.h>
35 #include <sys/prctl.h>
36 #include <sys/resource.h>
37 #include <sys/swap.h>
38 #include <linux/capability.h>
39 #include <sched.h>
40 #include <sys/timex.h>
41 #include <sys/socket.h>
42 #include <linux/sockios.h>
43 #include <sys/un.h>
44 #include <sys/uio.h>
45 #include <poll.h>
46 #include <sys/times.h>
47 #include <sys/shm.h>
48 #include <sys/sem.h>
49 #include <sys/statfs.h>
50 #include <utime.h>
51 #include <sys/sysinfo.h>
52 #include <sys/signalfd.h>
53 //#include <sys/user.h>
54 #include <netinet/in.h>
55 #include <netinet/ip.h>
56 #include <netinet/tcp.h>
57 #include <netinet/udp.h>
58 #include <linux/wireless.h>
59 #include <linux/icmp.h>
60 #include <linux/icmpv6.h>
61 #include <linux/if_tun.h>
62 #include <linux/in6.h>
63 #include <linux/errqueue.h>
64 #include <linux/random.h>
65 #ifdef CONFIG_TIMERFD
66 #include <sys/timerfd.h>
67 #endif
68 #ifdef CONFIG_EVENTFD
69 #include <sys/eventfd.h>
70 #endif
71 #ifdef CONFIG_EPOLL
72 #include <sys/epoll.h>
73 #endif
74 #ifdef CONFIG_ATTR
75 #include "qemu/xattr.h"
76 #endif
77 #ifdef CONFIG_SENDFILE
78 #include <sys/sendfile.h>
79 #endif
80 #ifdef HAVE_SYS_KCOV_H
81 #include <sys/kcov.h>
82 #endif
83 
84 #define termios host_termios
85 #define winsize host_winsize
86 #define termio host_termio
87 #define sgttyb host_sgttyb /* same as target */
88 #define tchars host_tchars /* same as target */
89 #define ltchars host_ltchars /* same as target */
90 
91 #include <linux/termios.h>
92 #include <linux/unistd.h>
93 #include <linux/cdrom.h>
94 #include <linux/hdreg.h>
95 #include <linux/soundcard.h>
96 #include <linux/kd.h>
97 #include <linux/mtio.h>
98 #include <linux/fs.h>
99 #include <linux/fd.h>
100 #if defined(CONFIG_FIEMAP)
101 #include <linux/fiemap.h>
102 #endif
103 #include <linux/fb.h>
104 #if defined(CONFIG_USBFS)
105 #include <linux/usbdevice_fs.h>
106 #include <linux/usb/ch9.h>
107 #endif
108 #include <linux/vt.h>
109 #include <linux/dm-ioctl.h>
110 #include <linux/reboot.h>
111 #include <linux/route.h>
112 #include <linux/filter.h>
113 #include <linux/blkpg.h>
114 #include <netpacket/packet.h>
115 #include <linux/netlink.h>
116 #include <linux/if_alg.h>
117 #include <linux/rtc.h>
118 #include <sound/asound.h>
119 #ifdef HAVE_BTRFS_H
120 #include <linux/btrfs.h>
121 #endif
122 #ifdef HAVE_DRM_H
123 #include <libdrm/drm.h>
124 #include <libdrm/i915_drm.h>
125 #endif
126 #include "linux_loop.h"
127 #include "uname.h"
128 
129 #include "qemu.h"
130 #include "user-internals.h"
131 #include "strace.h"
132 #include "signal-common.h"
133 #include "loader.h"
134 #include "user-mmap.h"
135 #include "user/safe-syscall.h"
136 #include "qemu/guest-random.h"
137 #include "qemu/selfmap.h"
138 #include "user/syscall-trace.h"
139 #include "special-errno.h"
140 #include "qapi/error.h"
141 #include "fd-trans.h"
142 #include "tcg/tcg.h"
143 
144 #ifndef CLONE_IO
145 #define CLONE_IO                0x80000000      /* Clone io context */
146 #endif
147 
148 /* We can't directly call the host clone syscall, because this will
149  * badly confuse libc (breaking mutexes, for example). So we must
150  * divide clone flags into:
151  *  * flag combinations that look like pthread_create()
152  *  * flag combinations that look like fork()
153  *  * flags we can implement within QEMU itself
154  *  * flags we can't support and will return an error for
155  */
156 /* For thread creation, all these flags must be present; for
157  * fork, none must be present.
158  */
159 #define CLONE_THREAD_FLAGS                              \
160     (CLONE_VM | CLONE_FS | CLONE_FILES |                \
161      CLONE_SIGHAND | CLONE_THREAD | CLONE_SYSVSEM)
162 
163 /* These flags are ignored:
164  * CLONE_DETACHED is now ignored by the kernel;
165  * CLONE_IO is just an optimisation hint to the I/O scheduler
166  */
167 #define CLONE_IGNORED_FLAGS                     \
168     (CLONE_DETACHED | CLONE_IO)
169 
170 /* Flags for fork which we can implement within QEMU itself */
171 #define CLONE_OPTIONAL_FORK_FLAGS               \
172     (CLONE_SETTLS | CLONE_PARENT_SETTID |       \
173      CLONE_CHILD_CLEARTID | CLONE_CHILD_SETTID)
174 
175 /* Flags for thread creation which we can implement within QEMU itself */
176 #define CLONE_OPTIONAL_THREAD_FLAGS                             \
177     (CLONE_SETTLS | CLONE_PARENT_SETTID |                       \
178      CLONE_CHILD_CLEARTID | CLONE_CHILD_SETTID | CLONE_PARENT)
179 
180 #define CLONE_INVALID_FORK_FLAGS                                        \
181     (~(CSIGNAL | CLONE_OPTIONAL_FORK_FLAGS | CLONE_IGNORED_FLAGS))
182 
183 #define CLONE_INVALID_THREAD_FLAGS                                      \
184     (~(CSIGNAL | CLONE_THREAD_FLAGS | CLONE_OPTIONAL_THREAD_FLAGS |     \
185        CLONE_IGNORED_FLAGS))
186 
187 /* CLONE_VFORK is special cased early in do_fork(). The other flag bits
188  * have almost all been allocated. We cannot support any of
189  * CLONE_NEWNS, CLONE_NEWCGROUP, CLONE_NEWUTS, CLONE_NEWIPC,
190  * CLONE_NEWUSER, CLONE_NEWPID, CLONE_NEWNET, CLONE_PTRACE, CLONE_UNTRACED.
191  * The checks against the invalid thread masks above will catch these.
192  * (The one remaining unallocated bit is 0x1000 which used to be CLONE_PID.)
193  */
194 
195 /* Define DEBUG_ERESTARTSYS to force every syscall to be restarted
196  * once. This exercises the codepaths for restart.
197  */
198 //#define DEBUG_ERESTARTSYS
199 
200 //#include <linux/msdos_fs.h>
201 #define VFAT_IOCTL_READDIR_BOTH \
202     _IOC(_IOC_READ, 'r', 1, (sizeof(struct linux_dirent) + 256) * 2)
203 #define VFAT_IOCTL_READDIR_SHORT \
204     _IOC(_IOC_READ, 'r', 2, (sizeof(struct linux_dirent) + 256) * 2)
205 
206 #undef _syscall0
207 #undef _syscall1
208 #undef _syscall2
209 #undef _syscall3
210 #undef _syscall4
211 #undef _syscall5
212 #undef _syscall6
213 
214 #define _syscall0(type,name)		\
215 static type name (void)			\
216 {					\
217 	return syscall(__NR_##name);	\
218 }
219 
220 #define _syscall1(type,name,type1,arg1)		\
221 static type name (type1 arg1)			\
222 {						\
223 	return syscall(__NR_##name, arg1);	\
224 }
225 
226 #define _syscall2(type,name,type1,arg1,type2,arg2)	\
227 static type name (type1 arg1,type2 arg2)		\
228 {							\
229 	return syscall(__NR_##name, arg1, arg2);	\
230 }
231 
232 #define _syscall3(type,name,type1,arg1,type2,arg2,type3,arg3)	\
233 static type name (type1 arg1,type2 arg2,type3 arg3)		\
234 {								\
235 	return syscall(__NR_##name, arg1, arg2, arg3);		\
236 }
237 
238 #define _syscall4(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4)	\
239 static type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4)			\
240 {										\
241 	return syscall(__NR_##name, arg1, arg2, arg3, arg4);			\
242 }
243 
244 #define _syscall5(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4,	\
245 		  type5,arg5)							\
246 static type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4,type5 arg5)	\
247 {										\
248 	return syscall(__NR_##name, arg1, arg2, arg3, arg4, arg5);		\
249 }
250 
251 
252 #define _syscall6(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4,	\
253 		  type5,arg5,type6,arg6)					\
254 static type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4,type5 arg5,	\
255                   type6 arg6)							\
256 {										\
257 	return syscall(__NR_##name, arg1, arg2, arg3, arg4, arg5, arg6);	\
258 }
259 
260 
261 #define __NR_sys_uname __NR_uname
262 #define __NR_sys_getcwd1 __NR_getcwd
263 #define __NR_sys_getdents __NR_getdents
264 #define __NR_sys_getdents64 __NR_getdents64
265 #define __NR_sys_getpriority __NR_getpriority
266 #define __NR_sys_rt_sigqueueinfo __NR_rt_sigqueueinfo
267 #define __NR_sys_rt_tgsigqueueinfo __NR_rt_tgsigqueueinfo
268 #define __NR_sys_syslog __NR_syslog
269 #if defined(__NR_futex)
270 # define __NR_sys_futex __NR_futex
271 #endif
272 #if defined(__NR_futex_time64)
273 # define __NR_sys_futex_time64 __NR_futex_time64
274 #endif
275 #define __NR_sys_statx __NR_statx
276 
277 #if defined(__alpha__) || defined(__x86_64__) || defined(__s390x__)
278 #define __NR__llseek __NR_lseek
279 #endif
280 
281 /* Newer kernel ports have llseek() instead of _llseek() */
282 #if defined(TARGET_NR_llseek) && !defined(TARGET_NR__llseek)
283 #define TARGET_NR__llseek TARGET_NR_llseek
284 #endif
285 
286 /* some platforms need to mask more bits than just TARGET_O_NONBLOCK */
287 #ifndef TARGET_O_NONBLOCK_MASK
288 #define TARGET_O_NONBLOCK_MASK TARGET_O_NONBLOCK
289 #endif
290 
291 #define __NR_sys_gettid __NR_gettid
292 _syscall0(int, sys_gettid)
293 
294 /* For the 64-bit guest on 32-bit host case we must emulate
295  * getdents using getdents64, because otherwise the host
296  * might hand us back more dirent records than we can fit
297  * into the guest buffer after structure format conversion.
298  * Otherwise we emulate getdents with getdents if the host has it.
299  */
300 #if defined(__NR_getdents) && HOST_LONG_BITS >= TARGET_ABI_BITS
301 #define EMULATE_GETDENTS_WITH_GETDENTS
302 #endif
303 
304 #if defined(TARGET_NR_getdents) && defined(EMULATE_GETDENTS_WITH_GETDENTS)
305 _syscall3(int, sys_getdents, uint, fd, struct linux_dirent *, dirp, uint, count);
306 #endif
307 #if (defined(TARGET_NR_getdents) && \
308       !defined(EMULATE_GETDENTS_WITH_GETDENTS)) || \
309     (defined(TARGET_NR_getdents64) && defined(__NR_getdents64))
310 _syscall3(int, sys_getdents64, uint, fd, struct linux_dirent64 *, dirp, uint, count);
311 #endif
312 #if defined(TARGET_NR__llseek) && defined(__NR_llseek)
313 _syscall5(int, _llseek,  uint,  fd, ulong, hi, ulong, lo,
314           loff_t *, res, uint, wh);
315 #endif
316 _syscall3(int, sys_rt_sigqueueinfo, pid_t, pid, int, sig, siginfo_t *, uinfo)
317 _syscall4(int, sys_rt_tgsigqueueinfo, pid_t, pid, pid_t, tid, int, sig,
318           siginfo_t *, uinfo)
319 _syscall3(int,sys_syslog,int,type,char*,bufp,int,len)
320 #ifdef __NR_exit_group
321 _syscall1(int,exit_group,int,error_code)
322 #endif
323 #if defined(TARGET_NR_set_tid_address) && defined(__NR_set_tid_address)
324 _syscall1(int,set_tid_address,int *,tidptr)
325 #endif
326 #if defined(__NR_futex)
327 _syscall6(int,sys_futex,int *,uaddr,int,op,int,val,
328           const struct timespec *,timeout,int *,uaddr2,int,val3)
329 #endif
330 #if defined(__NR_futex_time64)
331 _syscall6(int,sys_futex_time64,int *,uaddr,int,op,int,val,
332           const struct timespec *,timeout,int *,uaddr2,int,val3)
333 #endif
334 #define __NR_sys_sched_getaffinity __NR_sched_getaffinity
335 _syscall3(int, sys_sched_getaffinity, pid_t, pid, unsigned int, len,
336           unsigned long *, user_mask_ptr);
337 #define __NR_sys_sched_setaffinity __NR_sched_setaffinity
338 _syscall3(int, sys_sched_setaffinity, pid_t, pid, unsigned int, len,
339           unsigned long *, user_mask_ptr);
340 /* sched_attr is not defined in glibc */
341 struct sched_attr {
342     uint32_t size;
343     uint32_t sched_policy;
344     uint64_t sched_flags;
345     int32_t sched_nice;
346     uint32_t sched_priority;
347     uint64_t sched_runtime;
348     uint64_t sched_deadline;
349     uint64_t sched_period;
350     uint32_t sched_util_min;
351     uint32_t sched_util_max;
352 };
353 #define __NR_sys_sched_getattr __NR_sched_getattr
354 _syscall4(int, sys_sched_getattr, pid_t, pid, struct sched_attr *, attr,
355           unsigned int, size, unsigned int, flags);
356 #define __NR_sys_sched_setattr __NR_sched_setattr
357 _syscall3(int, sys_sched_setattr, pid_t, pid, struct sched_attr *, attr,
358           unsigned int, flags);
359 #define __NR_sys_sched_getscheduler __NR_sched_getscheduler
360 _syscall1(int, sys_sched_getscheduler, pid_t, pid);
361 #define __NR_sys_sched_setscheduler __NR_sched_setscheduler
362 _syscall3(int, sys_sched_setscheduler, pid_t, pid, int, policy,
363           const struct sched_param *, param);
364 #define __NR_sys_sched_getparam __NR_sched_getparam
365 _syscall2(int, sys_sched_getparam, pid_t, pid,
366           struct sched_param *, param);
367 #define __NR_sys_sched_setparam __NR_sched_setparam
368 _syscall2(int, sys_sched_setparam, pid_t, pid,
369           const struct sched_param *, param);
370 #define __NR_sys_getcpu __NR_getcpu
371 _syscall3(int, sys_getcpu, unsigned *, cpu, unsigned *, node, void *, tcache);
372 _syscall4(int, reboot, int, magic1, int, magic2, unsigned int, cmd,
373           void *, arg);
374 _syscall2(int, capget, struct __user_cap_header_struct *, header,
375           struct __user_cap_data_struct *, data);
376 _syscall2(int, capset, struct __user_cap_header_struct *, header,
377           struct __user_cap_data_struct *, data);
378 #if defined(TARGET_NR_ioprio_get) && defined(__NR_ioprio_get)
379 _syscall2(int, ioprio_get, int, which, int, who)
380 #endif
381 #if defined(TARGET_NR_ioprio_set) && defined(__NR_ioprio_set)
382 _syscall3(int, ioprio_set, int, which, int, who, int, ioprio)
383 #endif
384 #if defined(TARGET_NR_getrandom) && defined(__NR_getrandom)
385 _syscall3(int, getrandom, void *, buf, size_t, buflen, unsigned int, flags)
386 #endif
387 
388 #if defined(TARGET_NR_kcmp) && defined(__NR_kcmp)
389 _syscall5(int, kcmp, pid_t, pid1, pid_t, pid2, int, type,
390           unsigned long, idx1, unsigned long, idx2)
391 #endif
392 
393 /*
394  * It is assumed that struct statx is architecture independent.
395  */
396 #if defined(TARGET_NR_statx) && defined(__NR_statx)
397 _syscall5(int, sys_statx, int, dirfd, const char *, pathname, int, flags,
398           unsigned int, mask, struct target_statx *, statxbuf)
399 #endif
400 #if defined(TARGET_NR_membarrier) && defined(__NR_membarrier)
401 _syscall2(int, membarrier, int, cmd, int, flags)
402 #endif
403 
404 static const bitmask_transtbl fcntl_flags_tbl[] = {
405   { TARGET_O_ACCMODE,   TARGET_O_WRONLY,    O_ACCMODE,   O_WRONLY,    },
406   { TARGET_O_ACCMODE,   TARGET_O_RDWR,      O_ACCMODE,   O_RDWR,      },
407   { TARGET_O_CREAT,     TARGET_O_CREAT,     O_CREAT,     O_CREAT,     },
408   { TARGET_O_EXCL,      TARGET_O_EXCL,      O_EXCL,      O_EXCL,      },
409   { TARGET_O_NOCTTY,    TARGET_O_NOCTTY,    O_NOCTTY,    O_NOCTTY,    },
410   { TARGET_O_TRUNC,     TARGET_O_TRUNC,     O_TRUNC,     O_TRUNC,     },
411   { TARGET_O_APPEND,    TARGET_O_APPEND,    O_APPEND,    O_APPEND,    },
412   { TARGET_O_NONBLOCK,  TARGET_O_NONBLOCK,  O_NONBLOCK,  O_NONBLOCK,  },
413   { TARGET_O_SYNC,      TARGET_O_DSYNC,     O_SYNC,      O_DSYNC,     },
414   { TARGET_O_SYNC,      TARGET_O_SYNC,      O_SYNC,      O_SYNC,      },
415   { TARGET_FASYNC,      TARGET_FASYNC,      FASYNC,      FASYNC,      },
416   { TARGET_O_DIRECTORY, TARGET_O_DIRECTORY, O_DIRECTORY, O_DIRECTORY, },
417   { TARGET_O_NOFOLLOW,  TARGET_O_NOFOLLOW,  O_NOFOLLOW,  O_NOFOLLOW,  },
418 #if defined(O_DIRECT)
419   { TARGET_O_DIRECT,    TARGET_O_DIRECT,    O_DIRECT,    O_DIRECT,    },
420 #endif
421 #if defined(O_NOATIME)
422   { TARGET_O_NOATIME,   TARGET_O_NOATIME,   O_NOATIME,   O_NOATIME    },
423 #endif
424 #if defined(O_CLOEXEC)
425   { TARGET_O_CLOEXEC,   TARGET_O_CLOEXEC,   O_CLOEXEC,   O_CLOEXEC    },
426 #endif
427 #if defined(O_PATH)
428   { TARGET_O_PATH,      TARGET_O_PATH,      O_PATH,      O_PATH       },
429 #endif
430 #if defined(O_TMPFILE)
431   { TARGET_O_TMPFILE,   TARGET_O_TMPFILE,   O_TMPFILE,   O_TMPFILE    },
432 #endif
433   /* Don't terminate the list prematurely on 64-bit host+guest.  */
434 #if TARGET_O_LARGEFILE != 0 || O_LARGEFILE != 0
435   { TARGET_O_LARGEFILE, TARGET_O_LARGEFILE, O_LARGEFILE, O_LARGEFILE, },
436 #endif
437   { 0, 0, 0, 0 }
438 };
439 
440 _syscall2(int, sys_getcwd1, char *, buf, size_t, size)
441 
442 #if defined(TARGET_NR_utimensat) || defined(TARGET_NR_utimensat_time64)
443 #if defined(__NR_utimensat)
444 #define __NR_sys_utimensat __NR_utimensat
445 _syscall4(int,sys_utimensat,int,dirfd,const char *,pathname,
446           const struct timespec *,tsp,int,flags)
447 #else
448 static int sys_utimensat(int dirfd, const char *pathname,
449                          const struct timespec times[2], int flags)
450 {
451     errno = ENOSYS;
452     return -1;
453 }
454 #endif
455 #endif /* TARGET_NR_utimensat */
456 
457 #ifdef TARGET_NR_renameat2
458 #if defined(__NR_renameat2)
459 #define __NR_sys_renameat2 __NR_renameat2
460 _syscall5(int, sys_renameat2, int, oldfd, const char *, old, int, newfd,
461           const char *, new, unsigned int, flags)
462 #else
463 static int sys_renameat2(int oldfd, const char *old,
464                          int newfd, const char *new, int flags)
465 {
466     if (flags == 0) {
467         return renameat(oldfd, old, newfd, new);
468     }
469     errno = ENOSYS;
470     return -1;
471 }
472 #endif
473 #endif /* TARGET_NR_renameat2 */
474 
475 #ifdef CONFIG_INOTIFY
476 #include <sys/inotify.h>
477 #else
478 /* Userspace can usually survive runtime without inotify */
479 #undef TARGET_NR_inotify_init
480 #undef TARGET_NR_inotify_init1
481 #undef TARGET_NR_inotify_add_watch
482 #undef TARGET_NR_inotify_rm_watch
483 #endif /* CONFIG_INOTIFY  */
484 
485 #if defined(TARGET_NR_prlimit64)
486 #ifndef __NR_prlimit64
487 # define __NR_prlimit64 -1
488 #endif
489 #define __NR_sys_prlimit64 __NR_prlimit64
490 /* The glibc rlimit structure may not be that used by the underlying syscall */
491 struct host_rlimit64 {
492     uint64_t rlim_cur;
493     uint64_t rlim_max;
494 };
495 _syscall4(int, sys_prlimit64, pid_t, pid, int, resource,
496           const struct host_rlimit64 *, new_limit,
497           struct host_rlimit64 *, old_limit)
498 #endif
499 
500 
501 #if defined(TARGET_NR_timer_create)
502 /* Maximum of 32 active POSIX timers allowed at any one time. */
503 static timer_t g_posix_timers[32] = { 0, } ;
504 
505 static inline int next_free_host_timer(void)
506 {
507     int k ;
508     /* FIXME: Does finding the next free slot require a lock? */
509     for (k = 0; k < ARRAY_SIZE(g_posix_timers); k++) {
510         if (g_posix_timers[k] == 0) {
511             g_posix_timers[k] = (timer_t) 1;
512             return k;
513         }
514     }
515     return -1;
516 }
517 #endif
518 
519 static inline int host_to_target_errno(int host_errno)
520 {
521     switch (host_errno) {
522 #define E(X)  case X: return TARGET_##X;
523 #include "errnos.c.inc"
524 #undef E
525     default:
526         return host_errno;
527     }
528 }
529 
530 static inline int target_to_host_errno(int target_errno)
531 {
532     switch (target_errno) {
533 #define E(X)  case TARGET_##X: return X;
534 #include "errnos.c.inc"
535 #undef E
536     default:
537         return target_errno;
538     }
539 }
540 
541 static inline abi_long get_errno(abi_long ret)
542 {
543     if (ret == -1)
544         return -host_to_target_errno(errno);
545     else
546         return ret;
547 }
548 
549 const char *target_strerror(int err)
550 {
551     if (err == QEMU_ERESTARTSYS) {
552         return "To be restarted";
553     }
554     if (err == QEMU_ESIGRETURN) {
555         return "Successful exit from sigreturn";
556     }
557 
558     return strerror(target_to_host_errno(err));
559 }
560 
561 static int check_zeroed_user(abi_long addr, size_t ksize, size_t usize)
562 {
563     int i;
564     uint8_t b;
565     if (usize <= ksize) {
566         return 1;
567     }
568     for (i = ksize; i < usize; i++) {
569         if (get_user_u8(b, addr + i)) {
570             return -TARGET_EFAULT;
571         }
572         if (b != 0) {
573             return 0;
574         }
575     }
576     return 1;
577 }
578 
579 #define safe_syscall0(type, name) \
580 static type safe_##name(void) \
581 { \
582     return safe_syscall(__NR_##name); \
583 }
584 
585 #define safe_syscall1(type, name, type1, arg1) \
586 static type safe_##name(type1 arg1) \
587 { \
588     return safe_syscall(__NR_##name, arg1); \
589 }
590 
591 #define safe_syscall2(type, name, type1, arg1, type2, arg2) \
592 static type safe_##name(type1 arg1, type2 arg2) \
593 { \
594     return safe_syscall(__NR_##name, arg1, arg2); \
595 }
596 
597 #define safe_syscall3(type, name, type1, arg1, type2, arg2, type3, arg3) \
598 static type safe_##name(type1 arg1, type2 arg2, type3 arg3) \
599 { \
600     return safe_syscall(__NR_##name, arg1, arg2, arg3); \
601 }
602 
603 #define safe_syscall4(type, name, type1, arg1, type2, arg2, type3, arg3, \
604     type4, arg4) \
605 static type safe_##name(type1 arg1, type2 arg2, type3 arg3, type4 arg4) \
606 { \
607     return safe_syscall(__NR_##name, arg1, arg2, arg3, arg4); \
608 }
609 
610 #define safe_syscall5(type, name, type1, arg1, type2, arg2, type3, arg3, \
611     type4, arg4, type5, arg5) \
612 static type safe_##name(type1 arg1, type2 arg2, type3 arg3, type4 arg4, \
613     type5 arg5) \
614 { \
615     return safe_syscall(__NR_##name, arg1, arg2, arg3, arg4, arg5); \
616 }
617 
618 #define safe_syscall6(type, name, type1, arg1, type2, arg2, type3, arg3, \
619     type4, arg4, type5, arg5, type6, arg6) \
620 static type safe_##name(type1 arg1, type2 arg2, type3 arg3, type4 arg4, \
621     type5 arg5, type6 arg6) \
622 { \
623     return safe_syscall(__NR_##name, arg1, arg2, arg3, arg4, arg5, arg6); \
624 }
625 
626 safe_syscall3(ssize_t, read, int, fd, void *, buff, size_t, count)
627 safe_syscall3(ssize_t, write, int, fd, const void *, buff, size_t, count)
628 safe_syscall4(int, openat, int, dirfd, const char *, pathname, \
629               int, flags, mode_t, mode)
630 #if defined(TARGET_NR_wait4) || defined(TARGET_NR_waitpid)
631 safe_syscall4(pid_t, wait4, pid_t, pid, int *, status, int, options, \
632               struct rusage *, rusage)
633 #endif
634 safe_syscall5(int, waitid, idtype_t, idtype, id_t, id, siginfo_t *, infop, \
635               int, options, struct rusage *, rusage)
636 safe_syscall3(int, execve, const char *, filename, char **, argv, char **, envp)
637 #if defined(TARGET_NR_select) || defined(TARGET_NR__newselect) || \
638     defined(TARGET_NR_pselect6) || defined(TARGET_NR_pselect6_time64)
639 safe_syscall6(int, pselect6, int, nfds, fd_set *, readfds, fd_set *, writefds, \
640               fd_set *, exceptfds, struct timespec *, timeout, void *, sig)
641 #endif
642 #if defined(TARGET_NR_ppoll) || defined(TARGET_NR_ppoll_time64)
643 safe_syscall5(int, ppoll, struct pollfd *, ufds, unsigned int, nfds,
644               struct timespec *, tsp, const sigset_t *, sigmask,
645               size_t, sigsetsize)
646 #endif
647 safe_syscall6(int, epoll_pwait, int, epfd, struct epoll_event *, events,
648               int, maxevents, int, timeout, const sigset_t *, sigmask,
649               size_t, sigsetsize)
650 #if defined(__NR_futex)
651 safe_syscall6(int,futex,int *,uaddr,int,op,int,val, \
652               const struct timespec *,timeout,int *,uaddr2,int,val3)
653 #endif
654 #if defined(__NR_futex_time64)
655 safe_syscall6(int,futex_time64,int *,uaddr,int,op,int,val, \
656               const struct timespec *,timeout,int *,uaddr2,int,val3)
657 #endif
658 safe_syscall2(int, rt_sigsuspend, sigset_t *, newset, size_t, sigsetsize)
659 safe_syscall2(int, kill, pid_t, pid, int, sig)
660 safe_syscall2(int, tkill, int, tid, int, sig)
661 safe_syscall3(int, tgkill, int, tgid, int, pid, int, sig)
662 safe_syscall3(ssize_t, readv, int, fd, const struct iovec *, iov, int, iovcnt)
663 safe_syscall3(ssize_t, writev, int, fd, const struct iovec *, iov, int, iovcnt)
664 safe_syscall5(ssize_t, preadv, int, fd, const struct iovec *, iov, int, iovcnt,
665               unsigned long, pos_l, unsigned long, pos_h)
666 safe_syscall5(ssize_t, pwritev, int, fd, const struct iovec *, iov, int, iovcnt,
667               unsigned long, pos_l, unsigned long, pos_h)
668 safe_syscall3(int, connect, int, fd, const struct sockaddr *, addr,
669               socklen_t, addrlen)
670 safe_syscall6(ssize_t, sendto, int, fd, const void *, buf, size_t, len,
671               int, flags, const struct sockaddr *, addr, socklen_t, addrlen)
672 safe_syscall6(ssize_t, recvfrom, int, fd, void *, buf, size_t, len,
673               int, flags, struct sockaddr *, addr, socklen_t *, addrlen)
674 safe_syscall3(ssize_t, sendmsg, int, fd, const struct msghdr *, msg, int, flags)
675 safe_syscall3(ssize_t, recvmsg, int, fd, struct msghdr *, msg, int, flags)
676 safe_syscall2(int, flock, int, fd, int, operation)
677 #if defined(TARGET_NR_rt_sigtimedwait) || defined(TARGET_NR_rt_sigtimedwait_time64)
678 safe_syscall4(int, rt_sigtimedwait, const sigset_t *, these, siginfo_t *, uinfo,
679               const struct timespec *, uts, size_t, sigsetsize)
680 #endif
681 safe_syscall4(int, accept4, int, fd, struct sockaddr *, addr, socklen_t *, len,
682               int, flags)
683 #if defined(TARGET_NR_nanosleep)
684 safe_syscall2(int, nanosleep, const struct timespec *, req,
685               struct timespec *, rem)
686 #endif
687 #if defined(TARGET_NR_clock_nanosleep) || \
688     defined(TARGET_NR_clock_nanosleep_time64)
689 safe_syscall4(int, clock_nanosleep, const clockid_t, clock, int, flags,
690               const struct timespec *, req, struct timespec *, rem)
691 #endif
692 #ifdef __NR_ipc
693 #ifdef __s390x__
694 safe_syscall5(int, ipc, int, call, long, first, long, second, long, third,
695               void *, ptr)
696 #else
697 safe_syscall6(int, ipc, int, call, long, first, long, second, long, third,
698               void *, ptr, long, fifth)
699 #endif
700 #endif
701 #ifdef __NR_msgsnd
702 safe_syscall4(int, msgsnd, int, msgid, const void *, msgp, size_t, sz,
703               int, flags)
704 #endif
705 #ifdef __NR_msgrcv
706 safe_syscall5(int, msgrcv, int, msgid, void *, msgp, size_t, sz,
707               long, msgtype, int, flags)
708 #endif
709 #ifdef __NR_semtimedop
710 safe_syscall4(int, semtimedop, int, semid, struct sembuf *, tsops,
711               unsigned, nsops, const struct timespec *, timeout)
712 #endif
713 #if defined(TARGET_NR_mq_timedsend) || \
714     defined(TARGET_NR_mq_timedsend_time64)
715 safe_syscall5(int, mq_timedsend, int, mqdes, const char *, msg_ptr,
716               size_t, len, unsigned, prio, const struct timespec *, timeout)
717 #endif
718 #if defined(TARGET_NR_mq_timedreceive) || \
719     defined(TARGET_NR_mq_timedreceive_time64)
720 safe_syscall5(int, mq_timedreceive, int, mqdes, char *, msg_ptr,
721               size_t, len, unsigned *, prio, const struct timespec *, timeout)
722 #endif
723 #if defined(TARGET_NR_copy_file_range) && defined(__NR_copy_file_range)
724 safe_syscall6(ssize_t, copy_file_range, int, infd, loff_t *, pinoff,
725               int, outfd, loff_t *, poutoff, size_t, length,
726               unsigned int, flags)
727 #endif
728 
729 /* We do ioctl like this rather than via safe_syscall3 to preserve the
730  * "third argument might be integer or pointer or not present" behaviour of
731  * the libc function.
732  */
733 #define safe_ioctl(...) safe_syscall(__NR_ioctl, __VA_ARGS__)
734 /* Similarly for fcntl. Note that callers must always:
735  *  pass the F_GETLK64 etc constants rather than the unsuffixed F_GETLK
736  *  use the flock64 struct rather than unsuffixed flock
737  * This will then work and use a 64-bit offset for both 32-bit and 64-bit hosts.
738  */
739 #ifdef __NR_fcntl64
740 #define safe_fcntl(...) safe_syscall(__NR_fcntl64, __VA_ARGS__)
741 #else
742 #define safe_fcntl(...) safe_syscall(__NR_fcntl, __VA_ARGS__)
743 #endif
744 
745 static inline int host_to_target_sock_type(int host_type)
746 {
747     int target_type;
748 
749     switch (host_type & 0xf /* SOCK_TYPE_MASK */) {
750     case SOCK_DGRAM:
751         target_type = TARGET_SOCK_DGRAM;
752         break;
753     case SOCK_STREAM:
754         target_type = TARGET_SOCK_STREAM;
755         break;
756     default:
757         target_type = host_type & 0xf /* SOCK_TYPE_MASK */;
758         break;
759     }
760 
761 #if defined(SOCK_CLOEXEC)
762     if (host_type & SOCK_CLOEXEC) {
763         target_type |= TARGET_SOCK_CLOEXEC;
764     }
765 #endif
766 
767 #if defined(SOCK_NONBLOCK)
768     if (host_type & SOCK_NONBLOCK) {
769         target_type |= TARGET_SOCK_NONBLOCK;
770     }
771 #endif
772 
773     return target_type;
774 }
775 
776 static abi_ulong target_brk;
777 static abi_ulong target_original_brk;
778 static abi_ulong brk_page;
779 
780 void target_set_brk(abi_ulong new_brk)
781 {
782     target_original_brk = target_brk = HOST_PAGE_ALIGN(new_brk);
783     brk_page = HOST_PAGE_ALIGN(target_brk);
784 }
785 
786 //#define DEBUGF_BRK(message, args...) do { fprintf(stderr, (message), ## args); } while (0)
787 #define DEBUGF_BRK(message, args...)
788 
789 /* do_brk() must return target values and target errnos. */
790 abi_long do_brk(abi_ulong new_brk)
791 {
792     abi_long mapped_addr;
793     abi_ulong new_alloc_size;
794 
795     /* brk pointers are always untagged */
796 
797     DEBUGF_BRK("do_brk(" TARGET_ABI_FMT_lx ") -> ", new_brk);
798 
799     if (!new_brk) {
800         DEBUGF_BRK(TARGET_ABI_FMT_lx " (!new_brk)\n", target_brk);
801         return target_brk;
802     }
803     if (new_brk < target_original_brk) {
804         DEBUGF_BRK(TARGET_ABI_FMT_lx " (new_brk < target_original_brk)\n",
805                    target_brk);
806         return target_brk;
807     }
808 
809     /* If the new brk is less than the highest page reserved to the
810      * target heap allocation, set it and we're almost done...  */
811     if (new_brk <= brk_page) {
812         /* Heap contents are initialized to zero, as for anonymous
813          * mapped pages.  */
814         if (new_brk > target_brk) {
815             memset(g2h_untagged(target_brk), 0, new_brk - target_brk);
816         }
817 	target_brk = new_brk;
818         DEBUGF_BRK(TARGET_ABI_FMT_lx " (new_brk <= brk_page)\n", target_brk);
819 	return target_brk;
820     }
821 
822     /* We need to allocate more memory after the brk... Note that
823      * we don't use MAP_FIXED because that will map over the top of
824      * any existing mapping (like the one with the host libc or qemu
825      * itself); instead we treat "mapped but at wrong address" as
826      * a failure and unmap again.
827      */
828     new_alloc_size = HOST_PAGE_ALIGN(new_brk - brk_page);
829     mapped_addr = get_errno(target_mmap(brk_page, new_alloc_size,
830                                         PROT_READ|PROT_WRITE,
831                                         MAP_ANON|MAP_PRIVATE, 0, 0));
832 
833     if (mapped_addr == brk_page) {
834         /* Heap contents are initialized to zero, as for anonymous
835          * mapped pages.  Technically the new pages are already
836          * initialized to zero since they *are* anonymous mapped
837          * pages, however we have to take care with the contents that
838          * come from the remaining part of the previous page: it may
839          * contains garbage data due to a previous heap usage (grown
840          * then shrunken).  */
841         memset(g2h_untagged(target_brk), 0, brk_page - target_brk);
842 
843         target_brk = new_brk;
844         brk_page = HOST_PAGE_ALIGN(target_brk);
845         DEBUGF_BRK(TARGET_ABI_FMT_lx " (mapped_addr == brk_page)\n",
846             target_brk);
847         return target_brk;
848     } else if (mapped_addr != -1) {
849         /* Mapped but at wrong address, meaning there wasn't actually
850          * enough space for this brk.
851          */
852         target_munmap(mapped_addr, new_alloc_size);
853         mapped_addr = -1;
854         DEBUGF_BRK(TARGET_ABI_FMT_lx " (mapped_addr != -1)\n", target_brk);
855     }
856     else {
857         DEBUGF_BRK(TARGET_ABI_FMT_lx " (otherwise)\n", target_brk);
858     }
859 
860 #if defined(TARGET_ALPHA)
861     /* We (partially) emulate OSF/1 on Alpha, which requires we
862        return a proper errno, not an unchanged brk value.  */
863     return -TARGET_ENOMEM;
864 #endif
865     /* For everything else, return the previous break. */
866     return target_brk;
867 }
868 
869 #if defined(TARGET_NR_select) || defined(TARGET_NR__newselect) || \
870     defined(TARGET_NR_pselect6) || defined(TARGET_NR_pselect6_time64)
871 static inline abi_long copy_from_user_fdset(fd_set *fds,
872                                             abi_ulong target_fds_addr,
873                                             int n)
874 {
875     int i, nw, j, k;
876     abi_ulong b, *target_fds;
877 
878     nw = DIV_ROUND_UP(n, TARGET_ABI_BITS);
879     if (!(target_fds = lock_user(VERIFY_READ,
880                                  target_fds_addr,
881                                  sizeof(abi_ulong) * nw,
882                                  1)))
883         return -TARGET_EFAULT;
884 
885     FD_ZERO(fds);
886     k = 0;
887     for (i = 0; i < nw; i++) {
888         /* grab the abi_ulong */
889         __get_user(b, &target_fds[i]);
890         for (j = 0; j < TARGET_ABI_BITS; j++) {
891             /* check the bit inside the abi_ulong */
892             if ((b >> j) & 1)
893                 FD_SET(k, fds);
894             k++;
895         }
896     }
897 
898     unlock_user(target_fds, target_fds_addr, 0);
899 
900     return 0;
901 }
902 
903 static inline abi_ulong copy_from_user_fdset_ptr(fd_set *fds, fd_set **fds_ptr,
904                                                  abi_ulong target_fds_addr,
905                                                  int n)
906 {
907     if (target_fds_addr) {
908         if (copy_from_user_fdset(fds, target_fds_addr, n))
909             return -TARGET_EFAULT;
910         *fds_ptr = fds;
911     } else {
912         *fds_ptr = NULL;
913     }
914     return 0;
915 }
916 
917 static inline abi_long copy_to_user_fdset(abi_ulong target_fds_addr,
918                                           const fd_set *fds,
919                                           int n)
920 {
921     int i, nw, j, k;
922     abi_long v;
923     abi_ulong *target_fds;
924 
925     nw = DIV_ROUND_UP(n, TARGET_ABI_BITS);
926     if (!(target_fds = lock_user(VERIFY_WRITE,
927                                  target_fds_addr,
928                                  sizeof(abi_ulong) * nw,
929                                  0)))
930         return -TARGET_EFAULT;
931 
932     k = 0;
933     for (i = 0; i < nw; i++) {
934         v = 0;
935         for (j = 0; j < TARGET_ABI_BITS; j++) {
936             v |= ((abi_ulong)(FD_ISSET(k, fds) != 0) << j);
937             k++;
938         }
939         __put_user(v, &target_fds[i]);
940     }
941 
942     unlock_user(target_fds, target_fds_addr, sizeof(abi_ulong) * nw);
943 
944     return 0;
945 }
946 #endif
947 
948 #if defined(__alpha__)
949 #define HOST_HZ 1024
950 #else
951 #define HOST_HZ 100
952 #endif
953 
954 static inline abi_long host_to_target_clock_t(long ticks)
955 {
956 #if HOST_HZ == TARGET_HZ
957     return ticks;
958 #else
959     return ((int64_t)ticks * TARGET_HZ) / HOST_HZ;
960 #endif
961 }
962 
963 static inline abi_long host_to_target_rusage(abi_ulong target_addr,
964                                              const struct rusage *rusage)
965 {
966     struct target_rusage *target_rusage;
967 
968     if (!lock_user_struct(VERIFY_WRITE, target_rusage, target_addr, 0))
969         return -TARGET_EFAULT;
970     target_rusage->ru_utime.tv_sec = tswapal(rusage->ru_utime.tv_sec);
971     target_rusage->ru_utime.tv_usec = tswapal(rusage->ru_utime.tv_usec);
972     target_rusage->ru_stime.tv_sec = tswapal(rusage->ru_stime.tv_sec);
973     target_rusage->ru_stime.tv_usec = tswapal(rusage->ru_stime.tv_usec);
974     target_rusage->ru_maxrss = tswapal(rusage->ru_maxrss);
975     target_rusage->ru_ixrss = tswapal(rusage->ru_ixrss);
976     target_rusage->ru_idrss = tswapal(rusage->ru_idrss);
977     target_rusage->ru_isrss = tswapal(rusage->ru_isrss);
978     target_rusage->ru_minflt = tswapal(rusage->ru_minflt);
979     target_rusage->ru_majflt = tswapal(rusage->ru_majflt);
980     target_rusage->ru_nswap = tswapal(rusage->ru_nswap);
981     target_rusage->ru_inblock = tswapal(rusage->ru_inblock);
982     target_rusage->ru_oublock = tswapal(rusage->ru_oublock);
983     target_rusage->ru_msgsnd = tswapal(rusage->ru_msgsnd);
984     target_rusage->ru_msgrcv = tswapal(rusage->ru_msgrcv);
985     target_rusage->ru_nsignals = tswapal(rusage->ru_nsignals);
986     target_rusage->ru_nvcsw = tswapal(rusage->ru_nvcsw);
987     target_rusage->ru_nivcsw = tswapal(rusage->ru_nivcsw);
988     unlock_user_struct(target_rusage, target_addr, 1);
989 
990     return 0;
991 }
992 
993 #ifdef TARGET_NR_setrlimit
994 static inline rlim_t target_to_host_rlim(abi_ulong target_rlim)
995 {
996     abi_ulong target_rlim_swap;
997     rlim_t result;
998 
999     target_rlim_swap = tswapal(target_rlim);
1000     if (target_rlim_swap == TARGET_RLIM_INFINITY)
1001         return RLIM_INFINITY;
1002 
1003     result = target_rlim_swap;
1004     if (target_rlim_swap != (rlim_t)result)
1005         return RLIM_INFINITY;
1006 
1007     return result;
1008 }
1009 #endif
1010 
1011 #if defined(TARGET_NR_getrlimit) || defined(TARGET_NR_ugetrlimit)
1012 static inline abi_ulong host_to_target_rlim(rlim_t rlim)
1013 {
1014     abi_ulong target_rlim_swap;
1015     abi_ulong result;
1016 
1017     if (rlim == RLIM_INFINITY || rlim != (abi_long)rlim)
1018         target_rlim_swap = TARGET_RLIM_INFINITY;
1019     else
1020         target_rlim_swap = rlim;
1021     result = tswapal(target_rlim_swap);
1022 
1023     return result;
1024 }
1025 #endif
1026 
1027 static inline int target_to_host_resource(int code)
1028 {
1029     switch (code) {
1030     case TARGET_RLIMIT_AS:
1031         return RLIMIT_AS;
1032     case TARGET_RLIMIT_CORE:
1033         return RLIMIT_CORE;
1034     case TARGET_RLIMIT_CPU:
1035         return RLIMIT_CPU;
1036     case TARGET_RLIMIT_DATA:
1037         return RLIMIT_DATA;
1038     case TARGET_RLIMIT_FSIZE:
1039         return RLIMIT_FSIZE;
1040     case TARGET_RLIMIT_LOCKS:
1041         return RLIMIT_LOCKS;
1042     case TARGET_RLIMIT_MEMLOCK:
1043         return RLIMIT_MEMLOCK;
1044     case TARGET_RLIMIT_MSGQUEUE:
1045         return RLIMIT_MSGQUEUE;
1046     case TARGET_RLIMIT_NICE:
1047         return RLIMIT_NICE;
1048     case TARGET_RLIMIT_NOFILE:
1049         return RLIMIT_NOFILE;
1050     case TARGET_RLIMIT_NPROC:
1051         return RLIMIT_NPROC;
1052     case TARGET_RLIMIT_RSS:
1053         return RLIMIT_RSS;
1054     case TARGET_RLIMIT_RTPRIO:
1055         return RLIMIT_RTPRIO;
1056 #ifdef RLIMIT_RTTIME
1057     case TARGET_RLIMIT_RTTIME:
1058         return RLIMIT_RTTIME;
1059 #endif
1060     case TARGET_RLIMIT_SIGPENDING:
1061         return RLIMIT_SIGPENDING;
1062     case TARGET_RLIMIT_STACK:
1063         return RLIMIT_STACK;
1064     default:
1065         return code;
1066     }
1067 }
1068 
1069 static inline abi_long copy_from_user_timeval(struct timeval *tv,
1070                                               abi_ulong target_tv_addr)
1071 {
1072     struct target_timeval *target_tv;
1073 
1074     if (!lock_user_struct(VERIFY_READ, target_tv, target_tv_addr, 1)) {
1075         return -TARGET_EFAULT;
1076     }
1077 
1078     __get_user(tv->tv_sec, &target_tv->tv_sec);
1079     __get_user(tv->tv_usec, &target_tv->tv_usec);
1080 
1081     unlock_user_struct(target_tv, target_tv_addr, 0);
1082 
1083     return 0;
1084 }
1085 
1086 static inline abi_long copy_to_user_timeval(abi_ulong target_tv_addr,
1087                                             const struct timeval *tv)
1088 {
1089     struct target_timeval *target_tv;
1090 
1091     if (!lock_user_struct(VERIFY_WRITE, target_tv, target_tv_addr, 0)) {
1092         return -TARGET_EFAULT;
1093     }
1094 
1095     __put_user(tv->tv_sec, &target_tv->tv_sec);
1096     __put_user(tv->tv_usec, &target_tv->tv_usec);
1097 
1098     unlock_user_struct(target_tv, target_tv_addr, 1);
1099 
1100     return 0;
1101 }
1102 
1103 #if defined(TARGET_NR_clock_adjtime64) && defined(CONFIG_CLOCK_ADJTIME)
1104 static inline abi_long copy_from_user_timeval64(struct timeval *tv,
1105                                                 abi_ulong target_tv_addr)
1106 {
1107     struct target__kernel_sock_timeval *target_tv;
1108 
1109     if (!lock_user_struct(VERIFY_READ, target_tv, target_tv_addr, 1)) {
1110         return -TARGET_EFAULT;
1111     }
1112 
1113     __get_user(tv->tv_sec, &target_tv->tv_sec);
1114     __get_user(tv->tv_usec, &target_tv->tv_usec);
1115 
1116     unlock_user_struct(target_tv, target_tv_addr, 0);
1117 
1118     return 0;
1119 }
1120 #endif
1121 
1122 static inline abi_long copy_to_user_timeval64(abi_ulong target_tv_addr,
1123                                               const struct timeval *tv)
1124 {
1125     struct target__kernel_sock_timeval *target_tv;
1126 
1127     if (!lock_user_struct(VERIFY_WRITE, target_tv, target_tv_addr, 0)) {
1128         return -TARGET_EFAULT;
1129     }
1130 
1131     __put_user(tv->tv_sec, &target_tv->tv_sec);
1132     __put_user(tv->tv_usec, &target_tv->tv_usec);
1133 
1134     unlock_user_struct(target_tv, target_tv_addr, 1);
1135 
1136     return 0;
1137 }
1138 
1139 #if defined(TARGET_NR_futex) || \
1140     defined(TARGET_NR_rt_sigtimedwait) || \
1141     defined(TARGET_NR_pselect6) || defined(TARGET_NR_pselect6) || \
1142     defined(TARGET_NR_nanosleep) || defined(TARGET_NR_clock_settime) || \
1143     defined(TARGET_NR_utimensat) || defined(TARGET_NR_mq_timedsend) || \
1144     defined(TARGET_NR_mq_timedreceive) || defined(TARGET_NR_ipc) || \
1145     defined(TARGET_NR_semop) || defined(TARGET_NR_semtimedop) || \
1146     defined(TARGET_NR_timer_settime) || \
1147     (defined(TARGET_NR_timerfd_settime) && defined(CONFIG_TIMERFD))
1148 static inline abi_long target_to_host_timespec(struct timespec *host_ts,
1149                                                abi_ulong target_addr)
1150 {
1151     struct target_timespec *target_ts;
1152 
1153     if (!lock_user_struct(VERIFY_READ, target_ts, target_addr, 1)) {
1154         return -TARGET_EFAULT;
1155     }
1156     __get_user(host_ts->tv_sec, &target_ts->tv_sec);
1157     __get_user(host_ts->tv_nsec, &target_ts->tv_nsec);
1158     unlock_user_struct(target_ts, target_addr, 0);
1159     return 0;
1160 }
1161 #endif
1162 
1163 #if defined(TARGET_NR_clock_settime64) || defined(TARGET_NR_futex_time64) || \
1164     defined(TARGET_NR_timer_settime64) || \
1165     defined(TARGET_NR_mq_timedsend_time64) || \
1166     defined(TARGET_NR_mq_timedreceive_time64) || \
1167     (defined(TARGET_NR_timerfd_settime64) && defined(CONFIG_TIMERFD)) || \
1168     defined(TARGET_NR_clock_nanosleep_time64) || \
1169     defined(TARGET_NR_rt_sigtimedwait_time64) || \
1170     defined(TARGET_NR_utimensat) || \
1171     defined(TARGET_NR_utimensat_time64) || \
1172     defined(TARGET_NR_semtimedop_time64) || \
1173     defined(TARGET_NR_pselect6_time64) || defined(TARGET_NR_ppoll_time64)
1174 static inline abi_long target_to_host_timespec64(struct timespec *host_ts,
1175                                                  abi_ulong target_addr)
1176 {
1177     struct target__kernel_timespec *target_ts;
1178 
1179     if (!lock_user_struct(VERIFY_READ, target_ts, target_addr, 1)) {
1180         return -TARGET_EFAULT;
1181     }
1182     __get_user(host_ts->tv_sec, &target_ts->tv_sec);
1183     __get_user(host_ts->tv_nsec, &target_ts->tv_nsec);
1184     /* in 32bit mode, this drops the padding */
1185     host_ts->tv_nsec = (long)(abi_long)host_ts->tv_nsec;
1186     unlock_user_struct(target_ts, target_addr, 0);
1187     return 0;
1188 }
1189 #endif
1190 
1191 static inline abi_long host_to_target_timespec(abi_ulong target_addr,
1192                                                struct timespec *host_ts)
1193 {
1194     struct target_timespec *target_ts;
1195 
1196     if (!lock_user_struct(VERIFY_WRITE, target_ts, target_addr, 0)) {
1197         return -TARGET_EFAULT;
1198     }
1199     __put_user(host_ts->tv_sec, &target_ts->tv_sec);
1200     __put_user(host_ts->tv_nsec, &target_ts->tv_nsec);
1201     unlock_user_struct(target_ts, target_addr, 1);
1202     return 0;
1203 }
1204 
1205 static inline abi_long host_to_target_timespec64(abi_ulong target_addr,
1206                                                  struct timespec *host_ts)
1207 {
1208     struct target__kernel_timespec *target_ts;
1209 
1210     if (!lock_user_struct(VERIFY_WRITE, target_ts, target_addr, 0)) {
1211         return -TARGET_EFAULT;
1212     }
1213     __put_user(host_ts->tv_sec, &target_ts->tv_sec);
1214     __put_user(host_ts->tv_nsec, &target_ts->tv_nsec);
1215     unlock_user_struct(target_ts, target_addr, 1);
1216     return 0;
1217 }
1218 
1219 #if defined(TARGET_NR_gettimeofday)
1220 static inline abi_long copy_to_user_timezone(abi_ulong target_tz_addr,
1221                                              struct timezone *tz)
1222 {
1223     struct target_timezone *target_tz;
1224 
1225     if (!lock_user_struct(VERIFY_WRITE, target_tz, target_tz_addr, 1)) {
1226         return -TARGET_EFAULT;
1227     }
1228 
1229     __put_user(tz->tz_minuteswest, &target_tz->tz_minuteswest);
1230     __put_user(tz->tz_dsttime, &target_tz->tz_dsttime);
1231 
1232     unlock_user_struct(target_tz, target_tz_addr, 1);
1233 
1234     return 0;
1235 }
1236 #endif
1237 
1238 #if defined(TARGET_NR_settimeofday)
1239 static inline abi_long copy_from_user_timezone(struct timezone *tz,
1240                                                abi_ulong target_tz_addr)
1241 {
1242     struct target_timezone *target_tz;
1243 
1244     if (!lock_user_struct(VERIFY_READ, target_tz, target_tz_addr, 1)) {
1245         return -TARGET_EFAULT;
1246     }
1247 
1248     __get_user(tz->tz_minuteswest, &target_tz->tz_minuteswest);
1249     __get_user(tz->tz_dsttime, &target_tz->tz_dsttime);
1250 
1251     unlock_user_struct(target_tz, target_tz_addr, 0);
1252 
1253     return 0;
1254 }
1255 #endif
1256 
1257 #if defined(TARGET_NR_mq_open) && defined(__NR_mq_open)
1258 #include <mqueue.h>
1259 
1260 static inline abi_long copy_from_user_mq_attr(struct mq_attr *attr,
1261                                               abi_ulong target_mq_attr_addr)
1262 {
1263     struct target_mq_attr *target_mq_attr;
1264 
1265     if (!lock_user_struct(VERIFY_READ, target_mq_attr,
1266                           target_mq_attr_addr, 1))
1267         return -TARGET_EFAULT;
1268 
1269     __get_user(attr->mq_flags, &target_mq_attr->mq_flags);
1270     __get_user(attr->mq_maxmsg, &target_mq_attr->mq_maxmsg);
1271     __get_user(attr->mq_msgsize, &target_mq_attr->mq_msgsize);
1272     __get_user(attr->mq_curmsgs, &target_mq_attr->mq_curmsgs);
1273 
1274     unlock_user_struct(target_mq_attr, target_mq_attr_addr, 0);
1275 
1276     return 0;
1277 }
1278 
1279 static inline abi_long copy_to_user_mq_attr(abi_ulong target_mq_attr_addr,
1280                                             const struct mq_attr *attr)
1281 {
1282     struct target_mq_attr *target_mq_attr;
1283 
1284     if (!lock_user_struct(VERIFY_WRITE, target_mq_attr,
1285                           target_mq_attr_addr, 0))
1286         return -TARGET_EFAULT;
1287 
1288     __put_user(attr->mq_flags, &target_mq_attr->mq_flags);
1289     __put_user(attr->mq_maxmsg, &target_mq_attr->mq_maxmsg);
1290     __put_user(attr->mq_msgsize, &target_mq_attr->mq_msgsize);
1291     __put_user(attr->mq_curmsgs, &target_mq_attr->mq_curmsgs);
1292 
1293     unlock_user_struct(target_mq_attr, target_mq_attr_addr, 1);
1294 
1295     return 0;
1296 }
1297 #endif
1298 
1299 #if defined(TARGET_NR_select) || defined(TARGET_NR__newselect)
1300 /* do_select() must return target values and target errnos. */
1301 static abi_long do_select(int n,
1302                           abi_ulong rfd_addr, abi_ulong wfd_addr,
1303                           abi_ulong efd_addr, abi_ulong target_tv_addr)
1304 {
1305     fd_set rfds, wfds, efds;
1306     fd_set *rfds_ptr, *wfds_ptr, *efds_ptr;
1307     struct timeval tv;
1308     struct timespec ts, *ts_ptr;
1309     abi_long ret;
1310 
1311     ret = copy_from_user_fdset_ptr(&rfds, &rfds_ptr, rfd_addr, n);
1312     if (ret) {
1313         return ret;
1314     }
1315     ret = copy_from_user_fdset_ptr(&wfds, &wfds_ptr, wfd_addr, n);
1316     if (ret) {
1317         return ret;
1318     }
1319     ret = copy_from_user_fdset_ptr(&efds, &efds_ptr, efd_addr, n);
1320     if (ret) {
1321         return ret;
1322     }
1323 
1324     if (target_tv_addr) {
1325         if (copy_from_user_timeval(&tv, target_tv_addr))
1326             return -TARGET_EFAULT;
1327         ts.tv_sec = tv.tv_sec;
1328         ts.tv_nsec = tv.tv_usec * 1000;
1329         ts_ptr = &ts;
1330     } else {
1331         ts_ptr = NULL;
1332     }
1333 
1334     ret = get_errno(safe_pselect6(n, rfds_ptr, wfds_ptr, efds_ptr,
1335                                   ts_ptr, NULL));
1336 
1337     if (!is_error(ret)) {
1338         if (rfd_addr && copy_to_user_fdset(rfd_addr, &rfds, n))
1339             return -TARGET_EFAULT;
1340         if (wfd_addr && copy_to_user_fdset(wfd_addr, &wfds, n))
1341             return -TARGET_EFAULT;
1342         if (efd_addr && copy_to_user_fdset(efd_addr, &efds, n))
1343             return -TARGET_EFAULT;
1344 
1345         if (target_tv_addr) {
1346             tv.tv_sec = ts.tv_sec;
1347             tv.tv_usec = ts.tv_nsec / 1000;
1348             if (copy_to_user_timeval(target_tv_addr, &tv)) {
1349                 return -TARGET_EFAULT;
1350             }
1351         }
1352     }
1353 
1354     return ret;
1355 }
1356 
1357 #if defined(TARGET_WANT_OLD_SYS_SELECT)
1358 static abi_long do_old_select(abi_ulong arg1)
1359 {
1360     struct target_sel_arg_struct *sel;
1361     abi_ulong inp, outp, exp, tvp;
1362     long nsel;
1363 
1364     if (!lock_user_struct(VERIFY_READ, sel, arg1, 1)) {
1365         return -TARGET_EFAULT;
1366     }
1367 
1368     nsel = tswapal(sel->n);
1369     inp = tswapal(sel->inp);
1370     outp = tswapal(sel->outp);
1371     exp = tswapal(sel->exp);
1372     tvp = tswapal(sel->tvp);
1373 
1374     unlock_user_struct(sel, arg1, 0);
1375 
1376     return do_select(nsel, inp, outp, exp, tvp);
1377 }
1378 #endif
1379 #endif
1380 
1381 #if defined(TARGET_NR_pselect6) || defined(TARGET_NR_pselect6_time64)
1382 static abi_long do_pselect6(abi_long arg1, abi_long arg2, abi_long arg3,
1383                             abi_long arg4, abi_long arg5, abi_long arg6,
1384                             bool time64)
1385 {
1386     abi_long rfd_addr, wfd_addr, efd_addr, n, ts_addr;
1387     fd_set rfds, wfds, efds;
1388     fd_set *rfds_ptr, *wfds_ptr, *efds_ptr;
1389     struct timespec ts, *ts_ptr;
1390     abi_long ret;
1391 
1392     /*
1393      * The 6th arg is actually two args smashed together,
1394      * so we cannot use the C library.
1395      */
1396     struct {
1397         sigset_t *set;
1398         size_t size;
1399     } sig, *sig_ptr;
1400 
1401     abi_ulong arg_sigset, arg_sigsize, *arg7;
1402 
1403     n = arg1;
1404     rfd_addr = arg2;
1405     wfd_addr = arg3;
1406     efd_addr = arg4;
1407     ts_addr = arg5;
1408 
1409     ret = copy_from_user_fdset_ptr(&rfds, &rfds_ptr, rfd_addr, n);
1410     if (ret) {
1411         return ret;
1412     }
1413     ret = copy_from_user_fdset_ptr(&wfds, &wfds_ptr, wfd_addr, n);
1414     if (ret) {
1415         return ret;
1416     }
1417     ret = copy_from_user_fdset_ptr(&efds, &efds_ptr, efd_addr, n);
1418     if (ret) {
1419         return ret;
1420     }
1421 
1422     /*
1423      * This takes a timespec, and not a timeval, so we cannot
1424      * use the do_select() helper ...
1425      */
1426     if (ts_addr) {
1427         if (time64) {
1428             if (target_to_host_timespec64(&ts, ts_addr)) {
1429                 return -TARGET_EFAULT;
1430             }
1431         } else {
1432             if (target_to_host_timespec(&ts, ts_addr)) {
1433                 return -TARGET_EFAULT;
1434             }
1435         }
1436             ts_ptr = &ts;
1437     } else {
1438         ts_ptr = NULL;
1439     }
1440 
1441     /* Extract the two packed args for the sigset */
1442     sig_ptr = NULL;
1443     if (arg6) {
1444         arg7 = lock_user(VERIFY_READ, arg6, sizeof(*arg7) * 2, 1);
1445         if (!arg7) {
1446             return -TARGET_EFAULT;
1447         }
1448         arg_sigset = tswapal(arg7[0]);
1449         arg_sigsize = tswapal(arg7[1]);
1450         unlock_user(arg7, arg6, 0);
1451 
1452         if (arg_sigset) {
1453             ret = process_sigsuspend_mask(&sig.set, arg_sigset, arg_sigsize);
1454             if (ret != 0) {
1455                 return ret;
1456             }
1457             sig_ptr = &sig;
1458             sig.size = SIGSET_T_SIZE;
1459         }
1460     }
1461 
1462     ret = get_errno(safe_pselect6(n, rfds_ptr, wfds_ptr, efds_ptr,
1463                                   ts_ptr, sig_ptr));
1464 
1465     if (sig_ptr) {
1466         finish_sigsuspend_mask(ret);
1467     }
1468 
1469     if (!is_error(ret)) {
1470         if (rfd_addr && copy_to_user_fdset(rfd_addr, &rfds, n)) {
1471             return -TARGET_EFAULT;
1472         }
1473         if (wfd_addr && copy_to_user_fdset(wfd_addr, &wfds, n)) {
1474             return -TARGET_EFAULT;
1475         }
1476         if (efd_addr && copy_to_user_fdset(efd_addr, &efds, n)) {
1477             return -TARGET_EFAULT;
1478         }
1479         if (time64) {
1480             if (ts_addr && host_to_target_timespec64(ts_addr, &ts)) {
1481                 return -TARGET_EFAULT;
1482             }
1483         } else {
1484             if (ts_addr && host_to_target_timespec(ts_addr, &ts)) {
1485                 return -TARGET_EFAULT;
1486             }
1487         }
1488     }
1489     return ret;
1490 }
1491 #endif
1492 
1493 #if defined(TARGET_NR_poll) || defined(TARGET_NR_ppoll) || \
1494     defined(TARGET_NR_ppoll_time64)
1495 static abi_long do_ppoll(abi_long arg1, abi_long arg2, abi_long arg3,
1496                          abi_long arg4, abi_long arg5, bool ppoll, bool time64)
1497 {
1498     struct target_pollfd *target_pfd;
1499     unsigned int nfds = arg2;
1500     struct pollfd *pfd;
1501     unsigned int i;
1502     abi_long ret;
1503 
1504     pfd = NULL;
1505     target_pfd = NULL;
1506     if (nfds) {
1507         if (nfds > (INT_MAX / sizeof(struct target_pollfd))) {
1508             return -TARGET_EINVAL;
1509         }
1510         target_pfd = lock_user(VERIFY_WRITE, arg1,
1511                                sizeof(struct target_pollfd) * nfds, 1);
1512         if (!target_pfd) {
1513             return -TARGET_EFAULT;
1514         }
1515 
1516         pfd = alloca(sizeof(struct pollfd) * nfds);
1517         for (i = 0; i < nfds; i++) {
1518             pfd[i].fd = tswap32(target_pfd[i].fd);
1519             pfd[i].events = tswap16(target_pfd[i].events);
1520         }
1521     }
1522     if (ppoll) {
1523         struct timespec _timeout_ts, *timeout_ts = &_timeout_ts;
1524         sigset_t *set = NULL;
1525 
1526         if (arg3) {
1527             if (time64) {
1528                 if (target_to_host_timespec64(timeout_ts, arg3)) {
1529                     unlock_user(target_pfd, arg1, 0);
1530                     return -TARGET_EFAULT;
1531                 }
1532             } else {
1533                 if (target_to_host_timespec(timeout_ts, arg3)) {
1534                     unlock_user(target_pfd, arg1, 0);
1535                     return -TARGET_EFAULT;
1536                 }
1537             }
1538         } else {
1539             timeout_ts = NULL;
1540         }
1541 
1542         if (arg4) {
1543             ret = process_sigsuspend_mask(&set, arg4, arg5);
1544             if (ret != 0) {
1545                 unlock_user(target_pfd, arg1, 0);
1546                 return ret;
1547             }
1548         }
1549 
1550         ret = get_errno(safe_ppoll(pfd, nfds, timeout_ts,
1551                                    set, SIGSET_T_SIZE));
1552 
1553         if (set) {
1554             finish_sigsuspend_mask(ret);
1555         }
1556         if (!is_error(ret) && arg3) {
1557             if (time64) {
1558                 if (host_to_target_timespec64(arg3, timeout_ts)) {
1559                     return -TARGET_EFAULT;
1560                 }
1561             } else {
1562                 if (host_to_target_timespec(arg3, timeout_ts)) {
1563                     return -TARGET_EFAULT;
1564                 }
1565             }
1566         }
1567     } else {
1568           struct timespec ts, *pts;
1569 
1570           if (arg3 >= 0) {
1571               /* Convert ms to secs, ns */
1572               ts.tv_sec = arg3 / 1000;
1573               ts.tv_nsec = (arg3 % 1000) * 1000000LL;
1574               pts = &ts;
1575           } else {
1576               /* -ve poll() timeout means "infinite" */
1577               pts = NULL;
1578           }
1579           ret = get_errno(safe_ppoll(pfd, nfds, pts, NULL, 0));
1580     }
1581 
1582     if (!is_error(ret)) {
1583         for (i = 0; i < nfds; i++) {
1584             target_pfd[i].revents = tswap16(pfd[i].revents);
1585         }
1586     }
1587     unlock_user(target_pfd, arg1, sizeof(struct target_pollfd) * nfds);
1588     return ret;
1589 }
1590 #endif
1591 
1592 static abi_long do_pipe2(int host_pipe[], int flags)
1593 {
1594 #ifdef CONFIG_PIPE2
1595     return pipe2(host_pipe, flags);
1596 #else
1597     return -ENOSYS;
1598 #endif
1599 }
1600 
1601 static abi_long do_pipe(CPUArchState *cpu_env, abi_ulong pipedes,
1602                         int flags, int is_pipe2)
1603 {
1604     int host_pipe[2];
1605     abi_long ret;
1606     ret = flags ? do_pipe2(host_pipe, flags) : pipe(host_pipe);
1607 
1608     if (is_error(ret))
1609         return get_errno(ret);
1610 
1611     /* Several targets have special calling conventions for the original
1612        pipe syscall, but didn't replicate this into the pipe2 syscall.  */
1613     if (!is_pipe2) {
1614 #if defined(TARGET_ALPHA)
1615         cpu_env->ir[IR_A4] = host_pipe[1];
1616         return host_pipe[0];
1617 #elif defined(TARGET_MIPS)
1618         cpu_env->active_tc.gpr[3] = host_pipe[1];
1619         return host_pipe[0];
1620 #elif defined(TARGET_SH4)
1621         cpu_env->gregs[1] = host_pipe[1];
1622         return host_pipe[0];
1623 #elif defined(TARGET_SPARC)
1624         cpu_env->regwptr[1] = host_pipe[1];
1625         return host_pipe[0];
1626 #endif
1627     }
1628 
1629     if (put_user_s32(host_pipe[0], pipedes)
1630         || put_user_s32(host_pipe[1], pipedes + sizeof(host_pipe[0])))
1631         return -TARGET_EFAULT;
1632     return get_errno(ret);
1633 }
1634 
1635 static inline abi_long target_to_host_ip_mreq(struct ip_mreqn *mreqn,
1636                                               abi_ulong target_addr,
1637                                               socklen_t len)
1638 {
1639     struct target_ip_mreqn *target_smreqn;
1640 
1641     target_smreqn = lock_user(VERIFY_READ, target_addr, len, 1);
1642     if (!target_smreqn)
1643         return -TARGET_EFAULT;
1644     mreqn->imr_multiaddr.s_addr = target_smreqn->imr_multiaddr.s_addr;
1645     mreqn->imr_address.s_addr = target_smreqn->imr_address.s_addr;
1646     if (len == sizeof(struct target_ip_mreqn))
1647         mreqn->imr_ifindex = tswapal(target_smreqn->imr_ifindex);
1648     unlock_user(target_smreqn, target_addr, 0);
1649 
1650     return 0;
1651 }
1652 
1653 static inline abi_long target_to_host_sockaddr(int fd, struct sockaddr *addr,
1654                                                abi_ulong target_addr,
1655                                                socklen_t len)
1656 {
1657     const socklen_t unix_maxlen = sizeof (struct sockaddr_un);
1658     sa_family_t sa_family;
1659     struct target_sockaddr *target_saddr;
1660 
1661     if (fd_trans_target_to_host_addr(fd)) {
1662         return fd_trans_target_to_host_addr(fd)(addr, target_addr, len);
1663     }
1664 
1665     target_saddr = lock_user(VERIFY_READ, target_addr, len, 1);
1666     if (!target_saddr)
1667         return -TARGET_EFAULT;
1668 
1669     sa_family = tswap16(target_saddr->sa_family);
1670 
1671     /* Oops. The caller might send a incomplete sun_path; sun_path
1672      * must be terminated by \0 (see the manual page), but
1673      * unfortunately it is quite common to specify sockaddr_un
1674      * length as "strlen(x->sun_path)" while it should be
1675      * "strlen(...) + 1". We'll fix that here if needed.
1676      * Linux kernel has a similar feature.
1677      */
1678 
1679     if (sa_family == AF_UNIX) {
1680         if (len < unix_maxlen && len > 0) {
1681             char *cp = (char*)target_saddr;
1682 
1683             if ( cp[len-1] && !cp[len] )
1684                 len++;
1685         }
1686         if (len > unix_maxlen)
1687             len = unix_maxlen;
1688     }
1689 
1690     memcpy(addr, target_saddr, len);
1691     addr->sa_family = sa_family;
1692     if (sa_family == AF_NETLINK) {
1693         struct sockaddr_nl *nladdr;
1694 
1695         nladdr = (struct sockaddr_nl *)addr;
1696         nladdr->nl_pid = tswap32(nladdr->nl_pid);
1697         nladdr->nl_groups = tswap32(nladdr->nl_groups);
1698     } else if (sa_family == AF_PACKET) {
1699 	struct target_sockaddr_ll *lladdr;
1700 
1701 	lladdr = (struct target_sockaddr_ll *)addr;
1702 	lladdr->sll_ifindex = tswap32(lladdr->sll_ifindex);
1703 	lladdr->sll_hatype = tswap16(lladdr->sll_hatype);
1704     }
1705     unlock_user(target_saddr, target_addr, 0);
1706 
1707     return 0;
1708 }
1709 
1710 static inline abi_long host_to_target_sockaddr(abi_ulong target_addr,
1711                                                struct sockaddr *addr,
1712                                                socklen_t len)
1713 {
1714     struct target_sockaddr *target_saddr;
1715 
1716     if (len == 0) {
1717         return 0;
1718     }
1719     assert(addr);
1720 
1721     target_saddr = lock_user(VERIFY_WRITE, target_addr, len, 0);
1722     if (!target_saddr)
1723         return -TARGET_EFAULT;
1724     memcpy(target_saddr, addr, len);
1725     if (len >= offsetof(struct target_sockaddr, sa_family) +
1726         sizeof(target_saddr->sa_family)) {
1727         target_saddr->sa_family = tswap16(addr->sa_family);
1728     }
1729     if (addr->sa_family == AF_NETLINK &&
1730         len >= sizeof(struct target_sockaddr_nl)) {
1731         struct target_sockaddr_nl *target_nl =
1732                (struct target_sockaddr_nl *)target_saddr;
1733         target_nl->nl_pid = tswap32(target_nl->nl_pid);
1734         target_nl->nl_groups = tswap32(target_nl->nl_groups);
1735     } else if (addr->sa_family == AF_PACKET) {
1736         struct sockaddr_ll *target_ll = (struct sockaddr_ll *)target_saddr;
1737         target_ll->sll_ifindex = tswap32(target_ll->sll_ifindex);
1738         target_ll->sll_hatype = tswap16(target_ll->sll_hatype);
1739     } else if (addr->sa_family == AF_INET6 &&
1740                len >= sizeof(struct target_sockaddr_in6)) {
1741         struct target_sockaddr_in6 *target_in6 =
1742                (struct target_sockaddr_in6 *)target_saddr;
1743         target_in6->sin6_scope_id = tswap16(target_in6->sin6_scope_id);
1744     }
1745     unlock_user(target_saddr, target_addr, len);
1746 
1747     return 0;
1748 }
1749 
1750 static inline abi_long target_to_host_cmsg(struct msghdr *msgh,
1751                                            struct target_msghdr *target_msgh)
1752 {
1753     struct cmsghdr *cmsg = CMSG_FIRSTHDR(msgh);
1754     abi_long msg_controllen;
1755     abi_ulong target_cmsg_addr;
1756     struct target_cmsghdr *target_cmsg, *target_cmsg_start;
1757     socklen_t space = 0;
1758 
1759     msg_controllen = tswapal(target_msgh->msg_controllen);
1760     if (msg_controllen < sizeof (struct target_cmsghdr))
1761         goto the_end;
1762     target_cmsg_addr = tswapal(target_msgh->msg_control);
1763     target_cmsg = lock_user(VERIFY_READ, target_cmsg_addr, msg_controllen, 1);
1764     target_cmsg_start = target_cmsg;
1765     if (!target_cmsg)
1766         return -TARGET_EFAULT;
1767 
1768     while (cmsg && target_cmsg) {
1769         void *data = CMSG_DATA(cmsg);
1770         void *target_data = TARGET_CMSG_DATA(target_cmsg);
1771 
1772         int len = tswapal(target_cmsg->cmsg_len)
1773             - sizeof(struct target_cmsghdr);
1774 
1775         space += CMSG_SPACE(len);
1776         if (space > msgh->msg_controllen) {
1777             space -= CMSG_SPACE(len);
1778             /* This is a QEMU bug, since we allocated the payload
1779              * area ourselves (unlike overflow in host-to-target
1780              * conversion, which is just the guest giving us a buffer
1781              * that's too small). It can't happen for the payload types
1782              * we currently support; if it becomes an issue in future
1783              * we would need to improve our allocation strategy to
1784              * something more intelligent than "twice the size of the
1785              * target buffer we're reading from".
1786              */
1787             qemu_log_mask(LOG_UNIMP,
1788                           ("Unsupported ancillary data %d/%d: "
1789                            "unhandled msg size\n"),
1790                           tswap32(target_cmsg->cmsg_level),
1791                           tswap32(target_cmsg->cmsg_type));
1792             break;
1793         }
1794 
1795         if (tswap32(target_cmsg->cmsg_level) == TARGET_SOL_SOCKET) {
1796             cmsg->cmsg_level = SOL_SOCKET;
1797         } else {
1798             cmsg->cmsg_level = tswap32(target_cmsg->cmsg_level);
1799         }
1800         cmsg->cmsg_type = tswap32(target_cmsg->cmsg_type);
1801         cmsg->cmsg_len = CMSG_LEN(len);
1802 
1803         if (cmsg->cmsg_level == SOL_SOCKET && cmsg->cmsg_type == SCM_RIGHTS) {
1804             int *fd = (int *)data;
1805             int *target_fd = (int *)target_data;
1806             int i, numfds = len / sizeof(int);
1807 
1808             for (i = 0; i < numfds; i++) {
1809                 __get_user(fd[i], target_fd + i);
1810             }
1811         } else if (cmsg->cmsg_level == SOL_SOCKET
1812                &&  cmsg->cmsg_type == SCM_CREDENTIALS) {
1813             struct ucred *cred = (struct ucred *)data;
1814             struct target_ucred *target_cred =
1815                 (struct target_ucred *)target_data;
1816 
1817             __get_user(cred->pid, &target_cred->pid);
1818             __get_user(cred->uid, &target_cred->uid);
1819             __get_user(cred->gid, &target_cred->gid);
1820         } else {
1821             qemu_log_mask(LOG_UNIMP, "Unsupported ancillary data: %d/%d\n",
1822                           cmsg->cmsg_level, cmsg->cmsg_type);
1823             memcpy(data, target_data, len);
1824         }
1825 
1826         cmsg = CMSG_NXTHDR(msgh, cmsg);
1827         target_cmsg = TARGET_CMSG_NXTHDR(target_msgh, target_cmsg,
1828                                          target_cmsg_start);
1829     }
1830     unlock_user(target_cmsg, target_cmsg_addr, 0);
1831  the_end:
1832     msgh->msg_controllen = space;
1833     return 0;
1834 }
1835 
1836 static inline abi_long host_to_target_cmsg(struct target_msghdr *target_msgh,
1837                                            struct msghdr *msgh)
1838 {
1839     struct cmsghdr *cmsg = CMSG_FIRSTHDR(msgh);
1840     abi_long msg_controllen;
1841     abi_ulong target_cmsg_addr;
1842     struct target_cmsghdr *target_cmsg, *target_cmsg_start;
1843     socklen_t space = 0;
1844 
1845     msg_controllen = tswapal(target_msgh->msg_controllen);
1846     if (msg_controllen < sizeof (struct target_cmsghdr))
1847         goto the_end;
1848     target_cmsg_addr = tswapal(target_msgh->msg_control);
1849     target_cmsg = lock_user(VERIFY_WRITE, target_cmsg_addr, msg_controllen, 0);
1850     target_cmsg_start = target_cmsg;
1851     if (!target_cmsg)
1852         return -TARGET_EFAULT;
1853 
1854     while (cmsg && target_cmsg) {
1855         void *data = CMSG_DATA(cmsg);
1856         void *target_data = TARGET_CMSG_DATA(target_cmsg);
1857 
1858         int len = cmsg->cmsg_len - sizeof(struct cmsghdr);
1859         int tgt_len, tgt_space;
1860 
1861         /* We never copy a half-header but may copy half-data;
1862          * this is Linux's behaviour in put_cmsg(). Note that
1863          * truncation here is a guest problem (which we report
1864          * to the guest via the CTRUNC bit), unlike truncation
1865          * in target_to_host_cmsg, which is a QEMU bug.
1866          */
1867         if (msg_controllen < sizeof(struct target_cmsghdr)) {
1868             target_msgh->msg_flags |= tswap32(MSG_CTRUNC);
1869             break;
1870         }
1871 
1872         if (cmsg->cmsg_level == SOL_SOCKET) {
1873             target_cmsg->cmsg_level = tswap32(TARGET_SOL_SOCKET);
1874         } else {
1875             target_cmsg->cmsg_level = tswap32(cmsg->cmsg_level);
1876         }
1877         target_cmsg->cmsg_type = tswap32(cmsg->cmsg_type);
1878 
1879         /* Payload types which need a different size of payload on
1880          * the target must adjust tgt_len here.
1881          */
1882         tgt_len = len;
1883         switch (cmsg->cmsg_level) {
1884         case SOL_SOCKET:
1885             switch (cmsg->cmsg_type) {
1886             case SO_TIMESTAMP:
1887                 tgt_len = sizeof(struct target_timeval);
1888                 break;
1889             default:
1890                 break;
1891             }
1892             break;
1893         default:
1894             break;
1895         }
1896 
1897         if (msg_controllen < TARGET_CMSG_LEN(tgt_len)) {
1898             target_msgh->msg_flags |= tswap32(MSG_CTRUNC);
1899             tgt_len = msg_controllen - sizeof(struct target_cmsghdr);
1900         }
1901 
1902         /* We must now copy-and-convert len bytes of payload
1903          * into tgt_len bytes of destination space. Bear in mind
1904          * that in both source and destination we may be dealing
1905          * with a truncated value!
1906          */
1907         switch (cmsg->cmsg_level) {
1908         case SOL_SOCKET:
1909             switch (cmsg->cmsg_type) {
1910             case SCM_RIGHTS:
1911             {
1912                 int *fd = (int *)data;
1913                 int *target_fd = (int *)target_data;
1914                 int i, numfds = tgt_len / sizeof(int);
1915 
1916                 for (i = 0; i < numfds; i++) {
1917                     __put_user(fd[i], target_fd + i);
1918                 }
1919                 break;
1920             }
1921             case SO_TIMESTAMP:
1922             {
1923                 struct timeval *tv = (struct timeval *)data;
1924                 struct target_timeval *target_tv =
1925                     (struct target_timeval *)target_data;
1926 
1927                 if (len != sizeof(struct timeval) ||
1928                     tgt_len != sizeof(struct target_timeval)) {
1929                     goto unimplemented;
1930                 }
1931 
1932                 /* copy struct timeval to target */
1933                 __put_user(tv->tv_sec, &target_tv->tv_sec);
1934                 __put_user(tv->tv_usec, &target_tv->tv_usec);
1935                 break;
1936             }
1937             case SCM_CREDENTIALS:
1938             {
1939                 struct ucred *cred = (struct ucred *)data;
1940                 struct target_ucred *target_cred =
1941                     (struct target_ucred *)target_data;
1942 
1943                 __put_user(cred->pid, &target_cred->pid);
1944                 __put_user(cred->uid, &target_cred->uid);
1945                 __put_user(cred->gid, &target_cred->gid);
1946                 break;
1947             }
1948             default:
1949                 goto unimplemented;
1950             }
1951             break;
1952 
1953         case SOL_IP:
1954             switch (cmsg->cmsg_type) {
1955             case IP_TTL:
1956             {
1957                 uint32_t *v = (uint32_t *)data;
1958                 uint32_t *t_int = (uint32_t *)target_data;
1959 
1960                 if (len != sizeof(uint32_t) ||
1961                     tgt_len != sizeof(uint32_t)) {
1962                     goto unimplemented;
1963                 }
1964                 __put_user(*v, t_int);
1965                 break;
1966             }
1967             case IP_RECVERR:
1968             {
1969                 struct errhdr_t {
1970                    struct sock_extended_err ee;
1971                    struct sockaddr_in offender;
1972                 };
1973                 struct errhdr_t *errh = (struct errhdr_t *)data;
1974                 struct errhdr_t *target_errh =
1975                     (struct errhdr_t *)target_data;
1976 
1977                 if (len != sizeof(struct errhdr_t) ||
1978                     tgt_len != sizeof(struct errhdr_t)) {
1979                     goto unimplemented;
1980                 }
1981                 __put_user(errh->ee.ee_errno, &target_errh->ee.ee_errno);
1982                 __put_user(errh->ee.ee_origin, &target_errh->ee.ee_origin);
1983                 __put_user(errh->ee.ee_type,  &target_errh->ee.ee_type);
1984                 __put_user(errh->ee.ee_code, &target_errh->ee.ee_code);
1985                 __put_user(errh->ee.ee_pad, &target_errh->ee.ee_pad);
1986                 __put_user(errh->ee.ee_info, &target_errh->ee.ee_info);
1987                 __put_user(errh->ee.ee_data, &target_errh->ee.ee_data);
1988                 host_to_target_sockaddr((unsigned long) &target_errh->offender,
1989                     (void *) &errh->offender, sizeof(errh->offender));
1990                 break;
1991             }
1992             default:
1993                 goto unimplemented;
1994             }
1995             break;
1996 
1997         case SOL_IPV6:
1998             switch (cmsg->cmsg_type) {
1999             case IPV6_HOPLIMIT:
2000             {
2001                 uint32_t *v = (uint32_t *)data;
2002                 uint32_t *t_int = (uint32_t *)target_data;
2003 
2004                 if (len != sizeof(uint32_t) ||
2005                     tgt_len != sizeof(uint32_t)) {
2006                     goto unimplemented;
2007                 }
2008                 __put_user(*v, t_int);
2009                 break;
2010             }
2011             case IPV6_RECVERR:
2012             {
2013                 struct errhdr6_t {
2014                    struct sock_extended_err ee;
2015                    struct sockaddr_in6 offender;
2016                 };
2017                 struct errhdr6_t *errh = (struct errhdr6_t *)data;
2018                 struct errhdr6_t *target_errh =
2019                     (struct errhdr6_t *)target_data;
2020 
2021                 if (len != sizeof(struct errhdr6_t) ||
2022                     tgt_len != sizeof(struct errhdr6_t)) {
2023                     goto unimplemented;
2024                 }
2025                 __put_user(errh->ee.ee_errno, &target_errh->ee.ee_errno);
2026                 __put_user(errh->ee.ee_origin, &target_errh->ee.ee_origin);
2027                 __put_user(errh->ee.ee_type,  &target_errh->ee.ee_type);
2028                 __put_user(errh->ee.ee_code, &target_errh->ee.ee_code);
2029                 __put_user(errh->ee.ee_pad, &target_errh->ee.ee_pad);
2030                 __put_user(errh->ee.ee_info, &target_errh->ee.ee_info);
2031                 __put_user(errh->ee.ee_data, &target_errh->ee.ee_data);
2032                 host_to_target_sockaddr((unsigned long) &target_errh->offender,
2033                     (void *) &errh->offender, sizeof(errh->offender));
2034                 break;
2035             }
2036             default:
2037                 goto unimplemented;
2038             }
2039             break;
2040 
2041         default:
2042         unimplemented:
2043             qemu_log_mask(LOG_UNIMP, "Unsupported ancillary data: %d/%d\n",
2044                           cmsg->cmsg_level, cmsg->cmsg_type);
2045             memcpy(target_data, data, MIN(len, tgt_len));
2046             if (tgt_len > len) {
2047                 memset(target_data + len, 0, tgt_len - len);
2048             }
2049         }
2050 
2051         target_cmsg->cmsg_len = tswapal(TARGET_CMSG_LEN(tgt_len));
2052         tgt_space = TARGET_CMSG_SPACE(tgt_len);
2053         if (msg_controllen < tgt_space) {
2054             tgt_space = msg_controllen;
2055         }
2056         msg_controllen -= tgt_space;
2057         space += tgt_space;
2058         cmsg = CMSG_NXTHDR(msgh, cmsg);
2059         target_cmsg = TARGET_CMSG_NXTHDR(target_msgh, target_cmsg,
2060                                          target_cmsg_start);
2061     }
2062     unlock_user(target_cmsg, target_cmsg_addr, space);
2063  the_end:
2064     target_msgh->msg_controllen = tswapal(space);
2065     return 0;
2066 }
2067 
2068 /* do_setsockopt() Must return target values and target errnos. */
2069 static abi_long do_setsockopt(int sockfd, int level, int optname,
2070                               abi_ulong optval_addr, socklen_t optlen)
2071 {
2072     abi_long ret;
2073     int val;
2074     struct ip_mreqn *ip_mreq;
2075     struct ip_mreq_source *ip_mreq_source;
2076 
2077     switch(level) {
2078     case SOL_TCP:
2079     case SOL_UDP:
2080         /* TCP and UDP options all take an 'int' value.  */
2081         if (optlen < sizeof(uint32_t))
2082             return -TARGET_EINVAL;
2083 
2084         if (get_user_u32(val, optval_addr))
2085             return -TARGET_EFAULT;
2086         ret = get_errno(setsockopt(sockfd, level, optname, &val, sizeof(val)));
2087         break;
2088     case SOL_IP:
2089         switch(optname) {
2090         case IP_TOS:
2091         case IP_TTL:
2092         case IP_HDRINCL:
2093         case IP_ROUTER_ALERT:
2094         case IP_RECVOPTS:
2095         case IP_RETOPTS:
2096         case IP_PKTINFO:
2097         case IP_MTU_DISCOVER:
2098         case IP_RECVERR:
2099         case IP_RECVTTL:
2100         case IP_RECVTOS:
2101 #ifdef IP_FREEBIND
2102         case IP_FREEBIND:
2103 #endif
2104         case IP_MULTICAST_TTL:
2105         case IP_MULTICAST_LOOP:
2106             val = 0;
2107             if (optlen >= sizeof(uint32_t)) {
2108                 if (get_user_u32(val, optval_addr))
2109                     return -TARGET_EFAULT;
2110             } else if (optlen >= 1) {
2111                 if (get_user_u8(val, optval_addr))
2112                     return -TARGET_EFAULT;
2113             }
2114             ret = get_errno(setsockopt(sockfd, level, optname, &val, sizeof(val)));
2115             break;
2116         case IP_ADD_MEMBERSHIP:
2117         case IP_DROP_MEMBERSHIP:
2118             if (optlen < sizeof (struct target_ip_mreq) ||
2119                 optlen > sizeof (struct target_ip_mreqn))
2120                 return -TARGET_EINVAL;
2121 
2122             ip_mreq = (struct ip_mreqn *) alloca(optlen);
2123             target_to_host_ip_mreq(ip_mreq, optval_addr, optlen);
2124             ret = get_errno(setsockopt(sockfd, level, optname, ip_mreq, optlen));
2125             break;
2126 
2127         case IP_BLOCK_SOURCE:
2128         case IP_UNBLOCK_SOURCE:
2129         case IP_ADD_SOURCE_MEMBERSHIP:
2130         case IP_DROP_SOURCE_MEMBERSHIP:
2131             if (optlen != sizeof (struct target_ip_mreq_source))
2132                 return -TARGET_EINVAL;
2133 
2134             ip_mreq_source = lock_user(VERIFY_READ, optval_addr, optlen, 1);
2135             if (!ip_mreq_source) {
2136                 return -TARGET_EFAULT;
2137             }
2138             ret = get_errno(setsockopt(sockfd, level, optname, ip_mreq_source, optlen));
2139             unlock_user (ip_mreq_source, optval_addr, 0);
2140             break;
2141 
2142         default:
2143             goto unimplemented;
2144         }
2145         break;
2146     case SOL_IPV6:
2147         switch (optname) {
2148         case IPV6_MTU_DISCOVER:
2149         case IPV6_MTU:
2150         case IPV6_V6ONLY:
2151         case IPV6_RECVPKTINFO:
2152         case IPV6_UNICAST_HOPS:
2153         case IPV6_MULTICAST_HOPS:
2154         case IPV6_MULTICAST_LOOP:
2155         case IPV6_RECVERR:
2156         case IPV6_RECVHOPLIMIT:
2157         case IPV6_2292HOPLIMIT:
2158         case IPV6_CHECKSUM:
2159         case IPV6_ADDRFORM:
2160         case IPV6_2292PKTINFO:
2161         case IPV6_RECVTCLASS:
2162         case IPV6_RECVRTHDR:
2163         case IPV6_2292RTHDR:
2164         case IPV6_RECVHOPOPTS:
2165         case IPV6_2292HOPOPTS:
2166         case IPV6_RECVDSTOPTS:
2167         case IPV6_2292DSTOPTS:
2168         case IPV6_TCLASS:
2169         case IPV6_ADDR_PREFERENCES:
2170 #ifdef IPV6_RECVPATHMTU
2171         case IPV6_RECVPATHMTU:
2172 #endif
2173 #ifdef IPV6_TRANSPARENT
2174         case IPV6_TRANSPARENT:
2175 #endif
2176 #ifdef IPV6_FREEBIND
2177         case IPV6_FREEBIND:
2178 #endif
2179 #ifdef IPV6_RECVORIGDSTADDR
2180         case IPV6_RECVORIGDSTADDR:
2181 #endif
2182             val = 0;
2183             if (optlen < sizeof(uint32_t)) {
2184                 return -TARGET_EINVAL;
2185             }
2186             if (get_user_u32(val, optval_addr)) {
2187                 return -TARGET_EFAULT;
2188             }
2189             ret = get_errno(setsockopt(sockfd, level, optname,
2190                                        &val, sizeof(val)));
2191             break;
2192         case IPV6_PKTINFO:
2193         {
2194             struct in6_pktinfo pki;
2195 
2196             if (optlen < sizeof(pki)) {
2197                 return -TARGET_EINVAL;
2198             }
2199 
2200             if (copy_from_user(&pki, optval_addr, sizeof(pki))) {
2201                 return -TARGET_EFAULT;
2202             }
2203 
2204             pki.ipi6_ifindex = tswap32(pki.ipi6_ifindex);
2205 
2206             ret = get_errno(setsockopt(sockfd, level, optname,
2207                                        &pki, sizeof(pki)));
2208             break;
2209         }
2210         case IPV6_ADD_MEMBERSHIP:
2211         case IPV6_DROP_MEMBERSHIP:
2212         {
2213             struct ipv6_mreq ipv6mreq;
2214 
2215             if (optlen < sizeof(ipv6mreq)) {
2216                 return -TARGET_EINVAL;
2217             }
2218 
2219             if (copy_from_user(&ipv6mreq, optval_addr, sizeof(ipv6mreq))) {
2220                 return -TARGET_EFAULT;
2221             }
2222 
2223             ipv6mreq.ipv6mr_interface = tswap32(ipv6mreq.ipv6mr_interface);
2224 
2225             ret = get_errno(setsockopt(sockfd, level, optname,
2226                                        &ipv6mreq, sizeof(ipv6mreq)));
2227             break;
2228         }
2229         default:
2230             goto unimplemented;
2231         }
2232         break;
2233     case SOL_ICMPV6:
2234         switch (optname) {
2235         case ICMPV6_FILTER:
2236         {
2237             struct icmp6_filter icmp6f;
2238 
2239             if (optlen > sizeof(icmp6f)) {
2240                 optlen = sizeof(icmp6f);
2241             }
2242 
2243             if (copy_from_user(&icmp6f, optval_addr, optlen)) {
2244                 return -TARGET_EFAULT;
2245             }
2246 
2247             for (val = 0; val < 8; val++) {
2248                 icmp6f.data[val] = tswap32(icmp6f.data[val]);
2249             }
2250 
2251             ret = get_errno(setsockopt(sockfd, level, optname,
2252                                        &icmp6f, optlen));
2253             break;
2254         }
2255         default:
2256             goto unimplemented;
2257         }
2258         break;
2259     case SOL_RAW:
2260         switch (optname) {
2261         case ICMP_FILTER:
2262         case IPV6_CHECKSUM:
2263             /* those take an u32 value */
2264             if (optlen < sizeof(uint32_t)) {
2265                 return -TARGET_EINVAL;
2266             }
2267 
2268             if (get_user_u32(val, optval_addr)) {
2269                 return -TARGET_EFAULT;
2270             }
2271             ret = get_errno(setsockopt(sockfd, level, optname,
2272                                        &val, sizeof(val)));
2273             break;
2274 
2275         default:
2276             goto unimplemented;
2277         }
2278         break;
2279 #if defined(SOL_ALG) && defined(ALG_SET_KEY) && defined(ALG_SET_AEAD_AUTHSIZE)
2280     case SOL_ALG:
2281         switch (optname) {
2282         case ALG_SET_KEY:
2283         {
2284             char *alg_key = g_malloc(optlen);
2285 
2286             if (!alg_key) {
2287                 return -TARGET_ENOMEM;
2288             }
2289             if (copy_from_user(alg_key, optval_addr, optlen)) {
2290                 g_free(alg_key);
2291                 return -TARGET_EFAULT;
2292             }
2293             ret = get_errno(setsockopt(sockfd, level, optname,
2294                                        alg_key, optlen));
2295             g_free(alg_key);
2296             break;
2297         }
2298         case ALG_SET_AEAD_AUTHSIZE:
2299         {
2300             ret = get_errno(setsockopt(sockfd, level, optname,
2301                                        NULL, optlen));
2302             break;
2303         }
2304         default:
2305             goto unimplemented;
2306         }
2307         break;
2308 #endif
2309     case TARGET_SOL_SOCKET:
2310         switch (optname) {
2311         case TARGET_SO_RCVTIMEO:
2312         {
2313                 struct timeval tv;
2314 
2315                 optname = SO_RCVTIMEO;
2316 
2317 set_timeout:
2318                 if (optlen != sizeof(struct target_timeval)) {
2319                     return -TARGET_EINVAL;
2320                 }
2321 
2322                 if (copy_from_user_timeval(&tv, optval_addr)) {
2323                     return -TARGET_EFAULT;
2324                 }
2325 
2326                 ret = get_errno(setsockopt(sockfd, SOL_SOCKET, optname,
2327                                 &tv, sizeof(tv)));
2328                 return ret;
2329         }
2330         case TARGET_SO_SNDTIMEO:
2331                 optname = SO_SNDTIMEO;
2332                 goto set_timeout;
2333         case TARGET_SO_ATTACH_FILTER:
2334         {
2335                 struct target_sock_fprog *tfprog;
2336                 struct target_sock_filter *tfilter;
2337                 struct sock_fprog fprog;
2338                 struct sock_filter *filter;
2339                 int i;
2340 
2341                 if (optlen != sizeof(*tfprog)) {
2342                     return -TARGET_EINVAL;
2343                 }
2344                 if (!lock_user_struct(VERIFY_READ, tfprog, optval_addr, 0)) {
2345                     return -TARGET_EFAULT;
2346                 }
2347                 if (!lock_user_struct(VERIFY_READ, tfilter,
2348                                       tswapal(tfprog->filter), 0)) {
2349                     unlock_user_struct(tfprog, optval_addr, 1);
2350                     return -TARGET_EFAULT;
2351                 }
2352 
2353                 fprog.len = tswap16(tfprog->len);
2354                 filter = g_try_new(struct sock_filter, fprog.len);
2355                 if (filter == NULL) {
2356                     unlock_user_struct(tfilter, tfprog->filter, 1);
2357                     unlock_user_struct(tfprog, optval_addr, 1);
2358                     return -TARGET_ENOMEM;
2359                 }
2360                 for (i = 0; i < fprog.len; i++) {
2361                     filter[i].code = tswap16(tfilter[i].code);
2362                     filter[i].jt = tfilter[i].jt;
2363                     filter[i].jf = tfilter[i].jf;
2364                     filter[i].k = tswap32(tfilter[i].k);
2365                 }
2366                 fprog.filter = filter;
2367 
2368                 ret = get_errno(setsockopt(sockfd, SOL_SOCKET,
2369                                 SO_ATTACH_FILTER, &fprog, sizeof(fprog)));
2370                 g_free(filter);
2371 
2372                 unlock_user_struct(tfilter, tfprog->filter, 1);
2373                 unlock_user_struct(tfprog, optval_addr, 1);
2374                 return ret;
2375         }
2376 	case TARGET_SO_BINDTODEVICE:
2377 	{
2378 		char *dev_ifname, *addr_ifname;
2379 
2380 		if (optlen > IFNAMSIZ - 1) {
2381 		    optlen = IFNAMSIZ - 1;
2382 		}
2383 		dev_ifname = lock_user(VERIFY_READ, optval_addr, optlen, 1);
2384 		if (!dev_ifname) {
2385 		    return -TARGET_EFAULT;
2386 		}
2387 		optname = SO_BINDTODEVICE;
2388 		addr_ifname = alloca(IFNAMSIZ);
2389 		memcpy(addr_ifname, dev_ifname, optlen);
2390 		addr_ifname[optlen] = 0;
2391 		ret = get_errno(setsockopt(sockfd, SOL_SOCKET, optname,
2392                                            addr_ifname, optlen));
2393 		unlock_user (dev_ifname, optval_addr, 0);
2394 		return ret;
2395 	}
2396         case TARGET_SO_LINGER:
2397         {
2398                 struct linger lg;
2399                 struct target_linger *tlg;
2400 
2401                 if (optlen != sizeof(struct target_linger)) {
2402                     return -TARGET_EINVAL;
2403                 }
2404                 if (!lock_user_struct(VERIFY_READ, tlg, optval_addr, 1)) {
2405                     return -TARGET_EFAULT;
2406                 }
2407                 __get_user(lg.l_onoff, &tlg->l_onoff);
2408                 __get_user(lg.l_linger, &tlg->l_linger);
2409                 ret = get_errno(setsockopt(sockfd, SOL_SOCKET, SO_LINGER,
2410                                 &lg, sizeof(lg)));
2411                 unlock_user_struct(tlg, optval_addr, 0);
2412                 return ret;
2413         }
2414             /* Options with 'int' argument.  */
2415         case TARGET_SO_DEBUG:
2416 		optname = SO_DEBUG;
2417 		break;
2418         case TARGET_SO_REUSEADDR:
2419 		optname = SO_REUSEADDR;
2420 		break;
2421 #ifdef SO_REUSEPORT
2422         case TARGET_SO_REUSEPORT:
2423                 optname = SO_REUSEPORT;
2424                 break;
2425 #endif
2426         case TARGET_SO_TYPE:
2427 		optname = SO_TYPE;
2428 		break;
2429         case TARGET_SO_ERROR:
2430 		optname = SO_ERROR;
2431 		break;
2432         case TARGET_SO_DONTROUTE:
2433 		optname = SO_DONTROUTE;
2434 		break;
2435         case TARGET_SO_BROADCAST:
2436 		optname = SO_BROADCAST;
2437 		break;
2438         case TARGET_SO_SNDBUF:
2439 		optname = SO_SNDBUF;
2440 		break;
2441         case TARGET_SO_SNDBUFFORCE:
2442                 optname = SO_SNDBUFFORCE;
2443                 break;
2444         case TARGET_SO_RCVBUF:
2445 		optname = SO_RCVBUF;
2446 		break;
2447         case TARGET_SO_RCVBUFFORCE:
2448                 optname = SO_RCVBUFFORCE;
2449                 break;
2450         case TARGET_SO_KEEPALIVE:
2451 		optname = SO_KEEPALIVE;
2452 		break;
2453         case TARGET_SO_OOBINLINE:
2454 		optname = SO_OOBINLINE;
2455 		break;
2456         case TARGET_SO_NO_CHECK:
2457 		optname = SO_NO_CHECK;
2458 		break;
2459         case TARGET_SO_PRIORITY:
2460 		optname = SO_PRIORITY;
2461 		break;
2462 #ifdef SO_BSDCOMPAT
2463         case TARGET_SO_BSDCOMPAT:
2464 		optname = SO_BSDCOMPAT;
2465 		break;
2466 #endif
2467         case TARGET_SO_PASSCRED:
2468 		optname = SO_PASSCRED;
2469 		break;
2470         case TARGET_SO_PASSSEC:
2471                 optname = SO_PASSSEC;
2472                 break;
2473         case TARGET_SO_TIMESTAMP:
2474 		optname = SO_TIMESTAMP;
2475 		break;
2476         case TARGET_SO_RCVLOWAT:
2477 		optname = SO_RCVLOWAT;
2478 		break;
2479         default:
2480             goto unimplemented;
2481         }
2482 	if (optlen < sizeof(uint32_t))
2483             return -TARGET_EINVAL;
2484 
2485 	if (get_user_u32(val, optval_addr))
2486             return -TARGET_EFAULT;
2487 	ret = get_errno(setsockopt(sockfd, SOL_SOCKET, optname, &val, sizeof(val)));
2488         break;
2489 #ifdef SOL_NETLINK
2490     case SOL_NETLINK:
2491         switch (optname) {
2492         case NETLINK_PKTINFO:
2493         case NETLINK_ADD_MEMBERSHIP:
2494         case NETLINK_DROP_MEMBERSHIP:
2495         case NETLINK_BROADCAST_ERROR:
2496         case NETLINK_NO_ENOBUFS:
2497 #if LINUX_VERSION_CODE >= KERNEL_VERSION(4, 2, 0)
2498         case NETLINK_LISTEN_ALL_NSID:
2499         case NETLINK_CAP_ACK:
2500 #endif /* LINUX_VERSION_CODE >= KERNEL_VERSION(4, 2, 0) */
2501 #if LINUX_VERSION_CODE >= KERNEL_VERSION(4, 12, 0)
2502         case NETLINK_EXT_ACK:
2503 #endif /* LINUX_VERSION_CODE >= KERNEL_VERSION(4, 12, 0) */
2504 #if LINUX_VERSION_CODE >= KERNEL_VERSION(4, 20, 0)
2505         case NETLINK_GET_STRICT_CHK:
2506 #endif /* LINUX_VERSION_CODE >= KERNEL_VERSION(4, 12, 0) */
2507             break;
2508         default:
2509             goto unimplemented;
2510         }
2511         val = 0;
2512         if (optlen < sizeof(uint32_t)) {
2513             return -TARGET_EINVAL;
2514         }
2515         if (get_user_u32(val, optval_addr)) {
2516             return -TARGET_EFAULT;
2517         }
2518         ret = get_errno(setsockopt(sockfd, SOL_NETLINK, optname, &val,
2519                                    sizeof(val)));
2520         break;
2521 #endif /* SOL_NETLINK */
2522     default:
2523     unimplemented:
2524         qemu_log_mask(LOG_UNIMP, "Unsupported setsockopt level=%d optname=%d\n",
2525                       level, optname);
2526         ret = -TARGET_ENOPROTOOPT;
2527     }
2528     return ret;
2529 }
2530 
2531 /* do_getsockopt() Must return target values and target errnos. */
2532 static abi_long do_getsockopt(int sockfd, int level, int optname,
2533                               abi_ulong optval_addr, abi_ulong optlen)
2534 {
2535     abi_long ret;
2536     int len, val;
2537     socklen_t lv;
2538 
2539     switch(level) {
2540     case TARGET_SOL_SOCKET:
2541         level = SOL_SOCKET;
2542         switch (optname) {
2543         /* These don't just return a single integer */
2544         case TARGET_SO_PEERNAME:
2545             goto unimplemented;
2546         case TARGET_SO_RCVTIMEO: {
2547             struct timeval tv;
2548             socklen_t tvlen;
2549 
2550             optname = SO_RCVTIMEO;
2551 
2552 get_timeout:
2553             if (get_user_u32(len, optlen)) {
2554                 return -TARGET_EFAULT;
2555             }
2556             if (len < 0) {
2557                 return -TARGET_EINVAL;
2558             }
2559 
2560             tvlen = sizeof(tv);
2561             ret = get_errno(getsockopt(sockfd, level, optname,
2562                                        &tv, &tvlen));
2563             if (ret < 0) {
2564                 return ret;
2565             }
2566             if (len > sizeof(struct target_timeval)) {
2567                 len = sizeof(struct target_timeval);
2568             }
2569             if (copy_to_user_timeval(optval_addr, &tv)) {
2570                 return -TARGET_EFAULT;
2571             }
2572             if (put_user_u32(len, optlen)) {
2573                 return -TARGET_EFAULT;
2574             }
2575             break;
2576         }
2577         case TARGET_SO_SNDTIMEO:
2578             optname = SO_SNDTIMEO;
2579             goto get_timeout;
2580         case TARGET_SO_PEERCRED: {
2581             struct ucred cr;
2582             socklen_t crlen;
2583             struct target_ucred *tcr;
2584 
2585             if (get_user_u32(len, optlen)) {
2586                 return -TARGET_EFAULT;
2587             }
2588             if (len < 0) {
2589                 return -TARGET_EINVAL;
2590             }
2591 
2592             crlen = sizeof(cr);
2593             ret = get_errno(getsockopt(sockfd, level, SO_PEERCRED,
2594                                        &cr, &crlen));
2595             if (ret < 0) {
2596                 return ret;
2597             }
2598             if (len > crlen) {
2599                 len = crlen;
2600             }
2601             if (!lock_user_struct(VERIFY_WRITE, tcr, optval_addr, 0)) {
2602                 return -TARGET_EFAULT;
2603             }
2604             __put_user(cr.pid, &tcr->pid);
2605             __put_user(cr.uid, &tcr->uid);
2606             __put_user(cr.gid, &tcr->gid);
2607             unlock_user_struct(tcr, optval_addr, 1);
2608             if (put_user_u32(len, optlen)) {
2609                 return -TARGET_EFAULT;
2610             }
2611             break;
2612         }
2613         case TARGET_SO_PEERSEC: {
2614             char *name;
2615 
2616             if (get_user_u32(len, optlen)) {
2617                 return -TARGET_EFAULT;
2618             }
2619             if (len < 0) {
2620                 return -TARGET_EINVAL;
2621             }
2622             name = lock_user(VERIFY_WRITE, optval_addr, len, 0);
2623             if (!name) {
2624                 return -TARGET_EFAULT;
2625             }
2626             lv = len;
2627             ret = get_errno(getsockopt(sockfd, level, SO_PEERSEC,
2628                                        name, &lv));
2629             if (put_user_u32(lv, optlen)) {
2630                 ret = -TARGET_EFAULT;
2631             }
2632             unlock_user(name, optval_addr, lv);
2633             break;
2634         }
2635         case TARGET_SO_LINGER:
2636         {
2637             struct linger lg;
2638             socklen_t lglen;
2639             struct target_linger *tlg;
2640 
2641             if (get_user_u32(len, optlen)) {
2642                 return -TARGET_EFAULT;
2643             }
2644             if (len < 0) {
2645                 return -TARGET_EINVAL;
2646             }
2647 
2648             lglen = sizeof(lg);
2649             ret = get_errno(getsockopt(sockfd, level, SO_LINGER,
2650                                        &lg, &lglen));
2651             if (ret < 0) {
2652                 return ret;
2653             }
2654             if (len > lglen) {
2655                 len = lglen;
2656             }
2657             if (!lock_user_struct(VERIFY_WRITE, tlg, optval_addr, 0)) {
2658                 return -TARGET_EFAULT;
2659             }
2660             __put_user(lg.l_onoff, &tlg->l_onoff);
2661             __put_user(lg.l_linger, &tlg->l_linger);
2662             unlock_user_struct(tlg, optval_addr, 1);
2663             if (put_user_u32(len, optlen)) {
2664                 return -TARGET_EFAULT;
2665             }
2666             break;
2667         }
2668         /* Options with 'int' argument.  */
2669         case TARGET_SO_DEBUG:
2670             optname = SO_DEBUG;
2671             goto int_case;
2672         case TARGET_SO_REUSEADDR:
2673             optname = SO_REUSEADDR;
2674             goto int_case;
2675 #ifdef SO_REUSEPORT
2676         case TARGET_SO_REUSEPORT:
2677             optname = SO_REUSEPORT;
2678             goto int_case;
2679 #endif
2680         case TARGET_SO_TYPE:
2681             optname = SO_TYPE;
2682             goto int_case;
2683         case TARGET_SO_ERROR:
2684             optname = SO_ERROR;
2685             goto int_case;
2686         case TARGET_SO_DONTROUTE:
2687             optname = SO_DONTROUTE;
2688             goto int_case;
2689         case TARGET_SO_BROADCAST:
2690             optname = SO_BROADCAST;
2691             goto int_case;
2692         case TARGET_SO_SNDBUF:
2693             optname = SO_SNDBUF;
2694             goto int_case;
2695         case TARGET_SO_RCVBUF:
2696             optname = SO_RCVBUF;
2697             goto int_case;
2698         case TARGET_SO_KEEPALIVE:
2699             optname = SO_KEEPALIVE;
2700             goto int_case;
2701         case TARGET_SO_OOBINLINE:
2702             optname = SO_OOBINLINE;
2703             goto int_case;
2704         case TARGET_SO_NO_CHECK:
2705             optname = SO_NO_CHECK;
2706             goto int_case;
2707         case TARGET_SO_PRIORITY:
2708             optname = SO_PRIORITY;
2709             goto int_case;
2710 #ifdef SO_BSDCOMPAT
2711         case TARGET_SO_BSDCOMPAT:
2712             optname = SO_BSDCOMPAT;
2713             goto int_case;
2714 #endif
2715         case TARGET_SO_PASSCRED:
2716             optname = SO_PASSCRED;
2717             goto int_case;
2718         case TARGET_SO_TIMESTAMP:
2719             optname = SO_TIMESTAMP;
2720             goto int_case;
2721         case TARGET_SO_RCVLOWAT:
2722             optname = SO_RCVLOWAT;
2723             goto int_case;
2724         case TARGET_SO_ACCEPTCONN:
2725             optname = SO_ACCEPTCONN;
2726             goto int_case;
2727         case TARGET_SO_PROTOCOL:
2728             optname = SO_PROTOCOL;
2729             goto int_case;
2730         case TARGET_SO_DOMAIN:
2731             optname = SO_DOMAIN;
2732             goto int_case;
2733         default:
2734             goto int_case;
2735         }
2736         break;
2737     case SOL_TCP:
2738     case SOL_UDP:
2739         /* TCP and UDP options all take an 'int' value.  */
2740     int_case:
2741         if (get_user_u32(len, optlen))
2742             return -TARGET_EFAULT;
2743         if (len < 0)
2744             return -TARGET_EINVAL;
2745         lv = sizeof(lv);
2746         ret = get_errno(getsockopt(sockfd, level, optname, &val, &lv));
2747         if (ret < 0)
2748             return ret;
2749         if (optname == SO_TYPE) {
2750             val = host_to_target_sock_type(val);
2751         }
2752         if (len > lv)
2753             len = lv;
2754         if (len == 4) {
2755             if (put_user_u32(val, optval_addr))
2756                 return -TARGET_EFAULT;
2757         } else {
2758             if (put_user_u8(val, optval_addr))
2759                 return -TARGET_EFAULT;
2760         }
2761         if (put_user_u32(len, optlen))
2762             return -TARGET_EFAULT;
2763         break;
2764     case SOL_IP:
2765         switch(optname) {
2766         case IP_TOS:
2767         case IP_TTL:
2768         case IP_HDRINCL:
2769         case IP_ROUTER_ALERT:
2770         case IP_RECVOPTS:
2771         case IP_RETOPTS:
2772         case IP_PKTINFO:
2773         case IP_MTU_DISCOVER:
2774         case IP_RECVERR:
2775         case IP_RECVTOS:
2776 #ifdef IP_FREEBIND
2777         case IP_FREEBIND:
2778 #endif
2779         case IP_MULTICAST_TTL:
2780         case IP_MULTICAST_LOOP:
2781             if (get_user_u32(len, optlen))
2782                 return -TARGET_EFAULT;
2783             if (len < 0)
2784                 return -TARGET_EINVAL;
2785             lv = sizeof(lv);
2786             ret = get_errno(getsockopt(sockfd, level, optname, &val, &lv));
2787             if (ret < 0)
2788                 return ret;
2789             if (len < sizeof(int) && len > 0 && val >= 0 && val < 255) {
2790                 len = 1;
2791                 if (put_user_u32(len, optlen)
2792                     || put_user_u8(val, optval_addr))
2793                     return -TARGET_EFAULT;
2794             } else {
2795                 if (len > sizeof(int))
2796                     len = sizeof(int);
2797                 if (put_user_u32(len, optlen)
2798                     || put_user_u32(val, optval_addr))
2799                     return -TARGET_EFAULT;
2800             }
2801             break;
2802         default:
2803             ret = -TARGET_ENOPROTOOPT;
2804             break;
2805         }
2806         break;
2807     case SOL_IPV6:
2808         switch (optname) {
2809         case IPV6_MTU_DISCOVER:
2810         case IPV6_MTU:
2811         case IPV6_V6ONLY:
2812         case IPV6_RECVPKTINFO:
2813         case IPV6_UNICAST_HOPS:
2814         case IPV6_MULTICAST_HOPS:
2815         case IPV6_MULTICAST_LOOP:
2816         case IPV6_RECVERR:
2817         case IPV6_RECVHOPLIMIT:
2818         case IPV6_2292HOPLIMIT:
2819         case IPV6_CHECKSUM:
2820         case IPV6_ADDRFORM:
2821         case IPV6_2292PKTINFO:
2822         case IPV6_RECVTCLASS:
2823         case IPV6_RECVRTHDR:
2824         case IPV6_2292RTHDR:
2825         case IPV6_RECVHOPOPTS:
2826         case IPV6_2292HOPOPTS:
2827         case IPV6_RECVDSTOPTS:
2828         case IPV6_2292DSTOPTS:
2829         case IPV6_TCLASS:
2830         case IPV6_ADDR_PREFERENCES:
2831 #ifdef IPV6_RECVPATHMTU
2832         case IPV6_RECVPATHMTU:
2833 #endif
2834 #ifdef IPV6_TRANSPARENT
2835         case IPV6_TRANSPARENT:
2836 #endif
2837 #ifdef IPV6_FREEBIND
2838         case IPV6_FREEBIND:
2839 #endif
2840 #ifdef IPV6_RECVORIGDSTADDR
2841         case IPV6_RECVORIGDSTADDR:
2842 #endif
2843             if (get_user_u32(len, optlen))
2844                 return -TARGET_EFAULT;
2845             if (len < 0)
2846                 return -TARGET_EINVAL;
2847             lv = sizeof(lv);
2848             ret = get_errno(getsockopt(sockfd, level, optname, &val, &lv));
2849             if (ret < 0)
2850                 return ret;
2851             if (len < sizeof(int) && len > 0 && val >= 0 && val < 255) {
2852                 len = 1;
2853                 if (put_user_u32(len, optlen)
2854                     || put_user_u8(val, optval_addr))
2855                     return -TARGET_EFAULT;
2856             } else {
2857                 if (len > sizeof(int))
2858                     len = sizeof(int);
2859                 if (put_user_u32(len, optlen)
2860                     || put_user_u32(val, optval_addr))
2861                     return -TARGET_EFAULT;
2862             }
2863             break;
2864         default:
2865             ret = -TARGET_ENOPROTOOPT;
2866             break;
2867         }
2868         break;
2869 #ifdef SOL_NETLINK
2870     case SOL_NETLINK:
2871         switch (optname) {
2872         case NETLINK_PKTINFO:
2873         case NETLINK_BROADCAST_ERROR:
2874         case NETLINK_NO_ENOBUFS:
2875 #if LINUX_VERSION_CODE >= KERNEL_VERSION(4, 2, 0)
2876         case NETLINK_LISTEN_ALL_NSID:
2877         case NETLINK_CAP_ACK:
2878 #endif /* LINUX_VERSION_CODE >= KERNEL_VERSION(4, 2, 0) */
2879 #if LINUX_VERSION_CODE >= KERNEL_VERSION(4, 12, 0)
2880         case NETLINK_EXT_ACK:
2881 #endif /* LINUX_VERSION_CODE >= KERNEL_VERSION(4, 12, 0) */
2882 #if LINUX_VERSION_CODE >= KERNEL_VERSION(4, 20, 0)
2883         case NETLINK_GET_STRICT_CHK:
2884 #endif /* LINUX_VERSION_CODE >= KERNEL_VERSION(4, 12, 0) */
2885             if (get_user_u32(len, optlen)) {
2886                 return -TARGET_EFAULT;
2887             }
2888             if (len != sizeof(val)) {
2889                 return -TARGET_EINVAL;
2890             }
2891             lv = len;
2892             ret = get_errno(getsockopt(sockfd, level, optname, &val, &lv));
2893             if (ret < 0) {
2894                 return ret;
2895             }
2896             if (put_user_u32(lv, optlen)
2897                 || put_user_u32(val, optval_addr)) {
2898                 return -TARGET_EFAULT;
2899             }
2900             break;
2901 #if LINUX_VERSION_CODE >= KERNEL_VERSION(4, 2, 0)
2902         case NETLINK_LIST_MEMBERSHIPS:
2903         {
2904             uint32_t *results;
2905             int i;
2906             if (get_user_u32(len, optlen)) {
2907                 return -TARGET_EFAULT;
2908             }
2909             if (len < 0) {
2910                 return -TARGET_EINVAL;
2911             }
2912             results = lock_user(VERIFY_WRITE, optval_addr, len, 1);
2913             if (!results && len > 0) {
2914                 return -TARGET_EFAULT;
2915             }
2916             lv = len;
2917             ret = get_errno(getsockopt(sockfd, level, optname, results, &lv));
2918             if (ret < 0) {
2919                 unlock_user(results, optval_addr, 0);
2920                 return ret;
2921             }
2922             /* swap host endianess to target endianess. */
2923             for (i = 0; i < (len / sizeof(uint32_t)); i++) {
2924                 results[i] = tswap32(results[i]);
2925             }
2926             if (put_user_u32(lv, optlen)) {
2927                 return -TARGET_EFAULT;
2928             }
2929             unlock_user(results, optval_addr, 0);
2930             break;
2931         }
2932 #endif /* LINUX_VERSION_CODE >= KERNEL_VERSION(4, 2, 0) */
2933         default:
2934             goto unimplemented;
2935         }
2936         break;
2937 #endif /* SOL_NETLINK */
2938     default:
2939     unimplemented:
2940         qemu_log_mask(LOG_UNIMP,
2941                       "getsockopt level=%d optname=%d not yet supported\n",
2942                       level, optname);
2943         ret = -TARGET_EOPNOTSUPP;
2944         break;
2945     }
2946     return ret;
2947 }
2948 
2949 /* Convert target low/high pair representing file offset into the host
2950  * low/high pair. This function doesn't handle offsets bigger than 64 bits
2951  * as the kernel doesn't handle them either.
2952  */
2953 static void target_to_host_low_high(abi_ulong tlow,
2954                                     abi_ulong thigh,
2955                                     unsigned long *hlow,
2956                                     unsigned long *hhigh)
2957 {
2958     uint64_t off = tlow |
2959         ((unsigned long long)thigh << TARGET_LONG_BITS / 2) <<
2960         TARGET_LONG_BITS / 2;
2961 
2962     *hlow = off;
2963     *hhigh = (off >> HOST_LONG_BITS / 2) >> HOST_LONG_BITS / 2;
2964 }
2965 
2966 static struct iovec *lock_iovec(int type, abi_ulong target_addr,
2967                                 abi_ulong count, int copy)
2968 {
2969     struct target_iovec *target_vec;
2970     struct iovec *vec;
2971     abi_ulong total_len, max_len;
2972     int i;
2973     int err = 0;
2974     bool bad_address = false;
2975 
2976     if (count == 0) {
2977         errno = 0;
2978         return NULL;
2979     }
2980     if (count > IOV_MAX) {
2981         errno = EINVAL;
2982         return NULL;
2983     }
2984 
2985     vec = g_try_new0(struct iovec, count);
2986     if (vec == NULL) {
2987         errno = ENOMEM;
2988         return NULL;
2989     }
2990 
2991     target_vec = lock_user(VERIFY_READ, target_addr,
2992                            count * sizeof(struct target_iovec), 1);
2993     if (target_vec == NULL) {
2994         err = EFAULT;
2995         goto fail2;
2996     }
2997 
2998     /* ??? If host page size > target page size, this will result in a
2999        value larger than what we can actually support.  */
3000     max_len = 0x7fffffff & TARGET_PAGE_MASK;
3001     total_len = 0;
3002 
3003     for (i = 0; i < count; i++) {
3004         abi_ulong base = tswapal(target_vec[i].iov_base);
3005         abi_long len = tswapal(target_vec[i].iov_len);
3006 
3007         if (len < 0) {
3008             err = EINVAL;
3009             goto fail;
3010         } else if (len == 0) {
3011             /* Zero length pointer is ignored.  */
3012             vec[i].iov_base = 0;
3013         } else {
3014             vec[i].iov_base = lock_user(type, base, len, copy);
3015             /* If the first buffer pointer is bad, this is a fault.  But
3016              * subsequent bad buffers will result in a partial write; this
3017              * is realized by filling the vector with null pointers and
3018              * zero lengths. */
3019             if (!vec[i].iov_base) {
3020                 if (i == 0) {
3021                     err = EFAULT;
3022                     goto fail;
3023                 } else {
3024                     bad_address = true;
3025                 }
3026             }
3027             if (bad_address) {
3028                 len = 0;
3029             }
3030             if (len > max_len - total_len) {
3031                 len = max_len - total_len;
3032             }
3033         }
3034         vec[i].iov_len = len;
3035         total_len += len;
3036     }
3037 
3038     unlock_user(target_vec, target_addr, 0);
3039     return vec;
3040 
3041  fail:
3042     while (--i >= 0) {
3043         if (tswapal(target_vec[i].iov_len) > 0) {
3044             unlock_user(vec[i].iov_base, tswapal(target_vec[i].iov_base), 0);
3045         }
3046     }
3047     unlock_user(target_vec, target_addr, 0);
3048  fail2:
3049     g_free(vec);
3050     errno = err;
3051     return NULL;
3052 }
3053 
3054 static void unlock_iovec(struct iovec *vec, abi_ulong target_addr,
3055                          abi_ulong count, int copy)
3056 {
3057     struct target_iovec *target_vec;
3058     int i;
3059 
3060     target_vec = lock_user(VERIFY_READ, target_addr,
3061                            count * sizeof(struct target_iovec), 1);
3062     if (target_vec) {
3063         for (i = 0; i < count; i++) {
3064             abi_ulong base = tswapal(target_vec[i].iov_base);
3065             abi_long len = tswapal(target_vec[i].iov_len);
3066             if (len < 0) {
3067                 break;
3068             }
3069             unlock_user(vec[i].iov_base, base, copy ? vec[i].iov_len : 0);
3070         }
3071         unlock_user(target_vec, target_addr, 0);
3072     }
3073 
3074     g_free(vec);
3075 }
3076 
3077 static inline int target_to_host_sock_type(int *type)
3078 {
3079     int host_type = 0;
3080     int target_type = *type;
3081 
3082     switch (target_type & TARGET_SOCK_TYPE_MASK) {
3083     case TARGET_SOCK_DGRAM:
3084         host_type = SOCK_DGRAM;
3085         break;
3086     case TARGET_SOCK_STREAM:
3087         host_type = SOCK_STREAM;
3088         break;
3089     default:
3090         host_type = target_type & TARGET_SOCK_TYPE_MASK;
3091         break;
3092     }
3093     if (target_type & TARGET_SOCK_CLOEXEC) {
3094 #if defined(SOCK_CLOEXEC)
3095         host_type |= SOCK_CLOEXEC;
3096 #else
3097         return -TARGET_EINVAL;
3098 #endif
3099     }
3100     if (target_type & TARGET_SOCK_NONBLOCK) {
3101 #if defined(SOCK_NONBLOCK)
3102         host_type |= SOCK_NONBLOCK;
3103 #elif !defined(O_NONBLOCK)
3104         return -TARGET_EINVAL;
3105 #endif
3106     }
3107     *type = host_type;
3108     return 0;
3109 }
3110 
3111 /* Try to emulate socket type flags after socket creation.  */
3112 static int sock_flags_fixup(int fd, int target_type)
3113 {
3114 #if !defined(SOCK_NONBLOCK) && defined(O_NONBLOCK)
3115     if (target_type & TARGET_SOCK_NONBLOCK) {
3116         int flags = fcntl(fd, F_GETFL);
3117         if (fcntl(fd, F_SETFL, O_NONBLOCK | flags) == -1) {
3118             close(fd);
3119             return -TARGET_EINVAL;
3120         }
3121     }
3122 #endif
3123     return fd;
3124 }
3125 
3126 /* do_socket() Must return target values and target errnos. */
3127 static abi_long do_socket(int domain, int type, int protocol)
3128 {
3129     int target_type = type;
3130     int ret;
3131 
3132     ret = target_to_host_sock_type(&type);
3133     if (ret) {
3134         return ret;
3135     }
3136 
3137     if (domain == PF_NETLINK && !(
3138 #ifdef CONFIG_RTNETLINK
3139          protocol == NETLINK_ROUTE ||
3140 #endif
3141          protocol == NETLINK_KOBJECT_UEVENT ||
3142          protocol == NETLINK_AUDIT)) {
3143         return -TARGET_EPROTONOSUPPORT;
3144     }
3145 
3146     if (domain == AF_PACKET ||
3147         (domain == AF_INET && type == SOCK_PACKET)) {
3148         protocol = tswap16(protocol);
3149     }
3150 
3151     ret = get_errno(socket(domain, type, protocol));
3152     if (ret >= 0) {
3153         ret = sock_flags_fixup(ret, target_type);
3154         if (type == SOCK_PACKET) {
3155             /* Manage an obsolete case :
3156              * if socket type is SOCK_PACKET, bind by name
3157              */
3158             fd_trans_register(ret, &target_packet_trans);
3159         } else if (domain == PF_NETLINK) {
3160             switch (protocol) {
3161 #ifdef CONFIG_RTNETLINK
3162             case NETLINK_ROUTE:
3163                 fd_trans_register(ret, &target_netlink_route_trans);
3164                 break;
3165 #endif
3166             case NETLINK_KOBJECT_UEVENT:
3167                 /* nothing to do: messages are strings */
3168                 break;
3169             case NETLINK_AUDIT:
3170                 fd_trans_register(ret, &target_netlink_audit_trans);
3171                 break;
3172             default:
3173                 g_assert_not_reached();
3174             }
3175         }
3176     }
3177     return ret;
3178 }
3179 
3180 /* do_bind() Must return target values and target errnos. */
3181 static abi_long do_bind(int sockfd, abi_ulong target_addr,
3182                         socklen_t addrlen)
3183 {
3184     void *addr;
3185     abi_long ret;
3186 
3187     if ((int)addrlen < 0) {
3188         return -TARGET_EINVAL;
3189     }
3190 
3191     addr = alloca(addrlen+1);
3192 
3193     ret = target_to_host_sockaddr(sockfd, addr, target_addr, addrlen);
3194     if (ret)
3195         return ret;
3196 
3197     return get_errno(bind(sockfd, addr, addrlen));
3198 }
3199 
3200 /* do_connect() Must return target values and target errnos. */
3201 static abi_long do_connect(int sockfd, abi_ulong target_addr,
3202                            socklen_t addrlen)
3203 {
3204     void *addr;
3205     abi_long ret;
3206 
3207     if ((int)addrlen < 0) {
3208         return -TARGET_EINVAL;
3209     }
3210 
3211     addr = alloca(addrlen+1);
3212 
3213     ret = target_to_host_sockaddr(sockfd, addr, target_addr, addrlen);
3214     if (ret)
3215         return ret;
3216 
3217     return get_errno(safe_connect(sockfd, addr, addrlen));
3218 }
3219 
3220 /* do_sendrecvmsg_locked() Must return target values and target errnos. */
3221 static abi_long do_sendrecvmsg_locked(int fd, struct target_msghdr *msgp,
3222                                       int flags, int send)
3223 {
3224     abi_long ret, len;
3225     struct msghdr msg;
3226     abi_ulong count;
3227     struct iovec *vec;
3228     abi_ulong target_vec;
3229 
3230     if (msgp->msg_name) {
3231         msg.msg_namelen = tswap32(msgp->msg_namelen);
3232         msg.msg_name = alloca(msg.msg_namelen+1);
3233         ret = target_to_host_sockaddr(fd, msg.msg_name,
3234                                       tswapal(msgp->msg_name),
3235                                       msg.msg_namelen);
3236         if (ret == -TARGET_EFAULT) {
3237             /* For connected sockets msg_name and msg_namelen must
3238              * be ignored, so returning EFAULT immediately is wrong.
3239              * Instead, pass a bad msg_name to the host kernel, and
3240              * let it decide whether to return EFAULT or not.
3241              */
3242             msg.msg_name = (void *)-1;
3243         } else if (ret) {
3244             goto out2;
3245         }
3246     } else {
3247         msg.msg_name = NULL;
3248         msg.msg_namelen = 0;
3249     }
3250     msg.msg_controllen = 2 * tswapal(msgp->msg_controllen);
3251     msg.msg_control = alloca(msg.msg_controllen);
3252     memset(msg.msg_control, 0, msg.msg_controllen);
3253 
3254     msg.msg_flags = tswap32(msgp->msg_flags);
3255 
3256     count = tswapal(msgp->msg_iovlen);
3257     target_vec = tswapal(msgp->msg_iov);
3258 
3259     if (count > IOV_MAX) {
3260         /* sendrcvmsg returns a different errno for this condition than
3261          * readv/writev, so we must catch it here before lock_iovec() does.
3262          */
3263         ret = -TARGET_EMSGSIZE;
3264         goto out2;
3265     }
3266 
3267     vec = lock_iovec(send ? VERIFY_READ : VERIFY_WRITE,
3268                      target_vec, count, send);
3269     if (vec == NULL) {
3270         ret = -host_to_target_errno(errno);
3271         goto out2;
3272     }
3273     msg.msg_iovlen = count;
3274     msg.msg_iov = vec;
3275 
3276     if (send) {
3277         if (fd_trans_target_to_host_data(fd)) {
3278             void *host_msg;
3279 
3280             host_msg = g_malloc(msg.msg_iov->iov_len);
3281             memcpy(host_msg, msg.msg_iov->iov_base, msg.msg_iov->iov_len);
3282             ret = fd_trans_target_to_host_data(fd)(host_msg,
3283                                                    msg.msg_iov->iov_len);
3284             if (ret >= 0) {
3285                 msg.msg_iov->iov_base = host_msg;
3286                 ret = get_errno(safe_sendmsg(fd, &msg, flags));
3287             }
3288             g_free(host_msg);
3289         } else {
3290             ret = target_to_host_cmsg(&msg, msgp);
3291             if (ret == 0) {
3292                 ret = get_errno(safe_sendmsg(fd, &msg, flags));
3293             }
3294         }
3295     } else {
3296         ret = get_errno(safe_recvmsg(fd, &msg, flags));
3297         if (!is_error(ret)) {
3298             len = ret;
3299             if (fd_trans_host_to_target_data(fd)) {
3300                 ret = fd_trans_host_to_target_data(fd)(msg.msg_iov->iov_base,
3301                                                MIN(msg.msg_iov->iov_len, len));
3302             } else {
3303                 ret = host_to_target_cmsg(msgp, &msg);
3304             }
3305             if (!is_error(ret)) {
3306                 msgp->msg_namelen = tswap32(msg.msg_namelen);
3307                 msgp->msg_flags = tswap32(msg.msg_flags);
3308                 if (msg.msg_name != NULL && msg.msg_name != (void *)-1) {
3309                     ret = host_to_target_sockaddr(tswapal(msgp->msg_name),
3310                                     msg.msg_name, msg.msg_namelen);
3311                     if (ret) {
3312                         goto out;
3313                     }
3314                 }
3315 
3316                 ret = len;
3317             }
3318         }
3319     }
3320 
3321 out:
3322     unlock_iovec(vec, target_vec, count, !send);
3323 out2:
3324     return ret;
3325 }
3326 
3327 static abi_long do_sendrecvmsg(int fd, abi_ulong target_msg,
3328                                int flags, int send)
3329 {
3330     abi_long ret;
3331     struct target_msghdr *msgp;
3332 
3333     if (!lock_user_struct(send ? VERIFY_READ : VERIFY_WRITE,
3334                           msgp,
3335                           target_msg,
3336                           send ? 1 : 0)) {
3337         return -TARGET_EFAULT;
3338     }
3339     ret = do_sendrecvmsg_locked(fd, msgp, flags, send);
3340     unlock_user_struct(msgp, target_msg, send ? 0 : 1);
3341     return ret;
3342 }
3343 
3344 /* We don't rely on the C library to have sendmmsg/recvmmsg support,
3345  * so it might not have this *mmsg-specific flag either.
3346  */
3347 #ifndef MSG_WAITFORONE
3348 #define MSG_WAITFORONE 0x10000
3349 #endif
3350 
3351 static abi_long do_sendrecvmmsg(int fd, abi_ulong target_msgvec,
3352                                 unsigned int vlen, unsigned int flags,
3353                                 int send)
3354 {
3355     struct target_mmsghdr *mmsgp;
3356     abi_long ret = 0;
3357     int i;
3358 
3359     if (vlen > UIO_MAXIOV) {
3360         vlen = UIO_MAXIOV;
3361     }
3362 
3363     mmsgp = lock_user(VERIFY_WRITE, target_msgvec, sizeof(*mmsgp) * vlen, 1);
3364     if (!mmsgp) {
3365         return -TARGET_EFAULT;
3366     }
3367 
3368     for (i = 0; i < vlen; i++) {
3369         ret = do_sendrecvmsg_locked(fd, &mmsgp[i].msg_hdr, flags, send);
3370         if (is_error(ret)) {
3371             break;
3372         }
3373         mmsgp[i].msg_len = tswap32(ret);
3374         /* MSG_WAITFORONE turns on MSG_DONTWAIT after one packet */
3375         if (flags & MSG_WAITFORONE) {
3376             flags |= MSG_DONTWAIT;
3377         }
3378     }
3379 
3380     unlock_user(mmsgp, target_msgvec, sizeof(*mmsgp) * i);
3381 
3382     /* Return number of datagrams sent if we sent any at all;
3383      * otherwise return the error.
3384      */
3385     if (i) {
3386         return i;
3387     }
3388     return ret;
3389 }
3390 
3391 /* do_accept4() Must return target values and target errnos. */
3392 static abi_long do_accept4(int fd, abi_ulong target_addr,
3393                            abi_ulong target_addrlen_addr, int flags)
3394 {
3395     socklen_t addrlen, ret_addrlen;
3396     void *addr;
3397     abi_long ret;
3398     int host_flags;
3399 
3400     host_flags = target_to_host_bitmask(flags, fcntl_flags_tbl);
3401 
3402     if (target_addr == 0) {
3403         return get_errno(safe_accept4(fd, NULL, NULL, host_flags));
3404     }
3405 
3406     /* linux returns EFAULT if addrlen pointer is invalid */
3407     if (get_user_u32(addrlen, target_addrlen_addr))
3408         return -TARGET_EFAULT;
3409 
3410     if ((int)addrlen < 0) {
3411         return -TARGET_EINVAL;
3412     }
3413 
3414     if (!access_ok(thread_cpu, VERIFY_WRITE, target_addr, addrlen)) {
3415         return -TARGET_EFAULT;
3416     }
3417 
3418     addr = alloca(addrlen);
3419 
3420     ret_addrlen = addrlen;
3421     ret = get_errno(safe_accept4(fd, addr, &ret_addrlen, host_flags));
3422     if (!is_error(ret)) {
3423         host_to_target_sockaddr(target_addr, addr, MIN(addrlen, ret_addrlen));
3424         if (put_user_u32(ret_addrlen, target_addrlen_addr)) {
3425             ret = -TARGET_EFAULT;
3426         }
3427     }
3428     return ret;
3429 }
3430 
3431 /* do_getpeername() Must return target values and target errnos. */
3432 static abi_long do_getpeername(int fd, abi_ulong target_addr,
3433                                abi_ulong target_addrlen_addr)
3434 {
3435     socklen_t addrlen, ret_addrlen;
3436     void *addr;
3437     abi_long ret;
3438 
3439     if (get_user_u32(addrlen, target_addrlen_addr))
3440         return -TARGET_EFAULT;
3441 
3442     if ((int)addrlen < 0) {
3443         return -TARGET_EINVAL;
3444     }
3445 
3446     if (!access_ok(thread_cpu, VERIFY_WRITE, target_addr, addrlen)) {
3447         return -TARGET_EFAULT;
3448     }
3449 
3450     addr = alloca(addrlen);
3451 
3452     ret_addrlen = addrlen;
3453     ret = get_errno(getpeername(fd, addr, &ret_addrlen));
3454     if (!is_error(ret)) {
3455         host_to_target_sockaddr(target_addr, addr, MIN(addrlen, ret_addrlen));
3456         if (put_user_u32(ret_addrlen, target_addrlen_addr)) {
3457             ret = -TARGET_EFAULT;
3458         }
3459     }
3460     return ret;
3461 }
3462 
3463 /* do_getsockname() Must return target values and target errnos. */
3464 static abi_long do_getsockname(int fd, abi_ulong target_addr,
3465                                abi_ulong target_addrlen_addr)
3466 {
3467     socklen_t addrlen, ret_addrlen;
3468     void *addr;
3469     abi_long ret;
3470 
3471     if (get_user_u32(addrlen, target_addrlen_addr))
3472         return -TARGET_EFAULT;
3473 
3474     if ((int)addrlen < 0) {
3475         return -TARGET_EINVAL;
3476     }
3477 
3478     if (!access_ok(thread_cpu, VERIFY_WRITE, target_addr, addrlen)) {
3479         return -TARGET_EFAULT;
3480     }
3481 
3482     addr = alloca(addrlen);
3483 
3484     ret_addrlen = addrlen;
3485     ret = get_errno(getsockname(fd, addr, &ret_addrlen));
3486     if (!is_error(ret)) {
3487         host_to_target_sockaddr(target_addr, addr, MIN(addrlen, ret_addrlen));
3488         if (put_user_u32(ret_addrlen, target_addrlen_addr)) {
3489             ret = -TARGET_EFAULT;
3490         }
3491     }
3492     return ret;
3493 }
3494 
3495 /* do_socketpair() Must return target values and target errnos. */
3496 static abi_long do_socketpair(int domain, int type, int protocol,
3497                               abi_ulong target_tab_addr)
3498 {
3499     int tab[2];
3500     abi_long ret;
3501 
3502     target_to_host_sock_type(&type);
3503 
3504     ret = get_errno(socketpair(domain, type, protocol, tab));
3505     if (!is_error(ret)) {
3506         if (put_user_s32(tab[0], target_tab_addr)
3507             || put_user_s32(tab[1], target_tab_addr + sizeof(tab[0])))
3508             ret = -TARGET_EFAULT;
3509     }
3510     return ret;
3511 }
3512 
3513 /* do_sendto() Must return target values and target errnos. */
3514 static abi_long do_sendto(int fd, abi_ulong msg, size_t len, int flags,
3515                           abi_ulong target_addr, socklen_t addrlen)
3516 {
3517     void *addr;
3518     void *host_msg;
3519     void *copy_msg = NULL;
3520     abi_long ret;
3521 
3522     if ((int)addrlen < 0) {
3523         return -TARGET_EINVAL;
3524     }
3525 
3526     host_msg = lock_user(VERIFY_READ, msg, len, 1);
3527     if (!host_msg)
3528         return -TARGET_EFAULT;
3529     if (fd_trans_target_to_host_data(fd)) {
3530         copy_msg = host_msg;
3531         host_msg = g_malloc(len);
3532         memcpy(host_msg, copy_msg, len);
3533         ret = fd_trans_target_to_host_data(fd)(host_msg, len);
3534         if (ret < 0) {
3535             goto fail;
3536         }
3537     }
3538     if (target_addr) {
3539         addr = alloca(addrlen+1);
3540         ret = target_to_host_sockaddr(fd, addr, target_addr, addrlen);
3541         if (ret) {
3542             goto fail;
3543         }
3544         ret = get_errno(safe_sendto(fd, host_msg, len, flags, addr, addrlen));
3545     } else {
3546         ret = get_errno(safe_sendto(fd, host_msg, len, flags, NULL, 0));
3547     }
3548 fail:
3549     if (copy_msg) {
3550         g_free(host_msg);
3551         host_msg = copy_msg;
3552     }
3553     unlock_user(host_msg, msg, 0);
3554     return ret;
3555 }
3556 
3557 /* do_recvfrom() Must return target values and target errnos. */
3558 static abi_long do_recvfrom(int fd, abi_ulong msg, size_t len, int flags,
3559                             abi_ulong target_addr,
3560                             abi_ulong target_addrlen)
3561 {
3562     socklen_t addrlen, ret_addrlen;
3563     void *addr;
3564     void *host_msg;
3565     abi_long ret;
3566 
3567     if (!msg) {
3568         host_msg = NULL;
3569     } else {
3570         host_msg = lock_user(VERIFY_WRITE, msg, len, 0);
3571         if (!host_msg) {
3572             return -TARGET_EFAULT;
3573         }
3574     }
3575     if (target_addr) {
3576         if (get_user_u32(addrlen, target_addrlen)) {
3577             ret = -TARGET_EFAULT;
3578             goto fail;
3579         }
3580         if ((int)addrlen < 0) {
3581             ret = -TARGET_EINVAL;
3582             goto fail;
3583         }
3584         addr = alloca(addrlen);
3585         ret_addrlen = addrlen;
3586         ret = get_errno(safe_recvfrom(fd, host_msg, len, flags,
3587                                       addr, &ret_addrlen));
3588     } else {
3589         addr = NULL; /* To keep compiler quiet.  */
3590         addrlen = 0; /* To keep compiler quiet.  */
3591         ret = get_errno(safe_recvfrom(fd, host_msg, len, flags, NULL, 0));
3592     }
3593     if (!is_error(ret)) {
3594         if (fd_trans_host_to_target_data(fd)) {
3595             abi_long trans;
3596             trans = fd_trans_host_to_target_data(fd)(host_msg, MIN(ret, len));
3597             if (is_error(trans)) {
3598                 ret = trans;
3599                 goto fail;
3600             }
3601         }
3602         if (target_addr) {
3603             host_to_target_sockaddr(target_addr, addr,
3604                                     MIN(addrlen, ret_addrlen));
3605             if (put_user_u32(ret_addrlen, target_addrlen)) {
3606                 ret = -TARGET_EFAULT;
3607                 goto fail;
3608             }
3609         }
3610         unlock_user(host_msg, msg, len);
3611     } else {
3612 fail:
3613         unlock_user(host_msg, msg, 0);
3614     }
3615     return ret;
3616 }
3617 
3618 #ifdef TARGET_NR_socketcall
3619 /* do_socketcall() must return target values and target errnos. */
3620 static abi_long do_socketcall(int num, abi_ulong vptr)
3621 {
3622     static const unsigned nargs[] = { /* number of arguments per operation */
3623         [TARGET_SYS_SOCKET] = 3,      /* domain, type, protocol */
3624         [TARGET_SYS_BIND] = 3,        /* fd, addr, addrlen */
3625         [TARGET_SYS_CONNECT] = 3,     /* fd, addr, addrlen */
3626         [TARGET_SYS_LISTEN] = 2,      /* fd, backlog */
3627         [TARGET_SYS_ACCEPT] = 3,      /* fd, addr, addrlen */
3628         [TARGET_SYS_GETSOCKNAME] = 3, /* fd, addr, addrlen */
3629         [TARGET_SYS_GETPEERNAME] = 3, /* fd, addr, addrlen */
3630         [TARGET_SYS_SOCKETPAIR] = 4,  /* domain, type, protocol, tab */
3631         [TARGET_SYS_SEND] = 4,        /* fd, msg, len, flags */
3632         [TARGET_SYS_RECV] = 4,        /* fd, msg, len, flags */
3633         [TARGET_SYS_SENDTO] = 6,      /* fd, msg, len, flags, addr, addrlen */
3634         [TARGET_SYS_RECVFROM] = 6,    /* fd, msg, len, flags, addr, addrlen */
3635         [TARGET_SYS_SHUTDOWN] = 2,    /* fd, how */
3636         [TARGET_SYS_SETSOCKOPT] = 5,  /* fd, level, optname, optval, optlen */
3637         [TARGET_SYS_GETSOCKOPT] = 5,  /* fd, level, optname, optval, optlen */
3638         [TARGET_SYS_SENDMSG] = 3,     /* fd, msg, flags */
3639         [TARGET_SYS_RECVMSG] = 3,     /* fd, msg, flags */
3640         [TARGET_SYS_ACCEPT4] = 4,     /* fd, addr, addrlen, flags */
3641         [TARGET_SYS_RECVMMSG] = 4,    /* fd, msgvec, vlen, flags */
3642         [TARGET_SYS_SENDMMSG] = 4,    /* fd, msgvec, vlen, flags */
3643     };
3644     abi_long a[6]; /* max 6 args */
3645     unsigned i;
3646 
3647     /* check the range of the first argument num */
3648     /* (TARGET_SYS_SENDMMSG is the highest among TARGET_SYS_xxx) */
3649     if (num < 1 || num > TARGET_SYS_SENDMMSG) {
3650         return -TARGET_EINVAL;
3651     }
3652     /* ensure we have space for args */
3653     if (nargs[num] > ARRAY_SIZE(a)) {
3654         return -TARGET_EINVAL;
3655     }
3656     /* collect the arguments in a[] according to nargs[] */
3657     for (i = 0; i < nargs[num]; ++i) {
3658         if (get_user_ual(a[i], vptr + i * sizeof(abi_long)) != 0) {
3659             return -TARGET_EFAULT;
3660         }
3661     }
3662     /* now when we have the args, invoke the appropriate underlying function */
3663     switch (num) {
3664     case TARGET_SYS_SOCKET: /* domain, type, protocol */
3665         return do_socket(a[0], a[1], a[2]);
3666     case TARGET_SYS_BIND: /* sockfd, addr, addrlen */
3667         return do_bind(a[0], a[1], a[2]);
3668     case TARGET_SYS_CONNECT: /* sockfd, addr, addrlen */
3669         return do_connect(a[0], a[1], a[2]);
3670     case TARGET_SYS_LISTEN: /* sockfd, backlog */
3671         return get_errno(listen(a[0], a[1]));
3672     case TARGET_SYS_ACCEPT: /* sockfd, addr, addrlen */
3673         return do_accept4(a[0], a[1], a[2], 0);
3674     case TARGET_SYS_GETSOCKNAME: /* sockfd, addr, addrlen */
3675         return do_getsockname(a[0], a[1], a[2]);
3676     case TARGET_SYS_GETPEERNAME: /* sockfd, addr, addrlen */
3677         return do_getpeername(a[0], a[1], a[2]);
3678     case TARGET_SYS_SOCKETPAIR: /* domain, type, protocol, tab */
3679         return do_socketpair(a[0], a[1], a[2], a[3]);
3680     case TARGET_SYS_SEND: /* sockfd, msg, len, flags */
3681         return do_sendto(a[0], a[1], a[2], a[3], 0, 0);
3682     case TARGET_SYS_RECV: /* sockfd, msg, len, flags */
3683         return do_recvfrom(a[0], a[1], a[2], a[3], 0, 0);
3684     case TARGET_SYS_SENDTO: /* sockfd, msg, len, flags, addr, addrlen */
3685         return do_sendto(a[0], a[1], a[2], a[3], a[4], a[5]);
3686     case TARGET_SYS_RECVFROM: /* sockfd, msg, len, flags, addr, addrlen */
3687         return do_recvfrom(a[0], a[1], a[2], a[3], a[4], a[5]);
3688     case TARGET_SYS_SHUTDOWN: /* sockfd, how */
3689         return get_errno(shutdown(a[0], a[1]));
3690     case TARGET_SYS_SETSOCKOPT: /* sockfd, level, optname, optval, optlen */
3691         return do_setsockopt(a[0], a[1], a[2], a[3], a[4]);
3692     case TARGET_SYS_GETSOCKOPT: /* sockfd, level, optname, optval, optlen */
3693         return do_getsockopt(a[0], a[1], a[2], a[3], a[4]);
3694     case TARGET_SYS_SENDMSG: /* sockfd, msg, flags */
3695         return do_sendrecvmsg(a[0], a[1], a[2], 1);
3696     case TARGET_SYS_RECVMSG: /* sockfd, msg, flags */
3697         return do_sendrecvmsg(a[0], a[1], a[2], 0);
3698     case TARGET_SYS_ACCEPT4: /* sockfd, addr, addrlen, flags */
3699         return do_accept4(a[0], a[1], a[2], a[3]);
3700     case TARGET_SYS_RECVMMSG: /* sockfd, msgvec, vlen, flags */
3701         return do_sendrecvmmsg(a[0], a[1], a[2], a[3], 0);
3702     case TARGET_SYS_SENDMMSG: /* sockfd, msgvec, vlen, flags */
3703         return do_sendrecvmmsg(a[0], a[1], a[2], a[3], 1);
3704     default:
3705         qemu_log_mask(LOG_UNIMP, "Unsupported socketcall: %d\n", num);
3706         return -TARGET_EINVAL;
3707     }
3708 }
3709 #endif
3710 
3711 #define N_SHM_REGIONS	32
3712 
3713 static struct shm_region {
3714     abi_ulong start;
3715     abi_ulong size;
3716     bool in_use;
3717 } shm_regions[N_SHM_REGIONS];
3718 
3719 #ifndef TARGET_SEMID64_DS
3720 /* asm-generic version of this struct */
3721 struct target_semid64_ds
3722 {
3723   struct target_ipc_perm sem_perm;
3724   abi_ulong sem_otime;
3725 #if TARGET_ABI_BITS == 32
3726   abi_ulong __unused1;
3727 #endif
3728   abi_ulong sem_ctime;
3729 #if TARGET_ABI_BITS == 32
3730   abi_ulong __unused2;
3731 #endif
3732   abi_ulong sem_nsems;
3733   abi_ulong __unused3;
3734   abi_ulong __unused4;
3735 };
3736 #endif
3737 
3738 static inline abi_long target_to_host_ipc_perm(struct ipc_perm *host_ip,
3739                                                abi_ulong target_addr)
3740 {
3741     struct target_ipc_perm *target_ip;
3742     struct target_semid64_ds *target_sd;
3743 
3744     if (!lock_user_struct(VERIFY_READ, target_sd, target_addr, 1))
3745         return -TARGET_EFAULT;
3746     target_ip = &(target_sd->sem_perm);
3747     host_ip->__key = tswap32(target_ip->__key);
3748     host_ip->uid = tswap32(target_ip->uid);
3749     host_ip->gid = tswap32(target_ip->gid);
3750     host_ip->cuid = tswap32(target_ip->cuid);
3751     host_ip->cgid = tswap32(target_ip->cgid);
3752 #if defined(TARGET_ALPHA) || defined(TARGET_MIPS) || defined(TARGET_PPC)
3753     host_ip->mode = tswap32(target_ip->mode);
3754 #else
3755     host_ip->mode = tswap16(target_ip->mode);
3756 #endif
3757 #if defined(TARGET_PPC)
3758     host_ip->__seq = tswap32(target_ip->__seq);
3759 #else
3760     host_ip->__seq = tswap16(target_ip->__seq);
3761 #endif
3762     unlock_user_struct(target_sd, target_addr, 0);
3763     return 0;
3764 }
3765 
3766 static inline abi_long host_to_target_ipc_perm(abi_ulong target_addr,
3767                                                struct ipc_perm *host_ip)
3768 {
3769     struct target_ipc_perm *target_ip;
3770     struct target_semid64_ds *target_sd;
3771 
3772     if (!lock_user_struct(VERIFY_WRITE, target_sd, target_addr, 0))
3773         return -TARGET_EFAULT;
3774     target_ip = &(target_sd->sem_perm);
3775     target_ip->__key = tswap32(host_ip->__key);
3776     target_ip->uid = tswap32(host_ip->uid);
3777     target_ip->gid = tswap32(host_ip->gid);
3778     target_ip->cuid = tswap32(host_ip->cuid);
3779     target_ip->cgid = tswap32(host_ip->cgid);
3780 #if defined(TARGET_ALPHA) || defined(TARGET_MIPS) || defined(TARGET_PPC)
3781     target_ip->mode = tswap32(host_ip->mode);
3782 #else
3783     target_ip->mode = tswap16(host_ip->mode);
3784 #endif
3785 #if defined(TARGET_PPC)
3786     target_ip->__seq = tswap32(host_ip->__seq);
3787 #else
3788     target_ip->__seq = tswap16(host_ip->__seq);
3789 #endif
3790     unlock_user_struct(target_sd, target_addr, 1);
3791     return 0;
3792 }
3793 
3794 static inline abi_long target_to_host_semid_ds(struct semid_ds *host_sd,
3795                                                abi_ulong target_addr)
3796 {
3797     struct target_semid64_ds *target_sd;
3798 
3799     if (!lock_user_struct(VERIFY_READ, target_sd, target_addr, 1))
3800         return -TARGET_EFAULT;
3801     if (target_to_host_ipc_perm(&(host_sd->sem_perm),target_addr))
3802         return -TARGET_EFAULT;
3803     host_sd->sem_nsems = tswapal(target_sd->sem_nsems);
3804     host_sd->sem_otime = tswapal(target_sd->sem_otime);
3805     host_sd->sem_ctime = tswapal(target_sd->sem_ctime);
3806     unlock_user_struct(target_sd, target_addr, 0);
3807     return 0;
3808 }
3809 
3810 static inline abi_long host_to_target_semid_ds(abi_ulong target_addr,
3811                                                struct semid_ds *host_sd)
3812 {
3813     struct target_semid64_ds *target_sd;
3814 
3815     if (!lock_user_struct(VERIFY_WRITE, target_sd, target_addr, 0))
3816         return -TARGET_EFAULT;
3817     if (host_to_target_ipc_perm(target_addr,&(host_sd->sem_perm)))
3818         return -TARGET_EFAULT;
3819     target_sd->sem_nsems = tswapal(host_sd->sem_nsems);
3820     target_sd->sem_otime = tswapal(host_sd->sem_otime);
3821     target_sd->sem_ctime = tswapal(host_sd->sem_ctime);
3822     unlock_user_struct(target_sd, target_addr, 1);
3823     return 0;
3824 }
3825 
3826 struct target_seminfo {
3827     int semmap;
3828     int semmni;
3829     int semmns;
3830     int semmnu;
3831     int semmsl;
3832     int semopm;
3833     int semume;
3834     int semusz;
3835     int semvmx;
3836     int semaem;
3837 };
3838 
3839 static inline abi_long host_to_target_seminfo(abi_ulong target_addr,
3840                                               struct seminfo *host_seminfo)
3841 {
3842     struct target_seminfo *target_seminfo;
3843     if (!lock_user_struct(VERIFY_WRITE, target_seminfo, target_addr, 0))
3844         return -TARGET_EFAULT;
3845     __put_user(host_seminfo->semmap, &target_seminfo->semmap);
3846     __put_user(host_seminfo->semmni, &target_seminfo->semmni);
3847     __put_user(host_seminfo->semmns, &target_seminfo->semmns);
3848     __put_user(host_seminfo->semmnu, &target_seminfo->semmnu);
3849     __put_user(host_seminfo->semmsl, &target_seminfo->semmsl);
3850     __put_user(host_seminfo->semopm, &target_seminfo->semopm);
3851     __put_user(host_seminfo->semume, &target_seminfo->semume);
3852     __put_user(host_seminfo->semusz, &target_seminfo->semusz);
3853     __put_user(host_seminfo->semvmx, &target_seminfo->semvmx);
3854     __put_user(host_seminfo->semaem, &target_seminfo->semaem);
3855     unlock_user_struct(target_seminfo, target_addr, 1);
3856     return 0;
3857 }
3858 
3859 union semun {
3860 	int val;
3861 	struct semid_ds *buf;
3862 	unsigned short *array;
3863 	struct seminfo *__buf;
3864 };
3865 
3866 union target_semun {
3867 	int val;
3868 	abi_ulong buf;
3869 	abi_ulong array;
3870 	abi_ulong __buf;
3871 };
3872 
3873 static inline abi_long target_to_host_semarray(int semid, unsigned short **host_array,
3874                                                abi_ulong target_addr)
3875 {
3876     int nsems;
3877     unsigned short *array;
3878     union semun semun;
3879     struct semid_ds semid_ds;
3880     int i, ret;
3881 
3882     semun.buf = &semid_ds;
3883 
3884     ret = semctl(semid, 0, IPC_STAT, semun);
3885     if (ret == -1)
3886         return get_errno(ret);
3887 
3888     nsems = semid_ds.sem_nsems;
3889 
3890     *host_array = g_try_new(unsigned short, nsems);
3891     if (!*host_array) {
3892         return -TARGET_ENOMEM;
3893     }
3894     array = lock_user(VERIFY_READ, target_addr,
3895                       nsems*sizeof(unsigned short), 1);
3896     if (!array) {
3897         g_free(*host_array);
3898         return -TARGET_EFAULT;
3899     }
3900 
3901     for(i=0; i<nsems; i++) {
3902         __get_user((*host_array)[i], &array[i]);
3903     }
3904     unlock_user(array, target_addr, 0);
3905 
3906     return 0;
3907 }
3908 
3909 static inline abi_long host_to_target_semarray(int semid, abi_ulong target_addr,
3910                                                unsigned short **host_array)
3911 {
3912     int nsems;
3913     unsigned short *array;
3914     union semun semun;
3915     struct semid_ds semid_ds;
3916     int i, ret;
3917 
3918     semun.buf = &semid_ds;
3919 
3920     ret = semctl(semid, 0, IPC_STAT, semun);
3921     if (ret == -1)
3922         return get_errno(ret);
3923 
3924     nsems = semid_ds.sem_nsems;
3925 
3926     array = lock_user(VERIFY_WRITE, target_addr,
3927                       nsems*sizeof(unsigned short), 0);
3928     if (!array)
3929         return -TARGET_EFAULT;
3930 
3931     for(i=0; i<nsems; i++) {
3932         __put_user((*host_array)[i], &array[i]);
3933     }
3934     g_free(*host_array);
3935     unlock_user(array, target_addr, 1);
3936 
3937     return 0;
3938 }
3939 
3940 static inline abi_long do_semctl(int semid, int semnum, int cmd,
3941                                  abi_ulong target_arg)
3942 {
3943     union target_semun target_su = { .buf = target_arg };
3944     union semun arg;
3945     struct semid_ds dsarg;
3946     unsigned short *array = NULL;
3947     struct seminfo seminfo;
3948     abi_long ret = -TARGET_EINVAL;
3949     abi_long err;
3950     cmd &= 0xff;
3951 
3952     switch( cmd ) {
3953 	case GETVAL:
3954 	case SETVAL:
3955             /* In 64 bit cross-endian situations, we will erroneously pick up
3956              * the wrong half of the union for the "val" element.  To rectify
3957              * this, the entire 8-byte structure is byteswapped, followed by
3958 	     * a swap of the 4 byte val field. In other cases, the data is
3959 	     * already in proper host byte order. */
3960 	    if (sizeof(target_su.val) != (sizeof(target_su.buf))) {
3961 		target_su.buf = tswapal(target_su.buf);
3962 		arg.val = tswap32(target_su.val);
3963 	    } else {
3964 		arg.val = target_su.val;
3965 	    }
3966             ret = get_errno(semctl(semid, semnum, cmd, arg));
3967             break;
3968 	case GETALL:
3969 	case SETALL:
3970             err = target_to_host_semarray(semid, &array, target_su.array);
3971             if (err)
3972                 return err;
3973             arg.array = array;
3974             ret = get_errno(semctl(semid, semnum, cmd, arg));
3975             err = host_to_target_semarray(semid, target_su.array, &array);
3976             if (err)
3977                 return err;
3978             break;
3979 	case IPC_STAT:
3980 	case IPC_SET:
3981 	case SEM_STAT:
3982             err = target_to_host_semid_ds(&dsarg, target_su.buf);
3983             if (err)
3984                 return err;
3985             arg.buf = &dsarg;
3986             ret = get_errno(semctl(semid, semnum, cmd, arg));
3987             err = host_to_target_semid_ds(target_su.buf, &dsarg);
3988             if (err)
3989                 return err;
3990             break;
3991 	case IPC_INFO:
3992 	case SEM_INFO:
3993             arg.__buf = &seminfo;
3994             ret = get_errno(semctl(semid, semnum, cmd, arg));
3995             err = host_to_target_seminfo(target_su.__buf, &seminfo);
3996             if (err)
3997                 return err;
3998             break;
3999 	case IPC_RMID:
4000 	case GETPID:
4001 	case GETNCNT:
4002 	case GETZCNT:
4003             ret = get_errno(semctl(semid, semnum, cmd, NULL));
4004             break;
4005     }
4006 
4007     return ret;
4008 }
4009 
4010 struct target_sembuf {
4011     unsigned short sem_num;
4012     short sem_op;
4013     short sem_flg;
4014 };
4015 
4016 static inline abi_long target_to_host_sembuf(struct sembuf *host_sembuf,
4017                                              abi_ulong target_addr,
4018                                              unsigned nsops)
4019 {
4020     struct target_sembuf *target_sembuf;
4021     int i;
4022 
4023     target_sembuf = lock_user(VERIFY_READ, target_addr,
4024                               nsops*sizeof(struct target_sembuf), 1);
4025     if (!target_sembuf)
4026         return -TARGET_EFAULT;
4027 
4028     for(i=0; i<nsops; i++) {
4029         __get_user(host_sembuf[i].sem_num, &target_sembuf[i].sem_num);
4030         __get_user(host_sembuf[i].sem_op, &target_sembuf[i].sem_op);
4031         __get_user(host_sembuf[i].sem_flg, &target_sembuf[i].sem_flg);
4032     }
4033 
4034     unlock_user(target_sembuf, target_addr, 0);
4035 
4036     return 0;
4037 }
4038 
4039 #if defined(TARGET_NR_ipc) || defined(TARGET_NR_semop) || \
4040     defined(TARGET_NR_semtimedop) || defined(TARGET_NR_semtimedop_time64)
4041 
4042 /*
4043  * This macro is required to handle the s390 variants, which passes the
4044  * arguments in a different order than default.
4045  */
4046 #ifdef __s390x__
4047 #define SEMTIMEDOP_IPC_ARGS(__nsops, __sops, __timeout) \
4048   (__nsops), (__timeout), (__sops)
4049 #else
4050 #define SEMTIMEDOP_IPC_ARGS(__nsops, __sops, __timeout) \
4051   (__nsops), 0, (__sops), (__timeout)
4052 #endif
4053 
4054 static inline abi_long do_semtimedop(int semid,
4055                                      abi_long ptr,
4056                                      unsigned nsops,
4057                                      abi_long timeout, bool time64)
4058 {
4059     struct sembuf *sops;
4060     struct timespec ts, *pts = NULL;
4061     abi_long ret;
4062 
4063     if (timeout) {
4064         pts = &ts;
4065         if (time64) {
4066             if (target_to_host_timespec64(pts, timeout)) {
4067                 return -TARGET_EFAULT;
4068             }
4069         } else {
4070             if (target_to_host_timespec(pts, timeout)) {
4071                 return -TARGET_EFAULT;
4072             }
4073         }
4074     }
4075 
4076     if (nsops > TARGET_SEMOPM) {
4077         return -TARGET_E2BIG;
4078     }
4079 
4080     sops = g_new(struct sembuf, nsops);
4081 
4082     if (target_to_host_sembuf(sops, ptr, nsops)) {
4083         g_free(sops);
4084         return -TARGET_EFAULT;
4085     }
4086 
4087     ret = -TARGET_ENOSYS;
4088 #ifdef __NR_semtimedop
4089     ret = get_errno(safe_semtimedop(semid, sops, nsops, pts));
4090 #endif
4091 #ifdef __NR_ipc
4092     if (ret == -TARGET_ENOSYS) {
4093         ret = get_errno(safe_ipc(IPCOP_semtimedop, semid,
4094                                  SEMTIMEDOP_IPC_ARGS(nsops, sops, (long)pts)));
4095     }
4096 #endif
4097     g_free(sops);
4098     return ret;
4099 }
4100 #endif
4101 
4102 struct target_msqid_ds
4103 {
4104     struct target_ipc_perm msg_perm;
4105     abi_ulong msg_stime;
4106 #if TARGET_ABI_BITS == 32
4107     abi_ulong __unused1;
4108 #endif
4109     abi_ulong msg_rtime;
4110 #if TARGET_ABI_BITS == 32
4111     abi_ulong __unused2;
4112 #endif
4113     abi_ulong msg_ctime;
4114 #if TARGET_ABI_BITS == 32
4115     abi_ulong __unused3;
4116 #endif
4117     abi_ulong __msg_cbytes;
4118     abi_ulong msg_qnum;
4119     abi_ulong msg_qbytes;
4120     abi_ulong msg_lspid;
4121     abi_ulong msg_lrpid;
4122     abi_ulong __unused4;
4123     abi_ulong __unused5;
4124 };
4125 
4126 static inline abi_long target_to_host_msqid_ds(struct msqid_ds *host_md,
4127                                                abi_ulong target_addr)
4128 {
4129     struct target_msqid_ds *target_md;
4130 
4131     if (!lock_user_struct(VERIFY_READ, target_md, target_addr, 1))
4132         return -TARGET_EFAULT;
4133     if (target_to_host_ipc_perm(&(host_md->msg_perm),target_addr))
4134         return -TARGET_EFAULT;
4135     host_md->msg_stime = tswapal(target_md->msg_stime);
4136     host_md->msg_rtime = tswapal(target_md->msg_rtime);
4137     host_md->msg_ctime = tswapal(target_md->msg_ctime);
4138     host_md->__msg_cbytes = tswapal(target_md->__msg_cbytes);
4139     host_md->msg_qnum = tswapal(target_md->msg_qnum);
4140     host_md->msg_qbytes = tswapal(target_md->msg_qbytes);
4141     host_md->msg_lspid = tswapal(target_md->msg_lspid);
4142     host_md->msg_lrpid = tswapal(target_md->msg_lrpid);
4143     unlock_user_struct(target_md, target_addr, 0);
4144     return 0;
4145 }
4146 
4147 static inline abi_long host_to_target_msqid_ds(abi_ulong target_addr,
4148                                                struct msqid_ds *host_md)
4149 {
4150     struct target_msqid_ds *target_md;
4151 
4152     if (!lock_user_struct(VERIFY_WRITE, target_md, target_addr, 0))
4153         return -TARGET_EFAULT;
4154     if (host_to_target_ipc_perm(target_addr,&(host_md->msg_perm)))
4155         return -TARGET_EFAULT;
4156     target_md->msg_stime = tswapal(host_md->msg_stime);
4157     target_md->msg_rtime = tswapal(host_md->msg_rtime);
4158     target_md->msg_ctime = tswapal(host_md->msg_ctime);
4159     target_md->__msg_cbytes = tswapal(host_md->__msg_cbytes);
4160     target_md->msg_qnum = tswapal(host_md->msg_qnum);
4161     target_md->msg_qbytes = tswapal(host_md->msg_qbytes);
4162     target_md->msg_lspid = tswapal(host_md->msg_lspid);
4163     target_md->msg_lrpid = tswapal(host_md->msg_lrpid);
4164     unlock_user_struct(target_md, target_addr, 1);
4165     return 0;
4166 }
4167 
4168 struct target_msginfo {
4169     int msgpool;
4170     int msgmap;
4171     int msgmax;
4172     int msgmnb;
4173     int msgmni;
4174     int msgssz;
4175     int msgtql;
4176     unsigned short int msgseg;
4177 };
4178 
4179 static inline abi_long host_to_target_msginfo(abi_ulong target_addr,
4180                                               struct msginfo *host_msginfo)
4181 {
4182     struct target_msginfo *target_msginfo;
4183     if (!lock_user_struct(VERIFY_WRITE, target_msginfo, target_addr, 0))
4184         return -TARGET_EFAULT;
4185     __put_user(host_msginfo->msgpool, &target_msginfo->msgpool);
4186     __put_user(host_msginfo->msgmap, &target_msginfo->msgmap);
4187     __put_user(host_msginfo->msgmax, &target_msginfo->msgmax);
4188     __put_user(host_msginfo->msgmnb, &target_msginfo->msgmnb);
4189     __put_user(host_msginfo->msgmni, &target_msginfo->msgmni);
4190     __put_user(host_msginfo->msgssz, &target_msginfo->msgssz);
4191     __put_user(host_msginfo->msgtql, &target_msginfo->msgtql);
4192     __put_user(host_msginfo->msgseg, &target_msginfo->msgseg);
4193     unlock_user_struct(target_msginfo, target_addr, 1);
4194     return 0;
4195 }
4196 
4197 static inline abi_long do_msgctl(int msgid, int cmd, abi_long ptr)
4198 {
4199     struct msqid_ds dsarg;
4200     struct msginfo msginfo;
4201     abi_long ret = -TARGET_EINVAL;
4202 
4203     cmd &= 0xff;
4204 
4205     switch (cmd) {
4206     case IPC_STAT:
4207     case IPC_SET:
4208     case MSG_STAT:
4209         if (target_to_host_msqid_ds(&dsarg,ptr))
4210             return -TARGET_EFAULT;
4211         ret = get_errno(msgctl(msgid, cmd, &dsarg));
4212         if (host_to_target_msqid_ds(ptr,&dsarg))
4213             return -TARGET_EFAULT;
4214         break;
4215     case IPC_RMID:
4216         ret = get_errno(msgctl(msgid, cmd, NULL));
4217         break;
4218     case IPC_INFO:
4219     case MSG_INFO:
4220         ret = get_errno(msgctl(msgid, cmd, (struct msqid_ds *)&msginfo));
4221         if (host_to_target_msginfo(ptr, &msginfo))
4222             return -TARGET_EFAULT;
4223         break;
4224     }
4225 
4226     return ret;
4227 }
4228 
4229 struct target_msgbuf {
4230     abi_long mtype;
4231     char	mtext[1];
4232 };
4233 
4234 static inline abi_long do_msgsnd(int msqid, abi_long msgp,
4235                                  ssize_t msgsz, int msgflg)
4236 {
4237     struct target_msgbuf *target_mb;
4238     struct msgbuf *host_mb;
4239     abi_long ret = 0;
4240 
4241     if (msgsz < 0) {
4242         return -TARGET_EINVAL;
4243     }
4244 
4245     if (!lock_user_struct(VERIFY_READ, target_mb, msgp, 0))
4246         return -TARGET_EFAULT;
4247     host_mb = g_try_malloc(msgsz + sizeof(long));
4248     if (!host_mb) {
4249         unlock_user_struct(target_mb, msgp, 0);
4250         return -TARGET_ENOMEM;
4251     }
4252     host_mb->mtype = (abi_long) tswapal(target_mb->mtype);
4253     memcpy(host_mb->mtext, target_mb->mtext, msgsz);
4254     ret = -TARGET_ENOSYS;
4255 #ifdef __NR_msgsnd
4256     ret = get_errno(safe_msgsnd(msqid, host_mb, msgsz, msgflg));
4257 #endif
4258 #ifdef __NR_ipc
4259     if (ret == -TARGET_ENOSYS) {
4260 #ifdef __s390x__
4261         ret = get_errno(safe_ipc(IPCOP_msgsnd, msqid, msgsz, msgflg,
4262                                  host_mb));
4263 #else
4264         ret = get_errno(safe_ipc(IPCOP_msgsnd, msqid, msgsz, msgflg,
4265                                  host_mb, 0));
4266 #endif
4267     }
4268 #endif
4269     g_free(host_mb);
4270     unlock_user_struct(target_mb, msgp, 0);
4271 
4272     return ret;
4273 }
4274 
4275 #ifdef __NR_ipc
4276 #if defined(__sparc__)
4277 /* SPARC for msgrcv it does not use the kludge on final 2 arguments.  */
4278 #define MSGRCV_ARGS(__msgp, __msgtyp) __msgp, __msgtyp
4279 #elif defined(__s390x__)
4280 /* The s390 sys_ipc variant has only five parameters.  */
4281 #define MSGRCV_ARGS(__msgp, __msgtyp) \
4282     ((long int[]){(long int)__msgp, __msgtyp})
4283 #else
4284 #define MSGRCV_ARGS(__msgp, __msgtyp) \
4285     ((long int[]){(long int)__msgp, __msgtyp}), 0
4286 #endif
4287 #endif
4288 
4289 static inline abi_long do_msgrcv(int msqid, abi_long msgp,
4290                                  ssize_t msgsz, abi_long msgtyp,
4291                                  int msgflg)
4292 {
4293     struct target_msgbuf *target_mb;
4294     char *target_mtext;
4295     struct msgbuf *host_mb;
4296     abi_long ret = 0;
4297 
4298     if (msgsz < 0) {
4299         return -TARGET_EINVAL;
4300     }
4301 
4302     if (!lock_user_struct(VERIFY_WRITE, target_mb, msgp, 0))
4303         return -TARGET_EFAULT;
4304 
4305     host_mb = g_try_malloc(msgsz + sizeof(long));
4306     if (!host_mb) {
4307         ret = -TARGET_ENOMEM;
4308         goto end;
4309     }
4310     ret = -TARGET_ENOSYS;
4311 #ifdef __NR_msgrcv
4312     ret = get_errno(safe_msgrcv(msqid, host_mb, msgsz, msgtyp, msgflg));
4313 #endif
4314 #ifdef __NR_ipc
4315     if (ret == -TARGET_ENOSYS) {
4316         ret = get_errno(safe_ipc(IPCOP_CALL(1, IPCOP_msgrcv), msqid, msgsz,
4317                         msgflg, MSGRCV_ARGS(host_mb, msgtyp)));
4318     }
4319 #endif
4320 
4321     if (ret > 0) {
4322         abi_ulong target_mtext_addr = msgp + sizeof(abi_ulong);
4323         target_mtext = lock_user(VERIFY_WRITE, target_mtext_addr, ret, 0);
4324         if (!target_mtext) {
4325             ret = -TARGET_EFAULT;
4326             goto end;
4327         }
4328         memcpy(target_mb->mtext, host_mb->mtext, ret);
4329         unlock_user(target_mtext, target_mtext_addr, ret);
4330     }
4331 
4332     target_mb->mtype = tswapal(host_mb->mtype);
4333 
4334 end:
4335     if (target_mb)
4336         unlock_user_struct(target_mb, msgp, 1);
4337     g_free(host_mb);
4338     return ret;
4339 }
4340 
4341 static inline abi_long target_to_host_shmid_ds(struct shmid_ds *host_sd,
4342                                                abi_ulong target_addr)
4343 {
4344     struct target_shmid_ds *target_sd;
4345 
4346     if (!lock_user_struct(VERIFY_READ, target_sd, target_addr, 1))
4347         return -TARGET_EFAULT;
4348     if (target_to_host_ipc_perm(&(host_sd->shm_perm), target_addr))
4349         return -TARGET_EFAULT;
4350     __get_user(host_sd->shm_segsz, &target_sd->shm_segsz);
4351     __get_user(host_sd->shm_atime, &target_sd->shm_atime);
4352     __get_user(host_sd->shm_dtime, &target_sd->shm_dtime);
4353     __get_user(host_sd->shm_ctime, &target_sd->shm_ctime);
4354     __get_user(host_sd->shm_cpid, &target_sd->shm_cpid);
4355     __get_user(host_sd->shm_lpid, &target_sd->shm_lpid);
4356     __get_user(host_sd->shm_nattch, &target_sd->shm_nattch);
4357     unlock_user_struct(target_sd, target_addr, 0);
4358     return 0;
4359 }
4360 
4361 static inline abi_long host_to_target_shmid_ds(abi_ulong target_addr,
4362                                                struct shmid_ds *host_sd)
4363 {
4364     struct target_shmid_ds *target_sd;
4365 
4366     if (!lock_user_struct(VERIFY_WRITE, target_sd, target_addr, 0))
4367         return -TARGET_EFAULT;
4368     if (host_to_target_ipc_perm(target_addr, &(host_sd->shm_perm)))
4369         return -TARGET_EFAULT;
4370     __put_user(host_sd->shm_segsz, &target_sd->shm_segsz);
4371     __put_user(host_sd->shm_atime, &target_sd->shm_atime);
4372     __put_user(host_sd->shm_dtime, &target_sd->shm_dtime);
4373     __put_user(host_sd->shm_ctime, &target_sd->shm_ctime);
4374     __put_user(host_sd->shm_cpid, &target_sd->shm_cpid);
4375     __put_user(host_sd->shm_lpid, &target_sd->shm_lpid);
4376     __put_user(host_sd->shm_nattch, &target_sd->shm_nattch);
4377     unlock_user_struct(target_sd, target_addr, 1);
4378     return 0;
4379 }
4380 
4381 struct  target_shminfo {
4382     abi_ulong shmmax;
4383     abi_ulong shmmin;
4384     abi_ulong shmmni;
4385     abi_ulong shmseg;
4386     abi_ulong shmall;
4387 };
4388 
4389 static inline abi_long host_to_target_shminfo(abi_ulong target_addr,
4390                                               struct shminfo *host_shminfo)
4391 {
4392     struct target_shminfo *target_shminfo;
4393     if (!lock_user_struct(VERIFY_WRITE, target_shminfo, target_addr, 0))
4394         return -TARGET_EFAULT;
4395     __put_user(host_shminfo->shmmax, &target_shminfo->shmmax);
4396     __put_user(host_shminfo->shmmin, &target_shminfo->shmmin);
4397     __put_user(host_shminfo->shmmni, &target_shminfo->shmmni);
4398     __put_user(host_shminfo->shmseg, &target_shminfo->shmseg);
4399     __put_user(host_shminfo->shmall, &target_shminfo->shmall);
4400     unlock_user_struct(target_shminfo, target_addr, 1);
4401     return 0;
4402 }
4403 
4404 struct target_shm_info {
4405     int used_ids;
4406     abi_ulong shm_tot;
4407     abi_ulong shm_rss;
4408     abi_ulong shm_swp;
4409     abi_ulong swap_attempts;
4410     abi_ulong swap_successes;
4411 };
4412 
4413 static inline abi_long host_to_target_shm_info(abi_ulong target_addr,
4414                                                struct shm_info *host_shm_info)
4415 {
4416     struct target_shm_info *target_shm_info;
4417     if (!lock_user_struct(VERIFY_WRITE, target_shm_info, target_addr, 0))
4418         return -TARGET_EFAULT;
4419     __put_user(host_shm_info->used_ids, &target_shm_info->used_ids);
4420     __put_user(host_shm_info->shm_tot, &target_shm_info->shm_tot);
4421     __put_user(host_shm_info->shm_rss, &target_shm_info->shm_rss);
4422     __put_user(host_shm_info->shm_swp, &target_shm_info->shm_swp);
4423     __put_user(host_shm_info->swap_attempts, &target_shm_info->swap_attempts);
4424     __put_user(host_shm_info->swap_successes, &target_shm_info->swap_successes);
4425     unlock_user_struct(target_shm_info, target_addr, 1);
4426     return 0;
4427 }
4428 
4429 static inline abi_long do_shmctl(int shmid, int cmd, abi_long buf)
4430 {
4431     struct shmid_ds dsarg;
4432     struct shminfo shminfo;
4433     struct shm_info shm_info;
4434     abi_long ret = -TARGET_EINVAL;
4435 
4436     cmd &= 0xff;
4437 
4438     switch(cmd) {
4439     case IPC_STAT:
4440     case IPC_SET:
4441     case SHM_STAT:
4442         if (target_to_host_shmid_ds(&dsarg, buf))
4443             return -TARGET_EFAULT;
4444         ret = get_errno(shmctl(shmid, cmd, &dsarg));
4445         if (host_to_target_shmid_ds(buf, &dsarg))
4446             return -TARGET_EFAULT;
4447         break;
4448     case IPC_INFO:
4449         ret = get_errno(shmctl(shmid, cmd, (struct shmid_ds *)&shminfo));
4450         if (host_to_target_shminfo(buf, &shminfo))
4451             return -TARGET_EFAULT;
4452         break;
4453     case SHM_INFO:
4454         ret = get_errno(shmctl(shmid, cmd, (struct shmid_ds *)&shm_info));
4455         if (host_to_target_shm_info(buf, &shm_info))
4456             return -TARGET_EFAULT;
4457         break;
4458     case IPC_RMID:
4459     case SHM_LOCK:
4460     case SHM_UNLOCK:
4461         ret = get_errno(shmctl(shmid, cmd, NULL));
4462         break;
4463     }
4464 
4465     return ret;
4466 }
4467 
4468 #ifndef TARGET_FORCE_SHMLBA
4469 /* For most architectures, SHMLBA is the same as the page size;
4470  * some architectures have larger values, in which case they should
4471  * define TARGET_FORCE_SHMLBA and provide a target_shmlba() function.
4472  * This corresponds to the kernel arch code defining __ARCH_FORCE_SHMLBA
4473  * and defining its own value for SHMLBA.
4474  *
4475  * The kernel also permits SHMLBA to be set by the architecture to a
4476  * value larger than the page size without setting __ARCH_FORCE_SHMLBA;
4477  * this means that addresses are rounded to the large size if
4478  * SHM_RND is set but addresses not aligned to that size are not rejected
4479  * as long as they are at least page-aligned. Since the only architecture
4480  * which uses this is ia64 this code doesn't provide for that oddity.
4481  */
4482 static inline abi_ulong target_shmlba(CPUArchState *cpu_env)
4483 {
4484     return TARGET_PAGE_SIZE;
4485 }
4486 #endif
4487 
4488 static inline abi_ulong do_shmat(CPUArchState *cpu_env,
4489                                  int shmid, abi_ulong shmaddr, int shmflg)
4490 {
4491     CPUState *cpu = env_cpu(cpu_env);
4492     abi_long raddr;
4493     void *host_raddr;
4494     struct shmid_ds shm_info;
4495     int i,ret;
4496     abi_ulong shmlba;
4497 
4498     /* shmat pointers are always untagged */
4499 
4500     /* find out the length of the shared memory segment */
4501     ret = get_errno(shmctl(shmid, IPC_STAT, &shm_info));
4502     if (is_error(ret)) {
4503         /* can't get length, bail out */
4504         return ret;
4505     }
4506 
4507     shmlba = target_shmlba(cpu_env);
4508 
4509     if (shmaddr & (shmlba - 1)) {
4510         if (shmflg & SHM_RND) {
4511             shmaddr &= ~(shmlba - 1);
4512         } else {
4513             return -TARGET_EINVAL;
4514         }
4515     }
4516     if (!guest_range_valid_untagged(shmaddr, shm_info.shm_segsz)) {
4517         return -TARGET_EINVAL;
4518     }
4519 
4520     mmap_lock();
4521 
4522     /*
4523      * We're mapping shared memory, so ensure we generate code for parallel
4524      * execution and flush old translations.  This will work up to the level
4525      * supported by the host -- anything that requires EXCP_ATOMIC will not
4526      * be atomic with respect to an external process.
4527      */
4528     if (!(cpu->tcg_cflags & CF_PARALLEL)) {
4529         cpu->tcg_cflags |= CF_PARALLEL;
4530         tb_flush(cpu);
4531     }
4532 
4533     if (shmaddr)
4534         host_raddr = shmat(shmid, (void *)g2h_untagged(shmaddr), shmflg);
4535     else {
4536         abi_ulong mmap_start;
4537 
4538         /* In order to use the host shmat, we need to honor host SHMLBA.  */
4539         mmap_start = mmap_find_vma(0, shm_info.shm_segsz, MAX(SHMLBA, shmlba));
4540 
4541         if (mmap_start == -1) {
4542             errno = ENOMEM;
4543             host_raddr = (void *)-1;
4544         } else
4545             host_raddr = shmat(shmid, g2h_untagged(mmap_start),
4546                                shmflg | SHM_REMAP);
4547     }
4548 
4549     if (host_raddr == (void *)-1) {
4550         mmap_unlock();
4551         return get_errno((long)host_raddr);
4552     }
4553     raddr=h2g((unsigned long)host_raddr);
4554 
4555     page_set_flags(raddr, raddr + shm_info.shm_segsz,
4556                    PAGE_VALID | PAGE_RESET | PAGE_READ |
4557                    (shmflg & SHM_RDONLY ? 0 : PAGE_WRITE));
4558 
4559     for (i = 0; i < N_SHM_REGIONS; i++) {
4560         if (!shm_regions[i].in_use) {
4561             shm_regions[i].in_use = true;
4562             shm_regions[i].start = raddr;
4563             shm_regions[i].size = shm_info.shm_segsz;
4564             break;
4565         }
4566     }
4567 
4568     mmap_unlock();
4569     return raddr;
4570 
4571 }
4572 
4573 static inline abi_long do_shmdt(abi_ulong shmaddr)
4574 {
4575     int i;
4576     abi_long rv;
4577 
4578     /* shmdt pointers are always untagged */
4579 
4580     mmap_lock();
4581 
4582     for (i = 0; i < N_SHM_REGIONS; ++i) {
4583         if (shm_regions[i].in_use && shm_regions[i].start == shmaddr) {
4584             shm_regions[i].in_use = false;
4585             page_set_flags(shmaddr, shmaddr + shm_regions[i].size, 0);
4586             break;
4587         }
4588     }
4589     rv = get_errno(shmdt(g2h_untagged(shmaddr)));
4590 
4591     mmap_unlock();
4592 
4593     return rv;
4594 }
4595 
4596 #ifdef TARGET_NR_ipc
4597 /* ??? This only works with linear mappings.  */
4598 /* do_ipc() must return target values and target errnos. */
4599 static abi_long do_ipc(CPUArchState *cpu_env,
4600                        unsigned int call, abi_long first,
4601                        abi_long second, abi_long third,
4602                        abi_long ptr, abi_long fifth)
4603 {
4604     int version;
4605     abi_long ret = 0;
4606 
4607     version = call >> 16;
4608     call &= 0xffff;
4609 
4610     switch (call) {
4611     case IPCOP_semop:
4612         ret = do_semtimedop(first, ptr, second, 0, false);
4613         break;
4614     case IPCOP_semtimedop:
4615     /*
4616      * The s390 sys_ipc variant has only five parameters instead of six
4617      * (as for default variant) and the only difference is the handling of
4618      * SEMTIMEDOP where on s390 the third parameter is used as a pointer
4619      * to a struct timespec where the generic variant uses fifth parameter.
4620      */
4621 #if defined(TARGET_S390X)
4622         ret = do_semtimedop(first, ptr, second, third, TARGET_ABI_BITS == 64);
4623 #else
4624         ret = do_semtimedop(first, ptr, second, fifth, TARGET_ABI_BITS == 64);
4625 #endif
4626         break;
4627 
4628     case IPCOP_semget:
4629         ret = get_errno(semget(first, second, third));
4630         break;
4631 
4632     case IPCOP_semctl: {
4633         /* The semun argument to semctl is passed by value, so dereference the
4634          * ptr argument. */
4635         abi_ulong atptr;
4636         get_user_ual(atptr, ptr);
4637         ret = do_semctl(first, second, third, atptr);
4638         break;
4639     }
4640 
4641     case IPCOP_msgget:
4642         ret = get_errno(msgget(first, second));
4643         break;
4644 
4645     case IPCOP_msgsnd:
4646         ret = do_msgsnd(first, ptr, second, third);
4647         break;
4648 
4649     case IPCOP_msgctl:
4650         ret = do_msgctl(first, second, ptr);
4651         break;
4652 
4653     case IPCOP_msgrcv:
4654         switch (version) {
4655         case 0:
4656             {
4657                 struct target_ipc_kludge {
4658                     abi_long msgp;
4659                     abi_long msgtyp;
4660                 } *tmp;
4661 
4662                 if (!lock_user_struct(VERIFY_READ, tmp, ptr, 1)) {
4663                     ret = -TARGET_EFAULT;
4664                     break;
4665                 }
4666 
4667                 ret = do_msgrcv(first, tswapal(tmp->msgp), second, tswapal(tmp->msgtyp), third);
4668 
4669                 unlock_user_struct(tmp, ptr, 0);
4670                 break;
4671             }
4672         default:
4673             ret = do_msgrcv(first, ptr, second, fifth, third);
4674         }
4675         break;
4676 
4677     case IPCOP_shmat:
4678         switch (version) {
4679         default:
4680         {
4681             abi_ulong raddr;
4682             raddr = do_shmat(cpu_env, first, ptr, second);
4683             if (is_error(raddr))
4684                 return get_errno(raddr);
4685             if (put_user_ual(raddr, third))
4686                 return -TARGET_EFAULT;
4687             break;
4688         }
4689         case 1:
4690             ret = -TARGET_EINVAL;
4691             break;
4692         }
4693 	break;
4694     case IPCOP_shmdt:
4695         ret = do_shmdt(ptr);
4696 	break;
4697 
4698     case IPCOP_shmget:
4699 	/* IPC_* flag values are the same on all linux platforms */
4700 	ret = get_errno(shmget(first, second, third));
4701 	break;
4702 
4703 	/* IPC_* and SHM_* command values are the same on all linux platforms */
4704     case IPCOP_shmctl:
4705         ret = do_shmctl(first, second, ptr);
4706         break;
4707     default:
4708         qemu_log_mask(LOG_UNIMP, "Unsupported ipc call: %d (version %d)\n",
4709                       call, version);
4710 	ret = -TARGET_ENOSYS;
4711 	break;
4712     }
4713     return ret;
4714 }
4715 #endif
4716 
4717 /* kernel structure types definitions */
4718 
4719 #define STRUCT(name, ...) STRUCT_ ## name,
4720 #define STRUCT_SPECIAL(name) STRUCT_ ## name,
4721 enum {
4722 #include "syscall_types.h"
4723 STRUCT_MAX
4724 };
4725 #undef STRUCT
4726 #undef STRUCT_SPECIAL
4727 
4728 #define STRUCT(name, ...) static const argtype struct_ ## name ## _def[] = {  __VA_ARGS__, TYPE_NULL };
4729 #define STRUCT_SPECIAL(name)
4730 #include "syscall_types.h"
4731 #undef STRUCT
4732 #undef STRUCT_SPECIAL
4733 
4734 #define MAX_STRUCT_SIZE 4096
4735 
4736 #ifdef CONFIG_FIEMAP
4737 /* So fiemap access checks don't overflow on 32 bit systems.
4738  * This is very slightly smaller than the limit imposed by
4739  * the underlying kernel.
4740  */
4741 #define FIEMAP_MAX_EXTENTS ((UINT_MAX - sizeof(struct fiemap))  \
4742                             / sizeof(struct fiemap_extent))
4743 
4744 static abi_long do_ioctl_fs_ioc_fiemap(const IOCTLEntry *ie, uint8_t *buf_temp,
4745                                        int fd, int cmd, abi_long arg)
4746 {
4747     /* The parameter for this ioctl is a struct fiemap followed
4748      * by an array of struct fiemap_extent whose size is set
4749      * in fiemap->fm_extent_count. The array is filled in by the
4750      * ioctl.
4751      */
4752     int target_size_in, target_size_out;
4753     struct fiemap *fm;
4754     const argtype *arg_type = ie->arg_type;
4755     const argtype extent_arg_type[] = { MK_STRUCT(STRUCT_fiemap_extent) };
4756     void *argptr, *p;
4757     abi_long ret;
4758     int i, extent_size = thunk_type_size(extent_arg_type, 0);
4759     uint32_t outbufsz;
4760     int free_fm = 0;
4761 
4762     assert(arg_type[0] == TYPE_PTR);
4763     assert(ie->access == IOC_RW);
4764     arg_type++;
4765     target_size_in = thunk_type_size(arg_type, 0);
4766     argptr = lock_user(VERIFY_READ, arg, target_size_in, 1);
4767     if (!argptr) {
4768         return -TARGET_EFAULT;
4769     }
4770     thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
4771     unlock_user(argptr, arg, 0);
4772     fm = (struct fiemap *)buf_temp;
4773     if (fm->fm_extent_count > FIEMAP_MAX_EXTENTS) {
4774         return -TARGET_EINVAL;
4775     }
4776 
4777     outbufsz = sizeof (*fm) +
4778         (sizeof(struct fiemap_extent) * fm->fm_extent_count);
4779 
4780     if (outbufsz > MAX_STRUCT_SIZE) {
4781         /* We can't fit all the extents into the fixed size buffer.
4782          * Allocate one that is large enough and use it instead.
4783          */
4784         fm = g_try_malloc(outbufsz);
4785         if (!fm) {
4786             return -TARGET_ENOMEM;
4787         }
4788         memcpy(fm, buf_temp, sizeof(struct fiemap));
4789         free_fm = 1;
4790     }
4791     ret = get_errno(safe_ioctl(fd, ie->host_cmd, fm));
4792     if (!is_error(ret)) {
4793         target_size_out = target_size_in;
4794         /* An extent_count of 0 means we were only counting the extents
4795          * so there are no structs to copy
4796          */
4797         if (fm->fm_extent_count != 0) {
4798             target_size_out += fm->fm_mapped_extents * extent_size;
4799         }
4800         argptr = lock_user(VERIFY_WRITE, arg, target_size_out, 0);
4801         if (!argptr) {
4802             ret = -TARGET_EFAULT;
4803         } else {
4804             /* Convert the struct fiemap */
4805             thunk_convert(argptr, fm, arg_type, THUNK_TARGET);
4806             if (fm->fm_extent_count != 0) {
4807                 p = argptr + target_size_in;
4808                 /* ...and then all the struct fiemap_extents */
4809                 for (i = 0; i < fm->fm_mapped_extents; i++) {
4810                     thunk_convert(p, &fm->fm_extents[i], extent_arg_type,
4811                                   THUNK_TARGET);
4812                     p += extent_size;
4813                 }
4814             }
4815             unlock_user(argptr, arg, target_size_out);
4816         }
4817     }
4818     if (free_fm) {
4819         g_free(fm);
4820     }
4821     return ret;
4822 }
4823 #endif
4824 
4825 static abi_long do_ioctl_ifconf(const IOCTLEntry *ie, uint8_t *buf_temp,
4826                                 int fd, int cmd, abi_long arg)
4827 {
4828     const argtype *arg_type = ie->arg_type;
4829     int target_size;
4830     void *argptr;
4831     int ret;
4832     struct ifconf *host_ifconf;
4833     uint32_t outbufsz;
4834     const argtype ifreq_arg_type[] = { MK_STRUCT(STRUCT_sockaddr_ifreq) };
4835     const argtype ifreq_max_type[] = { MK_STRUCT(STRUCT_ifmap_ifreq) };
4836     int target_ifreq_size;
4837     int nb_ifreq;
4838     int free_buf = 0;
4839     int i;
4840     int target_ifc_len;
4841     abi_long target_ifc_buf;
4842     int host_ifc_len;
4843     char *host_ifc_buf;
4844 
4845     assert(arg_type[0] == TYPE_PTR);
4846     assert(ie->access == IOC_RW);
4847 
4848     arg_type++;
4849     target_size = thunk_type_size(arg_type, 0);
4850 
4851     argptr = lock_user(VERIFY_READ, arg, target_size, 1);
4852     if (!argptr)
4853         return -TARGET_EFAULT;
4854     thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
4855     unlock_user(argptr, arg, 0);
4856 
4857     host_ifconf = (struct ifconf *)(unsigned long)buf_temp;
4858     target_ifc_buf = (abi_long)(unsigned long)host_ifconf->ifc_buf;
4859     target_ifreq_size = thunk_type_size(ifreq_max_type, 0);
4860 
4861     if (target_ifc_buf != 0) {
4862         target_ifc_len = host_ifconf->ifc_len;
4863         nb_ifreq = target_ifc_len / target_ifreq_size;
4864         host_ifc_len = nb_ifreq * sizeof(struct ifreq);
4865 
4866         outbufsz = sizeof(*host_ifconf) + host_ifc_len;
4867         if (outbufsz > MAX_STRUCT_SIZE) {
4868             /*
4869              * We can't fit all the extents into the fixed size buffer.
4870              * Allocate one that is large enough and use it instead.
4871              */
4872             host_ifconf = g_try_malloc(outbufsz);
4873             if (!host_ifconf) {
4874                 return -TARGET_ENOMEM;
4875             }
4876             memcpy(host_ifconf, buf_temp, sizeof(*host_ifconf));
4877             free_buf = 1;
4878         }
4879         host_ifc_buf = (char *)host_ifconf + sizeof(*host_ifconf);
4880 
4881         host_ifconf->ifc_len = host_ifc_len;
4882     } else {
4883       host_ifc_buf = NULL;
4884     }
4885     host_ifconf->ifc_buf = host_ifc_buf;
4886 
4887     ret = get_errno(safe_ioctl(fd, ie->host_cmd, host_ifconf));
4888     if (!is_error(ret)) {
4889 	/* convert host ifc_len to target ifc_len */
4890 
4891         nb_ifreq = host_ifconf->ifc_len / sizeof(struct ifreq);
4892         target_ifc_len = nb_ifreq * target_ifreq_size;
4893         host_ifconf->ifc_len = target_ifc_len;
4894 
4895 	/* restore target ifc_buf */
4896 
4897         host_ifconf->ifc_buf = (char *)(unsigned long)target_ifc_buf;
4898 
4899 	/* copy struct ifconf to target user */
4900 
4901         argptr = lock_user(VERIFY_WRITE, arg, target_size, 0);
4902         if (!argptr)
4903             return -TARGET_EFAULT;
4904         thunk_convert(argptr, host_ifconf, arg_type, THUNK_TARGET);
4905         unlock_user(argptr, arg, target_size);
4906 
4907         if (target_ifc_buf != 0) {
4908             /* copy ifreq[] to target user */
4909             argptr = lock_user(VERIFY_WRITE, target_ifc_buf, target_ifc_len, 0);
4910             for (i = 0; i < nb_ifreq ; i++) {
4911                 thunk_convert(argptr + i * target_ifreq_size,
4912                               host_ifc_buf + i * sizeof(struct ifreq),
4913                               ifreq_arg_type, THUNK_TARGET);
4914             }
4915             unlock_user(argptr, target_ifc_buf, target_ifc_len);
4916         }
4917     }
4918 
4919     if (free_buf) {
4920         g_free(host_ifconf);
4921     }
4922 
4923     return ret;
4924 }
4925 
4926 #if defined(CONFIG_USBFS)
4927 #if HOST_LONG_BITS > 64
4928 #error USBDEVFS thunks do not support >64 bit hosts yet.
4929 #endif
4930 struct live_urb {
4931     uint64_t target_urb_adr;
4932     uint64_t target_buf_adr;
4933     char *target_buf_ptr;
4934     struct usbdevfs_urb host_urb;
4935 };
4936 
4937 static GHashTable *usbdevfs_urb_hashtable(void)
4938 {
4939     static GHashTable *urb_hashtable;
4940 
4941     if (!urb_hashtable) {
4942         urb_hashtable = g_hash_table_new(g_int64_hash, g_int64_equal);
4943     }
4944     return urb_hashtable;
4945 }
4946 
4947 static void urb_hashtable_insert(struct live_urb *urb)
4948 {
4949     GHashTable *urb_hashtable = usbdevfs_urb_hashtable();
4950     g_hash_table_insert(urb_hashtable, urb, urb);
4951 }
4952 
4953 static struct live_urb *urb_hashtable_lookup(uint64_t target_urb_adr)
4954 {
4955     GHashTable *urb_hashtable = usbdevfs_urb_hashtable();
4956     return g_hash_table_lookup(urb_hashtable, &target_urb_adr);
4957 }
4958 
4959 static void urb_hashtable_remove(struct live_urb *urb)
4960 {
4961     GHashTable *urb_hashtable = usbdevfs_urb_hashtable();
4962     g_hash_table_remove(urb_hashtable, urb);
4963 }
4964 
4965 static abi_long
4966 do_ioctl_usbdevfs_reapurb(const IOCTLEntry *ie, uint8_t *buf_temp,
4967                           int fd, int cmd, abi_long arg)
4968 {
4969     const argtype usbfsurb_arg_type[] = { MK_STRUCT(STRUCT_usbdevfs_urb) };
4970     const argtype ptrvoid_arg_type[] = { TYPE_PTRVOID, 0, 0 };
4971     struct live_urb *lurb;
4972     void *argptr;
4973     uint64_t hurb;
4974     int target_size;
4975     uintptr_t target_urb_adr;
4976     abi_long ret;
4977 
4978     target_size = thunk_type_size(usbfsurb_arg_type, THUNK_TARGET);
4979 
4980     memset(buf_temp, 0, sizeof(uint64_t));
4981     ret = get_errno(safe_ioctl(fd, ie->host_cmd, buf_temp));
4982     if (is_error(ret)) {
4983         return ret;
4984     }
4985 
4986     memcpy(&hurb, buf_temp, sizeof(uint64_t));
4987     lurb = (void *)((uintptr_t)hurb - offsetof(struct live_urb, host_urb));
4988     if (!lurb->target_urb_adr) {
4989         return -TARGET_EFAULT;
4990     }
4991     urb_hashtable_remove(lurb);
4992     unlock_user(lurb->target_buf_ptr, lurb->target_buf_adr,
4993         lurb->host_urb.buffer_length);
4994     lurb->target_buf_ptr = NULL;
4995 
4996     /* restore the guest buffer pointer */
4997     lurb->host_urb.buffer = (void *)(uintptr_t)lurb->target_buf_adr;
4998 
4999     /* update the guest urb struct */
5000     argptr = lock_user(VERIFY_WRITE, lurb->target_urb_adr, target_size, 0);
5001     if (!argptr) {
5002         g_free(lurb);
5003         return -TARGET_EFAULT;
5004     }
5005     thunk_convert(argptr, &lurb->host_urb, usbfsurb_arg_type, THUNK_TARGET);
5006     unlock_user(argptr, lurb->target_urb_adr, target_size);
5007 
5008     target_size = thunk_type_size(ptrvoid_arg_type, THUNK_TARGET);
5009     /* write back the urb handle */
5010     argptr = lock_user(VERIFY_WRITE, arg, target_size, 0);
5011     if (!argptr) {
5012         g_free(lurb);
5013         return -TARGET_EFAULT;
5014     }
5015 
5016     /* GHashTable uses 64-bit keys but thunk_convert expects uintptr_t */
5017     target_urb_adr = lurb->target_urb_adr;
5018     thunk_convert(argptr, &target_urb_adr, ptrvoid_arg_type, THUNK_TARGET);
5019     unlock_user(argptr, arg, target_size);
5020 
5021     g_free(lurb);
5022     return ret;
5023 }
5024 
5025 static abi_long
5026 do_ioctl_usbdevfs_discardurb(const IOCTLEntry *ie,
5027                              uint8_t *buf_temp __attribute__((unused)),
5028                              int fd, int cmd, abi_long arg)
5029 {
5030     struct live_urb *lurb;
5031 
5032     /* map target address back to host URB with metadata. */
5033     lurb = urb_hashtable_lookup(arg);
5034     if (!lurb) {
5035         return -TARGET_EFAULT;
5036     }
5037     return get_errno(safe_ioctl(fd, ie->host_cmd, &lurb->host_urb));
5038 }
5039 
5040 static abi_long
5041 do_ioctl_usbdevfs_submiturb(const IOCTLEntry *ie, uint8_t *buf_temp,
5042                             int fd, int cmd, abi_long arg)
5043 {
5044     const argtype *arg_type = ie->arg_type;
5045     int target_size;
5046     abi_long ret;
5047     void *argptr;
5048     int rw_dir;
5049     struct live_urb *lurb;
5050 
5051     /*
5052      * each submitted URB needs to map to a unique ID for the
5053      * kernel, and that unique ID needs to be a pointer to
5054      * host memory.  hence, we need to malloc for each URB.
5055      * isochronous transfers have a variable length struct.
5056      */
5057     arg_type++;
5058     target_size = thunk_type_size(arg_type, THUNK_TARGET);
5059 
5060     /* construct host copy of urb and metadata */
5061     lurb = g_try_new0(struct live_urb, 1);
5062     if (!lurb) {
5063         return -TARGET_ENOMEM;
5064     }
5065 
5066     argptr = lock_user(VERIFY_READ, arg, target_size, 1);
5067     if (!argptr) {
5068         g_free(lurb);
5069         return -TARGET_EFAULT;
5070     }
5071     thunk_convert(&lurb->host_urb, argptr, arg_type, THUNK_HOST);
5072     unlock_user(argptr, arg, 0);
5073 
5074     lurb->target_urb_adr = arg;
5075     lurb->target_buf_adr = (uintptr_t)lurb->host_urb.buffer;
5076 
5077     /* buffer space used depends on endpoint type so lock the entire buffer */
5078     /* control type urbs should check the buffer contents for true direction */
5079     rw_dir = lurb->host_urb.endpoint & USB_DIR_IN ? VERIFY_WRITE : VERIFY_READ;
5080     lurb->target_buf_ptr = lock_user(rw_dir, lurb->target_buf_adr,
5081         lurb->host_urb.buffer_length, 1);
5082     if (lurb->target_buf_ptr == NULL) {
5083         g_free(lurb);
5084         return -TARGET_EFAULT;
5085     }
5086 
5087     /* update buffer pointer in host copy */
5088     lurb->host_urb.buffer = lurb->target_buf_ptr;
5089 
5090     ret = get_errno(safe_ioctl(fd, ie->host_cmd, &lurb->host_urb));
5091     if (is_error(ret)) {
5092         unlock_user(lurb->target_buf_ptr, lurb->target_buf_adr, 0);
5093         g_free(lurb);
5094     } else {
5095         urb_hashtable_insert(lurb);
5096     }
5097 
5098     return ret;
5099 }
5100 #endif /* CONFIG_USBFS */
5101 
5102 static abi_long do_ioctl_dm(const IOCTLEntry *ie, uint8_t *buf_temp, int fd,
5103                             int cmd, abi_long arg)
5104 {
5105     void *argptr;
5106     struct dm_ioctl *host_dm;
5107     abi_long guest_data;
5108     uint32_t guest_data_size;
5109     int target_size;
5110     const argtype *arg_type = ie->arg_type;
5111     abi_long ret;
5112     void *big_buf = NULL;
5113     char *host_data;
5114 
5115     arg_type++;
5116     target_size = thunk_type_size(arg_type, 0);
5117     argptr = lock_user(VERIFY_READ, arg, target_size, 1);
5118     if (!argptr) {
5119         ret = -TARGET_EFAULT;
5120         goto out;
5121     }
5122     thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
5123     unlock_user(argptr, arg, 0);
5124 
5125     /* buf_temp is too small, so fetch things into a bigger buffer */
5126     big_buf = g_malloc0(((struct dm_ioctl*)buf_temp)->data_size * 2);
5127     memcpy(big_buf, buf_temp, target_size);
5128     buf_temp = big_buf;
5129     host_dm = big_buf;
5130 
5131     guest_data = arg + host_dm->data_start;
5132     if ((guest_data - arg) < 0) {
5133         ret = -TARGET_EINVAL;
5134         goto out;
5135     }
5136     guest_data_size = host_dm->data_size - host_dm->data_start;
5137     host_data = (char*)host_dm + host_dm->data_start;
5138 
5139     argptr = lock_user(VERIFY_READ, guest_data, guest_data_size, 1);
5140     if (!argptr) {
5141         ret = -TARGET_EFAULT;
5142         goto out;
5143     }
5144 
5145     switch (ie->host_cmd) {
5146     case DM_REMOVE_ALL:
5147     case DM_LIST_DEVICES:
5148     case DM_DEV_CREATE:
5149     case DM_DEV_REMOVE:
5150     case DM_DEV_SUSPEND:
5151     case DM_DEV_STATUS:
5152     case DM_DEV_WAIT:
5153     case DM_TABLE_STATUS:
5154     case DM_TABLE_CLEAR:
5155     case DM_TABLE_DEPS:
5156     case DM_LIST_VERSIONS:
5157         /* no input data */
5158         break;
5159     case DM_DEV_RENAME:
5160     case DM_DEV_SET_GEOMETRY:
5161         /* data contains only strings */
5162         memcpy(host_data, argptr, guest_data_size);
5163         break;
5164     case DM_TARGET_MSG:
5165         memcpy(host_data, argptr, guest_data_size);
5166         *(uint64_t*)host_data = tswap64(*(uint64_t*)argptr);
5167         break;
5168     case DM_TABLE_LOAD:
5169     {
5170         void *gspec = argptr;
5171         void *cur_data = host_data;
5172         const argtype arg_type[] = { MK_STRUCT(STRUCT_dm_target_spec) };
5173         int spec_size = thunk_type_size(arg_type, 0);
5174         int i;
5175 
5176         for (i = 0; i < host_dm->target_count; i++) {
5177             struct dm_target_spec *spec = cur_data;
5178             uint32_t next;
5179             int slen;
5180 
5181             thunk_convert(spec, gspec, arg_type, THUNK_HOST);
5182             slen = strlen((char*)gspec + spec_size) + 1;
5183             next = spec->next;
5184             spec->next = sizeof(*spec) + slen;
5185             strcpy((char*)&spec[1], gspec + spec_size);
5186             gspec += next;
5187             cur_data += spec->next;
5188         }
5189         break;
5190     }
5191     default:
5192         ret = -TARGET_EINVAL;
5193         unlock_user(argptr, guest_data, 0);
5194         goto out;
5195     }
5196     unlock_user(argptr, guest_data, 0);
5197 
5198     ret = get_errno(safe_ioctl(fd, ie->host_cmd, buf_temp));
5199     if (!is_error(ret)) {
5200         guest_data = arg + host_dm->data_start;
5201         guest_data_size = host_dm->data_size - host_dm->data_start;
5202         argptr = lock_user(VERIFY_WRITE, guest_data, guest_data_size, 0);
5203         switch (ie->host_cmd) {
5204         case DM_REMOVE_ALL:
5205         case DM_DEV_CREATE:
5206         case DM_DEV_REMOVE:
5207         case DM_DEV_RENAME:
5208         case DM_DEV_SUSPEND:
5209         case DM_DEV_STATUS:
5210         case DM_TABLE_LOAD:
5211         case DM_TABLE_CLEAR:
5212         case DM_TARGET_MSG:
5213         case DM_DEV_SET_GEOMETRY:
5214             /* no return data */
5215             break;
5216         case DM_LIST_DEVICES:
5217         {
5218             struct dm_name_list *nl = (void*)host_dm + host_dm->data_start;
5219             uint32_t remaining_data = guest_data_size;
5220             void *cur_data = argptr;
5221             const argtype arg_type[] = { MK_STRUCT(STRUCT_dm_name_list) };
5222             int nl_size = 12; /* can't use thunk_size due to alignment */
5223 
5224             while (1) {
5225                 uint32_t next = nl->next;
5226                 if (next) {
5227                     nl->next = nl_size + (strlen(nl->name) + 1);
5228                 }
5229                 if (remaining_data < nl->next) {
5230                     host_dm->flags |= DM_BUFFER_FULL_FLAG;
5231                     break;
5232                 }
5233                 thunk_convert(cur_data, nl, arg_type, THUNK_TARGET);
5234                 strcpy(cur_data + nl_size, nl->name);
5235                 cur_data += nl->next;
5236                 remaining_data -= nl->next;
5237                 if (!next) {
5238                     break;
5239                 }
5240                 nl = (void*)nl + next;
5241             }
5242             break;
5243         }
5244         case DM_DEV_WAIT:
5245         case DM_TABLE_STATUS:
5246         {
5247             struct dm_target_spec *spec = (void*)host_dm + host_dm->data_start;
5248             void *cur_data = argptr;
5249             const argtype arg_type[] = { MK_STRUCT(STRUCT_dm_target_spec) };
5250             int spec_size = thunk_type_size(arg_type, 0);
5251             int i;
5252 
5253             for (i = 0; i < host_dm->target_count; i++) {
5254                 uint32_t next = spec->next;
5255                 int slen = strlen((char*)&spec[1]) + 1;
5256                 spec->next = (cur_data - argptr) + spec_size + slen;
5257                 if (guest_data_size < spec->next) {
5258                     host_dm->flags |= DM_BUFFER_FULL_FLAG;
5259                     break;
5260                 }
5261                 thunk_convert(cur_data, spec, arg_type, THUNK_TARGET);
5262                 strcpy(cur_data + spec_size, (char*)&spec[1]);
5263                 cur_data = argptr + spec->next;
5264                 spec = (void*)host_dm + host_dm->data_start + next;
5265             }
5266             break;
5267         }
5268         case DM_TABLE_DEPS:
5269         {
5270             void *hdata = (void*)host_dm + host_dm->data_start;
5271             int count = *(uint32_t*)hdata;
5272             uint64_t *hdev = hdata + 8;
5273             uint64_t *gdev = argptr + 8;
5274             int i;
5275 
5276             *(uint32_t*)argptr = tswap32(count);
5277             for (i = 0; i < count; i++) {
5278                 *gdev = tswap64(*hdev);
5279                 gdev++;
5280                 hdev++;
5281             }
5282             break;
5283         }
5284         case DM_LIST_VERSIONS:
5285         {
5286             struct dm_target_versions *vers = (void*)host_dm + host_dm->data_start;
5287             uint32_t remaining_data = guest_data_size;
5288             void *cur_data = argptr;
5289             const argtype arg_type[] = { MK_STRUCT(STRUCT_dm_target_versions) };
5290             int vers_size = thunk_type_size(arg_type, 0);
5291 
5292             while (1) {
5293                 uint32_t next = vers->next;
5294                 if (next) {
5295                     vers->next = vers_size + (strlen(vers->name) + 1);
5296                 }
5297                 if (remaining_data < vers->next) {
5298                     host_dm->flags |= DM_BUFFER_FULL_FLAG;
5299                     break;
5300                 }
5301                 thunk_convert(cur_data, vers, arg_type, THUNK_TARGET);
5302                 strcpy(cur_data + vers_size, vers->name);
5303                 cur_data += vers->next;
5304                 remaining_data -= vers->next;
5305                 if (!next) {
5306                     break;
5307                 }
5308                 vers = (void*)vers + next;
5309             }
5310             break;
5311         }
5312         default:
5313             unlock_user(argptr, guest_data, 0);
5314             ret = -TARGET_EINVAL;
5315             goto out;
5316         }
5317         unlock_user(argptr, guest_data, guest_data_size);
5318 
5319         argptr = lock_user(VERIFY_WRITE, arg, target_size, 0);
5320         if (!argptr) {
5321             ret = -TARGET_EFAULT;
5322             goto out;
5323         }
5324         thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET);
5325         unlock_user(argptr, arg, target_size);
5326     }
5327 out:
5328     g_free(big_buf);
5329     return ret;
5330 }
5331 
5332 static abi_long do_ioctl_blkpg(const IOCTLEntry *ie, uint8_t *buf_temp, int fd,
5333                                int cmd, abi_long arg)
5334 {
5335     void *argptr;
5336     int target_size;
5337     const argtype *arg_type = ie->arg_type;
5338     const argtype part_arg_type[] = { MK_STRUCT(STRUCT_blkpg_partition) };
5339     abi_long ret;
5340 
5341     struct blkpg_ioctl_arg *host_blkpg = (void*)buf_temp;
5342     struct blkpg_partition host_part;
5343 
5344     /* Read and convert blkpg */
5345     arg_type++;
5346     target_size = thunk_type_size(arg_type, 0);
5347     argptr = lock_user(VERIFY_READ, arg, target_size, 1);
5348     if (!argptr) {
5349         ret = -TARGET_EFAULT;
5350         goto out;
5351     }
5352     thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
5353     unlock_user(argptr, arg, 0);
5354 
5355     switch (host_blkpg->op) {
5356     case BLKPG_ADD_PARTITION:
5357     case BLKPG_DEL_PARTITION:
5358         /* payload is struct blkpg_partition */
5359         break;
5360     default:
5361         /* Unknown opcode */
5362         ret = -TARGET_EINVAL;
5363         goto out;
5364     }
5365 
5366     /* Read and convert blkpg->data */
5367     arg = (abi_long)(uintptr_t)host_blkpg->data;
5368     target_size = thunk_type_size(part_arg_type, 0);
5369     argptr = lock_user(VERIFY_READ, arg, target_size, 1);
5370     if (!argptr) {
5371         ret = -TARGET_EFAULT;
5372         goto out;
5373     }
5374     thunk_convert(&host_part, argptr, part_arg_type, THUNK_HOST);
5375     unlock_user(argptr, arg, 0);
5376 
5377     /* Swizzle the data pointer to our local copy and call! */
5378     host_blkpg->data = &host_part;
5379     ret = get_errno(safe_ioctl(fd, ie->host_cmd, host_blkpg));
5380 
5381 out:
5382     return ret;
5383 }
5384 
5385 static abi_long do_ioctl_rt(const IOCTLEntry *ie, uint8_t *buf_temp,
5386                                 int fd, int cmd, abi_long arg)
5387 {
5388     const argtype *arg_type = ie->arg_type;
5389     const StructEntry *se;
5390     const argtype *field_types;
5391     const int *dst_offsets, *src_offsets;
5392     int target_size;
5393     void *argptr;
5394     abi_ulong *target_rt_dev_ptr = NULL;
5395     unsigned long *host_rt_dev_ptr = NULL;
5396     abi_long ret;
5397     int i;
5398 
5399     assert(ie->access == IOC_W);
5400     assert(*arg_type == TYPE_PTR);
5401     arg_type++;
5402     assert(*arg_type == TYPE_STRUCT);
5403     target_size = thunk_type_size(arg_type, 0);
5404     argptr = lock_user(VERIFY_READ, arg, target_size, 1);
5405     if (!argptr) {
5406         return -TARGET_EFAULT;
5407     }
5408     arg_type++;
5409     assert(*arg_type == (int)STRUCT_rtentry);
5410     se = struct_entries + *arg_type++;
5411     assert(se->convert[0] == NULL);
5412     /* convert struct here to be able to catch rt_dev string */
5413     field_types = se->field_types;
5414     dst_offsets = se->field_offsets[THUNK_HOST];
5415     src_offsets = se->field_offsets[THUNK_TARGET];
5416     for (i = 0; i < se->nb_fields; i++) {
5417         if (dst_offsets[i] == offsetof(struct rtentry, rt_dev)) {
5418             assert(*field_types == TYPE_PTRVOID);
5419             target_rt_dev_ptr = (abi_ulong *)(argptr + src_offsets[i]);
5420             host_rt_dev_ptr = (unsigned long *)(buf_temp + dst_offsets[i]);
5421             if (*target_rt_dev_ptr != 0) {
5422                 *host_rt_dev_ptr = (unsigned long)lock_user_string(
5423                                                   tswapal(*target_rt_dev_ptr));
5424                 if (!*host_rt_dev_ptr) {
5425                     unlock_user(argptr, arg, 0);
5426                     return -TARGET_EFAULT;
5427                 }
5428             } else {
5429                 *host_rt_dev_ptr = 0;
5430             }
5431             field_types++;
5432             continue;
5433         }
5434         field_types = thunk_convert(buf_temp + dst_offsets[i],
5435                                     argptr + src_offsets[i],
5436                                     field_types, THUNK_HOST);
5437     }
5438     unlock_user(argptr, arg, 0);
5439 
5440     ret = get_errno(safe_ioctl(fd, ie->host_cmd, buf_temp));
5441 
5442     assert(host_rt_dev_ptr != NULL);
5443     assert(target_rt_dev_ptr != NULL);
5444     if (*host_rt_dev_ptr != 0) {
5445         unlock_user((void *)*host_rt_dev_ptr,
5446                     *target_rt_dev_ptr, 0);
5447     }
5448     return ret;
5449 }
5450 
5451 static abi_long do_ioctl_kdsigaccept(const IOCTLEntry *ie, uint8_t *buf_temp,
5452                                      int fd, int cmd, abi_long arg)
5453 {
5454     int sig = target_to_host_signal(arg);
5455     return get_errno(safe_ioctl(fd, ie->host_cmd, sig));
5456 }
5457 
5458 static abi_long do_ioctl_SIOCGSTAMP(const IOCTLEntry *ie, uint8_t *buf_temp,
5459                                     int fd, int cmd, abi_long arg)
5460 {
5461     struct timeval tv;
5462     abi_long ret;
5463 
5464     ret = get_errno(safe_ioctl(fd, SIOCGSTAMP, &tv));
5465     if (is_error(ret)) {
5466         return ret;
5467     }
5468 
5469     if (cmd == (int)TARGET_SIOCGSTAMP_OLD) {
5470         if (copy_to_user_timeval(arg, &tv)) {
5471             return -TARGET_EFAULT;
5472         }
5473     } else {
5474         if (copy_to_user_timeval64(arg, &tv)) {
5475             return -TARGET_EFAULT;
5476         }
5477     }
5478 
5479     return ret;
5480 }
5481 
5482 static abi_long do_ioctl_SIOCGSTAMPNS(const IOCTLEntry *ie, uint8_t *buf_temp,
5483                                       int fd, int cmd, abi_long arg)
5484 {
5485     struct timespec ts;
5486     abi_long ret;
5487 
5488     ret = get_errno(safe_ioctl(fd, SIOCGSTAMPNS, &ts));
5489     if (is_error(ret)) {
5490         return ret;
5491     }
5492 
5493     if (cmd == (int)TARGET_SIOCGSTAMPNS_OLD) {
5494         if (host_to_target_timespec(arg, &ts)) {
5495             return -TARGET_EFAULT;
5496         }
5497     } else{
5498         if (host_to_target_timespec64(arg, &ts)) {
5499             return -TARGET_EFAULT;
5500         }
5501     }
5502 
5503     return ret;
5504 }
5505 
5506 #ifdef TIOCGPTPEER
5507 static abi_long do_ioctl_tiocgptpeer(const IOCTLEntry *ie, uint8_t *buf_temp,
5508                                      int fd, int cmd, abi_long arg)
5509 {
5510     int flags = target_to_host_bitmask(arg, fcntl_flags_tbl);
5511     return get_errno(safe_ioctl(fd, ie->host_cmd, flags));
5512 }
5513 #endif
5514 
5515 #ifdef HAVE_DRM_H
5516 
5517 static void unlock_drm_version(struct drm_version *host_ver,
5518                                struct target_drm_version *target_ver,
5519                                bool copy)
5520 {
5521     unlock_user(host_ver->name, target_ver->name,
5522                                 copy ? host_ver->name_len : 0);
5523     unlock_user(host_ver->date, target_ver->date,
5524                                 copy ? host_ver->date_len : 0);
5525     unlock_user(host_ver->desc, target_ver->desc,
5526                                 copy ? host_ver->desc_len : 0);
5527 }
5528 
5529 static inline abi_long target_to_host_drmversion(struct drm_version *host_ver,
5530                                           struct target_drm_version *target_ver)
5531 {
5532     memset(host_ver, 0, sizeof(*host_ver));
5533 
5534     __get_user(host_ver->name_len, &target_ver->name_len);
5535     if (host_ver->name_len) {
5536         host_ver->name = lock_user(VERIFY_WRITE, target_ver->name,
5537                                    target_ver->name_len, 0);
5538         if (!host_ver->name) {
5539             return -EFAULT;
5540         }
5541     }
5542 
5543     __get_user(host_ver->date_len, &target_ver->date_len);
5544     if (host_ver->date_len) {
5545         host_ver->date = lock_user(VERIFY_WRITE, target_ver->date,
5546                                    target_ver->date_len, 0);
5547         if (!host_ver->date) {
5548             goto err;
5549         }
5550     }
5551 
5552     __get_user(host_ver->desc_len, &target_ver->desc_len);
5553     if (host_ver->desc_len) {
5554         host_ver->desc = lock_user(VERIFY_WRITE, target_ver->desc,
5555                                    target_ver->desc_len, 0);
5556         if (!host_ver->desc) {
5557             goto err;
5558         }
5559     }
5560 
5561     return 0;
5562 err:
5563     unlock_drm_version(host_ver, target_ver, false);
5564     return -EFAULT;
5565 }
5566 
5567 static inline void host_to_target_drmversion(
5568                                           struct target_drm_version *target_ver,
5569                                           struct drm_version *host_ver)
5570 {
5571     __put_user(host_ver->version_major, &target_ver->version_major);
5572     __put_user(host_ver->version_minor, &target_ver->version_minor);
5573     __put_user(host_ver->version_patchlevel, &target_ver->version_patchlevel);
5574     __put_user(host_ver->name_len, &target_ver->name_len);
5575     __put_user(host_ver->date_len, &target_ver->date_len);
5576     __put_user(host_ver->desc_len, &target_ver->desc_len);
5577     unlock_drm_version(host_ver, target_ver, true);
5578 }
5579 
5580 static abi_long do_ioctl_drm(const IOCTLEntry *ie, uint8_t *buf_temp,
5581                              int fd, int cmd, abi_long arg)
5582 {
5583     struct drm_version *ver;
5584     struct target_drm_version *target_ver;
5585     abi_long ret;
5586 
5587     switch (ie->host_cmd) {
5588     case DRM_IOCTL_VERSION:
5589         if (!lock_user_struct(VERIFY_WRITE, target_ver, arg, 0)) {
5590             return -TARGET_EFAULT;
5591         }
5592         ver = (struct drm_version *)buf_temp;
5593         ret = target_to_host_drmversion(ver, target_ver);
5594         if (!is_error(ret)) {
5595             ret = get_errno(safe_ioctl(fd, ie->host_cmd, ver));
5596             if (is_error(ret)) {
5597                 unlock_drm_version(ver, target_ver, false);
5598             } else {
5599                 host_to_target_drmversion(target_ver, ver);
5600             }
5601         }
5602         unlock_user_struct(target_ver, arg, 0);
5603         return ret;
5604     }
5605     return -TARGET_ENOSYS;
5606 }
5607 
5608 static abi_long do_ioctl_drm_i915_getparam(const IOCTLEntry *ie,
5609                                            struct drm_i915_getparam *gparam,
5610                                            int fd, abi_long arg)
5611 {
5612     abi_long ret;
5613     int value;
5614     struct target_drm_i915_getparam *target_gparam;
5615 
5616     if (!lock_user_struct(VERIFY_READ, target_gparam, arg, 0)) {
5617         return -TARGET_EFAULT;
5618     }
5619 
5620     __get_user(gparam->param, &target_gparam->param);
5621     gparam->value = &value;
5622     ret = get_errno(safe_ioctl(fd, ie->host_cmd, gparam));
5623     put_user_s32(value, target_gparam->value);
5624 
5625     unlock_user_struct(target_gparam, arg, 0);
5626     return ret;
5627 }
5628 
5629 static abi_long do_ioctl_drm_i915(const IOCTLEntry *ie, uint8_t *buf_temp,
5630                                   int fd, int cmd, abi_long arg)
5631 {
5632     switch (ie->host_cmd) {
5633     case DRM_IOCTL_I915_GETPARAM:
5634         return do_ioctl_drm_i915_getparam(ie,
5635                                           (struct drm_i915_getparam *)buf_temp,
5636                                           fd, arg);
5637     default:
5638         return -TARGET_ENOSYS;
5639     }
5640 }
5641 
5642 #endif
5643 
5644 static abi_long do_ioctl_TUNSETTXFILTER(const IOCTLEntry *ie, uint8_t *buf_temp,
5645                                         int fd, int cmd, abi_long arg)
5646 {
5647     struct tun_filter *filter = (struct tun_filter *)buf_temp;
5648     struct tun_filter *target_filter;
5649     char *target_addr;
5650 
5651     assert(ie->access == IOC_W);
5652 
5653     target_filter = lock_user(VERIFY_READ, arg, sizeof(*target_filter), 1);
5654     if (!target_filter) {
5655         return -TARGET_EFAULT;
5656     }
5657     filter->flags = tswap16(target_filter->flags);
5658     filter->count = tswap16(target_filter->count);
5659     unlock_user(target_filter, arg, 0);
5660 
5661     if (filter->count) {
5662         if (offsetof(struct tun_filter, addr) + filter->count * ETH_ALEN >
5663             MAX_STRUCT_SIZE) {
5664             return -TARGET_EFAULT;
5665         }
5666 
5667         target_addr = lock_user(VERIFY_READ,
5668                                 arg + offsetof(struct tun_filter, addr),
5669                                 filter->count * ETH_ALEN, 1);
5670         if (!target_addr) {
5671             return -TARGET_EFAULT;
5672         }
5673         memcpy(filter->addr, target_addr, filter->count * ETH_ALEN);
5674         unlock_user(target_addr, arg + offsetof(struct tun_filter, addr), 0);
5675     }
5676 
5677     return get_errno(safe_ioctl(fd, ie->host_cmd, filter));
5678 }
5679 
5680 IOCTLEntry ioctl_entries[] = {
5681 #define IOCTL(cmd, access, ...) \
5682     { TARGET_ ## cmd, cmd, #cmd, access, 0, {  __VA_ARGS__ } },
5683 #define IOCTL_SPECIAL(cmd, access, dofn, ...)                      \
5684     { TARGET_ ## cmd, cmd, #cmd, access, dofn, {  __VA_ARGS__ } },
5685 #define IOCTL_IGNORE(cmd) \
5686     { TARGET_ ## cmd, 0, #cmd },
5687 #include "ioctls.h"
5688     { 0, 0, },
5689 };
5690 
5691 /* ??? Implement proper locking for ioctls.  */
5692 /* do_ioctl() Must return target values and target errnos. */
5693 static abi_long do_ioctl(int fd, int cmd, abi_long arg)
5694 {
5695     const IOCTLEntry *ie;
5696     const argtype *arg_type;
5697     abi_long ret;
5698     uint8_t buf_temp[MAX_STRUCT_SIZE];
5699     int target_size;
5700     void *argptr;
5701 
5702     ie = ioctl_entries;
5703     for(;;) {
5704         if (ie->target_cmd == 0) {
5705             qemu_log_mask(
5706                 LOG_UNIMP, "Unsupported ioctl: cmd=0x%04lx\n", (long)cmd);
5707             return -TARGET_ENOSYS;
5708         }
5709         if (ie->target_cmd == cmd)
5710             break;
5711         ie++;
5712     }
5713     arg_type = ie->arg_type;
5714     if (ie->do_ioctl) {
5715         return ie->do_ioctl(ie, buf_temp, fd, cmd, arg);
5716     } else if (!ie->host_cmd) {
5717         /* Some architectures define BSD ioctls in their headers
5718            that are not implemented in Linux.  */
5719         return -TARGET_ENOSYS;
5720     }
5721 
5722     switch(arg_type[0]) {
5723     case TYPE_NULL:
5724         /* no argument */
5725         ret = get_errno(safe_ioctl(fd, ie->host_cmd));
5726         break;
5727     case TYPE_PTRVOID:
5728     case TYPE_INT:
5729     case TYPE_LONG:
5730     case TYPE_ULONG:
5731         ret = get_errno(safe_ioctl(fd, ie->host_cmd, arg));
5732         break;
5733     case TYPE_PTR:
5734         arg_type++;
5735         target_size = thunk_type_size(arg_type, 0);
5736         switch(ie->access) {
5737         case IOC_R:
5738             ret = get_errno(safe_ioctl(fd, ie->host_cmd, buf_temp));
5739             if (!is_error(ret)) {
5740                 argptr = lock_user(VERIFY_WRITE, arg, target_size, 0);
5741                 if (!argptr)
5742                     return -TARGET_EFAULT;
5743                 thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET);
5744                 unlock_user(argptr, arg, target_size);
5745             }
5746             break;
5747         case IOC_W:
5748             argptr = lock_user(VERIFY_READ, arg, target_size, 1);
5749             if (!argptr)
5750                 return -TARGET_EFAULT;
5751             thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
5752             unlock_user(argptr, arg, 0);
5753             ret = get_errno(safe_ioctl(fd, ie->host_cmd, buf_temp));
5754             break;
5755         default:
5756         case IOC_RW:
5757             argptr = lock_user(VERIFY_READ, arg, target_size, 1);
5758             if (!argptr)
5759                 return -TARGET_EFAULT;
5760             thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
5761             unlock_user(argptr, arg, 0);
5762             ret = get_errno(safe_ioctl(fd, ie->host_cmd, buf_temp));
5763             if (!is_error(ret)) {
5764                 argptr = lock_user(VERIFY_WRITE, arg, target_size, 0);
5765                 if (!argptr)
5766                     return -TARGET_EFAULT;
5767                 thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET);
5768                 unlock_user(argptr, arg, target_size);
5769             }
5770             break;
5771         }
5772         break;
5773     default:
5774         qemu_log_mask(LOG_UNIMP,
5775                       "Unsupported ioctl type: cmd=0x%04lx type=%d\n",
5776                       (long)cmd, arg_type[0]);
5777         ret = -TARGET_ENOSYS;
5778         break;
5779     }
5780     return ret;
5781 }
5782 
5783 static const bitmask_transtbl iflag_tbl[] = {
5784         { TARGET_IGNBRK, TARGET_IGNBRK, IGNBRK, IGNBRK },
5785         { TARGET_BRKINT, TARGET_BRKINT, BRKINT, BRKINT },
5786         { TARGET_IGNPAR, TARGET_IGNPAR, IGNPAR, IGNPAR },
5787         { TARGET_PARMRK, TARGET_PARMRK, PARMRK, PARMRK },
5788         { TARGET_INPCK, TARGET_INPCK, INPCK, INPCK },
5789         { TARGET_ISTRIP, TARGET_ISTRIP, ISTRIP, ISTRIP },
5790         { TARGET_INLCR, TARGET_INLCR, INLCR, INLCR },
5791         { TARGET_IGNCR, TARGET_IGNCR, IGNCR, IGNCR },
5792         { TARGET_ICRNL, TARGET_ICRNL, ICRNL, ICRNL },
5793         { TARGET_IUCLC, TARGET_IUCLC, IUCLC, IUCLC },
5794         { TARGET_IXON, TARGET_IXON, IXON, IXON },
5795         { TARGET_IXANY, TARGET_IXANY, IXANY, IXANY },
5796         { TARGET_IXOFF, TARGET_IXOFF, IXOFF, IXOFF },
5797         { TARGET_IMAXBEL, TARGET_IMAXBEL, IMAXBEL, IMAXBEL },
5798         { TARGET_IUTF8, TARGET_IUTF8, IUTF8, IUTF8},
5799         { 0, 0, 0, 0 }
5800 };
5801 
5802 static const bitmask_transtbl oflag_tbl[] = {
5803 	{ TARGET_OPOST, TARGET_OPOST, OPOST, OPOST },
5804 	{ TARGET_OLCUC, TARGET_OLCUC, OLCUC, OLCUC },
5805 	{ TARGET_ONLCR, TARGET_ONLCR, ONLCR, ONLCR },
5806 	{ TARGET_OCRNL, TARGET_OCRNL, OCRNL, OCRNL },
5807 	{ TARGET_ONOCR, TARGET_ONOCR, ONOCR, ONOCR },
5808 	{ TARGET_ONLRET, TARGET_ONLRET, ONLRET, ONLRET },
5809 	{ TARGET_OFILL, TARGET_OFILL, OFILL, OFILL },
5810 	{ TARGET_OFDEL, TARGET_OFDEL, OFDEL, OFDEL },
5811 	{ TARGET_NLDLY, TARGET_NL0, NLDLY, NL0 },
5812 	{ TARGET_NLDLY, TARGET_NL1, NLDLY, NL1 },
5813 	{ TARGET_CRDLY, TARGET_CR0, CRDLY, CR0 },
5814 	{ TARGET_CRDLY, TARGET_CR1, CRDLY, CR1 },
5815 	{ TARGET_CRDLY, TARGET_CR2, CRDLY, CR2 },
5816 	{ TARGET_CRDLY, TARGET_CR3, CRDLY, CR3 },
5817 	{ TARGET_TABDLY, TARGET_TAB0, TABDLY, TAB0 },
5818 	{ TARGET_TABDLY, TARGET_TAB1, TABDLY, TAB1 },
5819 	{ TARGET_TABDLY, TARGET_TAB2, TABDLY, TAB2 },
5820 	{ TARGET_TABDLY, TARGET_TAB3, TABDLY, TAB3 },
5821 	{ TARGET_BSDLY, TARGET_BS0, BSDLY, BS0 },
5822 	{ TARGET_BSDLY, TARGET_BS1, BSDLY, BS1 },
5823 	{ TARGET_VTDLY, TARGET_VT0, VTDLY, VT0 },
5824 	{ TARGET_VTDLY, TARGET_VT1, VTDLY, VT1 },
5825 	{ TARGET_FFDLY, TARGET_FF0, FFDLY, FF0 },
5826 	{ TARGET_FFDLY, TARGET_FF1, FFDLY, FF1 },
5827 	{ 0, 0, 0, 0 }
5828 };
5829 
5830 static const bitmask_transtbl cflag_tbl[] = {
5831 	{ TARGET_CBAUD, TARGET_B0, CBAUD, B0 },
5832 	{ TARGET_CBAUD, TARGET_B50, CBAUD, B50 },
5833 	{ TARGET_CBAUD, TARGET_B75, CBAUD, B75 },
5834 	{ TARGET_CBAUD, TARGET_B110, CBAUD, B110 },
5835 	{ TARGET_CBAUD, TARGET_B134, CBAUD, B134 },
5836 	{ TARGET_CBAUD, TARGET_B150, CBAUD, B150 },
5837 	{ TARGET_CBAUD, TARGET_B200, CBAUD, B200 },
5838 	{ TARGET_CBAUD, TARGET_B300, CBAUD, B300 },
5839 	{ TARGET_CBAUD, TARGET_B600, CBAUD, B600 },
5840 	{ TARGET_CBAUD, TARGET_B1200, CBAUD, B1200 },
5841 	{ TARGET_CBAUD, TARGET_B1800, CBAUD, B1800 },
5842 	{ TARGET_CBAUD, TARGET_B2400, CBAUD, B2400 },
5843 	{ TARGET_CBAUD, TARGET_B4800, CBAUD, B4800 },
5844 	{ TARGET_CBAUD, TARGET_B9600, CBAUD, B9600 },
5845 	{ TARGET_CBAUD, TARGET_B19200, CBAUD, B19200 },
5846 	{ TARGET_CBAUD, TARGET_B38400, CBAUD, B38400 },
5847 	{ TARGET_CBAUD, TARGET_B57600, CBAUD, B57600 },
5848 	{ TARGET_CBAUD, TARGET_B115200, CBAUD, B115200 },
5849 	{ TARGET_CBAUD, TARGET_B230400, CBAUD, B230400 },
5850 	{ TARGET_CBAUD, TARGET_B460800, CBAUD, B460800 },
5851 	{ TARGET_CSIZE, TARGET_CS5, CSIZE, CS5 },
5852 	{ TARGET_CSIZE, TARGET_CS6, CSIZE, CS6 },
5853 	{ TARGET_CSIZE, TARGET_CS7, CSIZE, CS7 },
5854 	{ TARGET_CSIZE, TARGET_CS8, CSIZE, CS8 },
5855 	{ TARGET_CSTOPB, TARGET_CSTOPB, CSTOPB, CSTOPB },
5856 	{ TARGET_CREAD, TARGET_CREAD, CREAD, CREAD },
5857 	{ TARGET_PARENB, TARGET_PARENB, PARENB, PARENB },
5858 	{ TARGET_PARODD, TARGET_PARODD, PARODD, PARODD },
5859 	{ TARGET_HUPCL, TARGET_HUPCL, HUPCL, HUPCL },
5860 	{ TARGET_CLOCAL, TARGET_CLOCAL, CLOCAL, CLOCAL },
5861 	{ TARGET_CRTSCTS, TARGET_CRTSCTS, CRTSCTS, CRTSCTS },
5862 	{ 0, 0, 0, 0 }
5863 };
5864 
5865 static const bitmask_transtbl lflag_tbl[] = {
5866   { TARGET_ISIG, TARGET_ISIG, ISIG, ISIG },
5867   { TARGET_ICANON, TARGET_ICANON, ICANON, ICANON },
5868   { TARGET_XCASE, TARGET_XCASE, XCASE, XCASE },
5869   { TARGET_ECHO, TARGET_ECHO, ECHO, ECHO },
5870   { TARGET_ECHOE, TARGET_ECHOE, ECHOE, ECHOE },
5871   { TARGET_ECHOK, TARGET_ECHOK, ECHOK, ECHOK },
5872   { TARGET_ECHONL, TARGET_ECHONL, ECHONL, ECHONL },
5873   { TARGET_NOFLSH, TARGET_NOFLSH, NOFLSH, NOFLSH },
5874   { TARGET_TOSTOP, TARGET_TOSTOP, TOSTOP, TOSTOP },
5875   { TARGET_ECHOCTL, TARGET_ECHOCTL, ECHOCTL, ECHOCTL },
5876   { TARGET_ECHOPRT, TARGET_ECHOPRT, ECHOPRT, ECHOPRT },
5877   { TARGET_ECHOKE, TARGET_ECHOKE, ECHOKE, ECHOKE },
5878   { TARGET_FLUSHO, TARGET_FLUSHO, FLUSHO, FLUSHO },
5879   { TARGET_PENDIN, TARGET_PENDIN, PENDIN, PENDIN },
5880   { TARGET_IEXTEN, TARGET_IEXTEN, IEXTEN, IEXTEN },
5881   { TARGET_EXTPROC, TARGET_EXTPROC, EXTPROC, EXTPROC},
5882   { 0, 0, 0, 0 }
5883 };
5884 
5885 static void target_to_host_termios (void *dst, const void *src)
5886 {
5887     struct host_termios *host = dst;
5888     const struct target_termios *target = src;
5889 
5890     host->c_iflag =
5891         target_to_host_bitmask(tswap32(target->c_iflag), iflag_tbl);
5892     host->c_oflag =
5893         target_to_host_bitmask(tswap32(target->c_oflag), oflag_tbl);
5894     host->c_cflag =
5895         target_to_host_bitmask(tswap32(target->c_cflag), cflag_tbl);
5896     host->c_lflag =
5897         target_to_host_bitmask(tswap32(target->c_lflag), lflag_tbl);
5898     host->c_line = target->c_line;
5899 
5900     memset(host->c_cc, 0, sizeof(host->c_cc));
5901     host->c_cc[VINTR] = target->c_cc[TARGET_VINTR];
5902     host->c_cc[VQUIT] = target->c_cc[TARGET_VQUIT];
5903     host->c_cc[VERASE] = target->c_cc[TARGET_VERASE];
5904     host->c_cc[VKILL] = target->c_cc[TARGET_VKILL];
5905     host->c_cc[VEOF] = target->c_cc[TARGET_VEOF];
5906     host->c_cc[VTIME] = target->c_cc[TARGET_VTIME];
5907     host->c_cc[VMIN] = target->c_cc[TARGET_VMIN];
5908     host->c_cc[VSWTC] = target->c_cc[TARGET_VSWTC];
5909     host->c_cc[VSTART] = target->c_cc[TARGET_VSTART];
5910     host->c_cc[VSTOP] = target->c_cc[TARGET_VSTOP];
5911     host->c_cc[VSUSP] = target->c_cc[TARGET_VSUSP];
5912     host->c_cc[VEOL] = target->c_cc[TARGET_VEOL];
5913     host->c_cc[VREPRINT] = target->c_cc[TARGET_VREPRINT];
5914     host->c_cc[VDISCARD] = target->c_cc[TARGET_VDISCARD];
5915     host->c_cc[VWERASE] = target->c_cc[TARGET_VWERASE];
5916     host->c_cc[VLNEXT] = target->c_cc[TARGET_VLNEXT];
5917     host->c_cc[VEOL2] = target->c_cc[TARGET_VEOL2];
5918 }
5919 
5920 static void host_to_target_termios (void *dst, const void *src)
5921 {
5922     struct target_termios *target = dst;
5923     const struct host_termios *host = src;
5924 
5925     target->c_iflag =
5926         tswap32(host_to_target_bitmask(host->c_iflag, iflag_tbl));
5927     target->c_oflag =
5928         tswap32(host_to_target_bitmask(host->c_oflag, oflag_tbl));
5929     target->c_cflag =
5930         tswap32(host_to_target_bitmask(host->c_cflag, cflag_tbl));
5931     target->c_lflag =
5932         tswap32(host_to_target_bitmask(host->c_lflag, lflag_tbl));
5933     target->c_line = host->c_line;
5934 
5935     memset(target->c_cc, 0, sizeof(target->c_cc));
5936     target->c_cc[TARGET_VINTR] = host->c_cc[VINTR];
5937     target->c_cc[TARGET_VQUIT] = host->c_cc[VQUIT];
5938     target->c_cc[TARGET_VERASE] = host->c_cc[VERASE];
5939     target->c_cc[TARGET_VKILL] = host->c_cc[VKILL];
5940     target->c_cc[TARGET_VEOF] = host->c_cc[VEOF];
5941     target->c_cc[TARGET_VTIME] = host->c_cc[VTIME];
5942     target->c_cc[TARGET_VMIN] = host->c_cc[VMIN];
5943     target->c_cc[TARGET_VSWTC] = host->c_cc[VSWTC];
5944     target->c_cc[TARGET_VSTART] = host->c_cc[VSTART];
5945     target->c_cc[TARGET_VSTOP] = host->c_cc[VSTOP];
5946     target->c_cc[TARGET_VSUSP] = host->c_cc[VSUSP];
5947     target->c_cc[TARGET_VEOL] = host->c_cc[VEOL];
5948     target->c_cc[TARGET_VREPRINT] = host->c_cc[VREPRINT];
5949     target->c_cc[TARGET_VDISCARD] = host->c_cc[VDISCARD];
5950     target->c_cc[TARGET_VWERASE] = host->c_cc[VWERASE];
5951     target->c_cc[TARGET_VLNEXT] = host->c_cc[VLNEXT];
5952     target->c_cc[TARGET_VEOL2] = host->c_cc[VEOL2];
5953 }
5954 
5955 static const StructEntry struct_termios_def = {
5956     .convert = { host_to_target_termios, target_to_host_termios },
5957     .size = { sizeof(struct target_termios), sizeof(struct host_termios) },
5958     .align = { __alignof__(struct target_termios), __alignof__(struct host_termios) },
5959     .print = print_termios,
5960 };
5961 
5962 static const bitmask_transtbl mmap_flags_tbl[] = {
5963     { TARGET_MAP_SHARED, TARGET_MAP_SHARED, MAP_SHARED, MAP_SHARED },
5964     { TARGET_MAP_PRIVATE, TARGET_MAP_PRIVATE, MAP_PRIVATE, MAP_PRIVATE },
5965     { TARGET_MAP_FIXED, TARGET_MAP_FIXED, MAP_FIXED, MAP_FIXED },
5966     { TARGET_MAP_ANONYMOUS, TARGET_MAP_ANONYMOUS,
5967       MAP_ANONYMOUS, MAP_ANONYMOUS },
5968     { TARGET_MAP_GROWSDOWN, TARGET_MAP_GROWSDOWN,
5969       MAP_GROWSDOWN, MAP_GROWSDOWN },
5970     { TARGET_MAP_DENYWRITE, TARGET_MAP_DENYWRITE,
5971       MAP_DENYWRITE, MAP_DENYWRITE },
5972     { TARGET_MAP_EXECUTABLE, TARGET_MAP_EXECUTABLE,
5973       MAP_EXECUTABLE, MAP_EXECUTABLE },
5974     { TARGET_MAP_LOCKED, TARGET_MAP_LOCKED, MAP_LOCKED, MAP_LOCKED },
5975     { TARGET_MAP_NORESERVE, TARGET_MAP_NORESERVE,
5976       MAP_NORESERVE, MAP_NORESERVE },
5977     { TARGET_MAP_HUGETLB, TARGET_MAP_HUGETLB, MAP_HUGETLB, MAP_HUGETLB },
5978     /* MAP_STACK had been ignored by the kernel for quite some time.
5979        Recognize it for the target insofar as we do not want to pass
5980        it through to the host.  */
5981     { TARGET_MAP_STACK, TARGET_MAP_STACK, 0, 0 },
5982     { 0, 0, 0, 0 }
5983 };
5984 
5985 /*
5986  * NOTE: TARGET_ABI32 is defined for TARGET_I386 (but not for TARGET_X86_64)
5987  *       TARGET_I386 is defined if TARGET_X86_64 is defined
5988  */
5989 #if defined(TARGET_I386)
5990 
5991 /* NOTE: there is really one LDT for all the threads */
5992 static uint8_t *ldt_table;
5993 
5994 static abi_long read_ldt(abi_ulong ptr, unsigned long bytecount)
5995 {
5996     int size;
5997     void *p;
5998 
5999     if (!ldt_table)
6000         return 0;
6001     size = TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE;
6002     if (size > bytecount)
6003         size = bytecount;
6004     p = lock_user(VERIFY_WRITE, ptr, size, 0);
6005     if (!p)
6006         return -TARGET_EFAULT;
6007     /* ??? Should this by byteswapped?  */
6008     memcpy(p, ldt_table, size);
6009     unlock_user(p, ptr, size);
6010     return size;
6011 }
6012 
6013 /* XXX: add locking support */
6014 static abi_long write_ldt(CPUX86State *env,
6015                           abi_ulong ptr, unsigned long bytecount, int oldmode)
6016 {
6017     struct target_modify_ldt_ldt_s ldt_info;
6018     struct target_modify_ldt_ldt_s *target_ldt_info;
6019     int seg_32bit, contents, read_exec_only, limit_in_pages;
6020     int seg_not_present, useable, lm;
6021     uint32_t *lp, entry_1, entry_2;
6022 
6023     if (bytecount != sizeof(ldt_info))
6024         return -TARGET_EINVAL;
6025     if (!lock_user_struct(VERIFY_READ, target_ldt_info, ptr, 1))
6026         return -TARGET_EFAULT;
6027     ldt_info.entry_number = tswap32(target_ldt_info->entry_number);
6028     ldt_info.base_addr = tswapal(target_ldt_info->base_addr);
6029     ldt_info.limit = tswap32(target_ldt_info->limit);
6030     ldt_info.flags = tswap32(target_ldt_info->flags);
6031     unlock_user_struct(target_ldt_info, ptr, 0);
6032 
6033     if (ldt_info.entry_number >= TARGET_LDT_ENTRIES)
6034         return -TARGET_EINVAL;
6035     seg_32bit = ldt_info.flags & 1;
6036     contents = (ldt_info.flags >> 1) & 3;
6037     read_exec_only = (ldt_info.flags >> 3) & 1;
6038     limit_in_pages = (ldt_info.flags >> 4) & 1;
6039     seg_not_present = (ldt_info.flags >> 5) & 1;
6040     useable = (ldt_info.flags >> 6) & 1;
6041 #ifdef TARGET_ABI32
6042     lm = 0;
6043 #else
6044     lm = (ldt_info.flags >> 7) & 1;
6045 #endif
6046     if (contents == 3) {
6047         if (oldmode)
6048             return -TARGET_EINVAL;
6049         if (seg_not_present == 0)
6050             return -TARGET_EINVAL;
6051     }
6052     /* allocate the LDT */
6053     if (!ldt_table) {
6054         env->ldt.base = target_mmap(0,
6055                                     TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE,
6056                                     PROT_READ|PROT_WRITE,
6057                                     MAP_ANONYMOUS|MAP_PRIVATE, -1, 0);
6058         if (env->ldt.base == -1)
6059             return -TARGET_ENOMEM;
6060         memset(g2h_untagged(env->ldt.base), 0,
6061                TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE);
6062         env->ldt.limit = 0xffff;
6063         ldt_table = g2h_untagged(env->ldt.base);
6064     }
6065 
6066     /* NOTE: same code as Linux kernel */
6067     /* Allow LDTs to be cleared by the user. */
6068     if (ldt_info.base_addr == 0 && ldt_info.limit == 0) {
6069         if (oldmode ||
6070             (contents == 0		&&
6071              read_exec_only == 1	&&
6072              seg_32bit == 0		&&
6073              limit_in_pages == 0	&&
6074              seg_not_present == 1	&&
6075              useable == 0 )) {
6076             entry_1 = 0;
6077             entry_2 = 0;
6078             goto install;
6079         }
6080     }
6081 
6082     entry_1 = ((ldt_info.base_addr & 0x0000ffff) << 16) |
6083         (ldt_info.limit & 0x0ffff);
6084     entry_2 = (ldt_info.base_addr & 0xff000000) |
6085         ((ldt_info.base_addr & 0x00ff0000) >> 16) |
6086         (ldt_info.limit & 0xf0000) |
6087         ((read_exec_only ^ 1) << 9) |
6088         (contents << 10) |
6089         ((seg_not_present ^ 1) << 15) |
6090         (seg_32bit << 22) |
6091         (limit_in_pages << 23) |
6092         (lm << 21) |
6093         0x7000;
6094     if (!oldmode)
6095         entry_2 |= (useable << 20);
6096 
6097     /* Install the new entry ...  */
6098 install:
6099     lp = (uint32_t *)(ldt_table + (ldt_info.entry_number << 3));
6100     lp[0] = tswap32(entry_1);
6101     lp[1] = tswap32(entry_2);
6102     return 0;
6103 }
6104 
6105 /* specific and weird i386 syscalls */
6106 static abi_long do_modify_ldt(CPUX86State *env, int func, abi_ulong ptr,
6107                               unsigned long bytecount)
6108 {
6109     abi_long ret;
6110 
6111     switch (func) {
6112     case 0:
6113         ret = read_ldt(ptr, bytecount);
6114         break;
6115     case 1:
6116         ret = write_ldt(env, ptr, bytecount, 1);
6117         break;
6118     case 0x11:
6119         ret = write_ldt(env, ptr, bytecount, 0);
6120         break;
6121     default:
6122         ret = -TARGET_ENOSYS;
6123         break;
6124     }
6125     return ret;
6126 }
6127 
6128 #if defined(TARGET_ABI32)
6129 abi_long do_set_thread_area(CPUX86State *env, abi_ulong ptr)
6130 {
6131     uint64_t *gdt_table = g2h_untagged(env->gdt.base);
6132     struct target_modify_ldt_ldt_s ldt_info;
6133     struct target_modify_ldt_ldt_s *target_ldt_info;
6134     int seg_32bit, contents, read_exec_only, limit_in_pages;
6135     int seg_not_present, useable, lm;
6136     uint32_t *lp, entry_1, entry_2;
6137     int i;
6138 
6139     lock_user_struct(VERIFY_WRITE, target_ldt_info, ptr, 1);
6140     if (!target_ldt_info)
6141         return -TARGET_EFAULT;
6142     ldt_info.entry_number = tswap32(target_ldt_info->entry_number);
6143     ldt_info.base_addr = tswapal(target_ldt_info->base_addr);
6144     ldt_info.limit = tswap32(target_ldt_info->limit);
6145     ldt_info.flags = tswap32(target_ldt_info->flags);
6146     if (ldt_info.entry_number == -1) {
6147         for (i=TARGET_GDT_ENTRY_TLS_MIN; i<=TARGET_GDT_ENTRY_TLS_MAX; i++) {
6148             if (gdt_table[i] == 0) {
6149                 ldt_info.entry_number = i;
6150                 target_ldt_info->entry_number = tswap32(i);
6151                 break;
6152             }
6153         }
6154     }
6155     unlock_user_struct(target_ldt_info, ptr, 1);
6156 
6157     if (ldt_info.entry_number < TARGET_GDT_ENTRY_TLS_MIN ||
6158         ldt_info.entry_number > TARGET_GDT_ENTRY_TLS_MAX)
6159            return -TARGET_EINVAL;
6160     seg_32bit = ldt_info.flags & 1;
6161     contents = (ldt_info.flags >> 1) & 3;
6162     read_exec_only = (ldt_info.flags >> 3) & 1;
6163     limit_in_pages = (ldt_info.flags >> 4) & 1;
6164     seg_not_present = (ldt_info.flags >> 5) & 1;
6165     useable = (ldt_info.flags >> 6) & 1;
6166 #ifdef TARGET_ABI32
6167     lm = 0;
6168 #else
6169     lm = (ldt_info.flags >> 7) & 1;
6170 #endif
6171 
6172     if (contents == 3) {
6173         if (seg_not_present == 0)
6174             return -TARGET_EINVAL;
6175     }
6176 
6177     /* NOTE: same code as Linux kernel */
6178     /* Allow LDTs to be cleared by the user. */
6179     if (ldt_info.base_addr == 0 && ldt_info.limit == 0) {
6180         if ((contents == 0             &&
6181              read_exec_only == 1       &&
6182              seg_32bit == 0            &&
6183              limit_in_pages == 0       &&
6184              seg_not_present == 1      &&
6185              useable == 0 )) {
6186             entry_1 = 0;
6187             entry_2 = 0;
6188             goto install;
6189         }
6190     }
6191 
6192     entry_1 = ((ldt_info.base_addr & 0x0000ffff) << 16) |
6193         (ldt_info.limit & 0x0ffff);
6194     entry_2 = (ldt_info.base_addr & 0xff000000) |
6195         ((ldt_info.base_addr & 0x00ff0000) >> 16) |
6196         (ldt_info.limit & 0xf0000) |
6197         ((read_exec_only ^ 1) << 9) |
6198         (contents << 10) |
6199         ((seg_not_present ^ 1) << 15) |
6200         (seg_32bit << 22) |
6201         (limit_in_pages << 23) |
6202         (useable << 20) |
6203         (lm << 21) |
6204         0x7000;
6205 
6206     /* Install the new entry ...  */
6207 install:
6208     lp = (uint32_t *)(gdt_table + ldt_info.entry_number);
6209     lp[0] = tswap32(entry_1);
6210     lp[1] = tswap32(entry_2);
6211     return 0;
6212 }
6213 
6214 static abi_long do_get_thread_area(CPUX86State *env, abi_ulong ptr)
6215 {
6216     struct target_modify_ldt_ldt_s *target_ldt_info;
6217     uint64_t *gdt_table = g2h_untagged(env->gdt.base);
6218     uint32_t base_addr, limit, flags;
6219     int seg_32bit, contents, read_exec_only, limit_in_pages, idx;
6220     int seg_not_present, useable, lm;
6221     uint32_t *lp, entry_1, entry_2;
6222 
6223     lock_user_struct(VERIFY_WRITE, target_ldt_info, ptr, 1);
6224     if (!target_ldt_info)
6225         return -TARGET_EFAULT;
6226     idx = tswap32(target_ldt_info->entry_number);
6227     if (idx < TARGET_GDT_ENTRY_TLS_MIN ||
6228         idx > TARGET_GDT_ENTRY_TLS_MAX) {
6229         unlock_user_struct(target_ldt_info, ptr, 1);
6230         return -TARGET_EINVAL;
6231     }
6232     lp = (uint32_t *)(gdt_table + idx);
6233     entry_1 = tswap32(lp[0]);
6234     entry_2 = tswap32(lp[1]);
6235 
6236     read_exec_only = ((entry_2 >> 9) & 1) ^ 1;
6237     contents = (entry_2 >> 10) & 3;
6238     seg_not_present = ((entry_2 >> 15) & 1) ^ 1;
6239     seg_32bit = (entry_2 >> 22) & 1;
6240     limit_in_pages = (entry_2 >> 23) & 1;
6241     useable = (entry_2 >> 20) & 1;
6242 #ifdef TARGET_ABI32
6243     lm = 0;
6244 #else
6245     lm = (entry_2 >> 21) & 1;
6246 #endif
6247     flags = (seg_32bit << 0) | (contents << 1) |
6248         (read_exec_only << 3) | (limit_in_pages << 4) |
6249         (seg_not_present << 5) | (useable << 6) | (lm << 7);
6250     limit = (entry_1 & 0xffff) | (entry_2  & 0xf0000);
6251     base_addr = (entry_1 >> 16) |
6252         (entry_2 & 0xff000000) |
6253         ((entry_2 & 0xff) << 16);
6254     target_ldt_info->base_addr = tswapal(base_addr);
6255     target_ldt_info->limit = tswap32(limit);
6256     target_ldt_info->flags = tswap32(flags);
6257     unlock_user_struct(target_ldt_info, ptr, 1);
6258     return 0;
6259 }
6260 
6261 abi_long do_arch_prctl(CPUX86State *env, int code, abi_ulong addr)
6262 {
6263     return -TARGET_ENOSYS;
6264 }
6265 #else
6266 abi_long do_arch_prctl(CPUX86State *env, int code, abi_ulong addr)
6267 {
6268     abi_long ret = 0;
6269     abi_ulong val;
6270     int idx;
6271 
6272     switch(code) {
6273     case TARGET_ARCH_SET_GS:
6274     case TARGET_ARCH_SET_FS:
6275         if (code == TARGET_ARCH_SET_GS)
6276             idx = R_GS;
6277         else
6278             idx = R_FS;
6279         cpu_x86_load_seg(env, idx, 0);
6280         env->segs[idx].base = addr;
6281         break;
6282     case TARGET_ARCH_GET_GS:
6283     case TARGET_ARCH_GET_FS:
6284         if (code == TARGET_ARCH_GET_GS)
6285             idx = R_GS;
6286         else
6287             idx = R_FS;
6288         val = env->segs[idx].base;
6289         if (put_user(val, addr, abi_ulong))
6290             ret = -TARGET_EFAULT;
6291         break;
6292     default:
6293         ret = -TARGET_EINVAL;
6294         break;
6295     }
6296     return ret;
6297 }
6298 #endif /* defined(TARGET_ABI32 */
6299 #endif /* defined(TARGET_I386) */
6300 
6301 /*
6302  * These constants are generic.  Supply any that are missing from the host.
6303  */
6304 #ifndef PR_SET_NAME
6305 # define PR_SET_NAME    15
6306 # define PR_GET_NAME    16
6307 #endif
6308 #ifndef PR_SET_FP_MODE
6309 # define PR_SET_FP_MODE 45
6310 # define PR_GET_FP_MODE 46
6311 # define PR_FP_MODE_FR   (1 << 0)
6312 # define PR_FP_MODE_FRE  (1 << 1)
6313 #endif
6314 #ifndef PR_SVE_SET_VL
6315 # define PR_SVE_SET_VL  50
6316 # define PR_SVE_GET_VL  51
6317 # define PR_SVE_VL_LEN_MASK  0xffff
6318 # define PR_SVE_VL_INHERIT   (1 << 17)
6319 #endif
6320 #ifndef PR_PAC_RESET_KEYS
6321 # define PR_PAC_RESET_KEYS  54
6322 # define PR_PAC_APIAKEY   (1 << 0)
6323 # define PR_PAC_APIBKEY   (1 << 1)
6324 # define PR_PAC_APDAKEY   (1 << 2)
6325 # define PR_PAC_APDBKEY   (1 << 3)
6326 # define PR_PAC_APGAKEY   (1 << 4)
6327 #endif
6328 #ifndef PR_SET_TAGGED_ADDR_CTRL
6329 # define PR_SET_TAGGED_ADDR_CTRL 55
6330 # define PR_GET_TAGGED_ADDR_CTRL 56
6331 # define PR_TAGGED_ADDR_ENABLE  (1UL << 0)
6332 #endif
6333 #ifndef PR_MTE_TCF_SHIFT
6334 # define PR_MTE_TCF_SHIFT       1
6335 # define PR_MTE_TCF_NONE        (0UL << PR_MTE_TCF_SHIFT)
6336 # define PR_MTE_TCF_SYNC        (1UL << PR_MTE_TCF_SHIFT)
6337 # define PR_MTE_TCF_ASYNC       (2UL << PR_MTE_TCF_SHIFT)
6338 # define PR_MTE_TCF_MASK        (3UL << PR_MTE_TCF_SHIFT)
6339 # define PR_MTE_TAG_SHIFT       3
6340 # define PR_MTE_TAG_MASK        (0xffffUL << PR_MTE_TAG_SHIFT)
6341 #endif
6342 #ifndef PR_SET_IO_FLUSHER
6343 # define PR_SET_IO_FLUSHER 57
6344 # define PR_GET_IO_FLUSHER 58
6345 #endif
6346 #ifndef PR_SET_SYSCALL_USER_DISPATCH
6347 # define PR_SET_SYSCALL_USER_DISPATCH 59
6348 #endif
6349 
6350 #include "target_prctl.h"
6351 
6352 static abi_long do_prctl_inval0(CPUArchState *env)
6353 {
6354     return -TARGET_EINVAL;
6355 }
6356 
6357 static abi_long do_prctl_inval1(CPUArchState *env, abi_long arg2)
6358 {
6359     return -TARGET_EINVAL;
6360 }
6361 
6362 #ifndef do_prctl_get_fp_mode
6363 #define do_prctl_get_fp_mode do_prctl_inval0
6364 #endif
6365 #ifndef do_prctl_set_fp_mode
6366 #define do_prctl_set_fp_mode do_prctl_inval1
6367 #endif
6368 #ifndef do_prctl_get_vl
6369 #define do_prctl_get_vl do_prctl_inval0
6370 #endif
6371 #ifndef do_prctl_set_vl
6372 #define do_prctl_set_vl do_prctl_inval1
6373 #endif
6374 #ifndef do_prctl_reset_keys
6375 #define do_prctl_reset_keys do_prctl_inval1
6376 #endif
6377 #ifndef do_prctl_set_tagged_addr_ctrl
6378 #define do_prctl_set_tagged_addr_ctrl do_prctl_inval1
6379 #endif
6380 #ifndef do_prctl_get_tagged_addr_ctrl
6381 #define do_prctl_get_tagged_addr_ctrl do_prctl_inval0
6382 #endif
6383 #ifndef do_prctl_get_unalign
6384 #define do_prctl_get_unalign do_prctl_inval1
6385 #endif
6386 #ifndef do_prctl_set_unalign
6387 #define do_prctl_set_unalign do_prctl_inval1
6388 #endif
6389 
6390 static abi_long do_prctl(CPUArchState *env, abi_long option, abi_long arg2,
6391                          abi_long arg3, abi_long arg4, abi_long arg5)
6392 {
6393     abi_long ret;
6394 
6395     switch (option) {
6396     case PR_GET_PDEATHSIG:
6397         {
6398             int deathsig;
6399             ret = get_errno(prctl(PR_GET_PDEATHSIG, &deathsig,
6400                                   arg3, arg4, arg5));
6401             if (!is_error(ret) &&
6402                 put_user_s32(host_to_target_signal(deathsig), arg2)) {
6403                 return -TARGET_EFAULT;
6404             }
6405             return ret;
6406         }
6407     case PR_SET_PDEATHSIG:
6408         return get_errno(prctl(PR_SET_PDEATHSIG, target_to_host_signal(arg2),
6409                                arg3, arg4, arg5));
6410     case PR_GET_NAME:
6411         {
6412             void *name = lock_user(VERIFY_WRITE, arg2, 16, 1);
6413             if (!name) {
6414                 return -TARGET_EFAULT;
6415             }
6416             ret = get_errno(prctl(PR_GET_NAME, (uintptr_t)name,
6417                                   arg3, arg4, arg5));
6418             unlock_user(name, arg2, 16);
6419             return ret;
6420         }
6421     case PR_SET_NAME:
6422         {
6423             void *name = lock_user(VERIFY_READ, arg2, 16, 1);
6424             if (!name) {
6425                 return -TARGET_EFAULT;
6426             }
6427             ret = get_errno(prctl(PR_SET_NAME, (uintptr_t)name,
6428                                   arg3, arg4, arg5));
6429             unlock_user(name, arg2, 0);
6430             return ret;
6431         }
6432     case PR_GET_FP_MODE:
6433         return do_prctl_get_fp_mode(env);
6434     case PR_SET_FP_MODE:
6435         return do_prctl_set_fp_mode(env, arg2);
6436     case PR_SVE_GET_VL:
6437         return do_prctl_get_vl(env);
6438     case PR_SVE_SET_VL:
6439         return do_prctl_set_vl(env, arg2);
6440     case PR_PAC_RESET_KEYS:
6441         if (arg3 || arg4 || arg5) {
6442             return -TARGET_EINVAL;
6443         }
6444         return do_prctl_reset_keys(env, arg2);
6445     case PR_SET_TAGGED_ADDR_CTRL:
6446         if (arg3 || arg4 || arg5) {
6447             return -TARGET_EINVAL;
6448         }
6449         return do_prctl_set_tagged_addr_ctrl(env, arg2);
6450     case PR_GET_TAGGED_ADDR_CTRL:
6451         if (arg2 || arg3 || arg4 || arg5) {
6452             return -TARGET_EINVAL;
6453         }
6454         return do_prctl_get_tagged_addr_ctrl(env);
6455 
6456     case PR_GET_UNALIGN:
6457         return do_prctl_get_unalign(env, arg2);
6458     case PR_SET_UNALIGN:
6459         return do_prctl_set_unalign(env, arg2);
6460 
6461     case PR_CAP_AMBIENT:
6462     case PR_CAPBSET_READ:
6463     case PR_CAPBSET_DROP:
6464     case PR_GET_DUMPABLE:
6465     case PR_SET_DUMPABLE:
6466     case PR_GET_KEEPCAPS:
6467     case PR_SET_KEEPCAPS:
6468     case PR_GET_SECUREBITS:
6469     case PR_SET_SECUREBITS:
6470     case PR_GET_TIMING:
6471     case PR_SET_TIMING:
6472     case PR_GET_TIMERSLACK:
6473     case PR_SET_TIMERSLACK:
6474     case PR_MCE_KILL:
6475     case PR_MCE_KILL_GET:
6476     case PR_GET_NO_NEW_PRIVS:
6477     case PR_SET_NO_NEW_PRIVS:
6478     case PR_GET_IO_FLUSHER:
6479     case PR_SET_IO_FLUSHER:
6480         /* Some prctl options have no pointer arguments and we can pass on. */
6481         return get_errno(prctl(option, arg2, arg3, arg4, arg5));
6482 
6483     case PR_GET_CHILD_SUBREAPER:
6484     case PR_SET_CHILD_SUBREAPER:
6485     case PR_GET_SPECULATION_CTRL:
6486     case PR_SET_SPECULATION_CTRL:
6487     case PR_GET_TID_ADDRESS:
6488         /* TODO */
6489         return -TARGET_EINVAL;
6490 
6491     case PR_GET_FPEXC:
6492     case PR_SET_FPEXC:
6493         /* Was used for SPE on PowerPC. */
6494         return -TARGET_EINVAL;
6495 
6496     case PR_GET_ENDIAN:
6497     case PR_SET_ENDIAN:
6498     case PR_GET_FPEMU:
6499     case PR_SET_FPEMU:
6500     case PR_SET_MM:
6501     case PR_GET_SECCOMP:
6502     case PR_SET_SECCOMP:
6503     case PR_SET_SYSCALL_USER_DISPATCH:
6504     case PR_GET_THP_DISABLE:
6505     case PR_SET_THP_DISABLE:
6506     case PR_GET_TSC:
6507     case PR_SET_TSC:
6508         /* Disable to prevent the target disabling stuff we need. */
6509         return -TARGET_EINVAL;
6510 
6511     default:
6512         qemu_log_mask(LOG_UNIMP, "Unsupported prctl: " TARGET_ABI_FMT_ld "\n",
6513                       option);
6514         return -TARGET_EINVAL;
6515     }
6516 }
6517 
6518 #define NEW_STACK_SIZE 0x40000
6519 
6520 
6521 static pthread_mutex_t clone_lock = PTHREAD_MUTEX_INITIALIZER;
6522 typedef struct {
6523     CPUArchState *env;
6524     pthread_mutex_t mutex;
6525     pthread_cond_t cond;
6526     pthread_t thread;
6527     uint32_t tid;
6528     abi_ulong child_tidptr;
6529     abi_ulong parent_tidptr;
6530     sigset_t sigmask;
6531 } new_thread_info;
6532 
6533 static void *clone_func(void *arg)
6534 {
6535     new_thread_info *info = arg;
6536     CPUArchState *env;
6537     CPUState *cpu;
6538     TaskState *ts;
6539 
6540     rcu_register_thread();
6541     tcg_register_thread();
6542     env = info->env;
6543     cpu = env_cpu(env);
6544     thread_cpu = cpu;
6545     ts = (TaskState *)cpu->opaque;
6546     info->tid = sys_gettid();
6547     task_settid(ts);
6548     if (info->child_tidptr)
6549         put_user_u32(info->tid, info->child_tidptr);
6550     if (info->parent_tidptr)
6551         put_user_u32(info->tid, info->parent_tidptr);
6552     qemu_guest_random_seed_thread_part2(cpu->random_seed);
6553     /* Enable signals.  */
6554     sigprocmask(SIG_SETMASK, &info->sigmask, NULL);
6555     /* Signal to the parent that we're ready.  */
6556     pthread_mutex_lock(&info->mutex);
6557     pthread_cond_broadcast(&info->cond);
6558     pthread_mutex_unlock(&info->mutex);
6559     /* Wait until the parent has finished initializing the tls state.  */
6560     pthread_mutex_lock(&clone_lock);
6561     pthread_mutex_unlock(&clone_lock);
6562     cpu_loop(env);
6563     /* never exits */
6564     return NULL;
6565 }
6566 
6567 /* do_fork() Must return host values and target errnos (unlike most
6568    do_*() functions). */
6569 static int do_fork(CPUArchState *env, unsigned int flags, abi_ulong newsp,
6570                    abi_ulong parent_tidptr, target_ulong newtls,
6571                    abi_ulong child_tidptr)
6572 {
6573     CPUState *cpu = env_cpu(env);
6574     int ret;
6575     TaskState *ts;
6576     CPUState *new_cpu;
6577     CPUArchState *new_env;
6578     sigset_t sigmask;
6579 
6580     flags &= ~CLONE_IGNORED_FLAGS;
6581 
6582     /* Emulate vfork() with fork() */
6583     if (flags & CLONE_VFORK)
6584         flags &= ~(CLONE_VFORK | CLONE_VM);
6585 
6586     if (flags & CLONE_VM) {
6587         TaskState *parent_ts = (TaskState *)cpu->opaque;
6588         new_thread_info info;
6589         pthread_attr_t attr;
6590 
6591         if (((flags & CLONE_THREAD_FLAGS) != CLONE_THREAD_FLAGS) ||
6592             (flags & CLONE_INVALID_THREAD_FLAGS)) {
6593             return -TARGET_EINVAL;
6594         }
6595 
6596         ts = g_new0(TaskState, 1);
6597         init_task_state(ts);
6598 
6599         /* Grab a mutex so that thread setup appears atomic.  */
6600         pthread_mutex_lock(&clone_lock);
6601 
6602         /*
6603          * If this is our first additional thread, we need to ensure we
6604          * generate code for parallel execution and flush old translations.
6605          * Do this now so that the copy gets CF_PARALLEL too.
6606          */
6607         if (!(cpu->tcg_cflags & CF_PARALLEL)) {
6608             cpu->tcg_cflags |= CF_PARALLEL;
6609             tb_flush(cpu);
6610         }
6611 
6612         /* we create a new CPU instance. */
6613         new_env = cpu_copy(env);
6614         /* Init regs that differ from the parent.  */
6615         cpu_clone_regs_child(new_env, newsp, flags);
6616         cpu_clone_regs_parent(env, flags);
6617         new_cpu = env_cpu(new_env);
6618         new_cpu->opaque = ts;
6619         ts->bprm = parent_ts->bprm;
6620         ts->info = parent_ts->info;
6621         ts->signal_mask = parent_ts->signal_mask;
6622 
6623         if (flags & CLONE_CHILD_CLEARTID) {
6624             ts->child_tidptr = child_tidptr;
6625         }
6626 
6627         if (flags & CLONE_SETTLS) {
6628             cpu_set_tls (new_env, newtls);
6629         }
6630 
6631         memset(&info, 0, sizeof(info));
6632         pthread_mutex_init(&info.mutex, NULL);
6633         pthread_mutex_lock(&info.mutex);
6634         pthread_cond_init(&info.cond, NULL);
6635         info.env = new_env;
6636         if (flags & CLONE_CHILD_SETTID) {
6637             info.child_tidptr = child_tidptr;
6638         }
6639         if (flags & CLONE_PARENT_SETTID) {
6640             info.parent_tidptr = parent_tidptr;
6641         }
6642 
6643         ret = pthread_attr_init(&attr);
6644         ret = pthread_attr_setstacksize(&attr, NEW_STACK_SIZE);
6645         ret = pthread_attr_setdetachstate(&attr, PTHREAD_CREATE_DETACHED);
6646         /* It is not safe to deliver signals until the child has finished
6647            initializing, so temporarily block all signals.  */
6648         sigfillset(&sigmask);
6649         sigprocmask(SIG_BLOCK, &sigmask, &info.sigmask);
6650         cpu->random_seed = qemu_guest_random_seed_thread_part1();
6651 
6652         ret = pthread_create(&info.thread, &attr, clone_func, &info);
6653         /* TODO: Free new CPU state if thread creation failed.  */
6654 
6655         sigprocmask(SIG_SETMASK, &info.sigmask, NULL);
6656         pthread_attr_destroy(&attr);
6657         if (ret == 0) {
6658             /* Wait for the child to initialize.  */
6659             pthread_cond_wait(&info.cond, &info.mutex);
6660             ret = info.tid;
6661         } else {
6662             ret = -1;
6663         }
6664         pthread_mutex_unlock(&info.mutex);
6665         pthread_cond_destroy(&info.cond);
6666         pthread_mutex_destroy(&info.mutex);
6667         pthread_mutex_unlock(&clone_lock);
6668     } else {
6669         /* if no CLONE_VM, we consider it is a fork */
6670         if (flags & CLONE_INVALID_FORK_FLAGS) {
6671             return -TARGET_EINVAL;
6672         }
6673 
6674         /* We can't support custom termination signals */
6675         if ((flags & CSIGNAL) != TARGET_SIGCHLD) {
6676             return -TARGET_EINVAL;
6677         }
6678 
6679         if (block_signals()) {
6680             return -QEMU_ERESTARTSYS;
6681         }
6682 
6683         fork_start();
6684         ret = fork();
6685         if (ret == 0) {
6686             /* Child Process.  */
6687             cpu_clone_regs_child(env, newsp, flags);
6688             fork_end(1);
6689             /* There is a race condition here.  The parent process could
6690                theoretically read the TID in the child process before the child
6691                tid is set.  This would require using either ptrace
6692                (not implemented) or having *_tidptr to point at a shared memory
6693                mapping.  We can't repeat the spinlock hack used above because
6694                the child process gets its own copy of the lock.  */
6695             if (flags & CLONE_CHILD_SETTID)
6696                 put_user_u32(sys_gettid(), child_tidptr);
6697             if (flags & CLONE_PARENT_SETTID)
6698                 put_user_u32(sys_gettid(), parent_tidptr);
6699             ts = (TaskState *)cpu->opaque;
6700             if (flags & CLONE_SETTLS)
6701                 cpu_set_tls (env, newtls);
6702             if (flags & CLONE_CHILD_CLEARTID)
6703                 ts->child_tidptr = child_tidptr;
6704         } else {
6705             cpu_clone_regs_parent(env, flags);
6706             fork_end(0);
6707         }
6708     }
6709     return ret;
6710 }
6711 
6712 /* warning : doesn't handle linux specific flags... */
6713 static int target_to_host_fcntl_cmd(int cmd)
6714 {
6715     int ret;
6716 
6717     switch(cmd) {
6718     case TARGET_F_DUPFD:
6719     case TARGET_F_GETFD:
6720     case TARGET_F_SETFD:
6721     case TARGET_F_GETFL:
6722     case TARGET_F_SETFL:
6723     case TARGET_F_OFD_GETLK:
6724     case TARGET_F_OFD_SETLK:
6725     case TARGET_F_OFD_SETLKW:
6726         ret = cmd;
6727         break;
6728     case TARGET_F_GETLK:
6729         ret = F_GETLK64;
6730         break;
6731     case TARGET_F_SETLK:
6732         ret = F_SETLK64;
6733         break;
6734     case TARGET_F_SETLKW:
6735         ret = F_SETLKW64;
6736         break;
6737     case TARGET_F_GETOWN:
6738         ret = F_GETOWN;
6739         break;
6740     case TARGET_F_SETOWN:
6741         ret = F_SETOWN;
6742         break;
6743     case TARGET_F_GETSIG:
6744         ret = F_GETSIG;
6745         break;
6746     case TARGET_F_SETSIG:
6747         ret = F_SETSIG;
6748         break;
6749 #if TARGET_ABI_BITS == 32
6750     case TARGET_F_GETLK64:
6751         ret = F_GETLK64;
6752         break;
6753     case TARGET_F_SETLK64:
6754         ret = F_SETLK64;
6755         break;
6756     case TARGET_F_SETLKW64:
6757         ret = F_SETLKW64;
6758         break;
6759 #endif
6760     case TARGET_F_SETLEASE:
6761         ret = F_SETLEASE;
6762         break;
6763     case TARGET_F_GETLEASE:
6764         ret = F_GETLEASE;
6765         break;
6766 #ifdef F_DUPFD_CLOEXEC
6767     case TARGET_F_DUPFD_CLOEXEC:
6768         ret = F_DUPFD_CLOEXEC;
6769         break;
6770 #endif
6771     case TARGET_F_NOTIFY:
6772         ret = F_NOTIFY;
6773         break;
6774 #ifdef F_GETOWN_EX
6775     case TARGET_F_GETOWN_EX:
6776         ret = F_GETOWN_EX;
6777         break;
6778 #endif
6779 #ifdef F_SETOWN_EX
6780     case TARGET_F_SETOWN_EX:
6781         ret = F_SETOWN_EX;
6782         break;
6783 #endif
6784 #ifdef F_SETPIPE_SZ
6785     case TARGET_F_SETPIPE_SZ:
6786         ret = F_SETPIPE_SZ;
6787         break;
6788     case TARGET_F_GETPIPE_SZ:
6789         ret = F_GETPIPE_SZ;
6790         break;
6791 #endif
6792 #ifdef F_ADD_SEALS
6793     case TARGET_F_ADD_SEALS:
6794         ret = F_ADD_SEALS;
6795         break;
6796     case TARGET_F_GET_SEALS:
6797         ret = F_GET_SEALS;
6798         break;
6799 #endif
6800     default:
6801         ret = -TARGET_EINVAL;
6802         break;
6803     }
6804 
6805 #if defined(__powerpc64__)
6806     /* On PPC64, glibc headers has the F_*LK* defined to 12, 13 and 14 and
6807      * is not supported by kernel. The glibc fcntl call actually adjusts
6808      * them to 5, 6 and 7 before making the syscall(). Since we make the
6809      * syscall directly, adjust to what is supported by the kernel.
6810      */
6811     if (ret >= F_GETLK64 && ret <= F_SETLKW64) {
6812         ret -= F_GETLK64 - 5;
6813     }
6814 #endif
6815 
6816     return ret;
6817 }
6818 
6819 #define FLOCK_TRANSTBL \
6820     switch (type) { \
6821     TRANSTBL_CONVERT(F_RDLCK); \
6822     TRANSTBL_CONVERT(F_WRLCK); \
6823     TRANSTBL_CONVERT(F_UNLCK); \
6824     }
6825 
6826 static int target_to_host_flock(int type)
6827 {
6828 #define TRANSTBL_CONVERT(a) case TARGET_##a: return a
6829     FLOCK_TRANSTBL
6830 #undef  TRANSTBL_CONVERT
6831     return -TARGET_EINVAL;
6832 }
6833 
6834 static int host_to_target_flock(int type)
6835 {
6836 #define TRANSTBL_CONVERT(a) case a: return TARGET_##a
6837     FLOCK_TRANSTBL
6838 #undef  TRANSTBL_CONVERT
6839     /* if we don't know how to convert the value coming
6840      * from the host we copy to the target field as-is
6841      */
6842     return type;
6843 }
6844 
6845 static inline abi_long copy_from_user_flock(struct flock64 *fl,
6846                                             abi_ulong target_flock_addr)
6847 {
6848     struct target_flock *target_fl;
6849     int l_type;
6850 
6851     if (!lock_user_struct(VERIFY_READ, target_fl, target_flock_addr, 1)) {
6852         return -TARGET_EFAULT;
6853     }
6854 
6855     __get_user(l_type, &target_fl->l_type);
6856     l_type = target_to_host_flock(l_type);
6857     if (l_type < 0) {
6858         return l_type;
6859     }
6860     fl->l_type = l_type;
6861     __get_user(fl->l_whence, &target_fl->l_whence);
6862     __get_user(fl->l_start, &target_fl->l_start);
6863     __get_user(fl->l_len, &target_fl->l_len);
6864     __get_user(fl->l_pid, &target_fl->l_pid);
6865     unlock_user_struct(target_fl, target_flock_addr, 0);
6866     return 0;
6867 }
6868 
6869 static inline abi_long copy_to_user_flock(abi_ulong target_flock_addr,
6870                                           const struct flock64 *fl)
6871 {
6872     struct target_flock *target_fl;
6873     short l_type;
6874 
6875     if (!lock_user_struct(VERIFY_WRITE, target_fl, target_flock_addr, 0)) {
6876         return -TARGET_EFAULT;
6877     }
6878 
6879     l_type = host_to_target_flock(fl->l_type);
6880     __put_user(l_type, &target_fl->l_type);
6881     __put_user(fl->l_whence, &target_fl->l_whence);
6882     __put_user(fl->l_start, &target_fl->l_start);
6883     __put_user(fl->l_len, &target_fl->l_len);
6884     __put_user(fl->l_pid, &target_fl->l_pid);
6885     unlock_user_struct(target_fl, target_flock_addr, 1);
6886     return 0;
6887 }
6888 
6889 typedef abi_long from_flock64_fn(struct flock64 *fl, abi_ulong target_addr);
6890 typedef abi_long to_flock64_fn(abi_ulong target_addr, const struct flock64 *fl);
6891 
6892 #if defined(TARGET_ARM) && TARGET_ABI_BITS == 32
6893 struct target_oabi_flock64 {
6894     abi_short l_type;
6895     abi_short l_whence;
6896     abi_llong l_start;
6897     abi_llong l_len;
6898     abi_int   l_pid;
6899 } QEMU_PACKED;
6900 
6901 static inline abi_long copy_from_user_oabi_flock64(struct flock64 *fl,
6902                                                    abi_ulong target_flock_addr)
6903 {
6904     struct target_oabi_flock64 *target_fl;
6905     int l_type;
6906 
6907     if (!lock_user_struct(VERIFY_READ, target_fl, target_flock_addr, 1)) {
6908         return -TARGET_EFAULT;
6909     }
6910 
6911     __get_user(l_type, &target_fl->l_type);
6912     l_type = target_to_host_flock(l_type);
6913     if (l_type < 0) {
6914         return l_type;
6915     }
6916     fl->l_type = l_type;
6917     __get_user(fl->l_whence, &target_fl->l_whence);
6918     __get_user(fl->l_start, &target_fl->l_start);
6919     __get_user(fl->l_len, &target_fl->l_len);
6920     __get_user(fl->l_pid, &target_fl->l_pid);
6921     unlock_user_struct(target_fl, target_flock_addr, 0);
6922     return 0;
6923 }
6924 
6925 static inline abi_long copy_to_user_oabi_flock64(abi_ulong target_flock_addr,
6926                                                  const struct flock64 *fl)
6927 {
6928     struct target_oabi_flock64 *target_fl;
6929     short l_type;
6930 
6931     if (!lock_user_struct(VERIFY_WRITE, target_fl, target_flock_addr, 0)) {
6932         return -TARGET_EFAULT;
6933     }
6934 
6935     l_type = host_to_target_flock(fl->l_type);
6936     __put_user(l_type, &target_fl->l_type);
6937     __put_user(fl->l_whence, &target_fl->l_whence);
6938     __put_user(fl->l_start, &target_fl->l_start);
6939     __put_user(fl->l_len, &target_fl->l_len);
6940     __put_user(fl->l_pid, &target_fl->l_pid);
6941     unlock_user_struct(target_fl, target_flock_addr, 1);
6942     return 0;
6943 }
6944 #endif
6945 
6946 static inline abi_long copy_from_user_flock64(struct flock64 *fl,
6947                                               abi_ulong target_flock_addr)
6948 {
6949     struct target_flock64 *target_fl;
6950     int l_type;
6951 
6952     if (!lock_user_struct(VERIFY_READ, target_fl, target_flock_addr, 1)) {
6953         return -TARGET_EFAULT;
6954     }
6955 
6956     __get_user(l_type, &target_fl->l_type);
6957     l_type = target_to_host_flock(l_type);
6958     if (l_type < 0) {
6959         return l_type;
6960     }
6961     fl->l_type = l_type;
6962     __get_user(fl->l_whence, &target_fl->l_whence);
6963     __get_user(fl->l_start, &target_fl->l_start);
6964     __get_user(fl->l_len, &target_fl->l_len);
6965     __get_user(fl->l_pid, &target_fl->l_pid);
6966     unlock_user_struct(target_fl, target_flock_addr, 0);
6967     return 0;
6968 }
6969 
6970 static inline abi_long copy_to_user_flock64(abi_ulong target_flock_addr,
6971                                             const struct flock64 *fl)
6972 {
6973     struct target_flock64 *target_fl;
6974     short l_type;
6975 
6976     if (!lock_user_struct(VERIFY_WRITE, target_fl, target_flock_addr, 0)) {
6977         return -TARGET_EFAULT;
6978     }
6979 
6980     l_type = host_to_target_flock(fl->l_type);
6981     __put_user(l_type, &target_fl->l_type);
6982     __put_user(fl->l_whence, &target_fl->l_whence);
6983     __put_user(fl->l_start, &target_fl->l_start);
6984     __put_user(fl->l_len, &target_fl->l_len);
6985     __put_user(fl->l_pid, &target_fl->l_pid);
6986     unlock_user_struct(target_fl, target_flock_addr, 1);
6987     return 0;
6988 }
6989 
6990 static abi_long do_fcntl(int fd, int cmd, abi_ulong arg)
6991 {
6992     struct flock64 fl64;
6993 #ifdef F_GETOWN_EX
6994     struct f_owner_ex fox;
6995     struct target_f_owner_ex *target_fox;
6996 #endif
6997     abi_long ret;
6998     int host_cmd = target_to_host_fcntl_cmd(cmd);
6999 
7000     if (host_cmd == -TARGET_EINVAL)
7001 	    return host_cmd;
7002 
7003     switch(cmd) {
7004     case TARGET_F_GETLK:
7005         ret = copy_from_user_flock(&fl64, arg);
7006         if (ret) {
7007             return ret;
7008         }
7009         ret = get_errno(safe_fcntl(fd, host_cmd, &fl64));
7010         if (ret == 0) {
7011             ret = copy_to_user_flock(arg, &fl64);
7012         }
7013         break;
7014 
7015     case TARGET_F_SETLK:
7016     case TARGET_F_SETLKW:
7017         ret = copy_from_user_flock(&fl64, arg);
7018         if (ret) {
7019             return ret;
7020         }
7021         ret = get_errno(safe_fcntl(fd, host_cmd, &fl64));
7022         break;
7023 
7024     case TARGET_F_GETLK64:
7025     case TARGET_F_OFD_GETLK:
7026         ret = copy_from_user_flock64(&fl64, arg);
7027         if (ret) {
7028             return ret;
7029         }
7030         ret = get_errno(safe_fcntl(fd, host_cmd, &fl64));
7031         if (ret == 0) {
7032             ret = copy_to_user_flock64(arg, &fl64);
7033         }
7034         break;
7035     case TARGET_F_SETLK64:
7036     case TARGET_F_SETLKW64:
7037     case TARGET_F_OFD_SETLK:
7038     case TARGET_F_OFD_SETLKW:
7039         ret = copy_from_user_flock64(&fl64, arg);
7040         if (ret) {
7041             return ret;
7042         }
7043         ret = get_errno(safe_fcntl(fd, host_cmd, &fl64));
7044         break;
7045 
7046     case TARGET_F_GETFL:
7047         ret = get_errno(safe_fcntl(fd, host_cmd, arg));
7048         if (ret >= 0) {
7049             ret = host_to_target_bitmask(ret, fcntl_flags_tbl);
7050         }
7051         break;
7052 
7053     case TARGET_F_SETFL:
7054         ret = get_errno(safe_fcntl(fd, host_cmd,
7055                                    target_to_host_bitmask(arg,
7056                                                           fcntl_flags_tbl)));
7057         break;
7058 
7059 #ifdef F_GETOWN_EX
7060     case TARGET_F_GETOWN_EX:
7061         ret = get_errno(safe_fcntl(fd, host_cmd, &fox));
7062         if (ret >= 0) {
7063             if (!lock_user_struct(VERIFY_WRITE, target_fox, arg, 0))
7064                 return -TARGET_EFAULT;
7065             target_fox->type = tswap32(fox.type);
7066             target_fox->pid = tswap32(fox.pid);
7067             unlock_user_struct(target_fox, arg, 1);
7068         }
7069         break;
7070 #endif
7071 
7072 #ifdef F_SETOWN_EX
7073     case TARGET_F_SETOWN_EX:
7074         if (!lock_user_struct(VERIFY_READ, target_fox, arg, 1))
7075             return -TARGET_EFAULT;
7076         fox.type = tswap32(target_fox->type);
7077         fox.pid = tswap32(target_fox->pid);
7078         unlock_user_struct(target_fox, arg, 0);
7079         ret = get_errno(safe_fcntl(fd, host_cmd, &fox));
7080         break;
7081 #endif
7082 
7083     case TARGET_F_SETSIG:
7084         ret = get_errno(safe_fcntl(fd, host_cmd, target_to_host_signal(arg)));
7085         break;
7086 
7087     case TARGET_F_GETSIG:
7088         ret = host_to_target_signal(get_errno(safe_fcntl(fd, host_cmd, arg)));
7089         break;
7090 
7091     case TARGET_F_SETOWN:
7092     case TARGET_F_GETOWN:
7093     case TARGET_F_SETLEASE:
7094     case TARGET_F_GETLEASE:
7095     case TARGET_F_SETPIPE_SZ:
7096     case TARGET_F_GETPIPE_SZ:
7097     case TARGET_F_ADD_SEALS:
7098     case TARGET_F_GET_SEALS:
7099         ret = get_errno(safe_fcntl(fd, host_cmd, arg));
7100         break;
7101 
7102     default:
7103         ret = get_errno(safe_fcntl(fd, cmd, arg));
7104         break;
7105     }
7106     return ret;
7107 }
7108 
7109 #ifdef USE_UID16
7110 
7111 static inline int high2lowuid(int uid)
7112 {
7113     if (uid > 65535)
7114         return 65534;
7115     else
7116         return uid;
7117 }
7118 
7119 static inline int high2lowgid(int gid)
7120 {
7121     if (gid > 65535)
7122         return 65534;
7123     else
7124         return gid;
7125 }
7126 
7127 static inline int low2highuid(int uid)
7128 {
7129     if ((int16_t)uid == -1)
7130         return -1;
7131     else
7132         return uid;
7133 }
7134 
7135 static inline int low2highgid(int gid)
7136 {
7137     if ((int16_t)gid == -1)
7138         return -1;
7139     else
7140         return gid;
7141 }
7142 static inline int tswapid(int id)
7143 {
7144     return tswap16(id);
7145 }
7146 
7147 #define put_user_id(x, gaddr) put_user_u16(x, gaddr)
7148 
7149 #else /* !USE_UID16 */
7150 static inline int high2lowuid(int uid)
7151 {
7152     return uid;
7153 }
7154 static inline int high2lowgid(int gid)
7155 {
7156     return gid;
7157 }
7158 static inline int low2highuid(int uid)
7159 {
7160     return uid;
7161 }
7162 static inline int low2highgid(int gid)
7163 {
7164     return gid;
7165 }
7166 static inline int tswapid(int id)
7167 {
7168     return tswap32(id);
7169 }
7170 
7171 #define put_user_id(x, gaddr) put_user_u32(x, gaddr)
7172 
7173 #endif /* USE_UID16 */
7174 
7175 /* We must do direct syscalls for setting UID/GID, because we want to
7176  * implement the Linux system call semantics of "change only for this thread",
7177  * not the libc/POSIX semantics of "change for all threads in process".
7178  * (See http://ewontfix.com/17/ for more details.)
7179  * We use the 32-bit version of the syscalls if present; if it is not
7180  * then either the host architecture supports 32-bit UIDs natively with
7181  * the standard syscall, or the 16-bit UID is the best we can do.
7182  */
7183 #ifdef __NR_setuid32
7184 #define __NR_sys_setuid __NR_setuid32
7185 #else
7186 #define __NR_sys_setuid __NR_setuid
7187 #endif
7188 #ifdef __NR_setgid32
7189 #define __NR_sys_setgid __NR_setgid32
7190 #else
7191 #define __NR_sys_setgid __NR_setgid
7192 #endif
7193 #ifdef __NR_setresuid32
7194 #define __NR_sys_setresuid __NR_setresuid32
7195 #else
7196 #define __NR_sys_setresuid __NR_setresuid
7197 #endif
7198 #ifdef __NR_setresgid32
7199 #define __NR_sys_setresgid __NR_setresgid32
7200 #else
7201 #define __NR_sys_setresgid __NR_setresgid
7202 #endif
7203 
7204 _syscall1(int, sys_setuid, uid_t, uid)
7205 _syscall1(int, sys_setgid, gid_t, gid)
7206 _syscall3(int, sys_setresuid, uid_t, ruid, uid_t, euid, uid_t, suid)
7207 _syscall3(int, sys_setresgid, gid_t, rgid, gid_t, egid, gid_t, sgid)
7208 
7209 void syscall_init(void)
7210 {
7211     IOCTLEntry *ie;
7212     const argtype *arg_type;
7213     int size;
7214 
7215     thunk_init(STRUCT_MAX);
7216 
7217 #define STRUCT(name, ...) thunk_register_struct(STRUCT_ ## name, #name, struct_ ## name ## _def);
7218 #define STRUCT_SPECIAL(name) thunk_register_struct_direct(STRUCT_ ## name, #name, &struct_ ## name ## _def);
7219 #include "syscall_types.h"
7220 #undef STRUCT
7221 #undef STRUCT_SPECIAL
7222 
7223     /* we patch the ioctl size if necessary. We rely on the fact that
7224        no ioctl has all the bits at '1' in the size field */
7225     ie = ioctl_entries;
7226     while (ie->target_cmd != 0) {
7227         if (((ie->target_cmd >> TARGET_IOC_SIZESHIFT) & TARGET_IOC_SIZEMASK) ==
7228             TARGET_IOC_SIZEMASK) {
7229             arg_type = ie->arg_type;
7230             if (arg_type[0] != TYPE_PTR) {
7231                 fprintf(stderr, "cannot patch size for ioctl 0x%x\n",
7232                         ie->target_cmd);
7233                 exit(1);
7234             }
7235             arg_type++;
7236             size = thunk_type_size(arg_type, 0);
7237             ie->target_cmd = (ie->target_cmd &
7238                               ~(TARGET_IOC_SIZEMASK << TARGET_IOC_SIZESHIFT)) |
7239                 (size << TARGET_IOC_SIZESHIFT);
7240         }
7241 
7242         /* automatic consistency check if same arch */
7243 #if (defined(__i386__) && defined(TARGET_I386) && defined(TARGET_ABI32)) || \
7244     (defined(__x86_64__) && defined(TARGET_X86_64))
7245         if (unlikely(ie->target_cmd != ie->host_cmd)) {
7246             fprintf(stderr, "ERROR: ioctl(%s): target=0x%x host=0x%x\n",
7247                     ie->name, ie->target_cmd, ie->host_cmd);
7248         }
7249 #endif
7250         ie++;
7251     }
7252 }
7253 
7254 #ifdef TARGET_NR_truncate64
7255 static inline abi_long target_truncate64(CPUArchState *cpu_env, const char *arg1,
7256                                          abi_long arg2,
7257                                          abi_long arg3,
7258                                          abi_long arg4)
7259 {
7260     if (regpairs_aligned(cpu_env, TARGET_NR_truncate64)) {
7261         arg2 = arg3;
7262         arg3 = arg4;
7263     }
7264     return get_errno(truncate64(arg1, target_offset64(arg2, arg3)));
7265 }
7266 #endif
7267 
7268 #ifdef TARGET_NR_ftruncate64
7269 static inline abi_long target_ftruncate64(CPUArchState *cpu_env, abi_long arg1,
7270                                           abi_long arg2,
7271                                           abi_long arg3,
7272                                           abi_long arg4)
7273 {
7274     if (regpairs_aligned(cpu_env, TARGET_NR_ftruncate64)) {
7275         arg2 = arg3;
7276         arg3 = arg4;
7277     }
7278     return get_errno(ftruncate64(arg1, target_offset64(arg2, arg3)));
7279 }
7280 #endif
7281 
7282 #if defined(TARGET_NR_timer_settime) || \
7283     (defined(TARGET_NR_timerfd_settime) && defined(CONFIG_TIMERFD))
7284 static inline abi_long target_to_host_itimerspec(struct itimerspec *host_its,
7285                                                  abi_ulong target_addr)
7286 {
7287     if (target_to_host_timespec(&host_its->it_interval, target_addr +
7288                                 offsetof(struct target_itimerspec,
7289                                          it_interval)) ||
7290         target_to_host_timespec(&host_its->it_value, target_addr +
7291                                 offsetof(struct target_itimerspec,
7292                                          it_value))) {
7293         return -TARGET_EFAULT;
7294     }
7295 
7296     return 0;
7297 }
7298 #endif
7299 
7300 #if defined(TARGET_NR_timer_settime64) || \
7301     (defined(TARGET_NR_timerfd_settime64) && defined(CONFIG_TIMERFD))
7302 static inline abi_long target_to_host_itimerspec64(struct itimerspec *host_its,
7303                                                    abi_ulong target_addr)
7304 {
7305     if (target_to_host_timespec64(&host_its->it_interval, target_addr +
7306                                   offsetof(struct target__kernel_itimerspec,
7307                                            it_interval)) ||
7308         target_to_host_timespec64(&host_its->it_value, target_addr +
7309                                   offsetof(struct target__kernel_itimerspec,
7310                                            it_value))) {
7311         return -TARGET_EFAULT;
7312     }
7313 
7314     return 0;
7315 }
7316 #endif
7317 
7318 #if ((defined(TARGET_NR_timerfd_gettime) || \
7319       defined(TARGET_NR_timerfd_settime)) && defined(CONFIG_TIMERFD)) || \
7320       defined(TARGET_NR_timer_gettime) || defined(TARGET_NR_timer_settime)
7321 static inline abi_long host_to_target_itimerspec(abi_ulong target_addr,
7322                                                  struct itimerspec *host_its)
7323 {
7324     if (host_to_target_timespec(target_addr + offsetof(struct target_itimerspec,
7325                                                        it_interval),
7326                                 &host_its->it_interval) ||
7327         host_to_target_timespec(target_addr + offsetof(struct target_itimerspec,
7328                                                        it_value),
7329                                 &host_its->it_value)) {
7330         return -TARGET_EFAULT;
7331     }
7332     return 0;
7333 }
7334 #endif
7335 
7336 #if ((defined(TARGET_NR_timerfd_gettime64) || \
7337       defined(TARGET_NR_timerfd_settime64)) && defined(CONFIG_TIMERFD)) || \
7338       defined(TARGET_NR_timer_gettime64) || defined(TARGET_NR_timer_settime64)
7339 static inline abi_long host_to_target_itimerspec64(abi_ulong target_addr,
7340                                                    struct itimerspec *host_its)
7341 {
7342     if (host_to_target_timespec64(target_addr +
7343                                   offsetof(struct target__kernel_itimerspec,
7344                                            it_interval),
7345                                   &host_its->it_interval) ||
7346         host_to_target_timespec64(target_addr +
7347                                   offsetof(struct target__kernel_itimerspec,
7348                                            it_value),
7349                                   &host_its->it_value)) {
7350         return -TARGET_EFAULT;
7351     }
7352     return 0;
7353 }
7354 #endif
7355 
7356 #if defined(TARGET_NR_adjtimex) || \
7357     (defined(TARGET_NR_clock_adjtime) && defined(CONFIG_CLOCK_ADJTIME))
7358 static inline abi_long target_to_host_timex(struct timex *host_tx,
7359                                             abi_long target_addr)
7360 {
7361     struct target_timex *target_tx;
7362 
7363     if (!lock_user_struct(VERIFY_READ, target_tx, target_addr, 1)) {
7364         return -TARGET_EFAULT;
7365     }
7366 
7367     __get_user(host_tx->modes, &target_tx->modes);
7368     __get_user(host_tx->offset, &target_tx->offset);
7369     __get_user(host_tx->freq, &target_tx->freq);
7370     __get_user(host_tx->maxerror, &target_tx->maxerror);
7371     __get_user(host_tx->esterror, &target_tx->esterror);
7372     __get_user(host_tx->status, &target_tx->status);
7373     __get_user(host_tx->constant, &target_tx->constant);
7374     __get_user(host_tx->precision, &target_tx->precision);
7375     __get_user(host_tx->tolerance, &target_tx->tolerance);
7376     __get_user(host_tx->time.tv_sec, &target_tx->time.tv_sec);
7377     __get_user(host_tx->time.tv_usec, &target_tx->time.tv_usec);
7378     __get_user(host_tx->tick, &target_tx->tick);
7379     __get_user(host_tx->ppsfreq, &target_tx->ppsfreq);
7380     __get_user(host_tx->jitter, &target_tx->jitter);
7381     __get_user(host_tx->shift, &target_tx->shift);
7382     __get_user(host_tx->stabil, &target_tx->stabil);
7383     __get_user(host_tx->jitcnt, &target_tx->jitcnt);
7384     __get_user(host_tx->calcnt, &target_tx->calcnt);
7385     __get_user(host_tx->errcnt, &target_tx->errcnt);
7386     __get_user(host_tx->stbcnt, &target_tx->stbcnt);
7387     __get_user(host_tx->tai, &target_tx->tai);
7388 
7389     unlock_user_struct(target_tx, target_addr, 0);
7390     return 0;
7391 }
7392 
7393 static inline abi_long host_to_target_timex(abi_long target_addr,
7394                                             struct timex *host_tx)
7395 {
7396     struct target_timex *target_tx;
7397 
7398     if (!lock_user_struct(VERIFY_WRITE, target_tx, target_addr, 0)) {
7399         return -TARGET_EFAULT;
7400     }
7401 
7402     __put_user(host_tx->modes, &target_tx->modes);
7403     __put_user(host_tx->offset, &target_tx->offset);
7404     __put_user(host_tx->freq, &target_tx->freq);
7405     __put_user(host_tx->maxerror, &target_tx->maxerror);
7406     __put_user(host_tx->esterror, &target_tx->esterror);
7407     __put_user(host_tx->status, &target_tx->status);
7408     __put_user(host_tx->constant, &target_tx->constant);
7409     __put_user(host_tx->precision, &target_tx->precision);
7410     __put_user(host_tx->tolerance, &target_tx->tolerance);
7411     __put_user(host_tx->time.tv_sec, &target_tx->time.tv_sec);
7412     __put_user(host_tx->time.tv_usec, &target_tx->time.tv_usec);
7413     __put_user(host_tx->tick, &target_tx->tick);
7414     __put_user(host_tx->ppsfreq, &target_tx->ppsfreq);
7415     __put_user(host_tx->jitter, &target_tx->jitter);
7416     __put_user(host_tx->shift, &target_tx->shift);
7417     __put_user(host_tx->stabil, &target_tx->stabil);
7418     __put_user(host_tx->jitcnt, &target_tx->jitcnt);
7419     __put_user(host_tx->calcnt, &target_tx->calcnt);
7420     __put_user(host_tx->errcnt, &target_tx->errcnt);
7421     __put_user(host_tx->stbcnt, &target_tx->stbcnt);
7422     __put_user(host_tx->tai, &target_tx->tai);
7423 
7424     unlock_user_struct(target_tx, target_addr, 1);
7425     return 0;
7426 }
7427 #endif
7428 
7429 
7430 #if defined(TARGET_NR_clock_adjtime64) && defined(CONFIG_CLOCK_ADJTIME)
7431 static inline abi_long target_to_host_timex64(struct timex *host_tx,
7432                                               abi_long target_addr)
7433 {
7434     struct target__kernel_timex *target_tx;
7435 
7436     if (copy_from_user_timeval64(&host_tx->time, target_addr +
7437                                  offsetof(struct target__kernel_timex,
7438                                           time))) {
7439         return -TARGET_EFAULT;
7440     }
7441 
7442     if (!lock_user_struct(VERIFY_READ, target_tx, target_addr, 1)) {
7443         return -TARGET_EFAULT;
7444     }
7445 
7446     __get_user(host_tx->modes, &target_tx->modes);
7447     __get_user(host_tx->offset, &target_tx->offset);
7448     __get_user(host_tx->freq, &target_tx->freq);
7449     __get_user(host_tx->maxerror, &target_tx->maxerror);
7450     __get_user(host_tx->esterror, &target_tx->esterror);
7451     __get_user(host_tx->status, &target_tx->status);
7452     __get_user(host_tx->constant, &target_tx->constant);
7453     __get_user(host_tx->precision, &target_tx->precision);
7454     __get_user(host_tx->tolerance, &target_tx->tolerance);
7455     __get_user(host_tx->tick, &target_tx->tick);
7456     __get_user(host_tx->ppsfreq, &target_tx->ppsfreq);
7457     __get_user(host_tx->jitter, &target_tx->jitter);
7458     __get_user(host_tx->shift, &target_tx->shift);
7459     __get_user(host_tx->stabil, &target_tx->stabil);
7460     __get_user(host_tx->jitcnt, &target_tx->jitcnt);
7461     __get_user(host_tx->calcnt, &target_tx->calcnt);
7462     __get_user(host_tx->errcnt, &target_tx->errcnt);
7463     __get_user(host_tx->stbcnt, &target_tx->stbcnt);
7464     __get_user(host_tx->tai, &target_tx->tai);
7465 
7466     unlock_user_struct(target_tx, target_addr, 0);
7467     return 0;
7468 }
7469 
7470 static inline abi_long host_to_target_timex64(abi_long target_addr,
7471                                               struct timex *host_tx)
7472 {
7473     struct target__kernel_timex *target_tx;
7474 
7475    if (copy_to_user_timeval64(target_addr +
7476                               offsetof(struct target__kernel_timex, time),
7477                               &host_tx->time)) {
7478         return -TARGET_EFAULT;
7479     }
7480 
7481     if (!lock_user_struct(VERIFY_WRITE, target_tx, target_addr, 0)) {
7482         return -TARGET_EFAULT;
7483     }
7484 
7485     __put_user(host_tx->modes, &target_tx->modes);
7486     __put_user(host_tx->offset, &target_tx->offset);
7487     __put_user(host_tx->freq, &target_tx->freq);
7488     __put_user(host_tx->maxerror, &target_tx->maxerror);
7489     __put_user(host_tx->esterror, &target_tx->esterror);
7490     __put_user(host_tx->status, &target_tx->status);
7491     __put_user(host_tx->constant, &target_tx->constant);
7492     __put_user(host_tx->precision, &target_tx->precision);
7493     __put_user(host_tx->tolerance, &target_tx->tolerance);
7494     __put_user(host_tx->tick, &target_tx->tick);
7495     __put_user(host_tx->ppsfreq, &target_tx->ppsfreq);
7496     __put_user(host_tx->jitter, &target_tx->jitter);
7497     __put_user(host_tx->shift, &target_tx->shift);
7498     __put_user(host_tx->stabil, &target_tx->stabil);
7499     __put_user(host_tx->jitcnt, &target_tx->jitcnt);
7500     __put_user(host_tx->calcnt, &target_tx->calcnt);
7501     __put_user(host_tx->errcnt, &target_tx->errcnt);
7502     __put_user(host_tx->stbcnt, &target_tx->stbcnt);
7503     __put_user(host_tx->tai, &target_tx->tai);
7504 
7505     unlock_user_struct(target_tx, target_addr, 1);
7506     return 0;
7507 }
7508 #endif
7509 
7510 #ifndef HAVE_SIGEV_NOTIFY_THREAD_ID
7511 #define sigev_notify_thread_id _sigev_un._tid
7512 #endif
7513 
7514 static inline abi_long target_to_host_sigevent(struct sigevent *host_sevp,
7515                                                abi_ulong target_addr)
7516 {
7517     struct target_sigevent *target_sevp;
7518 
7519     if (!lock_user_struct(VERIFY_READ, target_sevp, target_addr, 1)) {
7520         return -TARGET_EFAULT;
7521     }
7522 
7523     /* This union is awkward on 64 bit systems because it has a 32 bit
7524      * integer and a pointer in it; we follow the conversion approach
7525      * used for handling sigval types in signal.c so the guest should get
7526      * the correct value back even if we did a 64 bit byteswap and it's
7527      * using the 32 bit integer.
7528      */
7529     host_sevp->sigev_value.sival_ptr =
7530         (void *)(uintptr_t)tswapal(target_sevp->sigev_value.sival_ptr);
7531     host_sevp->sigev_signo =
7532         target_to_host_signal(tswap32(target_sevp->sigev_signo));
7533     host_sevp->sigev_notify = tswap32(target_sevp->sigev_notify);
7534     host_sevp->sigev_notify_thread_id = tswap32(target_sevp->_sigev_un._tid);
7535 
7536     unlock_user_struct(target_sevp, target_addr, 1);
7537     return 0;
7538 }
7539 
7540 #if defined(TARGET_NR_mlockall)
7541 static inline int target_to_host_mlockall_arg(int arg)
7542 {
7543     int result = 0;
7544 
7545     if (arg & TARGET_MCL_CURRENT) {
7546         result |= MCL_CURRENT;
7547     }
7548     if (arg & TARGET_MCL_FUTURE) {
7549         result |= MCL_FUTURE;
7550     }
7551 #ifdef MCL_ONFAULT
7552     if (arg & TARGET_MCL_ONFAULT) {
7553         result |= MCL_ONFAULT;
7554     }
7555 #endif
7556 
7557     return result;
7558 }
7559 #endif
7560 
7561 #if (defined(TARGET_NR_stat64) || defined(TARGET_NR_lstat64) ||     \
7562      defined(TARGET_NR_fstat64) || defined(TARGET_NR_fstatat64) ||  \
7563      defined(TARGET_NR_newfstatat))
7564 static inline abi_long host_to_target_stat64(CPUArchState *cpu_env,
7565                                              abi_ulong target_addr,
7566                                              struct stat *host_st)
7567 {
7568 #if defined(TARGET_ARM) && defined(TARGET_ABI32)
7569     if (cpu_env->eabi) {
7570         struct target_eabi_stat64 *target_st;
7571 
7572         if (!lock_user_struct(VERIFY_WRITE, target_st, target_addr, 0))
7573             return -TARGET_EFAULT;
7574         memset(target_st, 0, sizeof(struct target_eabi_stat64));
7575         __put_user(host_st->st_dev, &target_st->st_dev);
7576         __put_user(host_st->st_ino, &target_st->st_ino);
7577 #ifdef TARGET_STAT64_HAS_BROKEN_ST_INO
7578         __put_user(host_st->st_ino, &target_st->__st_ino);
7579 #endif
7580         __put_user(host_st->st_mode, &target_st->st_mode);
7581         __put_user(host_st->st_nlink, &target_st->st_nlink);
7582         __put_user(host_st->st_uid, &target_st->st_uid);
7583         __put_user(host_st->st_gid, &target_st->st_gid);
7584         __put_user(host_st->st_rdev, &target_st->st_rdev);
7585         __put_user(host_st->st_size, &target_st->st_size);
7586         __put_user(host_st->st_blksize, &target_st->st_blksize);
7587         __put_user(host_st->st_blocks, &target_st->st_blocks);
7588         __put_user(host_st->st_atime, &target_st->target_st_atime);
7589         __put_user(host_st->st_mtime, &target_st->target_st_mtime);
7590         __put_user(host_st->st_ctime, &target_st->target_st_ctime);
7591 #ifdef HAVE_STRUCT_STAT_ST_ATIM
7592         __put_user(host_st->st_atim.tv_nsec, &target_st->target_st_atime_nsec);
7593         __put_user(host_st->st_mtim.tv_nsec, &target_st->target_st_mtime_nsec);
7594         __put_user(host_st->st_ctim.tv_nsec, &target_st->target_st_ctime_nsec);
7595 #endif
7596         unlock_user_struct(target_st, target_addr, 1);
7597     } else
7598 #endif
7599     {
7600 #if defined(TARGET_HAS_STRUCT_STAT64)
7601         struct target_stat64 *target_st;
7602 #else
7603         struct target_stat *target_st;
7604 #endif
7605 
7606         if (!lock_user_struct(VERIFY_WRITE, target_st, target_addr, 0))
7607             return -TARGET_EFAULT;
7608         memset(target_st, 0, sizeof(*target_st));
7609         __put_user(host_st->st_dev, &target_st->st_dev);
7610         __put_user(host_st->st_ino, &target_st->st_ino);
7611 #ifdef TARGET_STAT64_HAS_BROKEN_ST_INO
7612         __put_user(host_st->st_ino, &target_st->__st_ino);
7613 #endif
7614         __put_user(host_st->st_mode, &target_st->st_mode);
7615         __put_user(host_st->st_nlink, &target_st->st_nlink);
7616         __put_user(host_st->st_uid, &target_st->st_uid);
7617         __put_user(host_st->st_gid, &target_st->st_gid);
7618         __put_user(host_st->st_rdev, &target_st->st_rdev);
7619         /* XXX: better use of kernel struct */
7620         __put_user(host_st->st_size, &target_st->st_size);
7621         __put_user(host_st->st_blksize, &target_st->st_blksize);
7622         __put_user(host_st->st_blocks, &target_st->st_blocks);
7623         __put_user(host_st->st_atime, &target_st->target_st_atime);
7624         __put_user(host_st->st_mtime, &target_st->target_st_mtime);
7625         __put_user(host_st->st_ctime, &target_st->target_st_ctime);
7626 #ifdef HAVE_STRUCT_STAT_ST_ATIM
7627         __put_user(host_st->st_atim.tv_nsec, &target_st->target_st_atime_nsec);
7628         __put_user(host_st->st_mtim.tv_nsec, &target_st->target_st_mtime_nsec);
7629         __put_user(host_st->st_ctim.tv_nsec, &target_st->target_st_ctime_nsec);
7630 #endif
7631         unlock_user_struct(target_st, target_addr, 1);
7632     }
7633 
7634     return 0;
7635 }
7636 #endif
7637 
7638 #if defined(TARGET_NR_statx) && defined(__NR_statx)
7639 static inline abi_long host_to_target_statx(struct target_statx *host_stx,
7640                                             abi_ulong target_addr)
7641 {
7642     struct target_statx *target_stx;
7643 
7644     if (!lock_user_struct(VERIFY_WRITE, target_stx, target_addr,  0)) {
7645         return -TARGET_EFAULT;
7646     }
7647     memset(target_stx, 0, sizeof(*target_stx));
7648 
7649     __put_user(host_stx->stx_mask, &target_stx->stx_mask);
7650     __put_user(host_stx->stx_blksize, &target_stx->stx_blksize);
7651     __put_user(host_stx->stx_attributes, &target_stx->stx_attributes);
7652     __put_user(host_stx->stx_nlink, &target_stx->stx_nlink);
7653     __put_user(host_stx->stx_uid, &target_stx->stx_uid);
7654     __put_user(host_stx->stx_gid, &target_stx->stx_gid);
7655     __put_user(host_stx->stx_mode, &target_stx->stx_mode);
7656     __put_user(host_stx->stx_ino, &target_stx->stx_ino);
7657     __put_user(host_stx->stx_size, &target_stx->stx_size);
7658     __put_user(host_stx->stx_blocks, &target_stx->stx_blocks);
7659     __put_user(host_stx->stx_attributes_mask, &target_stx->stx_attributes_mask);
7660     __put_user(host_stx->stx_atime.tv_sec, &target_stx->stx_atime.tv_sec);
7661     __put_user(host_stx->stx_atime.tv_nsec, &target_stx->stx_atime.tv_nsec);
7662     __put_user(host_stx->stx_btime.tv_sec, &target_stx->stx_btime.tv_sec);
7663     __put_user(host_stx->stx_btime.tv_nsec, &target_stx->stx_btime.tv_nsec);
7664     __put_user(host_stx->stx_ctime.tv_sec, &target_stx->stx_ctime.tv_sec);
7665     __put_user(host_stx->stx_ctime.tv_nsec, &target_stx->stx_ctime.tv_nsec);
7666     __put_user(host_stx->stx_mtime.tv_sec, &target_stx->stx_mtime.tv_sec);
7667     __put_user(host_stx->stx_mtime.tv_nsec, &target_stx->stx_mtime.tv_nsec);
7668     __put_user(host_stx->stx_rdev_major, &target_stx->stx_rdev_major);
7669     __put_user(host_stx->stx_rdev_minor, &target_stx->stx_rdev_minor);
7670     __put_user(host_stx->stx_dev_major, &target_stx->stx_dev_major);
7671     __put_user(host_stx->stx_dev_minor, &target_stx->stx_dev_minor);
7672 
7673     unlock_user_struct(target_stx, target_addr, 1);
7674 
7675     return 0;
7676 }
7677 #endif
7678 
7679 static int do_sys_futex(int *uaddr, int op, int val,
7680                          const struct timespec *timeout, int *uaddr2,
7681                          int val3)
7682 {
7683 #if HOST_LONG_BITS == 64
7684 #if defined(__NR_futex)
7685     /* always a 64-bit time_t, it doesn't define _time64 version  */
7686     return sys_futex(uaddr, op, val, timeout, uaddr2, val3);
7687 
7688 #endif
7689 #else /* HOST_LONG_BITS == 64 */
7690 #if defined(__NR_futex_time64)
7691     if (sizeof(timeout->tv_sec) == 8) {
7692         /* _time64 function on 32bit arch */
7693         return sys_futex_time64(uaddr, op, val, timeout, uaddr2, val3);
7694     }
7695 #endif
7696 #if defined(__NR_futex)
7697     /* old function on 32bit arch */
7698     return sys_futex(uaddr, op, val, timeout, uaddr2, val3);
7699 #endif
7700 #endif /* HOST_LONG_BITS == 64 */
7701     g_assert_not_reached();
7702 }
7703 
7704 static int do_safe_futex(int *uaddr, int op, int val,
7705                          const struct timespec *timeout, int *uaddr2,
7706                          int val3)
7707 {
7708 #if HOST_LONG_BITS == 64
7709 #if defined(__NR_futex)
7710     /* always a 64-bit time_t, it doesn't define _time64 version  */
7711     return get_errno(safe_futex(uaddr, op, val, timeout, uaddr2, val3));
7712 #endif
7713 #else /* HOST_LONG_BITS == 64 */
7714 #if defined(__NR_futex_time64)
7715     if (sizeof(timeout->tv_sec) == 8) {
7716         /* _time64 function on 32bit arch */
7717         return get_errno(safe_futex_time64(uaddr, op, val, timeout, uaddr2,
7718                                            val3));
7719     }
7720 #endif
7721 #if defined(__NR_futex)
7722     /* old function on 32bit arch */
7723     return get_errno(safe_futex(uaddr, op, val, timeout, uaddr2, val3));
7724 #endif
7725 #endif /* HOST_LONG_BITS == 64 */
7726     return -TARGET_ENOSYS;
7727 }
7728 
7729 /* ??? Using host futex calls even when target atomic operations
7730    are not really atomic probably breaks things.  However implementing
7731    futexes locally would make futexes shared between multiple processes
7732    tricky.  However they're probably useless because guest atomic
7733    operations won't work either.  */
7734 #if defined(TARGET_NR_futex)
7735 static int do_futex(CPUState *cpu, target_ulong uaddr, int op, int val,
7736                     target_ulong timeout, target_ulong uaddr2, int val3)
7737 {
7738     struct timespec ts, *pts;
7739     int base_op;
7740 
7741     /* ??? We assume FUTEX_* constants are the same on both host
7742        and target.  */
7743 #ifdef FUTEX_CMD_MASK
7744     base_op = op & FUTEX_CMD_MASK;
7745 #else
7746     base_op = op;
7747 #endif
7748     switch (base_op) {
7749     case FUTEX_WAIT:
7750     case FUTEX_WAIT_BITSET:
7751         if (timeout) {
7752             pts = &ts;
7753             target_to_host_timespec(pts, timeout);
7754         } else {
7755             pts = NULL;
7756         }
7757         return do_safe_futex(g2h(cpu, uaddr),
7758                              op, tswap32(val), pts, NULL, val3);
7759     case FUTEX_WAKE:
7760         return do_safe_futex(g2h(cpu, uaddr),
7761                              op, val, NULL, NULL, 0);
7762     case FUTEX_FD:
7763         return do_safe_futex(g2h(cpu, uaddr),
7764                              op, val, NULL, NULL, 0);
7765     case FUTEX_REQUEUE:
7766     case FUTEX_CMP_REQUEUE:
7767     case FUTEX_WAKE_OP:
7768         /* For FUTEX_REQUEUE, FUTEX_CMP_REQUEUE, and FUTEX_WAKE_OP, the
7769            TIMEOUT parameter is interpreted as a uint32_t by the kernel.
7770            But the prototype takes a `struct timespec *'; insert casts
7771            to satisfy the compiler.  We do not need to tswap TIMEOUT
7772            since it's not compared to guest memory.  */
7773         pts = (struct timespec *)(uintptr_t) timeout;
7774         return do_safe_futex(g2h(cpu, uaddr), op, val, pts, g2h(cpu, uaddr2),
7775                              (base_op == FUTEX_CMP_REQUEUE
7776                               ? tswap32(val3) : val3));
7777     default:
7778         return -TARGET_ENOSYS;
7779     }
7780 }
7781 #endif
7782 
7783 #if defined(TARGET_NR_futex_time64)
7784 static int do_futex_time64(CPUState *cpu, target_ulong uaddr, int op,
7785                            int val, target_ulong timeout,
7786                            target_ulong uaddr2, int val3)
7787 {
7788     struct timespec ts, *pts;
7789     int base_op;
7790 
7791     /* ??? We assume FUTEX_* constants are the same on both host
7792        and target.  */
7793 #ifdef FUTEX_CMD_MASK
7794     base_op = op & FUTEX_CMD_MASK;
7795 #else
7796     base_op = op;
7797 #endif
7798     switch (base_op) {
7799     case FUTEX_WAIT:
7800     case FUTEX_WAIT_BITSET:
7801         if (timeout) {
7802             pts = &ts;
7803             if (target_to_host_timespec64(pts, timeout)) {
7804                 return -TARGET_EFAULT;
7805             }
7806         } else {
7807             pts = NULL;
7808         }
7809         return do_safe_futex(g2h(cpu, uaddr), op,
7810                              tswap32(val), pts, NULL, val3);
7811     case FUTEX_WAKE:
7812         return do_safe_futex(g2h(cpu, uaddr), op, val, NULL, NULL, 0);
7813     case FUTEX_FD:
7814         return do_safe_futex(g2h(cpu, uaddr), op, val, NULL, NULL, 0);
7815     case FUTEX_REQUEUE:
7816     case FUTEX_CMP_REQUEUE:
7817     case FUTEX_WAKE_OP:
7818         /* For FUTEX_REQUEUE, FUTEX_CMP_REQUEUE, and FUTEX_WAKE_OP, the
7819            TIMEOUT parameter is interpreted as a uint32_t by the kernel.
7820            But the prototype takes a `struct timespec *'; insert casts
7821            to satisfy the compiler.  We do not need to tswap TIMEOUT
7822            since it's not compared to guest memory.  */
7823         pts = (struct timespec *)(uintptr_t) timeout;
7824         return do_safe_futex(g2h(cpu, uaddr), op, val, pts, g2h(cpu, uaddr2),
7825                              (base_op == FUTEX_CMP_REQUEUE
7826                               ? tswap32(val3) : val3));
7827     default:
7828         return -TARGET_ENOSYS;
7829     }
7830 }
7831 #endif
7832 
7833 #if defined(TARGET_NR_name_to_handle_at) && defined(CONFIG_OPEN_BY_HANDLE)
7834 static abi_long do_name_to_handle_at(abi_long dirfd, abi_long pathname,
7835                                      abi_long handle, abi_long mount_id,
7836                                      abi_long flags)
7837 {
7838     struct file_handle *target_fh;
7839     struct file_handle *fh;
7840     int mid = 0;
7841     abi_long ret;
7842     char *name;
7843     unsigned int size, total_size;
7844 
7845     if (get_user_s32(size, handle)) {
7846         return -TARGET_EFAULT;
7847     }
7848 
7849     name = lock_user_string(pathname);
7850     if (!name) {
7851         return -TARGET_EFAULT;
7852     }
7853 
7854     total_size = sizeof(struct file_handle) + size;
7855     target_fh = lock_user(VERIFY_WRITE, handle, total_size, 0);
7856     if (!target_fh) {
7857         unlock_user(name, pathname, 0);
7858         return -TARGET_EFAULT;
7859     }
7860 
7861     fh = g_malloc0(total_size);
7862     fh->handle_bytes = size;
7863 
7864     ret = get_errno(name_to_handle_at(dirfd, path(name), fh, &mid, flags));
7865     unlock_user(name, pathname, 0);
7866 
7867     /* man name_to_handle_at(2):
7868      * Other than the use of the handle_bytes field, the caller should treat
7869      * the file_handle structure as an opaque data type
7870      */
7871 
7872     memcpy(target_fh, fh, total_size);
7873     target_fh->handle_bytes = tswap32(fh->handle_bytes);
7874     target_fh->handle_type = tswap32(fh->handle_type);
7875     g_free(fh);
7876     unlock_user(target_fh, handle, total_size);
7877 
7878     if (put_user_s32(mid, mount_id)) {
7879         return -TARGET_EFAULT;
7880     }
7881 
7882     return ret;
7883 
7884 }
7885 #endif
7886 
7887 #if defined(TARGET_NR_open_by_handle_at) && defined(CONFIG_OPEN_BY_HANDLE)
7888 static abi_long do_open_by_handle_at(abi_long mount_fd, abi_long handle,
7889                                      abi_long flags)
7890 {
7891     struct file_handle *target_fh;
7892     struct file_handle *fh;
7893     unsigned int size, total_size;
7894     abi_long ret;
7895 
7896     if (get_user_s32(size, handle)) {
7897         return -TARGET_EFAULT;
7898     }
7899 
7900     total_size = sizeof(struct file_handle) + size;
7901     target_fh = lock_user(VERIFY_READ, handle, total_size, 1);
7902     if (!target_fh) {
7903         return -TARGET_EFAULT;
7904     }
7905 
7906     fh = g_memdup(target_fh, total_size);
7907     fh->handle_bytes = size;
7908     fh->handle_type = tswap32(target_fh->handle_type);
7909 
7910     ret = get_errno(open_by_handle_at(mount_fd, fh,
7911                     target_to_host_bitmask(flags, fcntl_flags_tbl)));
7912 
7913     g_free(fh);
7914 
7915     unlock_user(target_fh, handle, total_size);
7916 
7917     return ret;
7918 }
7919 #endif
7920 
7921 #if defined(TARGET_NR_signalfd) || defined(TARGET_NR_signalfd4)
7922 
7923 static abi_long do_signalfd4(int fd, abi_long mask, int flags)
7924 {
7925     int host_flags;
7926     target_sigset_t *target_mask;
7927     sigset_t host_mask;
7928     abi_long ret;
7929 
7930     if (flags & ~(TARGET_O_NONBLOCK_MASK | TARGET_O_CLOEXEC)) {
7931         return -TARGET_EINVAL;
7932     }
7933     if (!lock_user_struct(VERIFY_READ, target_mask, mask, 1)) {
7934         return -TARGET_EFAULT;
7935     }
7936 
7937     target_to_host_sigset(&host_mask, target_mask);
7938 
7939     host_flags = target_to_host_bitmask(flags, fcntl_flags_tbl);
7940 
7941     ret = get_errno(signalfd(fd, &host_mask, host_flags));
7942     if (ret >= 0) {
7943         fd_trans_register(ret, &target_signalfd_trans);
7944     }
7945 
7946     unlock_user_struct(target_mask, mask, 0);
7947 
7948     return ret;
7949 }
7950 #endif
7951 
7952 /* Map host to target signal numbers for the wait family of syscalls.
7953    Assume all other status bits are the same.  */
7954 int host_to_target_waitstatus(int status)
7955 {
7956     if (WIFSIGNALED(status)) {
7957         return host_to_target_signal(WTERMSIG(status)) | (status & ~0x7f);
7958     }
7959     if (WIFSTOPPED(status)) {
7960         return (host_to_target_signal(WSTOPSIG(status)) << 8)
7961                | (status & 0xff);
7962     }
7963     return status;
7964 }
7965 
7966 static int open_self_cmdline(CPUArchState *cpu_env, int fd)
7967 {
7968     CPUState *cpu = env_cpu(cpu_env);
7969     struct linux_binprm *bprm = ((TaskState *)cpu->opaque)->bprm;
7970     int i;
7971 
7972     for (i = 0; i < bprm->argc; i++) {
7973         size_t len = strlen(bprm->argv[i]) + 1;
7974 
7975         if (write(fd, bprm->argv[i], len) != len) {
7976             return -1;
7977         }
7978     }
7979 
7980     return 0;
7981 }
7982 
7983 static int open_self_maps(CPUArchState *cpu_env, int fd)
7984 {
7985     CPUState *cpu = env_cpu(cpu_env);
7986     TaskState *ts = cpu->opaque;
7987     GSList *map_info = read_self_maps();
7988     GSList *s;
7989     int count;
7990 
7991     for (s = map_info; s; s = g_slist_next(s)) {
7992         MapInfo *e = (MapInfo *) s->data;
7993 
7994         if (h2g_valid(e->start)) {
7995             unsigned long min = e->start;
7996             unsigned long max = e->end;
7997             int flags = page_get_flags(h2g(min));
7998             const char *path;
7999 
8000             max = h2g_valid(max - 1) ?
8001                 max : (uintptr_t) g2h_untagged(GUEST_ADDR_MAX) + 1;
8002 
8003             if (page_check_range(h2g(min), max - min, flags) == -1) {
8004                 continue;
8005             }
8006 
8007             if (h2g(min) == ts->info->stack_limit) {
8008                 path = "[stack]";
8009             } else {
8010                 path = e->path;
8011             }
8012 
8013             count = dprintf(fd, TARGET_ABI_FMT_ptr "-" TARGET_ABI_FMT_ptr
8014                             " %c%c%c%c %08" PRIx64 " %s %"PRId64,
8015                             h2g(min), h2g(max - 1) + 1,
8016                             (flags & PAGE_READ) ? 'r' : '-',
8017                             (flags & PAGE_WRITE_ORG) ? 'w' : '-',
8018                             (flags & PAGE_EXEC) ? 'x' : '-',
8019                             e->is_priv ? 'p' : 's',
8020                             (uint64_t) e->offset, e->dev, e->inode);
8021             if (path) {
8022                 dprintf(fd, "%*s%s\n", 73 - count, "", path);
8023             } else {
8024                 dprintf(fd, "\n");
8025             }
8026         }
8027     }
8028 
8029     free_self_maps(map_info);
8030 
8031 #ifdef TARGET_VSYSCALL_PAGE
8032     /*
8033      * We only support execution from the vsyscall page.
8034      * This is as if CONFIG_LEGACY_VSYSCALL_XONLY=y from v5.3.
8035      */
8036     count = dprintf(fd, TARGET_FMT_lx "-" TARGET_FMT_lx
8037                     " --xp 00000000 00:00 0",
8038                     TARGET_VSYSCALL_PAGE, TARGET_VSYSCALL_PAGE + TARGET_PAGE_SIZE);
8039     dprintf(fd, "%*s%s\n", 73 - count, "",  "[vsyscall]");
8040 #endif
8041 
8042     return 0;
8043 }
8044 
8045 static int open_self_stat(CPUArchState *cpu_env, int fd)
8046 {
8047     CPUState *cpu = env_cpu(cpu_env);
8048     TaskState *ts = cpu->opaque;
8049     g_autoptr(GString) buf = g_string_new(NULL);
8050     int i;
8051 
8052     for (i = 0; i < 44; i++) {
8053         if (i == 0) {
8054             /* pid */
8055             g_string_printf(buf, FMT_pid " ", getpid());
8056         } else if (i == 1) {
8057             /* app name */
8058             gchar *bin = g_strrstr(ts->bprm->argv[0], "/");
8059             bin = bin ? bin + 1 : ts->bprm->argv[0];
8060             g_string_printf(buf, "(%.15s) ", bin);
8061         } else if (i == 3) {
8062             /* ppid */
8063             g_string_printf(buf, FMT_pid " ", getppid());
8064         } else if (i == 21) {
8065             /* starttime */
8066             g_string_printf(buf, "%" PRIu64 " ", ts->start_boottime);
8067         } else if (i == 27) {
8068             /* stack bottom */
8069             g_string_printf(buf, TARGET_ABI_FMT_ld " ", ts->info->start_stack);
8070         } else {
8071             /* for the rest, there is MasterCard */
8072             g_string_printf(buf, "0%c", i == 43 ? '\n' : ' ');
8073         }
8074 
8075         if (write(fd, buf->str, buf->len) != buf->len) {
8076             return -1;
8077         }
8078     }
8079 
8080     return 0;
8081 }
8082 
8083 static int open_self_auxv(CPUArchState *cpu_env, int fd)
8084 {
8085     CPUState *cpu = env_cpu(cpu_env);
8086     TaskState *ts = cpu->opaque;
8087     abi_ulong auxv = ts->info->saved_auxv;
8088     abi_ulong len = ts->info->auxv_len;
8089     char *ptr;
8090 
8091     /*
8092      * Auxiliary vector is stored in target process stack.
8093      * read in whole auxv vector and copy it to file
8094      */
8095     ptr = lock_user(VERIFY_READ, auxv, len, 0);
8096     if (ptr != NULL) {
8097         while (len > 0) {
8098             ssize_t r;
8099             r = write(fd, ptr, len);
8100             if (r <= 0) {
8101                 break;
8102             }
8103             len -= r;
8104             ptr += r;
8105         }
8106         lseek(fd, 0, SEEK_SET);
8107         unlock_user(ptr, auxv, len);
8108     }
8109 
8110     return 0;
8111 }
8112 
8113 static int is_proc_myself(const char *filename, const char *entry)
8114 {
8115     if (!strncmp(filename, "/proc/", strlen("/proc/"))) {
8116         filename += strlen("/proc/");
8117         if (!strncmp(filename, "self/", strlen("self/"))) {
8118             filename += strlen("self/");
8119         } else if (*filename >= '1' && *filename <= '9') {
8120             char myself[80];
8121             snprintf(myself, sizeof(myself), "%d/", getpid());
8122             if (!strncmp(filename, myself, strlen(myself))) {
8123                 filename += strlen(myself);
8124             } else {
8125                 return 0;
8126             }
8127         } else {
8128             return 0;
8129         }
8130         if (!strcmp(filename, entry)) {
8131             return 1;
8132         }
8133     }
8134     return 0;
8135 }
8136 
8137 #if HOST_BIG_ENDIAN != TARGET_BIG_ENDIAN || \
8138     defined(TARGET_SPARC) || defined(TARGET_M68K) || defined(TARGET_HPPA)
8139 static int is_proc(const char *filename, const char *entry)
8140 {
8141     return strcmp(filename, entry) == 0;
8142 }
8143 #endif
8144 
8145 #if HOST_BIG_ENDIAN != TARGET_BIG_ENDIAN
8146 static int open_net_route(CPUArchState *cpu_env, int fd)
8147 {
8148     FILE *fp;
8149     char *line = NULL;
8150     size_t len = 0;
8151     ssize_t read;
8152 
8153     fp = fopen("/proc/net/route", "r");
8154     if (fp == NULL) {
8155         return -1;
8156     }
8157 
8158     /* read header */
8159 
8160     read = getline(&line, &len, fp);
8161     dprintf(fd, "%s", line);
8162 
8163     /* read routes */
8164 
8165     while ((read = getline(&line, &len, fp)) != -1) {
8166         char iface[16];
8167         uint32_t dest, gw, mask;
8168         unsigned int flags, refcnt, use, metric, mtu, window, irtt;
8169         int fields;
8170 
8171         fields = sscanf(line,
8172                         "%s\t%08x\t%08x\t%04x\t%d\t%d\t%d\t%08x\t%d\t%u\t%u\n",
8173                         iface, &dest, &gw, &flags, &refcnt, &use, &metric,
8174                         &mask, &mtu, &window, &irtt);
8175         if (fields != 11) {
8176             continue;
8177         }
8178         dprintf(fd, "%s\t%08x\t%08x\t%04x\t%d\t%d\t%d\t%08x\t%d\t%u\t%u\n",
8179                 iface, tswap32(dest), tswap32(gw), flags, refcnt, use,
8180                 metric, tswap32(mask), mtu, window, irtt);
8181     }
8182 
8183     free(line);
8184     fclose(fp);
8185 
8186     return 0;
8187 }
8188 #endif
8189 
8190 #if defined(TARGET_SPARC)
8191 static int open_cpuinfo(CPUArchState *cpu_env, int fd)
8192 {
8193     dprintf(fd, "type\t\t: sun4u\n");
8194     return 0;
8195 }
8196 #endif
8197 
8198 #if defined(TARGET_HPPA)
8199 static int open_cpuinfo(CPUArchState *cpu_env, int fd)
8200 {
8201     dprintf(fd, "cpu family\t: PA-RISC 1.1e\n");
8202     dprintf(fd, "cpu\t\t: PA7300LC (PCX-L2)\n");
8203     dprintf(fd, "capabilities\t: os32\n");
8204     dprintf(fd, "model\t\t: 9000/778/B160L\n");
8205     dprintf(fd, "model name\t: Merlin L2 160 QEMU (9000/778/B160L)\n");
8206     return 0;
8207 }
8208 #endif
8209 
8210 #if defined(TARGET_M68K)
8211 static int open_hardware(CPUArchState *cpu_env, int fd)
8212 {
8213     dprintf(fd, "Model:\t\tqemu-m68k\n");
8214     return 0;
8215 }
8216 #endif
8217 
8218 static int do_openat(CPUArchState *cpu_env, int dirfd, const char *pathname, int flags, mode_t mode)
8219 {
8220     struct fake_open {
8221         const char *filename;
8222         int (*fill)(CPUArchState *cpu_env, int fd);
8223         int (*cmp)(const char *s1, const char *s2);
8224     };
8225     const struct fake_open *fake_open;
8226     static const struct fake_open fakes[] = {
8227         { "maps", open_self_maps, is_proc_myself },
8228         { "stat", open_self_stat, is_proc_myself },
8229         { "auxv", open_self_auxv, is_proc_myself },
8230         { "cmdline", open_self_cmdline, is_proc_myself },
8231 #if HOST_BIG_ENDIAN != TARGET_BIG_ENDIAN
8232         { "/proc/net/route", open_net_route, is_proc },
8233 #endif
8234 #if defined(TARGET_SPARC) || defined(TARGET_HPPA)
8235         { "/proc/cpuinfo", open_cpuinfo, is_proc },
8236 #endif
8237 #if defined(TARGET_M68K)
8238         { "/proc/hardware", open_hardware, is_proc },
8239 #endif
8240         { NULL, NULL, NULL }
8241     };
8242 
8243     if (is_proc_myself(pathname, "exe")) {
8244         int execfd = qemu_getauxval(AT_EXECFD);
8245         return execfd ? execfd : safe_openat(dirfd, exec_path, flags, mode);
8246     }
8247 
8248     for (fake_open = fakes; fake_open->filename; fake_open++) {
8249         if (fake_open->cmp(pathname, fake_open->filename)) {
8250             break;
8251         }
8252     }
8253 
8254     if (fake_open->filename) {
8255         const char *tmpdir;
8256         char filename[PATH_MAX];
8257         int fd, r;
8258 
8259         /* create temporary file to map stat to */
8260         tmpdir = getenv("TMPDIR");
8261         if (!tmpdir)
8262             tmpdir = "/tmp";
8263         snprintf(filename, sizeof(filename), "%s/qemu-open.XXXXXX", tmpdir);
8264         fd = mkstemp(filename);
8265         if (fd < 0) {
8266             return fd;
8267         }
8268         unlink(filename);
8269 
8270         if ((r = fake_open->fill(cpu_env, fd))) {
8271             int e = errno;
8272             close(fd);
8273             errno = e;
8274             return r;
8275         }
8276         lseek(fd, 0, SEEK_SET);
8277 
8278         return fd;
8279     }
8280 
8281     return safe_openat(dirfd, path(pathname), flags, mode);
8282 }
8283 
8284 #define TIMER_MAGIC 0x0caf0000
8285 #define TIMER_MAGIC_MASK 0xffff0000
8286 
8287 /* Convert QEMU provided timer ID back to internal 16bit index format */
8288 static target_timer_t get_timer_id(abi_long arg)
8289 {
8290     target_timer_t timerid = arg;
8291 
8292     if ((timerid & TIMER_MAGIC_MASK) != TIMER_MAGIC) {
8293         return -TARGET_EINVAL;
8294     }
8295 
8296     timerid &= 0xffff;
8297 
8298     if (timerid >= ARRAY_SIZE(g_posix_timers)) {
8299         return -TARGET_EINVAL;
8300     }
8301 
8302     return timerid;
8303 }
8304 
8305 static int target_to_host_cpu_mask(unsigned long *host_mask,
8306                                    size_t host_size,
8307                                    abi_ulong target_addr,
8308                                    size_t target_size)
8309 {
8310     unsigned target_bits = sizeof(abi_ulong) * 8;
8311     unsigned host_bits = sizeof(*host_mask) * 8;
8312     abi_ulong *target_mask;
8313     unsigned i, j;
8314 
8315     assert(host_size >= target_size);
8316 
8317     target_mask = lock_user(VERIFY_READ, target_addr, target_size, 1);
8318     if (!target_mask) {
8319         return -TARGET_EFAULT;
8320     }
8321     memset(host_mask, 0, host_size);
8322 
8323     for (i = 0 ; i < target_size / sizeof(abi_ulong); i++) {
8324         unsigned bit = i * target_bits;
8325         abi_ulong val;
8326 
8327         __get_user(val, &target_mask[i]);
8328         for (j = 0; j < target_bits; j++, bit++) {
8329             if (val & (1UL << j)) {
8330                 host_mask[bit / host_bits] |= 1UL << (bit % host_bits);
8331             }
8332         }
8333     }
8334 
8335     unlock_user(target_mask, target_addr, 0);
8336     return 0;
8337 }
8338 
8339 static int host_to_target_cpu_mask(const unsigned long *host_mask,
8340                                    size_t host_size,
8341                                    abi_ulong target_addr,
8342                                    size_t target_size)
8343 {
8344     unsigned target_bits = sizeof(abi_ulong) * 8;
8345     unsigned host_bits = sizeof(*host_mask) * 8;
8346     abi_ulong *target_mask;
8347     unsigned i, j;
8348 
8349     assert(host_size >= target_size);
8350 
8351     target_mask = lock_user(VERIFY_WRITE, target_addr, target_size, 0);
8352     if (!target_mask) {
8353         return -TARGET_EFAULT;
8354     }
8355 
8356     for (i = 0 ; i < target_size / sizeof(abi_ulong); i++) {
8357         unsigned bit = i * target_bits;
8358         abi_ulong val = 0;
8359 
8360         for (j = 0; j < target_bits; j++, bit++) {
8361             if (host_mask[bit / host_bits] & (1UL << (bit % host_bits))) {
8362                 val |= 1UL << j;
8363             }
8364         }
8365         __put_user(val, &target_mask[i]);
8366     }
8367 
8368     unlock_user(target_mask, target_addr, target_size);
8369     return 0;
8370 }
8371 
8372 #ifdef TARGET_NR_getdents
8373 static int do_getdents(abi_long dirfd, abi_long arg2, abi_long count)
8374 {
8375     g_autofree void *hdirp = NULL;
8376     void *tdirp;
8377     int hlen, hoff, toff;
8378     int hreclen, treclen;
8379     off64_t prev_diroff = 0;
8380 
8381     hdirp = g_try_malloc(count);
8382     if (!hdirp) {
8383         return -TARGET_ENOMEM;
8384     }
8385 
8386 #ifdef EMULATE_GETDENTS_WITH_GETDENTS
8387     hlen = sys_getdents(dirfd, hdirp, count);
8388 #else
8389     hlen = sys_getdents64(dirfd, hdirp, count);
8390 #endif
8391 
8392     hlen = get_errno(hlen);
8393     if (is_error(hlen)) {
8394         return hlen;
8395     }
8396 
8397     tdirp = lock_user(VERIFY_WRITE, arg2, count, 0);
8398     if (!tdirp) {
8399         return -TARGET_EFAULT;
8400     }
8401 
8402     for (hoff = toff = 0; hoff < hlen; hoff += hreclen, toff += treclen) {
8403 #ifdef EMULATE_GETDENTS_WITH_GETDENTS
8404         struct linux_dirent *hde = hdirp + hoff;
8405 #else
8406         struct linux_dirent64 *hde = hdirp + hoff;
8407 #endif
8408         struct target_dirent *tde = tdirp + toff;
8409         int namelen;
8410         uint8_t type;
8411 
8412         namelen = strlen(hde->d_name);
8413         hreclen = hde->d_reclen;
8414         treclen = offsetof(struct target_dirent, d_name) + namelen + 2;
8415         treclen = QEMU_ALIGN_UP(treclen, __alignof(struct target_dirent));
8416 
8417         if (toff + treclen > count) {
8418             /*
8419              * If the host struct is smaller than the target struct, or
8420              * requires less alignment and thus packs into less space,
8421              * then the host can return more entries than we can pass
8422              * on to the guest.
8423              */
8424             if (toff == 0) {
8425                 toff = -TARGET_EINVAL; /* result buffer is too small */
8426                 break;
8427             }
8428             /*
8429              * Return what we have, resetting the file pointer to the
8430              * location of the first record not returned.
8431              */
8432             lseek64(dirfd, prev_diroff, SEEK_SET);
8433             break;
8434         }
8435 
8436         prev_diroff = hde->d_off;
8437         tde->d_ino = tswapal(hde->d_ino);
8438         tde->d_off = tswapal(hde->d_off);
8439         tde->d_reclen = tswap16(treclen);
8440         memcpy(tde->d_name, hde->d_name, namelen + 1);
8441 
8442         /*
8443          * The getdents type is in what was formerly a padding byte at the
8444          * end of the structure.
8445          */
8446 #ifdef EMULATE_GETDENTS_WITH_GETDENTS
8447         type = *((uint8_t *)hde + hreclen - 1);
8448 #else
8449         type = hde->d_type;
8450 #endif
8451         *((uint8_t *)tde + treclen - 1) = type;
8452     }
8453 
8454     unlock_user(tdirp, arg2, toff);
8455     return toff;
8456 }
8457 #endif /* TARGET_NR_getdents */
8458 
8459 #if defined(TARGET_NR_getdents64) && defined(__NR_getdents64)
8460 static int do_getdents64(abi_long dirfd, abi_long arg2, abi_long count)
8461 {
8462     g_autofree void *hdirp = NULL;
8463     void *tdirp;
8464     int hlen, hoff, toff;
8465     int hreclen, treclen;
8466     off64_t prev_diroff = 0;
8467 
8468     hdirp = g_try_malloc(count);
8469     if (!hdirp) {
8470         return -TARGET_ENOMEM;
8471     }
8472 
8473     hlen = get_errno(sys_getdents64(dirfd, hdirp, count));
8474     if (is_error(hlen)) {
8475         return hlen;
8476     }
8477 
8478     tdirp = lock_user(VERIFY_WRITE, arg2, count, 0);
8479     if (!tdirp) {
8480         return -TARGET_EFAULT;
8481     }
8482 
8483     for (hoff = toff = 0; hoff < hlen; hoff += hreclen, toff += treclen) {
8484         struct linux_dirent64 *hde = hdirp + hoff;
8485         struct target_dirent64 *tde = tdirp + toff;
8486         int namelen;
8487 
8488         namelen = strlen(hde->d_name) + 1;
8489         hreclen = hde->d_reclen;
8490         treclen = offsetof(struct target_dirent64, d_name) + namelen;
8491         treclen = QEMU_ALIGN_UP(treclen, __alignof(struct target_dirent64));
8492 
8493         if (toff + treclen > count) {
8494             /*
8495              * If the host struct is smaller than the target struct, or
8496              * requires less alignment and thus packs into less space,
8497              * then the host can return more entries than we can pass
8498              * on to the guest.
8499              */
8500             if (toff == 0) {
8501                 toff = -TARGET_EINVAL; /* result buffer is too small */
8502                 break;
8503             }
8504             /*
8505              * Return what we have, resetting the file pointer to the
8506              * location of the first record not returned.
8507              */
8508             lseek64(dirfd, prev_diroff, SEEK_SET);
8509             break;
8510         }
8511 
8512         prev_diroff = hde->d_off;
8513         tde->d_ino = tswap64(hde->d_ino);
8514         tde->d_off = tswap64(hde->d_off);
8515         tde->d_reclen = tswap16(treclen);
8516         tde->d_type = hde->d_type;
8517         memcpy(tde->d_name, hde->d_name, namelen);
8518     }
8519 
8520     unlock_user(tdirp, arg2, toff);
8521     return toff;
8522 }
8523 #endif /* TARGET_NR_getdents64 */
8524 
8525 #if defined(TARGET_NR_pivot_root) && defined(__NR_pivot_root)
8526 _syscall2(int, pivot_root, const char *, new_root, const char *, put_old)
8527 #endif
8528 
8529 /* This is an internal helper for do_syscall so that it is easier
8530  * to have a single return point, so that actions, such as logging
8531  * of syscall results, can be performed.
8532  * All errnos that do_syscall() returns must be -TARGET_<errcode>.
8533  */
8534 static abi_long do_syscall1(CPUArchState *cpu_env, int num, abi_long arg1,
8535                             abi_long arg2, abi_long arg3, abi_long arg4,
8536                             abi_long arg5, abi_long arg6, abi_long arg7,
8537                             abi_long arg8)
8538 {
8539     CPUState *cpu = env_cpu(cpu_env);
8540     abi_long ret;
8541 #if defined(TARGET_NR_stat) || defined(TARGET_NR_stat64) \
8542     || defined(TARGET_NR_lstat) || defined(TARGET_NR_lstat64) \
8543     || defined(TARGET_NR_fstat) || defined(TARGET_NR_fstat64) \
8544     || defined(TARGET_NR_statx)
8545     struct stat st;
8546 #endif
8547 #if defined(TARGET_NR_statfs) || defined(TARGET_NR_statfs64) \
8548     || defined(TARGET_NR_fstatfs)
8549     struct statfs stfs;
8550 #endif
8551     void *p;
8552 
8553     switch(num) {
8554     case TARGET_NR_exit:
8555         /* In old applications this may be used to implement _exit(2).
8556            However in threaded applications it is used for thread termination,
8557            and _exit_group is used for application termination.
8558            Do thread termination if we have more then one thread.  */
8559 
8560         if (block_signals()) {
8561             return -QEMU_ERESTARTSYS;
8562         }
8563 
8564         pthread_mutex_lock(&clone_lock);
8565 
8566         if (CPU_NEXT(first_cpu)) {
8567             TaskState *ts = cpu->opaque;
8568 
8569             object_property_set_bool(OBJECT(cpu), "realized", false, NULL);
8570             object_unref(OBJECT(cpu));
8571             /*
8572              * At this point the CPU should be unrealized and removed
8573              * from cpu lists. We can clean-up the rest of the thread
8574              * data without the lock held.
8575              */
8576 
8577             pthread_mutex_unlock(&clone_lock);
8578 
8579             if (ts->child_tidptr) {
8580                 put_user_u32(0, ts->child_tidptr);
8581                 do_sys_futex(g2h(cpu, ts->child_tidptr),
8582                              FUTEX_WAKE, INT_MAX, NULL, NULL, 0);
8583             }
8584             thread_cpu = NULL;
8585             g_free(ts);
8586             rcu_unregister_thread();
8587             pthread_exit(NULL);
8588         }
8589 
8590         pthread_mutex_unlock(&clone_lock);
8591         preexit_cleanup(cpu_env, arg1);
8592         _exit(arg1);
8593         return 0; /* avoid warning */
8594     case TARGET_NR_read:
8595         if (arg2 == 0 && arg3 == 0) {
8596             return get_errno(safe_read(arg1, 0, 0));
8597         } else {
8598             if (!(p = lock_user(VERIFY_WRITE, arg2, arg3, 0)))
8599                 return -TARGET_EFAULT;
8600             ret = get_errno(safe_read(arg1, p, arg3));
8601             if (ret >= 0 &&
8602                 fd_trans_host_to_target_data(arg1)) {
8603                 ret = fd_trans_host_to_target_data(arg1)(p, ret);
8604             }
8605             unlock_user(p, arg2, ret);
8606         }
8607         return ret;
8608     case TARGET_NR_write:
8609         if (arg2 == 0 && arg3 == 0) {
8610             return get_errno(safe_write(arg1, 0, 0));
8611         }
8612         if (!(p = lock_user(VERIFY_READ, arg2, arg3, 1)))
8613             return -TARGET_EFAULT;
8614         if (fd_trans_target_to_host_data(arg1)) {
8615             void *copy = g_malloc(arg3);
8616             memcpy(copy, p, arg3);
8617             ret = fd_trans_target_to_host_data(arg1)(copy, arg3);
8618             if (ret >= 0) {
8619                 ret = get_errno(safe_write(arg1, copy, ret));
8620             }
8621             g_free(copy);
8622         } else {
8623             ret = get_errno(safe_write(arg1, p, arg3));
8624         }
8625         unlock_user(p, arg2, 0);
8626         return ret;
8627 
8628 #ifdef TARGET_NR_open
8629     case TARGET_NR_open:
8630         if (!(p = lock_user_string(arg1)))
8631             return -TARGET_EFAULT;
8632         ret = get_errno(do_openat(cpu_env, AT_FDCWD, p,
8633                                   target_to_host_bitmask(arg2, fcntl_flags_tbl),
8634                                   arg3));
8635         fd_trans_unregister(ret);
8636         unlock_user(p, arg1, 0);
8637         return ret;
8638 #endif
8639     case TARGET_NR_openat:
8640         if (!(p = lock_user_string(arg2)))
8641             return -TARGET_EFAULT;
8642         ret = get_errno(do_openat(cpu_env, arg1, p,
8643                                   target_to_host_bitmask(arg3, fcntl_flags_tbl),
8644                                   arg4));
8645         fd_trans_unregister(ret);
8646         unlock_user(p, arg2, 0);
8647         return ret;
8648 #if defined(TARGET_NR_name_to_handle_at) && defined(CONFIG_OPEN_BY_HANDLE)
8649     case TARGET_NR_name_to_handle_at:
8650         ret = do_name_to_handle_at(arg1, arg2, arg3, arg4, arg5);
8651         return ret;
8652 #endif
8653 #if defined(TARGET_NR_open_by_handle_at) && defined(CONFIG_OPEN_BY_HANDLE)
8654     case TARGET_NR_open_by_handle_at:
8655         ret = do_open_by_handle_at(arg1, arg2, arg3);
8656         fd_trans_unregister(ret);
8657         return ret;
8658 #endif
8659     case TARGET_NR_close:
8660         fd_trans_unregister(arg1);
8661         return get_errno(close(arg1));
8662 
8663     case TARGET_NR_brk:
8664         return do_brk(arg1);
8665 #ifdef TARGET_NR_fork
8666     case TARGET_NR_fork:
8667         return get_errno(do_fork(cpu_env, TARGET_SIGCHLD, 0, 0, 0, 0));
8668 #endif
8669 #ifdef TARGET_NR_waitpid
8670     case TARGET_NR_waitpid:
8671         {
8672             int status;
8673             ret = get_errno(safe_wait4(arg1, &status, arg3, 0));
8674             if (!is_error(ret) && arg2 && ret
8675                 && put_user_s32(host_to_target_waitstatus(status), arg2))
8676                 return -TARGET_EFAULT;
8677         }
8678         return ret;
8679 #endif
8680 #ifdef TARGET_NR_waitid
8681     case TARGET_NR_waitid:
8682         {
8683             siginfo_t info;
8684             info.si_pid = 0;
8685             ret = get_errno(safe_waitid(arg1, arg2, &info, arg4, NULL));
8686             if (!is_error(ret) && arg3 && info.si_pid != 0) {
8687                 if (!(p = lock_user(VERIFY_WRITE, arg3, sizeof(target_siginfo_t), 0)))
8688                     return -TARGET_EFAULT;
8689                 host_to_target_siginfo(p, &info);
8690                 unlock_user(p, arg3, sizeof(target_siginfo_t));
8691             }
8692         }
8693         return ret;
8694 #endif
8695 #ifdef TARGET_NR_creat /* not on alpha */
8696     case TARGET_NR_creat:
8697         if (!(p = lock_user_string(arg1)))
8698             return -TARGET_EFAULT;
8699         ret = get_errno(creat(p, arg2));
8700         fd_trans_unregister(ret);
8701         unlock_user(p, arg1, 0);
8702         return ret;
8703 #endif
8704 #ifdef TARGET_NR_link
8705     case TARGET_NR_link:
8706         {
8707             void * p2;
8708             p = lock_user_string(arg1);
8709             p2 = lock_user_string(arg2);
8710             if (!p || !p2)
8711                 ret = -TARGET_EFAULT;
8712             else
8713                 ret = get_errno(link(p, p2));
8714             unlock_user(p2, arg2, 0);
8715             unlock_user(p, arg1, 0);
8716         }
8717         return ret;
8718 #endif
8719 #if defined(TARGET_NR_linkat)
8720     case TARGET_NR_linkat:
8721         {
8722             void * p2 = NULL;
8723             if (!arg2 || !arg4)
8724                 return -TARGET_EFAULT;
8725             p  = lock_user_string(arg2);
8726             p2 = lock_user_string(arg4);
8727             if (!p || !p2)
8728                 ret = -TARGET_EFAULT;
8729             else
8730                 ret = get_errno(linkat(arg1, p, arg3, p2, arg5));
8731             unlock_user(p, arg2, 0);
8732             unlock_user(p2, arg4, 0);
8733         }
8734         return ret;
8735 #endif
8736 #ifdef TARGET_NR_unlink
8737     case TARGET_NR_unlink:
8738         if (!(p = lock_user_string(arg1)))
8739             return -TARGET_EFAULT;
8740         ret = get_errno(unlink(p));
8741         unlock_user(p, arg1, 0);
8742         return ret;
8743 #endif
8744 #if defined(TARGET_NR_unlinkat)
8745     case TARGET_NR_unlinkat:
8746         if (!(p = lock_user_string(arg2)))
8747             return -TARGET_EFAULT;
8748         ret = get_errno(unlinkat(arg1, p, arg3));
8749         unlock_user(p, arg2, 0);
8750         return ret;
8751 #endif
8752     case TARGET_NR_execve:
8753         {
8754             char **argp, **envp;
8755             int argc, envc;
8756             abi_ulong gp;
8757             abi_ulong guest_argp;
8758             abi_ulong guest_envp;
8759             abi_ulong addr;
8760             char **q;
8761 
8762             argc = 0;
8763             guest_argp = arg2;
8764             for (gp = guest_argp; gp; gp += sizeof(abi_ulong)) {
8765                 if (get_user_ual(addr, gp))
8766                     return -TARGET_EFAULT;
8767                 if (!addr)
8768                     break;
8769                 argc++;
8770             }
8771             envc = 0;
8772             guest_envp = arg3;
8773             for (gp = guest_envp; gp; gp += sizeof(abi_ulong)) {
8774                 if (get_user_ual(addr, gp))
8775                     return -TARGET_EFAULT;
8776                 if (!addr)
8777                     break;
8778                 envc++;
8779             }
8780 
8781             argp = g_new0(char *, argc + 1);
8782             envp = g_new0(char *, envc + 1);
8783 
8784             for (gp = guest_argp, q = argp; gp;
8785                   gp += sizeof(abi_ulong), q++) {
8786                 if (get_user_ual(addr, gp))
8787                     goto execve_efault;
8788                 if (!addr)
8789                     break;
8790                 if (!(*q = lock_user_string(addr)))
8791                     goto execve_efault;
8792             }
8793             *q = NULL;
8794 
8795             for (gp = guest_envp, q = envp; gp;
8796                   gp += sizeof(abi_ulong), q++) {
8797                 if (get_user_ual(addr, gp))
8798                     goto execve_efault;
8799                 if (!addr)
8800                     break;
8801                 if (!(*q = lock_user_string(addr)))
8802                     goto execve_efault;
8803             }
8804             *q = NULL;
8805 
8806             if (!(p = lock_user_string(arg1)))
8807                 goto execve_efault;
8808             /* Although execve() is not an interruptible syscall it is
8809              * a special case where we must use the safe_syscall wrapper:
8810              * if we allow a signal to happen before we make the host
8811              * syscall then we will 'lose' it, because at the point of
8812              * execve the process leaves QEMU's control. So we use the
8813              * safe syscall wrapper to ensure that we either take the
8814              * signal as a guest signal, or else it does not happen
8815              * before the execve completes and makes it the other
8816              * program's problem.
8817              */
8818             ret = get_errno(safe_execve(p, argp, envp));
8819             unlock_user(p, arg1, 0);
8820 
8821             goto execve_end;
8822 
8823         execve_efault:
8824             ret = -TARGET_EFAULT;
8825 
8826         execve_end:
8827             for (gp = guest_argp, q = argp; *q;
8828                   gp += sizeof(abi_ulong), q++) {
8829                 if (get_user_ual(addr, gp)
8830                     || !addr)
8831                     break;
8832                 unlock_user(*q, addr, 0);
8833             }
8834             for (gp = guest_envp, q = envp; *q;
8835                   gp += sizeof(abi_ulong), q++) {
8836                 if (get_user_ual(addr, gp)
8837                     || !addr)
8838                     break;
8839                 unlock_user(*q, addr, 0);
8840             }
8841 
8842             g_free(argp);
8843             g_free(envp);
8844         }
8845         return ret;
8846     case TARGET_NR_chdir:
8847         if (!(p = lock_user_string(arg1)))
8848             return -TARGET_EFAULT;
8849         ret = get_errno(chdir(p));
8850         unlock_user(p, arg1, 0);
8851         return ret;
8852 #ifdef TARGET_NR_time
8853     case TARGET_NR_time:
8854         {
8855             time_t host_time;
8856             ret = get_errno(time(&host_time));
8857             if (!is_error(ret)
8858                 && arg1
8859                 && put_user_sal(host_time, arg1))
8860                 return -TARGET_EFAULT;
8861         }
8862         return ret;
8863 #endif
8864 #ifdef TARGET_NR_mknod
8865     case TARGET_NR_mknod:
8866         if (!(p = lock_user_string(arg1)))
8867             return -TARGET_EFAULT;
8868         ret = get_errno(mknod(p, arg2, arg3));
8869         unlock_user(p, arg1, 0);
8870         return ret;
8871 #endif
8872 #if defined(TARGET_NR_mknodat)
8873     case TARGET_NR_mknodat:
8874         if (!(p = lock_user_string(arg2)))
8875             return -TARGET_EFAULT;
8876         ret = get_errno(mknodat(arg1, p, arg3, arg4));
8877         unlock_user(p, arg2, 0);
8878         return ret;
8879 #endif
8880 #ifdef TARGET_NR_chmod
8881     case TARGET_NR_chmod:
8882         if (!(p = lock_user_string(arg1)))
8883             return -TARGET_EFAULT;
8884         ret = get_errno(chmod(p, arg2));
8885         unlock_user(p, arg1, 0);
8886         return ret;
8887 #endif
8888 #ifdef TARGET_NR_lseek
8889     case TARGET_NR_lseek:
8890         return get_errno(lseek(arg1, arg2, arg3));
8891 #endif
8892 #if defined(TARGET_NR_getxpid) && defined(TARGET_ALPHA)
8893     /* Alpha specific */
8894     case TARGET_NR_getxpid:
8895         cpu_env->ir[IR_A4] = getppid();
8896         return get_errno(getpid());
8897 #endif
8898 #ifdef TARGET_NR_getpid
8899     case TARGET_NR_getpid:
8900         return get_errno(getpid());
8901 #endif
8902     case TARGET_NR_mount:
8903         {
8904             /* need to look at the data field */
8905             void *p2, *p3;
8906 
8907             if (arg1) {
8908                 p = lock_user_string(arg1);
8909                 if (!p) {
8910                     return -TARGET_EFAULT;
8911                 }
8912             } else {
8913                 p = NULL;
8914             }
8915 
8916             p2 = lock_user_string(arg2);
8917             if (!p2) {
8918                 if (arg1) {
8919                     unlock_user(p, arg1, 0);
8920                 }
8921                 return -TARGET_EFAULT;
8922             }
8923 
8924             if (arg3) {
8925                 p3 = lock_user_string(arg3);
8926                 if (!p3) {
8927                     if (arg1) {
8928                         unlock_user(p, arg1, 0);
8929                     }
8930                     unlock_user(p2, arg2, 0);
8931                     return -TARGET_EFAULT;
8932                 }
8933             } else {
8934                 p3 = NULL;
8935             }
8936 
8937             /* FIXME - arg5 should be locked, but it isn't clear how to
8938              * do that since it's not guaranteed to be a NULL-terminated
8939              * string.
8940              */
8941             if (!arg5) {
8942                 ret = mount(p, p2, p3, (unsigned long)arg4, NULL);
8943             } else {
8944                 ret = mount(p, p2, p3, (unsigned long)arg4, g2h(cpu, arg5));
8945             }
8946             ret = get_errno(ret);
8947 
8948             if (arg1) {
8949                 unlock_user(p, arg1, 0);
8950             }
8951             unlock_user(p2, arg2, 0);
8952             if (arg3) {
8953                 unlock_user(p3, arg3, 0);
8954             }
8955         }
8956         return ret;
8957 #if defined(TARGET_NR_umount) || defined(TARGET_NR_oldumount)
8958 #if defined(TARGET_NR_umount)
8959     case TARGET_NR_umount:
8960 #endif
8961 #if defined(TARGET_NR_oldumount)
8962     case TARGET_NR_oldumount:
8963 #endif
8964         if (!(p = lock_user_string(arg1)))
8965             return -TARGET_EFAULT;
8966         ret = get_errno(umount(p));
8967         unlock_user(p, arg1, 0);
8968         return ret;
8969 #endif
8970 #ifdef TARGET_NR_stime /* not on alpha */
8971     case TARGET_NR_stime:
8972         {
8973             struct timespec ts;
8974             ts.tv_nsec = 0;
8975             if (get_user_sal(ts.tv_sec, arg1)) {
8976                 return -TARGET_EFAULT;
8977             }
8978             return get_errno(clock_settime(CLOCK_REALTIME, &ts));
8979         }
8980 #endif
8981 #ifdef TARGET_NR_alarm /* not on alpha */
8982     case TARGET_NR_alarm:
8983         return alarm(arg1);
8984 #endif
8985 #ifdef TARGET_NR_pause /* not on alpha */
8986     case TARGET_NR_pause:
8987         if (!block_signals()) {
8988             sigsuspend(&((TaskState *)cpu->opaque)->signal_mask);
8989         }
8990         return -TARGET_EINTR;
8991 #endif
8992 #ifdef TARGET_NR_utime
8993     case TARGET_NR_utime:
8994         {
8995             struct utimbuf tbuf, *host_tbuf;
8996             struct target_utimbuf *target_tbuf;
8997             if (arg2) {
8998                 if (!lock_user_struct(VERIFY_READ, target_tbuf, arg2, 1))
8999                     return -TARGET_EFAULT;
9000                 tbuf.actime = tswapal(target_tbuf->actime);
9001                 tbuf.modtime = tswapal(target_tbuf->modtime);
9002                 unlock_user_struct(target_tbuf, arg2, 0);
9003                 host_tbuf = &tbuf;
9004             } else {
9005                 host_tbuf = NULL;
9006             }
9007             if (!(p = lock_user_string(arg1)))
9008                 return -TARGET_EFAULT;
9009             ret = get_errno(utime(p, host_tbuf));
9010             unlock_user(p, arg1, 0);
9011         }
9012         return ret;
9013 #endif
9014 #ifdef TARGET_NR_utimes
9015     case TARGET_NR_utimes:
9016         {
9017             struct timeval *tvp, tv[2];
9018             if (arg2) {
9019                 if (copy_from_user_timeval(&tv[0], arg2)
9020                     || copy_from_user_timeval(&tv[1],
9021                                               arg2 + sizeof(struct target_timeval)))
9022                     return -TARGET_EFAULT;
9023                 tvp = tv;
9024             } else {
9025                 tvp = NULL;
9026             }
9027             if (!(p = lock_user_string(arg1)))
9028                 return -TARGET_EFAULT;
9029             ret = get_errno(utimes(p, tvp));
9030             unlock_user(p, arg1, 0);
9031         }
9032         return ret;
9033 #endif
9034 #if defined(TARGET_NR_futimesat)
9035     case TARGET_NR_futimesat:
9036         {
9037             struct timeval *tvp, tv[2];
9038             if (arg3) {
9039                 if (copy_from_user_timeval(&tv[0], arg3)
9040                     || copy_from_user_timeval(&tv[1],
9041                                               arg3 + sizeof(struct target_timeval)))
9042                     return -TARGET_EFAULT;
9043                 tvp = tv;
9044             } else {
9045                 tvp = NULL;
9046             }
9047             if (!(p = lock_user_string(arg2))) {
9048                 return -TARGET_EFAULT;
9049             }
9050             ret = get_errno(futimesat(arg1, path(p), tvp));
9051             unlock_user(p, arg2, 0);
9052         }
9053         return ret;
9054 #endif
9055 #ifdef TARGET_NR_access
9056     case TARGET_NR_access:
9057         if (!(p = lock_user_string(arg1))) {
9058             return -TARGET_EFAULT;
9059         }
9060         ret = get_errno(access(path(p), arg2));
9061         unlock_user(p, arg1, 0);
9062         return ret;
9063 #endif
9064 #if defined(TARGET_NR_faccessat) && defined(__NR_faccessat)
9065     case TARGET_NR_faccessat:
9066         if (!(p = lock_user_string(arg2))) {
9067             return -TARGET_EFAULT;
9068         }
9069         ret = get_errno(faccessat(arg1, p, arg3, 0));
9070         unlock_user(p, arg2, 0);
9071         return ret;
9072 #endif
9073 #ifdef TARGET_NR_nice /* not on alpha */
9074     case TARGET_NR_nice:
9075         return get_errno(nice(arg1));
9076 #endif
9077     case TARGET_NR_sync:
9078         sync();
9079         return 0;
9080 #if defined(TARGET_NR_syncfs) && defined(CONFIG_SYNCFS)
9081     case TARGET_NR_syncfs:
9082         return get_errno(syncfs(arg1));
9083 #endif
9084     case TARGET_NR_kill:
9085         return get_errno(safe_kill(arg1, target_to_host_signal(arg2)));
9086 #ifdef TARGET_NR_rename
9087     case TARGET_NR_rename:
9088         {
9089             void *p2;
9090             p = lock_user_string(arg1);
9091             p2 = lock_user_string(arg2);
9092             if (!p || !p2)
9093                 ret = -TARGET_EFAULT;
9094             else
9095                 ret = get_errno(rename(p, p2));
9096             unlock_user(p2, arg2, 0);
9097             unlock_user(p, arg1, 0);
9098         }
9099         return ret;
9100 #endif
9101 #if defined(TARGET_NR_renameat)
9102     case TARGET_NR_renameat:
9103         {
9104             void *p2;
9105             p  = lock_user_string(arg2);
9106             p2 = lock_user_string(arg4);
9107             if (!p || !p2)
9108                 ret = -TARGET_EFAULT;
9109             else
9110                 ret = get_errno(renameat(arg1, p, arg3, p2));
9111             unlock_user(p2, arg4, 0);
9112             unlock_user(p, arg2, 0);
9113         }
9114         return ret;
9115 #endif
9116 #if defined(TARGET_NR_renameat2)
9117     case TARGET_NR_renameat2:
9118         {
9119             void *p2;
9120             p  = lock_user_string(arg2);
9121             p2 = lock_user_string(arg4);
9122             if (!p || !p2) {
9123                 ret = -TARGET_EFAULT;
9124             } else {
9125                 ret = get_errno(sys_renameat2(arg1, p, arg3, p2, arg5));
9126             }
9127             unlock_user(p2, arg4, 0);
9128             unlock_user(p, arg2, 0);
9129         }
9130         return ret;
9131 #endif
9132 #ifdef TARGET_NR_mkdir
9133     case TARGET_NR_mkdir:
9134         if (!(p = lock_user_string(arg1)))
9135             return -TARGET_EFAULT;
9136         ret = get_errno(mkdir(p, arg2));
9137         unlock_user(p, arg1, 0);
9138         return ret;
9139 #endif
9140 #if defined(TARGET_NR_mkdirat)
9141     case TARGET_NR_mkdirat:
9142         if (!(p = lock_user_string(arg2)))
9143             return -TARGET_EFAULT;
9144         ret = get_errno(mkdirat(arg1, p, arg3));
9145         unlock_user(p, arg2, 0);
9146         return ret;
9147 #endif
9148 #ifdef TARGET_NR_rmdir
9149     case TARGET_NR_rmdir:
9150         if (!(p = lock_user_string(arg1)))
9151             return -TARGET_EFAULT;
9152         ret = get_errno(rmdir(p));
9153         unlock_user(p, arg1, 0);
9154         return ret;
9155 #endif
9156     case TARGET_NR_dup:
9157         ret = get_errno(dup(arg1));
9158         if (ret >= 0) {
9159             fd_trans_dup(arg1, ret);
9160         }
9161         return ret;
9162 #ifdef TARGET_NR_pipe
9163     case TARGET_NR_pipe:
9164         return do_pipe(cpu_env, arg1, 0, 0);
9165 #endif
9166 #ifdef TARGET_NR_pipe2
9167     case TARGET_NR_pipe2:
9168         return do_pipe(cpu_env, arg1,
9169                        target_to_host_bitmask(arg2, fcntl_flags_tbl), 1);
9170 #endif
9171     case TARGET_NR_times:
9172         {
9173             struct target_tms *tmsp;
9174             struct tms tms;
9175             ret = get_errno(times(&tms));
9176             if (arg1) {
9177                 tmsp = lock_user(VERIFY_WRITE, arg1, sizeof(struct target_tms), 0);
9178                 if (!tmsp)
9179                     return -TARGET_EFAULT;
9180                 tmsp->tms_utime = tswapal(host_to_target_clock_t(tms.tms_utime));
9181                 tmsp->tms_stime = tswapal(host_to_target_clock_t(tms.tms_stime));
9182                 tmsp->tms_cutime = tswapal(host_to_target_clock_t(tms.tms_cutime));
9183                 tmsp->tms_cstime = tswapal(host_to_target_clock_t(tms.tms_cstime));
9184             }
9185             if (!is_error(ret))
9186                 ret = host_to_target_clock_t(ret);
9187         }
9188         return ret;
9189     case TARGET_NR_acct:
9190         if (arg1 == 0) {
9191             ret = get_errno(acct(NULL));
9192         } else {
9193             if (!(p = lock_user_string(arg1))) {
9194                 return -TARGET_EFAULT;
9195             }
9196             ret = get_errno(acct(path(p)));
9197             unlock_user(p, arg1, 0);
9198         }
9199         return ret;
9200 #ifdef TARGET_NR_umount2
9201     case TARGET_NR_umount2:
9202         if (!(p = lock_user_string(arg1)))
9203             return -TARGET_EFAULT;
9204         ret = get_errno(umount2(p, arg2));
9205         unlock_user(p, arg1, 0);
9206         return ret;
9207 #endif
9208     case TARGET_NR_ioctl:
9209         return do_ioctl(arg1, arg2, arg3);
9210 #ifdef TARGET_NR_fcntl
9211     case TARGET_NR_fcntl:
9212         return do_fcntl(arg1, arg2, arg3);
9213 #endif
9214     case TARGET_NR_setpgid:
9215         return get_errno(setpgid(arg1, arg2));
9216     case TARGET_NR_umask:
9217         return get_errno(umask(arg1));
9218     case TARGET_NR_chroot:
9219         if (!(p = lock_user_string(arg1)))
9220             return -TARGET_EFAULT;
9221         ret = get_errno(chroot(p));
9222         unlock_user(p, arg1, 0);
9223         return ret;
9224 #ifdef TARGET_NR_dup2
9225     case TARGET_NR_dup2:
9226         ret = get_errno(dup2(arg1, arg2));
9227         if (ret >= 0) {
9228             fd_trans_dup(arg1, arg2);
9229         }
9230         return ret;
9231 #endif
9232 #if defined(CONFIG_DUP3) && defined(TARGET_NR_dup3)
9233     case TARGET_NR_dup3:
9234     {
9235         int host_flags;
9236 
9237         if ((arg3 & ~TARGET_O_CLOEXEC) != 0) {
9238             return -EINVAL;
9239         }
9240         host_flags = target_to_host_bitmask(arg3, fcntl_flags_tbl);
9241         ret = get_errno(dup3(arg1, arg2, host_flags));
9242         if (ret >= 0) {
9243             fd_trans_dup(arg1, arg2);
9244         }
9245         return ret;
9246     }
9247 #endif
9248 #ifdef TARGET_NR_getppid /* not on alpha */
9249     case TARGET_NR_getppid:
9250         return get_errno(getppid());
9251 #endif
9252 #ifdef TARGET_NR_getpgrp
9253     case TARGET_NR_getpgrp:
9254         return get_errno(getpgrp());
9255 #endif
9256     case TARGET_NR_setsid:
9257         return get_errno(setsid());
9258 #ifdef TARGET_NR_sigaction
9259     case TARGET_NR_sigaction:
9260         {
9261 #if defined(TARGET_MIPS)
9262 	    struct target_sigaction act, oact, *pact, *old_act;
9263 
9264 	    if (arg2) {
9265                 if (!lock_user_struct(VERIFY_READ, old_act, arg2, 1))
9266                     return -TARGET_EFAULT;
9267 		act._sa_handler = old_act->_sa_handler;
9268 		target_siginitset(&act.sa_mask, old_act->sa_mask.sig[0]);
9269 		act.sa_flags = old_act->sa_flags;
9270 		unlock_user_struct(old_act, arg2, 0);
9271 		pact = &act;
9272 	    } else {
9273 		pact = NULL;
9274 	    }
9275 
9276         ret = get_errno(do_sigaction(arg1, pact, &oact, 0));
9277 
9278 	    if (!is_error(ret) && arg3) {
9279                 if (!lock_user_struct(VERIFY_WRITE, old_act, arg3, 0))
9280                     return -TARGET_EFAULT;
9281 		old_act->_sa_handler = oact._sa_handler;
9282 		old_act->sa_flags = oact.sa_flags;
9283 		old_act->sa_mask.sig[0] = oact.sa_mask.sig[0];
9284 		old_act->sa_mask.sig[1] = 0;
9285 		old_act->sa_mask.sig[2] = 0;
9286 		old_act->sa_mask.sig[3] = 0;
9287 		unlock_user_struct(old_act, arg3, 1);
9288 	    }
9289 #else
9290             struct target_old_sigaction *old_act;
9291             struct target_sigaction act, oact, *pact;
9292             if (arg2) {
9293                 if (!lock_user_struct(VERIFY_READ, old_act, arg2, 1))
9294                     return -TARGET_EFAULT;
9295                 act._sa_handler = old_act->_sa_handler;
9296                 target_siginitset(&act.sa_mask, old_act->sa_mask);
9297                 act.sa_flags = old_act->sa_flags;
9298 #ifdef TARGET_ARCH_HAS_SA_RESTORER
9299                 act.sa_restorer = old_act->sa_restorer;
9300 #endif
9301                 unlock_user_struct(old_act, arg2, 0);
9302                 pact = &act;
9303             } else {
9304                 pact = NULL;
9305             }
9306             ret = get_errno(do_sigaction(arg1, pact, &oact, 0));
9307             if (!is_error(ret) && arg3) {
9308                 if (!lock_user_struct(VERIFY_WRITE, old_act, arg3, 0))
9309                     return -TARGET_EFAULT;
9310                 old_act->_sa_handler = oact._sa_handler;
9311                 old_act->sa_mask = oact.sa_mask.sig[0];
9312                 old_act->sa_flags = oact.sa_flags;
9313 #ifdef TARGET_ARCH_HAS_SA_RESTORER
9314                 old_act->sa_restorer = oact.sa_restorer;
9315 #endif
9316                 unlock_user_struct(old_act, arg3, 1);
9317             }
9318 #endif
9319         }
9320         return ret;
9321 #endif
9322     case TARGET_NR_rt_sigaction:
9323         {
9324             /*
9325              * For Alpha and SPARC this is a 5 argument syscall, with
9326              * a 'restorer' parameter which must be copied into the
9327              * sa_restorer field of the sigaction struct.
9328              * For Alpha that 'restorer' is arg5; for SPARC it is arg4,
9329              * and arg5 is the sigsetsize.
9330              */
9331 #if defined(TARGET_ALPHA)
9332             target_ulong sigsetsize = arg4;
9333             target_ulong restorer = arg5;
9334 #elif defined(TARGET_SPARC)
9335             target_ulong restorer = arg4;
9336             target_ulong sigsetsize = arg5;
9337 #else
9338             target_ulong sigsetsize = arg4;
9339             target_ulong restorer = 0;
9340 #endif
9341             struct target_sigaction *act = NULL;
9342             struct target_sigaction *oact = NULL;
9343 
9344             if (sigsetsize != sizeof(target_sigset_t)) {
9345                 return -TARGET_EINVAL;
9346             }
9347             if (arg2 && !lock_user_struct(VERIFY_READ, act, arg2, 1)) {
9348                 return -TARGET_EFAULT;
9349             }
9350             if (arg3 && !lock_user_struct(VERIFY_WRITE, oact, arg3, 0)) {
9351                 ret = -TARGET_EFAULT;
9352             } else {
9353                 ret = get_errno(do_sigaction(arg1, act, oact, restorer));
9354                 if (oact) {
9355                     unlock_user_struct(oact, arg3, 1);
9356                 }
9357             }
9358             if (act) {
9359                 unlock_user_struct(act, arg2, 0);
9360             }
9361         }
9362         return ret;
9363 #ifdef TARGET_NR_sgetmask /* not on alpha */
9364     case TARGET_NR_sgetmask:
9365         {
9366             sigset_t cur_set;
9367             abi_ulong target_set;
9368             ret = do_sigprocmask(0, NULL, &cur_set);
9369             if (!ret) {
9370                 host_to_target_old_sigset(&target_set, &cur_set);
9371                 ret = target_set;
9372             }
9373         }
9374         return ret;
9375 #endif
9376 #ifdef TARGET_NR_ssetmask /* not on alpha */
9377     case TARGET_NR_ssetmask:
9378         {
9379             sigset_t set, oset;
9380             abi_ulong target_set = arg1;
9381             target_to_host_old_sigset(&set, &target_set);
9382             ret = do_sigprocmask(SIG_SETMASK, &set, &oset);
9383             if (!ret) {
9384                 host_to_target_old_sigset(&target_set, &oset);
9385                 ret = target_set;
9386             }
9387         }
9388         return ret;
9389 #endif
9390 #ifdef TARGET_NR_sigprocmask
9391     case TARGET_NR_sigprocmask:
9392         {
9393 #if defined(TARGET_ALPHA)
9394             sigset_t set, oldset;
9395             abi_ulong mask;
9396             int how;
9397 
9398             switch (arg1) {
9399             case TARGET_SIG_BLOCK:
9400                 how = SIG_BLOCK;
9401                 break;
9402             case TARGET_SIG_UNBLOCK:
9403                 how = SIG_UNBLOCK;
9404                 break;
9405             case TARGET_SIG_SETMASK:
9406                 how = SIG_SETMASK;
9407                 break;
9408             default:
9409                 return -TARGET_EINVAL;
9410             }
9411             mask = arg2;
9412             target_to_host_old_sigset(&set, &mask);
9413 
9414             ret = do_sigprocmask(how, &set, &oldset);
9415             if (!is_error(ret)) {
9416                 host_to_target_old_sigset(&mask, &oldset);
9417                 ret = mask;
9418                 cpu_env->ir[IR_V0] = 0; /* force no error */
9419             }
9420 #else
9421             sigset_t set, oldset, *set_ptr;
9422             int how;
9423 
9424             if (arg2) {
9425                 p = lock_user(VERIFY_READ, arg2, sizeof(target_sigset_t), 1);
9426                 if (!p) {
9427                     return -TARGET_EFAULT;
9428                 }
9429                 target_to_host_old_sigset(&set, p);
9430                 unlock_user(p, arg2, 0);
9431                 set_ptr = &set;
9432                 switch (arg1) {
9433                 case TARGET_SIG_BLOCK:
9434                     how = SIG_BLOCK;
9435                     break;
9436                 case TARGET_SIG_UNBLOCK:
9437                     how = SIG_UNBLOCK;
9438                     break;
9439                 case TARGET_SIG_SETMASK:
9440                     how = SIG_SETMASK;
9441                     break;
9442                 default:
9443                     return -TARGET_EINVAL;
9444                 }
9445             } else {
9446                 how = 0;
9447                 set_ptr = NULL;
9448             }
9449             ret = do_sigprocmask(how, set_ptr, &oldset);
9450             if (!is_error(ret) && arg3) {
9451                 if (!(p = lock_user(VERIFY_WRITE, arg3, sizeof(target_sigset_t), 0)))
9452                     return -TARGET_EFAULT;
9453                 host_to_target_old_sigset(p, &oldset);
9454                 unlock_user(p, arg3, sizeof(target_sigset_t));
9455             }
9456 #endif
9457         }
9458         return ret;
9459 #endif
9460     case TARGET_NR_rt_sigprocmask:
9461         {
9462             int how = arg1;
9463             sigset_t set, oldset, *set_ptr;
9464 
9465             if (arg4 != sizeof(target_sigset_t)) {
9466                 return -TARGET_EINVAL;
9467             }
9468 
9469             if (arg2) {
9470                 p = lock_user(VERIFY_READ, arg2, sizeof(target_sigset_t), 1);
9471                 if (!p) {
9472                     return -TARGET_EFAULT;
9473                 }
9474                 target_to_host_sigset(&set, p);
9475                 unlock_user(p, arg2, 0);
9476                 set_ptr = &set;
9477                 switch(how) {
9478                 case TARGET_SIG_BLOCK:
9479                     how = SIG_BLOCK;
9480                     break;
9481                 case TARGET_SIG_UNBLOCK:
9482                     how = SIG_UNBLOCK;
9483                     break;
9484                 case TARGET_SIG_SETMASK:
9485                     how = SIG_SETMASK;
9486                     break;
9487                 default:
9488                     return -TARGET_EINVAL;
9489                 }
9490             } else {
9491                 how = 0;
9492                 set_ptr = NULL;
9493             }
9494             ret = do_sigprocmask(how, set_ptr, &oldset);
9495             if (!is_error(ret) && arg3) {
9496                 if (!(p = lock_user(VERIFY_WRITE, arg3, sizeof(target_sigset_t), 0)))
9497                     return -TARGET_EFAULT;
9498                 host_to_target_sigset(p, &oldset);
9499                 unlock_user(p, arg3, sizeof(target_sigset_t));
9500             }
9501         }
9502         return ret;
9503 #ifdef TARGET_NR_sigpending
9504     case TARGET_NR_sigpending:
9505         {
9506             sigset_t set;
9507             ret = get_errno(sigpending(&set));
9508             if (!is_error(ret)) {
9509                 if (!(p = lock_user(VERIFY_WRITE, arg1, sizeof(target_sigset_t), 0)))
9510                     return -TARGET_EFAULT;
9511                 host_to_target_old_sigset(p, &set);
9512                 unlock_user(p, arg1, sizeof(target_sigset_t));
9513             }
9514         }
9515         return ret;
9516 #endif
9517     case TARGET_NR_rt_sigpending:
9518         {
9519             sigset_t set;
9520 
9521             /* Yes, this check is >, not != like most. We follow the kernel's
9522              * logic and it does it like this because it implements
9523              * NR_sigpending through the same code path, and in that case
9524              * the old_sigset_t is smaller in size.
9525              */
9526             if (arg2 > sizeof(target_sigset_t)) {
9527                 return -TARGET_EINVAL;
9528             }
9529 
9530             ret = get_errno(sigpending(&set));
9531             if (!is_error(ret)) {
9532                 if (!(p = lock_user(VERIFY_WRITE, arg1, sizeof(target_sigset_t), 0)))
9533                     return -TARGET_EFAULT;
9534                 host_to_target_sigset(p, &set);
9535                 unlock_user(p, arg1, sizeof(target_sigset_t));
9536             }
9537         }
9538         return ret;
9539 #ifdef TARGET_NR_sigsuspend
9540     case TARGET_NR_sigsuspend:
9541         {
9542             sigset_t *set;
9543 
9544 #if defined(TARGET_ALPHA)
9545             TaskState *ts = cpu->opaque;
9546             /* target_to_host_old_sigset will bswap back */
9547             abi_ulong mask = tswapal(arg1);
9548             set = &ts->sigsuspend_mask;
9549             target_to_host_old_sigset(set, &mask);
9550 #else
9551             ret = process_sigsuspend_mask(&set, arg1, sizeof(target_sigset_t));
9552             if (ret != 0) {
9553                 return ret;
9554             }
9555 #endif
9556             ret = get_errno(safe_rt_sigsuspend(set, SIGSET_T_SIZE));
9557             finish_sigsuspend_mask(ret);
9558         }
9559         return ret;
9560 #endif
9561     case TARGET_NR_rt_sigsuspend:
9562         {
9563             sigset_t *set;
9564 
9565             ret = process_sigsuspend_mask(&set, arg1, arg2);
9566             if (ret != 0) {
9567                 return ret;
9568             }
9569             ret = get_errno(safe_rt_sigsuspend(set, SIGSET_T_SIZE));
9570             finish_sigsuspend_mask(ret);
9571         }
9572         return ret;
9573 #ifdef TARGET_NR_rt_sigtimedwait
9574     case TARGET_NR_rt_sigtimedwait:
9575         {
9576             sigset_t set;
9577             struct timespec uts, *puts;
9578             siginfo_t uinfo;
9579 
9580             if (arg4 != sizeof(target_sigset_t)) {
9581                 return -TARGET_EINVAL;
9582             }
9583 
9584             if (!(p = lock_user(VERIFY_READ, arg1, sizeof(target_sigset_t), 1)))
9585                 return -TARGET_EFAULT;
9586             target_to_host_sigset(&set, p);
9587             unlock_user(p, arg1, 0);
9588             if (arg3) {
9589                 puts = &uts;
9590                 if (target_to_host_timespec(puts, arg3)) {
9591                     return -TARGET_EFAULT;
9592                 }
9593             } else {
9594                 puts = NULL;
9595             }
9596             ret = get_errno(safe_rt_sigtimedwait(&set, &uinfo, puts,
9597                                                  SIGSET_T_SIZE));
9598             if (!is_error(ret)) {
9599                 if (arg2) {
9600                     p = lock_user(VERIFY_WRITE, arg2, sizeof(target_siginfo_t),
9601                                   0);
9602                     if (!p) {
9603                         return -TARGET_EFAULT;
9604                     }
9605                     host_to_target_siginfo(p, &uinfo);
9606                     unlock_user(p, arg2, sizeof(target_siginfo_t));
9607                 }
9608                 ret = host_to_target_signal(ret);
9609             }
9610         }
9611         return ret;
9612 #endif
9613 #ifdef TARGET_NR_rt_sigtimedwait_time64
9614     case TARGET_NR_rt_sigtimedwait_time64:
9615         {
9616             sigset_t set;
9617             struct timespec uts, *puts;
9618             siginfo_t uinfo;
9619 
9620             if (arg4 != sizeof(target_sigset_t)) {
9621                 return -TARGET_EINVAL;
9622             }
9623 
9624             p = lock_user(VERIFY_READ, arg1, sizeof(target_sigset_t), 1);
9625             if (!p) {
9626                 return -TARGET_EFAULT;
9627             }
9628             target_to_host_sigset(&set, p);
9629             unlock_user(p, arg1, 0);
9630             if (arg3) {
9631                 puts = &uts;
9632                 if (target_to_host_timespec64(puts, arg3)) {
9633                     return -TARGET_EFAULT;
9634                 }
9635             } else {
9636                 puts = NULL;
9637             }
9638             ret = get_errno(safe_rt_sigtimedwait(&set, &uinfo, puts,
9639                                                  SIGSET_T_SIZE));
9640             if (!is_error(ret)) {
9641                 if (arg2) {
9642                     p = lock_user(VERIFY_WRITE, arg2,
9643                                   sizeof(target_siginfo_t), 0);
9644                     if (!p) {
9645                         return -TARGET_EFAULT;
9646                     }
9647                     host_to_target_siginfo(p, &uinfo);
9648                     unlock_user(p, arg2, sizeof(target_siginfo_t));
9649                 }
9650                 ret = host_to_target_signal(ret);
9651             }
9652         }
9653         return ret;
9654 #endif
9655     case TARGET_NR_rt_sigqueueinfo:
9656         {
9657             siginfo_t uinfo;
9658 
9659             p = lock_user(VERIFY_READ, arg3, sizeof(target_siginfo_t), 1);
9660             if (!p) {
9661                 return -TARGET_EFAULT;
9662             }
9663             target_to_host_siginfo(&uinfo, p);
9664             unlock_user(p, arg3, 0);
9665             ret = get_errno(sys_rt_sigqueueinfo(arg1, arg2, &uinfo));
9666         }
9667         return ret;
9668     case TARGET_NR_rt_tgsigqueueinfo:
9669         {
9670             siginfo_t uinfo;
9671 
9672             p = lock_user(VERIFY_READ, arg4, sizeof(target_siginfo_t), 1);
9673             if (!p) {
9674                 return -TARGET_EFAULT;
9675             }
9676             target_to_host_siginfo(&uinfo, p);
9677             unlock_user(p, arg4, 0);
9678             ret = get_errno(sys_rt_tgsigqueueinfo(arg1, arg2, arg3, &uinfo));
9679         }
9680         return ret;
9681 #ifdef TARGET_NR_sigreturn
9682     case TARGET_NR_sigreturn:
9683         if (block_signals()) {
9684             return -QEMU_ERESTARTSYS;
9685         }
9686         return do_sigreturn(cpu_env);
9687 #endif
9688     case TARGET_NR_rt_sigreturn:
9689         if (block_signals()) {
9690             return -QEMU_ERESTARTSYS;
9691         }
9692         return do_rt_sigreturn(cpu_env);
9693     case TARGET_NR_sethostname:
9694         if (!(p = lock_user_string(arg1)))
9695             return -TARGET_EFAULT;
9696         ret = get_errno(sethostname(p, arg2));
9697         unlock_user(p, arg1, 0);
9698         return ret;
9699 #ifdef TARGET_NR_setrlimit
9700     case TARGET_NR_setrlimit:
9701         {
9702             int resource = target_to_host_resource(arg1);
9703             struct target_rlimit *target_rlim;
9704             struct rlimit rlim;
9705             if (!lock_user_struct(VERIFY_READ, target_rlim, arg2, 1))
9706                 return -TARGET_EFAULT;
9707             rlim.rlim_cur = target_to_host_rlim(target_rlim->rlim_cur);
9708             rlim.rlim_max = target_to_host_rlim(target_rlim->rlim_max);
9709             unlock_user_struct(target_rlim, arg2, 0);
9710             /*
9711              * If we just passed through resource limit settings for memory then
9712              * they would also apply to QEMU's own allocations, and QEMU will
9713              * crash or hang or die if its allocations fail. Ideally we would
9714              * track the guest allocations in QEMU and apply the limits ourselves.
9715              * For now, just tell the guest the call succeeded but don't actually
9716              * limit anything.
9717              */
9718             if (resource != RLIMIT_AS &&
9719                 resource != RLIMIT_DATA &&
9720                 resource != RLIMIT_STACK) {
9721                 return get_errno(setrlimit(resource, &rlim));
9722             } else {
9723                 return 0;
9724             }
9725         }
9726 #endif
9727 #ifdef TARGET_NR_getrlimit
9728     case TARGET_NR_getrlimit:
9729         {
9730             int resource = target_to_host_resource(arg1);
9731             struct target_rlimit *target_rlim;
9732             struct rlimit rlim;
9733 
9734             ret = get_errno(getrlimit(resource, &rlim));
9735             if (!is_error(ret)) {
9736                 if (!lock_user_struct(VERIFY_WRITE, target_rlim, arg2, 0))
9737                     return -TARGET_EFAULT;
9738                 target_rlim->rlim_cur = host_to_target_rlim(rlim.rlim_cur);
9739                 target_rlim->rlim_max = host_to_target_rlim(rlim.rlim_max);
9740                 unlock_user_struct(target_rlim, arg2, 1);
9741             }
9742         }
9743         return ret;
9744 #endif
9745     case TARGET_NR_getrusage:
9746         {
9747             struct rusage rusage;
9748             ret = get_errno(getrusage(arg1, &rusage));
9749             if (!is_error(ret)) {
9750                 ret = host_to_target_rusage(arg2, &rusage);
9751             }
9752         }
9753         return ret;
9754 #if defined(TARGET_NR_gettimeofday)
9755     case TARGET_NR_gettimeofday:
9756         {
9757             struct timeval tv;
9758             struct timezone tz;
9759 
9760             ret = get_errno(gettimeofday(&tv, &tz));
9761             if (!is_error(ret)) {
9762                 if (arg1 && copy_to_user_timeval(arg1, &tv)) {
9763                     return -TARGET_EFAULT;
9764                 }
9765                 if (arg2 && copy_to_user_timezone(arg2, &tz)) {
9766                     return -TARGET_EFAULT;
9767                 }
9768             }
9769         }
9770         return ret;
9771 #endif
9772 #if defined(TARGET_NR_settimeofday)
9773     case TARGET_NR_settimeofday:
9774         {
9775             struct timeval tv, *ptv = NULL;
9776             struct timezone tz, *ptz = NULL;
9777 
9778             if (arg1) {
9779                 if (copy_from_user_timeval(&tv, arg1)) {
9780                     return -TARGET_EFAULT;
9781                 }
9782                 ptv = &tv;
9783             }
9784 
9785             if (arg2) {
9786                 if (copy_from_user_timezone(&tz, arg2)) {
9787                     return -TARGET_EFAULT;
9788                 }
9789                 ptz = &tz;
9790             }
9791 
9792             return get_errno(settimeofday(ptv, ptz));
9793         }
9794 #endif
9795 #if defined(TARGET_NR_select)
9796     case TARGET_NR_select:
9797 #if defined(TARGET_WANT_NI_OLD_SELECT)
9798         /* some architectures used to have old_select here
9799          * but now ENOSYS it.
9800          */
9801         ret = -TARGET_ENOSYS;
9802 #elif defined(TARGET_WANT_OLD_SYS_SELECT)
9803         ret = do_old_select(arg1);
9804 #else
9805         ret = do_select(arg1, arg2, arg3, arg4, arg5);
9806 #endif
9807         return ret;
9808 #endif
9809 #ifdef TARGET_NR_pselect6
9810     case TARGET_NR_pselect6:
9811         return do_pselect6(arg1, arg2, arg3, arg4, arg5, arg6, false);
9812 #endif
9813 #ifdef TARGET_NR_pselect6_time64
9814     case TARGET_NR_pselect6_time64:
9815         return do_pselect6(arg1, arg2, arg3, arg4, arg5, arg6, true);
9816 #endif
9817 #ifdef TARGET_NR_symlink
9818     case TARGET_NR_symlink:
9819         {
9820             void *p2;
9821             p = lock_user_string(arg1);
9822             p2 = lock_user_string(arg2);
9823             if (!p || !p2)
9824                 ret = -TARGET_EFAULT;
9825             else
9826                 ret = get_errno(symlink(p, p2));
9827             unlock_user(p2, arg2, 0);
9828             unlock_user(p, arg1, 0);
9829         }
9830         return ret;
9831 #endif
9832 #if defined(TARGET_NR_symlinkat)
9833     case TARGET_NR_symlinkat:
9834         {
9835             void *p2;
9836             p  = lock_user_string(arg1);
9837             p2 = lock_user_string(arg3);
9838             if (!p || !p2)
9839                 ret = -TARGET_EFAULT;
9840             else
9841                 ret = get_errno(symlinkat(p, arg2, p2));
9842             unlock_user(p2, arg3, 0);
9843             unlock_user(p, arg1, 0);
9844         }
9845         return ret;
9846 #endif
9847 #ifdef TARGET_NR_readlink
9848     case TARGET_NR_readlink:
9849         {
9850             void *p2;
9851             p = lock_user_string(arg1);
9852             p2 = lock_user(VERIFY_WRITE, arg2, arg3, 0);
9853             if (!p || !p2) {
9854                 ret = -TARGET_EFAULT;
9855             } else if (!arg3) {
9856                 /* Short circuit this for the magic exe check. */
9857                 ret = -TARGET_EINVAL;
9858             } else if (is_proc_myself((const char *)p, "exe")) {
9859                 char real[PATH_MAX], *temp;
9860                 temp = realpath(exec_path, real);
9861                 /* Return value is # of bytes that we wrote to the buffer. */
9862                 if (temp == NULL) {
9863                     ret = get_errno(-1);
9864                 } else {
9865                     /* Don't worry about sign mismatch as earlier mapping
9866                      * logic would have thrown a bad address error. */
9867                     ret = MIN(strlen(real), arg3);
9868                     /* We cannot NUL terminate the string. */
9869                     memcpy(p2, real, ret);
9870                 }
9871             } else {
9872                 ret = get_errno(readlink(path(p), p2, arg3));
9873             }
9874             unlock_user(p2, arg2, ret);
9875             unlock_user(p, arg1, 0);
9876         }
9877         return ret;
9878 #endif
9879 #if defined(TARGET_NR_readlinkat)
9880     case TARGET_NR_readlinkat:
9881         {
9882             void *p2;
9883             p  = lock_user_string(arg2);
9884             p2 = lock_user(VERIFY_WRITE, arg3, arg4, 0);
9885             if (!p || !p2) {
9886                 ret = -TARGET_EFAULT;
9887             } else if (is_proc_myself((const char *)p, "exe")) {
9888                 char real[PATH_MAX], *temp;
9889                 temp = realpath(exec_path, real);
9890                 ret = temp == NULL ? get_errno(-1) : strlen(real) ;
9891                 snprintf((char *)p2, arg4, "%s", real);
9892             } else {
9893                 ret = get_errno(readlinkat(arg1, path(p), p2, arg4));
9894             }
9895             unlock_user(p2, arg3, ret);
9896             unlock_user(p, arg2, 0);
9897         }
9898         return ret;
9899 #endif
9900 #ifdef TARGET_NR_swapon
9901     case TARGET_NR_swapon:
9902         if (!(p = lock_user_string(arg1)))
9903             return -TARGET_EFAULT;
9904         ret = get_errno(swapon(p, arg2));
9905         unlock_user(p, arg1, 0);
9906         return ret;
9907 #endif
9908     case TARGET_NR_reboot:
9909         if (arg3 == LINUX_REBOOT_CMD_RESTART2) {
9910            /* arg4 must be ignored in all other cases */
9911            p = lock_user_string(arg4);
9912            if (!p) {
9913                return -TARGET_EFAULT;
9914            }
9915            ret = get_errno(reboot(arg1, arg2, arg3, p));
9916            unlock_user(p, arg4, 0);
9917         } else {
9918            ret = get_errno(reboot(arg1, arg2, arg3, NULL));
9919         }
9920         return ret;
9921 #ifdef TARGET_NR_mmap
9922     case TARGET_NR_mmap:
9923 #if (defined(TARGET_I386) && defined(TARGET_ABI32)) || \
9924     (defined(TARGET_ARM) && defined(TARGET_ABI32)) || \
9925     defined(TARGET_M68K) || defined(TARGET_CRIS) || defined(TARGET_MICROBLAZE) \
9926     || defined(TARGET_S390X)
9927         {
9928             abi_ulong *v;
9929             abi_ulong v1, v2, v3, v4, v5, v6;
9930             if (!(v = lock_user(VERIFY_READ, arg1, 6 * sizeof(abi_ulong), 1)))
9931                 return -TARGET_EFAULT;
9932             v1 = tswapal(v[0]);
9933             v2 = tswapal(v[1]);
9934             v3 = tswapal(v[2]);
9935             v4 = tswapal(v[3]);
9936             v5 = tswapal(v[4]);
9937             v6 = tswapal(v[5]);
9938             unlock_user(v, arg1, 0);
9939             ret = get_errno(target_mmap(v1, v2, v3,
9940                                         target_to_host_bitmask(v4, mmap_flags_tbl),
9941                                         v5, v6));
9942         }
9943 #else
9944         /* mmap pointers are always untagged */
9945         ret = get_errno(target_mmap(arg1, arg2, arg3,
9946                                     target_to_host_bitmask(arg4, mmap_flags_tbl),
9947                                     arg5,
9948                                     arg6));
9949 #endif
9950         return ret;
9951 #endif
9952 #ifdef TARGET_NR_mmap2
9953     case TARGET_NR_mmap2:
9954 #ifndef MMAP_SHIFT
9955 #define MMAP_SHIFT 12
9956 #endif
9957         ret = target_mmap(arg1, arg2, arg3,
9958                           target_to_host_bitmask(arg4, mmap_flags_tbl),
9959                           arg5, arg6 << MMAP_SHIFT);
9960         return get_errno(ret);
9961 #endif
9962     case TARGET_NR_munmap:
9963         arg1 = cpu_untagged_addr(cpu, arg1);
9964         return get_errno(target_munmap(arg1, arg2));
9965     case TARGET_NR_mprotect:
9966         arg1 = cpu_untagged_addr(cpu, arg1);
9967         {
9968             TaskState *ts = cpu->opaque;
9969             /* Special hack to detect libc making the stack executable.  */
9970             if ((arg3 & PROT_GROWSDOWN)
9971                 && arg1 >= ts->info->stack_limit
9972                 && arg1 <= ts->info->start_stack) {
9973                 arg3 &= ~PROT_GROWSDOWN;
9974                 arg2 = arg2 + arg1 - ts->info->stack_limit;
9975                 arg1 = ts->info->stack_limit;
9976             }
9977         }
9978         return get_errno(target_mprotect(arg1, arg2, arg3));
9979 #ifdef TARGET_NR_mremap
9980     case TARGET_NR_mremap:
9981         arg1 = cpu_untagged_addr(cpu, arg1);
9982         /* mremap new_addr (arg5) is always untagged */
9983         return get_errno(target_mremap(arg1, arg2, arg3, arg4, arg5));
9984 #endif
9985         /* ??? msync/mlock/munlock are broken for softmmu.  */
9986 #ifdef TARGET_NR_msync
9987     case TARGET_NR_msync:
9988         return get_errno(msync(g2h(cpu, arg1), arg2, arg3));
9989 #endif
9990 #ifdef TARGET_NR_mlock
9991     case TARGET_NR_mlock:
9992         return get_errno(mlock(g2h(cpu, arg1), arg2));
9993 #endif
9994 #ifdef TARGET_NR_munlock
9995     case TARGET_NR_munlock:
9996         return get_errno(munlock(g2h(cpu, arg1), arg2));
9997 #endif
9998 #ifdef TARGET_NR_mlockall
9999     case TARGET_NR_mlockall:
10000         return get_errno(mlockall(target_to_host_mlockall_arg(arg1)));
10001 #endif
10002 #ifdef TARGET_NR_munlockall
10003     case TARGET_NR_munlockall:
10004         return get_errno(munlockall());
10005 #endif
10006 #ifdef TARGET_NR_truncate
10007     case TARGET_NR_truncate:
10008         if (!(p = lock_user_string(arg1)))
10009             return -TARGET_EFAULT;
10010         ret = get_errno(truncate(p, arg2));
10011         unlock_user(p, arg1, 0);
10012         return ret;
10013 #endif
10014 #ifdef TARGET_NR_ftruncate
10015     case TARGET_NR_ftruncate:
10016         return get_errno(ftruncate(arg1, arg2));
10017 #endif
10018     case TARGET_NR_fchmod:
10019         return get_errno(fchmod(arg1, arg2));
10020 #if defined(TARGET_NR_fchmodat)
10021     case TARGET_NR_fchmodat:
10022         if (!(p = lock_user_string(arg2)))
10023             return -TARGET_EFAULT;
10024         ret = get_errno(fchmodat(arg1, p, arg3, 0));
10025         unlock_user(p, arg2, 0);
10026         return ret;
10027 #endif
10028     case TARGET_NR_getpriority:
10029         /* Note that negative values are valid for getpriority, so we must
10030            differentiate based on errno settings.  */
10031         errno = 0;
10032         ret = getpriority(arg1, arg2);
10033         if (ret == -1 && errno != 0) {
10034             return -host_to_target_errno(errno);
10035         }
10036 #ifdef TARGET_ALPHA
10037         /* Return value is the unbiased priority.  Signal no error.  */
10038         cpu_env->ir[IR_V0] = 0;
10039 #else
10040         /* Return value is a biased priority to avoid negative numbers.  */
10041         ret = 20 - ret;
10042 #endif
10043         return ret;
10044     case TARGET_NR_setpriority:
10045         return get_errno(setpriority(arg1, arg2, arg3));
10046 #ifdef TARGET_NR_statfs
10047     case TARGET_NR_statfs:
10048         if (!(p = lock_user_string(arg1))) {
10049             return -TARGET_EFAULT;
10050         }
10051         ret = get_errno(statfs(path(p), &stfs));
10052         unlock_user(p, arg1, 0);
10053     convert_statfs:
10054         if (!is_error(ret)) {
10055             struct target_statfs *target_stfs;
10056 
10057             if (!lock_user_struct(VERIFY_WRITE, target_stfs, arg2, 0))
10058                 return -TARGET_EFAULT;
10059             __put_user(stfs.f_type, &target_stfs->f_type);
10060             __put_user(stfs.f_bsize, &target_stfs->f_bsize);
10061             __put_user(stfs.f_blocks, &target_stfs->f_blocks);
10062             __put_user(stfs.f_bfree, &target_stfs->f_bfree);
10063             __put_user(stfs.f_bavail, &target_stfs->f_bavail);
10064             __put_user(stfs.f_files, &target_stfs->f_files);
10065             __put_user(stfs.f_ffree, &target_stfs->f_ffree);
10066             __put_user(stfs.f_fsid.__val[0], &target_stfs->f_fsid.val[0]);
10067             __put_user(stfs.f_fsid.__val[1], &target_stfs->f_fsid.val[1]);
10068             __put_user(stfs.f_namelen, &target_stfs->f_namelen);
10069             __put_user(stfs.f_frsize, &target_stfs->f_frsize);
10070 #ifdef _STATFS_F_FLAGS
10071             __put_user(stfs.f_flags, &target_stfs->f_flags);
10072 #else
10073             __put_user(0, &target_stfs->f_flags);
10074 #endif
10075             memset(target_stfs->f_spare, 0, sizeof(target_stfs->f_spare));
10076             unlock_user_struct(target_stfs, arg2, 1);
10077         }
10078         return ret;
10079 #endif
10080 #ifdef TARGET_NR_fstatfs
10081     case TARGET_NR_fstatfs:
10082         ret = get_errno(fstatfs(arg1, &stfs));
10083         goto convert_statfs;
10084 #endif
10085 #ifdef TARGET_NR_statfs64
10086     case TARGET_NR_statfs64:
10087         if (!(p = lock_user_string(arg1))) {
10088             return -TARGET_EFAULT;
10089         }
10090         ret = get_errno(statfs(path(p), &stfs));
10091         unlock_user(p, arg1, 0);
10092     convert_statfs64:
10093         if (!is_error(ret)) {
10094             struct target_statfs64 *target_stfs;
10095 
10096             if (!lock_user_struct(VERIFY_WRITE, target_stfs, arg3, 0))
10097                 return -TARGET_EFAULT;
10098             __put_user(stfs.f_type, &target_stfs->f_type);
10099             __put_user(stfs.f_bsize, &target_stfs->f_bsize);
10100             __put_user(stfs.f_blocks, &target_stfs->f_blocks);
10101             __put_user(stfs.f_bfree, &target_stfs->f_bfree);
10102             __put_user(stfs.f_bavail, &target_stfs->f_bavail);
10103             __put_user(stfs.f_files, &target_stfs->f_files);
10104             __put_user(stfs.f_ffree, &target_stfs->f_ffree);
10105             __put_user(stfs.f_fsid.__val[0], &target_stfs->f_fsid.val[0]);
10106             __put_user(stfs.f_fsid.__val[1], &target_stfs->f_fsid.val[1]);
10107             __put_user(stfs.f_namelen, &target_stfs->f_namelen);
10108             __put_user(stfs.f_frsize, &target_stfs->f_frsize);
10109 #ifdef _STATFS_F_FLAGS
10110             __put_user(stfs.f_flags, &target_stfs->f_flags);
10111 #else
10112             __put_user(0, &target_stfs->f_flags);
10113 #endif
10114             memset(target_stfs->f_spare, 0, sizeof(target_stfs->f_spare));
10115             unlock_user_struct(target_stfs, arg3, 1);
10116         }
10117         return ret;
10118     case TARGET_NR_fstatfs64:
10119         ret = get_errno(fstatfs(arg1, &stfs));
10120         goto convert_statfs64;
10121 #endif
10122 #ifdef TARGET_NR_socketcall
10123     case TARGET_NR_socketcall:
10124         return do_socketcall(arg1, arg2);
10125 #endif
10126 #ifdef TARGET_NR_accept
10127     case TARGET_NR_accept:
10128         return do_accept4(arg1, arg2, arg3, 0);
10129 #endif
10130 #ifdef TARGET_NR_accept4
10131     case TARGET_NR_accept4:
10132         return do_accept4(arg1, arg2, arg3, arg4);
10133 #endif
10134 #ifdef TARGET_NR_bind
10135     case TARGET_NR_bind:
10136         return do_bind(arg1, arg2, arg3);
10137 #endif
10138 #ifdef TARGET_NR_connect
10139     case TARGET_NR_connect:
10140         return do_connect(arg1, arg2, arg3);
10141 #endif
10142 #ifdef TARGET_NR_getpeername
10143     case TARGET_NR_getpeername:
10144         return do_getpeername(arg1, arg2, arg3);
10145 #endif
10146 #ifdef TARGET_NR_getsockname
10147     case TARGET_NR_getsockname:
10148         return do_getsockname(arg1, arg2, arg3);
10149 #endif
10150 #ifdef TARGET_NR_getsockopt
10151     case TARGET_NR_getsockopt:
10152         return do_getsockopt(arg1, arg2, arg3, arg4, arg5);
10153 #endif
10154 #ifdef TARGET_NR_listen
10155     case TARGET_NR_listen:
10156         return get_errno(listen(arg1, arg2));
10157 #endif
10158 #ifdef TARGET_NR_recv
10159     case TARGET_NR_recv:
10160         return do_recvfrom(arg1, arg2, arg3, arg4, 0, 0);
10161 #endif
10162 #ifdef TARGET_NR_recvfrom
10163     case TARGET_NR_recvfrom:
10164         return do_recvfrom(arg1, arg2, arg3, arg4, arg5, arg6);
10165 #endif
10166 #ifdef TARGET_NR_recvmsg
10167     case TARGET_NR_recvmsg:
10168         return do_sendrecvmsg(arg1, arg2, arg3, 0);
10169 #endif
10170 #ifdef TARGET_NR_send
10171     case TARGET_NR_send:
10172         return do_sendto(arg1, arg2, arg3, arg4, 0, 0);
10173 #endif
10174 #ifdef TARGET_NR_sendmsg
10175     case TARGET_NR_sendmsg:
10176         return do_sendrecvmsg(arg1, arg2, arg3, 1);
10177 #endif
10178 #ifdef TARGET_NR_sendmmsg
10179     case TARGET_NR_sendmmsg:
10180         return do_sendrecvmmsg(arg1, arg2, arg3, arg4, 1);
10181 #endif
10182 #ifdef TARGET_NR_recvmmsg
10183     case TARGET_NR_recvmmsg:
10184         return do_sendrecvmmsg(arg1, arg2, arg3, arg4, 0);
10185 #endif
10186 #ifdef TARGET_NR_sendto
10187     case TARGET_NR_sendto:
10188         return do_sendto(arg1, arg2, arg3, arg4, arg5, arg6);
10189 #endif
10190 #ifdef TARGET_NR_shutdown
10191     case TARGET_NR_shutdown:
10192         return get_errno(shutdown(arg1, arg2));
10193 #endif
10194 #if defined(TARGET_NR_getrandom) && defined(__NR_getrandom)
10195     case TARGET_NR_getrandom:
10196         p = lock_user(VERIFY_WRITE, arg1, arg2, 0);
10197         if (!p) {
10198             return -TARGET_EFAULT;
10199         }
10200         ret = get_errno(getrandom(p, arg2, arg3));
10201         unlock_user(p, arg1, ret);
10202         return ret;
10203 #endif
10204 #ifdef TARGET_NR_socket
10205     case TARGET_NR_socket:
10206         return do_socket(arg1, arg2, arg3);
10207 #endif
10208 #ifdef TARGET_NR_socketpair
10209     case TARGET_NR_socketpair:
10210         return do_socketpair(arg1, arg2, arg3, arg4);
10211 #endif
10212 #ifdef TARGET_NR_setsockopt
10213     case TARGET_NR_setsockopt:
10214         return do_setsockopt(arg1, arg2, arg3, arg4, (socklen_t) arg5);
10215 #endif
10216 #if defined(TARGET_NR_syslog)
10217     case TARGET_NR_syslog:
10218         {
10219             int len = arg2;
10220 
10221             switch (arg1) {
10222             case TARGET_SYSLOG_ACTION_CLOSE:         /* Close log */
10223             case TARGET_SYSLOG_ACTION_OPEN:          /* Open log */
10224             case TARGET_SYSLOG_ACTION_CLEAR:         /* Clear ring buffer */
10225             case TARGET_SYSLOG_ACTION_CONSOLE_OFF:   /* Disable logging */
10226             case TARGET_SYSLOG_ACTION_CONSOLE_ON:    /* Enable logging */
10227             case TARGET_SYSLOG_ACTION_CONSOLE_LEVEL: /* Set messages level */
10228             case TARGET_SYSLOG_ACTION_SIZE_UNREAD:   /* Number of chars */
10229             case TARGET_SYSLOG_ACTION_SIZE_BUFFER:   /* Size of the buffer */
10230                 return get_errno(sys_syslog((int)arg1, NULL, (int)arg3));
10231             case TARGET_SYSLOG_ACTION_READ:          /* Read from log */
10232             case TARGET_SYSLOG_ACTION_READ_CLEAR:    /* Read/clear msgs */
10233             case TARGET_SYSLOG_ACTION_READ_ALL:      /* Read last messages */
10234                 {
10235                     if (len < 0) {
10236                         return -TARGET_EINVAL;
10237                     }
10238                     if (len == 0) {
10239                         return 0;
10240                     }
10241                     p = lock_user(VERIFY_WRITE, arg2, arg3, 0);
10242                     if (!p) {
10243                         return -TARGET_EFAULT;
10244                     }
10245                     ret = get_errno(sys_syslog((int)arg1, p, (int)arg3));
10246                     unlock_user(p, arg2, arg3);
10247                 }
10248                 return ret;
10249             default:
10250                 return -TARGET_EINVAL;
10251             }
10252         }
10253         break;
10254 #endif
10255     case TARGET_NR_setitimer:
10256         {
10257             struct itimerval value, ovalue, *pvalue;
10258 
10259             if (arg2) {
10260                 pvalue = &value;
10261                 if (copy_from_user_timeval(&pvalue->it_interval, arg2)
10262                     || copy_from_user_timeval(&pvalue->it_value,
10263                                               arg2 + sizeof(struct target_timeval)))
10264                     return -TARGET_EFAULT;
10265             } else {
10266                 pvalue = NULL;
10267             }
10268             ret = get_errno(setitimer(arg1, pvalue, &ovalue));
10269             if (!is_error(ret) && arg3) {
10270                 if (copy_to_user_timeval(arg3,
10271                                          &ovalue.it_interval)
10272                     || copy_to_user_timeval(arg3 + sizeof(struct target_timeval),
10273                                             &ovalue.it_value))
10274                     return -TARGET_EFAULT;
10275             }
10276         }
10277         return ret;
10278     case TARGET_NR_getitimer:
10279         {
10280             struct itimerval value;
10281 
10282             ret = get_errno(getitimer(arg1, &value));
10283             if (!is_error(ret) && arg2) {
10284                 if (copy_to_user_timeval(arg2,
10285                                          &value.it_interval)
10286                     || copy_to_user_timeval(arg2 + sizeof(struct target_timeval),
10287                                             &value.it_value))
10288                     return -TARGET_EFAULT;
10289             }
10290         }
10291         return ret;
10292 #ifdef TARGET_NR_stat
10293     case TARGET_NR_stat:
10294         if (!(p = lock_user_string(arg1))) {
10295             return -TARGET_EFAULT;
10296         }
10297         ret = get_errno(stat(path(p), &st));
10298         unlock_user(p, arg1, 0);
10299         goto do_stat;
10300 #endif
10301 #ifdef TARGET_NR_lstat
10302     case TARGET_NR_lstat:
10303         if (!(p = lock_user_string(arg1))) {
10304             return -TARGET_EFAULT;
10305         }
10306         ret = get_errno(lstat(path(p), &st));
10307         unlock_user(p, arg1, 0);
10308         goto do_stat;
10309 #endif
10310 #ifdef TARGET_NR_fstat
10311     case TARGET_NR_fstat:
10312         {
10313             ret = get_errno(fstat(arg1, &st));
10314 #if defined(TARGET_NR_stat) || defined(TARGET_NR_lstat)
10315         do_stat:
10316 #endif
10317             if (!is_error(ret)) {
10318                 struct target_stat *target_st;
10319 
10320                 if (!lock_user_struct(VERIFY_WRITE, target_st, arg2, 0))
10321                     return -TARGET_EFAULT;
10322                 memset(target_st, 0, sizeof(*target_st));
10323                 __put_user(st.st_dev, &target_st->st_dev);
10324                 __put_user(st.st_ino, &target_st->st_ino);
10325                 __put_user(st.st_mode, &target_st->st_mode);
10326                 __put_user(st.st_uid, &target_st->st_uid);
10327                 __put_user(st.st_gid, &target_st->st_gid);
10328                 __put_user(st.st_nlink, &target_st->st_nlink);
10329                 __put_user(st.st_rdev, &target_st->st_rdev);
10330                 __put_user(st.st_size, &target_st->st_size);
10331                 __put_user(st.st_blksize, &target_st->st_blksize);
10332                 __put_user(st.st_blocks, &target_st->st_blocks);
10333                 __put_user(st.st_atime, &target_st->target_st_atime);
10334                 __put_user(st.st_mtime, &target_st->target_st_mtime);
10335                 __put_user(st.st_ctime, &target_st->target_st_ctime);
10336 #if defined(HAVE_STRUCT_STAT_ST_ATIM) && defined(TARGET_STAT_HAVE_NSEC)
10337                 __put_user(st.st_atim.tv_nsec,
10338                            &target_st->target_st_atime_nsec);
10339                 __put_user(st.st_mtim.tv_nsec,
10340                            &target_st->target_st_mtime_nsec);
10341                 __put_user(st.st_ctim.tv_nsec,
10342                            &target_st->target_st_ctime_nsec);
10343 #endif
10344                 unlock_user_struct(target_st, arg2, 1);
10345             }
10346         }
10347         return ret;
10348 #endif
10349     case TARGET_NR_vhangup:
10350         return get_errno(vhangup());
10351 #ifdef TARGET_NR_syscall
10352     case TARGET_NR_syscall:
10353         return do_syscall(cpu_env, arg1 & 0xffff, arg2, arg3, arg4, arg5,
10354                           arg6, arg7, arg8, 0);
10355 #endif
10356 #if defined(TARGET_NR_wait4)
10357     case TARGET_NR_wait4:
10358         {
10359             int status;
10360             abi_long status_ptr = arg2;
10361             struct rusage rusage, *rusage_ptr;
10362             abi_ulong target_rusage = arg4;
10363             abi_long rusage_err;
10364             if (target_rusage)
10365                 rusage_ptr = &rusage;
10366             else
10367                 rusage_ptr = NULL;
10368             ret = get_errno(safe_wait4(arg1, &status, arg3, rusage_ptr));
10369             if (!is_error(ret)) {
10370                 if (status_ptr && ret) {
10371                     status = host_to_target_waitstatus(status);
10372                     if (put_user_s32(status, status_ptr))
10373                         return -TARGET_EFAULT;
10374                 }
10375                 if (target_rusage) {
10376                     rusage_err = host_to_target_rusage(target_rusage, &rusage);
10377                     if (rusage_err) {
10378                         ret = rusage_err;
10379                     }
10380                 }
10381             }
10382         }
10383         return ret;
10384 #endif
10385 #ifdef TARGET_NR_swapoff
10386     case TARGET_NR_swapoff:
10387         if (!(p = lock_user_string(arg1)))
10388             return -TARGET_EFAULT;
10389         ret = get_errno(swapoff(p));
10390         unlock_user(p, arg1, 0);
10391         return ret;
10392 #endif
10393     case TARGET_NR_sysinfo:
10394         {
10395             struct target_sysinfo *target_value;
10396             struct sysinfo value;
10397             ret = get_errno(sysinfo(&value));
10398             if (!is_error(ret) && arg1)
10399             {
10400                 if (!lock_user_struct(VERIFY_WRITE, target_value, arg1, 0))
10401                     return -TARGET_EFAULT;
10402                 __put_user(value.uptime, &target_value->uptime);
10403                 __put_user(value.loads[0], &target_value->loads[0]);
10404                 __put_user(value.loads[1], &target_value->loads[1]);
10405                 __put_user(value.loads[2], &target_value->loads[2]);
10406                 __put_user(value.totalram, &target_value->totalram);
10407                 __put_user(value.freeram, &target_value->freeram);
10408                 __put_user(value.sharedram, &target_value->sharedram);
10409                 __put_user(value.bufferram, &target_value->bufferram);
10410                 __put_user(value.totalswap, &target_value->totalswap);
10411                 __put_user(value.freeswap, &target_value->freeswap);
10412                 __put_user(value.procs, &target_value->procs);
10413                 __put_user(value.totalhigh, &target_value->totalhigh);
10414                 __put_user(value.freehigh, &target_value->freehigh);
10415                 __put_user(value.mem_unit, &target_value->mem_unit);
10416                 unlock_user_struct(target_value, arg1, 1);
10417             }
10418         }
10419         return ret;
10420 #ifdef TARGET_NR_ipc
10421     case TARGET_NR_ipc:
10422         return do_ipc(cpu_env, arg1, arg2, arg3, arg4, arg5, arg6);
10423 #endif
10424 #ifdef TARGET_NR_semget
10425     case TARGET_NR_semget:
10426         return get_errno(semget(arg1, arg2, arg3));
10427 #endif
10428 #ifdef TARGET_NR_semop
10429     case TARGET_NR_semop:
10430         return do_semtimedop(arg1, arg2, arg3, 0, false);
10431 #endif
10432 #ifdef TARGET_NR_semtimedop
10433     case TARGET_NR_semtimedop:
10434         return do_semtimedop(arg1, arg2, arg3, arg4, false);
10435 #endif
10436 #ifdef TARGET_NR_semtimedop_time64
10437     case TARGET_NR_semtimedop_time64:
10438         return do_semtimedop(arg1, arg2, arg3, arg4, true);
10439 #endif
10440 #ifdef TARGET_NR_semctl
10441     case TARGET_NR_semctl:
10442         return do_semctl(arg1, arg2, arg3, arg4);
10443 #endif
10444 #ifdef TARGET_NR_msgctl
10445     case TARGET_NR_msgctl:
10446         return do_msgctl(arg1, arg2, arg3);
10447 #endif
10448 #ifdef TARGET_NR_msgget
10449     case TARGET_NR_msgget:
10450         return get_errno(msgget(arg1, arg2));
10451 #endif
10452 #ifdef TARGET_NR_msgrcv
10453     case TARGET_NR_msgrcv:
10454         return do_msgrcv(arg1, arg2, arg3, arg4, arg5);
10455 #endif
10456 #ifdef TARGET_NR_msgsnd
10457     case TARGET_NR_msgsnd:
10458         return do_msgsnd(arg1, arg2, arg3, arg4);
10459 #endif
10460 #ifdef TARGET_NR_shmget
10461     case TARGET_NR_shmget:
10462         return get_errno(shmget(arg1, arg2, arg3));
10463 #endif
10464 #ifdef TARGET_NR_shmctl
10465     case TARGET_NR_shmctl:
10466         return do_shmctl(arg1, arg2, arg3);
10467 #endif
10468 #ifdef TARGET_NR_shmat
10469     case TARGET_NR_shmat:
10470         return do_shmat(cpu_env, arg1, arg2, arg3);
10471 #endif
10472 #ifdef TARGET_NR_shmdt
10473     case TARGET_NR_shmdt:
10474         return do_shmdt(arg1);
10475 #endif
10476     case TARGET_NR_fsync:
10477         return get_errno(fsync(arg1));
10478     case TARGET_NR_clone:
10479         /* Linux manages to have three different orderings for its
10480          * arguments to clone(); the BACKWARDS and BACKWARDS2 defines
10481          * match the kernel's CONFIG_CLONE_* settings.
10482          * Microblaze is further special in that it uses a sixth
10483          * implicit argument to clone for the TLS pointer.
10484          */
10485 #if defined(TARGET_MICROBLAZE)
10486         ret = get_errno(do_fork(cpu_env, arg1, arg2, arg4, arg6, arg5));
10487 #elif defined(TARGET_CLONE_BACKWARDS)
10488         ret = get_errno(do_fork(cpu_env, arg1, arg2, arg3, arg4, arg5));
10489 #elif defined(TARGET_CLONE_BACKWARDS2)
10490         ret = get_errno(do_fork(cpu_env, arg2, arg1, arg3, arg5, arg4));
10491 #else
10492         ret = get_errno(do_fork(cpu_env, arg1, arg2, arg3, arg5, arg4));
10493 #endif
10494         return ret;
10495 #ifdef __NR_exit_group
10496         /* new thread calls */
10497     case TARGET_NR_exit_group:
10498         preexit_cleanup(cpu_env, arg1);
10499         return get_errno(exit_group(arg1));
10500 #endif
10501     case TARGET_NR_setdomainname:
10502         if (!(p = lock_user_string(arg1)))
10503             return -TARGET_EFAULT;
10504         ret = get_errno(setdomainname(p, arg2));
10505         unlock_user(p, arg1, 0);
10506         return ret;
10507     case TARGET_NR_uname:
10508         /* no need to transcode because we use the linux syscall */
10509         {
10510             struct new_utsname * buf;
10511 
10512             if (!lock_user_struct(VERIFY_WRITE, buf, arg1, 0))
10513                 return -TARGET_EFAULT;
10514             ret = get_errno(sys_uname(buf));
10515             if (!is_error(ret)) {
10516                 /* Overwrite the native machine name with whatever is being
10517                    emulated. */
10518                 g_strlcpy(buf->machine, cpu_to_uname_machine(cpu_env),
10519                           sizeof(buf->machine));
10520                 /* Allow the user to override the reported release.  */
10521                 if (qemu_uname_release && *qemu_uname_release) {
10522                     g_strlcpy(buf->release, qemu_uname_release,
10523                               sizeof(buf->release));
10524                 }
10525             }
10526             unlock_user_struct(buf, arg1, 1);
10527         }
10528         return ret;
10529 #ifdef TARGET_I386
10530     case TARGET_NR_modify_ldt:
10531         return do_modify_ldt(cpu_env, arg1, arg2, arg3);
10532 #if !defined(TARGET_X86_64)
10533     case TARGET_NR_vm86:
10534         return do_vm86(cpu_env, arg1, arg2);
10535 #endif
10536 #endif
10537 #if defined(TARGET_NR_adjtimex)
10538     case TARGET_NR_adjtimex:
10539         {
10540             struct timex host_buf;
10541 
10542             if (target_to_host_timex(&host_buf, arg1) != 0) {
10543                 return -TARGET_EFAULT;
10544             }
10545             ret = get_errno(adjtimex(&host_buf));
10546             if (!is_error(ret)) {
10547                 if (host_to_target_timex(arg1, &host_buf) != 0) {
10548                     return -TARGET_EFAULT;
10549                 }
10550             }
10551         }
10552         return ret;
10553 #endif
10554 #if defined(TARGET_NR_clock_adjtime) && defined(CONFIG_CLOCK_ADJTIME)
10555     case TARGET_NR_clock_adjtime:
10556         {
10557             struct timex htx, *phtx = &htx;
10558 
10559             if (target_to_host_timex(phtx, arg2) != 0) {
10560                 return -TARGET_EFAULT;
10561             }
10562             ret = get_errno(clock_adjtime(arg1, phtx));
10563             if (!is_error(ret) && phtx) {
10564                 if (host_to_target_timex(arg2, phtx) != 0) {
10565                     return -TARGET_EFAULT;
10566                 }
10567             }
10568         }
10569         return ret;
10570 #endif
10571 #if defined(TARGET_NR_clock_adjtime64) && defined(CONFIG_CLOCK_ADJTIME)
10572     case TARGET_NR_clock_adjtime64:
10573         {
10574             struct timex htx;
10575 
10576             if (target_to_host_timex64(&htx, arg2) != 0) {
10577                 return -TARGET_EFAULT;
10578             }
10579             ret = get_errno(clock_adjtime(arg1, &htx));
10580             if (!is_error(ret) && host_to_target_timex64(arg2, &htx)) {
10581                     return -TARGET_EFAULT;
10582             }
10583         }
10584         return ret;
10585 #endif
10586     case TARGET_NR_getpgid:
10587         return get_errno(getpgid(arg1));
10588     case TARGET_NR_fchdir:
10589         return get_errno(fchdir(arg1));
10590     case TARGET_NR_personality:
10591         return get_errno(personality(arg1));
10592 #ifdef TARGET_NR__llseek /* Not on alpha */
10593     case TARGET_NR__llseek:
10594         {
10595             int64_t res;
10596 #if !defined(__NR_llseek)
10597             res = lseek(arg1, ((uint64_t)arg2 << 32) | (abi_ulong)arg3, arg5);
10598             if (res == -1) {
10599                 ret = get_errno(res);
10600             } else {
10601                 ret = 0;
10602             }
10603 #else
10604             ret = get_errno(_llseek(arg1, arg2, arg3, &res, arg5));
10605 #endif
10606             if ((ret == 0) && put_user_s64(res, arg4)) {
10607                 return -TARGET_EFAULT;
10608             }
10609         }
10610         return ret;
10611 #endif
10612 #ifdef TARGET_NR_getdents
10613     case TARGET_NR_getdents:
10614         return do_getdents(arg1, arg2, arg3);
10615 #endif /* TARGET_NR_getdents */
10616 #if defined(TARGET_NR_getdents64) && defined(__NR_getdents64)
10617     case TARGET_NR_getdents64:
10618         return do_getdents64(arg1, arg2, arg3);
10619 #endif /* TARGET_NR_getdents64 */
10620 #if defined(TARGET_NR__newselect)
10621     case TARGET_NR__newselect:
10622         return do_select(arg1, arg2, arg3, arg4, arg5);
10623 #endif
10624 #ifdef TARGET_NR_poll
10625     case TARGET_NR_poll:
10626         return do_ppoll(arg1, arg2, arg3, arg4, arg5, false, false);
10627 #endif
10628 #ifdef TARGET_NR_ppoll
10629     case TARGET_NR_ppoll:
10630         return do_ppoll(arg1, arg2, arg3, arg4, arg5, true, false);
10631 #endif
10632 #ifdef TARGET_NR_ppoll_time64
10633     case TARGET_NR_ppoll_time64:
10634         return do_ppoll(arg1, arg2, arg3, arg4, arg5, true, true);
10635 #endif
10636     case TARGET_NR_flock:
10637         /* NOTE: the flock constant seems to be the same for every
10638            Linux platform */
10639         return get_errno(safe_flock(arg1, arg2));
10640     case TARGET_NR_readv:
10641         {
10642             struct iovec *vec = lock_iovec(VERIFY_WRITE, arg2, arg3, 0);
10643             if (vec != NULL) {
10644                 ret = get_errno(safe_readv(arg1, vec, arg3));
10645                 unlock_iovec(vec, arg2, arg3, 1);
10646             } else {
10647                 ret = -host_to_target_errno(errno);
10648             }
10649         }
10650         return ret;
10651     case TARGET_NR_writev:
10652         {
10653             struct iovec *vec = lock_iovec(VERIFY_READ, arg2, arg3, 1);
10654             if (vec != NULL) {
10655                 ret = get_errno(safe_writev(arg1, vec, arg3));
10656                 unlock_iovec(vec, arg2, arg3, 0);
10657             } else {
10658                 ret = -host_to_target_errno(errno);
10659             }
10660         }
10661         return ret;
10662 #if defined(TARGET_NR_preadv)
10663     case TARGET_NR_preadv:
10664         {
10665             struct iovec *vec = lock_iovec(VERIFY_WRITE, arg2, arg3, 0);
10666             if (vec != NULL) {
10667                 unsigned long low, high;
10668 
10669                 target_to_host_low_high(arg4, arg5, &low, &high);
10670                 ret = get_errno(safe_preadv(arg1, vec, arg3, low, high));
10671                 unlock_iovec(vec, arg2, arg3, 1);
10672             } else {
10673                 ret = -host_to_target_errno(errno);
10674            }
10675         }
10676         return ret;
10677 #endif
10678 #if defined(TARGET_NR_pwritev)
10679     case TARGET_NR_pwritev:
10680         {
10681             struct iovec *vec = lock_iovec(VERIFY_READ, arg2, arg3, 1);
10682             if (vec != NULL) {
10683                 unsigned long low, high;
10684 
10685                 target_to_host_low_high(arg4, arg5, &low, &high);
10686                 ret = get_errno(safe_pwritev(arg1, vec, arg3, low, high));
10687                 unlock_iovec(vec, arg2, arg3, 0);
10688             } else {
10689                 ret = -host_to_target_errno(errno);
10690            }
10691         }
10692         return ret;
10693 #endif
10694     case TARGET_NR_getsid:
10695         return get_errno(getsid(arg1));
10696 #if defined(TARGET_NR_fdatasync) /* Not on alpha (osf_datasync ?) */
10697     case TARGET_NR_fdatasync:
10698         return get_errno(fdatasync(arg1));
10699 #endif
10700     case TARGET_NR_sched_getaffinity:
10701         {
10702             unsigned int mask_size;
10703             unsigned long *mask;
10704 
10705             /*
10706              * sched_getaffinity needs multiples of ulong, so need to take
10707              * care of mismatches between target ulong and host ulong sizes.
10708              */
10709             if (arg2 & (sizeof(abi_ulong) - 1)) {
10710                 return -TARGET_EINVAL;
10711             }
10712             mask_size = (arg2 + (sizeof(*mask) - 1)) & ~(sizeof(*mask) - 1);
10713 
10714             mask = alloca(mask_size);
10715             memset(mask, 0, mask_size);
10716             ret = get_errno(sys_sched_getaffinity(arg1, mask_size, mask));
10717 
10718             if (!is_error(ret)) {
10719                 if (ret > arg2) {
10720                     /* More data returned than the caller's buffer will fit.
10721                      * This only happens if sizeof(abi_long) < sizeof(long)
10722                      * and the caller passed us a buffer holding an odd number
10723                      * of abi_longs. If the host kernel is actually using the
10724                      * extra 4 bytes then fail EINVAL; otherwise we can just
10725                      * ignore them and only copy the interesting part.
10726                      */
10727                     int numcpus = sysconf(_SC_NPROCESSORS_CONF);
10728                     if (numcpus > arg2 * 8) {
10729                         return -TARGET_EINVAL;
10730                     }
10731                     ret = arg2;
10732                 }
10733 
10734                 if (host_to_target_cpu_mask(mask, mask_size, arg3, ret)) {
10735                     return -TARGET_EFAULT;
10736                 }
10737             }
10738         }
10739         return ret;
10740     case TARGET_NR_sched_setaffinity:
10741         {
10742             unsigned int mask_size;
10743             unsigned long *mask;
10744 
10745             /*
10746              * sched_setaffinity needs multiples of ulong, so need to take
10747              * care of mismatches between target ulong and host ulong sizes.
10748              */
10749             if (arg2 & (sizeof(abi_ulong) - 1)) {
10750                 return -TARGET_EINVAL;
10751             }
10752             mask_size = (arg2 + (sizeof(*mask) - 1)) & ~(sizeof(*mask) - 1);
10753             mask = alloca(mask_size);
10754 
10755             ret = target_to_host_cpu_mask(mask, mask_size, arg3, arg2);
10756             if (ret) {
10757                 return ret;
10758             }
10759 
10760             return get_errno(sys_sched_setaffinity(arg1, mask_size, mask));
10761         }
10762     case TARGET_NR_getcpu:
10763         {
10764             unsigned cpu, node;
10765             ret = get_errno(sys_getcpu(arg1 ? &cpu : NULL,
10766                                        arg2 ? &node : NULL,
10767                                        NULL));
10768             if (is_error(ret)) {
10769                 return ret;
10770             }
10771             if (arg1 && put_user_u32(cpu, arg1)) {
10772                 return -TARGET_EFAULT;
10773             }
10774             if (arg2 && put_user_u32(node, arg2)) {
10775                 return -TARGET_EFAULT;
10776             }
10777         }
10778         return ret;
10779     case TARGET_NR_sched_setparam:
10780         {
10781             struct target_sched_param *target_schp;
10782             struct sched_param schp;
10783 
10784             if (arg2 == 0) {
10785                 return -TARGET_EINVAL;
10786             }
10787             if (!lock_user_struct(VERIFY_READ, target_schp, arg2, 1)) {
10788                 return -TARGET_EFAULT;
10789             }
10790             schp.sched_priority = tswap32(target_schp->sched_priority);
10791             unlock_user_struct(target_schp, arg2, 0);
10792             return get_errno(sys_sched_setparam(arg1, &schp));
10793         }
10794     case TARGET_NR_sched_getparam:
10795         {
10796             struct target_sched_param *target_schp;
10797             struct sched_param schp;
10798 
10799             if (arg2 == 0) {
10800                 return -TARGET_EINVAL;
10801             }
10802             ret = get_errno(sys_sched_getparam(arg1, &schp));
10803             if (!is_error(ret)) {
10804                 if (!lock_user_struct(VERIFY_WRITE, target_schp, arg2, 0)) {
10805                     return -TARGET_EFAULT;
10806                 }
10807                 target_schp->sched_priority = tswap32(schp.sched_priority);
10808                 unlock_user_struct(target_schp, arg2, 1);
10809             }
10810         }
10811         return ret;
10812     case TARGET_NR_sched_setscheduler:
10813         {
10814             struct target_sched_param *target_schp;
10815             struct sched_param schp;
10816             if (arg3 == 0) {
10817                 return -TARGET_EINVAL;
10818             }
10819             if (!lock_user_struct(VERIFY_READ, target_schp, arg3, 1)) {
10820                 return -TARGET_EFAULT;
10821             }
10822             schp.sched_priority = tswap32(target_schp->sched_priority);
10823             unlock_user_struct(target_schp, arg3, 0);
10824             return get_errno(sys_sched_setscheduler(arg1, arg2, &schp));
10825         }
10826     case TARGET_NR_sched_getscheduler:
10827         return get_errno(sys_sched_getscheduler(arg1));
10828     case TARGET_NR_sched_getattr:
10829         {
10830             struct target_sched_attr *target_scha;
10831             struct sched_attr scha;
10832             if (arg2 == 0) {
10833                 return -TARGET_EINVAL;
10834             }
10835             if (arg3 > sizeof(scha)) {
10836                 arg3 = sizeof(scha);
10837             }
10838             ret = get_errno(sys_sched_getattr(arg1, &scha, arg3, arg4));
10839             if (!is_error(ret)) {
10840                 target_scha = lock_user(VERIFY_WRITE, arg2, arg3, 0);
10841                 if (!target_scha) {
10842                     return -TARGET_EFAULT;
10843                 }
10844                 target_scha->size = tswap32(scha.size);
10845                 target_scha->sched_policy = tswap32(scha.sched_policy);
10846                 target_scha->sched_flags = tswap64(scha.sched_flags);
10847                 target_scha->sched_nice = tswap32(scha.sched_nice);
10848                 target_scha->sched_priority = tswap32(scha.sched_priority);
10849                 target_scha->sched_runtime = tswap64(scha.sched_runtime);
10850                 target_scha->sched_deadline = tswap64(scha.sched_deadline);
10851                 target_scha->sched_period = tswap64(scha.sched_period);
10852                 if (scha.size > offsetof(struct sched_attr, sched_util_min)) {
10853                     target_scha->sched_util_min = tswap32(scha.sched_util_min);
10854                     target_scha->sched_util_max = tswap32(scha.sched_util_max);
10855                 }
10856                 unlock_user(target_scha, arg2, arg3);
10857             }
10858             return ret;
10859         }
10860     case TARGET_NR_sched_setattr:
10861         {
10862             struct target_sched_attr *target_scha;
10863             struct sched_attr scha;
10864             uint32_t size;
10865             int zeroed;
10866             if (arg2 == 0) {
10867                 return -TARGET_EINVAL;
10868             }
10869             if (get_user_u32(size, arg2)) {
10870                 return -TARGET_EFAULT;
10871             }
10872             if (!size) {
10873                 size = offsetof(struct target_sched_attr, sched_util_min);
10874             }
10875             if (size < offsetof(struct target_sched_attr, sched_util_min)) {
10876                 if (put_user_u32(sizeof(struct target_sched_attr), arg2)) {
10877                     return -TARGET_EFAULT;
10878                 }
10879                 return -TARGET_E2BIG;
10880             }
10881 
10882             zeroed = check_zeroed_user(arg2, sizeof(struct target_sched_attr), size);
10883             if (zeroed < 0) {
10884                 return zeroed;
10885             } else if (zeroed == 0) {
10886                 if (put_user_u32(sizeof(struct target_sched_attr), arg2)) {
10887                     return -TARGET_EFAULT;
10888                 }
10889                 return -TARGET_E2BIG;
10890             }
10891             if (size > sizeof(struct target_sched_attr)) {
10892                 size = sizeof(struct target_sched_attr);
10893             }
10894 
10895             target_scha = lock_user(VERIFY_READ, arg2, size, 1);
10896             if (!target_scha) {
10897                 return -TARGET_EFAULT;
10898             }
10899             scha.size = size;
10900             scha.sched_policy = tswap32(target_scha->sched_policy);
10901             scha.sched_flags = tswap64(target_scha->sched_flags);
10902             scha.sched_nice = tswap32(target_scha->sched_nice);
10903             scha.sched_priority = tswap32(target_scha->sched_priority);
10904             scha.sched_runtime = tswap64(target_scha->sched_runtime);
10905             scha.sched_deadline = tswap64(target_scha->sched_deadline);
10906             scha.sched_period = tswap64(target_scha->sched_period);
10907             if (size > offsetof(struct target_sched_attr, sched_util_min)) {
10908                 scha.sched_util_min = tswap32(target_scha->sched_util_min);
10909                 scha.sched_util_max = tswap32(target_scha->sched_util_max);
10910             }
10911             unlock_user(target_scha, arg2, 0);
10912             return get_errno(sys_sched_setattr(arg1, &scha, arg3));
10913         }
10914     case TARGET_NR_sched_yield:
10915         return get_errno(sched_yield());
10916     case TARGET_NR_sched_get_priority_max:
10917         return get_errno(sched_get_priority_max(arg1));
10918     case TARGET_NR_sched_get_priority_min:
10919         return get_errno(sched_get_priority_min(arg1));
10920 #ifdef TARGET_NR_sched_rr_get_interval
10921     case TARGET_NR_sched_rr_get_interval:
10922         {
10923             struct timespec ts;
10924             ret = get_errno(sched_rr_get_interval(arg1, &ts));
10925             if (!is_error(ret)) {
10926                 ret = host_to_target_timespec(arg2, &ts);
10927             }
10928         }
10929         return ret;
10930 #endif
10931 #ifdef TARGET_NR_sched_rr_get_interval_time64
10932     case TARGET_NR_sched_rr_get_interval_time64:
10933         {
10934             struct timespec ts;
10935             ret = get_errno(sched_rr_get_interval(arg1, &ts));
10936             if (!is_error(ret)) {
10937                 ret = host_to_target_timespec64(arg2, &ts);
10938             }
10939         }
10940         return ret;
10941 #endif
10942 #if defined(TARGET_NR_nanosleep)
10943     case TARGET_NR_nanosleep:
10944         {
10945             struct timespec req, rem;
10946             target_to_host_timespec(&req, arg1);
10947             ret = get_errno(safe_nanosleep(&req, &rem));
10948             if (is_error(ret) && arg2) {
10949                 host_to_target_timespec(arg2, &rem);
10950             }
10951         }
10952         return ret;
10953 #endif
10954     case TARGET_NR_prctl:
10955         return do_prctl(cpu_env, arg1, arg2, arg3, arg4, arg5);
10956         break;
10957 #ifdef TARGET_NR_arch_prctl
10958     case TARGET_NR_arch_prctl:
10959         return do_arch_prctl(cpu_env, arg1, arg2);
10960 #endif
10961 #ifdef TARGET_NR_pread64
10962     case TARGET_NR_pread64:
10963         if (regpairs_aligned(cpu_env, num)) {
10964             arg4 = arg5;
10965             arg5 = arg6;
10966         }
10967         if (arg2 == 0 && arg3 == 0) {
10968             /* Special-case NULL buffer and zero length, which should succeed */
10969             p = 0;
10970         } else {
10971             p = lock_user(VERIFY_WRITE, arg2, arg3, 0);
10972             if (!p) {
10973                 return -TARGET_EFAULT;
10974             }
10975         }
10976         ret = get_errno(pread64(arg1, p, arg3, target_offset64(arg4, arg5)));
10977         unlock_user(p, arg2, ret);
10978         return ret;
10979     case TARGET_NR_pwrite64:
10980         if (regpairs_aligned(cpu_env, num)) {
10981             arg4 = arg5;
10982             arg5 = arg6;
10983         }
10984         if (arg2 == 0 && arg3 == 0) {
10985             /* Special-case NULL buffer and zero length, which should succeed */
10986             p = 0;
10987         } else {
10988             p = lock_user(VERIFY_READ, arg2, arg3, 1);
10989             if (!p) {
10990                 return -TARGET_EFAULT;
10991             }
10992         }
10993         ret = get_errno(pwrite64(arg1, p, arg3, target_offset64(arg4, arg5)));
10994         unlock_user(p, arg2, 0);
10995         return ret;
10996 #endif
10997     case TARGET_NR_getcwd:
10998         if (!(p = lock_user(VERIFY_WRITE, arg1, arg2, 0)))
10999             return -TARGET_EFAULT;
11000         ret = get_errno(sys_getcwd1(p, arg2));
11001         unlock_user(p, arg1, ret);
11002         return ret;
11003     case TARGET_NR_capget:
11004     case TARGET_NR_capset:
11005     {
11006         struct target_user_cap_header *target_header;
11007         struct target_user_cap_data *target_data = NULL;
11008         struct __user_cap_header_struct header;
11009         struct __user_cap_data_struct data[2];
11010         struct __user_cap_data_struct *dataptr = NULL;
11011         int i, target_datalen;
11012         int data_items = 1;
11013 
11014         if (!lock_user_struct(VERIFY_WRITE, target_header, arg1, 1)) {
11015             return -TARGET_EFAULT;
11016         }
11017         header.version = tswap32(target_header->version);
11018         header.pid = tswap32(target_header->pid);
11019 
11020         if (header.version != _LINUX_CAPABILITY_VERSION) {
11021             /* Version 2 and up takes pointer to two user_data structs */
11022             data_items = 2;
11023         }
11024 
11025         target_datalen = sizeof(*target_data) * data_items;
11026 
11027         if (arg2) {
11028             if (num == TARGET_NR_capget) {
11029                 target_data = lock_user(VERIFY_WRITE, arg2, target_datalen, 0);
11030             } else {
11031                 target_data = lock_user(VERIFY_READ, arg2, target_datalen, 1);
11032             }
11033             if (!target_data) {
11034                 unlock_user_struct(target_header, arg1, 0);
11035                 return -TARGET_EFAULT;
11036             }
11037 
11038             if (num == TARGET_NR_capset) {
11039                 for (i = 0; i < data_items; i++) {
11040                     data[i].effective = tswap32(target_data[i].effective);
11041                     data[i].permitted = tswap32(target_data[i].permitted);
11042                     data[i].inheritable = tswap32(target_data[i].inheritable);
11043                 }
11044             }
11045 
11046             dataptr = data;
11047         }
11048 
11049         if (num == TARGET_NR_capget) {
11050             ret = get_errno(capget(&header, dataptr));
11051         } else {
11052             ret = get_errno(capset(&header, dataptr));
11053         }
11054 
11055         /* The kernel always updates version for both capget and capset */
11056         target_header->version = tswap32(header.version);
11057         unlock_user_struct(target_header, arg1, 1);
11058 
11059         if (arg2) {
11060             if (num == TARGET_NR_capget) {
11061                 for (i = 0; i < data_items; i++) {
11062                     target_data[i].effective = tswap32(data[i].effective);
11063                     target_data[i].permitted = tswap32(data[i].permitted);
11064                     target_data[i].inheritable = tswap32(data[i].inheritable);
11065                 }
11066                 unlock_user(target_data, arg2, target_datalen);
11067             } else {
11068                 unlock_user(target_data, arg2, 0);
11069             }
11070         }
11071         return ret;
11072     }
11073     case TARGET_NR_sigaltstack:
11074         return do_sigaltstack(arg1, arg2, cpu_env);
11075 
11076 #ifdef CONFIG_SENDFILE
11077 #ifdef TARGET_NR_sendfile
11078     case TARGET_NR_sendfile:
11079     {
11080         off_t *offp = NULL;
11081         off_t off;
11082         if (arg3) {
11083             ret = get_user_sal(off, arg3);
11084             if (is_error(ret)) {
11085                 return ret;
11086             }
11087             offp = &off;
11088         }
11089         ret = get_errno(sendfile(arg1, arg2, offp, arg4));
11090         if (!is_error(ret) && arg3) {
11091             abi_long ret2 = put_user_sal(off, arg3);
11092             if (is_error(ret2)) {
11093                 ret = ret2;
11094             }
11095         }
11096         return ret;
11097     }
11098 #endif
11099 #ifdef TARGET_NR_sendfile64
11100     case TARGET_NR_sendfile64:
11101     {
11102         off_t *offp = NULL;
11103         off_t off;
11104         if (arg3) {
11105             ret = get_user_s64(off, arg3);
11106             if (is_error(ret)) {
11107                 return ret;
11108             }
11109             offp = &off;
11110         }
11111         ret = get_errno(sendfile(arg1, arg2, offp, arg4));
11112         if (!is_error(ret) && arg3) {
11113             abi_long ret2 = put_user_s64(off, arg3);
11114             if (is_error(ret2)) {
11115                 ret = ret2;
11116             }
11117         }
11118         return ret;
11119     }
11120 #endif
11121 #endif
11122 #ifdef TARGET_NR_vfork
11123     case TARGET_NR_vfork:
11124         return get_errno(do_fork(cpu_env,
11125                          CLONE_VFORK | CLONE_VM | TARGET_SIGCHLD,
11126                          0, 0, 0, 0));
11127 #endif
11128 #ifdef TARGET_NR_ugetrlimit
11129     case TARGET_NR_ugetrlimit:
11130     {
11131 	struct rlimit rlim;
11132 	int resource = target_to_host_resource(arg1);
11133 	ret = get_errno(getrlimit(resource, &rlim));
11134 	if (!is_error(ret)) {
11135 	    struct target_rlimit *target_rlim;
11136             if (!lock_user_struct(VERIFY_WRITE, target_rlim, arg2, 0))
11137                 return -TARGET_EFAULT;
11138 	    target_rlim->rlim_cur = host_to_target_rlim(rlim.rlim_cur);
11139 	    target_rlim->rlim_max = host_to_target_rlim(rlim.rlim_max);
11140             unlock_user_struct(target_rlim, arg2, 1);
11141 	}
11142         return ret;
11143     }
11144 #endif
11145 #ifdef TARGET_NR_truncate64
11146     case TARGET_NR_truncate64:
11147         if (!(p = lock_user_string(arg1)))
11148             return -TARGET_EFAULT;
11149 	ret = target_truncate64(cpu_env, p, arg2, arg3, arg4);
11150         unlock_user(p, arg1, 0);
11151         return ret;
11152 #endif
11153 #ifdef TARGET_NR_ftruncate64
11154     case TARGET_NR_ftruncate64:
11155         return target_ftruncate64(cpu_env, arg1, arg2, arg3, arg4);
11156 #endif
11157 #ifdef TARGET_NR_stat64
11158     case TARGET_NR_stat64:
11159         if (!(p = lock_user_string(arg1))) {
11160             return -TARGET_EFAULT;
11161         }
11162         ret = get_errno(stat(path(p), &st));
11163         unlock_user(p, arg1, 0);
11164         if (!is_error(ret))
11165             ret = host_to_target_stat64(cpu_env, arg2, &st);
11166         return ret;
11167 #endif
11168 #ifdef TARGET_NR_lstat64
11169     case TARGET_NR_lstat64:
11170         if (!(p = lock_user_string(arg1))) {
11171             return -TARGET_EFAULT;
11172         }
11173         ret = get_errno(lstat(path(p), &st));
11174         unlock_user(p, arg1, 0);
11175         if (!is_error(ret))
11176             ret = host_to_target_stat64(cpu_env, arg2, &st);
11177         return ret;
11178 #endif
11179 #ifdef TARGET_NR_fstat64
11180     case TARGET_NR_fstat64:
11181         ret = get_errno(fstat(arg1, &st));
11182         if (!is_error(ret))
11183             ret = host_to_target_stat64(cpu_env, arg2, &st);
11184         return ret;
11185 #endif
11186 #if (defined(TARGET_NR_fstatat64) || defined(TARGET_NR_newfstatat))
11187 #ifdef TARGET_NR_fstatat64
11188     case TARGET_NR_fstatat64:
11189 #endif
11190 #ifdef TARGET_NR_newfstatat
11191     case TARGET_NR_newfstatat:
11192 #endif
11193         if (!(p = lock_user_string(arg2))) {
11194             return -TARGET_EFAULT;
11195         }
11196         ret = get_errno(fstatat(arg1, path(p), &st, arg4));
11197         unlock_user(p, arg2, 0);
11198         if (!is_error(ret))
11199             ret = host_to_target_stat64(cpu_env, arg3, &st);
11200         return ret;
11201 #endif
11202 #if defined(TARGET_NR_statx)
11203     case TARGET_NR_statx:
11204         {
11205             struct target_statx *target_stx;
11206             int dirfd = arg1;
11207             int flags = arg3;
11208 
11209             p = lock_user_string(arg2);
11210             if (p == NULL) {
11211                 return -TARGET_EFAULT;
11212             }
11213 #if defined(__NR_statx)
11214             {
11215                 /*
11216                  * It is assumed that struct statx is architecture independent.
11217                  */
11218                 struct target_statx host_stx;
11219                 int mask = arg4;
11220 
11221                 ret = get_errno(sys_statx(dirfd, p, flags, mask, &host_stx));
11222                 if (!is_error(ret)) {
11223                     if (host_to_target_statx(&host_stx, arg5) != 0) {
11224                         unlock_user(p, arg2, 0);
11225                         return -TARGET_EFAULT;
11226                     }
11227                 }
11228 
11229                 if (ret != -TARGET_ENOSYS) {
11230                     unlock_user(p, arg2, 0);
11231                     return ret;
11232                 }
11233             }
11234 #endif
11235             ret = get_errno(fstatat(dirfd, path(p), &st, flags));
11236             unlock_user(p, arg2, 0);
11237 
11238             if (!is_error(ret)) {
11239                 if (!lock_user_struct(VERIFY_WRITE, target_stx, arg5, 0)) {
11240                     return -TARGET_EFAULT;
11241                 }
11242                 memset(target_stx, 0, sizeof(*target_stx));
11243                 __put_user(major(st.st_dev), &target_stx->stx_dev_major);
11244                 __put_user(minor(st.st_dev), &target_stx->stx_dev_minor);
11245                 __put_user(st.st_ino, &target_stx->stx_ino);
11246                 __put_user(st.st_mode, &target_stx->stx_mode);
11247                 __put_user(st.st_uid, &target_stx->stx_uid);
11248                 __put_user(st.st_gid, &target_stx->stx_gid);
11249                 __put_user(st.st_nlink, &target_stx->stx_nlink);
11250                 __put_user(major(st.st_rdev), &target_stx->stx_rdev_major);
11251                 __put_user(minor(st.st_rdev), &target_stx->stx_rdev_minor);
11252                 __put_user(st.st_size, &target_stx->stx_size);
11253                 __put_user(st.st_blksize, &target_stx->stx_blksize);
11254                 __put_user(st.st_blocks, &target_stx->stx_blocks);
11255                 __put_user(st.st_atime, &target_stx->stx_atime.tv_sec);
11256                 __put_user(st.st_mtime, &target_stx->stx_mtime.tv_sec);
11257                 __put_user(st.st_ctime, &target_stx->stx_ctime.tv_sec);
11258                 unlock_user_struct(target_stx, arg5, 1);
11259             }
11260         }
11261         return ret;
11262 #endif
11263 #ifdef TARGET_NR_lchown
11264     case TARGET_NR_lchown:
11265         if (!(p = lock_user_string(arg1)))
11266             return -TARGET_EFAULT;
11267         ret = get_errno(lchown(p, low2highuid(arg2), low2highgid(arg3)));
11268         unlock_user(p, arg1, 0);
11269         return ret;
11270 #endif
11271 #ifdef TARGET_NR_getuid
11272     case TARGET_NR_getuid:
11273         return get_errno(high2lowuid(getuid()));
11274 #endif
11275 #ifdef TARGET_NR_getgid
11276     case TARGET_NR_getgid:
11277         return get_errno(high2lowgid(getgid()));
11278 #endif
11279 #ifdef TARGET_NR_geteuid
11280     case TARGET_NR_geteuid:
11281         return get_errno(high2lowuid(geteuid()));
11282 #endif
11283 #ifdef TARGET_NR_getegid
11284     case TARGET_NR_getegid:
11285         return get_errno(high2lowgid(getegid()));
11286 #endif
11287     case TARGET_NR_setreuid:
11288         return get_errno(setreuid(low2highuid(arg1), low2highuid(arg2)));
11289     case TARGET_NR_setregid:
11290         return get_errno(setregid(low2highgid(arg1), low2highgid(arg2)));
11291     case TARGET_NR_getgroups:
11292         {
11293             int gidsetsize = arg1;
11294             target_id *target_grouplist;
11295             gid_t *grouplist;
11296             int i;
11297 
11298             grouplist = alloca(gidsetsize * sizeof(gid_t));
11299             ret = get_errno(getgroups(gidsetsize, grouplist));
11300             if (gidsetsize == 0)
11301                 return ret;
11302             if (!is_error(ret)) {
11303                 target_grouplist = lock_user(VERIFY_WRITE, arg2, gidsetsize * sizeof(target_id), 0);
11304                 if (!target_grouplist)
11305                     return -TARGET_EFAULT;
11306                 for(i = 0;i < ret; i++)
11307                     target_grouplist[i] = tswapid(high2lowgid(grouplist[i]));
11308                 unlock_user(target_grouplist, arg2, gidsetsize * sizeof(target_id));
11309             }
11310         }
11311         return ret;
11312     case TARGET_NR_setgroups:
11313         {
11314             int gidsetsize = arg1;
11315             target_id *target_grouplist;
11316             gid_t *grouplist = NULL;
11317             int i;
11318             if (gidsetsize) {
11319                 grouplist = alloca(gidsetsize * sizeof(gid_t));
11320                 target_grouplist = lock_user(VERIFY_READ, arg2, gidsetsize * sizeof(target_id), 1);
11321                 if (!target_grouplist) {
11322                     return -TARGET_EFAULT;
11323                 }
11324                 for (i = 0; i < gidsetsize; i++) {
11325                     grouplist[i] = low2highgid(tswapid(target_grouplist[i]));
11326                 }
11327                 unlock_user(target_grouplist, arg2, 0);
11328             }
11329             return get_errno(setgroups(gidsetsize, grouplist));
11330         }
11331     case TARGET_NR_fchown:
11332         return get_errno(fchown(arg1, low2highuid(arg2), low2highgid(arg3)));
11333 #if defined(TARGET_NR_fchownat)
11334     case TARGET_NR_fchownat:
11335         if (!(p = lock_user_string(arg2)))
11336             return -TARGET_EFAULT;
11337         ret = get_errno(fchownat(arg1, p, low2highuid(arg3),
11338                                  low2highgid(arg4), arg5));
11339         unlock_user(p, arg2, 0);
11340         return ret;
11341 #endif
11342 #ifdef TARGET_NR_setresuid
11343     case TARGET_NR_setresuid:
11344         return get_errno(sys_setresuid(low2highuid(arg1),
11345                                        low2highuid(arg2),
11346                                        low2highuid(arg3)));
11347 #endif
11348 #ifdef TARGET_NR_getresuid
11349     case TARGET_NR_getresuid:
11350         {
11351             uid_t ruid, euid, suid;
11352             ret = get_errno(getresuid(&ruid, &euid, &suid));
11353             if (!is_error(ret)) {
11354                 if (put_user_id(high2lowuid(ruid), arg1)
11355                     || put_user_id(high2lowuid(euid), arg2)
11356                     || put_user_id(high2lowuid(suid), arg3))
11357                     return -TARGET_EFAULT;
11358             }
11359         }
11360         return ret;
11361 #endif
11362 #ifdef TARGET_NR_getresgid
11363     case TARGET_NR_setresgid:
11364         return get_errno(sys_setresgid(low2highgid(arg1),
11365                                        low2highgid(arg2),
11366                                        low2highgid(arg3)));
11367 #endif
11368 #ifdef TARGET_NR_getresgid
11369     case TARGET_NR_getresgid:
11370         {
11371             gid_t rgid, egid, sgid;
11372             ret = get_errno(getresgid(&rgid, &egid, &sgid));
11373             if (!is_error(ret)) {
11374                 if (put_user_id(high2lowgid(rgid), arg1)
11375                     || put_user_id(high2lowgid(egid), arg2)
11376                     || put_user_id(high2lowgid(sgid), arg3))
11377                     return -TARGET_EFAULT;
11378             }
11379         }
11380         return ret;
11381 #endif
11382 #ifdef TARGET_NR_chown
11383     case TARGET_NR_chown:
11384         if (!(p = lock_user_string(arg1)))
11385             return -TARGET_EFAULT;
11386         ret = get_errno(chown(p, low2highuid(arg2), low2highgid(arg3)));
11387         unlock_user(p, arg1, 0);
11388         return ret;
11389 #endif
11390     case TARGET_NR_setuid:
11391         return get_errno(sys_setuid(low2highuid(arg1)));
11392     case TARGET_NR_setgid:
11393         return get_errno(sys_setgid(low2highgid(arg1)));
11394     case TARGET_NR_setfsuid:
11395         return get_errno(setfsuid(arg1));
11396     case TARGET_NR_setfsgid:
11397         return get_errno(setfsgid(arg1));
11398 
11399 #ifdef TARGET_NR_lchown32
11400     case TARGET_NR_lchown32:
11401         if (!(p = lock_user_string(arg1)))
11402             return -TARGET_EFAULT;
11403         ret = get_errno(lchown(p, arg2, arg3));
11404         unlock_user(p, arg1, 0);
11405         return ret;
11406 #endif
11407 #ifdef TARGET_NR_getuid32
11408     case TARGET_NR_getuid32:
11409         return get_errno(getuid());
11410 #endif
11411 
11412 #if defined(TARGET_NR_getxuid) && defined(TARGET_ALPHA)
11413    /* Alpha specific */
11414     case TARGET_NR_getxuid:
11415          {
11416             uid_t euid;
11417             euid=geteuid();
11418             cpu_env->ir[IR_A4]=euid;
11419          }
11420         return get_errno(getuid());
11421 #endif
11422 #if defined(TARGET_NR_getxgid) && defined(TARGET_ALPHA)
11423    /* Alpha specific */
11424     case TARGET_NR_getxgid:
11425          {
11426             uid_t egid;
11427             egid=getegid();
11428             cpu_env->ir[IR_A4]=egid;
11429          }
11430         return get_errno(getgid());
11431 #endif
11432 #if defined(TARGET_NR_osf_getsysinfo) && defined(TARGET_ALPHA)
11433     /* Alpha specific */
11434     case TARGET_NR_osf_getsysinfo:
11435         ret = -TARGET_EOPNOTSUPP;
11436         switch (arg1) {
11437           case TARGET_GSI_IEEE_FP_CONTROL:
11438             {
11439                 uint64_t fpcr = cpu_alpha_load_fpcr(cpu_env);
11440                 uint64_t swcr = cpu_env->swcr;
11441 
11442                 swcr &= ~SWCR_STATUS_MASK;
11443                 swcr |= (fpcr >> 35) & SWCR_STATUS_MASK;
11444 
11445                 if (put_user_u64 (swcr, arg2))
11446                         return -TARGET_EFAULT;
11447                 ret = 0;
11448             }
11449             break;
11450 
11451           /* case GSI_IEEE_STATE_AT_SIGNAL:
11452              -- Not implemented in linux kernel.
11453              case GSI_UACPROC:
11454              -- Retrieves current unaligned access state; not much used.
11455              case GSI_PROC_TYPE:
11456              -- Retrieves implver information; surely not used.
11457              case GSI_GET_HWRPB:
11458              -- Grabs a copy of the HWRPB; surely not used.
11459           */
11460         }
11461         return ret;
11462 #endif
11463 #if defined(TARGET_NR_osf_setsysinfo) && defined(TARGET_ALPHA)
11464     /* Alpha specific */
11465     case TARGET_NR_osf_setsysinfo:
11466         ret = -TARGET_EOPNOTSUPP;
11467         switch (arg1) {
11468           case TARGET_SSI_IEEE_FP_CONTROL:
11469             {
11470                 uint64_t swcr, fpcr;
11471 
11472                 if (get_user_u64 (swcr, arg2)) {
11473                     return -TARGET_EFAULT;
11474                 }
11475 
11476                 /*
11477                  * The kernel calls swcr_update_status to update the
11478                  * status bits from the fpcr at every point that it
11479                  * could be queried.  Therefore, we store the status
11480                  * bits only in FPCR.
11481                  */
11482                 cpu_env->swcr = swcr & (SWCR_TRAP_ENABLE_MASK | SWCR_MAP_MASK);
11483 
11484                 fpcr = cpu_alpha_load_fpcr(cpu_env);
11485                 fpcr &= ((uint64_t)FPCR_DYN_MASK << 32);
11486                 fpcr |= alpha_ieee_swcr_to_fpcr(swcr);
11487                 cpu_alpha_store_fpcr(cpu_env, fpcr);
11488                 ret = 0;
11489             }
11490             break;
11491 
11492           case TARGET_SSI_IEEE_RAISE_EXCEPTION:
11493             {
11494                 uint64_t exc, fpcr, fex;
11495 
11496                 if (get_user_u64(exc, arg2)) {
11497                     return -TARGET_EFAULT;
11498                 }
11499                 exc &= SWCR_STATUS_MASK;
11500                 fpcr = cpu_alpha_load_fpcr(cpu_env);
11501 
11502                 /* Old exceptions are not signaled.  */
11503                 fex = alpha_ieee_fpcr_to_swcr(fpcr);
11504                 fex = exc & ~fex;
11505                 fex >>= SWCR_STATUS_TO_EXCSUM_SHIFT;
11506                 fex &= (cpu_env)->swcr;
11507 
11508                 /* Update the hardware fpcr.  */
11509                 fpcr |= alpha_ieee_swcr_to_fpcr(exc);
11510                 cpu_alpha_store_fpcr(cpu_env, fpcr);
11511 
11512                 if (fex) {
11513                     int si_code = TARGET_FPE_FLTUNK;
11514                     target_siginfo_t info;
11515 
11516                     if (fex & SWCR_TRAP_ENABLE_DNO) {
11517                         si_code = TARGET_FPE_FLTUND;
11518                     }
11519                     if (fex & SWCR_TRAP_ENABLE_INE) {
11520                         si_code = TARGET_FPE_FLTRES;
11521                     }
11522                     if (fex & SWCR_TRAP_ENABLE_UNF) {
11523                         si_code = TARGET_FPE_FLTUND;
11524                     }
11525                     if (fex & SWCR_TRAP_ENABLE_OVF) {
11526                         si_code = TARGET_FPE_FLTOVF;
11527                     }
11528                     if (fex & SWCR_TRAP_ENABLE_DZE) {
11529                         si_code = TARGET_FPE_FLTDIV;
11530                     }
11531                     if (fex & SWCR_TRAP_ENABLE_INV) {
11532                         si_code = TARGET_FPE_FLTINV;
11533                     }
11534 
11535                     info.si_signo = SIGFPE;
11536                     info.si_errno = 0;
11537                     info.si_code = si_code;
11538                     info._sifields._sigfault._addr = (cpu_env)->pc;
11539                     queue_signal(cpu_env, info.si_signo,
11540                                  QEMU_SI_FAULT, &info);
11541                 }
11542                 ret = 0;
11543             }
11544             break;
11545 
11546           /* case SSI_NVPAIRS:
11547              -- Used with SSIN_UACPROC to enable unaligned accesses.
11548              case SSI_IEEE_STATE_AT_SIGNAL:
11549              case SSI_IEEE_IGNORE_STATE_AT_SIGNAL:
11550              -- Not implemented in linux kernel
11551           */
11552         }
11553         return ret;
11554 #endif
11555 #ifdef TARGET_NR_osf_sigprocmask
11556     /* Alpha specific.  */
11557     case TARGET_NR_osf_sigprocmask:
11558         {
11559             abi_ulong mask;
11560             int how;
11561             sigset_t set, oldset;
11562 
11563             switch(arg1) {
11564             case TARGET_SIG_BLOCK:
11565                 how = SIG_BLOCK;
11566                 break;
11567             case TARGET_SIG_UNBLOCK:
11568                 how = SIG_UNBLOCK;
11569                 break;
11570             case TARGET_SIG_SETMASK:
11571                 how = SIG_SETMASK;
11572                 break;
11573             default:
11574                 return -TARGET_EINVAL;
11575             }
11576             mask = arg2;
11577             target_to_host_old_sigset(&set, &mask);
11578             ret = do_sigprocmask(how, &set, &oldset);
11579             if (!ret) {
11580                 host_to_target_old_sigset(&mask, &oldset);
11581                 ret = mask;
11582             }
11583         }
11584         return ret;
11585 #endif
11586 
11587 #ifdef TARGET_NR_getgid32
11588     case TARGET_NR_getgid32:
11589         return get_errno(getgid());
11590 #endif
11591 #ifdef TARGET_NR_geteuid32
11592     case TARGET_NR_geteuid32:
11593         return get_errno(geteuid());
11594 #endif
11595 #ifdef TARGET_NR_getegid32
11596     case TARGET_NR_getegid32:
11597         return get_errno(getegid());
11598 #endif
11599 #ifdef TARGET_NR_setreuid32
11600     case TARGET_NR_setreuid32:
11601         return get_errno(setreuid(arg1, arg2));
11602 #endif
11603 #ifdef TARGET_NR_setregid32
11604     case TARGET_NR_setregid32:
11605         return get_errno(setregid(arg1, arg2));
11606 #endif
11607 #ifdef TARGET_NR_getgroups32
11608     case TARGET_NR_getgroups32:
11609         {
11610             int gidsetsize = arg1;
11611             uint32_t *target_grouplist;
11612             gid_t *grouplist;
11613             int i;
11614 
11615             grouplist = alloca(gidsetsize * sizeof(gid_t));
11616             ret = get_errno(getgroups(gidsetsize, grouplist));
11617             if (gidsetsize == 0)
11618                 return ret;
11619             if (!is_error(ret)) {
11620                 target_grouplist = lock_user(VERIFY_WRITE, arg2, gidsetsize * 4, 0);
11621                 if (!target_grouplist) {
11622                     return -TARGET_EFAULT;
11623                 }
11624                 for(i = 0;i < ret; i++)
11625                     target_grouplist[i] = tswap32(grouplist[i]);
11626                 unlock_user(target_grouplist, arg2, gidsetsize * 4);
11627             }
11628         }
11629         return ret;
11630 #endif
11631 #ifdef TARGET_NR_setgroups32
11632     case TARGET_NR_setgroups32:
11633         {
11634             int gidsetsize = arg1;
11635             uint32_t *target_grouplist;
11636             gid_t *grouplist;
11637             int i;
11638 
11639             grouplist = alloca(gidsetsize * sizeof(gid_t));
11640             target_grouplist = lock_user(VERIFY_READ, arg2, gidsetsize * 4, 1);
11641             if (!target_grouplist) {
11642                 return -TARGET_EFAULT;
11643             }
11644             for(i = 0;i < gidsetsize; i++)
11645                 grouplist[i] = tswap32(target_grouplist[i]);
11646             unlock_user(target_grouplist, arg2, 0);
11647             return get_errno(setgroups(gidsetsize, grouplist));
11648         }
11649 #endif
11650 #ifdef TARGET_NR_fchown32
11651     case TARGET_NR_fchown32:
11652         return get_errno(fchown(arg1, arg2, arg3));
11653 #endif
11654 #ifdef TARGET_NR_setresuid32
11655     case TARGET_NR_setresuid32:
11656         return get_errno(sys_setresuid(arg1, arg2, arg3));
11657 #endif
11658 #ifdef TARGET_NR_getresuid32
11659     case TARGET_NR_getresuid32:
11660         {
11661             uid_t ruid, euid, suid;
11662             ret = get_errno(getresuid(&ruid, &euid, &suid));
11663             if (!is_error(ret)) {
11664                 if (put_user_u32(ruid, arg1)
11665                     || put_user_u32(euid, arg2)
11666                     || put_user_u32(suid, arg3))
11667                     return -TARGET_EFAULT;
11668             }
11669         }
11670         return ret;
11671 #endif
11672 #ifdef TARGET_NR_setresgid32
11673     case TARGET_NR_setresgid32:
11674         return get_errno(sys_setresgid(arg1, arg2, arg3));
11675 #endif
11676 #ifdef TARGET_NR_getresgid32
11677     case TARGET_NR_getresgid32:
11678         {
11679             gid_t rgid, egid, sgid;
11680             ret = get_errno(getresgid(&rgid, &egid, &sgid));
11681             if (!is_error(ret)) {
11682                 if (put_user_u32(rgid, arg1)
11683                     || put_user_u32(egid, arg2)
11684                     || put_user_u32(sgid, arg3))
11685                     return -TARGET_EFAULT;
11686             }
11687         }
11688         return ret;
11689 #endif
11690 #ifdef TARGET_NR_chown32
11691     case TARGET_NR_chown32:
11692         if (!(p = lock_user_string(arg1)))
11693             return -TARGET_EFAULT;
11694         ret = get_errno(chown(p, arg2, arg3));
11695         unlock_user(p, arg1, 0);
11696         return ret;
11697 #endif
11698 #ifdef TARGET_NR_setuid32
11699     case TARGET_NR_setuid32:
11700         return get_errno(sys_setuid(arg1));
11701 #endif
11702 #ifdef TARGET_NR_setgid32
11703     case TARGET_NR_setgid32:
11704         return get_errno(sys_setgid(arg1));
11705 #endif
11706 #ifdef TARGET_NR_setfsuid32
11707     case TARGET_NR_setfsuid32:
11708         return get_errno(setfsuid(arg1));
11709 #endif
11710 #ifdef TARGET_NR_setfsgid32
11711     case TARGET_NR_setfsgid32:
11712         return get_errno(setfsgid(arg1));
11713 #endif
11714 #ifdef TARGET_NR_mincore
11715     case TARGET_NR_mincore:
11716         {
11717             void *a = lock_user(VERIFY_READ, arg1, arg2, 0);
11718             if (!a) {
11719                 return -TARGET_ENOMEM;
11720             }
11721             p = lock_user_string(arg3);
11722             if (!p) {
11723                 ret = -TARGET_EFAULT;
11724             } else {
11725                 ret = get_errno(mincore(a, arg2, p));
11726                 unlock_user(p, arg3, ret);
11727             }
11728             unlock_user(a, arg1, 0);
11729         }
11730         return ret;
11731 #endif
11732 #ifdef TARGET_NR_arm_fadvise64_64
11733     case TARGET_NR_arm_fadvise64_64:
11734         /* arm_fadvise64_64 looks like fadvise64_64 but
11735          * with different argument order: fd, advice, offset, len
11736          * rather than the usual fd, offset, len, advice.
11737          * Note that offset and len are both 64-bit so appear as
11738          * pairs of 32-bit registers.
11739          */
11740         ret = posix_fadvise(arg1, target_offset64(arg3, arg4),
11741                             target_offset64(arg5, arg6), arg2);
11742         return -host_to_target_errno(ret);
11743 #endif
11744 
11745 #if TARGET_ABI_BITS == 32
11746 
11747 #ifdef TARGET_NR_fadvise64_64
11748     case TARGET_NR_fadvise64_64:
11749 #if defined(TARGET_PPC) || defined(TARGET_XTENSA)
11750         /* 6 args: fd, advice, offset (high, low), len (high, low) */
11751         ret = arg2;
11752         arg2 = arg3;
11753         arg3 = arg4;
11754         arg4 = arg5;
11755         arg5 = arg6;
11756         arg6 = ret;
11757 #else
11758         /* 6 args: fd, offset (high, low), len (high, low), advice */
11759         if (regpairs_aligned(cpu_env, num)) {
11760             /* offset is in (3,4), len in (5,6) and advice in 7 */
11761             arg2 = arg3;
11762             arg3 = arg4;
11763             arg4 = arg5;
11764             arg5 = arg6;
11765             arg6 = arg7;
11766         }
11767 #endif
11768         ret = posix_fadvise(arg1, target_offset64(arg2, arg3),
11769                             target_offset64(arg4, arg5), arg6);
11770         return -host_to_target_errno(ret);
11771 #endif
11772 
11773 #ifdef TARGET_NR_fadvise64
11774     case TARGET_NR_fadvise64:
11775         /* 5 args: fd, offset (high, low), len, advice */
11776         if (regpairs_aligned(cpu_env, num)) {
11777             /* offset is in (3,4), len in 5 and advice in 6 */
11778             arg2 = arg3;
11779             arg3 = arg4;
11780             arg4 = arg5;
11781             arg5 = arg6;
11782         }
11783         ret = posix_fadvise(arg1, target_offset64(arg2, arg3), arg4, arg5);
11784         return -host_to_target_errno(ret);
11785 #endif
11786 
11787 #else /* not a 32-bit ABI */
11788 #if defined(TARGET_NR_fadvise64_64) || defined(TARGET_NR_fadvise64)
11789 #ifdef TARGET_NR_fadvise64_64
11790     case TARGET_NR_fadvise64_64:
11791 #endif
11792 #ifdef TARGET_NR_fadvise64
11793     case TARGET_NR_fadvise64:
11794 #endif
11795 #ifdef TARGET_S390X
11796         switch (arg4) {
11797         case 4: arg4 = POSIX_FADV_NOREUSE + 1; break; /* make sure it's an invalid value */
11798         case 5: arg4 = POSIX_FADV_NOREUSE + 2; break; /* ditto */
11799         case 6: arg4 = POSIX_FADV_DONTNEED; break;
11800         case 7: arg4 = POSIX_FADV_NOREUSE; break;
11801         default: break;
11802         }
11803 #endif
11804         return -host_to_target_errno(posix_fadvise(arg1, arg2, arg3, arg4));
11805 #endif
11806 #endif /* end of 64-bit ABI fadvise handling */
11807 
11808 #ifdef TARGET_NR_madvise
11809     case TARGET_NR_madvise:
11810         /* A straight passthrough may not be safe because qemu sometimes
11811            turns private file-backed mappings into anonymous mappings.
11812            This will break MADV_DONTNEED.
11813            This is a hint, so ignoring and returning success is ok.  */
11814         return 0;
11815 #endif
11816 #ifdef TARGET_NR_fcntl64
11817     case TARGET_NR_fcntl64:
11818     {
11819         int cmd;
11820         struct flock64 fl;
11821         from_flock64_fn *copyfrom = copy_from_user_flock64;
11822         to_flock64_fn *copyto = copy_to_user_flock64;
11823 
11824 #ifdef TARGET_ARM
11825         if (!cpu_env->eabi) {
11826             copyfrom = copy_from_user_oabi_flock64;
11827             copyto = copy_to_user_oabi_flock64;
11828         }
11829 #endif
11830 
11831         cmd = target_to_host_fcntl_cmd(arg2);
11832         if (cmd == -TARGET_EINVAL) {
11833             return cmd;
11834         }
11835 
11836         switch(arg2) {
11837         case TARGET_F_GETLK64:
11838             ret = copyfrom(&fl, arg3);
11839             if (ret) {
11840                 break;
11841             }
11842             ret = get_errno(safe_fcntl(arg1, cmd, &fl));
11843             if (ret == 0) {
11844                 ret = copyto(arg3, &fl);
11845             }
11846 	    break;
11847 
11848         case TARGET_F_SETLK64:
11849         case TARGET_F_SETLKW64:
11850             ret = copyfrom(&fl, arg3);
11851             if (ret) {
11852                 break;
11853             }
11854             ret = get_errno(safe_fcntl(arg1, cmd, &fl));
11855 	    break;
11856         default:
11857             ret = do_fcntl(arg1, arg2, arg3);
11858             break;
11859         }
11860         return ret;
11861     }
11862 #endif
11863 #ifdef TARGET_NR_cacheflush
11864     case TARGET_NR_cacheflush:
11865         /* self-modifying code is handled automatically, so nothing needed */
11866         return 0;
11867 #endif
11868 #ifdef TARGET_NR_getpagesize
11869     case TARGET_NR_getpagesize:
11870         return TARGET_PAGE_SIZE;
11871 #endif
11872     case TARGET_NR_gettid:
11873         return get_errno(sys_gettid());
11874 #ifdef TARGET_NR_readahead
11875     case TARGET_NR_readahead:
11876 #if TARGET_ABI_BITS == 32
11877         if (regpairs_aligned(cpu_env, num)) {
11878             arg2 = arg3;
11879             arg3 = arg4;
11880             arg4 = arg5;
11881         }
11882         ret = get_errno(readahead(arg1, target_offset64(arg2, arg3) , arg4));
11883 #else
11884         ret = get_errno(readahead(arg1, arg2, arg3));
11885 #endif
11886         return ret;
11887 #endif
11888 #ifdef CONFIG_ATTR
11889 #ifdef TARGET_NR_setxattr
11890     case TARGET_NR_listxattr:
11891     case TARGET_NR_llistxattr:
11892     {
11893         void *p, *b = 0;
11894         if (arg2) {
11895             b = lock_user(VERIFY_WRITE, arg2, arg3, 0);
11896             if (!b) {
11897                 return -TARGET_EFAULT;
11898             }
11899         }
11900         p = lock_user_string(arg1);
11901         if (p) {
11902             if (num == TARGET_NR_listxattr) {
11903                 ret = get_errno(listxattr(p, b, arg3));
11904             } else {
11905                 ret = get_errno(llistxattr(p, b, arg3));
11906             }
11907         } else {
11908             ret = -TARGET_EFAULT;
11909         }
11910         unlock_user(p, arg1, 0);
11911         unlock_user(b, arg2, arg3);
11912         return ret;
11913     }
11914     case TARGET_NR_flistxattr:
11915     {
11916         void *b = 0;
11917         if (arg2) {
11918             b = lock_user(VERIFY_WRITE, arg2, arg3, 0);
11919             if (!b) {
11920                 return -TARGET_EFAULT;
11921             }
11922         }
11923         ret = get_errno(flistxattr(arg1, b, arg3));
11924         unlock_user(b, arg2, arg3);
11925         return ret;
11926     }
11927     case TARGET_NR_setxattr:
11928     case TARGET_NR_lsetxattr:
11929         {
11930             void *p, *n, *v = 0;
11931             if (arg3) {
11932                 v = lock_user(VERIFY_READ, arg3, arg4, 1);
11933                 if (!v) {
11934                     return -TARGET_EFAULT;
11935                 }
11936             }
11937             p = lock_user_string(arg1);
11938             n = lock_user_string(arg2);
11939             if (p && n) {
11940                 if (num == TARGET_NR_setxattr) {
11941                     ret = get_errno(setxattr(p, n, v, arg4, arg5));
11942                 } else {
11943                     ret = get_errno(lsetxattr(p, n, v, arg4, arg5));
11944                 }
11945             } else {
11946                 ret = -TARGET_EFAULT;
11947             }
11948             unlock_user(p, arg1, 0);
11949             unlock_user(n, arg2, 0);
11950             unlock_user(v, arg3, 0);
11951         }
11952         return ret;
11953     case TARGET_NR_fsetxattr:
11954         {
11955             void *n, *v = 0;
11956             if (arg3) {
11957                 v = lock_user(VERIFY_READ, arg3, arg4, 1);
11958                 if (!v) {
11959                     return -TARGET_EFAULT;
11960                 }
11961             }
11962             n = lock_user_string(arg2);
11963             if (n) {
11964                 ret = get_errno(fsetxattr(arg1, n, v, arg4, arg5));
11965             } else {
11966                 ret = -TARGET_EFAULT;
11967             }
11968             unlock_user(n, arg2, 0);
11969             unlock_user(v, arg3, 0);
11970         }
11971         return ret;
11972     case TARGET_NR_getxattr:
11973     case TARGET_NR_lgetxattr:
11974         {
11975             void *p, *n, *v = 0;
11976             if (arg3) {
11977                 v = lock_user(VERIFY_WRITE, arg3, arg4, 0);
11978                 if (!v) {
11979                     return -TARGET_EFAULT;
11980                 }
11981             }
11982             p = lock_user_string(arg1);
11983             n = lock_user_string(arg2);
11984             if (p && n) {
11985                 if (num == TARGET_NR_getxattr) {
11986                     ret = get_errno(getxattr(p, n, v, arg4));
11987                 } else {
11988                     ret = get_errno(lgetxattr(p, n, v, arg4));
11989                 }
11990             } else {
11991                 ret = -TARGET_EFAULT;
11992             }
11993             unlock_user(p, arg1, 0);
11994             unlock_user(n, arg2, 0);
11995             unlock_user(v, arg3, arg4);
11996         }
11997         return ret;
11998     case TARGET_NR_fgetxattr:
11999         {
12000             void *n, *v = 0;
12001             if (arg3) {
12002                 v = lock_user(VERIFY_WRITE, arg3, arg4, 0);
12003                 if (!v) {
12004                     return -TARGET_EFAULT;
12005                 }
12006             }
12007             n = lock_user_string(arg2);
12008             if (n) {
12009                 ret = get_errno(fgetxattr(arg1, n, v, arg4));
12010             } else {
12011                 ret = -TARGET_EFAULT;
12012             }
12013             unlock_user(n, arg2, 0);
12014             unlock_user(v, arg3, arg4);
12015         }
12016         return ret;
12017     case TARGET_NR_removexattr:
12018     case TARGET_NR_lremovexattr:
12019         {
12020             void *p, *n;
12021             p = lock_user_string(arg1);
12022             n = lock_user_string(arg2);
12023             if (p && n) {
12024                 if (num == TARGET_NR_removexattr) {
12025                     ret = get_errno(removexattr(p, n));
12026                 } else {
12027                     ret = get_errno(lremovexattr(p, n));
12028                 }
12029             } else {
12030                 ret = -TARGET_EFAULT;
12031             }
12032             unlock_user(p, arg1, 0);
12033             unlock_user(n, arg2, 0);
12034         }
12035         return ret;
12036     case TARGET_NR_fremovexattr:
12037         {
12038             void *n;
12039             n = lock_user_string(arg2);
12040             if (n) {
12041                 ret = get_errno(fremovexattr(arg1, n));
12042             } else {
12043                 ret = -TARGET_EFAULT;
12044             }
12045             unlock_user(n, arg2, 0);
12046         }
12047         return ret;
12048 #endif
12049 #endif /* CONFIG_ATTR */
12050 #ifdef TARGET_NR_set_thread_area
12051     case TARGET_NR_set_thread_area:
12052 #if defined(TARGET_MIPS)
12053       cpu_env->active_tc.CP0_UserLocal = arg1;
12054       return 0;
12055 #elif defined(TARGET_CRIS)
12056       if (arg1 & 0xff)
12057           ret = -TARGET_EINVAL;
12058       else {
12059           cpu_env->pregs[PR_PID] = arg1;
12060           ret = 0;
12061       }
12062       return ret;
12063 #elif defined(TARGET_I386) && defined(TARGET_ABI32)
12064       return do_set_thread_area(cpu_env, arg1);
12065 #elif defined(TARGET_M68K)
12066       {
12067           TaskState *ts = cpu->opaque;
12068           ts->tp_value = arg1;
12069           return 0;
12070       }
12071 #else
12072       return -TARGET_ENOSYS;
12073 #endif
12074 #endif
12075 #ifdef TARGET_NR_get_thread_area
12076     case TARGET_NR_get_thread_area:
12077 #if defined(TARGET_I386) && defined(TARGET_ABI32)
12078         return do_get_thread_area(cpu_env, arg1);
12079 #elif defined(TARGET_M68K)
12080         {
12081             TaskState *ts = cpu->opaque;
12082             return ts->tp_value;
12083         }
12084 #else
12085         return -TARGET_ENOSYS;
12086 #endif
12087 #endif
12088 #ifdef TARGET_NR_getdomainname
12089     case TARGET_NR_getdomainname:
12090         return -TARGET_ENOSYS;
12091 #endif
12092 
12093 #ifdef TARGET_NR_clock_settime
12094     case TARGET_NR_clock_settime:
12095     {
12096         struct timespec ts;
12097 
12098         ret = target_to_host_timespec(&ts, arg2);
12099         if (!is_error(ret)) {
12100             ret = get_errno(clock_settime(arg1, &ts));
12101         }
12102         return ret;
12103     }
12104 #endif
12105 #ifdef TARGET_NR_clock_settime64
12106     case TARGET_NR_clock_settime64:
12107     {
12108         struct timespec ts;
12109 
12110         ret = target_to_host_timespec64(&ts, arg2);
12111         if (!is_error(ret)) {
12112             ret = get_errno(clock_settime(arg1, &ts));
12113         }
12114         return ret;
12115     }
12116 #endif
12117 #ifdef TARGET_NR_clock_gettime
12118     case TARGET_NR_clock_gettime:
12119     {
12120         struct timespec ts;
12121         ret = get_errno(clock_gettime(arg1, &ts));
12122         if (!is_error(ret)) {
12123             ret = host_to_target_timespec(arg2, &ts);
12124         }
12125         return ret;
12126     }
12127 #endif
12128 #ifdef TARGET_NR_clock_gettime64
12129     case TARGET_NR_clock_gettime64:
12130     {
12131         struct timespec ts;
12132         ret = get_errno(clock_gettime(arg1, &ts));
12133         if (!is_error(ret)) {
12134             ret = host_to_target_timespec64(arg2, &ts);
12135         }
12136         return ret;
12137     }
12138 #endif
12139 #ifdef TARGET_NR_clock_getres
12140     case TARGET_NR_clock_getres:
12141     {
12142         struct timespec ts;
12143         ret = get_errno(clock_getres(arg1, &ts));
12144         if (!is_error(ret)) {
12145             host_to_target_timespec(arg2, &ts);
12146         }
12147         return ret;
12148     }
12149 #endif
12150 #ifdef TARGET_NR_clock_getres_time64
12151     case TARGET_NR_clock_getres_time64:
12152     {
12153         struct timespec ts;
12154         ret = get_errno(clock_getres(arg1, &ts));
12155         if (!is_error(ret)) {
12156             host_to_target_timespec64(arg2, &ts);
12157         }
12158         return ret;
12159     }
12160 #endif
12161 #ifdef TARGET_NR_clock_nanosleep
12162     case TARGET_NR_clock_nanosleep:
12163     {
12164         struct timespec ts;
12165         if (target_to_host_timespec(&ts, arg3)) {
12166             return -TARGET_EFAULT;
12167         }
12168         ret = get_errno(safe_clock_nanosleep(arg1, arg2,
12169                                              &ts, arg4 ? &ts : NULL));
12170         /*
12171          * if the call is interrupted by a signal handler, it fails
12172          * with error -TARGET_EINTR and if arg4 is not NULL and arg2 is not
12173          * TIMER_ABSTIME, it returns the remaining unslept time in arg4.
12174          */
12175         if (ret == -TARGET_EINTR && arg4 && arg2 != TIMER_ABSTIME &&
12176             host_to_target_timespec(arg4, &ts)) {
12177               return -TARGET_EFAULT;
12178         }
12179 
12180         return ret;
12181     }
12182 #endif
12183 #ifdef TARGET_NR_clock_nanosleep_time64
12184     case TARGET_NR_clock_nanosleep_time64:
12185     {
12186         struct timespec ts;
12187 
12188         if (target_to_host_timespec64(&ts, arg3)) {
12189             return -TARGET_EFAULT;
12190         }
12191 
12192         ret = get_errno(safe_clock_nanosleep(arg1, arg2,
12193                                              &ts, arg4 ? &ts : NULL));
12194 
12195         if (ret == -TARGET_EINTR && arg4 && arg2 != TIMER_ABSTIME &&
12196             host_to_target_timespec64(arg4, &ts)) {
12197             return -TARGET_EFAULT;
12198         }
12199         return ret;
12200     }
12201 #endif
12202 
12203 #if defined(TARGET_NR_set_tid_address) && defined(__NR_set_tid_address)
12204     case TARGET_NR_set_tid_address:
12205         return get_errno(set_tid_address((int *)g2h(cpu, arg1)));
12206 #endif
12207 
12208     case TARGET_NR_tkill:
12209         return get_errno(safe_tkill((int)arg1, target_to_host_signal(arg2)));
12210 
12211     case TARGET_NR_tgkill:
12212         return get_errno(safe_tgkill((int)arg1, (int)arg2,
12213                          target_to_host_signal(arg3)));
12214 
12215 #ifdef TARGET_NR_set_robust_list
12216     case TARGET_NR_set_robust_list:
12217     case TARGET_NR_get_robust_list:
12218         /* The ABI for supporting robust futexes has userspace pass
12219          * the kernel a pointer to a linked list which is updated by
12220          * userspace after the syscall; the list is walked by the kernel
12221          * when the thread exits. Since the linked list in QEMU guest
12222          * memory isn't a valid linked list for the host and we have
12223          * no way to reliably intercept the thread-death event, we can't
12224          * support these. Silently return ENOSYS so that guest userspace
12225          * falls back to a non-robust futex implementation (which should
12226          * be OK except in the corner case of the guest crashing while
12227          * holding a mutex that is shared with another process via
12228          * shared memory).
12229          */
12230         return -TARGET_ENOSYS;
12231 #endif
12232 
12233 #if defined(TARGET_NR_utimensat)
12234     case TARGET_NR_utimensat:
12235         {
12236             struct timespec *tsp, ts[2];
12237             if (!arg3) {
12238                 tsp = NULL;
12239             } else {
12240                 if (target_to_host_timespec(ts, arg3)) {
12241                     return -TARGET_EFAULT;
12242                 }
12243                 if (target_to_host_timespec(ts + 1, arg3 +
12244                                             sizeof(struct target_timespec))) {
12245                     return -TARGET_EFAULT;
12246                 }
12247                 tsp = ts;
12248             }
12249             if (!arg2)
12250                 ret = get_errno(sys_utimensat(arg1, NULL, tsp, arg4));
12251             else {
12252                 if (!(p = lock_user_string(arg2))) {
12253                     return -TARGET_EFAULT;
12254                 }
12255                 ret = get_errno(sys_utimensat(arg1, path(p), tsp, arg4));
12256                 unlock_user(p, arg2, 0);
12257             }
12258         }
12259         return ret;
12260 #endif
12261 #ifdef TARGET_NR_utimensat_time64
12262     case TARGET_NR_utimensat_time64:
12263         {
12264             struct timespec *tsp, ts[2];
12265             if (!arg3) {
12266                 tsp = NULL;
12267             } else {
12268                 if (target_to_host_timespec64(ts, arg3)) {
12269                     return -TARGET_EFAULT;
12270                 }
12271                 if (target_to_host_timespec64(ts + 1, arg3 +
12272                                      sizeof(struct target__kernel_timespec))) {
12273                     return -TARGET_EFAULT;
12274                 }
12275                 tsp = ts;
12276             }
12277             if (!arg2)
12278                 ret = get_errno(sys_utimensat(arg1, NULL, tsp, arg4));
12279             else {
12280                 p = lock_user_string(arg2);
12281                 if (!p) {
12282                     return -TARGET_EFAULT;
12283                 }
12284                 ret = get_errno(sys_utimensat(arg1, path(p), tsp, arg4));
12285                 unlock_user(p, arg2, 0);
12286             }
12287         }
12288         return ret;
12289 #endif
12290 #ifdef TARGET_NR_futex
12291     case TARGET_NR_futex:
12292         return do_futex(cpu, arg1, arg2, arg3, arg4, arg5, arg6);
12293 #endif
12294 #ifdef TARGET_NR_futex_time64
12295     case TARGET_NR_futex_time64:
12296         return do_futex_time64(cpu, arg1, arg2, arg3, arg4, arg5, arg6);
12297 #endif
12298 #ifdef CONFIG_INOTIFY
12299 #if defined(TARGET_NR_inotify_init)
12300     case TARGET_NR_inotify_init:
12301         ret = get_errno(inotify_init());
12302         if (ret >= 0) {
12303             fd_trans_register(ret, &target_inotify_trans);
12304         }
12305         return ret;
12306 #endif
12307 #if defined(TARGET_NR_inotify_init1) && defined(CONFIG_INOTIFY1)
12308     case TARGET_NR_inotify_init1:
12309         ret = get_errno(inotify_init1(target_to_host_bitmask(arg1,
12310                                           fcntl_flags_tbl)));
12311         if (ret >= 0) {
12312             fd_trans_register(ret, &target_inotify_trans);
12313         }
12314         return ret;
12315 #endif
12316 #if defined(TARGET_NR_inotify_add_watch)
12317     case TARGET_NR_inotify_add_watch:
12318         p = lock_user_string(arg2);
12319         ret = get_errno(inotify_add_watch(arg1, path(p), arg3));
12320         unlock_user(p, arg2, 0);
12321         return ret;
12322 #endif
12323 #if defined(TARGET_NR_inotify_rm_watch)
12324     case TARGET_NR_inotify_rm_watch:
12325         return get_errno(inotify_rm_watch(arg1, arg2));
12326 #endif
12327 #endif
12328 
12329 #if defined(TARGET_NR_mq_open) && defined(__NR_mq_open)
12330     case TARGET_NR_mq_open:
12331         {
12332             struct mq_attr posix_mq_attr;
12333             struct mq_attr *pposix_mq_attr;
12334             int host_flags;
12335 
12336             host_flags = target_to_host_bitmask(arg2, fcntl_flags_tbl);
12337             pposix_mq_attr = NULL;
12338             if (arg4) {
12339                 if (copy_from_user_mq_attr(&posix_mq_attr, arg4) != 0) {
12340                     return -TARGET_EFAULT;
12341                 }
12342                 pposix_mq_attr = &posix_mq_attr;
12343             }
12344             p = lock_user_string(arg1 - 1);
12345             if (!p) {
12346                 return -TARGET_EFAULT;
12347             }
12348             ret = get_errno(mq_open(p, host_flags, arg3, pposix_mq_attr));
12349             unlock_user (p, arg1, 0);
12350         }
12351         return ret;
12352 
12353     case TARGET_NR_mq_unlink:
12354         p = lock_user_string(arg1 - 1);
12355         if (!p) {
12356             return -TARGET_EFAULT;
12357         }
12358         ret = get_errno(mq_unlink(p));
12359         unlock_user (p, arg1, 0);
12360         return ret;
12361 
12362 #ifdef TARGET_NR_mq_timedsend
12363     case TARGET_NR_mq_timedsend:
12364         {
12365             struct timespec ts;
12366 
12367             p = lock_user (VERIFY_READ, arg2, arg3, 1);
12368             if (arg5 != 0) {
12369                 if (target_to_host_timespec(&ts, arg5)) {
12370                     return -TARGET_EFAULT;
12371                 }
12372                 ret = get_errno(safe_mq_timedsend(arg1, p, arg3, arg4, &ts));
12373                 if (!is_error(ret) && host_to_target_timespec(arg5, &ts)) {
12374                     return -TARGET_EFAULT;
12375                 }
12376             } else {
12377                 ret = get_errno(safe_mq_timedsend(arg1, p, arg3, arg4, NULL));
12378             }
12379             unlock_user (p, arg2, arg3);
12380         }
12381         return ret;
12382 #endif
12383 #ifdef TARGET_NR_mq_timedsend_time64
12384     case TARGET_NR_mq_timedsend_time64:
12385         {
12386             struct timespec ts;
12387 
12388             p = lock_user(VERIFY_READ, arg2, arg3, 1);
12389             if (arg5 != 0) {
12390                 if (target_to_host_timespec64(&ts, arg5)) {
12391                     return -TARGET_EFAULT;
12392                 }
12393                 ret = get_errno(safe_mq_timedsend(arg1, p, arg3, arg4, &ts));
12394                 if (!is_error(ret) && host_to_target_timespec64(arg5, &ts)) {
12395                     return -TARGET_EFAULT;
12396                 }
12397             } else {
12398                 ret = get_errno(safe_mq_timedsend(arg1, p, arg3, arg4, NULL));
12399             }
12400             unlock_user(p, arg2, arg3);
12401         }
12402         return ret;
12403 #endif
12404 
12405 #ifdef TARGET_NR_mq_timedreceive
12406     case TARGET_NR_mq_timedreceive:
12407         {
12408             struct timespec ts;
12409             unsigned int prio;
12410 
12411             p = lock_user (VERIFY_READ, arg2, arg3, 1);
12412             if (arg5 != 0) {
12413                 if (target_to_host_timespec(&ts, arg5)) {
12414                     return -TARGET_EFAULT;
12415                 }
12416                 ret = get_errno(safe_mq_timedreceive(arg1, p, arg3,
12417                                                      &prio, &ts));
12418                 if (!is_error(ret) && host_to_target_timespec(arg5, &ts)) {
12419                     return -TARGET_EFAULT;
12420                 }
12421             } else {
12422                 ret = get_errno(safe_mq_timedreceive(arg1, p, arg3,
12423                                                      &prio, NULL));
12424             }
12425             unlock_user (p, arg2, arg3);
12426             if (arg4 != 0)
12427                 put_user_u32(prio, arg4);
12428         }
12429         return ret;
12430 #endif
12431 #ifdef TARGET_NR_mq_timedreceive_time64
12432     case TARGET_NR_mq_timedreceive_time64:
12433         {
12434             struct timespec ts;
12435             unsigned int prio;
12436 
12437             p = lock_user(VERIFY_READ, arg2, arg3, 1);
12438             if (arg5 != 0) {
12439                 if (target_to_host_timespec64(&ts, arg5)) {
12440                     return -TARGET_EFAULT;
12441                 }
12442                 ret = get_errno(safe_mq_timedreceive(arg1, p, arg3,
12443                                                      &prio, &ts));
12444                 if (!is_error(ret) && host_to_target_timespec64(arg5, &ts)) {
12445                     return -TARGET_EFAULT;
12446                 }
12447             } else {
12448                 ret = get_errno(safe_mq_timedreceive(arg1, p, arg3,
12449                                                      &prio, NULL));
12450             }
12451             unlock_user(p, arg2, arg3);
12452             if (arg4 != 0) {
12453                 put_user_u32(prio, arg4);
12454             }
12455         }
12456         return ret;
12457 #endif
12458 
12459     /* Not implemented for now... */
12460 /*     case TARGET_NR_mq_notify: */
12461 /*         break; */
12462 
12463     case TARGET_NR_mq_getsetattr:
12464         {
12465             struct mq_attr posix_mq_attr_in, posix_mq_attr_out;
12466             ret = 0;
12467             if (arg2 != 0) {
12468                 copy_from_user_mq_attr(&posix_mq_attr_in, arg2);
12469                 ret = get_errno(mq_setattr(arg1, &posix_mq_attr_in,
12470                                            &posix_mq_attr_out));
12471             } else if (arg3 != 0) {
12472                 ret = get_errno(mq_getattr(arg1, &posix_mq_attr_out));
12473             }
12474             if (ret == 0 && arg3 != 0) {
12475                 copy_to_user_mq_attr(arg3, &posix_mq_attr_out);
12476             }
12477         }
12478         return ret;
12479 #endif
12480 
12481 #ifdef CONFIG_SPLICE
12482 #ifdef TARGET_NR_tee
12483     case TARGET_NR_tee:
12484         {
12485             ret = get_errno(tee(arg1,arg2,arg3,arg4));
12486         }
12487         return ret;
12488 #endif
12489 #ifdef TARGET_NR_splice
12490     case TARGET_NR_splice:
12491         {
12492             loff_t loff_in, loff_out;
12493             loff_t *ploff_in = NULL, *ploff_out = NULL;
12494             if (arg2) {
12495                 if (get_user_u64(loff_in, arg2)) {
12496                     return -TARGET_EFAULT;
12497                 }
12498                 ploff_in = &loff_in;
12499             }
12500             if (arg4) {
12501                 if (get_user_u64(loff_out, arg4)) {
12502                     return -TARGET_EFAULT;
12503                 }
12504                 ploff_out = &loff_out;
12505             }
12506             ret = get_errno(splice(arg1, ploff_in, arg3, ploff_out, arg5, arg6));
12507             if (arg2) {
12508                 if (put_user_u64(loff_in, arg2)) {
12509                     return -TARGET_EFAULT;
12510                 }
12511             }
12512             if (arg4) {
12513                 if (put_user_u64(loff_out, arg4)) {
12514                     return -TARGET_EFAULT;
12515                 }
12516             }
12517         }
12518         return ret;
12519 #endif
12520 #ifdef TARGET_NR_vmsplice
12521 	case TARGET_NR_vmsplice:
12522         {
12523             struct iovec *vec = lock_iovec(VERIFY_READ, arg2, arg3, 1);
12524             if (vec != NULL) {
12525                 ret = get_errno(vmsplice(arg1, vec, arg3, arg4));
12526                 unlock_iovec(vec, arg2, arg3, 0);
12527             } else {
12528                 ret = -host_to_target_errno(errno);
12529             }
12530         }
12531         return ret;
12532 #endif
12533 #endif /* CONFIG_SPLICE */
12534 #ifdef CONFIG_EVENTFD
12535 #if defined(TARGET_NR_eventfd)
12536     case TARGET_NR_eventfd:
12537         ret = get_errno(eventfd(arg1, 0));
12538         if (ret >= 0) {
12539             fd_trans_register(ret, &target_eventfd_trans);
12540         }
12541         return ret;
12542 #endif
12543 #if defined(TARGET_NR_eventfd2)
12544     case TARGET_NR_eventfd2:
12545     {
12546         int host_flags = arg2 & (~(TARGET_O_NONBLOCK_MASK | TARGET_O_CLOEXEC));
12547         if (arg2 & TARGET_O_NONBLOCK) {
12548             host_flags |= O_NONBLOCK;
12549         }
12550         if (arg2 & TARGET_O_CLOEXEC) {
12551             host_flags |= O_CLOEXEC;
12552         }
12553         ret = get_errno(eventfd(arg1, host_flags));
12554         if (ret >= 0) {
12555             fd_trans_register(ret, &target_eventfd_trans);
12556         }
12557         return ret;
12558     }
12559 #endif
12560 #endif /* CONFIG_EVENTFD  */
12561 #if defined(CONFIG_FALLOCATE) && defined(TARGET_NR_fallocate)
12562     case TARGET_NR_fallocate:
12563 #if TARGET_ABI_BITS == 32
12564         ret = get_errno(fallocate(arg1, arg2, target_offset64(arg3, arg4),
12565                                   target_offset64(arg5, arg6)));
12566 #else
12567         ret = get_errno(fallocate(arg1, arg2, arg3, arg4));
12568 #endif
12569         return ret;
12570 #endif
12571 #if defined(CONFIG_SYNC_FILE_RANGE)
12572 #if defined(TARGET_NR_sync_file_range)
12573     case TARGET_NR_sync_file_range:
12574 #if TARGET_ABI_BITS == 32
12575 #if defined(TARGET_MIPS)
12576         ret = get_errno(sync_file_range(arg1, target_offset64(arg3, arg4),
12577                                         target_offset64(arg5, arg6), arg7));
12578 #else
12579         ret = get_errno(sync_file_range(arg1, target_offset64(arg2, arg3),
12580                                         target_offset64(arg4, arg5), arg6));
12581 #endif /* !TARGET_MIPS */
12582 #else
12583         ret = get_errno(sync_file_range(arg1, arg2, arg3, arg4));
12584 #endif
12585         return ret;
12586 #endif
12587 #if defined(TARGET_NR_sync_file_range2) || \
12588     defined(TARGET_NR_arm_sync_file_range)
12589 #if defined(TARGET_NR_sync_file_range2)
12590     case TARGET_NR_sync_file_range2:
12591 #endif
12592 #if defined(TARGET_NR_arm_sync_file_range)
12593     case TARGET_NR_arm_sync_file_range:
12594 #endif
12595         /* This is like sync_file_range but the arguments are reordered */
12596 #if TARGET_ABI_BITS == 32
12597         ret = get_errno(sync_file_range(arg1, target_offset64(arg3, arg4),
12598                                         target_offset64(arg5, arg6), arg2));
12599 #else
12600         ret = get_errno(sync_file_range(arg1, arg3, arg4, arg2));
12601 #endif
12602         return ret;
12603 #endif
12604 #endif
12605 #if defined(TARGET_NR_signalfd4)
12606     case TARGET_NR_signalfd4:
12607         return do_signalfd4(arg1, arg2, arg4);
12608 #endif
12609 #if defined(TARGET_NR_signalfd)
12610     case TARGET_NR_signalfd:
12611         return do_signalfd4(arg1, arg2, 0);
12612 #endif
12613 #if defined(CONFIG_EPOLL)
12614 #if defined(TARGET_NR_epoll_create)
12615     case TARGET_NR_epoll_create:
12616         return get_errno(epoll_create(arg1));
12617 #endif
12618 #if defined(TARGET_NR_epoll_create1) && defined(CONFIG_EPOLL_CREATE1)
12619     case TARGET_NR_epoll_create1:
12620         return get_errno(epoll_create1(target_to_host_bitmask(arg1, fcntl_flags_tbl)));
12621 #endif
12622 #if defined(TARGET_NR_epoll_ctl)
12623     case TARGET_NR_epoll_ctl:
12624     {
12625         struct epoll_event ep;
12626         struct epoll_event *epp = 0;
12627         if (arg4) {
12628             if (arg2 != EPOLL_CTL_DEL) {
12629                 struct target_epoll_event *target_ep;
12630                 if (!lock_user_struct(VERIFY_READ, target_ep, arg4, 1)) {
12631                     return -TARGET_EFAULT;
12632                 }
12633                 ep.events = tswap32(target_ep->events);
12634                 /*
12635                  * The epoll_data_t union is just opaque data to the kernel,
12636                  * so we transfer all 64 bits across and need not worry what
12637                  * actual data type it is.
12638                  */
12639                 ep.data.u64 = tswap64(target_ep->data.u64);
12640                 unlock_user_struct(target_ep, arg4, 0);
12641             }
12642             /*
12643              * before kernel 2.6.9, EPOLL_CTL_DEL operation required a
12644              * non-null pointer, even though this argument is ignored.
12645              *
12646              */
12647             epp = &ep;
12648         }
12649         return get_errno(epoll_ctl(arg1, arg2, arg3, epp));
12650     }
12651 #endif
12652 
12653 #if defined(TARGET_NR_epoll_wait) || defined(TARGET_NR_epoll_pwait)
12654 #if defined(TARGET_NR_epoll_wait)
12655     case TARGET_NR_epoll_wait:
12656 #endif
12657 #if defined(TARGET_NR_epoll_pwait)
12658     case TARGET_NR_epoll_pwait:
12659 #endif
12660     {
12661         struct target_epoll_event *target_ep;
12662         struct epoll_event *ep;
12663         int epfd = arg1;
12664         int maxevents = arg3;
12665         int timeout = arg4;
12666 
12667         if (maxevents <= 0 || maxevents > TARGET_EP_MAX_EVENTS) {
12668             return -TARGET_EINVAL;
12669         }
12670 
12671         target_ep = lock_user(VERIFY_WRITE, arg2,
12672                               maxevents * sizeof(struct target_epoll_event), 1);
12673         if (!target_ep) {
12674             return -TARGET_EFAULT;
12675         }
12676 
12677         ep = g_try_new(struct epoll_event, maxevents);
12678         if (!ep) {
12679             unlock_user(target_ep, arg2, 0);
12680             return -TARGET_ENOMEM;
12681         }
12682 
12683         switch (num) {
12684 #if defined(TARGET_NR_epoll_pwait)
12685         case TARGET_NR_epoll_pwait:
12686         {
12687             sigset_t *set = NULL;
12688 
12689             if (arg5) {
12690                 ret = process_sigsuspend_mask(&set, arg5, arg6);
12691                 if (ret != 0) {
12692                     break;
12693                 }
12694             }
12695 
12696             ret = get_errno(safe_epoll_pwait(epfd, ep, maxevents, timeout,
12697                                              set, SIGSET_T_SIZE));
12698 
12699             if (set) {
12700                 finish_sigsuspend_mask(ret);
12701             }
12702             break;
12703         }
12704 #endif
12705 #if defined(TARGET_NR_epoll_wait)
12706         case TARGET_NR_epoll_wait:
12707             ret = get_errno(safe_epoll_pwait(epfd, ep, maxevents, timeout,
12708                                              NULL, 0));
12709             break;
12710 #endif
12711         default:
12712             ret = -TARGET_ENOSYS;
12713         }
12714         if (!is_error(ret)) {
12715             int i;
12716             for (i = 0; i < ret; i++) {
12717                 target_ep[i].events = tswap32(ep[i].events);
12718                 target_ep[i].data.u64 = tswap64(ep[i].data.u64);
12719             }
12720             unlock_user(target_ep, arg2,
12721                         ret * sizeof(struct target_epoll_event));
12722         } else {
12723             unlock_user(target_ep, arg2, 0);
12724         }
12725         g_free(ep);
12726         return ret;
12727     }
12728 #endif
12729 #endif
12730 #ifdef TARGET_NR_prlimit64
12731     case TARGET_NR_prlimit64:
12732     {
12733         /* args: pid, resource number, ptr to new rlimit, ptr to old rlimit */
12734         struct target_rlimit64 *target_rnew, *target_rold;
12735         struct host_rlimit64 rnew, rold, *rnewp = 0;
12736         int resource = target_to_host_resource(arg2);
12737 
12738         if (arg3 && (resource != RLIMIT_AS &&
12739                      resource != RLIMIT_DATA &&
12740                      resource != RLIMIT_STACK)) {
12741             if (!lock_user_struct(VERIFY_READ, target_rnew, arg3, 1)) {
12742                 return -TARGET_EFAULT;
12743             }
12744             rnew.rlim_cur = tswap64(target_rnew->rlim_cur);
12745             rnew.rlim_max = tswap64(target_rnew->rlim_max);
12746             unlock_user_struct(target_rnew, arg3, 0);
12747             rnewp = &rnew;
12748         }
12749 
12750         ret = get_errno(sys_prlimit64(arg1, resource, rnewp, arg4 ? &rold : 0));
12751         if (!is_error(ret) && arg4) {
12752             if (!lock_user_struct(VERIFY_WRITE, target_rold, arg4, 1)) {
12753                 return -TARGET_EFAULT;
12754             }
12755             target_rold->rlim_cur = tswap64(rold.rlim_cur);
12756             target_rold->rlim_max = tswap64(rold.rlim_max);
12757             unlock_user_struct(target_rold, arg4, 1);
12758         }
12759         return ret;
12760     }
12761 #endif
12762 #ifdef TARGET_NR_gethostname
12763     case TARGET_NR_gethostname:
12764     {
12765         char *name = lock_user(VERIFY_WRITE, arg1, arg2, 0);
12766         if (name) {
12767             ret = get_errno(gethostname(name, arg2));
12768             unlock_user(name, arg1, arg2);
12769         } else {
12770             ret = -TARGET_EFAULT;
12771         }
12772         return ret;
12773     }
12774 #endif
12775 #ifdef TARGET_NR_atomic_cmpxchg_32
12776     case TARGET_NR_atomic_cmpxchg_32:
12777     {
12778         /* should use start_exclusive from main.c */
12779         abi_ulong mem_value;
12780         if (get_user_u32(mem_value, arg6)) {
12781             target_siginfo_t info;
12782             info.si_signo = SIGSEGV;
12783             info.si_errno = 0;
12784             info.si_code = TARGET_SEGV_MAPERR;
12785             info._sifields._sigfault._addr = arg6;
12786             queue_signal(cpu_env, info.si_signo, QEMU_SI_FAULT, &info);
12787             ret = 0xdeadbeef;
12788 
12789         }
12790         if (mem_value == arg2)
12791             put_user_u32(arg1, arg6);
12792         return mem_value;
12793     }
12794 #endif
12795 #ifdef TARGET_NR_atomic_barrier
12796     case TARGET_NR_atomic_barrier:
12797         /* Like the kernel implementation and the
12798            qemu arm barrier, no-op this? */
12799         return 0;
12800 #endif
12801 
12802 #ifdef TARGET_NR_timer_create
12803     case TARGET_NR_timer_create:
12804     {
12805         /* args: clockid_t clockid, struct sigevent *sevp, timer_t *timerid */
12806 
12807         struct sigevent host_sevp = { {0}, }, *phost_sevp = NULL;
12808 
12809         int clkid = arg1;
12810         int timer_index = next_free_host_timer();
12811 
12812         if (timer_index < 0) {
12813             ret = -TARGET_EAGAIN;
12814         } else {
12815             timer_t *phtimer = g_posix_timers  + timer_index;
12816 
12817             if (arg2) {
12818                 phost_sevp = &host_sevp;
12819                 ret = target_to_host_sigevent(phost_sevp, arg2);
12820                 if (ret != 0) {
12821                     return ret;
12822                 }
12823             }
12824 
12825             ret = get_errno(timer_create(clkid, phost_sevp, phtimer));
12826             if (ret) {
12827                 phtimer = NULL;
12828             } else {
12829                 if (put_user(TIMER_MAGIC | timer_index, arg3, target_timer_t)) {
12830                     return -TARGET_EFAULT;
12831                 }
12832             }
12833         }
12834         return ret;
12835     }
12836 #endif
12837 
12838 #ifdef TARGET_NR_timer_settime
12839     case TARGET_NR_timer_settime:
12840     {
12841         /* args: timer_t timerid, int flags, const struct itimerspec *new_value,
12842          * struct itimerspec * old_value */
12843         target_timer_t timerid = get_timer_id(arg1);
12844 
12845         if (timerid < 0) {
12846             ret = timerid;
12847         } else if (arg3 == 0) {
12848             ret = -TARGET_EINVAL;
12849         } else {
12850             timer_t htimer = g_posix_timers[timerid];
12851             struct itimerspec hspec_new = {{0},}, hspec_old = {{0},};
12852 
12853             if (target_to_host_itimerspec(&hspec_new, arg3)) {
12854                 return -TARGET_EFAULT;
12855             }
12856             ret = get_errno(
12857                           timer_settime(htimer, arg2, &hspec_new, &hspec_old));
12858             if (arg4 && host_to_target_itimerspec(arg4, &hspec_old)) {
12859                 return -TARGET_EFAULT;
12860             }
12861         }
12862         return ret;
12863     }
12864 #endif
12865 
12866 #ifdef TARGET_NR_timer_settime64
12867     case TARGET_NR_timer_settime64:
12868     {
12869         target_timer_t timerid = get_timer_id(arg1);
12870 
12871         if (timerid < 0) {
12872             ret = timerid;
12873         } else if (arg3 == 0) {
12874             ret = -TARGET_EINVAL;
12875         } else {
12876             timer_t htimer = g_posix_timers[timerid];
12877             struct itimerspec hspec_new = {{0},}, hspec_old = {{0},};
12878 
12879             if (target_to_host_itimerspec64(&hspec_new, arg3)) {
12880                 return -TARGET_EFAULT;
12881             }
12882             ret = get_errno(
12883                           timer_settime(htimer, arg2, &hspec_new, &hspec_old));
12884             if (arg4 && host_to_target_itimerspec64(arg4, &hspec_old)) {
12885                 return -TARGET_EFAULT;
12886             }
12887         }
12888         return ret;
12889     }
12890 #endif
12891 
12892 #ifdef TARGET_NR_timer_gettime
12893     case TARGET_NR_timer_gettime:
12894     {
12895         /* args: timer_t timerid, struct itimerspec *curr_value */
12896         target_timer_t timerid = get_timer_id(arg1);
12897 
12898         if (timerid < 0) {
12899             ret = timerid;
12900         } else if (!arg2) {
12901             ret = -TARGET_EFAULT;
12902         } else {
12903             timer_t htimer = g_posix_timers[timerid];
12904             struct itimerspec hspec;
12905             ret = get_errno(timer_gettime(htimer, &hspec));
12906 
12907             if (host_to_target_itimerspec(arg2, &hspec)) {
12908                 ret = -TARGET_EFAULT;
12909             }
12910         }
12911         return ret;
12912     }
12913 #endif
12914 
12915 #ifdef TARGET_NR_timer_gettime64
12916     case TARGET_NR_timer_gettime64:
12917     {
12918         /* args: timer_t timerid, struct itimerspec64 *curr_value */
12919         target_timer_t timerid = get_timer_id(arg1);
12920 
12921         if (timerid < 0) {
12922             ret = timerid;
12923         } else if (!arg2) {
12924             ret = -TARGET_EFAULT;
12925         } else {
12926             timer_t htimer = g_posix_timers[timerid];
12927             struct itimerspec hspec;
12928             ret = get_errno(timer_gettime(htimer, &hspec));
12929 
12930             if (host_to_target_itimerspec64(arg2, &hspec)) {
12931                 ret = -TARGET_EFAULT;
12932             }
12933         }
12934         return ret;
12935     }
12936 #endif
12937 
12938 #ifdef TARGET_NR_timer_getoverrun
12939     case TARGET_NR_timer_getoverrun:
12940     {
12941         /* args: timer_t timerid */
12942         target_timer_t timerid = get_timer_id(arg1);
12943 
12944         if (timerid < 0) {
12945             ret = timerid;
12946         } else {
12947             timer_t htimer = g_posix_timers[timerid];
12948             ret = get_errno(timer_getoverrun(htimer));
12949         }
12950         return ret;
12951     }
12952 #endif
12953 
12954 #ifdef TARGET_NR_timer_delete
12955     case TARGET_NR_timer_delete:
12956     {
12957         /* args: timer_t timerid */
12958         target_timer_t timerid = get_timer_id(arg1);
12959 
12960         if (timerid < 0) {
12961             ret = timerid;
12962         } else {
12963             timer_t htimer = g_posix_timers[timerid];
12964             ret = get_errno(timer_delete(htimer));
12965             g_posix_timers[timerid] = 0;
12966         }
12967         return ret;
12968     }
12969 #endif
12970 
12971 #if defined(TARGET_NR_timerfd_create) && defined(CONFIG_TIMERFD)
12972     case TARGET_NR_timerfd_create:
12973         return get_errno(timerfd_create(arg1,
12974                           target_to_host_bitmask(arg2, fcntl_flags_tbl)));
12975 #endif
12976 
12977 #if defined(TARGET_NR_timerfd_gettime) && defined(CONFIG_TIMERFD)
12978     case TARGET_NR_timerfd_gettime:
12979         {
12980             struct itimerspec its_curr;
12981 
12982             ret = get_errno(timerfd_gettime(arg1, &its_curr));
12983 
12984             if (arg2 && host_to_target_itimerspec(arg2, &its_curr)) {
12985                 return -TARGET_EFAULT;
12986             }
12987         }
12988         return ret;
12989 #endif
12990 
12991 #if defined(TARGET_NR_timerfd_gettime64) && defined(CONFIG_TIMERFD)
12992     case TARGET_NR_timerfd_gettime64:
12993         {
12994             struct itimerspec its_curr;
12995 
12996             ret = get_errno(timerfd_gettime(arg1, &its_curr));
12997 
12998             if (arg2 && host_to_target_itimerspec64(arg2, &its_curr)) {
12999                 return -TARGET_EFAULT;
13000             }
13001         }
13002         return ret;
13003 #endif
13004 
13005 #if defined(TARGET_NR_timerfd_settime) && defined(CONFIG_TIMERFD)
13006     case TARGET_NR_timerfd_settime:
13007         {
13008             struct itimerspec its_new, its_old, *p_new;
13009 
13010             if (arg3) {
13011                 if (target_to_host_itimerspec(&its_new, arg3)) {
13012                     return -TARGET_EFAULT;
13013                 }
13014                 p_new = &its_new;
13015             } else {
13016                 p_new = NULL;
13017             }
13018 
13019             ret = get_errno(timerfd_settime(arg1, arg2, p_new, &its_old));
13020 
13021             if (arg4 && host_to_target_itimerspec(arg4, &its_old)) {
13022                 return -TARGET_EFAULT;
13023             }
13024         }
13025         return ret;
13026 #endif
13027 
13028 #if defined(TARGET_NR_timerfd_settime64) && defined(CONFIG_TIMERFD)
13029     case TARGET_NR_timerfd_settime64:
13030         {
13031             struct itimerspec its_new, its_old, *p_new;
13032 
13033             if (arg3) {
13034                 if (target_to_host_itimerspec64(&its_new, arg3)) {
13035                     return -TARGET_EFAULT;
13036                 }
13037                 p_new = &its_new;
13038             } else {
13039                 p_new = NULL;
13040             }
13041 
13042             ret = get_errno(timerfd_settime(arg1, arg2, p_new, &its_old));
13043 
13044             if (arg4 && host_to_target_itimerspec64(arg4, &its_old)) {
13045                 return -TARGET_EFAULT;
13046             }
13047         }
13048         return ret;
13049 #endif
13050 
13051 #if defined(TARGET_NR_ioprio_get) && defined(__NR_ioprio_get)
13052     case TARGET_NR_ioprio_get:
13053         return get_errno(ioprio_get(arg1, arg2));
13054 #endif
13055 
13056 #if defined(TARGET_NR_ioprio_set) && defined(__NR_ioprio_set)
13057     case TARGET_NR_ioprio_set:
13058         return get_errno(ioprio_set(arg1, arg2, arg3));
13059 #endif
13060 
13061 #if defined(TARGET_NR_setns) && defined(CONFIG_SETNS)
13062     case TARGET_NR_setns:
13063         return get_errno(setns(arg1, arg2));
13064 #endif
13065 #if defined(TARGET_NR_unshare) && defined(CONFIG_SETNS)
13066     case TARGET_NR_unshare:
13067         return get_errno(unshare(arg1));
13068 #endif
13069 #if defined(TARGET_NR_kcmp) && defined(__NR_kcmp)
13070     case TARGET_NR_kcmp:
13071         return get_errno(kcmp(arg1, arg2, arg3, arg4, arg5));
13072 #endif
13073 #ifdef TARGET_NR_swapcontext
13074     case TARGET_NR_swapcontext:
13075         /* PowerPC specific.  */
13076         return do_swapcontext(cpu_env, arg1, arg2, arg3);
13077 #endif
13078 #ifdef TARGET_NR_memfd_create
13079     case TARGET_NR_memfd_create:
13080         p = lock_user_string(arg1);
13081         if (!p) {
13082             return -TARGET_EFAULT;
13083         }
13084         ret = get_errno(memfd_create(p, arg2));
13085         fd_trans_unregister(ret);
13086         unlock_user(p, arg1, 0);
13087         return ret;
13088 #endif
13089 #if defined TARGET_NR_membarrier && defined __NR_membarrier
13090     case TARGET_NR_membarrier:
13091         return get_errno(membarrier(arg1, arg2));
13092 #endif
13093 
13094 #if defined(TARGET_NR_copy_file_range) && defined(__NR_copy_file_range)
13095     case TARGET_NR_copy_file_range:
13096         {
13097             loff_t inoff, outoff;
13098             loff_t *pinoff = NULL, *poutoff = NULL;
13099 
13100             if (arg2) {
13101                 if (get_user_u64(inoff, arg2)) {
13102                     return -TARGET_EFAULT;
13103                 }
13104                 pinoff = &inoff;
13105             }
13106             if (arg4) {
13107                 if (get_user_u64(outoff, arg4)) {
13108                     return -TARGET_EFAULT;
13109                 }
13110                 poutoff = &outoff;
13111             }
13112             /* Do not sign-extend the count parameter. */
13113             ret = get_errno(safe_copy_file_range(arg1, pinoff, arg3, poutoff,
13114                                                  (abi_ulong)arg5, arg6));
13115             if (!is_error(ret) && ret > 0) {
13116                 if (arg2) {
13117                     if (put_user_u64(inoff, arg2)) {
13118                         return -TARGET_EFAULT;
13119                     }
13120                 }
13121                 if (arg4) {
13122                     if (put_user_u64(outoff, arg4)) {
13123                         return -TARGET_EFAULT;
13124                     }
13125                 }
13126             }
13127         }
13128         return ret;
13129 #endif
13130 
13131 #if defined(TARGET_NR_pivot_root)
13132     case TARGET_NR_pivot_root:
13133         {
13134             void *p2;
13135             p = lock_user_string(arg1); /* new_root */
13136             p2 = lock_user_string(arg2); /* put_old */
13137             if (!p || !p2) {
13138                 ret = -TARGET_EFAULT;
13139             } else {
13140                 ret = get_errno(pivot_root(p, p2));
13141             }
13142             unlock_user(p2, arg2, 0);
13143             unlock_user(p, arg1, 0);
13144         }
13145         return ret;
13146 #endif
13147 
13148     default:
13149         qemu_log_mask(LOG_UNIMP, "Unsupported syscall: %d\n", num);
13150         return -TARGET_ENOSYS;
13151     }
13152     return ret;
13153 }
13154 
13155 abi_long do_syscall(CPUArchState *cpu_env, int num, abi_long arg1,
13156                     abi_long arg2, abi_long arg3, abi_long arg4,
13157                     abi_long arg5, abi_long arg6, abi_long arg7,
13158                     abi_long arg8)
13159 {
13160     CPUState *cpu = env_cpu(cpu_env);
13161     abi_long ret;
13162 
13163 #ifdef DEBUG_ERESTARTSYS
13164     /* Debug-only code for exercising the syscall-restart code paths
13165      * in the per-architecture cpu main loops: restart every syscall
13166      * the guest makes once before letting it through.
13167      */
13168     {
13169         static bool flag;
13170         flag = !flag;
13171         if (flag) {
13172             return -QEMU_ERESTARTSYS;
13173         }
13174     }
13175 #endif
13176 
13177     record_syscall_start(cpu, num, arg1,
13178                          arg2, arg3, arg4, arg5, arg6, arg7, arg8);
13179 
13180     if (unlikely(qemu_loglevel_mask(LOG_STRACE))) {
13181         print_syscall(cpu_env, num, arg1, arg2, arg3, arg4, arg5, arg6);
13182     }
13183 
13184     ret = do_syscall1(cpu_env, num, arg1, arg2, arg3, arg4,
13185                       arg5, arg6, arg7, arg8);
13186 
13187     if (unlikely(qemu_loglevel_mask(LOG_STRACE))) {
13188         print_syscall_ret(cpu_env, num, ret, arg1, arg2,
13189                           arg3, arg4, arg5, arg6);
13190     }
13191 
13192     record_syscall_return(cpu, num, ret);
13193     return ret;
13194 }
13195