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