Remove debugging statement.
[oweals/busybox.git] / coreutils / mv.c
1 /* vi: set sw=4 ts=4: */
2 /*
3  * Mini mv implementation for busybox
4  *
5  *
6  * Copyright (C) 2000 by Matt Kraai <kraai@alumni.carnegiemellon.edu>
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License as published by
10  * the Free Software Foundation; either version 2 of the License, or
11  * (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16  * General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
21  *
22  */
23
24 #include <sys/types.h>
25 #include <sys/stat.h>
26 #include <unistd.h>
27 #include <dirent.h>
28 #include <errno.h>
29 #include <stdlib.h>
30
31 #include "busybox.h"
32
33 static int flags;
34
35 static int manual_rename(const char *source, const char *dest)
36 {
37         struct stat source_stat;
38         struct stat dest_stat;
39         int source_exists = 1;
40         int dest_exists = 1;
41
42         if (stat(source, &source_stat) < 0) {
43                 if (errno != ENOENT) {
44                         perror_msg("unable to stat `%s'", source);
45                         return -1;
46                 }
47                 source_exists = 0;
48         }
49
50         if (stat(dest, &dest_stat) < 0) {
51                 if (errno != ENOENT) {
52                         perror_msg("unable to stat `%s'", dest);
53                         return -1;
54                 }
55                 dest_exists = 0;
56         }
57
58         if (dest_exists) {
59                 if (S_ISDIR(dest_stat.st_mode) &&
60                           (!source_exists || !S_ISDIR(source_stat.st_mode))) {
61                         error_msg("cannot overwrite directory with non-directory");
62                         return -1;
63                 }
64
65                 if (!S_ISDIR(dest_stat.st_mode) && source_exists &&
66                                 S_ISDIR(source_stat.st_mode)) {
67                         error_msg("cannot overwrite non-directory with directory");
68                         return -1;
69                 }
70
71                 if (unlink(dest) < 0) {
72                         perror_msg("cannot remove `%s'", dest);
73                         return -1;
74                 }
75         }
76
77         if (copy_file(source, dest, FILEUTILS_RECUR | FILEUTILS_PRESERVE_STATUS |
78                         FILEUTILS_PRESERVE_SYMLINKS) < 0)
79                 return -1;
80
81         if (remove_file(source, FILEUTILS_RECUR | FILEUTILS_FORCE) < 0)
82                 return -1;
83
84         return 0;
85 }
86
87 static int move_file(const char *source, const char *dest)
88 {
89         struct stat dest_stat;
90         int dest_exists = 1;
91
92         if (stat(dest, &dest_stat) < 0) {
93                 if (errno != ENOENT) {
94                         perror_msg("unable to stat `%s'", dest);
95                         return -1;
96                 }
97                 dest_exists = 0;
98         }
99
100         if (dest_exists && !(flags & FILEUTILS_FORCE) &&
101                         ((access(dest, W_OK) < 0 && isatty(0)) ||
102                          (flags & FILEUTILS_INTERACTIVE))) {
103                 fprintf(stderr, "mv: overwrite `%s'? ", dest);
104                 if (!ask_confirmation())
105                         return 0;
106         }
107
108         if (rename(source, dest) < 0) {
109                 if (errno == EXDEV)
110                         return manual_rename(source, dest);
111
112                 perror_msg("unable to rename `%s'", source);
113                 return -1;
114         }
115         
116         return 0;
117 }
118
119 extern int mv_main(int argc, char **argv)
120 {
121         int status = 0;
122         int opt;
123         int i;
124
125         while ((opt = getopt(argc, argv, "fi")) != -1)
126                 switch (opt) {
127                 case 'f':
128                         flags &= ~FILEUTILS_INTERACTIVE;
129                         flags |= FILEUTILS_FORCE;
130                         break;
131                 case 'i':
132                         flags &= ~FILEUTILS_FORCE;
133                         flags |= FILEUTILS_INTERACTIVE;
134                         break;
135                 default:
136                         show_usage();
137                 }
138
139         if (optind + 2 > argc)
140                 show_usage();
141
142         if (optind + 2 == argc) {
143                 struct stat dest_stat;
144                 int dest_exists = 1;
145
146                 if (stat(argv[optind + 1], &dest_stat) < 0) {
147                         if (errno != ENOENT)
148                                 perror_msg_and_die("unable to stat `%s'", argv[optind + 1]);
149                         dest_exists = 0;
150                 }
151
152                 if (!dest_exists || !S_ISDIR(dest_stat.st_mode)) {
153                         if (move_file(argv[optind], argv[optind + 1]) < 0)
154                                 status = 1;
155                         return status;
156                 }
157         }
158
159         for (i = optind; i < argc - 1; i++) {
160                 char *dest = concat_path_file(argv[argc - 1],
161                                 get_last_path_component(argv[i]));
162                 if (move_file(argv[i], dest) < 0)
163                         status = 1;
164                 free(dest);
165         }
166
167         return status;
168 }