2 * Generate and receive file lists.
4 * Copyright (C) 1996 Andrew Tridgell
5 * Copyright (C) 1996 Paul Mackerras
6 * Copyright (C) 2001, 2002 Martin Pool <mbp@samba.org>
7 * Copyright (C) 2002-2014 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.
33 extern int am_generator
;
34 extern int inc_recurse
;
35 extern int always_checksum
;
37 extern int ignore_errors
;
38 extern int numeric_ids
;
42 extern int filesfrom_fd
;
43 extern int one_file_system
;
44 extern int copy_dirlinks
;
45 extern int preserve_uid
;
46 extern int preserve_gid
;
47 extern int preserve_acls
;
48 extern int preserve_xattrs
;
49 extern int preserve_links
;
50 extern int preserve_hard_links
;
51 extern int preserve_devices
;
52 extern int preserve_specials
;
53 extern int delete_during
;
54 extern int missing_args
;
56 extern int relative_paths
;
57 extern int implied_dirs
;
58 extern int ignore_perishable
;
59 extern int non_perishable_cnt
;
60 extern int prune_empty_dirs
;
61 extern int copy_links
;
62 extern int copy_unsafe_links
;
63 extern int protocol_version
;
64 extern int sanitize_paths
;
65 extern int munge_symlinks
;
66 extern int use_safe_inc_flist
;
67 extern int need_unsorted_flist
;
68 extern int sender_symlink_iconv
;
69 extern int output_needs_newline
;
70 extern int sender_keeps_checksum
;
71 extern int unsort_ndx
;
73 extern struct stats stats
;
74 extern char *filesfrom_host
;
75 extern char *usermap
, *groupmap
;
77 extern char curr_dir
[MAXPATHLEN
];
79 extern struct chmod_mode_struct
*chmod_modes
;
81 extern filter_rule_list filter_list
;
82 extern filter_rule_list daemon_filter_list
;
85 extern int filesfrom_convert
;
86 extern iconv_t ic_send
, ic_recv
;
89 #define PTR_SIZE (sizeof (struct file_struct *))
93 dev_t filesystem_dev
; /* used to implement -x */
95 struct file_list
*cur_flist
, *first_flist
, *dir_flist
;
96 int send_dir_ndx
= -1, send_dir_depth
= -1;
97 int flist_cnt
= 0; /* how many (non-tmp) file list objects exist */
98 int file_total
= 0; /* total of all active items over all file-lists */
99 int file_old_total
= 0; /* total of active items that will soon be gone */
100 int flist_eof
= 0; /* all the file-lists are now known */
102 #define NORMAL_NAME 0
103 #define SLASH_ENDING_NAME 1
104 #define DOTDIR_NAME 2
105 #define MISSING_NAME 3
107 /* Starting from protocol version 26, we always use 64-bit ino_t and dev_t
108 * internally, even if this platform does not allow files to have 64-bit inums.
109 * The only exception is if we're on a platform with no 64-bit type at all.
111 * Because we use read_longint() to get these off the wire, if you transfer
112 * devices or (for protocols < 30) hardlinks with dev or inum > 2**32 to a
113 * machine with no 64-bit types then you will get an overflow error.
115 * Note that if you transfer devices from a 64-bit-devt machine (say, Solaris)
116 * to a 32-bit-devt machine (say, Linux-2.2/x86) then the device numbers will
117 * be truncated. But it's a kind of silly thing to do anyhow. */
119 /* The tmp_* vars are used as a cache area by make_file() to store data
120 * that the sender doesn't need to remember in its file list. The data
121 * will survive just long enough to be used by send_file_entry(). */
122 static dev_t tmp_rdev
;
123 #ifdef SUPPORT_HARD_LINKS
124 static int64 tmp_dev
= -1, tmp_ino
;
126 static char tmp_sum
[MAX_DIGEST_LEN
];
128 static char empty_sum
[MAX_DIGEST_LEN
];
129 static int flist_count_offset
; /* for --delete --progress */
131 static void flist_sort_and_clean(struct file_list
*flist
, int strip_root
);
132 static void output_flist(struct file_list
*flist
);
134 void init_flist(void)
136 if (DEBUG_GTE(FLIST
, 4)) {
137 rprintf(FINFO
, "FILE_STRUCT_LEN=%d, EXTRA_LEN=%d\n",
138 (int)FILE_STRUCT_LEN
, (int)EXTRA_LEN
);
140 checksum_len
= protocol_version
< 21 ? 2
141 : protocol_version
< 30 ? MD4_DIGEST_LEN
145 static int show_filelist_p(void)
147 return INFO_GTE(FLIST
, 1) && xfer_dirs
&& !am_server
&& !inc_recurse
;
150 static void start_filelist_progress(char *kind
)
152 rprintf(FCLIENT
, "%s ... ", kind
);
153 output_needs_newline
= 1;
157 static void emit_filelist_progress(int count
)
159 rprintf(FCLIENT
, " %d files...\r", count
);
162 static void maybe_emit_filelist_progress(int count
)
164 if (INFO_GTE(FLIST
, 2) && show_filelist_p() && (count
% 100) == 0)
165 emit_filelist_progress(count
);
168 static void finish_filelist_progress(const struct file_list
*flist
)
170 if (INFO_GTE(FLIST
, 2)) {
171 /* This overwrites the progress line */
172 rprintf(FINFO
, "%d file%sto consider\n",
173 flist
->used
, flist
->used
== 1 ? " " : "s ");
175 output_needs_newline
= 0;
176 rprintf(FINFO
, "done\n");
180 void show_flist_stats(void)
185 /* Stat either a symlink or its referent, depending on the settings of
186 * copy_links, copy_unsafe_links, etc. Returns -1 on error, 0 on success.
188 * If path is the name of a symlink, then the linkbuf buffer (which must hold
189 * MAXPATHLEN chars) will be set to the symlink's target string.
191 * The stat structure pointed to by stp will contain information about the
192 * link or the referent as appropriate, if they exist. */
193 static int readlink_stat(const char *path
, STRUCT_STAT
*stp
, char *linkbuf
)
196 if (link_stat(path
, stp
, copy_dirlinks
) < 0)
198 if (S_ISLNK(stp
->st_mode
)) {
199 int llen
= do_readlink(path
, linkbuf
, MAXPATHLEN
- 1);
202 linkbuf
[llen
] = '\0';
203 if (copy_unsafe_links
&& unsafe_symlink(linkbuf
, path
)) {
204 if (INFO_GTE(SYMSAFE
, 1)) {
205 rprintf(FINFO
,"copying unsafe symlink \"%s\" -> \"%s\"\n",
208 return x_stat(path
, stp
, NULL
);
210 if (munge_symlinks
&& am_sender
&& llen
> SYMLINK_PREFIX_LEN
211 && strncmp(linkbuf
, SYMLINK_PREFIX
, SYMLINK_PREFIX_LEN
) == 0) {
212 memmove(linkbuf
, linkbuf
+ SYMLINK_PREFIX_LEN
,
213 llen
- SYMLINK_PREFIX_LEN
+ 1);
218 return x_stat(path
, stp
, NULL
);
222 int link_stat(const char *path
, STRUCT_STAT
*stp
, int follow_dirlinks
)
226 return x_stat(path
, stp
, NULL
);
227 if (x_lstat(path
, stp
, NULL
) < 0)
229 if (follow_dirlinks
&& S_ISLNK(stp
->st_mode
)) {
231 if (x_stat(path
, &st
, NULL
) == 0 && S_ISDIR(st
.st_mode
))
236 return x_stat(path
, stp
, NULL
);
240 static inline int is_daemon_excluded(const char *fname
, int is_dir
)
242 if (daemon_filter_list
.head
243 && check_filter(&daemon_filter_list
, FLOG
, fname
, is_dir
) < 0) {
250 static inline int path_is_daemon_excluded(char *path
, int ignore_filename
)
252 if (daemon_filter_list
.head
) {
255 while ((slash
= strchr(slash
+1, '/')) != NULL
) {
258 ret
= check_filter(&daemon_filter_list
, FLOG
, path
, 1);
267 && check_filter(&daemon_filter_list
, FLOG
, path
, 1) < 0) {
276 /* This function is used to check if a file should be included/excluded
277 * from the list of files based on its name and type etc. The value of
278 * filter_level is set to either SERVER_FILTERS or ALL_FILTERS. */
279 static int is_excluded(const char *fname
, int is_dir
, int filter_level
)
281 #if 0 /* This currently never happens, so avoid a useless compare. */
282 if (filter_level
== NO_FILTERS
)
285 if (is_daemon_excluded(fname
, is_dir
))
287 if (filter_level
!= ALL_FILTERS
)
290 && check_filter(&filter_list
, FINFO
, fname
, is_dir
) < 0)
295 static void send_directory(int f
, struct file_list
*flist
,
296 char *fbuf
, int len
, int flags
);
298 static const char *pathname
, *orig_dir
;
299 static int pathname_len
;
301 /* Make sure flist can hold at least flist->used + extra entries. */
302 static void flist_expand(struct file_list
*flist
, int extra
)
304 struct file_struct
**new_ptr
;
306 if (flist
->used
+ extra
<= flist
->malloced
)
309 if (flist
->malloced
< FLIST_START
)
310 flist
->malloced
= FLIST_START
;
311 else if (flist
->malloced
>= FLIST_LINEAR
)
312 flist
->malloced
+= FLIST_LINEAR
;
314 flist
->malloced
*= 2;
316 /* In case count jumped or we are starting the list
317 * with a known size just set it. */
318 if (flist
->malloced
< flist
->used
+ extra
)
319 flist
->malloced
= flist
->used
+ extra
;
321 new_ptr
= realloc_array(flist
->files
, struct file_struct
*,
324 if (DEBUG_GTE(FLIST
, 1) && flist
->malloced
!= FLIST_START
) {
325 rprintf(FCLIENT
, "[%s] expand file_list pointer array to %s bytes, did%s move\n",
327 big_num(sizeof flist
->files
[0] * flist
->malloced
),
328 (new_ptr
== flist
->files
) ? " not" : "");
331 flist
->files
= new_ptr
;
334 out_of_memory("flist_expand");
337 static void flist_done_allocating(struct file_list
*flist
)
339 void *ptr
= pool_boundary(flist
->file_pool
, 8*1024);
340 if (flist
->pool_boundary
== ptr
)
341 flist
->pool_boundary
= NULL
; /* list didn't use any pool memory */
343 flist
->pool_boundary
= ptr
;
346 /* Call this with EITHER (1) "file, NULL, 0" to chdir() to the file's
347 * F_PATHNAME(), or (2) "NULL, dir, dirlen" to chdir() to the supplied dir,
348 * with dir == NULL taken to be the starting directory, and dirlen < 0
349 * indicating that strdup(dir) should be called and then the -dirlen length
350 * value checked to ensure that it is not daemon-excluded. */
351 int change_pathname(struct file_struct
*file
, const char *dir
, int dirlen
)
354 char *cpy
= strdup(dir
);
356 change_dir(orig_dir
, CD_SKIP_CHDIR
);
357 if (path_is_daemon_excluded(cpy
, 0))
363 if (pathname
== F_PATHNAME(file
))
365 dir
= F_PATHNAME(file
);
367 dirlen
= strlen(dir
);
368 } else if (pathname
== dir
)
370 if (dir
&& *dir
!= '/')
371 change_dir(orig_dir
, CD_SKIP_CHDIR
);
375 pathname_len
= dirlen
;
380 if (!change_dir(dir
, CD_NORMAL
)) {
382 io_error
|= IOERR_GENERAL
;
383 rsyserr(FERROR_XFER
, errno
, "change_dir %s failed", full_fname(dir
));
385 change_dir(orig_dir
, CD_NORMAL
);
394 static void send_file_entry(int f
, const char *fname
, struct file_struct
*file
,
396 const char *symlink_name
, int symlink_len
,
398 int ndx
, int first_ndx
)
400 static time_t modtime
;
402 #ifdef SUPPORT_HARD_LINKS
406 static uint32 rdev_major
;
409 static const char *user_name
, *group_name
;
410 static char lastname
[MAXPATHLEN
];
411 #ifdef SUPPORT_HARD_LINKS
412 int first_hlink_ndx
= -1;
417 /* Initialize starting value of xflags and adjust counts. */
418 if (S_ISREG(file
->mode
))
420 else if (S_ISDIR(file
->mode
)) {
422 if (protocol_version
>= 30) {
423 if (file
->flags
& FLAG_CONTENT_DIR
)
424 xflags
= file
->flags
& FLAG_TOP_DIR
;
425 else if (file
->flags
& FLAG_IMPLIED_DIR
)
426 xflags
= XMIT_TOP_DIR
| XMIT_NO_CONTENT_DIR
;
428 xflags
= XMIT_NO_CONTENT_DIR
;
430 xflags
= file
->flags
& FLAG_TOP_DIR
; /* FLAG_TOP_DIR == XMIT_TOP_DIR */
432 if (S_ISLNK(file
->mode
))
433 stats
.num_symlinks
++;
434 else if (IS_DEVICE(file
->mode
))
436 else if (IS_SPECIAL(file
->mode
))
437 stats
.num_specials
++;
441 if (file
->mode
== mode
)
442 xflags
|= XMIT_SAME_MODE
;
446 if (preserve_devices
&& IS_DEVICE(mode
)) {
447 if (protocol_version
< 28) {
448 if (tmp_rdev
== rdev
)
449 xflags
|= XMIT_SAME_RDEV_pre28
;
454 if ((uint32
)major(rdev
) == rdev_major
)
455 xflags
|= XMIT_SAME_RDEV_MAJOR
;
457 rdev_major
= major(rdev
);
458 if (protocol_version
< 30 && (uint32
)minor(rdev
) <= 0xFFu
)
459 xflags
|= XMIT_RDEV_MINOR_8_pre30
;
461 } else if (preserve_specials
&& IS_SPECIAL(mode
) && protocol_version
< 31) {
462 /* Special files don't need an rdev number, so just make
463 * the historical transmission of the value efficient. */
464 if (protocol_version
< 28)
465 xflags
|= XMIT_SAME_RDEV_pre28
;
467 rdev
= MAKEDEV(major(rdev
), 0);
468 xflags
|= XMIT_SAME_RDEV_MAJOR
;
469 if (protocol_version
< 30)
470 xflags
|= XMIT_RDEV_MINOR_8_pre30
;
472 } else if (protocol_version
< 28)
473 rdev
= MAKEDEV(0, 0);
474 if (!preserve_uid
|| ((uid_t
)F_OWNER(file
) == uid
&& *lastname
))
475 xflags
|= XMIT_SAME_UID
;
479 user_name
= add_uid(uid
);
480 if (inc_recurse
&& user_name
)
481 xflags
|= XMIT_USER_NAME_FOLLOWS
;
484 if (!preserve_gid
|| ((gid_t
)F_GROUP(file
) == gid
&& *lastname
))
485 xflags
|= XMIT_SAME_GID
;
489 group_name
= add_gid(gid
);
490 if (inc_recurse
&& group_name
)
491 xflags
|= XMIT_GROUP_NAME_FOLLOWS
;
494 if (file
->modtime
== modtime
)
495 xflags
|= XMIT_SAME_TIME
;
497 modtime
= file
->modtime
;
498 if (NSEC_BUMP(file
) && protocol_version
>= 31)
499 xflags
|= XMIT_MOD_NSEC
;
501 #ifdef SUPPORT_HARD_LINKS
503 if (protocol_version
>= 30) {
504 struct ht_int64_node
*np
= idev_find(tmp_dev
, tmp_ino
);
505 first_hlink_ndx
= (int32
)(long)np
->data
- 1;
506 if (first_hlink_ndx
< 0) {
507 np
->data
= (void*)(long)(first_ndx
+ ndx
+ 1);
508 xflags
|= XMIT_HLINK_FIRST
;
510 if (DEBUG_GTE(HLINK
, 1)) {
511 if (first_hlink_ndx
>= 0) {
512 rprintf(FINFO
, "[%s] #%d hard-links #%d (%sabbrev)\n",
513 who_am_i(), first_ndx
+ ndx
, first_hlink_ndx
,
514 first_hlink_ndx
>= first_ndx
? "" : "un");
515 } else if (DEBUG_GTE(HLINK
, 3)) {
516 rprintf(FINFO
, "[%s] dev:inode for #%d is %s:%s\n",
517 who_am_i(), first_ndx
+ ndx
,
518 big_num(tmp_dev
), big_num(tmp_ino
));
522 if (tmp_dev
== dev
) {
523 if (protocol_version
>= 28)
524 xflags
|= XMIT_SAME_DEV_pre30
;
528 xflags
|= XMIT_HLINKED
;
533 lastname
[l1
] && (fname
[l1
] == lastname
[l1
]) && (l1
< 255);
535 l2
= strlen(fname
+l1
);
538 xflags
|= XMIT_SAME_NAME
;
540 xflags
|= XMIT_LONG_NAME
;
542 /* We must make sure we don't send a zero flag byte or the
543 * other end will terminate the flist transfer. Note that
544 * the use of XMIT_TOP_DIR on a non-dir has no meaning, so
545 * it's harmless way to add a bit to the first flag byte. */
546 if (protocol_version
>= 28) {
547 if (!xflags
&& !S_ISDIR(mode
))
548 xflags
|= XMIT_TOP_DIR
;
549 if ((xflags
& 0xFF00) || !xflags
) {
550 xflags
|= XMIT_EXTENDED_FLAGS
;
551 write_shortint(f
, xflags
);
553 write_byte(f
, xflags
);
555 if (!(xflags
& 0xFF))
556 xflags
|= S_ISDIR(mode
) ? XMIT_LONG_NAME
: XMIT_TOP_DIR
;
557 write_byte(f
, xflags
);
559 if (xflags
& XMIT_SAME_NAME
)
561 if (xflags
& XMIT_LONG_NAME
)
562 write_varint30(f
, l2
);
565 write_buf(f
, fname
+ l1
, l2
);
567 #ifdef SUPPORT_HARD_LINKS
568 if (first_hlink_ndx
>= 0) {
569 write_varint(f
, first_hlink_ndx
);
570 if (first_hlink_ndx
>= first_ndx
)
575 write_varlong30(f
, F_LENGTH(file
), 3);
576 if (!(xflags
& XMIT_SAME_TIME
)) {
577 if (protocol_version
>= 30)
578 write_varlong(f
, modtime
, 4);
580 write_int(f
, modtime
);
582 if (xflags
& XMIT_MOD_NSEC
)
583 write_varint(f
, F_MOD_NSEC(file
));
584 if (!(xflags
& XMIT_SAME_MODE
))
585 write_int(f
, to_wire_mode(mode
));
586 if (preserve_uid
&& !(xflags
& XMIT_SAME_UID
)) {
587 if (protocol_version
< 30)
590 write_varint(f
, uid
);
591 if (xflags
& XMIT_USER_NAME_FOLLOWS
) {
592 int len
= strlen(user_name
);
594 write_buf(f
, user_name
, len
);
598 if (preserve_gid
&& !(xflags
& XMIT_SAME_GID
)) {
599 if (protocol_version
< 30)
602 write_varint(f
, gid
);
603 if (xflags
& XMIT_GROUP_NAME_FOLLOWS
) {
604 int len
= strlen(group_name
);
606 write_buf(f
, group_name
, len
);
610 if ((preserve_devices
&& IS_DEVICE(mode
))
611 || (preserve_specials
&& IS_SPECIAL(mode
) && protocol_version
< 31)) {
612 if (protocol_version
< 28) {
613 if (!(xflags
& XMIT_SAME_RDEV_pre28
))
614 write_int(f
, (int)rdev
);
616 if (!(xflags
& XMIT_SAME_RDEV_MAJOR
))
617 write_varint30(f
, major(rdev
));
618 if (protocol_version
>= 30)
619 write_varint(f
, minor(rdev
));
620 else if (xflags
& XMIT_RDEV_MINOR_8_pre30
)
621 write_byte(f
, minor(rdev
));
623 write_int(f
, minor(rdev
));
629 write_varint30(f
, symlink_len
);
630 write_buf(f
, symlink_name
, symlink_len
);
634 #ifdef SUPPORT_HARD_LINKS
635 if (tmp_dev
!= -1 && protocol_version
< 30) {
636 /* Older protocols expect the dev number to be transmitted
637 * 1-incremented so that it is never zero. */
638 if (protocol_version
< 26) {
639 /* 32-bit dev_t and ino_t */
640 write_int(f
, (int32
)(dev
+1));
641 write_int(f
, (int32
)tmp_ino
);
643 /* 64-bit dev_t and ino_t */
644 if (!(xflags
& XMIT_SAME_DEV_pre30
))
645 write_longint(f
, dev
+1);
646 write_longint(f
, tmp_ino
);
651 if (always_checksum
&& (S_ISREG(mode
) || protocol_version
< 28)) {
656 /* Prior to 28, we sent a useless set of nulls. */
659 write_buf(f
, sum
, checksum_len
);
662 #ifdef SUPPORT_HARD_LINKS
665 strlcpy(lastname
, fname
, MAXPATHLEN
);
667 if (S_ISREG(mode
) || S_ISLNK(mode
))
668 stats
.total_size
+= F_LENGTH(file
);
671 static struct file_struct
*recv_file_entry(int f
, struct file_list
*flist
, int xflags
)
673 static int64 modtime
;
675 #ifdef SUPPORT_HARD_LINKS
679 static uint32 rdev_major
;
682 static uint16 gid_flags
;
683 static char lastname
[MAXPATHLEN
], *lastdir
;
684 static int lastdir_depth
, lastdir_len
= -1;
685 static unsigned int del_hier_name_len
= 0;
686 static int in_del_hier
= 0;
687 char thisname
[MAXPATHLEN
];
688 unsigned int l1
= 0, l2
= 0;
689 int alloc_len
, basename_len
, linkname_len
;
690 int extra_len
= file_extra_cnt
* EXTRA_LEN
;
691 int first_hlink_ndx
= -1;
694 const char *basename
;
695 struct file_struct
*file
;
699 if (xflags
& XMIT_SAME_NAME
)
702 if (xflags
& XMIT_LONG_NAME
)
703 l2
= read_varint30(f
);
707 if (l2
>= MAXPATHLEN
- l1
) {
709 "overflow: xflags=0x%x l1=%d l2=%d lastname=%s [%s]\n",
710 xflags
, l1
, l2
, lastname
, who_am_i());
711 overflow_exit("recv_file_entry");
714 strlcpy(thisname
, lastname
, l1
+ 1);
715 read_sbuf(f
, &thisname
[l1
], l2
);
716 thisname
[l1
+ l2
] = 0;
718 /* Abuse basename_len for a moment... */
719 basename_len
= strlcpy(lastname
, thisname
, MAXPATHLEN
);
722 if (ic_recv
!= (iconv_t
)-1) {
725 INIT_CONST_XBUF(outbuf
, thisname
);
726 INIT_XBUF(inbuf
, lastname
, basename_len
, (size_t)-1);
728 if (iconvbufs(ic_recv
, &inbuf
, &outbuf
, ICB_INIT
) < 0) {
729 io_error
|= IOERR_GENERAL
;
731 "[%s] cannot convert filename: %s (%s)\n",
732 who_am_i(), lastname
, strerror(errno
));
735 thisname
[outbuf
.len
] = '\0';
740 && (clean_fname(thisname
, CFN_REFUSE_DOT_DOT_DIRS
) < 0 || (!relative_paths
&& *thisname
== '/'))) {
741 rprintf(FERROR
, "ABORTING due to unsafe pathname from sender: %s\n", thisname
);
742 exit_cleanup(RERR_PROTOCOL
);
746 sanitize_path(thisname
, thisname
, "", 0, SP_DEFAULT
);
748 if ((basename
= strrchr(thisname
, '/')) != NULL
) {
749 int len
= basename
++ - thisname
;
750 if (len
!= lastdir_len
|| memcmp(thisname
, lastdir
, len
) != 0) {
751 lastdir
= new_array(char, len
+ 1);
752 memcpy(lastdir
, thisname
, len
);
755 lastdir_depth
= count_dir_elements(lastdir
);
759 basename_len
= strlen(basename
) + 1; /* count the '\0' */
761 #ifdef SUPPORT_HARD_LINKS
762 if (protocol_version
>= 30
763 && BITS_SETnUNSET(xflags
, XMIT_HLINKED
, XMIT_HLINK_FIRST
)) {
764 first_hlink_ndx
= read_varint(f
);
765 if (first_hlink_ndx
< 0 || first_hlink_ndx
>= flist
->ndx_start
+ flist
->used
) {
767 "hard-link reference out of range: %d (%d)\n",
768 first_hlink_ndx
, flist
->ndx_start
+ flist
->used
);
769 exit_cleanup(RERR_PROTOCOL
);
771 if (DEBUG_GTE(HLINK
, 1)) {
772 rprintf(FINFO
, "[%s] #%d hard-links #%d (%sabbrev)\n",
773 who_am_i(), flist
->used
+flist
->ndx_start
, first_hlink_ndx
,
774 first_hlink_ndx
>= flist
->ndx_start
? "" : "un");
776 if (first_hlink_ndx
>= flist
->ndx_start
) {
777 struct file_struct
*first
= flist
->files
[first_hlink_ndx
- flist
->ndx_start
];
778 file_length
= F_LENGTH(first
);
779 modtime
= first
->modtime
;
780 modtime_nsec
= F_MOD_NSEC(first
);
783 uid
= F_OWNER(first
);
785 gid
= F_GROUP(first
);
786 if (preserve_devices
&& IS_DEVICE(mode
)) {
787 uint32
*devp
= F_RDEV_P(first
);
788 rdev
= MAKEDEV(DEV_MAJOR(devp
), DEV_MINOR(devp
));
789 extra_len
+= DEV_EXTRA_CNT
* EXTRA_LEN
;
791 if (preserve_links
&& S_ISLNK(mode
))
792 linkname_len
= strlen(F_SYMLINK(first
)) + 1;
800 file_length
= read_varlong30(f
, 3);
801 if (!(xflags
& XMIT_SAME_TIME
)) {
802 if (protocol_version
>= 30) {
803 modtime
= read_varlong(f
, 4);
804 #if SIZEOF_TIME_T < SIZEOF_INT64
805 if (!am_generator
&& (int64
)(time_t)modtime
!= modtime
) {
807 "Time value of %s truncated on receiver.\n",
812 modtime
= read_int(f
);
814 if (xflags
& XMIT_MOD_NSEC
)
815 modtime_nsec
= read_varint(f
);
818 if (!(xflags
& XMIT_SAME_MODE
))
819 mode
= from_wire_mode(read_int(f
));
821 if (chmod_modes
&& !S_ISLNK(mode
) && mode
)
822 mode
= tweak_mode(mode
, chmod_modes
);
824 if (preserve_uid
&& !(xflags
& XMIT_SAME_UID
)) {
825 if (protocol_version
< 30)
826 uid
= (uid_t
)read_int(f
);
828 uid
= (uid_t
)read_varint(f
);
829 if (xflags
& XMIT_USER_NAME_FOLLOWS
)
830 uid
= recv_user_name(f
, uid
);
831 else if (inc_recurse
&& am_root
&& (!numeric_ids
|| usermap
))
832 uid
= match_uid(uid
);
835 if (preserve_gid
&& !(xflags
& XMIT_SAME_GID
)) {
836 if (protocol_version
< 30)
837 gid
= (gid_t
)read_int(f
);
839 gid
= (gid_t
)read_varint(f
);
841 if (xflags
& XMIT_GROUP_NAME_FOLLOWS
)
842 gid
= recv_group_name(f
, gid
, &gid_flags
);
843 else if (inc_recurse
&& (!am_root
|| !numeric_ids
|| groupmap
))
844 gid
= match_gid(gid
, &gid_flags
);
848 if ((preserve_devices
&& IS_DEVICE(mode
))
849 || (preserve_specials
&& IS_SPECIAL(mode
) && protocol_version
< 31)) {
850 if (protocol_version
< 28) {
851 if (!(xflags
& XMIT_SAME_RDEV_pre28
))
852 rdev
= (dev_t
)read_int(f
);
855 if (!(xflags
& XMIT_SAME_RDEV_MAJOR
))
856 rdev_major
= read_varint30(f
);
857 if (protocol_version
>= 30)
858 rdev_minor
= read_varint(f
);
859 else if (xflags
& XMIT_RDEV_MINOR_8_pre30
)
860 rdev_minor
= read_byte(f
);
862 rdev_minor
= read_int(f
);
863 rdev
= MAKEDEV(rdev_major
, rdev_minor
);
866 extra_len
+= DEV_EXTRA_CNT
* EXTRA_LEN
;
868 } else if (protocol_version
< 28)
869 rdev
= MAKEDEV(0, 0);
872 if (preserve_links
&& S_ISLNK(mode
)) {
873 linkname_len
= read_varint30(f
) + 1; /* count the '\0' */
874 if (linkname_len
<= 0 || linkname_len
> MAXPATHLEN
) {
875 rprintf(FERROR
, "overflow: linkname_len=%d\n",
877 overflow_exit("recv_file_entry");
880 /* We don't know how much extra room we need to convert
881 * the as-yet-unread symlink data, so let's hope that a
882 * double-size buffer is plenty. */
883 if (sender_symlink_iconv
)
887 linkname_len
+= SYMLINK_PREFIX_LEN
;
893 #ifdef SUPPORT_HARD_LINKS
895 if (preserve_hard_links
) {
896 if (protocol_version
< 28 && S_ISREG(mode
))
897 xflags
|= XMIT_HLINKED
;
898 if (xflags
& XMIT_HLINKED
)
899 extra_len
+= (inc_recurse
+1) * EXTRA_LEN
;
904 /* Directories need an extra int32 for the default ACL. */
905 if (preserve_acls
&& S_ISDIR(mode
))
906 extra_len
+= EXTRA_LEN
;
909 if (always_checksum
&& S_ISREG(mode
))
910 extra_len
+= SUM_EXTRA_CNT
* EXTRA_LEN
;
912 #if SIZEOF_INT64 >= 8
913 if (file_length
> 0xFFFFFFFFu
&& S_ISREG(mode
))
914 extra_len
+= EXTRA_LEN
;
916 #ifdef HAVE_UTIMENSAT
918 extra_len
+= EXTRA_LEN
;
920 if (file_length
< 0) {
921 rprintf(FERROR
, "Offset underflow: file-length is negative\n");
922 exit_cleanup(RERR_UNSUPPORTED
);
925 if (inc_recurse
&& S_ISDIR(mode
)) {
926 if (one_file_system
) {
927 /* Room to save the dir's device for -x */
928 extra_len
+= DEV_EXTRA_CNT
* EXTRA_LEN
;
930 pool
= dir_flist
->file_pool
;
932 pool
= flist
->file_pool
;
934 #if EXTRA_ROUNDING > 0
935 if (extra_len
& (EXTRA_ROUNDING
* EXTRA_LEN
))
936 extra_len
= (extra_len
| (EXTRA_ROUNDING
* EXTRA_LEN
)) + EXTRA_LEN
;
939 alloc_len
= FILE_STRUCT_LEN
+ extra_len
+ basename_len
941 bp
= pool_alloc(pool
, alloc_len
, "recv_file_entry");
943 memset(bp
, 0, extra_len
+ FILE_STRUCT_LEN
);
945 file
= (struct file_struct
*)bp
;
946 bp
+= FILE_STRUCT_LEN
;
948 memcpy(bp
, basename
, basename_len
);
950 #ifdef SUPPORT_HARD_LINKS
951 if (xflags
& XMIT_HLINKED
952 #ifndef CAN_HARDLINK_SYMLINK
955 #ifndef CAN_HARDLINK_SPECIAL
956 && !IS_SPECIAL(mode
) && !IS_DEVICE(mode
)
959 file
->flags
|= FLAG_HLINKED
;
961 file
->modtime
= (time_t)modtime
;
962 #ifdef HAVE_UTIMENSAT
964 file
->flags
|= FLAG_MOD_NSEC
;
965 OPT_EXTRA(file
, 0)->unum
= modtime_nsec
;
968 file
->len32
= (uint32
)file_length
;
969 #if SIZEOF_INT64 >= 8
970 if (file_length
> 0xFFFFFFFFu
&& S_ISREG(mode
)) {
971 #if SIZEOF_CAPITAL_OFF_T < 8
972 rprintf(FERROR
, "Offset overflow: attempted 64-bit file-length\n");
973 exit_cleanup(RERR_UNSUPPORTED
);
975 file
->flags
|= FLAG_LENGTH64
;
976 OPT_EXTRA(file
, NSEC_BUMP(file
))->unum
= (uint32
)(file_length
>> 32);
985 file
->flags
|= gid_flags
;
988 F_NDX(file
) = flist
->used
+ flist
->ndx_start
;
990 if (basename
!= thisname
) {
991 file
->dirname
= lastdir
;
992 F_DEPTH(file
) = lastdir_depth
+ 1;
997 if (basename_len
== 1+1 && *basename
== '.') /* +1 for '\0' */
999 if (protocol_version
>= 30) {
1000 if (!(xflags
& XMIT_NO_CONTENT_DIR
)) {
1001 if (xflags
& XMIT_TOP_DIR
)
1002 file
->flags
|= FLAG_TOP_DIR
;
1003 file
->flags
|= FLAG_CONTENT_DIR
;
1004 } else if (xflags
& XMIT_TOP_DIR
)
1005 file
->flags
|= FLAG_IMPLIED_DIR
;
1006 } else if (xflags
& XMIT_TOP_DIR
) {
1007 in_del_hier
= recurse
;
1008 del_hier_name_len
= F_DEPTH(file
) == 0 ? 0 : l1
+ l2
;
1009 if (relative_paths
&& del_hier_name_len
> 2
1010 && lastname
[del_hier_name_len
-1] == '.'
1011 && lastname
[del_hier_name_len
-2] == '/')
1012 del_hier_name_len
-= 2;
1013 file
->flags
|= FLAG_TOP_DIR
| FLAG_CONTENT_DIR
;
1014 } else if (in_del_hier
) {
1015 if (!relative_paths
|| !del_hier_name_len
1016 || (l1
>= del_hier_name_len
1017 && lastname
[del_hier_name_len
] == '/'))
1018 file
->flags
|= FLAG_CONTENT_DIR
;
1024 if (preserve_devices
&& IS_DEVICE(mode
)) {
1025 uint32
*devp
= F_RDEV_P(file
);
1026 DEV_MAJOR(devp
) = major(rdev
);
1027 DEV_MINOR(devp
) = minor(rdev
);
1030 #ifdef SUPPORT_LINKS
1033 if (first_hlink_ndx
>= flist
->ndx_start
) {
1034 struct file_struct
*first
= flist
->files
[first_hlink_ndx
- flist
->ndx_start
];
1035 memcpy(bp
, F_SYMLINK(first
), linkname_len
);
1037 if (munge_symlinks
) {
1038 strlcpy(bp
, SYMLINK_PREFIX
, linkname_len
);
1039 bp
+= SYMLINK_PREFIX_LEN
;
1040 linkname_len
-= SYMLINK_PREFIX_LEN
;
1043 if (sender_symlink_iconv
) {
1046 alloc_len
= linkname_len
;
1049 /* Read the symlink data into the end of our double-sized
1050 * buffer and then convert it into the right spot. */
1051 INIT_XBUF(inbuf
, bp
+ alloc_len
- linkname_len
,
1052 linkname_len
- 1, (size_t)-1);
1053 read_sbuf(f
, inbuf
.buf
, inbuf
.len
);
1054 INIT_XBUF(outbuf
, bp
, 0, alloc_len
);
1056 if (iconvbufs(ic_recv
, &inbuf
, &outbuf
, ICB_INIT
) < 0) {
1057 io_error
|= IOERR_GENERAL
;
1058 rprintf(FERROR_XFER
,
1059 "[%s] cannot convert symlink data for: %s (%s)\n",
1060 who_am_i(), full_fname(thisname
), strerror(errno
));
1061 bp
= (char*)file
->basename
;
1065 bp
[outbuf
.len
] = '\0';
1068 read_sbuf(f
, bp
, linkname_len
- 1);
1069 if (sanitize_paths
&& !munge_symlinks
&& *bp
)
1070 sanitize_path(bp
, bp
, "", lastdir_depth
, SP_DEFAULT
);
1075 #ifdef SUPPORT_HARD_LINKS
1076 if (preserve_hard_links
&& xflags
& XMIT_HLINKED
) {
1077 if (protocol_version
>= 30) {
1078 if (xflags
& XMIT_HLINK_FIRST
) {
1079 F_HL_GNUM(file
) = flist
->ndx_start
+ flist
->used
;
1081 F_HL_GNUM(file
) = first_hlink_ndx
;
1083 static int32 cnt
= 0;
1084 struct ht_int64_node
*np
;
1087 if (protocol_version
< 26) {
1091 if (!(xflags
& XMIT_SAME_DEV_pre30
))
1092 dev
= read_longint(f
);
1093 ino
= read_longint(f
);
1095 np
= idev_find(dev
, ino
);
1096 ndx
= (int32
)(long)np
->data
- 1;
1099 np
->data
= (void*)(long)cnt
;
1101 F_HL_GNUM(file
) = ndx
;
1106 if (always_checksum
&& (S_ISREG(mode
) || protocol_version
< 28)) {
1110 /* Prior to 28, we get a useless set of nulls. */
1113 if (first_hlink_ndx
>= flist
->ndx_start
) {
1114 struct file_struct
*first
= flist
->files
[first_hlink_ndx
- flist
->ndx_start
];
1115 memcpy(bp
, F_SUM(first
), checksum_len
);
1117 read_buf(f
, bp
, checksum_len
);
1121 if (preserve_acls
&& !S_ISLNK(mode
))
1122 receive_acl(f
, file
);
1124 #ifdef SUPPORT_XATTRS
1125 if (preserve_xattrs
)
1126 receive_xattr(f
, file
);
1129 if (S_ISREG(mode
) || S_ISLNK(mode
))
1130 stats
.total_size
+= file_length
;
1135 /* Create a file_struct for a named file by reading its stat() information
1136 * and performing extensive checks against global options.
1138 * Returns a pointer to the new file struct, or NULL if there was an error
1139 * or this file should be excluded.
1141 * Note: Any error (here or in send_file_name) that results in the omission of
1142 * an existent source file from the file list should set
1143 * "io_error |= IOERR_GENERAL" to avoid deletion of the file from the
1144 * destination if --delete is on. */
1145 struct file_struct
*make_file(const char *fname
, struct file_list
*flist
,
1146 STRUCT_STAT
*stp
, int flags
, int filter_level
)
1148 static char *lastdir
;
1149 static int lastdir_len
= -1;
1150 struct file_struct
*file
;
1151 char thisname
[MAXPATHLEN
];
1152 char linkname
[MAXPATHLEN
];
1153 int alloc_len
, basename_len
, linkname_len
;
1154 int extra_len
= file_extra_cnt
* EXTRA_LEN
;
1155 const char *basename
;
1160 if (strlcpy(thisname
, fname
, sizeof thisname
) >= sizeof thisname
) {
1161 io_error
|= IOERR_GENERAL
;
1162 rprintf(FERROR_XFER
, "skipping overly long name: %s\n", fname
);
1165 clean_fname(thisname
, 0);
1167 sanitize_path(thisname
, thisname
, "", 0, SP_DEFAULT
);
1169 if (stp
&& (S_ISDIR(stp
->st_mode
) || IS_MISSING_FILE(*stp
))) {
1170 /* This is needed to handle a "symlink/." with a --relative
1171 * dir, or a request to delete a specific file. */
1173 *linkname
= '\0'; /* make IBM code checker happy */
1174 } else if (readlink_stat(thisname
, &st
, linkname
) != 0) {
1175 int save_errno
= errno
;
1176 /* See if file is excluded before reporting an error. */
1177 if (filter_level
!= NO_FILTERS
1178 && (is_excluded(thisname
, 0, filter_level
)
1179 || is_excluded(thisname
, 1, filter_level
))) {
1180 if (ignore_perishable
&& save_errno
!= ENOENT
)
1181 non_perishable_cnt
++;
1184 if (save_errno
== ENOENT
) {
1185 #ifdef SUPPORT_LINKS
1186 /* When our options tell us to follow a symlink that
1187 * points nowhere, tell the user about the symlink
1188 * instead of giving a "vanished" message. We only
1189 * dereference a symlink if one of the --copy*links
1190 * options was specified, so there's no need for the
1191 * extra lstat() if one of these options isn't on. */
1192 if ((copy_links
|| copy_unsafe_links
|| copy_dirlinks
)
1193 && x_lstat(thisname
, &st
, NULL
) == 0
1194 && S_ISLNK(st
.st_mode
)) {
1195 io_error
|= IOERR_GENERAL
;
1196 rprintf(FERROR_XFER
, "symlink has no referent: %s\n",
1197 full_fname(thisname
));
1201 enum logcode c
= am_daemon
&& protocol_version
< 28
1202 ? FERROR
: FWARNING
;
1203 io_error
|= IOERR_VANISHED
;
1204 rprintf(c
, "file has vanished: %s\n",
1205 full_fname(thisname
));
1208 io_error
|= IOERR_GENERAL
;
1209 rsyserr(FERROR_XFER
, save_errno
, "readlink_stat(%s) failed",
1210 full_fname(thisname
));
1213 } else if (IS_MISSING_FILE(st
)) {
1214 io_error
|= IOERR_GENERAL
;
1215 rprintf(FINFO
, "skipping file with bogus (zero) st_mode: %s\n",
1216 full_fname(thisname
));
1220 if (filter_level
== NO_FILTERS
)
1223 if (S_ISDIR(st
.st_mode
)) {
1225 rprintf(FINFO
, "skipping directory %s\n", thisname
);
1228 /* -x only affects dirs because we need to avoid recursing
1229 * into a mount-point directory, not to avoid copying a
1230 * symlinked file if -L (or similar) was specified. */
1231 if (one_file_system
&& st
.st_dev
!= filesystem_dev
1232 && BITS_SETnUNSET(flags
, FLAG_CONTENT_DIR
, FLAG_TOP_DIR
)) {
1233 if (one_file_system
> 1) {
1234 if (INFO_GTE(MOUNT
, 1)) {
1236 "[%s] skipping mount-point dir %s\n",
1237 who_am_i(), thisname
);
1241 flags
|= FLAG_MOUNT_DIR
;
1242 flags
&= ~FLAG_CONTENT_DIR
;
1245 flags
&= ~FLAG_CONTENT_DIR
;
1247 if (is_excluded(thisname
, S_ISDIR(st
.st_mode
) != 0, filter_level
)) {
1248 if (ignore_perishable
)
1249 non_perishable_cnt
++;
1253 if (lp_ignore_nonreadable(module_id
)) {
1254 #ifdef SUPPORT_LINKS
1255 if (!S_ISLNK(st
.st_mode
))
1257 if (access(thisname
, R_OK
) != 0)
1263 /* Only divert a directory in the main transfer. */
1265 if (flist
->prev
&& S_ISDIR(st
.st_mode
)
1266 && flags
& FLAG_DIVERT_DIRS
) {
1267 /* Room for parent/sibling/next-child info. */
1268 extra_len
+= DIRNODE_EXTRA_CNT
* EXTRA_LEN
;
1270 extra_len
+= PTR_EXTRA_CNT
* EXTRA_LEN
;
1271 pool
= dir_flist
->file_pool
;
1273 pool
= flist
->file_pool
;
1276 /* Directories need an extra int32 for the default ACL. */
1277 if (preserve_acls
&& S_ISDIR(st
.st_mode
))
1278 extra_len
+= EXTRA_LEN
;
1283 if (DEBUG_GTE(FLIST
, 2)) {
1284 rprintf(FINFO
, "[%s] make_file(%s,*,%d)\n",
1285 who_am_i(), thisname
, filter_level
);
1288 if ((basename
= strrchr(thisname
, '/')) != NULL
) {
1289 int len
= basename
++ - thisname
;
1290 if (len
!= lastdir_len
|| memcmp(thisname
, lastdir
, len
) != 0) {
1291 lastdir
= new_array(char, len
+ 1);
1292 memcpy(lastdir
, thisname
, len
);
1293 lastdir
[len
] = '\0';
1297 basename
= thisname
;
1298 basename_len
= strlen(basename
) + 1; /* count the '\0' */
1300 #ifdef SUPPORT_LINKS
1301 linkname_len
= S_ISLNK(st
.st_mode
) ? strlen(linkname
) + 1 : 0;
1306 #ifdef ST_MTIME_NSEC
1307 if (st
.ST_MTIME_NSEC
&& protocol_version
>= 31)
1308 extra_len
+= EXTRA_LEN
;
1310 #if SIZEOF_CAPITAL_OFF_T >= 8
1311 if (st
.st_size
> 0xFFFFFFFFu
&& S_ISREG(st
.st_mode
))
1312 extra_len
+= EXTRA_LEN
;
1315 if (always_checksum
&& am_sender
&& S_ISREG(st
.st_mode
)) {
1316 file_checksum(thisname
, &st
, tmp_sum
);
1317 if (sender_keeps_checksum
)
1318 extra_len
+= SUM_EXTRA_CNT
* EXTRA_LEN
;
1321 #if EXTRA_ROUNDING > 0
1322 if (extra_len
& (EXTRA_ROUNDING
* EXTRA_LEN
))
1323 extra_len
= (extra_len
| (EXTRA_ROUNDING
* EXTRA_LEN
)) + EXTRA_LEN
;
1326 alloc_len
= FILE_STRUCT_LEN
+ extra_len
+ basename_len
1329 bp
= pool_alloc(pool
, alloc_len
, "make_file");
1331 if (!(bp
= new_array(char, alloc_len
)))
1332 out_of_memory("make_file");
1335 memset(bp
, 0, extra_len
+ FILE_STRUCT_LEN
);
1337 file
= (struct file_struct
*)bp
;
1338 bp
+= FILE_STRUCT_LEN
;
1340 memcpy(bp
, basename
, basename_len
);
1342 #ifdef SUPPORT_HARD_LINKS
1343 if (preserve_hard_links
&& flist
&& flist
->prev
) {
1344 if (protocol_version
>= 28
1345 ? (!S_ISDIR(st
.st_mode
) && st
.st_nlink
> 1)
1346 : S_ISREG(st
.st_mode
)) {
1347 tmp_dev
= (int64
)st
.st_dev
;
1348 tmp_ino
= (int64
)st
.st_ino
;
1354 #ifdef HAVE_STRUCT_STAT_ST_RDEV
1355 if (IS_DEVICE(st
.st_mode
)) {
1356 tmp_rdev
= st
.st_rdev
;
1358 } else if (IS_SPECIAL(st
.st_mode
))
1362 file
->flags
= flags
;
1363 file
->modtime
= st
.st_mtime
;
1364 #ifdef ST_MTIME_NSEC
1365 if (st
.ST_MTIME_NSEC
&& protocol_version
>= 31) {
1366 file
->flags
|= FLAG_MOD_NSEC
;
1367 OPT_EXTRA(file
, 0)->unum
= st
.ST_MTIME_NSEC
;
1370 file
->len32
= (uint32
)st
.st_size
;
1371 #if SIZEOF_CAPITAL_OFF_T >= 8
1372 if (st
.st_size
> 0xFFFFFFFFu
&& S_ISREG(st
.st_mode
)) {
1373 file
->flags
|= FLAG_LENGTH64
;
1374 OPT_EXTRA(file
, NSEC_BUMP(file
))->unum
= (uint32
)(st
.st_size
>> 32);
1377 file
->mode
= st
.st_mode
;
1379 F_OWNER(file
) = st
.st_uid
;
1381 F_GROUP(file
) = st
.st_gid
;
1382 if (am_generator
&& st
.st_uid
== our_uid
)
1383 file
->flags
|= FLAG_OWNED_BY_US
;
1385 if (basename
!= thisname
)
1386 file
->dirname
= lastdir
;
1388 #ifdef SUPPORT_LINKS
1390 memcpy(bp
+ basename_len
, linkname
, linkname_len
);
1394 F_PATHNAME(file
) = pathname
;
1396 F_DEPTH(file
) = extra_len
/ EXTRA_LEN
;
1398 if (basename_len
== 0+1) {
1404 if (sender_keeps_checksum
&& S_ISREG(st
.st_mode
))
1405 memcpy(F_SUM(file
), tmp_sum
, checksum_len
);
1408 F_NDX(file
) = stats
.num_dirs
;
1413 /* Only called for temporary file_struct entries created by make_file(). */
1414 void unmake_file(struct file_struct
*file
)
1416 free(REQ_EXTRA(file
, F_DEPTH(file
)));
1419 static struct file_struct
*send_file_name(int f
, struct file_list
*flist
,
1420 const char *fname
, STRUCT_STAT
*stp
,
1421 int flags
, int filter_level
)
1423 struct file_struct
*file
;
1425 file
= make_file(fname
, flist
, stp
, flags
, filter_level
);
1429 if (chmod_modes
&& !S_ISLNK(file
->mode
) && file
->mode
)
1430 file
->mode
= tweak_mode(file
->mode
, chmod_modes
);
1433 char fbuf
[MAXPATHLEN
];
1434 #ifdef SUPPORT_LINKS
1435 const char *symlink_name
;
1438 char symlink_buf
[MAXPATHLEN
];
1441 #if defined SUPPORT_ACLS || defined SUPPORT_XATTRS
1446 #ifdef SUPPORT_LINKS
1447 if (preserve_links
&& S_ISLNK(file
->mode
)) {
1448 symlink_name
= F_SYMLINK(file
);
1449 symlink_len
= strlen(symlink_name
);
1450 if (symlink_len
== 0) {
1451 io_error
|= IOERR_GENERAL
;
1453 rprintf(FERROR_XFER
,
1454 "skipping symlink with 0-length value: %s\n",
1459 symlink_name
= NULL
;
1465 if (ic_send
!= (iconv_t
)-1) {
1468 INIT_CONST_XBUF(outbuf
, fbuf
);
1470 if (file
->dirname
) {
1471 INIT_XBUF_STRLEN(inbuf
, (char*)file
->dirname
);
1472 outbuf
.size
-= 2; /* Reserve room for '/' & 1 more char. */
1473 if (iconvbufs(ic_send
, &inbuf
, &outbuf
, ICB_INIT
) < 0)
1476 fbuf
[outbuf
.len
++] = '/';
1479 INIT_XBUF_STRLEN(inbuf
, (char*)file
->basename
);
1480 if (iconvbufs(ic_send
, &inbuf
, &outbuf
, ICB_INIT
) < 0) {
1482 io_error
|= IOERR_GENERAL
;
1483 rprintf(FERROR_XFER
,
1484 "[%s] cannot convert filename: %s (%s)\n",
1485 who_am_i(), f_name(file
, fbuf
), strerror(errno
));
1488 fbuf
[outbuf
.len
] = '\0';
1490 #ifdef SUPPORT_LINKS
1491 if (symlink_len
&& sender_symlink_iconv
) {
1492 INIT_XBUF(inbuf
, (char*)symlink_name
, symlink_len
, (size_t)-1);
1493 INIT_CONST_XBUF(outbuf
, symlink_buf
);
1494 if (iconvbufs(ic_send
, &inbuf
, &outbuf
, ICB_INIT
) < 0) {
1495 io_error
|= IOERR_GENERAL
;
1497 rprintf(FERROR_XFER
,
1498 "[%s] cannot convert symlink data for: %s (%s)\n",
1499 who_am_i(), full_fname(fbuf
), strerror(errno
));
1502 symlink_buf
[outbuf
.len
] = '\0';
1504 symlink_name
= symlink_buf
;
1505 symlink_len
= outbuf
.len
;
1513 if (preserve_acls
&& !S_ISLNK(file
->mode
)) {
1514 sx
.st
.st_mode
= file
->mode
;
1515 if (get_acl(fname
, &sx
) < 0) {
1516 io_error
|= IOERR_GENERAL
;
1521 #ifdef SUPPORT_XATTRS
1522 if (preserve_xattrs
) {
1523 sx
.st
.st_mode
= file
->mode
;
1524 if (get_xattr(fname
, &sx
) < 0) {
1525 io_error
|= IOERR_GENERAL
;
1531 send_file_entry(f
, fbuf
, file
,
1532 #ifdef SUPPORT_LINKS
1533 symlink_name
, symlink_len
,
1535 flist
->used
, flist
->ndx_start
);
1538 if (preserve_acls
&& !S_ISLNK(file
->mode
)) {
1543 #ifdef SUPPORT_XATTRS
1544 if (preserve_xattrs
) {
1545 F_XATTR(file
) = send_xattr(f
, &sx
);
1551 maybe_emit_filelist_progress(flist
->used
+ flist_count_offset
);
1553 flist_expand(flist
, 1);
1554 flist
->files
[flist
->used
++] = file
;
1559 static void send_if_directory(int f
, struct file_list
*flist
,
1560 struct file_struct
*file
,
1561 char *fbuf
, unsigned int ol
,
1564 char is_dot_dir
= fbuf
[ol
-1] == '.' && (ol
== 1 || fbuf
[ol
-2] == '/');
1566 if (S_ISDIR(file
->mode
)
1567 && !(file
->flags
& FLAG_MOUNT_DIR
) && f_name(file
, fbuf
)) {
1569 unsigned int len
= strlen(fbuf
);
1570 if (len
> 1 && fbuf
[len
-1] == '/')
1572 save_filters
= push_local_filters(fbuf
, len
);
1573 send_directory(f
, flist
, fbuf
, len
, flags
);
1574 pop_local_filters(save_filters
);
1581 static int file_compare(const void *file1
, const void *file2
)
1583 return f_name_cmp(*(struct file_struct
**)file1
,
1584 *(struct file_struct
**)file2
);
1587 /* The guts of a merge-sort algorithm. This was derived from the glibc
1588 * version, but I (Wayne) changed the merge code to do less copying and
1589 * to require only half the amount of temporary memory. */
1590 static void fsort_tmp(struct file_struct
**fp
, size_t num
,
1591 struct file_struct
**tmp
)
1593 struct file_struct
**f1
, **f2
, **t
;
1602 fsort_tmp(f1
, n1
, tmp
);
1604 fsort_tmp(f2
, n2
, tmp
);
1606 while (f_name_cmp(*f1
, *f2
) <= 0) {
1613 memcpy(t
, f1
, n1
* PTR_SIZE
);
1615 *f1
++ = *f2
++, n2
--;
1617 while (n1
> 0 && n2
> 0) {
1618 if (f_name_cmp(*t
, *f2
) <= 0)
1621 *f1
++ = *f2
++, n2
--;
1625 memcpy(f1
, t
, n1
* PTR_SIZE
);
1628 /* This file-struct sorting routine makes sure that any identical names in
1629 * the file list stay in the same order as they were in the original list.
1630 * This is particularly vital in inc_recurse mode where we expect a sort
1631 * on the flist to match the exact order of a sort on the dir_flist. */
1632 static void fsort(struct file_struct
**fp
, size_t num
)
1638 qsort(fp
, num
, PTR_SIZE
, file_compare
);
1640 struct file_struct
**tmp
= new_array(struct file_struct
*,
1642 fsort_tmp(fp
, num
, tmp
);
1647 /* We take an entire set of sibling dirs from the sorted flist and link them
1648 * into the tree, setting the appropriate parent/child/sibling pointers. */
1649 static void add_dirs_to_tree(int parent_ndx
, struct file_list
*from_flist
,
1654 int32
*parent_dp
= parent_ndx
< 0 ? NULL
1655 : F_DIR_NODE_P(dir_flist
->sorted
[parent_ndx
]);
1657 flist_expand(dir_flist
, dir_cnt
);
1658 dir_flist
->sorted
= dir_flist
->files
;
1660 for (i
= 0; dir_cnt
; i
++) {
1661 struct file_struct
*file
= from_flist
->sorted
[i
];
1663 if (!S_ISDIR(file
->mode
))
1666 dir_flist
->files
[dir_flist
->used
++] = file
;
1669 if (file
->basename
[0] == '.' && file
->basename
[1] == '\0')
1673 DIR_NEXT_SIBLING(dp
) = dir_flist
->used
- 1;
1675 DIR_FIRST_CHILD(parent_dp
) = dir_flist
->used
- 1;
1677 send_dir_ndx
= dir_flist
->used
- 1;
1679 dp
= F_DIR_NODE_P(file
);
1680 DIR_PARENT(dp
) = parent_ndx
;
1681 DIR_FIRST_CHILD(dp
) = -1;
1684 DIR_NEXT_SIBLING(dp
) = -1;
1687 static void interpret_stat_error(const char *fname
, int is_dir
)
1689 if (errno
== ENOENT
) {
1690 io_error
|= IOERR_VANISHED
;
1691 rprintf(FWARNING
, "%s has vanished: %s\n",
1692 is_dir
? "directory" : "file", full_fname(fname
));
1694 io_error
|= IOERR_GENERAL
;
1695 rsyserr(FERROR_XFER
, errno
, "link_stat %s failed",
1700 /* This function is normally called by the sender, but the receiving side also
1701 * calls it from get_dirlist() with f set to -1 so that we just construct the
1702 * file list in memory without sending it over the wire. Also, get_dirlist()
1703 * might call this with f set to -2, which also indicates that local filter
1704 * rules should be ignored. */
1705 static void send_directory(int f
, struct file_list
*flist
, char *fbuf
, int len
,
1712 int divert_dirs
= (flags
& FLAG_DIVERT_DIRS
) != 0;
1713 int start
= flist
->used
;
1714 int filter_level
= f
== -2 ? SERVER_FILTERS
: ALL_FILTERS
;
1716 assert(flist
!= NULL
);
1718 if (!(d
= opendir(fbuf
))) {
1719 if (errno
== ENOENT
) {
1720 if (am_sender
) /* Can abuse this for vanished error w/ENOENT: */
1721 interpret_stat_error(fbuf
, True
);
1724 io_error
|= IOERR_GENERAL
;
1725 rsyserr(FERROR_XFER
, errno
, "opendir %s failed", full_fname(fbuf
));
1730 if (len
== 1 && *fbuf
== '/')
1731 remainder
= MAXPATHLEN
- 1;
1732 else if (len
< MAXPATHLEN
-1) {
1735 remainder
= MAXPATHLEN
- (len
+ 1);
1739 for (errno
= 0, di
= readdir(d
); di
; errno
= 0, di
= readdir(d
)) {
1741 char *dname
= d_name(di
);
1742 if (dname
[0] == '.' && (dname
[1] == '\0'
1743 || (dname
[1] == '.' && dname
[2] == '\0')))
1745 name_len
= strlcpy(p
, dname
, remainder
);
1746 if (name_len
>= remainder
) {
1747 char save
= fbuf
[len
];
1749 io_error
|= IOERR_GENERAL
;
1750 rprintf(FERROR_XFER
,
1751 "filename overflows max-path len by %u: %s/%s\n",
1752 name_len
- remainder
+ 1, fbuf
, dname
);
1756 if (dname
[0] == '\0') {
1757 io_error
|= IOERR_GENERAL
;
1758 rprintf(FERROR_XFER
,
1759 "cannot send file with empty name in %s\n",
1764 send_file_name(f
, flist
, fbuf
, NULL
, flags
, filter_level
);
1770 io_error
|= IOERR_GENERAL
;
1771 rsyserr(FERROR_XFER
, errno
, "readdir(%s)", full_fname(fbuf
));
1776 if (f
>= 0 && recurse
&& !divert_dirs
) {
1777 int i
, end
= flist
->used
- 1;
1778 /* send_if_directory() bumps flist->used, so use "end". */
1779 for (i
= start
; i
<= end
; i
++)
1780 send_if_directory(f
, flist
, flist
->files
[i
], fbuf
, len
, flags
);
1784 static void send_implied_dirs(int f
, struct file_list
*flist
, char *fname
,
1785 char *start
, char *limit
, int flags
, char name_type
)
1787 static char lastpath
[MAXPATHLEN
] = "";
1788 static int lastpath_len
= 0;
1789 static struct file_struct
*lastpath_struct
= NULL
;
1790 struct file_struct
*file
;
1791 item_list
*relname_list
;
1792 relnamecache
**rnpp
;
1793 int len
, need_new_dir
, depth
= 0;
1794 filter_rule_list save_filter_list
= filter_list
;
1796 flags
= (flags
| FLAG_IMPLIED_DIR
) & ~(FLAG_TOP_DIR
| FLAG_CONTENT_DIR
);
1797 filter_list
.head
= filter_list
.tail
= NULL
; /* Don't filter implied dirs. */
1800 if (lastpath_struct
&& F_PATHNAME(lastpath_struct
) == pathname
1801 && lastpath_len
== limit
- fname
1802 && strncmp(lastpath
, fname
, lastpath_len
) == 0)
1807 char *tp
= fname
, *lp
= lastpath
;
1808 /* Skip any initial directories in our path that we
1809 * have in common with lastpath. */
1810 assert(start
== fname
);
1811 for ( ; ; tp
++, lp
++) {
1813 if (*lp
== '/' || *lp
== '\0')
1828 int save_copy_links
= copy_links
;
1829 int save_xfer_dirs
= xfer_dirs
;
1832 copy_links
= xfer_dirs
= 1;
1836 for (slash
= start
; (slash
= strchr(slash
+1, '/')) != NULL
; ) {
1838 file
= send_file_name(f
, flist
, fname
, NULL
, flags
, ALL_FILTERS
);
1840 if (!inc_recurse
&& file
&& S_ISDIR(file
->mode
))
1841 change_local_filter_dir(fname
, strlen(fname
), depth
);
1845 file
= send_file_name(f
, flist
, fname
, NULL
, flags
, ALL_FILTERS
);
1847 if (file
&& !S_ISDIR(file
->mode
))
1849 lastpath_struct
= file
;
1850 } else if (file
&& S_ISDIR(file
->mode
))
1851 change_local_filter_dir(fname
, strlen(fname
), ++depth
);
1853 strlcpy(lastpath
, fname
, sizeof lastpath
);
1854 lastpath_len
= limit
- fname
;
1858 copy_links
= save_copy_links
;
1859 xfer_dirs
= save_xfer_dirs
;
1865 if (!lastpath_struct
)
1866 goto done
; /* dir must have vanished */
1868 len
= strlen(limit
+1);
1869 memcpy(&relname_list
, F_DIR_RELNAMES_P(lastpath_struct
), sizeof relname_list
);
1870 if (!relname_list
) {
1871 if (!(relname_list
= new0(item_list
)))
1872 out_of_memory("send_implied_dirs");
1873 memcpy(F_DIR_RELNAMES_P(lastpath_struct
), &relname_list
, sizeof relname_list
);
1875 rnpp
= EXPAND_ITEM_LIST(relname_list
, relnamecache
*, 32);
1876 if (!(*rnpp
= (relnamecache
*)new_array(char, sizeof (relnamecache
) + len
)))
1877 out_of_memory("send_implied_dirs");
1878 (*rnpp
)->name_type
= name_type
;
1879 strlcpy((*rnpp
)->fname
, limit
+1, len
+ 1);
1882 filter_list
= save_filter_list
;
1885 static NORETURN
void fatal_unsafe_io_error(void)
1887 /* This (sadly) can only happen when pushing data because
1888 * the sender does not know about what kind of delete
1889 * is in effect on the receiving side when pulling. */
1890 rprintf(FERROR_XFER
, "FATAL I/O ERROR: dying to avoid a --delete-%s issue with a pre-3.0.7 receiver.\n",
1891 delete_during
== 2 ? "delay" : "during");
1892 exit_cleanup(RERR_UNSUPPORTED
);
1895 static void send1extra(int f
, struct file_struct
*file
, struct file_list
*flist
)
1897 char fbuf
[MAXPATHLEN
];
1898 item_list
*relname_list
;
1899 int len
, dlen
, flags
= FLAG_DIVERT_DIRS
| FLAG_CONTENT_DIR
;
1903 dlen
= strlen(fbuf
);
1905 if (!change_pathname(file
, NULL
, 0))
1906 exit_cleanup(RERR_FILESELECT
);
1908 change_local_filter_dir(fbuf
, dlen
, send_dir_depth
);
1910 if (file
->flags
& FLAG_CONTENT_DIR
) {
1911 if (one_file_system
) {
1913 if (link_stat(fbuf
, &st
, copy_dirlinks
) != 0) {
1914 interpret_stat_error(fbuf
, True
);
1917 filesystem_dev
= st
.st_dev
;
1919 send_directory(f
, flist
, fbuf
, dlen
, flags
);
1922 if (!relative_paths
)
1925 memcpy(&relname_list
, F_DIR_RELNAMES_P(file
), sizeof relname_list
);
1929 for (j
= 0; j
< relname_list
->count
; j
++) {
1931 relnamecache
*rnp
= ((relnamecache
**)relname_list
->items
)[j
];
1932 char name_type
= rnp
->name_type
;
1935 len
= strlcpy(fbuf
+ dlen
+ 1, rnp
->fname
, sizeof fbuf
- dlen
- 1);
1937 if (len
>= (int)sizeof fbuf
)
1938 continue; /* Impossible... */
1940 slash
= strchr(fbuf
+dlen
+1, '/');
1942 send_implied_dirs(f
, flist
, fbuf
, fbuf
+dlen
+1, slash
, flags
, name_type
);
1946 if (name_type
!= NORMAL_NAME
) {
1948 if (name_type
== MISSING_NAME
)
1949 memset(&st
, 0, sizeof st
);
1950 else if (link_stat(fbuf
, &st
, 1) != 0) {
1951 interpret_stat_error(fbuf
, True
);
1954 send_file_name(f
, flist
, fbuf
, &st
, FLAG_TOP_DIR
| flags
, ALL_FILTERS
);
1956 send_file_name(f
, flist
, fbuf
, NULL
, FLAG_TOP_DIR
| flags
, ALL_FILTERS
);
1962 void send_extra_file_list(int f
, int at_least
)
1964 struct file_list
*flist
;
1967 int save_io_error
= io_error
;
1973 at_least
= file_total
- file_old_total
+ 1;
1975 /* Keep sending data until we have the requested number of
1976 * files in the upcoming file-lists. */
1977 while (file_total
- file_old_total
< at_least
) {
1978 struct file_struct
*file
= dir_flist
->sorted
[send_dir_ndx
];
1979 int dir_ndx
, dstart
= stats
.num_dirs
;
1980 const char *pathname
= F_PATHNAME(file
);
1983 flist
= flist_new(0, "send_extra_file_list");
1984 start_write
= stats
.total_written
;
1987 dir_ndx
= F_NDX(file
);
1989 dir_ndx
= send_dir_ndx
;
1990 write_ndx(f
, NDX_FLIST_OFFSET
- dir_ndx
);
1991 flist
->parent_ndx
= dir_ndx
;
1993 send1extra(f
, file
, flist
);
1994 prev_flags
= file
->flags
;
1995 dp
= F_DIR_NODE_P(file
);
1997 /* If there are any duplicate directory names that follow, we
1998 * send all the dirs together in one file-list. The dir_flist
1999 * tree links all the child subdirs onto the last dup dir. */
2000 while ((dir_ndx
= DIR_NEXT_SIBLING(dp
)) >= 0
2001 && dir_flist
->sorted
[dir_ndx
]->flags
& FLAG_DUPLICATE
) {
2002 send_dir_ndx
= dir_ndx
;
2003 file
= dir_flist
->sorted
[dir_ndx
];
2004 /* Try to avoid some duplicate scanning of identical dirs. */
2005 if (F_PATHNAME(file
) == pathname
&& prev_flags
& FLAG_CONTENT_DIR
)
2006 file
->flags
&= ~FLAG_CONTENT_DIR
;
2007 send1extra(f
, file
, flist
);
2008 prev_flags
= file
->flags
;
2009 dp
= F_DIR_NODE_P(file
);
2012 if (io_error
== save_io_error
|| ignore_errors
)
2014 else if (use_safe_inc_flist
) {
2015 write_shortint(f
, XMIT_EXTENDED_FLAGS
|XMIT_IO_ERROR_ENDLIST
);
2016 write_varint(f
, io_error
);
2019 fatal_unsafe_io_error();
2023 if (need_unsorted_flist
) {
2024 if (!(flist
->sorted
= new_array(struct file_struct
*, flist
->used
)))
2025 out_of_memory("send_extra_file_list");
2026 memcpy(flist
->sorted
, flist
->files
,
2027 flist
->used
* sizeof (struct file_struct
*));
2029 flist
->sorted
= flist
->files
;
2031 flist_sort_and_clean(flist
, 0);
2033 add_dirs_to_tree(send_dir_ndx
, flist
, stats
.num_dirs
- dstart
);
2034 flist_done_allocating(flist
);
2036 file_total
+= flist
->used
;
2037 stats
.flist_size
+= stats
.total_written
- start_write
;
2038 stats
.num_files
+= flist
->used
;
2039 if (DEBUG_GTE(FLIST
, 3))
2040 output_flist(flist
);
2042 if (DIR_FIRST_CHILD(dp
) >= 0) {
2043 send_dir_ndx
= DIR_FIRST_CHILD(dp
);
2046 while (DIR_NEXT_SIBLING(dp
) < 0) {
2047 if ((send_dir_ndx
= DIR_PARENT(dp
)) < 0) {
2048 write_ndx(f
, NDX_FLIST_EOF
);
2050 if (DEBUG_GTE(FLIST
, 3))
2051 rprintf(FINFO
, "[%s] flist_eof=1\n", who_am_i());
2052 change_local_filter_dir(NULL
, 0, 0);
2056 file
= dir_flist
->sorted
[send_dir_ndx
];
2057 dp
= F_DIR_NODE_P(file
);
2059 send_dir_ndx
= DIR_NEXT_SIBLING(dp
);
2064 if (io_error
!= save_io_error
&& protocol_version
== 30 && !ignore_errors
)
2065 send_msg_int(MSG_IO_ERROR
, io_error
);
2068 struct file_list
*send_file_list(int f
, int argc
, char *argv
[])
2070 static const char *lastdir
;
2071 static int lastdir_len
= -1;
2075 struct file_list
*flist
;
2076 struct timeval start_tv
, end_tv
;
2079 int disable_buffering
, reenable_multiplex
= -1;
2080 int flags
= recurse
? FLAG_CONTENT_DIR
: 0;
2081 int reading_remotely
= filesfrom_host
!= NULL
;
2082 int rl_flags
= (reading_remotely
? 0 : RL_DUMP_COMMENTS
)
2084 | (filesfrom_convert
? RL_CONVERT
: 0)
2086 | (eol_nulls
|| reading_remotely
? RL_EOL_NULLS
: 0);
2087 int implied_dot_dir
= 0;
2089 rprintf(FLOG
, "building file list\n");
2090 if (show_filelist_p())
2091 start_filelist_progress("building file list");
2092 else if (inc_recurse
&& INFO_GTE(FLIST
, 1) && !am_server
)
2093 rprintf(FCLIENT
, "sending incremental file list\n");
2095 start_write
= stats
.total_written
;
2096 gettimeofday(&start_tv
, NULL
);
2098 if (relative_paths
&& protocol_version
>= 30)
2099 implied_dirs
= 1; /* We send flagged implied dirs */
2101 #ifdef SUPPORT_HARD_LINKS
2102 if (preserve_hard_links
&& protocol_version
>= 30 && !cur_flist
)
2106 flist
= cur_flist
= flist_new(0, "send_file_list");
2108 dir_flist
= flist_new(FLIST_TEMP
, "send_file_list");
2109 flags
|= FLAG_DIVERT_DIRS
;
2111 dir_flist
= cur_flist
;
2113 disable_buffering
= io_start_buffering_out(f
);
2114 if (filesfrom_fd
>= 0) {
2115 if (argv
[0] && !change_dir(argv
[0], CD_NORMAL
)) {
2116 rsyserr(FERROR_XFER
, errno
, "change_dir %s failed",
2117 full_fname(argv
[0]));
2118 exit_cleanup(RERR_FILESELECT
);
2120 if (protocol_version
< 31) {
2121 /* Older protocols send the files-from data w/o packaging
2122 * it in multiplexed I/O packets, so temporarily switch
2123 * to buffered I/O to match this behavior. */
2124 reenable_multiplex
= io_end_multiplex_in(MPLX_TO_BUFFERED
);
2130 orig_dir
= strdup(curr_dir
);
2133 char fbuf
[MAXPATHLEN
], *fn
, name_type
;
2136 if (read_line(filesfrom_fd
, fbuf
, sizeof fbuf
, rl_flags
) == 0)
2138 sanitize_path(fbuf
, fbuf
, "", 0, SP_KEEP_DOT_DIRS
);
2142 strlcpy(fbuf
, *argv
++, MAXPATHLEN
);
2144 sanitize_path(fbuf
, fbuf
, "", 0, SP_KEEP_DOT_DIRS
);
2148 if (relative_paths
) {
2149 /* We clean up fbuf below. */
2150 name_type
= NORMAL_NAME
;
2151 } else if (!len
|| fbuf
[len
- 1] == '/') {
2152 if (len
== 2 && fbuf
[0] == '.') {
2153 /* Turn "./" into just "." rather than "./." */
2156 if (len
+ 1 >= MAXPATHLEN
)
2157 overflow_exit("send_file_list");
2161 name_type
= DOTDIR_NAME
;
2162 } else if (len
> 1 && fbuf
[len
-1] == '.' && fbuf
[len
-2] == '.'
2163 && (len
== 2 || fbuf
[len
-3] == '/')) {
2164 if (len
+ 2 >= MAXPATHLEN
)
2165 overflow_exit("send_file_list");
2169 name_type
= DOTDIR_NAME
;
2170 } else if (fbuf
[len
-1] == '.' && (len
== 1 || fbuf
[len
-2] == '/'))
2171 name_type
= DOTDIR_NAME
;
2173 name_type
= NORMAL_NAME
;
2177 if (!relative_paths
) {
2178 p
= strrchr(fbuf
, '/');
2185 len
-= p
- fbuf
+ 1;
2190 if ((p
= strstr(fbuf
, "/./")) != NULL
) {
2196 clean_fname(dir
, 0);
2202 *--fn
= '\0'; /* ensure room for '.' */
2205 /* A leading ./ can be used in relative mode to affect
2206 * the dest dir without its name being in the path. */
2207 if (*fn
== '.' && fn
[1] == '/' && fn
[2] && !implied_dot_dir
)
2208 implied_dot_dir
= -1;
2209 len
= clean_fname(fn
, CFN_KEEP_TRAILING_SLASH
2210 | CFN_DROP_TRAILING_DOT_DIR
);
2215 name_type
= DOTDIR_NAME
;
2216 } else if (fn
[0] == '.')
2217 name_type
= DOTDIR_NAME
;
2218 } else if (fn
[len
-1] == '/') {
2220 if (len
== 1 && *fn
== '.')
2221 name_type
= DOTDIR_NAME
;
2223 name_type
= SLASH_ENDING_NAME
;
2225 /* Reject a ".." dir in the active part of the path. */
2226 for (p
= fn
; (p
= strstr(p
, "..")) != NULL
; p
+= 2) {
2227 if ((p
[2] == '/' || p
[2] == '\0')
2228 && (p
== fn
|| p
[-1] == '/')) {
2230 "found \"..\" dir in relative path: %s\n",
2232 exit_cleanup(RERR_SYNTAX
);
2240 name_type
= DOTDIR_NAME
;
2243 dirlen
= dir
? strlen(dir
) : 0;
2244 if (dirlen
!= lastdir_len
|| memcmp(lastdir
, dir
, dirlen
) != 0) {
2245 if (!change_pathname(NULL
, dir
, -dirlen
))
2248 lastdir_len
= pathname_len
;
2249 } else if (!change_pathname(NULL
, lastdir
, lastdir_len
)) {
2251 if (implied_dot_dir
< 0)
2252 implied_dot_dir
= 0;
2256 if (implied_dot_dir
< 0) {
2257 implied_dot_dir
= 1;
2258 send_file_name(f
, flist
, ".", NULL
, (flags
| FLAG_IMPLIED_DIR
) & ~FLAG_CONTENT_DIR
, ALL_FILTERS
);
2262 memmove(fbuf
, fn
, len
+ 1);
2264 if (link_stat(fbuf
, &st
, copy_dirlinks
|| name_type
!= NORMAL_NAME
) != 0
2265 || (name_type
!= DOTDIR_NAME
&& is_daemon_excluded(fbuf
, S_ISDIR(st
.st_mode
)))
2266 || (relative_paths
&& path_is_daemon_excluded(fbuf
, 1))) {
2267 if (errno
!= ENOENT
|| missing_args
== 0) {
2268 /* This is a transfer error, but inhibit deletion
2269 * only if we might be omitting an existing file. */
2270 if (errno
!= ENOENT
)
2271 io_error
|= IOERR_GENERAL
;
2272 rsyserr(FERROR_XFER
, errno
, "link_stat %s failed",
2275 } else if (missing_args
== 1) {
2276 /* Just ignore the arg. */
2278 } else /* (missing_args == 2) */ {
2279 /* Send the arg as a "missing" entry with
2280 * mode 0, which tells the generator to delete it. */
2281 memset(&st
, 0, sizeof st
);
2285 /* A dot-dir should not be excluded! */
2286 if (name_type
!= DOTDIR_NAME
&& st
.st_mode
!= 0
2287 && is_excluded(fbuf
, S_ISDIR(st
.st_mode
) != 0, ALL_FILTERS
))
2290 if (S_ISDIR(st
.st_mode
) && !xfer_dirs
) {
2291 rprintf(FINFO
, "skipping directory %s\n", fbuf
);
2295 if (inc_recurse
&& relative_paths
&& *fbuf
) {
2296 if ((p
= strchr(fbuf
+1, '/')) != NULL
) {
2297 if (p
- fbuf
== 1 && *fbuf
== '.') {
2298 if ((fn
= strchr(p
+1, '/')) != NULL
)
2302 send_implied_dirs(f
, flist
, fbuf
, fbuf
, p
, flags
,
2303 IS_MISSING_FILE(st
) ? MISSING_NAME
: name_type
);
2307 } else if (implied_dirs
&& (p
=strrchr(fbuf
,'/')) && p
!= fbuf
) {
2308 /* Send the implied directories at the start of the
2309 * source spec, so we get their permissions right. */
2310 send_implied_dirs(f
, flist
, fbuf
, fbuf
, p
, flags
, 0);
2313 if (one_file_system
)
2314 filesystem_dev
= st
.st_dev
;
2316 if (recurse
|| (xfer_dirs
&& name_type
!= NORMAL_NAME
)) {
2317 struct file_struct
*file
;
2318 file
= send_file_name(f
, flist
, fbuf
, &st
,
2319 FLAG_TOP_DIR
| FLAG_CONTENT_DIR
| flags
,
2324 if (name_type
== DOTDIR_NAME
) {
2325 if (send_dir_depth
< 0) {
2327 change_local_filter_dir(fbuf
, len
, send_dir_depth
);
2329 send_directory(f
, flist
, fbuf
, len
, flags
);
2332 send_if_directory(f
, flist
, file
, fbuf
, len
, flags
);
2334 send_file_name(f
, flist
, fbuf
, &st
, flags
, NO_FILTERS
);
2337 if (reenable_multiplex
>= 0)
2338 io_start_multiplex_in(reenable_multiplex
);
2340 gettimeofday(&end_tv
, NULL
);
2341 stats
.flist_buildtime
= (int64
)(end_tv
.tv_sec
- start_tv
.tv_sec
) * 1000
2342 + (end_tv
.tv_usec
- start_tv
.tv_usec
) / 1000;
2343 if (stats
.flist_buildtime
== 0)
2344 stats
.flist_buildtime
= 1;
2347 /* Indicate end of file list */
2348 if (io_error
== 0 || ignore_errors
)
2350 else if (use_safe_inc_flist
) {
2351 write_shortint(f
, XMIT_EXTENDED_FLAGS
|XMIT_IO_ERROR_ENDLIST
);
2352 write_varint(f
, io_error
);
2354 if (delete_during
&& inc_recurse
)
2355 fatal_unsafe_io_error();
2359 #ifdef SUPPORT_HARD_LINKS
2360 if (preserve_hard_links
&& protocol_version
>= 30 && !inc_recurse
)
2364 if (show_filelist_p())
2365 finish_filelist_progress(flist
);
2367 gettimeofday(&end_tv
, NULL
);
2368 stats
.flist_xfertime
= (int64
)(end_tv
.tv_sec
- start_tv
.tv_sec
) * 1000
2369 + (end_tv
.tv_usec
- start_tv
.tv_usec
) / 1000;
2371 /* When converting names, both sides keep an unsorted file-list array
2372 * because the names will differ on the sending and receiving sides
2373 * (both sides will use the unsorted index number for each item). */
2375 /* Sort the list without removing any duplicates. This allows the
2376 * receiving side to ask for whatever name it kept. For incremental
2377 * recursion mode, the sender marks duplicate dirs so that it can
2378 * send them together in a single file-list. */
2379 if (need_unsorted_flist
) {
2380 if (!(flist
->sorted
= new_array(struct file_struct
*, flist
->used
)))
2381 out_of_memory("send_file_list");
2382 memcpy(flist
->sorted
, flist
->files
,
2383 flist
->used
* sizeof (struct file_struct
*));
2385 flist
->sorted
= flist
->files
;
2386 flist_sort_and_clean(flist
, 0);
2387 file_total
+= flist
->used
;
2388 file_old_total
+= flist
->used
;
2390 if (numeric_ids
<= 0 && !inc_recurse
)
2393 /* send the io_error flag */
2394 if (protocol_version
< 30)
2395 write_int(f
, ignore_errors
? 0 : io_error
);
2396 else if (!use_safe_inc_flist
&& io_error
&& !ignore_errors
)
2397 send_msg_int(MSG_IO_ERROR
, io_error
);
2399 if (disable_buffering
)
2400 io_end_buffering_out(IOBUF_FREE_BUFS
);
2402 stats
.flist_size
= stats
.total_written
- start_write
;
2403 stats
.num_files
= flist
->used
;
2405 if (DEBUG_GTE(FLIST
, 3))
2406 output_flist(flist
);
2408 if (DEBUG_GTE(FLIST
, 2))
2409 rprintf(FINFO
, "send_file_list done\n");
2413 add_dirs_to_tree(-1, flist
, stats
.num_dirs
);
2414 if (!file_total
|| strcmp(flist
->sorted
[flist
->low
]->basename
, ".") != 0)
2415 flist
->parent_ndx
= -1;
2416 flist_done_allocating(flist
);
2417 if (send_dir_ndx
< 0) {
2418 write_ndx(f
, NDX_FLIST_EOF
);
2420 if (DEBUG_GTE(FLIST
, 3))
2421 rprintf(FINFO
, "[%s] flist_eof=1\n", who_am_i());
2423 else if (file_total
== 1) {
2424 /* If we're creating incremental file-lists and there
2425 * was just 1 item in the first file-list, send 1 more
2426 * file-list to check if this is a 1-file xfer. */
2427 send_extra_file_list(f
, 1);
2431 if (DEBUG_GTE(FLIST
, 3))
2432 rprintf(FINFO
, "[%s] flist_eof=1\n", who_am_i());
2438 struct file_list
*recv_file_list(int f
)
2440 struct file_list
*flist
;
2445 if (show_filelist_p())
2446 start_filelist_progress("receiving file list");
2447 else if (inc_recurse
&& INFO_GTE(FLIST
, 1) && !am_server
)
2448 rprintf(FCLIENT
, "receiving incremental file list\n");
2449 rprintf(FLOG
, "receiving file list\n");
2451 parse_name_map(usermap
, True
);
2453 parse_name_map(groupmap
, False
);
2456 start_read
= stats
.total_read
;
2458 #ifdef SUPPORT_HARD_LINKS
2459 if (preserve_hard_links
&& !first_flist
)
2463 flist
= flist_new(0, "recv_file_list");
2466 if (flist
->ndx_start
== 1)
2467 dir_flist
= flist_new(FLIST_TEMP
, "recv_file_list");
2468 dstart
= dir_flist
->used
;
2474 while ((flags
= read_byte(f
)) != 0) {
2475 struct file_struct
*file
;
2477 if (protocol_version
>= 28 && (flags
& XMIT_EXTENDED_FLAGS
))
2478 flags
|= read_byte(f
) << 8;
2480 if (flags
== (XMIT_EXTENDED_FLAGS
|XMIT_IO_ERROR_ENDLIST
)) {
2482 if (!use_safe_inc_flist
) {
2483 rprintf(FERROR
, "Invalid flist flag: %x\n", flags
);
2484 exit_cleanup(RERR_PROTOCOL
);
2486 err
= read_varint(f
);
2492 flist_expand(flist
, 1);
2493 file
= recv_file_entry(f
, flist
, flags
);
2495 if (S_ISREG(file
->mode
)) {
2496 /* Already counted */
2497 } else if (S_ISDIR(file
->mode
)) {
2499 flist_expand(dir_flist
, 1);
2500 dir_flist
->files
[dir_flist
->used
++] = file
;
2503 } else if (S_ISLNK(file
->mode
))
2504 stats
.num_symlinks
++;
2505 else if (IS_DEVICE(file
->mode
))
2506 stats
.num_symlinks
++;
2508 stats
.num_specials
++;
2510 flist
->files
[flist
->used
++] = file
;
2512 maybe_emit_filelist_progress(flist
->used
);
2514 if (DEBUG_GTE(FLIST
, 2)) {
2515 char *name
= f_name(file
, NULL
);
2516 rprintf(FINFO
, "recv_file_name(%s)\n", NS(name
));
2519 file_total
+= flist
->used
;
2521 if (DEBUG_GTE(FLIST
, 2))
2522 rprintf(FINFO
, "received %d names\n", flist
->used
);
2524 if (show_filelist_p())
2525 finish_filelist_progress(flist
);
2527 if (need_unsorted_flist
) {
2528 /* Create an extra array of index pointers that we can sort for
2529 * the generator's use (for wading through the files in sorted
2530 * order and for calling flist_find()). We keep the "files"
2531 * list unsorted for our exchange of index numbers with the
2532 * other side (since their names may not sort the same). */
2533 if (!(flist
->sorted
= new_array(struct file_struct
*, flist
->used
)))
2534 out_of_memory("recv_file_list");
2535 memcpy(flist
->sorted
, flist
->files
,
2536 flist
->used
* sizeof (struct file_struct
*));
2537 if (inc_recurse
&& dir_flist
->used
> dstart
) {
2538 static int dir_flist_malloced
= 0;
2539 if (dir_flist_malloced
< dir_flist
->malloced
) {
2540 dir_flist
->sorted
= realloc_array(dir_flist
->sorted
,
2541 struct file_struct
*,
2542 dir_flist
->malloced
);
2543 dir_flist_malloced
= dir_flist
->malloced
;
2545 memcpy(dir_flist
->sorted
+ dstart
, dir_flist
->files
+ dstart
,
2546 (dir_flist
->used
- dstart
) * sizeof (struct file_struct
*));
2547 fsort(dir_flist
->sorted
+ dstart
, dir_flist
->used
- dstart
);
2550 flist
->sorted
= flist
->files
;
2551 if (inc_recurse
&& dir_flist
->used
> dstart
) {
2552 dir_flist
->sorted
= dir_flist
->files
;
2553 fsort(dir_flist
->sorted
+ dstart
, dir_flist
->used
- dstart
);
2558 flist_done_allocating(flist
);
2560 recv_id_list(f
, flist
);
2562 if (DEBUG_GTE(FLIST
, 3))
2563 rprintf(FINFO
, "[%s] flist_eof=1\n", who_am_i());
2566 /* The --relative option sends paths with a leading slash, so we need
2567 * to specify the strip_root option here. We rejected leading slashes
2568 * for a non-relative transfer in recv_file_entry(). */
2569 flist_sort_and_clean(flist
, relative_paths
);
2571 if (protocol_version
< 30) {
2572 /* Recv the io_error flag */
2573 int err
= read_int(f
);
2576 } else if (inc_recurse
&& flist
->ndx_start
== 1) {
2577 if (!file_total
|| strcmp(flist
->sorted
[flist
->low
]->basename
, ".") != 0)
2578 flist
->parent_ndx
= -1;
2581 if (DEBUG_GTE(FLIST
, 3))
2582 output_flist(flist
);
2584 if (DEBUG_GTE(FLIST
, 2))
2585 rprintf(FINFO
, "recv_file_list done\n");
2587 stats
.flist_size
+= stats
.total_read
- start_read
;
2588 stats
.num_files
+= flist
->used
;
2593 /* This is only used once by the receiver if the very first file-list
2594 * has exactly one item in it. */
2595 void recv_additional_file_list(int f
)
2597 struct file_list
*flist
;
2598 int ndx
= read_ndx(f
);
2599 if (ndx
== NDX_FLIST_EOF
) {
2601 if (DEBUG_GTE(FLIST
, 3))
2602 rprintf(FINFO
, "[%s] flist_eof=1\n", who_am_i());
2603 change_local_filter_dir(NULL
, 0, 0);
2605 ndx
= NDX_FLIST_OFFSET
- ndx
;
2606 if (ndx
< 0 || ndx
>= dir_flist
->used
) {
2607 ndx
= NDX_FLIST_OFFSET
- ndx
;
2609 "[%s] Invalid dir index: %d (%d - %d)\n",
2610 who_am_i(), ndx
, NDX_FLIST_OFFSET
,
2611 NDX_FLIST_OFFSET
- dir_flist
->used
+ 1);
2612 exit_cleanup(RERR_PROTOCOL
);
2614 if (DEBUG_GTE(FLIST
, 3)) {
2615 rprintf(FINFO
, "[%s] receiving flist for dir %d\n",
2618 flist
= recv_file_list(f
);
2619 flist
->parent_ndx
= ndx
;
2623 /* Search for an identically-named item in the file list. Note that the
2624 * items must agree in their directory-ness, or no match is returned. */
2625 int flist_find(struct file_list
*flist
, struct file_struct
*f
)
2627 int low
= flist
->low
, high
= flist
->high
;
2628 int diff
, mid
, mid_up
;
2630 while (low
<= high
) {
2631 mid
= (low
+ high
) / 2;
2632 if (F_IS_ACTIVE(flist
->sorted
[mid
]))
2635 /* Scan for the next non-empty entry using the cached
2636 * distance values. If the value isn't fully up-to-
2637 * date, update it. */
2638 mid_up
= mid
+ F_DEPTH(flist
->sorted
[mid
]);
2639 if (!F_IS_ACTIVE(flist
->sorted
[mid_up
])) {
2641 mid_up
+= F_DEPTH(flist
->sorted
[mid_up
]);
2642 } while (!F_IS_ACTIVE(flist
->sorted
[mid_up
]));
2643 F_DEPTH(flist
->sorted
[mid
]) = mid_up
- mid
;
2645 if (mid_up
> high
) {
2646 /* If there's nothing left above us, set high to
2647 * a non-empty entry below us and continue. */
2648 high
= mid
- (int)flist
->sorted
[mid
]->len32
;
2649 if (!F_IS_ACTIVE(flist
->sorted
[high
])) {
2651 high
-= (int)flist
->sorted
[high
]->len32
;
2652 } while (!F_IS_ACTIVE(flist
->sorted
[high
]));
2653 flist
->sorted
[mid
]->len32
= mid
- high
;
2658 diff
= f_name_cmp(flist
->sorted
[mid_up
], f
);
2660 if (protocol_version
< 29
2661 && S_ISDIR(flist
->sorted
[mid_up
]->mode
)
2662 != S_ISDIR(f
->mode
))
2674 /* Search for an identically-named item in the file list. Differs from
2675 * flist_find in that an item that agrees with "f" in directory-ness is
2676 * preferred but one that does not is still found. */
2677 int flist_find_ignore_dirness(struct file_list
*flist
, struct file_struct
*f
)
2682 /* First look for an item that agrees in directory-ness. */
2683 ndx
= flist_find(flist
, f
);
2687 /* Temporarily flip f->mode to look for an item of opposite
2688 * directory-ness. */
2689 save_mode
= f
->mode
;
2690 f
->mode
= S_ISDIR(f
->mode
) ? S_IFREG
: S_IFDIR
;
2691 ndx
= flist_find(flist
, f
);
2692 f
->mode
= save_mode
;
2697 * Free up any resources a file_struct has allocated
2698 * and clear the file.
2700 void clear_file(struct file_struct
*file
)
2702 /* The +1 zeros out the first char of the basename. */
2703 memset(file
, 0, FILE_STRUCT_LEN
+ 1);
2704 /* In an empty entry, F_DEPTH() is an offset to the next non-empty
2705 * entry. Likewise for len32 in the opposite direction. We assume
2706 * that we're alone for now since flist_find() will adjust the counts
2707 * it runs into that aren't up-to-date. */
2708 file
->len32
= F_DEPTH(file
) = 1;
2711 /* Allocate a new file list. */
2712 struct file_list
*flist_new(int flags
, char *msg
)
2714 struct file_list
*flist
;
2716 if (!(flist
= new0(struct file_list
)))
2719 if (flags
& FLIST_TEMP
) {
2720 if (!(flist
->file_pool
= pool_create(SMALL_EXTENT
, 0,
2725 /* This is a doubly linked list with prev looping back to
2726 * the end of the list, but the last next pointer is NULL. */
2728 flist
->file_pool
= pool_create(NORMAL_EXTENT
, 0,
2731 if (!flist
->file_pool
)
2734 flist
->ndx_start
= flist
->flist_num
= inc_recurse
? 1 : 0;
2736 first_flist
= cur_flist
= flist
->prev
= flist
;
2738 struct file_list
*prev
= first_flist
->prev
;
2740 flist
->file_pool
= first_flist
->file_pool
;
2742 flist
->ndx_start
= prev
->ndx_start
+ prev
->used
+ 1;
2743 flist
->flist_num
= prev
->flist_num
+ 1;
2746 prev
->next
= first_flist
->prev
= flist
;
2748 flist
->pool_boundary
= pool_boundary(flist
->file_pool
, 0);
2755 /* Free up all elements in a flist. */
2756 void flist_free(struct file_list
*flist
)
2759 /* Was FLIST_TEMP dir-list. */
2760 } else if (flist
== flist
->prev
) {
2761 first_flist
= cur_flist
= NULL
;
2765 if (flist
== cur_flist
)
2766 cur_flist
= flist
->next
;
2767 if (flist
== first_flist
)
2768 first_flist
= first_flist
->next
;
2770 flist
->prev
->next
= flist
->next
;
2772 flist
->next
= first_flist
;
2774 flist
->next
->prev
= flist
->prev
;
2775 file_total
-= flist
->used
;
2779 if (!flist
->prev
|| !flist_cnt
)
2780 pool_destroy(flist
->file_pool
);
2782 pool_free_old(flist
->file_pool
, flist
->pool_boundary
);
2784 if (flist
->sorted
&& flist
->sorted
!= flist
->files
)
2785 free(flist
->sorted
);
2790 /* This routine ensures we don't have any duplicate names in our file list.
2791 * duplicate names can cause corruption because of the pipelining. */
2792 static void flist_sort_and_clean(struct file_list
*flist
, int strip_root
)
2794 char fbuf
[MAXPATHLEN
];
2799 if (flist
->used
== 0) {
2805 fsort(flist
->sorted
, flist
->used
);
2807 if (!am_sender
|| inc_recurse
) {
2808 for (i
= prev_i
= 0; i
< flist
->used
; i
++) {
2809 if (F_IS_ACTIVE(flist
->sorted
[i
])) {
2814 flist
->low
= prev_i
;
2816 i
= prev_i
= flist
->used
- 1;
2820 while (++i
< flist
->used
) {
2822 struct file_struct
*file
= flist
->sorted
[i
];
2824 if (!F_IS_ACTIVE(file
))
2826 if (f_name_cmp(file
, flist
->sorted
[prev_i
]) == 0)
2828 else if (protocol_version
>= 29 && S_ISDIR(file
->mode
)) {
2829 int save_mode
= file
->mode
;
2830 /* Make sure that this directory doesn't duplicate a
2831 * non-directory earlier in the list. */
2832 flist
->high
= prev_i
;
2833 file
->mode
= S_IFREG
;
2834 j
= flist_find(flist
, file
);
2835 file
->mode
= save_mode
;
2840 /* If one is a dir and the other is not, we want to
2841 * keep the dir because it might have contents in the
2842 * list. Otherwise keep the first one. */
2843 if (S_ISDIR(file
->mode
)) {
2844 struct file_struct
*fp
= flist
->sorted
[j
];
2845 if (!S_ISDIR(fp
->mode
))
2849 file
->flags
|= FLAG_DUPLICATE
;
2850 else { /* Make sure we merge our vital flags. */
2851 fp
->flags
|= file
->flags
& (FLAG_TOP_DIR
|FLAG_CONTENT_DIR
);
2852 fp
->flags
&= file
->flags
| ~FLAG_IMPLIED_DIR
;
2860 if (DEBUG_GTE(DUP
, 1)) {
2862 "removing duplicate name %s from file list (%d)\n",
2863 f_name(file
, fbuf
), drop
+ flist
->ndx_start
);
2865 clear_file(flist
->sorted
[drop
]);
2869 if (flist
->low
== drop
) {
2871 j
< i
&& !F_IS_ACTIVE(flist
->sorted
[j
]);
2880 flist
->high
= prev_i
;
2883 /* We need to strip off the leading slashes for relative
2884 * paths, but this must be done _after_ the sorting phase. */
2885 for (i
= flist
->low
; i
<= flist
->high
; i
++) {
2886 struct file_struct
*file
= flist
->sorted
[i
];
2890 while (*file
->dirname
== '/')
2892 if (!*file
->dirname
)
2893 file
->dirname
= NULL
;
2897 if (prune_empty_dirs
&& !am_sender
) {
2898 int j
, prev_depth
= 0;
2900 prev_i
= 0; /* It's OK that this isn't really true. */
2902 for (i
= flist
->low
; i
<= flist
->high
; i
++) {
2903 struct file_struct
*fp
, *file
= flist
->sorted
[i
];
2905 /* This temporarily abuses the F_DEPTH() value for a
2906 * directory that is in a chain that might get pruned.
2907 * We restore the old value if it gets a reprieve. */
2908 if (S_ISDIR(file
->mode
) && F_DEPTH(file
)) {
2909 /* Dump empty dirs when coming back down. */
2910 for (j
= prev_depth
; j
>= F_DEPTH(file
); j
--) {
2911 fp
= flist
->sorted
[prev_i
];
2912 if (F_DEPTH(fp
) >= 0)
2914 prev_i
= -F_DEPTH(fp
)-1;
2917 prev_depth
= F_DEPTH(file
);
2918 if (is_excluded(f_name(file
, fbuf
), 1,
2920 /* Keep dirs through this dir. */
2921 for (j
= prev_depth
-1; ; j
--) {
2922 fp
= flist
->sorted
[prev_i
];
2923 if (F_DEPTH(fp
) >= 0)
2925 prev_i
= -F_DEPTH(fp
)-1;
2929 F_DEPTH(file
) = -prev_i
-1;
2932 /* Keep dirs through this non-dir. */
2933 for (j
= prev_depth
; ; j
--) {
2934 fp
= flist
->sorted
[prev_i
];
2935 if (F_DEPTH(fp
) >= 0)
2937 prev_i
= -F_DEPTH(fp
)-1;
2942 /* Dump all remaining empty dirs. */
2944 struct file_struct
*fp
= flist
->sorted
[prev_i
];
2945 if (F_DEPTH(fp
) >= 0)
2947 prev_i
= -F_DEPTH(fp
)-1;
2951 for (i
= flist
->low
; i
<= flist
->high
; i
++) {
2952 if (F_IS_ACTIVE(flist
->sorted
[i
]))
2956 for (i
= flist
->high
; i
>= flist
->low
; i
--) {
2957 if (F_IS_ACTIVE(flist
->sorted
[i
]))
2964 static void output_flist(struct file_list
*flist
)
2966 char uidbuf
[16], gidbuf
[16], depthbuf
[16];
2967 struct file_struct
*file
;
2968 const char *root
, *dir
, *slash
, *name
, *trail
;
2969 const char *who
= who_am_i();
2972 rprintf(FINFO
, "[%s] flist start=%d, used=%d, low=%d, high=%d\n",
2973 who
, flist
->ndx_start
, flist
->used
, flist
->low
, flist
->high
);
2974 for (i
= 0; i
< flist
->used
; i
++) {
2975 file
= flist
->files
[i
];
2976 if ((am_root
|| am_sender
) && uid_ndx
) {
2977 snprintf(uidbuf
, sizeof uidbuf
, " uid=%u",
2982 static char parens
[] = "(\0)\0\0\0";
2983 char *pp
= parens
+ (file
->flags
& FLAG_SKIP_GROUP
? 0 : 3);
2984 snprintf(gidbuf
, sizeof gidbuf
, " gid=%s%u%s",
2985 pp
, F_GROUP(file
), pp
+ 2);
2989 snprintf(depthbuf
, sizeof depthbuf
, "%d", F_DEPTH(file
));
2990 if (F_IS_ACTIVE(file
)) {
2991 root
= am_sender
? NS(F_PATHNAME(file
)) : depthbuf
;
2992 if ((dir
= file
->dirname
) == NULL
)
2996 name
= file
->basename
;
2997 trail
= S_ISDIR(file
->mode
) ? "/" : "";
2999 root
= dir
= slash
= name
= trail
= "";
3001 "[%s] i=%d %s %s%s%s%s mode=0%o len=%s%s%s flags=%x\n",
3002 who
, i
+ flist
->ndx_start
,
3003 root
, dir
, slash
, name
, trail
,
3004 (int)file
->mode
, comma_num(F_LENGTH(file
)),
3005 uidbuf
, gidbuf
, file
->flags
);
3009 enum fnc_state
{ s_DIR
, s_SLASH
, s_BASE
, s_TRAILING
};
3010 enum fnc_type
{ t_PATH
, t_ITEM
};
3012 static int found_prefix
;
3014 /* Compare the names of two file_struct entities, similar to how strcmp()
3015 * would do if it were operating on the joined strings.
3017 * Some differences beginning with protocol_version 29: (1) directory names
3018 * are compared with an assumed trailing slash so that they compare in a
3019 * way that would cause them to sort immediately prior to any content they
3020 * may have; (2) a directory of any name compares after a non-directory of
3021 * any name at the same depth; (3) a directory with name "." compares prior
3022 * to anything else. These changes mean that a directory and a non-dir
3023 * with the same name will not compare as equal (protocol_version >= 29).
3025 * The dirname component can be an empty string, but the basename component
3026 * cannot (and never is in the current codebase). The basename component
3027 * may be NULL (for a removed item), in which case it is considered to be
3028 * after any existing item. */
3029 int f_name_cmp(const struct file_struct
*f1
, const struct file_struct
*f2
)
3032 const uchar
*c1
, *c2
;
3033 enum fnc_state state1
, state2
;
3034 enum fnc_type type1
, type2
;
3035 enum fnc_type t_path
= protocol_version
>= 29 ? t_PATH
: t_ITEM
;
3037 if (!f1
|| !F_IS_ACTIVE(f1
)) {
3038 if (!f2
|| !F_IS_ACTIVE(f2
))
3042 if (!f2
|| !F_IS_ACTIVE(f2
))
3045 c1
= (uchar
*)f1
->dirname
;
3046 c2
= (uchar
*)f2
->dirname
;
3050 type1
= S_ISDIR(f1
->mode
) ? t_path
: t_ITEM
;
3051 c1
= (const uchar
*)f1
->basename
;
3052 if (type1
== t_PATH
&& *c1
== '.' && !c1
[1]) {
3054 state1
= s_TRAILING
;
3063 type2
= S_ISDIR(f2
->mode
) ? t_path
: t_ITEM
;
3064 c2
= (const uchar
*)f2
->basename
;
3065 if (type2
== t_PATH
&& *c2
== '.' && !c2
[1]) {
3067 state2
= s_TRAILING
;
3077 return type1
== t_PATH
? 1 : -1;
3087 type1
= S_ISDIR(f1
->mode
) ? t_path
: t_ITEM
;
3088 c1
= (const uchar
*)f1
->basename
;
3089 if (type1
== t_PATH
&& *c1
== '.' && !c1
[1]) {
3091 state1
= s_TRAILING
;
3097 state1
= s_TRAILING
;
3098 if (type1
== t_PATH
) {
3107 if (*c2
&& type1
!= type2
)
3108 return type1
== t_PATH
? 1 : -1;
3117 type2
= S_ISDIR(f2
->mode
) ? t_path
: t_ITEM
;
3118 c2
= (const uchar
*)f2
->basename
;
3119 if (type2
== t_PATH
&& *c2
== '.' && !c2
[1]) {
3121 state2
= s_TRAILING
;
3127 state2
= s_TRAILING
;
3128 if (type2
== t_PATH
) {
3141 return type1
== t_PATH
? 1 : -1;
3143 } while ((dif
= (int)*c1
++ - (int)*c2
++) == 0);
3148 /* Returns 1 if f1's filename has all of f2's filename as a prefix. This does
3149 * not match if f2's basename is not an exact match of a path element in f1.
3150 * E.g. /path/foo is not a prefix of /path/foobar/baz, but /path/foobar is. */
3151 int f_name_has_prefix(const struct file_struct
*f1
, const struct file_struct
*f2
)
3155 return found_prefix
;
3158 char *f_name_buf(void)
3160 static char names
[5][MAXPATHLEN
];
3161 static unsigned int n
;
3163 n
= (n
+ 1) % (sizeof names
/ sizeof names
[0]);
3168 /* Return a copy of the full filename of a flist entry, using the indicated
3169 * buffer or one of 5 static buffers if fbuf is NULL. No size-checking is
3170 * done because we checked the size when creating the file_struct entry.
3172 char *f_name(const struct file_struct
*f
, char *fbuf
)
3174 if (!f
|| !F_IS_ACTIVE(f
))
3178 fbuf
= f_name_buf();
3181 int len
= strlen(f
->dirname
);
3182 memcpy(fbuf
, f
->dirname
, len
);
3184 strlcpy(fbuf
+ len
+ 1, f
->basename
, MAXPATHLEN
- (len
+ 1));
3186 strlcpy(fbuf
, f
->basename
, MAXPATHLEN
);
3191 /* Do a non-recursive scan of the named directory, possibly ignoring all
3192 * exclude rules except for the daemon's. If "dlen" is >=0, it is the length
3193 * of the dirname string, and also indicates that "dirname" is a MAXPATHLEN
3194 * buffer (the functions we call will append names onto the end, but the old
3195 * dir value will be restored on exit). */
3196 struct file_list
*get_dirlist(char *dirname
, int dlen
, int flags
)
3198 struct file_list
*dirlist
;
3199 char dirbuf
[MAXPATHLEN
];
3200 int save_recurse
= recurse
;
3201 int save_xfer_dirs
= xfer_dirs
;
3202 int save_prune_empty_dirs
= prune_empty_dirs
;
3203 int senddir_fd
= flags
& GDL_IGNORE_FILTER_RULES
? -2 : -1;
3206 dlen
= strlcpy(dirbuf
, dirname
, MAXPATHLEN
);
3207 if (dlen
>= MAXPATHLEN
)
3212 dirlist
= flist_new(FLIST_TEMP
, "get_dirlist");
3216 send_directory(senddir_fd
, dirlist
, dirname
, dlen
, FLAG_CONTENT_DIR
);
3217 xfer_dirs
= save_xfer_dirs
;
3218 recurse
= save_recurse
;
3219 if (INFO_GTE(PROGRESS
, 1))
3220 flist_count_offset
+= dirlist
->used
;
3222 prune_empty_dirs
= 0;
3223 dirlist
->sorted
= dirlist
->files
;
3224 flist_sort_and_clean(dirlist
, 0);
3225 prune_empty_dirs
= save_prune_empty_dirs
;
3227 if (DEBUG_GTE(FLIST
, 3))
3228 output_flist(dirlist
);