BSD 4_3_Net_2 release
[unix-history] / usr / src / bin / mv / mv.c
index 9414212..ca387b7 100644 (file)
@@ -5,17 +5,33 @@
  * This code is derived from software contributed to Berkeley by
  * Ken Smith of The State University of New York at Buffalo.
  *
  * This code is derived from software contributed to Berkeley by
  * Ken Smith of The State University of New York at Buffalo.
  *
- * Redistribution and use in source and binary forms are permitted
- * provided that the above copyright notice and this paragraph are
- * duplicated in all such forms and that any documentation,
- * advertising materials, and other materials related to such
- * distribution and use acknowledge that the software was developed
- * by the University of California, Berkeley.  The name of the
- * University may not be used to endorse or promote products derived
- * from this software without specific prior written permission.
- * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
- * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
- * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *     This product includes software developed by the University of
+ *     California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
  */
 
 #ifndef lint
  */
 
 #ifndef lint
@@ -25,20 +41,21 @@ char copyright[] =
 #endif /* not lint */
 
 #ifndef lint
 #endif /* not lint */
 
 #ifndef lint
-static char sccsid[] = "@(#)mv.c       5.8 (Berkeley) %G%";
+static char sccsid[] = "@(#)mv.c       5.11 (Berkeley) 4/3/91";
 #endif /* not lint */
 
 #include <sys/param.h>
 #include <sys/time.h>
 #include <sys/wait.h>
 #include <sys/stat.h>
 #endif /* not lint */
 
 #include <sys/param.h>
 #include <sys/time.h>
 #include <sys/wait.h>
 #include <sys/stat.h>
-#include <sys/file.h>
-#include <sys/errno.h>
+#include <fcntl.h>
+#include <errno.h>
+#include <unistd.h>
 #include <stdio.h>
 #include <stdio.h>
+#include <stdlib.h>
 #include <string.h>
 #include "pathnames.h"
 
 #include <string.h>
 #include "pathnames.h"
 
-extern int errno;
 int fflg, iflg;
 
 main(argc, argv)
 int fflg, iflg;
 
 main(argc, argv)
@@ -49,17 +66,17 @@ main(argc, argv)
        extern int optind;
        register int baselen, exitval, len;
        register char *p, *endp;
        extern int optind;
        register int baselen, exitval, len;
        register char *p, *endp;
-       struct stat sbuf;
+       struct stat sb;
        int ch;
        char path[MAXPATHLEN + 1];
 
        while (((ch = getopt(argc, argv, "-if")) != EOF))
                switch((char)ch) {
                case 'i':
        int ch;
        char path[MAXPATHLEN + 1];
 
        while (((ch = getopt(argc, argv, "-if")) != EOF))
                switch((char)ch) {
                case 'i':
-                       ++iflg;
+                       iflg = 1;
                        break;
                case 'f':
                        break;
                case 'f':
-                       ++fflg;
+                       fflg = 1;
                        break;
                case '-':               /* undocumented; for compatibility */
                        goto endarg;
                        break;
                case '-':               /* undocumented; for compatibility */
                        goto endarg;
@@ -74,18 +91,16 @@ endarg:     argc -= optind;
                usage();
 
        /*
                usage();
 
        /*
-        * if stat fails on target, it doesn't exist (or can't be accessed
-        * by the user, doesn't matter which) try the move.  If target exists,
-        * and isn't a directory, try the move.  More than 2 arguments is an
-        * error.
+        * If the stat on the target fails or the target isn't a directory,
+        * try the move.  More than 2 arguments is an error in this case.
         */
         */
-       if (stat(argv[argc - 1], &sbuf) || !S_ISDIR(sbuf.st_mode)) {
+       if (stat(argv[argc - 1], &sb) || !S_ISDIR(sb.st_mode)) {
                if (argc > 2)
                        usage();
                exit(do_move(argv[0], argv[1]));
        }
 
                if (argc > 2)
                        usage();
                exit(do_move(argv[0], argv[1]));
        }
 
-       /* got a directory, move each file into it */
+       /* It's a directory, move each file into it. */
        (void)strcpy(path, argv[argc - 1]);
        baselen = strlen(path);
        endp = &path[baselen];
        (void)strcpy(path, argv[argc - 1]);
        baselen = strlen(path);
        endp = &path[baselen];
@@ -110,11 +125,11 @@ endarg:   argc -= optind;
 do_move(from, to)
        char *from, *to;
 {
 do_move(from, to)
        char *from, *to;
 {
-       struct stat sbuf;
+       struct stat sb;
        int ask, ch;
 
        /*
        int ask, ch;
 
        /*
-        * Check access.  If interactive and file exists ask user if it
+        * Check access.  If interactive and file exists, ask user if it
         * should be replaced.  Otherwise if file exists but isn't writable
         * make sure the user wants to clobber it.
         */
         * should be replaced.  Otherwise if file exists but isn't writable
         * make sure the user wants to clobber it.
         */
@@ -124,9 +139,9 @@ do_move(from, to)
                        (void)fprintf(stderr, "overwrite %s? ", to);
                        ask = 1;
                }
                        (void)fprintf(stderr, "overwrite %s? ", to);
                        ask = 1;
                }
-               else if (access(to, W_OK) && !stat(to, &sbuf)) {
+               else if (access(to, W_OK) && !stat(to, &sb)) {
                        (void)fprintf(stderr, "override mode %o on %s? ",
                        (void)fprintf(stderr, "override mode %o on %s? ",
-                           sbuf.st_mode & 07777, to);
+                           sb.st_mode & 07777, to);
                        ask = 1;
                }
                if (ask) {
                        ask = 1;
                }
                if (ask) {
@@ -138,22 +153,23 @@ do_move(from, to)
        }
        if (!rename(from, to))
                return(0);
        }
        if (!rename(from, to))
                return(0);
+
        if (errno != EXDEV) {
                (void)fprintf(stderr,
                    "mv: rename %s to %s: %s\n", from, to, strerror(errno));
                return(1);
        }
        if (errno != EXDEV) {
                (void)fprintf(stderr,
                    "mv: rename %s to %s: %s\n", from, to, strerror(errno));
                return(1);
        }
+
        /*
        /*
-        * if rename fails, and it's a regular file, do the copy
-        * internally; otherwise, use cp and rm.
+        * If rename fails, and it's a regular file, do the copy internally;
+        * otherwise, use cp and rm.
         */
         */
-       if (stat(from, &sbuf)) {
-               (void)fprintf(stderr,
-                   "mv: %s: %s\n", from, strerror(errno));
+       if (stat(from, &sb)) {
+               (void)fprintf(stderr, "mv: %s: %s\n", from, strerror(errno));
                return(1);
        }
                return(1);
        }
-       return(S_ISREG(sbuf.st_mode) ?
-           fastcopy(from, to, &sbuf) : copy(from, to));
+       return(S_ISREG(sb.st_mode) ?
+           fastcopy(from, to, &sb) : copy(from, to));
 }
 
 fastcopy(from, to, sbp)
 }
 
 fastcopy(from, to, sbp)
