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