add ufs_pathconf
[unix-history] / usr / src / sys / ufs / ffs / ufs_vnops.c
index 2009018..d5bc891 100644 (file)
-/*     ufs_vnops.c     4.19    82/03/12        */
-
-#include "../h/param.h"
-#include "../h/systm.h"
-#include "../h/mount.h"
-#include "../h/ino.h"
-#include "../h/reg.h"
-#include "../h/buf.h"
-#include "../h/filsys.h"
-#include "../h/dir.h"
-#include "../h/user.h"
-#include "../h/inode.h"
-#include "../h/file.h"
-#include "../h/conf.h"
-#include "../h/stat.h"
-#include "../h/inline.h"
-#include "../h/socket.h"
-#include "../h/socketvar.h"
-
-/*
- * the fstat system call.
- */
-fstat()
-{
-       register struct file *fp;
-       register struct a {
-               int     fdes;
-               struct stat *sb;
-       } *uap;
-
-       uap = (struct a *)u.u_ap;
-       fp = getf(uap->fdes);
-       if (fp == NULL)
-               return;
-       if (fp->f_flag & FSOCKET)
-               u.u_error = sostat(fp->f_socket, uap->sb);
-       else
-               stat1(fp->f_inode, uap->sb);
+/*
+ * Copyright (c) 1982, 1986, 1989 Regents of the University of California.
+ * All rights reserved.
+ *
+ * %sccs.include.redist.c%
+ *
+ *     @(#)ufs_vnops.c 7.120 (Berkeley) %G%
+ */
+
+#include <sys/param.h>
+#include <sys/systm.h>
+#include <sys/namei.h>
+#include <sys/resourcevar.h>
+#include <sys/kernel.h>
+#include <sys/file.h>
+#include <sys/stat.h>
+#include <sys/buf.h>
+#include <sys/proc.h>
+#include <sys/conf.h>
+#include <sys/mount.h>
+#include <sys/vnode.h>
+#include <sys/malloc.h>
+#include <sys/dirent.h>
+
+#include <vm/vm.h>
+
+#include <miscfs/specfs/specdev.h>
+
+#include <ufs/ufs/lockf.h>
+#include <ufs/ufs/quota.h>
+#include <ufs/ufs/inode.h>
+#include <ufs/ufs/dir.h>
+#include <ufs/ufs/ufsmount.h>
+#include <ufs/ufs/ufs_extern.h>
+
+static int ufs_chmod __P((struct vnode *, int, struct ucred *, struct proc *));
+static int ufs_chown
+       __P((struct vnode *, uid_t, gid_t, struct ucred *, struct proc *));
+
+union _qcvt {
+       quad_t qcvt;
+       long val[2];
+};
+#define SETHIGH(q, h) { \
+       union _qcvt tmp; \
+       tmp.qcvt = (q); \
+       tmp.val[_QUAD_HIGHWORD] = (h); \
+       (q) = tmp.qcvt; \
+}
+#define SETLOW(q, l) { \
+       union _qcvt tmp; \
+       tmp.qcvt = (q); \
+       tmp.val[_QUAD_LOWWORD] = (l); \
+       (q) = tmp.qcvt; \
 }
 
 /*
 }
 
 /*
- * Stat system call.  This version does not follow links.
+ * Create a regular file
  */
  */
