f695f20b2a41b496f79f5c893a09f52b47e1b49c
[dragonfly.git] / 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.35 2006/05/06 02:43: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);
155         error = VOP_OPEN(rootvp, FREAD, FSCRED, NULL);
156         VOP_UNLOCK(rootvp, 0);
157         if (error)
158                 return (error);
159
160         args.ssector = iso_get_ssector(rootdev, td);
161
162         VOP_CLOSE(rootvp, FREAD);
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);
235         error = VOP_ACCESS(devvp, accessmode, td->td_proc->p_ucred);
236         if (error) 
237                 error = suser(td);
238         if (error) {
239                 vput(devvp);
240                 return (error);
241         }
242         VOP_UNLOCK(devvp, 0);
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, 0, 0)))
301                 return (error);
302
303         vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY);
304         error = VOP_OPEN(devvp, FREAD, FSCRED, NULL);
305         VOP_UNLOCK(devvp, 0);
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);
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);
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         case VREG:
857         case VDIR:
858                 vinitvmio(vp, ip->i_size);
859                 break;
860         default:
861                 break;
862         }
863         
864         if (ip->iso_extent == imp->root_extent)
865                 vp->v_flag |= VROOT;
866
867         /*
868          * Return the locked and refd vp
869          */
870         *vpp = vp;
871         return (0);
872 }
873
874 /*
875  * Vnode pointer to File handle
876  */
877 /* ARGSUSED */
878 int
879 cd9660_vptofh(struct vnode *vp, struct fid *fhp)
880 {
881         struct iso_node *ip = VTOI(vp);
882         struct ifid *ifhp;
883
884         ifhp = (struct ifid *)fhp;
885         ifhp->ifid_len = sizeof(struct ifid);
886
887         ifhp->ifid_ino = ip->i_number;
888         ifhp->ifid_start = ip->iso_start;
889
890 #ifdef  ISOFS_DBG
891         printf("vptofh: ino %d, start %ld\n",
892                ifhp->ifid_ino,ifhp->ifid_start);
893 #endif
894         return 0;
895 }