Home | History | Annotate | Line # | Download | only in adosfs
advnops.c revision 1.21
      1 /*	$NetBSD: advnops.c,v 1.21 2006/09/23 22:47:11 aymeric Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1994 Christian E. Hopps
      5  * Copyright (c) 1996 Matthias Scheler
      6  * All rights reserved.
      7  *
      8  * Redistribution and use in source and binary forms, with or without
      9  * modification, are permitted provided that the following conditions
     10  * are met:
     11  * 1. Redistributions of source code must retain the above copyright
     12  *    notice, this list of conditions and the following disclaimer.
     13  * 2. Redistributions in binary form must reproduce the above copyright
     14  *    notice, this list of conditions and the following disclaimer in the
     15  *    documentation and/or other materials provided with the distribution.
     16  * 3. All advertising materials mentioning features or use of this software
     17  *    must display the following acknowledgement:
     18  *      This product includes software developed by Christian E. Hopps.
     19  * 4. The name of the author may not be used to endorse or promote products
     20  *    derived from this software without specific prior written permission
     21  *
     22  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     23  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     24  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     25  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     26  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     27  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     28  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     29  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     30  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     31  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     32  */
     33 
     34 #include <sys/cdefs.h>
     35 __KERNEL_RCSID(0, "$NetBSD: advnops.c,v 1.21 2006/09/23 22:47:11 aymeric Exp $");
     36 
     37 #if defined(_KERNEL_OPT)
     38 #include "opt_quota.h"
     39 #endif
     40 
     41 #include <sys/param.h>
     42 #include <sys/systm.h>
     43 #include <sys/vnode.h>
     44 #include <sys/mount.h>
     45 #include <sys/time.h>
     46 #include <sys/queue.h>
     47 #include <sys/namei.h>
     48 #include <sys/buf.h>
     49 #include <sys/dirent.h>
     50 #include <sys/inttypes.h>
     51 #include <sys/malloc.h>
     52 #include <sys/pool.h>
     53 #include <sys/stat.h>
     54 #include <sys/unistd.h>
     55 #include <sys/proc.h>
     56 #include <sys/kauth.h>
     57 
     58 #include <miscfs/genfs/genfs.h>
     59 #include <miscfs/specfs/specdev.h>
     60 #include <fs/adosfs/adosfs.h>
     61 
     62 extern struct vnodeops adosfs_vnodeops;
     63 
     64 #define	adosfs_open	genfs_nullop
     65 int	adosfs_getattr	__P((void *));
     66 int	adosfs_read	__P((void *));
     67 int	adosfs_write	__P((void *));
     68 #define	adosfs_fcntl	genfs_fcntl
     69 #define	adosfs_ioctl	genfs_enoioctl
     70 #define	adosfs_poll	genfs_poll
     71 int	adosfs_strategy	__P((void *));
     72 int	adosfs_link	__P((void *));
     73 int	adosfs_symlink	__P((void *));
     74 #define	adosfs_abortop	genfs_abortop
     75 int	adosfs_bmap	__P((void *));
     76 int	adosfs_print	__P((void *));
     77 int	adosfs_readdir	__P((void *));
     78 int	adosfs_access	__P((void *));
     79 int	adosfs_readlink	__P((void *));
     80 int	adosfs_inactive	__P((void *));
     81 int	adosfs_reclaim	__P((void *));
     82 int	adosfs_pathconf	__P((void *));
     83 
     84 #define adosfs_close 	genfs_nullop
     85 #define adosfs_fsync 	genfs_nullop
     86 #define	adosfs_lease_check	genfs_lease_check
     87 #define adosfs_seek 	genfs_seek
     88 
     89 #define adosfs_advlock 	genfs_einval
     90 #define adosfs_bwrite 	genfs_eopnotsupp
     91 #define adosfs_create 	genfs_eopnotsupp
     92 #define adosfs_mkdir 	genfs_eopnotsupp
     93 #define adosfs_mknod 	genfs_eopnotsupp
     94 #define adosfs_revoke	genfs_revoke
     95 #define adosfs_mmap 	genfs_mmap
     96 #define adosfs_remove 	genfs_eopnotsupp
     97 #define adosfs_rename 	genfs_eopnotsupp
     98 #define adosfs_rmdir 	genfs_eopnotsupp
     99 #define adosfs_setattr 	genfs_eopnotsupp
    100 
    101 const struct vnodeopv_entry_desc adosfs_vnodeop_entries[] = {
    102 	{ &vop_default_desc, vn_default_error },
    103 	{ &vop_lookup_desc, adosfs_lookup },		/* lookup */
    104 	{ &vop_create_desc, adosfs_create },		/* create */
    105 	{ &vop_mknod_desc, adosfs_mknod },		/* mknod */
    106 	{ &vop_open_desc, adosfs_open },		/* open */
    107 	{ &vop_close_desc, adosfs_close },		/* close */
    108 	{ &vop_access_desc, adosfs_access },		/* access */
    109 	{ &vop_getattr_desc, adosfs_getattr },		/* getattr */
    110 	{ &vop_setattr_desc, adosfs_setattr },		/* setattr */
    111 	{ &vop_read_desc, adosfs_read },		/* read */
    112 	{ &vop_write_desc, adosfs_write },		/* write */
    113 	{ &vop_lease_desc, adosfs_lease_check },	/* lease */
    114 	{ &vop_fcntl_desc, adosfs_fcntl },		/* fcntl */
    115 	{ &vop_ioctl_desc, adosfs_ioctl },		/* ioctl */
    116 	{ &vop_poll_desc, adosfs_poll },		/* poll */
    117 	{ &vop_kqfilter_desc, genfs_kqfilter },		/* kqfilter */
    118 	{ &vop_revoke_desc, adosfs_revoke },		/* revoke */
    119 	{ &vop_mmap_desc, adosfs_mmap },		/* mmap */
    120 	{ &vop_fsync_desc, adosfs_fsync },		/* fsync */
    121 	{ &vop_seek_desc, adosfs_seek },		/* seek */
    122 	{ &vop_remove_desc, adosfs_remove },		/* remove */
    123 	{ &vop_link_desc, adosfs_link },		/* link */
    124 	{ &vop_rename_desc, adosfs_rename },		/* rename */
    125 	{ &vop_mkdir_desc, adosfs_mkdir },		/* mkdir */
    126 	{ &vop_rmdir_desc, adosfs_rmdir },		/* rmdir */
    127 	{ &vop_symlink_desc, adosfs_symlink },		/* symlink */
    128 	{ &vop_readdir_desc, adosfs_readdir },		/* readdir */
    129 	{ &vop_readlink_desc, adosfs_readlink },	/* readlink */
    130 	{ &vop_abortop_desc, adosfs_abortop },		/* abortop */
    131 	{ &vop_inactive_desc, adosfs_inactive },	/* inactive */
    132 	{ &vop_reclaim_desc, adosfs_reclaim },		/* reclaim */
    133 	{ &vop_lock_desc, genfs_lock },			/* lock */
    134 	{ &vop_unlock_desc, genfs_unlock },		/* unlock */
    135 	{ &vop_bmap_desc, adosfs_bmap },		/* bmap */
    136 	{ &vop_strategy_desc, adosfs_strategy },	/* strategy */
    137 	{ &vop_print_desc, adosfs_print },		/* print */
    138 	{ &vop_islocked_desc, genfs_islocked },		/* islocked */
    139 	{ &vop_pathconf_desc, adosfs_pathconf },	/* pathconf */
    140 	{ &vop_advlock_desc, adosfs_advlock },		/* advlock */
    141 	{ &vop_bwrite_desc, adosfs_bwrite },		/* bwrite */
    142 	{ &vop_getpages_desc, genfs_getpages },		/* getpages */
    143 	{ &vop_putpages_desc, genfs_putpages },		/* putpages */
    144 	{ NULL, NULL }
    145 };
    146 
    147 const struct vnodeopv_desc adosfs_vnodeop_opv_desc =
    148 	{ &adosfs_vnodeop_p, adosfs_vnodeop_entries };
    149 
    150 int
    151 adosfs_getattr(v)
    152 	void *v;
    153 {
    154 	struct vop_getattr_args /* {
    155 		struct vnode *a_vp;
    156 		struct vattr *a_vap;
    157 		kauth_cred_t a_cred;
    158 		struct lwp *a_l;
    159 	} */ *sp = v;
    160 	struct vattr *vap;
    161 	struct adosfsmount *amp;
    162 	struct anode *ap;
    163 	u_long fblks;
    164 
    165 #ifdef ADOSFS_DIAGNOSTIC
    166 	advopprint(sp);
    167 #endif
    168 	vap = sp->a_vap;
    169 	ap = VTOA(sp->a_vp);
    170 	amp = ap->amp;
    171 	vattr_null(vap);
    172 	vap->va_uid = ap->uid;
    173 	vap->va_gid = ap->gid;
    174 	vap->va_fsid = sp->a_vp->v_mount->mnt_stat.f_fsidx.__fsid_val[0];
    175 	vap->va_atime.tv_sec = vap->va_mtime.tv_sec = vap->va_ctime.tv_sec =
    176 		ap->mtime.days * 24 * 60 * 60 + ap->mtime.mins * 60 +
    177 		ap->mtime.ticks / 50 + (8 * 365 + 2) * 24 * 60 * 60;
    178 	vap->va_atime.tv_nsec = vap->va_mtime.tv_nsec = vap->va_ctime.tv_nsec = 0;
    179 	vap->va_gen = 0;
    180 	vap->va_flags = 0;
    181 	vap->va_rdev = NODEV;
    182 	vap->va_fileid = ap->block;
    183 	vap->va_type = sp->a_vp->v_type;
    184 	vap->va_mode = adunixprot(ap->adprot) & amp->mask;
    185 	if (sp->a_vp->v_type == VDIR) {
    186 		vap->va_nlink = 1;	/* XXX bogus, oh well */
    187 		vap->va_bytes = amp->bsize;
    188 		vap->va_size = amp->bsize;
    189 	} else {
    190 		/*
    191 		 * XXX actually we can track this if we were to walk the list
    192 		 * of links if it exists.
    193 		 * XXX for now, just set nlink to 2 if this is a hard link
    194 		 * to a file, or a file with a hard link.
    195 		 */
    196 		vap->va_nlink = 1 + (ap->linkto != 0);
    197 		/*
    198 		 * round up to nearest blocks add number of file list
    199 		 * blocks needed and mutiply by number of bytes per block.
    200 		 */
    201 		fblks = howmany(ap->fsize, amp->dbsize);
    202 		fblks += howmany(fblks, ANODENDATBLKENT(ap));
    203 		vap->va_bytes = fblks * amp->dbsize;
    204 		vap->va_size = ap->fsize;
    205 
    206 		vap->va_blocksize = amp->dbsize;
    207 	}
    208 #ifdef ADOSFS_DIAGNOSTIC
    209 	printf(" 0)");
    210 #endif
    211 	return(0);
    212 }
    213 /*
    214  * are things locked??? they need to be to avoid this being
    215  * deleted or changed (data block pointer blocks moving about.)
    216  */
    217 int
    218 adosfs_read(v)
    219 	void *v;
    220 {
    221 	struct vop_read_args /* {
    222 		struct vnode *a_vp;
    223 		struct uio *a_uio;
    224 		int a_ioflag;
    225 		kauth_cred_t a_cred;
    226 	} */ *sp = v;
    227 	struct vnode *vp = sp->a_vp;
    228 	struct adosfsmount *amp;
    229 	struct anode *ap;
    230 	struct uio *uio;
    231 	struct buf *bp;
    232 	daddr_t lbn;
    233 	int size, diff, error;
    234 	long n, on;
    235 
    236 #ifdef ADOSFS_DIAGNOSTIC
    237 	advopprint(sp);
    238 #endif
    239 	error = 0;
    240 	uio = sp->a_uio;
    241 	ap = VTOA(sp->a_vp);
    242 	amp = ap->amp;
    243 	/*
    244 	 * Return EOF for character devices, EIO for others
    245 	 */
    246 	if (sp->a_vp->v_type != VREG) {
    247 		error = EIO;
    248 		goto reterr;
    249 	}
    250 	if (uio->uio_resid == 0)
    251 		goto reterr;
    252 	if (uio->uio_offset < 0) {
    253 		error = EINVAL;
    254 		goto reterr;
    255 	}
    256 
    257 	/*
    258 	 * to expensive to let general algorithm figure out that
    259 	 * we are beyond the file.  Do it now.
    260 	 */
    261 	if (uio->uio_offset >= ap->fsize)
    262 		goto reterr;
    263 
    264 	/*
    265 	 * taken from ufs_read()
    266 	 */
    267 
    268 	if (vp->v_type == VREG && IS_FFS(amp)) {
    269 		const int advice = IO_ADV_DECODE(sp->a_ioflag);
    270 		error = 0;
    271 
    272 		while (uio->uio_resid > 0) {
    273 			void *win;
    274 			int flags;
    275 			vsize_t bytelen = MIN(ap->fsize - uio->uio_offset,
    276 					      uio->uio_resid);
    277 
    278 			if (bytelen == 0) {
    279 				break;
    280 			}
    281 			win = ubc_alloc(&vp->v_uobj, uio->uio_offset,
    282 					&bytelen, advice, UBC_READ);
    283 			error = uiomove(win, bytelen, uio);
    284 			flags = UBC_WANT_UNMAP(vp) ? UBC_UNMAP : 0;
    285 			ubc_release(win, flags);
    286 			if (error) {
    287 				break;
    288 			}
    289 		}
    290 		goto out;
    291 	}
    292 
    293 	do {
    294 		size = amp->dbsize;
    295 		lbn = uio->uio_offset / size;
    296 		on = uio->uio_offset % size;
    297 		n = MIN(size - on, uio->uio_resid);
    298 		diff = ap->fsize - uio->uio_offset;
    299 		/*
    300 		 * check for EOF
    301 		 */
    302 		if (diff <= 0)
    303 			return(0);
    304 		if (diff < n)
    305 			n = diff;
    306 		/*
    307 		 * read ahead could possibly be worth something
    308 		 * but not much as ados makes little attempt to
    309 		 * make things contigous
    310 		 */
    311 		error = bread(sp->a_vp, lbn, amp->bsize, NOCRED, &bp);
    312 		if (error) {
    313 			brelse(bp);
    314 			goto reterr;
    315 		}
    316 		if (!IS_FFS(amp)) {
    317 			if (bp->b_resid > 0)
    318 				error = EIO; /* OFS needs the complete block */
    319 			else if (adoswordn(bp, 0) != BPT_DATA) {
    320 #ifdef DIAGNOSTIC
    321 				printf("adosfs: bad primary type blk %" PRId64 "\n",
    322 				    bp->b_blkno / (amp->bsize / DEV_BSIZE));
    323 #endif
    324 				error = EINVAL;
    325 			} else if (adoscksum(bp, ap->nwords)) {
    326 #ifdef DIAGNOSTIC
    327 				printf("adosfs: blk %" PRId64 " failed cksum.\n",
    328 				    bp->b_blkno / (amp->bsize / DEV_BSIZE));
    329 #endif
    330 				error = EINVAL;
    331 			}
    332 		}
    333 
    334 		if (error) {
    335 			brelse(bp);
    336 			goto reterr;
    337 		}
    338 #ifdef ADOSFS_DIAGNOSTIC
    339 		printf(" %" PRId64 "+%ld-%" PRId64 "+%ld", lbn, on, lbn, n);
    340 #endif
    341 		n = MIN(n, size - bp->b_resid);
    342 		error = uiomove(bp->b_data + on +
    343 				amp->bsize - amp->dbsize, (int)n, uio);
    344 		brelse(bp);
    345 	} while (error == 0 && uio->uio_resid > 0 && n != 0);
    346 
    347 out:
    348 reterr:
    349 #ifdef ADOSFS_DIAGNOSTIC
    350 	printf(" %d)", error);
    351 #endif
    352 	return(error);
    353 }
    354 
    355 int
    356 adosfs_write(v)
    357 	void *v;
    358 {
    359 #ifdef ADOSFS_DIAGNOSTIC
    360 	struct vop_write_args /* {
    361 		struct vnode *a_vp;
    362 		struct uio *a_uio;
    363 		int a_ioflag;
    364 		kauth_cred_t a_cred;
    365 	} */ *sp = v;
    366 	advopprint(sp);
    367 	printf(" EOPNOTSUPP)");
    368 #endif
    369 	return(EOPNOTSUPP);
    370 }
    371 
    372 /*
    373  * Just call the device strategy routine
    374  */
    375 int
    376 adosfs_strategy(v)
    377 	void *v;
    378 {
    379 	struct vop_strategy_args /* {
    380 		struct vnode *a_vp;
    381 		struct buf *a_bp;
    382 	} */ *sp = v;
    383 	struct buf *bp;
    384 	struct anode *ap;
    385 	struct vnode *vp;
    386 	int error;
    387 
    388 #ifdef ADOSFS_DIAGNOSTIC
    389 	advopprint(sp);
    390 #endif
    391 	bp = sp->a_bp;
    392 	if (bp->b_vp == NULL) {
    393 		bp->b_flags |= B_ERROR;
    394 		biodone(bp);
    395 		error = EIO;
    396 		goto reterr;
    397 	}
    398 	vp = sp->a_vp;
    399 	ap = VTOA(vp);
    400 	if (bp->b_blkno == bp->b_lblkno) {
    401 		error = VOP_BMAP(vp, bp->b_lblkno, NULL, &bp->b_blkno, NULL);
    402 		if (error) {
    403 			bp->b_flags |= B_ERROR;
    404 			biodone(bp);
    405 			goto reterr;
    406 		}
    407 	}
    408 	if ((long)bp->b_blkno == -1) {
    409 		biodone(bp);
    410 		error = 0;
    411 		goto reterr;
    412 	}
    413 	vp = ap->amp->devvp;
    414 	error = VOP_STRATEGY(vp, bp);
    415 reterr:
    416 #ifdef ADOSFS_DIAGNOSTIC
    417 	printf(" %d)", error);
    418 #endif
    419 	return(error);
    420 }
    421 
    422 int
    423 adosfs_link(v)
    424 	void *v;
    425 {
    426 	struct vop_link_args /* {
    427 		struct vnode *a_dvp;
    428 		struct vnode *a_vp;
    429 		struct componentname *a_cnp;
    430 	} */ *ap = v;
    431 
    432 	VOP_ABORTOP(ap->a_dvp, ap->a_cnp);
    433 	vput(ap->a_dvp);
    434 	return (EROFS);
    435 }
    436 
    437 int
    438 adosfs_symlink(v)
    439 	void *v;
    440 {
    441 	struct vop_symlink_args /* {
    442 		struct vnode *a_dvp;
    443 		struct vnode **a_vpp;
    444 		struct componentname *a_cnp;
    445 		struct vattr *a_vap;
    446 		char *a_target;
    447 	} */ *ap = v;
    448 
    449 	VOP_ABORTOP(ap->a_dvp, ap->a_cnp);
    450 	vput(ap->a_dvp);
    451 	return (EROFS);
    452 }
    453 
    454 /*
    455  * Wait until the vnode has finished changing state.
    456  */
    457 int
    458 adosfs_bmap(v)
    459 	void *v;
    460 {
    461 	struct vop_bmap_args /* {
    462 		struct vnode *a_vp;
    463 		daddr_t  a_bn;
    464 		struct vnode **a_vpp;
    465 		daddr_t *a_bnp;
    466 		int *a_runp;
    467 	} */ *sp = v;
    468 	struct anode *ap;
    469 	struct buf *flbp;
    470 	long nb, flblk, flblkoff, fcnt;
    471 	daddr_t *bnp;
    472 	daddr_t bn;
    473 	int error;
    474 
    475 #ifdef ADOSFS_DIAGNOSTIC
    476 	advopprint(sp);
    477 #endif
    478 	ap = VTOA(sp->a_vp);
    479 	bn = sp->a_bn;
    480 	bnp = sp->a_bnp;
    481 	if (sp->a_runp) {
    482 		*sp->a_runp = 0;
    483 	}
    484 	error = 0;
    485 
    486 	if (sp->a_vpp != NULL)
    487 		*sp->a_vpp = ap->amp->devvp;
    488 	if (bnp == NULL)
    489 		goto reterr;
    490 	if (bn < 0) {
    491 		error = EFBIG;
    492 		goto reterr;
    493 	}
    494 	if (sp->a_vp->v_type != VREG) {
    495 		error = EINVAL;
    496 		goto reterr;
    497 	}
    498 
    499 	/*
    500 	 * walk the chain of file list blocks until we find
    501 	 * the one that will yield the block pointer we need.
    502 	 */
    503 	if (ap->type == AFILE)
    504 		nb = ap->block;			/* pointer to ourself */
    505 	else if (ap->type == ALFILE)
    506 		nb = ap->linkto;		/* pointer to real file */
    507 	else {
    508 		error = EINVAL;
    509 		goto reterr;
    510 	}
    511 
    512 	flblk = bn / ANODENDATBLKENT(ap);
    513 	flbp = NULL;
    514 
    515 	/*
    516 	 * check last indirect block cache
    517 	 */
    518 	if (flblk < ap->lastlindblk)
    519 		fcnt = 0;
    520 	else {
    521 		flblk -= ap->lastlindblk;
    522 		fcnt = ap->lastlindblk;
    523 		nb = ap->lastindblk;
    524 	}
    525 	while (flblk >= 0) {
    526 		if (flbp)
    527 			brelse(flbp);
    528 		if (nb == 0) {
    529 #ifdef DIAGNOSTIC
    530 			printf("adosfs: bad file list chain.\n");
    531 #endif
    532 			error = EINVAL;
    533 			goto reterr;
    534 		}
    535 		error = bread(ap->amp->devvp, nb * ap->amp->bsize / DEV_BSIZE,
    536 			      ap->amp->bsize, NOCRED, &flbp);
    537 		if (error) {
    538 			brelse(flbp);
    539 			goto reterr;
    540 		}
    541 		if (adoscksum(flbp, ap->nwords)) {
    542 #ifdef DIAGNOSTIC
    543 			printf("adosfs: blk %ld failed cksum.\n", nb);
    544 #endif
    545 			brelse(flbp);
    546 			error = EINVAL;
    547 			goto reterr;
    548 		}
    549 		/*
    550 		 * update last indirect block cache
    551 		 */
    552 		ap->lastlindblk = fcnt++;
    553 		ap->lastindblk = nb;
    554 
    555 		nb = adoswordn(flbp, ap->nwords - 2);
    556 		flblk--;
    557 	}
    558 	/*
    559 	 * calculate offset of block number in table.  The table starts
    560 	 * at nwords - 51 and goes to offset 6 or less if indicated by the
    561 	 * valid table entries stored at offset ADBI_NBLKTABENT.
    562 	 */
    563 	flblkoff = bn % ANODENDATBLKENT(ap);
    564 	if (flblkoff < adoswordn(flbp, 2 /* ADBI_NBLKTABENT */)) {
    565 		flblkoff = (ap->nwords - 51) - flblkoff;
    566 		*bnp = adoswordn(flbp, flblkoff) * ap->amp->bsize / DEV_BSIZE;
    567 	} else {
    568 #ifdef DIAGNOSTIC
    569 		printf("flblk offset %ld too large in lblk %ld blk %" PRId64 "\n",
    570 		    flblkoff, (long)bn, flbp->b_blkno);
    571 #endif
    572 		error = EINVAL;
    573 	}
    574 	brelse(flbp);
    575 reterr:
    576 #ifdef ADOSFS_DIAGNOSTIC
    577 	if (error == 0 && bnp)
    578 		printf(" %lld => %lld", (long long)bn, (long long)*bnp);
    579 	printf(" %d)\n", error);
    580 #endif
    581 	return(error);
    582 }
    583 
    584 /*
    585  * Print out the contents of a adosfs vnode.
    586  */
    587 /* ARGSUSED */
    588 int
    589 adosfs_print(v)
    590 	void *v;
    591 {
    592 #if 0
    593 	struct vop_print_args /* {
    594 		struct vnode *a_vp;
    595 	} */ *sp = v;
    596 #endif
    597 	return(0);
    598 }
    599 
    600 int
    601 adosfs_readdir(v)
    602 	void *v;
    603 {
    604 	struct vop_readdir_args /* {
    605 		struct vnode *a_vp;
    606 		struct uio *a_uio;
    607 		kauth_cred_t a_cred;
    608 		int *a_eofflag;
    609 		off_t **a_cookies;
    610 		int *a_ncookies;
    611 	} */ *sp = v;
    612 	int error, first, useri, chainc, hashi, scanned;
    613 	u_long nextbn;
    614 	struct dirent ad, *adp;
    615 	struct anode *pap, *ap;
    616 	struct vnode *vp;
    617 	struct uio *uio = sp->a_uio;
    618 	off_t uoff = uio->uio_offset;
    619 	off_t *cookies = NULL;
    620 	int ncookies = 0;
    621 
    622 #ifdef ADOSFS_DIAGNOSTIC
    623 	advopprint(sp);
    624 #endif
    625 
    626 	if (sp->a_vp->v_type != VDIR) {
    627 		error = ENOTDIR;
    628 		goto reterr;
    629 	}
    630 
    631 	if (uoff < 0) {
    632 		error = EINVAL;
    633 		goto reterr;
    634 	}
    635 
    636 	pap = VTOA(sp->a_vp);
    637 	adp = &ad;
    638 	error = nextbn = hashi = chainc = scanned = 0;
    639 	first = useri = uoff / sizeof ad;
    640 
    641 	/*
    642 	 * If offset requested is not on a slot boundary
    643 	 */
    644 	if (uoff % sizeof ad) {
    645 		error = EINVAL;
    646 		goto reterr;
    647 	}
    648 
    649 	for (;;) {
    650 		if (hashi == pap->ntabent) {
    651 			*sp->a_eofflag = 1;
    652 			break;
    653 		}
    654 		if (pap->tab[hashi] == 0) {
    655 			hashi++;
    656 			continue;
    657 		}
    658 		if (nextbn == 0)
    659 			nextbn = pap->tab[hashi];
    660 
    661 		/*
    662 		 * First determine if we can skip this chain
    663 		 */
    664 		if (chainc == 0) {
    665 			int skip;
    666 
    667 			skip = useri - scanned;
    668 			if (pap->tabi[hashi] > 0 && pap->tabi[hashi] <= skip) {
    669 				scanned += pap->tabi[hashi];
    670 				hashi++;
    671 				nextbn = 0;
    672 				continue;
    673 			}
    674 		}
    675 
    676 		/*
    677 		 * Now [continue to] walk the chain
    678 		 */
    679 		ap = NULL;
    680 		do {
    681 			error = VFS_VGET(pap->amp->mp, (ino_t)nextbn, &vp);
    682 			if (error)
    683 				goto reterr;
    684 			ap = VTOA(vp);
    685 			scanned++;
    686 			chainc++;
    687 			nextbn = ap->hashf;
    688 
    689 			/*
    690 			 * check for end of chain.
    691 			 */
    692 			if (nextbn == 0) {
    693 				pap->tabi[hashi] = chainc;
    694 				hashi++;
    695 				chainc = 0;
    696 			} else if (pap->tabi[hashi] <= 0 &&
    697 			    -chainc < pap->tabi[hashi])
    698 				pap->tabi[hashi] = -chainc;
    699 
    700 			if (useri >= scanned) {
    701 				vput(vp);
    702 				ap = NULL;
    703 			}
    704 		} while (ap == NULL && nextbn != 0);
    705 
    706 		/*
    707 		 * We left the loop but without a result so do main over.
    708 		 */
    709 		if (ap == NULL)
    710 			continue;
    711 		/*
    712 		 * Fill in dirent record
    713 		 */
    714 		memset(adp, 0, sizeof *adp);
    715 		adp->d_fileno = ap->block;
    716 		/*
    717 		 * This deserves a function in kern/vfs_subr.c
    718 		 */
    719 		switch (ATOV(ap)->v_type) {
    720 		case VREG:
    721 			adp->d_type = DT_REG;
    722 			break;
    723 		case VDIR:
    724 			adp->d_type = DT_DIR;
    725 			break;
    726 		case VLNK:
    727 			adp->d_type = DT_LNK;
    728 			break;
    729 		default:
    730 			adp->d_type = DT_UNKNOWN;
    731 			break;
    732 		}
    733 		adp->d_namlen = strlen(ap->name);
    734 		memcpy(adp->d_name, ap->name, adp->d_namlen);
    735 		adp->d_reclen = _DIRENT_SIZE(adp);
    736 		vput(vp);
    737 
    738 		if (adp->d_reclen > uio->uio_resid) {
    739 			if (useri == first)	/* no room for even one entry */
    740 				error = EINVAL;
    741 			break;
    742 		}
    743 		error = uiomove(adp, adp->d_reclen, uio);
    744 		if (error)
    745 			break;
    746 		useri++;
    747 	}
    748 	ncookies = useri - first;
    749 	uio->uio_offset = uoff + ncookies * sizeof ad;
    750 reterr:
    751 #ifdef ADOSFS_DIAGNOSTIC
    752 	printf(" %d)", error);
    753 #endif
    754 	if (sp->a_ncookies != NULL) {
    755 		*sp->a_ncookies = ncookies;
    756 		if (!error) {
    757 			*sp->a_cookies = cookies =
    758 			   malloc(ncookies * sizeof *cookies, M_TEMP, M_WAITOK);
    759 
    760 			while (ncookies--) {
    761 				uoff += sizeof ad;
    762 				*cookies++ = uoff;
    763 			}
    764 		} else
    765 			*sp->a_cookies = NULL;
    766 	}
    767 
    768 	return(error);
    769 }
    770 
    771 
    772 int
    773 adosfs_access(v)
    774 	void *v;
    775 {
    776 	struct vop_access_args /* {
    777 		struct vnode *a_vp;
    778 		int  a_mode;
    779 		kauth_cred_t a_cred;
    780 		struct lwp *a_l;
    781 	} */ *sp = v;
    782 	struct anode *ap;
    783 	struct vnode *vp = sp->a_vp;
    784 	int error;
    785 
    786 #ifdef ADOSFS_DIAGNOSTIC
    787 	advopprint(sp);
    788 #endif
    789 
    790 	ap = VTOA(vp);
    791 #ifdef DIAGNOSTIC
    792 	if (!VOP_ISLOCKED(vp)) {
    793 		vprint("adosfs_access: not locked", sp->a_vp);
    794 		panic("adosfs_access: not locked");
    795 	}
    796 #endif
    797 	/*
    798 	 * Disallow write attempts unless the file is a socket,
    799 	 * fifo, or a block or character device resident on the
    800 	 * file system.
    801 	 */
    802 	if (sp->a_mode & VWRITE) {
    803 		switch (vp->v_type) {
    804 		case VDIR:
    805 		case VLNK:
    806 		case VREG:
    807 			return (EROFS);
    808 		default:
    809 			break;
    810 		}
    811 	}
    812 #ifdef QUOTA
    813 #endif
    814 	error = vaccess(sp->a_vp->v_type, adunixprot(ap->adprot) & ap->amp->mask,
    815 	    ap->uid, ap->gid, sp->a_mode, sp->a_cred);
    816 #ifdef ADOSFS_DIAGNOSTIC
    817 	printf(" %d)", error);
    818 #endif
    819 	return(error);
    820 }
    821 
    822 int
    823 adosfs_readlink(v)
    824 	void *v;
    825 {
    826 	struct vop_readlink_args /* {
    827 		struct vnode *a_vp;
    828 		struct uio *a_uio;
    829 		kauth_cred_t a_cred;
    830 	} */ *sp = v;
    831 	struct anode *ap;
    832 	int error;
    833 
    834 #ifdef ADOSFS_DIAGNOSTIC
    835 	advopprint(sp);
    836 #endif
    837 	ap = VTOA(sp->a_vp);
    838 	error = uiomove(ap->slinkto, strlen(ap->slinkto), sp->a_uio);
    839 #ifdef ADOSFS_DIAGNOSTIC
    840 	printf(" %d)", error);
    841 #endif
    842 	return (error);
    843 }
    844 
    845 /*ARGSUSED*/
    846 int
    847 adosfs_inactive(v)
    848 	void *v;
    849 {
    850 	struct vop_inactive_args /* {
    851 		struct vnode *a_vp;
    852 		struct lwp *a_l;
    853 	} */ *sp = v;
    854 	struct vnode *vp = sp->a_vp;
    855 	struct lwp *l = sp->a_l;
    856 #ifdef ADOSFS_DIAGNOSTIC
    857 	advopprint(sp);
    858 #endif
    859 	VOP_UNLOCK(vp, 0);
    860 	/* XXX this needs to check if file was deleted */
    861 	vrecycle(vp, NULL, l);
    862 
    863 #ifdef ADOSFS_DIAGNOSTIC
    864 	printf(" 0)");
    865 #endif
    866 	return(0);
    867 }
    868 
    869 /*
    870  * the kernel wants its vnode back.
    871  * no lock needed we are being called from vclean()
    872  */
    873 int
    874 adosfs_reclaim(v)
    875 	void *v;
    876 {
    877 	struct vop_reclaim_args /* {
    878 		struct vnode *a_vp;
    879 	} */ *sp = v;
    880 	struct vnode *vp;
    881 	struct anode *ap;
    882 
    883 #ifdef ADOSFS_DIAGNOSTIC
    884 	printf("(reclaim 0)");
    885 #endif
    886 	vp = sp->a_vp;
    887 	ap = VTOA(vp);
    888 	LIST_REMOVE(ap, link);
    889 	cache_purge(vp);
    890 	if (vp->v_type == VDIR && ap->tab)
    891 		free(ap->tab, M_ANODE);
    892 	else if (vp->v_type == VLNK && ap->slinkto)
    893 		free(ap->slinkto, M_ANODE);
    894 	pool_put(&adosfs_node_pool, ap);
    895 	vp->v_data = NULL;
    896 	return(0);
    897 }
    898 
    899 /*
    900  * POSIX pathconf info, grabbed from kern/u fs, probably need to
    901  * investigate exactly what each return type means as they are probably
    902  * not valid currently
    903  */
    904 int
    905 adosfs_pathconf(v)
    906 	void *v;
    907 {
    908 	struct vop_pathconf_args /* {
    909 		struct vnode *a_vp;
    910 		int a_name;
    911 		register_t *a_retval;
    912 	} */ *ap = v;
    913 
    914 	switch (ap->a_name) {
    915 	case _PC_LINK_MAX:
    916 		*ap->a_retval = LINK_MAX;
    917 		return (0);
    918 	case _PC_NAME_MAX:
    919 		*ap->a_retval = ap->a_vp->v_mount->mnt_stat.f_namemax;
    920 		return (0);
    921 	case _PC_PATH_MAX:
    922 		*ap->a_retval = PATH_MAX;
    923 		return (0);
    924 	case _PC_PIPE_BUF:
    925 		*ap->a_retval = PIPE_BUF;
    926 		return (0);
    927 	case _PC_CHOWN_RESTRICTED:
    928 		*ap->a_retval = 1;
    929 		return (0);
    930 	case _PC_VDISABLE:
    931 		*ap->a_retval = _POSIX_VDISABLE;
    932 		return (0);
    933 	case _PC_SYNC_IO:
    934 		*ap->a_retval = 1;
    935 		return (0);
    936 	case _PC_FILESIZEBITS:
    937 		*ap->a_retval = 32;
    938 		return (0);
    939 	default:
    940 		return (EINVAL);
    941 	}
    942 	/* NOTREACHED */
    943 }
    944