-stat()
+int
+ufs_create(ap)
+       struct vop_create_args /* {
+               struct vnode *a_dvp;
+               struct vnode **a_vpp;
+               struct componentname *a_cnp;
+               struct vattr *a_vap;
+       } */ *ap;
 {
 {
-       register struct inode *ip;
-       register struct a {
-               char    *fname;
-               struct stat *sb;
-       } *uap;
+       int error;
 
 
-       uap = (struct a *)u.u_ap;
-       ip = namei(uchar, 0, 0);
-       if (ip == NULL)
-               return;
-       stat1(ip, uap->sb);
-       iput(ip);
+       if (error =
+           ufs_makeinode(MAKEIMODE(ap->a_vap->va_type, ap->a_vap->va_mode),
+           ap->a_dvp, ap->a_vpp, ap->a_cnp))
+               return (error);
+       return (0);
 }
 
 /*
 }
 
 /*
- * Lstat system call.  This version does follow links.
+ * Mknod vnode call
  */
  */
-lstat()
+/* ARGSUSED */
+int
+ufs_mknod(ap)
+       struct vop_mknod_args /* {
+               struct vnode *a_dvp;
+               struct vnode **a_vpp;
+               struct componentname *a_cnp;
+               struct vattr *a_vap;
+       } */ *ap;
 {
 {
+       register struct vattr *vap = ap->a_vap;
+       register struct vnode **vpp = ap->a_vpp;
        register struct inode *ip;
        register struct inode *ip;
-       register struct a {
-               char    *fname;
-               struct stat *sb;
-       } *uap;
+       int error;
 
 
-       uap = (struct a *)u.u_ap;
-       ip = namei(uchar, 0, 1);
-       if (ip == NULL)
-               return;
-       stat1(ip, uap->sb);
-       iput(ip);
+       if (error =
+           ufs_makeinode(MAKEIMODE(vap->va_type, vap->va_mode),
+           ap->a_dvp, vpp, ap->a_cnp))
+               return (error);
+       ip = VTOI(*vpp);
+       ip->i_flag |= IACC|IUPD|ICHG;
+       if (vap->va_rdev != VNOVAL) {
+               /*
+                * Want to be able to use this to make badblock
+                * inodes, so don't truncate the dev number.
+                */
+               ip->i_rdev = vap->va_rdev;
+       }
+       /*
+        * Remove inode so that it will be reloaded by iget and
+        * checked to see if it is an alias of an existing entry
+        * in the inode cache.
+        */
+       vput(*vpp);
+       (*vpp)->v_type = VNON;
+       vgone(*vpp);
+       *vpp = 0;
+       return (0);
 }
 
 /*
 }
 
 /*
- * The basic routine for fstat and stat:
- * get the inode and pass appropriate parts back.
+ * Open called.
+ *
+ * Nothing to do.
  */
  */
-stat1(ip, ub)
-       register struct inode *ip;
-       struct stat *ub;
+/* ARGSUSED */
+int
+ufs_open(ap)
+       struct vop_open_args /* {
+               struct vnode *a_vp;
+               int  a_mode;
+               struct ucred *a_cred;
+               struct proc *a_p;
+       } */ *ap;
 {
 {
-       register struct dinode *dp;
-       register struct buf *bp;
-       struct stat ds;
 
 
-       IUPDAT(ip, &time, &time, 0);
        /*
        /*
-        * First copy from inode table
+        * Files marked append-only must be opened for appending.
         */
         */
-       ds.st_dev = ip->i_dev;
-       ds.st_ino = ip->i_number;
-       ds.st_mode = ip->i_mode;
-       ds.st_nlink = ip->i_nlink;
-       ds.st_uid = ip->i_uid;
-       ds.st_gid = ip->i_gid;
-       ds.st_rdev = (dev_t)ip->i_un.i_rdev;
-       ds.st_size = ip->i_size;
+       if ((VTOI(ap->a_vp)->i_flags & APPEND) &&
+           (ap->a_mode & (FWRITE | O_APPEND)) == FWRITE)
+               return (EPERM);
+       return (0);
+}
+
+/*
+ * Close called
+ *
+ * Update the times on the inode.
+ */
+/* ARGSUSED */
+int
+ufs_close(ap)
+       struct vop_close_args /* {
+               struct vnode *a_vp;
+               int  a_fflag;
+               struct ucred *a_cred;
+               struct proc *a_p;
+       } */ *ap;
+{
+       register struct vnode *vp = ap->a_vp;
+       register struct inode *ip = VTOI(vp);
+
+       if (vp->v_usecount > 1 && !(ip->i_flag & ILOCKED))
+               ITIMES(ip, &time, &time);
+       return (0);
+}
+
+/*
+ * Check mode permission on inode pointer. Mode is READ, WRITE or EXEC.
+ * The mode is shifted to select the owner/group/other fields. The
+ * super user is granted all permissions.
+ */
+int
+ufs_access(ap)
+       struct vop_access_args /* {
+               struct vnode *a_vp;
+               int  a_mode;
+               struct ucred *a_cred;
+               struct proc *a_p;
+       } */ *ap;
+{
+       register struct vnode *vp = ap->a_vp;
+       register struct inode *ip = VTOI(vp);
+       register struct ucred *cred = ap->a_cred;
+       mode_t mode = ap->a_mode;
+       register gid_t *gp;
+       int i, error;
+
+#ifdef DIAGNOSTIC
+       if (!VOP_ISLOCKED(vp)) {
+               vprint("ufs_access: not locked", vp);
+               panic("ufs_access: not locked");
+       }
+#endif
+#ifdef QUOTA
+       if (mode & VWRITE) {
+               switch (vp->v_type) {
+               case VREG: case VDIR: case VLNK:
+                       if (error = getinoquota(ip))
+                               return (error);
+               }
+       }
+#endif /* QUOTA */
+       if ((mode & VWRITE) && (ip->i_flags & IMMUTABLE))
+               return (EPERM);
        /*
        /*
-        * next the dates in the disk
+        * If you're the super-user, you always get access.
         */
         */
-       bp = bread(ip->i_dev, itod(ip->i_number));
-       dp = bp->b_un.b_dino;
-       dp += itoo(ip->i_number);
-       ds.st_atime = dp->di_atime;
-       ds.st_mtime = dp->di_mtime;
-       ds.st_ctime = dp->di_ctime;
-       brelse(bp);
-       if (copyout((caddr_t)&ds, (caddr_t)ub, sizeof(ds)) < 0)
-               u.u_error = EFAULT;
+       if (cred->cr_uid == 0)
+               return (0);
+       /*
+        * Access check is based on only one of owner, group, public.
+        * If not owner, then check group. If not a member of the
+        * group, then check public access.
+        */
+       if (cred->cr_uid != ip->i_uid) {
+               mode >>= 3;
+               gp = cred->cr_groups;
+               for (i = 0; i < cred->cr_ngroups; i++, gp++)
+                       if (ip->i_gid == *gp)
+                               goto found;
+               mode >>= 3;
+found:
+               ;
+       }
+       return ((ip->i_mode & mode) == mode ? 0 : EACCES);
+}
+
+/* ARGSUSED */
+int
+ufs_getattr(ap)
+       struct vop_getattr_args /* {
+               struct vnode *a_vp;
+               struct vattr *a_vap;
+               struct ucred *a_cred;
+               struct proc *a_p;
+       } */ *ap;
+{
+       register struct vnode *vp = ap->a_vp;
+       register struct inode *ip = VTOI(vp);
+       register struct vattr *vap = ap->a_vap;
+
+       ITIMES(ip, &time, &time);
+       /*
+        * Copy from inode table
+        */
+       vap->va_fsid = ip->i_dev;
+       vap->va_fileid = ip->i_number;
+       vap->va_mode = ip->i_mode & ~IFMT;
+       vap->va_nlink = ip->i_nlink;
+       vap->va_uid = ip->i_uid;
+       vap->va_gid = ip->i_gid;
+       vap->va_rdev = (dev_t)ip->i_rdev;
+       vap->va_size = ip->i_din.di_size;
+       vap->va_atime = ip->i_atime;
+       vap->va_mtime = ip->i_mtime;
+       vap->va_ctime = ip->i_ctime;
+       vap->va_flags = ip->i_flags;
+       vap->va_gen = ip->i_gen;
+       /* this doesn't belong here */
+       if (vp->v_type == VBLK)
+               vap->va_blocksize = BLKDEV_IOSIZE;
+       else if (vp->v_type == VCHR)
+               vap->va_blocksize = MAXBSIZE;
+       else
+               vap->va_blocksize = vp->v_mount->mnt_stat.f_iosize;
+       vap->va_bytes = dbtob(ip->i_blocks);
+       vap->va_type = vp->v_type;
+       vap->va_filerev = ip->i_modrev;
+       return (0);
 }
 
 /*
 }
 
 /*
- * Return target name of a symbolic link
+ * Set attribute vnode op. called from several syscalls
+ */
+int
+ufs_setattr(ap)
+       struct vop_setattr_args /* {
+               struct vnode *a_vp;
+               struct vattr *a_vap;
+               struct ucred *a_cred;
+               struct proc *a_p;
+       } */ *ap;
+{
+       register struct vattr *vap = ap->a_vap;
+       register struct vnode *vp = ap->a_vp;
+       register struct inode *ip = VTOI(vp);
+       register struct ucred *cred = ap->a_cred;
+       register struct proc *p = ap->a_p;
+       struct timeval atimeval, mtimeval;
+       int error;
+
+       /*
+        * Check for unsettable attributes.
+        */
+       if ((vap->va_type != VNON) || (vap->va_nlink != VNOVAL) ||
+           (vap->va_fsid != VNOVAL) || (vap->va_fileid != VNOVAL) ||
+           (vap->va_blocksize != VNOVAL) || (vap->va_rdev != VNOVAL) ||
+           ((int)vap->va_bytes != VNOVAL) || (vap->va_gen != VNOVAL)) {
+               return (EINVAL);
+       }
+       if (vap->va_flags != VNOVAL) {
+               if (cred->cr_uid != ip->i_uid &&
+                   (error = suser(cred, &p->p_acflag)))
+                       return (error);
+               if (cred->cr_uid == 0) {
+                       if ((ip->i_flags & (SF_IMMUTABLE | SF_APPEND)) &&
+                           securelevel > 0)
+                               return (EPERM);
+                       ip->i_flags = vap->va_flags;
+               } else {
+                       if (ip->i_flags & (SF_IMMUTABLE | SF_APPEND))
+                               return (EPERM);
+                       ip->i_flags &= SF_SETTABLE;
+                       ip->i_flags |= (vap->va_flags & UF_SETTABLE);
+               }
+               ip->i_flag |= ICHG;
+               if (vap->va_flags & (IMMUTABLE | APPEND))
+                       return (0);
+       }
+       if (ip->i_flags & (IMMUTABLE | APPEND))
+               return (EPERM);
+       /*
+        * Go through the fields and update iff not VNOVAL.
+        */
+       if (vap->va_uid != (uid_t)VNOVAL || vap->va_gid != (gid_t)VNOVAL)
+               if (error = ufs_chown(vp, vap->va_uid, vap->va_gid, cred, p))
+                       return (error);
+       if (vap->va_size != VNOVAL) {
+               if (vp->v_type == VDIR)
+                       return (EISDIR);
+               if (error = VOP_TRUNCATE(vp, vap->va_size, 0, cred, p))
+                       return (error);
+       }
+       ip = VTOI(vp);
+       if (vap->va_atime.ts_sec != VNOVAL || vap->va_mtime.ts_sec != VNOVAL) {
+               if (cred->cr_uid != ip->i_uid &&
+                   (error = suser(cred, &p->p_acflag)) &&
+                   ((vap->va_vaflags & VA_UTIMES_NULL) == 0 || 
+                   (error = VOP_ACCESS(vp, VWRITE, cred, p))))
+                       return (error);
+               if (vap->va_atime.ts_sec != VNOVAL)
+                       ip->i_flag |= IACC;
+               if (vap->va_mtime.ts_sec != VNOVAL)
+                       ip->i_flag |= IUPD | ICHG;
+               atimeval.tv_sec = vap->va_atime.ts_sec;
+               atimeval.tv_usec = vap->va_atime.ts_nsec / 1000;
+               mtimeval.tv_sec = vap->va_mtime.ts_sec;
+               mtimeval.tv_usec = vap->va_mtime.ts_nsec / 1000;
+               if (error = VOP_UPDATE(vp, &atimeval, &mtimeval, 1))
+                       return (error);
+       }
+       error = 0;
+       if (vap->va_mode != (mode_t)VNOVAL)
+               error = ufs_chmod(vp, (int)vap->va_mode, cred, p);
+       return (error);
+}
+
+/*
+ * Change the mode on a file.
+ * Inode must be locked before calling.
+ */
+static int
+ufs_chmod(vp, mode, cred, p)
+       register struct vnode *vp;
+       register int mode;
+       register struct ucred *cred;
+       struct proc *p;
+{
+       register struct inode *ip = VTOI(vp);
+       int error;
+
+       if (cred->cr_uid != ip->i_uid &&
+           (error = suser(cred, &p->p_acflag)))
+               return (error);
+       if (cred->cr_uid) {
+               if (vp->v_type != VDIR && (mode & ISVTX))
+                       return (EFTYPE);
+               if (!groupmember(ip->i_gid, cred) && (mode & ISGID))
+                       return (EPERM);
+       }
+       ip->i_mode &= ~07777;
+       ip->i_mode |= mode & 07777;
+       ip->i_flag |= ICHG;
+       if ((vp->v_flag & VTEXT) && (ip->i_mode & ISVTX) == 0)
+               (void) vnode_pager_uncache(vp);
+       return (0);
+}
+
+/*
+ * Perform chown operation on inode ip;
+ * inode must be locked prior to call.
+ */
+static int
+ufs_chown(vp, uid, gid, cred, p)
+       register struct vnode *vp;
+       uid_t uid;
+       gid_t gid;
+       struct ucred *cred;
+       struct proc *p;
+{
+       register struct inode *ip = VTOI(vp);
+       uid_t ouid;
+       gid_t ogid;
+       int error = 0;
+#ifdef QUOTA
+       register int i;
+       long change;
+#endif
+
+       if (uid == (uid_t)VNOVAL)
+               uid = ip->i_uid;
+       if (gid == (gid_t)VNOVAL)
+               gid = ip->i_gid;
+       /*
+        * If we don't own the file, are trying to change the owner
+        * of the file, or are not a member of the target group,
+        * the caller must be superuser or the call fails.
+        */
+       if ((cred->cr_uid != ip->i_uid || uid != ip->i_uid ||
+           !groupmember((gid_t)gid, cred)) &&
+           (error = suser(cred, &p->p_acflag)))
+               return (error);
+       ouid = ip->i_uid;
+       ogid = ip->i_gid;
+#ifdef QUOTA
+       if (error = getinoquota(ip))
+               return (error);
+       if (ouid == uid) {
+               dqrele(vp, ip->i_dquot[USRQUOTA]);
+               ip->i_dquot[USRQUOTA] = NODQUOT;
+       }
+       if (ogid == gid) {
+               dqrele(vp, ip->i_dquot[GRPQUOTA]);
+               ip->i_dquot[GRPQUOTA] = NODQUOT;
+       }
+       change = ip->i_blocks;
+       (void) chkdq(ip, -change, cred, CHOWN);
+       (void) chkiq(ip, -1, cred, CHOWN);
+       for (i = 0; i < MAXQUOTAS; i++) {
+               dqrele(vp, ip->i_dquot[i]);
+               ip->i_dquot[i] = NODQUOT;
+       }
+#endif
+       ip->i_uid = uid;
+       ip->i_gid = gid;
+#ifdef QUOTA
+       if ((error = getinoquota(ip)) == 0) {
+               if (ouid == uid) {
+                       dqrele(vp, ip->i_dquot[USRQUOTA]);
+                       ip->i_dquot[USRQUOTA] = NODQUOT;
+               }
+               if (ogid == gid) {
+                       dqrele(vp, ip->i_dquot[GRPQUOTA]);
+                       ip->i_dquot[GRPQUOTA] = NODQUOT;
+               }
+               if ((error = chkdq(ip, change, cred, CHOWN)) == 0) {
+                       if ((error = chkiq(ip, 1, cred, CHOWN)) == 0)
+                               goto good;
+                       else
+                               (void) chkdq(ip, -change, cred, CHOWN|FORCE);
+               }
+               for (i = 0; i < MAXQUOTAS; i++) {
+                       dqrele(vp, ip->i_dquot[i]);
+                       ip->i_dquot[i] = NODQUOT;
+               }
+       }
+       ip->i_uid = ouid;
+       ip->i_gid = ogid;
+       if (getinoquota(ip) == 0) {
+               if (ouid == uid) {
+                       dqrele(vp, ip->i_dquot[USRQUOTA]);
+                       ip->i_dquot[USRQUOTA] = NODQUOT;
+               }
+               if (ogid == gid) {
+                       dqrele(vp, ip->i_dquot[GRPQUOTA]);
+                       ip->i_dquot[GRPQUOTA] = NODQUOT;
+               }
+               (void) chkdq(ip, change, cred, FORCE|CHOWN);
+               (void) chkiq(ip, 1, cred, FORCE|CHOWN);
+               (void) getinoquota(ip);
+       }
+       return (error);
+good:
+       if (getinoquota(ip))
+               panic("chown: lost quota");
+#endif /* QUOTA */
+       if (ouid != uid || ogid != gid)
+               ip->i_flag |= ICHG;
+       if (ouid != uid && cred->cr_uid != 0)
+               ip->i_mode &= ~ISUID;
+       if (ogid != gid && cred->cr_uid != 0)
+               ip->i_mode &= ~ISGID;
+       return (0);
+}
+
+/* ARGSUSED */
+int
+ufs_ioctl(ap)
+       struct vop_ioctl_args /* {
+               struct vnode *a_vp;
+               int  a_command;
+               caddr_t  a_data;
+               int  a_fflag;
+               struct ucred *a_cred;
+               struct proc *a_p;
+       } */ *ap;
+{
+
+       return (ENOTTY);
+}
+
+/* ARGSUSED */
+int
+ufs_select(ap)
+       struct vop_select_args /* {
+               struct vnode *a_vp;
+               int  a_which;
+               int  a_fflags;
+               struct ucred *a_cred;
+               struct proc *a_p;
+       } */ *ap;
+{
+
+       /*
+        * We should really check to see if I/O is possible.
+        */
+       return (1);
+}
+
+/*
+ * Mmap a file
+ *
+ * NB Currently unsupported.
+ */
+/* ARGSUSED */
+int
+ufs_mmap(ap)
+       struct vop_mmap_args /* {
+               struct vnode *a_vp;
+               int  a_fflags;
+               struct ucred *a_cred;
+               struct proc *a_p;
+       } */ *ap;
+{
+
+       return (EINVAL);
+}
+
+/*
+ * Seek on a file
+ *
+ * Nothing to do, so just return.
+ */
+/* ARGSUSED */
+int
+ufs_seek(ap)
+       struct vop_seek_args /* {
+               struct vnode *a_vp;
+               off_t  a_oldoff;
+               off_t  a_newoff;
+               struct ucred *a_cred;
+       } */ *ap;
+{
+
+       return (0);
+}
+
+/*
+ * ufs remove
+ * Hard to avoid races here, especially
+ * in unlinking directories.
  */
  */
-readlink()
+int
+ufs_remove(ap)
+       struct vop_remove_args /* {
+               struct vnode *a_dvp;
+               struct vnode *a_vp;
+               struct componentname *a_cnp;
+       } */ *ap;
 {
        register struct inode *ip;
 {
        register struct inode *ip;
-       register struct a {
-               char    *name;
-               char    *buf;
-               int     count;
-       } *uap;
-
-       ip = namei(uchar, 0, 0);
-       if (ip == NULL)
-               return;
-       if ((ip->i_mode&IFMT) != IFLNK) {
-               u.u_error = ENXIO;
+       register struct vnode *vp = ap->a_vp;
+       register struct vnode *dvp = ap->a_dvp;
+       int error;
+
+       ip = VTOI(vp);
+       if ((ip->i_flags & (IMMUTABLE | APPEND)) ||
+           (VTOI(dvp)->i_flags & APPEND)) {
+               error = EPERM;
                goto out;
        }
                goto out;
        }
-       uap = (struct a *)u.u_ap;
-       u.u_offset = 0;
-       u.u_base = uap->buf;
-       u.u_count = uap->count;
-       u.u_segflg = 0;
-       readi(ip);
+       if ((error = ufs_dirremove(dvp, ap->a_cnp)) == 0) {
+               ip->i_nlink--;
+               ip->i_flag |= ICHG;
+       }
 out:
 out:
-       iput(ip);
-       u.u_r.r_val1 = uap->count - u.u_count;
+       if (dvp == vp)
+               vrele(vp);
+       else
+               vput(vp);
+       vput(dvp);
+       return (error);
 }
 
 /*
 }
 
 /*
- * symlink -- make a symbolic link
+ * link vnode call
  */
  */
-symlink()
+int
+ufs_link(ap)
+       struct vop_link_args /* {
+               struct vnode *a_vp;
+               struct vnode *a_tdvp;
+               struct componentname *a_cnp;
+       } */ *ap;
 {
 {
-       register struct a {
-               char    *target;
-               char    *linkname;
-       } *uap;
+       register struct vnode *vp = ap->a_vp;
+       register struct vnode *tdvp = ap->a_tdvp;
+       register struct componentname *cnp = ap->a_cnp;
        register struct inode *ip;
        register struct inode *ip;
-       register char *tp;
-       register c, nc;
-
-       uap = (struct a *)u.u_ap;
-       tp = uap->target;
-       nc = 0;
-       while (c = fubyte(tp)) {
-               if (c < 0) {
-                       u.u_error = EFAULT;
-                       return;
+       struct timeval tv;
+       int error;
+
+#ifdef DIAGNOSTIC
+       if ((cnp->cn_flags & HASBUF) == 0)
+               panic("ufs_link: no name");
+#endif
+       if (vp->v_mount != tdvp->v_mount) {
+               VOP_ABORTOP(vp, cnp);
+               error = EXDEV;
+               goto out2;
+       }
+       if (vp != tdvp && (error = VOP_LOCK(tdvp))) {
+               VOP_ABORTOP(vp, cnp);
+               goto out2;
+       }
+       ip = VTOI(tdvp);
+       if ((nlink_t)ip->i_nlink >= LINK_MAX) {
+               VOP_ABORTOP(vp, cnp);
+               error = EMLINK;
+               goto out1;
+       }
+       if (ip->i_flags & (IMMUTABLE | APPEND)) {
+               VOP_ABORTOP(vp, cnp);
+               error = EPERM;
+               goto out1;
+       }
+       ip->i_nlink++;
+       ip->i_flag |= ICHG;
+       tv = time;
+       error = VOP_UPDATE(tdvp, &tv, &tv, 1);
+       if (!error)
+               error = ufs_direnter(ip, vp, cnp);
+       if (error) {
+               ip->i_nlink--;
+               ip->i_flag |= ICHG;
+       }
+       FREE(cnp->cn_pnbuf, M_NAMEI);
+out1:
+       if (vp != tdvp)
+               VOP_UNLOCK(tdvp);
+out2:
+       vput(vp);
+       return (error);
+}
+
+
+
+/*
+ * relookup - lookup a path name component
+ *    Used by lookup to re-aquire things.
+ */
+int
+relookup(dvp, vpp, cnp)
+       struct vnode *dvp, **vpp;
+       struct componentname *cnp;
+{
+       register struct vnode *dp = 0;  /* the directory we are searching */
+       struct vnode *tdp;              /* saved dp */
+       struct mount *mp;               /* mount table entry */
+       int docache;                    /* == 0 do not cache last component */
+       int wantparent;                 /* 1 => wantparent or lockparent flag */
+       int rdonly;                     /* lookup read-only flag bit */
+       char *cp;                       /* DEBUG: check name ptr/len */
+       int newhash;                    /* DEBUG: check name hash */
+       int error = 0;
+
+       /*
+        * Setup: break out flag bits into variables.
+        */
+       wantparent = cnp->cn_flags & (LOCKPARENT|WANTPARENT);
+       docache = (cnp->cn_flags & NOCACHE) ^ NOCACHE;
+       if (cnp->cn_nameiop == DELETE ||
+           (wantparent && cnp->cn_nameiop != CREATE))
+               docache = 0;
+       rdonly = cnp->cn_flags & RDONLY;
+       cnp->cn_flags &= ~ISSYMLINK;
+       dp = dvp;
+       VOP_LOCK(dp);
+
+/* dirloop: */
+       /*
+        * Search a new directory.
+        *
+        * The cn_hash value is for use by vfs_cache.
+        * The last component of the filename is left accessible via
+        * cnp->cn_nameptr for callers that need the name. Callers needing
+        * the name set the SAVENAME flag. When done, they assume
+        * responsibility for freeing the pathname buffer.
+        */
+#ifdef NAMEI_DIAGNOSTIC
+       for (newhash = 0, cp = cnp->cn_nameptr; *cp != 0 && *cp != '/'; cp++)
+               newhash += (unsigned char)*cp;
+       if (newhash != cnp->cn_hash)
+               panic("relookup: bad hash");
+       if (cnp->cn_namelen != cp - cnp->cn_nameptr)
+               panic ("relookup: bad len");
+       if (*cp != 0)
+               panic("relookup: not last component");
+       printf("{%s}: ", cnp->cn_nameptr);
+#endif
+
+       /*
+        * Check for degenerate name (e.g. / or "")
+        * which is a way of talking about a directory,
+        * e.g. like "/." or ".".
+        */
+       if (cnp->cn_nameptr[0] == '\0') {
+               if (cnp->cn_nameiop != LOOKUP || wantparent) {
+                       error = EISDIR;
+                       goto bad;
+               }
+               if (dp->v_type != VDIR) {
+                       error = ENOTDIR;
+                       goto bad;
+               }
+               if (!(cnp->cn_flags & LOCKLEAF))
+                       VOP_UNLOCK(dp);
+               *vpp = dp;
+               if (cnp->cn_flags & SAVESTART)
+                       panic("lookup: SAVESTART");
+               return (0);
+       }
+
+       if (cnp->cn_flags & ISDOTDOT)
+               panic ("relookup: lookup on dot-dot");
+
+       /*
+        * We now have a segment name to search for, and a directory to search.
+        */
+       if (error = VOP_LOOKUP(dp, vpp, cnp)) {
+#ifdef DIAGNOSTIC
+               if (*vpp != NULL)
+                       panic("leaf should be empty");
+#endif
+               if (error != EJUSTRETURN)
+                       goto bad;
+               /*
+                * If creating and at end of pathname, then can consider
+                * allowing file to be created.
+                */
+               if (rdonly || (dvp->v_mount->mnt_flag & MNT_RDONLY)) {
+                       error = EROFS;
+                       goto bad;
+               }
+               /* ASSERT(dvp == ndp->ni_startdir) */
+               if (cnp->cn_flags & SAVESTART)
+                       VREF(dvp);
+               /*
+                * We return with ni_vp NULL to indicate that the entry
+                * doesn't currently exist, leaving a pointer to the
+                * (possibly locked) directory inode in ndp->ni_dvp.
+                */
+               return (0);
+       }
+       dp = *vpp;
+
+#ifdef DIAGNOSTIC
+       /*
+        * Check for symbolic link
+        */
+       if (dp->v_type == VLNK && (cnp->cn_flags & FOLLOW))
+               panic ("relookup: symlink found.\n");
+#endif
+
+nextname:
+       /*
+        * Check for read-only file systems.
+        */
+       if (cnp->cn_nameiop == DELETE || cnp->cn_nameiop == RENAME) {
+               /*
+                * Disallow directory write attempts on read-only
+                * file systems.
+                */
+               if (rdonly || (dp->v_mount->mnt_flag & MNT_RDONLY) ||
+                   (wantparent &&
+                    (dvp->v_mount->mnt_flag & MNT_RDONLY))) {
+                       error = EROFS;
+                       goto bad2;
+               }
+       }
+       /* ASSERT(dvp == ndp->ni_startdir) */
+       if (cnp->cn_flags & SAVESTART)
+               VREF(dvp);
+       
+       if (!wantparent)
+               vrele(dvp);
+       if ((cnp->cn_flags & LOCKLEAF) == 0)
+               VOP_UNLOCK(dp);
+       return (0);
+
+bad2:
+       if ((cnp->cn_flags & LOCKPARENT) && (cnp->cn_flags & ISLASTCN))
+               VOP_UNLOCK(dvp);
+       vrele(dvp);
+bad:
+       vput(dp);
+       *vpp = NULL;
+       return (error);
+}
+
+
+/*
+ * Rename system call.
+ *     rename("foo", "bar");
+ * is essentially
+ *     unlink("bar");
+ *     link("foo", "bar");
+ *     unlink("foo");
+ * but ``atomically''.  Can't do full commit without saving state in the
+ * inode on disk which isn't feasible at this time.  Best we can do is
+ * always guarantee the target exists.
+ *
+ * Basic algorithm is:
+ *
+ * 1) Bump link count on source while we're linking it to the
+ *    target.  This also ensure the inode won't be deleted out
+ *    from underneath us while we work (it may be truncated by
+ *    a concurrent `trunc' or `open' for creation).
+ * 2) Link source to destination.  If destination already exists,
+ *    delete it first.
+ * 3) Unlink source reference to inode if still around. If a
+ *    directory was moved and the parent of the destination
+ *    is different from the source, patch the ".." entry in the
+ *    directory.
+ */
+int
+ufs_rename(ap)
+       struct vop_rename_args  /* {
+               struct vnode *a_fdvp;
+               struct vnode *a_fvp;
+               struct componentname *a_fcnp;
+               struct vnode *a_tdvp;
+               struct vnode *a_tvp;
+               struct componentname *a_tcnp;
+       } */ *ap;
+{
+       struct vnode *tvp = ap->a_tvp;
+       register struct vnode *tdvp = ap->a_tdvp;
+       struct vnode *fvp = ap->a_fvp;
+       register struct vnode *fdvp = ap->a_fdvp;
+       register struct componentname *tcnp = ap->a_tcnp;
+       register struct componentname *fcnp = ap->a_fcnp;
+       register struct inode *ip, *xp, *dp;
+       struct dirtemplate dirbuf;
+       struct timeval tv;
+       int doingdirectory = 0, oldparent = 0, newparent = 0;
+       int error = 0;
+       int fdvpneedsrele = 1, tdvpneedsrele = 1;
+       u_char namlen;
+
+#ifdef DIAGNOSTIC
+       if ((tcnp->cn_flags & HASBUF) == 0 ||
+           (fcnp->cn_flags & HASBUF) == 0)
+               panic("ufs_rename: no name");
+#endif
+       /*
+        * Check for cross-device rename.
+        */
+       if ((fvp->v_mount != tdvp->v_mount) ||
+           (tvp && (fvp->v_mount != tvp->v_mount))) {
+               error = EXDEV;
+abortit:
+               VOP_ABORTOP(tdvp, tcnp); /* XXX, why not in NFS? */
+               if (tdvp == tvp)
+                       vrele(tdvp);
+               else
+                       vput(tdvp);
+               if (tvp)
+                       vput(tvp);
+               VOP_ABORTOP(fdvp, fcnp); /* XXX, why not in NFS? */
+               vrele(fdvp);
+               vrele(fvp);
+               return (error);
+       }
+
+       /*
+        * Check if just deleting a link name.
+        */
+       if (tvp && ((VTOI(tvp)->i_flags & (IMMUTABLE | APPEND)) ||
+           (VTOI(tdvp)->i_flags & APPEND))) {
+               error = EPERM;
+               goto abortit;
+       }
+       if (fvp == tvp) {
+               if (fvp->v_type == VDIR) {
+                       error = EINVAL;
+                       goto abortit;
                }
                }
-               tp++;
-               nc++;
-       }
-       u.u_dirp = uap->linkname;
-       ip = namei(uchar, 1, 0);
-       if (ip) {
-               iput(ip);
-               u.u_error = EEXIST;
-               return;
-       }
-       ip = maknode(IFLNK | 0777);
-       if (ip == NULL)
-               return;
-       u.u_base = uap->target;
-       u.u_count = nc;
-       u.u_offset = 0;
-       u.u_segflg = 0;
-       writei(ip);
-       iput(ip);
-}
-
-/*
- * the dup system call.
- */
-dup()
-{
-       register struct file *fp;
-       register struct a {
-               int     fdes;
-               int     fdes2;
-       } *uap;
-       register i, m;
-
-       uap = (struct a *)u.u_ap;
-       m = uap->fdes & ~077;
-       uap->fdes &= 077;
-       fp = getf(uap->fdes);
-       if (fp == NULL)
-               return;
-       if ((m&0100) == 0) {
-               if ((i = ufalloc()) < 0)
-                       return;
+               VOP_ABORTOP(fdvp, fcnp);
+               vrele(fdvp);
+               vrele(fvp);
+               vput(tdvp);
+               vput(tvp);
+               tcnp->cn_flags &= ~MODMASK;
+               tcnp->cn_flags |= LOCKPARENT | LOCKLEAF;
+               if ((tcnp->cn_flags & SAVESTART) == 0)
+                       panic("ufs_rename: lost from startdir");
+               tcnp->cn_nameiop = DELETE;
+               (void) relookup(tdvp, &tvp, tcnp);
+               return (VOP_REMOVE(tdvp, tvp, tcnp));
+       }
+       if (error = VOP_LOCK(fvp))
+               goto abortit;
+       dp = VTOI(fdvp);
+       ip = VTOI(fvp);
+       if ((ip->i_flags & (IMMUTABLE | APPEND)) || (dp->i_flags & APPEND)) {
+               VOP_UNLOCK(fvp);
+               error = EPERM;
+               goto abortit;
+       }
+       if ((ip->i_mode & IFMT) == IFDIR) {
+               /*
+                * Avoid ".", "..", and aliases of "." for obvious reasons.
+                */
+               if ((fcnp->cn_namelen == 1 && fcnp->cn_nameptr[0] == '.') ||
+                   dp == ip || (fcnp->cn_flags&ISDOTDOT) ||
+                   (ip->i_flag & IRENAME)) {
+                       VOP_UNLOCK(fvp);
+                       error = EINVAL;
+                       goto abortit;
+               }
+               ip->i_flag |= IRENAME;
+               oldparent = dp->i_number;
+               doingdirectory++;
+       }
+       vrele(fdvp);
+
+       /*
+        * When the target exists, both the directory
+        * and target vnodes are returned locked.
+        */
+       dp = VTOI(tdvp);
+       xp = NULL;
+       if (tvp)
+               xp = VTOI(tvp);
+
+       /*
+        * 1) Bump link count while we're moving stuff
+        *    around.  If we crash somewhere before
+        *    completing our work, the link count
+        *    may be wrong, but correctable.
+        */
+       ip->i_nlink++;
+       ip->i_flag |= ICHG;
+       tv = time;
+       if (error = VOP_UPDATE(fvp, &tv, &tv, 1)) {
+               VOP_UNLOCK(fvp);
+               goto bad;
+       }
+
+       /*
+        * If ".." must be changed (ie the directory gets a new
+        * parent) then the source directory must not be in the
+        * directory heirarchy above the target, as this would
+        * orphan everything below the source directory. Also
+        * the user must have write permission in the source so
+        * as to be able to change "..". We must repeat the call 
+        * to namei, as the parent directory is unlocked by the
+        * call to checkpath().
+        */
+       error = VOP_ACCESS(fvp, VWRITE, tcnp->cn_cred, tcnp->cn_proc);
+       VOP_UNLOCK(fvp);
+       if (oldparent != dp->i_number)
+               newparent = dp->i_number;
+       if (doingdirectory && newparent) {
+               if (error)      /* write access check above */
+                       goto bad;
+               if (xp != NULL)
+                       vput(tvp);
+               if (error = ufs_checkpath(ip, dp, tcnp->cn_cred))
+                       goto out;
+               if ((tcnp->cn_flags & SAVESTART) == 0)
+                       panic("ufs_rename: lost to startdir");
+               p->p_spare[1]--;
+               if (error = relookup(tdvp, &tvp, tcnp))
+                       goto out;
+               dp = VTOI(tdvp);
+               xp = NULL;
+               if (tvp)
+                       xp = VTOI(tvp);
+       }
+       /*
+        * 2) If target doesn't exist, link the target
+        *    to the source and unlink the source. 
+        *    Otherwise, rewrite the target directory
+        *    entry to reference the source inode and
+        *    expunge the original entry's existence.
+        */
+       if (xp == NULL) {
+               if (dp->i_dev != ip->i_dev)
+                       panic("rename: EXDEV");
+               /*
+                * Account for ".." in new directory.
+                * When source and destination have the same
+                * parent we don't fool with the link count.
+                */
+               if (doingdirectory && newparent) {
+                       if ((nlink_t)dp->i_nlink >= LINK_MAX) {
+                               error = EMLINK;
+                               goto bad;
+                       }
+                       dp->i_nlink++;
+                       dp->i_flag |= ICHG;
+                       if (error = VOP_UPDATE(tdvp, &tv, &tv, 1))
+                               goto bad;
+               }
+               if (error = ufs_direnter(ip, tdvp, tcnp)) {
+                       if (doingdirectory && newparent) {
+                               dp->i_nlink--;
+                               dp->i_flag |= ICHG;
+                               (void)VOP_UPDATE(tdvp, &tv, &tv, 1);
+                       }
+                       goto bad;
+               }
+               vput(tdvp);
        } else {
        } else {
-               i = uap->fdes2;
-               if (i<0 || i>=NOFILE) {
-                       u.u_error = EBADF;
-                       return;
+               if (xp->i_dev != dp->i_dev || xp->i_dev != ip->i_dev)
+                       panic("rename: EXDEV");
+               /*
+                * Short circuit rename(foo, foo).
+                */
+               if (xp->i_number == ip->i_number)
+                       panic("rename: same file");
+               /*
+                * If the parent directory is "sticky", then the user must
+                * own the parent directory, or the destination of the rename,
+                * otherwise the destination may not be changed (except by
+                * root). This implements append-only directories.
+                */
+               if ((dp->i_mode & ISVTX) && tcnp->cn_cred->cr_uid != 0 &&
+                   tcnp->cn_cred->cr_uid != dp->i_uid &&
+                   xp->i_uid != tcnp->cn_cred->cr_uid) {
+                       error = EPERM;
+                       goto bad;
+               }
+               /*
+                * Target must be empty if a directory and have no links
+                * to it. Also, ensure source and target are compatible
+                * (both directories, or both not directories).
+                */
+               if ((xp->i_mode&IFMT) == IFDIR) {
+                       if (!ufs_dirempty(xp, dp->i_number, tcnp->cn_cred) || 
+                           xp->i_nlink > 2) {
+                               error = ENOTEMPTY;
+                               goto bad;
+                       }
+                       if (!doingdirectory) {
+                               error = ENOTDIR;
+                               goto bad;
+                       }
+                       cache_purge(tdvp);
+               } else if (doingdirectory) {
+                       error = EISDIR;
+                       goto bad;
                }
                }
-               u.u_r.r_val1 = i;
+               if (error = ufs_dirrewrite(dp, ip, tcnp))
+                       goto bad;
+               /*
+                * If the target directory is in the same
+                * directory as the source directory,
+                * decrement the link count on the parent
+                * of the target directory.
+                */
+                if (doingdirectory && !newparent) {
+                       dp->i_nlink--;
+                       dp->i_flag |= ICHG;
+               }
+               vput(tdvp);
+               /*
+                * Adjust the link count of the target to
+                * reflect the dirrewrite above.  If this is
+                * a directory it is empty and there are
+                * no links to it, so we can squash the inode and
+                * any space associated with it.  We disallowed
+                * renaming over top of a directory with links to
+                * it above, as the remaining link would point to
+                * a directory without "." or ".." entries.
+                */
+               xp->i_nlink--;
+               if (doingdirectory) {
+                       if (--xp->i_nlink != 0)
+                               panic("rename: linked directory");
+                       error = VOP_TRUNCATE(tvp, (off_t)0, IO_SYNC,
+                           tcnp->cn_cred, tcnp->cn_proc);
+               }
+               xp->i_flag |= ICHG;
+               vput(tvp);
+               xp = NULL;
        }
        }
-       if (i != uap->fdes) {
-               if (u.u_ofile[i]!=NULL)
-                       closef(u.u_ofile[i], 0);
-               if (u.u_error)
-                       return;
-               u.u_ofile[i] = fp;
-               fp->f_count++;
+
+       /*
+        * 3) Unlink the source.
+        */
+       fcnp->cn_flags &= ~MODMASK;
+       fcnp->cn_flags |= LOCKPARENT | LOCKLEAF;
+       if ((fcnp->cn_flags & SAVESTART) == 0)
+               panic("ufs_rename: lost from startdir");
+       p->p_spare[1]--;
+       (void) relookup(fdvp, &fvp, fcnp);
+       if (fvp != NULL) {
+               xp = VTOI(fvp);
+               dp = VTOI(fdvp);
+       } else {
+               /*
+                * From name has disappeared.
+                */
+               if (doingdirectory)
+                       panic("rename: lost dir entry");
+               vrele(ap->a_fvp);
+               return (0);
        }
        }
+       /*
+        * Ensure that the directory entry still exists and has not
+        * changed while the new name has been entered. If the source is
+        * a file then the entry may have been unlinked or renamed. In
+        * either case there is no further work to be done. If the source
+        * is a directory then it cannot have been rmdir'ed; its link
+        * count of three would cause a rmdir to fail with ENOTEMPTY.
+        * The IRENAME flag ensures that it cannot be moved by another
+        * rename.
+        */
+       if (xp != ip) {
+               if (doingdirectory)
+                       panic("rename: lost dir entry");
+       } else {
+               /*
+                * If the source is a directory with a
+                * new parent, the link count of the old
+                * parent directory must be decremented
+                * and ".." set to point to the new parent.
+                */
+               if (doingdirectory && newparent) {
+                       dp->i_nlink--;
+                       dp->i_flag |= ICHG;
+                       error = vn_rdwr(UIO_READ, fvp, (caddr_t)&dirbuf,
+                               sizeof (struct dirtemplate), (off_t)0,
+                               UIO_SYSSPACE, IO_NODELOCKED, 
+                               tcnp->cn_cred, (int *)0, (struct proc *)0);
+                       if (error == 0) {
+#                              if (BYTE_ORDER == LITTLE_ENDIAN)
+                                       if (fvp->v_mount->mnt_maxsymlinklen <= 0)
+                                               namlen = dirbuf.dotdot_type;
+                                       else
+                                               namlen = dirbuf.dotdot_namlen;
+#                              else
+                                       namlen = dirbuf.dotdot_namlen;
+#                              endif
+                               if (namlen != 2 ||
+                                   dirbuf.dotdot_name[0] != '.' ||
+                                   dirbuf.dotdot_name[1] != '.') {
+                                       ufs_dirbad(xp, (doff_t)12,
+                                           "rename: mangled dir");
+                               } else {
+                                       dirbuf.dotdot_ino = newparent;
+                                       (void) vn_rdwr(UIO_WRITE, fvp,
+                                           (caddr_t)&dirbuf,
+                                           sizeof (struct dirtemplate),
+                                           (off_t)0, UIO_SYSSPACE,
+                                           IO_NODELOCKED|IO_SYNC,
+                                           tcnp->cn_cred, (int *)0,
+                                           (struct proc *)0);
+                                       cache_purge(fdvp);
+                               }
+                       }
+               }
+               error = ufs_dirremove(fdvp, fcnp);
+               if (!error) {
+                       xp->i_nlink--;
+                       xp->i_flag |= ICHG;
+               }
+               xp->i_flag &= ~IRENAME;
+       }
+       if (dp)
+               vput(fdvp);
+       if (xp)
+               vput(fvp);
+       vrele(ap->a_fvp);
+       return (error);
+
+bad:
+       if (xp)
+               vput(ITOV(xp));
+       vput(ITOV(dp));
+out:
+       if (VOP_LOCK(fvp) == 0) {
+               ip->i_nlink--;
+               ip->i_flag |= ICHG;
+               vput(fvp);
+       } else
+               vrele(fvp);
+       return (error);
 }
 
 /*
 }
 
 /*
- * Mount system call.
+ * A virgin directory (no blushing please).
+ */
+static struct dirtemplate mastertemplate = {
+       0, 12, DT_DIR, 1, ".",
+       0, DIRBLKSIZ - 12, DT_DIR, 2, ".."
+};
+static struct odirtemplate omastertemplate = {
+       0, 12, 1, ".",
+       0, DIRBLKSIZ - 12, 2, ".."
+};
+
+/*
+ * Mkdir system call
  */
  */
-smount()
+int
+ufs_mkdir(ap)
+       struct vop_mkdir_args /* {
+               struct vnode *a_dvp;
+               struct vnode **a_vpp;
+               struct componentname *a_cnp;
+               struct vattr *a_vap;
+       } */ *ap;
 {
 {
-       dev_t dev;
-       register struct inode *ip;
-       register struct mount *mp;
-       struct mount *smp;
-       register struct filsys *fp;
-       struct buf *bp;
-       register struct a {
-               char    *fspec;
-               char    *freg;
-               int     ronly;
-       } *uap;
-       register char *cp;
-
-       uap = (struct a *)u.u_ap;
-       dev = getmdev();
-       if (u.u_error)
-               return;
-       u.u_dirp = (caddr_t)uap->freg;
-       ip = namei(uchar, 0, 1);
-       if (ip == NULL)
-               return;
-       if (ip->i_count!=1 || (ip->i_mode&IFMT) != IFDIR)
+       register struct vnode *dvp = ap->a_dvp;
+       register struct vattr *vap = ap->a_vap;
+       register struct componentname *cnp = ap->a_cnp;
+       register struct inode *ip, *dp;
+       struct vnode *tvp;
+       struct dirtemplate dirtemplate, *dtp;
+       struct timeval tv;
+       int error, dmode;
+
+#ifdef DIAGNOSTIC
+       if ((cnp->cn_flags & HASBUF) == 0)
+               panic("ufs_mkdir: no name");
+#endif
+       dp = VTOI(dvp);
+       if ((nlink_t)dp->i_nlink >= LINK_MAX) {
+               error = EMLINK;
                goto out;
                goto out;
-       smp = NULL;
-       for (mp = &mount[0]; mp < &mount[NMOUNT]; mp++) {
-               if (mp->m_bufp != NULL) {
-                       if (dev == mp->m_dev)
-                               goto out;
-               } else
-               if (smp == NULL)
-                       smp = mp;
        }
        }
-       mp = smp;
-       if (mp == NULL)
-               goto out;
-       (*bdevsw[major(dev)].d_open)(dev, !uap->ronly);
-       if (u.u_error)
+       dmode = vap->va_mode & 0777;
+       dmode |= IFDIR;
+       /*
+        * Must simulate part of ufs_makeinode here to acquire the inode,
+        * but not have it entered in the parent directory. The entry is
+        * made later after writing "." and ".." entries.
+        */
+       if (error = VOP_VALLOC(dvp, dmode, cnp->cn_cred, &tvp))
                goto out;
                goto out;
-       bp = bread(dev, SUPERB);
-       if (u.u_error) {
-               brelse(bp);
-               goto out1;
+       ip = VTOI(tvp);
+       ip->i_uid = cnp->cn_cred->cr_uid;
+       ip->i_gid = dp->i_gid;
+#ifdef QUOTA
+       if ((error = getinoquota(ip)) ||
+           (error = chkiq(ip, 1, cnp->cn_cred, 0))) {
+               free(cnp->cn_pnbuf, M_NAMEI);
+               VOP_VFREE(tvp, ip->i_number, dmode);
+               vput(tvp);
+               vput(dvp);
+               return (error);
+       }
+#endif
+       ip->i_flag |= IACC|IUPD|ICHG;
+       ip->i_mode = dmode;
+       tvp->v_type = VDIR;     /* Rest init'd in iget() */
+       ip->i_nlink = 2;
+       tv = time;
+       error = VOP_UPDATE(tvp, &tv, &tv, 1);
+
+       /*
+        * Bump link count in parent directory
+        * to reflect work done below.  Should
+        * be done before reference is created
+        * so reparation is possible if we crash.
+        */
+       dp->i_nlink++;
+       dp->i_flag |= ICHG;
+       if (error = VOP_UPDATE(dvp, &tv, &tv, 1))
+               goto bad;
+
+       /* Initialize directory with "." and ".." from static template. */
+       if (dvp->v_mount->mnt_maxsymlinklen > 0)
+               dtp = &mastertemplate;
+       else
+               dtp = (struct dirtemplate *)&omastertemplate;
+       dirtemplate = *dtp;
+       dirtemplate.dot_ino = ip->i_number;
+       dirtemplate.dotdot_ino = dp->i_number;
+       error = vn_rdwr(UIO_WRITE, tvp, (caddr_t)&dirtemplate,
+           sizeof (dirtemplate), (off_t)0, UIO_SYSSPACE,
+           IO_NODELOCKED|IO_SYNC, cnp->cn_cred, (int *)0, (struct proc *)0);
+       if (error) {
+               dp->i_nlink--;
+               dp->i_flag |= ICHG;
+               goto bad;
+       }
+       if (DIRBLKSIZ > VFSTOUFS(dvp->v_mount)->um_mountp->mnt_stat.f_bsize)
+               panic("ufs_mkdir: blksize"); /* XXX should grow with balloc() */
+       else {
+               ip->i_size = DIRBLKSIZ;
+               ip->i_flag |= ICHG;
        }
        }
-       mp->m_inodp = ip;
-       mp->m_dev = dev;
-       bp->b_flags |= B_LOCKED;
-       mp->m_bufp = bp;
-       fp = bp->b_un.b_filsys;
-       fp->s_ilock = 0;
-       fp->s_flock = 0;
-       fp->s_ronly = uap->ronly & 1;
-       fp->s_nbehind = 0;
-       fp->s_lasti = 1;
-       u.u_dirp = uap->freg;
-       for (cp = fp->s_fsmnt; cp < &fp->s_fsmnt[sizeof (fp->s_fsmnt) - 1]; )
-               if ((*cp++ = uchar()) == 0)
-                       u.u_dirp--;             /* get 0 again */
-       *cp = 0;
-       brelse(bp);
-       ip->i_flag |= IMOUNT;
-       irele(ip);
-       return;
 
 
+       /* Directory set up, now install it's entry in the parent directory. */
+       if (error = ufs_direnter(ip, dvp, cnp)) {
+               dp->i_nlink--;
+               dp->i_flag |= ICHG;
+       }
+bad:
+       /*
+        * No need to do an explicit VOP_TRUNCATE here, vrele will do this
+        * for us because we set the link count to 0.
+        */
+       if (error) {
+               ip->i_nlink = 0;
+               ip->i_flag |= ICHG;
+               vput(tvp);
+       } else
+               *ap->a_vpp = tvp;
 out:
 out:
-       u.u_error = EBUSY;
-out1:
-       iput(ip);
+       FREE(cnp->cn_pnbuf, M_NAMEI);
+       vput(dvp);
+       return (error);
 }
 
 /*
 }
 
 /*
- * the umount system call.
+ * Rmdir system call.
  */
  */
-sumount()
+int
+ufs_rmdir(ap)
+       struct vop_rmdir_args /* {
+               struct vnode *a_dvp;
+               struct vnode *a_vp;
+               struct componentname *a_cnp;
+       } */ *ap;
 {
 {
-       dev_t dev;
+       register struct vnode *vp = ap->a_vp;
+       register struct vnode *dvp = ap->a_dvp;
+       register struct componentname *cnp = ap->a_cnp;
+       register struct inode *ip, *dp;
+       int error;
+
+       ip = VTOI(vp);
+       dp = VTOI(dvp);
+       /*
+        * No rmdir "." please.
+        */
+       if (dp == ip) {
+               vrele(dvp);
+               vput(vp);
+               return (EINVAL);
+       }
+       /*
+        * Verify the directory is empty (and valid).
+        * (Rmdir ".." won't be valid since
+        *  ".." will contain a reference to
+        *  the current directory and thus be
+        *  non-empty.)
+        */
+       error = 0;
+       if (ip->i_nlink != 2 ||
+           !ufs_dirempty(ip, dp->i_number, cnp->cn_cred)) {
+               error = ENOTEMPTY;
+               goto out;
+       }
+       if ((dp->i_flags & APPEND) || (ip->i_flags & (IMMUTABLE | APPEND))) {
+               error = EPERM;
+               goto out;
+       }
+       /*
+        * Delete reference to directory before purging
+        * inode.  If we crash in between, the directory
+        * will be reattached to lost+found,
+        */
+       if (error = ufs_dirremove(dvp, cnp))
+               goto out;
+       dp->i_nlink--;
+       dp->i_flag |= ICHG;
+       cache_purge(dvp);
+       vput(dvp);
+       dvp = NULL;
+       /*
+        * Truncate inode.  The only stuff left
+        * in the directory is "." and "..".  The
+        * "." reference is inconsequential since
+        * we're quashing it.  The ".." reference
+        * has already been adjusted above.  We've
+        * removed the "." reference and the reference
+        * in the parent directory, but there may be
+        * other hard links so decrement by 2 and
+        * worry about them later.
+        */
+       ip->i_nlink -= 2;
+       error = VOP_TRUNCATE(vp, (off_t)0, IO_SYNC, cnp->cn_cred,
+           cnp->cn_proc);
+       cache_purge(ITOV(ip));
+out:
+       if (dvp)
+               vput(dvp);
+       vput(vp);
+       return (error);
+}
+
+/*
+ * symlink -- make a symbolic link
+ */
+int
+ufs_symlink(ap)
+       struct vop_symlink_args /* {
+               struct vnode *a_dvp;
+               struct vnode **a_vpp;
+               struct componentname *a_cnp;
+               struct vattr *a_vap;
+               char *a_target;
+       } */ *ap;
+{
+       register struct vnode *vp, **vpp = ap->a_vpp;
        register struct inode *ip;
        register struct inode *ip;
-       register struct mount *mp;
-       struct buf *bp;
-       int stillopen, flag;
-       register struct a {
-               char    *fspec;
-       };
-
-       dev = getmdev();
-       if (u.u_error)
-               return;
-       xumount(dev);   /* remove unused sticky files from text table */
-       update(0);
-       for (mp = &mount[0]; mp < &mount[NMOUNT]; mp++)
-               if (mp->m_bufp != NULL && dev == mp->m_dev)
-                       goto found;
-       u.u_error = EINVAL;
-       return;
+       int len, error;
 
 
-found:
-       stillopen = 0;
-       for (ip = inode; ip < inodeNINODE; ip++)
-               if (ip->i_number != 0 && dev == ip->i_dev) {
-                       u.u_error = EBUSY;
-                       return;
-               } else if (ip->i_number != 0 && (ip->i_mode&IFMT) == IFBLK &&
-                   ip->i_un.i_rdev == dev)
-                       stillopen++;
-       ip = mp->m_inodp;
-       ip->i_flag &= ~IMOUNT;
-       ilock(ip);
-       iput(ip);
-       if ((bp = getblk(dev, SUPERB)) != mp->m_bufp)
-               panic("umount");
-       bp->b_flags &= ~B_LOCKED;
-       flag = !bp->b_un.b_filsys->s_ronly;
-       mp->m_bufp = NULL;
-       brelse(bp);
-       mpurge(mp - &mount[0]);
-       if (!stillopen) {
-               (*bdevsw[major(dev)].d_close)(dev, flag);
-               binval(dev);
-       }
-}
-
-/*
- * Common code for mount and umount.
- * Check that the user's argument is a reasonable
- * thing on which to mount, and return the device number if so.
- */
-dev_t
-getmdev()
-{
-       dev_t dev;
+       if (error = ufs_makeinode(IFLNK | ap->a_vap->va_mode, ap->a_dvp,
+           vpp, ap->a_cnp))
+               return (error);
+       vp = *vpp;
+       len = strlen(ap->a_target);
+       if (len < vp->v_mount->mnt_maxsymlinklen) {
+               ip = VTOI(vp);
+               bcopy(ap->a_target, (char *)ip->i_shortlink, len);
+               ip->i_size = len;
+               ip->i_flag |= IUPD|ICHG;
+       } else
+               error = vn_rdwr(UIO_WRITE, vp, ap->a_target, len, (off_t)0,
+                   UIO_SYSSPACE, IO_NODELOCKED, ap->a_cnp->cn_cred, (int *)0,
+                   (struct proc *)0);
+       vput(vp);
+       return (error);
+}
+
+/*
+ * Vnode op for reading directories.
+ * 
+ * The routine below assumes that the on-disk format of a directory
+ * is the same as that defined by <sys/dirent.h>. If the on-disk
+ * format changes, then it will be necessary to do a conversion
+ * from the on-disk format that read returns to the format defined
+ * by <sys/dirent.h>.
+ */
+int
+ufs_readdir(ap)
+       struct vop_readdir_args /* {
+               struct vnode *a_vp;
+               struct uio *a_uio;
+               struct ucred *a_cred;
+       } */ *ap;
+{
+       register struct uio *uio = ap->a_uio;
+       int count, lost, error;
+
+       count = uio->uio_resid;
+       count &= ~(DIRBLKSIZ - 1);
+       lost = uio->uio_resid - count;
+       if (count < DIRBLKSIZ || (uio->uio_offset & (DIRBLKSIZ -1)))
+               return (EINVAL);
+       uio->uio_resid = count;
+       uio->uio_iov->iov_len = count;
+#      if (BYTE_ORDER == LITTLE_ENDIAN)
+               if (ap->a_vp->v_mount->mnt_maxsymlinklen > 0) {
+                       error = VOP_READ(ap->a_vp, uio, 0, ap->a_cred);
+               } else {
+                       struct dirent *dp, *edp;
+                       struct uio auio;
+                       struct iovec aiov;
+                       caddr_t dirbuf;
+                       int readcnt;
+                       u_char tmp;
+
+                       auio = *uio;
+                       auio.uio_iov = &aiov;
+                       auio.uio_iovcnt = 1;
+                       auio.uio_segflg = UIO_SYSSPACE;
+                       aiov.iov_len = count;
+                       MALLOC(dirbuf, caddr_t, count, M_TEMP, M_WAITOK);
+                       aiov.iov_base = dirbuf;
+                       error = VOP_READ(ap->a_vp, &auio, 0, ap->a_cred);
+                       if (error == 0) {
+                               readcnt = count - auio.uio_resid;
+                               edp = (struct dirent *)&dirbuf[readcnt];
+                               for (dp = (struct dirent *)dirbuf; dp < edp; ) {
+                                       tmp = dp->d_namlen;
+                                       dp->d_namlen = dp->d_type;
+                                       dp->d_type = tmp;
+                                       if (dp->d_reclen > 0) {
+                                               dp = (struct dirent *)
+                                                   ((char *)dp + dp->d_reclen);
+                                       } else {
+                                               error = EIO;
+                                               break;
+                                       }
+                               }
+                               if (dp >= edp)
+                                       error = uiomove(dirbuf, readcnt, uio);
+                       }
+                       FREE(dirbuf, M_TEMP);
+               }
+#      else
+               error = VOP_READ(ap->a_vp, uio, 0, ap->a_cred);
+#      endif
+       uio->uio_resid += lost;
+       return (error);
+}
+
+/*
+ * Return target name of a symbolic link
+ */
+int
+ufs_readlink(ap)
+       struct vop_readlink_args /* {
+               struct vnode *a_vp;
+               struct uio *a_uio;
+               struct ucred *a_cred;
+       } */ *ap;
+{
+       register struct vnode *vp = ap->a_vp;
+       register struct inode *ip = VTOI(vp);
+       int isize;
+
+       isize = ip->i_size;
+       if (isize < vp->v_mount->mnt_maxsymlinklen) {
+               uiomove((char *)ip->i_shortlink, isize, ap->a_uio);
+               return (0);
+       }
+       return (VOP_READ(vp, ap->a_uio, 0, ap->a_cred));
+}
+
+/*
+ * Ufs abort op, called after namei() when a CREATE/DELETE isn't actually
+ * done. If a buffer has been saved in anticipation of a CREATE, delete it.
+ */
+/* ARGSUSED */
+int
+ufs_abortop(ap)
+       struct vop_abortop_args /* {
+               struct vnode *a_dvp;
+               struct componentname *a_cnp;
+       } */ *ap;
+{
+       if ((ap->a_cnp->cn_flags & (HASBUF | SAVESTART)) == HASBUF)
+               FREE(ap->a_cnp->cn_pnbuf, M_NAMEI);
+       return (0);
+}
+
+/*
+ * Lock an inode. If its already locked, set the WANT bit and sleep.
+ */
+int
+ufs_lock(ap)
+       struct vop_lock_args /* {
+               struct vnode *a_vp;
+       } */ *ap;
+{
+       register struct vnode *vp = ap->a_vp;
        register struct inode *ip;
        register struct inode *ip;
+       struct proc *p = curproc;       /* XXX */
+
+start:
+       while (vp->v_flag & VXLOCK) {
+               vp->v_flag |= VXWANT;
+               sleep((caddr_t)vp, PINOD);
+       }
+       if (vp->v_tag == VT_NON)
+               return (ENOENT);
+       ip = VTOI(vp);
+       if (ip->i_flag & ILOCKED) {
+               ip->i_flag |= IWANT;
+#ifdef DIAGNOSTIC
+               if (p) {
+                       if (p->p_pid == ip->i_lockholder)
+                               panic("locking against myself");
+                       ip->i_lockwaiter = p->p_pid;
+               } else
+                       ip->i_lockwaiter = -1;
+#endif
+               (void) sleep((caddr_t)ip, PINOD);
+               goto start;
+       }
+#ifdef DIAGNOSTIC
+       ip->i_lockwaiter = 0;
+       if (ip->i_lockholder != 0)
+               panic("lockholder (%d) != 0", ip->i_lockholder);
+       if (p && p->p_pid == 0)
+               printf("locking by process 0\n");
+       if (p)
+               ip->i_lockholder = p->p_pid;
+       else
+               ip->i_lockholder = -1;
+#endif
+       ip->i_flag |= ILOCKED;
+       return (0);
+}
+
+/*
+ * Unlock an inode.  If WANT bit is on, wakeup.
+ */
+int lockcount = 90;
+int
+ufs_unlock(ap)
+       struct vop_unlock_args /* {
+               struct vnode *a_vp;
+       } */ *ap;
+{
+       register struct inode *ip = VTOI(ap->a_vp);
+       struct proc *p = curproc;       /* XXX */
+
+#ifdef DIAGNOSTIC
+       if ((ip->i_flag & ILOCKED) == 0) {
+               vprint("ufs_unlock: unlocked inode", ap->a_vp);
+               panic("ufs_unlock NOT LOCKED");
+       }
+       if (p && p->p_pid != ip->i_lockholder && p->p_pid > -1 &&
+           ip->i_lockholder > -1 && lockcount++ < 100)
+               panic("unlocker (%d) != lock holder (%d)",
+                   p->p_pid, ip->i_lockholder);
+       ip->i_lockholder = 0;
+#endif
+       ip->i_flag &= ~ILOCKED;
+       if (ip->i_flag & IWANT) {
+               ip->i_flag &= ~IWANT;
+               wakeup((caddr_t)ip);
+       }
+       return (0);
+}
+
+/*
+ * Check for a locked inode.
+ */
+int
+ufs_islocked(ap)
+       struct vop_islocked_args /* {
+               struct vnode *a_vp;
+       } */ *ap;
+{
+
+       if (VTOI(ap->a_vp)->i_flag & ILOCKED)
+               return (1);
+       return (0);
+}
+
+/*
+ * Calculate the logical to physical mapping if not done already,
+ * then call the device strategy routine.
+ */
+#include <sys/sysctl.h>
+int checkblk = 1;
+struct ctldebug debug10 = { "checkblk", &checkblk };
+int
+ufs_strategy(ap)
+       struct vop_strategy_args /* {
+               struct buf *a_bp;
+       } */ *ap;
+{
+       register struct buf *bp = ap->a_bp;
+       register struct vnode *vp = bp->b_vp;
+       register struct inode *ip;
+       daddr_t blkno;
+       int error;
+
+       ip = VTOI(vp);
+       if (vp->v_type == VBLK || vp->v_type == VCHR)
+               panic("ufs_strategy: spec");
+       if ((checkblk && (long)bp->b_lblkno >= 0 &&
+           (bp->b_flags & B_XXX) == 0) ||
+           bp->b_blkno == bp->b_lblkno) {
+               if (error = VOP_BMAP(vp, bp->b_lblkno, NULL, &blkno, NULL)) {
+                       bp->b_error = error;
+                       bp->b_flags |= B_ERROR;
+                       biodone(bp);
+                       return (error);
+               }
+               if (bp->b_blkno != bp->b_lblkno && bp->b_blkno != blkno &&
+                   !((bp->b_flags & B_READ) && (long)blkno == -1))
+                       panic("ufs_strategy: bad blkno %d != %d", bp->b_blkno,
+                           blkno);
+               /* If this is a clustered block, check sub-blocks as well */
+               if (bp->b_saveaddr) {
+                       struct buf *tbp;
+                       struct cluster_save *b_save;
+                       int i;
+                       daddr_t bn;
+
+                       b_save = (struct cluster_save *)bp->b_saveaddr;
+                       for (i = 0; i < b_save->bs_nchildren; i++) {
+                               tbp = b_save->bs_children[i];
+                               if ((tbp->b_flags & B_XXX) == 0 &&
+                                   !VOP_BMAP(vp, tbp->b_lblkno, NULL,
+                                   &bn, NULL) && tbp->b_blkno != bn)
+                                       panic("ufs_strategy: bad bno %d != %d",
+                                           bp->b_blkno, blkno);
+                       }
+               }
+               bp->b_blkno = blkno;
+               if ((long)bp->b_blkno == -1)
+                       if ((bp->b_flags & B_READ) == 0)
+                               panic("ufs_startegy: write unallocated block");
+                       else
+                               clrbuf(bp);
+       }
+       bp->b_flags &=~ B_XXX;
+       if ((long)bp->b_blkno == -1) {
+               biodone(bp);
+               return (0);
+       }
+       vp = ip->i_devvp;
+       bp->b_dev = vp->v_rdev;
+       VOCALL (vp->v_op, VOFFSET(vop_strategy), ap);
+       return (0);
+}
+
+/*
+ * Print out the contents of an inode.
+ */
+int
+ufs_print(ap)
+       struct vop_print_args /* {
+               struct vnode *a_vp;
+       } */ *ap;
+{
+       register struct vnode *vp = ap->a_vp;
+       register struct inode *ip = VTOI(vp);
 
 
-       if (!suser())
-               return(NODEV);
-       ip = namei(uchar, 0, 1);
-       if (ip == NULL)
-               return(NODEV);
-       if ((ip->i_mode&IFMT) != IFBLK)
-               u.u_error = ENOTBLK;
-       dev = (dev_t)ip->i_un.i_rdev;
-       if (major(dev) >= nblkdev)
-               u.u_error = ENXIO;
-       iput(ip);
-       return(dev);
+       printf("tag VT_UFS, ino %d, on dev %d, %d", ip->i_number,
+               major(ip->i_dev), minor(ip->i_dev));
+#ifdef FIFO
+       if (vp->v_type == VFIFO)
+               fifo_printinfo(vp);
+#endif /* FIFO */
+       printf("%s\n", (ip->i_flag & ILOCKED) ? " (LOCKED)" : "");
+       if (ip->i_lockholder == 0)
+               return (0);
+       printf("\towner pid %d", ip->i_lockholder);
+       if (ip->i_lockwaiter)
+               printf(" waiting pid %d", ip->i_lockwaiter);
+       printf("\n");
+       return (0);
+}
+
+/*
+ * Read wrapper for special devices.
+ */
+int
+ufsspec_read(ap)
+       struct vop_read_args /* {
+               struct vnode *a_vp;
+               struct uio *a_uio;
+               int  a_ioflag;
+               struct ucred *a_cred;
+       } */ *ap;
+{
+
+       /*
+        * Set access flag.
+        */
+       VTOI(ap->a_vp)->i_flag |= IACC;
+       return (VOCALL (spec_vnodeop_p, VOFFSET(vop_read), ap));
+}
+
+/*
+ * Write wrapper for special devices.
+ */
+int
+ufsspec_write(ap)
+       struct vop_write_args /* {
+               struct vnode *a_vp;
+               struct uio *a_uio;
+               int  a_ioflag;
+               struct ucred *a_cred;
+       } */ *ap;
+{
+
+       /*
+        * Set update and change flags.
+        */
+       VTOI(ap->a_vp)->i_flag |= IUPD|ICHG;
+       return (VOCALL (spec_vnodeop_p, VOFFSET(vop_write), ap));
+}
+
+/*
+ * Close wrapper for special devices.
+ *
+ * Update the times on the inode then do device close.
+ */
+int
+ufsspec_close(ap)
+       struct vop_close_args /* {
+               struct vnode *a_vp;
+               int  a_fflag;
+               struct ucred *a_cred;
+               struct proc *a_p;
+       } */ *ap;
+{
+       register struct inode *ip = VTOI(ap->a_vp);
+
+       if (ap->a_vp->v_usecount > 1 && !(ip->i_flag & ILOCKED))
+               ITIMES(ip, &time, &time);
+       return (VOCALL (spec_vnodeop_p, VOFFSET(vop_close), ap));
+}
+
+#ifdef FIFO
+/*
+ * Read wrapper for fifo's
+ */
+int
+ufsfifo_read(ap)
+       struct vop_read_args /* {
+               struct vnode *a_vp;
+               struct uio *a_uio;
+               int  a_ioflag;
+               struct ucred *a_cred;
+       } */ *ap;
+{
+       extern int (**fifo_vnodeop_p)();
+
+       /*
+        * Set access flag.
+        */
+       VTOI(ap->a_vp)->i_flag |= IACC;
+       return (VOCALL (fifo_vnodeop_p, VOFFSET(vop_read), ap));
+}
+
+/*
+ * Write wrapper for fifo's.
+ */
+int
+ufsfifo_write(ap)
+       struct vop_write_args /* {
+               struct vnode *a_vp;
+               struct uio *a_uio;
+               int  a_ioflag;
+               struct ucred *a_cred;
+       } */ *ap;
+{
+       extern int (**fifo_vnodeop_p)();
+
+       /*
+        * Set update and change flags.
+        */
+       VTOI(ap->a_vp)->i_flag |= IUPD|ICHG;
+       return (VOCALL (fifo_vnodeop_p, VOFFSET(vop_write), ap));
+}
+
+/*
+ * Close wrapper for fifo's.
+ *
+ * Update the times on the inode then do device close.
+ */
+ufsfifo_close(ap)
+       struct vop_close_args /* {
+               struct vnode *a_vp;
+               int  a_fflag;
+               struct ucred *a_cred;
+               struct proc *a_p;
+       } */ *ap;
+{
+       extern int (**fifo_vnodeop_p)();
+       register struct inode *ip = VTOI(ap->a_vp);
+
+       if (ap->a_vp->v_usecount > 1 && !(ip->i_flag & ILOCKED))
+               ITIMES(ip, &time, &time);
+       return (VOCALL (fifo_vnodeop_p, VOFFSET(vop_close), ap));
+}
+#endif /* FIFO */
+
+/*
+ * Return POSIX pathconf information applicable to ufs filesystems.
+ */
+ufs_pathconf(ap)
+       struct vop_pathconf_args /* {
+               struct vnode *a_vp;
+               int a_name;
+               int *a_retval;
+       } */ *ap;
+{
+
+       switch (ap->a_name) {
+       case _PC_LINK_MAX:
+               *ap->a_retval = LINK_MAX;
+               return (0);
+       case _PC_NAME_MAX:
+               *ap->a_retval = NAME_MAX;
+               return (0);
+       case _PC_PATH_MAX:
+               *ap->a_retval = PATH_MAX;
+               return (0);
+       case _PC_PIPE_BUF:
+               *ap->a_retval = PIPE_BUF;
+               return (0);
+       case _PC_CHOWN_RESTRICTED:
+               *ap->a_retval = 1;
+               return (0);
+       case _PC_NO_TRUNC:
+               *ap->a_retval = 1;
+               return (0);
+       default:
+               return (EINVAL);
+       }
+       /* NOTREACHED */
+}
+
+/*
+ * Advisory record locking support
+ */
+int
+ufs_advlock(ap)
+       struct vop_advlock_args /* {
+               struct vnode *a_vp;
+               caddr_t  a_id;
+               int  a_op;
+               struct flock *a_fl;
+               int  a_flags;
+       } */ *ap;
+{
+       register struct inode *ip = VTOI(ap->a_vp);
+       register struct flock *fl = ap->a_fl;
+       register struct lockf *lock;
+       off_t start, end;
+       int error;
+
+       /*
+        * Avoid the common case of unlocking when inode has no locks.
+        */
+       if (ip->i_lockf == (struct lockf *)0) {
+               if (ap->a_op != F_SETLK) {
+                       fl->l_type = F_UNLCK;
+                       return (0);
+               }
+       }
+       /*
+        * Convert the flock structure into a start and end.
+        */
+       switch (fl->l_whence) {
+
+       case SEEK_SET:
+       case SEEK_CUR:
+               /*
+                * Caller is responsible for adding any necessary offset
+                * when SEEK_CUR is used.
+                */
+               start = fl->l_start;
+               break;
+
+       case SEEK_END:
+               start = ip->i_size + fl->l_start;
+               break;
+
+       default:
+               return (EINVAL);
+       }
+       if (start < 0)
+               return (EINVAL);
+       if (fl->l_len == 0)
+               end = -1;
+       else
+               end = start + fl->l_len - 1;
+       /*
+        * Create the lockf structure
+        */
+       MALLOC(lock, struct lockf *, sizeof *lock, M_LOCKF, M_WAITOK);
+       lock->lf_start = start;
+       lock->lf_end = end;
+       lock->lf_id = ap->a_id;
+       lock->lf_inode = ip;
+       lock->lf_type = fl->l_type;
+       lock->lf_next = (struct lockf *)0;
+       lock->lf_block = (struct lockf *)0;
+       lock->lf_flags = ap->a_flags;
+       /*
+        * Do the requested operation.
+        */
+       switch(ap->a_op) {
+       case F_SETLK:
+               return (lf_setlock(lock));
+
+       case F_UNLCK:
+               error = lf_clearlock(lock);
+               FREE(lock, M_LOCKF);
+               return (error);
+
+       case F_GETLK:
+               error = lf_getlock(lock, fl);
+               FREE(lock, M_LOCKF);
+               return (error);
+       
+       default:
+               free(lock, M_LOCKF);
+               return (EINVAL);
+       }
+       /* NOTREACHED */
+}
+
+/*
+ * Initialize the vnode associated with a new inode, handle aliased
+ * vnodes.
+ */
+int
+ufs_vinit(mntp, specops, fifoops, vpp)
+       struct mount *mntp;
+       int (**specops)();
+       int (**fifoops)();
+       struct vnode **vpp;
+{
+       struct inode *ip;
+       struct vnode *vp, *nvp;
+
+       vp = *vpp;
+       ip = VTOI(vp);
+       switch(vp->v_type = IFTOVT(ip->i_mode)) {
+       case VCHR:
+       case VBLK:
+               vp->v_op = specops;
+               if (nvp = checkalias(vp, ip->i_rdev, mntp)) {
+                       /*
+                        * Discard unneeded vnode, but save its inode.
+                        */
+                       ufs_ihashrem(ip);
+                       VOP_UNLOCK(vp);
+                       nvp->v_data = vp->v_data;
+                       vp->v_data = NULL;
+                       vp->v_op = spec_vnodeop_p;
+                       vrele(vp);
+                       vgone(vp);
+                       /*
+                        * Reinitialize aliased inode.
+                        */
+                       vp = nvp;
+                       ip->i_vnode = vp;
+                       ufs_ihashins(ip);
+               }
+               break;
+       case VFIFO:
+#ifdef FIFO
+               vp->v_op = fifoops;
+               break;
+#else
+               return (EOPNOTSUPP);
+#endif
+       }
+       if (ip->i_number == ROOTINO)
+                vp->v_flag |= VROOT;
+       /*
+        * Initialize modrev times
+        */
+       SETHIGH(ip->i_modrev, mono_time.tv_sec);
+       SETLOW(ip->i_modrev, mono_time.tv_usec * 4294);
+       *vpp = vp;
+       return (0);
+}
+
+/*
+ * Allocate a new inode.
+ */
+int
+ufs_makeinode(mode, dvp, vpp, cnp)
+       int mode;
+       struct vnode *dvp;
+       struct vnode **vpp;
+       struct componentname *cnp;
+{
+       register struct inode *ip, *pdir;
+       struct timeval tv;
+       struct vnode *tvp;
+       int error;
+
+       pdir = VTOI(dvp);
+#ifdef DIAGNOSTIC
+       if ((cnp->cn_flags & HASBUF) == 0)
+               panic("ufs_makeinode: no name");
+#endif
+       *vpp = NULL;
+       if ((mode & IFMT) == 0)
+               mode |= IFREG;
+
+       if (error = VOP_VALLOC(dvp, mode, cnp->cn_cred, &tvp)) {
+               free(cnp->cn_pnbuf, M_NAMEI);
+               vput(dvp);
+               return (error);
+       }
+       ip = VTOI(tvp);
+       ip->i_gid = pdir->i_gid;
+       if ((mode & IFMT) == IFLNK)
+               ip->i_uid = pdir->i_uid;
+       else
+               ip->i_uid = cnp->cn_cred->cr_uid;
+#ifdef QUOTA
+       if ((error = getinoquota(ip)) ||
+           (error = chkiq(ip, 1, cnp->cn_cred, 0))) {
+               free(cnp->cn_pnbuf, M_NAMEI);
+               VOP_VFREE(tvp, ip->i_number, mode);
+               vput(tvp);
+               vput(dvp);
+               return (error);
+       }
+#endif
+       ip->i_flag |= IACC|IUPD|ICHG;
+       ip->i_mode = mode;
+       tvp->v_type = IFTOVT(mode);     /* Rest init'd in iget() */
+       ip->i_nlink = 1;
+       if ((ip->i_mode & ISGID) && !groupmember(ip->i_gid, cnp->cn_cred) &&
+           suser(cnp->cn_cred, NULL))
+               ip->i_mode &= ~ISGID;
+
+       /*
+        * Make sure inode goes to disk before directory entry.
+        */
+       tv = time;
+       if (error = VOP_UPDATE(tvp, &tv, &tv, 1))
+               goto bad;
+       if (error = ufs_direnter(ip, dvp, cnp))
+               goto bad;
+       if ((cnp->cn_flags & SAVESTART) == 0)
+               FREE(cnp->cn_pnbuf, M_NAMEI);
+       vput(dvp);
+       *vpp = tvp;
+       return (0);
+
+bad:
+       /*
+        * Write error occurred trying to update the inode
+        * or the directory so must deallocate the inode.
+        */
+       free(cnp->cn_pnbuf, M_NAMEI);
+       vput(dvp);
+       ip->i_nlink = 0;
+       ip->i_flag |= ICHG;
+       vput(tvp);
+       return (error);
 }
 }