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