Made delete_file() backup files it is removing if --backup was specified.
[rsync.git] / rsync.c
1 /*
2    Copyright (C) Andrew Tridgell 1996
3    Copyright (C) Paul Mackerras 1996
4
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 of the License, or
8    (at your option) any later version.
9
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.
14
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
17    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
18 */
19
20 /* this file contains code used by more than one part of the rsync
21    process */
22
23 #include "rsync.h"
24
25 extern int verbose;
26 extern int dry_run;
27 extern int daemon_log_format_has_i;
28 extern int preserve_times;
29 extern int omit_dir_times;
30 extern int am_root;
31 extern int am_server;
32 extern int am_sender;
33 extern int am_generator;
34 extern int preserve_uid;
35 extern int preserve_gid;
36 extern int force_delete;
37 extern int inplace;
38 extern int recurse;
39 extern int max_delete;
40 extern int keep_dirlinks;
41 extern int make_backups;
42 extern struct stats stats;
43 extern char *backup_dir;
44 extern char *log_format;
45 extern char *backup_suffix;
46 extern int backup_suffix_len;
47
48
49 static int is_backup_file(char *fn)
50 {
51         int k = strlen(fn) - backup_suffix_len;
52         return k > 0 && strcmp(fn+k, backup_suffix) == 0;
53 }
54
55
56 /*
57   free a sums struct
58   */
59 void free_sums(struct sum_struct *s)
60 {
61         if (s->sums) free(s->sums);
62         free(s);
63 }
64
65
66 int deletion_count = 0; /* used to implement --max-delete */
67
68 /*
69  * delete a file or directory. If force_delete is set then delete
70  * recursively
71  */
72 int delete_file(char *fname, int mode, int flags)
73 {
74         DIR *d;
75         struct dirent *di;
76         char buf[MAXPATHLEN];
77         STRUCT_STAT st;
78         int zap_dir;
79
80         if (max_delete && deletion_count >= max_delete)
81                 return -1;
82
83         if (!S_ISDIR(mode)) {
84                 int ok;
85                 if (make_backups && (backup_dir || !is_backup_file(fname)))
86                         ok = make_backup(fname);
87                 else
88                         ok = robust_unlink(fname) == 0;
89                 if (ok) {
90                         if ((verbose || log_format) && !(flags & DEL_TERSE))
91                                 log_delete(fname, mode);
92                         deletion_count++;
93                         return 0;
94                 }
95                 if (errno == ENOENT)
96                         return 0;
97                 rsyserr(FERROR, errno, "delete_file: unlink %s failed",
98                         full_fname(fname));
99                 return -1;
100         }
101
102         zap_dir = (flags & DEL_FORCE_RECURSE || (force_delete && recurse))
103                 && !(flags & DEL_NO_RECURSE);
104         if (dry_run && zap_dir)
105                 errno = ENOTEMPTY;
106         else if (do_rmdir(fname) == 0) {
107                 if ((verbose || log_format) && !(flags & DEL_TERSE))
108                         log_delete(fname, mode);
109                 deletion_count++;
110                 return 0;
111         }
112         if (errno == ENOENT)
113                 return 0;
114         if (!zap_dir || (errno != ENOTEMPTY && errno != EEXIST)) {
115                 rsyserr(FERROR, errno, "delete_file: rmdir %s failed",
116                         full_fname(fname));
117                 return -1;
118         }
119
120         /* now we do a recsursive delete on the directory ... */
121         if (!(d = opendir(fname))) {
122                 rsyserr(FERROR, errno, "delete_file: opendir %s failed",
123                         full_fname(fname));
124                 return -1;
125         }
126
127         if (!(flags & DEL_TERSE)) {
128                 if (verbose || log_format)
129                         log_delete(fname, mode);
130                 flags |= DEL_TERSE;
131         }
132
133         for (errno = 0, di = readdir(d); di; errno = 0, di = readdir(d)) {
134                 char *dname = d_name(di);
135                 if (dname[0] == '.' && (dname[1] == '\0'
136                     || (dname[1] == '.' && dname[2] == '\0')))
137                         continue;
138                 pathjoin(buf, sizeof buf, fname, dname);
139
140                 if (do_lstat(buf, &st) < 0)
141                         continue;
142                 if (verbose || log_format)
143                         log_delete(buf, st.st_mode);
144                 if (delete_file(buf, st.st_mode, flags) != 0) {
145                         closedir(d);
146                         return -1;
147                 }
148         }
149         if (errno) {
150                 rsyserr(FERROR, errno, "delete_file: readdir %s failed",
151                         full_fname(fname));
152                 closedir(d);
153                 return -1;
154         }
155
156         closedir(d);
157
158         if (max_delete && deletion_count >= max_delete)
159                 return -1;
160         if (do_rmdir(fname) != 0 && errno != ENOENT) {
161                 rsyserr(FERROR, errno, "delete_file: rmdir %s failed",
162                         full_fname(fname));
163                 return -1;
164         }
165         deletion_count++;
166
167         return 0;
168 }
169
170 int set_perms(char *fname,struct file_struct *file,STRUCT_STAT *st,
171               int flags)
172 {
173         int updated = 0;
174         STRUCT_STAT st2;
175         int change_uid, change_gid;
176
177         if (!st) {
178                 if (dry_run)
179                         return 1;
180                 if (link_stat(fname, &st2, 0) < 0) {
181                         rsyserr(FERROR, errno, "stat %s failed",
182                                 full_fname(fname));
183                         return 0;
184                 }
185                 st = &st2;
186         }
187
188         if (!preserve_times || S_ISLNK(st->st_mode)
189          || (S_ISDIR(st->st_mode)
190           && (omit_dir_times || (make_backups && !backup_dir))))
191                 flags |= PERMS_SKIP_MTIME;
192         if (!(flags & PERMS_SKIP_MTIME)
193             && cmp_modtime(st->st_mtime, file->modtime) != 0) {
194                 if (set_modtime(fname,file->modtime) != 0) {
195                         rsyserr(FERROR, errno, "failed to set times on %s",
196                                 full_fname(fname));
197                         return 0;
198                 }
199                 updated = 1;
200         }
201
202         change_uid = am_root && preserve_uid && st->st_uid != file->uid;
203         change_gid = preserve_gid && file->gid != GID_NONE
204                 && st->st_gid != file->gid;
205 #if !defined HAVE_LCHOWN && !defined CHOWN_MODIFIES_SYMLINK
206         if (S_ISLNK(st->st_mode))
207                 ;
208         else
209 #endif
210         if (change_uid || change_gid) {
211                 if (verbose > 2) {
212                         if (change_uid) {
213                                 rprintf(FINFO,
214                                         "set uid of %s from %ld to %ld\n",
215                                         safe_fname(fname),
216                                         (long)st->st_uid, (long)file->uid);
217                         }
218                         if (change_gid) {
219                                 rprintf(FINFO,
220                                         "set gid of %s from %ld to %ld\n",
221                                         safe_fname(fname),
222                                         (long)st->st_gid, (long)file->gid);
223                         }
224                 }
225                 if (do_lchown(fname,
226                     change_uid ? file->uid : st->st_uid,
227                     change_gid ? file->gid : st->st_gid) != 0) {
228                         /* shouldn't have attempted to change uid or gid
229                          * unless have the privilege */
230                         rsyserr(FERROR, errno, "%s %s failed",
231                             change_uid ? "chown" : "chgrp",
232                             full_fname(fname));
233                         return 0;
234                 }
235                 /* a lchown had been done - we have to re-stat if the
236                  * destination had the setuid or setgid bits set due
237                  * to the side effect of the chown call */
238                 if (st->st_mode & (S_ISUID | S_ISGID)) {
239                         link_stat(fname, st,
240                                   keep_dirlinks && S_ISDIR(st->st_mode));
241                 }
242                 updated = 1;
243         }
244
245 #ifdef HAVE_CHMOD
246         if (!S_ISLNK(st->st_mode)) {
247                 if ((st->st_mode & CHMOD_BITS) != (file->mode & CHMOD_BITS)) {
248                         updated = 1;
249                         if (do_chmod(fname,(file->mode & CHMOD_BITS)) != 0) {
250                                 rsyserr(FERROR, errno, "failed to set permissions on %s",
251                                         full_fname(fname));
252                                 return 0;
253                         }
254                 }
255         }
256 #endif
257
258         if (verbose > 1 && flags & PERMS_REPORT) {
259                 enum logcode code = daemon_log_format_has_i || dry_run
260                                   ? FCLIENT : FINFO;
261                 if (updated)
262                         rprintf(code, "%s\n", safe_fname(fname));
263                 else
264                         rprintf(code, "%s is uptodate\n", safe_fname(fname));
265         }
266         return updated;
267 }
268
269
270 void sig_int(void)
271 {
272         /* KLUGE: if the user hits Ctrl-C while ssh is prompting
273          * for a password, then our cleanup's sending of a SIGUSR1
274          * signal to all our children may kill ssh before it has a
275          * chance to restore the tty settings (i.e. turn echo back
276          * on).  By sleeping for a short time, ssh gets a bigger
277          * chance to do the right thing.  If child processes are
278          * not ssh waiting for a password, then this tiny delay
279          * shouldn't hurt anything. */
280         msleep(400);
281         exit_cleanup(RERR_SIGNAL);
282 }
283
284
285 /* finish off a file transfer, renaming the file and setting the permissions
286    and ownership */
287 void finish_transfer(char *fname, char *fnametmp, struct file_struct *file,
288                      int ok_to_set_time, int overwriting_basis)
289 {
290         int ret;
291
292         if (inplace) {
293                 if (verbose > 2)
294                         rprintf(FINFO, "finishing %s\n", safe_fname(fname));
295                 goto do_set_perms;
296         }
297
298         if (make_backups && overwriting_basis && !make_backup(fname))
299                 return;
300
301         /* Change permissions before putting the file into place. */
302         set_perms(fnametmp, file, NULL, ok_to_set_time ? 0 : PERMS_SKIP_MTIME);
303
304         /* move tmp file over real file */
305         if (verbose > 2) {
306                 rprintf(FINFO, "renaming %s to %s\n",
307                         safe_fname(fnametmp), safe_fname(fname));
308         }
309         ret = robust_rename(fnametmp, fname, file->mode & INITACCESSPERMS);
310         if (ret < 0) {
311                 rsyserr(FERROR, errno, "%s %s -> \"%s\"",
312                     ret == -2 ? "copy" : "rename",
313                     full_fname(fnametmp), safe_fname(fname));
314                 do_unlink(fnametmp);
315                 return;
316         }
317         if (ret == 0) {
318                 /* The file was moved into place (not copied), so it's done. */
319                 return;
320         }
321     do_set_perms:
322         set_perms(fname, file, NULL, ok_to_set_time ? 0 : PERMS_SKIP_MTIME);
323 }
324
325 const char *who_am_i(void)
326 {
327         if (am_sender < 0)
328                 return am_server ? "server" : "client";
329         return am_sender ? "sender" : am_generator ? "generator" : "receiver";
330 }