1 /*- 2 * SPDX-License-Identifier: BSD-2-Clause 3 * 4 * Copyright (c) 1994-1995 Søren Schmidt 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 26 * SUCH DAMAGE. 27 */ 28 29 #include <sys/param.h> 30 #include <sys/systm.h> 31 #include <sys/dirent.h> 32 #include <sys/fcntl.h> 33 #include <sys/file.h> 34 #include <sys/filedesc.h> 35 #include <sys/lock.h> 36 #include <sys/mman.h> 37 #include <sys/selinfo.h> 38 #include <sys/pipe.h> 39 #include <sys/proc.h> 40 #include <sys/stat.h> 41 #include <sys/sx.h> 42 #include <sys/syscallsubr.h> 43 #include <sys/sysproto.h> 44 #include <sys/tty.h> 45 #include <sys/unistd.h> 46 #include <sys/vnode.h> 47 48 #ifdef COMPAT_LINUX32 49 #include <compat/freebsd32/freebsd32_misc.h> 50 #include <compat/freebsd32/freebsd32_util.h> 51 #include <machine/../linux32/linux.h> 52 #include <machine/../linux32/linux32_proto.h> 53 #else 54 #include <machine/../linux/linux.h> 55 #include <machine/../linux/linux_proto.h> 56 #endif 57 #include <compat/linux/linux_misc.h> 58 #include <compat/linux/linux_util.h> 59 #include <compat/linux/linux_file.h> 60 61 static int linux_common_open(struct thread *, int, const char *, int, int, 62 enum uio_seg); 63 static int linux_do_accessat(struct thread *t, int, const char *, int, int); 64 static int linux_getdents_error(struct thread *, int, int); 65 66 static struct bsd_to_linux_bitmap seal_bitmap[] = { 67 BITMAP_1t1_LINUX(F_SEAL_SEAL), 68 BITMAP_1t1_LINUX(F_SEAL_SHRINK), 69 BITMAP_1t1_LINUX(F_SEAL_GROW), 70 BITMAP_1t1_LINUX(F_SEAL_WRITE), 71 }; 72 73 #define MFD_HUGETLB_ENTRY(_size) \ 74 { \ 75 .bsd_value = MFD_HUGE_##_size, \ 76 .linux_value = LINUX_HUGETLB_FLAG_ENCODE_##_size \ 77 } 78 static struct bsd_to_linux_bitmap mfd_bitmap[] = { 79 BITMAP_1t1_LINUX(MFD_CLOEXEC), 80 BITMAP_1t1_LINUX(MFD_ALLOW_SEALING), 81 BITMAP_1t1_LINUX(MFD_HUGETLB), 82 MFD_HUGETLB_ENTRY(64KB), 83 MFD_HUGETLB_ENTRY(512KB), 84 MFD_HUGETLB_ENTRY(1MB), 85 MFD_HUGETLB_ENTRY(2MB), 86 MFD_HUGETLB_ENTRY(8MB), 87 MFD_HUGETLB_ENTRY(16MB), 88 MFD_HUGETLB_ENTRY(32MB), 89 MFD_HUGETLB_ENTRY(256MB), 90 MFD_HUGETLB_ENTRY(512MB), 91 MFD_HUGETLB_ENTRY(1GB), 92 MFD_HUGETLB_ENTRY(2GB), 93 MFD_HUGETLB_ENTRY(16GB), 94 }; 95 #undef MFD_HUGETLB_ENTRY 96 97 #ifdef LINUX_LEGACY_SYSCALLS 98 int 99 linux_creat(struct thread *td, struct linux_creat_args *args) 100 { 101 102 return (kern_openat(td, AT_FDCWD, args->path, UIO_USERSPACE, 103 O_WRONLY | O_CREAT | O_TRUNC, args->mode)); 104 } 105 #endif 106 107 static int 108 linux_common_openflags(int l_flags) 109 { 110 int bsd_flags; 111 112 bsd_flags = 0; 113 switch (l_flags & LINUX_O_ACCMODE) { 114 case LINUX_O_WRONLY: 115 bsd_flags |= O_WRONLY; 116 break; 117 case LINUX_O_RDWR: 118 bsd_flags |= O_RDWR; 119 break; 120 default: 121 bsd_flags |= O_RDONLY; 122 } 123 if (l_flags & LINUX_O_NDELAY) 124 bsd_flags |= O_NONBLOCK; 125 if (l_flags & LINUX_O_APPEND) 126 bsd_flags |= O_APPEND; 127 if (l_flags & LINUX_O_SYNC) 128 bsd_flags |= O_FSYNC; 129 if (l_flags & LINUX_O_CLOEXEC) 130 bsd_flags |= O_CLOEXEC; 131 if (l_flags & LINUX_O_NONBLOCK) 132 bsd_flags |= O_NONBLOCK; 133 if (l_flags & LINUX_O_ASYNC) 134 bsd_flags |= O_ASYNC; 135 if (l_flags & LINUX_O_CREAT) 136 bsd_flags |= O_CREAT; 137 if (l_flags & LINUX_O_TRUNC) 138 bsd_flags |= O_TRUNC; 139 if (l_flags & LINUX_O_EXCL) 140 bsd_flags |= O_EXCL; 141 if (l_flags & LINUX_O_NOCTTY) 142 bsd_flags |= O_NOCTTY; 143 if (l_flags & LINUX_O_DIRECT) 144 bsd_flags |= O_DIRECT; 145 if (l_flags & LINUX_O_NOFOLLOW) 146 bsd_flags |= O_NOFOLLOW; 147 if (l_flags & LINUX_O_DIRECTORY) 148 bsd_flags |= O_DIRECTORY; 149 if (l_flags & LINUX_O_PATH) 150 bsd_flags |= O_PATH; 151 /* XXX LINUX_O_NOATIME: unable to be easily implemented. */ 152 return (bsd_flags); 153 } 154 155 static int 156 linux_common_open(struct thread *td, int dirfd, const char *path, int l_flags, 157 int mode, enum uio_seg seg) 158 { 159 struct proc *p = td->td_proc; 160 struct file *fp; 161 int fd; 162 int bsd_flags, error; 163 164 bsd_flags = linux_common_openflags(l_flags); 165 error = kern_openat(td, dirfd, path, seg, bsd_flags, mode); 166 if (error != 0) { 167 if (error == EMLINK) 168 error = ELOOP; 169 goto done; 170 } 171 if (p->p_flag & P_CONTROLT) 172 goto done; 173 if (bsd_flags & O_NOCTTY) 174 goto done; 175 176 /* 177 * XXX In between kern_openat() and fget(), another process 178 * having the same filedesc could use that fd without 179 * checking below. 180 */ 181 fd = td->td_retval[0]; 182 if (fget(td, fd, &cap_ioctl_rights, &fp) == 0) { 183 if (fp->f_type != DTYPE_VNODE) { 184 fdrop(fp, td); 185 goto done; 186 } 187 sx_slock(&proctree_lock); 188 PROC_LOCK(p); 189 if (SESS_LEADER(p) && !(p->p_flag & P_CONTROLT)) { 190 PROC_UNLOCK(p); 191 sx_sunlock(&proctree_lock); 192 /* XXXPJD: Verify if TIOCSCTTY is allowed. */ 193 (void) fo_ioctl(fp, TIOCSCTTY, (caddr_t) 0, 194 td->td_ucred, td); 195 } else { 196 PROC_UNLOCK(p); 197 sx_sunlock(&proctree_lock); 198 } 199 fdrop(fp, td); 200 } 201 202 done: 203 return (error); 204 } 205 206 int 207 linux_openat(struct thread *td, struct linux_openat_args *args) 208 { 209 int dfd; 210 211 dfd = (args->dfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->dfd; 212 return (linux_common_open(td, dfd, args->filename, args->flags, 213 args->mode, UIO_USERSPACE)); 214 } 215 216 #ifdef LINUX_LEGACY_SYSCALLS 217 int 218 linux_open(struct thread *td, struct linux_open_args *args) 219 { 220 221 return (linux_common_open(td, AT_FDCWD, args->path, args->flags, 222 args->mode, UIO_USERSPACE)); 223 } 224 #endif 225 226 int 227 linux_name_to_handle_at(struct thread *td, 228 struct linux_name_to_handle_at_args *args) 229 { 230 static const l_int valid_flags = (LINUX_AT_SYMLINK_FOLLOW | 231 LINUX_AT_EMPTY_PATH); 232 static const l_uint fh_size = sizeof(fhandle_t); 233 234 fhandle_t fh; 235 l_uint fh_bytes; 236 l_int mount_id; 237 int error, fd, bsd_flags; 238 239 if (args->flags & ~valid_flags) 240 return (EINVAL); 241 242 fd = args->dirfd; 243 if (fd == LINUX_AT_FDCWD) 244 fd = AT_FDCWD; 245 246 bsd_flags = 0; 247 if (!(args->flags & LINUX_AT_SYMLINK_FOLLOW)) 248 bsd_flags |= AT_SYMLINK_NOFOLLOW; 249 if ((args->flags & LINUX_AT_EMPTY_PATH) != 0) 250 bsd_flags |= AT_EMPTY_PATH; 251 252 error = kern_getfhat(td, bsd_flags, fd, args->name, 253 UIO_USERSPACE, &fh, UIO_SYSSPACE); 254 if (error != 0) 255 return (error); 256 257 /* Emit mount_id -- required before EOVERFLOW case. */ 258 mount_id = (fh.fh_fsid.val[0] ^ fh.fh_fsid.val[1]); 259 error = copyout(&mount_id, args->mnt_id, sizeof(mount_id)); 260 if (error != 0) 261 return (error); 262 263 /* Check if there is room for handle. */ 264 error = copyin(&args->handle->handle_bytes, &fh_bytes, 265 sizeof(fh_bytes)); 266 if (error != 0) 267 return (error); 268 269 if (fh_bytes < fh_size) { 270 error = copyout(&fh_size, &args->handle->handle_bytes, 271 sizeof(fh_size)); 272 if (error == 0) 273 error = EOVERFLOW; 274 return (error); 275 } 276 277 /* Emit handle. */ 278 mount_id = 0; 279 /* 280 * We don't use handle_type for anything yet, but initialize a known 281 * value. 282 */ 283 error = copyout(&mount_id, &args->handle->handle_type, 284 sizeof(mount_id)); 285 if (error != 0) 286 return (error); 287 288 error = copyout(&fh, &args->handle->f_handle, 289 sizeof(fh)); 290 return (error); 291 } 292 293 int 294 linux_open_by_handle_at(struct thread *td, 295 struct linux_open_by_handle_at_args *args) 296 { 297 l_uint fh_bytes; 298 int bsd_flags, error; 299 300 error = copyin(&args->handle->handle_bytes, &fh_bytes, 301 sizeof(fh_bytes)); 302 if (error != 0) 303 return (error); 304 305 if (fh_bytes < sizeof(fhandle_t)) 306 return (EINVAL); 307 308 bsd_flags = linux_common_openflags(args->flags); 309 return (kern_fhopen(td, (void *)&args->handle->f_handle, bsd_flags)); 310 } 311 312 int 313 linux_lseek(struct thread *td, struct linux_lseek_args *args) 314 { 315 316 return (kern_lseek(td, args->fdes, args->off, args->whence)); 317 } 318 319 #if defined(__i386__) || (defined(__amd64__) && defined(COMPAT_LINUX32)) 320 int 321 linux_llseek(struct thread *td, struct linux_llseek_args *args) 322 { 323 int error; 324 off_t off; 325 326 off = (args->olow) | (((off_t) args->ohigh) << 32); 327 328 error = kern_lseek(td, args->fd, off, args->whence); 329 if (error != 0) 330 return (error); 331 332 error = copyout(td->td_retval, args->res, sizeof(off_t)); 333 if (error != 0) 334 return (error); 335 336 td->td_retval[0] = 0; 337 return (0); 338 } 339 #endif /* __i386__ || (__amd64__ && COMPAT_LINUX32) */ 340 341 /* 342 * Note that linux_getdents(2) and linux_getdents64(2) have the same 343 * arguments. They only differ in the definition of struct dirent they 344 * operate on. 345 * Note that linux_readdir(2) is a special case of linux_getdents(2) 346 * where count is always equals 1, meaning that the buffer is one 347 * dirent-structure in size and that the code can't handle more anyway. 348 * Note that linux_readdir(2) can't be implemented by means of linux_getdents(2) 349 * as in case when the *dent buffer size is equal to 1 linux_getdents(2) will 350 * trash user stack. 351 */ 352 353 static int 354 linux_getdents_error(struct thread *td, int fd, int err) 355 { 356 struct vnode *vp; 357 struct file *fp; 358 int error; 359 360 /* Linux return ENOTDIR in case when fd is not a directory. */ 361 error = getvnode(td, fd, &cap_read_rights, &fp); 362 if (error != 0) 363 return (error); 364 vp = fp->f_vnode; 365 if (vp->v_type != VDIR) { 366 fdrop(fp, td); 367 return (ENOTDIR); 368 } 369 fdrop(fp, td); 370 return (err); 371 } 372 373 struct l_dirent { 374 l_ulong d_ino; 375 l_off_t d_off; 376 l_ushort d_reclen; 377 char d_name[LINUX_NAME_MAX + 1]; 378 }; 379 380 struct l_dirent64 { 381 uint64_t d_ino; 382 int64_t d_off; 383 l_ushort d_reclen; 384 u_char d_type; 385 char d_name[LINUX_NAME_MAX + 1]; 386 }; 387 388 /* 389 * Linux uses the last byte in the dirent buffer to store d_type, 390 * at least glibc-2.7 requires it. That is why l_dirent is padded with 2 bytes. 391 */ 392 #define LINUX_RECLEN(namlen) \ 393 roundup(offsetof(struct l_dirent, d_name) + (namlen) + 2, sizeof(l_ulong)) 394 395 #define LINUX_RECLEN64(namlen) \ 396 roundup(offsetof(struct l_dirent64, d_name) + (namlen) + 1, \ 397 sizeof(uint64_t)) 398 399 #ifdef LINUX_LEGACY_SYSCALLS 400 int 401 linux_getdents(struct thread *td, struct linux_getdents_args *args) 402 { 403 struct dirent *bdp; 404 caddr_t inp, buf; /* BSD-format */ 405 int len, reclen; /* BSD-format */ 406 caddr_t outp; /* Linux-format */ 407 int resid, linuxreclen; /* Linux-format */ 408 caddr_t lbuf; /* Linux-format */ 409 off_t base; 410 struct l_dirent *linux_dirent; 411 int buflen, error; 412 size_t retval; 413 414 buflen = min(args->count, MAXBSIZE); 415 buf = malloc(buflen, M_LINUX, M_WAITOK); 416 417 error = kern_getdirentries(td, args->fd, buf, buflen, 418 &base, NULL, UIO_SYSSPACE); 419 if (error != 0) { 420 error = linux_getdents_error(td, args->fd, error); 421 goto out1; 422 } 423 424 lbuf = malloc(LINUX_RECLEN(LINUX_NAME_MAX), M_LINUX, M_WAITOK | M_ZERO); 425 426 len = td->td_retval[0]; 427 inp = buf; 428 outp = (caddr_t)args->dent; 429 resid = args->count; 430 retval = 0; 431 432 while (len > 0) { 433 bdp = (struct dirent *) inp; 434 reclen = bdp->d_reclen; 435 linuxreclen = LINUX_RECLEN(bdp->d_namlen); 436 /* 437 * No more space in the user supplied dirent buffer. 438 * Return EINVAL. 439 */ 440 if (resid < linuxreclen) { 441 error = EINVAL; 442 goto out; 443 } 444 445 linux_dirent = (struct l_dirent*)lbuf; 446 linux_dirent->d_ino = bdp->d_fileno; 447 linux_dirent->d_off = bdp->d_off; 448 linux_dirent->d_reclen = linuxreclen; 449 /* 450 * Copy d_type to last byte of l_dirent buffer 451 */ 452 lbuf[linuxreclen - 1] = bdp->d_type; 453 strlcpy(linux_dirent->d_name, bdp->d_name, 454 linuxreclen - offsetof(struct l_dirent, d_name)-1); 455 error = copyout(linux_dirent, outp, linuxreclen); 456 if (error != 0) 457 goto out; 458 459 inp += reclen; 460 base += reclen; 461 len -= reclen; 462 463 retval += linuxreclen; 464 outp += linuxreclen; 465 resid -= linuxreclen; 466 } 467 td->td_retval[0] = retval; 468 469 out: 470 free(lbuf, M_LINUX); 471 out1: 472 free(buf, M_LINUX); 473 return (error); 474 } 475 #endif 476 477 int 478 linux_getdents64(struct thread *td, struct linux_getdents64_args *args) 479 { 480 struct dirent *bdp; 481 caddr_t inp, buf; /* BSD-format */ 482 int len, reclen; /* BSD-format */ 483 caddr_t outp; /* Linux-format */ 484 int resid, linuxreclen; /* Linux-format */ 485 off_t base; 486 struct l_dirent64 *linux_dirent64; 487 int buflen, error; 488 size_t retval; 489 490 buflen = min(args->count, MAXBSIZE); 491 buf = malloc(buflen, M_LINUX, M_WAITOK); 492 493 error = kern_getdirentries(td, args->fd, buf, buflen, 494 &base, NULL, UIO_SYSSPACE); 495 if (error != 0) { 496 error = linux_getdents_error(td, args->fd, error); 497 goto out1; 498 } 499 500 linux_dirent64 = malloc(LINUX_RECLEN64(LINUX_NAME_MAX), M_LINUX, 501 M_WAITOK | M_ZERO); 502 503 len = td->td_retval[0]; 504 inp = buf; 505 outp = (caddr_t)args->dirent; 506 resid = args->count; 507 retval = 0; 508 509 while (len > 0) { 510 bdp = (struct dirent *) inp; 511 reclen = bdp->d_reclen; 512 linuxreclen = LINUX_RECLEN64(bdp->d_namlen); 513 /* 514 * No more space in the user supplied dirent buffer. 515 * Return EINVAL. 516 */ 517 if (resid < linuxreclen) { 518 error = EINVAL; 519 goto out; 520 } 521 522 linux_dirent64->d_ino = bdp->d_fileno; 523 linux_dirent64->d_off = bdp->d_off; 524 linux_dirent64->d_reclen = linuxreclen; 525 linux_dirent64->d_type = bdp->d_type; 526 strlcpy(linux_dirent64->d_name, bdp->d_name, 527 linuxreclen - offsetof(struct l_dirent64, d_name)); 528 error = copyout(linux_dirent64, outp, linuxreclen); 529 if (error != 0) 530 goto out; 531 532 inp += reclen; 533 base += reclen; 534 len -= reclen; 535 536 retval += linuxreclen; 537 outp += linuxreclen; 538 resid -= linuxreclen; 539 } 540 td->td_retval[0] = retval; 541 542 out: 543 free(linux_dirent64, M_LINUX); 544 out1: 545 free(buf, M_LINUX); 546 return (error); 547 } 548 549 #if defined(__i386__) || (defined(__amd64__) && defined(COMPAT_LINUX32)) 550 int 551 linux_readdir(struct thread *td, struct linux_readdir_args *args) 552 { 553 struct dirent *bdp; 554 caddr_t buf; /* BSD-format */ 555 int linuxreclen; /* Linux-format */ 556 off_t base; 557 struct l_dirent *linux_dirent; /* Linux-format */ 558 int buflen, error; 559 560 buflen = sizeof(*bdp); 561 buf = malloc(buflen, M_LINUX, M_WAITOK); 562 563 error = kern_getdirentries(td, args->fd, buf, buflen, 564 &base, NULL, UIO_SYSSPACE); 565 if (error != 0) { 566 error = linux_getdents_error(td, args->fd, error); 567 goto out; 568 } 569 if (td->td_retval[0] == 0) 570 goto out; 571 572 linux_dirent = malloc(LINUX_RECLEN(LINUX_NAME_MAX), M_LINUX, 573 M_WAITOK | M_ZERO); 574 575 bdp = (struct dirent *) buf; 576 linuxreclen = LINUX_RECLEN(bdp->d_namlen); 577 578 linux_dirent->d_ino = bdp->d_fileno; 579 linux_dirent->d_off = bdp->d_off; 580 linux_dirent->d_reclen = bdp->d_namlen; 581 strlcpy(linux_dirent->d_name, bdp->d_name, 582 linuxreclen - offsetof(struct l_dirent, d_name)); 583 error = copyout(linux_dirent, args->dent, linuxreclen); 584 if (error == 0) 585 td->td_retval[0] = linuxreclen; 586 587 free(linux_dirent, M_LINUX); 588 out: 589 free(buf, M_LINUX); 590 return (error); 591 } 592 #endif /* __i386__ || (__amd64__ && COMPAT_LINUX32) */ 593 594 /* 595 * These exist mainly for hooks for doing /compat/linux translation. 596 */ 597 598 #ifdef LINUX_LEGACY_SYSCALLS 599 int 600 linux_access(struct thread *td, struct linux_access_args *args) 601 { 602 603 /* Linux convention. */ 604 if (args->amode & ~(F_OK | X_OK | W_OK | R_OK)) 605 return (EINVAL); 606 607 return (kern_accessat(td, AT_FDCWD, args->path, UIO_USERSPACE, 0, 608 args->amode)); 609 } 610 #endif 611 612 static int 613 linux_do_accessat(struct thread *td, int ldfd, const char *filename, 614 int amode, int flags) 615 { 616 int dfd; 617 618 /* Linux convention. */ 619 if (amode & ~(F_OK | X_OK | W_OK | R_OK)) 620 return (EINVAL); 621 622 dfd = (ldfd == LINUX_AT_FDCWD) ? AT_FDCWD : ldfd; 623 return (kern_accessat(td, dfd, filename, UIO_USERSPACE, flags, amode)); 624 } 625 626 int 627 linux_faccessat(struct thread *td, struct linux_faccessat_args *args) 628 { 629 630 return (linux_do_accessat(td, args->dfd, args->filename, args->amode, 631 0)); 632 } 633 634 int 635 linux_faccessat2(struct thread *td, struct linux_faccessat2_args *args) 636 { 637 int flags, unsupported; 638 639 /* XXX. AT_SYMLINK_NOFOLLOW is not supported by kern_accessat */ 640 unsupported = args->flags & ~(LINUX_AT_EACCESS | LINUX_AT_EMPTY_PATH); 641 if (unsupported != 0) { 642 linux_msg(td, "faccessat2 unsupported flag 0x%x", unsupported); 643 return (EINVAL); 644 } 645 646 flags = (args->flags & LINUX_AT_EACCESS) == 0 ? 0 : 647 AT_EACCESS; 648 flags |= (args->flags & LINUX_AT_EMPTY_PATH) == 0 ? 0 : 649 AT_EMPTY_PATH; 650 return (linux_do_accessat(td, args->dfd, args->filename, args->amode, 651 flags)); 652 } 653 654 655 #ifdef LINUX_LEGACY_SYSCALLS 656 int 657 linux_unlink(struct thread *td, struct linux_unlink_args *args) 658 { 659 int error; 660 struct stat st; 661 662 error = kern_funlinkat(td, AT_FDCWD, args->path, FD_NONE, 663 UIO_USERSPACE, 0, 0); 664 if (error == EPERM) { 665 /* Introduce POSIX noncompliant behaviour of Linux */ 666 if (kern_statat(td, 0, AT_FDCWD, args->path, 667 UIO_USERSPACE, &st) == 0) { 668 if (S_ISDIR(st.st_mode)) 669 error = EISDIR; 670 } 671 } 672 673 return (error); 674 } 675 #endif 676 677 static int 678 linux_unlinkat_impl(struct thread *td, enum uio_seg pathseg, const char *path, 679 int dfd, struct linux_unlinkat_args *args) 680 { 681 struct stat st; 682 int error; 683 684 if (args->flag & LINUX_AT_REMOVEDIR) 685 error = kern_frmdirat(td, dfd, path, FD_NONE, pathseg, 0); 686 else 687 error = kern_funlinkat(td, dfd, path, FD_NONE, pathseg, 0, 0); 688 if (error == EPERM && !(args->flag & LINUX_AT_REMOVEDIR)) { 689 /* Introduce POSIX noncompliant behaviour of Linux */ 690 if (kern_statat(td, AT_SYMLINK_NOFOLLOW, dfd, path, 691 pathseg, &st) == 0 && S_ISDIR(st.st_mode)) 692 error = EISDIR; 693 } 694 return (error); 695 } 696 697 int 698 linux_unlinkat(struct thread *td, struct linux_unlinkat_args *args) 699 { 700 int dfd; 701 702 if (args->flag & ~LINUX_AT_REMOVEDIR) 703 return (EINVAL); 704 dfd = (args->dfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->dfd; 705 return (linux_unlinkat_impl(td, UIO_USERSPACE, args->pathname, 706 dfd, args)); 707 } 708 709 int 710 linux_chdir(struct thread *td, struct linux_chdir_args *args) 711 { 712 713 return (kern_chdir(td, args->path, UIO_USERSPACE)); 714 } 715 716 #ifdef LINUX_LEGACY_SYSCALLS 717 int 718 linux_chmod(struct thread *td, struct linux_chmod_args *args) 719 { 720 721 return (kern_fchmodat(td, AT_FDCWD, args->path, UIO_USERSPACE, 722 args->mode, 0)); 723 } 724 #endif 725 726 int 727 linux_fchmodat(struct thread *td, struct linux_fchmodat_args *args) 728 { 729 int dfd; 730 731 dfd = (args->dfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->dfd; 732 return (kern_fchmodat(td, dfd, args->filename, UIO_USERSPACE, 733 args->mode, 0)); 734 } 735 736 #ifdef LINUX_LEGACY_SYSCALLS 737 int 738 linux_mkdir(struct thread *td, struct linux_mkdir_args *args) 739 { 740 741 return (kern_mkdirat(td, AT_FDCWD, args->path, UIO_USERSPACE, args->mode)); 742 } 743 #endif 744 745 int 746 linux_mkdirat(struct thread *td, struct linux_mkdirat_args *args) 747 { 748 int dfd; 749 750 dfd = (args->dfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->dfd; 751 return (kern_mkdirat(td, dfd, args->pathname, UIO_USERSPACE, args->mode)); 752 } 753 754 #ifdef LINUX_LEGACY_SYSCALLS 755 int 756 linux_rmdir(struct thread *td, struct linux_rmdir_args *args) 757 { 758 759 return (kern_frmdirat(td, AT_FDCWD, args->path, FD_NONE, 760 UIO_USERSPACE, 0)); 761 } 762 763 int 764 linux_rename(struct thread *td, struct linux_rename_args *args) 765 { 766 767 return (kern_renameat(td, AT_FDCWD, args->from, AT_FDCWD, 768 args->to, UIO_USERSPACE)); 769 } 770 #endif 771 772 int 773 linux_renameat(struct thread *td, struct linux_renameat_args *args) 774 { 775 struct linux_renameat2_args renameat2_args = { 776 .olddfd = args->olddfd, 777 .oldname = args->oldname, 778 .newdfd = args->newdfd, 779 .newname = args->newname, 780 .flags = 0 781 }; 782 783 return (linux_renameat2(td, &renameat2_args)); 784 } 785 786 int 787 linux_renameat2(struct thread *td, struct linux_renameat2_args *args) 788 { 789 int olddfd, newdfd; 790 791 if (args->flags != 0) { 792 if (args->flags & ~(LINUX_RENAME_EXCHANGE | 793 LINUX_RENAME_NOREPLACE | LINUX_RENAME_WHITEOUT)) 794 return (EINVAL); 795 if (args->flags & LINUX_RENAME_EXCHANGE && 796 args->flags & (LINUX_RENAME_NOREPLACE | 797 LINUX_RENAME_WHITEOUT)) 798 return (EINVAL); 799 #if 0 800 /* 801 * This spams the console on Ubuntu Focal. 802 * 803 * What's needed here is a general mechanism to let users know 804 * about missing features without hogging the system. 805 */ 806 linux_msg(td, "renameat2 unsupported flags 0x%x", 807 args->flags); 808 #endif 809 return (EINVAL); 810 } 811 812 olddfd = (args->olddfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->olddfd; 813 newdfd = (args->newdfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->newdfd; 814 return (kern_renameat(td, olddfd, args->oldname, newdfd, 815 args->newname, UIO_USERSPACE)); 816 } 817 818 #ifdef LINUX_LEGACY_SYSCALLS 819 int 820 linux_symlink(struct thread *td, struct linux_symlink_args *args) 821 { 822 823 return (kern_symlinkat(td, args->path, AT_FDCWD, args->to, 824 UIO_USERSPACE)); 825 } 826 #endif 827 828 int 829 linux_symlinkat(struct thread *td, struct linux_symlinkat_args *args) 830 { 831 int dfd; 832 833 dfd = (args->newdfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->newdfd; 834 return (kern_symlinkat(td, args->oldname, dfd, args->newname, 835 UIO_USERSPACE)); 836 } 837 838 #ifdef LINUX_LEGACY_SYSCALLS 839 int 840 linux_readlink(struct thread *td, struct linux_readlink_args *args) 841 { 842 843 if (args->count <= 0) 844 return (EINVAL); 845 846 return (kern_readlinkat(td, AT_FDCWD, args->name, UIO_USERSPACE, 847 args->buf, UIO_USERSPACE, args->count)); 848 } 849 #endif 850 851 int 852 linux_readlinkat(struct thread *td, struct linux_readlinkat_args *args) 853 { 854 int dfd; 855 856 if (args->bufsiz <= 0) 857 return (EINVAL); 858 859 dfd = (args->dfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->dfd; 860 return (kern_readlinkat(td, dfd, args->path, UIO_USERSPACE, 861 args->buf, UIO_USERSPACE, args->bufsiz)); 862 } 863 864 int 865 linux_truncate(struct thread *td, struct linux_truncate_args *args) 866 { 867 868 return (kern_truncate(td, args->path, UIO_USERSPACE, args->length)); 869 } 870 871 #if defined(__i386__) || (defined(__amd64__) && defined(COMPAT_LINUX32)) 872 int 873 linux_truncate64(struct thread *td, struct linux_truncate64_args *args) 874 { 875 off_t length; 876 877 #if defined(__amd64__) && defined(COMPAT_LINUX32) 878 length = PAIR32TO64(off_t, args->length); 879 #else 880 length = args->length; 881 #endif 882 883 return (kern_truncate(td, args->path, UIO_USERSPACE, length)); 884 } 885 #endif /* __i386__ || (__amd64__ && COMPAT_LINUX32) */ 886 887 int 888 linux_ftruncate(struct thread *td, struct linux_ftruncate_args *args) 889 { 890 891 return (kern_ftruncate(td, args->fd, args->length)); 892 } 893 894 #if defined(__i386__) || (defined(__amd64__) && defined(COMPAT_LINUX32)) 895 int 896 linux_ftruncate64(struct thread *td, struct linux_ftruncate64_args *args) 897 { 898 off_t length; 899 900 #if defined(__amd64__) && defined(COMPAT_LINUX32) 901 length = PAIR32TO64(off_t, args->length); 902 #else 903 length = args->length; 904 #endif 905 906 return (kern_ftruncate(td, args->fd, length)); 907 } 908 #endif 909 910 #ifdef LINUX_LEGACY_SYSCALLS 911 int 912 linux_link(struct thread *td, struct linux_link_args *args) 913 { 914 915 return (kern_linkat(td, AT_FDCWD, AT_FDCWD, args->path, args->to, 916 UIO_USERSPACE, AT_SYMLINK_FOLLOW)); 917 } 918 #endif 919 920 int 921 linux_linkat(struct thread *td, struct linux_linkat_args *args) 922 { 923 int olddfd, newdfd, flag; 924 925 if (args->flag & ~(LINUX_AT_SYMLINK_FOLLOW | LINUX_AT_EMPTY_PATH)) 926 return (EINVAL); 927 928 flag = (args->flag & LINUX_AT_SYMLINK_FOLLOW) != 0 ? AT_SYMLINK_FOLLOW : 929 0; 930 flag |= (args->flag & LINUX_AT_EMPTY_PATH) != 0 ? AT_EMPTY_PATH : 0; 931 932 olddfd = (args->olddfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->olddfd; 933 newdfd = (args->newdfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->newdfd; 934 return (kern_linkat(td, olddfd, newdfd, args->oldname, 935 args->newname, UIO_USERSPACE, flag)); 936 } 937 938 int 939 linux_fdatasync(struct thread *td, struct linux_fdatasync_args *uap) 940 { 941 942 return (kern_fsync(td, uap->fd, false)); 943 } 944 945 int 946 linux_sync_file_range(struct thread *td, struct linux_sync_file_range_args *uap) 947 { 948 off_t nbytes, offset; 949 950 #if defined(__amd64__) && defined(COMPAT_LINUX32) 951 nbytes = PAIR32TO64(off_t, uap->nbytes); 952 offset = PAIR32TO64(off_t, uap->offset); 953 #else 954 nbytes = uap->nbytes; 955 offset = uap->offset; 956 #endif 957 958 if (offset < 0 || nbytes < 0 || 959 (uap->flags & ~(LINUX_SYNC_FILE_RANGE_WAIT_BEFORE | 960 LINUX_SYNC_FILE_RANGE_WRITE | 961 LINUX_SYNC_FILE_RANGE_WAIT_AFTER)) != 0) { 962 return (EINVAL); 963 } 964 965 return (kern_fsync(td, uap->fd, false)); 966 } 967 968 int 969 linux_pread(struct thread *td, struct linux_pread_args *uap) 970 { 971 struct vnode *vp; 972 off_t offset; 973 int error; 974 975 #if defined(__amd64__) && defined(COMPAT_LINUX32) 976 offset = PAIR32TO64(off_t, uap->offset); 977 #else 978 offset = uap->offset; 979 #endif 980 981 error = kern_pread(td, uap->fd, uap->buf, uap->nbyte, offset); 982 if (error == 0) { 983 /* This seems to violate POSIX but Linux does it. */ 984 error = fgetvp(td, uap->fd, &cap_pread_rights, &vp); 985 if (error != 0) 986 return (error); 987 if (vp->v_type == VDIR) 988 error = EISDIR; 989 vrele(vp); 990 } 991 return (error); 992 } 993 994 int 995 linux_pwrite(struct thread *td, struct linux_pwrite_args *uap) 996 { 997 off_t offset; 998 999 #if defined(__amd64__) && defined(COMPAT_LINUX32) 1000 offset = PAIR32TO64(off_t, uap->offset); 1001 #else 1002 offset = uap->offset; 1003 #endif 1004 1005 return (linux_enobufs2eagain(td, uap->fd, 1006 kern_pwrite(td, uap->fd, uap->buf, uap->nbyte, offset))); 1007 } 1008 1009 #define HALF_LONG_BITS ((sizeof(l_long) * NBBY / 2)) 1010 1011 static inline off_t 1012 pos_from_hilo(unsigned long high, unsigned long low) 1013 { 1014 1015 return (((off_t)high << HALF_LONG_BITS) << HALF_LONG_BITS) | low; 1016 } 1017 1018 int 1019 linux_preadv(struct thread *td, struct linux_preadv_args *uap) 1020 { 1021 struct uio *auio; 1022 int error; 1023 off_t offset; 1024 1025 /* 1026 * According http://man7.org/linux/man-pages/man2/preadv.2.html#NOTES 1027 * pos_l and pos_h, respectively, contain the 1028 * low order and high order 32 bits of offset. 1029 */ 1030 offset = pos_from_hilo(uap->pos_h, uap->pos_l); 1031 if (offset < 0) 1032 return (EINVAL); 1033 #ifdef COMPAT_LINUX32 1034 error = freebsd32_copyinuio(PTRIN(uap->vec), uap->vlen, &auio); 1035 #else 1036 error = copyinuio(uap->vec, uap->vlen, &auio); 1037 #endif 1038 if (error != 0) 1039 return (error); 1040 error = kern_preadv(td, uap->fd, auio, offset); 1041 freeuio(auio); 1042 return (error); 1043 } 1044 1045 int 1046 linux_pwritev(struct thread *td, struct linux_pwritev_args *uap) 1047 { 1048 struct uio *auio; 1049 int error; 1050 off_t offset; 1051 1052 /* 1053 * According http://man7.org/linux/man-pages/man2/pwritev.2.html#NOTES 1054 * pos_l and pos_h, respectively, contain the 1055 * low order and high order 32 bits of offset. 1056 */ 1057 offset = pos_from_hilo(uap->pos_h, uap->pos_l); 1058 if (offset < 0) 1059 return (EINVAL); 1060 #ifdef COMPAT_LINUX32 1061 error = freebsd32_copyinuio(PTRIN(uap->vec), uap->vlen, &auio); 1062 #else 1063 error = copyinuio(uap->vec, uap->vlen, &auio); 1064 #endif 1065 if (error != 0) 1066 return (error); 1067 error = kern_pwritev(td, uap->fd, auio, offset); 1068 freeuio(auio); 1069 return (linux_enobufs2eagain(td, uap->fd, error)); 1070 } 1071 1072 int 1073 linux_mount(struct thread *td, struct linux_mount_args *args) 1074 { 1075 struct mntarg *ma = NULL; 1076 char *fstypename, *mntonname, *mntfromname, *data; 1077 int error, fsflags; 1078 1079 fstypename = malloc(MNAMELEN, M_TEMP, M_WAITOK); 1080 mntonname = malloc(MNAMELEN, M_TEMP, M_WAITOK); 1081 mntfromname = malloc(MNAMELEN, M_TEMP, M_WAITOK); 1082 data = NULL; 1083 error = copyinstr(args->filesystemtype, fstypename, MNAMELEN - 1, 1084 NULL); 1085 if (error != 0) 1086 goto out; 1087 if (args->specialfile != NULL) { 1088 error = copyinstr(args->specialfile, mntfromname, MNAMELEN - 1, NULL); 1089 if (error != 0) 1090 goto out; 1091 } else { 1092 mntfromname[0] = '\0'; 1093 } 1094 error = copyinstr(args->dir, mntonname, MNAMELEN - 1, NULL); 1095 if (error != 0) 1096 goto out; 1097 1098 if (strcmp(fstypename, "ext2") == 0) { 1099 strcpy(fstypename, "ext2fs"); 1100 } else if (strcmp(fstypename, "proc") == 0) { 1101 strcpy(fstypename, "linprocfs"); 1102 } else if (strcmp(fstypename, "vfat") == 0) { 1103 strcpy(fstypename, "msdosfs"); 1104 } else if (strcmp(fstypename, "fuse") == 0 || 1105 strncmp(fstypename, "fuse.", 5) == 0) { 1106 char *fuse_options, *fuse_option, *fuse_name; 1107 1108 strcpy(mntfromname, "/dev/fuse"); 1109 strcpy(fstypename, "fusefs"); 1110 data = malloc(MNAMELEN, M_TEMP, M_WAITOK); 1111 error = copyinstr(args->data, data, MNAMELEN - 1, NULL); 1112 if (error != 0) 1113 goto out; 1114 1115 fuse_options = data; 1116 while ((fuse_option = strsep(&fuse_options, ",")) != NULL) { 1117 fuse_name = strsep(&fuse_option, "="); 1118 if (fuse_name == NULL || fuse_option == NULL) 1119 goto out; 1120 ma = mount_arg(ma, fuse_name, fuse_option, -1); 1121 } 1122 1123 /* 1124 * The FUSE server uses Linux errno values instead of FreeBSD 1125 * ones; add a flag to tell fuse(4) to do errno translation. 1126 */ 1127 ma = mount_arg(ma, "linux_errnos", "1", -1); 1128 } 1129 1130 fsflags = 0; 1131 1132 /* 1133 * Linux SYNC flag is not included; the closest equivalent 1134 * FreeBSD has is !ASYNC, which is our default. 1135 */ 1136 if (args->rwflag & LINUX_MS_RDONLY) 1137 fsflags |= MNT_RDONLY; 1138 if (args->rwflag & LINUX_MS_NOSUID) 1139 fsflags |= MNT_NOSUID; 1140 if (args->rwflag & LINUX_MS_NOEXEC) 1141 fsflags |= MNT_NOEXEC; 1142 if (args->rwflag & LINUX_MS_REMOUNT) 1143 fsflags |= MNT_UPDATE; 1144 1145 ma = mount_arg(ma, "fstype", fstypename, -1); 1146 ma = mount_arg(ma, "fspath", mntonname, -1); 1147 ma = mount_arg(ma, "from", mntfromname, -1); 1148 error = kernel_mount(ma, fsflags); 1149 out: 1150 free(fstypename, M_TEMP); 1151 free(mntonname, M_TEMP); 1152 free(mntfromname, M_TEMP); 1153 free(data, M_TEMP); 1154 return (error); 1155 } 1156 1157 #if defined(__i386__) || (defined(__amd64__) && defined(COMPAT_LINUX32)) 1158 int 1159 linux_oldumount(struct thread *td, struct linux_oldumount_args *args) 1160 { 1161 1162 return (kern_unmount(td, args->path, 0)); 1163 } 1164 #endif /* __i386__ || (__amd64__ && COMPAT_LINUX32) */ 1165 1166 #ifdef LINUX_LEGACY_SYSCALLS 1167 int 1168 linux_umount(struct thread *td, struct linux_umount_args *args) 1169 { 1170 int flags; 1171 1172 flags = 0; 1173 if ((args->flags & LINUX_MNT_FORCE) != 0) { 1174 args->flags &= ~LINUX_MNT_FORCE; 1175 flags |= MNT_FORCE; 1176 } 1177 if (args->flags != 0) { 1178 linux_msg(td, "unsupported umount2 flags %#x", args->flags); 1179 return (EINVAL); 1180 } 1181 1182 return (kern_unmount(td, args->path, flags)); 1183 } 1184 #endif 1185 1186 /* 1187 * fcntl family of syscalls 1188 */ 1189 1190 struct l_flock { 1191 l_short l_type; 1192 l_short l_whence; 1193 l_off_t l_start; 1194 l_off_t l_len; 1195 l_pid_t l_pid; 1196 } 1197 #if defined(__amd64__) && defined(COMPAT_LINUX32) 1198 __packed 1199 #endif 1200 ; 1201 1202 static void 1203 linux_to_bsd_flock(struct l_flock *linux_flock, struct flock *bsd_flock) 1204 { 1205 switch (linux_flock->l_type) { 1206 case LINUX_F_RDLCK: 1207 bsd_flock->l_type = F_RDLCK; 1208 break; 1209 case LINUX_F_WRLCK: 1210 bsd_flock->l_type = F_WRLCK; 1211 break; 1212 case LINUX_F_UNLCK: 1213 bsd_flock->l_type = F_UNLCK; 1214 break; 1215 default: 1216 bsd_flock->l_type = -1; 1217 break; 1218 } 1219 bsd_flock->l_whence = linux_flock->l_whence; 1220 bsd_flock->l_start = (off_t)linux_flock->l_start; 1221 bsd_flock->l_len = (off_t)linux_flock->l_len; 1222 bsd_flock->l_pid = (pid_t)linux_flock->l_pid; 1223 bsd_flock->l_sysid = 0; 1224 } 1225 1226 static void 1227 bsd_to_linux_flock(struct flock *bsd_flock, struct l_flock *linux_flock) 1228 { 1229 switch (bsd_flock->l_type) { 1230 case F_RDLCK: 1231 linux_flock->l_type = LINUX_F_RDLCK; 1232 break; 1233 case F_WRLCK: 1234 linux_flock->l_type = LINUX_F_WRLCK; 1235 break; 1236 case F_UNLCK: 1237 linux_flock->l_type = LINUX_F_UNLCK; 1238 break; 1239 } 1240 linux_flock->l_whence = bsd_flock->l_whence; 1241 linux_flock->l_start = (l_off_t)bsd_flock->l_start; 1242 linux_flock->l_len = (l_off_t)bsd_flock->l_len; 1243 linux_flock->l_pid = (l_pid_t)bsd_flock->l_pid; 1244 } 1245 1246 #if defined(__i386__) || (defined(__amd64__) && defined(COMPAT_LINUX32)) 1247 struct l_flock64 { 1248 l_short l_type; 1249 l_short l_whence; 1250 l_loff_t l_start; 1251 l_loff_t l_len; 1252 l_pid_t l_pid; 1253 } 1254 #if defined(__amd64__) && defined(COMPAT_LINUX32) 1255 __packed 1256 #endif 1257 ; 1258 1259 static void 1260 linux_to_bsd_flock64(struct l_flock64 *linux_flock, struct flock *bsd_flock) 1261 { 1262 switch (linux_flock->l_type) { 1263 case LINUX_F_RDLCK: 1264 bsd_flock->l_type = F_RDLCK; 1265 break; 1266 case LINUX_F_WRLCK: 1267 bsd_flock->l_type = F_WRLCK; 1268 break; 1269 case LINUX_F_UNLCK: 1270 bsd_flock->l_type = F_UNLCK; 1271 break; 1272 default: 1273 bsd_flock->l_type = -1; 1274 break; 1275 } 1276 bsd_flock->l_whence = linux_flock->l_whence; 1277 bsd_flock->l_start = (off_t)linux_flock->l_start; 1278 bsd_flock->l_len = (off_t)linux_flock->l_len; 1279 bsd_flock->l_pid = (pid_t)linux_flock->l_pid; 1280 bsd_flock->l_sysid = 0; 1281 } 1282 1283 static void 1284 bsd_to_linux_flock64(struct flock *bsd_flock, struct l_flock64 *linux_flock) 1285 { 1286 switch (bsd_flock->l_type) { 1287 case F_RDLCK: 1288 linux_flock->l_type = LINUX_F_RDLCK; 1289 break; 1290 case F_WRLCK: 1291 linux_flock->l_type = LINUX_F_WRLCK; 1292 break; 1293 case F_UNLCK: 1294 linux_flock->l_type = LINUX_F_UNLCK; 1295 break; 1296 } 1297 linux_flock->l_whence = bsd_flock->l_whence; 1298 linux_flock->l_start = (l_loff_t)bsd_flock->l_start; 1299 linux_flock->l_len = (l_loff_t)bsd_flock->l_len; 1300 linux_flock->l_pid = (l_pid_t)bsd_flock->l_pid; 1301 } 1302 #endif /* __i386__ || (__amd64__ && COMPAT_LINUX32) */ 1303 1304 static int 1305 fcntl_common(struct thread *td, struct linux_fcntl_args *args) 1306 { 1307 struct l_flock linux_flock; 1308 struct flock bsd_flock; 1309 struct pipe *fpipe; 1310 struct file *fp; 1311 long arg; 1312 int error, result; 1313 1314 switch (args->cmd) { 1315 case LINUX_F_DUPFD: 1316 return (kern_fcntl(td, args->fd, F_DUPFD, args->arg)); 1317 1318 case LINUX_F_GETFD: 1319 return (kern_fcntl(td, args->fd, F_GETFD, 0)); 1320 1321 case LINUX_F_SETFD: 1322 return (kern_fcntl(td, args->fd, F_SETFD, args->arg)); 1323 1324 case LINUX_F_GETFL: 1325 error = kern_fcntl(td, args->fd, F_GETFL, 0); 1326 result = td->td_retval[0]; 1327 td->td_retval[0] = 0; 1328 if (result & O_RDONLY) 1329 td->td_retval[0] |= LINUX_O_RDONLY; 1330 if (result & O_WRONLY) 1331 td->td_retval[0] |= LINUX_O_WRONLY; 1332 if (result & O_RDWR) 1333 td->td_retval[0] |= LINUX_O_RDWR; 1334 if (result & O_NDELAY) 1335 td->td_retval[0] |= LINUX_O_NONBLOCK; 1336 if (result & O_APPEND) 1337 td->td_retval[0] |= LINUX_O_APPEND; 1338 if (result & O_FSYNC) 1339 td->td_retval[0] |= LINUX_O_SYNC; 1340 if (result & O_ASYNC) 1341 td->td_retval[0] |= LINUX_O_ASYNC; 1342 #ifdef LINUX_O_NOFOLLOW 1343 if (result & O_NOFOLLOW) 1344 td->td_retval[0] |= LINUX_O_NOFOLLOW; 1345 #endif 1346 #ifdef LINUX_O_DIRECT 1347 if (result & O_DIRECT) 1348 td->td_retval[0] |= LINUX_O_DIRECT; 1349 #endif 1350 return (error); 1351 1352 case LINUX_F_SETFL: 1353 arg = 0; 1354 if (args->arg & LINUX_O_NDELAY) 1355 arg |= O_NONBLOCK; 1356 if (args->arg & LINUX_O_APPEND) 1357 arg |= O_APPEND; 1358 if (args->arg & LINUX_O_SYNC) 1359 arg |= O_FSYNC; 1360 if (args->arg & LINUX_O_ASYNC) 1361 arg |= O_ASYNC; 1362 #ifdef LINUX_O_NOFOLLOW 1363 if (args->arg & LINUX_O_NOFOLLOW) 1364 arg |= O_NOFOLLOW; 1365 #endif 1366 #ifdef LINUX_O_DIRECT 1367 if (args->arg & LINUX_O_DIRECT) 1368 arg |= O_DIRECT; 1369 #endif 1370 return (kern_fcntl(td, args->fd, F_SETFL, arg)); 1371 1372 case LINUX_F_GETLK: 1373 error = copyin((void *)args->arg, &linux_flock, 1374 sizeof(linux_flock)); 1375 if (error) 1376 return (error); 1377 linux_to_bsd_flock(&linux_flock, &bsd_flock); 1378 error = kern_fcntl(td, args->fd, F_GETLK, (intptr_t)&bsd_flock); 1379 if (error) 1380 return (error); 1381 bsd_to_linux_flock(&bsd_flock, &linux_flock); 1382 return (copyout(&linux_flock, (void *)args->arg, 1383 sizeof(linux_flock))); 1384 1385 case LINUX_F_SETLK: 1386 error = copyin((void *)args->arg, &linux_flock, 1387 sizeof(linux_flock)); 1388 if (error) 1389 return (error); 1390 linux_to_bsd_flock(&linux_flock, &bsd_flock); 1391 return (kern_fcntl(td, args->fd, F_SETLK, 1392 (intptr_t)&bsd_flock)); 1393 1394 case LINUX_F_SETLKW: 1395 error = copyin((void *)args->arg, &linux_flock, 1396 sizeof(linux_flock)); 1397 if (error) 1398 return (error); 1399 linux_to_bsd_flock(&linux_flock, &bsd_flock); 1400 return (kern_fcntl(td, args->fd, F_SETLKW, 1401 (intptr_t)&bsd_flock)); 1402 1403 case LINUX_F_GETOWN: 1404 return (kern_fcntl(td, args->fd, F_GETOWN, 0)); 1405 1406 case LINUX_F_SETOWN: 1407 /* 1408 * XXX some Linux applications depend on F_SETOWN having no 1409 * significant effect for pipes (SIGIO is not delivered for 1410 * pipes under Linux-2.2.35 at least). 1411 */ 1412 error = fget(td, args->fd, 1413 &cap_fcntl_rights, &fp); 1414 if (error) 1415 return (error); 1416 if (fp->f_type == DTYPE_PIPE) { 1417 fdrop(fp, td); 1418 return (EINVAL); 1419 } 1420 fdrop(fp, td); 1421 1422 return (kern_fcntl(td, args->fd, F_SETOWN, args->arg)); 1423 1424 case LINUX_F_DUPFD_CLOEXEC: 1425 return (kern_fcntl(td, args->fd, F_DUPFD_CLOEXEC, args->arg)); 1426 /* 1427 * Our F_SEAL_* values match Linux one for maximum compatibility. So we 1428 * only needed to account for different values for fcntl(2) commands. 1429 */ 1430 case LINUX_F_GET_SEALS: 1431 error = kern_fcntl(td, args->fd, F_GET_SEALS, 0); 1432 if (error != 0) 1433 return (error); 1434 td->td_retval[0] = bsd_to_linux_bits(td->td_retval[0], 1435 seal_bitmap, 0); 1436 return (0); 1437 1438 case LINUX_F_ADD_SEALS: 1439 return (kern_fcntl(td, args->fd, F_ADD_SEALS, 1440 linux_to_bsd_bits(args->arg, seal_bitmap, 0))); 1441 1442 case LINUX_F_GETPIPE_SZ: 1443 error = fget(td, args->fd, 1444 &cap_fcntl_rights, &fp); 1445 if (error != 0) 1446 return (error); 1447 if (fp->f_type != DTYPE_PIPE) { 1448 fdrop(fp, td); 1449 return (EINVAL); 1450 } 1451 fpipe = fp->f_data; 1452 td->td_retval[0] = fpipe->pipe_buffer.size; 1453 fdrop(fp, td); 1454 return (0); 1455 1456 default: 1457 linux_msg(td, "unsupported fcntl cmd %d", args->cmd); 1458 return (EINVAL); 1459 } 1460 } 1461 1462 int 1463 linux_fcntl(struct thread *td, struct linux_fcntl_args *args) 1464 { 1465 1466 return (fcntl_common(td, args)); 1467 } 1468 1469 #if defined(__i386__) || (defined(__amd64__) && defined(COMPAT_LINUX32)) 1470 int 1471 linux_fcntl64(struct thread *td, struct linux_fcntl64_args *args) 1472 { 1473 struct l_flock64 linux_flock; 1474 struct flock bsd_flock; 1475 struct linux_fcntl_args fcntl_args; 1476 int error; 1477 1478 switch (args->cmd) { 1479 case LINUX_F_GETLK64: 1480 error = copyin((void *)args->arg, &linux_flock, 1481 sizeof(linux_flock)); 1482 if (error) 1483 return (error); 1484 linux_to_bsd_flock64(&linux_flock, &bsd_flock); 1485 error = kern_fcntl(td, args->fd, F_GETLK, (intptr_t)&bsd_flock); 1486 if (error) 1487 return (error); 1488 bsd_to_linux_flock64(&bsd_flock, &linux_flock); 1489 return (copyout(&linux_flock, (void *)args->arg, 1490 sizeof(linux_flock))); 1491 1492 case LINUX_F_SETLK64: 1493 error = copyin((void *)args->arg, &linux_flock, 1494 sizeof(linux_flock)); 1495 if (error) 1496 return (error); 1497 linux_to_bsd_flock64(&linux_flock, &bsd_flock); 1498 return (kern_fcntl(td, args->fd, F_SETLK, 1499 (intptr_t)&bsd_flock)); 1500 1501 case LINUX_F_SETLKW64: 1502 error = copyin((void *)args->arg, &linux_flock, 1503 sizeof(linux_flock)); 1504 if (error) 1505 return (error); 1506 linux_to_bsd_flock64(&linux_flock, &bsd_flock); 1507 return (kern_fcntl(td, args->fd, F_SETLKW, 1508 (intptr_t)&bsd_flock)); 1509 } 1510 1511 fcntl_args.fd = args->fd; 1512 fcntl_args.cmd = args->cmd; 1513 fcntl_args.arg = args->arg; 1514 return (fcntl_common(td, &fcntl_args)); 1515 } 1516 #endif /* __i386__ || (__amd64__ && COMPAT_LINUX32) */ 1517 1518 #ifdef LINUX_LEGACY_SYSCALLS 1519 int 1520 linux_chown(struct thread *td, struct linux_chown_args *args) 1521 { 1522 1523 return (kern_fchownat(td, AT_FDCWD, args->path, UIO_USERSPACE, 1524 args->uid, args->gid, 0)); 1525 } 1526 #endif 1527 1528 int 1529 linux_fchownat(struct thread *td, struct linux_fchownat_args *args) 1530 { 1531 int dfd, flag, unsupported; 1532 1533 unsupported = args->flag & ~(LINUX_AT_SYMLINK_NOFOLLOW | LINUX_AT_EMPTY_PATH); 1534 if (unsupported != 0) { 1535 linux_msg(td, "fchownat unsupported flag 0x%x", unsupported); 1536 return (EINVAL); 1537 } 1538 1539 flag = (args->flag & LINUX_AT_SYMLINK_NOFOLLOW) == 0 ? 0 : 1540 AT_SYMLINK_NOFOLLOW; 1541 flag |= (args->flag & LINUX_AT_EMPTY_PATH) == 0 ? 0 : 1542 AT_EMPTY_PATH; 1543 1544 dfd = (args->dfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->dfd; 1545 return (kern_fchownat(td, dfd, args->filename, UIO_USERSPACE, 1546 args->uid, args->gid, flag)); 1547 } 1548 1549 #ifdef LINUX_LEGACY_SYSCALLS 1550 int 1551 linux_lchown(struct thread *td, struct linux_lchown_args *args) 1552 { 1553 1554 return (kern_fchownat(td, AT_FDCWD, args->path, UIO_USERSPACE, args->uid, 1555 args->gid, AT_SYMLINK_NOFOLLOW)); 1556 } 1557 #endif 1558 1559 static int 1560 convert_fadvice(int advice) 1561 { 1562 switch (advice) { 1563 case LINUX_POSIX_FADV_NORMAL: 1564 return (POSIX_FADV_NORMAL); 1565 case LINUX_POSIX_FADV_RANDOM: 1566 return (POSIX_FADV_RANDOM); 1567 case LINUX_POSIX_FADV_SEQUENTIAL: 1568 return (POSIX_FADV_SEQUENTIAL); 1569 case LINUX_POSIX_FADV_WILLNEED: 1570 return (POSIX_FADV_WILLNEED); 1571 case LINUX_POSIX_FADV_DONTNEED: 1572 return (POSIX_FADV_DONTNEED); 1573 case LINUX_POSIX_FADV_NOREUSE: 1574 return (POSIX_FADV_NOREUSE); 1575 default: 1576 return (-1); 1577 } 1578 } 1579 1580 int 1581 linux_fadvise64(struct thread *td, struct linux_fadvise64_args *args) 1582 { 1583 off_t offset; 1584 int advice; 1585 1586 #if defined(__amd64__) && defined(COMPAT_LINUX32) 1587 offset = PAIR32TO64(off_t, args->offset); 1588 #else 1589 offset = args->offset; 1590 #endif 1591 1592 advice = convert_fadvice(args->advice); 1593 if (advice == -1) 1594 return (EINVAL); 1595 return (kern_posix_fadvise(td, args->fd, offset, args->len, advice)); 1596 } 1597 1598 #if defined(__i386__) || (defined(__amd64__) && defined(COMPAT_LINUX32)) 1599 int 1600 linux_fadvise64_64(struct thread *td, struct linux_fadvise64_64_args *args) 1601 { 1602 off_t len, offset; 1603 int advice; 1604 1605 #if defined(__amd64__) && defined(COMPAT_LINUX32) 1606 len = PAIR32TO64(off_t, args->len); 1607 offset = PAIR32TO64(off_t, args->offset); 1608 #else 1609 len = args->len; 1610 offset = args->offset; 1611 #endif 1612 1613 advice = convert_fadvice(args->advice); 1614 if (advice == -1) 1615 return (EINVAL); 1616 return (kern_posix_fadvise(td, args->fd, offset, len, advice)); 1617 } 1618 #endif /* __i386__ || (__amd64__ && COMPAT_LINUX32) */ 1619 1620 #ifdef LINUX_LEGACY_SYSCALLS 1621 int 1622 linux_pipe(struct thread *td, struct linux_pipe_args *args) 1623 { 1624 int fildes[2]; 1625 int error; 1626 1627 error = kern_pipe(td, fildes, 0, NULL, NULL); 1628 if (error != 0) 1629 return (error); 1630 1631 error = copyout(fildes, args->pipefds, sizeof(fildes)); 1632 if (error != 0) { 1633 (void)kern_close(td, fildes[0]); 1634 (void)kern_close(td, fildes[1]); 1635 } 1636 1637 return (error); 1638 } 1639 #endif 1640 1641 int 1642 linux_pipe2(struct thread *td, struct linux_pipe2_args *args) 1643 { 1644 int fildes[2]; 1645 int error, flags; 1646 1647 if ((args->flags & ~(LINUX_O_NONBLOCK | LINUX_O_CLOEXEC)) != 0) 1648 return (EINVAL); 1649 1650 flags = 0; 1651 if ((args->flags & LINUX_O_NONBLOCK) != 0) 1652 flags |= O_NONBLOCK; 1653 if ((args->flags & LINUX_O_CLOEXEC) != 0) 1654 flags |= O_CLOEXEC; 1655 error = kern_pipe(td, fildes, flags, NULL, NULL); 1656 if (error != 0) 1657 return (error); 1658 1659 error = copyout(fildes, args->pipefds, sizeof(fildes)); 1660 if (error != 0) { 1661 (void)kern_close(td, fildes[0]); 1662 (void)kern_close(td, fildes[1]); 1663 } 1664 1665 return (error); 1666 } 1667 1668 int 1669 linux_dup3(struct thread *td, struct linux_dup3_args *args) 1670 { 1671 int cmd; 1672 intptr_t newfd; 1673 1674 if (args->oldfd == args->newfd) 1675 return (EINVAL); 1676 if ((args->flags & ~LINUX_O_CLOEXEC) != 0) 1677 return (EINVAL); 1678 if (args->flags & LINUX_O_CLOEXEC) 1679 cmd = F_DUP2FD_CLOEXEC; 1680 else 1681 cmd = F_DUP2FD; 1682 1683 newfd = args->newfd; 1684 return (kern_fcntl(td, args->oldfd, cmd, newfd)); 1685 } 1686 1687 int 1688 linux_fallocate(struct thread *td, struct linux_fallocate_args *args) 1689 { 1690 off_t len, offset; 1691 1692 /* 1693 * We emulate only posix_fallocate system call for which 1694 * mode should be 0. 1695 */ 1696 if (args->mode != 0) 1697 return (EOPNOTSUPP); 1698 1699 #if defined(__amd64__) && defined(COMPAT_LINUX32) 1700 len = PAIR32TO64(off_t, args->len); 1701 offset = PAIR32TO64(off_t, args->offset); 1702 #else 1703 len = args->len; 1704 offset = args->offset; 1705 #endif 1706 1707 return (kern_posix_fallocate(td, args->fd, offset, len)); 1708 } 1709 1710 int 1711 linux_copy_file_range(struct thread *td, struct linux_copy_file_range_args 1712 *args) 1713 { 1714 l_loff_t inoff, outoff, *inoffp, *outoffp; 1715 int error, flags; 1716 1717 /* 1718 * copy_file_range(2) on Linux doesn't define any flags (yet), so is 1719 * the native implementation. Enforce it. 1720 */ 1721 if (args->flags != 0) { 1722 linux_msg(td, "copy_file_range unsupported flags 0x%x", 1723 args->flags); 1724 return (EINVAL); 1725 } 1726 flags = 0; 1727 inoffp = outoffp = NULL; 1728 if (args->off_in != NULL) { 1729 error = copyin(args->off_in, &inoff, sizeof(l_loff_t)); 1730 if (error != 0) 1731 return (error); 1732 inoffp = &inoff; 1733 } 1734 if (args->off_out != NULL) { 1735 error = copyin(args->off_out, &outoff, sizeof(l_loff_t)); 1736 if (error != 0) 1737 return (error); 1738 outoffp = &outoff; 1739 } 1740 1741 error = kern_copy_file_range(td, args->fd_in, inoffp, args->fd_out, 1742 outoffp, args->len, flags); 1743 if (error == 0 && args->off_in != NULL) 1744 error = copyout(inoffp, args->off_in, sizeof(l_loff_t)); 1745 if (error == 0 && args->off_out != NULL) 1746 error = copyout(outoffp, args->off_out, sizeof(l_loff_t)); 1747 return (error); 1748 } 1749 1750 #define LINUX_MEMFD_PREFIX "memfd:" 1751 1752 int 1753 linux_memfd_create(struct thread *td, struct linux_memfd_create_args *args) 1754 { 1755 char memfd_name[LINUX_NAME_MAX + 1]; 1756 int error, flags, shmflags, oflags; 1757 1758 /* 1759 * This is our clever trick to avoid the heap allocation to copy in the 1760 * uname. We don't really need to go this far out of our way, but it 1761 * does keep the rest of this function fairly clean as they don't have 1762 * to worry about cleanup on the way out. 1763 */ 1764 error = copyinstr(args->uname_ptr, 1765 memfd_name + sizeof(LINUX_MEMFD_PREFIX) - 1, 1766 LINUX_NAME_MAX - sizeof(LINUX_MEMFD_PREFIX) - 1, NULL); 1767 if (error != 0) { 1768 if (error == ENAMETOOLONG) 1769 error = EINVAL; 1770 return (error); 1771 } 1772 1773 memcpy(memfd_name, LINUX_MEMFD_PREFIX, sizeof(LINUX_MEMFD_PREFIX) - 1); 1774 flags = linux_to_bsd_bits(args->flags, mfd_bitmap, 0); 1775 if ((flags & ~(MFD_CLOEXEC | MFD_ALLOW_SEALING | MFD_HUGETLB | 1776 MFD_HUGE_MASK)) != 0) 1777 return (EINVAL); 1778 /* Size specified but no HUGETLB. */ 1779 if ((flags & MFD_HUGE_MASK) != 0 && (flags & MFD_HUGETLB) == 0) 1780 return (EINVAL); 1781 /* We don't actually support HUGETLB. */ 1782 if ((flags & MFD_HUGETLB) != 0) 1783 return (ENOSYS); 1784 oflags = O_RDWR; 1785 shmflags = SHM_GROW_ON_WRITE; 1786 if ((flags & MFD_CLOEXEC) != 0) 1787 oflags |= O_CLOEXEC; 1788 if ((flags & MFD_ALLOW_SEALING) != 0) 1789 shmflags |= SHM_ALLOW_SEALING; 1790 return (kern_shm_open2(td, SHM_ANON, oflags, 0, shmflags, NULL, 1791 memfd_name)); 1792 } 1793 1794 int 1795 linux_splice(struct thread *td, struct linux_splice_args *args) 1796 { 1797 1798 linux_msg(td, "syscall splice not really implemented"); 1799 1800 /* 1801 * splice(2) is documented to return EINVAL in various circumstances; 1802 * returning it instead of ENOSYS should hint the caller to use fallback 1803 * instead. 1804 */ 1805 return (EINVAL); 1806 } 1807 1808 int 1809 linux_close_range(struct thread *td, struct linux_close_range_args *args) 1810 { 1811 u_int flags = 0; 1812 1813 /* 1814 * Implementing close_range(CLOSE_RANGE_UNSHARE) allows Linux to 1815 * unshare filedesc table of the calling thread from others threads 1816 * in a thread group (i.e., process in the FreeBSD) or others processes, 1817 * which shares the same table, before closing the files. FreeBSD does 1818 * not have compatible unsharing mechanism due to the fact that sharing 1819 * process resources, including filedesc table, is at thread level in the 1820 * Linux, while in the FreeBSD it is at the process level. 1821 * Return EINVAL for now if the CLOSE_RANGE_UNSHARE flag is specified 1822 * until this new Linux API stabilizes. 1823 */ 1824 1825 if ((args->flags & ~(LINUX_CLOSE_RANGE_CLOEXEC)) != 0) 1826 return (EINVAL); 1827 if (args->first > args->last) 1828 return (EINVAL); 1829 if ((args->flags & LINUX_CLOSE_RANGE_CLOEXEC) != 0) 1830 flags |= CLOSE_RANGE_CLOEXEC; 1831 return (kern_close_range(td, flags, args->first, args->last)); 1832 } 1833 1834 int 1835 linux_enobufs2eagain(struct thread *td, int fd, int error) 1836 { 1837 struct file *fp; 1838 1839 if (error != ENOBUFS) 1840 return (error); 1841 if (fget(td, fd, &cap_no_rights, &fp) != 0) 1842 return (error); 1843 if (fp->f_type == DTYPE_SOCKET && (fp->f_flag & FNONBLOCK) != 0) 1844 error = EAGAIN; 1845 fdrop(fp, td); 1846 return (error); 1847 } 1848 1849 int 1850 linux_write(struct thread *td, struct linux_write_args *args) 1851 { 1852 struct write_args bargs = { 1853 .fd = args->fd, 1854 .buf = args->buf, 1855 .nbyte = args->nbyte, 1856 }; 1857 1858 return (linux_enobufs2eagain(td, args->fd, sys_write(td, &bargs))); 1859 } 1860 1861 int 1862 linux_writev(struct thread *td, struct linux_writev_args *args) 1863 { 1864 struct uio *auio; 1865 int error; 1866 1867 #ifdef COMPAT_LINUX32 1868 error = freebsd32_copyinuio(PTRIN(args->iovp), args->iovcnt, &auio); 1869 #else 1870 error = copyinuio(args->iovp, args->iovcnt, &auio); 1871 #endif 1872 if (error != 0) 1873 return (error); 1874 error = kern_writev(td, args->fd, auio); 1875 freeuio(auio); 1876 return (linux_enobufs2eagain(td, args->fd, error)); 1877 } 1878