Move start_stop_daemon to debianutils.
[oweals/busybox.git] / coreutils / cp.c
index 078a57c565b799ca8496f738a80c7b5df0f70295..c5dd31ec352eff679e7bcb5b06b2ef53eb31f519 100644 (file)
-#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
+ *
+ */
+
+/* BB_AUDIT SUSv3 defects - unsupported options -H, -L, and -P. */
+/* BB_AUDIT GNU defects - only extension options supported are -a and -d.  */
+/* http://www.opengroup.org/onlinepubs/007904975/utilities/cp.html */
+
+/* Mar 16, 2003      Manuel Novoa III   (mjn3@codepoet.org)
+ *
+ * Size reduction.
+ */
+
+#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>
+#include <assert.h>
+#include "busybox.h"
+#include "libcoreutils/coreutils.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.";
+static const char cp_opts[] = "pdRfia";        /* WARNING!! ORDER IS IMPORTANT!! */
 
-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];
+       struct stat source_stat;
+       struct stat dest_stat;
+       const char *last;
+       const char *dest;
+       int s_flags;
+       int d_flags;
+       int flags;
+       int status = 0;
+
+       /* Since these are enums, #if tests will not work.  So use assert()s. */
+       assert(FILEUTILS_PRESERVE_STATUS == 1);
+       assert(FILEUTILS_DEREFERENCE == 2);
+       assert(FILEUTILS_RECUR == 4);
+       assert(FILEUTILS_FORCE == 8);
+       assert(FILEUTILS_INTERACTIVE == 16);
+
+       flags = bb_getopt_ulflags(argc, argv, cp_opts);
+
+       if (flags & 32) {
+               flags |= (FILEUTILS_PRESERVE_STATUS | FILEUTILS_RECUR | FILEUTILS_DEREFERENCE);
+       }
+
+       flags ^= FILEUTILS_DEREFERENCE;         /* The sense of this flag was reversed. */
+
+       if (optind + 2 > argc) {
+               bb_show_usage();
+       }
 
-    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]);
+       last = argv[argc - 1];
+       argv += optind;
 
-        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 there are only two arguments and...  */
+       if (optind + 2 == argc) {
+               s_flags = cp_mv_stat2(*argv, &source_stat,
+                                                                (flags & FILEUTILS_DEREFERENCE) ? stat : lstat);
+               if ((s_flags < 0) || ((d_flags = cp_mv_stat(last, &dest_stat)) < 0)) {
+                       exit(EXIT_FAILURE);
+               }
+               /* ...if neither is a directory or...  */
+               if ( !((s_flags | d_flags) & 2) ||
+                       /* ...recursing, the 1st is a directory, and the 2nd doesn't exist... */
+                       /* ((flags & FILEUTILS_RECUR) && (s_flags & 2) && !d_flags) */
+                       /* Simplify the above since FILEUTILS_RECUR >> 1 == 2. */
+                       ((((flags & FILEUTILS_RECUR) >> 1) & s_flags) && !d_flags)
+               ) {
+                       /* ...do a simple copy.  */
+                               dest = last;
+                               goto DO_COPY; /* Note: optind+2==argc implies argv[1]==last below. */
+               }
+       }
 
-    destinationFd = creat(destination, i->stat.st_mode & 07777);
+       do {
+               dest = concat_path_file(last, bb_get_last_path_component(*argv));
+       DO_COPY:
+               if (copy_file(*argv, dest, flags) < 0) {
+                       status = 1;
+               }
+               if (*++argv == last) {
+                       break;
+               }
+               free((void *) dest);
+       } while (1);
 
-    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;
+       exit(status);
 }