Added parsing for --delete-delay.
[rsync.git] / sender.c
1 /*
2  * Routines only used by the sending process.
3  *
4  * Copyright (C) 1996 Andrew Tridgell
5  * Copyright (C) 1996 Paul Mackerras
6  * Copyright (C) 2003, 2004, 2005, 2006 Wayne Davison
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License as published by
10  * the Free Software Foundation; either version 2 of the License, or
11  * (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License along
19  * with this program; if not, write to the Free Software Foundation, Inc.,
20  * 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.
21  */
22
23 #include "rsync.h"
24
25 extern int verbose;
26 extern int do_xfers;
27 extern int am_server;
28 extern int am_daemon;
29 extern int log_before_transfer;
30 extern int stdout_format_has_i;
31 extern int logfile_format_has_i;
32 extern int csum_length;
33 extern int append_mode;
34 extern int io_error;
35 extern int allowed_lull;
36 extern int protocol_version;
37 extern int remove_source_files;
38 extern int updating_basis_file;
39 extern int make_backups;
40 extern int do_progress;
41 extern int inplace;
42 extern int batch_fd;
43 extern int write_batch;
44 extern struct stats stats;
45 extern struct file_list *the_file_list;
46 extern char *stdout_format;
47
48
49 /**
50  * @file
51  *
52  * The sender gets checksums from the generator, calculates deltas,
53  * and transmits them to the receiver.  The sender process runs on the
54  * machine holding the source files.
55  **/
56
57 /**
58  * Receive the checksums for a buffer
59  **/
60 static struct sum_struct *receive_sums(int f)
61 {
62         struct sum_struct *s;
63         int32 i;
64         int lull_mod = allowed_lull * 5;
65         OFF_T offset = 0;
66
67         if (!(s = new(struct sum_struct)))
68                 out_of_memory("receive_sums");
69
70         read_sum_head(f, s);
71
72         s->sums = NULL;
73
74         if (verbose > 3) {
75                 rprintf(FINFO, "count=%.0f n=%ld rem=%ld\n",
76                         (double)s->count, (long)s->blength, (long)s->remainder);
77         }
78
79         if (append_mode) {
80                 s->flength = (OFF_T)s->count * s->blength;
81                 if (s->remainder)
82                         s->flength -= s->blength - s->remainder;
83                 return s;
84         }
85
86         if (s->count == 0)
87                 return(s);
88
89         if (!(s->sums = new_array(struct sum_buf, s->count)))
90                 out_of_memory("receive_sums");
91
92         for (i = 0; i < s->count; i++) {
93                 s->sums[i].sum1 = read_int(f);
94                 read_buf(f, s->sums[i].sum2, s->s2length);
95
96                 s->sums[i].offset = offset;
97                 s->sums[i].flags = 0;
98
99                 if (i == s->count-1 && s->remainder != 0)
100                         s->sums[i].len = s->remainder;
101                 else
102                         s->sums[i].len = s->blength;
103                 offset += s->sums[i].len;
104
105                 if (allowed_lull && !(i % lull_mod))
106                         maybe_send_keepalive();
107
108                 if (verbose > 3) {
109                         rprintf(FINFO,
110                                 "chunk[%d] len=%d offset=%.0f sum1=%08x\n",
111                                 i, s->sums[i].len, (double)s->sums[i].offset,
112                                 s->sums[i].sum1);
113                 }
114         }
115
116         s->flength = offset;
117
118         return s;
119 }
120
121 void successful_send(int ndx)
122 {
123         char fname[MAXPATHLEN];
124         struct file_struct *file;
125         unsigned int offset;
126
127         if (ndx < 0 || ndx >= the_file_list->count)
128                 return;
129
130         file = the_file_list->files[ndx];
131         if (file->dir.root) {
132                 offset = stringjoin(fname, sizeof fname,
133                                     file->dir.root, "/", NULL);
134         } else
135                 offset = 0;
136         f_name(file, fname + offset);
137         if (remove_source_files) {
138                 if (do_unlink(fname) == 0) {
139                         if (verbose > 1)
140                                 rprintf(FINFO, "sender removed %s\n", fname + offset);
141                 } else
142                         rsyserr(FERROR, errno, "sender failed to remove %s", fname + offset);
143         }
144 }
145
146 static void write_ndx_and_attrs(int f_out, int ndx, int iflags,
147                                 uchar fnamecmp_type, char *buf, int len)
148 {
149         write_int(f_out, ndx);
150         if (protocol_version < 29)
151                 return;
152         write_shortint(f_out, iflags);
153         if (iflags & ITEM_BASIS_TYPE_FOLLOWS)
154                 write_byte(f_out, fnamecmp_type);
155         if (iflags & ITEM_XNAME_FOLLOWS)
156                 write_vstring(f_out, buf, len);
157 }
158
159 /* This is also used by receive.c with f_out = -1. */
160 int read_item_attrs(int f_in, int f_out, int ndx, uchar *type_ptr,
161                     char *buf, int *len_ptr)
162 {
163         int len;
164         uchar fnamecmp_type = FNAMECMP_FNAME;
165         int iflags = protocol_version >= 29 ? read_shortint(f_in)
166                    : ITEM_TRANSFER | ITEM_MISSING_DATA;
167
168         /* Handle the new keep-alive (no-op) packet. */
169         if (ndx == the_file_list->count && iflags == ITEM_IS_NEW)
170                 ;
171         else if (ndx < 0 || ndx >= the_file_list->count) {
172                 rprintf(FERROR, "Invalid file index: %d (count=%d) [%s]\n",
173                         ndx, the_file_list->count, who_am_i());
174                 exit_cleanup(RERR_PROTOCOL);
175         } else if (iflags == ITEM_IS_NEW) {
176                 rprintf(FERROR, "Invalid itemized flag word: %x [%s]\n",
177                         iflags, who_am_i());
178                 exit_cleanup(RERR_PROTOCOL);
179         }
180
181         if (iflags & ITEM_BASIS_TYPE_FOLLOWS)
182                 fnamecmp_type = read_byte(f_in);
183         *type_ptr = fnamecmp_type;
184
185         if (iflags & ITEM_XNAME_FOLLOWS) {
186                 if ((len = read_vstring(f_in, buf, MAXPATHLEN)) < 0)
187                         exit_cleanup(RERR_PROTOCOL);
188         } else {
189                 *buf = '\0';
190                 len = -1;
191         }
192         *len_ptr = len;
193
194         if (iflags & ITEM_TRANSFER) {
195                 if (!S_ISREG(the_file_list->files[ndx]->mode)) {
196                         rprintf(FERROR,
197                                 "received request to transfer non-regular file: %d [%s]\n",
198                                 ndx, who_am_i());
199                         exit_cleanup(RERR_PROTOCOL);
200                 }
201         } else if (f_out >= 0) {
202                 write_ndx_and_attrs(f_out, ndx, iflags,
203                                     fnamecmp_type, buf, len);
204         }
205
206         return iflags;
207 }
208
209 void send_files(struct file_list *flist, int f_out, int f_in)
210 {
211         int fd = -1;
212         struct sum_struct *s;
213         struct map_struct *mbuf = NULL;
214         STRUCT_STAT st;
215         char *fname2, fname[MAXPATHLEN];
216         char xname[MAXPATHLEN];
217         uchar fnamecmp_type;
218         int iflags, xlen;
219         struct file_struct *file;
220         int phase = 0, max_phase = protocol_version >= 29 ? 2 : 1;
221         struct stats initial_stats;
222         int save_make_backups = make_backups;
223         int itemizing = am_server ? logfile_format_has_i : stdout_format_has_i;
224         enum logcode log_code = log_before_transfer ? FLOG : FINFO;
225         int f_xfer = write_batch < 0 ? batch_fd : f_out;
226         int i, j;
227
228         if (verbose > 2)
229                 rprintf(FINFO, "send_files starting\n");
230
231         while (1) {
232                 unsigned int offset;
233
234                 i = read_int(f_in);
235                 if (i == -1) {
236                         if (++phase > max_phase)
237                                 break;
238                         csum_length = SUM_LENGTH;
239                         if (verbose > 2)
240                                 rprintf(FINFO, "send_files phase=%d\n", phase);
241                         write_int(f_out, -1);
242                         /* For inplace: redo phase turns off the backup
243                          * flag so that we do a regular inplace send. */
244                         make_backups = 0;
245                         append_mode = 0;
246                         continue;
247                 }
248
249                 iflags = read_item_attrs(f_in, f_out, i, &fnamecmp_type,
250                                          xname, &xlen);
251                 if (iflags == ITEM_IS_NEW) /* no-op packet */
252                         continue;
253
254                 file = flist->files[i];
255                 if (file->dir.root) {
256                         /* N.B. We're sure that this fits, so offset is OK. */
257                         offset = strlcpy(fname, file->dir.root, sizeof fname);
258                         if (!offset || fname[offset-1] != '/')
259                                 fname[offset++] = '/';
260                 } else
261                         offset = 0;
262                 fname2 = f_name(file, fname + offset);
263
264                 if (verbose > 2)
265                         rprintf(FINFO, "send_files(%d, %s)\n", i, fname);
266
267                 if (!(iflags & ITEM_TRANSFER)) {
268                         maybe_log_item(file, iflags, itemizing, xname);
269                         continue;
270                 }
271                 if (phase == 2) {
272                         rprintf(FERROR,
273                                 "got transfer request in phase 2 [%s]\n",
274                                 who_am_i());
275                         exit_cleanup(RERR_PROTOCOL);
276                 }
277
278                 updating_basis_file = inplace && (protocol_version >= 29
279                         ? fnamecmp_type == FNAMECMP_FNAME : !make_backups);
280
281                 stats.current_file_index = i;
282                 stats.num_transferred_files++;
283                 stats.total_transferred_size += file->length;
284
285                 if (!do_xfers) { /* log the transfer */
286                         log_item(FCLIENT, file, &stats, iflags, NULL);
287                         write_ndx_and_attrs(f_out, i, iflags, fnamecmp_type,
288                                             xname, xlen);
289                         continue;
290                 }
291
292                 initial_stats = stats;
293
294                 if (!(s = receive_sums(f_in))) {
295                         io_error |= IOERR_GENERAL;
296                         rprintf(FERROR, "receive_sums failed\n");
297                         return;
298                 }
299
300                 fd = do_open(fname, O_RDONLY, 0);
301                 if (fd == -1) {
302                         if (errno == ENOENT) {
303                                 enum logcode c = am_daemon
304                                     && protocol_version < 28 ? FERROR
305                                                              : FINFO;
306                                 io_error |= IOERR_VANISHED;
307                                 rprintf(c, "file has vanished: %s\n",
308                                         full_fname(fname));
309                         } else {
310                                 io_error |= IOERR_GENERAL;
311                                 rsyserr(FERROR, errno,
312                                         "send_files failed to open %s",
313                                         full_fname(fname));
314                         }
315                         free_sums(s);
316                         continue;
317                 }
318
319                 /* map the local file */
320                 if (do_fstat(fd, &st) != 0) {
321                         io_error |= IOERR_GENERAL;
322                         rsyserr(FERROR, errno, "fstat failed");
323                         free_sums(s);
324                         close(fd);
325                         return;
326                 }
327
328                 if (st.st_size) {
329                         int32 read_size = MAX(s->blength * 3, MAX_MAP_SIZE);
330                         mbuf = map_file(fd, st.st_size, read_size, s->blength);
331                 } else
332                         mbuf = NULL;
333
334                 if (verbose > 2) {
335                         rprintf(FINFO, "send_files mapped %s of size %.0f\n",
336                                 fname, (double)st.st_size);
337                 }
338
339                 write_ndx_and_attrs(f_out, i, iflags, fnamecmp_type,
340                                     xname, xlen);
341                 write_sum_head(f_xfer, s);
342
343                 if (verbose > 2)
344                         rprintf(FINFO, "calling match_sums %s\n", fname);
345
346                 if (log_before_transfer)
347                         log_item(FCLIENT, file, &initial_stats, iflags, NULL);
348                 else if (!am_server && verbose && do_progress)
349                         rprintf(FCLIENT, "%s\n", fname2);
350
351                 set_compression(fname);
352
353                 match_sums(f_xfer, s, mbuf, st.st_size);
354                 if (do_progress)
355                         end_progress(st.st_size);
356
357                 log_item(log_code, file, &initial_stats, iflags, NULL);
358
359                 if (mbuf) {
360                         j = unmap_file(mbuf);
361                         if (j) {
362                                 io_error |= IOERR_GENERAL;
363                                 rsyserr(FERROR, j,
364                                         "read errors mapping %s",
365                                         full_fname(fname));
366                         }
367                 }
368                 close(fd);
369
370                 free_sums(s);
371
372                 if (verbose > 2)
373                         rprintf(FINFO, "sender finished %s\n", fname);
374
375                 /* Flag that we actually sent this entry. */
376                 file->flags |= FLAG_SENT;
377         }
378         make_backups = save_make_backups;
379
380         if (verbose > 2)
381                 rprintf(FINFO, "send files finished\n");
382
383         match_report();
384
385         write_int(f_out, -1);
386 }