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