/*      $NetBSD: efs_vfsops.c,v 1.30 2022/03/19 13:53:32 hannken Exp $  */

/*
* Copyright (c) 2006 Stephen M. Rumble <[email protected]>
*
* Permission to use, copy, modify, and distribute this software for any
* purpose with or without fee is hereby granted, provided that the above
* copyright notice and this permission notice appear in all copies.
*
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
*/

#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: efs_vfsops.c,v 1.30 2022/03/19 13:53:32 hannken Exp $");

#include <sys/param.h>
#include <sys/systm.h>
#include <sys/malloc.h>
#include <sys/mount.h>
#include <sys/fstypes.h>
#include <sys/vnode.h>
#include <sys/buf.h>
#include <sys/namei.h>
#include <sys/fcntl.h>
#include <sys/stat.h>
#include <sys/kauth.h>
#include <sys/proc.h>
#include <sys/module.h>

#include <miscfs/genfs/genfs_node.h>
#include <miscfs/genfs/genfs.h>

#include <miscfs/specfs/specdev.h>

#include <fs/efs/efs.h>
#include <fs/efs/efs_sb.h>
#include <fs/efs/efs_dir.h>
#include <fs/efs/efs_genfs.h>
#include <fs/efs/efs_mount.h>
#include <fs/efs/efs_extent.h>
#include <fs/efs/efs_dinode.h>
#include <fs/efs/efs_inode.h>
#include <fs/efs/efs_subr.h>

MODULE(MODULE_CLASS_VFS, efs, NULL);

MALLOC_JUSTDEFINE(M_EFSMNT, "efsmnt", "efs mount structure");
MALLOC_JUSTDEFINE(M_EFSINO, "efsino", "efs in-core inode structure");
MALLOC_JUSTDEFINE(M_EFSTMP, "efstmp", "efs temporary allocations");

extern int (**efs_vnodeop_p)(void *);   /* for getnewvnode() */
extern int (**efs_specop_p)(void *);    /* for getnewvnode() */
extern int (**efs_fifoop_p)(void *);    /* for getnewvnode() */
static int efs_statvfs(struct mount *, struct statvfs *);

/*
* efs_mount and efs_mountroot common functions.
*/
static int
efs_mount_common(struct mount *mp, const char *path, struct vnode *devvp,
   struct efs_args *args)
{
       int err;
       struct buf *bp;
       const char *why;
       struct efs_mount *emp;
       struct lwp *l = curlwp;

       emp = malloc(sizeof(*emp), M_EFSMNT, M_WAITOK);
       emp->em_dev = devvp->v_rdev;
       emp->em_devvp = devvp;
       emp->em_mnt = mp;

       /* read in the superblock */
       err = efs_bread(emp, EFS_BB_SB, l, &bp);
       if (err) {
               EFS_DPRINTF(("superblock read failed\n"));
               free(emp, M_EFSMNT);
               return (err);
       }
       memcpy(&emp->em_sb, bp->b_data, sizeof(emp->em_sb));
       brelse(bp, 0);

       /* validate the superblock */
       if (efs_sb_validate(&emp->em_sb, &why)) {
               printf("efs: invalid superblock: %s\n", why);
               if (!(mp->mnt_flag & MNT_FORCE)) {
                       free(emp, M_EFSMNT);
                       return (EIO);
               }
       }

       /* check that it's clean */
       if (be16toh(emp->em_sb.sb_dirty) != EFS_SB_CLEAN) {
               printf("efs: filesystem is dirty (sb_dirty = 0x%x); please "
                   "run fsck_efs(8)\n", be16toh(emp->em_sb.sb_dirty));
               /* XXX - default to readonly unless forced?? */
       }

       /* if the superblock was replicated, verify that it is the same */
       if (be32toh(emp->em_sb.sb_replsb) != 0) {
               struct buf *rbp;
               bool skip = false;

               err = efs_bread(emp, be32toh(emp->em_sb.sb_replsb), l, &rbp);
               if (err) {
                       printf("efs: read of superblock replicant failed; "
                           "please run fsck_efs(8)\n");
                       if (mp->mnt_flag & MNT_FORCE) {
                               skip = true;
                       } else {
                               free(emp, M_EFSMNT);
                               return (err);
                       }
               }

               if (!skip) {
                       if (memcmp(rbp->b_data, &emp->em_sb,
                           sizeof(emp->em_sb))) {
                               printf("efs: superblock differs from "
                                   "replicant; please run fsck_efs(8)\n");
                               if (!(mp->mnt_flag & MNT_FORCE)) {
                                       brelse(rbp, 0);
                                       free(emp, M_EFSMNT);
                                       return (EIO);
                               }
                       }
                       brelse(rbp, 0);
               }
       }

