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(vp->v_rdev->si_name, 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 if ((!S_ISCHR(buf->st_mode) && !S_ISBLK(buf->st_mode)) || 145 fget(td, fd, &fp) != 0) 146 return; 147 vp = fp->f_vnode; 148 if (vp != NULL && vp->v_rdev != NULL && 149 linux_driver_get_major_minor(vp->v_rdev->si_name, 150 &major, &minor) == 0) { 151 buf->st_rdev = (major << 8 | minor); 152 } else if (fp->f_type == DTYPE_PTS) { 153 struct tty *tp = fp->f_data; 154 155 /* Convert the numbers for the slave device. */ 156 if (linux_driver_get_major_minor(tp->t_dev->si_name, 157 &major, &minor) == 0) { 158 buf->st_rdev = (major << 8 | minor); 159 } 160 } 161 fdrop(fp, td); 162 } 163 164 static int 165 newstat_copyout(struct stat *buf, void *ubuf) 166 { 167 struct l_newstat tbuf; 168 169 bzero(&tbuf, sizeof(tbuf)); 170 tbuf.st_dev = minor(buf->st_dev) | (major(buf->st_dev) << 8); 171 tbuf.st_ino = buf->st_ino; 172 tbuf.st_mode = buf->st_mode; 173 tbuf.st_nlink = buf->st_nlink; 174 tbuf.st_uid = buf->st_uid; 175 tbuf.st_gid = buf->st_gid; 176 tbuf.st_rdev = buf->st_rdev; 177 tbuf.st_size = buf->st_size; 178 tbuf.st_atim.tv_sec = buf->st_atim.tv_sec; 179 tbuf.st_atim.tv_nsec = buf->st_atim.tv_nsec; 180 tbuf.st_mtim.tv_sec = buf->st_mtim.tv_sec; 181 tbuf.st_mtim.tv_nsec = buf->st_mtim.tv_nsec; 182 tbuf.st_ctim.tv_sec = buf->st_ctim.tv_sec; 183 tbuf.st_ctim.tv_nsec = buf->st_ctim.tv_nsec; 184 tbuf.st_blksize = buf->st_blksize; 185 tbuf.st_blocks = buf->st_blocks; 186 187 return (copyout(&tbuf, ubuf, sizeof(tbuf))); 188 } 189 190 int 191 linux_newstat(struct thread *td, struct linux_newstat_args *args) 192 { 193 struct stat buf; 194 char *path; 195 int error; 196 197 LCONVPATHEXIST(td, args->path, &path); 198 199 #ifdef DEBUG 200 if (ldebug(newstat)) 201 printf(ARGS(newstat, "%s, *"), path); 202 #endif 203 204 error = linux_kern_stat(td, path, UIO_SYSSPACE, &buf); 205 LFREEPATH(path); 206 if (error) 207 return (error); 208 return (newstat_copyout(&buf, args->buf)); 209 } 210 211 int 212 linux_newlstat(struct thread *td, struct linux_newlstat_args *args) 213 { 214 struct stat sb; 215 char *path; 216 int error; 217 218 LCONVPATHEXIST(td, args->path, &path); 219 220 #ifdef DEBUG 221 if (ldebug(newlstat)) 222 printf(ARGS(newlstat, "%s, *"), path); 223 #endif 224 225 error = linux_kern_lstat(td, path, UIO_SYSSPACE, &sb); 226 LFREEPATH(path); 227 if (error) 228 return (error); 229 return (newstat_copyout(&sb, args->buf)); 230 } 231 232 int 233 linux_newfstat(struct thread *td, struct linux_newfstat_args *args) 234 { 235 struct stat buf; 236 int error; 237 238 #ifdef DEBUG 239 if (ldebug(newfstat)) 240 printf(ARGS(newfstat, "%d, *"), args->fd); 241 #endif 242 243 error = kern_fstat(td, args->fd, &buf); 244 translate_fd_major_minor(td, args->fd, &buf); 245 if (!error) 246 error = newstat_copyout(&buf, args->buf); 247 248 return (error); 249 } 250 251 static int 252 stat_copyout(struct stat *buf, void *ubuf) 253 { 254 struct l_stat lbuf; 255 256 bzero(&lbuf, sizeof(lbuf)); 257 lbuf.st_dev = buf->st_dev; 258 lbuf.st_ino = buf->st_ino; 259 lbuf.st_mode = buf->st_mode; 260 lbuf.st_nlink = buf->st_nlink; 261 lbuf.st_uid = buf->st_uid; 262 lbuf.st_gid = buf->st_gid; 263 lbuf.st_rdev = buf->st_rdev; 264 if (buf->st_size < (quad_t)1 << 32) 265 lbuf.st_size = buf->st_size; 266 else 267 lbuf.st_size = -2; 268 lbuf.st_atim.tv_sec = buf->st_atim.tv_sec; 269 lbuf.st_atim.tv_nsec = buf->st_atim.tv_nsec; 270 lbuf.st_mtim.tv_sec = buf->st_mtim.tv_sec; 271 lbuf.st_mtim.tv_nsec = buf->st_mtim.tv_nsec; 272 lbuf.st_ctim.tv_sec = buf->st_ctim.tv_sec; 273 lbuf.st_ctim.tv_nsec = buf->st_ctim.tv_nsec; 274 lbuf.st_blksize = buf->st_blksize; 275 lbuf.st_blocks = buf->st_blocks; 276 lbuf.st_flags = buf->st_flags; 277 lbuf.st_gen = buf->st_gen; 278 279 return (copyout(&lbuf, ubuf, sizeof(lbuf))); 280 } 281 282 int 283 linux_stat(struct thread *td, struct linux_stat_args *args) 284 { 285 struct stat buf; 286 char *path; 287 int error; 288 289 LCONVPATHEXIST(td, args->path, &path); 290 291 #ifdef DEBUG 292 if (ldebug(stat)) 293 printf(ARGS(stat, "%s, *"), path); 294 #endif 295 error = linux_kern_stat(td, path, UIO_SYSSPACE, &buf); 296 if (error) { 297 LFREEPATH(path); 298 return (error); 299 } 300 LFREEPATH(path); 301 return(stat_copyout(&buf, args->up)); 302 } 303 304 int 305 linux_lstat(struct thread *td, struct linux_lstat_args *args) 306 { 307 struct stat buf; 308 char *path; 309 int error; 310 311 LCONVPATHEXIST(td, args->path, &path); 312 313 #ifdef DEBUG 314 if (ldebug(lstat)) 315 printf(ARGS(lstat, "%s, *"), path); 316 #endif 317 error = linux_kern_lstat(td, path, UIO_SYSSPACE, &buf); 318 if (error) { 319 LFREEPATH(path); 320 return (error); 321 } 322 LFREEPATH(path); 323 return(stat_copyout(&buf, args->up)); 324 } 325 326 /* XXX - All fields of type l_int are defined as l_long on i386 */ 327 struct l_statfs { 328 l_int f_type; 329 l_int f_bsize; 330 l_int f_blocks; 331 l_int f_bfree; 332 l_int f_bavail; 333 l_int f_files; 334 l_int f_ffree; 335 l_fsid_t f_fsid; 336 l_int f_namelen; 337 l_int f_spare[6]; 338 }; 339 340 #define LINUX_CODA_SUPER_MAGIC 0x73757245L 341 #define LINUX_EXT2_SUPER_MAGIC 0xEF53L 342 #define LINUX_HPFS_SUPER_MAGIC 0xf995e849L 343 #define LINUX_ISOFS_SUPER_MAGIC 0x9660L 344 #define LINUX_MSDOS_SUPER_MAGIC 0x4d44L 345 #define LINUX_NCP_SUPER_MAGIC 0x564cL 346 #define LINUX_NFS_SUPER_MAGIC 0x6969L 347 #define LINUX_NTFS_SUPER_MAGIC 0x5346544EL 348 #define LINUX_PROC_SUPER_MAGIC 0x9fa0L 349 #define LINUX_UFS_SUPER_MAGIC 0x00011954L /* XXX - UFS_MAGIC in Linux */ 350 #define LINUX_DEVFS_SUPER_MAGIC 0x1373L 351 352 static long 353 bsd_to_linux_ftype(const char *fstypename) 354 { 355 int i; 356 static struct {const char *bsd_name; long linux_type;} b2l_tbl[] = { 357 {"ufs", LINUX_UFS_SUPER_MAGIC}, 358 {"cd9660", LINUX_ISOFS_SUPER_MAGIC}, 359 {"nfs", LINUX_NFS_SUPER_MAGIC}, 360 {"ext2fs", LINUX_EXT2_SUPER_MAGIC}, 361 {"procfs", LINUX_PROC_SUPER_MAGIC}, 362 {"msdosfs", LINUX_MSDOS_SUPER_MAGIC}, 363 {"ntfs", LINUX_NTFS_SUPER_MAGIC}, 364 {"nwfs", LINUX_NCP_SUPER_MAGIC}, 365 {"hpfs", LINUX_HPFS_SUPER_MAGIC}, 366 {"coda", LINUX_CODA_SUPER_MAGIC}, 367 {"devfs", LINUX_DEVFS_SUPER_MAGIC}, 368 {NULL, 0L}}; 369 370 for (i = 0; b2l_tbl[i].bsd_name != NULL; i++) 371 if (strcmp(b2l_tbl[i].bsd_name, fstypename) == 0) 372 return (b2l_tbl[i].linux_type); 373 374 return (0L); 375 } 376 377 static void 378 bsd_to_linux_statfs(struct statfs *bsd_statfs, struct l_statfs *linux_statfs) 379 { 380 381 linux_statfs->f_type = bsd_to_linux_ftype(bsd_statfs->f_fstypename); 382 linux_statfs->f_bsize = bsd_statfs->f_bsize; 383 linux_statfs->f_blocks = bsd_statfs->f_blocks; 384 linux_statfs->f_bfree = bsd_statfs->f_bfree; 385 linux_statfs->f_bavail = bsd_statfs->f_bavail; 386 linux_statfs->f_ffree = bsd_statfs->f_ffree; 387 linux_statfs->f_files = bsd_statfs->f_files; 388 linux_statfs->f_fsid.val[0] = bsd_statfs->f_fsid.val[0]; 389 linux_statfs->f_fsid.val[1] = bsd_statfs->f_fsid.val[1]; 390 linux_statfs->f_namelen = MAXNAMLEN; 391 } 392 393 int 394 linux_statfs(struct thread *td, struct linux_statfs_args *args) 395 { 396 struct l_statfs linux_statfs; 397 struct statfs bsd_statfs; 398 char *path; 399 int error, dev_shm; 400 401 LCONVPATHEXIST(td, args->path, &path); 402 403 #ifdef DEBUG 404 if (ldebug(statfs)) 405 printf(ARGS(statfs, "%s, *"), path); 406 #endif 407 dev_shm = 0; 408 error = kern_statfs(td, path, UIO_SYSSPACE, &bsd_statfs); 409 if (strncmp(path, "/dev/shm", sizeof("/dev/shm") - 1) == 0) 410 dev_shm = (path[8] == '\0' 411 || (path[8] == '/' && path[9] == '\0')); 412 LFREEPATH(path); 413 if (error) 414 return (error); 415 bsd_to_linux_statfs(&bsd_statfs, &linux_statfs); 416 if (dev_shm) 417 linux_statfs.f_type = LINUX_SHMFS_MAGIC; 418 return copyout(&linux_statfs, args->buf, sizeof(linux_statfs)); 419 } 420 421 static void 422 bsd_to_linux_statfs64(struct statfs *bsd_statfs, struct l_statfs64 *linux_statfs) 423 { 424 425 linux_statfs->f_type = bsd_to_linux_ftype(bsd_statfs->f_fstypename); 426 linux_statfs->f_bsize = bsd_statfs->f_bsize; 427 linux_statfs->f_blocks = bsd_statfs->f_blocks; 428 linux_statfs->f_bfree = bsd_statfs->f_bfree; 429 linux_statfs->f_bavail = bsd_statfs->f_bavail; 430 linux_statfs->f_ffree = bsd_statfs->f_ffree; 431 linux_statfs->f_files = bsd_statfs->f_files; 432 linux_statfs->f_fsid.val[0] = bsd_statfs->f_fsid.val[0]; 433 linux_statfs->f_fsid.val[1] = bsd_statfs->f_fsid.val[1]; 434 linux_statfs->f_namelen = MAXNAMLEN; 435 } 436 437 int 438 linux_statfs64(struct thread *td, struct linux_statfs64_args *args) 439 { 440 struct l_statfs64 linux_statfs; 441 struct statfs bsd_statfs; 442 char *path; 443 int error; 444 445 if (args->bufsize != sizeof(struct l_statfs64)) 446 return EINVAL; 447 448 LCONVPATHEXIST(td, args->path, &path); 449 450 #ifdef DEBUG 451 if (ldebug(statfs64)) 452 printf(ARGS(statfs64, "%s, *"), path); 453 #endif 454 error = kern_statfs(td, path, UIO_SYSSPACE, &bsd_statfs); 455 LFREEPATH(path); 456 if (error) 457 return (error); 458 bsd_to_linux_statfs64(&bsd_statfs, &linux_statfs); 459 return copyout(&linux_statfs, args->buf, sizeof(linux_statfs)); 460 } 461 462 int 463 linux_fstatfs(struct thread *td, struct linux_fstatfs_args *args) 464 { 465 struct l_statfs linux_statfs; 466 struct statfs bsd_statfs; 467 int error; 468 469 #ifdef DEBUG 470 if (ldebug(fstatfs)) 471 printf(ARGS(fstatfs, "%d, *"), args->fd); 472 #endif 473 error = kern_fstatfs(td, args->fd, &bsd_statfs); 474 if (error) 475 return error; 476 bsd_to_linux_statfs(&bsd_statfs, &linux_statfs); 477 return copyout(&linux_statfs, args->buf, sizeof(linux_statfs)); 478 } 479 480 struct l_ustat 481 { 482 l_daddr_t f_tfree; 483 l_ino_t f_tinode; 484 char f_fname[6]; 485 char f_fpack[6]; 486 }; 487 488 int 489 linux_ustat(struct thread *td, struct linux_ustat_args *args) 490 { 491 #ifdef DEBUG 492 if (ldebug(ustat)) 493 printf(ARGS(ustat, "%d, *"), args->dev); 494 #endif 495 496 return (EOPNOTSUPP); 497 } 498 499 #if defined(__i386__) || (defined(__amd64__) && defined(COMPAT_LINUX32)) 500 501 static int 502 stat64_copyout(struct stat *buf, void *ubuf) 503 { 504 struct l_stat64 lbuf; 505 506 bzero(&lbuf, sizeof(lbuf)); 507 lbuf.st_dev = minor(buf->st_dev) | (major(buf->st_dev) << 8); 508 lbuf.st_ino = buf->st_ino; 509 lbuf.st_mode = buf->st_mode; 510 lbuf.st_nlink = buf->st_nlink; 511 lbuf.st_uid = buf->st_uid; 512 lbuf.st_gid = buf->st_gid; 513 lbuf.st_rdev = buf->st_rdev; 514 lbuf.st_size = buf->st_size; 515 lbuf.st_atim.tv_sec = buf->st_atim.tv_sec; 516 lbuf.st_atim.tv_nsec = buf->st_atim.tv_nsec; 517 lbuf.st_mtim.tv_sec = buf->st_mtim.tv_sec; 518 lbuf.st_mtim.tv_nsec = buf->st_mtim.tv_nsec; 519 lbuf.st_ctim.tv_sec = buf->st_ctim.tv_sec; 520 lbuf.st_ctim.tv_nsec = buf->st_ctim.tv_nsec; 521 lbuf.st_blksize = buf->st_blksize; 522 lbuf.st_blocks = buf->st_blocks; 523 524 /* 525 * The __st_ino field makes all the difference. In the Linux kernel 526 * it is conditionally compiled based on STAT64_HAS_BROKEN_ST_INO, 527 * but without the assignment to __st_ino the runtime linker refuses 528 * to mmap(2) any shared libraries. I guess it's broken alright :-) 529 */ 530 lbuf.__st_ino = buf->st_ino; 531 532 return (copyout(&lbuf, ubuf, sizeof(lbuf))); 533 } 534 535 int 536 linux_stat64(struct thread *td, struct linux_stat64_args *args) 537 { 538 struct stat buf; 539 char *filename; 540 int error; 541 542 LCONVPATHEXIST(td, args->filename, &filename); 543 544 #ifdef DEBUG 545 if (ldebug(stat64)) 546 printf(ARGS(stat64, "%s, *"), filename); 547 #endif 548 549 error = linux_kern_stat(td, filename, UIO_SYSSPACE, &buf); 550 LFREEPATH(filename); 551 if (error) 552 return (error); 553 return (stat64_copyout(&buf, args->statbuf)); 554 } 555 556 int 557 linux_lstat64(struct thread *td, struct linux_lstat64_args *args) 558 { 559 struct stat sb; 560 char *filename; 561 int error; 562 563 LCONVPATHEXIST(td, args->filename, &filename); 564 565 #ifdef DEBUG 566 if (ldebug(lstat64)) 567 printf(ARGS(lstat64, "%s, *"), args->filename); 568 #endif 569 570 error = linux_kern_lstat(td, filename, UIO_SYSSPACE, &sb); 571 LFREEPATH(filename); 572 if (error) 573 return (error); 574 return (stat64_copyout(&sb, args->statbuf)); 575 } 576 577 int 578 linux_fstat64(struct thread *td, struct linux_fstat64_args *args) 579 { 580 struct stat buf; 581 int error; 582 583 #ifdef DEBUG 584 if (ldebug(fstat64)) 585 printf(ARGS(fstat64, "%d, *"), args->fd); 586 #endif 587 588 error = kern_fstat(td, args->fd, &buf); 589 translate_fd_major_minor(td, args->fd, &buf); 590 if (!error) 591 error = stat64_copyout(&buf, args->statbuf); 592 593 return (error); 594 } 595 596 int 597 linux_fstatat64(struct thread *td, struct linux_fstatat64_args *args) 598 { 599 char *path; 600 int error, dfd, flag; 601 struct stat buf; 602 603 if (args->flag & ~LINUX_AT_SYMLINK_NOFOLLOW) 604 return (EINVAL); 605 flag = (args->flag & LINUX_AT_SYMLINK_NOFOLLOW) ? 606 AT_SYMLINK_NOFOLLOW : 0; 607 608 dfd = (args->dfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->dfd; 609 LCONVPATHEXIST_AT(td, args->pathname, &path, dfd); 610 611 #ifdef DEBUG 612 if (ldebug(fstatat64)) 613 printf(ARGS(fstatat64, "%i, %s, %i"), args->dfd, path, args->flag); 614 #endif 615 616 error = linux_kern_statat(td, flag, dfd, path, UIO_SYSSPACE, &buf); 617 if (!error) 618 error = stat64_copyout(&buf, args->statbuf); 619 LFREEPATH(path); 620 621 return (error); 622 } 623 624 #endif /* __i386__ || (__amd64__ && COMPAT_LINUX32) */ 625