1 /*- 2 * Copyright (c) 1998, 1999 Semen Ustimenko (semenu@FreeBSD.org) 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 24 * SUCH DAMAGE. 25 * 26 * $FreeBSD: src/sys/fs/hpfs/hpfs_vfsops.c,v 1.3.2.2 2001/12/25 01:44:45 dillon Exp $ 27 */ 28 29 30 #include <sys/param.h> 31 #include <sys/systm.h> 32 #include <sys/nlookup.h> 33 #include <sys/conf.h> 34 #include <sys/proc.h> 35 #include <sys/kernel.h> 36 #include <sys/vnode.h> 37 #include <sys/mount.h> 38 #include <sys/buf.h> 39 #include <sys/fcntl.h> 40 #include <sys/malloc.h> 41 42 #include <machine/inttypes.h> 43 44 #include <vm/vm.h> 45 #include <vm/vm_param.h> 46 #if defined(__NetBSD__) 47 #include <vm/vm_prot.h> 48 #endif 49 #include <vm/vm_page.h> 50 #include <vm/vm_object.h> 51 #include <vm/vm_extern.h> 52 53 #include <sys/buf2.h> 54 55 #if defined(__NetBSD__) 56 #include <miscfs/specfs/specdev.h> 57 #endif 58 59 #include "hpfs.h" 60 #include "hpfsmount.h" 61 #include "hpfs_subr.h" 62 63 extern struct vop_ops hpfs_vnode_vops; 64 65 MALLOC_DEFINE(M_HPFSMNT, "HPFS mount", "HPFS mount structure"); 66 MALLOC_DEFINE(M_HPFSNO, "HPFS node", "HPFS node structure"); 67 68 static int hpfs_root (struct mount *, struct vnode **); 69 static int hpfs_statfs (struct mount *, struct statfs *, struct ucred *); 70 static int hpfs_unmount (struct mount *, int); 71 static int hpfs_vget (struct mount *mp, struct vnode *, 72 ino_t ino, struct vnode **vpp); 73 static int hpfs_mountfs (struct vnode *, struct mount *, 74 struct hpfs_args *); 75 static int hpfs_vptofh (struct vnode *, struct fid *); 76 static int hpfs_fhtovp (struct mount *, struct vnode *, 77 struct fid *, struct vnode **); 78 79 80 struct sockaddr; 81 static int hpfs_mount (struct mount *, char *, caddr_t, struct ucred *); 82 static int hpfs_init (struct vfsconf *); 83 static int hpfs_checkexp (struct mount *, struct sockaddr *, 84 int *, struct ucred **); 85 86 /*ARGSUSED*/ 87 static int 88 hpfs_checkexp(struct mount *mp, 89 struct sockaddr *nam, 90 int *exflagsp, struct ucred **credanonp) 91 { 92 struct netcred *np; 93 struct hpfsmount *hpm = VFSTOHPFS(mp); 94 95 /* 96 * Get the export permission structure for this <mp, client> tuple. 97 */ 98 np = vfs_export_lookup(mp, &hpm->hpm_export, nam); 99 if (np == NULL) 100 return (EACCES); 101 102 *exflagsp = np->netc_exflags; 103 *credanonp = &np->netc_anon; 104 return (0); 105 } 106 107 static int 108 hpfs_init(struct vfsconf *vcp) 109 { 110 dprintf(("hpfs_init():\n")); 111 112 hpfs_hphashinit(); 113 return 0; 114 } 115 116 static int 117 hpfs_mount(struct mount *mp, char *path, caddr_t data, struct ucred *cred) 118 { 119 size_t size; 120 int error; 121 struct vnode *devvp; 122 struct hpfs_args args; 123 struct hpfsmount *hpmp = NULL; 124 struct nlookupdata nd; 125 126 dprintf(("hpfs_mount():\n")); 127 /* 128 *** 129 * Mounting non-root file system or updating a file system 130 *** 131 */ 132 133 /* copy in user arguments*/ 134 error = copyin(data, (caddr_t)&args, sizeof (struct hpfs_args)); 135 if (error) 136 goto error_1; /* can't get arguments*/ 137 138 /* 139 * If updating, check whether changing from read-only to 140 * read/write; if there is no device name, that's all we do. 141 */ 142 if (mp->mnt_flag & MNT_UPDATE) { 143 dprintf(("hpfs_mount: MNT_UPDATE: ")); 144 145 hpmp = VFSTOHPFS(mp); 146 147 if (args.fspec == NULL) { 148 dprintf(("export 0x%x\n",args.export.ex_flags)); 149 error = vfs_export(mp, &hpmp->hpm_export, &args.export); 150 if (error) { 151 kprintf("hpfs_mount: vfs_export failed %d\n", 152 error); 153 } 154 goto success; 155 } else { 156 dprintf(("name [FAILED]\n")); 157 error = EINVAL; 158 goto success; 159 } 160 dprintf(("\n")); 161 } 162 163 /* 164 * Not an update, or updating the name: look up the name 165 * and verify that it refers to a sensible block device. 166 */ 167 devvp = NULL; 168 error = nlookup_init(&nd, args.fspec, UIO_USERSPACE, NLC_FOLLOW); 169 if (error == 0) 170 error = nlookup(&nd); 171 if (error == 0) 172 error = cache_vref(&nd.nl_nch, nd.nl_cred, &devvp); 173 nlookup_done(&nd); 174 if (error) 175 goto error_1; 176 177 if (!vn_isdisk(devvp, &error)) 178 goto error_2; 179 180 /* 181 ******************** 182 * NEW MOUNT 183 ******************** 184 */ 185 186 /* Save "mounted from" info for mount point (NULL pad)*/ 187 copyinstr( args.fspec, /* device name*/ 188 mp->mnt_stat.f_mntfromname, /* save area*/ 189 MNAMELEN - 1, /* max size*/ 190 &size); /* real size*/ 191 bzero( mp->mnt_stat.f_mntfromname + size, MNAMELEN - size); 192 193 error = hpfs_mountfs(devvp, mp, &args); 194 if (error) 195 goto error_2; 196 197 /* 198 * Initialize FS stat information in mount struct; uses 199 * mp->mnt_stat.f_mntfromname. 200 * 201 * This code is common to root and non-root mounts 202 */ 203 VFS_STATFS(mp, &mp->mnt_stat, cred); 204 return (error); 205 206 error_2: /* error with devvp held*/ 207 208 /* release devvp before failing*/ 209 vrele(devvp); 210 211 error_1: /* no state to back out*/ 212 213 success: 214 return (error); 215 } 216 217 /* 218 * Common code for mount and mountroot 219 */ 220 int 221 hpfs_mountfs(struct vnode *devvp, struct mount *mp, struct hpfs_args *argsp) 222 { 223 int error, ncount, ronly; 224 struct sublock *sup; 225 struct spblock *spp; 226 struct hpfsmount *hpmp; 227 struct buf *bp = NULL; 228 struct vnode *vp; 229 cdev_t dev; 230 231 dprintf(("hpfs_mountfs():\n")); 232 /* 233 * Disallow multiple mounts of the same device. 234 * Disallow mounting of a device that is currently in use 235 * (except for root, which might share swap device for miniroot). 236 * Flush out any old buffers remaining from a previous use. 237 */ 238 error = vfs_mountedon(devvp); 239 if (error) 240 return (error); 241 ncount = vcount(devvp); 242 if (devvp->v_object) 243 ncount -= 1; 244 if (ncount > 0) 245 return (EBUSY); 246 247 VN_LOCK(devvp, LK_EXCLUSIVE | LK_RETRY); 248 error = vinvalbuf(devvp, V_SAVE, 0, 0); 249 VOP__UNLOCK(devvp, 0); 250 if (error) 251 return (error); 252 253 ronly = (mp->mnt_flag & MNT_RDONLY) != 0; 254 VN_LOCK(devvp, LK_EXCLUSIVE | LK_RETRY); 255 error = VOP_OPEN(devvp, ronly ? FREAD : FREAD|FWRITE, FSCRED, NULL); 256 VOP__UNLOCK(devvp, 0); 257 if (error) 258 return (error); 259 dev = devvp->v_rdev; 260 261 /* 262 * Do actual mount 263 */ 264 hpmp = kmalloc(sizeof(struct hpfsmount), M_HPFSMNT, M_WAITOK | M_ZERO); 265 266 /* Read in SuperBlock */ 267 error = bread(devvp, dbtodoff(SUBLOCK), SUSIZE, &bp); 268 if (error) 269 goto failed; 270 bcopy(bp->b_data, &hpmp->hpm_su, sizeof(struct sublock)); 271 brelse(bp); bp = NULL; 272 273 /* Read in SpareBlock */ 274 error = bread(devvp, dbtodoff(SPBLOCK), SPSIZE, &bp); 275 if (error) 276 goto failed; 277 bcopy(bp->b_data, &hpmp->hpm_sp, sizeof(struct spblock)); 278 brelse(bp); bp = NULL; 279 280 sup = &hpmp->hpm_su; 281 spp = &hpmp->hpm_sp; 282 283 /* Check magic */ 284 if (sup->su_magic != SU_MAGIC) { 285 kprintf("hpfs_mountfs: SuperBlock MAGIC DOESN'T MATCH\n"); 286 error = EINVAL; 287 goto failed; 288 } 289 if (spp->sp_magic != SP_MAGIC) { 290 kprintf("hpfs_mountfs: SpareBlock MAGIC DOESN'T MATCH\n"); 291 error = EINVAL; 292 goto failed; 293 } 294 295 mp->mnt_data = (qaddr_t)hpmp; 296 hpmp->hpm_devvp = devvp; 297 hpmp->hpm_dev = dev; 298 hpmp->hpm_mp = mp; 299 hpmp->hpm_uid = argsp->uid; 300 hpmp->hpm_gid = argsp->gid; 301 hpmp->hpm_mode = argsp->mode; 302 303 error = hpfs_bminit(hpmp); 304 if (error) 305 goto failed; 306 307 error = hpfs_cpinit(hpmp, argsp); 308 if (error) { 309 hpfs_bmdeinit(hpmp); 310 goto failed; 311 } 312 vfs_add_vnodeops(mp, &hpfs_vnode_vops, &mp->mnt_vn_norm_ops); 313 314 error = hpfs_root(mp, &vp); 315 if (error) { 316 hpfs_cpdeinit(hpmp); 317 hpfs_bmdeinit(hpmp); 318 goto failed; 319 } 320 321 vput(vp); 322 323 mp->mnt_stat.f_fsid.val[0] = (long)dev2udev(dev); 324 mp->mnt_stat.f_fsid.val[1] = mp->mnt_vfc->vfc_typenum; 325 mp->mnt_maxsymlinklen = 0; 326 mp->mnt_flag |= MNT_LOCAL; 327 dev->si_mountpoint = mp; 328 return (0); 329 330 failed: 331 if (bp) 332 brelse (bp); 333 mp->mnt_data = NULL; 334 dev->si_mountpoint = NULL; 335 vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY); 336 VOP_CLOSE(devvp, ronly ? FREAD : FREAD|FWRITE, NULL); 337 vn_unlock(devvp); 338 return (error); 339 } 340 341 342 static int 343 hpfs_unmount(struct mount *mp, int mntflags) 344 { 345 int error, flags, ronly; 346 struct hpfsmount *hpmp = VFSTOHPFS(mp); 347 348 dprintf(("hpfs_unmount():\n")); 349 350 ronly = (mp->mnt_flag & MNT_RDONLY) != 0; 351 352 flags = 0; 353 if(mntflags & MNT_FORCE) 354 flags |= FORCECLOSE; 355 356 dprintf(("hpfs_unmount: vflushing...\n")); 357 358 error = vflush(mp, 0, flags); 359 if (error) { 360 kprintf("hpfs_unmount: vflush failed: %d\n",error); 361 return (error); 362 } 363 364 hpmp->hpm_devvp->v_rdev->si_mountpoint = NULL; 365 366 vn_lock(hpmp->hpm_devvp, LK_EXCLUSIVE | LK_RETRY); 367 vinvalbuf(hpmp->hpm_devvp, V_SAVE, 0, 0); 368 error = VOP_CLOSE(hpmp->hpm_devvp, ronly ? FREAD : FREAD|FWRITE, NULL); 369 vn_unlock(hpmp->hpm_devvp); 370 371 vrele(hpmp->hpm_devvp); 372 373 dprintf(("hpfs_umount: freeing memory...\n")); 374 hpfs_cpdeinit(hpmp); 375 hpfs_bmdeinit(hpmp); 376 mp->mnt_data = (qaddr_t)0; 377 mp->mnt_flag &= ~MNT_LOCAL; 378 kfree(hpmp, M_HPFSMNT); 379 380 return (0); 381 } 382 383 static int 384 hpfs_root(struct mount *mp, struct vnode **vpp) 385 { 386 int error = 0; 387 struct hpfsmount *hpmp = VFSTOHPFS(mp); 388 389 dprintf(("hpfs_root():\n")); 390 error = VFS_VGET(mp, NULL, (ino_t)hpmp->hpm_su.su_rootfno, vpp); 391 if(error) { 392 kprintf("hpfs_root: VFS_VGET failed: %d\n",error); 393 return (error); 394 } 395 396 return (error); 397 } 398 399 static int 400 hpfs_statfs(struct mount *mp, struct statfs *sbp, struct ucred *cred) 401 { 402 struct hpfsmount *hpmp = VFSTOHPFS(mp); 403 404 dprintf(("hpfs_statfs(): HPFS%d.%d\n", 405 hpmp->hpm_su.su_hpfsver, hpmp->hpm_su.su_fnctver)); 406 407 sbp->f_type = mp->mnt_vfc->vfc_typenum; 408 sbp->f_bsize = DEV_BSIZE; 409 sbp->f_iosize = DEV_BSIZE; 410 sbp->f_blocks = hpmp->hpm_su.su_btotal; 411 sbp->f_bfree = sbp->f_bavail = hpmp->hpm_bavail; 412 sbp->f_ffree = 0; 413 sbp->f_files = 0; 414 if (sbp != &mp->mnt_stat) { 415 bcopy((caddr_t)mp->mnt_stat.f_mntfromname, 416 (caddr_t)&sbp->f_mntfromname[0], MNAMELEN); 417 } 418 sbp->f_flags = mp->mnt_flag; 419 420 return (0); 421 } 422 423 424 /*ARGSUSED*/ 425 static int 426 hpfs_fhtovp(struct mount *mp, struct vnode *rootvp, 427 struct fid *fhp, struct vnode **vpp) 428 { 429 struct vnode *nvp; 430 struct hpfid *hpfhp = (struct hpfid *)fhp; 431 int error; 432 433 if ((error = VFS_VGET(mp, NULL, hpfhp->hpfid_ino, &nvp)) != 0) { 434 *vpp = NULLVP; 435 return (error); 436 } 437 /* XXX as unlink/rmdir/mkdir/creat are not currently possible 438 * with HPFS, we don't need to check anything else for now */ 439 *vpp = nvp; 440 441 return (0); 442 } 443 444 static int 445 hpfs_vptofh(struct vnode *vp, struct fid *fhp) 446 { 447 struct hpfsnode *hpp; 448 struct hpfid *hpfhp; 449 450 hpp = VTOHP(vp); 451 hpfhp = (struct hpfid *)fhp; 452 hpfhp->hpfid_len = sizeof(struct hpfid); 453 hpfhp->hpfid_ino = hpp->h_no; 454 /* hpfhp->hpfid_gen = hpp->h_gen; */ 455 return (0); 456 } 457 458 static int 459 hpfs_vget(struct mount *mp, struct vnode *dvp, ino_t ino, struct vnode **vpp) 460 { 461 struct hpfsmount *hpmp = VFSTOHPFS(mp); 462 struct vnode *vp; 463 struct hpfsnode *hp; 464 struct buf *bp; 465 int error; 466 467 dprintf(("hpfs_vget(0x%jx): ", ino)); 468 469 *vpp = NULL; 470 hp = NULL; 471 vp = NULL; 472 473 if ((*vpp = hpfs_hphashvget(hpmp->hpm_dev, ino)) != NULL) { 474 dprintf(("hashed\n")); 475 return (0); 476 } 477 478 /* 479 * We have to lock node creation for a while, 480 * but then we have to call getnewvnode(), 481 * this may cause hpfs_reclaim() to be called, 482 * this may need to VOP_VGET() parent dir for 483 * update reasons, and if parent is not in 484 * hash, we have to lock node creation... 485 * To solve this, we MALLOC, getnewvnode and init while 486 * not locked (probability of node appearence 487 * at that time is little, and anyway - we'll 488 * check for it). 489 */ 490 hp = kmalloc(sizeof(struct hpfsnode), M_HPFSNO, M_WAITOK); 491 492 error = getnewvnode(VT_HPFS, hpmp->hpm_mp, &vp, VLKTIMEOUT, 0); 493 if (error) { 494 kprintf("hpfs_vget: can't get new vnode\n"); 495 kfree(hp, M_HPFSNO); 496 return (error); 497 } 498 499 dprintf(("prenew ")); 500 501 vp->v_data = hp; 502 503 if (ino == (ino_t)hpmp->hpm_su.su_rootfno) 504 vsetflags(vp, VROOT); 505 506 lwkt_token_init(&hp->h_interlock, "hpfsilock"); 507 508 hp->h_flag = H_INVAL; 509 hp->h_vp = vp; 510 hp->h_hpmp = hpmp; 511 hp->h_no = ino; 512 hp->h_dev = hpmp->hpm_dev; 513 hp->h_uid = hpmp->hpm_uid; 514 hp->h_gid = hpmp->hpm_uid; 515 hp->h_mode = hpmp->hpm_mode; 516 hp->h_devvp = hpmp->hpm_devvp; 517 vref(hp->h_devvp); 518 519 do { 520 if ((*vpp = hpfs_hphashvget(hpmp->hpm_dev, ino)) != NULL) { 521 dprintf(("hashed2\n")); 522 vx_put(vp); 523 return (0); 524 } 525 } while (LOCKMGR(&hpfs_hphash_lock, LK_EXCLUSIVE | LK_SLEEPFAIL)); 526 527 hpfs_hphashins(hp); 528 529 LOCKMGR(&hpfs_hphash_lock, LK_RELEASE); 530 531 error = bread(hpmp->hpm_devvp, dbtodoff(ino), FNODESIZE, &bp); 532 if (error) { 533 kprintf("hpfs_vget: can't read ino %"PRId64"\n",ino); 534 vx_put(vp); 535 return (error); 536 } 537 bcopy(bp->b_data, &hp->h_fn, sizeof(struct fnode)); 538 brelse(bp); 539 540 if (hp->h_fn.fn_magic != FN_MAGIC) { 541 kprintf("hpfs_vget: MAGIC DOESN'T MATCH\n"); 542 vx_put(vp); 543 return (EINVAL); 544 } 545 546 vp->v_type = hp->h_fn.fn_flag ? VDIR:VREG; 547 hp->h_flag &= ~H_INVAL; 548 549 /* Return the locked and refd vnode */ 550 *vpp = vp; 551 552 return (0); 553 } 554 555 static struct vfsops hpfs_vfsops = { 556 .vfs_mount = hpfs_mount, 557 .vfs_unmount = hpfs_unmount, 558 .vfs_root = hpfs_root, 559 .vfs_statfs = hpfs_statfs, 560 .vfs_vget = hpfs_vget, 561 .vfs_fhtovp = hpfs_fhtovp, 562 .vfs_checkexp = hpfs_checkexp, 563 .vfs_vptofh = hpfs_vptofh, 564 .vfs_init = hpfs_init, 565 .vfs_uninit = hpfs_hphash_uninit 566 }; 567 568 VFS_SET(hpfs_vfsops, hpfs, 0); 569 MODULE_VERSION(hpfs, 1); 570