       /* ensure we can read last block */
       err = efs_bread(emp, be32toh(emp->em_sb.sb_size) - 1, l, &bp);
       if (err) {
               printf("efs: cannot access all filesystem blocks; please run "
                   "fsck_efs(8)\n");
               if (!(mp->mnt_flag & MNT_FORCE)) {
                       free(emp, M_EFSMNT);
                       return (err);
               }
       } else {
               brelse(bp, 0);
       }

       mp->mnt_data = emp;
       mp->mnt_flag |= MNT_LOCAL;
       mp->mnt_fs_bshift = EFS_BB_SHFT;
       mp->mnt_dev_bshift = DEV_BSHIFT;
       vfs_getnewfsid(mp);
       efs_statvfs(mp, &mp->mnt_stat);

       err = set_statvfs_info(path, UIO_USERSPACE, args->fspec,
           UIO_USERSPACE, mp->mnt_op->vfs_name, mp, l);
       if (err)
               free(emp, M_EFSMNT);

       return (err);
}

/*
* mount syscall vfsop.
*
* Returns 0 on success.
*/
static int
efs_mount(struct mount *mp, const char *path, void *data, size_t *data_len)
{
       struct lwp *l = curlwp;
       struct efs_args *args = data;
       struct pathbuf *pb;
       struct nameidata devnd;
       struct efs_mount *emp;
       struct vnode *devvp;
       int err, mode;

       if (args == NULL)
               return EINVAL;
       if (*data_len < sizeof *args)
               return EINVAL;

       if (mp->mnt_flag & MNT_GETARGS) {
               if ((emp = VFSTOEFS(mp)) == NULL)
                       return (EIO);
               args->fspec = NULL;
               args->version = EFS_MNT_VERSION;
               *data_len = sizeof *args;
               return 0;
       }

       if (mp->mnt_flag & MNT_UPDATE)
               return (EOPNOTSUPP);    /* XXX read-only */

       /* look up our device's vnode. it is returned locked */
       err = pathbuf_copyin(args->fspec, &pb);
       if (err) {
               return err;
       }
       NDINIT(&devnd, LOOKUP, FOLLOW | LOCKLEAF, pb);
       if ((err = namei(&devnd))) {
               pathbuf_destroy(pb);
               return (err);
       }

       devvp = devnd.ni_vp;
       pathbuf_destroy(pb);

       if (devvp->v_type != VBLK) {
               vput(devvp);
               return (ENOTBLK);
       }

       /* XXX - rdonly */
       mode = FREAD;

       /*
        * If mount by non-root, then verify that user has necessary
        * permissions on the device.
        */
       err = kauth_authorize_system(l->l_cred, KAUTH_SYSTEM_MOUNT,
           KAUTH_REQ_SYSTEM_MOUNT_DEVICE, mp, devvp, KAUTH_ARG(VREAD));
       if (err) {
               vput(devvp);
               return (err);
       }

       if ((err = VOP_OPEN(devvp, mode, l->l_cred))) {
               vput(devvp);
               return (err);
       }

       err = efs_mount_common(mp, path, devvp, args);
       if (err) {
               VOP_CLOSE(devvp, mode, l->l_cred);
               vput(devvp);
               return (err);
       }

       VOP_UNLOCK(devvp);

       return (0);
}

/*
* Initialisation routine.
*
* Returns 0 on success.
*/
static int
efs_start(struct mount *mp, int flags)
{

       return (0);
}

/*
* unmount syscall vfsop.
*
* Returns 0 on success.
*/
static int
efs_unmount(struct mount *mp, int mntflags)
{
       struct efs_mount *emp;
       struct lwp *l = curlwp;
       int err;

       emp = VFSTOEFS(mp);

       err = vflush(mp, NULL, (mntflags & MNT_FORCE) ? FORCECLOSE : 0);
       if (err)
               return (err);

       cache_purgevfs(mp);

       vn_lock(emp->em_devvp, LK_EXCLUSIVE | LK_RETRY);
       err = VOP_CLOSE(emp->em_devvp, FREAD, l->l_cred);
       vput(emp->em_devvp);

       free(mp->mnt_data, M_EFSMNT);
       mp->mnt_data = NULL;
       mp->mnt_flag &= ~MNT_LOCAL;

       return (err);
}

/*
* Return the root vnode.
*
* Returns 0 on success.
*/
static int
efs_root(struct mount *mp, int lktype, struct vnode **vpp)
{
       int err;
       struct vnode *vp;

       if ((err = VFS_VGET(mp, EFS_ROOTINO, lktype, &vp)))
               return (err);

       *vpp = vp;
       return (0);
}

