1 /* $NetBSD: advfsops.c,v 1.43 2007/10/10 20:42:22 ad 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: advfsops.c,v 1.43 2007/10/10 20:42:22 ad Exp $"); 36 37 #if defined(_KERNEL_OPT) 38 #include "opt_compat_netbsd.h" 39 #endif 40 41 #include <sys/param.h> 42 #include <sys/systm.h> 43 #include <sys/sysctl.h> 44 #include <sys/vnode.h> 45 #include <sys/mount.h> 46 #include <sys/proc.h> 47 #include <sys/time.h> 48 #include <sys/malloc.h> 49 #include <sys/pool.h> 50 #include <sys/disklabel.h> 51 #include <miscfs/specfs/specdev.h> /* XXX */ 52 #include <sys/fcntl.h> 53 #include <sys/namei.h> 54 #include <sys/ioctl.h> 55 #include <sys/queue.h> 56 #include <sys/buf.h> 57 #include <sys/conf.h> 58 #include <sys/kauth.h> 59 #include <fs/adosfs/adosfs.h> 60 61 VFS_PROTOS(adosfs); 62 63 int adosfs_mountfs __P((struct vnode *, struct mount *, struct lwp *)); 64 int adosfs_loadbitmap __P((struct adosfsmount *)); 65 66 struct simplelock adosfs_hashlock; 67 68 struct pool adosfs_node_pool; 69 70 MALLOC_JUSTDEFINE(M_ADOSFSMNT, "adosfs mount", "adosfs mount structures"); 71 MALLOC_JUSTDEFINE(M_ANODE, "adosfs anode","adosfs anode structures and tables"); 72 MALLOC_JUSTDEFINE(M_ADOSFSBITMAP, "adosfs bitmap", "adosfs bitmap"); 73 74 static const struct genfs_ops adosfs_genfsops = { 75 .gop_size = genfs_size, 76 }; 77 78 int (**adosfs_vnodeop_p) __P((void *)); 79 80 int 81 adosfs_mount(mp, path, data, data_len, l) 82 struct mount *mp; 83 const char *path; 84 void *data; 85 size_t *data_len; 86 struct lwp *l; 87 { 88 struct nameidata nd; 89 struct vnode *devvp; 90 struct adosfs_args *args = data; 91 struct adosfsmount *amp; 92 int error; 93 mode_t accessmode; 94 95 if (*data_len < sizeof *args) 96 return EINVAL; 97 98 if (mp->mnt_flag & MNT_GETARGS) { 99 amp = VFSTOADOSFS(mp); 100 if (amp == NULL) 101 return EIO; 102 args->uid = amp->uid; 103 args->gid = amp->gid; 104 args->mask = amp->mask; 105 args->fspec = NULL; 106 *data_len = sizeof *args; 107 return 0; 108 } 109 110 if ((mp->mnt_flag & MNT_RDONLY) == 0) 111 return (EROFS); 112 113 if ((mp->mnt_flag & MNT_UPDATE) && args->fspec == NULL) 114 return EOPNOTSUPP; 115 116 /* 117 * Not an update, or updating the name: look up the name 118 * and verify that it refers to a sensible block device. 119 */ 120 NDINIT(&nd, LOOKUP, FOLLOW, UIO_USERSPACE, args->fspec, l); 121 if ((error = namei(&nd)) != 0) 122 return (error); 123 devvp = nd.ni_vp; 124 125 if (devvp->v_type != VBLK) { 126 vrele(devvp); 127 return (ENOTBLK); 128 } 129 if (bdevsw_lookup(devvp->v_rdev) == NULL) { 130 vrele(devvp); 131 return (ENXIO); 132 } 133 /* 134 * If mount by non-root, then verify that user has necessary 135 * permissions on the device. 136 */ 137 if (kauth_authorize_generic(l->l_cred, KAUTH_GENERIC_ISSUSER, NULL)) { 138 accessmode = VREAD; 139 if ((mp->mnt_flag & MNT_RDONLY) == 0) 140 accessmode |= VWRITE; 141 vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY); 142 error = VOP_ACCESS(devvp, accessmode, l->l_cred, l); 143 if (error) { 144 vput(devvp); 145 return (error); 146 } 147 VOP_UNLOCK(devvp, 0); 148 } 149 /* MNT_UPDATE? */ 150 if ((error = adosfs_mountfs(devvp, mp, l)) != 0) { 151 vrele(devvp); 152 return (error); 153 } 154 amp = VFSTOADOSFS(mp); 155 amp->uid = args->uid; 156 amp->gid = args->gid; 157 amp->mask = args->mask; 158 return set_statvfs_info(path, UIO_USERSPACE, args->fspec, UIO_USERSPACE, 159 mp->mnt_op->vfs_name, mp, l); 160 } 161 162 int 163 adosfs_mountfs(devvp, mp, l) 164 struct vnode *devvp; 165 struct mount *mp; 166 struct lwp *l; 167 { 168 struct disklabel dl; 169 struct partition *parp; 170 struct adosfsmount *amp; 171 struct buf *bp; 172 struct vnode *rvp; 173 int error, part, i; 174 175 part = DISKPART(devvp->v_rdev); 176 amp = NULL; 177 178 /* 179 * Disallow multiple mounts of the same device. 180 * Disallow mounting of a device that is currently in use 181 * (except for root, which might share swap device for miniroot). 182 * Flush out any old buffers remaining from a previous use. 183 */ 184 if ((error = vfs_mountedon(devvp)) != 0) 185 return (error); 186 if (vcount(devvp) > 1 && devvp != rootvp) 187 return (EBUSY); 188 if ((error = vinvalbuf(devvp, V_SAVE, l->l_cred, l, 0, 0)) 189 != 0) 190 return (error); 191 192 /* 193 * open blkdev and read root block 194 */ 195 if ((error = VOP_OPEN(devvp, FREAD, NOCRED, l)) != 0) 196 return (error); 197 error = VOP_IOCTL(devvp, DIOCGDINFO, &dl, FREAD, NOCRED, l); 198 if (error) 199 goto fail; 200 201 parp = &dl.d_partitions[part]; 202 amp = malloc(sizeof(struct adosfsmount), M_ADOSFSMNT, M_WAITOK); 203 memset((char *)amp, 0, (u_long)sizeof(struct adosfsmount)); 204 amp->mp = mp; 205 if (dl.d_type == DTYPE_FLOPPY) { 206 amp->bsize = dl.d_secsize; 207 amp->secsperblk = 1; 208 } 209 else { 210 amp->bsize = parp->p_fsize * parp->p_frag; 211 amp->secsperblk = parp->p_frag; 212 } 213 214 /* invalid fs ? */ 215 if (amp->secsperblk == 0) { 216 error = EINVAL; 217 goto fail; 218 } 219 220 bp = NULL; 221 if ((error = bread(devvp, (daddr_t)BBOFF, 222 amp->bsize, NOCRED, &bp)) != 0) { 223 brelse(bp, 0); 224 goto fail; 225 } 226 amp->dostype = adoswordn(bp, 0); 227 brelse(bp, 0); 228 229 /* basic sanity checks */ 230 if (amp->dostype < 0x444f5300 || amp->dostype > 0x444f5305) { 231 error = EINVAL; 232 goto fail; 233 } 234 235 amp->rootb = (parp->p_size / amp->secsperblk - 1 + parp->p_cpg) >> 1; 236 amp->numblks = parp->p_size / amp->secsperblk - parp->p_cpg; 237 238 amp->nwords = amp->bsize >> 2; 239 amp->dbsize = amp->bsize - (IS_FFS(amp) ? 0 : OFS_DATA_OFFSET); 240 amp->devvp = devvp; 241 242 mp->mnt_data = amp; 243 mp->mnt_stat.f_fsidx.__fsid_val[0] = (long)devvp->v_rdev; 244 mp->mnt_stat.f_fsidx.__fsid_val[1] = makefstype(MOUNT_ADOSFS); 245 mp->mnt_stat.f_fsid = mp->mnt_stat.f_fsidx.__fsid_val[0]; 246 mp->mnt_stat.f_namemax = ADMAXNAMELEN; 247 mp->mnt_fs_bshift = ffs(amp->bsize) - 1; 248 mp->mnt_dev_bshift = DEV_BSHIFT; /* XXX */ 249 mp->mnt_flag |= MNT_LOCAL; 250 251 /* 252 * init anode table. 253 */ 254 for (i = 0; i < ANODEHASHSZ; i++) 255 LIST_INIT(&->anodetab[i]); 256 257 /* 258 * get the root anode, if not a valid fs this will fail. 259 */ 260 if ((error = VFS_ROOT(mp, &rvp)) != 0) 261 goto fail; 262 /* allocate and load bitmap, set free space */ 263 amp->bitmap = malloc(((amp->numblks + 31) / 32) * sizeof(*amp->bitmap), 264 M_ADOSFSBITMAP, M_WAITOK); 265 if (amp->bitmap) 266 adosfs_loadbitmap(amp); 267 if (mp->mnt_flag & MNT_RDONLY && amp->bitmap) { 268 /* 269 * Don't need the bitmap any more if it's read-only. 270 */ 271 free(amp->bitmap, M_ADOSFSBITMAP); 272 amp->bitmap = NULL; 273 } 274 vput(rvp); 275 276 return(0); 277 278 fail: 279 vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY); 280 (void) VOP_CLOSE(devvp, FREAD, NOCRED, l); 281 VOP_UNLOCK(devvp, 0); 282 if (amp && amp->bitmap) 283 free(amp->bitmap, M_ADOSFSBITMAP); 284 if (amp) 285 free(amp, M_ADOSFSMNT); 286 return (error); 287 } 288 289 int 290 adosfs_start(mp, flags, l) 291 struct mount *mp; 292 int flags; 293 struct lwp *l; 294 { 295 296 return (0); 297 } 298 299 int 300 adosfs_unmount(mp, mntflags, l) 301 struct mount *mp; 302 int mntflags; 303 struct lwp *l; 304 { 305 struct adosfsmount *amp; 306 int error, flags; 307 308 flags = 0; 309 if (mntflags & MNT_FORCE) 310 flags |= FORCECLOSE; 311 if ((error = vflush(mp, NULLVP, flags)) != 0) 312 return (error); 313 amp = VFSTOADOSFS(mp); 314 if (amp->devvp->v_type != VBAD) 315 amp->devvp->v_specmountpoint = NULL; 316 vn_lock(amp->devvp, LK_EXCLUSIVE | LK_RETRY); 317 error = VOP_CLOSE(amp->devvp, FREAD, NOCRED, l); 318 vput(amp->devvp); 319 if (amp->bitmap) 320 free(amp->bitmap, M_ADOSFSBITMAP); 321 free(amp, M_ADOSFSMNT); 322 mp->mnt_data = NULL; 323 mp->mnt_flag &= ~MNT_LOCAL; 324 return (error); 325 } 326 327 int 328 adosfs_root(mp, vpp) 329 struct mount *mp; 330 struct vnode **vpp; 331 { 332 struct vnode *nvp; 333 int error; 334 335 if ((error = VFS_VGET(mp, (ino_t)VFSTOADOSFS(mp)->rootb, &nvp)) != 0) 336 return (error); 337 /* XXX verify it's a root block? */ 338 *vpp = nvp; 339 return (0); 340 } 341 342 int 343 adosfs_statvfs(mp, sbp, l) 344 struct mount *mp; 345 struct statvfs *sbp; 346 struct lwp *l; 347 { 348 struct adosfsmount *amp; 349 350 amp = VFSTOADOSFS(mp); 351 sbp->f_bsize = amp->bsize; 352 sbp->f_frsize = amp->bsize; 353 sbp->f_iosize = amp->dbsize; 354 sbp->f_blocks = amp->numblks; 355 sbp->f_bfree = amp->freeblks; 356 sbp->f_bavail = amp->freeblks; 357 sbp->f_bresvd = 0; 358 sbp->f_files = 0; /* who knows */ 359 sbp->f_ffree = 0; /* " " */ 360 sbp->f_favail = 0; /* " " */ 361 sbp->f_fresvd = 0; 362 copy_statvfs_info(sbp, mp); 363 return (0); 364 } 365 366 /* 367 * lookup an anode, check mount's hash table if not found, create 368 * return locked and referenced al la vget(vp, 1); 369 */ 370 int 371 adosfs_vget(mp, an, vpp) 372 struct mount *mp; 373 ino_t an; 374 struct vnode **vpp; 375 { 376 struct adosfsmount *amp; 377 struct vnode *vp; 378 struct anode *ap; 379 struct buf *bp; 380 char *nam, *tmp; 381 int namlen, error; 382 383 error = 0; 384 amp = VFSTOADOSFS(mp); 385 bp = NULL; 386 387 /* 388 * check hash table. we are done if found 389 */ 390 if ((*vpp = adosfs_ahashget(mp, an)) != NULL) 391 return (0); 392 393 error = getnewvnode(VT_ADOSFS, mp, adosfs_vnodeop_p, &vp); 394 if (error) 395 return (error); 396 397 /* 398 * setup, insert in hash, and lock before io. 399 */ 400 vp->v_data = ap = pool_get(&adosfs_node_pool, PR_WAITOK); 401 memset(ap, 0, sizeof(struct anode)); 402 ap->vp = vp; 403 ap->amp = amp; 404 ap->block = an; 405 ap->nwords = amp->nwords; 406 adosfs_ainshash(amp, ap); 407 408 if ((error = bread(amp->devvp, an * amp->bsize / DEV_BSIZE, 409 amp->bsize, NOCRED, &bp)) != 0) { 410 brelse(bp, 0); 411 vput(vp); 412 return (error); 413 } 414 415 /* 416 * get type and fill rest in based on that. 417 */ 418 switch (ap->type = adosfs_getblktype(amp, bp)) { 419 case AROOT: 420 vp->v_type = VDIR; 421 vp->v_vflag |= VV_ROOT; 422 ap->mtimev.days = adoswordn(bp, ap->nwords - 10); 423 ap->mtimev.mins = adoswordn(bp, ap->nwords - 9); 424 ap->mtimev.ticks = adoswordn(bp, ap->nwords - 8); 425 ap->created.days = adoswordn(bp, ap->nwords - 7); 426 ap->created.mins = adoswordn(bp, ap->nwords - 6); 427 ap->created.ticks = adoswordn(bp, ap->nwords - 5); 428 break; 429 case ALDIR: 430 case ADIR: 431 vp->v_type = VDIR; 432 break; 433 case ALFILE: 434 case AFILE: 435 vp->v_type = VREG; 436 ap->fsize = adoswordn(bp, ap->nwords - 47); 437 break; 438 case ASLINK: /* XXX soft link */ 439 vp->v_type = VLNK; 440 /* 441 * convert from BCPL string and 442 * from: "part:dir/file" to: "/part/dir/file" 443 */ 444 nam = (char *)bp->b_data + (6 * sizeof(long)); 445 namlen = strlen(nam); 446 tmp = nam; 447 while (*tmp && *tmp != ':') 448 tmp++; 449 if (*tmp == 0) { 450 ap->slinkto = malloc(namlen + 1, M_ANODE, M_WAITOK); 451 memcpy(ap->slinkto, nam, namlen); 452 } else if (*nam == ':') { 453 ap->slinkto = malloc(namlen + 1, M_ANODE, M_WAITOK); 454 memcpy(ap->slinkto, nam, namlen); 455 ap->slinkto[0] = '/'; 456 } else { 457 ap->slinkto = malloc(namlen + 2, M_ANODE, M_WAITOK); 458 ap->slinkto[0] = '/'; 459 memcpy(&ap->slinkto[1], nam, namlen); 460 ap->slinkto[tmp - nam + 1] = '/'; 461 namlen++; 462 } 463 ap->slinkto[namlen] = 0; 464 ap->fsize = namlen; 465 break; 466 default: 467 brelse(bp, 0); 468 vput(vp); 469 return (EINVAL); 470 } 471 472 /* 473 * Get appropriate data from this block; hard link needs 474 * to get other data from the "real" block. 475 */ 476 477 /* 478 * copy in name (from original block) 479 */ 480 nam = (char *)bp->b_data + (ap->nwords - 20) * sizeof(u_int32_t); 481 namlen = *(u_char *)nam++; 482 if (namlen > 30) { 483 #ifdef DIAGNOSTIC 484 printf("adosfs: aget: name length too long blk %llu\n", 485 (unsigned long long)an); 486 #endif 487 brelse(bp, 0); 488 vput(vp); 489 return (EINVAL); 490 } 491 memcpy(ap->name, nam, namlen); 492 ap->name[namlen] = 0; 493 494 /* 495 * if dir alloc hash table and copy it in 496 */ 497 if (vp->v_type == VDIR) { 498 int i; 499 500 ap->tab = malloc(ANODETABSZ(ap) * 2, M_ANODE, M_WAITOK); 501 ap->ntabent = ANODETABENT(ap); 502 ap->tabi = (int *)&ap->tab[ap->ntabent]; 503 memset(ap->tabi, 0, ANODETABSZ(ap)); 504 for (i = 0; i < ap->ntabent; i++) 505 ap->tab[i] = adoswordn(bp, i + 6); 506 } 507 508 /* 509 * misc. 510 */ 511 ap->pblock = adoswordn(bp, ap->nwords - 3); 512 ap->hashf = adoswordn(bp, ap->nwords - 4); 513 ap->linknext = adoswordn(bp, ap->nwords - 10); 514 ap->linkto = adoswordn(bp, ap->nwords - 11); 515 516 /* 517 * setup last indirect block cache. 518 */ 519 ap->lastlindblk = 0; 520 if (ap->type == AFILE) { 521 ap->lastindblk = ap->block; 522 if (adoswordn(bp, ap->nwords - 10)) 523 ap->linkto = ap->block; 524 } else if (ap->type == ALFILE) { 525 ap->lastindblk = ap->linkto; 526 brelse(bp, 0); 527 bp = NULL; 528 error = bread(amp->devvp, ap->linkto * amp->bsize / DEV_BSIZE, 529 amp->bsize, NOCRED, &bp); 530 if (error) { 531 brelse(bp, 0); 532 vput(vp); 533 return (error); 534 } 535 ap->fsize = adoswordn(bp, ap->nwords - 47); 536 /* 537 * Should ap->block be set to the real file header block? 538 */ 539 ap->block = ap->linkto; 540 } 541 542 if (ap->type == AROOT) { 543 ap->adprot = 15; 544 ap->uid = amp->uid; 545 ap->gid = amp->gid; 546 } else { 547 ap->adprot = adoswordn(bp, ap->nwords - 48) ^ 15; 548 /* 549 * ADOS directories do not have a `x' protection bit as 550 * it is known in VFS; this functionality is fulfilled 551 * by the ADOS `r' bit. 552 * 553 * To retain the ADOS behaviour, fake execute permissions 554 * in that case. 555 */ 556 if ((ap->type == ADIR || ap->type == ALDIR) && 557 (ap->adprot & 0x00000008) == 0) 558 ap->adprot &= ~0x00000002; 559 560 /* 561 * Get uid/gid from extensions in file header 562 * (really need to know if this is a muFS partition) 563 */ 564 ap->uid = (adoswordn(bp, ap->nwords - 49) >> 16) & 0xffff; 565 ap->gid = adoswordn(bp, ap->nwords - 49) & 0xffff; 566 if (ap->uid || ap->gid) { 567 if (ap->uid == 0xffff) 568 ap->uid = 0; 569 if (ap->gid == 0xffff) 570 ap->gid = 0; 571 ap->adprot |= 0x40000000; /* Kludge */ 572 } 573 else { 574 /* 575 * uid & gid extension don't exist, 576 * so use the mount-point uid/gid 577 */ 578 ap->uid = amp->uid; 579 ap->gid = amp->gid; 580 } 581 } 582 ap->mtime.days = adoswordn(bp, ap->nwords - 23); 583 ap->mtime.mins = adoswordn(bp, ap->nwords - 22); 584 ap->mtime.ticks = adoswordn(bp, ap->nwords - 21); 585 586 genfs_node_init(vp, &adosfs_genfsops); 587 *vpp = vp; 588 brelse(bp, 0); 589 uvm_vnp_setsize(vp, ap->fsize); 590 return (0); 591 } 592 593 /* 594 * Load the bitmap into memory, and count the number of available 595 * blocks. 596 * The bitmap will be released if the filesystem is read-only; it's 597 * only needed to find the free space. 598 */ 599 int 600 adosfs_loadbitmap(amp) 601 struct adosfsmount *amp; 602 { 603 struct buf *bp, *mapbp; 604 u_long bn; 605 int blkix, endix, mapix; 606 int bmsize; 607 int error; 608 609 bp = mapbp = NULL; 610 bn = amp->rootb; 611 if ((error = bread(amp->devvp, bn * amp->bsize / DEV_BSIZE, amp->bsize, 612 NOCRED, &bp)) != 0) { 613 brelse(bp, 0); 614 return (error); 615 } 616 blkix = amp->nwords - 49; 617 endix = amp->nwords - 24; 618 mapix = 0; 619 bmsize = (amp->numblks + 31) / 32; 620 while (mapix < bmsize) { 621 int n; 622 u_long bits; 623 624 if (adoswordn(bp, blkix) == 0) 625 break; 626 if (mapbp != NULL) 627 brelse(mapbp, 0); 628 if ((error = bread(amp->devvp, 629 adoswordn(bp, blkix) * amp->bsize / DEV_BSIZE, amp->bsize, 630 NOCRED, &mapbp)) != 0) 631 break; 632 if (adoscksum(mapbp, amp->nwords)) { 633 #ifdef DIAGNOSTIC 634 printf("adosfs: loadbitmap - cksum of blk %d failed\n", 635 adoswordn(bp, blkix)); 636 #endif 637 /* XXX Force read-only? Set free space 0? */ 638 break; 639 } 640 n = 1; 641 while (n < amp->nwords && mapix < bmsize) { 642 amp->bitmap[mapix++] = bits = adoswordn(mapbp, n); 643 ++n; 644 if (mapix == bmsize && amp->numblks & 31) 645 bits &= ~(0xffffffff << (amp->numblks & 31)); 646 while (bits) { 647 if (bits & 1) 648 ++amp->freeblks; 649 bits >>= 1; 650 } 651 } 652 ++blkix; 653 if (mapix < bmsize && blkix == endix) { 654 bn = adoswordn(bp, blkix); 655 brelse(bp, 0); 656 if ((error = bread(amp->devvp, bn * amp->bsize / DEV_BSIZE, 657 amp->bsize, NOCRED, &bp)) != 0) 658 break; 659 /* 660 * Why is there no checksum on these blocks? 661 */ 662 blkix = 0; 663 endix = amp->nwords - 1; 664 } 665 } 666 if (bp) 667 brelse(bp, 0); 668 if (mapbp) 669 brelse(mapbp, 0); 670 return (error); 671 } 672 673 674 /* 675 * File handle to vnode 676 * 677 * Have to be really careful about stale file handles: 678 * - check that the inode number is in range 679 * - call iget() to get the locked inode 680 * - check for an unallocated inode (i_mode == 0) 681 * - check that the generation number matches 682 */ 683 684 struct ifid { 685 ushort ifid_len; 686 ushort ifid_pad; 687 int ifid_ino; 688 long ifid_start; 689 }; 690 691 int 692 adosfs_fhtovp(mp, fhp, vpp) 693 struct mount *mp; 694 struct fid *fhp; 695 struct vnode **vpp; 696 { 697 struct ifid ifh; 698 #if 0 699 struct anode *ap; 700 #endif 701 struct vnode *nvp; 702 int error; 703 704 if (fhp->fid_len != sizeof(struct ifid)) 705 return EINVAL; 706 707 #ifdef ADOSFS_DIAGNOSTIC 708 printf("adfhtovp(%x, %x, %x)\n", mp, fhp, vpp); 709 #endif 710 711 memcpy(&ifh, fhp, sizeof(ifh)); 712 713 if ((error = VFS_VGET(mp, ifh.ifid_ino, &nvp)) != 0) { 714 *vpp = NULLVP; 715 return (error); 716 } 717 #if 0 718 ap = VTOA(nvp); 719 if (ap->inode.iso_mode == 0) { 720 vput(nvp); 721 *vpp = NULLVP; 722 return (ESTALE); 723 } 724 #endif 725 *vpp = nvp; 726 return(0); 727 } 728 729 int 730 adosfs_vptofh(vp, fhp, fh_size) 731 struct vnode *vp; 732 struct fid *fhp; 733 size_t *fh_size; 734 { 735 struct anode *ap = VTOA(vp); 736 struct ifid ifh; 737 738 if (*fh_size < sizeof(struct ifid)) { 739 *fh_size = sizeof(struct ifid); 740 return E2BIG; 741 } 742 *fh_size = sizeof(struct ifid); 743 744 memset(&ifh, 0, sizeof(ifh)); 745 ifh.ifid_len = sizeof(struct ifid); 746 ifh.ifid_ino = ap->block; 747 ifh.ifid_start = ap->block; 748 memcpy(fhp, &ifh, sizeof(ifh)); 749 750 #ifdef ADOSFS_DIAGNOSTIC 751 printf("advptofh(%x, %x)\n", vp, fhp); 752 #endif 753 return(0); 754 } 755 756 int 757 adosfs_quotactl(mp, cmds, uid, arg, l) 758 struct mount *mp; 759 int cmds; 760 uid_t uid; 761 void *arg; 762 struct lwp *l; 763 { 764 return(EOPNOTSUPP); 765 } 766 767 int 768 adosfs_sync(mp, waitfor, uc, l) 769 struct mount *mp; 770 int waitfor; 771 kauth_cred_t uc; 772 struct lwp *l; 773 { 774 #ifdef ADOSFS_DIAGNOSTIC 775 printf("ad_sync(%x, %x)\n", mp, waitfor); 776 #endif 777 return(0); 778 } 779 780 void 781 adosfs_init() 782 { 783 784 malloc_type_attach(M_ADOSFSMNT); 785 malloc_type_attach(M_ANODE); 786 malloc_type_attach(M_ADOSFSBITMAP); 787 pool_init(&adosfs_node_pool, sizeof(struct anode), 0, 0, 0, "adosndpl", 788 &pool_allocator_nointr, IPL_NONE); 789 simple_lock_init(&adosfs_hashlock); 790 } 791 792 void 793 adosfs_done() 794 { 795 796 pool_destroy(&adosfs_node_pool); 797 malloc_type_detach(M_ADOSFSBITMAP); 798 malloc_type_detach(M_ANODE); 799 malloc_type_detach(M_ADOSFSMNT); 800 } 801 802 SYSCTL_SETUP(sysctl_vfs_adosfs_setup, "sysctl vfs.adosfs subtree setup") 803 { 804 805 sysctl_createv(clog, 0, NULL, NULL, 806 CTLFLAG_PERMANENT, 807 CTLTYPE_NODE, "vfs", NULL, 808 NULL, 0, NULL, 0, 809 CTL_VFS, CTL_EOL); 810 sysctl_createv(clog, 0, NULL, NULL, 811 CTLFLAG_PERMANENT, 812 CTLTYPE_NODE, "adosfs", 813 SYSCTL_DESCR("AmigaDOS file system"), 814 NULL, 0, NULL, 0, 815 CTL_VFS, 16, CTL_EOL); 816 /* 817 * XXX the "16" above could be dynamic, thereby eliminating 818 * one more instance of the "number to vfs" mapping problem, 819 * but "16" is the order as taken from sys/mount.h 820 */ 821 } 822 823 /* 824 * vfs generic function call table 825 */ 826 827 extern const struct vnodeopv_desc adosfs_vnodeop_opv_desc; 828 829 const struct vnodeopv_desc *adosfs_vnodeopv_descs[] = { 830 &adosfs_vnodeop_opv_desc, 831 NULL, 832 }; 833 834 struct vfsops adosfs_vfsops = { 835 MOUNT_ADOSFS, 836 sizeof (struct adosfs_args), 837 adosfs_mount, 838 adosfs_start, 839 adosfs_unmount, 840 adosfs_root, 841 adosfs_quotactl, 842 adosfs_statvfs, 843 adosfs_sync, 844 adosfs_vget, 845 adosfs_fhtovp, 846 adosfs_vptofh, 847 adosfs_init, 848 NULL, 849 adosfs_done, 850 NULL, /* vfs_mountroot */ 851 (int (*)(struct mount *, struct vnode *, struct timespec *)) eopnotsupp, 852 vfs_stdextattrctl, 853 (void *)eopnotsupp, /* vfs_suspendctl */ 854 adosfs_vnodeopv_descs, 855 0, 856 { NULL, NULL }, 857 }; 858 VFS_ATTACH(adosfs_vfsops); 859