Fixed hard-linking when some of the files can get skipped. This adds
[rsync.git] / generator.c
blob125b3132fcfbf694f8383e922dcffb0dc743bf8f
1 /*
2 * Routines that are exclusive to the generator process.
4 * Copyright (C) 1996-2000 Andrew Tridgell
5 * Copyright (C) 1996 Paul Mackerras
6 * Copyright (C) 2002 Martin Pool <mbp@samba.org>
7 * Copyright (C) 2003-2008 Wayne Davison
9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 3 of the License, or
12 * (at your option) any later version.
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
19 * You should have received a copy of the GNU General Public License along
20 * with this program; if not, visit the http://fsf.org website.
23 #include "rsync.h"
25 extern int verbose;
26 extern int dry_run;
27 extern int do_xfers;
28 extern int stdout_format_has_i;
29 extern int logfile_format_has_i;
30 extern int am_root;
31 extern int am_server;
32 extern int am_daemon;
33 extern int inc_recurse;
34 extern int do_progress;
35 extern int relative_paths;
36 extern int implied_dirs;
37 extern int keep_dirlinks;
38 extern int preserve_acls;
39 extern int preserve_xattrs;
40 extern int preserve_links;
41 extern int preserve_devices;
42 extern int preserve_specials;
43 extern int preserve_hard_links;
44 extern int preserve_executability;
45 extern int preserve_perms;
46 extern int preserve_times;
47 extern int uid_ndx;
48 extern int gid_ndx;
49 extern int delete_mode;
50 extern int delete_before;
51 extern int delete_during;
52 extern int delete_after;
53 extern int msgdone_cnt;
54 extern int ignore_errors;
55 extern int remove_source_files;
56 extern int delay_updates;
57 extern int update_only;
58 extern int ignore_existing;
59 extern int ignore_non_existing;
60 extern int inplace;
61 extern int append_mode;
62 extern int make_backups;
63 extern int csum_length;
64 extern int ignore_times;
65 extern int size_only;
66 extern OFF_T max_size;
67 extern OFF_T min_size;
68 extern int io_error;
69 extern int flist_eof;
70 extern int allowed_lull;
71 extern int sock_f_out;
72 extern int ignore_timeout;
73 extern int protocol_version;
74 extern int file_total;
75 extern int fuzzy_basis;
76 extern int always_checksum;
77 extern int checksum_len;
78 extern char *partial_dir;
79 extern char *basis_dir[];
80 extern int compare_dest;
81 extern int copy_dest;
82 extern int link_dest;
83 extern int whole_file;
84 extern int list_only;
85 extern int read_batch;
86 extern int safe_symlinks;
87 extern long block_size; /* "long" because popt can't set an int32. */
88 extern int unsort_ndx;
89 extern int max_delete;
90 extern int force_delete;
91 extern int one_file_system;
92 extern struct stats stats;
93 extern dev_t filesystem_dev;
94 extern mode_t orig_umask;
95 extern uid_t our_uid;
96 extern char *backup_dir;
97 extern char *backup_suffix;
98 extern int backup_suffix_len;
99 extern struct file_list *cur_flist, *first_flist, *dir_flist;
100 extern struct filter_list_struct server_filter_list;
102 int ignore_perishable = 0;
103 int non_perishable_cnt = 0;
104 int maybe_ATTRS_REPORT = 0;
106 static dev_t dev_zero;
107 static int deletion_count = 0; /* used to implement --max-delete */
108 static int deldelay_size = 0, deldelay_cnt = 0;
109 static char *deldelay_buf = NULL;
110 static int deldelay_fd = -1;
111 static int lull_mod;
112 static int dir_tweaking;
113 static int symlink_timeset_failed_flags;
114 static int need_retouch_dir_times;
115 static int need_retouch_dir_perms;
116 static const char *solo_file = NULL;
118 /* For calling delete_item() and delete_dir_contents(). */
119 #define DEL_NO_UID_WRITE (1<<0) /* file/dir has our uid w/o write perm */
120 #define DEL_RECURSE (1<<1) /* if dir, delete all contents */
121 #define DEL_DIR_IS_EMPTY (1<<2) /* internal delete_FUNCTIONS use only */
122 #define DEL_FOR_FILE (1<<3) /* making room for a replacement file */
123 #define DEL_FOR_DIR (1<<4) /* making room for a replacement dir */
124 #define DEL_FOR_SYMLINK (1<<5) /* making room for a replacement symlink */
125 #define DEL_FOR_DEVICE (1<<6) /* making room for a replacement device */
126 #define DEL_FOR_SPECIAL (1<<7) /* making room for a replacement special */
128 #define DEL_MAKE_ROOM (DEL_FOR_FILE|DEL_FOR_DIR|DEL_FOR_SYMLINK|DEL_FOR_DEVICE|DEL_FOR_SPECIAL)
130 enum nonregtype {
131 TYPE_DIR, TYPE_SPECIAL, TYPE_DEVICE, TYPE_SYMLINK
134 enum delret {
135 DR_SUCCESS = 0, DR_FAILURE, DR_AT_LIMIT, DR_NOT_EMPTY
138 /* Forward declarations. */
139 static enum delret delete_dir_contents(char *fname, uint16 flags);
140 #ifdef SUPPORT_HARD_LINKS
141 static void handle_skipped_hlink(struct file_struct *file, int itemizing,
142 enum logcode code, int f_out);
143 #endif
145 static int is_backup_file(char *fn)
147 int k = strlen(fn) - backup_suffix_len;
148 return k > 0 && strcmp(fn+k, backup_suffix) == 0;
151 /* Delete a file or directory. If DEL_RECURSE is set in the flags, this will
152 * delete recursively.
154 * Note that fbuf must point to a MAXPATHLEN buffer if the mode indicates it's
155 * a directory! (The buffer is used for recursion, but returned unchanged.)
157 static enum delret delete_item(char *fbuf, uint16 mode, uint16 flags)
159 enum delret ret;
160 char *what;
161 int ok;
163 if (verbose > 2) {
164 rprintf(FINFO, "delete_item(%s) mode=%o flags=%d\n",
165 fbuf, (int)mode, (int)flags);
168 if (flags & DEL_NO_UID_WRITE)
169 do_chmod(fbuf, mode | S_IWUSR);
171 if (S_ISDIR(mode) && !(flags & DEL_DIR_IS_EMPTY)) {
172 int save_uid_ndx = uid_ndx;
173 /* This only happens on the first call to delete_item() since
174 * delete_dir_contents() always calls us w/DEL_DIR_IS_EMPTY. */
175 if (!uid_ndx)
176 uid_ndx = ++file_extra_cnt;
177 ignore_perishable = 1;
178 /* If DEL_RECURSE is not set, this just reports emptiness. */
179 ret = delete_dir_contents(fbuf, flags);
180 ignore_perishable = 0;
181 if (!save_uid_ndx) {
182 --file_extra_cnt;
183 uid_ndx = 0;
185 if (ret == DR_NOT_EMPTY || ret == DR_AT_LIMIT)
186 goto check_ret;
187 /* OK: try to delete the directory. */
190 if (!(flags & DEL_MAKE_ROOM) && max_delete >= 0 && ++deletion_count > max_delete)
191 return DR_AT_LIMIT;
193 if (S_ISDIR(mode)) {
194 what = "rmdir";
195 ok = do_rmdir(fbuf) == 0;
196 } else if (make_backups > 0 && (backup_dir || !is_backup_file(fbuf))) {
197 what = "make_backup";
198 ok = make_backup(fbuf);
199 } else {
200 what = "unlink";
201 ok = robust_unlink(fbuf) == 0;
204 if (ok) {
205 if (!(flags & DEL_MAKE_ROOM))
206 log_delete(fbuf, mode);
207 ret = DR_SUCCESS;
208 } else {
209 if (S_ISDIR(mode) && errno == ENOTEMPTY) {
210 rprintf(FINFO, "cannot delete non-empty directory: %s\n",
211 fbuf);
212 ret = DR_NOT_EMPTY;
213 } else if (errno != ENOENT) {
214 rsyserr(FERROR, errno, "delete_file: %s(%s) failed",
215 what, fbuf);
216 ret = DR_FAILURE;
217 } else {
218 deletion_count--;
219 ret = DR_SUCCESS;
223 check_ret:
224 if (ret != DR_SUCCESS && flags & DEL_MAKE_ROOM) {
225 const char *desc;
226 switch (flags & DEL_MAKE_ROOM) {
227 case DEL_FOR_FILE: desc = "regular file"; break;
228 case DEL_FOR_DIR: desc = "directory"; break;
229 case DEL_FOR_SYMLINK: desc = "symlink"; break;
230 case DEL_FOR_DEVICE: desc = "device file"; break;
231 case DEL_FOR_SPECIAL: desc = "special file"; break;
232 default: exit_cleanup(RERR_UNSUPPORTED); /* IMPOSSIBLE */
234 rprintf(FERROR_XFER, "could not make way for new %s: %s\n",
235 desc, fbuf);
237 return ret;
240 /* The directory is about to be deleted: if DEL_RECURSE is given, delete all
241 * its contents, otherwise just checks for content. Returns DR_SUCCESS or
242 * DR_NOT_EMPTY. Note that fname must point to a MAXPATHLEN buffer! (The
243 * buffer is used for recursion, but returned unchanged.)
245 static enum delret delete_dir_contents(char *fname, uint16 flags)
247 struct file_list *dirlist;
248 enum delret ret;
249 unsigned remainder;
250 void *save_filters;
251 int j, dlen;
252 char *p;
254 if (verbose > 3) {
255 rprintf(FINFO, "delete_dir_contents(%s) flags=%d\n",
256 fname, flags);
259 dlen = strlen(fname);
260 save_filters = push_local_filters(fname, dlen);
262 non_perishable_cnt = 0;
263 dirlist = get_dirlist(fname, dlen, 0);
264 ret = non_perishable_cnt ? DR_NOT_EMPTY : DR_SUCCESS;
266 if (!dirlist->used)
267 goto done;
269 if (!(flags & DEL_RECURSE)) {
270 ret = DR_NOT_EMPTY;
271 goto done;
274 p = fname + dlen;
275 if (dlen != 1 || *fname != '/')
276 *p++ = '/';
277 remainder = MAXPATHLEN - (p - fname);
279 /* We do our own recursion, so make delete_item() non-recursive. */
280 flags = (flags & ~(DEL_RECURSE|DEL_MAKE_ROOM|DEL_NO_UID_WRITE))
281 | DEL_DIR_IS_EMPTY;
283 for (j = dirlist->used; j--; ) {
284 struct file_struct *fp = dirlist->files[j];
286 if (fp->flags & FLAG_MOUNT_DIR && S_ISDIR(fp->mode)) {
287 if (verbose > 1) {
288 rprintf(FINFO,
289 "mount point, %s, pins parent directory\n",
290 f_name(fp, NULL));
292 ret = DR_NOT_EMPTY;
293 continue;
296 strlcpy(p, fp->basename, remainder);
297 if (!(fp->mode & S_IWUSR) && !am_root && (uid_t)F_OWNER(fp) == our_uid)
298 do_chmod(fname, fp->mode | S_IWUSR);
299 /* Save stack by recursing to ourself directly. */
300 if (S_ISDIR(fp->mode)) {
301 if (delete_dir_contents(fname, flags | DEL_RECURSE) != DR_SUCCESS)
302 ret = DR_NOT_EMPTY;
304 if (delete_item(fname, fp->mode, flags) != DR_SUCCESS)
305 ret = DR_NOT_EMPTY;
308 fname[dlen] = '\0';
310 done:
311 flist_free(dirlist);
312 pop_local_filters(save_filters);
314 if (ret == DR_NOT_EMPTY) {
315 rprintf(FINFO, "cannot delete non-empty directory: %s\n",
316 fname);
318 return ret;
321 static int start_delete_delay_temp(void)
323 char fnametmp[MAXPATHLEN];
324 int save_dry_run = dry_run;
326 dry_run = 0;
327 if (!get_tmpname(fnametmp, "deldelay")
328 || (deldelay_fd = do_mkstemp(fnametmp, 0600)) < 0) {
329 rprintf(FINFO, "NOTE: Unable to create delete-delay temp file%s.\n",
330 inc_recurse ? "" : " -- switching to --delete-after");
331 delete_during = 0;
332 delete_after = !inc_recurse;
333 dry_run = save_dry_run;
334 return 0;
336 unlink(fnametmp);
337 dry_run = save_dry_run;
338 return 1;
341 static int flush_delete_delay(void)
343 if (deldelay_fd < 0 && !start_delete_delay_temp())
344 return 0;
345 if (write(deldelay_fd, deldelay_buf, deldelay_cnt) != deldelay_cnt) {
346 rsyserr(FERROR, errno, "flush of delete-delay buffer");
347 delete_during = 0;
348 delete_after = !inc_recurse;
349 close(deldelay_fd);
350 return 0;
352 deldelay_cnt = 0;
353 return 1;
356 static int remember_delete(struct file_struct *file, const char *fname, int flags)
358 int len;
360 if (deldelay_cnt == deldelay_size && !flush_delete_delay())
361 return 0;
363 if (flags & DEL_NO_UID_WRITE)
364 deldelay_buf[deldelay_cnt++] = '!';
366 while (1) {
367 len = snprintf(deldelay_buf + deldelay_cnt,
368 deldelay_size - deldelay_cnt,
369 "%x %s%c",
370 (int)file->mode, fname, '\0');
371 if ((deldelay_cnt += len) <= deldelay_size)
372 break;
373 deldelay_cnt -= len;
374 if (!flush_delete_delay())
375 return 0;
378 return 1;
381 static int read_delay_line(char *buf, int *flags_p)
383 static int read_pos = 0;
384 int j, len, mode;
385 char *bp, *past_space;
387 while (1) {
388 for (j = read_pos; j < deldelay_cnt && deldelay_buf[j]; j++) {}
389 if (j < deldelay_cnt)
390 break;
391 if (deldelay_fd < 0) {
392 if (j > read_pos)
393 goto invalid_data;
394 return -1;
396 deldelay_cnt -= read_pos;
397 if (deldelay_cnt == deldelay_size)
398 goto invalid_data;
399 if (deldelay_cnt && read_pos) {
400 memmove(deldelay_buf, deldelay_buf + read_pos,
401 deldelay_cnt);
403 len = read(deldelay_fd, deldelay_buf + deldelay_cnt,
404 deldelay_size - deldelay_cnt);
405 if (len == 0) {
406 if (deldelay_cnt) {
407 rprintf(FERROR,
408 "ERROR: unexpected EOF in delete-delay file.\n");
410 return -1;
412 if (len < 0) {
413 rsyserr(FERROR, errno,
414 "reading delete-delay file");
415 return -1;
417 deldelay_cnt += len;
418 read_pos = 0;
421 bp = deldelay_buf + read_pos;
422 if (*bp == '!') {
423 bp++;
424 *flags_p = DEL_NO_UID_WRITE;
425 } else
426 *flags_p = 0;
428 if (sscanf(bp, "%x ", &mode) != 1) {
429 invalid_data:
430 rprintf(FERROR, "ERROR: invalid data in delete-delay file.\n");
431 return -1;
433 past_space = strchr(bp, ' ') + 1;
434 len = j - read_pos - (past_space - bp) + 1; /* count the '\0' */
435 read_pos = j + 1;
437 if (len > MAXPATHLEN) {
438 rprintf(FERROR, "ERROR: filename too long in delete-delay file.\n");
439 return -1;
442 /* The caller needs the name in a MAXPATHLEN buffer, so we copy it
443 * instead of returning a pointer to our buffer. */
444 memcpy(buf, past_space, len);
446 return mode;
449 static void do_delayed_deletions(char *delbuf)
451 int mode, flags;
453 if (deldelay_fd >= 0) {
454 if (deldelay_cnt && !flush_delete_delay())
455 return;
456 lseek(deldelay_fd, 0, 0);
458 while ((mode = read_delay_line(delbuf, &flags)) >= 0)
459 delete_item(delbuf, mode, flags | DEL_RECURSE);
460 if (deldelay_fd >= 0)
461 close(deldelay_fd);
464 /* This function is used to implement per-directory deletion, and is used by
465 * all the --delete-WHEN options. Note that the fbuf pointer must point to a
466 * MAXPATHLEN buffer with the name of the directory in it (the functions we
467 * call will append names onto the end, but the old dir value will be restored
468 * on exit). */
469 static void delete_in_dir(char *fbuf, struct file_struct *file, dev_t *fs_dev)
471 static int already_warned = 0;
472 struct file_list *dirlist;
473 char delbuf[MAXPATHLEN];
474 int dlen, i;
475 int save_uid_ndx = uid_ndx;
477 if (!fbuf) {
478 change_local_filter_dir(NULL, 0, 0);
479 return;
482 if (verbose > 2)
483 rprintf(FINFO, "delete_in_dir(%s)\n", fbuf);
485 if (allowed_lull)
486 maybe_send_keepalive();
488 if (io_error && !ignore_errors) {
489 if (already_warned)
490 return;
491 rprintf(FINFO,
492 "IO error encountered -- skipping file deletion\n");
493 already_warned = 1;
494 return;
497 dlen = strlen(fbuf);
498 change_local_filter_dir(fbuf, dlen, F_DEPTH(file));
500 if (one_file_system) {
501 if (file->flags & FLAG_TOP_DIR)
502 filesystem_dev = *fs_dev;
503 else if (filesystem_dev != *fs_dev)
504 return;
507 if (!uid_ndx)
508 uid_ndx = ++file_extra_cnt;
510 dirlist = get_dirlist(fbuf, dlen, 0);
512 /* If an item in dirlist is not found in flist, delete it
513 * from the filesystem. */
514 for (i = dirlist->used; i--; ) {
515 struct file_struct *fp = dirlist->files[i];
516 if (!F_IS_ACTIVE(fp))
517 continue;
518 if (fp->flags & FLAG_MOUNT_DIR && S_ISDIR(fp->mode)) {
519 if (verbose > 1)
520 rprintf(FINFO, "cannot delete mount point: %s\n",
521 f_name(fp, NULL));
522 continue;
524 if (flist_find(cur_flist, fp) < 0) {
525 int flags = DEL_RECURSE;
526 if (!(fp->mode & S_IWUSR) && !am_root && (uid_t)F_OWNER(fp) == our_uid)
527 flags |= DEL_NO_UID_WRITE;
528 f_name(fp, delbuf);
529 if (delete_during == 2) {
530 if (!remember_delete(fp, delbuf, flags))
531 break;
532 } else
533 delete_item(delbuf, fp->mode, flags);
537 flist_free(dirlist);
539 if (!save_uid_ndx) {
540 --file_extra_cnt;
541 uid_ndx = 0;
545 /* This deletes any files on the receiving side that are not present on the
546 * sending side. This is used by --delete-before and --delete-after. */
547 static void do_delete_pass(void)
549 char fbuf[MAXPATHLEN];
550 STRUCT_STAT st;
551 int j;
553 /* dry_run is incremented when the destination doesn't exist yet. */
554 if (dry_run > 1 || list_only)
555 return;
557 for (j = 0; j < cur_flist->used; j++) {
558 struct file_struct *file = cur_flist->sorted[j];
560 if (!(file->flags & FLAG_CONTENT_DIR))
561 continue;
563 f_name(file, fbuf);
564 if (verbose > 1 && file->flags & FLAG_TOP_DIR)
565 rprintf(FINFO, "deleting in %s\n", fbuf);
567 if (link_stat(fbuf, &st, keep_dirlinks) < 0
568 || !S_ISDIR(st.st_mode))
569 continue;
571 delete_in_dir(fbuf, file, &st.st_dev);
573 delete_in_dir(NULL, NULL, &dev_zero);
575 if (do_progress && !am_server)
576 rprintf(FINFO, " \r");
579 int unchanged_attrs(const char *fname, struct file_struct *file, stat_x *sxp)
581 #if !defined HAVE_LUTIMES || !defined HAVE_UTIMES
582 if (S_ISLNK(file->mode)) {
584 } else
585 #endif
586 if (preserve_times && cmp_time(sxp->st.st_mtime, file->modtime) != 0)
587 return 0;
589 if (preserve_perms) {
590 if (!BITS_EQUAL(sxp->st.st_mode, file->mode, CHMOD_BITS))
591 return 0;
592 } else if (preserve_executability
593 && ((sxp->st.st_mode & 0111 ? 1 : 0) ^ (file->mode & 0111 ? 1 : 0)))
594 return 0;
596 if (am_root && uid_ndx && sxp->st.st_uid != (uid_t)F_OWNER(file))
597 return 0;
599 if (gid_ndx && !(file->flags & FLAG_SKIP_GROUP) && sxp->st.st_gid != (gid_t)F_GROUP(file))
600 return 0;
602 #ifdef SUPPORT_ACLS
603 if (preserve_acls && !S_ISLNK(file->mode)) {
604 if (!ACL_READY(*sxp))
605 get_acl(fname, sxp);
606 if (set_acl(NULL, file, sxp) == 0)
607 return 0;
609 #endif
610 #ifdef SUPPORT_XATTRS
611 if (preserve_xattrs) {
612 if (!XATTR_READY(*sxp))
613 get_xattr(fname, sxp);
614 if (xattr_diff(file, sxp, 0))
615 return 0;
617 #endif
619 return 1;
622 void itemize(const char *fnamecmp, struct file_struct *file, int ndx, int statret,
623 stat_x *sxp, int32 iflags, uchar fnamecmp_type,
624 const char *xname)
626 if (statret >= 0) { /* A from-dest-dir statret can == 1! */
627 int keep_time = !preserve_times ? 0
628 : S_ISDIR(file->mode) ? preserve_times > 1 :
629 #if defined HAVE_LUTIMES && defined HAVE_UTIMES
631 #else
632 !S_ISLNK(file->mode);
633 #endif
635 if (S_ISREG(file->mode) && F_LENGTH(file) != sxp->st.st_size)
636 iflags |= ITEM_REPORT_SIZE;
637 if (file->flags & FLAG_TIME_FAILED) { /* symlinks only */
638 if (iflags & ITEM_LOCAL_CHANGE)
639 iflags |= symlink_timeset_failed_flags;
640 } else if (keep_time
641 ? cmp_time(file->modtime, sxp->st.st_mtime) != 0
642 : iflags & (ITEM_TRANSFER|ITEM_LOCAL_CHANGE) && !(iflags & ITEM_MATCHED)
643 && (!(iflags & ITEM_XNAME_FOLLOWS) || *xname))
644 iflags |= ITEM_REPORT_TIME;
645 #if !defined HAVE_LCHMOD && !defined HAVE_SETATTRLIST
646 if (S_ISLNK(file->mode)) {
648 } else
649 #endif
650 if (preserve_perms) {
651 if (!BITS_EQUAL(sxp->st.st_mode, file->mode, CHMOD_BITS))
652 iflags |= ITEM_REPORT_PERMS;
653 } else if (preserve_executability
654 && ((sxp->st.st_mode & 0111 ? 1 : 0) ^ (file->mode & 0111 ? 1 : 0)))
655 iflags |= ITEM_REPORT_PERMS;
656 if (uid_ndx && am_root && (uid_t)F_OWNER(file) != sxp->st.st_uid)
657 iflags |= ITEM_REPORT_OWNER;
658 if (gid_ndx && !(file->flags & FLAG_SKIP_GROUP)
659 && sxp->st.st_gid != (gid_t)F_GROUP(file))
660 iflags |= ITEM_REPORT_GROUP;
661 #ifdef SUPPORT_ACLS
662 if (preserve_acls && !S_ISLNK(file->mode)) {
663 if (!ACL_READY(*sxp))
664 get_acl(fnamecmp, sxp);
665 if (set_acl(NULL, file, sxp) == 0)
666 iflags |= ITEM_REPORT_ACL;
668 #endif
669 #ifdef SUPPORT_XATTRS
670 if (preserve_xattrs) {
671 if (!XATTR_READY(*sxp))
672 get_xattr(fnamecmp, sxp);
673 if (xattr_diff(file, sxp, 1))
674 iflags |= ITEM_REPORT_XATTR;
676 #endif
677 } else {
678 #ifdef SUPPORT_XATTRS
679 if (preserve_xattrs && xattr_diff(file, NULL, 1))
680 iflags |= ITEM_REPORT_XATTR;
681 #endif
682 iflags |= ITEM_IS_NEW;
685 iflags &= 0xffff;
686 if ((iflags & (SIGNIFICANT_ITEM_FLAGS|ITEM_REPORT_XATTR) || verbose > 1
687 || stdout_format_has_i > 1 || (xname && *xname)) && !read_batch) {
688 if (protocol_version >= 29) {
689 if (ndx >= 0)
690 write_ndx(sock_f_out, ndx);
691 write_shortint(sock_f_out, iflags);
692 if (iflags & ITEM_BASIS_TYPE_FOLLOWS)
693 write_byte(sock_f_out, fnamecmp_type);
694 if (iflags & ITEM_XNAME_FOLLOWS)
695 write_vstring(sock_f_out, xname, strlen(xname));
696 #ifdef SUPPORT_XATTRS
697 if (iflags & ITEM_REPORT_XATTR && !dry_run)
698 send_xattr_request(NULL, file, sock_f_out);
699 #endif
700 } else if (ndx >= 0) {
701 enum logcode code = logfile_format_has_i ? FINFO : FCLIENT;
702 log_item(code, file, &stats, iflags, xname);
708 /* Perform our quick-check heuristic for determining if a file is unchanged. */
709 int unchanged_file(char *fn, struct file_struct *file, STRUCT_STAT *st)
711 if (st->st_size != F_LENGTH(file))
712 return 0;
714 /* if always checksum is set then we use the checksum instead
715 of the file time to determine whether to sync */
716 if (always_checksum > 0 && S_ISREG(st->st_mode)) {
717 char sum[MAX_DIGEST_LEN];
718 file_checksum(fn, sum, st->st_size);
719 return memcmp(sum, F_SUM(file), checksum_len) == 0;
722 if (size_only > 0)
723 return 1;
725 if (ignore_times)
726 return 0;
728 return cmp_time(st->st_mtime, file->modtime) == 0;
733 * set (initialize) the size entries in the per-file sum_struct
734 * calculating dynamic block and checksum sizes.
736 * This is only called from generate_and_send_sums() but is a separate
737 * function to encapsulate the logic.
739 * The block size is a rounded square root of file length.
741 * The checksum size is determined according to:
742 * blocksum_bits = BLOCKSUM_BIAS + 2*log2(file_len) - log2(block_len)
743 * provided by Donovan Baarda which gives a probability of rsync
744 * algorithm corrupting data and falling back using the whole md4
745 * checksums.
747 * This might be made one of several selectable heuristics.
749 static void sum_sizes_sqroot(struct sum_struct *sum, int64 len)
751 int32 blength;
752 int s2length;
754 if (block_size)
755 blength = block_size;
756 else if (len <= BLOCK_SIZE * BLOCK_SIZE)
757 blength = BLOCK_SIZE;
758 else {
759 int32 c;
760 int64 l;
761 int cnt;
762 for (c = 1, l = len, cnt = 0; l >>= 2; c <<= 1, cnt++) {}
763 if (cnt >= 31 || c >= MAX_BLOCK_SIZE)
764 blength = MAX_BLOCK_SIZE;
765 else {
766 blength = 0;
767 do {
768 blength |= c;
769 if (len < (int64)blength * blength)
770 blength &= ~c;
771 c >>= 1;
772 } while (c >= 8); /* round to multiple of 8 */
773 blength = MAX(blength, BLOCK_SIZE);
777 if (protocol_version < 27) {
778 s2length = csum_length;
779 } else if (csum_length == SUM_LENGTH) {
780 s2length = SUM_LENGTH;
781 } else {
782 int32 c;
783 int64 l;
784 int b = BLOCKSUM_BIAS;
785 for (l = len; l >>= 1; b += 2) {}
786 for (c = blength; (c >>= 1) && b; b--) {}
787 /* add a bit, subtract rollsum, round up. */
788 s2length = (b + 1 - 32 + 7) / 8; /* --optimize in compiler-- */
789 s2length = MAX(s2length, csum_length);
790 s2length = MIN(s2length, SUM_LENGTH);
793 sum->flength = len;
794 sum->blength = blength;
795 sum->s2length = s2length;
796 sum->remainder = (int32)(len % blength);
797 sum->count = (int32)(len / blength) + (sum->remainder != 0);
799 if (sum->count && verbose > 2) {
800 rprintf(FINFO,
801 "count=%.0f rem=%ld blength=%ld s2length=%d flength=%.0f\n",
802 (double)sum->count, (long)sum->remainder, (long)sum->blength,
803 sum->s2length, (double)sum->flength);
809 * Generate and send a stream of signatures/checksums that describe a buffer
811 * Generate approximately one checksum every block_len bytes.
813 static void generate_and_send_sums(int fd, OFF_T len, int f_out, int f_copy)
815 int32 i;
816 struct map_struct *mapbuf;
817 struct sum_struct sum;
818 OFF_T offset = 0;
820 sum_sizes_sqroot(&sum, len);
821 write_sum_head(f_out, &sum);
823 if (append_mode > 0 && f_copy < 0)
824 return;
826 if (len > 0)
827 mapbuf = map_file(fd, len, MAX_MAP_SIZE, sum.blength);
828 else
829 mapbuf = NULL;
831 for (i = 0; i < sum.count; i++) {
832 int32 n1 = (int32)MIN(len, (OFF_T)sum.blength);
833 char *map = map_ptr(mapbuf, offset, n1);
834 char sum2[SUM_LENGTH];
835 uint32 sum1;
837 len -= n1;
838 offset += n1;
840 if (f_copy >= 0) {
841 full_write(f_copy, map, n1);
842 if (append_mode > 0)
843 continue;
846 sum1 = get_checksum1(map, n1);
847 get_checksum2(map, n1, sum2);
849 if (verbose > 3) {
850 rprintf(FINFO,
851 "chunk[%.0f] offset=%.0f len=%ld sum1=%08lx\n",
852 (double)i, (double)offset - n1, (long)n1,
853 (unsigned long)sum1);
855 write_int(f_out, sum1);
856 write_buf(f_out, sum2, sum.s2length);
859 if (mapbuf)
860 unmap_file(mapbuf);
864 /* Try to find a filename in the same dir as "fname" with a similar name. */
865 static int find_fuzzy(struct file_struct *file, struct file_list *dirlist)
867 int fname_len, fname_suf_len;
868 const char *fname_suf, *fname = file->basename;
869 uint32 lowest_dist = 25 << 16; /* ignore a distance greater than 25 */
870 int j, lowest_j = -1;
872 fname_len = strlen(fname);
873 fname_suf = find_filename_suffix(fname, fname_len, &fname_suf_len);
875 for (j = 0; j < dirlist->used; j++) {
876 struct file_struct *fp = dirlist->files[j];
877 const char *suf, *name;
878 int len, suf_len;
879 uint32 dist;
881 if (!S_ISREG(fp->mode) || !F_LENGTH(fp)
882 || fp->flags & FLAG_FILE_SENT)
883 continue;
885 name = fp->basename;
887 if (F_LENGTH(fp) == F_LENGTH(file)
888 && cmp_time(fp->modtime, file->modtime) == 0) {
889 if (verbose > 4) {
890 rprintf(FINFO,
891 "fuzzy size/modtime match for %s\n",
892 name);
894 return j;
897 len = strlen(name);
898 suf = find_filename_suffix(name, len, &suf_len);
900 dist = fuzzy_distance(name, len, fname, fname_len);
901 /* Add some extra weight to how well the suffixes match. */
902 dist += fuzzy_distance(suf, suf_len, fname_suf, fname_suf_len)
903 * 10;
904 if (verbose > 4) {
905 rprintf(FINFO, "fuzzy distance for %s = %d.%05d\n",
906 name, (int)(dist>>16), (int)(dist&0xFFFF));
908 if (dist <= lowest_dist) {
909 lowest_dist = dist;
910 lowest_j = j;
914 return lowest_j;
917 /* Copy a file found in our --copy-dest handling. */
918 static int copy_altdest_file(const char *src, const char *dest, struct file_struct *file)
920 char buf[MAXPATHLEN];
921 const char *copy_to, *partialptr;
922 int ok, fd_w;
924 if (inplace) {
925 /* Let copy_file open the destination in place. */
926 fd_w = -1;
927 copy_to = dest;
928 } else {
929 fd_w = open_tmpfile(buf, dest, file);
930 if (fd_w < 0)
931 return -1;
932 copy_to = buf;
934 cleanup_set(copy_to, NULL, NULL, -1, -1);
935 if (copy_file(src, copy_to, fd_w, file->mode, 0) < 0) {
936 if (verbose) {
937 rsyserr(FINFO, errno, "copy_file %s => %s",
938 full_fname(src), copy_to);
940 /* Try to clean up. */
941 unlink(copy_to);
942 cleanup_disable();
943 return -1;
945 partialptr = partial_dir ? partial_dir_fname(dest) : NULL;
946 ok = finish_transfer(dest, copy_to, src, partialptr, file, 1, 0);
947 cleanup_disable();
948 return ok ? 0 : -1;
951 /* This is only called for regular files. We return -2 if we've finished
952 * handling the file, -1 if no dest-linking occurred, or a non-negative
953 * value if we found an alternate basis file. */
954 static int try_dests_reg(struct file_struct *file, char *fname, int ndx,
955 char *cmpbuf, stat_x *sxp, int itemizing,
956 enum logcode code)
958 int best_match = -1;
959 int match_level = 0;
960 int j = 0;
962 do {
963 pathjoin(cmpbuf, MAXPATHLEN, basis_dir[j], fname);
964 if (link_stat(cmpbuf, &sxp->st, 0) < 0 || !S_ISREG(sxp->st.st_mode))
965 continue;
966 switch (match_level) {
967 case 0:
968 best_match = j;
969 match_level = 1;
970 /* FALL THROUGH */
971 case 1:
972 if (!unchanged_file(cmpbuf, file, &sxp->st))
973 continue;
974 best_match = j;
975 match_level = 2;
976 /* FALL THROUGH */
977 case 2:
978 if (!unchanged_attrs(cmpbuf, file, sxp))
979 continue;
980 best_match = j;
981 match_level = 3;
982 break;
984 break;
985 } while (basis_dir[++j] != NULL);
987 if (!match_level)
988 return -1;
990 if (j != best_match) {
991 j = best_match;
992 pathjoin(cmpbuf, MAXPATHLEN, basis_dir[j], fname);
993 if (link_stat(cmpbuf, &sxp->st, 0) < 0)
994 return -1;
997 if (match_level == 3 && !copy_dest) {
998 #ifdef SUPPORT_HARD_LINKS
999 if (link_dest) {
1000 if (!hard_link_one(file, fname, cmpbuf, 1))
1001 goto try_a_copy;
1002 if (preserve_hard_links && F_IS_HLINKED(file))
1003 finish_hard_link(file, fname, ndx, &sxp->st, itemizing, code, j);
1004 if (!maybe_ATTRS_REPORT && (verbose > 1 || stdout_format_has_i > 1)) {
1005 itemize(cmpbuf, file, ndx, 1, sxp,
1006 ITEM_LOCAL_CHANGE | ITEM_XNAME_FOLLOWS,
1007 0, "");
1009 } else
1010 #endif
1011 if (itemizing)
1012 itemize(cmpbuf, file, ndx, 0, sxp, 0, 0, NULL);
1013 if (verbose > 1 && maybe_ATTRS_REPORT)
1014 rprintf(FCLIENT, "%s is uptodate\n", fname);
1015 return -2;
1018 if (match_level >= 2) {
1019 #ifdef SUPPORT_HARD_LINKS
1020 try_a_copy: /* Copy the file locally. */
1021 #endif
1022 if (!dry_run && copy_altdest_file(cmpbuf, fname, file) < 0)
1023 return -1;
1024 if (itemizing)
1025 itemize(cmpbuf, file, ndx, 0, sxp, ITEM_LOCAL_CHANGE, 0, NULL);
1026 if (maybe_ATTRS_REPORT
1027 && ((!itemizing && verbose && match_level == 2)
1028 || (verbose > 1 && match_level == 3))) {
1029 code = match_level == 3 ? FCLIENT : FINFO;
1030 rprintf(code, "%s%s\n", fname,
1031 match_level == 3 ? " is uptodate" : "");
1033 #ifdef SUPPORT_HARD_LINKS
1034 if (preserve_hard_links && F_IS_HLINKED(file))
1035 finish_hard_link(file, fname, ndx, &sxp->st, itemizing, code, -1);
1036 #endif
1037 return -2;
1040 return FNAMECMP_BASIS_DIR_LOW + j;
1043 /* This is only called for non-regular files. We return -2 if we've finished
1044 * handling the file, or -1 if no dest-linking occurred, or a non-negative
1045 * value if we found an alternate basis file. */
1046 static int try_dests_non(struct file_struct *file, char *fname, int ndx,
1047 char *cmpbuf, stat_x *sxp, int itemizing,
1048 enum logcode code)
1050 char lnk[MAXPATHLEN];
1051 int best_match = -1;
1052 int match_level = 0;
1053 enum nonregtype type;
1054 uint32 *devp;
1055 int len, j = 0;
1057 #ifndef SUPPORT_LINKS
1058 if (S_ISLNK(file->mode))
1059 return -1;
1060 #endif
1061 if (S_ISDIR(file->mode)) {
1062 type = TYPE_DIR;
1063 } else if (IS_SPECIAL(file->mode))
1064 type = TYPE_SPECIAL;
1065 else if (IS_DEVICE(file->mode))
1066 type = TYPE_DEVICE;
1067 #ifdef SUPPORT_LINKS
1068 else if (S_ISLNK(file->mode))
1069 type = TYPE_SYMLINK;
1070 #endif
1071 else {
1072 rprintf(FERROR,
1073 "internal: try_dests_non() called with invalid mode (%o)\n",
1074 (int)file->mode);
1075 exit_cleanup(RERR_UNSUPPORTED);
1078 do {
1079 pathjoin(cmpbuf, MAXPATHLEN, basis_dir[j], fname);
1080 if (link_stat(cmpbuf, &sxp->st, 0) < 0)
1081 continue;
1082 switch (type) {
1083 case TYPE_DIR:
1084 if (!S_ISDIR(sxp->st.st_mode))
1085 continue;
1086 break;
1087 case TYPE_SPECIAL:
1088 if (!IS_SPECIAL(sxp->st.st_mode))
1089 continue;
1090 break;
1091 case TYPE_DEVICE:
1092 if (!IS_DEVICE(sxp->st.st_mode))
1093 continue;
1094 break;
1095 #ifdef SUPPORT_LINKS
1096 case TYPE_SYMLINK:
1097 if (!S_ISLNK(sxp->st.st_mode))
1098 continue;
1099 break;
1100 #endif
1102 if (match_level < 1) {
1103 match_level = 1;
1104 best_match = j;
1106 switch (type) {
1107 case TYPE_DIR:
1108 break;
1109 case TYPE_SPECIAL:
1110 case TYPE_DEVICE:
1111 devp = F_RDEV_P(file);
1112 if (sxp->st.st_rdev != MAKEDEV(DEV_MAJOR(devp), DEV_MINOR(devp)))
1113 continue;
1114 break;
1115 #ifdef SUPPORT_LINKS
1116 case TYPE_SYMLINK:
1117 if ((len = readlink(cmpbuf, lnk, MAXPATHLEN-1)) <= 0)
1118 continue;
1119 lnk[len] = '\0';
1120 if (strcmp(lnk, F_SYMLINK(file)) != 0)
1121 continue;
1122 break;
1123 #endif
1125 if (match_level < 2) {
1126 match_level = 2;
1127 best_match = j;
1129 if (unchanged_attrs(cmpbuf, file, sxp)) {
1130 match_level = 3;
1131 best_match = j;
1132 break;
1134 } while (basis_dir[++j] != NULL);
1136 if (!match_level)
1137 return -1;
1139 if (j != best_match) {
1140 j = best_match;
1141 pathjoin(cmpbuf, MAXPATHLEN, basis_dir[j], fname);
1142 if (link_stat(cmpbuf, &sxp->st, 0) < 0)
1143 return -1;
1146 if (match_level == 3) {
1147 #ifdef SUPPORT_HARD_LINKS
1148 if (link_dest
1149 #ifndef CAN_HARDLINK_SYMLINK
1150 && !S_ISLNK(file->mode)
1151 #endif
1152 #ifndef CAN_HARDLINK_SPECIAL
1153 && !IS_SPECIAL(file->mode) && !IS_DEVICE(file->mode)
1154 #endif
1155 && !S_ISDIR(file->mode)) {
1156 if (do_link(cmpbuf, fname) < 0) {
1157 rsyserr(FERROR_XFER, errno,
1158 "failed to hard-link %s with %s",
1159 cmpbuf, fname);
1160 return j;
1162 if (preserve_hard_links && F_IS_HLINKED(file))
1163 finish_hard_link(file, fname, ndx, NULL, itemizing, code, -1);
1164 } else
1165 #endif
1166 match_level = 2;
1167 if (itemizing && stdout_format_has_i
1168 && (verbose > 1 || stdout_format_has_i > 1)) {
1169 int chg = compare_dest && type != TYPE_DIR ? 0
1170 : ITEM_LOCAL_CHANGE + (match_level == 3 ? ITEM_XNAME_FOLLOWS : 0);
1171 char *lp = match_level == 3 ? "" : NULL;
1172 itemize(cmpbuf, file, ndx, 0, sxp, chg + ITEM_MATCHED, 0, lp);
1174 if (verbose > 1 && maybe_ATTRS_REPORT) {
1175 rprintf(FCLIENT, "%s%s is uptodate\n",
1176 fname, type == TYPE_DIR ? "/" : "");
1178 return -2;
1181 return j;
1184 static void list_file_entry(struct file_struct *f)
1186 char permbuf[PERMSTRING_SIZE];
1187 double len;
1189 if (!F_IS_ACTIVE(f)) {
1190 /* this can happen if duplicate names were removed */
1191 return;
1194 permstring(permbuf, f->mode);
1195 len = F_LENGTH(f);
1197 /* TODO: indicate '+' if the entry has an ACL. */
1199 #ifdef SUPPORT_LINKS
1200 if (preserve_links && S_ISLNK(f->mode)) {
1201 rprintf(FINFO, "%s %11.0f %s %s -> %s\n",
1202 permbuf, len, timestring(f->modtime),
1203 f_name(f, NULL), F_SYMLINK(f));
1204 } else
1205 #endif
1207 rprintf(FINFO, "%s %11.0f %s %s\n",
1208 permbuf, len, timestring(f->modtime),
1209 f_name(f, NULL));
1213 static int phase = 0;
1214 static int dflt_perms;
1216 /* Acts on the indicated item in cur_flist whose name is fname. If a dir,
1217 * make sure it exists, and has the right permissions/timestamp info. For
1218 * all other non-regular files (symlinks, etc.) we create them here. For
1219 * regular files that have changed, we try to find a basis file and then
1220 * start sending checksums. The ndx is the file's unique index value.
1222 * The fname parameter must point to a MAXPATHLEN buffer! (e.g it gets
1223 * passed to delete_item(), which can use it during a recursive delete.)
1225 * Note that f_out is set to -1 when doing final directory-permission and
1226 * modification-time repair. */
1227 static void recv_generator(char *fname, struct file_struct *file, int ndx,
1228 int itemizing, enum logcode code, int f_out)
1230 static int missing_below = -1, excluded_below = -1;
1231 static const char *parent_dirname = "";
1232 static struct file_struct *missing_dir = NULL, *excluded_dir = NULL;
1233 static struct file_list *fuzzy_dirlist = NULL;
1234 static int need_fuzzy_dirlist = 0;
1235 struct file_struct *fuzzy_file = NULL;
1236 int fd = -1, f_copy = -1;
1237 stat_x sx, real_sx;
1238 STRUCT_STAT partial_st;
1239 struct file_struct *back_file = NULL;
1240 int statret, real_ret, stat_errno;
1241 char *fnamecmp, *partialptr, *backupptr = NULL;
1242 char fnamecmpbuf[MAXPATHLEN];
1243 uchar fnamecmp_type;
1244 int implied_dirs_are_missing = relative_paths && !implied_dirs && protocol_version < 30;
1245 int del_opts = delete_mode || force_delete ? DEL_RECURSE : 0;
1246 int is_dir = !S_ISDIR(file->mode) ? 0
1247 : inc_recurse && ndx != cur_flist->ndx_start - 1 ? -1
1248 : 1;
1250 if (verbose > 2)
1251 rprintf(FINFO, "recv_generator(%s,%d)\n", fname, ndx);
1253 if (list_only) {
1254 if (is_dir < 0
1255 || (is_dir && !implied_dirs && file->flags & FLAG_IMPLIED_DIR))
1256 return;
1257 list_file_entry(file);
1258 return;
1261 if (server_filter_list.head) {
1262 int filtered = check_filter(&server_filter_list, fname, is_dir) < 0;
1263 if (is_dir < 0 && filtered)
1264 return;
1265 if (excluded_below >= 0) {
1266 if (F_DEPTH(file) > excluded_below
1267 && (!implied_dirs_are_missing || f_name_has_prefix(file, excluded_dir)))
1268 goto skipping;
1269 excluded_below = -1;
1271 if (filtered) {
1272 if (is_dir) {
1273 excluded_below = F_DEPTH(file);
1274 excluded_dir = file;
1276 skipping:
1277 #ifdef SUPPORT_HARD_LINKS
1278 if (F_IS_HLINKED(file))
1279 handle_skipped_hlink(file, itemizing, code, f_out);
1280 #endif
1281 rprintf(FERROR_XFER,
1282 "skipping daemon-excluded file \"%s\"\n",
1283 fname);
1284 return;
1288 if (missing_below >= 0) {
1289 if (F_DEPTH(file) <= missing_below
1290 || (implied_dirs_are_missing && !f_name_has_prefix(file, missing_dir))) {
1291 if (dry_run)
1292 dry_run--;
1293 missing_below = -1;
1294 } else if (!dry_run) {
1295 if (is_dir)
1296 file->flags |= FLAG_MISSING_DIR;
1297 #ifdef SUPPORT_HARD_LINKS
1298 if (F_IS_HLINKED(file))
1299 handle_skipped_hlink(file, itemizing, code, f_out);
1300 #endif
1301 return;
1304 #ifdef SUPPORT_ACLS
1305 sx.acc_acl = sx.def_acl = NULL;
1306 #endif
1307 #ifdef SUPPORT_XATTRS
1308 sx.xattr = NULL;
1309 #endif
1310 if (dry_run > 1) {
1311 if (fuzzy_dirlist) {
1312 flist_free(fuzzy_dirlist);
1313 fuzzy_dirlist = NULL;
1315 parent_dirname = "";
1316 statret = -1;
1317 stat_errno = ENOENT;
1318 } else {
1319 const char *dn = file->dirname ? file->dirname : ".";
1320 if (parent_dirname != dn && strcmp(parent_dirname, dn) != 0) {
1321 if (relative_paths && !implied_dirs
1322 && do_stat(dn, &sx.st) < 0
1323 && create_directory_path(fname) < 0) {
1324 rsyserr(FERROR_XFER, errno,
1325 "recv_generator: mkdir %s failed",
1326 full_fname(dn));
1328 if (fuzzy_dirlist) {
1329 flist_free(fuzzy_dirlist);
1330 fuzzy_dirlist = NULL;
1332 if (fuzzy_basis)
1333 need_fuzzy_dirlist = 1;
1334 #ifdef SUPPORT_ACLS
1335 if (!preserve_perms)
1336 dflt_perms = default_perms_for_dir(dn);
1337 #endif
1339 parent_dirname = dn;
1341 if (need_fuzzy_dirlist && S_ISREG(file->mode)) {
1342 strlcpy(fnamecmpbuf, dn, sizeof fnamecmpbuf);
1343 fuzzy_dirlist = get_dirlist(fnamecmpbuf, -1, 1);
1344 need_fuzzy_dirlist = 0;
1347 statret = link_stat(fname, &sx.st, keep_dirlinks && is_dir);
1348 stat_errno = errno;
1351 if (ignore_non_existing > 0 && statret == -1 && stat_errno == ENOENT) {
1352 if (is_dir) {
1353 if (is_dir < 0)
1354 return;
1355 if (missing_below < 0) {
1356 if (dry_run)
1357 dry_run++;
1358 missing_below = F_DEPTH(file);
1359 missing_dir = file;
1361 file->flags |= FLAG_MISSING_DIR;
1363 #ifdef SUPPORT_HARD_LINKS
1364 else if (F_IS_HLINKED(file))
1365 handle_skipped_hlink(file, itemizing, code, f_out);
1366 #endif
1367 if (verbose > 1) {
1368 rprintf(FINFO, "not creating new %s \"%s\"\n",
1369 is_dir ? "directory" : "file", fname);
1371 return;
1374 if (statret == 0 && !(sx.st.st_mode & S_IWUSR)
1375 && !am_root && sx.st.st_uid == our_uid)
1376 del_opts |= DEL_NO_UID_WRITE;
1378 if (ignore_existing > 0 && statret == 0
1379 && (!is_dir || !S_ISDIR(sx.st.st_mode))) {
1380 if (verbose > 1 && is_dir >= 0)
1381 rprintf(FINFO, "%s exists\n", fname);
1382 #ifdef SUPPORT_HARD_LINKS
1383 if (F_IS_HLINKED(file))
1384 handle_skipped_hlink(file, itemizing, code, f_out);
1385 #endif
1386 goto cleanup;
1389 if (is_dir) {
1390 if (!implied_dirs && file->flags & FLAG_IMPLIED_DIR)
1391 goto cleanup;
1392 if (is_dir < 0) {
1393 /* In inc_recurse mode we want to make sure any missing
1394 * directories get created while we're still processing
1395 * the parent dir (which allows us to touch the parent
1396 * dir's mtime right away). We will handle the dir in
1397 * full later (right before we handle its contents). */
1398 if (statret == 0
1399 && (S_ISDIR(sx.st.st_mode)
1400 || delete_item(fname, sx.st.st_mode, del_opts | DEL_FOR_DIR) != 0))
1401 goto cleanup; /* Any errors get reported later. */
1402 if (do_mkdir(fname, file->mode & 0700) == 0)
1403 file->flags |= FLAG_DIR_CREATED;
1404 goto cleanup;
1406 /* The file to be received is a directory, so we need
1407 * to prepare appropriately. If there is already a
1408 * file of that name and it is *not* a directory, then
1409 * we need to delete it. If it doesn't exist, then
1410 * (perhaps recursively) create it. */
1411 if (statret == 0 && !S_ISDIR(sx.st.st_mode)) {
1412 if (delete_item(fname, sx.st.st_mode, del_opts | DEL_FOR_DIR) != 0)
1413 goto skipping_dir_contents;
1414 statret = -1;
1416 if (dry_run && statret != 0 && missing_below < 0) {
1417 missing_below = F_DEPTH(file);
1418 missing_dir = file;
1419 dry_run++;
1421 real_ret = statret;
1422 real_sx = sx;
1423 if (file->flags & FLAG_DIR_CREATED)
1424 statret = -1;
1425 if (!preserve_perms) { /* See comment in non-dir code below. */
1426 file->mode = dest_mode(file->mode, sx.st.st_mode,
1427 dflt_perms, statret == 0);
1429 if (statret != 0 && basis_dir[0] != NULL) {
1430 int j = try_dests_non(file, fname, ndx, fnamecmpbuf, &sx,
1431 itemizing, code);
1432 if (j == -2) {
1433 itemizing = 0;
1434 code = FNONE;
1435 } else if (j >= 0)
1436 statret = 1;
1438 if (itemizing && f_out != -1) {
1439 itemize(fname, file, ndx, statret, &sx,
1440 statret ? ITEM_LOCAL_CHANGE : 0, 0, NULL);
1442 if (real_ret != 0 && do_mkdir(fname,file->mode) < 0 && errno != EEXIST) {
1443 if (!relative_paths || errno != ENOENT
1444 || create_directory_path(fname) < 0
1445 || (do_mkdir(fname, file->mode) < 0 && errno != EEXIST)) {
1446 rsyserr(FERROR_XFER, errno,
1447 "recv_generator: mkdir %s failed",
1448 full_fname(fname));
1449 skipping_dir_contents:
1450 rprintf(FERROR,
1451 "*** Skipping any contents from this failed directory ***\n");
1452 missing_below = F_DEPTH(file);
1453 missing_dir = file;
1454 file->flags |= FLAG_MISSING_DIR;
1455 goto cleanup;
1458 if (set_file_attrs(fname, file, real_ret ? NULL : &real_sx, NULL, 0)
1459 && verbose && code != FNONE && f_out != -1)
1460 rprintf(code, "%s/\n", fname);
1462 /* We need to ensure that the dirs in the transfer have writable
1463 * permissions during the time we are putting files within them.
1464 * This is then fixed after the transfer is done. */
1465 #ifdef HAVE_CHMOD
1466 if (!am_root && !(file->mode & S_IWUSR) && dir_tweaking) {
1467 mode_t mode = file->mode | S_IWUSR;
1468 if (do_chmod(fname, mode) < 0) {
1469 rsyserr(FERROR_XFER, errno,
1470 "failed to modify permissions on %s",
1471 full_fname(fname));
1473 need_retouch_dir_perms = 1;
1475 #endif
1477 if (real_ret != 0 && one_file_system)
1478 real_sx.st.st_dev = filesystem_dev;
1479 if (inc_recurse) {
1480 if (one_file_system) {
1481 uint32 *devp = F_DIR_DEV_P(file);
1482 DEV_MAJOR(devp) = major(real_sx.st.st_dev);
1483 DEV_MINOR(devp) = minor(real_sx.st.st_dev);
1486 else if (delete_during && f_out != -1 && !phase && dry_run < 2
1487 && (file->flags & FLAG_CONTENT_DIR))
1488 delete_in_dir(fname, file, &real_sx.st.st_dev);
1489 goto cleanup;
1492 /* If we're not preserving permissions, change the file-list's
1493 * mode based on the local permissions and some heuristics. */
1494 if (!preserve_perms) {
1495 int exists = statret == 0 && !S_ISDIR(sx.st.st_mode);
1496 file->mode = dest_mode(file->mode, sx.st.st_mode, dflt_perms,
1497 exists);
1500 #ifdef SUPPORT_HARD_LINKS
1501 if (preserve_hard_links && F_HLINK_NOT_FIRST(file)
1502 && hard_link_check(file, ndx, fname, statret, &sx, itemizing, code))
1503 goto cleanup;
1504 #endif
1506 if (preserve_links && S_ISLNK(file->mode)) {
1507 #ifdef SUPPORT_LINKS
1508 const char *sl = F_SYMLINK(file);
1509 if (safe_symlinks && unsafe_symlink(sl, fname)) {
1510 if (verbose) {
1511 if (solo_file)
1512 fname = f_name(file, NULL);
1513 rprintf(FINFO,
1514 "ignoring unsafe symlink %s -> \"%s\"\n",
1515 full_fname(fname), sl);
1517 return;
1519 if (statret == 0) {
1520 char lnk[MAXPATHLEN];
1521 int len;
1523 if (!S_ISLNK(sx.st.st_mode))
1524 statret = -1;
1525 else if ((len = readlink(fname, lnk, MAXPATHLEN-1)) > 0
1526 && strncmp(lnk, sl, len) == 0 && sl[len] == '\0') {
1527 /* The link is pointing to the right place. */
1528 set_file_attrs(fname, file, &sx, NULL, maybe_ATTRS_REPORT);
1529 if (itemizing)
1530 itemize(fname, file, ndx, 0, &sx, 0, 0, NULL);
1531 #if defined SUPPORT_HARD_LINKS && defined CAN_HARDLINK_SYMLINK
1532 if (preserve_hard_links && F_IS_HLINKED(file))
1533 finish_hard_link(file, fname, ndx, &sx.st, itemizing, code, -1);
1534 #endif
1535 if (remove_source_files == 1)
1536 goto return_with_success;
1537 goto cleanup;
1539 /* Not the right symlink (or not a symlink), so
1540 * delete it. */
1541 if (delete_item(fname, sx.st.st_mode, del_opts | DEL_FOR_SYMLINK) != 0)
1542 goto cleanup;
1543 } else if (basis_dir[0] != NULL) {
1544 int j = try_dests_non(file, fname, ndx, fnamecmpbuf, &sx,
1545 itemizing, code);
1546 if (j == -2) {
1547 #ifndef CAN_HARDLINK_SYMLINK
1548 if (link_dest) {
1549 /* Resort to --copy-dest behavior. */
1550 } else
1551 #endif
1552 if (!copy_dest)
1553 goto cleanup;
1554 itemizing = 0;
1555 code = FNONE;
1556 } else if (j >= 0)
1557 statret = 1;
1559 #ifdef SUPPORT_HARD_LINKS
1560 if (preserve_hard_links && F_HLINK_NOT_LAST(file)) {
1561 cur_flist->in_progress++;
1562 goto cleanup;
1564 #endif
1565 if (do_symlink(sl, fname) != 0) {
1566 rsyserr(FERROR_XFER, errno, "symlink %s -> \"%s\" failed",
1567 full_fname(fname), sl);
1568 } else {
1569 set_file_attrs(fname, file, NULL, NULL, 0);
1570 if (itemizing) {
1571 itemize(fname, file, ndx, statret, &sx,
1572 ITEM_LOCAL_CHANGE|ITEM_REPORT_CHANGE, 0, NULL);
1574 if (code != FNONE && verbose)
1575 rprintf(code, "%s -> %s\n", fname, sl);
1576 #ifdef SUPPORT_HARD_LINKS
1577 if (preserve_hard_links && F_IS_HLINKED(file))
1578 finish_hard_link(file, fname, ndx, NULL, itemizing, code, -1);
1579 #endif
1580 /* This does not check remove_source_files == 1
1581 * because this is one of the items that the old
1582 * --remove-sent-files option would remove. */
1583 if (remove_source_files)
1584 goto return_with_success;
1586 #endif
1587 goto cleanup;
1590 if ((am_root && preserve_devices && IS_DEVICE(file->mode))
1591 || (preserve_specials && IS_SPECIAL(file->mode))) {
1592 uint32 *devp = F_RDEV_P(file);
1593 dev_t rdev = MAKEDEV(DEV_MAJOR(devp), DEV_MINOR(devp));
1594 if (statret == 0) {
1595 int del_for_flag;
1596 if (IS_DEVICE(file->mode)) {
1597 if (!IS_DEVICE(sx.st.st_mode))
1598 statret = -1;
1599 del_for_flag = DEL_FOR_DEVICE;
1600 } else {
1601 if (!IS_SPECIAL(sx.st.st_mode))
1602 statret = -1;
1603 del_for_flag = DEL_FOR_SPECIAL;
1605 if (statret == 0
1606 && BITS_EQUAL(sx.st.st_mode, file->mode, _S_IFMT)
1607 && sx.st.st_rdev == rdev) {
1608 /* The device or special file is identical. */
1609 set_file_attrs(fname, file, &sx, NULL, maybe_ATTRS_REPORT);
1610 if (itemizing)
1611 itemize(fname, file, ndx, 0, &sx, 0, 0, NULL);
1612 #ifdef SUPPORT_HARD_LINKS
1613 if (preserve_hard_links && F_IS_HLINKED(file))
1614 finish_hard_link(file, fname, ndx, &sx.st, itemizing, code, -1);
1615 #endif
1616 if (remove_source_files == 1)
1617 goto return_with_success;
1618 goto cleanup;
1620 if (delete_item(fname, sx.st.st_mode, del_opts | del_for_flag) != 0)
1621 goto cleanup;
1622 } else if (basis_dir[0] != NULL) {
1623 int j = try_dests_non(file, fname, ndx, fnamecmpbuf, &sx,
1624 itemizing, code);
1625 if (j == -2) {
1626 #ifndef CAN_HARDLINK_SPECIAL
1627 if (link_dest) {
1628 /* Resort to --copy-dest behavior. */
1629 } else
1630 #endif
1631 if (!copy_dest)
1632 goto cleanup;
1633 itemizing = 0;
1634 code = FNONE;
1635 } else if (j >= 0)
1636 statret = 1;
1638 #ifdef SUPPORT_HARD_LINKS
1639 if (preserve_hard_links && F_HLINK_NOT_LAST(file)) {
1640 cur_flist->in_progress++;
1641 goto cleanup;
1643 #endif
1644 if (verbose > 2) {
1645 rprintf(FINFO, "mknod(%s, 0%o, [%ld,%ld])\n",
1646 fname, (int)file->mode,
1647 (long)major(rdev), (long)minor(rdev));
1649 if (do_mknod(fname, file->mode, rdev) < 0) {
1650 rsyserr(FERROR_XFER, errno, "mknod %s failed",
1651 full_fname(fname));
1652 } else {
1653 set_file_attrs(fname, file, NULL, NULL, 0);
1654 if (itemizing) {
1655 itemize(fname, file, ndx, statret, &sx,
1656 ITEM_LOCAL_CHANGE|ITEM_REPORT_CHANGE, 0, NULL);
1658 if (code != FNONE && verbose)
1659 rprintf(code, "%s\n", fname);
1660 #ifdef SUPPORT_HARD_LINKS
1661 if (preserve_hard_links && F_IS_HLINKED(file))
1662 finish_hard_link(file, fname, ndx, NULL, itemizing, code, -1);
1663 #endif
1664 if (remove_source_files == 1)
1665 goto return_with_success;
1667 goto cleanup;
1670 if (!S_ISREG(file->mode)) {
1671 if (solo_file)
1672 fname = f_name(file, NULL);
1673 rprintf(FINFO, "skipping non-regular file \"%s\"\n", fname);
1674 goto cleanup;
1677 if (max_size > 0 && F_LENGTH(file) > max_size) {
1678 if (verbose > 1) {
1679 if (solo_file)
1680 fname = f_name(file, NULL);
1681 rprintf(FINFO, "%s is over max-size\n", fname);
1683 goto cleanup;
1685 if (min_size > 0 && F_LENGTH(file) < min_size) {
1686 if (verbose > 1) {
1687 if (solo_file)
1688 fname = f_name(file, NULL);
1689 rprintf(FINFO, "%s is under min-size\n", fname);
1691 goto cleanup;
1694 if (update_only > 0 && statret == 0
1695 && cmp_time(sx.st.st_mtime, file->modtime) > 0) {
1696 if (verbose > 1)
1697 rprintf(FINFO, "%s is newer\n", fname);
1698 #ifdef SUPPORT_HARD_LINKS
1699 if (F_IS_HLINKED(file))
1700 handle_skipped_hlink(file, itemizing, code, f_out);
1701 #endif
1702 goto cleanup;
1705 fnamecmp = fname;
1706 fnamecmp_type = FNAMECMP_FNAME;
1708 if (statret == 0 && !S_ISREG(sx.st.st_mode)) {
1709 if (delete_item(fname, sx.st.st_mode, del_opts | DEL_FOR_FILE) != 0)
1710 goto cleanup;
1711 statret = -1;
1712 stat_errno = ENOENT;
1715 if (statret != 0 && basis_dir[0] != NULL) {
1716 int j = try_dests_reg(file, fname, ndx, fnamecmpbuf, &sx,
1717 itemizing, code);
1718 if (j == -2) {
1719 if (remove_source_files == 1)
1720 goto return_with_success;
1721 goto cleanup;
1723 if (j >= 0) {
1724 fnamecmp = fnamecmpbuf;
1725 fnamecmp_type = j;
1726 statret = 0;
1730 real_ret = statret;
1731 real_sx = sx;
1733 if (partial_dir && (partialptr = partial_dir_fname(fname)) != NULL
1734 && link_stat(partialptr, &partial_st, 0) == 0
1735 && S_ISREG(partial_st.st_mode)) {
1736 if (statret != 0)
1737 goto prepare_to_open;
1738 } else
1739 partialptr = NULL;
1741 if (statret != 0 && fuzzy_dirlist && dry_run <= 1) {
1742 int j = find_fuzzy(file, fuzzy_dirlist);
1743 if (j >= 0) {
1744 fuzzy_file = fuzzy_dirlist->files[j];
1745 f_name(fuzzy_file, fnamecmpbuf);
1746 if (verbose > 2) {
1747 rprintf(FINFO, "fuzzy basis selected for %s: %s\n",
1748 fname, fnamecmpbuf);
1750 sx.st.st_size = F_LENGTH(fuzzy_file);
1751 statret = 0;
1752 fnamecmp = fnamecmpbuf;
1753 fnamecmp_type = FNAMECMP_FUZZY;
1757 if (statret != 0) {
1758 #ifdef SUPPORT_HARD_LINKS
1759 if (preserve_hard_links && F_HLINK_NOT_LAST(file)) {
1760 cur_flist->in_progress++;
1761 goto cleanup;
1763 #endif
1764 if (stat_errno == ENOENT)
1765 goto notify_others;
1766 rsyserr(FERROR_XFER, stat_errno, "recv_generator: failed to stat %s",
1767 full_fname(fname));
1768 goto cleanup;
1771 if (fnamecmp_type <= FNAMECMP_BASIS_DIR_HIGH)
1773 else if (fnamecmp_type == FNAMECMP_FUZZY)
1775 else if (unchanged_file(fnamecmp, file, &sx.st)) {
1776 if (partialptr) {
1777 do_unlink(partialptr);
1778 handle_partial_dir(partialptr, PDIR_DELETE);
1780 set_file_attrs(fname, file, &sx, NULL, maybe_ATTRS_REPORT);
1781 if (itemizing)
1782 itemize(fnamecmp, file, ndx, statret, &sx, 0, 0, NULL);
1783 #ifdef SUPPORT_HARD_LINKS
1784 if (preserve_hard_links && F_IS_HLINKED(file))
1785 finish_hard_link(file, fname, ndx, &sx.st, itemizing, code, -1);
1786 #endif
1787 if (remove_source_files != 1)
1788 goto cleanup;
1789 return_with_success:
1790 if (!dry_run)
1791 send_msg_int(MSG_SUCCESS, ndx);
1792 goto cleanup;
1795 if (append_mode > 0 && sx.st.st_size >= F_LENGTH(file)) {
1796 #ifdef SUPPORT_HARD_LINKS
1797 if (F_IS_HLINKED(file))
1798 handle_skipped_hlink(file, itemizing, code, f_out);
1799 #endif
1800 goto cleanup;
1803 prepare_to_open:
1804 if (partialptr) {
1805 sx.st = partial_st;
1806 fnamecmp = partialptr;
1807 fnamecmp_type = FNAMECMP_PARTIAL_DIR;
1808 statret = 0;
1811 if (!do_xfers)
1812 goto notify_others;
1814 if (read_batch || whole_file) {
1815 if (inplace && make_backups > 0 && fnamecmp_type == FNAMECMP_FNAME) {
1816 if (!(backupptr = get_backup_name(fname)))
1817 goto cleanup;
1818 if (!(back_file = make_file(fname, NULL, NULL, 0, NO_FILTERS)))
1819 goto pretend_missing;
1820 if (copy_file(fname, backupptr, -1, back_file->mode, 1) < 0) {
1821 unmake_file(back_file);
1822 back_file = NULL;
1823 goto cleanup;
1826 goto notify_others;
1829 if (fuzzy_dirlist) {
1830 int j = flist_find(fuzzy_dirlist, file);
1831 if (j >= 0) /* don't use changing file as future fuzzy basis */
1832 fuzzy_dirlist->files[j]->flags |= FLAG_FILE_SENT;
1835 /* open the file */
1836 if ((fd = do_open(fnamecmp, O_RDONLY, 0)) < 0) {
1837 rsyserr(FERROR, errno, "failed to open %s, continuing",
1838 full_fname(fnamecmp));
1839 pretend_missing:
1840 /* pretend the file didn't exist */
1841 #ifdef SUPPORT_HARD_LINKS
1842 if (preserve_hard_links && F_HLINK_NOT_LAST(file)) {
1843 cur_flist->in_progress++;
1844 goto cleanup;
1846 #endif
1847 statret = real_ret = -1;
1848 goto notify_others;
1851 if (inplace && make_backups > 0 && fnamecmp_type == FNAMECMP_FNAME) {
1852 if (!(backupptr = get_backup_name(fname))) {
1853 close(fd);
1854 goto cleanup;
1856 if (!(back_file = make_file(fname, NULL, NULL, 0, NO_FILTERS))) {
1857 close(fd);
1858 goto pretend_missing;
1860 if (robust_unlink(backupptr) && errno != ENOENT) {
1861 rsyserr(FERROR_XFER, errno, "unlink %s",
1862 full_fname(backupptr));
1863 unmake_file(back_file);
1864 back_file = NULL;
1865 close(fd);
1866 goto cleanup;
1868 if ((f_copy = do_open(backupptr, O_WRONLY | O_CREAT | O_TRUNC | O_EXCL, 0600)) < 0
1869 && (errno != ENOENT || make_bak_dir(backupptr) < 0
1870 || (f_copy = do_open(backupptr, O_WRONLY | O_CREAT | O_TRUNC | O_EXCL, 0600)) < 0)) {
1871 rsyserr(FERROR_XFER, errno, "open %s",
1872 full_fname(backupptr));
1873 unmake_file(back_file);
1874 back_file = NULL;
1875 close(fd);
1876 goto cleanup;
1878 fnamecmp_type = FNAMECMP_BACKUP;
1881 if (verbose > 3) {
1882 rprintf(FINFO, "gen mapped %s of size %.0f\n",
1883 fnamecmp, (double)sx.st.st_size);
1886 if (verbose > 2)
1887 rprintf(FINFO, "generating and sending sums for %d\n", ndx);
1889 notify_others:
1890 if (remove_source_files && !delay_updates && !phase && !dry_run)
1891 increment_active_files(ndx, itemizing, code);
1892 if (inc_recurse && !dry_run)
1893 cur_flist->in_progress++;
1894 #ifdef SUPPORT_HARD_LINKS
1895 if (preserve_hard_links && F_IS_HLINKED(file))
1896 file->flags |= FLAG_FILE_SENT;
1897 #endif
1898 write_ndx(f_out, ndx);
1899 if (itemizing) {
1900 int iflags = ITEM_TRANSFER;
1901 if (always_checksum > 0)
1902 iflags |= ITEM_REPORT_CHANGE;
1903 if (fnamecmp_type != FNAMECMP_FNAME)
1904 iflags |= ITEM_BASIS_TYPE_FOLLOWS;
1905 if (fnamecmp_type == FNAMECMP_FUZZY)
1906 iflags |= ITEM_XNAME_FOLLOWS;
1907 itemize(fnamecmp, file, -1, real_ret, &real_sx, iflags, fnamecmp_type,
1908 fuzzy_file ? fuzzy_file->basename : NULL);
1909 #ifdef SUPPORT_ACLS
1910 if (preserve_acls)
1911 free_acl(&real_sx);
1912 #endif
1913 #ifdef SUPPORT_XATTRS
1914 if (preserve_xattrs)
1915 free_xattr(&real_sx);
1916 #endif
1919 if (!do_xfers) {
1920 #ifdef SUPPORT_HARD_LINKS
1921 if (preserve_hard_links && F_IS_HLINKED(file))
1922 finish_hard_link(file, fname, ndx, &sx.st, itemizing, code, -1);
1923 #endif
1924 goto cleanup;
1926 if (read_batch)
1927 goto cleanup;
1929 if (statret != 0 || whole_file)
1930 write_sum_head(f_out, NULL);
1931 else {
1932 generate_and_send_sums(fd, sx.st.st_size, f_out, f_copy);
1933 close(fd);
1936 cleanup:
1937 if (back_file) {
1938 if (f_copy >= 0)
1939 close(f_copy);
1940 set_file_attrs(backupptr, back_file, NULL, NULL, 0);
1941 if (verbose > 1) {
1942 rprintf(FINFO, "backed up %s to %s\n",
1943 fname, backupptr);
1945 unmake_file(back_file);
1948 #ifdef SUPPORT_ACLS
1949 if (preserve_acls)
1950 free_acl(&sx);
1951 #endif
1952 #ifdef SUPPORT_XATTRS
1953 if (preserve_xattrs)
1954 free_xattr(&sx);
1955 #endif
1956 return;
1959 #ifdef SUPPORT_HARD_LINKS
1960 static void handle_skipped_hlink(struct file_struct *file, int itemizing,
1961 enum logcode code, int f_out)
1963 char fbuf[MAXPATHLEN];
1964 int new_last_ndx;
1965 struct file_list *save_flist = cur_flist;
1967 /* If we skip the last item in a chain of links and there was a
1968 * prior non-skipped hard-link waiting to finish, finish it now. */
1969 if ((new_last_ndx = skip_hard_link(file, &cur_flist)) < 0)
1970 return;
1972 file = cur_flist->files[new_last_ndx - cur_flist->ndx_start];
1973 cur_flist->in_progress--; /* undo prior increment */
1974 f_name(file, fbuf);
1975 recv_generator(fbuf, file, new_last_ndx, itemizing, code, f_out);
1977 cur_flist = save_flist;
1979 #endif
1981 static void touch_up_dirs(struct file_list *flist, int ndx)
1983 static int counter = 0;
1984 struct file_struct *file;
1985 char *fname;
1986 int i, start, end;
1988 if (ndx < 0) {
1989 start = 0;
1990 end = flist->used - 1;
1991 } else
1992 start = end = ndx;
1994 /* Fix any directory permissions that were modified during the
1995 * transfer and/or re-set any tweaked modified-time values. */
1996 for (i = start; i <= end; i++, counter++) {
1997 file = flist->files[i];
1998 if (!S_ISDIR(file->mode)
1999 || (!implied_dirs && file->flags & FLAG_IMPLIED_DIR))
2000 continue;
2001 if (verbose > 3) {
2002 fname = f_name(file, NULL);
2003 rprintf(FINFO, "touch_up_dirs: %s (%d)\n",
2004 NS(fname), i);
2006 if (!F_IS_ACTIVE(file) || file->flags & FLAG_MISSING_DIR
2007 || (!need_retouch_dir_times && file->mode & S_IWUSR))
2008 continue;
2009 fname = f_name(file, NULL);
2010 if (!(file->mode & S_IWUSR))
2011 do_chmod(fname, file->mode);
2012 if (need_retouch_dir_times) {
2013 STRUCT_STAT st;
2014 if (link_stat(fname, &st, 0) == 0
2015 && cmp_time(st.st_mtime, file->modtime) != 0)
2016 set_modtime(fname, file->modtime, file->mode);
2018 if (allowed_lull && !(counter % lull_mod))
2019 maybe_send_keepalive();
2020 else if (!(counter & 0xFF))
2021 maybe_flush_socket(0);
2025 void check_for_finished_files(int itemizing, enum logcode code, int check_redo)
2027 struct file_struct *file;
2028 struct file_list *flist;
2029 char fbuf[MAXPATHLEN];
2030 int ndx;
2032 while (1) {
2033 #ifdef SUPPORT_HARD_LINKS
2034 if (preserve_hard_links && (ndx = get_hlink_num()) != -1) {
2035 flist = flist_for_ndx(ndx);
2036 assert(flist != NULL);
2037 file = flist->files[ndx - flist->ndx_start];
2038 assert(file->flags & FLAG_HLINKED);
2039 finish_hard_link(file, f_name(file, fbuf), ndx, NULL, itemizing, code, -1);
2040 flist->in_progress--;
2041 continue;
2043 #endif
2045 if (check_redo && (ndx = get_redo_num()) != -1) {
2046 csum_length = SUM_LENGTH;
2047 max_size = -max_size;
2048 min_size = -min_size;
2049 ignore_existing = -ignore_existing;
2050 ignore_non_existing = -ignore_non_existing;
2051 update_only = -update_only;
2052 always_checksum = -always_checksum;
2053 size_only = -size_only;
2054 append_mode = -append_mode;
2055 make_backups = -make_backups; /* avoid dup backup w/inplace */
2056 ignore_times++;
2058 flist = cur_flist;
2059 cur_flist = flist_for_ndx(ndx);
2061 file = cur_flist->files[ndx - cur_flist->ndx_start];
2062 if (solo_file)
2063 strlcpy(fbuf, solo_file, sizeof fbuf);
2064 else
2065 f_name(file, fbuf);
2066 recv_generator(fbuf, file, ndx, itemizing, code, sock_f_out);
2067 cur_flist->to_redo--;
2069 cur_flist = flist;
2071 csum_length = SHORT_SUM_LENGTH;
2072 max_size = -max_size;
2073 min_size = -min_size;
2074 ignore_existing = -ignore_existing;
2075 ignore_non_existing = -ignore_non_existing;
2076 update_only = -update_only;
2077 always_checksum = -always_checksum;
2078 size_only = -size_only;
2079 append_mode = -append_mode;
2080 make_backups = -make_backups;
2081 ignore_times--;
2082 continue;
2085 if (cur_flist == first_flist)
2086 break;
2088 /* We only get here if inc_recurse is enabled. */
2089 if (first_flist->in_progress || first_flist->to_redo)
2090 break;
2092 if (!read_batch) {
2093 write_ndx(sock_f_out, NDX_DONE);
2094 maybe_flush_socket(1);
2097 if (delete_during == 2 || !dir_tweaking) {
2098 /* Skip directory touch-up. */
2099 } else if (first_flist->parent_ndx >= 0)
2100 touch_up_dirs(dir_flist, first_flist->parent_ndx);
2102 flist_free(first_flist); /* updates first_flist */
2106 void generate_files(int f_out, const char *local_name)
2108 int i, ndx;
2109 char fbuf[MAXPATHLEN];
2110 int itemizing;
2111 enum logcode code;
2112 int save_do_progress = do_progress;
2114 if (protocol_version >= 29) {
2115 itemizing = 1;
2116 maybe_ATTRS_REPORT = stdout_format_has_i ? 0 : ATTRS_REPORT;
2117 code = logfile_format_has_i ? FNONE : FLOG;
2118 } else if (am_daemon) {
2119 itemizing = logfile_format_has_i && do_xfers;
2120 maybe_ATTRS_REPORT = ATTRS_REPORT;
2121 code = itemizing || !do_xfers ? FCLIENT : FINFO;
2122 } else if (!am_server) {
2123 itemizing = stdout_format_has_i;
2124 maybe_ATTRS_REPORT = stdout_format_has_i ? 0 : ATTRS_REPORT;
2125 code = itemizing ? FNONE : FINFO;
2126 } else {
2127 itemizing = 0;
2128 maybe_ATTRS_REPORT = ATTRS_REPORT;
2129 code = FINFO;
2131 solo_file = local_name;
2132 dir_tweaking = !(list_only || solo_file || dry_run);
2133 need_retouch_dir_times = preserve_times > 1;
2134 lull_mod = allowed_lull * 5;
2135 symlink_timeset_failed_flags = ITEM_REPORT_TIME
2136 | (protocol_version >= 30 || !am_server ? ITEM_REPORT_TIMEFAIL : 0);
2138 if (verbose > 2)
2139 rprintf(FINFO, "generator starting pid=%ld\n", (long)getpid());
2141 if (delete_before && !solo_file && cur_flist->used > 0)
2142 do_delete_pass();
2143 if (delete_during == 2) {
2144 deldelay_size = BIGPATHBUFLEN * 4;
2145 deldelay_buf = new_array(char, deldelay_size);
2146 if (!deldelay_buf)
2147 out_of_memory("delete-delay");
2149 do_progress = 0;
2151 if (append_mode > 0 || whole_file < 0)
2152 whole_file = 0;
2153 if (verbose >= 2) {
2154 rprintf(FINFO, "delta-transmission %s\n",
2155 whole_file
2156 ? "disabled for local transfer or --whole-file"
2157 : "enabled");
2160 /* Since we often fill up the outgoing socket and then just sit around
2161 * waiting for the other 2 processes to do their thing, we don't want
2162 * to exit on a timeout. If the data stops flowing, the receiver will
2163 * notice that and let us know via the redo pipe (or its closing). */
2164 ignore_timeout = 1;
2166 dflt_perms = (ACCESSPERMS & ~orig_umask);
2168 do {
2169 #ifdef SUPPORT_HARD_LINKS
2170 if (preserve_hard_links && inc_recurse) {
2171 while (!flist_eof && file_total < FILECNT_LOOKAHEAD/2)
2172 wait_for_receiver();
2174 #endif
2176 if (inc_recurse && cur_flist->parent_ndx >= 0) {
2177 struct file_struct *fp = dir_flist->files[cur_flist->parent_ndx];
2178 f_name(fp, fbuf);
2179 ndx = cur_flist->ndx_start - 1;
2180 recv_generator(fbuf, fp, ndx, itemizing, code, f_out);
2181 if (delete_during && dry_run < 2 && !list_only) {
2182 if (BITS_SETnUNSET(fp->flags, FLAG_CONTENT_DIR, FLAG_MISSING_DIR)) {
2183 dev_t dirdev;
2184 if (one_file_system) {
2185 uint32 *devp = F_DIR_DEV_P(fp);
2186 dirdev = MAKEDEV(DEV_MAJOR(devp), DEV_MINOR(devp));
2187 } else
2188 dirdev = MAKEDEV(0, 0);
2189 delete_in_dir(f_name(fp, fbuf), fp, &dirdev);
2193 for (i = cur_flist->low; i <= cur_flist->high; i++) {
2194 struct file_struct *file = cur_flist->sorted[i];
2196 if (!F_IS_ACTIVE(file))
2197 continue;
2199 if (unsort_ndx)
2200 ndx = F_NDX(file);
2201 else
2202 ndx = i + cur_flist->ndx_start;
2204 if (solo_file)
2205 strlcpy(fbuf, solo_file, sizeof fbuf);
2206 else
2207 f_name(file, fbuf);
2208 recv_generator(fbuf, file, ndx, itemizing, code, f_out);
2210 check_for_finished_files(itemizing, code, 0);
2212 if (allowed_lull && !(i % lull_mod))
2213 maybe_send_keepalive();
2214 else if (!(i & 0xFF))
2215 maybe_flush_socket(0);
2218 if (!inc_recurse) {
2219 write_ndx(f_out, NDX_DONE);
2220 break;
2223 while (1) {
2224 check_for_finished_files(itemizing, code, 1);
2225 if (cur_flist->next || flist_eof)
2226 break;
2227 wait_for_receiver();
2229 } while ((cur_flist = cur_flist->next) != NULL);
2231 if (delete_during)
2232 delete_in_dir(NULL, NULL, &dev_zero);
2233 phase++;
2234 if (verbose > 2)
2235 rprintf(FINFO, "generate_files phase=%d\n", phase);
2237 while (1) {
2238 check_for_finished_files(itemizing, code, 1);
2239 if (msgdone_cnt)
2240 break;
2241 wait_for_receiver();
2244 phase++;
2245 if (verbose > 2)
2246 rprintf(FINFO, "generate_files phase=%d\n", phase);
2248 write_ndx(f_out, NDX_DONE);
2249 /* Reduce round-trip lag-time for a useless delay-updates phase. */
2250 if (protocol_version >= 29 && !delay_updates)
2251 write_ndx(f_out, NDX_DONE);
2253 /* Read MSG_DONE for the redo phase (and any prior messages). */
2254 while (1) {
2255 check_for_finished_files(itemizing, code, 0);
2256 if (msgdone_cnt > 1)
2257 break;
2258 wait_for_receiver();
2261 if (protocol_version >= 29) {
2262 phase++;
2263 if (verbose > 2)
2264 rprintf(FINFO, "generate_files phase=%d\n", phase);
2265 if (delay_updates)
2266 write_ndx(f_out, NDX_DONE);
2267 /* Read MSG_DONE for delay-updates phase & prior messages. */
2268 while (msgdone_cnt == 2)
2269 wait_for_receiver();
2272 do_progress = save_do_progress;
2273 if (delete_during == 2)
2274 do_delayed_deletions(fbuf);
2275 if (delete_after && !solo_file && file_total > 0)
2276 do_delete_pass();
2278 if ((need_retouch_dir_perms || need_retouch_dir_times)
2279 && dir_tweaking && (!inc_recurse || delete_during == 2))
2280 touch_up_dirs(dir_flist, -1);
2282 if (max_delete >= 0 && deletion_count > max_delete) {
2283 rprintf(FINFO,
2284 "Deletions stopped due to --max-delete limit (%d skipped)\n",
2285 deletion_count - max_delete);
2286 io_error |= IOERR_DEL_LIMIT;
2289 if (verbose > 2)
2290 rprintf(FINFO, "generate_files finished\n");