sys/fs/hpfs/hpfs_vfsops.c

   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$
  27  */
  28
  29
  30 #include <sys/param.h>
  31 #include <sys/systm.h>
  32 #include <sys/namei.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/bio.h>
  39 #include <sys/buf.h>
  40 #include <sys/fcntl.h>
  41 #include <sys/malloc.h>
  42
  43 #include <geom/geom.h>
  44 #include <geom/geom_vfs.h>
  45
  46 #include <vm/vm.h>
  47 #include <vm/vm_param.h>
  48 #include <vm/vm_page.h>
  49 #include <vm/vm_object.h>
  50 #include <vm/vm_extern.h>
  51
  52 #include <fs/hpfs/hpfs.h>
  53 #include <fs/hpfs/hpfsmount.h>
  54 #include <fs/hpfs/hpfs_subr.h>
  55
  56 MALLOC_DEFINE(M_HPFSMNT, "HPFS mount", "HPFS mount structure");
  57 MALLOC_DEFINE(M_HPFSNO, "HPFS node", "HPFS node structure");
  58
  59 struct sockaddr;
  60
  61 static int      hpfs_mountfs(register struct vnode *, struct mount *,
  62                                   struct thread *);
  63
  64 static vfs_init_t       hpfs_init;
  65 static vfs_uninit_t     hpfs_uninit;
  66 static vfs_fhtovp_t     hpfs_fhtovp;
  67 static vfs_vget_t       hpfs_vget;
  68 static vfs_cmount_t     hpfs_cmount;
  69 static vfs_mount_t      hpfs_mount;
  70 static vfs_root_t       hpfs_root;
  71 static vfs_statfs_t     hpfs_statfs;
  72 static vfs_unmount_t    hpfs_unmount;
  73 static vfs_vptofh_t     hpfs_vptofh;
  74
  75 static int
  76 hpfs_init (
  77         struct vfsconf *vcp )
  78 {
  79         dprintf(("hpfs_init():\n"));
  80
  81         hpfs_hphashinit();
  82         return 0;
  83 }
  84
  85 static int
  86 hpfs_uninit (vfsp)
  87         struct vfsconf *vfsp;
  88 {
  89         hpfs_hphashdestroy();
  90         return 0;;
  91 }
  92
  93 static int
  94 hpfs_cmount (
  95         struct mntarg *ma,
  96         void *data,
  97         int flags,
  98         struct thread *td )
  99 {
 100         struct hpfs_args args;
 101         int error;
 102
 103         error = copyin(data, (caddr_t)&args, sizeof (struct hpfs_args));
 104         if (error)
 105                 return (error);
 106
 107         ma = mount_argsu(ma, "from", args.fspec, MAXPATHLEN);
 108         ma = mount_arg(ma, "export", &args.export, sizeof args.export);
 109         ma = mount_argf(ma, "uid", "%d", args.uid);
 110         ma = mount_argf(ma, "gid", "%d", args.gid);
 111         ma = mount_argf(ma, "mode", "%d", args.mode);
 112         if (args.flags & HPFSMNT_TABLES) {
 113                 ma = mount_arg(ma, "d2u", args.d2u, sizeof args.d2u);
 114                 ma = mount_arg(ma, "u2d", args.u2d, sizeof args.u2d);
 115         }
 116
 117         error = kernel_mount(ma, flags);
 118
 119         return (error);
 120 }
 121
 122 static const char *hpfs_opts[] = {
 123         "from", "export", "uid", "gid", "mode", "d2u", "u2d", NULL
 124 };
 125
 126 static int
 127 hpfs_mount (
 128         struct mount *mp,
 129         struct thread *td )
 130 {
 131         int             err = 0, error;
 132         struct vnode    *devvp;
 133         struct hpfsmount *hpmp = 0;
 134         struct nameidata ndp;
 135         struct export_args export;
 136         char *from;
 137
 138         dprintf(("hpfs_omount():\n"));
 139         /*
 140          ***
 141          * Mounting non-root filesystem or updating a filesystem
 142          ***
 143          */
 144         if (vfs_filteropt(mp->mnt_optnew, hpfs_opts))
 145                 return (EINVAL);
 146
 147         from = vfs_getopts(mp->mnt_optnew, "from", &error);
 148         if (error)
 149                 return (error);
 150
 151         /*
 152          * If updating, check whether changing from read-only to
 153          * read/write; if there is no device name, that's all we do.
 154          */
 155         if (mp->mnt_flag & MNT_UPDATE) {
 156                 dprintf(("hpfs_omount: MNT_UPDATE: "));
 157
 158                 hpmp = VFSTOHPFS(mp);
 159
 160                 if (from == NULL) {
 161                         error = vfs_copyopt(mp->mnt_optnew, "export",
 162                             &export, sizeof export);
 163                         if (error)
 164                                 return (error);
 165                         dprintf(("export 0x%x\n",args.export.ex_flags));
 166                         err = vfs_export(mp, &export);
 167                         if (err) {
 168                                 printf("hpfs_omount: vfs_export failed %d\n",
 169                                         err);
 170                         }
 171                         goto success;
 172                 } else {
 173                         dprintf(("name [FAILED]\n"));
 174                         err = EINVAL;
 175                         goto success;
 176                 }
 177                 dprintf(("\n"));
 178         }
 179
 180         /*
 181          * Not an update, or updating the name: look up the name
 182          * and verify that it refers to a sensible block device.
 183          */
 184         NDINIT(&ndp, LOOKUP, FOLLOW, UIO_SYSSPACE, from, td);
 185         err = namei(&ndp);
 186         if (err) {
 187                 /* can't get devvp!*/
 188                 goto error_1;
 189         }
 190
 191         devvp = ndp.ni_vp;
 192
 193         if (!vn_isdisk(devvp, &err))
 194                 goto error_2;
 195
 196         /*
 197          ********************
 198          * NEW MOUNT
 199          ********************
 200          */
 201
 202         /*
 203          * Since this is a new mount, we want the names for
 204          * the device and the mount point copied in.  If an
 205          * error occurs, the mountpoint is discarded by the
 206          * upper level code.  Note that vfs_omount() handles
 207          * copying the mountpoint f_mntonname for us, so we
 208          * don't have to do it here unless we want to set it
 209          * to something other than "path" for some rason.
 210          */
 211         /* Save "mounted from" info for mount point (NULL pad)*/
 212         vfs_mountedfrom(mp, from);
 213
 214         err = hpfs_mountfs(devvp, mp, td);
 215         if (err)
 216                 goto error_2;
 217
 218         goto success;
 219
 220
 221 error_2:        /* error with devvp held*/
 222
 223         /* release devvp before failing*/
 224         vrele(devvp);
 225
 226 error_1:        /* no state to back out*/
 227         /* XXX: Missing NDFREE(&ndp, ...) */
 228
 229 success:
 230         return( err);
 231 }
 232
 233 /*
 234  * Common code for mount and mountroot
 235  */
 236 int
 237 hpfs_mountfs(devvp, mp, td)
 238         register struct vnode *devvp;
 239         struct mount *mp;
 240         struct thread *td;
 241 {
 242         int error, ronly, v;
 243         struct sublock *sup;
 244         struct spblock *spp;
 245         struct hpfsmount *hpmp;
 246         struct buf *bp = NULL;
 247         struct vnode *vp;
 248         struct cdev *dev = devvp->v_rdev;
 249         struct g_consumer *cp;
 250         struct bufobj *bo;
 251
 252         if (mp->mnt_flag & MNT_ROOTFS)
 253                 return (EOPNOTSUPP);
 254         dprintf(("hpfs_mountfs():\n"));
 255         ronly = (mp->mnt_flag & MNT_RDONLY) != 0;
 256         vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY, td);
 257         /* XXX: use VOP_ACCESS to check FS perms */
 258         DROP_GIANT();
 259         g_topology_lock();
 260         error = g_vfs_open(devvp, &cp, "hpfs", ronly ? 0 : 1);
 261         g_topology_unlock();
 262         PICKUP_GIANT();
 263         VOP_UNLOCK(devvp, 0, td);
 264         if (error)
 265                 return (error);
 266
 267         bo = &devvp->v_bufobj;
 268         bo->bo_private = cp;
 269         bo->bo_ops = g_vfs_bufops;
 270
 271         /*
 272          * Do actual mount
 273          */
 274         hpmp = malloc(sizeof(struct hpfsmount), M_HPFSMNT, M_WAITOK | M_ZERO);
 275
 276         hpmp->hpm_cp = cp;
 277         hpmp->hpm_bo = bo;
 278
 279         /* Read in SuperBlock */
 280         error = bread(devvp, SUBLOCK, SUSIZE, NOCRED, &bp);
 281         if (error)
 282                 goto failed;
 283         bcopy(bp->b_data, &hpmp->hpm_su, sizeof(struct sublock));
 284         brelse(bp); bp = NULL;
 285
 286         /* Read in SpareBlock */
 287         error = bread(devvp, SPBLOCK, SPSIZE, NOCRED, &bp);
 288         if (error)
 289                 goto failed;
 290         bcopy(bp->b_data, &hpmp->hpm_sp, sizeof(struct spblock));
 291         brelse(bp); bp = NULL;
 292
 293         sup = &hpmp->hpm_su;
 294         spp = &hpmp->hpm_sp;
 295
 296         /* Check magic */
 297         if (sup->su_magic != SU_MAGIC) {
 298                 printf("hpfs_mountfs: SuperBlock MAGIC DOESN'T MATCH\n");
 299                 error = EINVAL;
 300                 goto failed;
 301         }
 302         if (spp->sp_magic != SP_MAGIC) {
 303                 printf("hpfs_mountfs: SpareBlock MAGIC DOESN'T MATCH\n");
 304                 error = EINVAL;
 305                 goto failed;
 306         }
 307
 308         mp->mnt_data = (qaddr_t)hpmp;
 309         hpmp->hpm_devvp = devvp;
 310         hpmp->hpm_dev = devvp->v_rdev;
 311         hpmp->hpm_mp = mp;
 312         if (1 == vfs_scanopt(mp->mnt_optnew, "uid", "%d", &v))
 313                 hpmp->hpm_uid = v;
 314         if (1 == vfs_scanopt(mp->mnt_optnew, "gid", "%d", &v))
 315                 hpmp->hpm_gid = v;
 316         if (1 == vfs_scanopt(mp->mnt_optnew, "mode", "%d", &v))
 317                 hpmp->hpm_mode = v;
 318
 319         error = hpfs_bminit(hpmp);
 320         if (error)
 321                 goto failed;
 322
 323         error = hpfs_cpinit(mp, hpmp);
 324         if (error) {
 325                 hpfs_bmdeinit(hpmp);
 326                 goto failed;
 327         }
 328
 329         error = hpfs_root(mp, &vp, td);
 330         if (error) {
 331                 hpfs_cpdeinit(hpmp);
 332                 hpfs_bmdeinit(hpmp);
 333                 goto failed;
 334         }
 335
 336         vput(vp);
 337
 338         mp->mnt_stat.f_fsid.val[0] = (long)dev2udev(dev);
 339         mp->mnt_stat.f_fsid.val[1] = mp->mnt_vfc->vfc_typenum;
 340         mp->mnt_maxsymlinklen = 0;
 341         mp->mnt_flag |= MNT_LOCAL;
 342         return (0);
 343
 344 failed:
 345         if (bp)
 346                 brelse (bp);
 347         mp->mnt_data = (qaddr_t)NULL;
 348         g_wither_geom_close(cp->geom, ENXIO);
 349         return (error);
 350 }
 351
 352 static int
 353 hpfs_unmount(
 354         struct mount *mp,
 355         int mntflags,
 356         struct thread *td)
 357 {
 358         int error, flags, ronly;
 359         register struct hpfsmount *hpmp = VFSTOHPFS(mp);
 360
 361         dprintf(("hpfs_unmount():\n"));
 362
 363         ronly = (mp->mnt_flag & MNT_RDONLY) != 0;
 364
 365         flags = 0;
 366         if(mntflags & MNT_FORCE)
 367                 flags |= FORCECLOSE;
 368
 369         dprintf(("hpfs_unmount: vflushing...\n"));
 370
 371         error = vflush(mp, 0, flags, td);
 372         if (error) {
 373                 printf("hpfs_unmount: vflush failed: %d\n",error);
 374                 return (error);
 375         }
 376
 377         vinvalbuf(hpmp->hpm_devvp, V_SAVE, td, 0, 0);
 378         g_wither_geom_close(hpmp->hpm_cp->geom, ENXIO);
 379         vrele(hpmp->hpm_devvp);
 380
 381         dprintf(("hpfs_umount: freeing memory...\n"));
 382         hpfs_cpdeinit(hpmp);
 383         hpfs_bmdeinit(hpmp);
 384         mp->mnt_data = (qaddr_t)0;
 385         mp->mnt_flag &= ~MNT_LOCAL;
 386         FREE(hpmp, M_HPFSMNT);
 387
 388         return (0);
 389 }
 390
 391 static int
 392 hpfs_root(
 393         struct mount *mp,
 394         struct vnode **vpp,
 395         struct thread *td )
 396 {
 397         int error = 0;
 398         struct hpfsmount *hpmp = VFSTOHPFS(mp);
 399
 400         dprintf(("hpfs_root():\n"));
 401         error = VFS_VGET(mp, (ino_t)hpmp->hpm_su.su_rootfno, LK_EXCLUSIVE, vpp);
 402         if(error) {
 403                 printf("hpfs_root: VFS_VGET failed: %d\n",error);
 404                 return (error);
 405         }
 406
 407         return (error);
 408 }
 409
 410 static int
 411 hpfs_statfs(
 412         struct mount *mp,
 413         struct statfs *sbp,
 414         struct thread *td)
 415 {
 416         struct hpfsmount *hpmp = VFSTOHPFS(mp);
 417
 418         dprintf(("hpfs_statfs(): HPFS%d.%d\n",
 419                 hpmp->hpm_su.su_hpfsver, hpmp->hpm_su.su_fnctver));
 420
 421         sbp->f_type = mp->mnt_vfc->vfc_typenum;
 422         sbp->f_bsize = DEV_BSIZE;
 423         sbp->f_iosize = DEV_BSIZE;
 424         sbp->f_blocks = hpmp->hpm_su.su_btotal;
 425         sbp->f_bfree = sbp->f_bavail = hpmp->hpm_bavail;
 426         sbp->f_ffree = 0;
 427         sbp->f_files = 0;
 428         sbp->f_flags = mp->mnt_flag;
 429
 430         return (0);
 431 }
 432
 433 /*ARGSUSED*/
 434 static int
 435 hpfs_fhtovp(
 436         struct mount *mp,
 437         struct fid *fhp,
 438         struct vnode **vpp)
 439 {
 440         struct vnode *nvp;
 441         struct hpfid *hpfhp = (struct hpfid *)fhp;
 442         int error;
 443
 444         if ((error = VFS_VGET(mp, hpfhp->hpfid_ino, LK_EXCLUSIVE, &nvp)) != 0) {
 445                 *vpp = NULLVP;
 446                 return (error);
 447         }
 448         /* XXX as unlink/rmdir/mkdir/creat are not currently possible
 449          * with HPFS, we don't need to check anything else for now */
 450         *vpp = nvp;
 451
 452         return (0);
 453 }
 454
 455 static int
 456 hpfs_vptofh(
 457         struct vnode *vp,
 458         struct fid *fhp)
 459 {
 460         register struct hpfsnode *hpp;
 461         register struct hpfid *hpfhp;
 462
 463         hpp = VTOHP(vp);
 464         hpfhp = (struct hpfid *)fhp;
 465         hpfhp->hpfid_len = sizeof(struct hpfid);
 466         hpfhp->hpfid_ino = hpp->h_no;
 467         /* hpfhp->hpfid_gen = hpp->h_gen; */
 468         return (0);
 469 }
 470
 471 static int
 472 hpfs_vget(
 473         struct mount *mp,
 474         ino_t ino,
 475         int flags,
 476         struct vnode **vpp)
 477 {
 478         struct hpfsmount *hpmp = VFSTOHPFS(mp);
 479         struct vnode *vp;
 480         struct hpfsnode *hp;
 481         struct buf *bp;
 482         struct thread *td = curthread;  /* XXX */
 483         int error;
 484
 485         dprintf(("hpfs_vget(0x%x): ",ino));
 486
 487         *vpp = NULL;
 488         hp = NULL;
 489         vp = NULL;
 490
 491         if ((error = hpfs_hphashvget(hpmp->hpm_dev, ino, flags, vpp, td)) != 0)
 492                 return (error);
 493         if (*vpp != NULL) {
 494                 dprintf(("hashed\n"));
 495                 return (0);
 496         }
 497
 498         /*
 499          * We have to lock node creation for a while,
 500          * but then we have to call getnewvnode(),
 501          * this may cause hpfs_reclaim() to be called,
 502          * this may need to VOP_VGET() parent dir for
 503          * update reasons, and if parent is not in
 504          * hash, we have to lock node creation...
 505          * To solve this, we MALLOC, getnewvnode and init while
 506          * not locked (probability of node appearence
 507          * at that time is little, and anyway - we'll
 508          * check for it).
 509          */
 510         MALLOC(hp, struct hpfsnode *, sizeof(struct hpfsnode),
 511                 M_HPFSNO, M_WAITOK);
 512
 513         error = getnewvnode("hpfs", hpmp->hpm_mp, &hpfs_vnodeops, &vp);
 514         if (error) {
 515                 printf("hpfs_vget: can't get new vnode\n");
 516                 FREE(hp, M_HPFSNO);
 517                 return (error);
 518         }
 519
 520         dprintf(("prenew "));
 521
 522         vp->v_data = hp;
 523
 524         if (ino == (ino_t)hpmp->hpm_su.su_rootfno)
 525                 vp->v_vflag |= VV_ROOT;
 526
 527
 528         mtx_init(&hp->h_interlock, "hpfsnode interlock", NULL, MTX_DEF);
 529
 530         hp->h_flag = H_INVAL;
 531         hp->h_vp = vp;
 532         hp->h_hpmp = hpmp;
 533         hp->h_no = ino;
 534         hp->h_dev = hpmp->hpm_dev;
 535         hp->h_uid = hpmp->hpm_uid;
 536         hp->h_gid = hpmp->hpm_uid;
 537         hp->h_mode = hpmp->hpm_mode;
 538         hp->h_devvp = hpmp->hpm_devvp;
 539         VREF(hp->h_devvp);
 540
 541         error = vn_lock(vp, LK_EXCLUSIVE, td);
 542         if (error) {
 543                 vput(vp);
 544                 return (error);
 545         }
 546
 547         do {
 548                 if ((error =
 549                      hpfs_hphashvget(hpmp->hpm_dev, ino, flags, vpp, td))) {
 550                         vput(vp);
 551                         return (error);
 552                 }
 553                 if (*vpp != NULL) {
 554                         dprintf(("hashed2\n"));
 555                         vput(vp);
 556                         return (0);
 557                 }
 558         } while(lockmgr(&hpfs_hphash_lock,LK_EXCLUSIVE|LK_SLEEPFAIL,NULL,NULL));
 559
 560         hpfs_hphashins(hp);
 561
 562         lockmgr(&hpfs_hphash_lock, LK_RELEASE, NULL, NULL);
 563
 564         error = bread(hpmp->hpm_devvp, ino, FNODESIZE, NOCRED, &bp);
 565         if (error) {
 566                 printf("hpfs_vget: can't read ino %d\n",ino);
 567                 vput(vp);
 568                 return (error);
 569         }
 570         bcopy(bp->b_data, &hp->h_fn, sizeof(struct fnode));
 571         brelse(bp);
 572
 573         if (hp->h_fn.fn_magic != FN_MAGIC) {
 574                 printf("hpfs_vget: MAGIC DOESN'T MATCH\n");
 575                 vput(vp);
 576                 return (EINVAL);
 577         }
 578
 579         vp->v_type = hp->h_fn.fn_flag ? VDIR:VREG;
 580         hp->h_flag &= ~H_INVAL;
 581
 582         *vpp = vp;
 583
 584         return (0);
 585 }
 586
 587 static struct vfsops hpfs_vfsops = {
 588         .vfs_fhtovp =           hpfs_fhtovp,
 589         .vfs_init =             hpfs_init,
 590         .vfs_cmount =           hpfs_cmount,
 591         .vfs_mount =            hpfs_mount,
 592         .vfs_root =             hpfs_root,
 593         .vfs_statfs =           hpfs_statfs,
 594         .vfs_uninit =           hpfs_uninit,
 595         .vfs_unmount =          hpfs_unmount,
 596         .vfs_vget =             hpfs_vget,
 597         .vfs_vptofh =           hpfs_vptofh,
 598 };
 599 VFS_SET(hpfs_vfsops, hpfs, 0);