- /*
- * 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;
- error = iupdat(ip, &time, &time, 1);
- IUNLOCK(ip);
-
- /*
- * When the target exists, both the directory
- * and target vnodes are returned locked.
- */
- dp = VTOI(tndp->ni_dvp);
- xp = NULL;
- if (tndp->ni_vp)
- xp = VTOI(tndp->ni_vp);
- /*
- * 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().
- */
- if (oldparent != dp->i_number)
- newparent = dp->i_number;
- if (doingdirectory && newparent) {
- if (error = iaccess(ip, IWRITE, tndp->ni_cred))
- goto bad;
- tndp->ni_nameiop = RENAME | LOCKPARENT | LOCKLEAF | NOCACHE;
- do {
- dp = VTOI(tndp->ni_dvp);
- if (xp != NULL)
- iput(xp);
- if (error = checkpath(ip, dp, tndp->ni_cred))
- goto out;
- if (error = namei(tndp))
- goto out;
- xp = NULL;
- if (tndp->ni_vp)
- xp = VTOI(tndp->ni_vp);
- } while (dp != VTOI(tndp->ni_dvp));
- }
- /*
- * 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) {
- dp->i_nlink++;
- dp->i_flag |= ICHG;
- error = iupdat(dp, &time, &time, 1);
- }
- if (error = direnter(ip, tndp))
- goto out;
- } else {
- 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) && tndp->ni_cred->cr_uid != 0 &&
- tndp->ni_cred->cr_uid != dp->i_uid &&
- xp->i_uid != tndp->ni_cred->cr_uid) {
- error = EPERM;
- goto bad;
- }
- /*
- * Target must be empty if a directory
- * and have no links to it.
- * Also, insure source and target are
- * compatible (both directories, or both
- * not directories).
- */
- if ((xp->i_mode&IFMT) == IFDIR) {
- if (!dirempty(xp, dp->i_number, tndp->ni_cred) ||
- xp->i_nlink > 2) {
- error = ENOTEMPTY;
- goto bad;
- }
- if (!doingdirectory) {
- error = ENOTDIR;
- goto bad;
- }
- cache_purge(ITOV(dp));
- } else if (doingdirectory) {
- error = EISDIR;
- goto bad;
- }
- if (error = dirrewrite(dp, ip, tndp))
- goto bad;
- vput(ITOV(dp));
- /*
- * 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 = itrunc(xp, (u_long)0, IO_SYNC);
- }
- xp->i_flag |= ICHG;
- iput(xp);
- xp = NULL;
- }
-
- /*
- * 3) Unlink the source.
- */
- fndp->ni_nameiop = DELETE | LOCKPARENT | LOCKLEAF;
- (void)namei(fndp);
- if (fndp->ni_vp != NULL) {
- xp = VTOI(fndp->ni_vp);
- dp = VTOI(fndp->ni_dvp);
- } else {
- if (fndp->ni_dvp != NULL)
- vput(fndp->ni_dvp);
- xp = NULL;
- dp = NULL;
- }
- /*
- * 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, ITOV(xp), (caddr_t)&dirbuf,
- sizeof (struct dirtemplate), (off_t)0,
- UIO_SYSSPACE, IO_NODELOCKED,
- tndp->ni_cred, (int *)0);
- if (error == 0) {
- if (dirbuf.dotdot_namlen != 2 ||
- dirbuf.dotdot_name[0] != '.' ||
- dirbuf.dotdot_name[1] != '.') {
- dirbad(xp, 12, "rename: mangled dir");
- } else {
- dirbuf.dotdot_ino = newparent;
- (void) vn_rdwr(UIO_WRITE, ITOV(xp),
- (caddr_t)&dirbuf,
- sizeof (struct dirtemplate),
- (off_t)0, UIO_SYSSPACE,
- IO_NODELOCKED|IO_SYNC,
- tndp->ni_cred, (int *)0);
- cache_purge(ITOV(dp));
- }
- }
- }
- error = dirremove(fndp);
- if (!error) {
- xp->i_nlink--;
- xp->i_flag |= ICHG;
- }
- xp->i_flag &= ~IRENAME;
- }
- if (dp)
- vput(ITOV(dp));
- if (xp)
- vput(ITOV(xp));
- vrele(ITOV(ip));
- return (error);
-
-bad:
- if (xp)
- vput(ITOV(xp));
- vput(ITOV(dp));
-out:
- ip->i_nlink--;
- ip->i_flag |= ICHG;
- vrele(ITOV(ip));
- return (error);
-}
-
-/*
- * A virgin directory (no blushing please).
- */
-struct dirtemplate mastertemplate = {
- 0, 12, 1, ".",
- 0, DIRBLKSIZ - 12, 2, ".."
-};
-
-/*
- * Mkdir system call
- */
-ufs_mkdir(ndp, vap)
- struct nameidata *ndp;
- struct vattr *vap;
-{
- register struct inode *ip, *dp;
- struct inode *tip;
- struct vnode *dvp;
- struct dirtemplate dirtemplate;
- int error;
- int dmode;
-
- dvp = ndp->ni_dvp;
- dp = VTOI(dvp);
- dmode = vap->va_mode&0777;
- dmode |= IFDIR;
- /*
- * Must simulate part of maknode here
- * in order to acquire the inode, but
- * not have it entered in the parent
- * directory. The entry is made later
- * after writing "." and ".." entries out.
- */
- error = ialloc(dp, dirpref(dp->i_fs), dmode, &tip);
- if (error) {
- iput(dp);
- return (error);
- }
- ip = tip;
-#ifdef QUOTA
- if (ip->i_dquot != NODQUOT)
- panic("mkdir: dquot");
-#endif
- ip->i_flag |= IACC|IUPD|ICHG;
- ip->i_mode = dmode;
- ITOV(ip)->v_type = VDIR; /* Rest init'd in iget() */
- ip->i_nlink = 2;
- ip->i_uid = ndp->ni_cred->cr_uid;
- ip->i_gid = dp->i_gid;
-#ifdef QUOTA
- ip->i_dquot = inoquota(ip);
-#endif
- error = iupdat(ip, &time, &time, 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;
- error = iupdat(dp, &time, &time, 1);
-
- /*
- * Initialize directory with "."
- * and ".." from static template.
- */
- dirtemplate = mastertemplate;
- dirtemplate.dot_ino = ip->i_number;
- dirtemplate.dotdot_ino = dp->i_number;
- error = vn_rdwr(UIO_WRITE, ITOV(ip), (caddr_t)&dirtemplate,
- sizeof (dirtemplate), (off_t)0, UIO_SYSSPACE,
- IO_NODELOCKED|IO_SYNC, ndp->ni_cred, (int *)0);
- if (error) {
- dp->i_nlink--;
- dp->i_flag |= ICHG;
- goto bad;
- }
- if (DIRBLKSIZ > dp->i_fs->fs_fsize)
- panic("mkdir: blksize"); /* XXX - should grow w/balloc() */
- else
- ip->i_size = DIRBLKSIZ;
- /*
- * Directory all set up, now
- * install the entry for it in
- * the parent directory.
- */
- error = direnter(ip, ndp);
- dp = NULL;
- if (error) {
- ndp->ni_nameiop = LOOKUP | NOCACHE;
- error = namei(ndp);
- if (!error) {
- dp = VTOI(ndp->ni_vp);
- dp->i_nlink--;
- dp->i_flag |= ICHG;
- }
- }
-bad:
- /*
- * No need to do an explicit itrunc 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;
- iput(ip);
- } else
- ndp->ni_vp = ITOV(ip);
- if (dp)
- iput(dp);
- return (error);
-}
-
-/*
- * Rmdir system call.
- */
-ufs_rmdir(ndp)
- register struct nameidata *ndp;
-{
- register struct inode *ip, *dp;
- int error = 0;
-
- ip = VTOI(ndp->ni_vp);
- dp = VTOI(ndp->ni_dvp);
- /*
- * No rmdir "." please.
- */
- if (dp == ip) {
- vrele(ITOV(dp));
- iput(ip);
- 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.)
- */
- if (ip->i_nlink != 2 || !dirempty(ip, dp->i_number, ndp->ni_cred)) {
- error = ENOTEMPTY;
- goto out;
- }
- /*
- * Delete reference to directory before purging
- * inode. If we crash in between, the directory
- * will be reattached to lost+found,
- */
- if (error = dirremove(ndp))
- goto out;
- dp->i_nlink--;
- dp->i_flag |= ICHG;
- cache_purge(ITOV(dp));
- iput(dp);
- ndp->ni_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 = itrunc(ip, (u_long)0, IO_SYNC);
- cache_purge(ITOV(ip));
-out:
- if (ndp->ni_dvp)
- iput(dp);
- iput(ip);
- return (error);
-}
-
-/*
- * symlink -- make a symbolic link
- */
-ufs_symlink(ndp, vap, target)
- struct nameidata *ndp;
- struct vattr *vap;
- char *target;
-{
- struct inode *ip;
- int error;
-
- error = maknode(IFLNK | vap->va_mode, ndp, &ip);
- if (error)
- return (error);
- error = vn_rdwr(UIO_WRITE, ITOV(ip), target, strlen(target), (off_t)0,
- UIO_SYSSPACE, IO_NODELOCKED, ndp->ni_cred, (int *)0);
- iput(ip);
- return (error);
-}
-
-/*
- * Vnode op for read and write
- */
-ufs_readdir(vp, uio, cred)
- struct vnode *vp;
- register struct uio *uio;
- struct ucred *cred;
-{
- 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;
- error = ufs_read(vp, uio, 0, cred);
- uio->uio_resid += lost;
- return (error);
-}
-
-/*
- * Return target name of a symbolic link
- */
-ufs_readlink(vp, uiop, cred)
- struct vnode *vp;
- struct uio *uiop;
- struct ucred *cred;
-{
-
- return (ufs_read(vp, uiop, 0, cred));
-}
-
-/*
- * Ufs abort op, called after namei() when a CREATE/DELETE isn't actually
- * done. Iff ni_vp/ni_dvp not null and locked, unlock.
- */
-ufs_abortop(ndp)
- register struct nameidata *ndp;
-{
- register struct inode *ip;
-
- if (ndp->ni_vp) {
- ip = VTOI(ndp->ni_vp);
- if (ip->i_flag & ILOCKED)
- IUNLOCK(ip);
- vrele(ndp->ni_vp);
- }
- if (ndp->ni_dvp) {
- ip = VTOI(ndp->ni_dvp);
- if (ip->i_flag & ILOCKED)
- IUNLOCK(ip);
- vrele(ndp->ni_dvp);
- }
- return;
-}
-
-ufs_lock(vp)
- struct vnode *vp;
-{
- register struct inode *ip = VTOI(vp);
-
- ILOCK(ip);
- return (0);
-}
-
-ufs_unlock(vp)
- struct vnode *vp;
-{
- register struct inode *ip = VTOI(vp);
-
- if (!(ip->i_flag & ILOCKED))
- panic("ufs_unlock NOT LOCKED");
- IUNLOCK(ip);
- return (0);
-}
-
-/*
- * Get access to bmap
- */
-ufs_bmap(vp, bn, vpp, bnp)
- struct vnode *vp;
- daddr_t bn;
- struct vnode **vpp;
- daddr_t *bnp;
-{
- struct inode *ip = VTOI(vp);
-
- if (vpp != NULL)
- *vpp = ip->i_devvp;
- if (bnp == NULL)
- return (0);
- return (bmap(ip, bn, bnp, (daddr_t *)0, (int *)0));
-}
-
-/*
- * Just call the device strategy routine
- */
-int checkoverlap = 1;
-
-ufs_strategy(bp)
- register struct buf *bp;
-{
- register struct inode *ip = VTOI(bp->b_vp);
- register struct buf *ep;
- struct vnode *vp;
- struct buf *ebp;
- daddr_t start, last;
- int error;
-
- if (bp->b_vp->v_type == VBLK || bp->b_vp->v_type == VCHR)
- panic("ufs_strategy: spec");
- if (bp->b_blkno == bp->b_lblkno) {
- if (error = bmap(ip, bp->b_lblkno, &bp->b_blkno))
- return (error);
- if ((long)bp->b_blkno == -1)
- clrbuf(bp);
- }
- if ((long)bp->b_blkno == -1) {
- biodone(bp);
- return (0);
- }
- if (checkoverlap) {
- ebp = &buf[nbuf];
- start = bp->b_blkno;
- last = start + btodb(bp->b_bcount) - 1;
- for (ep = buf; ep < ebp; ep++) {
- if (ep == bp || (ep->b_flags & B_INVAL) ||
- ep->b_vp == (struct vnode *)0)
- continue;
- if (VOP_BMAP(ep->b_vp, (daddr_t)0, &vp, (daddr_t)0))
- continue;
- if (vp != ip->i_devvp)
- continue;
- /* look for overlap */
- if (ep->b_bcount == 0 || ep->b_blkno > last ||
- ep->b_blkno + btodb(ep->b_bcount) <= start)
- continue;
- vprint("Disk overlap", vp);
- printf("\tstart %d, end %d overlap start %d, end %d\n",
- start, last, ep->b_blkno,
- ep->b_blkno + btodb(ep->b_bcount) - 1);
- }
- }
- vp = ip->i_devvp;
- bp->b_dev = vp->v_rdev;
- (*(vp->v_op->vn_strategy))(bp);
- return (0);
-}
-
-/*
- * Print out the contents of an inode.
- */
-ufs_print(vp)
- struct vnode *vp;
-{
- register struct inode *ip = VTOI(vp);
-
- printf("tag VT_UFS, ino %d, on dev %d, %d%s\n", ip->i_number,
- major(ip->i_dev), minor(ip->i_dev),
- (ip->i_flag & ILOCKED) ? " (LOCKED)" : "");
- if (ip->i_spare0 == 0)
- return;
- printf("\towner pid %d", ip->i_spare0);
- if (ip->i_spare1)
- printf(" waiting pid %d", ip->i_spare1);
- printf("\n");
-}
-
-/*
- * Read wrapper for special devices.
- */
-ufsspec_read(vp, uio, ioflag, cred)
- struct vnode *vp;
- struct uio *uio;
- int ioflag;
- struct ucred *cred;
-{
-
- /*
- * Set access flag.
- */
- VTOI(vp)->i_flag |= IACC;
- return (spec_read(vp, uio, ioflag, cred));
-}
-
-/*
- * Write wrapper for special devices.
- */
-ufsspec_write(vp, uio, ioflag, cred)
- struct vnode *vp;
- struct uio *uio;
- int ioflag;
- struct ucred *cred;
-{
-
- /*
- * Set update and change flags.
- */
- VTOI(vp)->i_flag |= IUPD|ICHG;
- return (spec_write(vp, uio, ioflag, cred));
-}
-
-/*
- * Close wrapper for special devices.
- *
- * Update the times on the inode then do device close.
- */
-ufsspec_close(vp, fflag, cred)
- struct vnode *vp;
- int fflag;
- struct ucred *cred;
-{
- register struct inode *ip = VTOI(vp);
-
- if (vp->v_usecount > 1 && !(ip->i_flag & ILOCKED))