1/* $NetBSD: v7fs_vfsops.c,v 1.19 2022/05/03 07:34:38 hannken Exp $ */ 2 3/*- 4 * Copyright (c) 2004, 2011 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by UCHIYAMA Yasushi. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 * POSSIBILITY OF SUCH DAMAGE. 30 */ 31 32#include <sys/cdefs.h> 33__KERNEL_RCSID(0, "$NetBSD: v7fs_vfsops.c,v 1.19 2022/05/03 07:34:38 hannken Exp $"); 34#if defined _KERNEL_OPT 35#include "opt_v7fs.h" 36#endif 37 38#include <sys/types.h> 39#include <sys/param.h> 40#include <sys/systm.h> 41#include <sys/pool.h> 42#include <sys/time.h> 43#include <sys/ucred.h> 44#include <sys/mount.h> 45#include <sys/disk.h> 46#include <sys/device.h> 47#include <sys/fcntl.h> 48#include <sys/kmem.h> 49#include <sys/kauth.h> 50#include <sys/proc.h> 51 52/* v-node */ 53#include <sys/namei.h> 54#include <sys/vnode.h> 55/* devsw */ 56#include <sys/conf.h> 57 58#include "v7fs_extern.h" 59#include "v7fs.h" 60#include "v7fs_impl.h" 61#include "v7fs_inode.h" 62#include "v7fs_superblock.h" 63 64#ifdef V7FS_VFSOPS_DEBUG 65#define DPRINTF(fmt, args...) printf("%s: " fmt, __func__, ##args) 66#else 67#define DPRINTF(arg...) ((void)0) 68#endif 69 70struct pool v7fs_node_pool; 71 72static int v7fs_mountfs(struct vnode *, struct mount *, int); 73static int v7fs_openfs(struct vnode *, struct mount *, struct lwp *); 74static void v7fs_closefs(struct vnode *, struct mount *); 75static int is_v7fs_partition(struct vnode *); 76static enum vtype v7fs_mode_to_vtype(v7fs_mode_t mode); 77 78int 79v7fs_mount(struct mount *mp, const char *path, void *data, size_t *data_len) 80{ 81 struct lwp *l = curlwp; 82 struct v7fs_args *args = data; 83 struct v7fs_mount *v7fsmount = (void *)mp->mnt_data; 84 struct vnode *devvp = NULL; 85 int error = 0; 86 bool update = mp->mnt_flag & MNT_UPDATE; 87 88 DPRINTF("mnt_flag=%x %s\n", mp->mnt_flag, update ? "update" : ""); 89 90 if (args == NULL) 91 return EINVAL; 92 if (*data_len < sizeof(*args)) 93 return EINVAL; 94 95 if (mp->mnt_flag & MNT_GETARGS) { 96 if (!v7fsmount) 97 return EIO; 98 args->fspec = NULL; 99 args->endian = v7fsmount->core->endian; 100 *data_len = sizeof(*args); 101 return 0; 102 } 103 104 DPRINTF("args->fspec=%s endian=%d\n", args->fspec, args->endian); 105 if (args->fspec == NULL) { 106 /* nothing to do. */ 107 return EINVAL; 108 } 109 110 if (args->fspec != NULL) { 111 /* Look up the name and verify that it's sane. */ 112 error = namei_simple_user(args->fspec, 113 NSM_FOLLOW_NOEMULROOT, &devvp); 114 if (error != 0) 115 return (error); 116 DPRINTF("mount device=%lx\n", (long)devvp->v_rdev); 117 118 if (!update) { 119 /* 120 * Be sure this is a valid block device 121 */ 122 if (devvp->v_type != VBLK) 123 error = ENOTBLK; 124 else if (bdevsw_lookup(devvp->v_rdev) == NULL) 125 error = ENXIO; 126 } else { 127 KDASSERT(v7fsmount); 128 /* 129 * Be sure we're still naming the same device 130 * used for our initial mount 131 */ 132 if (devvp != v7fsmount->devvp) { 133 DPRINTF("devvp %p != %p rootvp=%p\n", devvp, 134 v7fsmount->devvp, rootvp); 135 if (rootvp == v7fsmount->devvp) { 136 vrele(devvp); 137 devvp = rootvp; 138 vref(devvp); 139 } else { 140 error = EINVAL; 141 } 142 } 143 } 144 } 145 146 /* 147 * If mount by non-root, then verify that user has necessary 148 * permissions on the device. 149 * 150 * Permission to update a mount is checked higher, so here we presume 151 * updating the mount is okay (for example, as far as securelevel goes) 152 * which leaves us with the normal check. 153 */ 154 if (error == 0) { 155 int accessmode = VREAD; 156 if (update ? 157 (mp->mnt_iflag & IMNT_WANTRDWR) != 0 : 158 (mp->mnt_flag & MNT_RDONLY) == 0) 159 accessmode |= VWRITE; 160 161 vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY); 162 error = kauth_authorize_system(l->l_cred, KAUTH_SYSTEM_MOUNT, 163 KAUTH_REQ_SYSTEM_MOUNT_DEVICE, mp, devvp, 164 KAUTH_ARG(accessmode)); 165 VOP_UNLOCK(devvp); 166 } 167 168 if (error) { 169 vrele(devvp); 170 return error; 171 } 172 173 if (!update) { 174 if ((error = v7fs_openfs(devvp, mp, l))) { 175 vrele(devvp); 176 return error; 177 } 178 179 if ((error = v7fs_mountfs(devvp, mp, args->endian))) { 180 v7fs_closefs(devvp, mp); 181 VOP_UNLOCK(devvp); 182 vrele(devvp); 183 return error; 184 } 185 VOP_UNLOCK(devvp); 186 } else if (mp->mnt_flag & MNT_RDONLY) { 187 /* XXX: r/w -> read only */ 188 } 189 190 return set_statvfs_info(path, UIO_USERSPACE, args->fspec, UIO_USERSPACE, 191 mp->mnt_op->vfs_name, mp, l); 192} 193 194static int 195is_v7fs_partition(struct vnode *devvp) 196{ 197 struct dkwedge_info dkw; 198 int error; 199 200 if ((error = getdiskinfo(devvp, &dkw)) != 0) { 201 DPRINTF("getdiskinfo=%d\n", error); 202 return error; 203 } 204 DPRINTF("ptype=%s size=%" PRIu64 "\n", dkw.dkw_ptype, dkw.dkw_size); 205 206 return strcmp(dkw.dkw_ptype, DKW_PTYPE_V7) == 0 ? 0 : EINVAL; 207} 208 209static int 210v7fs_openfs(struct vnode *devvp, struct mount *mp, struct lwp *l) 211{ 212 kauth_cred_t cred = l->l_cred; 213 int oflags; 214 int error; 215 216 /* Flush buffer */ 217 vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY); 218 if ((error = vinvalbuf(devvp, V_SAVE, cred, l, 0, 0))) 219 goto unlock_exit; 220 221 /* Open block device */ 222 oflags = FREAD; 223 if ((mp->mnt_flag & MNT_RDONLY) == 0) 224 oflags |= FWRITE; 225 226 if ((error = VOP_OPEN(devvp, oflags, NOCRED)) != 0) { 227 DPRINTF("VOP_OPEN=%d\n", error); 228 goto unlock_exit; 229 } 230 231 return 0; /* lock held */ 232 233unlock_exit: 234 VOP_UNLOCK(devvp); 235 236 return error; 237} 238 239static void 240v7fs_closefs(struct vnode *devvp, struct mount *mp) 241{ 242 int oflags = FREAD; 243 244 if ((mp->mnt_flag & MNT_RDONLY) == 0) 245 oflags |= FWRITE; 246 247 VOP_CLOSE(devvp, oflags, NOCRED); 248} 249 250static int 251v7fs_mountfs(struct vnode *devvp, struct mount *mp, int endian) 252{ 253 struct v7fs_mount *v7fsmount; 254 int error; 255 struct v7fs_mount_device mount; 256 257 DPRINTF("%d\n",endian); 258 259 v7fsmount = kmem_zalloc(sizeof(*v7fsmount), KM_SLEEP); 260 v7fsmount->devvp = devvp; 261 v7fsmount->mountp = mp; 262 263 mount.device.vnode = devvp; 264 mount.endian = endian; 265 266 if ((error = v7fs_io_init(&v7fsmount->core, &mount, V7FS_BSIZE))) { 267 goto err_exit; 268 } 269 struct v7fs_self *fs = v7fsmount->core; 270 271 if ((error = v7fs_superblock_load(fs))) { 272 v7fs_io_fini(fs); 273 goto err_exit; 274 } 275 276 mp->mnt_data = v7fsmount; 277 mp->mnt_stat.f_fsidx.__fsid_val[0] = (long)devvp->v_rdev; 278 mp->mnt_stat.f_fsidx.__fsid_val[1] = makefstype(MOUNT_V7FS); 279 mp->mnt_stat.f_fsid = mp->mnt_stat.f_fsidx.__fsid_val[0]; 280 mp->mnt_stat.f_namemax = V7FS_NAME_MAX; 281 mp->mnt_flag |= MNT_LOCAL; 282 mp->mnt_dev_bshift = V7FS_BSHIFT; 283 mp->mnt_fs_bshift = V7FS_BSHIFT; 284 285 return 0; 286 287err_exit: 288 kmem_free(v7fsmount, sizeof(*v7fsmount)); 289 return error; 290} 291 292int 293v7fs_start(struct mount *mp, int flags) 294{ 295 296 DPRINTF("\n"); 297 /* Nothing to do. */ 298 return 0; 299} 300 301int 302v7fs_unmount(struct mount *mp, int mntflags) 303{ 304 struct v7fs_mount *v7fsmount = (void *)mp->mnt_data; 305 int error; 306 307 DPRINTF("%p\n", v7fsmount); 308 309 if ((error = vflush(mp, NULLVP, 310 mntflags & MNT_FORCE ? FORCECLOSE : 0)) != 0) 311 return error; 312 313 vn_lock(v7fsmount->devvp, LK_EXCLUSIVE | LK_RETRY); 314 error = VOP_CLOSE(v7fsmount->devvp, FREAD, NOCRED); 315 vput(v7fsmount->devvp); 316 317 v7fs_io_fini(v7fsmount->core); 318 319 kmem_free(v7fsmount, sizeof(*v7fsmount)); 320 mp->mnt_data = NULL; 321 mp->mnt_flag &= ~MNT_LOCAL; 322 323 return 0; 324} 325 326int 327v7fs_root(struct mount *mp, int lktype, struct vnode **vpp) 328{ 329 struct vnode *vp; 330 int error; 331 332 DPRINTF("\n"); 333 if ((error = VFS_VGET(mp, V7FS_ROOT_INODE, lktype, &vp)) != 0) { 334 DPRINTF("error=%d\n", error); 335 return error; 336 } 337 *vpp = vp; 338 DPRINTF("done.\n"); 339 340 return 0; 341} 342 343int 344v7fs_statvfs(struct mount *mp, struct statvfs *f) 345{ 346 struct v7fs_mount *v7fsmount = mp->mnt_data; 347 struct v7fs_self *fs = v7fsmount->core; 348 349 DPRINTF("scratch remain=%d\n", fs->scratch_remain); 350 351 v7fs_superblock_status(fs); 352 353 f->f_bsize = V7FS_BSIZE; 354 f->f_frsize = V7FS_BSIZE; 355 f->f_iosize = V7FS_BSIZE; 356 f->f_blocks = fs->stat.total_blocks; 357 f->f_bfree = fs->stat.free_blocks; 358 f->f_bavail = fs->stat.free_blocks; 359 f->f_bresvd = 0; 360 f->f_files = fs->stat.total_files; 361 f->f_ffree = fs->stat.free_inode; 362 f->f_favail = f->f_ffree; 363 f->f_fresvd = 0; 364 copy_statvfs_info(f, mp); 365 366 return 0; 367} 368 369static bool 370v7fs_sync_selector(void *cl, struct vnode *vp) 371{ 372 struct v7fs_node *v7fs_node; 373 374 KASSERT(mutex_owned(vp->v_interlock)); 375 376 v7fs_node = vp->v_data; 377 if (v7fs_node == NULL) 378 return false; 379 if (!v7fs_inode_allocated(&v7fs_node->inode)) 380 return false; 381 382 return true; 383} 384 385int 386v7fs_sync(struct mount *mp, int waitfor, kauth_cred_t cred) 387{ 388 struct v7fs_mount *v7fsmount = mp->mnt_data; 389 struct v7fs_self *fs = v7fsmount->core; 390 struct vnode_iterator *marker; 391 struct vnode *vp; 392 int err, error; 393 394 DPRINTF("\n"); 395 396 v7fs_superblock_writeback(fs); 397 error = 0; 398 vfs_vnode_iterator_init(mp, &marker); 399 while ((vp = vfs_vnode_iterator_next(marker, 400 v7fs_sync_selector, NULL)) != NULL) { 401 err = vn_lock(vp, LK_EXCLUSIVE); 402 if (err) { 403 vrele(vp); 404 continue; 405 } 406 err = VOP_FSYNC(vp, cred, FSYNC_WAIT, 0, 0); 407 vput(vp); 408 if (err != 0) 409 error = err; 410 } 411 vfs_vnode_iterator_destroy(marker); 412 413 return error; 414} 415 416static enum vtype 417v7fs_mode_to_vtype (v7fs_mode_t mode) 418{ 419 enum vtype table[] = { VCHR, VDIR, VBLK, VREG, VLNK, VSOCK }; 420 421 if ((mode & V7FS_IFMT) == V7FSBSD_IFFIFO) 422 return VFIFO; 423 424 return table[((mode >> 13) & 7) - 1]; 425} 426 427int 428v7fs_loadvnode(struct mount *mp, struct vnode *vp, 429 const void *key, size_t key_len, const void **new_key) 430{ 431 struct v7fs_mount *v7fsmount; 432 struct v7fs_self *fs; 433 struct v7fs_node *v7fs_node; 434 struct v7fs_inode inode; 435 v7fs_ino_t number; 436 int error; 437 438 KASSERT(key_len == sizeof(number)); 439 memcpy(&number, key, key_len); 440 441 v7fsmount = mp->mnt_data; 442 fs = v7fsmount->core; 443 444 /* Lookup requested i-node */ 445 if ((error = v7fs_inode_load(fs, &inode, number))) { 446 DPRINTF("v7fs_inode_load failed.\n"); 447 return error; 448 } 449 450 v7fs_node = pool_get(&v7fs_node_pool, PR_WAITOK); 451 memset(v7fs_node, 0, sizeof(*v7fs_node)); 452 453 vp->v_tag = VT_V7FS; 454 vp->v_data = v7fs_node; 455 v7fs_node->vnode = vp; 456 v7fs_node->v7fsmount = v7fsmount; 457 v7fs_node->inode = inode;/*structure copy */ 458 v7fs_node->lockf = NULL; /* advlock */ 459 460 genfs_node_init(vp, &v7fs_genfsops); 461 uvm_vnp_setsize(vp, v7fs_inode_filesize(&inode)); 462 463 if (number == V7FS_ROOT_INODE) { 464 vp->v_type = VDIR; 465 vp->v_vflag |= VV_ROOT; 466 vp->v_op = v7fs_vnodeop_p; 467 } else { 468 vp->v_type = v7fs_mode_to_vtype(inode.mode); 469 470 if (vp->v_type == VBLK || vp->v_type == VCHR) { 471 dev_t rdev = inode.device; 472 vp->v_op = v7fs_specop_p; 473 spec_node_init(vp, rdev); 474 } else if (vp->v_type == VFIFO) { 475 vp->v_op = v7fs_fifoop_p; 476 } else { 477 vp->v_op = v7fs_vnodeop_p; 478 } 479 } 480 481 *new_key = &v7fs_node->inode.inode_number; 482 483 return 0; 484} 485 486 487int 488v7fs_vget(struct mount *mp, ino_t ino, int lktype, struct vnode **vpp) 489{ 490 int error; 491 v7fs_ino_t number; 492 struct vnode *vp; 493 494 KASSERT(ino <= UINT16_MAX); 495 number = ino; 496 497 error = vcache_get(mp, &number, sizeof(number), &vp); 498 if (error) 499 return error; 500 error = vn_lock(vp, lktype); 501 if (error) { 502 vrele(vp); 503 return error; 504 } 505 506 *vpp = vp; 507 508 return 0; 509} 510 511int 512v7fs_fhtovp(struct mount *mp, struct fid *fid, int lktype, struct vnode **vpp) 513{ 514 515 DPRINTF("\n"); 516 /* notyet */ 517 return EOPNOTSUPP; 518} 519 520int 521v7fs_vptofh(struct vnode *vpp, struct fid *fid, size_t *fh_size) 522{ 523 524 DPRINTF("\n"); 525 /* notyet */ 526 return EOPNOTSUPP; 527} 528 529void 530v7fs_init(void) 531{ 532 533 DPRINTF("\n"); 534 pool_init(&v7fs_node_pool, sizeof(struct v7fs_node), 0, 0, 0, 535 "v7fs_node_pool", &pool_allocator_nointr, IPL_NONE); 536} 537 538void 539v7fs_reinit(void) 540{ 541 542 /* Nothing to do. */ 543 DPRINTF("\n"); 544} 545 546void 547v7fs_done(void) 548{ 549 550 DPRINTF("\n"); 551 pool_destroy(&v7fs_node_pool); 552} 553 554int 555v7fs_gop_alloc(struct vnode *vp, off_t off, off_t len, int flags, 556 kauth_cred_t cred) 557{ 558 559 DPRINTF("\n"); 560 return 0; 561} 562 563int 564v7fs_mountroot(void) 565{ 566 struct mount *mp; 567 int error; 568 569 DPRINTF(""); 570 /* On mountroot, devvp (rootdev) is opened by vfs_mountroot */ 571 if ((error = is_v7fs_partition (rootvp))) 572 return error; 573 574 if ((error = vfs_rootmountalloc(MOUNT_V7FS, "root_device", &mp))) { 575 DPRINTF("mountalloc error=%d\n", error); 576 vrele(rootvp); 577 return error; 578 } 579 580 if ((error = v7fs_mountfs(rootvp, mp, _BYTE_ORDER))) { 581 DPRINTF("mountfs error=%d\n", error); 582 vfs_unbusy(mp); 583 vfs_rele(mp); 584 return error; 585 } 586 587 mountlist_append(mp); 588 589 vfs_unbusy(mp); 590 591 return 0; 592} 593