sys/vfs/isofs/cd9660/cd9660_vfsops.c

   1 /*-
   2  * Copyright (c) 1994
   3  *      The Regents of the University of California.  All rights reserved.
   4  *
   5  * This code is derived from software contributed to Berkeley
   6  * by Pace Willisson (pace@blitz.com).  The Rock Ridge Extension
   7  * Support code is derived from software contributed to Berkeley
   8  * by Atsushi Murai (amurai@spec.co.jp).
   9  *
  10  * Redistribution and use in source and binary forms, with or without
  11  * modification, are permitted provided that the following conditions
  12  * are met:
  13  * 1. Redistributions of source code must retain the above copyright
  14  *    notice, this list of conditions and the following disclaimer.
  15  * 2. Redistributions in binary form must reproduce the above copyright
  16  *    notice, this list of conditions and the following disclaimer in the
  17  *    documentation and/or other materials provided with the distribution.
  18  * 3. All advertising materials mentioning features or use of this software
  19  *    must display the following acknowledgement:
  20  *      This product includes software developed by the University of
  21  *      California, Berkeley and its contributors.
  22  * 4. Neither the name of the University nor the names of its contributors
  23  *    may be used to endorse or promote products derived from this software
  24  *    without specific prior written permission.
  25  *
  26  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  27  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  28  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  29  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  30  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  31  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  32  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  33  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  34  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  35  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  36  * SUCH DAMAGE.
  37  *
  38  *      @(#)cd9660_vfsops.c     8.18 (Berkeley) 5/22/95
  39  * $FreeBSD: src/sys/isofs/cd9660/cd9660_vfsops.c,v 1.74.2.7 2002/04/08 09:39:29 bde Exp $
  40  * $DragonFly: src/sys/vfs/isofs/cd9660/cd9660_vfsops.c,v 1.32 2006/04/01 21:55:13 dillon Exp $
  41  */
  42
  43 #include <sys/param.h>
  44 #include <sys/systm.h>
  45 #include <sys/proc.h>
  46 #include <sys/nlookup.h>
  47 #include <sys/kernel.h>
  48 #include <sys/vnode.h>
  49 #include <sys/mount.h>
  50 #include <sys/buf.h>
  51 #include <sys/cdio.h>
  52 #include <sys/conf.h>
  53 #include <sys/fcntl.h>
  54 #include <sys/malloc.h>
  55 #include <sys/stat.h>
  56 #include <sys/syslog.h>
  57
  58 #include <vm/vm_zone.h>
  59
  60 #include "iso.h"
  61 #include "iso_rrip.h"
  62 #include "cd9660_node.h"
  63 #include "cd9660_mount.h"
  64
  65 extern struct vnodeopv_entry_desc cd9660_vnodeop_entries[];
  66 extern struct vnodeopv_entry_desc cd9660_specop_entries[];
  67 extern struct vnodeopv_entry_desc cd9660_fifoop_entries[];
  68
  69 MALLOC_DEFINE(M_ISOFSMNT, "ISOFS mount", "ISOFS mount structure");
  70 MALLOC_DEFINE(M_ISOFSNODE, "ISOFS node", "ISOFS vnode private part");
  71
  72 static int cd9660_mount (struct mount *, char *, caddr_t, struct thread *);
  73 static int cd9660_unmount (struct mount *, int, struct thread *);
  74 static int cd9660_root (struct mount *, struct vnode **);
  75 static int cd9660_statfs (struct mount *, struct statfs *, struct thread *);
  76 static int cd9660_vget (struct mount *, ino_t, struct vnode **);
  77 static int cd9660_fhtovp (struct mount *, struct fid *, struct vnode **);
  78 static int cd9660_checkexp (struct mount *, struct sockaddr *,
  79             int *, struct ucred **);
  80 static int cd9660_vptofh (struct vnode *, struct fid *);
  81
  82 static struct vfsops cd9660_vfsops = {
  83         .vfs_mount =            cd9660_mount,
  84         .vfs_unmount =          cd9660_unmount,
  85         .vfs_root =             cd9660_root,
  86         .vfs_statfs =           cd9660_statfs,
  87         .vfs_sync =             vfs_stdsync,
  88         .vfs_vget =             cd9660_vget,
  89         .vfs_fhtovp =           cd9660_fhtovp,
  90         .vfs_checkexp =         cd9660_checkexp,
  91         .vfs_vptofh =           cd9660_vptofh,
  92         .vfs_init =             cd9660_init,
  93         .vfs_uninit =           cd9660_uninit,
  94 };
  95 VFS_SET(cd9660_vfsops, cd9660, VFCF_READONLY);
  96 MODULE_VERSION(cd9660, 1);
  97
  98
  99 /*
 100  * Called by vfs_mountroot when iso is going to be mounted as root.
 101  */
 102
 103 static int iso_get_ssector (dev_t dev, struct thread *td);
 104 static int iso_mountfs (struct vnode *devvp, struct mount *mp,
 105                             struct thread *td, struct iso_args *argp);
 106
 107 /*
 108  * Try to find the start of the last data track on this CD-ROM.  This
 109  * is used to mount the last session of a multi-session CD.  Bail out
 110  * and return 0 if we fail, this is always a safe bet.
 111  */
 112 static int
 113 iso_get_ssector(dev_t dev, struct thread *td)
 114 {
 115         struct ioc_toc_header h;
 116         struct ioc_read_toc_single_entry t;
 117         int i;
 118
 119         if (dev_dioctl(dev, CDIOREADTOCHEADER, (caddr_t)&h, FREAD, td) != 0)
 120                 return 0;
 121
 122         for (i = h.ending_track; i >= 0; i--) {
 123                 t.address_format = CD_LBA_FORMAT;
 124                 t.track = i;
 125                 if (dev_dioctl(dev, CDIOREADTOCENTRY, (caddr_t)&t, FREAD, td) != 0) {
 126                         return 0;
 127                 }
 128                 if ((t.entry.control & 4) != 0)
 129                         /* found a data track */
 130                         break;
 131         }
 132
 133         if (i < 0)
 134                 return 0;
 135
 136         return ntohl(t.entry.addr.lba);
 137 }
 138
 139 static int iso_mountroot (struct mount *mp, struct thread *td);
 140
 141 static int
 142 iso_mountroot(struct mount *mp, struct thread *td)
 143 {
 144         struct iso_args args;
 145         struct vnode *rootvp;
 146         int error;
 147
 148         if ((error = bdevvp(rootdev, &rootvp))) {
 149                 printf("iso_mountroot: can't find rootvp\n");
 150                 return (error);
 151         }
 152         args.flags = ISOFSMNT_ROOT;
 153
 154         vn_lock(rootvp, LK_EXCLUSIVE | LK_RETRY, td);
 155         error = VOP_OPEN(rootvp, FREAD, FSCRED, NULL, td);
 156         VOP_UNLOCK(rootvp, 0, td);
 157         if (error)
 158                 return (error);
 159
 160         args.ssector = iso_get_ssector(rootdev, td);
 161
 162         VOP_CLOSE(rootvp, FREAD, td);
 163
 164         if (bootverbose)
 165                 printf("iso_mountroot(): using session at block %d\n",
 166                        args.ssector);
 167         if ((error = iso_mountfs(rootvp, mp, td, &args)) != 0)
 168                 return (error);
 169
 170         cd9660_statfs(mp, &mp->mnt_stat, td);
 171         return (0);
 172 }
 173
 174 /*
 175  * VFS Operations.
 176  *
 177  * mount system call
 178  */
 179 static int
 180 cd9660_mount(struct mount *mp, char *path, caddr_t data, struct thread *td)
 181 {
 182         struct vnode *devvp;
 183         struct iso_args args;
 184         size_t size;
 185         int error;
 186         mode_t accessmode;
 187         struct iso_mnt *imp = 0;
 188         struct nlookupdata nd;
 189
 190         if ((mp->mnt_flag & (MNT_ROOTFS|MNT_UPDATE)) == MNT_ROOTFS) {
 191                 return (iso_mountroot(mp, td));
 192         }
 193         if ((error = copyin(data, (caddr_t)&args, sizeof (struct iso_args))))
 194                 return (error);
 195
 196         if ((mp->mnt_flag & MNT_RDONLY) == 0)
 197                 return (EROFS);
 198
 199         KKASSERT(td->td_proc);
 200
 201         /*
 202          * If updating, check whether changing from read-only to
 203          * read/write; if there is no device name, that's all we do.
 204          */
 205         if (mp->mnt_flag & MNT_UPDATE) {
 206                 imp = VFSTOISOFS(mp);
 207                 if (args.fspec == 0)
 208                         return (vfs_export(mp, &imp->im_export, &args.export));
 209         }
 210         /*
 211          * Not an update, or updating the name: look up the name
 212          * and verify that it refers to a sensible block device.
 213          */
 214         devvp = NULL;
 215         error = nlookup_init(&nd, args.fspec, UIO_USERSPACE, NLC_FOLLOW);
 216         if (error == 0)
 217                 error = nlookup(&nd);
 218         if (error == 0)
 219                 error = cache_vref(nd.nl_ncp, nd.nl_cred, &devvp);
 220         nlookup_done(&nd);
 221         if (error)
 222                 return (error);
 223
 224         if (!vn_isdisk(devvp, &error)) {
 225                 vrele(devvp);
 226                 return (error);
 227         }
 228
 229         /*
 230          * Verify that user has necessary permissions on the device,
 231          * or has superuser abilities
 232          */
 233         accessmode = VREAD;
 234         vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY, td);
 235         error = VOP_ACCESS(devvp, accessmode, td->td_proc->p_ucred, td);
 236         if (error)
 237                 error = suser(td);
 238         if (error) {
 239                 vput(devvp);
 240                 return (error);
 241         }
 242         VOP_UNLOCK(devvp, 0, td);
 243
 244         if ((mp->mnt_flag & MNT_UPDATE) == 0) {
 245                 error = iso_mountfs(devvp, mp, td, &args);
 246         } else {
 247                 if (devvp != imp->im_devvp)
 248                         error = EINVAL; /* needs translation */
 249                 else
 250                         vrele(devvp);
 251         }
 252         if (error) {
 253                 vrele(devvp);
 254                 return error;
 255         }
 256         imp = VFSTOISOFS(mp);
 257         copyinstr(args.fspec, mp->mnt_stat.f_mntfromname, MNAMELEN - 1,
 258             &size);
 259         bzero(mp->mnt_stat.f_mntfromname + size, MNAMELEN - size);
 260         cd9660_statfs(mp, &mp->mnt_stat, td);
 261         return 0;
 262 }
 263
 264 /*
 265  * Common code for mount and mountroot
 266  */
 267 static int
 268 iso_mountfs(struct vnode *devvp, struct mount *mp, struct thread *td,
 269             struct iso_args *argp)
 270 {
 271         struct iso_mnt *isomp = NULL;
 272         struct buf *bp = NULL;
 273         struct buf *pribp = NULL, *supbp = NULL;
 274         dev_t dev;
 275         int error = EINVAL;
 276         int needclose = 0;
 277         int high_sierra = 0;
 278         int iso_bsize;
 279         int iso_blknum;
 280         int joliet_level;
 281         struct iso_volume_descriptor *vdp = 0;
 282         struct iso_primary_descriptor *pri = NULL;
 283         struct iso_sierra_primary_descriptor *pri_sierra = NULL;
 284         struct iso_supplementary_descriptor *sup = NULL;
 285         struct iso_directory_record *rootp;
 286         int logical_block_size;
 287
 288         if (!(mp->mnt_flag & MNT_RDONLY))
 289                 return EROFS;
 290
 291         /*
 292          * Disallow multiple mounts of the same device.
 293          * Disallow mounting of a device that is currently in use
 294          * Flush out any old buffers remaining from a previous use.
 295          */
 296         if ((error = vfs_mountedon(devvp)))
 297                 return error;
 298         if (count_udev(devvp->v_udev) > 0)
 299                 return EBUSY;
 300         if ((error = vinvalbuf(devvp, V_SAVE, td, 0, 0)))
 301                 return (error);
 302
 303         vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY, td);
 304         error = VOP_OPEN(devvp, FREAD, FSCRED, NULL, td);
 305         VOP_UNLOCK(devvp, 0, td);
 306         if (error)
 307                 return error;
 308         dev = devvp->v_rdev;
 309         if (dev->si_iosize_max != 0)
 310                 mp->mnt_iosize_max = dev->si_iosize_max;
 311         if (mp->mnt_iosize_max > MAXPHYS)
 312                 mp->mnt_iosize_max = MAXPHYS;
 313
 314         needclose = 1;
 315
 316         /* This is the "logical sector size".  The standard says this
 317          * should be 2048 or the physical sector size on the device,
 318          * whichever is greater.  For now, we'll just use a constant.
 319          */
 320         iso_bsize = ISO_DEFAULT_BLOCK_SIZE;
 321
 322         joliet_level = 0;
 323         for (iso_blknum = 16 + argp->ssector;
 324              iso_blknum < 100 + argp->ssector;
 325              iso_blknum++) {
 326                 if ((error = bread(devvp, (off_t)iso_blknum * iso_bsize,
 327                                   iso_bsize, &bp)) != 0)
 328                         goto out;
 329
 330                 vdp = (struct iso_volume_descriptor *)bp->b_data;
 331                 if (bcmp (vdp->id, ISO_STANDARD_ID, sizeof vdp->id) != 0) {
 332                         if (bcmp (vdp->id_sierra, ISO_SIERRA_ID,
 333                                   sizeof vdp->id) != 0) {
 334                                 error = EINVAL;
 335                                 goto out;
 336                         } else
 337                                 high_sierra = 1;
 338                 }
 339                 switch (isonum_711 (high_sierra? vdp->type_sierra: vdp->type)){
 340                 case ISO_VD_PRIMARY:
 341                         if (pribp == NULL) {
 342                                 pribp = bp;
 343                                 bp = NULL;
 344                                 pri = (struct iso_primary_descriptor *)vdp;
 345                                 pri_sierra =
 346                                   (struct iso_sierra_primary_descriptor *)vdp;
 347                         }
 348                         break;
 349
 350                 case ISO_VD_SUPPLEMENTARY:
 351                         if (supbp == NULL) {
 352                                 supbp = bp;
 353                                 bp = NULL;
 354                                 sup = (struct iso_supplementary_descriptor *)vdp;
 355
 356                                 if (!(argp->flags & ISOFSMNT_NOJOLIET)) {
 357                                         if (bcmp(sup->escape, "%/@", 3) == 0)
 358                                                 joliet_level = 1;
 359                                         if (bcmp(sup->escape, "%/C", 3) == 0)
 360                                                 joliet_level = 2;
 361                                         if (bcmp(sup->escape, "%/E", 3) == 0)
 362                                                 joliet_level = 3;
 363
 364                                         if ((isonum_711 (sup->flags) & 1) &&
 365                                             (argp->flags & ISOFSMNT_BROKENJOLIET) == 0)
 366                                                 joliet_level = 0;
 367                                 }
 368                         }
 369                         break;
 370
 371                 case ISO_VD_END:
 372                         goto vd_end;
 373
 374                 default:
 375                         break;
 376                 }
 377                 if (bp) {
 378                         brelse(bp);
 379                         bp = NULL;
 380                 }
 381         }
 382  vd_end:
 383         if (bp) {
 384                 brelse(bp);
 385                 bp = NULL;
 386         }
 387
 388         if (pri == NULL) {
 389                 error = EINVAL;
 390                 goto out;
 391         }
 392
 393         logical_block_size =
 394                 isonum_723 (high_sierra?
 395                             pri_sierra->logical_block_size:
 396                             pri->logical_block_size);
 397
 398         if (logical_block_size < DEV_BSIZE || logical_block_size > MAXBSIZE
 399             || (logical_block_size & (logical_block_size - 1)) != 0) {
 400                 error = EINVAL;
 401                 goto out;
 402         }
 403
 404         rootp = (struct iso_directory_record *)
 405                 (high_sierra?
 406                  pri_sierra->root_directory_record:
 407                  pri->root_directory_record);
 408
 409         isomp = malloc(sizeof *isomp, M_ISOFSMNT, M_WAITOK | M_ZERO);
 410         isomp->logical_block_size = logical_block_size;
 411         isomp->volume_space_size =
 412                 isonum_733 (high_sierra?
 413                             pri_sierra->volume_space_size:
 414                             pri->volume_space_size);
 415         isomp->joliet_level = 0;
 416         /*
 417          * Since an ISO9660 multi-session CD can also access previous
 418          * sessions, we have to include them into the space consider-
 419          * ations.  This doesn't yield a very accurate number since
 420          * parts of the old sessions might be inaccessible now, but we
 421          * can't do much better.  This is also important for the NFS
 422          * filehandle validation.
 423          */
 424         isomp->volume_space_size += argp->ssector;
 425         bcopy (rootp, isomp->root, sizeof isomp->root);
 426         isomp->root_extent = isonum_733 (rootp->extent);
 427         isomp->root_size = isonum_733 (rootp->size);
 428
 429         isomp->im_bmask = logical_block_size - 1;
 430         isomp->im_bshift = ffs(logical_block_size) - 1;
 431
 432         pribp->b_flags |= B_AGE;
 433         brelse(pribp);
 434         pribp = NULL;
 435
 436         mp->mnt_data = (qaddr_t)isomp;
 437         mp->mnt_stat.f_fsid.val[0] = dev2udev(dev);
 438         mp->mnt_stat.f_fsid.val[1] = mp->mnt_vfc->vfc_typenum;
 439         mp->mnt_maxsymlinklen = 0;
 440         mp->mnt_flag |= MNT_LOCAL;
 441         isomp->im_mountp = mp;
 442         isomp->im_dev = dev;
 443         isomp->im_devvp = devvp;
 444
 445         dev->si_mountpoint = mp;
 446
 447         /* Check the Rock Ridge Extention support */
 448         if (!(argp->flags & ISOFSMNT_NORRIP)) {
 449                 if ((error = bread(isomp->im_devvp,
 450                                   lblktooff(isomp, isomp->root_extent + isonum_711(rootp->ext_attr_length)),
 451                                   isomp->logical_block_size, &bp)) != 0)
 452                     goto out;
 453
 454                 rootp = (struct iso_directory_record *)bp->b_data;
 455
 456                 if ((isomp->rr_skip = cd9660_rrip_offset(rootp,isomp)) < 0) {
 457                     argp->flags  |= ISOFSMNT_NORRIP;
 458                 } else {
 459                     argp->flags  &= ~ISOFSMNT_GENS;
 460                 }
 461
 462                 /*
 463                  * The contents are valid,
 464                  * but they will get reread as part of another vnode, so...
 465                  */
 466                 bp->b_flags |= B_AGE;
 467                 brelse(bp);
 468                 bp = NULL;
 469         }
 470         isomp->im_flags = argp->flags & (ISOFSMNT_NORRIP | ISOFSMNT_GENS |
 471                                          ISOFSMNT_EXTATT | ISOFSMNT_NOJOLIET);
 472
 473         if (high_sierra) {
 474                 /* this effectively ignores all the mount flags */
 475                 log(LOG_INFO, "cd9660: High Sierra Format\n");
 476                 isomp->iso_ftype = ISO_FTYPE_HIGH_SIERRA;
 477         } else {
 478                 switch (isomp->im_flags&(ISOFSMNT_NORRIP|ISOFSMNT_GENS)) {
 479                   default:
 480                           isomp->iso_ftype = ISO_FTYPE_DEFAULT;
 481                           break;
 482                   case ISOFSMNT_GENS|ISOFSMNT_NORRIP:
 483                           isomp->iso_ftype = ISO_FTYPE_9660;
 484                           break;
 485                   case 0:
 486                           log(LOG_INFO, "cd9660: RockRidge Extension\n");
 487                           isomp->iso_ftype = ISO_FTYPE_RRIP;
 488                           break;
 489                 }
 490         }
 491
 492         /* Decide whether to use the Joliet descriptor */
 493
 494         if (isomp->iso_ftype != ISO_FTYPE_RRIP && joliet_level) {
 495                 log(LOG_INFO, "cd9660: Joliet Extension (Level %d)\n", joliet_level);
 496                 rootp = (struct iso_directory_record *)
 497                         sup->root_directory_record;
 498                 bcopy (rootp, isomp->root, sizeof isomp->root);
 499                 isomp->root_extent = isonum_733 (rootp->extent);
 500                 isomp->root_size = isonum_733 (rootp->size);
 501                 isomp->joliet_level = joliet_level;
 502                 supbp->b_flags |= B_AGE;
 503         }
 504
 505         if (supbp) {
 506                 brelse(supbp);
 507                 supbp = NULL;
 508         }
 509
 510         vfs_add_vnodeops(mp, &mp->mnt_vn_norm_ops,
 511                          cd9660_vnodeop_entries, 0);
 512         vfs_add_vnodeops(mp, &mp->mnt_vn_spec_ops,
 513                          cd9660_specop_entries, 0);
 514         vfs_add_vnodeops(mp, &mp->mnt_vn_fifo_ops,
 515                          cd9660_fifoop_entries, 0);
 516
 517         return 0;
 518 out:
 519         dev->si_mountpoint = NULL;
 520         if (bp)
 521                 brelse(bp);
 522         if (pribp)
 523                 brelse(pribp);
 524         if (supbp)
 525                 brelse(supbp);
 526         if (needclose)
 527                 VOP_CLOSE(devvp, FREAD, td);
 528         if (isomp) {
 529                 free((caddr_t)isomp, M_ISOFSMNT);
 530                 mp->mnt_data = (qaddr_t)0;
 531         }
 532         return error;
 533 }
 534
 535 /*
 536  * unmount system call
 537  */
 538 static int
 539 cd9660_unmount(struct mount *mp, int mntflags, struct thread *td)
 540 {
 541         struct iso_mnt *isomp;
 542         int error, flags = 0;
 543
 544         if (mntflags & MNT_FORCE)
 545                 flags |= FORCECLOSE;
 546 #if 0
 547         mntflushbuf(mp, 0);
 548         if (mntinvalbuf(mp))
 549                 return EBUSY;
 550 #endif
 551         if ((error = vflush(mp, 0, flags)))
 552                 return (error);
 553
 554         isomp = VFSTOISOFS(mp);
 555
 556         isomp->im_devvp->v_rdev->si_mountpoint = NULL;
 557         error = VOP_CLOSE(isomp->im_devvp, FREAD, td);
 558         vrele(isomp->im_devvp);
 559         free((caddr_t)isomp, M_ISOFSMNT);
 560         mp->mnt_data = (qaddr_t)0;
 561         mp->mnt_flag &= ~MNT_LOCAL;
 562         return (error);
 563 }
 564
 565 /*
 566  * Return root of a filesystem
 567  */
 568 static int
 569 cd9660_root(struct mount *mp, struct vnode **vpp)
 570 {
 571         struct iso_mnt *imp = VFSTOISOFS(mp);
 572         struct iso_directory_record *dp =
 573             (struct iso_directory_record *)imp->root;
 574         ino_t ino = isodirino(dp, imp);
 575
 576         /*
 577          * With RRIP we must use the `.' entry of the root directory.
 578          * Simply tell vget, that it's a relocated directory.
 579          */
 580         return (cd9660_vget_internal(mp, ino, vpp,
 581             imp->iso_ftype == ISO_FTYPE_RRIP, dp));
 582 }
 583
 584 /*
 585  * Get file system statistics.
 586  */
 587 int
 588 cd9660_statfs(struct mount *mp, struct statfs *sbp, struct thread *td)
 589 {
 590         struct iso_mnt *isomp;
 591
 592         isomp = VFSTOISOFS(mp);
 593
 594         sbp->f_bsize = isomp->logical_block_size;
 595         sbp->f_iosize = sbp->f_bsize;   /* XXX */
 596         sbp->f_blocks = isomp->volume_space_size;
 597         sbp->f_bfree = 0; /* total free blocks */
 598         sbp->f_bavail = 0; /* blocks free for non superuser */
 599         sbp->f_files =  0; /* total files */
 600         sbp->f_ffree = 0; /* free file nodes */
 601         if (sbp != &mp->mnt_stat) {
 602                 sbp->f_type = mp->mnt_vfc->vfc_typenum;
 603                 bcopy(mp->mnt_stat.f_mntfromname, sbp->f_mntfromname, MNAMELEN);
 604         }
 605         return 0;
 606 }
 607
 608 /*
 609  * File handle to vnode
 610  *
 611  * Have to be really careful about stale file handles:
 612  * - check that the inode number is in range
 613  * - call iget() to get the locked inode
 614  * - check for an unallocated inode (i_mode == 0)
 615  * - check that the generation number matches
 616  */
 617
 618 struct ifid {
 619         ushort  ifid_len;
 620         ushort  ifid_pad;
 621         int     ifid_ino;
 622         long    ifid_start;
 623 };
 624
 625 /* ARGSUSED */
 626 int
 627 cd9660_fhtovp(struct mount *mp, struct fid *fhp, struct vnode **vpp)
 628 {
 629         struct ifid *ifhp = (struct ifid *)fhp;
 630         struct iso_node *ip;
 631         struct vnode *nvp;
 632         int error;
 633
 634 #ifdef  ISOFS_DBG
 635         printf("fhtovp: ino %d, start %ld\n",
 636                ifhp->ifid_ino, ifhp->ifid_start);
 637 #endif
 638
 639         if ((error = VFS_VGET(mp, ifhp->ifid_ino, &nvp)) != 0) {
 640                 *vpp = NULLVP;
 641                 return (error);
 642         }
 643         ip = VTOI(nvp);
 644         if (ip->inode.iso_mode == 0) {
 645                 vput(nvp);
 646                 *vpp = NULLVP;
 647                 return (ESTALE);
 648         }
 649         *vpp = nvp;
 650         return (0);
 651 }
 652
 653 int
 654 cd9660_checkexp(struct mount *mp, struct sockaddr *nam, int *exflagsp,
 655                 struct ucred **credanonp)
 656 {
 657         struct netcred *np;
 658         struct iso_mnt *imp;
 659
 660         imp = VFSTOISOFS(mp);
 661
 662         /*
 663          * Get the export permission structure for this <mp, client> tuple.
 664          */
 665         np = vfs_export_lookup(mp, &imp->im_export, nam);
 666         if (np == NULL)
 667                 return (EACCES);
 668
 669         *exflagsp = np->netc_exflags;
 670         *credanonp = &np->netc_anon;
 671         return (0);
 672 }
 673
 674 int
 675 cd9660_vget(struct mount *mp, ino_t ino, struct vnode **vpp)
 676 {
 677
 678         /*
 679          * XXXX
 680          * It would be nice if we didn't always set the `relocated' flag
 681          * and force the extra read, but I don't want to think about fixing
 682          * that right now.
 683          */
 684         return (cd9660_vget_internal(mp, ino, vpp,
 685 #if 0
 686             VFSTOISOFS(mp)->iso_ftype == ISO_FTYPE_RRIP,
 687 #else
 688             0,
 689 #endif
 690             (struct iso_directory_record *)0));
 691 }
 692
 693 int
 694 cd9660_vget_internal(struct mount *mp, ino_t ino, struct vnode **vpp,
 695                      int relocated, struct iso_directory_record *isodir)
 696 {
 697         /*struct thread *td = curthread;*/
 698         struct iso_mnt *imp;
 699         struct iso_node *ip;
 700         struct buf *bp;
 701         struct vnode *vp;
 702         dev_t dev;
 703         int error;
 704
 705         imp = VFSTOISOFS(mp);
 706         dev = imp->im_dev;
 707 again:
 708         if ((*vpp = cd9660_ihashget(dev, ino)) != NULLVP)
 709                 return (0);
 710
 711         /* Allocate a new vnode/iso_node. */
 712         error = getnewvnode(VT_ISOFS, mp, &vp, 0, 0);
 713         if (error) {
 714                 *vpp = NULLVP;
 715                 return (error);
 716         }
 717         MALLOC(ip, struct iso_node *, sizeof(struct iso_node), M_ISOFSNODE,
 718             M_WAITOK);
 719         bzero((caddr_t)ip, sizeof(struct iso_node));
 720         ip->i_vnode = vp;
 721         ip->i_dev = dev;
 722         ip->i_number = ino;
 723
 724         /*
 725          * Insert it into the inode hash table and check for a collision.
 726          * If a collision occurs, throw away the vnode and try again.
 727          */
 728         if (cd9660_ihashins(ip) != 0) {
 729                 printf("debug: cd9660 ihashins collision, retrying\n");
 730                 vx_put(vp);
 731                 free(ip, M_ISOFSNODE);
 732                 goto again;
 733         }
 734         vp->v_data = ip;
 735
 736         if (isodir == NULL) {
 737                 int lbn, off;
 738
 739                 lbn = lblkno(imp, ino);
 740                 if (lbn >= imp->volume_space_size) {
 741                         vx_put(vp);
 742                         printf("fhtovp: lbn exceed volume space %d\n", lbn);
 743                         return (ESTALE);
 744                 }
 745
 746                 off = blkoff(imp, ino);
 747                 if (off + ISO_DIRECTORY_RECORD_SIZE > imp->logical_block_size) {
 748                         vx_put(vp);
 749                         printf("fhtovp: crosses block boundary %d\n",
 750                                off + ISO_DIRECTORY_RECORD_SIZE);
 751                         return (ESTALE);
 752                 }
 753
 754                 error = bread(imp->im_devvp,
 755                               lblktooff(imp, lbn),
 756                               imp->logical_block_size, &bp);
 757                 if (error) {
 758                         vx_put(vp);
 759                         brelse(bp);
 760                         printf("fhtovp: bread error %d\n",error);
 761                         return (error);
 762                 }
 763                 isodir = (struct iso_directory_record *)(bp->b_data + off);
 764
 765                 if (off + isonum_711(isodir->length) >
 766                     imp->logical_block_size) {
 767                         vx_put(vp);
 768                         if (bp != NULL)
 769                                 brelse(bp);
 770                         printf("fhtovp: directory crosses block boundary %d[off=%d/len=%d]\n",
 771                                off +isonum_711(isodir->length), off,
 772                                isonum_711(isodir->length));
 773                         return (ESTALE);
 774                 }
 775
 776 #if 0
 777                 if (isonum_733(isodir->extent) +
 778                     isonum_711(isodir->ext_attr_length) != ifhp->ifid_start) {
 779                         if (bp != NULL)
 780                                 brelse(bp);
 781                         printf("fhtovp: file start miss %d vs %d\n",
 782                                isonum_733(isodir->extent) + isonum_711(isodir->ext_attr_length),
 783                                ifhp->ifid_start);
 784                         return (ESTALE);
 785                 }
 786 #endif
 787         } else
 788                 bp = 0;
 789
 790         ip->i_mnt = imp;
 791         ip->i_devvp = imp->im_devvp;
 792         vref(ip->i_devvp);
 793
 794         if (relocated) {
 795                 /*
 796                  * On relocated directories we must
 797                  * read the `.' entry out of a dir.
 798                  */
 799                 ip->iso_start = ino >> imp->im_bshift;
 800                 if (bp != NULL)
 801                         brelse(bp);
 802                 if ((error = cd9660_devblkatoff(vp, (off_t)0, NULL, &bp)) != 0) {
 803                         vx_put(vp);
 804                         return (error);
 805                 }
 806                 isodir = (struct iso_directory_record *)bp->b_data;
 807         }
 808
 809         ip->iso_extent = isonum_733(isodir->extent);
 810         ip->i_size = isonum_733(isodir->size);
 811         ip->iso_start = isonum_711(isodir->ext_attr_length) + ip->iso_extent;
 812
 813         /*
 814          * Setup time stamp, attribute
 815          */
 816         vp->v_type = VNON;
 817         switch (imp->iso_ftype) {
 818         default:        /* ISO_FTYPE_9660 */
 819             {
 820                 struct buf *bp2;
 821                 int off;
 822                 if ((imp->im_flags & ISOFSMNT_EXTATT)
 823                     && (off = isonum_711(isodir->ext_attr_length)))
 824                         cd9660_devblkatoff(vp, (off_t)-(off << imp->im_bshift), NULL,
 825                                      &bp2);
 826                 else
 827                         bp2 = NULL;
 828                 cd9660_defattr(isodir, ip, bp2, ISO_FTYPE_9660);
 829                 cd9660_deftstamp(isodir, ip, bp2, ISO_FTYPE_9660);
 830                 if (bp2)
 831                         brelse(bp2);
 832                 break;
 833             }
 834         case ISO_FTYPE_RRIP:
 835                 cd9660_rrip_analyze(isodir, ip, imp);
 836                 break;
 837         }
 838
 839         if (bp != NULL)
 840                 brelse(bp);
 841
 842         /*
 843          * Initialize the associated vnode
 844          */
 845         vp->v_type = IFTOVT(ip->inode.iso_mode);
 846
 847         switch (vp->v_type) {
 848         case VFIFO:
 849                 vp->v_ops = &mp->mnt_vn_fifo_ops;
 850                 break;
 851         case VCHR:
 852         case VBLK:
 853                 vp->v_ops = &mp->mnt_vn_spec_ops;
 854                 addaliasu(vp, ip->inode.iso_rdev);
 855                 break;
 856         default:
 857                 break;
 858         }
 859
 860         if (ip->iso_extent == imp->root_extent)
 861                 vp->v_flag |= VROOT;
 862
 863         /*
 864          * Return the locked and refd vp
 865          */
 866         *vpp = vp;
 867         return (0);
 868 }
 869
 870 /*
 871  * Vnode pointer to File handle
 872  */
 873 /* ARGSUSED */
 874 int
 875 cd9660_vptofh(struct vnode *vp, struct fid *fhp)
 876 {
 877         struct iso_node *ip = VTOI(vp);
 878         struct ifid *ifhp;
 879
 880         ifhp = (struct ifid *)fhp;
 881         ifhp->ifid_len = sizeof(struct ifid);
 882
 883         ifhp->ifid_ino = ip->i_number;
 884         ifhp->ifid_start = ip->iso_start;
 885
 886 #ifdef  ISOFS_DBG
 887         printf("vptofh: ino %d, start %ld\n",
 888                ifhp->ifid_ino,ifhp->ifid_start);
 889 #endif
 890         return 0;
 891 }