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