/*
* statvfs syscall vfsop.
*
* Returns 0 on success.
*/
static int
efs_statvfs(struct mount *mp, struct statvfs *sbp)
{
       struct efs_mount *emp;

       emp = VFSTOEFS(mp);
       sbp->f_bsize    = EFS_BB_SIZE;
       sbp->f_frsize   = EFS_BB_SIZE;
       sbp->f_iosize   = EFS_BB_SIZE;
       sbp->f_blocks   = be32toh(emp->em_sb.sb_size);
       sbp->f_bfree    = be32toh(emp->em_sb.sb_tfree);
       sbp->f_bavail   = sbp->f_bfree; // XXX same??
       sbp->f_bresvd   = 0;
       sbp->f_files    = be32toh(emp->em_sb.sb_tinode);
       sbp->f_ffree    = be16toh(emp->em_sb.sb_cgisize) *
                         be16toh(emp->em_sb.sb_ncg) *
                         EFS_DINODES_PER_BB;
       sbp->f_favail   = sbp->f_ffree; // XXX same??
       sbp->f_fresvd   = 0;
       sbp->f_namemax  = EFS_DIRENT_NAMELEN_MAX;
       copy_statvfs_info(sbp, mp);

       return (0);
}

/*
* Obtain a locked vnode for the given on-disk inode number.
*
* Returns 0 on success.
*/
static int
efs_vget(struct mount *mp, ino_t ino, int lktype, struct vnode **vpp)
{
       int error;

       error = vcache_get(mp, &ino, sizeof(ino), vpp);
       if (error)
               return error;
       error = vn_lock(*vpp, lktype);
       if (error) {
               vrele(*vpp);
               *vpp = NULL;
               return error;
       }
       return 0;
}

/*
* Initialize this vnode / inode pair.
* Caller assures no other thread will try to load this inode.
*/
static int
efs_loadvnode(struct mount *mp, struct vnode *vp,
   const void *key, size_t key_len, const void **new_key)
{
       int error;
       ino_t ino;
       struct efs_inode *eip;
       struct efs_mount *emp;

       KASSERT(key_len == sizeof(ino));
       memcpy(&ino, key, key_len);
       emp = VFSTOEFS(mp);

       eip = pool_get(&efs_inode_pool, PR_WAITOK);
       eip->ei_mode = 0;
       eip->ei_lockf = NULL;
       eip->ei_number = ino;
       eip->ei_dev = emp->em_dev;
       eip->ei_vp = vp;

       error = efs_read_inode(emp, ino, NULL, &eip->ei_di);
       if (error) {
               pool_put(&efs_inode_pool, eip);
               return error;
       }

       efs_sync_dinode_to_inode(eip);

       if (ino == EFS_ROOTINO && !S_ISDIR(eip->ei_mode)) {
               printf("efs: root inode (%lu) is not a directory!\n",
                   (ulong)EFS_ROOTINO);
               pool_put(&efs_inode_pool, eip);
               return EIO;
       }

       switch (eip->ei_mode & S_IFMT) {
       case S_IFIFO:
               vp->v_type = VFIFO;
               vp->v_op = efs_fifoop_p;
               break;
       case S_IFCHR:
               vp->v_type = VCHR;
               vp->v_op = efs_specop_p;
               spec_node_init(vp, eip->ei_dev);
               break;
       case S_IFDIR:
               vp->v_type = VDIR;
               vp->v_op = efs_vnodeop_p;
               if (ino == EFS_ROOTINO)
                       vp->v_vflag |= VV_ROOT;
               break;
       case S_IFBLK:
               vp->v_type = VBLK;
               vp->v_op = efs_specop_p;
               spec_node_init(vp, eip->ei_dev);
               break;
       case S_IFREG:
               vp->v_type = VREG;
               vp->v_op = efs_vnodeop_p;
               break;
       case S_IFLNK:
               vp->v_type = VLNK;
               vp->v_op = efs_vnodeop_p;
               break;
       case S_IFSOCK:
               vp->v_type = VSOCK;
               vp->v_op = efs_vnodeop_p;
               break;
       default:
               printf("efs: invalid mode 0x%x in inode %lu on mount %s\n",
                   eip->ei_mode, (ulong)ino, mp->mnt_stat.f_mntonname);
               pool_put(&efs_inode_pool, eip);
               return EIO;
       }

       vp->v_tag = VT_EFS;
       vp->v_data = eip;
       genfs_node_init(vp, &efs_genfsops);
       uvm_vnp_setsize(vp, eip->ei_size);
       *new_key = &eip->ei_number;
       return 0;
}

