1 /* vi: set sw=4 ts=4: */
3 * Mini `cp' and `mv' implementation for BusyBox.
6 * Copyright (C) 1999 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
29 #define BB_DECLARE_EXTERN
30 #define bb_need_name_too_long
31 #define bb_need_omitting_directory
32 #define bb_need_not_a_directory
39 #include <sys/param.h>
46 static const int is_cp = 0;
47 static const int is_mv = 1;
48 static int dz_i; /* index into cp_mv_usage */
50 static const char *cp_mv_usage[] = /* .rodata */
56 static int recursiveFlag;
57 static int followLinks;
58 static int preserveFlag;
61 static const char *baseSrcName;
62 static int srcDirFlag;
63 static struct stat srcStatBuf;
65 static char *pBaseDestName;
66 static size_t baseDestLen;
67 static int destDirFlag;
68 static struct stat destStatBuf;
71 static volatile int mv_Action_first_time;
73 static void name_too_long__exit (void) __attribute__((noreturn));
76 void name_too_long__exit (void)
78 error_msg_and_die(name_too_long);
82 fill_baseDest_buf(char *_buf, size_t * _buflen) {
83 const char *srcBasename;
84 if ((srcBasename = strrchr(baseSrcName, '/')) == NULL) {
85 srcBasename = baseSrcName;
86 if (_buf[*_buflen - 1] != '/') {
87 if (++(*_buflen) > BUFSIZ)
88 name_too_long__exit();
92 if (*_buflen + strlen(srcBasename) > BUFSIZ)
93 name_too_long__exit();
94 strcat(_buf, srcBasename);
100 cp_mv_Action(const char *fileName, struct stat *statbuf, void* junk)
102 char destName[BUFSIZ + 1];
104 const char *srcBasename;
107 strcpy(destName, pBaseDestName);
108 destLen = strlen(destName);
110 if (srcDirFlag == TRUE) {
111 if (recursiveFlag == FALSE) {
112 error_msg(omitting_directory, baseSrcName);
115 srcBasename = (strstr(fileName, baseSrcName)
116 + strlen(baseSrcName));
118 if (destLen + strlen(srcBasename) > BUFSIZ) {
119 error_msg(name_too_long);
122 strcat(destName, srcBasename);
124 else if (destDirFlag == TRUE) {
125 fill_baseDest_buf(&destName[0], &destLen);
128 srcBasename = baseSrcName;
130 if (mv_Action_first_time && (dz_i == is_mv)) {
131 mv_Action_first_time = errno = 0;
132 if (rename(fileName, destName) < 0 && errno != EXDEV) {
133 perror_msg("rename(%s, %s)", fileName, destName);
134 goto do_copyFile; /* Try anyway... */
136 else if (errno == EXDEV)
139 longjmp(catch, 1); /* succeeded with rename() */
142 if (preserveFlag == TRUE && statbuf->st_nlink > 1) {
143 if (is_in_ino_dev_hashtable(statbuf, &name)) {
144 if (link(name, destName) < 0) {
145 perror_msg("link(%s, %s)", name, destName);
151 add_to_ino_dev_hashtable(statbuf, destName);
154 return copy_file(fileName, destName, preserveFlag, followLinks, forceFlag);
158 rm_Action(const char *fileName, struct stat *statbuf, void* junk)
162 if (S_ISDIR(statbuf->st_mode)) {
163 if (rmdir(fileName) < 0) {
164 perror_msg("rmdir(%s)", fileName);
167 } else if (unlink(fileName) < 0) {
168 perror_msg("unlink(%s)", fileName);
174 extern int cp_mv_main(int argc, char **argv)
178 RESERVE_BB_BUFFER(baseDestName,BUFSIZ + 1);
179 pBaseDestName = baseDestName; /* available globally */
181 if (*applet_name == 'c' && *(applet_name + 1) == 'p')
186 usage(cp_mv_usage[dz_i]);
189 recursiveFlag = preserveFlag = forceFlag = FALSE;
191 while ((c = getopt(argc, argv, "adpRf")) != EOF) {
196 recursiveFlag = TRUE;
205 recursiveFlag = TRUE;
211 usage(cp_mv_usage[is_cp]);
214 if ((argc - optind) < 2) {
215 usage(cp_mv_usage[dz_i]);
217 } else { /* (dz_i == is_mv) */
218 /* Initialize optind to 1, since in libc5 optind
219 * is not initialized until getopt() is called
220 * (or until sneaky programmers force it...). */
222 recursiveFlag = preserveFlag = TRUE;
227 if (strlen(argv[argc - 1]) > BUFSIZ) {
228 error_msg(name_too_long);
231 strcpy(baseDestName, argv[argc - 1]);
232 baseDestLen = strlen(baseDestName);
233 if (baseDestLen == 0)
236 destDirFlag = is_directory(baseDestName, TRUE, &destStatBuf);
237 if (argc - optind > 2 && destDirFlag == FALSE) {
238 error_msg(not_a_directory, baseDestName);
242 for (i = optind; i < (argc-1); i++) {
244 volatile int flags_memo;
249 if ((srcLen = strlen(baseSrcName)) > BUFSIZ)
250 name_too_long__exit();
252 if (srcLen == 0) continue; /* "" */
254 srcDirFlag = is_directory(baseSrcName, followLinks, &srcStatBuf);
256 if ((flags_memo = (recursiveFlag == TRUE &&
257 srcDirFlag == TRUE && destDirFlag == TRUE))) {
263 if ((pushd = getcwd(NULL, BUFSIZ + 1)) == NULL) {
264 perror_msg("getcwd()");
267 if (chdir(baseDestName) < 0) {
268 perror_msg("chdir(%s)", baseSrcName);
271 if ((d = getcwd(NULL, BUFSIZ + 1)) == NULL) {
272 perror_msg("getcwd()");
275 while (!state && *d != '\0') {
276 if (stat(d, &sb) < 0) { /* stat not lstat - always dereference targets */
277 perror_msg("stat(%s)", d);
281 if ((sb.st_ino == srcStatBuf.st_ino) &&
282 (sb.st_dev == srcStatBuf.st_dev)) {
283 error_msg("Cannot %s `%s' into a subdirectory of itself, "
284 "`%s/%s'\n", applet_name, baseSrcName,
285 baseDestName, baseSrcName);
289 if ((p = strrchr(d, '/')) != NULL) {
293 if (chdir(pushd) < 0) {
294 perror_msg("chdir(%s)", pushd);
304 fill_baseDest_buf(baseDestName, &baseDestLen);
306 status = setjmp(catch);
308 mv_Action_first_time = 1;
309 if (recursive_action(baseSrcName,
310 recursiveFlag, followLinks, FALSE,
311 cp_mv_Action, cp_mv_Action, NULL) == FALSE) goto exit_false;
313 recursive_action(baseSrcName,
314 recursiveFlag, followLinks, TRUE,
315 rm_Action, rm_Action, NULL) == FALSE) goto exit_false;
318 *(baseDestName + baseDestLen) = '\0';
327 c-file-style: "linux"