@@ -164,31 +180,27 @@ fastcopy(from, to, sbp)
        static u_int blen;
        static char *bp;
        register int nread, from_fd, to_fd;
        static u_int blen;
        static char *bp;
        register int nread, from_fd, to_fd;
-       char *malloc();
 
        if ((from_fd = open(from, O_RDONLY, 0)) < 0) {
 
        if ((from_fd = open(from, O_RDONLY, 0)) < 0) {
-               (void)fprintf(stderr,
-                   "mv: %s: %s\n", from, strerror(errno));
+               error(from);
                return(1);
        }
                return(1);
        }
-       if ((to_fd = open(to, O_WRONLY|O_CREAT|O_TRUNC, sbp->st_mode)) < 0) {
-               (void)fprintf(stderr,
-                   "mv: %s: %s\n", to, strerror(errno));
+       if ((to_fd = open(to, O_CREAT|O_TRUNC|O_WRONLY, sbp->st_mode)) < 0) {
+               error(to);
                (void)close(from_fd);
                return(1);
        }
        if (!blen && !(bp = malloc(blen = sbp->st_blksize))) {
                (void)close(from_fd);
                return(1);
        }
        if (!blen && !(bp = malloc(blen = sbp->st_blksize))) {
-               (void)fprintf(stderr, "mv: %s: out of memory.\n", from);
+               error(NULL);
                return(1);
        }
        while ((nread = read(from_fd, bp, blen)) > 0)
                if (write(to_fd, bp, nread) != nread) {
                return(1);
        }
        while ((nread = read(from_fd, bp, blen)) > 0)
                if (write(to_fd, bp, nread) != nread) {
-                       (void)fprintf(stderr, "mv: %s: %s\n",
-                           to, strerror(errno));
+                       error(to);
                        goto err;
                }
        if (nread < 0) {
                        goto err;
                }
        if (nread < 0) {
-               (void)fprintf(stderr, "mv: %s: %s\n", from, strerror(errno));
+               error(from);
 err:           (void)unlink(to);
                (void)close(from_fd);
                (void)close(to_fd);
 err:           (void)unlink(to);
                (void)close(from_fd);
                (void)close(to_fd);
@@ -214,22 +226,31 @@ copy(from, to)
        int pid, status;
 
        if (!(pid = vfork())) {
        int pid, status;
 
        if (!(pid = vfork())) {
-               execlp(_PATH_CP, "mv", "-pr", from, to);
-               (void)fprintf(stderr, "mv: can't exec %s.\n", _PATH_CP);
+               execl(_PATH_CP, "mv", "-pr", from, to, NULL);
+               error(_PATH_CP);
                _exit(1);
        }
        (void)waitpid(pid, &status, 0);
        if (!WIFEXITED(status) || WEXITSTATUS(status))
                return(1);
        if (!(pid = vfork())) {
                _exit(1);
        }
        (void)waitpid(pid, &status, 0);
        if (!WIFEXITED(status) || WEXITSTATUS(status))
                return(1);
        if (!(pid = vfork())) {
-               execlp(_PATH_RM, "mv", "-rf", from);
-               (void)fprintf(stderr, "mv: can't exec %s.\n", _PATH_RM);
+               execl(_PATH_RM, "mv", "-rf", from, NULL);
+               error(_PATH_RM);
                _exit(1);
        }
        (void)waitpid(pid, &status, 0);
        return(!WIFEXITED(status) || WEXITSTATUS(status));
 }
 
                _exit(1);
        }
        (void)waitpid(pid, &status, 0);
        return(!WIFEXITED(status) || WEXITSTATUS(status));
 }
 
+error(s)
+       char *s;
+{
+       if (s)
+               (void)fprintf(stderr, "mv: %s: %s\n", s, strerror(errno));
+       else
+               (void)fprintf(stderr, "mv: %s\n", strerror(errno));
+}
+
 usage()
 {
        (void)fprintf(stderr,
 usage()
 {
        (void)fprintf(stderr,