/*
* Convert the provided opaque, unique file handle into a vnode.
*
* Returns 0 on success.
*/
static int
efs_fhtovp(struct mount *mp, struct fid *fhp, int lktype, struct vnode **vpp)
{
       int err;
       struct vnode *vp;
       struct efs_fid *efp;
       struct efs_inode *eip;

       if (fhp->fid_len != sizeof(struct efs_fid))
               return (EINVAL);

       efp = (struct efs_fid *)fhp;

       if ((err = VFS_VGET(mp, efp->ef_ino, lktype, &vp))) {
               *vpp = NULL;
               return (err);
       }

       eip = EFS_VTOI(vp);
       if (eip->ei_mode == 0 || eip->ei_gen != efp->ef_gen) {
               vput(vp);
               *vpp = NULL;
               return (ESTALE);
       }

       *vpp = vp;
       return (0);
}

/*
* Convert the provided vnode into an opaque, unique file handle.
*
* Returns 0 on success.
*/
static int
efs_vptofh(struct vnode *vp, struct fid *fhp, size_t *fh_size)
{
       struct efs_fid *efp;
       struct efs_inode *eip;

       if (*fh_size < sizeof(struct efs_fid)) {
               *fh_size = sizeof(struct efs_fid);
               return (E2BIG);
       }
       *fh_size = sizeof(struct efs_fid);

       eip = EFS_VTOI(vp);
       efp = (struct efs_fid *)fhp;

       fhp->fid_len = sizeof(struct efs_fid);
       efp->ef_ino = eip->ei_number;
       efp->ef_gen = eip->ei_gen;

       return (0);
}

/*
* Globally initialise the filesystem.
*/
static void
efs_init(void)
{

       malloc_type_attach(M_EFSMNT);
       malloc_type_attach(M_EFSINO);
       malloc_type_attach(M_EFSTMP);
       pool_init(&efs_inode_pool, sizeof(struct efs_inode), 0, 0, 0,
           "efsinopl", &pool_allocator_nointr, IPL_NONE);
}

/*
* Globally reinitialise the filesystem.
*/
static void
efs_reinit(void)
{

}

/*
* Globally clean up the filesystem.
*/
static void
efs_done(void)
{

       pool_destroy(&efs_inode_pool);
       malloc_type_detach(M_EFSMNT);
       malloc_type_detach(M_EFSINO);
       malloc_type_detach(M_EFSTMP);
}

extern const struct vnodeopv_desc efs_vnodeop_opv_desc;
extern const struct vnodeopv_desc efs_specop_opv_desc;
extern const struct vnodeopv_desc efs_fifoop_opv_desc;

const struct vnodeopv_desc * const efs_vnodeopv_descs[] = {
       &efs_vnodeop_opv_desc,
       &efs_specop_opv_desc,
       &efs_fifoop_opv_desc,
       NULL
};

struct vfsops efs_vfsops = {
       .vfs_name       = MOUNT_EFS,
       .vfs_min_mount_data = sizeof (struct efs_args),
       .vfs_mount      = efs_mount,
       .vfs_start      = efs_start,
       .vfs_unmount    = efs_unmount,
       .vfs_root       = efs_root,
       .vfs_quotactl   = (void *)eopnotsupp,
       .vfs_statvfs    = efs_statvfs,
       .vfs_sync       = (void *)nullop,
       .vfs_vget       = efs_vget,
       .vfs_loadvnode  = efs_loadvnode,
       .vfs_fhtovp     = efs_fhtovp,
       .vfs_vptofh     = efs_vptofh,
       .vfs_init       = efs_init,
       .vfs_reinit     = efs_reinit,
       .vfs_done       = efs_done,
       .vfs_mountroot  = (void *)eopnotsupp,
       .vfs_snapshot   = (void *)eopnotsupp,
       .vfs_extattrctl = vfs_stdextattrctl,
       .vfs_suspendctl = genfs_suspendctl,
       .vfs_opv_descs  = efs_vnodeopv_descs
/*      .vfs_refcount */
/*      .vfs_list */
};

static int
efs_modcmd(modcmd_t cmd, void *arg)
{

       switch (cmd) {
       case MODULE_CMD_INIT:
               return vfs_attach(&efs_vfsops);
       case MODULE_CMD_FINI:
               return vfs_detach(&efs_vfsops);
       default:
               return ENOTTY;
       }
}

You are viewing proxied material from ftp.icm.edu.pl. The copyright of proxied material belongs to its original authors. Any comments or complaints in relation to proxied material should be directed to the original authors of the content concerned. Please see the disclaimer for more details.