1 /* vi: set sw=4 ts=4: */
3 * Mini `cp' and `mv' implementation for BusyBox.
6 * Copyright (C) 1999,2000,2001 by Lineo, inc.
7 * Written by Erik Andersen <andersen@lineo.com>, <andersee@debian.org>
9 * Copyright (C) 2000 by BitterSweet Enterprises, LLC. (GPL)
10 * Extensively modified and rewritten by Karl M. Hegbloom <karlheg@debian.org>
12 * This program is free software; you can redistribute it and/or modify
13 * it under the terms of the GNU General Public License as published by
14 * the Free Software Foundation; either version 2 of the License, or
15 * (at your option) any later version.
17 * This program is distributed in the hope that it will be useful,
18 * but WITHOUT ANY WARRANTY; without even the implied warranty of
19 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
20 * General Public License for more details.
22 * You should have received a copy of the GNU General Public License
23 * along with this program; if not, write to the Free Software
24 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
32 #include <sys/param.h>
40 #define BB_DECLARE_EXTERN
41 #define bb_need_name_too_long
42 #define bb_need_omitting_directory
43 #define bb_need_not_a_directory
47 static const int is_cp = 0;
48 static const int is_mv = 1;
49 static int dz_i; /* index into cp_mv_usage */
52 static int recursiveFlag;
53 static int followLinks;
54 static int preserveFlag;
57 static const char *baseSrcName;
58 static int srcDirFlag;
59 static struct stat srcStatBuf;
61 static char *pBaseDestName;
62 static size_t baseDestLen;
63 static int destDirFlag;
64 static struct stat destStatBuf;
67 static volatile int mv_Action_first_time;
69 static void name_too_long__exit (void) __attribute__((noreturn));
72 void name_too_long__exit (void)
74 error_msg_and_die(name_too_long);
78 fill_baseDest_buf(char *_buf, size_t * _buflen) {
79 const char *srcBasename;
80 if ((srcBasename = strrchr(baseSrcName, '/')) == NULL) {
81 srcBasename = baseSrcName;
82 if (_buf[*_buflen - 1] != '/') {
83 if (++(*_buflen) > BUFSIZ)
84 name_too_long__exit();
88 if (*_buflen + strlen(srcBasename) > BUFSIZ)
89 name_too_long__exit();
90 strcat(_buf, srcBasename);
96 cp_mv_Action(const char *fileName, struct stat *statbuf, void* junk)
98 char destName[BUFSIZ + 1];
100 const char *srcBasename;
103 strcpy(destName, pBaseDestName);
104 destLen = strlen(destName);
106 if (srcDirFlag == TRUE) {
107 if (recursiveFlag == FALSE) {
108 error_msg(omitting_directory, baseSrcName);
111 srcBasename = (strstr(fileName, baseSrcName)
112 + strlen(baseSrcName));
114 if (destLen + strlen(srcBasename) > BUFSIZ) {
115 error_msg(name_too_long);
118 strcat(destName, srcBasename);
120 else if (destDirFlag == TRUE) {
121 fill_baseDest_buf(&destName[0], &destLen);
124 srcBasename = baseSrcName;
126 if (mv_Action_first_time && (dz_i == is_mv)) {
127 mv_Action_first_time = errno = 0;
128 if (rename(fileName, destName) < 0 && errno != EXDEV) {
129 perror_msg("rename(%s, %s)", fileName, destName);
130 goto do_copyFile; /* Try anyway... */
132 else if (errno == EXDEV)
135 longjmp(catch, 1); /* succeeded with rename() */
138 if (preserveFlag == TRUE && statbuf->st_nlink > 1) {
139 if (is_in_ino_dev_hashtable(statbuf, &name)) {
140 if (link(name, destName) < 0) {
141 perror_msg("link(%s, %s)", name, destName);
147 add_to_ino_dev_hashtable(statbuf, destName);
150 return copy_file(fileName, destName, preserveFlag, followLinks, forceFlag);
154 rm_Action(const char *fileName, struct stat *statbuf, void* junk)
158 if (S_ISDIR(statbuf->st_mode)) {
159 if (rmdir(fileName) < 0) {
160 perror_msg("rmdir(%s)", fileName);
163 } else if (unlink(fileName) < 0) {
164 perror_msg("unlink(%s)", fileName);
170 extern int cp_mv_main(int argc, char **argv)
174 RESERVE_BB_BUFFER(baseDestName,BUFSIZ + 1);
175 pBaseDestName = baseDestName; /* available globally */
177 if (*applet_name == 'c' && *(applet_name + 1) == 'p')
185 recursiveFlag = preserveFlag = forceFlag = FALSE;
187 while ((c = getopt(argc, argv, "adpRf")) != EOF) {
192 recursiveFlag = TRUE;
201 recursiveFlag = TRUE;
210 if ((argc - optind) < 2) {
213 } else { /* (dz_i == is_mv) */
214 /* Initialize optind to 1, since in libc5 optind
215 * is not initialized until getopt() is called
216 * (or until sneaky programmers force it...). */
218 recursiveFlag = preserveFlag = TRUE;
223 if (strlen(argv[argc - 1]) > BUFSIZ) {
224 error_msg(name_too_long);
227 strcpy(baseDestName, argv[argc - 1]);
228 baseDestLen = strlen(baseDestName);
229 if (baseDestLen == 0)
232 destDirFlag = is_directory(baseDestName, TRUE, &destStatBuf);
233 if (argc - optind > 2 && destDirFlag == FALSE) {
234 error_msg(not_a_directory, baseDestName);
238 for (i = optind; i < (argc-1); i++) {
240 volatile int flags_memo;
245 if ((srcLen = strlen(baseSrcName)) > BUFSIZ)
246 name_too_long__exit();
248 if (srcLen == 0) continue; /* "" */
250 srcDirFlag = is_directory(baseSrcName, followLinks, &srcStatBuf);
252 if ((flags_memo = (recursiveFlag == TRUE &&
253 srcDirFlag == TRUE && destDirFlag == TRUE))) {
259 if ((pushd = getcwd(NULL, BUFSIZ + 1)) == NULL) {
260 perror_msg("getcwd()");
263 if (chdir(baseDestName) < 0) {
264 perror_msg("chdir(%s)", baseSrcName);
267 if ((d = getcwd(NULL, BUFSIZ + 1)) == NULL) {
268 perror_msg("getcwd()");
271 while (!state && *d != '\0') {
272 if (stat(d, &sb) < 0) { /* stat not lstat - always dereference targets */
273 perror_msg("stat(%s)", d);
277 if ((sb.st_ino == srcStatBuf.st_ino) &&
278 (sb.st_dev == srcStatBuf.st_dev)) {
279 error_msg("Cannot %s `%s' into a subdirectory of itself, "
280 "`%s/%s'", applet_name, baseSrcName,
281 baseDestName, baseSrcName);
285 if ((p = strrchr(d, '/')) != NULL) {
289 if (chdir(pushd) < 0) {
290 perror_msg("chdir(%s)", pushd);
300 fill_baseDest_buf(baseDestName, &baseDestLen);
302 status = setjmp(catch);
304 mv_Action_first_time = 1;
305 if (recursive_action(baseSrcName,
306 recursiveFlag, followLinks, FALSE,
307 cp_mv_Action, cp_mv_Action, NULL) == FALSE) goto exit_false;
309 recursive_action(baseSrcName,
310 recursiveFlag, followLinks, TRUE,
311 rm_Action, rm_Action, NULL) == FALSE) goto exit_false;
314 *(baseDestName + baseDestLen) = '\0';
323 c-file-style: "linux"