1 /*- 2 * modified for EXT2FS support in Lites 1.1 3 * 4 * Aug 1995, Godmar Back (gback@cs.utah.edu) 5 * University of Utah, Department of Computer Science 6 */ 7 /*- 8 * Copyright (c) 1989, 1991, 1993, 1994 9 * The Regents of the University of California. All rights reserved. 10 * 11 * Redistribution and use in source and binary forms, with or without 12 * modification, are permitted provided that the following conditions 13 * are met: 14 * 1. Redistributions of source code must retain the above copyright 15 * notice, this list of conditions and the following disclaimer. 16 * 2. Redistributions in binary form must reproduce the above copyright 17 * notice, this list of conditions and the following disclaimer in the 18 * documentation and/or other materials provided with the distribution. 19 * 3. Neither the name of the University nor the names of its contributors 20 * may be used to endorse or promote products derived from this software 21 * without specific prior written permission. 22 * 23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 26 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 33 * SUCH DAMAGE. 34 * 35 * @(#)ffs_vfsops.c 8.8 (Berkeley) 4/18/94 36 * $FreeBSD$ 37 */ 38 39 #include <sys/param.h> 40 #include <sys/systm.h> 41 #include <sys/namei.h> 42 #include <sys/priv.h> 43 #include <sys/proc.h> 44 #include <sys/kernel.h> 45 #include <sys/vnode.h> 46 #include <sys/mount.h> 47 #include <sys/bio.h> 48 #include <sys/buf.h> 49 #include <sys/conf.h> 50 #include <sys/endian.h> 51 #include <sys/fcntl.h> 52 #include <sys/malloc.h> 53 #include <sys/stat.h> 54 #include <sys/mutex.h> 55 56 #include <geom/geom.h> 57 #include <geom/geom_vfs.h> 58 59 #include <fs/ext2fs/ext2_mount.h> 60 #include <fs/ext2fs/inode.h> 61 62 #include <fs/ext2fs/fs.h> 63 #include <fs/ext2fs/ext2fs.h> 64 #include <fs/ext2fs/ext2_dinode.h> 65 #include <fs/ext2fs/ext2_extern.h> 66 67 static int ext2_flushfiles(struct mount *mp, int flags, struct thread *td); 68 static int ext2_mountfs(struct vnode *, struct mount *); 69 static int ext2_reload(struct mount *mp, struct thread *td); 70 static int ext2_sbupdate(struct ext2mount *, int); 71 static int ext2_cgupdate(struct ext2mount *, int); 72 static vfs_unmount_t ext2_unmount; 73 static vfs_root_t ext2_root; 74 static vfs_statfs_t ext2_statfs; 75 static vfs_sync_t ext2_sync; 76 static vfs_vget_t ext2_vget; 77 static vfs_fhtovp_t ext2_fhtovp; 78 static vfs_mount_t ext2_mount; 79 80 MALLOC_DEFINE(M_EXT2NODE, "ext2_node", "EXT2 vnode private part"); 81 static MALLOC_DEFINE(M_EXT2MNT, "ext2_mount", "EXT2 mount structure"); 82 83 static struct vfsops ext2fs_vfsops = { 84 .vfs_fhtovp = ext2_fhtovp, 85 .vfs_mount = ext2_mount, 86 .vfs_root = ext2_root, /* root inode via vget */ 87 .vfs_statfs = ext2_statfs, 88 .vfs_sync = ext2_sync, 89 .vfs_unmount = ext2_unmount, 90 .vfs_vget = ext2_vget, 91 }; 92 93 VFS_SET(ext2fs_vfsops, ext2fs, 0); 94 95 static int ext2_check_sb_compat(struct ext2fs *es, struct cdev *dev, 96 int ronly); 97 static int compute_sb_data(struct vnode * devvp, 98 struct ext2fs * es, struct m_ext2fs * fs); 99 100 static const char *ext2_opts[] = { "acls", "async", "noatime", "noclusterr", 101 "noclusterw", "noexec", "export", "force", "from", "multilabel", 102 "suiddir", "nosymfollow", "sync", "union", NULL }; 103 104 /* 105 * VFS Operations. 106 * 107 * mount system call 108 */ 109 static int 110 ext2_mount(struct mount *mp) 111 { 112 struct vfsoptlist *opts; 113 struct vnode *devvp; 114 struct thread *td; 115 struct ext2mount *ump = NULL; 116 struct m_ext2fs *fs; 117 struct nameidata nd, *ndp = &nd; 118 accmode_t accmode; 119 char *path, *fspec; 120 int error, flags, len; 121 122 td = curthread; 123 opts = mp->mnt_optnew; 124 125 if (vfs_filteropt(opts, ext2_opts)) 126 return (EINVAL); 127 128 vfs_getopt(opts, "fspath", (void **)&path, NULL); 129 /* Double-check the length of path.. */ 130 if (strlen(path) >= MAXMNTLEN) 131 return (ENAMETOOLONG); 132 133 fspec = NULL; 134 error = vfs_getopt(opts, "from", (void **)&fspec, &len); 135 if (!error && fspec[len - 1] != '\0') 136 return (EINVAL); 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 ump = VFSTOEXT2(mp); 144 fs = ump->um_e2fs; 145 error = 0; 146 if (fs->e2fs_ronly == 0 && 147 vfs_flagopt(opts, "ro", NULL, 0)) { 148 error = VFS_SYNC(mp, MNT_WAIT); 149 if (error) 150 return (error); 151 flags = WRITECLOSE; 152 if (mp->mnt_flag & MNT_FORCE) 153 flags |= FORCECLOSE; 154 error = ext2_flushfiles(mp, flags, td); 155 if (error == 0 && fs->e2fs_wasvalid && ext2_cgupdate(ump, MNT_WAIT) == 0) { 156 fs->e2fs->e2fs_state |= E2FS_ISCLEAN; 157 ext2_sbupdate(ump, MNT_WAIT); 158 } 159 fs->e2fs_ronly = 1; 160 vfs_flagopt(opts, "ro", &mp->mnt_flag, MNT_RDONLY); 161 g_topology_lock(); 162 g_access(ump->um_cp, 0, -1, 0); 163 g_topology_unlock(); 164 } 165 if (!error && (mp->mnt_flag & MNT_RELOAD)) 166 error = ext2_reload(mp, td); 167 if (error) 168 return (error); 169 devvp = ump->um_devvp; 170 if (fs->e2fs_ronly && !vfs_flagopt(opts, "ro", NULL, 0)) { 171 if (ext2_check_sb_compat(fs->e2fs, devvp->v_rdev, 0)) 172 return (EPERM); 173 174 /* 175 * If upgrade to read-write by non-root, then verify 176 * that user has necessary permissions on the device. 177 */ 178 vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY); 179 error = VOP_ACCESS(devvp, VREAD | VWRITE, 180 td->td_ucred, td); 181 if (error) 182 error = priv_check(td, PRIV_VFS_MOUNT_PERM); 183 if (error) { 184 VOP_UNLOCK(devvp, 0); 185 return (error); 186 } 187 VOP_UNLOCK(devvp, 0); 188 g_topology_lock(); 189 error = g_access(ump->um_cp, 0, 1, 0); 190 g_topology_unlock(); 191 if (error) 192 return (error); 193 194 if ((fs->e2fs->e2fs_state & E2FS_ISCLEAN) == 0 || 195 (fs->e2fs->e2fs_state & E2FS_ERRORS)) { 196 if (mp->mnt_flag & MNT_FORCE) { 197 printf( 198 "WARNING: %s was not properly dismounted\n", fs->e2fs_fsmnt); 199 } else { 200 printf( 201 "WARNING: R/W mount of %s denied. Filesystem is not clean - run fsck\n", 202 fs->e2fs_fsmnt); 203 return (EPERM); 204 } 205 } 206 fs->e2fs->e2fs_state &= ~E2FS_ISCLEAN; 207 (void)ext2_cgupdate(ump, MNT_WAIT); 208 fs->e2fs_ronly = 0; 209 MNT_ILOCK(mp); 210 mp->mnt_flag &= ~MNT_RDONLY; 211 MNT_IUNLOCK(mp); 212 } 213 if (vfs_flagopt(opts, "export", NULL, 0)) { 214 /* Process export requests in vfs_mount.c. */ 215 return (error); 216 } 217 } 218 219 /* 220 * Not an update, or updating the name: look up the name 221 * and verify that it refers to a sensible disk device. 222 */ 223 if (fspec == NULL) 224 return (EINVAL); 225 NDINIT(ndp, LOOKUP, FOLLOW | LOCKLEAF, UIO_SYSSPACE, fspec, td); 226 if ((error = namei(ndp)) != 0) 227 return (error); 228 NDFREE(ndp, NDF_ONLY_PNBUF); 229 devvp = ndp->ni_vp; 230 231 if (!vn_isdisk(devvp, &error)) { 232 vput(devvp); 233 return (error); 234 } 235 236 /* 237 * If mount by non-root, then verify that user has necessary 238 * permissions on the device. 239 * 240 * XXXRW: VOP_ACCESS() enough? 241 */ 242 accmode = VREAD; 243 if ((mp->mnt_flag & MNT_RDONLY) == 0) 244 accmode |= VWRITE; 245 error = VOP_ACCESS(devvp, accmode, td->td_ucred, td); 246 if (error) 247 error = priv_check(td, PRIV_VFS_MOUNT_PERM); 248 if (error) { 249 vput(devvp); 250 return (error); 251 } 252 253 if ((mp->mnt_flag & MNT_UPDATE) == 0) { 254 error = ext2_mountfs(devvp, mp); 255 } else { 256 if (devvp != ump->um_devvp) { 257 vput(devvp); 258 return (EINVAL); /* needs translation */ 259 } else 260 vput(devvp); 261 } 262 if (error) { 263 vrele(devvp); 264 return (error); 265 } 266 ump = VFSTOEXT2(mp); 267 fs = ump->um_e2fs; 268 269 /* 270 * Note that this strncpy() is ok because of a check at the start 271 * of ext2_mount(). 272 */ 273 strncpy(fs->e2fs_fsmnt, path, MAXMNTLEN); 274 fs->e2fs_fsmnt[MAXMNTLEN - 1] = '\0'; 275 vfs_mountedfrom(mp, fspec); 276 return (0); 277 } 278 279 static int 280 ext2_check_sb_compat(struct ext2fs *es, struct cdev *dev, int ronly) 281 { 282 uint32_t i, mask; 283 284 if (es->e2fs_magic != E2FS_MAGIC) { 285 printf("ext2fs: %s: wrong magic number %#x (expected %#x)\n", 286 devtoname(dev), es->e2fs_magic, E2FS_MAGIC); 287 return (1); 288 } 289 if (es->e2fs_rev > E2FS_REV0) { 290 mask = es->e2fs_features_incompat & ~(EXT2F_INCOMPAT_SUPP | 291 EXT4F_RO_INCOMPAT_SUPP); 292 if (mask) { 293 printf("WARNING: mount of %s denied due to " 294 "unsupported optional features:\n", devtoname(dev)); 295 for (i = 0; 296 i < sizeof(incompat)/sizeof(struct ext2_feature); 297 i++) 298 if (mask & incompat[i].mask) 299 printf("%s ", incompat[i].name); 300 printf("\n"); 301 return (1); 302 } 303 mask = es->e2fs_features_rocompat & ~EXT2F_ROCOMPAT_SUPP; 304 if (!ronly && mask) { 305 printf("WARNING: R/W mount of %s denied due to " 306 "unsupported optional features:\n", devtoname(dev)); 307 for (i = 0; 308 i < sizeof(ro_compat)/sizeof(struct ext2_feature); 309 i++) 310 if (mask & ro_compat[i].mask) 311 printf("%s ", ro_compat[i].name); 312 printf("\n"); 313 return (1); 314 } 315 } 316 return (0); 317 } 318 319 /* 320 * This computes the fields of the m_ext2fs structure from the 321 * data in the ext2fs structure read in. 322 */ 323 static int 324 compute_sb_data(struct vnode *devvp, struct ext2fs *es, 325 struct m_ext2fs *fs) 326 { 327 int db_count, error; 328 int i; 329 int logic_sb_block = 1; /* XXX for now */ 330 struct buf *bp; 331 uint32_t e2fs_descpb; 332 333 fs->e2fs_bshift = EXT2_MIN_BLOCK_LOG_SIZE + es->e2fs_log_bsize; 334 fs->e2fs_bsize = 1U << fs->e2fs_bshift; 335 fs->e2fs_fsbtodb = es->e2fs_log_bsize + 1; 336 fs->e2fs_qbmask = fs->e2fs_bsize - 1; 337 fs->e2fs_fsize = EXT2_MIN_FRAG_SIZE << es->e2fs_log_fsize; 338 if (fs->e2fs_fsize) 339 fs->e2fs_fpb = fs->e2fs_bsize / fs->e2fs_fsize; 340 fs->e2fs_bpg = es->e2fs_bpg; 341 fs->e2fs_fpg = es->e2fs_fpg; 342 fs->e2fs_ipg = es->e2fs_ipg; 343 if (es->e2fs_rev == E2FS_REV0) { 344 fs->e2fs_isize = E2FS_REV0_INODE_SIZE; 345 } else { 346 fs->e2fs_isize = es->e2fs_inode_size; 347 348 /* 349 * Simple sanity check for superblock inode size value. 350 */ 351 if (EXT2_INODE_SIZE(fs) < E2FS_REV0_INODE_SIZE || 352 EXT2_INODE_SIZE(fs) > fs->e2fs_bsize || 353 (fs->e2fs_isize & (fs->e2fs_isize - 1)) != 0) { 354 printf("ext2fs: invalid inode size %d\n", 355 fs->e2fs_isize); 356 return (EIO); 357 } 358 } 359 /* Check for extra isize in big inodes. */ 360 if (EXT2_HAS_RO_COMPAT_FEATURE(fs, EXT2F_ROCOMPAT_EXTRA_ISIZE) && 361 EXT2_INODE_SIZE(fs) < sizeof(struct ext2fs_dinode)) { 362 printf("ext2fs: no space for extra inode timestamps\n"); 363 return (EINVAL); 364 } 365 /* Check for group descriptor size */ 366 if (EXT2_HAS_INCOMPAT_FEATURE(fs, EXT2F_INCOMPAT_64BIT) && 367 (es->e3fs_desc_size != sizeof(struct ext2_gd))) { 368 printf("ext2fs: group descriptor size unsupported %d\n", 369 es->e3fs_desc_size); 370 return (EINVAL); 371 } 372 373 fs->e2fs_ipb = fs->e2fs_bsize / EXT2_INODE_SIZE(fs); 374 fs->e2fs_itpg = fs->e2fs_ipg / fs->e2fs_ipb; 375 /* s_resuid / s_resgid ? */ 376 fs->e2fs_gcount = howmany(es->e2fs_bcount - es->e2fs_first_dblock, 377 EXT2_BLOCKS_PER_GROUP(fs)); 378 e2fs_descpb = fs->e2fs_bsize / sizeof(struct ext2_gd); 379 db_count = howmany(fs->e2fs_gcount, e2fs_descpb); 380 fs->e2fs_gdbcount = db_count; 381 fs->e2fs_gd = malloc(db_count * fs->e2fs_bsize, 382 M_EXT2MNT, M_WAITOK); 383 fs->e2fs_contigdirs = malloc(fs->e2fs_gcount * 384 sizeof(*fs->e2fs_contigdirs), M_EXT2MNT, M_WAITOK | M_ZERO); 385 386 /* 387 * Adjust logic_sb_block. 388 * Godmar thinks: if the blocksize is greater than 1024, then 389 * the superblock is logically part of block zero. 390 */ 391 if (fs->e2fs_bsize > SBSIZE) 392 logic_sb_block = 0; 393 for (i = 0; i < db_count; i++) { 394 error = bread(devvp, 395 fsbtodb(fs, logic_sb_block + i + 1), 396 fs->e2fs_bsize, NOCRED, &bp); 397 if (error) { 398 free(fs->e2fs_contigdirs, M_EXT2MNT); 399 free(fs->e2fs_gd, M_EXT2MNT); 400 brelse(bp); 401 return (error); 402 } 403 e2fs_cgload((struct ext2_gd *)bp->b_data, 404 &fs->e2fs_gd[ 405 i * fs->e2fs_bsize / sizeof(struct ext2_gd)], 406 fs->e2fs_bsize); 407 brelse(bp); 408 bp = NULL; 409 } 410 /* Verify cg csum */ 411 if (EXT2_HAS_RO_COMPAT_FEATURE(fs, EXT2F_ROCOMPAT_GDT_CSUM)) { 412 error = ext2_gd_csum_verify(fs, devvp->v_rdev); 413 if (error) 414 return (error); 415 } 416 /* Initialization for the ext2 Orlov allocator variant. */ 417 fs->e2fs_total_dir = 0; 418 for (i = 0; i < fs->e2fs_gcount; i++) 419 fs->e2fs_total_dir += fs->e2fs_gd[i].ext2bgd_ndirs; 420 421 if (es->e2fs_rev == E2FS_REV0 || 422 !EXT2_HAS_RO_COMPAT_FEATURE(fs, EXT2F_ROCOMPAT_LARGEFILE)) 423 fs->e2fs_maxfilesize = 0x7fffffff; 424 else { 425 fs->e2fs_maxfilesize = 0xffffffffffff; 426 if (EXT2_HAS_RO_COMPAT_FEATURE(fs, EXT2F_ROCOMPAT_HUGE_FILE)) 427 fs->e2fs_maxfilesize = 0x7fffffffffffffff; 428 } 429 if (es->e4fs_flags & E2FS_UNSIGNED_HASH) { 430 fs->e2fs_uhash = 3; 431 } else if ((es->e4fs_flags & E2FS_SIGNED_HASH) == 0) { 432 #ifdef __CHAR_UNSIGNED__ 433 es->e4fs_flags |= E2FS_UNSIGNED_HASH; 434 fs->e2fs_uhash = 3; 435 #else 436 es->e4fs_flags |= E2FS_SIGNED_HASH; 437 #endif 438 } 439 440 return (0); 441 } 442 443 /* 444 * Reload all incore data for a filesystem (used after running fsck on 445 * the root filesystem and finding things to fix). The filesystem must 446 * be mounted read-only. 447 * 448 * Things to do to update the mount: 449 * 1) invalidate all cached meta-data. 450 * 2) re-read superblock from disk. 451 * 3) invalidate all cluster summary information. 452 * 4) invalidate all inactive vnodes. 453 * 5) invalidate all cached file data. 454 * 6) re-read inode data for all active vnodes. 455 * XXX we are missing some steps, in particular # 3, this has to be reviewed. 456 */ 457 static int 458 ext2_reload(struct mount *mp, struct thread *td) 459 { 460 struct vnode *vp, *mvp, *devvp; 461 struct inode *ip; 462 struct buf *bp; 463 struct ext2fs *es; 464 struct m_ext2fs *fs; 465 struct csum *sump; 466 int error, i; 467 int32_t *lp; 468 469 if ((mp->mnt_flag & MNT_RDONLY) == 0) 470 return (EINVAL); 471 /* 472 * Step 1: invalidate all cached meta-data. 473 */ 474 devvp = VFSTOEXT2(mp)->um_devvp; 475 vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY); 476 if (vinvalbuf(devvp, 0, 0, 0) != 0) 477 panic("ext2_reload: dirty1"); 478 VOP_UNLOCK(devvp, 0); 479 480 /* 481 * Step 2: re-read superblock from disk. 482 * constants have been adjusted for ext2 483 */ 484 if ((error = bread(devvp, SBLOCK, SBSIZE, NOCRED, &bp)) != 0) 485 return (error); 486 es = (struct ext2fs *)bp->b_data; 487 if (ext2_check_sb_compat(es, devvp->v_rdev, 0) != 0) { 488 brelse(bp); 489 return (EIO); /* XXX needs translation */ 490 } 491 fs = VFSTOEXT2(mp)->um_e2fs; 492 bcopy(bp->b_data, fs->e2fs, sizeof(struct ext2fs)); 493 494 if ((error = compute_sb_data(devvp, es, fs)) != 0) { 495 brelse(bp); 496 return (error); 497 } 498 #ifdef UNKLAR 499 if (fs->fs_sbsize < SBSIZE) 500 bp->b_flags |= B_INVAL; 501 #endif 502 brelse(bp); 503 504 /* 505 * Step 3: invalidate all cluster summary information. 506 */ 507 if (fs->e2fs_contigsumsize > 0) { 508 lp = fs->e2fs_maxcluster; 509 sump = fs->e2fs_clustersum; 510 for (i = 0; i < fs->e2fs_gcount; i++, sump++) { 511 *lp++ = fs->e2fs_contigsumsize; 512 sump->cs_init = 0; 513 bzero(sump->cs_sum, fs->e2fs_contigsumsize + 1); 514 } 515 } 516 517 loop: 518 MNT_VNODE_FOREACH_ALL(vp, mp, mvp) { 519 /* 520 * Step 4: invalidate all cached file data. 521 */ 522 if (vget(vp, LK_EXCLUSIVE | LK_INTERLOCK, td)) { 523 MNT_VNODE_FOREACH_ALL_ABORT(mp, mvp); 524 goto loop; 525 } 526 if (vinvalbuf(vp, 0, 0, 0)) 527 panic("ext2_reload: dirty2"); 528 529 /* 530 * Step 5: re-read inode data for all active vnodes. 531 */ 532 ip = VTOI(vp); 533 error = bread(devvp, fsbtodb(fs, ino_to_fsba(fs, ip->i_number)), 534 (int)fs->e2fs_bsize, NOCRED, &bp); 535 if (error) { 536 VOP_UNLOCK(vp, 0); 537 vrele(vp); 538 MNT_VNODE_FOREACH_ALL_ABORT(mp, mvp); 539 return (error); 540 } 541 ext2_ei2i((struct ext2fs_dinode *)((char *)bp->b_data + 542 EXT2_INODE_SIZE(fs) * ino_to_fsbo(fs, ip->i_number)), ip); 543 brelse(bp); 544 VOP_UNLOCK(vp, 0); 545 vrele(vp); 546 } 547 return (0); 548 } 549 550 /* 551 * Common code for mount and mountroot. 552 */ 553 static int 554 ext2_mountfs(struct vnode *devvp, struct mount *mp) 555 { 556 struct ext2mount *ump; 557 struct buf *bp; 558 struct m_ext2fs *fs; 559 struct ext2fs *es; 560 struct cdev *dev = devvp->v_rdev; 561 struct g_consumer *cp; 562 struct bufobj *bo; 563 struct csum *sump; 564 int error; 565 int ronly; 566 int i; 567 u_long size; 568 int32_t *lp; 569 int32_t e2fs_maxcontig; 570 571 ronly = vfs_flagopt(mp->mnt_optnew, "ro", NULL, 0); 572 /* XXX: use VOP_ACESS to check FS perms */ 573 g_topology_lock(); 574 error = g_vfs_open(devvp, &cp, "ext2fs", ronly ? 0 : 1); 575 g_topology_unlock(); 576 VOP_UNLOCK(devvp, 0); 577 if (error) 578 return (error); 579 580 /* XXX: should we check for some sectorsize or 512 instead? */ 581 if (((SBSIZE % cp->provider->sectorsize) != 0) || 582 (SBSIZE < cp->provider->sectorsize)) { 583 g_topology_lock(); 584 g_vfs_close(cp); 585 g_topology_unlock(); 586 return (EINVAL); 587 } 588 589 bo = &devvp->v_bufobj; 590 bo->bo_private = cp; 591 bo->bo_ops = g_vfs_bufops; 592 if (devvp->v_rdev->si_iosize_max != 0) 593 mp->mnt_iosize_max = devvp->v_rdev->si_iosize_max; 594 if (mp->mnt_iosize_max > MAXPHYS) 595 mp->mnt_iosize_max = MAXPHYS; 596 597 bp = NULL; 598 ump = NULL; 599 if ((error = bread(devvp, SBLOCK, SBSIZE, NOCRED, &bp)) != 0) 600 goto out; 601 es = (struct ext2fs *)bp->b_data; 602 if (ext2_check_sb_compat(es, dev, ronly) != 0) { 603 error = EINVAL; /* XXX needs translation */ 604 goto out; 605 } 606 if ((es->e2fs_state & E2FS_ISCLEAN) == 0 || 607 (es->e2fs_state & E2FS_ERRORS)) { 608 if (ronly || (mp->mnt_flag & MNT_FORCE)) { 609 printf( 610 "WARNING: Filesystem was not properly dismounted\n"); 611 } else { 612 printf( 613 "WARNING: R/W mount denied. Filesystem is not clean - run fsck\n"); 614 error = EPERM; 615 goto out; 616 } 617 } 618 ump = malloc(sizeof(*ump), M_EXT2MNT, M_WAITOK | M_ZERO); 619 620 /* 621 * I don't know whether this is the right strategy. Note that 622 * we dynamically allocate both an m_ext2fs and an ext2fs 623 * while Linux keeps the super block in a locked buffer. 624 */ 625 ump->um_e2fs = malloc(sizeof(struct m_ext2fs), 626 M_EXT2MNT, M_WAITOK | M_ZERO); 627 ump->um_e2fs->e2fs = malloc(sizeof(struct ext2fs), 628 M_EXT2MNT, M_WAITOK); 629 mtx_init(EXT2_MTX(ump), "EXT2FS", "EXT2FS Lock", MTX_DEF); 630 bcopy(es, ump->um_e2fs->e2fs, (u_int)sizeof(struct ext2fs)); 631 if ((error = compute_sb_data(devvp, ump->um_e2fs->e2fs, ump->um_e2fs))) 632 goto out; 633 634 /* 635 * Calculate the maximum contiguous blocks and size of cluster summary 636 * array. In FFS this is done by newfs; however, the superblock 637 * in ext2fs doesn't have these variables, so we can calculate 638 * them here. 639 */ 640 e2fs_maxcontig = MAX(1, MAXPHYS / ump->um_e2fs->e2fs_bsize); 641 ump->um_e2fs->e2fs_contigsumsize = MIN(e2fs_maxcontig, EXT2_MAXCONTIG); 642 if (ump->um_e2fs->e2fs_contigsumsize > 0) { 643 size = ump->um_e2fs->e2fs_gcount * sizeof(int32_t); 644 ump->um_e2fs->e2fs_maxcluster = malloc(size, M_EXT2MNT, M_WAITOK); 645 size = ump->um_e2fs->e2fs_gcount * sizeof(struct csum); 646 ump->um_e2fs->e2fs_clustersum = malloc(size, M_EXT2MNT, M_WAITOK); 647 lp = ump->um_e2fs->e2fs_maxcluster; 648 sump = ump->um_e2fs->e2fs_clustersum; 649 for (i = 0; i < ump->um_e2fs->e2fs_gcount; i++, sump++) { 650 *lp++ = ump->um_e2fs->e2fs_contigsumsize; 651 sump->cs_init = 0; 652 sump->cs_sum = malloc((ump->um_e2fs->e2fs_contigsumsize + 1) * 653 sizeof(int32_t), M_EXT2MNT, M_WAITOK | M_ZERO); 654 } 655 } 656 657 brelse(bp); 658 bp = NULL; 659 fs = ump->um_e2fs; 660 fs->e2fs_ronly = ronly; /* ronly is set according to mnt_flags */ 661 662 /* 663 * If the fs is not mounted read-only, make sure the super block is 664 * always written back on a sync(). 665 */ 666 fs->e2fs_wasvalid = fs->e2fs->e2fs_state & E2FS_ISCLEAN ? 1 : 0; 667 if (ronly == 0) { 668 fs->e2fs_fmod = 1; /* mark it modified */ 669 fs->e2fs->e2fs_state &= ~E2FS_ISCLEAN; /* set fs invalid */ 670 } 671 mp->mnt_data = ump; 672 mp->mnt_stat.f_fsid.val[0] = dev2udev(dev); 673 mp->mnt_stat.f_fsid.val[1] = mp->mnt_vfc->vfc_typenum; 674 mp->mnt_maxsymlinklen = EXT2_MAXSYMLINKLEN; 675 MNT_ILOCK(mp); 676 mp->mnt_flag |= MNT_LOCAL; 677 MNT_IUNLOCK(mp); 678 ump->um_mountp = mp; 679 ump->um_dev = dev; 680 ump->um_devvp = devvp; 681 ump->um_bo = &devvp->v_bufobj; 682 ump->um_cp = cp; 683 684 /* 685 * Setting those two parameters allowed us to use 686 * ufs_bmap w/o changse! 687 */ 688 ump->um_nindir = EXT2_ADDR_PER_BLOCK(fs); 689 ump->um_bptrtodb = fs->e2fs->e2fs_log_bsize + 1; 690 ump->um_seqinc = EXT2_FRAGS_PER_BLOCK(fs); 691 if (ronly == 0) 692 ext2_sbupdate(ump, MNT_WAIT); 693 /* 694 * Initialize filesystem stat information in mount struct. 695 */ 696 MNT_ILOCK(mp); 697 mp->mnt_kern_flag |= MNTK_LOOKUP_SHARED | MNTK_EXTENDED_SHARED | 698 MNTK_USES_BCACHE; 699 MNT_IUNLOCK(mp); 700 return (0); 701 out: 702 if (bp) 703 brelse(bp); 704 if (cp != NULL) { 705 g_topology_lock(); 706 g_vfs_close(cp); 707 g_topology_unlock(); 708 } 709 if (ump) { 710 mtx_destroy(EXT2_MTX(ump)); 711 free(ump->um_e2fs->e2fs_gd, M_EXT2MNT); 712 free(ump->um_e2fs->e2fs_contigdirs, M_EXT2MNT); 713 free(ump->um_e2fs->e2fs, M_EXT2MNT); 714 free(ump->um_e2fs, M_EXT2MNT); 715 free(ump, M_EXT2MNT); 716 mp->mnt_data = NULL; 717 } 718 return (error); 719 } 720 721 /* 722 * Unmount system call. 723 */ 724 static int 725 ext2_unmount(struct mount *mp, int mntflags) 726 { 727 struct ext2mount *ump; 728 struct m_ext2fs *fs; 729 struct csum *sump; 730 int error, flags, i, ronly; 731 732 flags = 0; 733 if (mntflags & MNT_FORCE) { 734 if (mp->mnt_flag & MNT_ROOTFS) 735 return (EINVAL); 736 flags |= FORCECLOSE; 737 } 738 if ((error = ext2_flushfiles(mp, flags, curthread)) != 0) 739 return (error); 740 ump = VFSTOEXT2(mp); 741 fs = ump->um_e2fs; 742 ronly = fs->e2fs_ronly; 743 if (ronly == 0 && ext2_cgupdate(ump, MNT_WAIT) == 0) { 744 if (fs->e2fs_wasvalid) 745 fs->e2fs->e2fs_state |= E2FS_ISCLEAN; 746 ext2_sbupdate(ump, MNT_WAIT); 747 } 748 749 g_topology_lock(); 750 g_vfs_close(ump->um_cp); 751 g_topology_unlock(); 752 vrele(ump->um_devvp); 753 sump = fs->e2fs_clustersum; 754 for (i = 0; i < fs->e2fs_gcount; i++, sump++) 755 free(sump->cs_sum, M_EXT2MNT); 756 free(fs->e2fs_clustersum, M_EXT2MNT); 757 free(fs->e2fs_maxcluster, M_EXT2MNT); 758 free(fs->e2fs_gd, M_EXT2MNT); 759 free(fs->e2fs_contigdirs, M_EXT2MNT); 760 free(fs->e2fs, M_EXT2MNT); 761 free(fs, M_EXT2MNT); 762 free(ump, M_EXT2MNT); 763 mp->mnt_data = NULL; 764 MNT_ILOCK(mp); 765 mp->mnt_flag &= ~MNT_LOCAL; 766 MNT_IUNLOCK(mp); 767 return (error); 768 } 769 770 /* 771 * Flush out all the files in a filesystem. 772 */ 773 static int 774 ext2_flushfiles(struct mount *mp, int flags, struct thread *td) 775 { 776 int error; 777 778 error = vflush(mp, 0, flags, td); 779 return (error); 780 } 781 782 /* 783 * Get filesystem statistics. 784 */ 785 int 786 ext2_statfs(struct mount *mp, struct statfs *sbp) 787 { 788 struct ext2mount *ump; 789 struct m_ext2fs *fs; 790 uint32_t overhead, overhead_per_group, ngdb; 791 int i, ngroups; 792 793 ump = VFSTOEXT2(mp); 794 fs = ump->um_e2fs; 795 if (fs->e2fs->e2fs_magic != E2FS_MAGIC) 796 panic("ext2_statfs"); 797 798 /* 799 * Compute the overhead (FS structures) 800 */ 801 overhead_per_group = 802 1 /* block bitmap */ + 803 1 /* inode bitmap */ + 804 fs->e2fs_itpg; 805 overhead = fs->e2fs->e2fs_first_dblock + 806 fs->e2fs_gcount * overhead_per_group; 807 if (fs->e2fs->e2fs_rev > E2FS_REV0 && 808 fs->e2fs->e2fs_features_rocompat & EXT2F_ROCOMPAT_SPARSESUPER) { 809 for (i = 0, ngroups = 0; i < fs->e2fs_gcount; i++) { 810 if (ext2_cg_has_sb(fs, i)) 811 ngroups++; 812 } 813 } else { 814 ngroups = fs->e2fs_gcount; 815 } 816 ngdb = fs->e2fs_gdbcount; 817 if (fs->e2fs->e2fs_rev > E2FS_REV0 && 818 fs->e2fs->e2fs_features_compat & EXT2F_COMPAT_RESIZE) 819 ngdb += fs->e2fs->e2fs_reserved_ngdb; 820 overhead += ngroups * (1 /* superblock */ + ngdb); 821 822 sbp->f_bsize = EXT2_FRAG_SIZE(fs); 823 sbp->f_iosize = EXT2_BLOCK_SIZE(fs); 824 sbp->f_blocks = fs->e2fs->e2fs_bcount - overhead; 825 sbp->f_bfree = fs->e2fs->e2fs_fbcount; 826 sbp->f_bavail = sbp->f_bfree - fs->e2fs->e2fs_rbcount; 827 sbp->f_files = fs->e2fs->e2fs_icount; 828 sbp->f_ffree = fs->e2fs->e2fs_ficount; 829 return (0); 830 } 831 832 /* 833 * Go through the disk queues to initiate sandbagged IO; 834 * go through the inodes to write those that have been modified; 835 * initiate the writing of the super block if it has been modified. 836 * 837 * Note: we are always called with the filesystem marked `MPBUSY'. 838 */ 839 static int 840 ext2_sync(struct mount *mp, int waitfor) 841 { 842 struct vnode *mvp, *vp; 843 struct thread *td; 844 struct inode *ip; 845 struct ext2mount *ump = VFSTOEXT2(mp); 846 struct m_ext2fs *fs; 847 int error, allerror = 0; 848 849 td = curthread; 850 fs = ump->um_e2fs; 851 if (fs->e2fs_fmod != 0 && fs->e2fs_ronly != 0) { /* XXX */ 852 printf("fs = %s\n", fs->e2fs_fsmnt); 853 panic("ext2_sync: rofs mod"); 854 } 855 856 /* 857 * Write back each (modified) inode. 858 */ 859 loop: 860 MNT_VNODE_FOREACH_ALL(vp, mp, mvp) { 861 if (vp->v_type == VNON) { 862 VI_UNLOCK(vp); 863 continue; 864 } 865 ip = VTOI(vp); 866 if ((ip->i_flag & 867 (IN_ACCESS | IN_CHANGE | IN_MODIFIED | IN_UPDATE)) == 0 && 868 (vp->v_bufobj.bo_dirty.bv_cnt == 0 || 869 waitfor == MNT_LAZY)) { 870 VI_UNLOCK(vp); 871 continue; 872 } 873 error = vget(vp, LK_EXCLUSIVE | LK_NOWAIT | LK_INTERLOCK, td); 874 if (error) { 875 if (error == ENOENT) { 876 MNT_VNODE_FOREACH_ALL_ABORT(mp, mvp); 877 goto loop; 878 } 879 continue; 880 } 881 if ((error = VOP_FSYNC(vp, waitfor, td)) != 0) 882 allerror = error; 883 VOP_UNLOCK(vp, 0); 884 vrele(vp); 885 } 886 887 /* 888 * Force stale filesystem control information to be flushed. 889 */ 890 if (waitfor != MNT_LAZY) { 891 vn_lock(ump->um_devvp, LK_EXCLUSIVE | LK_RETRY); 892 if ((error = VOP_FSYNC(ump->um_devvp, waitfor, td)) != 0) 893 allerror = error; 894 VOP_UNLOCK(ump->um_devvp, 0); 895 } 896 897 /* 898 * Write back modified superblock. 899 */ 900 if (fs->e2fs_fmod != 0) { 901 fs->e2fs_fmod = 0; 902 fs->e2fs->e2fs_wtime = time_second; 903 if ((error = ext2_cgupdate(ump, waitfor)) != 0) 904 allerror = error; 905 } 906 return (allerror); 907 } 908 909 /* 910 * Look up an EXT2FS dinode number to find its incore vnode, otherwise read it 911 * in from disk. If it is in core, wait for the lock bit to clear, then 912 * return the inode locked. Detection and handling of mount points must be 913 * done by the calling routine. 914 */ 915 static int 916 ext2_vget(struct mount *mp, ino_t ino, int flags, struct vnode **vpp) 917 { 918 struct m_ext2fs *fs; 919 struct inode *ip; 920 struct ext2mount *ump; 921 struct buf *bp; 922 struct vnode *vp; 923 struct thread *td; 924 int i, error; 925 int used_blocks; 926 927 td = curthread; 928 error = vfs_hash_get(mp, ino, flags, td, vpp, NULL, NULL); 929 if (error || *vpp != NULL) 930 return (error); 931 932 ump = VFSTOEXT2(mp); 933 ip = malloc(sizeof(struct inode), M_EXT2NODE, M_WAITOK | M_ZERO); 934 935 /* Allocate a new vnode/inode. */ 936 if ((error = getnewvnode("ext2fs", mp, &ext2_vnodeops, &vp)) != 0) { 937 *vpp = NULL; 938 free(ip, M_EXT2NODE); 939 return (error); 940 } 941 vp->v_data = ip; 942 ip->i_vnode = vp; 943 ip->i_e2fs = fs = ump->um_e2fs; 944 ip->i_ump = ump; 945 ip->i_number = ino; 946 947 lockmgr(vp->v_vnlock, LK_EXCLUSIVE, NULL); 948 error = insmntque(vp, mp); 949 if (error != 0) { 950 free(ip, M_EXT2NODE); 951 *vpp = NULL; 952 return (error); 953 } 954 error = vfs_hash_insert(vp, ino, flags, td, vpp, NULL, NULL); 955 if (error || *vpp != NULL) 956 return (error); 957 958 /* Read in the disk contents for the inode, copy into the inode. */ 959 if ((error = bread(ump->um_devvp, fsbtodb(fs, ino_to_fsba(fs, ino)), 960 (int)fs->e2fs_bsize, NOCRED, &bp)) != 0) { 961 /* 962 * The inode does not contain anything useful, so it would 963 * be misleading to leave it on its hash chain. With mode 964 * still zero, it will be unlinked and returned to the free 965 * list by vput(). 966 */ 967 brelse(bp); 968 vput(vp); 969 *vpp = NULL; 970 return (error); 971 } 972 /* convert ext2 inode to dinode */ 973 ext2_ei2i((struct ext2fs_dinode *)((char *)bp->b_data + EXT2_INODE_SIZE(fs) * 974 ino_to_fsbo(fs, ino)), ip); 975 ip->i_block_group = ino_to_cg(fs, ino); 976 ip->i_next_alloc_block = 0; 977 ip->i_next_alloc_goal = 0; 978 979 /* 980 * Now we want to make sure that block pointers for unused 981 * blocks are zeroed out - ext2_balloc depends on this 982 * although for regular files and directories only 983 * 984 * If IN_E4EXTENTS is enabled, unused blocks are not zeroed 985 * out because we could corrupt the extent tree. 986 */ 987 if (!(ip->i_flag & IN_E4EXTENTS) && 988 (S_ISDIR(ip->i_mode) || S_ISREG(ip->i_mode))) { 989 used_blocks = howmany(ip->i_size, fs->e2fs_bsize); 990 for (i = used_blocks; i < EXT2_NDIR_BLOCKS; i++) 991 ip->i_db[i] = 0; 992 } 993 #ifdef EXT2FS_DEBUG 994 ext2_print_inode(ip); 995 #endif 996 bqrelse(bp); 997 998 /* 999 * Initialize the vnode from the inode, check for aliases. 1000 * Note that the underlying vnode may have changed. 1001 */ 1002 if ((error = ext2_vinit(mp, &ext2_fifoops, &vp)) != 0) { 1003 vput(vp); 1004 *vpp = NULL; 1005 return (error); 1006 } 1007 1008 /* 1009 * Finish inode initialization. 1010 */ 1011 1012 *vpp = vp; 1013 return (0); 1014 } 1015 1016 /* 1017 * File handle to vnode 1018 * 1019 * Have to be really careful about stale file handles: 1020 * - check that the inode number is valid 1021 * - call ext2_vget() to get the locked inode 1022 * - check for an unallocated inode (i_mode == 0) 1023 * - check that the given client host has export rights and return 1024 * those rights via. exflagsp and credanonp 1025 */ 1026 static int 1027 ext2_fhtovp(struct mount *mp, struct fid *fhp, int flags, struct vnode **vpp) 1028 { 1029 struct inode *ip; 1030 struct ufid *ufhp; 1031 struct vnode *nvp; 1032 struct m_ext2fs *fs; 1033 int error; 1034 1035 ufhp = (struct ufid *)fhp; 1036 fs = VFSTOEXT2(mp)->um_e2fs; 1037 if (ufhp->ufid_ino < EXT2_ROOTINO || 1038 ufhp->ufid_ino > fs->e2fs_gcount * fs->e2fs->e2fs_ipg) 1039 return (ESTALE); 1040 1041 error = VFS_VGET(mp, ufhp->ufid_ino, LK_EXCLUSIVE, &nvp); 1042 if (error) { 1043 *vpp = NULLVP; 1044 return (error); 1045 } 1046 ip = VTOI(nvp); 1047 if (ip->i_mode == 0 || 1048 ip->i_gen != ufhp->ufid_gen || ip->i_nlink <= 0) { 1049 vput(nvp); 1050 *vpp = NULLVP; 1051 return (ESTALE); 1052 } 1053 *vpp = nvp; 1054 vnode_create_vobject(*vpp, 0, curthread); 1055 return (0); 1056 } 1057 1058 /* 1059 * Write a superblock and associated information back to disk. 1060 */ 1061 static int 1062 ext2_sbupdate(struct ext2mount *mp, int waitfor) 1063 { 1064 struct m_ext2fs *fs = mp->um_e2fs; 1065 struct ext2fs *es = fs->e2fs; 1066 struct buf *bp; 1067 int error = 0; 1068 1069 bp = getblk(mp->um_devvp, SBLOCK, SBSIZE, 0, 0, 0); 1070 bcopy((caddr_t)es, bp->b_data, (u_int)sizeof(struct ext2fs)); 1071 if (waitfor == MNT_WAIT) 1072 error = bwrite(bp); 1073 else 1074 bawrite(bp); 1075 1076 /* 1077 * The buffers for group descriptors, inode bitmaps and block bitmaps 1078 * are not busy at this point and are (hopefully) written by the 1079 * usual sync mechanism. No need to write them here. 1080 */ 1081 return (error); 1082 } 1083 int 1084 ext2_cgupdate(struct ext2mount *mp, int waitfor) 1085 { 1086 struct m_ext2fs *fs = mp->um_e2fs; 1087 struct buf *bp; 1088 int i, error = 0, allerror = 0; 1089 1090 allerror = ext2_sbupdate(mp, waitfor); 1091 1092 /* Update gd csums */ 1093 if (EXT2_HAS_RO_COMPAT_FEATURE(fs, EXT2F_ROCOMPAT_GDT_CSUM)) 1094 ext2_gd_csum_set(fs); 1095 1096 for (i = 0; i < fs->e2fs_gdbcount; i++) { 1097 bp = getblk(mp->um_devvp, fsbtodb(fs, 1098 fs->e2fs->e2fs_first_dblock + 1099 1 /* superblock */ + i), fs->e2fs_bsize, 0, 0, 0); 1100 e2fs_cgsave(&fs->e2fs_gd[ 1101 i * fs->e2fs_bsize / sizeof(struct ext2_gd)], 1102 (struct ext2_gd *)bp->b_data, fs->e2fs_bsize); 1103 if (waitfor == MNT_WAIT) 1104 error = bwrite(bp); 1105 else 1106 bawrite(bp); 1107 } 1108 1109 if (!allerror && error) 1110 allerror = error; 1111 return (allerror); 1112 } 1113 1114 /* 1115 * Return the root of a filesystem. 1116 */ 1117 static int 1118 ext2_root(struct mount *mp, int flags, struct vnode **vpp) 1119 { 1120 struct vnode *nvp; 1121 int error; 1122 1123 error = VFS_VGET(mp, EXT2_ROOTINO, LK_EXCLUSIVE, &nvp); 1124 if (error) 1125 return (error); 1126 *vpp = nvp; 1127 return (0); 1128 } 1129