ash: popstackmark is reported trying to pop until NULL
[oweals/busybox.git] / coreutils / cp.c
index 4cdfc843b2fcabe67741ee681888e0b863fc511c..64cf637972caaea2306390fb1682bf7593e37399 100644 (file)
+/* vi: set sw=4 ts=4: */
 /*
  * Mini cp implementation for busybox
  *
- * Copyright (C) 1998 by Erik Andersen <andersee@debian.org>
- *
- * 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
+ * Copyright (C) 2000 by Matt Kraai <kraai@alumni.carnegiemellon.edu>
+ * SELinux support by Yuichi Nakamura <ynakam@hitachisoft.jp>
  *
+ * Licensed under GPL v2 or later, see file LICENSE in this tarball for details.
  */
 
-#include "internal.h"
-#include <stdio.h>
-#include <time.h>
-#include <utime.h>
-#include <dirent.h>
-
-const char cp_usage[] = "cp [OPTION]... SOURCE DEST\n"
-    "   or: cp [OPTION]... SOURCE... DIRECTORY\n"
-    "Copy SOURCE to DEST, or multiple SOURCE(s) to DIRECTORY.\n"
-    "\n"
-    "\t-a\tsame as -dpR\n"
-    "\t-d\tpreserve links\n"
-    "\t-p\tpreserve file attributes if possable\n"
-    "\t-R\tcopy directories recursively\n";
-
-
-static int recursiveFlag = FALSE;
-static int followLinks = FALSE;
-static int preserveFlag = FALSE;
-static const char *srcName;
-static const char *destName;
+/* http://www.opengroup.org/onlinepubs/007904975/utilities/cp.html */
 
+/* Mar 16, 2003      Manuel Novoa III   (mjn3@codepoet.org)
+ *
+ * Size reduction.
+ */
 
-static int fileAction(const char *fileName)
-{
-    char newdestName[NAME_MAX];
-    strcpy(newdestName, destName);
-    strcat(newdestName, fileName+(strlen(srcName)));
-    fprintf(stderr, "A: copying %s to %s\n", fileName, newdestName);
-    return (copyFile(fileName, newdestName, preserveFlag, followLinks));
-}
+#include "busybox.h"
+#include "libcoreutils/coreutils.h"
 
-static int dirAction(const char *fileName)
+int cp_main(int argc, char **argv);
+int cp_main(int argc, char **argv)
 {
-    char newdestName[NAME_MAX];
-    struct stat statBuf;
-    struct  utimbuf times;
-
-    strcpy(newdestName, destName);
-    strcat(newdestName, fileName+(strlen(srcName)));
-    if (stat(newdestName, &statBuf)) {
-       if (mkdir( newdestName, 0777777 ^ umask (0))) {
-           perror(newdestName);
-           return( FALSE);
-       }
-    }
-    else if (!S_ISDIR (statBuf.st_mode)) {
-       fprintf(stderr, "`%s' exists but is not a directory", newdestName);
-       return( FALSE);
-    }
-    if (preserveFlag==TRUE) {
-       /* Try to preserve premissions, but don't whine on failure */
-       if (stat(newdestName, &statBuf)) {
-           perror(newdestName);
-           return( FALSE);
+       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;
+       enum {
+               OPT_a = 1 << (sizeof(FILEUTILS_CP_OPTSTR)-1),
+               OPT_r = 1 << (sizeof(FILEUTILS_CP_OPTSTR)),
+               OPT_P = 1 << (sizeof(FILEUTILS_CP_OPTSTR)+1),
+               OPT_H = 1 << (sizeof(FILEUTILS_CP_OPTSTR)+2),
+               OPT_L = 1 << (sizeof(FILEUTILS_CP_OPTSTR)+3),
+       };
+
+       // Soft- and hardlinking don't mix
+       // -P and -d are the same (-P is POSIX, -d is GNU)
+       // -r and -R are the same
+       // -a = -pdR
+       opt_complementary = "?:l--s:s--l:Pd:rR:apdR";
+       flags = getopt32(argc, argv, FILEUTILS_CP_OPTSTR "arPHL");
+       /* Default behavior of cp is to dereference, so we don't have to do
+        * anything special when we are given -L.
+        * The behavior of -H is *almost* like -L, but not quite, so let's
+        * just ignore it too for fun.
+       if (flags & OPT_L) ...
+       if (flags & OPT_H) ... // deref command-line params only
+       */
+
+#if ENABLE_SELINUX 
+       if (flags & FILEUTILS_PRESERVE_SECURITY_CONTEXT) {
+               selinux_or_die();
        }
-       chmod(newdestName, statBuf.st_mode);
-       chown(newdestName, statBuf.st_uid, statBuf.st_gid);
-       times.actime = statBuf.st_atime;
-       times.modtime = statBuf.st_mtime;
-       utime(newdestName, &times);
-    }
-    return TRUE;
-}
-
-extern int cp_main(int argc, char **argv)
-{
+#endif
 
-    int dirFlag;
+       flags ^= FILEUTILS_DEREFERENCE;         /* The sense of this flag was reversed. */
 
-    if (argc < 3) {
-       fprintf(stderr, "Usage: %s", cp_usage);
-       exit (FALSE);
-    }
-    argc--;
-    argv++;
-
-    /* Parse any options */
-    while (**argv == '-') {
-       while (*++(*argv))
-           switch (**argv) {
-           case 'a':
-               followLinks = TRUE;
-               preserveFlag = TRUE;
-               recursiveFlag = TRUE;
-               break;
-           case 'd':
-               followLinks = TRUE;
-               break;
-           case 'p':
-               preserveFlag = TRUE;
-               break;
-           case 'R':
-               recursiveFlag = TRUE;
-               break;
-           default:
-               fprintf(stderr, "Usage: %s\n", cp_usage);
-               exit(FALSE);
-           }
-       argc--;
-       argv++;
-    }
-
-
-    destName = argv[argc - 1];
+       if (optind + 2 > argc) {
+               bb_show_usage();
+       }
 
-    dirFlag = isDirectory(destName);
+       last = argv[argc - 1];
+       argv += optind;
+
+       /* 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)
+                       return EXIT_FAILURE;
+               d_flags = cp_mv_stat(last, &dest_stat);
+               if (d_flags < 0)
+                       return 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)
+               ) {
+                       /* ...do a simple copy.  */
+                       dest = xstrdup(last);
+                       goto DO_COPY; /* Note: optind+2==argc implies argv[1]==last below. */
+               }
+       }
 
-    if ((argc > 3) && !dirFlag) {
-       fprintf(stderr, "%s: not a directory\n", destName);
-       exit (FALSE);
-    }
+       do {
+               dest = concat_path_file(last, bb_get_last_path_component(*argv));
+ DO_COPY:
+               if (copy_file(*argv, dest, flags) < 0) {
+                       status = 1;
+               }
+               free((void*)dest);
+       } while (*++argv != last);
 
-    while (argc-- >= 2) {
-       srcName = *(argv++);
-       exit( recursiveAction(srcName, recursiveFlag, followLinks,
-                              fileAction, fileAction));
-    }
-    exit( TRUE);
+       return status;
 }