1 files changed, 258 insertions, 0 deletions

diff --git a/cp_mv.c b/cp_mv.c
new file mode 100644
index 000000000..2ba8662b9
--- /dev/null
+++ b/cp_mv.c
@@ -0,0 +1,258 @@
+/*
+ * Mini `cp' and `mv' implementation for BusyBox.
+ *
+ *
+ * Copyright (C) 1999 by Lineo, inc.
+ * Written by Erik Andersen <andersen@lineo.com>, <andersee@debian.org>
+ *
+ * Copyright (C) 2000 by BitterSweet Enterprises, LLC. (GPL)
+ * Extensively modified and rewritten by  Karl M. Hegbloom <karlheg@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
+ *
+ */
+
+#include "internal.h"
+#define BB_DECLARE_EXTERN
+#define bb_need_name_too_long
+#define bb_need_omitting_directory
+#define bb_need_not_a_directory
+#include "messages.c"
+
+#include <stdio.h>
+#include <time.h>
+#include <utime.h>
+#include <dirent.h>
+#include <sys/param.h>
+
+#define is_cp 0
+#define is_mv 1
+static const char *dz;          /* dollar zero, .bss */
+static int dz_i;                /* index,       .bss */
+static const char *cp_mv_usage[] =     /* .rodata */
+{
+     "cp [OPTION]... SOURCE DEST\n"
+     "   or: cp [OPTION]... SOURCE... DIRECTORY\n\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 possible\n"
+     "\t-R\tcopy directories recursively\n"
+     ,
+     "mv SOURCE DEST\n"
+     "   or: mv SOURCE... DIRECTORY\n\n"
+     "Rename SOURCE to DEST, or move SOURCE(s) to DIRECTORY.\n"
+     "Warning!!  This is not GNU `mv'.  It does not preserve hard links.\n"
+};
+
+extern int cp_mv_main(int argc, char **argv)
+{
+    __label__ name_too_long__exit;
+    __label__ exit_false;
+
+    int         recursiveFlag;
+    int         followLinks;
+    int         preserveFlag;
+
+    const char *baseSrcName;
+    int         srcDirFlag;
+
+    char        baseDestName[PATH_MAX + 1];
+    size_t      baseDestLen;
+    int         destDirFlag;
+
+    void fill_baseDest_buf(char *_buf, size_t *_buflen)
+        {
+            const char *srcBasename;
+            if ((srcBasename = strrchr(baseSrcName, '/')) == NULL)
+            {
+                srcBasename = baseSrcName;
+                if (_buf[*_buflen - 1] != '/')
+                {
+                    if (++(*_buflen) > PATH_MAX)
+                        goto name_too_long__exit;
+                    strcat(_buf, "/");
+                }
+            }
+            if (*_buflen + strlen(srcBasename) > PATH_MAX)
+                goto name_too_long__exit;
+            strcat(_buf, srcBasename);
+            return;
+        }
+
+    int fileAction(const char *fileName, struct stat *statbuf)
+        {
+            __label__   return_false;
+            char        destName[PATH_MAX + 1];
+            size_t      destLen;
+            const char *srcBasename;
+            
+            strcpy(destName, baseDestName);
+            destLen = strlen(destName);
+            
+            if (srcDirFlag == TRUE)
+            {
+                if (recursiveFlag == FALSE)
+                {
+                    fprintf(stderr, omitting_directory, "cp", baseSrcName);
+                    return TRUE;
+                }
+                srcBasename = (strstr(fileName, baseSrcName)
+                               + strlen(baseSrcName));
+                if (destLen + strlen(srcBasename) > PATH_MAX)
+                {
+                    fprintf(stderr, name_too_long, "cp");
+                    goto return_false;
+                }
+                strcat(destName, srcBasename);
+            }
+            else if (destDirFlag == TRUE)
+            {
+                fill_baseDest_buf(&destName[0], &destLen);
+            }
+            else
+            {
+                srcBasename = baseSrcName;
+            }
+            return copyFile(fileName, destName, preserveFlag, followLinks);
+            
+        return_false:
+            return FALSE;
+        }
+
+    int rmfileAction(const char *fileName, struct stat* statbuf)
+         {
+              if (unlink(fileName) < 0 ) {
+                   perror(fileName);
+                   return FALSE;
+              }
+              return TRUE;
+         }
+
+    int rmdirAction(const char *fileName, struct stat* statbuf)
+         {
+              if (rmdir(fileName) < 0 ) {
+                   perror(fileName);
+                   return FALSE;
+              }
+              return TRUE;
+         }
+
+    if ((dz = strrchr(*argv, '/')) == NULL) dz = *argv; else dz++;
+    if (*dz == 'c' && *(dz + 1) == 'p') dz_i = is_cp; else dz_i = is_mv;
+    if (argc < 3) usage(cp_mv_usage[dz_i]);
+    argc--;
+    argv++;
+
+    if (dz_i == is_cp)
+    {
+        recursiveFlag = preserveFlag = FALSE;
+        followLinks = TRUE;
+        while (**argv == '-')
+        {
+            while (*++(*argv))
+            {
+                switch (**argv)
+                {
+                case 'a':
+                    followLinks   = FALSE;
+                    preserveFlag  = TRUE;
+                    recursiveFlag = TRUE;
+                    break;
+                case 'd':
+                    followLinks   = FALSE;
+                    break;
+                case 'p':
+                    preserveFlag  = TRUE;
+                    break;
+                case 'R':
+                    recursiveFlag = TRUE;
+                    break;
+                default:
+                    usage(cp_mv_usage[is_cp]);
+                }
+            }
+            argc--;
+            argv++;
+        }
+    }
+    else /* (dz_i == is_mv) */
+    {
+        recursiveFlag = preserveFlag = TRUE;
+        followLinks = FALSE;
+    }
+
+    if (strlen(argv[argc - 1]) > PATH_MAX)
+    {
+        fprintf(stderr, name_too_long, "cp");
+        goto exit_false;
+    }
+    strcpy(baseDestName, argv[argc - 1]);
+    baseDestLen = strlen(baseDestName);
+    if (baseDestLen == 0) goto exit_false;
+
+    destDirFlag = isDirectory(baseDestName, TRUE);
+    if ((argc > 3) && destDirFlag == FALSE)
+    {
+        fprintf(stderr, not_a_directory, "cp", baseDestName);
+        goto exit_false;
+    }
+
+    while (argc-- > 1)
+    {
+        size_t srcLen;
+        int    flags_memo;
+
+        baseSrcName = *(argv++);
+
+        if ((srcLen = strlen(baseSrcName)) > PATH_MAX)
+            goto name_too_long__exit;
+
+        if (srcLen == 0) continue;
+
+        srcDirFlag = isDirectory(baseSrcName, followLinks);
+
+        if ((flags_memo = (recursiveFlag == TRUE &&
+                           srcDirFlag == TRUE && destDirFlag == TRUE)))
+        {
+            fill_baseDest_buf(&baseDestName[0], &baseDestLen);
+        }
+        if (recursiveAction(baseSrcName,
+                            recursiveFlag, followLinks, FALSE,
+                            fileAction, fileAction)
+            == FALSE) goto exit_false;
+
+        if (dz_i == is_mv &&
+            recursiveAction(baseSrcName,
+                            recursiveFlag, followLinks, TRUE,
+                            rmfileAction, rmdirAction)
+            == FALSE) goto exit_false;
+
+        if (flags_memo) *(baseDestName + baseDestLen) = '\0';
+    }
+
+    exit TRUE;
+
+ name_too_long__exit:
+    fprintf(stderr, name_too_long, "cp");
+ exit_false:
+    exit FALSE;
+}
+
+// Local Variables:
+// c-file-style: "k&r"
+// c-basic-offset: 4
+// End: