1 /* vi: set sw=4 ts=4: */
3 * Mini copy_file implementation for busybox
5 * Copyright (C) 2001 by Matt Kraai <kraai@alumni.carnegiemellon.edu>
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 2 of the License, or
10 * (at your option) any later version.
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * General Public License for more details.
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, write to the Free Software
19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
23 #include <sys/types.h>
35 int copy_file(const char *source, const char *dest, int flags)
37 struct stat source_stat;
38 struct stat dest_stat;
42 if ((!(flags & FILEUTILS_DEREFERENCE) &&
43 lstat(source, &source_stat) < 0) ||
44 ((flags & FILEUTILS_DEREFERENCE) &&
45 stat(source, &source_stat) < 0)) {
46 perror_msg("%s", source);
50 if (stat(dest, &dest_stat) < 0) {
51 if (errno != ENOENT) {
52 perror_msg("unable to stat `%s'", dest);
58 if (dest_exists && source_stat.st_rdev == dest_stat.st_rdev &&
59 source_stat.st_ino == dest_stat.st_ino) {
60 error_msg("`%s' and `%s' are the same file", source, dest);
64 if (S_ISDIR(source_stat.st_mode)) {
67 mode_t saved_umask = 0;
69 if (!(flags & FILEUTILS_RECUR)) {
70 error_msg("%s: omitting directory", source);
76 if (!S_ISDIR(dest_stat.st_mode)) {
77 error_msg("`%s' is not a directory", dest);
82 saved_umask = umask(0);
84 mode = source_stat.st_mode;
85 if (!(flags & FILEUTILS_PRESERVE_STATUS))
86 mode = source_stat.st_mode & ~saved_umask;
89 if (mkdir(dest, mode) < 0) {
91 perror_msg("cannot create directory `%s'", dest);
98 /* Recursively copy files in SOURCE. */
99 if ((dp = opendir(source)) == NULL) {
100 perror_msg("unable to open directory `%s'", source);
105 while ((d = readdir(dp)) != NULL) {
106 char *new_source, *new_dest;
108 if (strcmp(d->d_name, ".") == 0 ||
109 strcmp(d->d_name, "..") == 0)
112 new_source = concat_path_file(source, d->d_name);
113 new_dest = concat_path_file(dest, d->d_name);
114 if (copy_file(new_source, new_dest, flags) < 0)
120 /* ??? What if an error occurs in readdir? */
122 if (closedir(dp) < 0) {
123 perror_msg("unable to close directory `%s'", source);
128 chmod(dest, source_stat.st_mode & ~saved_umask) < 0) {
129 perror_msg("unable to change permissions of `%s'", dest);
132 } else if (S_ISREG(source_stat.st_mode)) {
133 FILE *sfp, *dfp=NULL;
134 #ifdef CONFIG_FEATURE_PRESERVE_HARDLINKS
137 if (!(flags & FILEUTILS_DEREFERENCE) &&
138 is_in_ino_dev_hashtable(&source_stat, &link_name)) {
139 if (link(link_name, dest) < 0) {
140 perror_msg("unable to link `%s'", dest);
148 if ((sfp = fopen(source, "r")) == NULL) {
149 perror_msg("unable to open `%s'", source);
154 if (flags & FILEUTILS_INTERACTIVE) {
155 fprintf(stderr, "%s: overwrite `%s'? ", applet_name, dest);
156 if (!ask_confirmation()) {
162 if ((dfp = fopen(dest, "w")) == NULL) {
163 if (!(flags & FILEUTILS_FORCE)) {
164 perror_msg("unable to open `%s'", dest);
169 if (unlink(dest) < 0) {
170 perror_msg("unable to remove `%s'", dest);
182 if ((fd = open(dest, O_WRONLY|O_CREAT, source_stat.st_mode)) < 0 ||
183 (dfp = fdopen(fd, "w")) == NULL) {
186 perror_msg("unable to open `%s'", dest);
192 if (copy_file_chunk(sfp, dfp, -1) < 0)
195 if (fclose(dfp) < 0) {
196 perror_msg("unable to close `%s'", dest);
200 if (fclose(sfp) < 0) {
201 perror_msg("unable to close `%s'", source);
204 } else if (S_ISBLK(source_stat.st_mode) || S_ISCHR(source_stat.st_mode) ||
205 S_ISSOCK(source_stat.st_mode)) {
206 if (mknod(dest, source_stat.st_mode, source_stat.st_rdev) < 0) {
207 perror_msg("unable to create `%s'", dest);
210 } else if (S_ISFIFO(source_stat.st_mode)) {
211 if (mkfifo(dest, source_stat.st_mode) < 0) {
212 perror_msg("cannot create fifo `%s'", dest);
215 } else if (S_ISLNK(source_stat.st_mode)) {
216 char *lpath = xreadlink(source);
217 if (symlink(lpath, dest) < 0) {
218 perror_msg("cannot create symlink `%s'", dest);
223 #if (__GLIBC__ >= 2) && (__GLIBC_MINOR__ >= 1)
224 if (flags & FILEUTILS_PRESERVE_STATUS)
225 if (lchown(dest, source_stat.st_uid, source_stat.st_gid) < 0)
226 perror_msg("unable to preserve ownership of `%s'", dest);
229 #ifdef CONFIG_FEATURE_PRESERVE_HARDLINKS
230 add_to_ino_dev_hashtable(&source_stat, dest);
235 error_msg("internal error: unrecognized file type");
239 #ifdef CONFIG_FEATURE_PRESERVE_HARDLINKS
240 add_to_ino_dev_hashtable(&source_stat, dest);
245 if (flags & FILEUTILS_PRESERVE_STATUS) {
246 struct utimbuf times;
248 times.actime = source_stat.st_atime;
249 times.modtime = source_stat.st_mtime;
250 if (utime(dest, ×) < 0)
251 perror_msg("unable to preserve times of `%s'", dest);
252 if (chown(dest, source_stat.st_uid, source_stat.st_gid) < 0) {
253 source_stat.st_mode &= ~(S_ISUID | S_ISGID);
254 perror_msg("unable to preserve ownership of `%s'", dest);
256 if (chmod(dest, source_stat.st_mode) < 0)
257 perror_msg("unable to preserve permissions of `%s'", dest);