sys/fs/ext2fs/ext2_vnops.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  * SPDX-License-Identifier: BSD-3-Clause
   9  *
  10  * Copyright (c) 1982, 1986, 1989, 1993
  11  *      The Regents of the University of California.  All rights reserved.
  12  * (c) UNIX System Laboratories, Inc.
  13  * All or some portions of this file are derived from material licensed
  14  * to the University of California by American Telephone and Telegraph
  15  * Co. or Unix System Laboratories, Inc. and are reproduced herein with
  16  * the permission of UNIX System Laboratories, Inc.
  17  *
  18  * Redistribution and use in source and binary forms, with or without
  19  * modification, are permitted provided that the following conditions
  20  * are met:
  21  * 1. Redistributions of source code must retain the above copyright
  22  *    notice, this list of conditions and the following disclaimer.
  23  * 2. Redistributions in binary form must reproduce the above copyright
  24  *    notice, this list of conditions and the following disclaimer in the
  25  *    documentation and/or other materials provided with the distribution.
  26  * 3. Neither the name of the University nor the names of its contributors
  27  *    may be used to endorse or promote products derived from this software
  28  *    without specific prior written permission.
  29  *
  30  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  31  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  32  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  33  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  34  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  35  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  36  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  37  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  38  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  39  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  40  * SUCH DAMAGE.
  41  *
  42  *      @(#)ufs_vnops.c 8.7 (Berkeley) 2/3/94
  43  *      @(#)ufs_vnops.c 8.27 (Berkeley) 5/27/95
  44  * $FreeBSD$
  45  */
  46
  47 #include "opt_suiddir.h"
  48
  49 #include <sys/param.h>
  50 #include <sys/systm.h>
  51 #include <sys/kernel.h>
  52 #include <sys/fcntl.h>
  53 #include <sys/filio.h>
  54 #include <sys/stat.h>
  55 #include <sys/bio.h>
  56 #include <sys/buf.h>
  57 #include <sys/endian.h>
  58 #include <sys/priv.h>
  59 #include <sys/rwlock.h>
  60 #include <sys/mount.h>
  61 #include <sys/unistd.h>
  62 #include <sys/time.h>
  63 #include <sys/vnode.h>
  64 #include <sys/namei.h>
  65 #include <sys/lockf.h>
  66 #include <sys/event.h>
  67 #include <sys/conf.h>
  68 #include <sys/file.h>
  69 #include <sys/extattr.h>
  70 #include <sys/vmmeter.h>
  71
  72 #include <vm/vm.h>
  73 #include <vm/vm_param.h>
  74 #include <vm/vm_extern.h>
  75 #include <vm/vm_object.h>
  76 #include <vm/vm_page.h>
  77 #include <vm/vm_pager.h>
  78 #include <vm/vnode_pager.h>
  79
  80 #include "opt_directio.h"
  81
  82 #include <ufs/ufs/dir.h>
  83
  84 #include <fs/ext2fs/fs.h>
  85 #include <fs/ext2fs/inode.h>
  86 #include <fs/ext2fs/ext2_acl.h>
  87 #include <fs/ext2fs/ext2_extern.h>
  88 #include <fs/ext2fs/ext2fs.h>
  89 #include <fs/ext2fs/ext2_dinode.h>
  90 #include <fs/ext2fs/ext2_dir.h>
  91 #include <fs/ext2fs/ext2_mount.h>
  92 #include <fs/ext2fs/ext2_extattr.h>
  93
  94 static int ext2_makeinode(int mode, struct vnode *, struct vnode **, struct componentname *);
  95 static void ext2_itimes_locked(struct vnode *);
  96
  97 static vop_access_t     ext2_access;
  98 static int ext2_chmod(struct vnode *, int, struct ucred *, struct thread *);
  99 static int ext2_chown(struct vnode *, uid_t, gid_t, struct ucred *,
 100     struct thread *);
 101 static vop_close_t      ext2_close;
 102 static vop_create_t     ext2_create;
 103 static vop_fsync_t      ext2_fsync;
 104 static vop_getattr_t    ext2_getattr;
 105 static vop_ioctl_t      ext2_ioctl;
 106 static vop_link_t       ext2_link;
 107 static vop_mkdir_t      ext2_mkdir;
 108 static vop_mknod_t      ext2_mknod;
 109 static vop_open_t       ext2_open;
 110 static vop_pathconf_t   ext2_pathconf;
 111 static vop_print_t      ext2_print;
 112 static vop_read_t       ext2_read;
 113 static vop_readlink_t   ext2_readlink;
 114 static vop_remove_t     ext2_remove;
 115 static vop_rename_t     ext2_rename;
 116 static vop_rmdir_t      ext2_rmdir;
 117 static vop_setattr_t    ext2_setattr;
 118 static vop_strategy_t   ext2_strategy;
 119 static vop_symlink_t    ext2_symlink;
 120 static vop_write_t      ext2_write;
 121 static vop_deleteextattr_t      ext2_deleteextattr;
 122 static vop_getextattr_t ext2_getextattr;
 123 static vop_listextattr_t        ext2_listextattr;
 124 static vop_setextattr_t ext2_setextattr;
 125 static vop_vptofh_t     ext2_vptofh;
 126 static vop_close_t      ext2fifo_close;
 127 static vop_kqfilter_t   ext2fifo_kqfilter;
 128
 129 /* Global vfs data structures for ext2. */
 130 struct vop_vector ext2_vnodeops = {
 131         .vop_default =          &default_vnodeops,
 132         .vop_access =           ext2_access,
 133         .vop_bmap =             ext2_bmap,
 134         .vop_cachedlookup =     ext2_lookup,
 135         .vop_close =            ext2_close,
 136         .vop_create =           ext2_create,
 137         .vop_fsync =            ext2_fsync,
 138         .vop_getpages =         vnode_pager_local_getpages,
 139         .vop_getpages_async =   vnode_pager_local_getpages_async,
 140         .vop_getattr =          ext2_getattr,
 141         .vop_inactive =         ext2_inactive,
 142         .vop_ioctl =            ext2_ioctl,
 143         .vop_link =             ext2_link,
 144         .vop_lookup =           vfs_cache_lookup,
 145         .vop_mkdir =            ext2_mkdir,
 146         .vop_mknod =            ext2_mknod,
 147         .vop_open =             ext2_open,
 148         .vop_pathconf =         ext2_pathconf,
 149         .vop_poll =             vop_stdpoll,
 150         .vop_print =            ext2_print,
 151         .vop_read =             ext2_read,
 152         .vop_readdir =          ext2_readdir,
 153         .vop_readlink =         ext2_readlink,
 154         .vop_reallocblks =      ext2_reallocblks,
 155         .vop_reclaim =          ext2_reclaim,
 156         .vop_remove =           ext2_remove,
 157         .vop_rename =           ext2_rename,
 158         .vop_rmdir =            ext2_rmdir,
 159         .vop_setattr =          ext2_setattr,
 160         .vop_strategy =         ext2_strategy,
 161         .vop_symlink =          ext2_symlink,
 162         .vop_write =            ext2_write,
 163         .vop_deleteextattr =    ext2_deleteextattr,
 164         .vop_getextattr =       ext2_getextattr,
 165         .vop_listextattr =      ext2_listextattr,
 166         .vop_setextattr =       ext2_setextattr,
 167 #ifdef UFS_ACL
 168         .vop_getacl =           ext2_getacl,
 169         .vop_setacl =           ext2_setacl,
 170         .vop_aclcheck =         ext2_aclcheck,
 171 #endif /* UFS_ACL */
 172         .vop_vptofh =           ext2_vptofh,
 173 };
 174
 175 struct vop_vector ext2_fifoops = {
 176         .vop_default =          &fifo_specops,
 177         .vop_access =           ext2_access,
 178         .vop_close =            ext2fifo_close,
 179         .vop_fsync =            ext2_fsync,
 180         .vop_getattr =          ext2_getattr,
 181         .vop_inactive =         ext2_inactive,
 182         .vop_kqfilter =         ext2fifo_kqfilter,
 183         .vop_print =            ext2_print,
 184         .vop_read =             VOP_PANIC,
 185         .vop_reclaim =          ext2_reclaim,
 186         .vop_setattr =          ext2_setattr,
 187         .vop_write =            VOP_PANIC,
 188         .vop_vptofh =           ext2_vptofh,
 189 };
 190
 191 /*
 192  * A virgin directory (no blushing please).
 193  * Note that the type and namlen fields are reversed relative to ext2.
 194  * Also, we don't use `struct odirtemplate', since it would just cause
 195  * endianness problems.
 196  */
 197 static struct dirtemplate mastertemplate = {
 198         0, 12, 1, EXT2_FT_DIR, ".",
 199         0, DIRBLKSIZ - 12, 2, EXT2_FT_DIR, ".."
 200 };
 201 static struct dirtemplate omastertemplate = {
 202         0, 12, 1, EXT2_FT_UNKNOWN, ".",
 203         0, DIRBLKSIZ - 12, 2, EXT2_FT_UNKNOWN, ".."
 204 };
 205
 206 static void
 207 ext2_itimes_locked(struct vnode *vp)
 208 {
 209         struct inode *ip;
 210         struct timespec ts;
 211
 212         ASSERT_VI_LOCKED(vp, __func__);
 213
 214         ip = VTOI(vp);
 215         if ((ip->i_flag & (IN_ACCESS | IN_CHANGE | IN_UPDATE)) == 0)
 216                 return;
 217         if ((vp->v_type == VBLK || vp->v_type == VCHR))
 218                 ip->i_flag |= IN_LAZYMOD;
 219         else
 220                 ip->i_flag |= IN_MODIFIED;
 221         if ((vp->v_mount->mnt_flag & MNT_RDONLY) == 0) {
 222                 vfs_timestamp(&ts);
 223                 if (ip->i_flag & IN_ACCESS) {
 224                         ip->i_atime = ts.tv_sec;
 225                         ip->i_atimensec = ts.tv_nsec;
 226                 }
 227                 if (ip->i_flag & IN_UPDATE) {
 228                         ip->i_mtime = ts.tv_sec;
 229                         ip->i_mtimensec = ts.tv_nsec;
 230                         ip->i_modrev++;
 231                 }
 232                 if (ip->i_flag & IN_CHANGE) {
 233                         ip->i_ctime = ts.tv_sec;
 234                         ip->i_ctimensec = ts.tv_nsec;
 235                 }
 236         }
 237         ip->i_flag &= ~(IN_ACCESS | IN_CHANGE | IN_UPDATE);
 238 }
 239
 240 void
 241 ext2_itimes(struct vnode *vp)
 242 {
 243
 244         VI_LOCK(vp);
 245         ext2_itimes_locked(vp);
 246         VI_UNLOCK(vp);
 247 }
 248
 249 /*
 250  * Create a regular file
 251  */
 252 static int
 253 ext2_create(struct vop_create_args *ap)
 254 {
 255         int error;
 256
 257         error =
 258             ext2_makeinode(MAKEIMODE(ap->a_vap->va_type, ap->a_vap->va_mode),
 259             ap->a_dvp, ap->a_vpp, ap->a_cnp);
 260         if (error != 0)
 261                 return (error);
 262         if ((ap->a_cnp->cn_flags & MAKEENTRY) != 0)
 263                 cache_enter(ap->a_dvp, *ap->a_vpp, ap->a_cnp);
 264         return (0);
 265 }
 266
 267 static int
 268 ext2_open(struct vop_open_args *ap)
 269 {
 270
 271         if (ap->a_vp->v_type == VBLK || ap->a_vp->v_type == VCHR)
 272                 return (EOPNOTSUPP);
 273
 274         /*
 275          * Files marked append-only must be opened for appending.
 276          */
 277         if ((VTOI(ap->a_vp)->i_flags & APPEND) &&
 278             (ap->a_mode & (FWRITE | O_APPEND)) == FWRITE)
 279                 return (EPERM);
 280
 281         vnode_create_vobject(ap->a_vp, VTOI(ap->a_vp)->i_size, ap->a_td);
 282
 283         return (0);
 284 }
 285
 286 /*
 287  * Close called.
 288  *
 289  * Update the times on the inode.
 290  */
 291 static int
 292 ext2_close(struct vop_close_args *ap)
 293 {
 294         struct vnode *vp = ap->a_vp;
 295
 296         VI_LOCK(vp);
 297         if (vp->v_usecount > 1)
 298                 ext2_itimes_locked(vp);
 299         VI_UNLOCK(vp);
 300         return (0);
 301 }
 302
 303 static int
 304 ext2_access(struct vop_access_args *ap)
 305 {
 306         struct vnode *vp = ap->a_vp;
 307         struct inode *ip = VTOI(vp);
 308         accmode_t accmode = ap->a_accmode;
 309         int error;
 310
 311         if (vp->v_type == VBLK || vp->v_type == VCHR)
 312                 return (EOPNOTSUPP);
 313
 314         /*
 315          * Disallow write attempts on read-only file systems;
 316          * unless the file is a socket, fifo, or a block or
 317          * character device resident on the file system.
 318          */
 319         if (accmode & VWRITE) {
 320                 switch (vp->v_type) {
 321                 case VDIR:
 322                 case VLNK:
 323                 case VREG:
 324                         if (vp->v_mount->mnt_flag & MNT_RDONLY)
 325                                 return (EROFS);
 326                         break;
 327                 default:
 328                         break;
 329                 }
 330         }
 331
 332         /* If immutable bit set, nobody gets to write it. */
 333         if ((accmode & VWRITE) && (ip->i_flags & (SF_IMMUTABLE | SF_SNAPSHOT)))
 334                 return (EPERM);
 335
 336         error = vaccess(vp->v_type, ip->i_mode, ip->i_uid, ip->i_gid,
 337             ap->a_accmode, ap->a_cred, NULL);
 338         return (error);
 339 }
 340
 341 static int
 342 ext2_getattr(struct vop_getattr_args *ap)
 343 {
 344         struct vnode *vp = ap->a_vp;
 345         struct inode *ip = VTOI(vp);
 346         struct vattr *vap = ap->a_vap;
 347
 348         ext2_itimes(vp);
 349         /*
 350          * Copy from inode table
 351          */
 352         vap->va_fsid = dev2udev(ip->i_devvp->v_rdev);
 353         vap->va_fileid = ip->i_number;
 354         vap->va_mode = ip->i_mode & ~IFMT;
 355         vap->va_nlink = ip->i_nlink;
 356         vap->va_uid = ip->i_uid;
 357         vap->va_gid = ip->i_gid;
 358         vap->va_rdev = ip->i_rdev;
 359         vap->va_size = ip->i_size;
 360         vap->va_atime.tv_sec = ip->i_atime;
 361         vap->va_atime.tv_nsec = E2DI_HAS_XTIME(ip) ? ip->i_atimensec : 0;
 362         vap->va_mtime.tv_sec = ip->i_mtime;
 363         vap->va_mtime.tv_nsec = E2DI_HAS_XTIME(ip) ? ip->i_mtimensec : 0;
 364         vap->va_ctime.tv_sec = ip->i_ctime;
 365         vap->va_ctime.tv_nsec = E2DI_HAS_XTIME(ip) ? ip->i_ctimensec : 0;
 366         if E2DI_HAS_XTIME(ip) {
 367                 vap->va_birthtime.tv_sec = ip->i_birthtime;
 368                 vap->va_birthtime.tv_nsec = ip->i_birthnsec;
 369         }
 370         vap->va_flags = ip->i_flags;
 371         vap->va_gen = ip->i_gen;
 372         vap->va_blocksize = vp->v_mount->mnt_stat.f_iosize;
 373         vap->va_bytes = dbtob((u_quad_t)ip->i_blocks);
 374         vap->va_type = IFTOVT(ip->i_mode);
 375         vap->va_filerev = ip->i_modrev;
 376         return (0);
 377 }
 378
 379 /*
 380  * Set attribute vnode op. called from several syscalls
 381  */
 382 static int
 383 ext2_setattr(struct vop_setattr_args *ap)
 384 {
 385         struct vattr *vap = ap->a_vap;
 386         struct vnode *vp = ap->a_vp;
 387         struct inode *ip = VTOI(vp);
 388         struct ucred *cred = ap->a_cred;
 389         struct thread *td = curthread;
 390         int error;
 391
 392         /*
 393          * Check for unsettable attributes.
 394          */
 395         if ((vap->va_type != VNON) || (vap->va_nlink != VNOVAL) ||
 396             (vap->va_fsid != VNOVAL) || (vap->va_fileid != VNOVAL) ||
 397             (vap->va_blocksize != VNOVAL) || (vap->va_rdev != VNOVAL) ||
 398             ((int)vap->va_bytes != VNOVAL) || (vap->va_gen != VNOVAL)) {
 399                 return (EINVAL);
 400         }
 401         if (vap->va_flags != VNOVAL) {
 402                 /* Disallow flags not supported by ext2fs. */
 403                 if (vap->va_flags & ~(SF_APPEND | SF_IMMUTABLE | UF_NODUMP))
 404                         return (EOPNOTSUPP);
 405
 406                 if (vp->v_mount->mnt_flag & MNT_RDONLY)
 407                         return (EROFS);
 408                 /*
 409                  * Callers may only modify the file flags on objects they
 410                  * have VADMIN rights for.
 411                  */
 412                 if ((error = VOP_ACCESS(vp, VADMIN, cred, td)))
 413                         return (error);
 414                 /*
 415                  * Unprivileged processes and privileged processes in
 416                  * jail() are not permitted to unset system flags, or
 417                  * modify flags if any system flags are set.
 418                  * Privileged non-jail processes may not modify system flags
 419                  * if securelevel > 0 and any existing system flags are set.
 420                  */
 421                 if (!priv_check_cred(cred, PRIV_VFS_SYSFLAGS, 0)) {
 422                         if (ip->i_flags & (SF_IMMUTABLE | SF_APPEND)) {
 423                                 error = securelevel_gt(cred, 0);
 424                                 if (error)
 425                                         return (error);
 426                         }
 427                 } else {
 428                         if (ip->i_flags & (SF_IMMUTABLE | SF_APPEND) ||
 429                             ((vap->va_flags ^ ip->i_flags) & SF_SETTABLE))
 430                                 return (EPERM);
 431                 }
 432                 ip->i_flags = vap->va_flags;
 433                 ip->i_flag |= IN_CHANGE;
 434                 if (ip->i_flags & (IMMUTABLE | APPEND))
 435                         return (0);
 436         }
 437         if (ip->i_flags & (IMMUTABLE | APPEND))
 438                 return (EPERM);
 439         /*
 440          * Go through the fields and update iff not VNOVAL.
 441          */
 442         if (vap->va_uid != (uid_t)VNOVAL || vap->va_gid != (gid_t)VNOVAL) {
 443                 if (vp->v_mount->mnt_flag & MNT_RDONLY)
 444                         return (EROFS);
 445                 if ((error = ext2_chown(vp, vap->va_uid, vap->va_gid, cred,
 446                     td)) != 0)
 447                         return (error);
 448         }
 449         if (vap->va_size != VNOVAL) {
 450                 /*
 451                  * Disallow write attempts on read-only file systems;
 452                  * unless the file is a socket, fifo, or a block or
 453                  * character device resident on the file system.
 454                  */
 455                 switch (vp->v_type) {
 456                 case VDIR:
 457                         return (EISDIR);
 458                 case VLNK:
 459                 case VREG:
 460                         if (vp->v_mount->mnt_flag & MNT_RDONLY)
 461                                 return (EROFS);
 462                         break;
 463                 default:
 464                         break;
 465                 }
 466                 if ((error = ext2_truncate(vp, vap->va_size, 0, cred, td)) != 0)
 467                         return (error);
 468         }
 469         if (vap->va_atime.tv_sec != VNOVAL || vap->va_mtime.tv_sec != VNOVAL) {
 470                 if (vp->v_mount->mnt_flag & MNT_RDONLY)
 471                         return (EROFS);
 472                 /*
 473                  * From utimes(2):
 474                  * If times is NULL, ... The caller must be the owner of
 475                  * the file, have permission to write the file, or be the
 476                  * super-user.
 477                  * If times is non-NULL, ... The caller must be the owner of
 478                  * the file or be the super-user.
 479                  */
 480                 if ((error = VOP_ACCESS(vp, VADMIN, cred, td)) &&
 481                     ((vap->va_vaflags & VA_UTIMES_NULL) == 0 ||
 482                     (error = VOP_ACCESS(vp, VWRITE, cred, td))))
 483                         return (error);
 484                 ip->i_flag |= IN_CHANGE | IN_MODIFIED;
 485                 if (vap->va_atime.tv_sec != VNOVAL) {
 486                         ip->i_flag &= ~IN_ACCESS;
 487                         ip->i_atime = vap->va_atime.tv_sec;
 488                         ip->i_atimensec = vap->va_atime.tv_nsec;
 489                 }
 490                 if (vap->va_mtime.tv_sec != VNOVAL) {
 491                         ip->i_flag &= ~IN_UPDATE;
 492                         ip->i_mtime = vap->va_mtime.tv_sec;
 493                         ip->i_mtimensec = vap->va_mtime.tv_nsec;
 494                 }
 495                 ip->i_birthtime = vap->va_birthtime.tv_sec;
 496                 ip->i_birthnsec = vap->va_birthtime.tv_nsec;
 497                 error = ext2_update(vp, 0);
 498                 if (error)
 499                         return (error);
 500         }
 501         error = 0;
 502         if (vap->va_mode != (mode_t)VNOVAL) {
 503                 if (vp->v_mount->mnt_flag & MNT_RDONLY)
 504                         return (EROFS);
 505                 error = ext2_chmod(vp, (int)vap->va_mode, cred, td);
 506         }
 507         return (error);
 508 }
 509
 510 /*
 511  * Change the mode on a file.
 512  * Inode must be locked before calling.
 513  */
 514 static int
 515 ext2_chmod(struct vnode *vp, int mode, struct ucred *cred, struct thread *td)
 516 {
 517         struct inode *ip = VTOI(vp);
 518         int error;
 519
 520         /*
 521          * To modify the permissions on a file, must possess VADMIN
 522          * for that file.
 523          */
 524         if ((error = VOP_ACCESS(vp, VADMIN, cred, td)))
 525                 return (error);
 526         /*
 527          * Privileged processes may set the sticky bit on non-directories,
 528          * as well as set the setgid bit on a file with a group that the
 529          * process is not a member of.
 530          */
 531         if (vp->v_type != VDIR && (mode & S_ISTXT)) {
 532                 error = priv_check_cred(cred, PRIV_VFS_STICKYFILE, 0);
 533                 if (error)
 534                         return (EFTYPE);
 535         }
 536         if (!groupmember(ip->i_gid, cred) && (mode & ISGID)) {
 537                 error = priv_check_cred(cred, PRIV_VFS_SETGID, 0);
 538                 if (error)
 539                         return (error);
 540         }
 541         ip->i_mode &= ~ALLPERMS;
 542         ip->i_mode |= (mode & ALLPERMS);
 543         ip->i_flag |= IN_CHANGE;
 544         return (0);
 545 }
 546
 547 /*
 548  * Perform chown operation on inode ip;
 549  * inode must be locked prior to call.
 550  */
 551 static int
 552 ext2_chown(struct vnode *vp, uid_t uid, gid_t gid, struct ucred *cred,
 553     struct thread *td)
 554 {
 555         struct inode *ip = VTOI(vp);
 556         uid_t ouid;
 557         gid_t ogid;
 558         int error = 0;
 559
 560         if (uid == (uid_t)VNOVAL)
 561                 uid = ip->i_uid;
 562         if (gid == (gid_t)VNOVAL)
 563                 gid = ip->i_gid;
 564         /*
 565          * To modify the ownership of a file, must possess VADMIN
 566          * for that file.
 567          */
 568         if ((error = VOP_ACCESS(vp, VADMIN, cred, td)))
 569                 return (error);
 570         /*
 571          * To change the owner of a file, or change the group of a file
 572          * to a group of which we are not a member, the caller must
 573          * have privilege.
 574          */
 575         if (uid != ip->i_uid || (gid != ip->i_gid &&
 576             !groupmember(gid, cred))) {
 577                 error = priv_check_cred(cred, PRIV_VFS_CHOWN, 0);
 578                 if (error)
 579                         return (error);
 580         }
 581         ogid = ip->i_gid;
 582         ouid = ip->i_uid;
 583         ip->i_gid = gid;
 584         ip->i_uid = uid;
 585         ip->i_flag |= IN_CHANGE;
 586         if ((ip->i_mode & (ISUID | ISGID)) && (ouid != uid || ogid != gid)) {
 587                 if (priv_check_cred(cred, PRIV_VFS_RETAINSUGID, 0) != 0)
 588                         ip->i_mode &= ~(ISUID | ISGID);
 589         }
 590         return (0);
 591 }
 592
 593 /*
 594  * Synch an open file.
 595  */
 596 /* ARGSUSED */
 597 static int
 598 ext2_fsync(struct vop_fsync_args *ap)
 599 {
 600         /*
 601          * Flush all dirty buffers associated with a vnode.
 602          */
 603
 604         vop_stdfsync(ap);
 605
 606         return (ext2_update(ap->a_vp, ap->a_waitfor == MNT_WAIT));
 607 }
 608
 609 /*
 610  * Mknod vnode call
 611  */
 612 /* ARGSUSED */
 613 static int
 614 ext2_mknod(struct vop_mknod_args *ap)
 615 {
 616         struct vattr *vap = ap->a_vap;
 617         struct vnode **vpp = ap->a_vpp;
 618         struct inode *ip;
 619         ino_t ino;
 620         int error;
 621
 622         error = ext2_makeinode(MAKEIMODE(vap->va_type, vap->va_mode),
 623             ap->a_dvp, vpp, ap->a_cnp);
 624         if (error)
 625                 return (error);
 626         ip = VTOI(*vpp);
 627         ip->i_flag |= IN_ACCESS | IN_CHANGE | IN_UPDATE;
 628         if (vap->va_rdev != VNOVAL) {
 629                 /*
 630                  * Want to be able to use this to make badblock
 631                  * inodes, so don't truncate the dev number.
 632                  */
 633                 if (!(ip->i_flag & IN_E4EXTENTS))
 634                         ip->i_rdev = vap->va_rdev;
 635         }
 636         /*
 637          * Remove inode, then reload it through VFS_VGET so it is
 638          * checked to see if it is an alias of an existing entry in
 639          * the inode cache.      XXX I don't believe this is necessary now.
 640          */
 641         (*vpp)->v_type = VNON;
 642         ino = ip->i_number;     /* Save this before vgone() invalidates ip. */
 643         vgone(*vpp);
 644         vput(*vpp);
 645         error = VFS_VGET(ap->a_dvp->v_mount, ino, LK_EXCLUSIVE, vpp);
 646         if (error) {
 647                 *vpp = NULL;
 648                 return (error);
 649         }
 650         return (0);
 651 }
 652
 653 static int
 654 ext2_remove(struct vop_remove_args *ap)
 655 {
 656         struct inode *ip;
 657         struct vnode *vp = ap->a_vp;
 658         struct vnode *dvp = ap->a_dvp;
 659         int error;
 660
 661         ip = VTOI(vp);
 662         if ((ip->i_flags & (NOUNLINK | IMMUTABLE | APPEND)) ||
 663             (VTOI(dvp)->i_flags & APPEND)) {
 664                 error = EPERM;
 665                 goto out;
 666         }
 667         error = ext2_dirremove(dvp, ap->a_cnp);
 668         if (error == 0) {
 669                 ip->i_nlink--;
 670                 ip->i_flag |= IN_CHANGE;
 671         }
 672 out:
 673         return (error);
 674 }
 675
 676 static unsigned short
 677 ext2_max_nlink(struct inode *ip)
 678 {
 679         struct m_ext2fs *fs;
 680
 681         fs = ip->i_e2fs;
 682
 683         if (EXT2_HAS_RO_COMPAT_FEATURE(fs, EXT2F_ROCOMPAT_DIR_NLINK))
 684                 return (EXT4_LINK_MAX);
 685         else
 686                 return (EXT2_LINK_MAX);
 687 }
 688
 689 /*
 690  * link vnode call
 691  */
 692 static int
 693 ext2_link(struct vop_link_args *ap)
 694 {
 695         struct vnode *vp = ap->a_vp;
 696         struct vnode *tdvp = ap->a_tdvp;
 697         struct componentname *cnp = ap->a_cnp;
 698         struct inode *ip;
 699         int error;
 700
 701 #ifdef INVARIANTS
 702         if ((cnp->cn_flags & HASBUF) == 0)
 703                 panic("ext2_link: no name");
 704 #endif
 705         ip = VTOI(vp);
 706         if ((nlink_t)ip->i_nlink >= ext2_max_nlink(ip)) {
 707                 error = EMLINK;
 708                 goto out;
 709         }
 710         if (ip->i_flags & (IMMUTABLE | APPEND)) {
 711                 error = EPERM;
 712                 goto out;
 713         }
 714         ip->i_nlink++;
 715         ip->i_flag |= IN_CHANGE;
 716         error = ext2_update(vp, !DOINGASYNC(vp));
 717         if (!error)
 718                 error = ext2_direnter(ip, tdvp, cnp);
 719         if (error) {
 720                 ip->i_nlink--;
 721                 ip->i_flag |= IN_CHANGE;
 722         }
 723 out:
 724         return (error);
 725 }
 726
 727 static int
 728 ext2_inc_nlink(struct inode *ip)
 729 {
 730
 731         ip->i_nlink++;
 732
 733         if (ext2_htree_has_idx(ip) && ip->i_nlink > 1) {
 734                 if (ip->i_nlink >= ext2_max_nlink(ip) || ip->i_nlink == 2)
 735                         ip->i_nlink = 1;
 736         } else if (ip->i_nlink > ext2_max_nlink(ip)) {
 737                 ip->i_nlink--;
 738                 return (EMLINK);
 739         }
 740
 741         return (0);
 742 }
 743
 744 static void
 745 ext2_dec_nlink(struct inode *ip)
 746 {
 747
 748         if (!S_ISDIR(ip->i_mode) || ip->i_nlink > 2)
 749                 ip->i_nlink--;
 750 }
 751
 752 /*
 753  * Rename system call.
 754  *      rename("foo", "bar");
 755  * is essentially
 756  *      unlink("bar");
 757  *      link("foo", "bar");
 758  *      unlink("foo");
 759  * but ``atomically''.  Can't do full commit without saving state in the
 760  * inode on disk which isn't feasible at this time.  Best we can do is
 761  * always guarantee the target exists.
 762  *
 763  * Basic algorithm is:
 764  *
 765  * 1) Bump link count on source while we're linking it to the
 766  *    target.  This also ensure the inode won't be deleted out
 767  *    from underneath us while we work (it may be truncated by
 768  *    a concurrent `trunc' or `open' for creation).
 769  * 2) Link source to destination.  If destination already exists,
 770  *    delete it first.
 771  * 3) Unlink source reference to inode if still around. If a
 772  *    directory was moved and the parent of the destination
 773  *    is different from the source, patch the ".." entry in the
 774  *    directory.
 775  */
 776 static int
 777 ext2_rename(struct vop_rename_args *ap)
 778 {
 779         struct vnode *tvp = ap->a_tvp;
 780         struct vnode *tdvp = ap->a_tdvp;
 781         struct vnode *fvp = ap->a_fvp;
 782         struct vnode *fdvp = ap->a_fdvp;
 783         struct componentname *tcnp = ap->a_tcnp;
 784         struct componentname *fcnp = ap->a_fcnp;
 785         struct inode *ip, *xp, *dp;
 786         struct dirtemplate dirbuf;
 787         int doingdirectory = 0, oldparent = 0, newparent = 0;
 788         int error = 0;
 789         u_char namlen;
 790
 791 #ifdef INVARIANTS
 792         if ((tcnp->cn_flags & HASBUF) == 0 ||
 793             (fcnp->cn_flags & HASBUF) == 0)
 794                 panic("ext2_rename: no name");
 795 #endif
 796         /*
 797          * Check for cross-device rename.
 798          */
 799         if ((fvp->v_mount != tdvp->v_mount) ||
 800             (tvp && (fvp->v_mount != tvp->v_mount))) {
 801                 error = EXDEV;
 802 abortit:
 803                 if (tdvp == tvp)
 804                         vrele(tdvp);
 805                 else
 806                         vput(tdvp);
 807                 if (tvp)
 808                         vput(tvp);
 809                 vrele(fdvp);
 810                 vrele(fvp);
 811                 return (error);
 812         }
 813
 814         if (tvp && ((VTOI(tvp)->i_flags & (NOUNLINK | IMMUTABLE | APPEND)) ||
 815             (VTOI(tdvp)->i_flags & APPEND))) {
 816                 error = EPERM;
 817                 goto abortit;
 818         }
 819
 820         /*
 821          * Renaming a file to itself has no effect.  The upper layers should
 822          * not call us in that case.  Temporarily just warn if they do.
 823          */
 824         if (fvp == tvp) {
 825                 printf("ext2_rename: fvp == tvp (can't happen)\n");
 826                 error = 0;
 827                 goto abortit;
 828         }
 829
 830         if ((error = vn_lock(fvp, LK_EXCLUSIVE)) != 0)
 831                 goto abortit;
 832         dp = VTOI(fdvp);
 833         ip = VTOI(fvp);
 834         if (ip->i_nlink >= ext2_max_nlink(ip) && !ext2_htree_has_idx(ip)) {
 835                 VOP_UNLOCK(fvp, 0);
 836                 error = EMLINK;
 837                 goto abortit;
 838         }
 839         if ((ip->i_flags & (NOUNLINK | IMMUTABLE | APPEND))
 840             || (dp->i_flags & APPEND)) {
 841                 VOP_UNLOCK(fvp, 0);
 842                 error = EPERM;
 843                 goto abortit;
 844         }
 845         if ((ip->i_mode & IFMT) == IFDIR) {
 846                 /*
 847                  * Avoid ".", "..", and aliases of "." for obvious reasons.
 848                  */
 849                 if ((fcnp->cn_namelen == 1 && fcnp->cn_nameptr[0] == '.') ||
 850                     dp == ip || (fcnp->cn_flags | tcnp->cn_flags) & ISDOTDOT ||
 851                     (ip->i_flag & IN_RENAME)) {
 852                         VOP_UNLOCK(fvp, 0);
 853                         error = EINVAL;
 854                         goto abortit;
 855                 }
 856                 ip->i_flag |= IN_RENAME;
 857                 oldparent = dp->i_number;
 858                 doingdirectory++;
 859         }
 860         vrele(fdvp);
 861
 862         /*
 863          * When the target exists, both the directory
 864          * and target vnodes are returned locked.
 865          */
 866         dp = VTOI(tdvp);
 867         xp = NULL;
 868         if (tvp)
 869                 xp = VTOI(tvp);
 870
 871         /*
 872          * 1) Bump link count while we're moving stuff
 873          *    around.  If we crash somewhere before
 874          *    completing our work, the link count
 875          *    may be wrong, but correctable.
 876          */
 877         ext2_inc_nlink(ip);
 878         ip->i_flag |= IN_CHANGE;
 879         if ((error = ext2_update(fvp, !DOINGASYNC(fvp))) != 0) {
 880                 VOP_UNLOCK(fvp, 0);
 881                 goto bad;
 882         }
 883
 884         /*
 885          * If ".." must be changed (ie the directory gets a new
 886          * parent) then the source directory must not be in the
 887          * directory hierarchy above the target, as this would
 888          * orphan everything below the source directory. Also
 889          * the user must have write permission in the source so
 890          * as to be able to change "..". We must repeat the call
 891          * to namei, as the parent directory is unlocked by the
 892          * call to checkpath().
 893          */
 894         error = VOP_ACCESS(fvp, VWRITE, tcnp->cn_cred, tcnp->cn_thread);
 895         VOP_UNLOCK(fvp, 0);
 896         if (oldparent != dp->i_number)
 897                 newparent = dp->i_number;
 898         if (doingdirectory && newparent) {
 899                 if (error)      /* write access check above */
 900                         goto bad;
 901                 if (xp != NULL)
 902                         vput(tvp);
 903                 error = ext2_checkpath(ip, dp, tcnp->cn_cred);
 904                 if (error)
 905                         goto out;
 906                 VREF(tdvp);
 907                 error = relookup(tdvp, &tvp, tcnp);
 908                 if (error)
 909                         goto out;
 910                 vrele(tdvp);
 911                 dp = VTOI(tdvp);
 912                 xp = NULL;
 913                 if (tvp)
 914                         xp = VTOI(tvp);
 915         }
 916         /*
 917          * 2) If target doesn't exist, link the target
 918          *    to the source and unlink the source.
 919          *    Otherwise, rewrite the target directory
 920          *    entry to reference the source inode and
 921          *    expunge the original entry's existence.
 922          */
 923         if (xp == NULL) {
 924                 if (dp->i_devvp != ip->i_devvp)
 925                         panic("ext2_rename: EXDEV");
 926                 /*
 927                  * Account for ".." in new directory.
 928                  * When source and destination have the same
 929                  * parent we don't fool with the link count.
 930                  */
 931                 if (doingdirectory && newparent) {
 932                         error = ext2_inc_nlink(dp);
 933                         if (error)
 934                                 goto bad;
 935
 936                         dp->i_flag |= IN_CHANGE;
 937                         error = ext2_update(tdvp, !DOINGASYNC(tdvp));
 938                         if (error)
 939                                 goto bad;
 940                 }
 941                 error = ext2_direnter(ip, tdvp, tcnp);
 942                 if (error) {
 943                         if (doingdirectory && newparent) {
 944                                 ext2_dec_nlink(dp);
 945                                 dp->i_flag |= IN_CHANGE;
 946                                 (void)ext2_update(tdvp, 1);
 947                         }
 948                         goto bad;
 949                 }
 950                 vput(tdvp);
 951         } else {
 952                 if (xp->i_devvp != dp->i_devvp || xp->i_devvp != ip->i_devvp)
 953                         panic("ext2_rename: EXDEV");
 954                 /*
 955                  * Short circuit rename(foo, foo).
 956                  */
 957                 if (xp->i_number == ip->i_number)
 958                         panic("ext2_rename: same file");
 959                 /*
 960                  * If the parent directory is "sticky", then the user must
 961                  * own the parent directory, or the destination of the rename,
 962                  * otherwise the destination may not be changed (except by
 963                  * root). This implements append-only directories.
 964                  */
 965                 if ((dp->i_mode & S_ISTXT) && tcnp->cn_cred->cr_uid != 0 &&
 966                     tcnp->cn_cred->cr_uid != dp->i_uid &&
 967                     xp->i_uid != tcnp->cn_cred->cr_uid) {
 968                         error = EPERM;
 969                         goto bad;
 970                 }
 971                 /*
 972                  * Target must be empty if a directory and have no links
 973                  * to it. Also, ensure source and target are compatible
 974                  * (both directories, or both not directories).
 975                  */
 976                 if ((xp->i_mode & IFMT) == IFDIR) {
 977                         if (!ext2_dirempty(xp, dp->i_number, tcnp->cn_cred)) {
 978                                 error = ENOTEMPTY;
 979                                 goto bad;
 980                         }
 981                         if (!doingdirectory) {
 982                                 error = ENOTDIR;
 983                                 goto bad;
 984                         }
 985                         cache_purge(tdvp);
 986                 } else if (doingdirectory) {
 987                         error = EISDIR;
 988                         goto bad;
 989                 }
 990                 error = ext2_dirrewrite(dp, ip, tcnp);
 991                 if (error)
 992                         goto bad;
 993                 /*
 994                  * If the target directory is in the same
 995                  * directory as the source directory,
 996                  * decrement the link count on the parent
 997                  * of the target directory.
 998                  */
 999                 if (doingdirectory && !newparent) {
1000                         ext2_dec_nlink(dp);
1001                         dp->i_flag |= IN_CHANGE;
1002                 }
1003                 vput(tdvp);
1004                 /*
1005                  * Adjust the link count of the target to
1006                  * reflect the dirrewrite above.  If this is
1007                  * a directory it is empty and there are
1008                  * no links to it, so we can squash the inode and
1009                  * any space associated with it.  We disallowed
1010                  * renaming over top of a directory with links to
1011                  * it above, as the remaining link would point to
1012                  * a directory without "." or ".." entries.
1013                  */
1014                 ext2_dec_nlink(xp);
1015                 if (doingdirectory) {
1016                         if (--xp->i_nlink != 0)
1017                                 panic("ext2_rename: linked directory");
1018                         error = ext2_truncate(tvp, (off_t)0, IO_SYNC,
1019                             tcnp->cn_cred, tcnp->cn_thread);
1020                 }
1021                 xp->i_flag |= IN_CHANGE;
1022                 vput(tvp);
1023                 xp = NULL;
1024         }
1025
1026         /*
1027          * 3) Unlink the source.
1028          */
1029         fcnp->cn_flags &= ~MODMASK;
1030         fcnp->cn_flags |= LOCKPARENT | LOCKLEAF;
1031         VREF(fdvp);
1032         error = relookup(fdvp, &fvp, fcnp);
1033         if (error == 0)
1034                 vrele(fdvp);
1035         if (fvp != NULL) {
1036                 xp = VTOI(fvp);
1037                 dp = VTOI(fdvp);
1038         } else {
1039                 /*
1040                  * From name has disappeared.  IN_RENAME is not sufficient
1041                  * to protect against directory races due to timing windows,
1042                  * so we can't panic here.
1043                  */
1044                 vrele(ap->a_fvp);
1045                 return (0);
1046         }
1047         /*
1048          * Ensure that the directory entry still exists and has not
1049          * changed while the new name has been entered. If the source is
1050          * a file then the entry may have been unlinked or renamed. In
1051          * either case there is no further work to be done. If the source
1052          * is a directory then it cannot have been rmdir'ed; its link
1053          * count of three would cause a rmdir to fail with ENOTEMPTY.
1054          * The IN_RENAME flag ensures that it cannot be moved by another
1055          * rename.
1056          */
1057         if (xp != ip) {
1058                 /*
1059                  * From name resolves to a different inode.  IN_RENAME is
1060                  * not sufficient protection against timing window races
1061                  * so we can't panic here.
1062                  */
1063         } else {
1064                 /*
1065                  * If the source is a directory with a
1066                  * new parent, the link count of the old
1067                  * parent directory must be decremented
1068                  * and ".." set to point to the new parent.
1069                  */
1070                 if (doingdirectory && newparent) {
1071                         ext2_dec_nlink(dp);
1072                         dp->i_flag |= IN_CHANGE;
1073                         error = vn_rdwr(UIO_READ, fvp, (caddr_t)&dirbuf,
1074                             sizeof(struct dirtemplate), (off_t)0,
1075                             UIO_SYSSPACE, IO_NODELOCKED | IO_NOMACCHECK,
1076                             tcnp->cn_cred, NOCRED, NULL, NULL);
1077                         if (error == 0) {
1078                                 /* Like ufs little-endian: */
1079                                 namlen = dirbuf.dotdot_type;
1080                                 if (namlen != 2 ||
1081                                     dirbuf.dotdot_name[0] != '.' ||
1082                                     dirbuf.dotdot_name[1] != '.') {
1083                                         ext2_dirbad(xp, (doff_t)12,
1084                                             "rename: mangled dir");
1085                                 } else {
1086                                         dirbuf.dotdot_ino = newparent;
1087                                         (void)vn_rdwr(UIO_WRITE, fvp,
1088                                             (caddr_t)&dirbuf,
1089                                             sizeof(struct dirtemplate),
1090                                             (off_t)0, UIO_SYSSPACE,
1091                                             IO_NODELOCKED | IO_SYNC |
1092                                             IO_NOMACCHECK, tcnp->cn_cred,
1093                                             NOCRED, NULL, NULL);
1094                                         cache_purge(fdvp);
1095                                 }
1096                         }
1097                 }
1098                 error = ext2_dirremove(fdvp, fcnp);
1099                 if (!error) {
1100                         ext2_dec_nlink(xp);
1101                         xp->i_flag |= IN_CHANGE;
1102                 }
1103                 xp->i_flag &= ~IN_RENAME;
1104         }
1105         if (dp)
1106                 vput(fdvp);
1107         if (xp)
1108                 vput(fvp);
1109         vrele(ap->a_fvp);
1110         return (error);
1111
1112 bad:
1113         if (xp)
1114                 vput(ITOV(xp));
1115         vput(ITOV(dp));
1116 out:
1117         if (doingdirectory)
1118                 ip->i_flag &= ~IN_RENAME;
1119         if (vn_lock(fvp, LK_EXCLUSIVE) == 0) {
1120                 ext2_dec_nlink(ip);
1121                 ip->i_flag |= IN_CHANGE;
1122                 ip->i_flag &= ~IN_RENAME;
1123                 vput(fvp);
1124         } else
1125                 vrele(fvp);
1126         return (error);
1127 }
1128
1129 #ifdef UFS_ACL
1130 static int
1131 ext2_do_posix1e_acl_inheritance_dir(struct vnode *dvp, struct vnode *tvp,
1132     mode_t dmode, struct ucred *cred, struct thread *td)
1133 {
1134         int error;
1135         struct inode *ip = VTOI(tvp);
1136         struct acl *dacl, *acl;
1137
1138         acl = acl_alloc(M_WAITOK);
1139         dacl = acl_alloc(M_WAITOK);
1140
1141         /*
1142          * Retrieve default ACL from parent, if any.
1143          */
1144         error = VOP_GETACL(dvp, ACL_TYPE_DEFAULT, acl, cred, td);
1145         switch (error) {
1146         case 0:
1147                 /*
1148                  * Retrieved a default ACL, so merge mode and ACL if
1149                  * necessary.  If the ACL is empty, fall through to
1150                  * the "not defined or available" case.
1151                  */
1152                 if (acl->acl_cnt != 0) {
1153                         dmode = acl_posix1e_newfilemode(dmode, acl);
1154                         ip->i_mode = dmode;
1155                         *dacl = *acl;
1156                         ext2_sync_acl_from_inode(ip, acl);
1157                         break;
1158                 }
1159                 /* FALLTHROUGH */
1160
1161         case EOPNOTSUPP:
1162                 /*
1163                  * Just use the mode as-is.
1164                  */
1165                 ip->i_mode = dmode;
1166                 error = 0;
1167                 goto out;
1168
1169         default:
1170                 goto out;
1171         }
1172
1173         error = VOP_SETACL(tvp, ACL_TYPE_ACCESS, acl, cred, td);
1174         if (error == 0)
1175                 error = VOP_SETACL(tvp, ACL_TYPE_DEFAULT, dacl, cred, td);
1176         switch (error) {
1177         case 0:
1178                 break;
1179
1180         case EOPNOTSUPP:
1181                 /*
1182                  * XXX: This should not happen, as EOPNOTSUPP above
1183                  * was supposed to free acl.
1184                  */
1185 #ifdef DEBUG
1186                 printf("ext2_mkdir: VOP_GETACL() but no VOP_SETACL()\n");
1187 #endif  /* DEBUG */
1188                 break;
1189
1190         default:
1191                 goto out;
1192         }
1193
1194 out:
1195         acl_free(acl);
1196         acl_free(dacl);
1197
1198         return (error);
1199 }
1200
1201 static int
1202 ext2_do_posix1e_acl_inheritance_file(struct vnode *dvp, struct vnode *tvp,
1203     mode_t mode, struct ucred *cred, struct thread *td)
1204 {
1205         int error;
1206         struct inode *ip = VTOI(tvp);
1207         struct acl *acl;
1208
1209         acl = acl_alloc(M_WAITOK);
1210
1211         /*
1212          * Retrieve default ACL for parent, if any.
1213          */
1214         error = VOP_GETACL(dvp, ACL_TYPE_DEFAULT, acl, cred, td);
1215         switch (error) {
1216         case 0:
1217                 /*
1218                  * Retrieved a default ACL, so merge mode and ACL if
1219                  * necessary.
1220                  */
1221                 if (acl->acl_cnt != 0) {
1222                         /*
1223                          * Two possible ways for default ACL to not
1224                          * be present.  First, the EA can be
1225                          * undefined, or second, the default ACL can
1226                          * be blank.  If it's blank, fall through to
1227                          * the it's not defined case.
1228                          */
1229                         mode = acl_posix1e_newfilemode(mode, acl);
1230                         ip->i_mode = mode;
1231                         ext2_sync_acl_from_inode(ip, acl);
1232                         break;
1233                 }
1234                 /* FALLTHROUGH */
1235
1236         case EOPNOTSUPP:
1237                 /*
1238                  * Just use the mode as-is.
1239                  */
1240                 ip->i_mode = mode;
1241                 error = 0;
1242                 goto out;
1243
1244         default:
1245                 goto out;
1246         }
1247
1248         error = VOP_SETACL(tvp, ACL_TYPE_ACCESS, acl, cred, td);
1249         switch (error) {
1250         case 0:
1251                 break;
1252
1253         case EOPNOTSUPP:
1254                 /*
1255                  * XXX: This should not happen, as EOPNOTSUPP above was
1256                  * supposed to free acl.
1257                  */
1258                 printf("ufs_do_posix1e_acl_inheritance_file: VOP_GETACL() "
1259                     "but no VOP_SETACL()\n");
1260                 /* panic("ufs_do_posix1e_acl_inheritance_file: VOP_GETACL() "
1261                     "but no VOP_SETACL()"); */
1262                 break;
1263
1264         default:
1265                 goto out;
1266         }
1267
1268 out:
1269         acl_free(acl);
1270
1271         return (error);
1272 }
1273
1274 #endif /* UFS_ACL */
1275
1276 /*
1277  * Mkdir system call
1278  */
1279 static int
1280 ext2_mkdir(struct vop_mkdir_args *ap)
1281 {
1282         struct vnode *dvp = ap->a_dvp;
1283         struct vattr *vap = ap->a_vap;
1284         struct componentname *cnp = ap->a_cnp;
1285         struct inode *ip, *dp;
1286         struct vnode *tvp;
1287         struct dirtemplate dirtemplate, *dtp;
1288         int error, dmode;
1289
1290 #ifdef INVARIANTS
1291         if ((cnp->cn_flags & HASBUF) == 0)
1292                 panic("ext2_mkdir: no name");
1293 #endif
1294         dp = VTOI(dvp);
1295         if ((nlink_t)dp->i_nlink >= ext2_max_nlink(dp) &&
1296             !ext2_htree_has_idx(dp)) {
1297                 error = EMLINK;
1298                 goto out;
1299         }
1300         dmode = vap->va_mode & 0777;
1301         dmode |= IFDIR;
1302         /*
1303          * Must simulate part of ext2_makeinode here to acquire the inode,
1304          * but not have it entered in the parent directory. The entry is
1305          * made later after writing "." and ".." entries.
1306          */
1307         error = ext2_valloc(dvp, dmode, cnp->cn_cred, &tvp);
1308         if (error)
1309                 goto out;
1310         ip = VTOI(tvp);
1311         ip->i_gid = dp->i_gid;
1312 #ifdef SUIDDIR
1313         {
1314                 /*
1315                  * if we are hacking owners here, (only do this where told to)
1316                  * and we are not giving it TOO root, (would subvert quotas)
1317                  * then go ahead and give it to the other user.
1318                  * The new directory also inherits the SUID bit.
1319                  * If user's UID and dir UID are the same,
1320                  * 'give it away' so that the SUID is still forced on.
1321                  */
1322                 if ((dvp->v_mount->mnt_flag & MNT_SUIDDIR) &&
1323                     (dp->i_mode & ISUID) && dp->i_uid) {
1324                         dmode |= ISUID;
1325                         ip->i_uid = dp->i_uid;
1326                 } else {
1327                         ip->i_uid = cnp->cn_cred->cr_uid;
1328                 }
1329         }
1330 #else
1331         ip->i_uid = cnp->cn_cred->cr_uid;
1332 #endif
1333         ip->i_flag |= IN_ACCESS | IN_CHANGE | IN_UPDATE;
1334         ip->i_mode = dmode;
1335         tvp->v_type = VDIR;     /* Rest init'd in getnewvnode(). */
1336         ip->i_nlink = 2;
1337         if (cnp->cn_flags & ISWHITEOUT)
1338                 ip->i_flags |= UF_OPAQUE;
1339         error = ext2_update(tvp, 1);
1340
1341         /*
1342          * Bump link count in parent directory
1343          * to reflect work done below.  Should
1344          * be done before reference is created
1345          * so reparation is possible if we crash.
1346          */
1347         ext2_inc_nlink(dp);
1348         dp->i_flag |= IN_CHANGE;
1349         error = ext2_update(dvp, !DOINGASYNC(dvp));
1350         if (error)
1351                 goto bad;
1352
1353         /* Initialize directory with "." and ".." from static template. */
1354         if (EXT2_HAS_INCOMPAT_FEATURE(ip->i_e2fs,
1355             EXT2F_INCOMPAT_FTYPE))
1356                 dtp = &mastertemplate;
1357         else
1358                 dtp = &omastertemplate;
1359         dirtemplate = *dtp;
1360         dirtemplate.dot_ino = ip->i_number;
1361         dirtemplate.dotdot_ino = dp->i_number;
1362         /*
1363          * note that in ext2 DIRBLKSIZ == blocksize, not DEV_BSIZE so let's
1364          * just redefine it - for this function only
1365          */
1366 #undef  DIRBLKSIZ
1367 #define DIRBLKSIZ  VTOI(dvp)->i_e2fs->e2fs_bsize
1368         dirtemplate.dotdot_reclen = DIRBLKSIZ - 12;
1369         error = vn_rdwr(UIO_WRITE, tvp, (caddr_t)&dirtemplate,
1370             sizeof(dirtemplate), (off_t)0, UIO_SYSSPACE,
1371             IO_NODELOCKED | IO_SYNC | IO_NOMACCHECK, cnp->cn_cred, NOCRED,
1372             NULL, NULL);
1373         if (error) {
1374                 ext2_dec_nlink(dp);
1375                 dp->i_flag |= IN_CHANGE;
1376                 goto bad;
1377         }
1378         if (DIRBLKSIZ > VFSTOEXT2(dvp->v_mount)->um_mountp->mnt_stat.f_bsize)
1379                 /* XXX should grow with balloc() */
1380                 panic("ext2_mkdir: blksize");
1381         else {
1382                 ip->i_size = DIRBLKSIZ;
1383                 ip->i_flag |= IN_CHANGE;
1384         }
1385
1386 #ifdef UFS_ACL
1387         if (dvp->v_mount->mnt_flag & MNT_ACLS) {
1388                 error = ext2_do_posix1e_acl_inheritance_dir(dvp, tvp, dmode,
1389                     cnp->cn_cred, cnp->cn_thread);
1390                 if (error)
1391                         goto bad;
1392         }
1393
1394 #endif /* UFS_ACL */
1395
1396         /* Directory set up, now install its entry in the parent directory. */
1397         error = ext2_direnter(ip, dvp, cnp);
1398         if (error) {
1399                 ext2_dec_nlink(dp);
1400                 dp->i_flag |= IN_CHANGE;
1401         }
1402 bad:
1403         /*
1404          * No need to do an explicit VOP_TRUNCATE here, vrele will do this
1405          * for us because we set the link count to 0.
1406          */
1407         if (error) {
1408                 ip->i_nlink = 0;
1409                 ip->i_flag |= IN_CHANGE;
1410                 vput(tvp);
1411         } else
1412                 *ap->a_vpp = tvp;
1413 out:
1414         return (error);
1415 #undef  DIRBLKSIZ
1416 #define DIRBLKSIZ  DEV_BSIZE
1417 }
1418
1419 /*
1420  * Rmdir system call.
1421  */
1422 static int
1423 ext2_rmdir(struct vop_rmdir_args *ap)
1424 {
1425         struct vnode *vp = ap->a_vp;
1426         struct vnode *dvp = ap->a_dvp;
1427         struct componentname *cnp = ap->a_cnp;
1428         struct inode *ip, *dp;
1429         int error;
1430
1431         ip = VTOI(vp);
1432         dp = VTOI(dvp);
1433
1434         /*
1435          * Verify the directory is empty (and valid).
1436          * (Rmdir ".." won't be valid since
1437          *  ".." will contain a reference to
1438          *  the current directory and thus be
1439          *  non-empty.)
1440          */
1441         if (!ext2_dirempty(ip, dp->i_number, cnp->cn_cred)) {
1442                 error = ENOTEMPTY;
1443                 goto out;
1444         }
1445         if ((dp->i_flags & APPEND)
1446             || (ip->i_flags & (NOUNLINK | IMMUTABLE | APPEND))) {
1447                 error = EPERM;
1448                 goto out;
1449         }
1450         /*
1451          * Delete reference to directory before purging
1452          * inode.  If we crash in between, the directory
1453          * will be reattached to lost+found,
1454          */
1455         error = ext2_dirremove(dvp, cnp);
1456         if (error)
1457                 goto out;
1458         ext2_dec_nlink(dp);
1459         dp->i_flag |= IN_CHANGE;
1460         cache_purge(dvp);
1461         VOP_UNLOCK(dvp, 0);
1462         /*
1463          * Truncate inode.  The only stuff left
1464          * in the directory is "." and "..".
1465          */
1466         ip->i_nlink = 0;
1467         error = ext2_truncate(vp, (off_t)0, IO_SYNC, cnp->cn_cred,
1468             cnp->cn_thread);
1469         cache_purge(ITOV(ip));
1470         if (vn_lock(dvp, LK_EXCLUSIVE | LK_NOWAIT) != 0) {
1471                 VOP_UNLOCK(vp, 0);
1472                 vn_lock(dvp, LK_EXCLUSIVE | LK_RETRY);
1473                 vn_lock(vp, LK_EXCLUSIVE | LK_RETRY);
1474         }
1475 out:
1476         return (error);
1477 }
1478
1479 /*
1480  * symlink -- make a symbolic link
1481  */
1482 static int
1483 ext2_symlink(struct vop_symlink_args *ap)
1484 {
1485         struct vnode *vp, **vpp = ap->a_vpp;
1486         struct inode *ip;
1487         int len, error;
1488
1489         error = ext2_makeinode(IFLNK | ap->a_vap->va_mode, ap->a_dvp,
1490             vpp, ap->a_cnp);
1491         if (error)
1492                 return (error);
1493         vp = *vpp;
1494         len = strlen(ap->a_target);
1495         if (len < vp->v_mount->mnt_maxsymlinklen) {
1496                 ip = VTOI(vp);
1497                 bcopy(ap->a_target, (char *)ip->i_shortlink, len);
1498                 ip->i_size = len;
1499                 ip->i_flag |= IN_CHANGE | IN_UPDATE;
1500         } else
1501                 error = vn_rdwr(UIO_WRITE, vp, ap->a_target, len, (off_t)0,
1502                     UIO_SYSSPACE, IO_NODELOCKED | IO_NOMACCHECK,
1503                     ap->a_cnp->cn_cred, NOCRED, NULL, NULL);
1504         if (error)
1505                 vput(vp);
1506         return (error);
1507 }
1508
1509 /*
1510  * Return target name of a symbolic link
1511  */
1512 static int
1513 ext2_readlink(struct vop_readlink_args *ap)
1514 {
1515         struct vnode *vp = ap->a_vp;
1516         struct inode *ip = VTOI(vp);
1517         int isize;
1518
1519         isize = ip->i_size;
1520         if (isize < vp->v_mount->mnt_maxsymlinklen) {
1521                 uiomove((char *)ip->i_shortlink, isize, ap->a_uio);
1522                 return (0);
1523         }
1524         return (VOP_READ(vp, ap->a_uio, 0, ap->a_cred));
1525 }
1526
1527 /*
1528  * Calculate the logical to physical mapping if not done already,
1529  * then call the device strategy routine.
1530  *
1531  * In order to be able to swap to a file, the ext2_bmaparray() operation may not
1532  * deadlock on memory.  See ext2_bmap() for details.
1533  */
1534 static int
1535 ext2_strategy(struct vop_strategy_args *ap)
1536 {
1537         struct buf *bp = ap->a_bp;
1538         struct vnode *vp = ap->a_vp;
1539         struct bufobj *bo;
1540         daddr_t blkno;
1541         int error;
1542
1543         if (vp->v_type == VBLK || vp->v_type == VCHR)
1544                 panic("ext2_strategy: spec");
1545         if (bp->b_blkno == bp->b_lblkno) {
1546
1547                 if (VTOI(ap->a_vp)->i_flag & IN_E4EXTENTS)
1548                         error = ext4_bmapext(vp, bp->b_lblkno, &blkno, NULL, NULL);
1549                 else
1550                         error = ext2_bmaparray(vp, bp->b_lblkno, &blkno, NULL, NULL);
1551
1552                 bp->b_blkno = blkno;
1553                 if (error) {
1554                         bp->b_error = error;
1555                         bp->b_ioflags |= BIO_ERROR;
1556                         bufdone(bp);
1557                         return (0);
1558                 }
1559                 if ((long)bp->b_blkno == -1)
1560                         vfs_bio_clrbuf(bp);
1561         }
1562         if ((long)bp->b_blkno == -1) {
1563                 bufdone(bp);
1564                 return (0);
1565         }
1566         bp->b_iooffset = dbtob(bp->b_blkno);
1567         bo = VFSTOEXT2(vp->v_mount)->um_bo;
1568         BO_STRATEGY(bo, bp);
1569         return (0);
1570 }
1571
1572 /*
1573  * Print out the contents of an inode.
1574  */
1575 static int
1576 ext2_print(struct vop_print_args *ap)
1577 {
1578         struct vnode *vp = ap->a_vp;
1579         struct inode *ip = VTOI(vp);
1580
1581         vn_printf(ip->i_devvp, "\tino %ju", (uintmax_t)ip->i_number);
1582         if (vp->v_type == VFIFO)
1583                 fifo_printinfo(vp);
1584         printf("\n");
1585         return (0);
1586 }
1587
1588 /*
1589  * Close wrapper for fifos.
1590  *
1591  * Update the times on the inode then do device close.
1592  */
1593 static int
1594 ext2fifo_close(struct vop_close_args *ap)
1595 {
1596         struct vnode *vp = ap->a_vp;
1597
1598         VI_LOCK(vp);
1599         if (vp->v_usecount > 1)
1600                 ext2_itimes_locked(vp);
1601         VI_UNLOCK(vp);
1602         return (fifo_specops.vop_close(ap));
1603 }
1604
1605 /*
1606  * Kqfilter wrapper for fifos.
1607  *
1608  * Fall through to ext2 kqfilter routines if needed
1609  */
1610 static int
1611 ext2fifo_kqfilter(struct vop_kqfilter_args *ap)
1612 {
1613         int error;
1614
1615         error = fifo_specops.vop_kqfilter(ap);
1616         if (error)
1617                 error = vfs_kqfilter(ap);
1618         return (error);
1619 }
1620
1621 /*
1622  * Return POSIX pathconf information applicable to ext2 filesystems.
1623  */
1624 static int
1625 ext2_pathconf(struct vop_pathconf_args *ap)
1626 {
1627         int error = 0;
1628
1629         switch (ap->a_name) {
1630         case _PC_LINK_MAX:
1631                 if (ext2_htree_has_idx(VTOI(ap->a_vp)))
1632                         *ap->a_retval = INT_MAX;
1633                 else
1634                         *ap->a_retval = ext2_max_nlink(VTOI(ap->a_vp));
1635                 break;
1636         case _PC_NO_TRUNC:
1637                 *ap->a_retval = 1;
1638                 break;
1639
1640 #ifdef UFS_ACL
1641         case _PC_ACL_EXTENDED:
1642                 if (ap->a_vp->v_mount->mnt_flag & MNT_ACLS)
1643                         *ap->a_retval = 1;
1644                 else
1645                         *ap->a_retval = 0;
1646                 break;
1647         case _PC_ACL_PATH_MAX:
1648                 if (ap->a_vp->v_mount->mnt_flag & MNT_ACLS)
1649                         *ap->a_retval = ACL_MAX_ENTRIES;
1650                 else
1651                         *ap->a_retval = 3;
1652                 break;
1653 #endif /* UFS_ACL */
1654
1655         case _PC_MIN_HOLE_SIZE:
1656                 *ap->a_retval = ap->a_vp->v_mount->mnt_stat.f_iosize;
1657                 break;
1658         case _PC_PRIO_IO:
1659                 *ap->a_retval = 0;
1660                 break;
1661         case _PC_SYNC_IO:
1662                 *ap->a_retval = 0;
1663                 break;
1664         case _PC_ALLOC_SIZE_MIN:
1665                 *ap->a_retval = ap->a_vp->v_mount->mnt_stat.f_bsize;
1666                 break;
1667         case _PC_FILESIZEBITS:
1668                 *ap->a_retval = 64;
1669                 break;
1670         case _PC_REC_INCR_XFER_SIZE:
1671                 *ap->a_retval = ap->a_vp->v_mount->mnt_stat.f_iosize;
1672                 break;
1673         case _PC_REC_MAX_XFER_SIZE:
1674                 *ap->a_retval = -1;     /* means ``unlimited'' */
1675                 break;
1676         case _PC_REC_MIN_XFER_SIZE:
1677                 *ap->a_retval = ap->a_vp->v_mount->mnt_stat.f_iosize;
1678                 break;
1679         case _PC_REC_XFER_ALIGN:
1680                 *ap->a_retval = PAGE_SIZE;
1681                 break;
1682         case _PC_SYMLINK_MAX:
1683                 *ap->a_retval = MAXPATHLEN;
1684                 break;
1685
1686         default:
1687                 error = vop_stdpathconf(ap);
1688                 break;
1689         }
1690         return (error);
1691 }
1692
1693 /*
1694  * Vnode operation to remove a named attribute.
1695  */
1696 static int
1697 ext2_deleteextattr(struct vop_deleteextattr_args *ap)
1698 {
1699         struct inode *ip;
1700         struct m_ext2fs *fs;
1701         int error;
1702
1703         ip = VTOI(ap->a_vp);
1704         fs = ip->i_e2fs;
1705
1706         if (!EXT2_HAS_COMPAT_FEATURE(ip->i_e2fs, EXT2F_COMPAT_EXT_ATTR))
1707                 return (EOPNOTSUPP);
1708
1709         if (ap->a_vp->v_type == VCHR || ap->a_vp->v_type == VBLK)
1710                 return (EOPNOTSUPP);
1711
1712         error = extattr_check_cred(ap->a_vp, ap->a_attrnamespace,
1713             ap->a_cred, ap->a_td, VWRITE);
1714         if (error)
1715                 return (error);
1716
1717         error = ENOATTR;
1718
1719         if (EXT2_INODE_SIZE(fs) != E2FS_REV0_INODE_SIZE) {
1720                 error = ext2_extattr_inode_delete(ip, ap->a_attrnamespace, ap->a_name);
1721                 if (error != ENOATTR)
1722                         return (error);
1723         }
1724
1725         if (ip->i_facl)
1726                 error = ext2_extattr_block_delete(ip, ap->a_attrnamespace, ap->a_name);
1727
1728         return (error);
1729 }
1730
1731 /*
1732  * Vnode operation to retrieve a named extended attribute.
1733  */
1734 static int
1735 ext2_getextattr(struct vop_getextattr_args *ap)
1736 {
1737         struct inode *ip;
1738         struct m_ext2fs *fs;
1739         int error;
1740
1741         ip = VTOI(ap->a_vp);
1742         fs = ip->i_e2fs;
1743
1744         if (!EXT2_HAS_COMPAT_FEATURE(ip->i_e2fs, EXT2F_COMPAT_EXT_ATTR))
1745                 return (EOPNOTSUPP);
1746
1747         if (ap->a_vp->v_type == VCHR || ap->a_vp->v_type == VBLK)
1748                 return (EOPNOTSUPP);
1749
1750         error = extattr_check_cred(ap->a_vp, ap->a_attrnamespace,
1751             ap->a_cred, ap->a_td, VREAD);
1752         if (error)
1753                 return (error);
1754
1755         if (ap->a_size != NULL)
1756                 *ap->a_size = 0;
1757
1758         error = ENOATTR;
1759
1760         if (EXT2_INODE_SIZE(fs) != E2FS_REV0_INODE_SIZE) {
1761                 error = ext2_extattr_inode_get(ip, ap->a_attrnamespace,
1762                     ap->a_name, ap->a_uio, ap->a_size);
1763                 if (error != ENOATTR)
1764                         return (error);
1765         }
1766
1767         if (ip->i_facl)
1768                 error = ext2_extattr_block_get(ip, ap->a_attrnamespace,
1769                     ap->a_name, ap->a_uio, ap->a_size);
1770
1771         return (error);
1772 }
1773
1774 /*
1775  * Vnode operation to retrieve extended attributes on a vnode.
1776  */
1777 static int
1778 ext2_listextattr(struct vop_listextattr_args *ap)
1779 {
1780         struct inode *ip;
1781         struct m_ext2fs *fs;
1782         int error;
1783
1784         ip = VTOI(ap->a_vp);
1785         fs = ip->i_e2fs;
1786
1787         if (!EXT2_HAS_COMPAT_FEATURE(ip->i_e2fs, EXT2F_COMPAT_EXT_ATTR))
1788                 return (EOPNOTSUPP);
1789
1790         if (ap->a_vp->v_type == VCHR || ap->a_vp->v_type == VBLK)
1791                 return (EOPNOTSUPP);
1792
1793         error = extattr_check_cred(ap->a_vp, ap->a_attrnamespace,
1794             ap->a_cred, ap->a_td, VREAD);
1795         if (error)
1796                 return (error);
1797
1798         if (ap->a_size != NULL)
1799                 *ap->a_size = 0;
1800
1801         if (EXT2_INODE_SIZE(fs) != E2FS_REV0_INODE_SIZE) {
1802                 error = ext2_extattr_inode_list(ip, ap->a_attrnamespace,
1803                     ap->a_uio, ap->a_size);
1804                 if (error)
1805                         return (error);
1806         }
1807
1808         if (ip->i_facl)
1809                 error = ext2_extattr_block_list(ip, ap->a_attrnamespace,
1810                     ap->a_uio, ap->a_size);
1811
1812         return (error);
1813 }
1814
1815 /*
1816  * Vnode operation to set a named attribute.
1817  */
1818 static int
1819 ext2_setextattr(struct vop_setextattr_args *ap)
1820 {
1821         struct inode *ip;
1822         struct m_ext2fs *fs;
1823         int error;
1824
1825         ip = VTOI(ap->a_vp);
1826         fs = ip->i_e2fs;
1827
1828         if (!EXT2_HAS_COMPAT_FEATURE(ip->i_e2fs, EXT2F_COMPAT_EXT_ATTR))
1829                 return (EOPNOTSUPP);
1830
1831         if (ap->a_vp->v_type == VCHR || ap->a_vp->v_type == VBLK)
1832                 return (EOPNOTSUPP);
1833
1834         error = extattr_check_cred(ap->a_vp, ap->a_attrnamespace,
1835             ap->a_cred, ap->a_td, VWRITE);
1836         if (error)
1837                 return (error);
1838
1839         error = ext2_extattr_valid_attrname(ap->a_attrnamespace, ap->a_name);
1840         if (error)
1841                 return (error);
1842
1843         if (EXT2_INODE_SIZE(fs) != E2FS_REV0_INODE_SIZE) {
1844                 error = ext2_extattr_inode_set(ip, ap->a_attrnamespace,
1845                     ap->a_name, ap->a_uio);
1846                 if (error != ENOSPC)
1847                         return (error);
1848         }
1849
1850         error = ext2_extattr_block_set(ip, ap->a_attrnamespace,
1851             ap->a_name, ap->a_uio);
1852
1853         return (error);
1854 }
1855
1856 /*
1857  * Vnode pointer to File handle
1858  */
1859 /* ARGSUSED */
1860 static int
1861 ext2_vptofh(struct vop_vptofh_args *ap)
1862 {
1863         struct inode *ip;
1864         struct ufid *ufhp;
1865
1866         ip = VTOI(ap->a_vp);
1867         ufhp = (struct ufid *)ap->a_fhp;
1868         ufhp->ufid_len = sizeof(struct ufid);
1869         ufhp->ufid_ino = ip->i_number;
1870         ufhp->ufid_gen = ip->i_gen;
1871         return (0);
1872 }
1873
1874 /*
1875  * Initialize the vnode associated with a new inode, handle aliased
1876  * vnodes.
1877  */
1878 int
1879 ext2_vinit(struct mount *mntp, struct vop_vector *fifoops, struct vnode **vpp)
1880 {
1881         struct inode *ip;
1882         struct vnode *vp;
1883
1884         vp = *vpp;
1885         ip = VTOI(vp);
1886         vp->v_type = IFTOVT(ip->i_mode);
1887         if (vp->v_type == VFIFO)
1888                 vp->v_op = fifoops;
1889
1890         if (ip->i_number == EXT2_ROOTINO)
1891                 vp->v_vflag |= VV_ROOT;
1892         ip->i_modrev = init_va_filerev();
1893         *vpp = vp;
1894         return (0);
1895 }
1896
1897 /*
1898  * Allocate a new inode.
1899  */
1900 static int
1901 ext2_makeinode(int mode, struct vnode *dvp, struct vnode **vpp,
1902     struct componentname *cnp)
1903 {
1904         struct inode *ip, *pdir;
1905         struct vnode *tvp;
1906         int error;
1907
1908         pdir = VTOI(dvp);
1909 #ifdef INVARIANTS
1910         if ((cnp->cn_flags & HASBUF) == 0)
1911                 panic("ext2_makeinode: no name");
1912 #endif
1913         *vpp = NULL;
1914         if ((mode & IFMT) == 0)
1915                 mode |= IFREG;
1916
1917         error = ext2_valloc(dvp, mode, cnp->cn_cred, &tvp);
1918         if (error) {
1919                 return (error);
1920         }
1921         ip = VTOI(tvp);
1922         ip->i_gid = pdir->i_gid;
1923 #ifdef SUIDDIR
1924         {
1925                 /*
1926                  * if we are
1927                  * not the owner of the directory,
1928                  * and we are hacking owners here, (only do this where told to)
1929                  * and we are not giving it TOO root, (would subvert quotas)
1930                  * then go ahead and give it to the other user.
1931                  * Note that this drops off the execute bits for security.
1932                  */
1933                 if ((dvp->v_mount->mnt_flag & MNT_SUIDDIR) &&
1934                     (pdir->i_mode & ISUID) &&
1935                     (pdir->i_uid != cnp->cn_cred->cr_uid) && pdir->i_uid) {
1936                         ip->i_uid = pdir->i_uid;
1937                         mode &= ~07111;
1938                 } else {
1939                         ip->i_uid = cnp->cn_cred->cr_uid;
1940                 }
1941         }
1942 #else
1943         ip->i_uid = cnp->cn_cred->cr_uid;
1944 #endif
1945         ip->i_flag |= IN_ACCESS | IN_CHANGE | IN_UPDATE;
1946         ip->i_mode = mode;
1947         tvp->v_type = IFTOVT(mode);     /* Rest init'd in getnewvnode(). */
1948         ip->i_nlink = 1;
1949         if ((ip->i_mode & ISGID) && !groupmember(ip->i_gid, cnp->cn_cred)) {
1950                 if (priv_check_cred(cnp->cn_cred, PRIV_VFS_RETAINSUGID, 0))
1951                         ip->i_mode &= ~ISGID;
1952         }
1953
1954         if (cnp->cn_flags & ISWHITEOUT)
1955                 ip->i_flags |= UF_OPAQUE;
1956
1957         /*
1958          * Make sure inode goes to disk before directory entry.
1959          */
1960         error = ext2_update(tvp, !DOINGASYNC(tvp));
1961         if (error)
1962                 goto bad;
1963
1964 #ifdef UFS_ACL
1965         if (dvp->v_mount->mnt_flag & MNT_ACLS) {
1966                 error = ext2_do_posix1e_acl_inheritance_file(dvp, tvp, mode,
1967                     cnp->cn_cred, cnp->cn_thread);
1968                 if (error)
1969                         goto bad;
1970         }
1971 #endif /* UFS_ACL */
1972
1973         error = ext2_direnter(ip, dvp, cnp);
1974         if (error)
1975                 goto bad;
1976
1977         *vpp = tvp;
1978         return (0);
1979
1980 bad:
1981         /*
1982          * Write error occurred trying to update the inode
1983          * or the directory so must deallocate the inode.
1984          */
1985         ip->i_nlink = 0;
1986         ip->i_flag |= IN_CHANGE;
1987         vput(tvp);
1988         return (error);
1989 }
1990
1991 /*
1992  * Vnode op for reading.
1993  */
1994 static int
1995 ext2_read(struct vop_read_args *ap)
1996 {
1997         struct vnode *vp;
1998         struct inode *ip;
1999         struct uio *uio;
2000         struct m_ext2fs *fs;
2001         struct buf *bp;
2002         daddr_t lbn, nextlbn;
2003         off_t bytesinfile;
2004         long size, xfersize, blkoffset;
2005         int error, orig_resid, seqcount;
2006         int ioflag;
2007
2008         vp = ap->a_vp;
2009         uio = ap->a_uio;
2010         ioflag = ap->a_ioflag;
2011
2012         seqcount = ap->a_ioflag >> IO_SEQSHIFT;
2013         ip = VTOI(vp);
2014
2015 #ifdef INVARIANTS
2016         if (uio->uio_rw != UIO_READ)
2017                 panic("%s: mode", "ext2_read");
2018
2019         if (vp->v_type == VLNK) {
2020                 if ((int)ip->i_size < vp->v_mount->mnt_maxsymlinklen)
2021                         panic("%s: short symlink", "ext2_read");
2022         } else if (vp->v_type != VREG && vp->v_type != VDIR)
2023                 panic("%s: type %d", "ext2_read", vp->v_type);
2024 #endif
2025         orig_resid = uio->uio_resid;
2026         KASSERT(orig_resid >= 0, ("ext2_read: uio->uio_resid < 0"));
2027         if (orig_resid == 0)
2028                 return (0);
2029         KASSERT(uio->uio_offset >= 0, ("ext2_read: uio->uio_offset < 0"));
2030         fs = ip->i_e2fs;
2031         if (uio->uio_offset < ip->i_size &&
2032             uio->uio_offset >= fs->e2fs_maxfilesize)
2033                 return (EOVERFLOW);
2034
2035         for (error = 0, bp = NULL; uio->uio_resid > 0; bp = NULL) {
2036                 if ((bytesinfile = ip->i_size - uio->uio_offset) <= 0)
2037                         break;
2038                 lbn = lblkno(fs, uio->uio_offset);
2039                 nextlbn = lbn + 1;
2040                 size = blksize(fs, ip, lbn);
2041                 blkoffset = blkoff(fs, uio->uio_offset);
2042
2043                 xfersize = fs->e2fs_fsize - blkoffset;
2044                 if (uio->uio_resid < xfersize)
2045                         xfersize = uio->uio_resid;
2046                 if (bytesinfile < xfersize)
2047                         xfersize = bytesinfile;
2048
2049                 if (lblktosize(fs, nextlbn) >= ip->i_size)
2050                         error = bread(vp, lbn, size, NOCRED, &bp);
2051                 else if ((vp->v_mount->mnt_flag & MNT_NOCLUSTERR) == 0) {
2052                         error = cluster_read(vp, ip->i_size, lbn, size,
2053                             NOCRED, blkoffset + uio->uio_resid, seqcount,
2054                             0, &bp);
2055                 } else if (seqcount > 1) {
2056                         u_int nextsize = blksize(fs, ip, nextlbn);
2057
2058                         error = breadn(vp, lbn,
2059                             size, &nextlbn, &nextsize, 1, NOCRED, &bp);
2060                 } else
2061                         error = bread(vp, lbn, size, NOCRED, &bp);
2062                 if (error) {
2063                         brelse(bp);
2064                         bp = NULL;
2065                         break;
2066                 }
2067
2068                 /*
2069                  * We should only get non-zero b_resid when an I/O error
2070                  * has occurred, which should cause us to break above.
2071                  * However, if the short read did not cause an error,
2072                  * then we want to ensure that we do not uiomove bad
2073                  * or uninitialized data.
2074                  */
2075                 size -= bp->b_resid;
2076                 if (size < xfersize) {
2077                         if (size == 0)
2078                                 break;
2079                         xfersize = size;
2080                 }
2081                 error = uiomove((char *)bp->b_data + blkoffset,
2082                     (int)xfersize, uio);
2083                 if (error)
2084                         break;
2085                 vfs_bio_brelse(bp, ioflag);
2086         }
2087
2088         /*
2089          * This can only happen in the case of an error because the loop
2090          * above resets bp to NULL on each iteration and on normal
2091          * completion has not set a new value into it. so it must have come
2092          * from a 'break' statement
2093          */
2094         if (bp != NULL)
2095                 vfs_bio_brelse(bp, ioflag);
2096
2097         if ((error == 0 || uio->uio_resid != orig_resid) &&
2098             (vp->v_mount->mnt_flag & (MNT_NOATIME | MNT_RDONLY)) == 0)
2099                 ip->i_flag |= IN_ACCESS;
2100         return (error);
2101 }
2102
2103 static int
2104 ext2_ioctl(struct vop_ioctl_args *ap)
2105 {
2106
2107         switch (ap->a_command) {
2108         case FIOSEEKDATA:
2109         case FIOSEEKHOLE:
2110                 return (vn_bmap_seekhole(ap->a_vp, ap->a_command,
2111                     (off_t *)ap->a_data, ap->a_cred));
2112         default:
2113                 return (ENOTTY);
2114         }
2115 }
2116
2117 /*
2118  * Vnode op for writing.
2119  */
2120 static int
2121 ext2_write(struct vop_write_args *ap)
2122 {
2123         struct vnode *vp;
2124         struct uio *uio;
2125         struct inode *ip;
2126         struct m_ext2fs *fs;
2127         struct buf *bp;
2128         daddr_t lbn;
2129         off_t osize;
2130         int blkoffset, error, flags, ioflag, resid, size, seqcount, xfersize;
2131
2132         ioflag = ap->a_ioflag;
2133         uio = ap->a_uio;
2134         vp = ap->a_vp;
2135
2136         seqcount = ioflag >> IO_SEQSHIFT;
2137         ip = VTOI(vp);
2138
2139 #ifdef INVARIANTS
2140         if (uio->uio_rw != UIO_WRITE)
2141                 panic("%s: mode", "ext2_write");
2142 #endif
2143
2144         switch (vp->v_type) {
2145         case VREG:
2146                 if (ioflag & IO_APPEND)
2147                         uio->uio_offset = ip->i_size;
2148                 if ((ip->i_flags & APPEND) && uio->uio_offset != ip->i_size)
2149                         return (EPERM);
2150                 /* FALLTHROUGH */
2151         case VLNK:
2152                 break;
2153         case VDIR:
2154                 /* XXX differs from ffs -- this is called from ext2_mkdir(). */
2155                 if ((ioflag & IO_SYNC) == 0)
2156                         panic("ext2_write: nonsync dir write");
2157                 break;
2158         default:
2159                 panic("ext2_write: type %p %d (%jd,%jd)", (void *)vp,
2160                     vp->v_type, (intmax_t)uio->uio_offset,
2161                     (intmax_t)uio->uio_resid);
2162         }
2163
2164         KASSERT(uio->uio_resid >= 0, ("ext2_write: uio->uio_resid < 0"));
2165         KASSERT(uio->uio_offset >= 0, ("ext2_write: uio->uio_offset < 0"));
2166         fs = ip->i_e2fs;
2167         if ((uoff_t)uio->uio_offset + uio->uio_resid > fs->e2fs_maxfilesize)
2168                 return (EFBIG);
2169         /*
2170          * Maybe this should be above the vnode op call, but so long as
2171          * file servers have no limits, I don't think it matters.
2172          */
2173         if (vn_rlimit_fsize(vp, uio, uio->uio_td))
2174                 return (EFBIG);
2175
2176         resid = uio->uio_resid;
2177         osize = ip->i_size;
2178         if (seqcount > BA_SEQMAX)
2179                 flags = BA_SEQMAX << BA_SEQSHIFT;
2180         else
2181                 flags = seqcount << BA_SEQSHIFT;
2182         if ((ioflag & IO_SYNC) && !DOINGASYNC(vp))
2183                 flags |= IO_SYNC;
2184
2185         for (error = 0; uio->uio_resid > 0;) {
2186                 lbn = lblkno(fs, uio->uio_offset);
2187                 blkoffset = blkoff(fs, uio->uio_offset);
2188                 xfersize = fs->e2fs_fsize - blkoffset;
2189                 if (uio->uio_resid < xfersize)
2190                         xfersize = uio->uio_resid;
2191                 if (uio->uio_offset + xfersize > ip->i_size)
2192                         vnode_pager_setsize(vp, uio->uio_offset + xfersize);
2193
2194                 /*
2195                  * We must perform a read-before-write if the transfer size
2196                  * does not cover the entire buffer.
2197                  */
2198                 if (fs->e2fs_bsize > xfersize)
2199                         flags |= BA_CLRBUF;
2200                 else
2201                         flags &= ~BA_CLRBUF;
2202                 error = ext2_balloc(ip, lbn, blkoffset + xfersize,
2203                     ap->a_cred, &bp, flags);
2204                 if (error != 0)
2205                         break;
2206
2207                 if ((ioflag & (IO_SYNC | IO_INVAL)) == (IO_SYNC | IO_INVAL))
2208                         bp->b_flags |= B_NOCACHE;
2209                 if (uio->uio_offset + xfersize > ip->i_size)
2210                         ip->i_size = uio->uio_offset + xfersize;
2211                 size = blksize(fs, ip, lbn) - bp->b_resid;
2212                 if (size < xfersize)
2213                         xfersize = size;
2214
2215                 error =
2216                     uiomove((char *)bp->b_data + blkoffset, (int)xfersize, uio);
2217                 /*
2218                  * If the buffer is not already filled and we encounter an
2219                  * error while trying to fill it, we have to clear out any
2220                  * garbage data from the pages instantiated for the buffer.
2221                  * If we do not, a failed uiomove() during a write can leave
2222                  * the prior contents of the pages exposed to a userland mmap.
2223                  *
2224                  * Note that we need only clear buffers with a transfer size
2225                  * equal to the block size because buffers with a shorter
2226                  * transfer size were cleared above by the call to ext2_balloc()
2227                  * with the BA_CLRBUF flag set.
2228                  *
2229                  * If the source region for uiomove identically mmaps the
2230                  * buffer, uiomove() performed the NOP copy, and the buffer
2231                  * content remains valid because the page fault handler
2232                  * validated the pages.
2233                  */
2234                 if (error != 0 && (bp->b_flags & B_CACHE) == 0 &&
2235                     fs->e2fs_bsize == xfersize)
2236                         vfs_bio_clrbuf(bp);
2237
2238                 vfs_bio_set_flags(bp, ioflag);
2239
2240                 /*
2241                  * If IO_SYNC each buffer is written synchronously.  Otherwise
2242                  * if we have a severe page deficiency write the buffer
2243                  * asynchronously.  Otherwise try to cluster, and if that
2244                  * doesn't do it then either do an async write (if O_DIRECT),
2245                  * or a delayed write (if not).
2246                  */
2247                 if (ioflag & IO_SYNC) {
2248                         (void)bwrite(bp);
2249                 } else if (vm_page_count_severe() ||
2250                             buf_dirty_count_severe() ||
2251                     (ioflag & IO_ASYNC)) {
2252                         bp->b_flags |= B_CLUSTEROK;
2253                         bawrite(bp);
2254                 } else if (xfersize + blkoffset == fs->e2fs_fsize) {
2255                         if ((vp->v_mount->mnt_flag & MNT_NOCLUSTERW) == 0) {
2256                                 bp->b_flags |= B_CLUSTEROK;
2257                                 cluster_write(vp, bp, ip->i_size, seqcount, 0);
2258                         } else {
2259                                 bawrite(bp);
2260                         }
2261                 } else if (ioflag & IO_DIRECT) {
2262                         bp->b_flags |= B_CLUSTEROK;
2263                         bawrite(bp);
2264                 } else {
2265                         bp->b_flags |= B_CLUSTEROK;
2266                         bdwrite(bp);
2267                 }
2268                 if (error || xfersize == 0)
2269                         break;
2270         }
2271         /*
2272          * If we successfully wrote any data, and we are not the superuser
2273          * we clear the setuid and setgid bits as a precaution against
2274          * tampering.
2275          */
2276         if ((ip->i_mode & (ISUID | ISGID)) && resid > uio->uio_resid &&
2277             ap->a_cred) {
2278                 if (priv_check_cred(ap->a_cred, PRIV_VFS_RETAINSUGID, 0))
2279                         ip->i_mode &= ~(ISUID | ISGID);
2280         }
2281         if (error) {
2282                 if (ioflag & IO_UNIT) {
2283                         (void)ext2_truncate(vp, osize,
2284                             ioflag & IO_SYNC, ap->a_cred, uio->uio_td);
2285                         uio->uio_offset -= resid - uio->uio_resid;
2286                         uio->uio_resid = resid;
2287                 }
2288         }
2289         if (uio->uio_resid != resid) {
2290                 ip->i_flag |= IN_CHANGE | IN_UPDATE;
2291                 if (ioflag & IO_SYNC)
2292                         error = ext2_update(vp, 1);
2293         }
2294         return (error);
2295 }