]> CyberLeo.Net >> Repos - FreeBSD/releng/9.3.git/blob - sys/fs/cd9660/cd9660_vfsops.c
Copy stable/9 to releng/9.3 as part of the 9.3-RELEASE cycle.
[FreeBSD/releng/9.3.git] / sys / fs / 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  * 4. Neither the name of the University nor the names of its contributors
19  *    may be used to endorse or promote products derived from this software
20  *    without specific prior written permission.
21  *
22  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32  * SUCH DAMAGE.
33  *
34  *      @(#)cd9660_vfsops.c     8.18 (Berkeley) 5/22/95
35  */
36
37 #include <sys/cdefs.h>
38 __FBSDID("$FreeBSD$");
39
40 #include <sys/param.h>
41 #include <sys/systm.h>
42 #include <sys/namei.h>
43 #include <sys/priv.h>
44 #include <sys/proc.h>
45 #include <sys/kernel.h>
46 #include <sys/vnode.h>
47 #include <sys/mount.h>
48 #include <sys/bio.h>
49 #include <sys/buf.h>
50 #include <sys/cdio.h>
51 #include <sys/conf.h>
52 #include <sys/fcntl.h>
53 #include <sys/malloc.h>
54 #include <sys/stat.h>
55 #include <sys/syslog.h>
56 #include <sys/iconv.h>
57
58 #include <fs/cd9660/iso.h>
59 #include <fs/cd9660/iso_rrip.h>
60 #include <fs/cd9660/cd9660_node.h>
61 #include <fs/cd9660/cd9660_mount.h>
62
63 #include <geom/geom.h>
64 #include <geom/geom_vfs.h>
65
66 MALLOC_DEFINE(M_ISOFSMNT, "isofs_mount", "ISOFS mount structure");
67 MALLOC_DEFINE(M_ISOFSNODE, "isofs_node", "ISOFS vnode private part");
68
69 struct iconv_functions *cd9660_iconv = NULL;
70
71 static vfs_mount_t      cd9660_mount;
72 static vfs_cmount_t     cd9660_cmount;
73 static vfs_unmount_t    cd9660_unmount;
74 static vfs_root_t       cd9660_root;
75 static vfs_statfs_t     cd9660_statfs;
76 static vfs_vget_t       cd9660_vget;
77 static vfs_fhtovp_t     cd9660_fhtovp;
78
79 static struct vfsops cd9660_vfsops = {
80         .vfs_fhtovp =           cd9660_fhtovp,
81         .vfs_mount =            cd9660_mount,
82         .vfs_cmount =           cd9660_cmount,
83         .vfs_root =             cd9660_root,
84         .vfs_statfs =           cd9660_statfs,
85         .vfs_unmount =          cd9660_unmount,
86         .vfs_vget =             cd9660_vget,
87 };
88 VFS_SET(cd9660_vfsops, cd9660, VFCF_READONLY);
89 MODULE_VERSION(cd9660, 1);
90
91 static int iso_mountfs(struct vnode *devvp, struct mount *mp);
92
93 /*
94  * VFS Operations.
95  */
96
97 static int
98 cd9660_cmount(struct mntarg *ma, void *data, uint64_t flags)
99 {
100         struct iso_args args;
101         struct export_args exp;
102         int error;
103
104         error = copyin(data, &args, sizeof args);
105         if (error)
106                 return (error);
107         vfs_oexport_conv(&args.export, &exp);
108
109         ma = mount_argsu(ma, "from", args.fspec, MAXPATHLEN);
110         ma = mount_arg(ma, "export", &exp, sizeof(exp));
111         ma = mount_argsu(ma, "cs_disk", args.cs_disk, 64);
112         ma = mount_argsu(ma, "cs_local", args.cs_local, 64);
113         ma = mount_argf(ma, "ssector", "%u", args.ssector);
114         ma = mount_argb(ma, !(args.flags & ISOFSMNT_NORRIP), "norrip");
115         ma = mount_argb(ma, args.flags & ISOFSMNT_GENS, "nogens");
116         ma = mount_argb(ma, args.flags & ISOFSMNT_EXTATT, "noextatt");
117         ma = mount_argb(ma, !(args.flags & ISOFSMNT_NOJOLIET), "nojoliet");
118         ma = mount_argb(ma,
119             args.flags & ISOFSMNT_BROKENJOLIET, "nobrokenjoliet");
120         ma = mount_argb(ma, args.flags & ISOFSMNT_KICONV, "nokiconv");
121
122         error = kernel_mount(ma, flags);
123
124         return (error);
125 }
126
127 static int
128 cd9660_mount(struct mount *mp)
129 {
130         struct vnode *devvp;
131         struct thread *td;
132         char *fspec;
133         int error;
134         accmode_t accmode;
135         struct nameidata ndp;
136         struct iso_mnt *imp = 0;
137
138         td = curthread;
139
140         /*
141          * Unconditionally mount as read-only.
142          */
143         MNT_ILOCK(mp);
144         mp->mnt_flag |= MNT_RDONLY;
145         MNT_IUNLOCK(mp);
146
147         fspec = vfs_getopts(mp->mnt_optnew, "from", &error);
148         if (error)
149                 return (error);
150
151         imp = VFSTOISOFS(mp);
152
153         if (mp->mnt_flag & MNT_UPDATE) {
154                 if (vfs_flagopt(mp->mnt_optnew, "export", NULL, 0))
155                         return (0);
156         }
157         /*
158          * Not an update, or updating the name: look up the name
159          * and verify that it refers to a sensible block device.
160          */
161         NDINIT(&ndp, LOOKUP, FOLLOW | LOCKLEAF, UIO_SYSSPACE, fspec, td);
162         if ((error = namei(&ndp)))
163                 return (error);
164         NDFREE(&ndp, NDF_ONLY_PNBUF);
165         devvp = ndp.ni_vp;
166
167         if (!vn_isdisk(devvp, &error)) {
168                 vput(devvp);
169                 return (error);
170         }
171
172         /*
173          * Verify that user has necessary permissions on the device,
174          * or has superuser abilities
175          */
176         accmode = VREAD;
177         error = VOP_ACCESS(devvp, accmode, td->td_ucred, td);
178         if (error)
179                 error = priv_check(td, PRIV_VFS_MOUNT_PERM);
180         if (error) {
181                 vput(devvp);
182                 return (error);
183         }
184
185         if ((mp->mnt_flag & MNT_UPDATE) == 0) {
186                 error = iso_mountfs(devvp, mp);
187                 if (error)
188                         vrele(devvp);
189         } else {
190                 if (devvp != imp->im_devvp)
191                         error = EINVAL; /* needs translation */
192                 vput(devvp);
193         }
194         if (error)
195                 return (error);
196         vfs_mountedfrom(mp, fspec);
197         return (0);
198 }
199
200 /*
201  * Common code for mount and mountroot
202  */
203 static int
204 iso_mountfs(devvp, mp)
205         struct vnode *devvp;
206         struct mount *mp;
207 {
208         struct iso_mnt *isomp = (struct iso_mnt *)0;
209         struct buf *bp = NULL;
210         struct buf *pribp = NULL, *supbp = NULL;
211         struct cdev *dev;
212         int error = EINVAL;
213         int high_sierra = 0;
214         int iso_bsize;
215         int iso_blknum;
216         int joliet_level;
217         struct iso_volume_descriptor *vdp = 0;
218         struct iso_primary_descriptor *pri = NULL;
219         struct iso_sierra_primary_descriptor *pri_sierra = NULL;
220         struct iso_supplementary_descriptor *sup = NULL;
221         struct iso_directory_record *rootp;
222         int logical_block_size, ssector;
223         struct g_consumer *cp;
224         struct bufobj *bo;
225         char *cs_local, *cs_disk;
226
227         dev = devvp->v_rdev;
228         dev_ref(dev);
229         DROP_GIANT();
230         g_topology_lock();
231         error = g_vfs_open(devvp, &cp, "cd9660", 0);
232         g_topology_unlock();
233         PICKUP_GIANT();
234         VOP_UNLOCK(devvp, 0);
235         if (error)
236                 goto out;
237         if (devvp->v_rdev->si_iosize_max != 0)
238                 mp->mnt_iosize_max = devvp->v_rdev->si_iosize_max;
239         if (mp->mnt_iosize_max > MAXPHYS)
240                 mp->mnt_iosize_max = MAXPHYS;
241
242         bo = &devvp->v_bufobj;
243
244         /* This is the "logical sector size".  The standard says this
245          * should be 2048 or the physical sector size on the device,
246          * whichever is greater.
247          */
248         if ((ISO_DEFAULT_BLOCK_SIZE % cp->provider->sectorsize) != 0) {
249                 error = EINVAL;
250                 goto out;
251         }
252
253         iso_bsize = cp->provider->sectorsize;
254
255         joliet_level = 0;
256         if (1 != vfs_scanopt(mp->mnt_optnew, "ssector", "%d", &ssector))
257                 ssector = 0;
258         for (iso_blknum = 16 + ssector;
259              iso_blknum < 100 + ssector;
260              iso_blknum++) {
261                 if ((error = bread(devvp, iso_blknum * btodb(ISO_DEFAULT_BLOCK_SIZE),
262                                   iso_bsize, NOCRED, &bp)) != 0)
263                         goto out;
264
265                 vdp = (struct iso_volume_descriptor *)bp->b_data;
266                 if (bcmp (vdp->id, ISO_STANDARD_ID, sizeof vdp->id) != 0) {
267                         if (bcmp (vdp->id_sierra, ISO_SIERRA_ID,
268                                   sizeof vdp->id_sierra) != 0) {
269                                 error = EINVAL;
270                                 goto out;
271                         } else
272                                 high_sierra = 1;
273                 }
274                 switch (isonum_711 (high_sierra? vdp->type_sierra: vdp->type)){
275                 case ISO_VD_PRIMARY:
276                         if (pribp == NULL) {
277                                 pribp = bp;
278                                 bp = NULL;
279                                 pri = (struct iso_primary_descriptor *)vdp;
280                                 pri_sierra =
281                                   (struct iso_sierra_primary_descriptor *)vdp;
282                         }
283                         break;
284
285                 case ISO_VD_SUPPLEMENTARY:
286                         if (supbp == NULL) {
287                                 supbp = bp;
288                                 bp = NULL;
289                                 sup = (struct iso_supplementary_descriptor *)vdp;
290
291                                 if (!vfs_flagopt(mp->mnt_optnew, "nojoliet", NULL, 0)) {
292                                         if (bcmp(sup->escape, "%/@", 3) == 0)
293                                                 joliet_level = 1;
294                                         if (bcmp(sup->escape, "%/C", 3) == 0)
295                                                 joliet_level = 2;
296                                         if (bcmp(sup->escape, "%/E", 3) == 0)
297                                                 joliet_level = 3;
298
299                                         if ((isonum_711 (sup->flags) & 1) &&
300                                             !vfs_flagopt(mp->mnt_optnew, "brokenjoliet", NULL, 0))
301                                                 joliet_level = 0;
302                                 }
303                         }
304                         break;
305
306                 case ISO_VD_END:
307                         goto vd_end;
308
309                 default:
310                         break;
311                 }
312                 if (bp) {
313                         brelse(bp);
314                         bp = NULL;
315                 }
316         }
317  vd_end:
318         if (bp) {
319                 brelse(bp);
320                 bp = NULL;
321         }
322
323         if (pri == NULL) {
324                 error = EINVAL;
325                 goto out;
326         }
327
328         logical_block_size =
329                 isonum_723 (high_sierra?
330                             pri_sierra->logical_block_size:
331                             pri->logical_block_size);
332
333         if (logical_block_size < DEV_BSIZE || logical_block_size > MAXBSIZE
334             || (logical_block_size & (logical_block_size - 1)) != 0) {
335                 error = EINVAL;
336                 goto out;
337         }
338
339         rootp = (struct iso_directory_record *)
340                 (high_sierra?
341                  pri_sierra->root_directory_record:
342                  pri->root_directory_record);
343
344         isomp = malloc(sizeof *isomp, M_ISOFSMNT, M_WAITOK | M_ZERO);
345         isomp->im_cp = cp;
346         isomp->im_bo = bo;
347         isomp->logical_block_size = logical_block_size;
348         isomp->volume_space_size =
349                 isonum_733 (high_sierra?
350                             pri_sierra->volume_space_size:
351                             pri->volume_space_size);
352         isomp->joliet_level = 0;
353         /*
354          * Since an ISO9660 multi-session CD can also access previous
355          * sessions, we have to include them into the space consider-
356          * ations.  This doesn't yield a very accurate number since
357          * parts of the old sessions might be inaccessible now, but we
358          * can't do much better.  This is also important for the NFS
359          * filehandle validation.
360          */
361         isomp->volume_space_size += ssector;
362         bcopy (rootp, isomp->root, sizeof isomp->root);
363         isomp->root_extent = isonum_733 (rootp->extent);
364         isomp->root_size = isonum_733 (rootp->size);
365
366         isomp->im_bmask = logical_block_size - 1;
367         isomp->im_bshift = ffs(logical_block_size) - 1;
368
369         pribp->b_flags |= B_AGE;
370         brelse(pribp);
371         pribp = NULL;
372         rootp = NULL;
373         pri = NULL;
374         pri_sierra = NULL;
375
376         mp->mnt_data = isomp;
377         mp->mnt_stat.f_fsid.val[0] = dev2udev(dev);
378         mp->mnt_stat.f_fsid.val[1] = mp->mnt_vfc->vfc_typenum;
379         mp->mnt_maxsymlinklen = 0;
380         MNT_ILOCK(mp);
381         mp->mnt_flag |= MNT_LOCAL;
382         mp->mnt_kern_flag |= MNTK_MPSAFE | MNTK_LOOKUP_SHARED |
383             MNTK_EXTENDED_SHARED;
384         MNT_IUNLOCK(mp);
385         isomp->im_mountp = mp;
386         isomp->im_dev = dev;
387         isomp->im_devvp = devvp;
388
389         vfs_flagopt(mp->mnt_optnew, "norrip", &isomp->im_flags, ISOFSMNT_NORRIP);
390         vfs_flagopt(mp->mnt_optnew, "gens", &isomp->im_flags, ISOFSMNT_GENS);
391         vfs_flagopt(mp->mnt_optnew, "extatt", &isomp->im_flags, ISOFSMNT_EXTATT);
392         vfs_flagopt(mp->mnt_optnew, "nojoliet", &isomp->im_flags, ISOFSMNT_NOJOLIET);
393         vfs_flagopt(mp->mnt_optnew, "kiconv", &isomp->im_flags, ISOFSMNT_KICONV);
394
395         /* Check the Rock Ridge Extension support */
396         if (!(isomp->im_flags & ISOFSMNT_NORRIP)) {
397                 if ((error = bread(isomp->im_devvp, (isomp->root_extent +
398                     isonum_711(((struct iso_directory_record *)isomp->root)->
399                     ext_attr_length)) << (isomp->im_bshift - DEV_BSHIFT),
400                     isomp->logical_block_size, NOCRED, &bp)) != 0)
401                         goto out;
402
403                 rootp = (struct iso_directory_record *)bp->b_data;
404
405                 if ((isomp->rr_skip = cd9660_rrip_offset(rootp,isomp)) < 0) {
406                     isomp->im_flags |= ISOFSMNT_NORRIP;
407                 } else {
408                     isomp->im_flags &= ~ISOFSMNT_GENS;
409                 }
410
411                 /*
412                  * The contents are valid,
413                  * but they will get reread as part of another vnode, so...
414                  */
415                 bp->b_flags |= B_AGE;
416                 brelse(bp);
417                 bp = NULL;
418                 rootp = NULL;
419         }
420
421         if (isomp->im_flags & ISOFSMNT_KICONV && cd9660_iconv) {
422                 cs_local = vfs_getopts(mp->mnt_optnew, "cs_local", &error);
423                 if (error)
424                         goto out;
425                 cs_disk = vfs_getopts(mp->mnt_optnew, "cs_disk", &error);
426                 if (error)
427                         goto out;
428                 cd9660_iconv->open(cs_local, cs_disk, &isomp->im_d2l);
429                 cd9660_iconv->open(cs_disk, cs_local, &isomp->im_l2d);
430         } else {
431                 isomp->im_d2l = NULL;
432                 isomp->im_l2d = NULL;
433         }
434
435         if (high_sierra) {
436                 /* this effectively ignores all the mount flags */
437                 if (bootverbose)
438                         log(LOG_INFO, "cd9660: High Sierra Format\n");
439                 isomp->iso_ftype = ISO_FTYPE_HIGH_SIERRA;
440         } else
441                 switch (isomp->im_flags&(ISOFSMNT_NORRIP|ISOFSMNT_GENS)) {
442                   default:
443                           isomp->iso_ftype = ISO_FTYPE_DEFAULT;
444                           break;
445                   case ISOFSMNT_GENS|ISOFSMNT_NORRIP:
446                           isomp->iso_ftype = ISO_FTYPE_9660;
447                           break;
448                   case 0:
449                           if (bootverbose)
450                                   log(LOG_INFO, "cd9660: RockRidge Extension\n");
451                           isomp->iso_ftype = ISO_FTYPE_RRIP;
452                           break;
453                 }
454
455         /* Decide whether to use the Joliet descriptor */
456
457         if (isomp->iso_ftype != ISO_FTYPE_RRIP && joliet_level) {
458                 if (bootverbose)
459                         log(LOG_INFO, "cd9660: Joliet Extension (Level %d)\n",
460                             joliet_level);
461                 rootp = (struct iso_directory_record *)
462                         sup->root_directory_record;
463                 bcopy (rootp, isomp->root, sizeof isomp->root);
464                 isomp->root_extent = isonum_733 (rootp->extent);
465                 isomp->root_size = isonum_733 (rootp->size);
466                 isomp->joliet_level = joliet_level;
467                 supbp->b_flags |= B_AGE;
468         }
469
470         if (supbp) {
471                 brelse(supbp);
472                 supbp = NULL;
473                 sup = NULL;
474         }
475
476         return 0;
477 out:
478         if (bp)
479                 brelse(bp);
480         if (pribp)
481                 brelse(pribp);
482         if (supbp)
483                 brelse(supbp);
484         if (cp != NULL) {
485                 DROP_GIANT();
486                 g_topology_lock();
487                 g_vfs_close(cp);
488                 g_topology_unlock();
489                 PICKUP_GIANT();
490         }
491         if (isomp) {
492                 free((caddr_t)isomp, M_ISOFSMNT);
493                 mp->mnt_data = NULL;
494         }
495         dev_rel(dev);
496         return error;
497 }
498
499 /*
500  * unmount system call
501  */
502 static int
503 cd9660_unmount(mp, mntflags)
504         struct mount *mp;
505         int mntflags;
506 {
507         struct iso_mnt *isomp;
508         int error, flags = 0;
509
510         if (mntflags & MNT_FORCE)
511                 flags |= FORCECLOSE;
512         if ((error = vflush(mp, 0, flags, curthread)))
513                 return (error);
514
515         isomp = VFSTOISOFS(mp);
516
517         if (isomp->im_flags & ISOFSMNT_KICONV && cd9660_iconv) {
518                 if (isomp->im_d2l)
519                         cd9660_iconv->close(isomp->im_d2l);
520                 if (isomp->im_l2d)
521                         cd9660_iconv->close(isomp->im_l2d);
522         }
523         DROP_GIANT();
524         g_topology_lock();
525         g_vfs_close(isomp->im_cp);
526         g_topology_unlock();
527         PICKUP_GIANT();
528         vrele(isomp->im_devvp);
529         dev_rel(isomp->im_dev);
530         free((caddr_t)isomp, M_ISOFSMNT);
531         mp->mnt_data = NULL;
532         MNT_ILOCK(mp);
533         mp->mnt_flag &= ~MNT_LOCAL;
534         MNT_IUNLOCK(mp);
535         return (error);
536 }
537
538 /*
539  * Return root of a filesystem
540  */
541 static int
542 cd9660_root(mp, flags, vpp)
543         struct mount *mp;
544         int flags;
545         struct vnode **vpp;
546 {
547         struct iso_mnt *imp = VFSTOISOFS(mp);
548         struct iso_directory_record *dp =
549             (struct iso_directory_record *)imp->root;
550         ino_t ino = isodirino(dp, imp);
551
552         /*
553          * With RRIP we must use the `.' entry of the root directory.
554          * Simply tell vget, that it's a relocated directory.
555          */
556         return (cd9660_vget_internal(mp, ino, flags, vpp,
557             imp->iso_ftype == ISO_FTYPE_RRIP, dp));
558 }
559
560 /*
561  * Get filesystem statistics.
562  */
563 static int
564 cd9660_statfs(mp, sbp)
565         struct mount *mp;
566         struct statfs *sbp;
567 {
568         struct iso_mnt *isomp;
569
570         isomp = VFSTOISOFS(mp);
571
572         sbp->f_bsize = isomp->logical_block_size;
573         sbp->f_iosize = sbp->f_bsize;   /* XXX */
574         sbp->f_blocks = isomp->volume_space_size;
575         sbp->f_bfree = 0; /* total free blocks */
576         sbp->f_bavail = 0; /* blocks free for non superuser */
577         sbp->f_files =  0; /* total files */
578         sbp->f_ffree = 0; /* free file nodes */
579         return 0;
580 }
581
582 /*
583  * File handle to vnode
584  *
585  * Have to be really careful about stale file handles:
586  * - check that the inode number is in range
587  * - call iget() to get the locked inode
588  * - check for an unallocated inode (i_mode == 0)
589  * - check that the generation number matches
590  */
591
592 /* ARGSUSED */
593 static int
594 cd9660_fhtovp(mp, fhp, flags, vpp)
595         struct mount *mp;
596         struct fid *fhp;
597         int flags;
598         struct vnode **vpp;
599 {
600         struct ifid ifh;
601         struct iso_node *ip;
602         struct vnode *nvp;
603         int error;
604
605         memcpy(&ifh, fhp, sizeof(ifh));
606
607 #ifdef  ISOFS_DBG
608         printf("fhtovp: ino %d, start %ld\n",
609             ifh.ifid_ino, ifh.ifid_start);
610 #endif
611
612         if ((error = VFS_VGET(mp, ifh.ifid_ino, LK_EXCLUSIVE, &nvp)) != 0) {
613                 *vpp = NULLVP;
614                 return (error);
615         }
616         ip = VTOI(nvp);
617         if (ip->inode.iso_mode == 0) {
618                 vput(nvp);
619                 *vpp = NULLVP;
620                 return (ESTALE);
621         }
622         *vpp = nvp;
623         vnode_create_vobject(*vpp, ip->i_size, curthread);
624         return (0);
625 }
626
627 static int
628 cd9660_vget(mp, ino, flags, vpp)
629         struct mount *mp;
630         ino_t ino;
631         int flags;
632         struct vnode **vpp;
633 {
634
635         /*
636          * XXXX
637          * It would be nice if we didn't always set the `relocated' flag
638          * and force the extra read, but I don't want to think about fixing
639          * that right now.
640          */
641         return (cd9660_vget_internal(mp, ino, flags, vpp,
642 #if 0
643             VFSTOISOFS(mp)->iso_ftype == ISO_FTYPE_RRIP,
644 #else
645             0,
646 #endif
647             (struct iso_directory_record *)0));
648 }
649
650 int
651 cd9660_vget_internal(mp, ino, flags, vpp, relocated, isodir)
652         struct mount *mp;
653         ino_t ino;
654         int flags;
655         struct vnode **vpp;
656         int relocated;
657         struct iso_directory_record *isodir;
658 {
659         struct iso_mnt *imp;
660         struct iso_node *ip;
661         struct buf *bp;
662         struct vnode *vp;
663         struct cdev *dev;
664         int error;
665         struct thread *td;
666
667         td = curthread;
668         error = vfs_hash_get(mp, ino, flags, td, vpp, NULL, NULL);
669         if (error || *vpp != NULL)
670                 return (error);
671
672         /*
673          * We must promote to an exclusive lock for vnode creation.  This
674          * can happen if lookup is passed LOCKSHARED.
675          */
676         if ((flags & LK_TYPE_MASK) == LK_SHARED) {
677                 flags &= ~LK_TYPE_MASK;
678                 flags |= LK_EXCLUSIVE;
679         }
680
681         /*
682          * We do not lock vnode creation as it is believed to be too
683          * expensive for such rare case as simultaneous creation of vnode
684          * for same ino by different processes. We just allow them to race
685          * and check later to decide who wins. Let the race begin!
686          */
687
688         imp = VFSTOISOFS(mp);
689         dev = imp->im_dev;
690
691         /* Allocate a new vnode/iso_node. */
692         if ((error = getnewvnode("isofs", mp, &cd9660_vnodeops, &vp)) != 0) {
693                 *vpp = NULLVP;
694                 return (error);
695         }
696         ip = malloc(sizeof(struct iso_node), M_ISOFSNODE,
697             M_WAITOK | M_ZERO);
698         vp->v_data = ip;
699         ip->i_vnode = vp;
700         ip->i_number = ino;
701
702         lockmgr(vp->v_vnlock, LK_EXCLUSIVE, NULL);
703         error = insmntque(vp, mp);
704         if (error != 0) {
705                 free(ip, M_ISOFSNODE);
706                 *vpp = NULLVP;
707                 return (error);
708         }
709         error = vfs_hash_insert(vp, ino, flags, td, vpp, NULL, NULL);
710         if (error || *vpp != NULL)
711                 return (error);
712
713         if (isodir == 0) {
714                 int lbn, off;
715
716                 lbn = lblkno(imp, ino);
717                 if (lbn >= imp->volume_space_size) {
718                         vput(vp);
719                         printf("fhtovp: lbn exceed volume space %d\n", lbn);
720                         return (ESTALE);
721                 }
722
723                 off = blkoff(imp, ino);
724                 if (off + ISO_DIRECTORY_RECORD_SIZE > imp->logical_block_size) {
725                         vput(vp);
726                         printf("fhtovp: crosses block boundary %d\n",
727                                off + ISO_DIRECTORY_RECORD_SIZE);
728                         return (ESTALE);
729                 }
730
731                 error = bread(imp->im_devvp,
732                               lbn << (imp->im_bshift - DEV_BSHIFT),
733                               imp->logical_block_size, NOCRED, &bp);
734                 if (error) {
735                         vput(vp);
736                         brelse(bp);
737                         printf("fhtovp: bread error %d\n",error);
738                         return (error);
739                 }
740                 isodir = (struct iso_directory_record *)(bp->b_data + off);
741
742                 if (off + isonum_711(isodir->length) >
743                     imp->logical_block_size) {
744                         vput(vp);
745                         if (bp != 0)
746                                 brelse(bp);
747                         printf("fhtovp: directory crosses block boundary %d[off=%d/len=%d]\n",
748                                off +isonum_711(isodir->length), off,
749                                isonum_711(isodir->length));
750                         return (ESTALE);
751                 }
752
753 #if 0
754                 if (isonum_733(isodir->extent) +
755                     isonum_711(isodir->ext_attr_length) != ifhp->ifid_start) {
756                         if (bp != 0)
757                                 brelse(bp);
758                         printf("fhtovp: file start miss %d vs %d\n",
759                                isonum_733(isodir->extent) + isonum_711(isodir->ext_attr_length),
760                                ifhp->ifid_start);
761                         return (ESTALE);
762                 }
763 #endif
764         } else
765                 bp = 0;
766
767         ip->i_mnt = imp;
768
769         if (relocated) {
770                 /*
771                  * On relocated directories we must
772                  * read the `.' entry out of a dir.
773                  */
774                 ip->iso_start = ino >> imp->im_bshift;
775                 if (bp != 0)
776                         brelse(bp);
777                 if ((error = cd9660_blkatoff(vp, (off_t)0, NULL, &bp)) != 0) {
778                         vput(vp);
779                         return (error);
780                 }
781                 isodir = (struct iso_directory_record *)bp->b_data;
782         }
783
784         ip->iso_extent = isonum_733(isodir->extent);
785         ip->i_size = isonum_733(isodir->size);
786         ip->iso_start = isonum_711(isodir->ext_attr_length) + ip->iso_extent;
787
788         /*
789          * Setup time stamp, attribute
790          */
791         vp->v_type = VNON;
792         switch (imp->iso_ftype) {
793         default:        /* ISO_FTYPE_9660 */
794             {
795                 struct buf *bp2;
796                 int off;
797                 if ((imp->im_flags & ISOFSMNT_EXTATT)
798                     && (off = isonum_711(isodir->ext_attr_length)))
799                         cd9660_blkatoff(vp, (off_t)-(off << imp->im_bshift), NULL,
800                                      &bp2);
801                 else
802                         bp2 = NULL;
803                 cd9660_defattr(isodir, ip, bp2, ISO_FTYPE_9660);
804                 cd9660_deftstamp(isodir, ip, bp2, ISO_FTYPE_9660);
805                 if (bp2)
806                         brelse(bp2);
807                 break;
808             }
809         case ISO_FTYPE_RRIP:
810                 cd9660_rrip_analyze(isodir, ip, imp);
811                 break;
812         }
813
814         if (bp != 0)
815                 brelse(bp);
816
817         /*
818          * Initialize the associated vnode
819          */
820         switch (vp->v_type = IFTOVT(ip->inode.iso_mode)) {
821         case VFIFO:
822                 vp->v_op = &cd9660_fifoops;
823                 break;
824         default:
825                 VN_LOCK_ASHARE(vp);
826                 break;
827         }
828
829         if (ip->iso_extent == imp->root_extent)
830                 vp->v_vflag |= VV_ROOT;
831
832         /*
833          * XXX need generation number?
834          */
835
836         *vpp = vp;
837         return (0);
838 }