1 /*- 2 * Copyright (c) 1994-1995 Søren Schmidt 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer 10 * in this position and unchanged. 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 3. The name of the author may not be used to endorse or promote products 15 * derived from this software without specific prior written permission 16 * 17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 27 */ 28 29 #include <sys/cdefs.h> 30 __FBSDID("$FreeBSD$"); 31 32 #include "opt_compat.h" 33 34 #include <sys/param.h> 35 #include <sys/dirent.h> 36 #include <sys/file.h> 37 #include <sys/filedesc.h> 38 #include <sys/proc.h> 39 #include <sys/malloc.h> 40 #include <sys/mount.h> 41 #include <sys/namei.h> 42 #include <sys/stat.h> 43 #include <sys/syscallsubr.h> 44 #include <sys/systm.h> 45 #include <sys/tty.h> 46 #include <sys/vnode.h> 47 #include <sys/conf.h> 48 #include <sys/fcntl.h> 49 50 #ifdef COMPAT_LINUX32 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 58 #include <compat/linux/linux_util.h> 59 #include <compat/linux/linux_file.h> 60 61 #define LINUX_SHMFS_MAGIC 0x01021994 62 63 static void 64 translate_vnhook_major_minor(struct vnode *vp, struct stat *sb) 65 { 66 int major, minor; 67 68 if (vp->v_type == VCHR && vp->v_rdev != NULL && 69 linux_driver_get_major_minor(devtoname(vp->v_rdev), 70 &major, &minor) == 0) { 71 sb->st_rdev = (major << 8 | minor); 72 } 73 } 74 75 static int 76 linux_kern_statat(struct thread *td, int flag, int fd, char *path, 77 enum uio_seg pathseg, struct stat *sbp) 78 { 79 80 return (kern_statat_vnhook(td, flag, fd, path, pathseg, sbp, 81 translate_vnhook_major_minor)); 82 } 83 84 static int 85 linux_kern_stat(struct thread *td, char *path, enum uio_seg pathseg, 86 struct stat *sbp) 87 { 88 89 return (linux_kern_statat(td, 0, AT_FDCWD, path, pathseg, sbp)); 90 } 91 92 static int 93 linux_kern_lstat(struct thread *td, char *path, enum uio_seg pathseg, 94 struct stat *sbp) 95 { 96 97 return (linux_kern_statat(td, AT_SYMLINK_NOFOLLOW, AT_FDCWD, path, 98 pathseg, sbp)); 99 } 100 101 /* 102 * XXX: This was removed from newstat_copyout(), and almost identical 103 * XXX: code was in stat64_copyout(). findcdev() needs to be replaced 104 * XXX: with something that does lookup and locking properly. 105 * XXX: When somebody fixes this: please try to avoid duplicating it. 106 */ 107 #if 0 108 static void 109 disk_foo(struct somestat *tbuf) 110 { 111 struct cdevsw *cdevsw; 112 struct cdev *dev; 113 114 /* Lie about disk drives which are character devices 115 * in FreeBSD but block devices under Linux. 116 */ 117 if (S_ISCHR(tbuf.st_mode) && 118 (dev = findcdev(buf->st_rdev)) != NULL) { 119 cdevsw = dev_refthread(dev); 120 if (cdevsw != NULL) { 121 if (cdevsw->d_flags & D_DISK) { 122 tbuf.st_mode &= ~S_IFMT; 123 tbuf.st_mode |= S_IFBLK; 124 125 /* XXX this may not be quite right */ 126 /* Map major number to 0 */ 127 tbuf.st_dev = minor(buf->st_dev) & 0xf; 128 tbuf.st_rdev = buf->st_rdev & 0xff; 129 } 130 dev_relthread(dev); 131 } 132 } 133 134 } 135 #endif 136 137 static void 138 translate_fd_major_minor(struct thread *td, int fd, struct stat *buf) 139 { 140 struct file *fp; 141 struct vnode *vp; 142 int major, minor; 143 144 /* 145 * No capability rights required here. 146 */ 147 if ((!S_ISCHR(buf->st_mode) && !S_ISBLK(buf->st_mode)) || 148 fget(td, fd, 0, &fp) != 0) 149 return; 150 vp = fp->f_vnode; 151 if (vp != NULL && vp->v_rdev != NULL && 152 linux_driver_get_major_minor(devtoname(vp->v_rdev), 153 &major, &minor) == 0) { 154 buf->st_rdev = (major << 8 | minor); 155 } else if (fp->f_type == DTYPE_PTS) { 156 struct tty *tp = fp->f_data; 157 158 /* Convert the numbers for the slave device. */ 159 if (linux_driver_get_major_minor(devtoname(tp->t_dev), 160 &major, &minor) == 0) { 161 buf->st_rdev = (major << 8 | minor); 162 } 163 } 164 fdrop(fp, td); 165 } 166 167 static int 168 newstat_copyout(struct stat *buf, void *ubuf) 169 { 170 struct l_newstat tbuf; 171 172 bzero(&tbuf, sizeof(tbuf)); 173 tbuf.st_dev = minor(buf->st_dev) | (major(buf->st_dev) << 8); 174 tbuf.st_ino = buf->st_ino; 175 tbuf.st_mode = buf->st_mode; 176 tbuf.st_nlink = buf->st_nlink; 177 tbuf.st_uid = buf->st_uid; 178 tbuf.st_gid = buf->st_gid; 179 tbuf.st_rdev = buf->st_rdev; 180 tbuf.st_size = buf->st_size; 181 tbuf.st_atim.tv_sec = buf->st_atim.tv_sec; 182 tbuf.st_atim.tv_nsec = buf->st_atim.tv_nsec; 183 tbuf.st_mtim.tv_sec = buf->st_mtim.tv_sec; 184 tbuf.st_mtim.tv_nsec = buf->st_mtim.tv_nsec; 185 tbuf.st_ctim.tv_sec = buf->st_ctim.tv_sec; 186 tbuf.st_ctim.tv_nsec = buf->st_ctim.tv_nsec; 187 tbuf.st_blksize = buf->st_blksize; 188 tbuf.st_blocks = buf->st_blocks; 189 190 return (copyout(&tbuf, ubuf, sizeof(tbuf))); 191 } 192 193 int 194 linux_newstat(struct thread *td, struct linux_newstat_args *args) 195 { 196 struct stat buf; 197 char *path; 198 int error; 199 200 LCONVPATHEXIST(td, args->path, &path); 201 202 #ifdef DEBUG 203 if (ldebug(newstat)) 204 printf(ARGS(newstat, "%s, *"), path); 205 #endif 206 207 error = linux_kern_stat(td, path, UIO_SYSSPACE, &buf); 208 LFREEPATH(path); 209 if (error) 210 return (error); 211 return (newstat_copyout(&buf, args->buf)); 212 } 213 214 int 215 linux_newlstat(struct thread *td, struct linux_newlstat_args *args) 216 { 217 struct stat sb; 218 char *path; 219 int error; 220 221 LCONVPATHEXIST(td, args->path, &path); 222 223 #ifdef DEBUG 224 if (ldebug(newlstat)) 225 printf(ARGS(newlstat, "%s, *"), path); 226 #endif 227 228 error = linux_kern_lstat(td, path, UIO_SYSSPACE, &sb); 229 LFREEPATH(path); 230 if (error) 231 return (error); 232 return (newstat_copyout(&sb, args->buf)); 233 } 234 235 int 236 linux_newfstat(struct thread *td, struct linux_newfstat_args *args) 237 { 238 struct stat buf; 239 int error; 240 241 #ifdef DEBUG 242 if (ldebug(newfstat)) 243 printf(ARGS(newfstat, "%d, *"), args->fd); 244 #endif 245 246 error = kern_fstat(td, args->fd, &buf); 247 translate_fd_major_minor(td, args->fd, &buf); 248 if (!error) 249 error = newstat_copyout(&buf, args->buf); 250 251 return (error); 252 } 253 254 static int 255 stat_copyout(struct stat *buf, void *ubuf) 256 { 257 struct l_stat lbuf; 258 259 bzero(&lbuf, sizeof(lbuf)); 260 lbuf.st_dev = buf->st_dev; 261 lbuf.st_ino = buf->st_ino; 262 lbuf.st_mode = buf->st_mode; 263 lbuf.st_nlink = buf->st_nlink; 264 lbuf.st_uid = buf->st_uid; 265 lbuf.st_gid = buf->st_gid; 266 lbuf.st_rdev = buf->st_rdev; 267 if (buf->st_size < (quad_t)1 << 32) 268 lbuf.st_size = buf->st_size; 269 else 270 lbuf.st_size = -2; 271 lbuf.st_atim.tv_sec = buf->st_atim.tv_sec; 272 lbuf.st_atim.tv_nsec = buf->st_atim.tv_nsec; 273 lbuf.st_mtim.tv_sec = buf->st_mtim.tv_sec; 274 lbuf.st_mtim.tv_nsec = buf->st_mtim.tv_nsec; 275 lbuf.st_ctim.tv_sec = buf->st_ctim.tv_sec; 276 lbuf.st_ctim.tv_nsec = buf->st_ctim.tv_nsec; 277 lbuf.st_blksize = buf->st_blksize; 278 lbuf.st_blocks = buf->st_blocks; 279 lbuf.st_flags = buf->st_flags; 280 lbuf.st_gen = buf->st_gen; 281 282 return (copyout(&lbuf, ubuf, sizeof(lbuf))); 283 } 284 285 int 286 linux_stat(struct thread *td, struct linux_stat_args *args) 287 { 288 struct stat buf; 289 char *path; 290 int error; 291 292 LCONVPATHEXIST(td, args->path, &path); 293 294 #ifdef DEBUG 295 if (ldebug(stat)) 296 printf(ARGS(stat, "%s, *"), path); 297 #endif 298 error = linux_kern_stat(td, path, UIO_SYSSPACE, &buf); 299 if (error) { 300 LFREEPATH(path); 301 return (error); 302 } 303 LFREEPATH(path); 304 return(stat_copyout(&buf, args->up)); 305 } 306 307 int 308 linux_lstat(struct thread *td, struct linux_lstat_args *args) 309 { 310 struct stat buf; 311 char *path; 312 int error; 313 314 LCONVPATHEXIST(td, args->path, &path); 315 316 #ifdef DEBUG 317 if (ldebug(lstat)) 318 printf(ARGS(lstat, "%s, *"), path); 319 #endif 320 error = linux_kern_lstat(td, path, UIO_SYSSPACE, &buf); 321 if (error) { 322 LFREEPATH(path); 323 return (error); 324 } 325 LFREEPATH(path); 326 return(stat_copyout(&buf, args->up)); 327 } 328 329 /* XXX - All fields of type l_int are defined as l_long on i386 */ 330 struct l_statfs { 331 l_int f_type; 332 l_int f_bsize; 333 l_int f_blocks; 334 l_int f_bfree; 335 l_int f_bavail; 336 l_int f_files; 337 l_int f_ffree; 338 l_fsid_t f_fsid; 339 l_int f_namelen; 340 l_int f_spare[6]; 341 }; 342 343 #define LINUX_CODA_SUPER_MAGIC 0x73757245L 344 #define LINUX_EXT2_SUPER_MAGIC 0xEF53L 345 #define LINUX_HPFS_SUPER_MAGIC 0xf995e849L 346 #define LINUX_ISOFS_SUPER_MAGIC 0x9660L 347 #define LINUX_MSDOS_SUPER_MAGIC 0x4d44L 348 #define LINUX_NCP_SUPER_MAGIC 0x564cL 349 #define LINUX_NFS_SUPER_MAGIC 0x6969L 350 #define LINUX_NTFS_SUPER_MAGIC 0x5346544EL 351 #define LINUX_PROC_SUPER_MAGIC 0x9fa0L 352 #define LINUX_UFS_SUPER_MAGIC 0x00011954L /* XXX - UFS_MAGIC in Linux */ 353 #define LINUX_DEVFS_SUPER_MAGIC 0x1373L 354 355 static long 356 bsd_to_linux_ftype(const char *fstypename) 357 { 358 int i; 359 static struct {const char *bsd_name; long linux_type;} b2l_tbl[] = { 360 {"ufs", LINUX_UFS_SUPER_MAGIC}, 361 {"cd9660", LINUX_ISOFS_SUPER_MAGIC}, 362 {"nfs", LINUX_NFS_SUPER_MAGIC}, 363 {"ext2fs", LINUX_EXT2_SUPER_MAGIC}, 364 {"procfs", LINUX_PROC_SUPER_MAGIC}, 365 {"msdosfs", LINUX_MSDOS_SUPER_MAGIC}, 366 {"ntfs", LINUX_NTFS_SUPER_MAGIC}, 367 {"nwfs", LINUX_NCP_SUPER_MAGIC}, 368 {"hpfs", LINUX_HPFS_SUPER_MAGIC}, 369 {"coda", LINUX_CODA_SUPER_MAGIC}, 370 {"devfs", LINUX_DEVFS_SUPER_MAGIC}, 371 {NULL, 0L}}; 372 373 for (i = 0; b2l_tbl[i].bsd_name != NULL; i++) 374 if (strcmp(b2l_tbl[i].bsd_name, fstypename) == 0) 375 return (b2l_tbl[i].linux_type); 376 377 return (0L); 378 } 379 380 static void 381 bsd_to_linux_statfs(struct statfs *bsd_statfs, struct l_statfs *linux_statfs) 382 { 383 384 linux_statfs->f_type = bsd_to_linux_ftype(bsd_statfs->f_fstypename); 385 linux_statfs->f_bsize = bsd_statfs->f_bsize; 386 linux_statfs->f_blocks = bsd_statfs->f_blocks; 387 linux_statfs->f_bfree = bsd_statfs->f_bfree; 388 linux_statfs->f_bavail = bsd_statfs->f_bavail; 389 linux_statfs->f_ffree = bsd_statfs->f_ffree; 390 linux_statfs->f_files = bsd_statfs->f_files; 391 linux_statfs->f_fsid.val[0] = bsd_statfs->f_fsid.val[0]; 392 linux_statfs->f_fsid.val[1] = bsd_statfs->f_fsid.val[1]; 393 linux_statfs->f_namelen = MAXNAMLEN; 394 } 395 396 int 397 linux_statfs(struct thread *td, struct linux_statfs_args *args) 398 { 399 struct l_statfs linux_statfs; 400 struct statfs bsd_statfs; 401 char *path; 402 int error, dev_shm; 403 404 LCONVPATHEXIST(td, args->path, &path); 405 406 #ifdef DEBUG 407 if (ldebug(statfs)) 408 printf(ARGS(statfs, "%s, *"), path); 409 #endif 410 dev_shm = 0; 411 error = kern_statfs(td, path, UIO_SYSSPACE, &bsd_statfs); 412 if (strncmp(path, "/dev/shm", sizeof("/dev/shm") - 1) == 0) 413 dev_shm = (path[8] == '\0' 414 || (path[8] == '/' && path[9] == '\0')); 415 LFREEPATH(path); 416 if (error) 417 return (error); 418 bsd_to_linux_statfs(&bsd_statfs, &linux_statfs); 419 if (dev_shm) 420 linux_statfs.f_type = LINUX_SHMFS_MAGIC; 421 return copyout(&linux_statfs, args->buf, sizeof(linux_statfs)); 422 } 423 424 static void 425 bsd_to_linux_statfs64(struct statfs *bsd_statfs, struct l_statfs64 *linux_statfs) 426 { 427 428 linux_statfs->f_type = bsd_to_linux_ftype(bsd_statfs->f_fstypename); 429 linux_statfs->f_bsize = bsd_statfs->f_bsize; 430 linux_statfs->f_blocks = bsd_statfs->f_blocks; 431 linux_statfs->f_bfree = bsd_statfs->f_bfree; 432 linux_statfs->f_bavail = bsd_statfs->f_bavail; 433 linux_statfs->f_ffree = bsd_statfs->f_ffree; 434 linux_statfs->f_files = bsd_statfs->f_files; 435 linux_statfs->f_fsid.val[0] = bsd_statfs->f_fsid.val[0]; 436 linux_statfs->f_fsid.val[1] = bsd_statfs->f_fsid.val[1]; 437 linux_statfs->f_namelen = MAXNAMLEN; 438 } 439 440 int 441 linux_statfs64(struct thread *td, struct linux_statfs64_args *args) 442 { 443 struct l_statfs64 linux_statfs; 444 struct statfs bsd_statfs; 445 char *path; 446 int error; 447 448 if (args->bufsize != sizeof(struct l_statfs64)) 449 return EINVAL; 450 451 LCONVPATHEXIST(td, args->path, &path); 452 453 #ifdef DEBUG 454 if (ldebug(statfs64)) 455 printf(ARGS(statfs64, "%s, *"), path); 456 #endif 457 error = kern_statfs(td, path, UIO_SYSSPACE, &bsd_statfs); 458 LFREEPATH(path); 459 if (error) 460 return (error); 461 bsd_to_linux_statfs64(&bsd_statfs, &linux_statfs); 462 return copyout(&linux_statfs, args->buf, sizeof(linux_statfs)); 463 } 464 465 int 466 linux_fstatfs(struct thread *td, struct linux_fstatfs_args *args) 467 { 468 struct l_statfs linux_statfs; 469 struct statfs bsd_statfs; 470 int error; 471 472 #ifdef DEBUG 473 if (ldebug(fstatfs)) 474 printf(ARGS(fstatfs, "%d, *"), args->fd); 475 #endif 476 error = kern_fstatfs(td, args->fd, &bsd_statfs); 477 if (error) 478 return error; 479 bsd_to_linux_statfs(&bsd_statfs, &linux_statfs); 480 return copyout(&linux_statfs, args->buf, sizeof(linux_statfs)); 481 } 482 483 struct l_ustat 484 { 485 l_daddr_t f_tfree; 486 l_ino_t f_tinode; 487 char f_fname[6]; 488 char f_fpack[6]; 489 }; 490 491 int 492 linux_ustat(struct thread *td, struct linux_ustat_args *args) 493 { 494 #ifdef DEBUG 495 if (ldebug(ustat)) 496 printf(ARGS(ustat, "%d, *"), args->dev); 497 #endif 498 499 return (EOPNOTSUPP); 500 } 501 502 #if defined(__i386__) || (defined(__amd64__) && defined(COMPAT_LINUX32)) 503 504 static int 505 stat64_copyout(struct stat *buf, void *ubuf) 506 { 507 struct l_stat64 lbuf; 508 509 bzero(&lbuf, sizeof(lbuf)); 510 lbuf.st_dev = minor(buf->st_dev) | (major(buf->st_dev) << 8); 511 lbuf.st_ino = buf->st_ino; 512 lbuf.st_mode = buf->st_mode; 513 lbuf.st_nlink = buf->st_nlink; 514 lbuf.st_uid = buf->st_uid; 515 lbuf.st_gid = buf->st_gid; 516 lbuf.st_rdev = buf->st_rdev; 517 lbuf.st_size = buf->st_size; 518 lbuf.st_atim.tv_sec = buf->st_atim.tv_sec; 519 lbuf.st_atim.tv_nsec = buf->st_atim.tv_nsec; 520 lbuf.st_mtim.tv_sec = buf->st_mtim.tv_sec; 521 lbuf.st_mtim.tv_nsec = buf->st_mtim.tv_nsec; 522 lbuf.st_ctim.tv_sec = buf->st_ctim.tv_sec; 523 lbuf.st_ctim.tv_nsec = buf->st_ctim.tv_nsec; 524 lbuf.st_blksize = buf->st_blksize; 525 lbuf.st_blocks = buf->st_blocks; 526 527 /* 528 * The __st_ino field makes all the difference. In the Linux kernel 529 * it is conditionally compiled based on STAT64_HAS_BROKEN_ST_INO, 530 * but without the assignment to __st_ino the runtime linker refuses 531 * to mmap(2) any shared libraries. I guess it's broken alright :-) 532 */ 533 lbuf.__st_ino = buf->st_ino; 534 535 return (copyout(&lbuf, ubuf, sizeof(lbuf))); 536 } 537 538 int 539 linux_stat64(struct thread *td, struct linux_stat64_args *args) 540 { 541 struct stat buf; 542 char *filename; 543 int error; 544 545 LCONVPATHEXIST(td, args->filename, &filename); 546 547 #ifdef DEBUG 548 if (ldebug(stat64)) 549 printf(ARGS(stat64, "%s, *"), filename); 550 #endif 551 552 error = linux_kern_stat(td, filename, UIO_SYSSPACE, &buf); 553 LFREEPATH(filename); 554 if (error) 555 return (error); 556 return (stat64_copyout(&buf, args->statbuf)); 557 } 558 559 int 560 linux_lstat64(struct thread *td, struct linux_lstat64_args *args) 561 { 562 struct stat sb; 563 char *filename; 564 int error; 565 566 LCONVPATHEXIST(td, args->filename, &filename); 567 568 #ifdef DEBUG 569 if (ldebug(lstat64)) 570 printf(ARGS(lstat64, "%s, *"), args->filename); 571 #endif 572 573 error = linux_kern_lstat(td, filename, UIO_SYSSPACE, &sb); 574 LFREEPATH(filename); 575 if (error) 576 return (error); 577 return (stat64_copyout(&sb, args->statbuf)); 578 } 579 580 int 581 linux_fstat64(struct thread *td, struct linux_fstat64_args *args) 582 { 583 struct stat buf; 584 int error; 585 586 #ifdef DEBUG 587 if (ldebug(fstat64)) 588 printf(ARGS(fstat64, "%d, *"), args->fd); 589 #endif 590 591 error = kern_fstat(td, args->fd, &buf); 592 translate_fd_major_minor(td, args->fd, &buf); 593 if (!error) 594 error = stat64_copyout(&buf, args->statbuf); 595 596 return (error); 597 } 598 599 int 600 linux_fstatat64(struct thread *td, struct linux_fstatat64_args *args) 601 { 602 char *path; 603 int error, dfd, flag; 604 struct stat buf; 605 606 if (args->flag & ~LINUX_AT_SYMLINK_NOFOLLOW) 607 return (EINVAL); 608 flag = (args->flag & LINUX_AT_SYMLINK_NOFOLLOW) ? 609 AT_SYMLINK_NOFOLLOW : 0; 610 611 dfd = (args->dfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->dfd; 612 LCONVPATHEXIST_AT(td, args->pathname, &path, dfd); 613 614 #ifdef DEBUG 615 if (ldebug(fstatat64)) 616 printf(ARGS(fstatat64, "%i, %s, %i"), args->dfd, path, args->flag); 617 #endif 618 619 error = linux_kern_statat(td, flag, dfd, path, UIO_SYSSPACE, &buf); 620 if (!error) 621 error = stat64_copyout(&buf, args->statbuf); 622 LFREEPATH(path); 623 624 return (error); 625 } 626 627 #endif /* __i386__ || (__amd64__ && COMPAT_LINUX32) */ 628