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 2, or (at your option)
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, write to the Free Software Foundation,
17 Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */
23 #include "copy-file.h"
32 #if HAVE_UTIME || HAVE_UTIMES
36 # include <sys/utime.h>
41 #include "safe-read.h"
42 #include "full-write.h"
44 #include "binary-io.h"
47 #define _(str) gettext (str)
49 /* The results of open() in this file are not used with fchdir,
50 therefore save some unnecessary work in fchdir.c. */
56 copy_file_preserving (const char *src_filename, const char *dest_filename)
63 const size_t buf_size = sizeof (buf);
65 src_fd = open (src_filename, O_RDONLY | O_BINARY);
66 if (src_fd < 0 || fstat (src_fd, &statbuf) < 0)
67 error (EXIT_FAILURE, errno, _("error while opening \"%s\" for reading"),
70 mode = statbuf.st_mode & 07777;
72 dest_fd = open (dest_filename, O_WRONLY | O_CREAT | O_TRUNC | O_BINARY, 0600);
74 error (EXIT_FAILURE, errno, _("cannot open backup file \"%s\" for writing"),
77 /* Copy the file contents. */
80 size_t n_read = safe_read (src_fd, buf, buf_size);
81 if (n_read == SAFE_READ_ERROR)
82 error (EXIT_FAILURE, errno, _("error reading \"%s\""), src_filename);
86 if (full_write (dest_fd, buf, n_read) < n_read)
87 error (EXIT_FAILURE, errno, _("error writing \"%s\""), dest_filename);
91 if (close (dest_fd) < 0)
92 error (EXIT_FAILURE, errno, _("error writing \"%s\""), dest_filename);
93 if (close (src_fd) < 0)
94 error (EXIT_FAILURE, errno, _("error after reading \"%s\""), src_filename);
97 /* Preserve the access and modification times. */
102 ut.actime = statbuf.st_atime;
103 ut.modtime = statbuf.st_mtime;
104 utime (dest_filename, &ut);
108 struct timeval ut[2];
110 ut[0].tv_sec = statbuf.st_atime; ut[0].tv_usec = 0;
111 ut[1].tv_sec = statbuf.st_mtime; ut[1].tv_usec = 0;
112 utimes (dest_filename, &ut);
117 /* Preserve the owner and group. */
118 chown (dest_filename, statbuf.st_uid, statbuf.st_gid);
121 /* Preserve the access permissions. */
123 if (copy_acl (src_filename, src_fd, dest_filename, dest_fd, mode))
126 chmod (dest_filename, mode);
130 if (close (dest_fd) < 0)
131 error (EXIT_FAILURE, errno, _("error writing \"%s\""), dest_filename);
132 if (close (src_fd) < 0)
133 error (EXIT_FAILURE, errno, _("error after reading \"%s\""), src_filename);