sys/vfs/gnu/ext2fs/ext2_vfsops.c

   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. All advertising materials mentioning features or use of this software
  20  *    must display the following acknowledgement:
  21  *      This product includes software developed by the University of
  22  *      California, Berkeley and its contributors.
  23  * 4. Neither the name of the University nor the names of its contributors
  24  *    may be used to endorse or promote products derived from this software
  25  *    without specific prior written permission.
  26  *
  27  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  28  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  29  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  30  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  31  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  32  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  33  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  34  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  35  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  36  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  37  * SUCH DAMAGE.
  38  *
  39  *      @(#)ffs_vfsops.c        8.8 (Berkeley) 4/18/94
  40  *      $FreeBSD: src/sys/gnu/ext2fs/ext2_vfsops.c,v 1.63.2.7 2002/07/01 00:18:51 iedowse Exp $
  41  *      $DragonFly: src/sys/vfs/gnu/ext2fs/ext2_vfsops.c,v 1.29 2005/06/06 15:35:06 dillon Exp $
  42  */
  43
  44 #include "opt_quota.h"
  45
  46 #include <sys/param.h>
  47 #include <sys/systm.h>
  48 #include <sys/nlookup.h>
  49 #include <sys/proc.h>
  50 #include <sys/kernel.h>
  51 #include <sys/vnode.h>
  52 #include <sys/mount.h>
  53 #include <sys/buf.h>
  54 #include <sys/conf.h>
  55 #include <sys/fcntl.h>
  56 #include <sys/disklabel.h>
  57 #include <sys/malloc.h>
  58 #include <sys/stat.h>
  59 #include <sys/buf2.h>
  60 #include <sys/thread2.h>
  61
  62 #include <vfs/ufs/quota.h>
  63 #include <vfs/ufs/ufsmount.h>
  64 #include <vfs/ufs/inode.h>
  65 #include <vfs/ufs/ufs_extern.h>
  66
  67 #include <vm/vm_zone.h>
  68
  69 #include "fs.h"
  70 #include "ext2_extern.h"
  71 #include "ext2_fs.h"
  72 #include "ext2_fs_sb.h"
  73
  74 extern struct vnodeopv_entry_desc ext2_vnodeop_entries[];
  75 extern struct vnodeopv_entry_desc ext2_specop_entries[];
  76 extern struct vnodeopv_entry_desc ext2_fifoop_entries[];
  77
  78 static int ext2_fhtovp (struct mount *, struct fid *, struct vnode **);
  79 static int ext2_flushfiles (struct mount *mp, int flags, struct thread *td);
  80 static int ext2_mount (struct mount *, char *, caddr_t, struct thread *);
  81 static int ext2_mountfs (struct vnode *, struct mount *, struct thread *);
  82 static int ext2_reload (struct mount *mountp, struct ucred *cred,
  83                         struct thread *p);
  84 static int ext2_sbupdate (struct ufsmount *, int);
  85 static int ext2_statfs (struct mount *, struct statfs *, struct thread *);
  86 static int ext2_sync (struct mount *, int, struct thread *);
  87 static int ext2_unmount (struct mount *, int, struct thread *);
  88 static int ext2_vget (struct mount *, ino_t, struct vnode **);
  89 static int ext2_vptofh (struct vnode *, struct fid *);
  90
  91 static MALLOC_DEFINE(M_EXT2NODE, "EXT2 node", "EXT2 vnode private part");
  92
  93 static struct vfsops ext2fs_vfsops = {
  94         ext2_mount,
  95         ufs_start,              /* empty function */
  96         ext2_unmount,
  97         ufs_root,               /* root inode via vget */
  98         ufs_quotactl,           /* does operations associated with quotas */
  99         ext2_statfs,
 100         ext2_sync,
 101         ext2_vget,
 102         ext2_fhtovp,
 103         ufs_check_export,
 104         ext2_vptofh,
 105         ext2_init,
 106         vfs_stduninit,
 107         vfs_stdextattrctl,
 108 };
 109
 110 VFS_SET(ext2fs_vfsops, ext2fs, 0);
 111 #define bsd_malloc malloc
 112 #define bsd_free free
 113
 114 static int ext2fs_inode_hash_lock;
 115
 116 static int      ext2_check_sb_compat (struct ext2_super_block *es,
 117                                           dev_t dev, int ronly);
 118 static int      compute_sb_data (struct vnode * devvp,
 119                                      struct ext2_super_block * es,
 120                                      struct ext2_sb_info * fs);
 121
 122 /*
 123  * VFS Operations.
 124  *
 125  * mount system call
 126  */
 127 static int
 128 ext2_mount(struct mount *mp, char *path,
 129            caddr_t data,        /* this is actually a (struct ufs_args *) */
 130            struct thread *td)
 131 {
 132         struct vnode *devvp;
 133         struct ufs_args args;
 134         struct ufsmount *ump = 0;
 135         struct ext2_sb_info *fs;
 136         size_t size;
 137         int error, flags;
 138         mode_t accessmode;
 139         struct ucred *cred;
 140         struct nlookupdata nd;
 141
 142         if ((error = copyin(data, (caddr_t)&args, sizeof (struct ufs_args))) != 0)
 143                 return (error);
 144
 145         cred = td->td_proc->p_ucred;
 146         /*
 147          * If updating, check whether changing from read-only to
 148          * read/write; if there is no device name, that's all we do.
 149          */
 150         if (mp->mnt_flag & MNT_UPDATE) {
 151                 ump = VFSTOUFS(mp);
 152                 fs = ump->um_e2fs;
 153                 error = 0;
 154                 if (fs->s_rd_only == 0 && (mp->mnt_flag & MNT_RDONLY)) {
 155                         flags = WRITECLOSE;
 156                         if (mp->mnt_flag & MNT_FORCE)
 157                                 flags |= FORCECLOSE;
 158                         if (vfs_busy(mp, LK_NOWAIT, td))
 159                                 return (EBUSY);
 160                         error = ext2_flushfiles(mp, flags, td);
 161                         vfs_unbusy(mp, td);
 162                         if (!error && fs->s_wasvalid) {
 163                                 fs->s_es->s_state |= EXT2_VALID_FS;
 164                                 ext2_sbupdate(ump, MNT_WAIT);
 165                         }
 166                         fs->s_rd_only = 1;
 167                 }
 168                 if (!error && (mp->mnt_flag & MNT_RELOAD))
 169                         error = ext2_reload(mp, proc0.p_ucred, td);
 170                 if (error)
 171                         return (error);
 172                 devvp = ump->um_devvp;
 173                 if (ext2_check_sb_compat(fs->s_es, devvp->v_rdev,
 174                     (mp->mnt_kern_flag & MNTK_WANTRDWR) == 0) != 0)
 175                         return (EPERM);
 176                 if (fs->s_rd_only && (mp->mnt_kern_flag & MNTK_WANTRDWR)) {
 177                         /*
 178                          * If upgrade to read-write by non-root, then verify
 179                          * that user has necessary permissions on the device.
 180                          */
 181                         if (cred->cr_uid != 0) {
 182                                 vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY, td);
 183                                 if ((error = VOP_ACCESS(devvp, VREAD | VWRITE,
 184                                     cred, td)) != 0) {
 185                                         VOP_UNLOCK(devvp, 0, td);
 186                                         return (error);
 187                                 }
 188                                 VOP_UNLOCK(devvp, 0, td);
 189                         }
 190
 191                         if ((fs->s_es->s_state & EXT2_VALID_FS) == 0 ||
 192                             (fs->s_es->s_state & EXT2_ERROR_FS)) {
 193                                 if (mp->mnt_flag & MNT_FORCE) {
 194                                         printf(
 195 "WARNING: %s was not properly dismounted\n",
 196                                             fs->fs_fsmnt);
 197                                 } else {
 198                                         printf(
 199 "WARNING: R/W mount of %s denied.  Filesystem is not clean - run fsck\n",
 200                                             fs->fs_fsmnt);
 201                                         return (EPERM);
 202                                 }
 203                         }
 204                         fs->s_es->s_state &= ~EXT2_VALID_FS;
 205                         ext2_sbupdate(ump, MNT_WAIT);
 206                         fs->s_rd_only = 0;
 207                 }
 208                 if (args.fspec == 0) {
 209                         /*
 210                          * Process export requests.
 211                          */
 212                         return (vfs_export(mp, &ump->um_export, &args.export));
 213                 }
 214         }
 215         /*
 216          * Not an update, or updating the name: look up the name
 217          * and verify that it refers to a sensible block device.
 218          */
 219         devvp = NULL;
 220         error = nlookup_init(&nd, args.fspec, UIO_USERSPACE, NLC_FOLLOW);
 221         if (error == 0)
 222                 error = nlookup(&nd);
 223         if (error == 0)
 224                 error = cache_vref(nd.nl_ncp, nd.nl_cred, &devvp);
 225         nlookup_done(&nd);
 226         if (error)
 227                 return (error);
 228
 229         if (!vn_isdisk(devvp, &error)) {
 230                 vrele(devvp);
 231                 return (error);
 232         }
 233
 234         /*
 235          * If mount by non-root, then verify that user has necessary
 236          * permissions on the device.
 237          */
 238         if (cred->cr_uid != 0) {
 239                 accessmode = VREAD;
 240                 if ((mp->mnt_flag & MNT_RDONLY) == 0)
 241                         accessmode |= VWRITE;
 242                 vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY, td);
 243                 if ((error = VOP_ACCESS(devvp, accessmode, cred, td)) != 0) {
 244                         vput(devvp);
 245                         return (error);
 246                 }
 247                 VOP_UNLOCK(devvp, 0, td);
 248         }
 249
 250         if ((mp->mnt_flag & MNT_UPDATE) == 0) {
 251                 error = ext2_mountfs(devvp, mp, td);
 252         } else {
 253                 if (devvp != ump->um_devvp)
 254                         error = EINVAL; /* needs translation */
 255                 else
 256                         vrele(devvp);
 257         }
 258         if (error) {
 259                 vrele(devvp);
 260                 return (error);
 261         }
 262         ump = VFSTOUFS(mp);
 263         fs = ump->um_e2fs;
 264         copyinstr(path, fs->fs_fsmnt, sizeof(fs->fs_fsmnt) - 1, &size);
 265         bzero(fs->fs_fsmnt + size, sizeof(fs->fs_fsmnt) - size);
 266         copyinstr(args.fspec, mp->mnt_stat.f_mntfromname, MNAMELEN - 1, &size);
 267         bzero(mp->mnt_stat.f_mntfromname + size, MNAMELEN - size);
 268         ext2_statfs(mp, &mp->mnt_stat, td);
 269         return (0);
 270 }
 271
 272 /*
 273  * checks that the data in the descriptor blocks make sense
 274  * this is taken from ext2/super.c
 275  */
 276 static int ext2_check_descriptors(struct ext2_sb_info *sb)
 277 {
 278         int i;
 279         int desc_block = 0;
 280         unsigned long block = sb->s_es->s_first_data_block;
 281         struct ext2_group_desc * gdp = NULL;
 282
 283         /* ext2_debug ("Checking group descriptors"); */
 284
 285         for (i = 0; i < sb->s_groups_count; i++)
 286         {
 287                 /* examine next descriptor block */
 288                 if ((i % EXT2_DESC_PER_BLOCK(sb)) == 0)
 289                         gdp = (struct ext2_group_desc *)
 290                                 sb->s_group_desc[desc_block++]->b_data;
 291                 if (gdp->bg_block_bitmap < block ||
 292                     gdp->bg_block_bitmap >= block + EXT2_BLOCKS_PER_GROUP(sb))
 293                 {
 294                         printf ("ext2_check_descriptors: "
 295                                     "Block bitmap for group %d"
 296                                     " not in group (block %lu)!\n",
 297                                     i, (unsigned long) gdp->bg_block_bitmap);
 298                         return 0;
 299                 }
 300                 if (gdp->bg_inode_bitmap < block ||
 301                     gdp->bg_inode_bitmap >= block + EXT2_BLOCKS_PER_GROUP(sb))
 302                 {
 303                         printf ("ext2_check_descriptors: "
 304                                     "Inode bitmap for group %d"
 305                                     " not in group (block %lu)!\n",
 306                                     i, (unsigned long) gdp->bg_inode_bitmap);
 307                         return 0;
 308                 }
 309                 if (gdp->bg_inode_table < block ||
 310                     gdp->bg_inode_table + sb->s_itb_per_group >=
 311                     block + EXT2_BLOCKS_PER_GROUP(sb))
 312                 {
 313                         printf ("ext2_check_descriptors: "
 314                                     "Inode table for group %d"
 315                                     " not in group (block %lu)!\n",
 316                                     i, (unsigned long) gdp->bg_inode_table);
 317                         return 0;
 318                 }
 319                 block += EXT2_BLOCKS_PER_GROUP(sb);
 320                 gdp++;
 321         }
 322         return 1;
 323 }
 324
 325 static int
 326 ext2_check_sb_compat(struct ext2_super_block *es, dev_t dev, int ronly)
 327 {
 328         if (es->s_magic != EXT2_SUPER_MAGIC) {
 329                 printf("ext2fs: %s: wrong magic number %#x (expected %#x)\n",
 330                     devtoname(dev), es->s_magic, EXT2_SUPER_MAGIC);
 331                 return (1);
 332         }
 333         if (es->s_rev_level > EXT2_GOOD_OLD_REV) {
 334                 if (es->s_feature_incompat & ~EXT2_FEATURE_INCOMPAT_SUPP) {
 335                         printf(
 336 "WARNING: mount of %s denied due to unsupported optional features\n",
 337                             devtoname(dev));
 338                         return (1);
 339                 }
 340                 if (!ronly &&
 341                     (es->s_feature_ro_compat & ~EXT2_FEATURE_RO_COMPAT_SUPP)) {
 342                         printf(
 343 "WARNING: R/W mount of %s denied due to unsupported optional features\n",
 344                             devtoname(dev));
 345                         return (1);
 346                 }
 347         }
 348         return (0);
 349 }
 350
 351 /*
 352  * this computes the fields of the  ext2_sb_info structure from the
 353  * data in the ext2_super_block structure read in
 354  */
 355 static int
 356 compute_sb_data(struct vnode *devvp, struct ext2_super_block *es,
 357                 struct ext2_sb_info *fs)
 358 {
 359     int db_count, error;
 360     int i, j;
 361     int logic_sb_block = 1;     /* XXX for now */
 362
 363 #if 1
 364 #define V(v)
 365 #else
 366 #define V(v)  printf(#v"= %d\n", fs->v);
 367 #endif
 368
 369     fs->s_blocksize = EXT2_MIN_BLOCK_SIZE << es->s_log_block_size;
 370     V(s_blocksize)
 371     fs->s_bshift = EXT2_MIN_BLOCK_LOG_SIZE + es->s_log_block_size;
 372     V(s_bshift)
 373     fs->s_fsbtodb = es->s_log_block_size + 1;
 374     V(s_fsbtodb)
 375     fs->s_qbmask = fs->s_blocksize - 1;
 376     V(s_bmask)
 377     fs->s_blocksize_bits = EXT2_BLOCK_SIZE_BITS(es);
 378     V(s_blocksize_bits)
 379     fs->s_frag_size = EXT2_MIN_FRAG_SIZE << es->s_log_frag_size;
 380     V(s_frag_size)
 381     if (fs->s_frag_size)
 382         fs->s_frags_per_block = fs->s_blocksize / fs->s_frag_size;
 383     V(s_frags_per_block)
 384     fs->s_blocks_per_group = es->s_blocks_per_group;
 385     V(s_blocks_per_group)
 386     fs->s_frags_per_group = es->s_frags_per_group;
 387     V(s_frags_per_group)
 388     fs->s_inodes_per_group = es->s_inodes_per_group;
 389     V(s_inodes_per_group)
 390     fs->s_inodes_per_block = fs->s_blocksize / EXT2_INODE_SIZE;
 391     V(s_inodes_per_block)
 392     fs->s_itb_per_group = fs->s_inodes_per_group /fs->s_inodes_per_block;
 393     V(s_itb_per_group)
 394     fs->s_desc_per_block = fs->s_blocksize / sizeof (struct ext2_group_desc);
 395     V(s_desc_per_block)
 396     /* s_resuid / s_resgid ? */
 397     fs->s_groups_count = (es->s_blocks_count -
 398                           es->s_first_data_block +
 399                           EXT2_BLOCKS_PER_GROUP(fs) - 1) /
 400                          EXT2_BLOCKS_PER_GROUP(fs);
 401     V(s_groups_count)
 402     db_count = (fs->s_groups_count + EXT2_DESC_PER_BLOCK(fs) - 1) /
 403         EXT2_DESC_PER_BLOCK(fs);
 404     fs->s_db_per_group = db_count;
 405     V(s_db_per_group)
 406
 407     fs->s_group_desc = bsd_malloc(db_count * sizeof (struct buf *),
 408                 M_UFSMNT, M_WAITOK);
 409
 410     /* adjust logic_sb_block */
 411     if(fs->s_blocksize > SBSIZE)
 412         /* Godmar thinks: if the blocksize is greater than 1024, then
 413            the superblock is logically part of block zero.
 414          */
 415         logic_sb_block = 0;
 416
 417     for (i = 0; i < db_count; i++) {
 418         error = bread(devvp , fsbtodb(fs, logic_sb_block + i + 1),
 419                 fs->s_blocksize, &fs->s_group_desc[i]);
 420         if(error) {
 421             for (j = 0; j < i; j++)
 422                 brelse(fs->s_group_desc[j]);
 423             bsd_free(fs->s_group_desc, M_UFSMNT);
 424             printf("EXT2-fs: unable to read group descriptors (%d)\n", error);
 425             return EIO;
 426         }
 427         /* Set the B_LOCKED flag on the buffer, then brelse() it */
 428         LCK_BUF(fs->s_group_desc[i])
 429     }
 430     if(!ext2_check_descriptors(fs)) {
 431             for (j = 0; j < db_count; j++)
 432                     ULCK_BUF(fs->s_group_desc[j])
 433             bsd_free(fs->s_group_desc, M_UFSMNT);
 434             printf("EXT2-fs: (ext2_check_descriptors failure) "
 435                    "unable to read group descriptors\n");
 436             return EIO;
 437     }
 438
 439     for (i = 0; i < EXT2_MAX_GROUP_LOADED; i++) {
 440             fs->s_inode_bitmap_number[i] = 0;
 441             fs->s_inode_bitmap[i] = NULL;
 442             fs->s_block_bitmap_number[i] = 0;
 443             fs->s_block_bitmap[i] = NULL;
 444     }
 445     fs->s_loaded_inode_bitmaps = 0;
 446     fs->s_loaded_block_bitmaps = 0;
 447     return 0;
 448 }
 449
 450 /*
 451  * Reload all incore data for a filesystem (used after running fsck on
 452  * the root filesystem and finding things to fix). The filesystem must
 453  * be mounted read-only.
 454  *
 455  * Things to do to update the mount:
 456  *      1) invalidate all cached meta-data.
 457  *      2) re-read superblock from disk.
 458  *      3) re-read summary information from disk.
 459  *      4) invalidate all inactive vnodes.
 460  *      5) invalidate all cached file data.
 461  *      6) re-read inode data for all active vnodes.
 462  */
 463 static int ext2_reload_scan1(struct mount *mp, struct vnode *vp, void *rescan);
 464 static int ext2_reload_scan2(struct mount *mp, struct vnode *vp, void *rescan);
 465
 466 struct scaninfo {
 467         int rescan;
 468         int allerror;
 469         int waitfor;
 470         thread_t td;
 471         struct vnode *devvp;
 472         struct ext2_sb_info *fs;
 473 };
 474
 475 static int
 476 ext2_reload(struct mount *mountp, struct ucred *cred, struct thread *td)
 477 {
 478         struct vnode *devvp;
 479         struct buf *bp;
 480         struct ext2_super_block * es;
 481         struct ext2_sb_info *fs;
 482         int error;
 483         struct scaninfo scaninfo;
 484
 485         if ((mountp->mnt_flag & MNT_RDONLY) == 0)
 486                 return (EINVAL);
 487         /*
 488          * Step 1: invalidate all cached meta-data.
 489          */
 490         devvp = VFSTOUFS(mountp)->um_devvp;
 491         if (vinvalbuf(devvp, 0, td, 0, 0))
 492                 panic("ext2_reload: dirty1");
 493         /*
 494          * Step 2: re-read superblock from disk.
 495          * constants have been adjusted for ext2
 496          */
 497         if ((error = bread(devvp, SBLOCK, SBSIZE, &bp)) != 0)
 498                 return (error);
 499         es = (struct ext2_super_block *)bp->b_data;
 500         if (ext2_check_sb_compat(es, devvp->v_rdev, 0) != 0) {
 501                 brelse(bp);
 502                 return (EIO);           /* XXX needs translation */
 503         }
 504         fs = VFSTOUFS(mountp)->um_e2fs;
 505         bcopy(bp->b_data, fs->s_es, sizeof(struct ext2_super_block));
 506
 507         if((error = compute_sb_data(devvp, es, fs)) != 0) {
 508                 brelse(bp);
 509                 return error;
 510         }
 511 #ifdef UNKLAR
 512         if (fs->fs_sbsize < SBSIZE)
 513                 bp->b_flags |= B_INVAL;
 514 #endif
 515         brelse(bp);
 516
 517         scaninfo.rescan = 1;
 518         scaninfo.td = td;
 519         scaninfo.devvp = devvp;
 520         scaninfo.fs = fs;
 521         while (error == 0 && scaninfo.rescan) {
 522             scaninfo.rescan = 0;
 523             error = vmntvnodescan(mountp, VMSC_GETVX, ext2_reload_scan1,
 524                                 ext2_reload_scan2, &scaninfo);
 525         }
 526         return(error);
 527 }
 528
 529 static int
 530 ext2_reload_scan1(struct mount *mp, struct vnode *vp, void *data)
 531 {
 532         /*struct scaninfo *info = data;*/
 533
 534         return(0);
 535 }
 536
 537 static int
 538 ext2_reload_scan2(struct mount *mp, struct vnode *vp, void *data)
 539 {
 540         struct scaninfo *info = data;
 541         struct inode *ip;
 542         struct buf *bp;
 543         int error;
 544
 545         /*
 546          * Try to recycle
 547          */
 548         if (vrecycle(vp, curthread))
 549                 return(0);
 550
 551         /*
 552          * Step 5: invalidate all cached file data.
 553          */
 554         if (vinvalbuf(vp, 0, info->td, 0, 0))
 555                 panic("ext2_reload: dirty2");
 556         /*
 557          * Step 6: re-read inode data for all active vnodes.
 558          */
 559         ip = VTOI(vp);
 560         error = bread(info->devvp, fsbtodb(info->fs, ino_to_fsba(info->fs, ip->i_number)),
 561                     (int)info->fs->s_blocksize, &bp);
 562         if (error)
 563                 return (error);
 564         ext2_ei2di((struct ext2_inode *) ((char *)bp->b_data +
 565             EXT2_INODE_SIZE * ino_to_fsbo(info->fs, ip->i_number)),
 566             &ip->i_din);
 567         brelse(bp);
 568         return(0);
 569 }
 570
 571 /*
 572  * Common code for mount and mountroot
 573  */
 574 static int
 575 ext2_mountfs(struct vnode *devvp, struct mount *mp, struct thread *td)
 576 {
 577         struct ufsmount *ump;
 578         struct buf *bp;
 579         struct ext2_sb_info *fs;
 580         struct ext2_super_block * es;
 581         dev_t dev;
 582         struct partinfo dpart;
 583         int havepart = 0;
 584         int error, i, size;
 585         int ronly;
 586
 587         /*
 588          * Disallow multiple mounts of the same device.
 589          * Disallow mounting of a device that is currently in use
 590          * (except for root, which might share swap device for miniroot).
 591          * Flush out any old buffers remaining from a previous use.
 592          */
 593         if ((error = vfs_mountedon(devvp)) != 0)
 594                 return (error);
 595         if (count_udev(devvp->v_udev) > 0)
 596                 return (EBUSY);
 597         if ((error = vinvalbuf(devvp, V_SAVE, td, 0, 0)) != 0)
 598                 return (error);
 599 #ifdef READONLY
 600 /* turn on this to force it to be read-only */
 601         mp->mnt_flag |= MNT_RDONLY;
 602 #endif
 603
 604         ronly = (mp->mnt_flag & MNT_RDONLY) != 0;
 605         vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY, td);
 606         error = VOP_OPEN(devvp, ronly ? FREAD : FREAD|FWRITE, FSCRED, NULL, td);
 607         VOP_UNLOCK(devvp, 0, td);
 608         if (error)
 609                 return (error);
 610         dev = devvp->v_rdev;
 611         if (dev->si_iosize_max != 0)
 612                 mp->mnt_iosize_max = dev->si_iosize_max;
 613         if (mp->mnt_iosize_max > MAXPHYS)
 614                 mp->mnt_iosize_max = MAXPHYS;
 615         if (VOP_IOCTL(devvp, DIOCGPART, (caddr_t)&dpart, FREAD, NOCRED, td) != 0)
 616                 size = DEV_BSIZE;
 617         else {
 618                 havepart = 1;
 619                 size = dpart.disklab->d_secsize;
 620         }
 621
 622         bp = NULL;
 623         ump = NULL;
 624         if ((error = bread(devvp, SBLOCK, SBSIZE, &bp)) != 0)
 625                 goto out;
 626         es = (struct ext2_super_block *)bp->b_data;
 627         if (ext2_check_sb_compat(es, dev, ronly) != 0) {
 628                 error = EINVAL;         /* XXX needs translation */
 629                 goto out;
 630         }
 631         if ((es->s_state & EXT2_VALID_FS) == 0 ||
 632             (es->s_state & EXT2_ERROR_FS)) {
 633                 if (ronly || (mp->mnt_flag & MNT_FORCE)) {
 634                         printf(
 635 "WARNING: Filesystem was not properly dismounted\n");
 636                 } else {
 637                         printf(
 638 "WARNING: R/W mount denied.  Filesystem is not clean - run fsck\n");
 639                         error = EPERM;
 640                         goto out;
 641                 }
 642         }
 643         ump = bsd_malloc(sizeof *ump, M_UFSMNT, M_WAITOK);
 644         bzero((caddr_t)ump, sizeof *ump);
 645         ump->um_malloctype = M_EXT2NODE;
 646         ump->um_blkatoff = ext2_blkatoff;
 647         ump->um_truncate = ext2_truncate;
 648         ump->um_update = ext2_update;
 649         ump->um_valloc = ext2_valloc;
 650         ump->um_vfree = ext2_vfree;
 651         /* I don't know whether this is the right strategy. Note that
 652            we dynamically allocate both a ext2_sb_info and a ext2_super_block
 653            while Linux keeps the super block in a locked buffer
 654          */
 655         ump->um_e2fs = bsd_malloc(sizeof(struct ext2_sb_info),
 656                 M_UFSMNT, M_WAITOK);
 657         ump->um_e2fs->s_es = bsd_malloc(sizeof(struct ext2_super_block),
 658                 M_UFSMNT, M_WAITOK);
 659         bcopy(es, ump->um_e2fs->s_es, (u_int)sizeof(struct ext2_super_block));
 660         if ((error = compute_sb_data(devvp, ump->um_e2fs->s_es, ump->um_e2fs)))
 661                 goto out;
 662         /*
 663          * We don't free the group descriptors allocated by compute_sb_data()
 664          * until ext2_unmount().  This is OK since the mount will succeed.
 665          */
 666         brelse(bp);
 667         bp = NULL;
 668         fs = ump->um_e2fs;
 669         fs->s_rd_only = ronly;  /* ronly is set according to mnt_flags */
 670         /* if the fs is not mounted read-only, make sure the super block is
 671            always written back on a sync()
 672          */
 673         fs->s_wasvalid = fs->s_es->s_state & EXT2_VALID_FS ? 1 : 0;
 674         if (ronly == 0) {
 675                 fs->s_dirt = 1;         /* mark it modified */
 676                 fs->s_es->s_state &= ~EXT2_VALID_FS;    /* set fs invalid */
 677         }
 678         mp->mnt_data = (qaddr_t)ump;
 679         mp->mnt_stat.f_fsid.val[0] = dev2udev(dev);
 680         mp->mnt_stat.f_fsid.val[1] = mp->mnt_vfc->vfc_typenum;
 681         mp->mnt_maxsymlinklen = EXT2_MAXSYMLINKLEN;
 682         mp->mnt_flag |= MNT_LOCAL;
 683         ump->um_mountp = mp;
 684         ump->um_dev = dev;
 685         ump->um_devvp = devvp;
 686         /* setting those two parameters allows us to use
 687            ufs_bmap w/o changse !
 688         */
 689         ump->um_nindir = EXT2_ADDR_PER_BLOCK(fs);
 690         ump->um_bptrtodb = fs->s_es->s_log_block_size + 1;
 691         ump->um_seqinc = EXT2_FRAGS_PER_BLOCK(fs);
 692         for (i = 0; i < MAXQUOTAS; i++)
 693                 ump->um_quotas[i] = NULLVP;
 694         dev->si_mountpoint = mp;
 695
 696         vfs_add_vnodeops(mp, &mp->mnt_vn_norm_ops, ext2_vnodeop_entries);
 697         vfs_add_vnodeops(mp, &mp->mnt_vn_spec_ops, ext2_specop_entries);
 698         vfs_add_vnodeops(mp, &mp->mnt_vn_fifo_ops, ext2_fifoop_entries);
 699
 700         if (ronly == 0)
 701                 ext2_sbupdate(ump, MNT_WAIT);
 702         return (0);
 703 out:
 704         if (bp)
 705                 brelse(bp);
 706         (void)VOP_CLOSE(devvp, ronly ? FREAD : FREAD|FWRITE, td);
 707         if (ump) {
 708                 bsd_free(ump->um_e2fs->s_es, M_UFSMNT);
 709                 bsd_free(ump->um_e2fs, M_UFSMNT);
 710                 bsd_free(ump, M_UFSMNT);
 711                 mp->mnt_data = (qaddr_t)0;
 712         }
 713         return (error);
 714 }
 715
 716 /*
 717  * unmount system call
 718  */
 719 static int
 720 ext2_unmount(struct mount *mp, int mntflags, struct thread *td)
 721 {
 722         struct ufsmount *ump;
 723         struct ext2_sb_info *fs;
 724         int error, flags, ronly, i;
 725
 726         flags = 0;
 727         if (mntflags & MNT_FORCE) {
 728                 if (mp->mnt_flag & MNT_ROOTFS)
 729                         return (EINVAL);
 730                 flags |= FORCECLOSE;
 731         }
 732         if ((error = ext2_flushfiles(mp, flags, td)) != 0)
 733                 return (error);
 734         ump = VFSTOUFS(mp);
 735         fs = ump->um_e2fs;
 736         ronly = fs->s_rd_only;
 737         if (ronly == 0) {
 738                 if (fs->s_wasvalid)
 739                         fs->s_es->s_state |= EXT2_VALID_FS;
 740                 ext2_sbupdate(ump, MNT_WAIT);
 741         }
 742
 743         /* release buffers containing group descriptors */
 744         for(i = 0; i < fs->s_db_per_group; i++)
 745                 ULCK_BUF(fs->s_group_desc[i])
 746         bsd_free(fs->s_group_desc, M_UFSMNT);
 747
 748         /* release cached inode/block bitmaps */
 749         for (i = 0; i < EXT2_MAX_GROUP_LOADED; i++)
 750                 if (fs->s_inode_bitmap[i])
 751                         ULCK_BUF(fs->s_inode_bitmap[i])
 752
 753         for (i = 0; i < EXT2_MAX_GROUP_LOADED; i++)
 754                 if (fs->s_block_bitmap[i])
 755                         ULCK_BUF(fs->s_block_bitmap[i])
 756
 757         ump->um_devvp->v_rdev->si_mountpoint = NULL;
 758         error = VOP_CLOSE(ump->um_devvp, ronly ? FREAD : FREAD|FWRITE, td);
 759         vrele(ump->um_devvp);
 760         bsd_free(fs->s_es, M_UFSMNT);
 761         bsd_free(fs, M_UFSMNT);
 762         bsd_free(ump, M_UFSMNT);
 763         mp->mnt_data = (qaddr_t)0;
 764         mp->mnt_flag &= ~MNT_LOCAL;
 765         return (error);
 766 }
 767
 768 /*
 769  * Flush out all the files in a filesystem.
 770  */
 771 static int
 772 ext2_flushfiles(struct mount *mp, int flags, struct thread *td)
 773 {
 774         struct ufsmount *ump;
 775         int error;
 776 #if QUOTA
 777         int i;
 778 #endif
 779
 780         ump = VFSTOUFS(mp);
 781 #if QUOTA
 782         if (mp->mnt_flag & MNT_QUOTA) {
 783                 if ((error = vflush(mp, 0, SKIPSYSTEM|flags)) != 0)
 784                         return (error);
 785                 for (i = 0; i < MAXQUOTAS; i++) {
 786                         if (ump->um_quotas[i] == NULLVP)
 787                                 continue;
 788                         quotaoff(td, mp, i);
 789                 }
 790                 /*
 791                  * Here we fall through to vflush again to ensure
 792                  * that we have gotten rid of all the system vnodes.
 793                  */
 794         }
 795 #endif
 796         error = vflush(mp, 0, flags);
 797         return (error);
 798 }
 799
 800 /*
 801  * Get file system statistics.
 802  * taken from ext2/super.c ext2_statfs
 803  */
 804 static int
 805 ext2_statfs(struct mount *mp, struct statfs *sbp, struct thread *td)
 806 {
 807         unsigned long overhead;
 808         struct ufsmount *ump;
 809         struct ext2_sb_info *fs;
 810         struct ext2_super_block *es;
 811         int i, nsb;
 812
 813         ump = VFSTOUFS(mp);
 814         fs = ump->um_e2fs;
 815         es = fs->s_es;
 816
 817         if (es->s_magic != EXT2_SUPER_MAGIC)
 818                 panic("ext2_statfs - magic number spoiled");
 819
 820         /*
 821          * Compute the overhead (FS structures)
 822          */
 823         if (es->s_feature_ro_compat & EXT2_FEATURE_RO_COMPAT_SPARSE_SUPER) {
 824                 nsb = 0;
 825                 for (i = 0 ; i < fs->s_groups_count; i++)
 826                         if (ext2_group_sparse(i))
 827                                 nsb++;
 828         } else
 829                 nsb = fs->s_groups_count;
 830         overhead = es->s_first_data_block +
 831             /* Superblocks and block group descriptors: */
 832             nsb * (1 + fs->s_db_per_group) +
 833             /* Inode bitmap, block bitmap, and inode table: */
 834             fs->s_groups_count * (1 + 1 + fs->s_itb_per_group);
 835
 836         sbp->f_bsize = EXT2_FRAG_SIZE(fs);
 837         sbp->f_iosize = EXT2_BLOCK_SIZE(fs);
 838         sbp->f_blocks = es->s_blocks_count - overhead;
 839         sbp->f_bfree = es->s_free_blocks_count;
 840         sbp->f_bavail = sbp->f_bfree - es->s_r_blocks_count;
 841         sbp->f_files = es->s_inodes_count;
 842         sbp->f_ffree = es->s_free_inodes_count;
 843         if (sbp != &mp->mnt_stat) {
 844                 sbp->f_type = mp->mnt_vfc->vfc_typenum;
 845                 bcopy((caddr_t)mp->mnt_stat.f_mntfromname,
 846                         (caddr_t)&sbp->f_mntfromname[0], MNAMELEN);
 847         }
 848         return (0);
 849 }
 850
 851 /*
 852  * Go through the disk queues to initiate sandbagged IO;
 853  * go through the inodes to write those that have been modified;
 854  * initiate the writing of the super block if it has been modified.
 855  *
 856  * Note: we are always called with the filesystem marked `MPBUSY'.
 857  */
 858
 859 static int ext2_sync_scan(struct mount *mp, struct vnode *vp, void *data);
 860
 861 static int
 862 ext2_sync(struct mount *mp, int waitfor, struct thread *td)
 863 {
 864         struct ufsmount *ump = VFSTOUFS(mp);
 865         struct ext2_sb_info *fs;
 866         struct scaninfo scaninfo;
 867         int error;
 868
 869         fs = ump->um_e2fs;
 870         if (fs->s_dirt != 0 && fs->s_rd_only != 0) {            /* XXX */
 871                 printf("fs = %s\n", fs->fs_fsmnt);
 872                 panic("ext2_sync: rofs mod");
 873         }
 874
 875         /*
 876          * Write back each (modified) inode.
 877          */
 878         scaninfo.allerror = 0;
 879         scaninfo.rescan = 1;
 880         scaninfo.waitfor = waitfor;
 881         scaninfo.td = td;
 882         while (scaninfo.rescan) {
 883                 scaninfo.rescan = 0;
 884                 vmntvnodescan(mp, VMSC_GETVP|VMSC_NOWAIT,
 885                                 NULL, ext2_sync_scan, &scaninfo);
 886         }
 887
 888         /*
 889          * Force stale file system control information to be flushed.
 890          */
 891         if (waitfor != MNT_LAZY) {
 892                 vn_lock(ump->um_devvp, LK_EXCLUSIVE | LK_RETRY, td);
 893                 if ((error = VOP_FSYNC(ump->um_devvp, waitfor, td)) != 0)
 894                         scaninfo.allerror = error;
 895                 VOP_UNLOCK(ump->um_devvp, 0, td);
 896         }
 897 #if QUOTA
 898         qsync(mp);
 899 #endif
 900         /*
 901          * Write back modified superblock.
 902          */
 903         if (fs->s_dirt != 0) {
 904                 fs->s_dirt = 0;
 905                 fs->s_es->s_wtime = time_second;
 906                 if ((error = ext2_sbupdate(ump, waitfor)) != 0)
 907                         scaninfo.allerror = error;
 908         }
 909         return (scaninfo.allerror);
 910 }
 911
 912 static int
 913 ext2_sync_scan(struct mount *mp, struct vnode *vp, void *data)
 914 {
 915         struct scaninfo *info = data;
 916         struct inode *ip;
 917         int error;
 918
 919         ip = VTOI(vp);
 920         if (vp->v_type == VNON ||
 921             ((ip->i_flag &
 922             (IN_ACCESS | IN_CHANGE | IN_MODIFIED | IN_UPDATE)) == 0 &&
 923             (RB_EMPTY(&vp->v_rbdirty_tree) || info->waitfor == MNT_LAZY))) {
 924                 return(0);
 925         }
 926         if ((error = VOP_FSYNC(vp, info->waitfor, info->td)) != 0)
 927                 info->allerror = error;
 928         return(0);
 929 }
 930
 931 /*
 932  * Look up a EXT2FS dinode number to find its incore vnode, otherwise read it
 933  * in from disk.  If it is in core, wait for the lock bit to clear, then
 934  * return the inode locked.  Detection and handling of mount points must be
 935  * done by the calling routine.
 936  */
 937 static int
 938 ext2_vget(struct mount *mp, ino_t ino, struct vnode **vpp)
 939 {
 940         struct ext2_sb_info *fs;
 941         struct inode *ip;
 942         struct ufsmount *ump;
 943         struct buf *bp;
 944         struct vnode *vp;
 945         dev_t dev;
 946         int i, error;
 947         int used_blocks;
 948
 949         ump = VFSTOUFS(mp);
 950         dev = ump->um_dev;
 951 restart:
 952         if ((*vpp = ufs_ihashget(dev, ino)) != NULL)
 953                 return (0);
 954
 955         /*
 956          * Lock out the creation of new entries in the FFS hash table in
 957          * case getnewvnode() or MALLOC() blocks, otherwise a duplicate
 958          * may occur!
 959          */
 960         if (ext2fs_inode_hash_lock) {
 961                 while (ext2fs_inode_hash_lock) {
 962                         ext2fs_inode_hash_lock = -1;
 963                         tsleep(&ext2fs_inode_hash_lock, 0, "e2vget", 0);
 964                 }
 965                 goto restart;
 966         }
 967         ext2fs_inode_hash_lock = 1;
 968
 969         /*
 970          * If this MALLOC() is performed after the getnewvnode()
 971          * it might block, leaving a vnode with a NULL v_data to be
 972          * found by ext2_sync() if a sync happens to fire right then,
 973          * which will cause a panic because ext2_sync() blindly
 974          * dereferences vp->v_data (as well it should).
 975          */
 976         MALLOC(ip, struct inode *, sizeof(struct inode), M_EXT2NODE, M_WAITOK);
 977
 978         /* Allocate a new vnode/inode. */
 979         if ((error = getnewvnode(VT_UFS, mp, &vp, 0, LK_CANRECURSE)) != 0) {
 980                 if (ext2fs_inode_hash_lock < 0)
 981                         wakeup(&ext2fs_inode_hash_lock);
 982                 ext2fs_inode_hash_lock = 0;
 983                 *vpp = NULL;
 984                 FREE(ip, M_EXT2NODE);
 985                 return (error);
 986         }
 987         bzero((caddr_t)ip, sizeof(struct inode));
 988         vp->v_data = ip;
 989         ip->i_vnode = vp;
 990         ip->i_e2fs = fs = ump->um_e2fs;
 991         ip->i_dev = dev;
 992         ip->i_number = ino;
 993 #if QUOTA
 994         for (i = 0; i < MAXQUOTAS; i++)
 995                 ip->i_dquot[i] = NODQUOT;
 996 #endif
 997         /*
 998          * Put it onto its hash chain.  Since our vnode is locked, other
 999          * requests for this inode will block if they arrive while we are
1000          * sleeping waiting for old data structures to be purged or for the
1001          * contents of the disk portion of this inode to be read.
1002          */
1003         ufs_ihashins(ip);
1004
1005         if (ext2fs_inode_hash_lock < 0)
1006                 wakeup(&ext2fs_inode_hash_lock);
1007         ext2fs_inode_hash_lock = 0;
1008
1009         /* Read in the disk contents for the inode, copy into the inode. */
1010 #if 0
1011 printf("ext2_vget(%d) dbn= %d ", ino, fsbtodb(fs, ino_to_fsba(fs, ino)));
1012 #endif
1013         if ((error = bread(ump->um_devvp, fsbtodb(fs, ino_to_fsba(fs, ino)),
1014             (int)fs->s_blocksize, &bp)) != 0) {
1015                 /*
1016                  * The inode does not contain anything useful, so it would
1017                  * be misleading to leave it on its hash chain. With mode
1018                  * still zero, it will be unlinked and returned to the free
1019                  * list by vput().
1020                  */
1021                 vx_put(vp);
1022                 brelse(bp);
1023                 *vpp = NULL;
1024                 return (error);
1025         }
1026         /* convert ext2 inode to dinode */
1027         ext2_ei2di((struct ext2_inode *) ((char *)bp->b_data + EXT2_INODE_SIZE *
1028                         ino_to_fsbo(fs, ino)), &ip->i_din);
1029         ip->i_block_group = ino_to_cg(fs, ino);
1030         ip->i_next_alloc_block = 0;
1031         ip->i_next_alloc_goal = 0;
1032         ip->i_prealloc_count = 0;
1033         ip->i_prealloc_block = 0;
1034         /* now we want to make sure that block pointers for unused
1035            blocks are zeroed out - ext2_balloc depends on this
1036            although for regular files and directories only
1037         */
1038         if(S_ISDIR(ip->i_mode) || S_ISREG(ip->i_mode)) {
1039                 used_blocks = (ip->i_size+fs->s_blocksize-1) / fs->s_blocksize;
1040                 for(i = used_blocks; i < EXT2_NDIR_BLOCKS; i++)
1041                         ip->i_db[i] = 0;
1042         }
1043 /*
1044         ext2_print_inode(ip);
1045 */
1046         brelse(bp);
1047
1048         /*
1049          * Initialize the vnode from the inode, check for aliases.
1050          * Note that the underlying vnode may have changed.
1051          */
1052         if ((error = ufs_vinit(mp, &vp)) != 0) {
1053                 vx_put(vp);
1054                 *vpp = NULL;
1055                 return (error);
1056         }
1057         /*
1058          * Finish inode initialization now that aliasing has been resolved.
1059          */
1060         ip->i_devvp = ump->um_devvp;
1061         vref(ip->i_devvp);
1062         /*
1063          * Set up a generation number for this inode if it does not
1064          * already have one. This should only happen on old filesystems.
1065          */
1066         if (ip->i_gen == 0) {
1067                 ip->i_gen = random() / 2 + 1;
1068                 if ((vp->v_mount->mnt_flag & MNT_RDONLY) == 0)
1069                         ip->i_flag |= IN_MODIFIED;
1070         }
1071         /*
1072          * Return the locked and refd vnode.
1073          */
1074         *vpp = vp;
1075         return (0);
1076 }
1077
1078 /*
1079  * File handle to vnode
1080  *
1081  * Have to be really careful about stale file handles:
1082  * - check that the inode number is valid
1083  * - call ext2_vget() to get the locked inode
1084  * - check for an unallocated inode (i_mode == 0)
1085  * - check that the given client host has export rights and return
1086  *   those rights via. exflagsp and credanonp
1087  */
1088 static int
1089 ext2_fhtovp(struct mount *mp, struct fid *fhp, struct vnode **vpp)
1090 {
1091         struct ufid *ufhp;
1092         struct ext2_sb_info *fs;
1093
1094         ufhp = (struct ufid *)fhp;
1095         fs = VFSTOUFS(mp)->um_e2fs;
1096         if (ufhp->ufid_ino < ROOTINO ||
1097             ufhp->ufid_ino > fs->s_groups_count * fs->s_es->s_inodes_per_group)
1098                 return (ESTALE);
1099         return (ufs_fhtovp(mp, ufhp, vpp));
1100 }
1101
1102 /*
1103  * Vnode pointer to File handle
1104  */
1105 /* ARGSUSED */
1106 static int
1107 ext2_vptofh(struct vnode *vp, struct fid *fhp)
1108 {
1109         struct inode *ip;
1110         struct ufid *ufhp;
1111
1112         ip = VTOI(vp);
1113         ufhp = (struct ufid *)fhp;
1114         ufhp->ufid_len = sizeof(struct ufid);
1115         ufhp->ufid_ino = ip->i_number;
1116         ufhp->ufid_gen = ip->i_gen;
1117         return (0);
1118 }
1119
1120 /*
1121  * Write a superblock and associated information back to disk.
1122  */
1123 static int
1124 ext2_sbupdate(struct ufsmount *mp, int waitfor)
1125 {
1126         struct ext2_sb_info *fs = mp->um_e2fs;
1127         struct ext2_super_block *es = fs->s_es;
1128         struct buf *bp;
1129         int error = 0;
1130 /*
1131 printf("\nupdating superblock, waitfor=%s\n", waitfor == MNT_WAIT ? "yes":"no");
1132 */
1133         bp = getblk(mp->um_devvp, SBLOCK, SBSIZE, 0, 0);
1134         bcopy((caddr_t)es, bp->b_data, (u_int)sizeof(struct ext2_super_block));
1135         if (waitfor == MNT_WAIT)
1136                 error = bwrite(bp);
1137         else
1138                 bawrite(bp);
1139
1140         /*
1141          * The buffers for group descriptors, inode bitmaps and block bitmaps
1142          * are not busy at this point and are (hopefully) written by the
1143          * usual sync mechanism. No need to write them here
1144          */
1145
1146         return (error);
1147 }