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