1 /* cp.c -- file copying (main routines)
2 Copyright (C) 89, 90, 91, 1995-2001 Free Software Foundation.
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2, or (at your option)
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software Foundation,
16 Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
18 Written by Torbjorn Granlund, David MacKenzie, and Jim Meyering. */
26 #include <sys/types.h>
32 #include "backupfile.h"
37 #include "path-concat.h"
40 #define ASSIGN_BASENAME_STRDUPA(Dest, File_name) \
44 ASSIGN_STRDUPA (tmp_abns_, (File_name)); \
45 strip_trailing_slashes (tmp_abns_); \
46 Dest = base_name (tmp_abns_); \
50 /* The official name of this program (e.g., no `g' prefix). */
51 #define PROGRAM_NAME "cp"
53 #define AUTHORS N_ ("Torbjorn Granlund, David MacKenzie, and Jim Meyering")
55 #ifndef _POSIX_VERSION
59 /* Used by do_copy, make_path_private, and re_protect
60 to keep a list of leading directories whose protections
61 need to be fixed after copying. */
66 struct dir_attr *next;
69 /* For long options that have no equivalent short option, use a
70 non-character as a pseudo short option, starting with CHAR_MAX + 1. */
73 NO_PRESERVE_ATTRIBUTES_OPTION = CHAR_MAX + 1,
75 PRESERVE_ATTRIBUTES_OPTION,
78 STRIP_TRAILING_SLASHES_OPTION,
79 TARGET_DIRECTORY_OPTION,
80 UNLINK_DEST_BEFORE_OPENING
83 /* Initial number of entries in each hash table entry's table of inodes. */
84 #define INITIAL_HASH_MODULE 100
86 /* Initial number of entries in the inode hash table. */
87 #define INITIAL_ENTRY_TAB_SIZE 70
89 /* The invocation name of this program. */
92 /* If nonzero, the command "cp x/e_file e_dir" uses "e_dir/x/e_file"
93 as its destination instead of the usual "e_dir/e_file." */
94 static int flag_path = 0;
96 /* Remove any trailing slashes from each SOURCE argument. */
97 static int remove_trailing_slashes;
99 static char const *const sparse_type_string[] =
101 "never", "auto", "always", 0
104 static enum Sparse_type const sparse_type[] =
106 SPARSE_NEVER, SPARSE_AUTO, SPARSE_ALWAYS
109 /* Valid arguments to the `--reply' option. */
110 static char const* const reply_args[] =
112 "yes", "no", "query", 0
115 /* The values that correspond to the above strings. */
116 static int const reply_vals[] =
118 I_ALWAYS_YES, I_ALWAYS_NO, I_ASK_USER
121 /* The error code to return to the system. */
122 static int exit_status = 0;
124 static struct option const long_opts[] =
126 {"archive", no_argument, NULL, 'a'},
127 {"backup", optional_argument, NULL, 'b'},
128 {"dereference", no_argument, NULL, 'L'},
129 {"force", no_argument, NULL, 'f'},
130 {"interactive", no_argument, NULL, 'i'},
131 {"link", no_argument, NULL, 'l'},
132 {"no-dereference", no_argument, NULL, 'P'},
133 {"no-preserve", required_argument, NULL, NO_PRESERVE_ATTRIBUTES_OPTION},
134 {"one-file-system", no_argument, NULL, 'x'},
135 {"parents", no_argument, NULL, PARENTS_OPTION},
136 {"path", no_argument, NULL, PARENTS_OPTION}, /* Deprecated. */
137 {"preserve", optional_argument, NULL, PRESERVE_ATTRIBUTES_OPTION},
138 {"recursive", no_argument, NULL, 'R'},
139 {"remove-destination", no_argument, NULL, UNLINK_DEST_BEFORE_OPENING},
140 {"reply", required_argument, NULL, REPLY_OPTION},
141 {"sparse", required_argument, NULL, SPARSE_OPTION},
142 {"strip-trailing-slashes", no_argument, NULL, STRIP_TRAILING_SLASHES_OPTION},
143 {"suffix", required_argument, NULL, 'S'},
144 {"symbolic-link", no_argument, NULL, 's'},
145 {"target-directory", required_argument, NULL, TARGET_DIRECTORY_OPTION},
146 {"update", no_argument, NULL, 'u'},
147 {"verbose", no_argument, NULL, 'v'},
148 {"version-control", required_argument, NULL, 'V'}, /* Deprecated. FIXME. */
149 {GETOPT_HELP_OPTION_DECL},
150 {GETOPT_VERSION_OPTION_DECL},
158 fprintf (stderr, _("Try `%s --help' for more information.\n"),
163 Usage: %s [OPTION]... SOURCE DEST\n\
164 or: %s [OPTION]... SOURCE... DIRECTORY\n\
165 or: %s [OPTION]... --target-directory=DIRECTORY SOURCE...\n\
167 program_name, program_name, program_name);
169 Copy SOURCE to DEST, or multiple SOURCE(s) to DIRECTORY.\n\
171 -a, --archive same as -dpR\n\
172 --backup[=CONTROL] make a backup of each existing destination file\n\
173 -b like --backup but does not accept an argument\n\
174 -d same as --no-dereference --preserve=link\n\
177 --no-dereference never follow symbolic links\n\
178 -f, --force if an existing destination file cannot be\n\
179 opened, remove it and try again\n\
180 -i, --interactive prompt before overwrite\n\
181 -H follow command-line symbolic links\n\
184 -l, --link link files instead of copying\n\
185 -L, --dereference always follow symbolic links\n\
186 -p same as --preserve=mode,ownership,timestamps\n\
187 --preserve[=ATTR_LIST] preserve the specified attributes (default:\n\
188 mode,ownership,timestamps), if possible\n\
189 additional attributes: links, all\n\
192 --no-preserve=ATTR_LIST don't preserve the specified attributes\n\
193 --parents append source path to DIRECTORY\n\
194 -P same as `--no-dereference'\n\
197 -r copy recursively, non-directories as files\n\
198 WARNING: use -R instead when you might copy\n\
199 special files like FIFOs or /dev/zero\n\
200 --remove-destination remove each existing destination file before\n\
201 attempting to open it (contrast with --force)\n\
204 --sparse=WHEN control creation of sparse files\n\
205 -R, --recursive copy directories recursively\n\
206 --reply={yes,no,query} specify how to handle the prompt about an\n\
207 existing destination file\n\
208 --strip-trailing-slashes remove any trailing slashes from each SOURCE\n\
212 -s, --symbolic-link make symbolic links instead of copying\n\
213 -S, --suffix=SUFFIX override the usual backup suffix\n\
214 --target-directory=DIRECTORY move all SOURCE arguments into DIRECTORY\n\
217 -u, --update copy only when the SOURCE file is newer\n\
218 than the destination file or when the\n\
219 destination file is missing\n\
220 -v, --verbose explain what is being done\n\
221 -x, --one-file-system stay on this file system\n\
224 --help display this help and exit\n\
225 --version output version information and exit\n\
229 By default, sparse SOURCE files are detected by a crude heuristic and the\n\
230 corresponding DEST file is made sparse as well. That is the behavior\n\
231 selected by --sparse=auto. Specify --sparse=always to create a sparse DEST\n\
232 file whenever the SOURCE file contains a long enough sequence of zero bytes.\n\
233 Use --sparse=never to inhibit creation of sparse files.\n\
237 The backup suffix is `~', unless set with --suffix or SIMPLE_BACKUP_SUFFIX.\n\
238 The version control method may be selected via the --backup option or through\n\
239 the VERSION_CONTROL environment variable. Here are the values:\n\
243 none, off never make backups (even if --backup is given)\n\
244 numbered, t make numbered backups\n\
245 existing, nil numbered if numbered backups exist, simple otherwise\n\
246 simple, never always make simple backups\n\
250 As a special case, cp makes a backup of SOURCE when the force and backup\n\
251 options are given and SOURCE and DEST are the same name for an existing,\n\
254 puts (_("\nReport bugs to <bug-fileutils@gnu.org>."));
259 /* Ensure that the parent directories of CONST_DST_PATH have the
260 correct protections, for the --parents option. This is done
261 after all copying has been completed, to allow permissions
262 that don't include user write/execute.
264 SRC_OFFSET is the index in CONST_DST_PATH of the beginning of the
265 source directory name.
267 ATTR_LIST is a null-terminated linked list of structures that
268 indicates the end of the filename of each intermediate directory
269 in CONST_DST_PATH that may need to have its attributes changed.
270 The command `cp --parents --preserve a/b/c d/e_dir' changes the
271 attributes of the directories d/e_dir/a and d/e_dir/a/b to match
272 the corresponding source directories regardless of whether they
273 existed before the `cp' command was given.
275 Return 0 if the parent of CONST_DST_PATH and any intermediate
276 directories specified by ATTR_LIST have the proper permissions
277 when done, otherwise 1. */
280 re_protect (const char *const_dst_path, int src_offset,
281 struct dir_attr *attr_list, const struct cp_options *x)
284 char *dst_path; /* A copy of CONST_DST_PATH we can change. */
285 char *src_path; /* The source name in `dst_path'. */
286 uid_t myeuid = geteuid ();
288 dst_path = (char *) alloca (strlen (const_dst_path) + 1);
289 strcpy (dst_path, const_dst_path);
290 src_path = dst_path + src_offset;
292 for (p = attr_list; p; p = p->next)
296 dst_path[p->slash_offset] = '\0';
298 if ((*(x->xstat)) (src_path, &src_sb))
300 error (0, errno, _("getting attributes of %s"),
305 /* Adjust the times (and if possible, ownership) for the copy.
306 chown turns off set[ug]id bits for non-root,
307 so do the chmod last. */
309 if (x->preserve_timestamps)
313 /* There's currently no interface to set file timestamps with
314 better than 1-second resolution, so discard any fractional
315 part of the source timestamp. */
317 utb.actime = src_sb.st_atime;
318 utb.modtime = src_sb.st_mtime;
320 if (utime (dst_path, &utb))
322 error (0, errno, _("preserving times for %s"), quote (dst_path));
327 if (x->preserve_ownership)
329 /* If non-root uses -p, it's ok if we can't preserve ownership.
330 But root probably wants to know, e.g. if NFS disallows it,
331 or if the target system doesn't support file ownership. */
332 if (chown (dst_path, src_sb.st_uid, src_sb.st_gid)
333 && ((errno != EPERM && errno != EINVAL) || myeuid == 0))
335 error (0, errno, _("preserving ownership for %s"),
341 if (x->preserve_mode || p->is_new_dir)
343 if (chmod (dst_path, src_sb.st_mode & x->umask_kill))
345 error (0, errno, _("preserving permissions for %s"),
351 dst_path[p->slash_offset] = '/';
356 /* Ensure that the parent directory of CONST_DIRPATH exists, for
357 the --parents option.
359 SRC_OFFSET is the index in CONST_DIRPATH (which is a destination
360 path) of the beginning of the source directory name.
361 Create any leading directories that don't already exist,
362 giving them permissions MODE.
363 If VERBOSE_FMT_STRING is nonzero, use it as a printf format
364 string for printing a message after successfully making a directory.
365 The format should take two string arguments: the names of the
366 source and destination directories.
367 Creates a linked list of attributes of intermediate directories,
368 *ATTR_LIST, for re_protect to use after calling copy.
369 Sets *NEW_DST to 1 if this function creates parent of CONST_DIRPATH.
371 Return 0 if parent of CONST_DIRPATH exists as a directory with the proper
372 permissions when done, otherwise 1. */
374 /* FIXME: find a way to synch this function with the one in lib/makepath.c. */
377 make_path_private (const char *const_dirpath, int src_offset, int mode,
378 const char *verbose_fmt_string, struct dir_attr **attr_list,
379 int *new_dst, int (*xstat)())
382 char *dirpath; /* A copy of CONST_DIRPATH we can change. */
383 char *src; /* Source name in `dirpath'. */
384 char *dst_dirname; /* Leading path of `dirpath'. */
385 size_t dirlen; /* Length of leading path of `dirpath'. */
387 dirpath = (char *) alloca (strlen (const_dirpath) + 1);
388 strcpy (dirpath, const_dirpath);
390 src = dirpath + src_offset;
392 dirlen = dir_len (dirpath);
393 dst_dirname = (char *) alloca (dirlen + 1);
394 memcpy (dst_dirname, dirpath, dirlen);
395 dst_dirname[dirlen] = '\0';
399 if ((*xstat) (dst_dirname, &stats))
401 /* Parent of CONST_DIRNAME does not exist.
402 Make all missing intermediate directories. */
406 while (*slash == '/')
408 while ((slash = strchr (slash, '/')))
410 /* Add this directory to the list of directories whose modes need
412 struct dir_attr *new =
413 (struct dir_attr *) xmalloc (sizeof (struct dir_attr));
414 new->slash_offset = slash - dirpath;
415 new->next = *attr_list;
419 if ((*xstat) (dirpath, &stats))
421 /* This element of the path does not exist. We must set
422 *new_dst and new->is_new_dir inside this loop because,
423 for example, in the command `cp --parents ../a/../b/c e_dir',
424 make_path_private creates only e_dir/../a if ./b already
428 if (mkdir (dirpath, mode))
430 error (0, errno, _("cannot make directory %s"),
436 if (verbose_fmt_string != NULL)
437 printf (verbose_fmt_string, src, dirpath);
440 else if (!S_ISDIR (stats.st_mode))
442 error (0, 0, _("%s exists but is not a directory"),
453 /* Avoid unnecessary calls to `stat' when given
454 pathnames containing multiple adjacent slashes. */
455 while (*slash == '/')
460 /* We get here if the parent of `dirpath' already exists. */
462 else if (!S_ISDIR (stats.st_mode))
464 error (0, 0, _("%s exists but is not a directory"), quote (dst_dirname));
474 /* Scan the arguments, and copy each by calling copy.
475 Return 0 if successful, 1 if any errors occur. */
478 do_copy (int n_files, char **file, const char *target_directory,
479 struct cp_options *x)
489 error (0, 0, _("missing file arguments"));
492 if (n_files == 1 && !target_directory)
494 error (0, 0, _("missing destination file"));
498 if (target_directory)
499 dest = target_directory;
502 dest = file[n_files - 1];
506 /* Initialize these hash tables only if we'll need them.
507 The problems they're used to detect can arise only if
508 there are two or more files to copy. */
515 if (lstat (dest, &sb))
519 error (0, errno, _("accessing %s"), quote (dest));
529 /* If `dest' is not a symlink to a nonexistent file, use
530 the results of stat instead of lstat, so we can copy files
531 into symlinks to directories. */
532 if (stat (dest, &sbx) == 0)
535 dest_is_dir = S_ISDIR (sb.st_mode);
540 if (target_directory)
542 error (0, 0, _("specified target, %s is not a directory"),
550 _("copying multiple files, but last argument %s is not a directory"),
558 /* cp file1...filen edir
559 Copy the files `file1' through `filen'
560 to the existing directory `edir'. */
563 for (i = 0; i < n_files; i++)
566 int parent_exists = 1; /* True if dir_name (dst_path) exists. */
567 struct dir_attr *attr_list;
568 char *arg_in_concat = NULL;
571 /* Trailing slashes are meaningful (i.e., maybe worth preserving)
572 only in the source file names. */
573 if (remove_trailing_slashes)
574 strip_trailing_slashes (arg);
578 char *arg_no_trailing_slash;
580 /* Use `arg' without trailing slashes in constructing destination
581 file names. Otherwise, we can end up trying to create a
582 directory via `mkdir ("dst/foo/"...', which is not portable.
583 It fails, due to the trailing slash, on at least
584 NetBSD 1.[34] systems. */
585 ASSIGN_STRDUPA (arg_no_trailing_slash, arg);
586 strip_trailing_slashes (arg_no_trailing_slash);
588 /* Append all of `arg' (minus any trailing slash) to `dest'. */
589 dst_path = path_concat (dest, arg_no_trailing_slash,
591 if (dst_path == NULL)
594 /* For --parents, we have to make sure that the directory
595 dir_name (dst_path) exists. We may have to create a few
596 leading directories. */
597 parent_exists = !make_path_private (dst_path,
598 arg_in_concat - dst_path,
601 ? "%s -> %s\n" : NULL),
602 &attr_list, &new_dst,
608 /* Append the last component of `arg' to `dest'. */
610 ASSIGN_BASENAME_STRDUPA (arg_base, arg);
611 /* For `cp -R source/.. dest', don't copy into `dest/..'. */
612 dst_path = (STREQ (arg_base, "..")
614 : path_concat (dest, arg_base, NULL));
619 /* make_path_private failed, so don't even attempt the copy. */
625 ret |= copy (arg, dst_path, new_dst, x, ©_into_self, NULL);
629 ret |= re_protect (dst_path, arg_in_concat - dst_path,
638 else /* if (n_files == 1) */
643 struct stat source_stats;
648 _("when preserving paths, the destination must be a directory"));
654 /* When the force and backup options have been specified and
655 the source and destination are the same name for an existing
656 regular file, convert the user's command, e.g.,
657 `cp --force --backup foo foo' to `cp --force foo fooSUFFIX'
658 where SUFFIX is determined by any version control options used. */
660 if (x->unlink_dest_after_failed_open
661 && x->backup_type != none
662 && STREQ (source, dest)
663 && !new_dst && S_ISREG (sb.st_mode))
665 static struct cp_options x_tmp;
667 new_dest = find_backup_file_name (dest, x->backup_type);
668 /* Set x->backup_type to `none' so that the normal backup
669 mechanism is not used when performing the actual copy.
670 backup_type must be set to `none' only *after* the above
671 call to find_backup_file_name -- that function uses
672 backup_type to determine the suffix it applies. */
674 x_tmp.backup_type = none;
677 if (new_dest == NULL)
681 /* When the destination is specified with a trailing slash and the
682 source exists but is not a directory, convert the user's command
683 `cp source dest/' to `cp source dest/basename(source)'. Doing
684 this ensures that the command `cp non-directory file/' will now
685 fail rather than performing the copy. COPY diagnoses the case of
686 `cp directory non-directory'. */
688 else if (dest[strlen (dest) - 1] == '/'
689 && lstat (source, &source_stats) == 0
690 && !S_ISDIR (source_stats.st_mode))
694 ASSIGN_BASENAME_STRDUPA (source_base, source);
695 new_dest = (char *) alloca (strlen (dest)
696 + strlen (source_base) + 1);
697 stpcpy (stpcpy (new_dest, dest), source_base);
701 new_dest = (char *) dest;
704 return copy (source, new_dest, new_dst, x, &unused, NULL);
711 cp_option_init (struct cp_options *x)
713 x->copy_as_regular = 1;
714 x->dereference = DEREF_UNDEFINED;
715 x->unlink_dest_before_opening = 0;
716 x->unlink_dest_after_failed_open = 0;
718 x->interactive = I_UNSPECIFIED;
719 x->myeuid = geteuid ();
721 x->one_file_system = 0;
723 x->preserve_ownership = 0;
724 x->preserve_links = 0;
725 x->preserve_mode = 0;
726 x->preserve_timestamps = 0;
728 x->require_preserve = 0;
730 x->sparse_mode = SPARSE_AUTO;
731 x->symbolic_link = 0;
738 /* Find out the current file creation mask, to knock the right bits
739 when using chmod. The creation mask is set to be liberal, so
740 that created directories can be written, even if it would not
741 have been allowed with the mask this process was started with. */
742 x->umask_kill = ~ umask (0);
750 /* Given a string, ARG, containing a comma-separated list of arguments
751 to the --preserve option, set the appropriate fields of X to ON_OFF. */
753 decode_preserve_arg (char const *arg, struct cp_options *x, int on_off)
763 static enum File_attribute const preserve_vals[] =
765 PRESERVE_MODE, PRESERVE_TIMESTAMPS,
766 PRESERVE_OWNERSHIP, PRESERVE_LINK, PRESERVE_ALL
769 /* Valid arguments to the `--reply' option. */
770 static char const* const preserve_args[] =
772 "mode", "timestamps",
773 "ownership", "links", "all", 0
776 char *arg_writable = xstrdup (arg);
777 char *s = arg_writable;
780 /* find next comma */
781 char *comma = strchr (s, ',');
782 enum File_attribute val;
784 /* put a NUL in its place */
789 val = XARGMATCH ("--preserve", s, preserve_args, preserve_vals);
793 x->preserve_mode = on_off;
796 case PRESERVE_TIMESTAMPS:
797 x->preserve_timestamps = on_off;
800 case PRESERVE_OWNERSHIP:
801 x->preserve_ownership = on_off;
805 x->preserve_links = on_off;
809 x->preserve_mode = on_off;
810 x->preserve_timestamps = on_off;
811 x->preserve_ownership = on_off;
812 x->preserve_links = on_off;
826 main (int argc, char **argv)
829 int make_backups = 0;
830 char *backup_suffix_string;
831 char *version_control_string = NULL;
833 char *target_directory = NULL;
835 program_name = argv[0];
836 setlocale (LC_ALL, "");
837 bindtextdomain (PACKAGE, LOCALEDIR);
838 textdomain (PACKAGE);
840 atexit (close_stdout);
844 /* FIXME: consider not calling getenv for SIMPLE_BACKUP_SUFFIX unless
845 we'll actually use backup_suffix_string. */
846 backup_suffix_string = getenv ("SIMPLE_BACKUP_SUFFIX");
848 while ((c = getopt_long (argc, argv, "abdfHilLprsuvxPRS:V:", long_opts, NULL))
857 x.sparse_mode = XARGMATCH ("--sparse", optarg,
858 sparse_type_string, sparse_type);
861 case 'a': /* Like -dpR. */
862 x.dereference = DEREF_NEVER;
863 x.preserve_links = 1;
864 x.preserve_ownership = 1;
866 x.preserve_timestamps = 1;
867 x.require_preserve = 1;
869 x.copy_as_regular = 0;
872 case 'V': /* FIXME: this is deprecated. Remove it in 2001. */
874 _("warning: --version-control (-V) is obsolete; support for\
875 it\nwill be removed in some future release. Use --backup=%s instead."
882 version_control_string = optarg;
886 x.preserve_links = 1;
887 x.dereference = DEREF_NEVER;
891 x.unlink_dest_after_failed_open = 1;
895 x.dereference = DEREF_COMMAND_LINE_ARGUMENTS;
899 x.interactive = I_ASK_USER;
907 x.dereference = DEREF_ALWAYS;
911 x.dereference = DEREF_NEVER;
914 case NO_PRESERVE_ATTRIBUTES_OPTION:
915 decode_preserve_arg (optarg, &x, 0);
918 case PRESERVE_ATTRIBUTES_OPTION:
921 /* Fall through to the case for `p' below. */
925 decode_preserve_arg (optarg, &x, 1);
926 x.require_preserve = 1;
931 x.preserve_ownership = 1;
933 x.preserve_timestamps = 1;
934 x.require_preserve = 1;
943 x.copy_as_regular = 1;
948 x.copy_as_regular = 0;
952 x.interactive = XARGMATCH ("--reply", optarg,
953 reply_args, reply_vals);
956 case UNLINK_DEST_BEFORE_OPENING:
957 x.unlink_dest_before_opening = 1;
960 case STRIP_TRAILING_SLASHES_OPTION:
961 remove_trailing_slashes = 1;
968 error (1, 0, _("symbolic links are not supported on this system"));
972 case TARGET_DIRECTORY_OPTION:
973 target_directory = optarg;
985 x.one_file_system = 1;
990 backup_suffix_string = optarg;
993 case_GETOPT_HELP_CHAR;
995 case_GETOPT_VERSION_CHAR (PROGRAM_NAME, AUTHORS);
1002 if (x.hard_link && x.symbolic_link)
1004 error (0, 0, _("cannot make both hard and symbolic links"));
1008 if (backup_suffix_string)
1009 simple_backup_suffix = xstrdup (backup_suffix_string);
1011 x.backup_type = (make_backups
1012 ? xget_version (_("backup type"),
1013 version_control_string)
1016 if (x.preserve_mode == 1)
1017 x.umask_kill = ~ (mode_t) 0;
1019 if (x.dereference == DEREF_UNDEFINED)
1022 /* This is compatible with FreeBSD. */
1023 x.dereference = DEREF_NEVER;
1025 x.dereference = DEREF_ALWAYS;
1028 /* The key difference between -d (--no-dereference) and not is the version
1029 of `stat' to call. */
1031 if (x.dereference == DEREF_NEVER)
1035 /* For DEREF_COMMAND_LINE_ARGUMENTS, x.xstat must be stat for
1036 each command line argument, but must later be `lstat' for
1037 any symlinks that are found via recursive traversal. */
1041 /* If --force (-f) was specified and we're in link-creation mode,
1042 first remove any existing destination file. */
1043 if (x.unlink_dest_after_failed_open && (x.hard_link || x.symbolic_link))
1044 x.unlink_dest_before_opening = 1;
1046 /* Allocate space for remembering copied and created files. */
1050 exit_status |= do_copy (argc - optind, argv + optind, target_directory, &x);