sys/compat/linux/linux_stats.c

   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 #include "opt_mac.h"
  34
  35 #include <sys/param.h>
  36 #include <sys/dirent.h>
  37 #include <sys/file.h>
  38 #include <sys/filedesc.h>
  39 #include <sys/proc.h>
  40 #include <sys/jail.h>
  41 #include <sys/malloc.h>
  42 #include <sys/mount.h>
  43 #include <sys/namei.h>
  44 #include <sys/stat.h>
  45 #include <sys/syscallsubr.h>
  46 #include <sys/systm.h>
  47 #include <sys/vnode.h>
  48 #include <sys/conf.h>
  49 #include <sys/fcntl.h>
  50
  51 #ifdef COMPAT_LINUX32
  52 #include <machine/../linux32/linux.h>
  53 #include <machine/../linux32/linux32_proto.h>
  54 #else
  55 #include <machine/../linux/linux.h>
  56 #include <machine/../linux/linux_proto.h>
  57 #endif
  58
  59 #include <compat/linux/linux_util.h>
  60
  61 #include <security/mac/mac_framework.h>
  62
  63 /*
  64  * XXX: This was removed from newstat_copyout(), and almost identical
  65  * XXX: code was in stat64_copyout().  findcdev() needs to be replaced
  66  * XXX: with something that does lookup and locking properly.
  67  * XXX: When somebody fixes this: please try to avoid duplicating it.
  68  */
  69 #if 0
  70 static void
  71 disk_foo(struct somestat *tbuf)
  72 {
  73         struct cdevsw *cdevsw;
  74         struct cdev *dev;
  75
  76         /* Lie about disk drives which are character devices
  77          * in FreeBSD but block devices under Linux.
  78          */
  79         if (S_ISCHR(tbuf.st_mode) &&
  80             (dev = findcdev(buf->st_rdev)) != NULL) {
  81                 cdevsw = dev_refthread(dev);
  82                 if (cdevsw != NULL) {
  83                         if (cdevsw->d_flags & D_DISK) {
  84                                 tbuf.st_mode &= ~S_IFMT;
  85                                 tbuf.st_mode |= S_IFBLK;
  86
  87                                 /* XXX this may not be quite right */
  88                                 /* Map major number to 0 */
  89                                 tbuf.st_dev = uminor(buf->st_dev) & 0xf;
  90                                 tbuf.st_rdev = buf->st_rdev & 0xff;
  91                         }
  92                         dev_relthread(dev);
  93                 }
  94         }
  95
  96 }
  97 #endif
  98
  99 static void
 100 translate_fd_major_minor(struct thread *td, int fd, struct stat *buf)
 101 {
 102         struct file *fp;
 103         int major, minor;
 104
 105         if ((!S_ISCHR(buf->st_mode) && !S_ISBLK(buf->st_mode)) ||
 106             fget(td, fd, &fp) != 0)
 107                 return;
 108         if (fp->f_vnode != NULL &&
 109             fp->f_vnode->v_un.vu_cdev != NULL &&
 110             linux_driver_get_major_minor(fp->f_vnode->v_un.vu_cdev->si_name,
 111                                          &major, &minor) == 0)
 112                 buf->st_rdev = (major << 8 | minor);
 113         fdrop(fp, td);
 114 }
 115
 116 static void
 117 translate_path_major_minor(struct thread *td, char *path, struct stat *buf)
 118 {
 119         struct proc *p = td->td_proc;
 120         struct filedesc *fdp = p->p_fd;
 121         int fd;
 122         int temp;
 123
 124         if (!S_ISCHR(buf->st_mode) && !S_ISBLK(buf->st_mode))
 125                 return;
 126         temp = td->td_retval[0];
 127         if (kern_open(td, path, UIO_SYSSPACE, O_RDONLY, 0) != 0)
 128                 return;
 129         fd = td->td_retval[0];
 130         td->td_retval[0] = temp;
 131         translate_fd_major_minor(td, fd, buf);
 132         fdclose(fdp, fdp->fd_ofiles[fd], fd, td);
 133 }
 134
 135 static int
 136 newstat_copyout(struct stat *buf, void *ubuf)
 137 {
 138         struct l_newstat tbuf;
 139
 140         bzero(&tbuf, sizeof(tbuf));
 141         tbuf.st_dev = uminor(buf->st_dev) | (umajor(buf->st_dev) << 8);
 142         tbuf.st_ino = buf->st_ino;
 143         tbuf.st_mode = buf->st_mode;
 144         tbuf.st_nlink = buf->st_nlink;
 145         tbuf.st_uid = buf->st_uid;
 146         tbuf.st_gid = buf->st_gid;
 147         tbuf.st_rdev = buf->st_rdev;
 148         tbuf.st_size = buf->st_size;
 149         tbuf.st_atime = buf->st_atime;
 150         tbuf.st_mtime = buf->st_mtime;
 151         tbuf.st_ctime = buf->st_ctime;
 152         tbuf.st_blksize = buf->st_blksize;
 153         tbuf.st_blocks = buf->st_blocks;
 154
 155         return (copyout(&tbuf, ubuf, sizeof(tbuf)));
 156 }
 157
 158 int
 159 linux_newstat(struct thread *td, struct linux_newstat_args *args)
 160 {
 161         struct stat buf;
 162         char *path;
 163         int error;
 164
 165         LCONVPATHEXIST(td, args->path, &path);
 166
 167 #ifdef DEBUG
 168         if (ldebug(newstat))
 169                 printf(ARGS(newstat, "%s, *"), path);
 170 #endif
 171
 172         error = kern_stat(td, path, UIO_SYSSPACE, &buf);
 173         if (!error) {
 174                 if (strlen(path) > strlen("/dev/pts/") &&
 175                     !strncmp(path, "/dev/pts/", strlen("/dev/pts/")) &&
 176                     path[9] >= '0' && path[9] <= '9') {
 177                         /*
 178                          * Linux checks major and minors of the slave device
 179                          * to make sure it's a pty device, so let's make him
 180                          * believe it is.
 181                          */
 182                         buf.st_rdev = (136 << 8);
 183                 } else
 184                         translate_path_major_minor(td, path, &buf);
 185         }
 186         LFREEPATH(path);
 187         if (error)
 188                 return (error);
 189         return (newstat_copyout(&buf, args->buf));
 190 }
 191
 192 int
 193 linux_newlstat(struct thread *td, struct linux_newlstat_args *args)
 194 {
 195         struct stat sb;
 196         char *path;
 197         int error;
 198
 199         LCONVPATHEXIST(td, args->path, &path);
 200
 201 #ifdef DEBUG
 202         if (ldebug(newlstat))
 203                 printf(ARGS(newlstat, "%s, *"), path);
 204 #endif
 205
 206         error = kern_lstat(td, path, UIO_SYSSPACE, &sb);
 207         if (!error)
 208                 translate_path_major_minor(td, path, &sb);
 209         LFREEPATH(path);
 210         if (error)
 211                 return (error);
 212         return (newstat_copyout(&sb, args->buf));
 213 }
 214
 215 int
 216 linux_newfstat(struct thread *td, struct linux_newfstat_args *args)
 217 {
 218         struct stat buf;
 219         int error;
 220
 221 #ifdef DEBUG
 222         if (ldebug(newfstat))
 223                 printf(ARGS(newfstat, "%d, *"), args->fd);
 224 #endif
 225
 226         error = kern_fstat(td, args->fd, &buf);
 227         translate_fd_major_minor(td, args->fd, &buf);
 228         if (!error)
 229                 error = newstat_copyout(&buf, args->buf);
 230
 231         return (error);
 232 }
 233
 234 static int
 235 stat_copyout(struct stat *buf, void *ubuf)
 236 {
 237         struct l_stat lbuf;
 238
 239         bzero(&lbuf, sizeof(lbuf));
 240         lbuf.st_dev = buf->st_dev;
 241         lbuf.st_ino = buf->st_ino;
 242         lbuf.st_mode = buf->st_mode;
 243         lbuf.st_nlink = buf->st_nlink;
 244         lbuf.st_uid = buf->st_uid;
 245         lbuf.st_gid = buf->st_gid;
 246         lbuf.st_rdev = buf->st_rdev;
 247         if (buf->st_size < (quad_t)1 << 32)
 248                 lbuf.st_size = buf->st_size;
 249         else
 250                 lbuf.st_size = -2;
 251         lbuf.st_atime = buf->st_atime;
 252         lbuf.st_mtime = buf->st_mtime;
 253         lbuf.st_ctime = buf->st_ctime;
 254         lbuf.st_blksize = buf->st_blksize;
 255         lbuf.st_blocks = buf->st_blocks;
 256         lbuf.st_flags = buf->st_flags;
 257         lbuf.st_gen = buf->st_gen;
 258
 259         return (copyout(&lbuf, ubuf, sizeof(lbuf)));
 260 }
 261
 262 int
 263 linux_stat(struct thread *td, struct linux_stat_args *args)
 264 {
 265         struct stat buf;
 266         char *path;
 267         int error;
 268
 269         LCONVPATHEXIST(td, args->path, &path);
 270
 271 #ifdef DEBUG
 272         if (ldebug(stat))
 273                 printf(ARGS(stat, "%s, *"), path);
 274 #endif
 275         error = kern_stat(td, path, UIO_SYSSPACE, &buf);
 276         if (error) {
 277                 LFREEPATH(path);
 278                 return (error);
 279         }
 280         translate_path_major_minor(td, path, &buf);
 281         LFREEPATH(path);
 282         return(stat_copyout(&buf, args->up));
 283 }
 284
 285 int
 286 linux_lstat(struct thread *td, struct linux_lstat_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(lstat))
 296                 printf(ARGS(lstat, "%s, *"), path);
 297 #endif
 298         error = kern_lstat(td, path, UIO_SYSSPACE, &buf);
 299         if (error) {
 300                 LFREEPATH(path);
 301                 return (error);
 302         }
 303         translate_path_major_minor(td, path, &buf);
 304         LFREEPATH(path);
 305         return(stat_copyout(&buf, args->up));
 306 }
 307
 308 /* XXX - All fields of type l_int are defined as l_long on i386 */
 309 struct l_statfs {
 310         l_int           f_type;
 311         l_int           f_bsize;
 312         l_int           f_blocks;
 313         l_int           f_bfree;
 314         l_int           f_bavail;
 315         l_int           f_files;
 316         l_int           f_ffree;
 317         l_fsid_t        f_fsid;
 318         l_int           f_namelen;
 319         l_int           f_spare[6];
 320 };
 321
 322 #define LINUX_CODA_SUPER_MAGIC  0x73757245L
 323 #define LINUX_EXT2_SUPER_MAGIC  0xEF53L
 324 #define LINUX_HPFS_SUPER_MAGIC  0xf995e849L
 325 #define LINUX_ISOFS_SUPER_MAGIC 0x9660L
 326 #define LINUX_MSDOS_SUPER_MAGIC 0x4d44L
 327 #define LINUX_NCP_SUPER_MAGIC   0x564cL
 328 #define LINUX_NFS_SUPER_MAGIC   0x6969L
 329 #define LINUX_NTFS_SUPER_MAGIC  0x5346544EL
 330 #define LINUX_PROC_SUPER_MAGIC  0x9fa0L
 331 #define LINUX_UFS_SUPER_MAGIC   0x00011954L     /* XXX - UFS_MAGIC in Linux */
 332 #define LINUX_DEVFS_SUPER_MAGIC 0x1373L
 333
 334 static long
 335 bsd_to_linux_ftype(const char *fstypename)
 336 {
 337         int i;
 338         static struct {const char *bsd_name; long linux_type;} b2l_tbl[] = {
 339                 {"ufs",     LINUX_UFS_SUPER_MAGIC},
 340                 {"cd9660",  LINUX_ISOFS_SUPER_MAGIC},
 341                 {"nfs",     LINUX_NFS_SUPER_MAGIC},
 342                 {"ext2fs",  LINUX_EXT2_SUPER_MAGIC},
 343                 {"procfs",  LINUX_PROC_SUPER_MAGIC},
 344                 {"msdosfs", LINUX_MSDOS_SUPER_MAGIC},
 345                 {"ntfs",    LINUX_NTFS_SUPER_MAGIC},
 346                 {"nwfs",    LINUX_NCP_SUPER_MAGIC},
 347                 {"hpfs",    LINUX_HPFS_SUPER_MAGIC},
 348                 {"coda",    LINUX_CODA_SUPER_MAGIC},
 349                 {"devfs",   LINUX_DEVFS_SUPER_MAGIC},
 350                 {NULL,      0L}};
 351
 352         for (i = 0; b2l_tbl[i].bsd_name != NULL; i++)
 353                 if (strcmp(b2l_tbl[i].bsd_name, fstypename) == 0)
 354                         return (b2l_tbl[i].linux_type);
 355
 356         return (0L);
 357 }
 358
 359 static void
 360 bsd_to_linux_statfs(struct statfs *bsd_statfs, struct l_statfs *linux_statfs)
 361 {
 362
 363         linux_statfs->f_type = bsd_to_linux_ftype(bsd_statfs->f_fstypename);
 364         linux_statfs->f_bsize = bsd_statfs->f_bsize;
 365         linux_statfs->f_blocks = bsd_statfs->f_blocks;
 366         linux_statfs->f_bfree = bsd_statfs->f_bfree;
 367         linux_statfs->f_bavail = bsd_statfs->f_bavail;
 368         linux_statfs->f_ffree = bsd_statfs->f_ffree;
 369         linux_statfs->f_files = bsd_statfs->f_files;
 370         linux_statfs->f_fsid.val[0] = bsd_statfs->f_fsid.val[0];
 371         linux_statfs->f_fsid.val[1] = bsd_statfs->f_fsid.val[1];
 372         linux_statfs->f_namelen = MAXNAMLEN;
 373 }
 374
 375 int
 376 linux_statfs(struct thread *td, struct linux_statfs_args *args)
 377 {
 378         struct l_statfs linux_statfs;
 379         struct statfs bsd_statfs;
 380         char *path;
 381         int error;
 382
 383         LCONVPATHEXIST(td, args->path, &path);
 384
 385 #ifdef DEBUG
 386         if (ldebug(statfs))
 387                 printf(ARGS(statfs, "%s, *"), path);
 388 #endif
 389         error = kern_statfs(td, path, UIO_SYSSPACE, &bsd_statfs);
 390         LFREEPATH(path);
 391         if (error)
 392                 return (error);
 393         bsd_to_linux_statfs(&bsd_statfs, &linux_statfs);
 394         return copyout(&linux_statfs, args->buf, sizeof(linux_statfs));
 395 }
 396
 397 static void
 398 bsd_to_linux_statfs64(struct statfs *bsd_statfs, struct l_statfs64 *linux_statfs)
 399 {
 400
 401         linux_statfs->f_type = bsd_to_linux_ftype(bsd_statfs->f_fstypename);
 402         linux_statfs->f_bsize = bsd_statfs->f_bsize;
 403         linux_statfs->f_blocks = bsd_statfs->f_blocks;
 404         linux_statfs->f_bfree = bsd_statfs->f_bfree;
 405         linux_statfs->f_bavail = bsd_statfs->f_bavail;
 406         linux_statfs->f_ffree = bsd_statfs->f_ffree;
 407         linux_statfs->f_files = bsd_statfs->f_files;
 408         linux_statfs->f_fsid.val[0] = bsd_statfs->f_fsid.val[0];
 409         linux_statfs->f_fsid.val[1] = bsd_statfs->f_fsid.val[1];
 410         linux_statfs->f_namelen = MAXNAMLEN;
 411 }
 412
 413 int
 414 linux_statfs64(struct thread *td, struct linux_statfs64_args *args)
 415 {
 416         struct l_statfs64 linux_statfs;
 417         struct statfs bsd_statfs;
 418         char *path;
 419         int error;
 420
 421         if (args->bufsize != sizeof(struct l_statfs64))
 422                 return EINVAL;
 423
 424         LCONVPATHEXIST(td, args->path, &path);
 425
 426 #ifdef DEBUG
 427         if (ldebug(statfs64))
 428                 printf(ARGS(statfs64, "%s, *"), path);
 429 #endif
 430         error = kern_statfs(td, path, UIO_SYSSPACE, &bsd_statfs);
 431         LFREEPATH(path);
 432         if (error)
 433                 return (error);
 434         bsd_to_linux_statfs64(&bsd_statfs, &linux_statfs);
 435         return copyout(&linux_statfs, args->buf, sizeof(linux_statfs));
 436 }
 437
 438 int
 439 linux_fstatfs(struct thread *td, struct linux_fstatfs_args *args)
 440 {
 441         struct l_statfs linux_statfs;
 442         struct statfs bsd_statfs;
 443         int error;
 444
 445 #ifdef DEBUG
 446         if (ldebug(fstatfs))
 447                 printf(ARGS(fstatfs, "%d, *"), args->fd);
 448 #endif
 449         error = kern_fstatfs(td, args->fd, &bsd_statfs);
 450         if (error)
 451                 return error;
 452         bsd_to_linux_statfs(&bsd_statfs, &linux_statfs);
 453         return copyout(&linux_statfs, args->buf, sizeof(linux_statfs));
 454 }
 455
 456 struct l_ustat
 457 {
 458         l_daddr_t       f_tfree;
 459         l_ino_t         f_tinode;
 460         char            f_fname[6];
 461         char            f_fpack[6];
 462 };
 463
 464 int
 465 linux_ustat(struct thread *td, struct linux_ustat_args *args)
 466 {
 467 #ifdef DEBUG
 468         if (ldebug(ustat))
 469                 printf(ARGS(ustat, "%d, *"), args->dev);
 470 #endif
 471
 472         return (EOPNOTSUPP);
 473 }
 474
 475 #if defined(__i386__) || (defined(__amd64__) && defined(COMPAT_LINUX32))
 476
 477 static int
 478 stat64_copyout(struct stat *buf, void *ubuf)
 479 {
 480         struct l_stat64 lbuf;
 481
 482         bzero(&lbuf, sizeof(lbuf));
 483         lbuf.st_dev = uminor(buf->st_dev) | (umajor(buf->st_dev) << 8);
 484         lbuf.st_ino = buf->st_ino;
 485         lbuf.st_mode = buf->st_mode;
 486         lbuf.st_nlink = buf->st_nlink;
 487         lbuf.st_uid = buf->st_uid;
 488         lbuf.st_gid = buf->st_gid;
 489         lbuf.st_rdev = buf->st_rdev;
 490         lbuf.st_size = buf->st_size;
 491         lbuf.st_atime = buf->st_atime;
 492         lbuf.st_mtime = buf->st_mtime;
 493         lbuf.st_ctime = buf->st_ctime;
 494         lbuf.st_blksize = buf->st_blksize;
 495         lbuf.st_blocks = buf->st_blocks;
 496
 497         /*
 498          * The __st_ino field makes all the difference. In the Linux kernel
 499          * it is conditionally compiled based on STAT64_HAS_BROKEN_ST_INO,
 500          * but without the assignment to __st_ino the runtime linker refuses
 501          * to mmap(2) any shared libraries. I guess it's broken alright :-)
 502          */
 503         lbuf.__st_ino = buf->st_ino;
 504
 505         return (copyout(&lbuf, ubuf, sizeof(lbuf)));
 506 }
 507
 508 int
 509 linux_stat64(struct thread *td, struct linux_stat64_args *args)
 510 {
 511         struct stat buf;
 512         char *filename;
 513         int error;
 514
 515         LCONVPATHEXIST(td, args->filename, &filename);
 516
 517 #ifdef DEBUG
 518         if (ldebug(stat64))
 519                 printf(ARGS(stat64, "%s, *"), filename);
 520 #endif
 521
 522         error = kern_stat(td, filename, UIO_SYSSPACE, &buf);
 523         if (!error) {
 524                 if (strlen(filename) > strlen("/dev/pts/") &&
 525                     !strncmp(filename, "/dev/pts/", strlen("/dev/pts/")) &&
 526                     filename[9] >= '0' && filename[9] <= '9') {
 527                         /*
 528                          * Linux checks major and minors of the slave device
 529                          * to make sure it's a pty deivce, so let's make him
 530                          * believe it is.
 531                          */
 532                         buf.st_rdev = (136 << 8);
 533                 } else
 534                         translate_path_major_minor(td, filename, &buf);
 535         }
 536         LFREEPATH(filename);
 537         if (error)
 538                 return (error);
 539         return (stat64_copyout(&buf, args->statbuf));
 540 }
 541
 542 int
 543 linux_lstat64(struct thread *td, struct linux_lstat64_args *args)
 544 {
 545         struct stat sb;
 546         char *filename;
 547         int error;
 548
 549         LCONVPATHEXIST(td, args->filename, &filename);
 550
 551 #ifdef DEBUG
 552         if (ldebug(lstat64))
 553                 printf(ARGS(lstat64, "%s, *"), args->filename);
 554 #endif
 555
 556         error = kern_lstat(td, filename, UIO_SYSSPACE, &sb);
 557         if (!error)
 558                 translate_path_major_minor(td, filename, &sb);
 559         LFREEPATH(filename);
 560         if (error)
 561                 return (error);
 562         return (stat64_copyout(&sb, args->statbuf));
 563 }
 564
 565 int
 566 linux_fstat64(struct thread *td, struct linux_fstat64_args *args)
 567 {
 568         struct stat buf;
 569         int error;
 570
 571 #ifdef DEBUG
 572         if (ldebug(fstat64))
 573                 printf(ARGS(fstat64, "%d, *"), args->fd);
 574 #endif
 575
 576         error = kern_fstat(td, args->fd, &buf);
 577         translate_fd_major_minor(td, args->fd, &buf);
 578         if (!error)
 579                 error = stat64_copyout(&buf, args->statbuf);
 580
 581         return (error);
 582 }
 583
 584 #endif /* __i386__ || (__amd64__ && COMPAT_LINUX32) */