* Copyright (c) 1988 The Regents of the University of California.
* This code is derived from software contributed to Berkeley by
* David Hitz of Auspex Systems Inc.
* %sccs.include.redist.c%
"@(#) Copyright (c) 1988 The Regents of the University of California.\n\
static char sccsid
[] = "@(#)cp.c 5.23 (Berkeley) %G%";
* cp copies source files to target files.
* The global PATH_T structures "to" and "from" always contain paths to the
* current source and target files, respectively. Since cp does not change
* directories, these paths can be either absolute or dot-realative.
* The basic algorithm is to initialize "to" and "from", and then call the
* recursive copy() function to do the actual work. If "from" is a file,
* copy copies the data. If "from" is a directory, copy creates the
* corresponding "to" directory, and calls itself recursively on all of
* the entries in the "from" directory.
PATH_T from
= { from
.p_path
, "" };
PATH_T to
= { to
.p_path
, "" };
int iflag
, pflag
, orflag
, rflag
;
int symfollow
, lstat(), stat();
* The utility cp(1) is used by mv(1) -- except for usage statements,
* print the "called as" program name.
progname
= (p
= rindex(*argv
,'/')) ? ++p
: *argv
;
while ((c
= getopt(argc
, argv
, "Rfhipr")) != EOF
) {
iflag
= isatty(fileno(stdin
));
"cp: the -R and -r options are mutually exclusive.\n");
buf
= (char *)malloc(MAXBSIZE
);
(void)fprintf(stderr
, "%s: out of space.\n", progname
);
/* copy the umask for explicit mode setting */
/* consume last argument first. */
if (!path_set(&to
, argv
[--argc
]))
statfcn
= symfollow
|| !rflag
? stat
: lstat
;
* Cp has two distinct cases:
* % cp [-rip] source target
* % cp [-rip] source1 ... directory
* In both cases, source can be either a file or a directory.
* In (1), the target becomes a copy of the source. That is, if the
* source is a file, the target will be a file, and likewise for
* In (2), the real target is not directory, but "directory/source".
r
= stat(to
.p_path
, &to_stat
);
if (r
== -1 && errno
!= ENOENT
) {
if (r
== -1 || !S_ISDIR(to_stat
.st_mode
)) {
* Case (1). Target is not a directory.
if (!path_set(&from
, *argv
))
* Case (2). Target is a directory.
if (!path_set(&from
, *argv
)) {
old_to
= path_append(&to
, path_basename(&from
), -1);
path_restore(&to
, old_to
);
/* copy file or directory at "from" to "to". */
struct stat from_stat
, to_stat
;
statval
= statfcn(from
.p_path
, &from_stat
);
/* not an error, but need to remember it happened */
if (stat(to
.p_path
, &to_stat
) == -1)
if (to_stat
.st_dev
== from_stat
.st_dev
&&
to_stat
.st_ino
== from_stat
.st_ino
) {
"%s: %s and %s are identical (not copied).\n",
progname
, to
.p_path
, from
.p_path
);
switch(from_stat
.st_mode
& S_IFMT
) {
"%s: %s is a directory (not copied).\n",
* If the directory doesn't exist, create the new
* one with the from file mode plus owner RWX bits,
* modified by the umask. Trade-off between being
* able to write the directory (if from directory is
* 555) and not causing a permissions race. If the
* umask blocks owner writes cp fails.
if (mkdir(to
.p_path
, from_stat
.st_mode
|S_IRWXU
) < 0) {
else if (!S_ISDIR(to_stat
.st_mode
) != S_IFDIR
) {
(void)fprintf(stderr
, "%s: %s: not a directory.\n",
* If not -p and directory didn't exist, set it to be the
* same as the from directory, umodified by the umask;
* arguably wrong, but it's been that way forever.
(void)chmod(to
.p_path
, from_stat
.st_mode
);
copy_special(&from_stat
, !dne
);
copy_fifo(&from_stat
, !dne
);
copy_file(&from_stat
, dne
);
register int from_fd
, to_fd
, rcount
, wcount
;
if ((from_fd
= open(from
.p_path
, O_RDONLY
, 0)) == -1) {
* If the file exists and we're interactive, verify with the user.
* If the file DNE, set the mode to be the from file, minus setuid
* bits, modified by the umask; arguably wrong, but it makes copying
* executables work right and it's been that way forever. (The
* other choice is 666 or'ed with the execute bits on the from file
* modified by the umask.)
(void)fprintf(stderr
, "overwrite %s? ", to
.p_path
);
checkch
= ch
= getchar();
while (ch
!= '\n' && ch
!= EOF
)
to_fd
= open(to
.p_path
, O_WRONLY
|O_TRUNC
, 0);
to_fd
= open(to
.p_path
, O_WRONLY
|O_CREAT
|O_TRUNC
,
fs
->st_mode
& ~(S_ISUID
|S_ISGID
));
while ((rcount
= read(from_fd
, buf
, MAXBSIZE
)) > 0) {
wcount
= write(to_fd
, buf
, rcount
);
if (rcount
!= wcount
|| wcount
== -1) {
* If the source was setuid or setgid, lose the bits unless the
* copy is owned by the same user and group.
else if (fs
->st_mode
& (S_ISUID
|S_ISGID
) && fs
->st_uid
== myuid
)
if (fstat(to_fd
, &to_stat
))
#define RETAINBITS (S_ISUID|S_ISGID|S_ISVTX|S_IRWXU|S_IRWXG|S_IRWXO)
else if (fs
->st_gid
== to_stat
.st_gid
&& fchmod(to_fd
,
fs
->st_mode
& RETAINBITS
& ~myumask
))
struct dirent
*dp
, **dir_list
;
dir_cnt
= scandir(from
.p_path
, &dir_list
, NULL
, NULL
);
(void)fprintf(stderr
, "%s: can't read directory %s.\n",
* Instead of handling directory entries in the order they appear
* on disk, do non-directory files before directory files.
* There are two reasons to do directories last. The first is
* efficiency. Files tend to be in the same cylinder group as
* their parent, whereas directories tend not to be. Copying files
* all at once reduces seeking. Second, deeply nested tree's
* could use up all the file descriptors if we didn't close one
* directory before recursivly starting on the next.
for (i
= 0; i
< dir_cnt
; ++i
) {
if (dp
->d_namlen
<= 2 && dp
->d_name
[0] == '.'
&& (dp
->d_name
[1] == NULL
|| dp
->d_name
[1] == '.'))
old_from
= path_append(&from
, dp
->d_name
, (int)dp
->d_namlen
);
if (statfcn(from
.p_path
, &from_stat
) < 0) {
path_restore(&from
, old_from
);
if (S_ISDIR(from_stat
.st_mode
)) {
path_restore(&from
, old_from
);
old_to
= path_append(&to
, dp
->d_name
, (int)dp
->d_namlen
);
path_restore(&to
, old_to
);
path_restore(&from
, old_from
);
done
: dir_list
[i
] = NULL
;
for (i
= 0; i
< dir_cnt
; ++i
) {
old_from
= path_append(&from
, dp
->d_name
, (int) dp
->d_namlen
);
old_to
= path_append(&to
, dp
->d_name
, (int) dp
->d_namlen
);
path_restore(&from
, old_from
);
path_restore(&from
, old_from
);
path_restore(&to
, old_to
);
if ((len
= readlink(from
.p_path
, link
, sizeof(link
))) == -1) {
if (exists
&& unlink(to
.p_path
)) {
if (symlink(link
, to
.p_path
)) {
copy_fifo(from_stat
, exists
)
if (exists
&& unlink(to
.p_path
)) {
if (mkfifo(to
.p_path
, from_stat
->st_mode
)) {
copy_special(from_stat
, exists
)
if (exists
&& unlink(to
.p_path
)) {
if (mknod(to
.p_path
, from_stat
->st_mode
, from_stat
->st_rdev
)) {
register struct stat
*fs
;
static struct timeval tv
[2];
fs
->st_mode
&= S_ISUID
|S_ISGID
|S_IRWXU
|S_IRWXG
|S_IRWXO
;
tv
[0].tv_sec
= fs
->st_atime
;
tv
[1].tv_sec
= fs
->st_mtime
;
if (utimes(to
.p_path
, tv
)) {
(void)snprintf(path
, sizeof(path
), "utimes: %s", to
.p_path
);
* Changing the ownership probably won't succeed, unless we're root
* or POSIX_CHOWN_RESTRICTED is not set. Set uid/gid before setting
* the mode; current BSD behavior is to remove all setuid bits on
* chown. If chown fails, lose setuid/setgid bits.
if (fd
? fchown(fd
, fs
->st_uid
, fs
->st_gid
) :
chown(to
.p_path
, fs
->st_uid
, fs
->st_gid
)) {
(void)snprintf(path
, sizeof(path
),
fs
->st_mode
&= ~(S_ISUID
|S_ISGID
);
if (fd
? fchmod(fd
, fs
->st_mode
) : chmod(to
.p_path
, fs
->st_mode
)) {
(void)snprintf(path
, sizeof(path
), "chown: %s", to
.p_path
);
(void)fprintf(stderr
, "%s: %s: %s\n", progname
, s
, strerror(errno
));
"usage: cp [-Rfhip] src target;\n or: cp [-Rfhip] src1 ... srcN directory\n");