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