sys/vfs/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: src/sys/fs/hpfs/hpfs_vfsops.c,v 1.3.2.2 2001/12/25 01:44:45 dillon Exp $
  27  * $DragonFly: src/sys/vfs/hpfs/hpfs_vfsops.c,v 1.42 2008/01/05 14:02:41 swildner Exp $
  28  */
  29
  30
  31 #include <sys/param.h>
  32 #include <sys/systm.h>
  33 #include <sys/nlookup.h>
  34 #include <sys/conf.h>
  35 #include <sys/proc.h>
  36 #include <sys/kernel.h>
  37 #include <sys/vnode.h>
  38 #include <sys/mount.h>
  39 #include <sys/buf.h>
  40 #include <sys/fcntl.h>
  41 #include <sys/malloc.h>
  42
  43 #include <machine/inttypes.h>
  44
  45 #include <vm/vm.h>
  46 #include <vm/vm_param.h>
  47 #if defined(__NetBSD__)
  48 #include <vm/vm_prot.h>
  49 #endif
  50 #include <vm/vm_page.h>
  51 #include <vm/vm_object.h>
  52 #include <vm/vm_extern.h>
  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, ino_t ino,
  72                                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 fid *,
  77                                  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         u_int           size;
 120         int             error;
 121         struct vnode    *devvp;
 122         struct hpfs_args args;
 123         struct hpfsmount *hpmp = 0;
 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 == 0) {
 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 = count_udev(devvp->v_umajor, devvp->v_uminor);
 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 = (qaddr_t)NULL;
 334         dev->si_mountpoint = NULL;
 335         VOP_CLOSE(devvp, ronly ? FREAD : FREAD|FWRITE);
 336         return (error);
 337 }
 338
 339
 340 static int
 341 hpfs_unmount(struct mount *mp, int mntflags)
 342 {
 343         int error, flags, ronly;
 344         struct hpfsmount *hpmp = VFSTOHPFS(mp);
 345
 346         dprintf(("hpfs_unmount():\n"));
 347
 348         ronly = (mp->mnt_flag & MNT_RDONLY) != 0;
 349
 350         flags = 0;
 351         if(mntflags & MNT_FORCE)
 352                 flags |= FORCECLOSE;
 353
 354         dprintf(("hpfs_unmount: vflushing...\n"));
 355
 356         error = vflush(mp, 0, flags);
 357         if (error) {
 358                 kprintf("hpfs_unmount: vflush failed: %d\n",error);
 359                 return (error);
 360         }
 361
 362         hpmp->hpm_devvp->v_rdev->si_mountpoint = NULL;
 363
 364         vinvalbuf(hpmp->hpm_devvp, V_SAVE, 0, 0);
 365         error = VOP_CLOSE(hpmp->hpm_devvp, ronly ? FREAD : FREAD|FWRITE);
 366
 367         vrele(hpmp->hpm_devvp);
 368
 369         dprintf(("hpfs_umount: freeing memory...\n"));
 370         hpfs_cpdeinit(hpmp);
 371         hpfs_bmdeinit(hpmp);
 372         mp->mnt_data = (qaddr_t)0;
 373         mp->mnt_flag &= ~MNT_LOCAL;
 374         FREE(hpmp, M_HPFSMNT);
 375
 376         return (0);
 377 }
 378
 379 static int
 380 hpfs_root(struct mount *mp, struct vnode **vpp)
 381 {
 382         int error = 0;
 383         struct hpfsmount *hpmp = VFSTOHPFS(mp);
 384
 385         dprintf(("hpfs_root():\n"));
 386         error = VFS_VGET(mp, (ino_t)hpmp->hpm_su.su_rootfno, vpp);
 387         if(error) {
 388                 kprintf("hpfs_root: VFS_VGET failed: %d\n",error);
 389                 return (error);
 390         }
 391
 392         return (error);
 393 }
 394
 395 static int
 396 hpfs_statfs(struct mount *mp, struct statfs *sbp, struct ucred *cred)
 397 {
 398         struct hpfsmount *hpmp = VFSTOHPFS(mp);
 399
 400         dprintf(("hpfs_statfs(): HPFS%d.%d\n",
 401                 hpmp->hpm_su.su_hpfsver, hpmp->hpm_su.su_fnctver));
 402
 403         sbp->f_type = mp->mnt_vfc->vfc_typenum;
 404         sbp->f_bsize = DEV_BSIZE;
 405         sbp->f_iosize = DEV_BSIZE;
 406         sbp->f_blocks = hpmp->hpm_su.su_btotal;
 407         sbp->f_bfree = sbp->f_bavail = hpmp->hpm_bavail;
 408         sbp->f_ffree = 0;
 409         sbp->f_files = 0;
 410         if (sbp != &mp->mnt_stat) {
 411                 bcopy((caddr_t)mp->mnt_stat.f_mntfromname,
 412                         (caddr_t)&sbp->f_mntfromname[0], MNAMELEN);
 413         }
 414         sbp->f_flags = mp->mnt_flag;
 415
 416         return (0);
 417 }
 418
 419
 420 /*ARGSUSED*/
 421 static int
 422 hpfs_fhtovp(struct mount *mp, struct fid *fhp, struct vnode **vpp)
 423 {
 424         struct vnode *nvp;
 425         struct hpfid *hpfhp = (struct hpfid *)fhp;
 426         int error;
 427
 428         if ((error = VFS_VGET(mp, hpfhp->hpfid_ino, &nvp)) != 0) {
 429                 *vpp = NULLVP;
 430                 return (error);
 431         }
 432         /* XXX as unlink/rmdir/mkdir/creat are not currently possible
 433          * with HPFS, we don't need to check anything else for now */
 434         *vpp = nvp;
 435
 436         return (0);
 437 }
 438
 439 static int
 440 hpfs_vptofh(struct vnode *vp, struct fid *fhp)
 441 {
 442         struct hpfsnode *hpp;
 443         struct hpfid *hpfhp;
 444
 445         hpp = VTOHP(vp);
 446         hpfhp = (struct hpfid *)fhp;
 447         hpfhp->hpfid_len = sizeof(struct hpfid);
 448         hpfhp->hpfid_ino = hpp->h_no;
 449         /* hpfhp->hpfid_gen = hpp->h_gen; */
 450         return (0);
 451 }
 452
 453 static int
 454 hpfs_vget(struct mount *mp, ino_t ino, struct vnode **vpp)
 455 {
 456         struct hpfsmount *hpmp = VFSTOHPFS(mp);
 457         struct vnode *vp;
 458         struct hpfsnode *hp;
 459         struct buf *bp;
 460         int error;
 461
 462         dprintf(("hpfs_vget(0x%x): ",ino));
 463
 464         *vpp = NULL;
 465         hp = NULL;
 466         vp = NULL;
 467
 468         if ((*vpp = hpfs_hphashvget(hpmp->hpm_dev, ino)) != NULL) {
 469                 dprintf(("hashed\n"));
 470                 return (0);
 471         }
 472
 473         /*
 474          * We have to lock node creation for a while,
 475          * but then we have to call getnewvnode(),
 476          * this may cause hpfs_reclaim() to be called,
 477          * this may need to VOP_VGET() parent dir for
 478          * update reasons, and if parent is not in
 479          * hash, we have to lock node creation...
 480          * To solve this, we MALLOC, getnewvnode and init while
 481          * not locked (probability of node appearence
 482          * at that time is little, and anyway - we'll
 483          * check for it).
 484          */
 485         MALLOC(hp, struct hpfsnode *, sizeof(struct hpfsnode),
 486                 M_HPFSNO, M_WAITOK);
 487
 488         error = getnewvnode(VT_HPFS, hpmp->hpm_mp, &vp, VLKTIMEOUT, 0);
 489         if (error) {
 490                 kprintf("hpfs_vget: can't get new vnode\n");
 491                 FREE(hp, M_HPFSNO);
 492                 return (error);
 493         }
 494
 495         dprintf(("prenew "));
 496
 497         vp->v_data = hp;
 498
 499         if (ino == (ino_t)hpmp->hpm_su.su_rootfno)
 500                 vp->v_flag |= VROOT;
 501
 502         lwkt_token_init(&hp->h_interlock);
 503
 504         hp->h_flag = H_INVAL;
 505         hp->h_vp = vp;
 506         hp->h_hpmp = hpmp;
 507         hp->h_no = ino;
 508         hp->h_dev = hpmp->hpm_dev;
 509         hp->h_uid = hpmp->hpm_uid;
 510         hp->h_gid = hpmp->hpm_uid;
 511         hp->h_mode = hpmp->hpm_mode;
 512         hp->h_devvp = hpmp->hpm_devvp;
 513         vref(hp->h_devvp);
 514
 515         do {
 516                 if ((*vpp = hpfs_hphashvget(hpmp->hpm_dev, ino)) != NULL) {
 517                         dprintf(("hashed2\n"));
 518                         vx_put(vp);
 519                         return (0);
 520                 }
 521         } while (LOCKMGR(&hpfs_hphash_lock, LK_EXCLUSIVE | LK_SLEEPFAIL));
 522
 523         hpfs_hphashins(hp);
 524
 525         LOCKMGR(&hpfs_hphash_lock, LK_RELEASE);
 526
 527         error = bread(hpmp->hpm_devvp, dbtodoff(ino), FNODESIZE, &bp);
 528         if (error) {
 529                 kprintf("hpfs_vget: can't read ino %"PRId64"\n",ino);
 530                 vx_put(vp);
 531                 return (error);
 532         }
 533         bcopy(bp->b_data, &hp->h_fn, sizeof(struct fnode));
 534         brelse(bp);
 535
 536         if (hp->h_fn.fn_magic != FN_MAGIC) {
 537                 kprintf("hpfs_vget: MAGIC DOESN'T MATCH\n");
 538                 vx_put(vp);
 539                 return (EINVAL);
 540         }
 541
 542         vp->v_type = hp->h_fn.fn_flag ? VDIR:VREG;
 543         hp->h_flag &= ~H_INVAL;
 544
 545         /* Return the locked and refd vnode */
 546         *vpp = vp;
 547
 548         return (0);
 549 }
 550
 551 static struct vfsops hpfs_vfsops = {
 552         .vfs_mount =            hpfs_mount,
 553         .vfs_unmount =          hpfs_unmount,
 554         .vfs_root =             hpfs_root,
 555         .vfs_statfs =           hpfs_statfs,
 556         .vfs_sync =             vfs_stdsync,
 557         .vfs_vget =             hpfs_vget,
 558         .vfs_fhtovp =           hpfs_fhtovp,
 559         .vfs_checkexp =         hpfs_checkexp,
 560         .vfs_vptofh =           hpfs_vptofh,
 561         .vfs_init =             hpfs_init,
 562         .vfs_uninit =           hpfs_hphash_uninit
 563 };
 564
 565 VFS_SET(hpfs_vfsops, hpfs, 0);
 566