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.32 2006/03/24 18:35:33 dillon 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 vnodeopv_entry_desc hpfs_vnodeop_entries[];
  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 *,
  70                                  struct thread *);
  71 static int      hpfs_unmount (struct mount *, int, struct thread *);
  72 static int      hpfs_vget (struct mount *mp, ino_t ino,
  73                                struct vnode **vpp);
  74 static int      hpfs_mountfs (struct vnode *, struct mount *,
  75                                   struct hpfs_args *, struct thread *);
  76 static int      hpfs_vptofh (struct vnode *, struct fid *);
  77 static int      hpfs_fhtovp (struct mount *, struct fid *,
  78                                  struct vnode **);
  79
  80
  81 struct sockaddr;
  82 static int      hpfs_mount (struct mount *, char *, caddr_t, struct thread *);
  83 static int      hpfs_init (struct vfsconf *);
  84 static int      hpfs_checkexp (struct mount *, struct sockaddr *,
  85                                    int *, struct ucred **);
  86
  87 /*ARGSUSED*/
  88 static int
  89 hpfs_checkexp(struct mount *mp,
  90               struct sockaddr *nam,
  91               int *exflagsp, struct ucred **credanonp)
  92 {
  93         struct netcred *np;
  94         struct hpfsmount *hpm = VFSTOHPFS(mp);
  95
  96         /*
  97          * Get the export permission structure for this <mp, client> tuple.
  98          */
  99         np = vfs_export_lookup(mp, &hpm->hpm_export, nam);
 100         if (np == NULL)
 101                 return (EACCES);
 102
 103         *exflagsp = np->netc_exflags;
 104         *credanonp = &np->netc_anon;
 105         return (0);
 106 }
 107
 108 static int
 109 hpfs_init(struct vfsconf *vcp)
 110 {
 111         dprintf(("hpfs_init():\n"));
 112
 113         hpfs_hphashinit();
 114         return 0;
 115 }
 116
 117 static int
 118 hpfs_mount(struct mount *mp,
 119            char *path, caddr_t data,
 120            struct thread *td)
 121 {
 122         u_int           size;
 123         int             error;
 124         struct vnode    *devvp;
 125         struct hpfs_args args;
 126         struct hpfsmount *hpmp = 0;
 127         struct nlookupdata nd;
 128
 129         dprintf(("hpfs_mount():\n"));
 130         /*
 131          ***
 132          * Mounting non-root file system or updating a file system
 133          ***
 134          */
 135
 136         /* copy in user arguments*/
 137         error = copyin(data, (caddr_t)&args, sizeof (struct hpfs_args));
 138         if (error)
 139                 goto error_1;           /* can't get arguments*/
 140
 141         /*
 142          * If updating, check whether changing from read-only to
 143          * read/write; if there is no device name, that's all we do.
 144          */
 145         if (mp->mnt_flag & MNT_UPDATE) {
 146                 dprintf(("hpfs_mount: MNT_UPDATE: "));
 147
 148                 hpmp = VFSTOHPFS(mp);
 149
 150                 if (args.fspec == 0) {
 151                         dprintf(("export 0x%x\n",args.export.ex_flags));
 152                         error = vfs_export(mp, &hpmp->hpm_export, &args.export);
 153                         if (error) {
 154                                 printf("hpfs_mount: vfs_export failed %d\n",
 155                                         error);
 156                         }
 157                         goto success;
 158                 } else {
 159                         dprintf(("name [FAILED]\n"));
 160                         error = EINVAL;
 161                         goto success;
 162                 }
 163                 dprintf(("\n"));
 164         }
 165
 166         /*
 167          * Not an update, or updating the name: look up the name
 168          * and verify that it refers to a sensible block device.
 169          */
 170         devvp = NULL;
 171         error = nlookup_init(&nd, args.fspec, UIO_USERSPACE, NLC_FOLLOW);
 172         if (error == 0)
 173                 error = nlookup(&nd);
 174         if (error == 0)
 175                 error = cache_vref(nd.nl_ncp, nd.nl_cred, &devvp);
 176         nlookup_done(&nd);
 177         if (error)
 178                 goto error_1;
 179
 180         if (!vn_isdisk(devvp, &error))
 181                 goto error_2;
 182
 183         /*
 184          ********************
 185          * NEW MOUNT
 186          ********************
 187          */
 188
 189         /* Save "mounted from" info for mount point (NULL pad)*/
 190         copyinstr(      args.fspec,                     /* device name*/
 191                         mp->mnt_stat.f_mntfromname,     /* save area*/
 192                         MNAMELEN - 1,                   /* max size*/
 193                         &size);                         /* real size*/
 194         bzero( mp->mnt_stat.f_mntfromname + size, MNAMELEN - size);
 195
 196         error = hpfs_mountfs(devvp, mp, &args, td);
 197         if (error)
 198                 goto error_2;
 199
 200         /*
 201          * Initialize FS stat information in mount struct; uses
 202          * mp->mnt_stat.f_mntfromname.
 203          *
 204          * This code is common to root and non-root mounts
 205          */
 206         VFS_STATFS(mp, &mp->mnt_stat, td);
 207         return (error);
 208
 209 error_2:        /* error with devvp held*/
 210
 211         /* release devvp before failing*/
 212         vrele(devvp);
 213
 214 error_1:        /* no state to back out*/
 215
 216 success:
 217         return (error);
 218 }
 219
 220 /*
 221  * Common code for mount and mountroot
 222  */
 223 int
 224 hpfs_mountfs(struct vnode *devvp, struct mount *mp, struct hpfs_args *argsp,
 225              struct thread *td)
 226 {
 227         int error, ncount, ronly;
 228         struct sublock *sup;
 229         struct spblock *spp;
 230         struct hpfsmount *hpmp;
 231         struct buf *bp = NULL;
 232         struct vnode *vp;
 233         dev_t dev;
 234
 235         dprintf(("hpfs_mountfs():\n"));
 236         /*
 237          * Disallow multiple mounts of the same device.
 238          * Disallow mounting of a device that is currently in use
 239          * (except for root, which might share swap device for miniroot).
 240          * Flush out any old buffers remaining from a previous use.
 241          */
 242         error = vfs_mountedon(devvp);
 243         if (error)
 244                 return (error);
 245         ncount = count_udev(devvp->v_udev);
 246         if (devvp->v_object)
 247                 ncount -= 1;
 248         if (ncount > 0)
 249                 return (EBUSY);
 250
 251         VN_LOCK(devvp, LK_EXCLUSIVE | LK_RETRY, td);
 252         error = vinvalbuf(devvp, V_SAVE, td, 0, 0);
 253         VOP__UNLOCK(devvp, 0, td);
 254         if (error)
 255                 return (error);
 256
 257         ronly = (mp->mnt_flag & MNT_RDONLY) != 0;
 258         VN_LOCK(devvp, LK_EXCLUSIVE | LK_RETRY, td);
 259         error = VOP_OPEN(devvp, ronly ? FREAD : FREAD|FWRITE, FSCRED, NULL, td);
 260         VOP__UNLOCK(devvp, 0, td);
 261         if (error)
 262                 return (error);
 263         dev = devvp->v_rdev;
 264
 265         /*
 266          * Do actual mount
 267          */
 268         hpmp = malloc(sizeof(struct hpfsmount), M_HPFSMNT, M_WAITOK);
 269         bzero(hpmp, sizeof(struct hpfsmount));
 270
 271         /* Read in SuperBlock */
 272         error = bread(devvp, dbtodoff(SUBLOCK), SUSIZE, &bp);
 273         if (error)
 274                 goto failed;
 275         bcopy(bp->b_data, &hpmp->hpm_su, sizeof(struct sublock));
 276         brelse(bp); bp = NULL;
 277
 278         /* Read in SpareBlock */
 279         error = bread(devvp, dbtodoff(SPBLOCK), SPSIZE, &bp);
 280         if (error)
 281                 goto failed;
 282         bcopy(bp->b_data, &hpmp->hpm_sp, sizeof(struct spblock));
 283         brelse(bp); bp = NULL;
 284
 285         sup = &hpmp->hpm_su;
 286         spp = &hpmp->hpm_sp;
 287
 288         /* Check magic */
 289         if (sup->su_magic != SU_MAGIC) {
 290                 printf("hpfs_mountfs: SuperBlock MAGIC DOESN'T MATCH\n");
 291                 error = EINVAL;
 292                 goto failed;
 293         }
 294         if (spp->sp_magic != SP_MAGIC) {
 295                 printf("hpfs_mountfs: SpareBlock MAGIC DOESN'T MATCH\n");
 296                 error = EINVAL;
 297                 goto failed;
 298         }
 299
 300         mp->mnt_data = (qaddr_t)hpmp;
 301         hpmp->hpm_devvp = devvp;
 302         hpmp->hpm_dev = dev;
 303         hpmp->hpm_mp = mp;
 304         hpmp->hpm_uid = argsp->uid;
 305         hpmp->hpm_gid = argsp->gid;
 306         hpmp->hpm_mode = argsp->mode;
 307
 308         error = hpfs_bminit(hpmp);
 309         if (error)
 310                 goto failed;
 311
 312         error = hpfs_cpinit(hpmp, argsp);
 313         if (error) {
 314                 hpfs_bmdeinit(hpmp);
 315                 goto failed;
 316         }
 317         vfs_add_vnodeops(mp, &mp->mnt_vn_norm_ops,
 318                          hpfs_vnodeop_entries, 0);
 319
 320         error = hpfs_root(mp, &vp);
 321         if (error) {
 322                 hpfs_cpdeinit(hpmp);
 323                 hpfs_bmdeinit(hpmp);
 324                 goto failed;
 325         }
 326
 327         vput(vp);
 328
 329         mp->mnt_stat.f_fsid.val[0] = (long)dev2udev(dev);
 330         mp->mnt_stat.f_fsid.val[1] = mp->mnt_vfc->vfc_typenum;
 331         mp->mnt_maxsymlinklen = 0;
 332         mp->mnt_flag |= MNT_LOCAL;
 333         dev->si_mountpoint = mp;
 334         return (0);
 335
 336 failed:
 337         if (bp)
 338                 brelse (bp);
 339         mp->mnt_data = (qaddr_t)NULL;
 340         dev->si_mountpoint = NULL;
 341         VOP_CLOSE(devvp, ronly ? FREAD : FREAD|FWRITE, td);
 342         return (error);
 343 }
 344
 345
 346 static int
 347 hpfs_unmount(struct mount *mp, int mntflags, struct thread *td)
 348 {
 349         int error, flags, ronly;
 350         struct hpfsmount *hpmp = VFSTOHPFS(mp);
 351
 352         dprintf(("hpfs_unmount():\n"));
 353
 354         ronly = (mp->mnt_flag & MNT_RDONLY) != 0;
 355
 356         flags = 0;
 357         if(mntflags & MNT_FORCE)
 358                 flags |= FORCECLOSE;
 359
 360         dprintf(("hpfs_unmount: vflushing...\n"));
 361
 362         error = vflush(mp, 0, flags);
 363         if (error) {
 364                 printf("hpfs_unmount: vflush failed: %d\n",error);
 365                 return (error);
 366         }
 367
 368         hpmp->hpm_devvp->v_rdev->si_mountpoint = NULL;
 369
 370         vinvalbuf(hpmp->hpm_devvp, V_SAVE, td, 0, 0);
 371         error = VOP_CLOSE(hpmp->hpm_devvp, ronly ? FREAD : FREAD|FWRITE, td);
 372
 373         vrele(hpmp->hpm_devvp);
 374
 375         dprintf(("hpfs_umount: freeing memory...\n"));
 376         hpfs_cpdeinit(hpmp);
 377         hpfs_bmdeinit(hpmp);
 378         mp->mnt_data = (qaddr_t)0;
 379         mp->mnt_flag &= ~MNT_LOCAL;
 380         FREE(hpmp, M_HPFSMNT);
 381
 382         return (0);
 383 }
 384
 385 static int
 386 hpfs_root(struct mount *mp, struct vnode **vpp)
 387 {
 388         int error = 0;
 389         struct hpfsmount *hpmp = VFSTOHPFS(mp);
 390
 391         dprintf(("hpfs_root():\n"));
 392         error = VFS_VGET(mp, (ino_t)hpmp->hpm_su.su_rootfno, vpp);
 393         if(error) {
 394                 printf("hpfs_root: VFS_VGET failed: %d\n",error);
 395                 return (error);
 396         }
 397
 398         return (error);
 399 }
 400
 401 static int
 402 hpfs_statfs(struct mount *mp, struct statfs *sbp, struct thread *td)
 403 {
 404         struct hpfsmount *hpmp = VFSTOHPFS(mp);
 405
 406         dprintf(("hpfs_statfs(): HPFS%d.%d\n",
 407                 hpmp->hpm_su.su_hpfsver, hpmp->hpm_su.su_fnctver));
 408
 409         sbp->f_type = mp->mnt_vfc->vfc_typenum;
 410         sbp->f_bsize = DEV_BSIZE;
 411         sbp->f_iosize = DEV_BSIZE;
 412         sbp->f_blocks = hpmp->hpm_su.su_btotal;
 413         sbp->f_bfree = sbp->f_bavail = hpmp->hpm_bavail;
 414         sbp->f_ffree = 0;
 415         sbp->f_files = 0;
 416         if (sbp != &mp->mnt_stat) {
 417                 bcopy((caddr_t)mp->mnt_stat.f_mntfromname,
 418                         (caddr_t)&sbp->f_mntfromname[0], MNAMELEN);
 419         }
 420         sbp->f_flags = mp->mnt_flag;
 421
 422         return (0);
 423 }
 424
 425
 426 /*ARGSUSED*/
 427 static int
 428 hpfs_fhtovp(struct mount *mp, struct fid *fhp, struct vnode **vpp)
 429 {
 430         struct vnode *nvp;
 431         struct hpfid *hpfhp = (struct hpfid *)fhp;
 432         int error;
 433
 434         if ((error = VFS_VGET(mp, hpfhp->hpfid_ino, &nvp)) != 0) {
 435                 *vpp = NULLVP;
 436                 return (error);
 437         }
 438         /* XXX as unlink/rmdir/mkdir/creat are not currently possible
 439          * with HPFS, we don't need to check anything else for now */
 440         *vpp = nvp;
 441
 442         return (0);
 443 }
 444
 445 static int
 446 hpfs_vptofh(struct vnode *vp, struct fid *fhp)
 447 {
 448         struct hpfsnode *hpp;
 449         struct hpfid *hpfhp;
 450
 451         hpp = VTOHP(vp);
 452         hpfhp = (struct hpfid *)fhp;
 453         hpfhp->hpfid_len = sizeof(struct hpfid);
 454         hpfhp->hpfid_ino = hpp->h_no;
 455         /* hpfhp->hpfid_gen = hpp->h_gen; */
 456         return (0);
 457 }
 458
 459 static int
 460 hpfs_vget(struct mount *mp, ino_t ino, struct vnode **vpp)
 461 {
 462         struct hpfsmount *hpmp = VFSTOHPFS(mp);
 463         struct vnode *vp;
 464         struct hpfsnode *hp;
 465         struct buf *bp;
 466         struct thread *td = curthread;  /* XXX */
 467         int error;
 468
 469         dprintf(("hpfs_vget(0x%x): ",ino));
 470
 471         *vpp = NULL;
 472         hp = NULL;
 473         vp = NULL;
 474
 475         if ((*vpp = hpfs_hphashvget(hpmp->hpm_dev, ino, td)) != NULL) {
 476                 dprintf(("hashed\n"));
 477                 return (0);
 478         }
 479
 480         /*
 481          * We have to lock node creation for a while,
 482          * but then we have to call getnewvnode(),
 483          * this may cause hpfs_reclaim() to be called,
 484          * this may need to VOP_VGET() parent dir for
 485          * update reasons, and if parent is not in
 486          * hash, we have to lock node creation...
 487          * To solve this, we MALLOC, getnewvnode and init while
 488          * not locked (probability of node appearence
 489          * at that time is little, and anyway - we'll
 490          * check for it).
 491          */
 492         MALLOC(hp, struct hpfsnode *, sizeof(struct hpfsnode),
 493                 M_HPFSNO, M_WAITOK);
 494
 495         error = getnewvnode(VT_HPFS, hpmp->hpm_mp, &vp, VLKTIMEOUT, 0);
 496         if (error) {
 497                 printf("hpfs_vget: can't get new vnode\n");
 498                 FREE(hp, M_HPFSNO);
 499                 return (error);
 500         }
 501
 502         dprintf(("prenew "));
 503
 504         vp->v_data = hp;
 505
 506         if (ino == (ino_t)hpmp->hpm_su.su_rootfno)
 507                 vp->v_flag |= VROOT;
 508
 509         lwkt_token_init(&hp->h_interlock);
 510
 511         hp->h_flag = H_INVAL;
 512         hp->h_vp = vp;
 513         hp->h_hpmp = hpmp;
 514         hp->h_no = ino;
 515         hp->h_dev = hpmp->hpm_dev;
 516         hp->h_uid = hpmp->hpm_uid;
 517         hp->h_gid = hpmp->hpm_uid;
 518         hp->h_mode = hpmp->hpm_mode;
 519         hp->h_devvp = hpmp->hpm_devvp;
 520         vref(hp->h_devvp);
 521
 522         do {
 523                 if ((*vpp = hpfs_hphashvget(hpmp->hpm_dev, ino, td)) != NULL) {
 524                         dprintf(("hashed2\n"));
 525                         vx_put(vp);
 526                         return (0);
 527                 }
 528         } while(LOCKMGR(&hpfs_hphash_lock,LK_EXCLUSIVE|LK_SLEEPFAIL,NULL,NULL));
 529
 530         hpfs_hphashins(hp);
 531
 532         LOCKMGR(&hpfs_hphash_lock, LK_RELEASE, NULL, NULL);
 533
 534         error = bread(hpmp->hpm_devvp, dbtodoff(ino), FNODESIZE, &bp);
 535         if (error) {
 536                 printf("hpfs_vget: can't read ino %"PRId64"\n",ino);
 537                 vx_put(vp);
 538                 return (error);
 539         }
 540         bcopy(bp->b_data, &hp->h_fn, sizeof(struct fnode));
 541         brelse(bp);
 542
 543         if (hp->h_fn.fn_magic != FN_MAGIC) {
 544                 printf("hpfs_vget: MAGIC DOESN'T MATCH\n");
 545                 vx_put(vp);
 546                 return (EINVAL);
 547         }
 548
 549         vp->v_type = hp->h_fn.fn_flag ? VDIR:VREG;
 550         hp->h_flag &= ~H_INVAL;
 551
 552         /* Return the locked and refd vnode */
 553         *vpp = vp;
 554
 555         return (0);
 556 }
 557
 558 static struct vfsops hpfs_vfsops = {
 559         .vfs_mount =            hpfs_mount,
 560         .vfs_unmount =          hpfs_unmount,
 561         .vfs_root =             hpfs_root,
 562         .vfs_statfs =           hpfs_statfs,
 563         .vfs_sync =             vfs_stdsync,
 564         .vfs_vget =             hpfs_vget,
 565         .vfs_fhtovp =           hpfs_fhtovp,
 566         .vfs_checkexp =         hpfs_checkexp,
 567         .vfs_vptofh =           hpfs_vptofh,
 568         .vfs_init =             hpfs_init,
 569         .vfs_uninit =           hpfs_hphash_uninit
 570 };
 571
 572 VFS_SET(hpfs_vfsops, hpfs, 0);
 573