2 Copyright (C) 2001-2003, 2006-2007 Free Software Foundation, Inc.
3 Written by Bruno Haible <haible@clisp.cons.org>, 2001.
5 This program is free software: you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 3 of the License, or
8 (at your option) any later version.
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program. If not, see <http://www.gnu.org/licenses/>. */
22 #include "copy-file.h"
31 #if HAVE_UTIME || HAVE_UTIMES
35 # include <sys/utime.h>
40 #include "safe-read.h"
41 #include "full-write.h"
43 #include "binary-io.h"
46 #define _(str) gettext (str)
48 /* The results of open() in this file are not used with fchdir,
49 therefore save some unnecessary work in fchdir.c. */
55 copy_file_preserving (const char *src_filename, const char *dest_filename)
62 const size_t buf_size = sizeof (buf);
64 src_fd = open (src_filename, O_RDONLY | O_BINARY);
65 if (src_fd < 0 || fstat (src_fd, &statbuf) < 0)
66 error (EXIT_FAILURE, errno, _("error while opening \"%s\" for reading"),
69 mode = statbuf.st_mode & 07777;
71 dest_fd = open (dest_filename, O_WRONLY | O_CREAT | O_TRUNC | O_BINARY, 0600);
73 error (EXIT_FAILURE, errno, _("cannot open backup file \"%s\" for writing"),
76 /* Copy the file contents. */
79 size_t n_read = safe_read (src_fd, buf, buf_size);
80 if (n_read == SAFE_READ_ERROR)
81 error (EXIT_FAILURE, errno, _("error reading \"%s\""), src_filename);
85 if (full_write (dest_fd, buf, n_read) < n_read)
86 error (EXIT_FAILURE, errno, _("error writing \"%s\""), dest_filename);
90 if (close (dest_fd) < 0)
91 error (EXIT_FAILURE, errno, _("error writing \"%s\""), dest_filename);
92 if (close (src_fd) < 0)
93 error (EXIT_FAILURE, errno, _("error after reading \"%s\""), src_filename);
96 /* Preserve the access and modification times. */
101 ut.actime = statbuf.st_atime;
102 ut.modtime = statbuf.st_mtime;
103 utime (dest_filename, &ut);
107 struct timeval ut[2];
109 ut[0].tv_sec = statbuf.st_atime; ut[0].tv_usec = 0;
110 ut[1].tv_sec = statbuf.st_mtime; ut[1].tv_usec = 0;
111 utimes (dest_filename, &ut);
116 /* Preserve the owner and group. */
117 chown (dest_filename, statbuf.st_uid, statbuf.st_gid);
120 /* Preserve the access permissions. */
122 if (copy_acl (src_filename, src_fd, dest_filename, dest_fd, mode))
125 chmod (dest_filename, mode);
129 if (close (dest_fd) < 0)
130 error (EXIT_FAILURE, errno, _("error writing \"%s\""), dest_filename);
131 if (close (src_fd) < 0)
132 error (EXIT_FAILURE, errno, _("error after reading \"%s\""), src_filename);