enum entry for unarchive to be used by tar
[oweals/busybox.git] / cp.c
diff --git a/cp.c b/cp.c
index 078a57c565b799ca8496f738a80c7b5df0f70295..82d43adff625824fcc98ef535333797be8a840a9 100644 (file)
--- a/cp.c
+++ b/cp.c
-#include "internal.h"
-#include <stdio.h>
+/* vi: set sw=4 ts=4: */
+/*
+ * Mini cp implementation for busybox
+ *
+ *
+ * Copyright (C) 2000 by Matt Kraai <kraai@alumni.carnegiemellon.edu>
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+ *
+ */
+
+#include <sys/types.h>
 #include <sys/stat.h>
-#include <sys/fcntl.h>
-#include <sys/param.h>
+#include <unistd.h>
+#include <fcntl.h>
+#include <utime.h>
 #include <errno.h>
+#include <dirent.h>
+#include <stdlib.h>
 
-const char  cp_usage[] = "cp [-r] source-file destination-file\n"
-"\t\tcp [-r] source-file [source-file ...] destination-directory\n"
-"\n"
-"\tCopy the source files to the destination.\n"
-"\n"
-"\t-r:\tRecursively copy all files and directories\n"
-"\t\tunder the argument directory.";
+#include "busybox.h"
 
-extern int
-cp_fn(const struct FileInfo * i)
+extern int cp_main(int argc, char **argv)
 {
-    int         sourceFd;
-    int         destinationFd;
-    const char * destination = i->destination;
-    struct stat destination_stat;
-    int         status;
-    char        buf[8192];
-    char        d[PATH_MAX];
+       int status = 0;
+       int opt;
+       int flags = 0;
+       int i;
+
+       while ((opt = getopt(argc, argv, "adfipR")) != -1)
+               switch (opt) {
+               case 'a':
+                       flags |= FILEUTILS_PRESERVE_STATUS | FILEUTILS_RECUR;
+                       /* fallthrough */
+               case 'd':
+                       flags |= FILEUTILS_PRESERVE_SYMLINKS;
+                       break;
+               case 'f':
+                       flags |= FILEUTILS_FORCE;
+                       break;
+               case 'i':
+                       flags |= FILEUTILS_INTERACTIVE;
+                       break;
+               case 'p':
+                       flags |= FILEUTILS_PRESERVE_STATUS;
+                       break;
+               case 'R':
+                       flags |= FILEUTILS_RECUR;
+                       break;
+               default:
+                       show_usage();
+               }
+       
+       if (optind + 2 > argc)
+               show_usage();
+
+       /* If there are only two arguments and...  */
+       if (optind + 2 == argc) {
+               struct stat source_stat;
+               struct stat dest_stat;
+               int source_exists = 1;
+               int dest_exists = 1;
 
-    if ( (i->stat.st_mode & S_IFMT) == S_IFDIR ) {
-        if ( mkdir(destination, i->stat.st_mode & ~S_IFMT)
-         != 0 && errno != EEXIST ) {
-            name_and_error(destination);
-            return 1;
-        }
-        return 0;
-    }
-    if ( (sourceFd = open(i->source, O_RDONLY)) < 0 ) {
-        name_and_error(i->source);
-        return 1;
-    }
-    if ( stat(destination, &destination_stat) == 0 ) {
-        if ( i->stat.st_ino == destination_stat.st_ino
-         &&  i->stat.st_dev == destination_stat.st_dev ) {
-            fprintf(stderr
-            ,"copy of %s to %s would copy file to itself.\n"
-            ,i->source
-            ,destination);
-            close(sourceFd);
-            return 1;
-        }
-    }
-    /*
-     * If the destination is a directory, create a file within it.
-     */
-    if ( (destination_stat.st_mode & S_IFMT) == S_IFDIR ) {
-               destination = join_paths(
-                d
-               ,i->destination
-               ,&i->source[i->directoryLength]);
+               if (((flags & FILEUTILS_PRESERVE_SYMLINKS) &&
+                               lstat(argv[optind], &source_stat) < 0) ||
+                               (!(flags & FILEUTILS_PRESERVE_SYMLINKS) &&
+                                stat(argv[optind], &source_stat))) {
+                       if (errno != ENOENT)
+                               perror_msg_and_die("unable to stat `%s'", argv[optind]);
+                       source_exists = 0;
+               }
 
-        if ( stat(destination, &destination_stat) == 0 ) {
-            if ( i->stat.st_ino == destination_stat.st_ino
-             &&  i->stat.st_dev == destination_stat.st_dev ) {
-                fprintf(stderr
-                ,"copy of %s to %s would copy file to itself.\n"
-                ,i->source
-                ,destination);
-                close(sourceFd);
-                return 1;
-            }
-        }
-    }
+               if (stat(argv[optind + 1], &dest_stat) < 0) {
+                       if (errno != ENOENT)
+                               perror_msg_and_die("unable to stat `%s'", argv[optind + 1]);
+                       dest_exists = 0;
+               }
+               
+               /* ...if neither is a directory or...  */
+               if (((!source_exists || !S_ISDIR(source_stat.st_mode)) &&
+                               (!dest_exists || !S_ISDIR(dest_stat.st_mode))) ||
+                               /* ...recursing, the first is a directory, and the
+                                * second doesn't exist, then... */
+                               ((flags & FILEUTILS_RECUR) && S_ISDIR(source_stat.st_mode) &&
+                                !dest_exists)) {
+                       /* ...do a simple copy.  */
+                       if (copy_file(argv[optind], argv[optind + 1], flags) < 0)
+                               status = 1;
+                       return status;
+               }
+       }
 
-    destinationFd = creat(destination, i->stat.st_mode & 07777);
+       for (i = optind; i < argc - 1; i++) {
+               char *dest = concat_path_file(argv[argc - 1],
+                               get_last_path_component(argv[i]));
+               if (copy_file(argv[i], dest, flags) < 0)
+                       status = 1;
+               free(dest);
+       }
 
-    while ( (status = read(sourceFd, buf, sizeof(buf))) > 0 ) {
-        if ( write(destinationFd, buf, status) != status ) {
-            name_and_error(destination);
-            close(sourceFd);
-            close(destinationFd);
-            return 1;
-        }
-    }
-    close(sourceFd);
-    close(destinationFd);
-    if ( status < 0 ) {
-        name_and_error(i->source);
-        return 1;
-    }
-    return 0;
+       return status;
 }