sys/cddl/compat/opensolaris/kern/opensolaris_vfs.c

   1 /*-
   2  * Copyright (c) 2006-2007 Pawel Jakub Dawidek <pjd@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 AUTHORS 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 AUTHORS 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
  27 #include <sys/cdefs.h>
  28 __FBSDID("$FreeBSD$");
  29
  30 #include <sys/param.h>
  31 #include <sys/kernel.h>
  32 #include <sys/systm.h>
  33 #include <sys/mount.h>
  34 #include <sys/cred.h>
  35 #include <sys/vfs.h>
  36 #include <sys/priv.h>
  37 #include <sys/libkern.h>
  38
  39 MALLOC_DECLARE(M_MOUNT);
  40
  41 TAILQ_HEAD(vfsoptlist, vfsopt);
  42 struct vfsopt {
  43         TAILQ_ENTRY(vfsopt) link;
  44         char    *name;
  45         void    *value;
  46         int     len;
  47 };
  48
  49 void
  50 vfs_setmntopt(vfs_t *vfsp, const char *name, const char *arg,
  51     int flags __unused)
  52 {
  53         struct vfsopt *opt;
  54         size_t namesize;
  55
  56         if (vfsp->mnt_opt == NULL) {
  57                 vfsp->mnt_opt = malloc(sizeof(*vfsp->mnt_opt), M_MOUNT, M_WAITOK);
  58                 TAILQ_INIT(vfsp->mnt_opt);
  59         }
  60
  61         opt = malloc(sizeof(*opt), M_MOUNT, M_WAITOK);
  62
  63         namesize = strlen(name) + 1;
  64         opt->name = malloc(namesize, M_MOUNT, M_WAITOK);
  65         strlcpy(opt->name, name, namesize);
  66
  67         if (arg == NULL) {
  68                 opt->value = NULL;
  69                 opt->len = 0;
  70         } else {
  71                 opt->len = strlen(arg) + 1;
  72                 opt->value = malloc(opt->len, M_MOUNT, M_WAITOK);
  73                 bcopy(arg, opt->value, opt->len);
  74         }
  75         /* TODO: Locking. */
  76         TAILQ_INSERT_TAIL(vfsp->mnt_opt, opt, link);
  77 }
  78
  79 void
  80 vfs_clearmntopt(vfs_t *vfsp, const char *name)
  81 {
  82         struct vfsopt *opt;
  83
  84         if (vfsp->mnt_opt == NULL)
  85                 return;
  86         /* TODO: Locking. */
  87         TAILQ_FOREACH(opt, vfsp->mnt_opt, link) {
  88                 if (strcmp(opt->name, name) == 0)
  89                         break;
  90         }
  91         if (opt != NULL) {
  92                 TAILQ_REMOVE(vfsp->mnt_opt, opt, link);
  93                 free(opt->name, M_MOUNT);
  94                 if (opt->value != NULL)
  95                         free(opt->value, M_MOUNT);
  96                 free(opt, M_MOUNT);
  97         }
  98 }
  99
 100 int
 101 vfs_optionisset(const vfs_t *vfsp, const char *opt, char **argp)
 102 {
 103         struct vfsoptlist *opts = vfsp->mnt_opt;
 104         int error;
 105
 106         if (opts == NULL)
 107                 return (0);
 108         error = vfs_getopt(opts, opt, (void **)argp, NULL);
 109         return (error != 0 ? 0 : 1);
 110 }
 111
 112 int
 113 traverse(vnode_t **cvpp, int lktype)
 114 {
 115         kthread_t *td = curthread;
 116         vnode_t *cvp;
 117         vnode_t *tvp;
 118         vfs_t *vfsp;
 119         int error;
 120
 121         cvp = *cvpp;
 122         tvp = NULL;
 123
 124         /*
 125          * If this vnode is mounted on, then we transparently indirect
 126          * to the vnode which is the root of the mounted file system.
 127          * Before we do this we must check that an unmount is not in
 128          * progress on this vnode.
 129          */
 130
 131         for (;;) {
 132                 /*
 133                  * Reached the end of the mount chain?
 134                  */
 135                 vfsp = vn_mountedvfs(cvp);
 136                 if (vfsp == NULL)
 137                         break;
 138                 /*
 139                  * tvp is NULL for *cvpp vnode, which we can't unlock.
 140                  */
 141                 if (tvp != NULL)
 142                         vput(cvp);
 143                 else
 144                         vrele(cvp);
 145
 146                 /*
 147                  * The read lock must be held across the call to VFS_ROOT() to
 148                  * prevent a concurrent unmount from destroying the vfs.
 149                  */
 150                 error = VFS_ROOT(vfsp, lktype, &tvp, td);
 151                 if (error != 0)
 152                         return (error);
 153                 cvp = tvp;
 154         }
 155
 156         *cvpp = cvp;
 157         return (0);
 158 }
 159
 160 int
 161 domount(kthread_t *td, vnode_t *vp, const char *fstype, char *fspath,
 162     char *fspec, int fsflags)
 163 {
 164         struct mount *mp;
 165         struct vfsconf *vfsp;
 166         int error;
 167
 168         /*
 169          * Be ultra-paranoid about making sure the type and fspath
 170          * variables will fit in our mp buffers, including the
 171          * terminating NUL.
 172          */
 173         if (strlen(fstype) >= MFSNAMELEN || strlen(fspath) >= MNAMELEN)
 174                 return (ENAMETOOLONG);
 175
 176         vfsp = vfs_byname_kld(fstype, td, &error);
 177         if (vfsp == NULL)
 178                 return (ENODEV);
 179
 180         if (vp->v_type != VDIR)
 181                 return (ENOTDIR);
 182         VI_LOCK(vp);
 183         if ((vp->v_iflag & VI_MOUNT) != 0 ||
 184             vp->v_mountedhere != NULL) {
 185                 VI_UNLOCK(vp);
 186                 return (EBUSY);
 187         }
 188         vp->v_iflag |= VI_MOUNT;
 189         VI_UNLOCK(vp);
 190
 191         /*
 192          * Allocate and initialize the filesystem.
 193          */
 194         vn_lock(vp, LK_SHARED | LK_RETRY, td);
 195         mp = vfs_mount_alloc(vp, vfsp, fspath, td);
 196         VOP_UNLOCK(vp, 0, td);
 197
 198         mp->mnt_optnew = NULL;
 199         vfs_setmntopt(mp, "from", fspec, 0);
 200         mp->mnt_optnew = mp->mnt_opt;
 201         mp->mnt_opt = NULL;
 202
 203         /*
 204          * Set the mount level flags.
 205          */
 206         MNT_ILOCK(mp);
 207         if (fsflags & MNT_RDONLY)
 208                 mp->mnt_flag |= MNT_RDONLY;
 209         mp->mnt_flag &=~ MNT_UPDATEMASK;
 210         mp->mnt_flag |= fsflags & (MNT_UPDATEMASK | MNT_FORCE | MNT_ROOTFS);
 211         /*
 212          * Unprivileged user can trigger mounting a snapshot, but we don't want
 213          * him to unmount it, so we switch to privileged credentials.
 214          */
 215         crfree(mp->mnt_cred);
 216         mp->mnt_cred = crdup(kcred);
 217         mp->mnt_stat.f_owner = mp->mnt_cred->cr_uid;
 218         MNT_IUNLOCK(mp);
 219         /*
 220          * Mount the filesystem.
 221          * XXX The final recipients of VFS_MOUNT just overwrite the ndp they
 222          * get.  No freeing of cn_pnbuf.
 223          */
 224         error = VFS_MOUNT(mp, td);
 225
 226         if (!error) {
 227                 if (mp->mnt_opt != NULL)
 228                         vfs_freeopts(mp->mnt_opt);
 229                 mp->mnt_opt = mp->mnt_optnew;
 230                 (void)VFS_STATFS(mp, &mp->mnt_stat, td);
 231         }
 232         /*
 233          * Prevent external consumers of mount options from reading
 234          * mnt_optnew.
 235         */
 236         mp->mnt_optnew = NULL;
 237         vn_lock(vp, LK_EXCLUSIVE | LK_RETRY, td);
 238         /*
 239          * Put the new filesystem on the mount list after root.
 240          */
 241 #ifdef FREEBSD_NAMECACHE
 242         cache_purge(vp);
 243 #endif
 244         if (!error) {
 245                 vnode_t *mvp;
 246
 247                 VI_LOCK(vp);
 248                 vp->v_iflag &= ~VI_MOUNT;
 249                 VI_UNLOCK(vp);
 250                 vp->v_mountedhere = mp;
 251                 mtx_lock(&mountlist_mtx);
 252                 TAILQ_INSERT_TAIL(&mountlist, mp, mnt_list);
 253                 mtx_unlock(&mountlist_mtx);
 254                 vfs_event_signal(NULL, VQ_MOUNT, 0);
 255                 if (VFS_ROOT(mp, LK_EXCLUSIVE, &mvp, td))
 256                         panic("mount: lost mount");
 257                 mountcheckdirs(vp, mvp);
 258                 vput(mvp);
 259                 VOP_UNLOCK(vp, 0, td);
 260                 if ((mp->mnt_flag & MNT_RDONLY) == 0)
 261                         error = vfs_allocate_syncvnode(mp);
 262                 vfs_unbusy(mp, td);
 263                 if (error)
 264                         vrele(vp);
 265                 else
 266                         vfs_mountedfrom(mp, fspec);
 267         } else {
 268                 VI_LOCK(vp);
 269                 vp->v_iflag &= ~VI_MOUNT;
 270                 VI_UNLOCK(vp);
 271                 VOP_UNLOCK(vp, 0, td);
 272                 vfs_unbusy(mp, td);
 273                 vfs_mount_destroy(mp);
 274         }
 275         return (error);
 276 }