-lfs_rename(fndp, tndp, p)
- register struct nameidata *fndp, *tndp;
- struct proc *p;
-{
- register struct inode *ip, *xp, *dp;
- struct dirtemplate dirbuf;
- int doingdirectory = 0, oldparent = 0, newparent = 0;
- int error = 0;
-
-printf("lfs_rename\n");
-#ifdef DIANOSTIC
- if ((tndp->ni_nameiop & HASBUF) == 0 ||
- (fndp->ni_nameiop & HASBUF) == 0)
- panic("ufs_rename: no name");
-#endif
- dp = VTOI(fndp->ni_dvp);
- ip = VTOI(fndp->ni_vp);
- /*
- * Check if just deleting a link name.
- */
- if (fndp->ni_vp == tndp->ni_vp) {
- VOP_ABORTOP(tndp);
- vput(tndp->ni_dvp);
- vput(tndp->ni_vp);
- vrele(fndp->ni_dvp);
- if ((ip->i_mode&IFMT) == IFDIR) {
- VOP_ABORTOP(fndp);
- vrele(fndp->ni_vp);
- return (EINVAL);
- }
- doingdirectory = 0;
- goto unlinkit;
- }
- ILOCK(ip);
- if ((ip->i_mode&IFMT) == IFDIR) {
- /*
- * Avoid ".", "..", and aliases of "." for obvious reasons.
- */
- if ((fndp->ni_namelen == 1 && fndp->ni_ptr[0] == '.') ||
- dp == ip || fndp->ni_isdotdot || (ip->i_flag & IRENAME)) {
- VOP_ABORTOP(tndp);
- vput(tndp->ni_dvp);
- if (tndp->ni_vp)
- vput(tndp->ni_vp);
- VOP_ABORTOP(fndp);
- vrele(fndp->ni_dvp);
- vput(fndp->ni_vp);
- return (EINVAL);
- }
- ip->i_flag |= IRENAME;
- oldparent = dp->i_number;
- doingdirectory++;
- }
- vrele(fndp->ni_dvp);
-
- /*
- * 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;
- ITIMES(ip, &time, &time); /* LFS */
- 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) {
- VOP_LOCK(fndp->ni_vp);
- error = ufs_access(fndp->ni_vp, VWRITE, tndp->ni_cred, p);
- VOP_UNLOCK(fndp->ni_vp);
- if (error)
- goto bad;
- if (xp != NULL)
- iput(xp); /* LFS */
- if (error = lfs_checkpath(ip, dp, tndp->ni_cred))
- goto out;
- if ((tndp->ni_nameiop & SAVESTART) == 0)
- panic("ufs_rename: lost to startdir");
- p->p_spare[1]--;
- if (error = lookup(tndp, p))
- goto out;
- dp = VTOI(tndp->ni_dvp);
- xp = NULL;
- if (tndp->ni_vp)
- xp = VTOI(tndp->ni_vp);
- }
- /*
- * 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 ((unsigned short)dp->i_nlink >= LINK_MAX) {
- error = EMLINK;
- goto bad;
- }
- dp->i_nlink++;
- dp->i_flag |= ICHG; /* LFS */
- ITIMES(dp, &time, &time); /* LFS */
- }
- if (error = lfs_direnter(ip, tndp)) {
- if (doingdirectory && newparent) {
- dp->i_nlink--;
- dp->i_flag |= ICHG; /* LFS */
- ITIMES(dp, &time, &time); /* LFS */
- }
- goto bad;
- }
- iput(dp);
- } 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, ensure 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;
- /*
- * 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(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) /* LFS */
- panic("rename: linked directory");
- error = lfs_itrunc(xp, (u_long)0, IO_SYNC);
- }
- xp->i_flag |= ICHG;
- iput(xp);
- xp = NULL;
- }
-
- /*
- * 3) Unlink the source.
- */
-unlinkit:
- fndp->ni_nameiop &= ~MODMASK;
- fndp->ni_nameiop |= LOCKPARENT | LOCKLEAF;
- if ((fndp->ni_nameiop & SAVESTART) == 0)
- panic("ufs_rename: lost from startdir");
- p->p_spare[1]--;
- (void) lookup(fndp, p);
- if (fndp->ni_vp != NULL) {
- xp = VTOI(fndp->ni_vp);
- dp = VTOI(fndp->ni_dvp);
- } else {
- /*
- * From name has disappeared.
- */
- if (doingdirectory)
- panic("rename: lost dir entry");
- vrele(ITOV(ip));
- 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, ITOV(xp), (caddr_t)&dirbuf,
- sizeof (struct dirtemplate), (off_t)0,
- UIO_SYSSPACE, IO_NODELOCKED,
- tndp->ni_cred, (int *)0, (struct proc *)0);
- if (error == 0) {
- if (dirbuf.dotdot_namlen != 2 ||
- dirbuf.dotdot_name[0] != '.' ||
- dirbuf.dotdot_name[1] != '.') {
- lfs_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,
- (struct proc *)0);
- cache_purge(ITOV(dp));
- }
- }
- }
- error = lfs_dirremove(fndp); /* LFS */
- 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).
- */
-static struct dirtemplate mastertemplate = {
- 0, 12, 1, ".",
- 0, DIRBLKSIZ - 12, 2, ".."
-};
-
-/*
- * Mkdir system call
- */
-lfs_mkdir(ndp, vap, p)
- struct nameidata *ndp;
- struct vattr *vap;