?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Call `OpenSSL_add_all_algorithms()` on older openssl versions.
[rsync.git] / generator.c
blob21c4a595a1cbc148516b138a62384bec1d961915
1 /*
2 * Routines that are exclusive to the generator process.
3 *
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-2022 Wayne Davison
8 *
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.
13 *
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.
18 *
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.
21 */
22
23 #include "rsync.h"
24 #include "inums.h"
25 #include "ifuncs.h"
26
27 extern int dry_run;
28 extern int do_xfers;
29 extern int stdout_format_has_i;
30 extern int logfile_format_has_i;
31 extern int am_root;
32 extern int am_server;
33 extern int am_daemon;
34 extern int inc_recurse;
35 extern int relative_paths;
36 extern int implied_dirs;
37 extern int keep_dirlinks;
38 extern int write_devices;
39 extern int preserve_acls;
40 extern int preserve_xattrs;
41 extern int preserve_links;
42 extern int preserve_devices;
43 extern int preserve_specials;
44 extern int preserve_hard_links;
45 extern int preserve_executability;
46 extern int preserve_perms;
47 extern int preserve_mtimes;
48 extern int omit_dir_times;
49 extern int omit_link_times;
50 extern int delete_mode;
51 extern int delete_before;
52 extern int delete_during;
53 extern int delete_after;
54 extern int missing_args;
55 extern int msgdone_cnt;
56 extern int ignore_errors;
57 extern int remove_source_files;
58 extern int delay_updates;
59 extern int update_only;
60 extern int human_readable;
61 extern int ignore_existing;
62 extern int ignore_non_existing;
63 extern int want_xattr_optim;
64 extern int modify_window;
65 extern int inplace;
66 extern int append_mode;
67 extern int make_backups;
68 extern int csum_length;
69 extern int ignore_times;
70 extern int size_only;
71 extern OFF_T max_size;
72 extern OFF_T min_size;
73 extern int io_error;
74 extern int flist_eof;
75 extern int allowed_lull;
76 extern int sock_f_out;
77 extern int protocol_version;
78 extern int file_total;
79 extern int fuzzy_basis;
80 extern int always_checksum;
81 extern int flist_csum_len;
82 extern char *partial_dir;
83 extern int alt_dest_type;
84 extern int whole_file;
85 extern int list_only;
86 extern int read_batch;
87 extern int write_batch;
88 extern int safe_symlinks;
89 extern int32 block_size;
90 extern int unsort_ndx;
91 extern int max_delete;
92 extern int force_delete;
93 extern int one_file_system;
94 extern int skipped_deletes;
95 extern dev_t filesystem_dev;
96 extern mode_t orig_umask;
97 extern uid_t our_uid;
98 extern char *tmpdir;
99 extern char *basis_dir[MAX_BASIS_DIRS+1];
100 extern struct file_list *cur_flist, *first_flist, *dir_flist;
101 extern filter_rule_list filter_list, daemon_filter_list;
102
103 int maybe_ATTRS_REPORT = 0;
104 int maybe_ATTRS_ACCURATE_TIME = 0;
105
106 static dev_t dev_zero;
107 static int deldelay_size = 0, deldelay_cnt = 0;
108 static char *deldelay_buf = NULL;
109 static int deldelay_fd = -1;
110 static int loopchk_limit;
111 static int dir_tweaking;
112 static int symlink_timeset_failed_flags;
113 static int need_retouch_dir_times;
114 static int need_retouch_dir_perms;
115 static const char *solo_file = NULL;
116
117 /* Forward declarations. */
118 #ifdef SUPPORT_HARD_LINKS
119 static void handle_skipped_hlink(struct file_struct *file, int itemizing,
120 enum logcode code, int f_out);
121 #endif
122
123 #define EARLY_DELAY_DONE_MSG() (!delay_updates)
124 #define EARLY_DELETE_DONE_MSG() (!(delete_during == 2 || delete_after))
125
126 static int start_delete_delay_temp(void)
127 {
128 char fnametmp[MAXPATHLEN];
129 int save_dry_run = dry_run;
130
131 dry_run = 0;
132 if (!get_tmpname(fnametmp, "deldelay", False)
133 || (deldelay_fd = do_mkstemp(fnametmp, 0600)) < 0) {
134 rprintf(FINFO, "NOTE: Unable to create delete-delay temp file%s.\n",
135 inc_recurse ? "" : " -- switching to --delete-after");
136 delete_during = 0;
137 delete_after = !inc_recurse;
138 dry_run = save_dry_run;
139 return 0;
140 }
141 unlink(fnametmp);
142 dry_run = save_dry_run;
143 return 1;
144 }
145
146 static int flush_delete_delay(void)
147 {
148 if (deldelay_fd < 0 && !start_delete_delay_temp())
149 return 0;
150 if (write(deldelay_fd, deldelay_buf, deldelay_cnt) != deldelay_cnt) {
151 rsyserr(FERROR, errno, "flush of delete-delay buffer");
152 delete_during = 0;
153 delete_after = !inc_recurse;
154 close(deldelay_fd);
155 return 0;
156 }
157 deldelay_cnt = 0;
158 return 1;
159 }
160
161 static int remember_delete(struct file_struct *file, const char *fname, int flags)
162 {
163 int len;
164
165 if (deldelay_cnt == deldelay_size && !flush_delete_delay())
166 return 0;
167
168 if (flags & DEL_NO_UID_WRITE)
169 deldelay_buf[deldelay_cnt++] = '!';
170
171 while (1) {
172 len = snprintf(deldelay_buf + deldelay_cnt, deldelay_size - deldelay_cnt,
173 "%x %s%c", (int)file->mode, fname, '\0');
174 if ((deldelay_cnt += len) <= deldelay_size)
175 break;
176 deldelay_cnt -= len;
177 if (!flush_delete_delay())
178 return 0;
179 }
180
181 return 1;
182 }
183
184 static int read_delay_line(char *buf, int *flags_p)
185 {
186 static int read_pos = 0;
187 unsigned int mode;
188 int j, len;
189 char *bp, *past_space;
190
191 while (1) {
192 for (j = read_pos; j < deldelay_cnt && deldelay_buf[j]; j++) {}
193 if (j < deldelay_cnt)
194 break;
195 if (deldelay_fd < 0) {
196 if (j > read_pos)
197 goto invalid_data;
198 return -1;
199 }
200 deldelay_cnt -= read_pos;
201 if (deldelay_cnt == deldelay_size)
202 goto invalid_data;
203 if (deldelay_cnt && read_pos) {
204 memmove(deldelay_buf, deldelay_buf + read_pos,
205 deldelay_cnt);
206 }
207 len = read(deldelay_fd, deldelay_buf + deldelay_cnt,
208 deldelay_size - deldelay_cnt);
209 if (len == 0) {
210 if (deldelay_cnt) {
211 rprintf(FERROR, "ERROR: unexpected EOF in delete-delay file.\n");
212 }
213 return -1;
214 }
215 if (len < 0) {
216 rsyserr(FERROR, errno,
217 "reading delete-delay file");
218 return -1;
219 }
220 deldelay_cnt += len;
221 read_pos = 0;
222 }
223
224 bp = deldelay_buf + read_pos;
225 if (*bp == '!') {
226 bp++;
227 *flags_p = DEL_NO_UID_WRITE;
228 } else
229 *flags_p = 0;
230
231 if (sscanf(bp, "%x ", &mode) != 1) {
232 invalid_data:
233 rprintf(FERROR, "ERROR: invalid data in delete-delay file.\n");
234 return -1;
235 }
236 past_space = strchr(bp, ' ') + 1;
237 len = j - read_pos - (past_space - bp) + 1; /* count the '\0' */
238 read_pos = j + 1;
239
240 if (len > MAXPATHLEN) {
241 rprintf(FERROR, "ERROR: filename too long in delete-delay file.\n");
242 return -1;
243 }
244
245 /* The caller needs the name in a MAXPATHLEN buffer, so we copy it
246 * instead of returning a pointer to our buffer. */
247 memcpy(buf, past_space, len);
248
249 return mode;
250 }
251
252 static void do_delayed_deletions(char *delbuf)
253 {
254 int mode, flags;
255
256 if (deldelay_fd >= 0) {
257 if (deldelay_cnt && !flush_delete_delay())
258 return;
259 lseek(deldelay_fd, 0, 0);
260 }
261 while ((mode = read_delay_line(delbuf, &flags)) >= 0)
262 delete_item(delbuf, mode, flags | DEL_RECURSE);
263 if (deldelay_fd >= 0)
264 close(deldelay_fd);
265 }
266
267 /* This function is used to implement per-directory deletion, and is used by
268 * all the --delete-WHEN options. Note that the fbuf pointer must point to a
269 * MAXPATHLEN buffer with the name of the directory in it (the functions we
270 * call will append names onto the end, but the old dir value will be restored
271 * on exit). */
272 static void delete_in_dir(char *fbuf, struct file_struct *file, dev_t fs_dev)
273 {
274 static int already_warned = 0;
275 static struct hashtable *dev_tbl;
276 struct file_list *dirlist;
277 char delbuf[MAXPATHLEN];
278 int dlen, i;
279
280 if (!fbuf) {
281 change_local_filter_dir(NULL, 0, 0);
282 return;
283 }
284
285 if (DEBUG_GTE(DEL, 2))
286 rprintf(FINFO, "delete_in_dir(%s)\n", fbuf);
287
288 if (allowed_lull)
289 maybe_send_keepalive(time(NULL), MSK_ALLOW_FLUSH);
290
291 if (io_error & IOERR_GENERAL && !ignore_errors) {
292 if (already_warned)
293 return;
294 rprintf(FINFO,
295 "IO error encountered -- skipping file deletion\n");
296 already_warned = 1;
297 return;
298 }
299
300 dlen = strlen(fbuf);
301 change_local_filter_dir(fbuf, dlen, F_DEPTH(file));
302
303 if (one_file_system) {
304 if (!dev_tbl)
305 dev_tbl = hashtable_create(16, HT_KEY64);
306 if (file->flags & FLAG_TOP_DIR) {
307 hashtable_find(dev_tbl, fs_dev+1, "");
308 filesystem_dev = fs_dev;
309 } else if (filesystem_dev != fs_dev) {
310 if (!hashtable_find(dev_tbl, fs_dev+1, NULL))
311 return;
312 filesystem_dev = fs_dev; /* it's a prior top-dir dev */
313 }
314 }
315
316 dirlist = get_dirlist(fbuf, dlen, 0);
317
318 /* If an item in dirlist is not found in flist, delete it
319 * from the filesystem. */
320 for (i = dirlist->used; i--; ) {
321 struct file_struct *fp = dirlist->files[i];
322 if (!F_IS_ACTIVE(fp))
323 continue;
324 if (fp->flags & FLAG_MOUNT_DIR && S_ISDIR(fp->mode)) {
325 if (INFO_GTE(MOUNT, 1))
326 rprintf(FINFO, "cannot delete mount point: %s\n",
327 f_name(fp, NULL));
328 continue;
329 }
330 /* Here we want to match regardless of file type. Replacement
331 * of a file with one of another type is handled separately by
332 * a delete_item call with a DEL_MAKE_ROOM flag. */
333 if (flist_find_ignore_dirness(cur_flist, fp) < 0) {
334 int flags = DEL_RECURSE;
335 if (!(fp->mode & S_IWUSR) && !am_root && fp->flags & FLAG_OWNED_BY_US)
336 flags |= DEL_NO_UID_WRITE;
337 f_name(fp, delbuf);
338 if (delete_during == 2) {
339 if (!remember_delete(fp, delbuf, flags))
340 break;
341 } else
342 delete_item(delbuf, fp->mode, flags);
343 }
344 }
345
346 flist_free(dirlist);
347 }
348
349 /* This deletes any files on the receiving side that are not present on the
350 * sending side. This is used by --delete-before and --delete-after. */
351 static void do_delete_pass(void)
352 {
353 char fbuf[MAXPATHLEN];
354 STRUCT_STAT st;
355 int j;
356
357 /* dry_run is incremented when the destination doesn't exist yet. */
358 if (dry_run > 1 || list_only)
359 return;
360
361 for (j = 0; j < cur_flist->used; j++) {
362 struct file_struct *file = cur_flist->sorted[j];
363
364 if (!F_IS_ACTIVE(file))
365 continue;
366
367 f_name(file, fbuf);
368
369 if (!(file->flags & FLAG_CONTENT_DIR)) {
370 change_local_filter_dir(fbuf, strlen(fbuf), F_DEPTH(file));
371 continue;
372 }
373
374 if (DEBUG_GTE(DEL, 1) && file->flags & FLAG_TOP_DIR)
375 rprintf(FINFO, "deleting in %s\n", fbuf);
376
377 if (link_stat(fbuf, &st, keep_dirlinks) < 0
378 || !S_ISDIR(st.st_mode))
379 continue;
380
381 delete_in_dir(fbuf, file, st.st_dev);
382 }
383 delete_in_dir(NULL, NULL, dev_zero);
384
385 if (INFO_GTE(FLIST, 2) && !am_server)
386 rprintf(FINFO, " \r");
387 }
388
389 static inline int mtime_differs(STRUCT_STAT *stp, struct file_struct *file)
390 {
391 #ifdef ST_MTIME_NSEC
392 return !same_time(stp->st_mtime, stp->ST_MTIME_NSEC, file->modtime, F_MOD_NSEC_or_0(file));
393 #else
394 return !same_time(stp->st_mtime, 0, file->modtime, 0);
395 #endif
396 }
397
398 static inline int any_time_differs(stat_x *sxp, struct file_struct *file, UNUSED(const char *fname))
399 {
400 int differs = mtime_differs(&sxp->st, file);
401 #ifdef SUPPORT_CRTIMES
402 if (!differs && crtimes_ndx) {
403 if (sxp->crtime == 0)
404 sxp->crtime = get_create_time(fname, &sxp->st);
405 differs = !same_time(sxp->crtime, 0, F_CRTIME(file), 0);
406 }
407 #endif
408 return differs;
409 }
410
411 static inline int perms_differ(struct file_struct *file, stat_x *sxp)
412 {
413 if (preserve_perms)
414 return !BITS_EQUAL(sxp->st.st_mode, file->mode, CHMOD_BITS);
415
416 if (preserve_executability)
417 return (sxp->st.st_mode & 0111 ? 1 : 0) ^ (file->mode & 0111 ? 1 : 0);
418
419 return 0;
420 }
421
422 static inline int ownership_differs(struct file_struct *file, stat_x *sxp)
423 {
424 if (am_root && uid_ndx && sxp->st.st_uid != (uid_t)F_OWNER(file))
425 return 1;
426
427 if (gid_ndx && !(file->flags & FLAG_SKIP_GROUP) && sxp->st.st_gid != (gid_t)F_GROUP(file))
428 return 1;
429
430 return 0;
431 }
432
433 #ifdef SUPPORT_ACLS
434 static inline int acls_differ(const char *fname, struct file_struct *file, stat_x *sxp)
435 {
436 if (preserve_acls) {
437 if (!ACL_READY(*sxp))
438 get_acl(fname, sxp);
439 if (set_acl(NULL, file, sxp, file->mode))
440 return 1;
441 }
442
443 return 0;
444 }
445 #endif
446
447 #ifdef SUPPORT_XATTRS
448 static inline int xattrs_differ(const char *fname, struct file_struct *file, stat_x *sxp)
449 {
450 if (preserve_xattrs) {
451 if (!XATTR_READY(*sxp))
452 get_xattr(fname, sxp);
453 if (xattr_diff(file, sxp, 0))
454 return 1;
455 }
456
457 return 0;
458 }
459 #endif
460
461 int unchanged_attrs(const char *fname, struct file_struct *file, stat_x *sxp)
462 {
463 if (S_ISLNK(file->mode)) {
464 #ifdef CAN_SET_SYMLINK_TIMES
465 if (preserve_mtimes && !omit_link_times && any_time_differs(sxp, file, fname))
466 return 0;
467 #endif
468 #ifdef CAN_CHMOD_SYMLINK
469 if (perms_differ(file, sxp))
470 return 0;
471 #endif
472 #ifdef CAN_CHOWN_SYMLINK
473 if (ownership_differs(file, sxp))
474 return 0;
475 #endif
476 #if defined SUPPORT_ACLS && 0 /* no current symlink-ACL support */
477 if (acls_differ(fname, file, sxp))
478 return 0;
479 #endif
480 #if defined SUPPORT_XATTRS && !defined NO_SYMLINK_XATTRS
481 if (xattrs_differ(fname, file, sxp))
482 return 0;
483 #endif
484 } else {
485 if (preserve_mtimes && any_time_differs(sxp, file, fname))
486 return 0;
487 if (perms_differ(file, sxp))
488 return 0;
489 if (ownership_differs(file, sxp))
490 return 0;
491 #ifdef SUPPORT_ACLS
492 if (acls_differ(fname, file, sxp))
493 return 0;
494 #endif
495 #ifdef SUPPORT_XATTRS
496 if (xattrs_differ(fname, file, sxp))
497 return 0;
498 #endif
499 }
500
501 return 1;
502 }
503
504 void itemize(const char *fnamecmp, struct file_struct *file, int ndx, int statret,
505 stat_x *sxp, int32 iflags, uchar fnamecmp_type,
506 const char *xname)
507 {
508 if (statret >= 0) { /* A from-dest-dir statret can == 1! */
509 int keep_time = !preserve_mtimes ? 0
510 : S_ISDIR(file->mode) ? !omit_dir_times
511 : S_ISLNK(file->mode) ? !omit_link_times
512 : 1;
513
514 if (S_ISREG(file->mode) && F_LENGTH(file) != sxp->st.st_size)
515 iflags |= ITEM_REPORT_SIZE;
516 if (file->flags & FLAG_TIME_FAILED) { /* symlinks only */
517 if (iflags & ITEM_LOCAL_CHANGE)
518 iflags |= symlink_timeset_failed_flags;
519 } else if (keep_time
520 ? mtime_differs(&sxp->st, file)
521 : iflags & (ITEM_TRANSFER|ITEM_LOCAL_CHANGE) && !(iflags & ITEM_MATCHED)
522 && (!(iflags & ITEM_XNAME_FOLLOWS) || *xname))
523 iflags |= ITEM_REPORT_TIME;
524 if (atimes_ndx && !S_ISDIR(file->mode) && !S_ISLNK(file->mode)
525 && !same_time(F_ATIME(file), 0, sxp->st.st_atime, 0))
526 iflags |= ITEM_REPORT_ATIME;
527 #ifdef SUPPORT_CRTIMES
528 if (crtimes_ndx) {
529 if (sxp->crtime == 0)
530 sxp->crtime = get_create_time(fnamecmp, &sxp->st);
531 if (!same_time(sxp->crtime, 0, F_CRTIME(file), 0))
532 iflags |= ITEM_REPORT_CRTIME;
533 }
534 #endif
535 #ifndef CAN_CHMOD_SYMLINK
536 if (S_ISLNK(file->mode)) {
537 ;
538 } else
539 #endif
540 if (preserve_perms) {
541 if (!BITS_EQUAL(sxp->st.st_mode, file->mode, CHMOD_BITS))
542 iflags |= ITEM_REPORT_PERMS;
543 } else if (preserve_executability
544 && ((sxp->st.st_mode & 0111 ? 1 : 0) ^ (file->mode & 0111 ? 1 : 0)))
545 iflags |= ITEM_REPORT_PERMS;
546 if (uid_ndx && am_root && (uid_t)F_OWNER(file) != sxp->st.st_uid)
547 iflags |= ITEM_REPORT_OWNER;
548 if (gid_ndx && !(file->flags & FLAG_SKIP_GROUP) && sxp->st.st_gid != (gid_t)F_GROUP(file))
549 iflags |= ITEM_REPORT_GROUP;
550 #ifdef SUPPORT_ACLS
551 if (preserve_acls && !S_ISLNK(file->mode)) {
552 if (!ACL_READY(*sxp))
553 get_acl(fnamecmp, sxp);
554 if (set_acl(NULL, file, sxp, file->mode))
555 iflags |= ITEM_REPORT_ACL;
556 }
557 #endif
558 #ifdef SUPPORT_XATTRS
559 if (preserve_xattrs) {
560 if (!XATTR_READY(*sxp))
561 get_xattr(fnamecmp, sxp);
562 if (xattr_diff(file, sxp, 1))
563 iflags |= ITEM_REPORT_XATTR;
564 }
565 #endif
566 } else {
567 #ifdef SUPPORT_XATTRS
568 if (preserve_xattrs && xattr_diff(file, NULL, 1))
569 iflags |= ITEM_REPORT_XATTR;
570 #endif
571 iflags |= ITEM_IS_NEW;
572 }
573
574 iflags &= 0xffff;
575 if ((iflags & (SIGNIFICANT_ITEM_FLAGS|ITEM_REPORT_XATTR) || INFO_GTE(NAME, 2)
576 || stdout_format_has_i > 1 || (xname && *xname)) && !read_batch) {
577 if (protocol_version >= 29) {
578 if (ndx >= 0)
579 write_ndx(sock_f_out, ndx);
580 write_shortint(sock_f_out, iflags);
581 if (iflags & ITEM_BASIS_TYPE_FOLLOWS)
582 write_byte(sock_f_out, fnamecmp_type);
583 if (iflags & ITEM_XNAME_FOLLOWS)
584 write_vstring(sock_f_out, xname, strlen(xname));
585 #ifdef SUPPORT_XATTRS
586 if (preserve_xattrs && do_xfers
587 && iflags & (ITEM_REPORT_XATTR|ITEM_TRANSFER)) {
588 int fd = iflags & ITEM_REPORT_XATTR
589 && !(want_xattr_optim && BITS_SET(iflags, ITEM_XNAME_FOLLOWS|ITEM_LOCAL_CHANGE))
590 ? sock_f_out : -1;
591 send_xattr_request(NULL, file, fd);
592 }
593 #endif
594 } else if (ndx >= 0) {
595 enum logcode code = logfile_format_has_i ? FINFO : FCLIENT;
596 log_item(code, file, iflags, xname);
597 }
598 }
599 }
600
601 static enum filetype get_file_type(mode_t mode)
602 {
603 if (S_ISREG(mode))
604 return FT_REG;
605 if (S_ISLNK(mode))
606 return FT_SYMLINK;
607 if (S_ISDIR(mode))
608 return FT_DIR;
609 if (IS_SPECIAL(mode))
610 return FT_SPECIAL;
611 if (IS_DEVICE(mode))
612 return FT_DEVICE;
613 return FT_UNSUPPORTED;
614 }
615
616 /* Perform our quick-check heuristic for determining if a file is unchanged. */
617 int quick_check_ok(enum filetype ftype, const char *fn, struct file_struct *file, STRUCT_STAT *st)
618 {
619 switch (ftype) {
620 case FT_REG:
621 if (st->st_size != F_LENGTH(file))
622 return 0;
623
624 /* If always_checksum is set then we use the checksum instead
625 * of the file mtime to determine whether to sync. */
626 if (always_checksum > 0) {
627 char sum[MAX_DIGEST_LEN];
628 file_checksum(fn, st, sum);
629 return memcmp(sum, F_SUM(file), flist_csum_len) == 0;
630 }
631
632 if (size_only > 0)
633 return 1;
634
635 if (ignore_times)
636 return 0;
637
638 if (mtime_differs(st, file))
639 return 0;
640 break;
641 case FT_DIR:
642 break;
643 case FT_SYMLINK: {
644 #ifdef SUPPORT_LINKS
645 char lnk[MAXPATHLEN];
646 int len = do_readlink(fn, lnk, MAXPATHLEN-1);
647 if (len <= 0)
648 return 0;
649 lnk[len] = '\0';
650 if (strcmp(lnk, F_SYMLINK(file)) != 0)
651 return 0;
652 break;
653 #else
654 return -1;
655 #endif
656 }
657 case FT_SPECIAL:
658 if (!BITS_EQUAL(file->mode, st->st_mode, _S_IFMT))
659 return 0;
660 break;
661 case FT_DEVICE: {
662 uint32 *devp = F_RDEV_P(file);
663 if (st->st_rdev != MAKEDEV(DEV_MAJOR(devp), DEV_MINOR(devp)))
664 return 0;
665 break;
666 }
667 case FT_UNSUPPORTED:
668 return -1;
669 }
670 return 1;
671 }
672
673 /*
674 * set (initialize) the size entries in the per-file sum_struct
675 * calculating dynamic block and checksum sizes.
676 *
677 * This is only called from generate_and_send_sums() but is a separate
678 * function to encapsulate the logic.
679 *
680 * The block size is a rounded square root of file length.
681 *
682 * The checksum size is determined according to:
683 * blocksum_bits = BLOCKSUM_BIAS + 2*log2(file_len) - log2(block_len)
684 * provided by Donovan Baarda which gives a probability of rsync
685 * algorithm corrupting data and falling back using the whole md4
686 * checksums.
687 *
688 * This might be made one of several selectable heuristics.
689 */
690 static void sum_sizes_sqroot(struct sum_struct *sum, int64 len)
691 {
692 int32 blength;
693 int s2length;
694 int64 l;
695
696 if (len < 0) {
697 /* The file length overflowed our int64 var, so we can't process this file. */
698 sum->count = -1; /* indicate overflow error */
699 return;
700 }
701
702 if (block_size)
703 blength = block_size;
704 else if (len <= BLOCK_SIZE * BLOCK_SIZE)
705 blength = BLOCK_SIZE;
706 else {
707 int32 max_blength = protocol_version < 30 ? OLD_MAX_BLOCK_SIZE : MAX_BLOCK_SIZE;
708 int32 c;
709 int cnt;
710 for (c = 1, l = len, cnt = 0; l >>= 2; c <<= 1, cnt++) {}
711 if (c < 0 || c >= max_blength)
712 blength = max_blength;
713 else {
714 blength = 0;
715 do {
716 blength |= c;
717 if (len < (int64)blength * blength)
718 blength &= ~c;
719 c >>= 1;
720 } while (c >= 8); /* round to multiple of 8 */
721 blength = MAX(blength, BLOCK_SIZE);
722 }
723 }
724
725 if (protocol_version < 27) {
726 s2length = csum_length;
727 } else if (csum_length == SUM_LENGTH) {
728 s2length = SUM_LENGTH;
729 } else {
730 int32 c;
731 int b = BLOCKSUM_BIAS;
732 for (l = len; l >>= 1; b += 2) {}
733 for (c = blength; (c >>= 1) && b; b--) {}
734 /* add a bit, subtract rollsum, round up. */
735 s2length = (b + 1 - 32 + 7) / 8; /* --optimize in compiler-- */
736 s2length = MAX(s2length, csum_length);
737 s2length = MIN(s2length, SUM_LENGTH);
738 }
739
740 sum->flength = len;
741 sum->blength = blength;
742 sum->s2length = s2length;
743 sum->remainder = (int32)(len % blength);
744 sum->count = (int32)(l = (len / blength) + (sum->remainder != 0));
745
746 if ((int64)sum->count != l)
747 sum->count = -1;
748
749 if (sum->count && DEBUG_GTE(DELTASUM, 2)) {
750 rprintf(FINFO,
751 "count=%s rem=%ld blength=%ld s2length=%d flength=%s\n",
752 big_num(sum->count), (long)sum->remainder, (long)sum->blength,
753 sum->s2length, big_num(sum->flength));
754 }
755 }
756
757
758 /*
759 * Generate and send a stream of signatures/checksums that describe a buffer
760 *
761 * Generate approximately one checksum every block_len bytes.
762 */
763 static int generate_and_send_sums(int fd, OFF_T len, int f_out, int f_copy)
764 {
765 int32 i;
766 struct map_struct *mapbuf;
767 struct sum_struct sum;
768 OFF_T offset = 0;
769
770 sum_sizes_sqroot(&sum, len);
771 if (sum.count < 0)
772 return -1;
773 write_sum_head(f_out, &sum);
774
775 if (append_mode > 0 && f_copy < 0)
776 return 0;
777
778 if (len > 0)
779 mapbuf = map_file(fd, len, MAX_MAP_SIZE, sum.blength);
780 else
781 mapbuf = NULL;
782
783 for (i = 0; i < sum.count; i++) {
784 int32 n1 = (int32)MIN(len, (OFF_T)sum.blength);
785 char *map = map_ptr(mapbuf, offset, n1);
786 char sum2[SUM_LENGTH];
787 uint32 sum1;
788
789 len -= n1;
790 offset += n1;
791
792 if (f_copy >= 0) {
793 full_write(f_copy, map, n1);
794 if (append_mode > 0)
795 continue;
796 }
797
798 sum1 = get_checksum1(map, n1);
799 get_checksum2(map, n1, sum2);
800
801 if (DEBUG_GTE(DELTASUM, 3)) {
802 rprintf(FINFO,
803 "chunk[%s] offset=%s len=%ld sum1=%08lx\n",
804 big_num(i), big_num(offset - n1), (long)n1,
805 (unsigned long)sum1);
806 }
807 write_int(f_out, sum1);
808 write_buf(f_out, sum2, sum.s2length);
809 }
810
811 if (mapbuf)
812 unmap_file(mapbuf);
813
814 return 0;
815 }
816
817
818 /* Try to find a filename in the same dir as "fname" with a similar name. */
819 static struct file_struct *find_fuzzy(struct file_struct *file, struct file_list *dirlist_array[], uchar *fnamecmp_type_ptr)
820 {
821 int fname_len, fname_suf_len;
822 const char *fname_suf, *fname = file->basename;
823 uint32 lowest_dist = 25 << 16; /* ignore a distance greater than 25 */
824 int i, j;
825 struct file_struct *lowest_fp = NULL;
826
827 fname_len = strlen(fname);
828 fname_suf = find_filename_suffix(fname, fname_len, &fname_suf_len);
829
830 /* Try to find an exact size+mtime match first. */
831 for (i = 0; i < fuzzy_basis; i++) {
832 struct file_list *dirlist = dirlist_array[i];
833
834 if (!dirlist)
835 continue;
836
837 for (j = 0; j < dirlist->used; j++) {
838 struct file_struct *fp = dirlist->files[j];
839
840 if (!F_IS_ACTIVE(fp))
841 continue;
842
843 if (!S_ISREG(fp->mode) || !F_LENGTH(fp) || fp->flags & FLAG_FILE_SENT)
844 continue;
845
846 if (F_LENGTH(fp) == F_LENGTH(file) && same_time(fp->modtime, 0, file->modtime, 0)) {
847 if (DEBUG_GTE(FUZZY, 2))
848 rprintf(FINFO, "fuzzy size/modtime match for %s\n", f_name(fp, NULL));
849 *fnamecmp_type_ptr = FNAMECMP_FUZZY + i;
850 return fp;
851 }
852
853 }
854 }
855
856 for (i = 0; i < fuzzy_basis; i++) {
857 struct file_list *dirlist = dirlist_array[i];
858
859 if (!dirlist)
860 continue;
861
862 for (j = 0; j < dirlist->used; j++) {
863 struct file_struct *fp = dirlist->files[j];
864 const char *suf, *name;
865 int len, suf_len;
866 uint32 dist;
867
868 if (!F_IS_ACTIVE(fp))
869 continue;
870
871 if (!S_ISREG(fp->mode) || !F_LENGTH(fp) || fp->flags & FLAG_FILE_SENT)
872 continue;
873
874 name = fp->basename;
875 len = strlen(name);
876 suf = find_filename_suffix(name, len, &suf_len);
877
878 dist = fuzzy_distance(name, len, fname, fname_len, lowest_dist);
879 /* Add some extra weight to how well the suffixes match unless we've already disqualified
880 * this file based on a heuristic. */
881 if (dist < 0xFFFF0000U) {
882 dist += fuzzy_distance(suf, suf_len, fname_suf, fname_suf_len, 0xFFFF0000U) * 10;
883 }
884 if (DEBUG_GTE(FUZZY, 2)) {
885 rprintf(FINFO, "fuzzy distance for %s = %d.%05d\n",
886 f_name(fp, NULL), (int)(dist>>16), (int)(dist&0xFFFF));
887 }
888 if (dist <= lowest_dist) {
889 lowest_dist = dist;
890 lowest_fp = fp;
891 *fnamecmp_type_ptr = FNAMECMP_FUZZY + i;
892 }
893 }
894 }
895
896 return lowest_fp;
897 }
898
899 /* Copy a file found in our --copy-dest handling. */
900 static int copy_altdest_file(const char *src, const char *dest, struct file_struct *file)
901 {
902 char buf[MAXPATHLEN];
903 const char *copy_to, *partialptr;
904 int save_preserve_xattrs = preserve_xattrs;
905 int ok, fd_w;
906
907 if (inplace) {
908 /* Let copy_file open the destination in place. */
909 fd_w = -1;
910 copy_to = dest;
911 } else {
912 fd_w = open_tmpfile(buf, dest, file);
913 if (fd_w < 0)
914 return -1;
915 copy_to = buf;
916 }
917 cleanup_set(copy_to, NULL, NULL, -1, -1);
918 if (copy_file(src, copy_to, fd_w, file->mode) < 0) {
919 if (INFO_GTE(COPY, 1)) {
920 rsyserr(FINFO, errno, "copy_file %s => %s",
921 full_fname(src), copy_to);
922 }
923 /* Try to clean up. */
924 unlink(copy_to);
925 cleanup_disable();
926 return -1;
927 }
928 partialptr = partial_dir ? partial_dir_fname(dest) : NULL;
929 preserve_xattrs = 0; /* xattrs were copied with file */
930 ok = finish_transfer(dest, copy_to, src, partialptr, file, 1, 0);
931 preserve_xattrs = save_preserve_xattrs;
932 cleanup_disable();
933 return ok ? 0 : -1;
934 }
935
936 /* This is only called for regular files. We return -2 if we've finished
937 * handling the file, -1 if no dest-linking occurred, or a non-negative
938 * value if we found an alternate basis file. If we're called with the
939 * find_exact_for_existing flag, the destination file already exists, so
940 * we only try to find an exact alt-dest match. In this case, the returns
941 * are only -2 & -1 (both as above). */
942 static int try_dests_reg(struct file_struct *file, char *fname, int ndx,
943 char *cmpbuf, stat_x *sxp, int find_exact_for_existing,
944 int itemizing, enum logcode code)
945 {
946 STRUCT_STAT real_st = sxp->st;
947 int best_match = -1;
948 int match_level = 0;
949 int j = 0;
950
951 do {
952 pathjoin(cmpbuf, MAXPATHLEN, basis_dir[j], fname);
953 if (link_stat(cmpbuf, &sxp->st, 0) < 0 || !S_ISREG(sxp->st.st_mode))
954 continue;
955 if (match_level == 0) {
956 best_match = j;
957 match_level = 1;
958 }
959 if (!quick_check_ok(FT_REG, cmpbuf, file, &sxp->st))
960 continue;
961 if (match_level == 1) {
962 best_match = j;
963 match_level = 2;
964 }
965 if (unchanged_attrs(cmpbuf, file, sxp)) {
966 best_match = j;
967 match_level = 3;
968 break;
969 }
970 free_stat_x(sxp);
971 } while (basis_dir[++j] != NULL);
972
973 if (!match_level)
974 goto got_nothing_for_ya;
975
976 if (j != best_match) {
977 j = best_match;
978 pathjoin(cmpbuf, MAXPATHLEN, basis_dir[j], fname);
979 if (link_stat(cmpbuf, &sxp->st, 0) < 0)
980 goto got_nothing_for_ya;
981 }
982
983 if (match_level == 3 && alt_dest_type != COPY_DEST) {
984 if (find_exact_for_existing) {
985 if (alt_dest_type == LINK_DEST && real_st.st_dev == sxp->st.st_dev && real_st.st_ino == sxp->st.st_ino)
986 return -1;
987 if (do_unlink(fname) < 0 && errno != ENOENT)
988 goto got_nothing_for_ya;
989 }
990 #ifdef SUPPORT_HARD_LINKS
991 if (alt_dest_type == LINK_DEST) {
992 if (!hard_link_one(file, fname, cmpbuf, 1))
993 goto try_a_copy;
994 if (atimes_ndx)
995 set_file_attrs(fname, file, sxp, NULL, 0);
996 if (preserve_hard_links && F_IS_HLINKED(file))
997 finish_hard_link(file, fname, ndx, &sxp->st, itemizing, code, j);
998 if (!maybe_ATTRS_REPORT && (INFO_GTE(NAME, 2) || stdout_format_has_i > 1)) {
999 itemize(cmpbuf, file, ndx, 1, sxp,
1000 ITEM_LOCAL_CHANGE | ITEM_XNAME_FOLLOWS,
1001 0, "");
1002 }
1003 } else
1004 #endif
1005 {
1006 if (itemizing)
1007 itemize(cmpbuf, file, ndx, 0, sxp, 0, 0, NULL);
1008 }
1009 if (INFO_GTE(NAME, 2) && maybe_ATTRS_REPORT)
1010 rprintf(FCLIENT, "%s is uptodate\n", fname);
1011 return -2;
1012 }
1013
1014 if (find_exact_for_existing)
1015 goto got_nothing_for_ya;
1016
1017 if (match_level >= 2) {
1018 #ifdef SUPPORT_HARD_LINKS
1019 try_a_copy: /* Copy the file locally. */
1020 #endif
1021 if (!dry_run && copy_altdest_file(cmpbuf, fname, file) < 0) {
1022 if (find_exact_for_existing) /* Can get here via hard-link failure */
1023 goto got_nothing_for_ya;
1024 return -1;
1025 }
1026 if (itemizing)
1027 itemize(cmpbuf, file, ndx, 0, sxp, ITEM_LOCAL_CHANGE, 0, NULL);
1028 if (maybe_ATTRS_REPORT
1029 && ((!itemizing && INFO_GTE(NAME, 1) && match_level == 2)
1030 || (INFO_GTE(NAME, 2) && match_level == 3))) {
1031 code = match_level == 3 ? FCLIENT : FINFO;
1032 rprintf(code, "%s%s\n", fname,
1033 match_level == 3 ? " is uptodate" : "");
1034 }
1035 #ifdef SUPPORT_HARD_LINKS
1036 if (preserve_hard_links && F_IS_HLINKED(file))
1037 finish_hard_link(file, fname, ndx, &sxp->st, itemizing, code, -1);
1038 #endif
1039 return -2;
1040 }
1041
1042 return FNAMECMP_BASIS_DIR_LOW + j;
1043
1044 got_nothing_for_ya:
1045 sxp->st = real_st;
1046 return -1;
1047 }
1048
1049 /* This is only called for non-regular files. We return -2 if we've finished
1050 * handling the file, or -1 if no dest-linking occurred, or a non-negative
1051 * value if we found an alternate basis file. */
1052 static int try_dests_non(struct file_struct *file, char *fname, int ndx,
1053 char *cmpbuf, stat_x *sxp, int itemizing,
1054 enum logcode code)
1055 {
1056 int best_match = -1;
1057 int match_level = 0;
1058 enum filetype ftype = get_file_type(file->mode);
1059 int j = 0;
1060
1061 #ifndef SUPPORT_LINKS
1062 if (ftype == FT_SYMLINK)
1063 return -1;
1064 #endif
1065 if (ftype == FT_REG || ftype == FT_UNSUPPORTED) {
1066 rprintf(FERROR,
1067 "internal: try_dests_non() called with invalid mode (%o)\n",
1068 (int)file->mode);
1069 exit_cleanup(RERR_UNSUPPORTED);
1070 }
1071
1072 do {
1073 pathjoin(cmpbuf, MAXPATHLEN, basis_dir[j], fname);
1074 if (link_stat(cmpbuf, &sxp->st, 0) < 0)
1075 continue;
1076 if (ftype != get_file_type(sxp->st.st_mode))
1077 continue;
1078 if (match_level < 1) {
1079 match_level = 1;
1080 best_match = j;
1081 }
1082 if (!quick_check_ok(ftype, cmpbuf, file, &sxp->st))
1083 continue;
1084 if (match_level < 2) {
1085 match_level = 2;
1086 best_match = j;
1087 }
1088 if (unchanged_attrs(cmpbuf, file, sxp)) {
1089 match_level = 3;
1090 best_match = j;
1091 break;
1092 }
1093 } while (basis_dir[++j] != NULL);
1094
1095 if (!match_level)
1096 return -1;
1097
1098 if (j != best_match) {
1099 j = best_match;
1100 pathjoin(cmpbuf, MAXPATHLEN, basis_dir[j], fname);
1101 if (link_stat(cmpbuf, &sxp->st, 0) < 0)
1102 return -1;
1103 }
1104
1105 if (match_level == 3) {
1106 #ifdef SUPPORT_HARD_LINKS
1107 if (alt_dest_type == LINK_DEST
1108 #ifndef CAN_HARDLINK_SYMLINK
1109 && !S_ISLNK(file->mode)
1110 #endif
1111 #ifndef CAN_HARDLINK_SPECIAL
1112 && !IS_SPECIAL(file->mode) && !IS_DEVICE(file->mode)
1113 #endif
1114 && !S_ISDIR(file->mode)) {
1115 if (do_link(cmpbuf, fname) < 0) {
1116 rsyserr(FERROR_XFER, errno,
1117 "failed to hard-link %s with %s",
1118 cmpbuf, fname);
1119 return j;
1120 }
1121 if (preserve_hard_links && F_IS_HLINKED(file))
1122 finish_hard_link(file, fname, ndx, NULL, itemizing, code, -1);
1123 } else
1124 #endif
1125 match_level = 2;
1126 if (itemizing && stdout_format_has_i
1127 && (INFO_GTE(NAME, 2) || stdout_format_has_i > 1)) {
1128 int chg = alt_dest_type == COMPARE_DEST && ftype != FT_DIR ? 0
1129 : ITEM_LOCAL_CHANGE + (match_level == 3 ? ITEM_XNAME_FOLLOWS : 0);
1130 char *lp = match_level == 3 ? "" : NULL;
1131 itemize(cmpbuf, file, ndx, 0, sxp, chg + ITEM_MATCHED, 0, lp);
1132 }
1133 if (INFO_GTE(NAME, 2) && maybe_ATTRS_REPORT) {
1134 rprintf(FCLIENT, "%s%s is uptodate\n",
1135 fname, ftype == FT_DIR ? "/" : "");
1136 }
1137 return -2;
1138 }
1139
1140 return j;
1141 }
1142
1143 static void list_file_entry(struct file_struct *f)
1144 {
1145 char permbuf[PERMSTRING_SIZE];
1146 const char *mtime_str = timestring(f->modtime);
1147 int size_width = human_readable ? 14 : 11;
1148 int mtime_width = 1 + strlen(mtime_str);
1149 int atime_width = atimes_ndx ? mtime_width : 0;
1150 int crtime_width = crtimes_ndx ? mtime_width : 0;
1151
1152 if (!F_IS_ACTIVE(f)) {
1153 /* this can happen if duplicate names were removed */
1154 return;
1155 }
1156
1157 /* TODO: indicate '+' if the entry has an ACL. */
1158
1159 if (missing_args == 2 && f->mode == 0) {
1160 rprintf(FINFO, "%-*s %s\n",
1161 10 + 1 + size_width + mtime_width + atime_width + crtime_width, "*missing",
1162 f_name(f, NULL));
1163 } else {
1164 const char *atime_str = atimes_ndx && !S_ISDIR(f->mode) ? timestring(F_ATIME(f)) : "";
1165 const char *crtime_str = crtimes_ndx ? timestring(F_CRTIME(f)) : "";
1166 const char *arrow, *lnk;
1167
1168 permstring(permbuf, f->mode);
1169
1170 #ifdef SUPPORT_LINKS
1171 if (preserve_links && S_ISLNK(f->mode)) {
1172 arrow = " -> ";
1173 lnk = F_SYMLINK(f);
1174 } else
1175 #endif
1176 arrow = lnk = "";
1177
1178 rprintf(FINFO, "%s %*s %s%*s%*s %s%s%s\n",
1179 permbuf, size_width, human_num(F_LENGTH(f)),
1180 timestring(f->modtime), atime_width, atime_str, crtime_width, crtime_str,
1181 f_name(f, NULL), arrow, lnk);
1182 }
1183 }
1184
1185 static int phase = 0;
1186 static int dflt_perms;
1187
1188 static int implied_dirs_are_missing;
1189 /* Helper for recv_generator's skip_dir and dry_missing_dir tests. */
1190 static BOOL is_below(struct file_struct *file, struct file_struct *subtree)
1191 {
1192 return F_DEPTH(file) > F_DEPTH(subtree)
1193 && (!implied_dirs_are_missing || f_name_has_prefix(file, subtree));
1194 }
1195
1196 /* Acts on the indicated item in cur_flist whose name is fname. If a dir,
1197 * make sure it exists, and has the right permissions/timestamp info. For
1198 * all other non-regular files (symlinks, etc.) we create them here. For
1199 * regular files that have changed, we try to find a basis file and then
1200 * start sending checksums. The ndx is the file's unique index value.
1201 *
1202 * The fname parameter must point to a MAXPATHLEN buffer! (e.g it gets
1203 * passed to delete_item(), which can use it during a recursive delete.)
1204 *
1205 * Note that f_out is set to -1 when doing final directory-permission and
1206 * modification-time repair. */
1207 static void recv_generator(char *fname, struct file_struct *file, int ndx,
1208 int itemizing, enum logcode code, int f_out)
1209 {
1210 static const char *parent_dirname = "";
1211 static struct file_struct *prior_dir_file = NULL;
1212 /* Missing dir not created due to --dry-run; will still be scanned. */
1213 static struct file_struct *dry_missing_dir = NULL;
1214 /* Missing dir whose contents are skipped altogether due to
1215 * --ignore-non-existing, daemon exclude, or mkdir failure. */
1216 static struct file_struct *skip_dir = NULL;
1217 static struct file_list *fuzzy_dirlist[MAX_BASIS_DIRS+1];
1218 static int need_fuzzy_dirlist = 0;
1219 struct file_struct *fuzzy_file = NULL;
1220 int fd = -1, f_copy = -1;
1221 stat_x sx, real_sx;
1222 STRUCT_STAT partial_st;
1223 struct file_struct *back_file = NULL;
1224 int statret, real_ret, stat_errno;
1225 char *fnamecmp, *partialptr, *backupptr = NULL;
1226 char fnamecmpbuf[MAXPATHLEN];
1227 uchar fnamecmp_type;
1228 int del_opts = delete_mode || force_delete ? DEL_RECURSE : 0;
1229 enum filetype stype, ftype = get_file_type(file->mode);
1230 int is_dir = ftype != FT_DIR ? 0
1231 : inc_recurse && ndx != cur_flist->ndx_start - 1 ? -1
1232 : 1;
1233
1234 if (DEBUG_GTE(GENR, 1))
1235 rprintf(FINFO, "recv_generator(%s,%d)\n", fname, ndx);
1236
1237 if (list_only) {
1238 if (is_dir < 0
1239 || (is_dir && !implied_dirs && file->flags & FLAG_IMPLIED_DIR))
1240 return;
1241 list_file_entry(file);
1242 return;
1243 }
1244
1245 maybe_ATTRS_ACCURATE_TIME = always_checksum ? ATTRS_ACCURATE_TIME : 0;
1246
1247 if (skip_dir) {
1248 if (is_below(file, skip_dir)) {
1249 if (is_dir)
1250 file->flags |= FLAG_MISSING_DIR;
1251 #ifdef SUPPORT_HARD_LINKS
1252 else if (F_IS_HLINKED(file))
1253 handle_skipped_hlink(file, itemizing, code, f_out);
1254 #endif
1255 return;
1256 }
1257 skip_dir = NULL;
1258 }
1259
1260 init_stat_x(&sx);
1261 if (daemon_filter_list.head && (*fname != '.' || fname[1])) {
1262 if (check_filter(&daemon_filter_list, FLOG, fname, is_dir) < 0) {
1263 if (is_dir < 0)
1264 return;
1265 #ifdef SUPPORT_HARD_LINKS
1266 if (F_IS_HLINKED(file))
1267 handle_skipped_hlink(file, itemizing, code, f_out);
1268 #endif
1269 rprintf(FERROR_XFER,
1270 "ERROR: daemon refused to receive %s \"%s\"\n",
1271 is_dir ? "directory" : "file", fname);
1272 if (is_dir)
1273 goto skipping_dir_contents;
1274 return;
1275 }
1276 }
1277
1278 if (dry_run > 1 || (dry_missing_dir && is_below(file, dry_missing_dir))) {
1279 int i;
1280 parent_is_dry_missing:
1281 for (i = 0; i < fuzzy_basis; i++) {
1282 if (fuzzy_dirlist[i]) {
1283 flist_free(fuzzy_dirlist[i]);
1284 fuzzy_dirlist[i] = NULL;
1285 }
1286 }
1287 parent_dirname = "";
1288 statret = -1;
1289 stat_errno = ENOENT;
1290 } else {
1291 const char *dn = file->dirname ? file->dirname : ".";
1292 dry_missing_dir = NULL;
1293 if (parent_dirname != dn && strcmp(parent_dirname, dn) != 0) {
1294 /* Each parent dir must be in the file list or the flist data is bad.
1295 * Optimization: most of the time the parent dir will be the last dir
1296 * this function was asked to process in the file list. */
1297 if (!inc_recurse
1298 && (*dn != '.' || dn[1]) /* Avoid an issue with --relative and the "." dir. */
1299 && (!prior_dir_file || strcmp(dn, f_name(prior_dir_file, NULL)) != 0)) {
1300 int ok = 0, j = flist_find_name(cur_flist, dn, -1);
1301 if (j >= 0) {
1302 struct file_struct *f = cur_flist->sorted[j];
1303 if (S_ISDIR(f->mode) || (missing_args == 2 && !file->mode && !f->mode))
1304 ok = 1;
1305 }
1306 /* The --delete-missing-args option can actually put invalid entries into
1307 * the file list, so if that option was specified, we'll just complain about
1308 * it and allow it. */
1309 if (!ok && missing_args == 2 && file->mode == 0 && j < 0)
1310 rprintf(FERROR, "WARNING: parent dir is absent in the file list: %s\n", dn);
1311 else if (!ok) {
1312 rprintf(FERROR, "ABORTING due to invalid path from sender: %s/%s\n",
1313 dn, file->basename);
1314 exit_cleanup(RERR_PROTOCOL);
1315 }
1316 }
1317 if (relative_paths && !implied_dirs && file->mode != 0
1318 && do_stat(dn, &sx.st) < 0) {
1319 if (dry_run)
1320 goto parent_is_dry_missing;
1321 if (make_path(fname, MKP_DROP_NAME | MKP_SKIP_SLASH) < 0) {
1322 rsyserr(FERROR_XFER, errno,
1323 "recv_generator: mkdir %s failed",
1324 full_fname(dn));
1325 }
1326 }
1327 if (fuzzy_basis) {
1328 int i;
1329 for (i = 0; i < fuzzy_basis; i++) {
1330 if (fuzzy_dirlist[i]) {
1331 flist_free(fuzzy_dirlist[i]);
1332 fuzzy_dirlist[i] = NULL;
1333 }
1334 }
1335 need_fuzzy_dirlist = 1;
1336 }
1337 #ifdef SUPPORT_ACLS
1338 if (!preserve_perms)
1339 dflt_perms = default_perms_for_dir(dn);
1340 #endif
1341 }
1342 parent_dirname = dn;
1343
1344 statret = link_stat(fname, &sx.st, keep_dirlinks && is_dir);
1345 stat_errno = errno;
1346 }
1347
1348 if (missing_args == 2 && file->mode == 0) {
1349 if (filter_list.head && check_filter(&filter_list, FINFO, fname, is_dir) < 0)
1350 return;
1351 if (statret == 0)
1352 delete_item(fname, sx.st.st_mode, del_opts);
1353 return;
1354 }
1355
1356 if (ignore_non_existing > 0 && statret == -1 && stat_errno == ENOENT) {
1357 if (is_dir) {
1358 if (is_dir < 0)
1359 return;
1360 skip_dir = file;
1361 file->flags |= FLAG_MISSING_DIR;
1362 }
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 (INFO_GTE(SKIP, 1)) {
1368 rprintf(FINFO, "not creating new %s \"%s\"\n",
1369 is_dir ? "directory" : "file", fname);
1370 }
1371 return;
1372 }
1373
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;
1377
1378 if (statret == 0)
1379 stype = get_file_type(sx.st.st_mode);
1380 else
1381 stype = FT_UNSUPPORTED;
1382
1383 if (ignore_existing > 0 && statret == 0
1384 && (!is_dir || stype != FT_DIR)) {
1385 if (INFO_GTE(SKIP, 1) && is_dir >= 0) {
1386 const char *suf = "";
1387 if (INFO_GTE(SKIP, 2)) {
1388 if (ftype != stype)
1389 suf = " (type change)";
1390 else if (!quick_check_ok(ftype, fname, file, &sx.st))
1391 suf = always_checksum ? " (sum change)" : " (file change)";
1392 else if (!unchanged_attrs(fname, file, &sx))
1393 suf = " (attr change)";
1394 else
1395 suf = " (uptodate)";
1396 }
1397 rprintf(FINFO, "%s exists%s\n", fname, suf);
1398 }
1399 #ifdef SUPPORT_HARD_LINKS
1400 if (F_IS_HLINKED(file))
1401 handle_skipped_hlink(file, itemizing, code, f_out);
1402 #endif
1403 goto cleanup;
1404 }
1405
1406 fnamecmp = fname;
1407
1408 if (is_dir) {
1409 mode_t added_perms;
1410 if (!implied_dirs && file->flags & FLAG_IMPLIED_DIR)
1411 goto cleanup;
1412 if (am_root < 0) {
1413 /* For --fake-super, the dir must be useable by the copying
1414 * user, just like it would be for root. */
1415 added_perms = S_IRUSR|S_IWUSR|S_IXUSR;
1416 } else
1417 added_perms = 0;
1418 if (is_dir < 0) {
1419 if (!preserve_mtimes || omit_dir_times)
1420 goto cleanup;
1421 /* In inc_recurse mode we want to make sure any missing
1422 * directories get created while we're still processing
1423 * the parent dir (which allows us to touch the parent
1424 * dir's mtime right away). We will handle the dir in
1425 * full later (right before we handle its contents). */
1426 if (statret == 0
1427 && (stype == FT_DIR
1428 || delete_item(fname, sx.st.st_mode, del_opts | DEL_FOR_DIR) != 0))
1429 goto cleanup; /* Any errors get reported later. */
1430 if (do_mkdir(fname, (file->mode|added_perms) & 0700) == 0)
1431 file->flags |= FLAG_DIR_CREATED;
1432 goto cleanup;
1433 }
1434 /* The file to be received is a directory, so we need
1435 * to prepare appropriately. If there is already a
1436 * file of that name and it is *not* a directory, then
1437 * we need to delete it. If it doesn't exist, then
1438 * (perhaps recursively) create it. */
1439 if (statret == 0 && stype != FT_DIR) {
1440 if (delete_item(fname, sx.st.st_mode, del_opts | DEL_FOR_DIR) != 0)
1441 goto skipping_dir_contents;
1442 statret = -1;
1443 }
1444 if (dry_run && statret != 0) {
1445 if (!dry_missing_dir)
1446 dry_missing_dir = file;
1447 file->flags |= FLAG_MISSING_DIR;
1448 }
1449 init_stat_x(&real_sx);
1450 real_sx.st = sx.st;
1451 real_ret = statret;
1452 if (file->flags & FLAG_DIR_CREATED)
1453 statret = -1;
1454 if (!preserve_perms) { /* See comment in non-dir code below. */
1455 file->mode = dest_mode(file->mode, sx.st.st_mode, dflt_perms, statret == 0);
1456 }
1457 if (statret != 0 && basis_dir[0] != NULL) {
1458 int j = try_dests_non(file, fname, ndx, fnamecmpbuf, &sx, itemizing, code);
1459 if (j == -2) {
1460 itemizing = 0;
1461 code = FNONE;
1462 statret = 1;
1463 } else if (j >= 0) {
1464 statret = 1;
1465 fnamecmp = fnamecmpbuf;
1466 }
1467 }
1468 if (itemizing && f_out != -1) {
1469 itemize(fnamecmp, file, ndx, statret, &sx,
1470 statret ? ITEM_LOCAL_CHANGE : 0, 0, NULL);
1471 }
1472 if (real_ret != 0 && do_mkdir(fname,file->mode|added_perms) < 0 && errno != EEXIST) {
1473 if (!relative_paths || errno != ENOENT
1474 || make_path(fname, MKP_DROP_NAME | MKP_SKIP_SLASH) < 0
1475 || (do_mkdir(fname, file->mode|added_perms) < 0 && errno != EEXIST)) {
1476 rsyserr(FERROR_XFER, errno,
1477 "recv_generator: mkdir %s failed",
1478 full_fname(fname));
1479 skipping_dir_contents:
1480 rprintf(FERROR, "*** Skipping any contents from this failed directory ***\n");
1481 skip_dir = file;
1482 file->flags |= FLAG_MISSING_DIR;
1483 goto cleanup;
1484 }
1485 }
1486
1487 #ifdef SUPPORT_XATTRS
1488 if (preserve_xattrs && statret == 1)
1489 copy_xattrs(fnamecmpbuf, fname);
1490 #endif
1491 if (set_file_attrs(fname, file, real_ret ? NULL : &real_sx, NULL, 0)
1492 && INFO_GTE(NAME, 1) && code != FNONE && f_out != -1)
1493 rprintf(code, "%s/\n", fname);
1494
1495 /* We need to ensure that the dirs in the transfer have both
1496 * readable and writable permissions during the time we are
1497 * putting files within them. This is then restored to the
1498 * former permissions after the transfer is done. */
1499 #ifdef HAVE_CHMOD
1500 if (!am_root && (file->mode & S_IRWXU) != S_IRWXU && dir_tweaking) {
1501 mode_t mode = file->mode | S_IRWXU;
1502 if (do_chmod(fname, mode) < 0) {
1503 rsyserr(FERROR_XFER, errno,
1504 "failed to modify permissions on %s",
1505 full_fname(fname));
1506 }
1507 need_retouch_dir_perms = 1;
1508 }
1509 #endif
1510
1511 if (real_ret != 0 && one_file_system)
1512 real_sx.st.st_dev = filesystem_dev;
1513 if (inc_recurse) {
1514 if (one_file_system) {
1515 uint32 *devp = F_DIR_DEV_P(file);
1516 DEV_MAJOR(devp) = major(real_sx.st.st_dev);
1517 DEV_MINOR(devp) = minor(real_sx.st.st_dev);
1518 }
1519 }
1520 else if (delete_during && f_out != -1 && !phase
1521 && !(file->flags & FLAG_MISSING_DIR)) {
1522 if (file->flags & FLAG_CONTENT_DIR)
1523 delete_in_dir(fname, file, real_sx.st.st_dev);
1524 else
1525 change_local_filter_dir(fname, strlen(fname), F_DEPTH(file));
1526 }
1527 prior_dir_file = file;
1528 goto cleanup;
1529 }
1530
1531 /* If we're not preserving permissions, change the file-list's
1532 * mode based on the local permissions and some heuristics. */
1533 if (!preserve_perms) {
1534 int exists = statret == 0 && stype != FT_DIR;
1535 file->mode = dest_mode(file->mode, sx.st.st_mode, dflt_perms, exists);
1536 }
1537
1538 #ifdef SUPPORT_HARD_LINKS
1539 if (preserve_hard_links && F_HLINK_NOT_FIRST(file)
1540 && hard_link_check(file, ndx, fname, statret, &sx, itemizing, code))
1541 goto cleanup;
1542 #endif
1543
1544 if (preserve_links && ftype == FT_SYMLINK) {
1545 #ifdef SUPPORT_LINKS
1546 const char *sl = F_SYMLINK(file);
1547 if (safe_symlinks && unsafe_symlink(sl, fname)) {
1548 if (INFO_GTE(NAME, 1)) {
1549 if (solo_file) {
1550 /* fname contains the destination path, but we
1551 * want to report the source path. */
1552 fname = f_name(file, NULL);
1553 }
1554 rprintf(FINFO,
1555 "ignoring unsafe symlink \"%s\" -> \"%s\"\n",
1556 fname, sl);
1557 }
1558 goto cleanup;
1559 }
1560 if (statret == 0) {
1561 if (stype == FT_SYMLINK && quick_check_ok(stype, fname, file, &sx.st)) {
1562 /* The link is pointing to the right place. */
1563 set_file_attrs(fname, file, &sx, NULL, maybe_ATTRS_REPORT);
1564 if (itemizing)
1565 itemize(fname, file, ndx, 0, &sx, 0, 0, NULL);
1566 #ifdef SUPPORT_HARD_LINKS
1567 if (preserve_hard_links && F_IS_HLINKED(file))
1568 finish_hard_link(file, fname, ndx, &sx.st, itemizing, code, -1);
1569 #endif
1570 if (remove_source_files == 1)
1571 goto return_with_success;
1572 goto cleanup;
1573 }
1574 } else if (basis_dir[0] != NULL) {
1575 int j = try_dests_non(file, fname, ndx, fnamecmpbuf, &sx, itemizing, code);
1576 if (j == -2) {
1577 #ifndef CAN_HARDLINK_SYMLINK
1578 if (alt_dest_type == LINK_DEST) {
1579 /* Resort to --copy-dest behavior. */
1580 } else
1581 #endif
1582 if (alt_dest_type != COPY_DEST)
1583 goto cleanup;
1584 itemizing = 0;
1585 code = FNONE;
1586 } else if (j >= 0) {
1587 statret = 1;
1588 fnamecmp = fnamecmpbuf;
1589 }
1590 }
1591 if (atomic_create(file, fname, sl, NULL, MAKEDEV(0, 0), &sx, statret == 0 ? DEL_FOR_SYMLINK : 0)) {
1592 set_file_attrs(fname, file, NULL, NULL, 0);
1593 if (itemizing) {
1594 if (statret == 0 && stype != FT_SYMLINK)
1595 statret = -1;
1596 itemize(fnamecmp, file, ndx, statret, &sx,
1597 ITEM_LOCAL_CHANGE|ITEM_REPORT_CHANGE, 0, NULL);
1598 }
1599 if (code != FNONE && INFO_GTE(NAME, 1))
1600 rprintf(code, "%s -> %s\n", fname, sl);
1601 #ifdef SUPPORT_HARD_LINKS
1602 if (preserve_hard_links && F_IS_HLINKED(file))
1603 finish_hard_link(file, fname, ndx, NULL, itemizing, code, -1);
1604 #endif
1605 /* This does not check remove_source_files == 1
1606 * because this is one of the items that the old
1607 * --remove-sent-files option would remove. */
1608 if (remove_source_files)
1609 goto return_with_success;
1610 }
1611 #endif
1612 goto cleanup;
1613 }
1614
1615 if ((am_root && preserve_devices && ftype == FT_DEVICE)
1616 || (preserve_specials && ftype == FT_SPECIAL)) {
1617 dev_t rdev;
1618 int del_for_flag;
1619 if (ftype == FT_DEVICE) {
1620 uint32 *devp = F_RDEV_P(file);
1621 rdev = MAKEDEV(DEV_MAJOR(devp), DEV_MINOR(devp));
1622 del_for_flag = DEL_FOR_DEVICE;
1623 } else {
1624 rdev = 0;
1625 del_for_flag = DEL_FOR_SPECIAL;
1626 }
1627 if (statret == 0) {
1628 if (ftype != stype)
1629 statret = -1;
1630 else if (quick_check_ok(ftype, fname, file, &sx.st)) {
1631 /* The device or special file is identical. */
1632 set_file_attrs(fname, file, &sx, NULL, maybe_ATTRS_REPORT);
1633 if (itemizing)
1634 itemize(fname, file, ndx, 0, &sx, 0, 0, NULL);
1635 #ifdef SUPPORT_HARD_LINKS
1636 if (preserve_hard_links && F_IS_HLINKED(file))
1637 finish_hard_link(file, fname, ndx, &sx.st, itemizing, code, -1);
1638 #endif
1639 if (remove_source_files == 1)
1640 goto return_with_success;
1641 goto cleanup;
1642 }
1643 } else if (basis_dir[0] != NULL) {
1644 int j = try_dests_non(file, fname, ndx, fnamecmpbuf, &sx, itemizing, code);
1645 if (j == -2) {
1646 #ifndef CAN_HARDLINK_SPECIAL
1647 if (alt_dest_type == LINK_DEST) {
1648 /* Resort to --copy-dest behavior. */
1649 } else
1650 #endif
1651 if (alt_dest_type != COPY_DEST)
1652 goto cleanup;
1653 itemizing = 0;
1654 code = FNONE;
1655 } else if (j >= 0) {
1656 statret = 1;
1657 fnamecmp = fnamecmpbuf;
1658 }
1659 }
1660 if (DEBUG_GTE(GENR, 1)) {
1661 rprintf(FINFO, "mknod(%s, 0%o, [%ld,%ld])\n",
1662 fname, (int)file->mode,
1663 (long)major(rdev), (long)minor(rdev));
1664 }
1665 if (atomic_create(file, fname, NULL, NULL, rdev, &sx, del_for_flag)) {
1666 set_file_attrs(fname, file, NULL, NULL, 0);
1667 if (itemizing) {
1668 itemize(fnamecmp, file, ndx, statret, &sx,
1669 ITEM_LOCAL_CHANGE|ITEM_REPORT_CHANGE, 0, NULL);
1670 }
1671 if (code != FNONE && INFO_GTE(NAME, 1))
1672 rprintf(code, "%s\n", fname);
1673 #ifdef SUPPORT_HARD_LINKS
1674 if (preserve_hard_links && F_IS_HLINKED(file))
1675 finish_hard_link(file, fname, ndx, NULL, itemizing, code, -1);
1676 #endif
1677 if (remove_source_files == 1)
1678 goto return_with_success;
1679 }
1680 goto cleanup;
1681 }
1682
1683 if (ftype != FT_REG) {
1684 if (INFO_GTE(NONREG, 1)) {
1685 if (solo_file)
1686 fname = f_name(file, NULL);
1687 rprintf(FINFO, "skipping non-regular file \"%s\"\n", fname);
1688 }
1689 goto cleanup;
1690 }
1691
1692 if (max_size >= 0 && F_LENGTH(file) > max_size) {
1693 if (INFO_GTE(SKIP, 1)) {
1694 if (solo_file)
1695 fname = f_name(file, NULL);
1696 rprintf(FINFO, "%s is over max-size\n", fname);
1697 }
1698 goto cleanup;
1699 }
1700 if (min_size >= 0 && F_LENGTH(file) < min_size) {
1701 if (INFO_GTE(SKIP, 1)) {
1702 if (solo_file)
1703 fname = f_name(file, NULL);
1704 rprintf(FINFO, "%s is under min-size\n", fname);
1705 }
1706 goto cleanup;
1707 }
1708
1709 if (update_only > 0 && statret == 0 && file->modtime - sx.st.st_mtime < modify_window) {
1710 if (INFO_GTE(SKIP, 1))
1711 rprintf(FINFO, "%s is newer\n", fname);
1712 #ifdef SUPPORT_HARD_LINKS
1713 if (F_IS_HLINKED(file))
1714 handle_skipped_hlink(file, itemizing, code, f_out);
1715 #endif
1716 goto cleanup;
1717 }
1718
1719 fnamecmp_type = FNAMECMP_FNAME;
1720
1721 if (statret == 0 && !(stype == FT_REG || (write_devices && stype == FT_DEVICE))) {
1722 if (delete_item(fname, sx.st.st_mode, del_opts | DEL_FOR_FILE) != 0)
1723 goto cleanup;
1724 statret = -1;
1725 stat_errno = ENOENT;
1726 }
1727
1728 if (basis_dir[0] != NULL && (statret != 0 || alt_dest_type != COPY_DEST)) {
1729 int j = try_dests_reg(file, fname, ndx, fnamecmpbuf, &sx, statret == 0, itemizing, code);
1730 if (j == -2) {
1731 if (remove_source_files == 1)
1732 goto return_with_success;
1733 goto cleanup;
1734 }
1735 if (j >= 0) {
1736 fnamecmp = fnamecmpbuf;
1737 fnamecmp_type = j;
1738 statret = 0;
1739 }
1740 }
1741
1742 init_stat_x(&real_sx);
1743 real_sx.st = sx.st; /* Don't copy xattr/acl pointers, as they would free wrong. */
1744 real_ret = statret;
1745
1746 if (partial_dir && (partialptr = partial_dir_fname(fname)) != NULL
1747 && link_stat(partialptr, &partial_st, 0) == 0
1748 && S_ISREG(partial_st.st_mode)) {
1749 if (statret != 0)
1750 goto prepare_to_open;
1751 } else
1752 partialptr = NULL;
1753
1754 if (statret != 0 && fuzzy_basis) {
1755 if (need_fuzzy_dirlist) {
1756 const char *dn = file->dirname ? file->dirname : ".";
1757 int i;
1758 strlcpy(fnamecmpbuf, dn, sizeof fnamecmpbuf);
1759 for (i = 0; i < fuzzy_basis; i++) {
1760 if (i && pathjoin(fnamecmpbuf, MAXPATHLEN, basis_dir[i-1], dn) >= MAXPATHLEN)
1761 continue;
1762 fuzzy_dirlist[i] = get_dirlist(fnamecmpbuf, -1, GDL_IGNORE_FILTER_RULES | GDL_PERHAPS_DIR);
1763 if (fuzzy_dirlist[i] && fuzzy_dirlist[i]->used == 0) {
1764 flist_free(fuzzy_dirlist[i]);
1765 fuzzy_dirlist[i] = NULL;
1766 }
1767 }
1768 need_fuzzy_dirlist = 0;
1769 }
1770
1771 /* Sets fnamecmp_type to FNAMECMP_FUZZY or above. */
1772 fuzzy_file = find_fuzzy(file, fuzzy_dirlist, &fnamecmp_type);
1773 if (fuzzy_file) {
1774 f_name(fuzzy_file, fnamecmpbuf);
1775 if (DEBUG_GTE(FUZZY, 1)) {
1776 rprintf(FINFO, "fuzzy basis selected for %s: %s\n",
1777 fname, fnamecmpbuf);
1778 }
1779 sx.st.st_size = F_LENGTH(fuzzy_file);
1780 statret = 0;
1781 fnamecmp = fnamecmpbuf;
1782 }
1783 }
1784
1785 if (statret != 0) {
1786 #ifdef SUPPORT_HARD_LINKS
1787 if (preserve_hard_links && F_HLINK_NOT_LAST(file)) {
1788 cur_flist->in_progress++;
1789 goto cleanup;
1790 }
1791 #endif
1792 if (stat_errno == ENOENT)
1793 goto notify_others;
1794 rsyserr(FERROR_XFER, stat_errno, "recv_generator: failed to stat %s",
1795 full_fname(fname));
1796 goto cleanup;
1797 }
1798
1799 if (write_devices && IS_DEVICE(sx.st.st_mode) && sx.st.st_size == 0) {
1800 /* This early open into fd skips the regular open below. */
1801 if ((fd = do_open(fnamecmp, O_RDONLY, 0)) >= 0)
1802 real_sx.st.st_size = sx.st.st_size = get_device_size(fd, fnamecmp);
1803 }
1804
1805 if (fnamecmp_type <= FNAMECMP_BASIS_DIR_HIGH)
1806 ;
1807 else if (fnamecmp_type >= FNAMECMP_FUZZY)
1808 ;
1809 else if (quick_check_ok(FT_REG, fnamecmp, file, &sx.st)) {
1810 if (partialptr) {
1811 do_unlink(partialptr);
1812 handle_partial_dir(partialptr, PDIR_DELETE);
1813 }
1814 set_file_attrs(fname, file, &sx, NULL, maybe_ATTRS_REPORT | maybe_ATTRS_ACCURATE_TIME);
1815 if (itemizing)
1816 itemize(fnamecmp, file, ndx, statret, &sx, 0, 0, NULL);
1817 #ifdef SUPPORT_HARD_LINKS
1818 if (preserve_hard_links && F_IS_HLINKED(file))
1819 finish_hard_link(file, fname, ndx, &sx.st, itemizing, code, -1);
1820 #endif
1821 if (remove_source_files != 1)
1822 goto cleanup;
1823 return_with_success:
1824 if (!dry_run)
1825 send_msg_success(fname, ndx);
1826 goto cleanup;
1827 }
1828
1829 if (append_mode > 0 && sx.st.st_size >= F_LENGTH(file)) {
1830 #ifdef SUPPORT_HARD_LINKS
1831 if (F_IS_HLINKED(file))
1832 handle_skipped_hlink(file, itemizing, code, f_out);
1833 #endif
1834 goto cleanup;
1835 }
1836
1837 prepare_to_open:
1838 if (partialptr) {
1839 sx.st = partial_st;
1840 fnamecmp = partialptr;
1841 fnamecmp_type = FNAMECMP_PARTIAL_DIR;
1842 statret = 0;
1843 }
1844
1845 if (!do_xfers)
1846 goto notify_others;
1847
1848 if (read_batch || whole_file) {
1849 if (inplace && make_backups > 0 && fnamecmp_type == FNAMECMP_FNAME) {
1850 if (!(backupptr = get_backup_name(fname)))
1851 goto cleanup;
1852 if (!(back_file = make_file(fname, NULL, NULL, 0, NO_FILTERS)))
1853 goto pretend_missing;
1854 if (copy_file(fname, backupptr, -1, back_file->mode) < 0) {
1855 unmake_file(back_file);
1856 back_file = NULL;
1857 goto cleanup;
1858 }
1859 }
1860 goto notify_others;
1861 }
1862
1863 if (fuzzy_dirlist[0]) {
1864 int j = flist_find(fuzzy_dirlist[0], file);
1865 if (j >= 0) /* don't use changing file as future fuzzy basis */
1866 fuzzy_dirlist[0]->files[j]->flags |= FLAG_FILE_SENT;
1867 }
1868
1869 /* open the file */
1870 if (fd < 0 && (fd = do_open(fnamecmp, O_RDONLY, 0)) < 0) {
1871 rsyserr(FERROR, errno, "failed to open %s, continuing",
1872 full_fname(fnamecmp));
1873 pretend_missing:
1874 /* pretend the file didn't exist */
1875 #ifdef SUPPORT_HARD_LINKS
1876 if (preserve_hard_links && F_HLINK_NOT_LAST(file)) {
1877 cur_flist->in_progress++;
1878 goto cleanup;
1879 }
1880 #endif
1881 statret = real_ret = -1;
1882 goto notify_others;
1883 }
1884
1885 if (inplace && make_backups > 0 && fnamecmp_type == FNAMECMP_FNAME) {
1886 if (!(backupptr = get_backup_name(fname))) {
1887 goto cleanup;
1888 }
1889 if (!(back_file = make_file(fname, NULL, NULL, 0, NO_FILTERS))) {
1890 goto pretend_missing;
1891 }
1892 if (robust_unlink(backupptr) && errno != ENOENT) {
1893 rsyserr(FERROR_XFER, errno, "unlink %s",
1894 full_fname(backupptr));
1895 unmake_file(back_file);
1896 back_file = NULL;
1897 goto cleanup;
1898 }
1899 if ((f_copy = do_open(backupptr, O_WRONLY | O_CREAT | O_TRUNC | O_EXCL, 0600)) < 0) {
1900 rsyserr(FERROR_XFER, errno, "open %s", full_fname(backupptr));
1901 unmake_file(back_file);
1902 back_file = NULL;
1903 goto cleanup;
1904 }
1905 fnamecmp_type = FNAMECMP_BACKUP;
1906 }
1907
1908 if (DEBUG_GTE(DELTASUM, 3)) {
1909 rprintf(FINFO, "gen mapped %s of size %s\n",
1910 fnamecmp, big_num(sx.st.st_size));
1911 }
1912
1913 if (DEBUG_GTE(DELTASUM, 2))
1914 rprintf(FINFO, "generating and sending sums for %d\n", ndx);
1915
1916 notify_others:
1917 if (remove_source_files && !delay_updates && !phase && !dry_run)
1918 increment_active_files(ndx, itemizing, code);
1919 if (inc_recurse && (!dry_run || write_batch < 0))
1920 cur_flist->in_progress++;
1921 #ifdef SUPPORT_HARD_LINKS
1922 if (preserve_hard_links && F_IS_HLINKED(file))
1923 file->flags |= FLAG_FILE_SENT;
1924 #endif
1925 write_ndx(f_out, ndx);
1926 if (itemizing) {
1927 int iflags = ITEM_TRANSFER;
1928 if (always_checksum > 0)
1929 iflags |= ITEM_REPORT_CHANGE;
1930 if (fnamecmp_type != FNAMECMP_FNAME)
1931 iflags |= ITEM_BASIS_TYPE_FOLLOWS;
1932 if (fnamecmp_type >= FNAMECMP_FUZZY)
1933 iflags |= ITEM_XNAME_FOLLOWS;
1934 itemize(fnamecmp, file, -1, real_ret, &real_sx, iflags, fnamecmp_type,
1935 fuzzy_file ? fuzzy_file->basename : NULL);
1936 free_stat_x(&real_sx);
1937 }
1938
1939 if (!do_xfers) {
1940 #ifdef SUPPORT_HARD_LINKS
1941 if (preserve_hard_links && F_IS_HLINKED(file))
1942 finish_hard_link(file, fname, ndx, &sx.st, itemizing, code, -1);
1943 #endif
1944 goto cleanup;
1945 }
1946 if (read_batch)
1947 goto cleanup;
1948
1949 if (statret != 0 || whole_file)
1950 write_sum_head(f_out, NULL);
1951 else if (sx.st.st_size <= 0) {
1952 write_sum_head(f_out, NULL);
1953 } else {
1954 if (generate_and_send_sums(fd, sx.st.st_size, f_out, f_copy) < 0) {
1955 rprintf(FWARNING,
1956 "WARNING: file is too large for checksum sending: %s\n",
1957 fnamecmp);
1958 write_sum_head(f_out, NULL);
1959 }
1960 }
1961
1962 cleanup:
1963 if (fd >= 0)
1964 close(fd);
1965 if (back_file) {
1966 int save_preserve_xattrs = preserve_xattrs;
1967 if (f_copy >= 0)
1968 close(f_copy);
1969 #ifdef SUPPORT_XATTRS
1970 if (preserve_xattrs) {
1971 copy_xattrs(fname, backupptr);
1972 preserve_xattrs = 0;
1973 }
1974 #endif
1975 set_file_attrs(backupptr, back_file, NULL, NULL, 0);
1976 preserve_xattrs = save_preserve_xattrs;
1977 if (INFO_GTE(BACKUP, 1)) {
1978 rprintf(FINFO, "backed up %s to %s\n",
1979 fname, backupptr);
1980 }
1981 unmake_file(back_file);
1982 }
1983
1984 free_stat_x(&sx);
1985 }
1986
1987 /* If we are replacing an existing hard link, symlink, device, or special file,
1988 * create a temp-name item and rename it into place. A symlimk specifies slnk,
1989 * a hard link specifies hlnk, otherwise we create a device based on rdev.
1990 * Specify 0 for the del_for_flag if there is not a file to replace. This
1991 * returns 1 on success and 0 on failure. */
1992 int atomic_create(struct file_struct *file, char *fname, const char *slnk, const char *hlnk,
1993 dev_t rdev, stat_x *sxp, int del_for_flag)
1994 {
1995 char tmpname[MAXPATHLEN];
1996 const char *create_name;
1997 int skip_atomic, dir_in_the_way = del_for_flag && S_ISDIR(sxp->st.st_mode);
1998
1999 if (!del_for_flag || dir_in_the_way || tmpdir || !get_tmpname(tmpname, fname, True))
2000 skip_atomic = 1;
2001 else
2002 skip_atomic = 0;
2003
2004 if (del_for_flag) {
2005 if (make_backups > 0 && !dir_in_the_way) {
2006 if (!make_backup(fname, skip_atomic))
2007 return 0;
2008 } else if (skip_atomic) {
2009 int del_opts = delete_mode || force_delete ? DEL_RECURSE : 0;
2010 if (delete_item(fname, sxp->st.st_mode, del_opts | del_for_flag) != 0)
2011 return 0;
2012 }
2013 }
2014
2015 create_name = skip_atomic ? fname : tmpname;
2016
2017 if (slnk) {
2018 #ifdef SUPPORT_LINKS
2019 if (do_symlink(slnk, create_name) < 0) {
2020 rsyserr(FERROR_XFER, errno, "symlink %s -> \"%s\" failed",
2021 full_fname(create_name), slnk);
2022 return 0;
2023 }
2024 #else
2025 return 0;
2026 #endif
2027 } else if (hlnk) {
2028 #ifdef SUPPORT_HARD_LINKS
2029 if (!hard_link_one(file, create_name, hlnk, 0))
2030 return 0;
2031 #else
2032 return 0;
2033 #endif
2034 } else {
2035 if (do_mknod(create_name, file->mode, rdev) < 0) {
2036 rsyserr(FERROR_XFER, errno, "mknod %s failed",
2037 full_fname(create_name));
2038 return 0;
2039 }
2040 }
2041
2042 if (!skip_atomic) {
2043 if (do_rename(tmpname, fname) < 0) {
2044 rsyserr(FERROR_XFER, errno, "rename %s -> \"%s\" failed",
2045 full_fname(tmpname), full_fname(fname));
2046 do_unlink(tmpname);
2047 return 0;
2048 }
2049 }
2050
2051 return 1;
2052 }
2053
2054 #ifdef SUPPORT_HARD_LINKS
2055 static void handle_skipped_hlink(struct file_struct *file, int itemizing,
2056 enum logcode code, int f_out)
2057 {
2058 char fbuf[MAXPATHLEN];
2059 int new_last_ndx;
2060 struct file_list *save_flist = cur_flist;
2061
2062 /* If we skip the last item in a chain of links and there was a
2063 * prior non-skipped hard-link waiting to finish, finish it now. */
2064 if ((new_last_ndx = skip_hard_link(file, &cur_flist)) < 0)
2065 return;
2066
2067 file = cur_flist->files[new_last_ndx - cur_flist->ndx_start];
2068 cur_flist->in_progress--; /* undo prior increment */
2069 f_name(file, fbuf);
2070 recv_generator(fbuf, file, new_last_ndx, itemizing, code, f_out);
2071
2072 cur_flist = save_flist;
2073 }
2074 #endif
2075
2076 static void touch_up_dirs(struct file_list *flist, int ndx)
2077 {
2078 static int counter = 0;
2079 struct file_struct *file;
2080 char *fname;
2081 BOOL fix_dir_perms;
2082 int i, start, end;
2083
2084 if (ndx < 0) {
2085 start = 0;
2086 end = flist->used - 1;
2087 } else
2088 start = end = ndx;
2089
2090 /* Fix any directory permissions that were modified during the
2091 * transfer and/or re-set any tweaked modified-time values. */
2092 for (i = start; i <= end; i++, counter++) {
2093 file = flist->files[i];
2094 if (!F_IS_ACTIVE(file))
2095 continue;
2096 if (!S_ISDIR(file->mode)
2097 || (!implied_dirs && file->flags & FLAG_IMPLIED_DIR))
2098 continue;
2099 if (DEBUG_GTE(TIME, 2)) {
2100 fname = f_name(file, NULL);
2101 rprintf(FINFO, "touch_up_dirs: %s (%d)\n",
2102 NS(fname), i);
2103 }
2104 /* Be sure not to retouch permissions with --fake-super. */
2105 fix_dir_perms = !am_root && !(file->mode & S_IWUSR);
2106 if (file->flags & FLAG_MISSING_DIR || !(need_retouch_dir_times || fix_dir_perms))
2107 continue;
2108 fname = f_name(file, NULL);
2109 if (fix_dir_perms)
2110 do_chmod(fname, file->mode);
2111 if (need_retouch_dir_times) {
2112 STRUCT_STAT st;
2113 if (link_stat(fname, &st, 0) == 0 && mtime_differs(&st, file)) {
2114 st.st_mtime = file->modtime;
2115 #ifdef ST_MTIME_NSEC
2116 st.ST_MTIME_NSEC = F_MOD_NSEC_or_0(file);
2117 #endif
2118 set_times(fname, &st);
2119 }
2120 }
2121 if (counter >= loopchk_limit) {
2122 if (allowed_lull)
2123 maybe_send_keepalive(time(NULL), MSK_ALLOW_FLUSH);
2124 else
2125 maybe_flush_socket(0);
2126 counter = 0;
2127 }
2128 }
2129 }
2130
2131 void check_for_finished_files(int itemizing, enum logcode code, int check_redo)
2132 {
2133 struct file_struct *file;
2134 struct file_list *flist;
2135 char fbuf[MAXPATHLEN];
2136 int ndx;
2137
2138 while (1) {
2139 #ifdef SUPPORT_HARD_LINKS
2140 if (preserve_hard_links && (ndx = get_hlink_num()) != -1) {
2141 int send_failed = (ndx == -2);
2142 if (send_failed)
2143 ndx = get_hlink_num();
2144 flist = flist_for_ndx(ndx, "check_for_finished_files.1");
2145 file = flist->files[ndx - flist->ndx_start];
2146 assert(file->flags & FLAG_HLINKED);
2147 if (send_failed)
2148 handle_skipped_hlink(file, itemizing, code, sock_f_out);
2149 else
2150 finish_hard_link(file, f_name(file, fbuf), ndx, NULL, itemizing, code, -1);
2151 flist->in_progress--;
2152 continue;
2153 }
2154 #endif
2155
2156 if (check_redo && (ndx = get_redo_num()) != -1) {
2157 OFF_T save_max_size = max_size;
2158 OFF_T save_min_size = min_size;
2159 csum_length = SUM_LENGTH;
2160 max_size = -1;
2161 min_size = -1;
2162 ignore_existing = -ignore_existing;
2163 ignore_non_existing = -ignore_non_existing;
2164 update_only = -update_only;
2165 always_checksum = -always_checksum;
2166 size_only = -size_only;
2167 append_mode = -append_mode;
2168 make_backups = -make_backups; /* avoid dup backup w/inplace */
2169 ignore_times++;
2170
2171 flist = cur_flist;
2172 cur_flist = flist_for_ndx(ndx, "check_for_finished_files.2");
2173
2174 file = cur_flist->files[ndx - cur_flist->ndx_start];
2175 if (solo_file)
2176 strlcpy(fbuf, solo_file, sizeof fbuf);
2177 else
2178 f_name(file, fbuf);
2179 recv_generator(fbuf, file, ndx, itemizing, code, sock_f_out);
2180 cur_flist->to_redo--;
2181
2182 cur_flist = flist;
2183
2184 csum_length = SHORT_SUM_LENGTH;
2185 max_size = save_max_size;
2186 min_size = save_min_size;
2187 ignore_existing = -ignore_existing;
2188 ignore_non_existing = -ignore_non_existing;
2189 update_only = -update_only;
2190 always_checksum = -always_checksum;
2191 size_only = -size_only;
2192 append_mode = -append_mode;
2193 make_backups = -make_backups;
2194 ignore_times--;
2195 continue;
2196 }
2197
2198 if (cur_flist == first_flist)
2199 break;
2200
2201 /* We only get here if inc_recurse is enabled. */
2202 if (first_flist->in_progress || first_flist->to_redo)
2203 break;
2204
2205 write_ndx(sock_f_out, NDX_DONE);
2206 if (!read_batch && !flist_eof) {
2207 int old_total = 0;
2208 for (flist = first_flist; flist != cur_flist; flist = flist->next)
2209 old_total += flist->used;
2210 maybe_flush_socket(!flist_eof && file_total - old_total < MIN_FILECNT_LOOKAHEAD/2);
2211 }
2212
2213 if (delete_during == 2 || !dir_tweaking) {
2214 /* Skip directory touch-up. */
2215 } else if (first_flist->parent_ndx >= 0)
2216 touch_up_dirs(dir_flist, first_flist->parent_ndx);
2217
2218 flist_free(first_flist); /* updates first_flist */
2219 }
2220 }
2221
2222 void generate_files(int f_out, const char *local_name)
2223 {
2224 int i, ndx, next_loopchk = 0;
2225 char fbuf[MAXPATHLEN];
2226 int itemizing;
2227 enum logcode code;
2228 int save_info_flist = info_levels[INFO_FLIST];
2229 int save_info_progress = info_levels[INFO_PROGRESS];
2230
2231 if (protocol_version >= 29) {
2232 itemizing = 1;
2233 maybe_ATTRS_REPORT = stdout_format_has_i ? 0 : ATTRS_REPORT;
2234 code = logfile_format_has_i ? FNONE : FLOG;
2235 } else if (am_daemon) {
2236 itemizing = logfile_format_has_i && do_xfers;
2237 maybe_ATTRS_REPORT = ATTRS_REPORT;
2238 code = itemizing || !do_xfers ? FCLIENT : FINFO;
2239 } else if (!am_server) {
2240 itemizing = stdout_format_has_i;
2241 maybe_ATTRS_REPORT = stdout_format_has_i ? 0 : ATTRS_REPORT;
2242 code = itemizing ? FNONE : FINFO;
2243 } else {
2244 itemizing = 0;
2245 maybe_ATTRS_REPORT = ATTRS_REPORT;
2246 code = FINFO;
2247 }
2248 solo_file = local_name;
2249 dir_tweaking = !(list_only || solo_file || dry_run);
2250 need_retouch_dir_times = preserve_mtimes && !omit_dir_times;
2251 loopchk_limit = allowed_lull ? allowed_lull * 5 : 200;
2252 symlink_timeset_failed_flags = ITEM_REPORT_TIME
2253 | (protocol_version >= 30 || !am_server ? ITEM_REPORT_TIMEFAIL : 0);
2254 implied_dirs_are_missing = relative_paths && !implied_dirs && protocol_version < 30;
2255
2256 if (DEBUG_GTE(GENR, 1))
2257 rprintf(FINFO, "generator starting pid=%d\n", (int)getpid());
2258
2259 if (delete_before && !solo_file && cur_flist->used > 0)
2260 do_delete_pass();
2261 if (delete_during == 2) {
2262 deldelay_size = BIGPATHBUFLEN * 4;
2263 deldelay_buf = new_array(char, deldelay_size);
2264 }
2265 info_levels[INFO_FLIST] = info_levels[INFO_PROGRESS] = 0;
2266
2267 if (append_mode > 0 || whole_file < 0)
2268 whole_file = 0;
2269 if (DEBUG_GTE(FLIST, 1)) {
2270 rprintf(FINFO, "delta-transmission %s\n",
2271 whole_file
2272 ? "disabled for local transfer or --whole-file"
2273 : "enabled");
2274 }
2275
2276 dflt_perms = (ACCESSPERMS & ~orig_umask);
2277
2278 do {
2279 #ifdef SUPPORT_HARD_LINKS
2280 if (preserve_hard_links && inc_recurse) {
2281 while (!flist_eof && file_total < MIN_FILECNT_LOOKAHEAD/2)
2282 wait_for_receiver();
2283 }
2284 #endif
2285
2286 if (inc_recurse && cur_flist->parent_ndx >= 0) {
2287 struct file_struct *fp = dir_flist->files[cur_flist->parent_ndx];
2288 if (solo_file)
2289 strlcpy(fbuf, solo_file, sizeof fbuf);
2290 else
2291 f_name(fp, fbuf);
2292 ndx = cur_flist->ndx_start - 1;
2293 recv_generator(fbuf, fp, ndx, itemizing, code, f_out);
2294 if (delete_during && dry_run < 2 && !list_only
2295 && !(fp->flags & FLAG_MISSING_DIR)) {
2296 if (fp->flags & FLAG_CONTENT_DIR) {
2297 dev_t dirdev;
2298 if (one_file_system) {
2299 uint32 *devp = F_DIR_DEV_P(fp);
2300 dirdev = MAKEDEV(DEV_MAJOR(devp), DEV_MINOR(devp));
2301 } else
2302 dirdev = MAKEDEV(0, 0);
2303 delete_in_dir(fbuf, fp, dirdev);
2304 } else
2305 change_local_filter_dir(fbuf, strlen(fbuf), F_DEPTH(fp));
2306 }
2307 }
2308 for (i = cur_flist->low; i <= cur_flist->high; i++) {
2309 struct file_struct *file = cur_flist->sorted[i];
2310
2311 if (!F_IS_ACTIVE(file))
2312 continue;
2313
2314 if (unsort_ndx)
2315 ndx = F_NDX(file);
2316 else
2317 ndx = i + cur_flist->ndx_start;
2318
2319 if (solo_file)
2320 strlcpy(fbuf, solo_file, sizeof fbuf);
2321 else
2322 f_name(file, fbuf);
2323 recv_generator(fbuf, file, ndx, itemizing, code, f_out);
2324
2325 check_for_finished_files(itemizing, code, 0);
2326
2327 if (i + cur_flist->ndx_start >= next_loopchk) {
2328 if (allowed_lull)
2329 maybe_send_keepalive(time(NULL), MSK_ALLOW_FLUSH);
2330 else
2331 maybe_flush_socket(0);
2332 next_loopchk += loopchk_limit;
2333 }
2334 }
2335
2336 if (!inc_recurse) {
2337 write_ndx(f_out, NDX_DONE);
2338 break;
2339 }
2340
2341 while (1) {
2342 check_for_finished_files(itemizing, code, 1);
2343 if (cur_flist->next || flist_eof)
2344 break;
2345 wait_for_receiver();
2346 }
2347 } while ((cur_flist = cur_flist->next) != NULL);
2348
2349 if (delete_during)
2350 delete_in_dir(NULL, NULL, dev_zero);
2351 phase++;
2352 if (DEBUG_GTE(GENR, 1))
2353 rprintf(FINFO, "generate_files phase=%d\n", phase);
2354
2355 while (1) {
2356 check_for_finished_files(itemizing, code, 1);
2357 if (msgdone_cnt)
2358 break;
2359 wait_for_receiver();
2360 }
2361
2362 phase++;
2363 if (DEBUG_GTE(GENR, 1))
2364 rprintf(FINFO, "generate_files phase=%d\n", phase);
2365
2366 write_ndx(f_out, NDX_DONE);
2367
2368 /* Reduce round-trip lag-time for a useless delay-updates phase. */
2369 if (protocol_version >= 29 && EARLY_DELAY_DONE_MSG())
2370 write_ndx(f_out, NDX_DONE);
2371
2372 if (protocol_version >= 31 && EARLY_DELETE_DONE_MSG()) {
2373 if ((INFO_GTE(STATS, 2) && (delete_mode || force_delete)) || read_batch)
2374 write_del_stats(f_out);
2375 if (EARLY_DELAY_DONE_MSG()) /* Can't send this before delay */
2376 write_ndx(f_out, NDX_DONE);
2377 }
2378
2379 /* Read MSG_DONE for the redo phase (and any prior messages). */
2380 while (1) {
2381 check_for_finished_files(itemizing, code, 0);
2382 if (msgdone_cnt > 1)
2383 break;
2384 wait_for_receiver();
2385 }
2386
2387 if (protocol_version >= 29) {
2388 phase++;
2389 if (DEBUG_GTE(GENR, 1))
2390 rprintf(FINFO, "generate_files phase=%d\n", phase);
2391 if (!EARLY_DELAY_DONE_MSG()) {
2392 write_ndx(f_out, NDX_DONE);
2393 if (protocol_version >= 31 && EARLY_DELETE_DONE_MSG())
2394 write_ndx(f_out, NDX_DONE);
2395 }
2396 /* Read MSG_DONE for delay-updates phase & prior messages. */
2397 while (msgdone_cnt == 2)
2398 wait_for_receiver();
2399 }
2400
2401 info_levels[INFO_FLIST] = save_info_flist;
2402 info_levels[INFO_PROGRESS] = save_info_progress;
2403
2404 if (delete_during == 2)
2405 do_delayed_deletions(fbuf);
2406 if (delete_after && !solo_file && file_total > 0)
2407 do_delete_pass();
2408
2409 if (max_delete >= 0 && skipped_deletes) {
2410 rprintf(FWARNING,
2411 "Deletions stopped due to --max-delete limit (%d skipped)\n",
2412 skipped_deletes);
2413 io_error |= IOERR_DEL_LIMIT;
2414 }
2415
2416 if (protocol_version >= 31) {
2417 if (!EARLY_DELETE_DONE_MSG()) {
2418 if (INFO_GTE(STATS, 2) || read_batch)
2419 write_del_stats(f_out);
2420 write_ndx(f_out, NDX_DONE);
2421 }
2422
2423 /* Read MSG_DONE for late-delete phase & prior messages. */
2424 while (msgdone_cnt == 3)
2425 wait_for_receiver();
2426 }
2427
2428 if ((need_retouch_dir_perms || need_retouch_dir_times)
2429 && dir_tweaking && (!inc_recurse || delete_during == 2))
2430 touch_up_dirs(dir_flist, -1);
2431
2432 if (DEBUG_GTE(GENR, 1))
2433 rprintf(FINFO, "generate_files finished\n");
2434 }
rsync: a fast, versatile, remote (and local) file-copying tool