inetd: fix order of array index check and array access
[oweals/busybox.git] / coreutils / cp.c
1 /* vi: set sw=4 ts=4: */
2 /*
3  * Mini cp implementation for busybox
4  *
5  * Copyright (C) 2000 by Matt Kraai <kraai@alumni.carnegiemellon.edu>
6  * SELinux support by Yuichi Nakamura <ynakam@hitachisoft.jp>
7  *
8  * Licensed under GPLv2 or later, see file LICENSE in this source tree.
9  */
10
11 /* http://www.opengroup.org/onlinepubs/007904975/utilities/cp.html */
12
13 /* Mar 16, 2003      Manuel Novoa III   (mjn3@codepoet.org)
14  *
15  * Size reduction.
16  */
17
18 //usage:#define cp_trivial_usage
19 //usage:       "[OPTIONS] SOURCE... DEST"
20 //usage:#define cp_full_usage "\n\n"
21 //usage:       "Copy SOURCE(s) to DEST\n"
22 //usage:     "\n        -a      Same as -dpR"
23 //usage:        IF_SELINUX(
24 //usage:     "\n        -c      Preserve security context"
25 //usage:        )
26 //usage:     "\n        -R,-r   Recurse"
27 //usage:     "\n        -d,-P   Preserve symlinks (default if -R)"
28 //usage:     "\n        -L      Follow all symlinks"
29 //usage:     "\n        -H      Follow symlinks on command line"
30 //usage:     "\n        -p      Preserve file attributes if possible"
31 //usage:     "\n        -f      Overwrite"
32 //usage:     "\n        -i      Prompt before overwrite"
33 //usage:     "\n        -l,-s   Create (sym)links"
34
35 #include "libbb.h"
36 #include "libcoreutils/coreutils.h"
37
38 /* This is a NOEXEC applet. Be very careful! */
39
40 int cp_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
41 int cp_main(int argc, char **argv)
42 {
43         struct stat source_stat;
44         struct stat dest_stat;
45         const char *last;
46         const char *dest;
47         int s_flags;
48         int d_flags;
49         int flags;
50         int status;
51         enum {
52                 OPT_a = 1 << (sizeof(FILEUTILS_CP_OPTSTR)-1),
53                 OPT_r = 1 << (sizeof(FILEUTILS_CP_OPTSTR)),
54                 OPT_P = 1 << (sizeof(FILEUTILS_CP_OPTSTR)+1),
55                 OPT_v = 1 << (sizeof(FILEUTILS_CP_OPTSTR)+2),
56 #if ENABLE_FEATURE_CP_LONG_OPTIONS
57                 OPT_parents = 1 << (sizeof(FILEUTILS_CP_OPTSTR)+3),
58 #endif
59         };
60
61         // Need at least two arguments
62         // Soft- and hardlinking doesn't mix
63         // -P and -d are the same (-P is POSIX, -d is GNU)
64         // -r and -R are the same
65         // -R (and therefore -r) turns on -d (coreutils does this)
66         // -a = -pdR
67         opt_complementary = "-2:l--s:s--l:Pd:rRd:Rd:apdR";
68 #if ENABLE_FEATURE_CP_LONG_OPTIONS
69         applet_long_options =
70                 "archive\0"        No_argument "a"
71                 "force\0"          No_argument "f"
72                 "interactive\0"    No_argument "i"
73                 "link\0"           No_argument "l"
74                 "dereference\0"    No_argument "L"
75                 "no-dereference\0" No_argument "P"
76                 "recursive\0"      No_argument "R"
77                 "symbolic-link\0"  No_argument "s"
78                 "verbose\0"        No_argument "v"
79                 "parents\0"        No_argument "\xff"
80                 ;
81 #endif
82         flags = getopt32(argv, FILEUTILS_CP_OPTSTR "arPv");
83         /* Options of cp from GNU coreutils 6.10:
84          * -a, --archive
85          * -f, --force
86          * -i, --interactive
87          * -l, --link
88          * -L, --dereference
89          * -P, --no-dereference
90          * -R, -r, --recursive
91          * -s, --symbolic-link
92          * -v, --verbose
93          * -H   follow command-line symbolic links in SOURCE
94          * -d   same as --no-dereference --preserve=links
95          * -p   same as --preserve=mode,ownership,timestamps
96          * -c   same as --preserve=context
97          * --parents
98          *      use full source file name under DIRECTORY
99          * NOT SUPPORTED IN BBOX:
100          * --backup[=CONTROL]
101          *      make a backup of each existing destination file
102          * -b   like --backup but does not accept an argument
103          * --copy-contents
104          *      copy contents of special files when recursive
105          * --preserve[=ATTR_LIST]
106          *      preserve attributes (default: mode,ownership,timestamps),
107          *      if possible additional attributes: security context,links,all
108          * --no-preserve=ATTR_LIST
109          * --remove-destination
110          *      remove  each existing destination file before attempting to open
111          * --sparse=WHEN
112          *      control creation of sparse files
113          * --strip-trailing-slashes
114          *      remove any trailing slashes from each SOURCE argument
115          * -S, --suffix=SUFFIX
116          *      override the usual backup suffix
117          * -t, --target-directory=DIRECTORY
118          *      copy all SOURCE arguments into DIRECTORY
119          * -T, --no-target-directory
120          *      treat DEST as a normal file
121          * -u, --update
122          *      copy only when the SOURCE file is newer than the destination
123          *      file or when the destination file is missing
124          * -x, --one-file-system
125          *      stay on this file system
126          * -Z, --context=CONTEXT
127          *      (SELinux) set SELinux security context of copy to CONTEXT
128          */
129         argc -= optind;
130         argv += optind;
131         /* Reverse this bit. If there is -d, bit is not set: */
132         flags ^= FILEUTILS_DEREFERENCE;
133         /* coreutils 6.9 compat:
134          * by default, "cp" derefs symlinks (creates regular dest files),
135          * but "cp -R" does not. We switch off deref if -r or -R (see above).
136          * However, "cp -RL" must still deref symlinks: */
137         if (flags & FILEUTILS_DEREF_SOFTLINK) /* -L */
138                 flags |= FILEUTILS_DEREFERENCE;
139
140 #if ENABLE_SELINUX
141         if (flags & FILEUTILS_PRESERVE_SECURITY_CONTEXT) {
142                 selinux_or_die();
143         }
144 #endif
145
146         status = EXIT_SUCCESS;
147         last = argv[argc - 1];
148         /* If there are only two arguments and...  */
149         if (argc == 2) {
150                 s_flags = cp_mv_stat2(*argv, &source_stat,
151                                 (flags & FILEUTILS_DEREFERENCE) ? stat : lstat);
152                 if (s_flags < 0)
153                         return EXIT_FAILURE;
154                 d_flags = cp_mv_stat(last, &dest_stat);
155                 if (d_flags < 0)
156                         return EXIT_FAILURE;
157
158 #if ENABLE_FEATURE_CP_LONG_OPTIONS
159                 if (flags & OPT_parents) {
160                         if (!(d_flags & 2)) {
161                                 bb_error_msg_and_die("with --parents, the destination must be a directory");
162                         }
163                 }
164 #endif
165
166                 /* ...if neither is a directory...  */
167                 if (!((s_flags | d_flags) & 2)
168                     /* ...or: recursing, the 1st is a directory, and the 2nd doesn't exist... */
169                  || ((flags & FILEUTILS_RECUR) && (s_flags & 2) && !d_flags)
170                 ) {
171                         /* Do a simple copy */
172                         dest = last;
173                         goto DO_COPY; /* NB: argc==2 -> *++argv==last */
174                 }
175         }
176
177         while (1) {
178 #if ENABLE_FEATURE_CP_LONG_OPTIONS
179                 if (flags & OPT_parents) {
180                         char *dest_dup;
181                         char *dest_dir;
182                         dest = concat_path_file(last, *argv);
183                         dest_dup = xstrdup(dest);
184                         dest_dir = dirname(dest_dup);
185                         if (bb_make_directory(dest_dir, -1, FILEUTILS_RECUR)) {
186                                 return EXIT_FAILURE;
187                         }
188                         free(dest_dup);
189                         goto DO_COPY;
190                 }
191 #endif
192                 dest = concat_path_file(last, bb_get_last_path_component_strip(*argv));
193  DO_COPY:
194                 if (copy_file(*argv, dest, flags) < 0) {
195                         status = EXIT_FAILURE;
196                 }
197                 if (*++argv == last) {
198                         /* possibly leaking dest... */
199                         break;
200                 }
201                 /* don't move up: dest may be == last and not malloced! */
202                 free((void*)dest);
203         }
204
205         /* Exit. We are NOEXEC, not NOFORK. We do exit at the end of main() */
206         return status;
207 }