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
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  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 log_format_has_i;
  31 extern int daemon_log_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_sent_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 *log_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         /* The generator might tell us about symlinks we didn't send. */
 132         if (!(file->flags & FLAG_SENT) && !S_ISLNK(file->mode))
 133                 return;
 134         if (file->dir.root) {
 135                 offset = stringjoin(fname, sizeof fname,
 136                                     file->dir.root, "/", NULL);
 137         } else
 138                 offset = 0;
 139         f_name(file, fname + offset);
 140         if (remove_sent_files && do_unlink(fname) == 0 && verbose > 1)
 141                 rprintf(FINFO, "sender removed %s\n", fname + offset);
 142 }
 143
 144 static void write_ndx_and_attrs(int f_out, int ndx, int iflags,
 145                                 uchar fnamecmp_type, char *buf, int len)
 146 {
 147         write_int(f_out, ndx);
 148         if (protocol_version < 29)
 149                 return;
 150         write_shortint(f_out, iflags);
 151         if (iflags & ITEM_BASIS_TYPE_FOLLOWS)
 152                 write_byte(f_out, fnamecmp_type);
 153         if (iflags & ITEM_XNAME_FOLLOWS)
 154                 write_vstring(f_out, buf, len);
 155 }
 156
 157 /* This is also used by receive.c with f_out = -1. */
 158 int read_item_attrs(int f_in, int f_out, int ndx, uchar *type_ptr,
 159                     char *buf, int *len_ptr)
 160 {
 161         int len;
 162         uchar fnamecmp_type = FNAMECMP_FNAME;
 163         int iflags = protocol_version >= 29 ? read_shortint(f_in)
 164                    : ITEM_TRANSFER | ITEM_MISSING_DATA;
 165
 166         /* Handle the new keep-alive (no-op) packet. */
 167         if (ndx == the_file_list->count && iflags == ITEM_IS_NEW)
 168                 ;
 169         else if (ndx < 0 || ndx >= the_file_list->count) {
 170                 rprintf(FERROR, "Invalid file index: %d (count=%d) [%s]\n",
 171                         ndx, the_file_list->count, who_am_i());
 172                 exit_cleanup(RERR_PROTOCOL);
 173         } else if (iflags == ITEM_IS_NEW) {
 174                 rprintf(FERROR, "Invalid itemized flag word: %x [%s]\n",
 175                         iflags, who_am_i());
 176                 exit_cleanup(RERR_PROTOCOL);
 177         }
 178
 179         if (iflags & ITEM_BASIS_TYPE_FOLLOWS)
 180                 fnamecmp_type = read_byte(f_in);
 181         *type_ptr = fnamecmp_type;
 182
 183         if (iflags & ITEM_XNAME_FOLLOWS) {
 184                 if ((len = read_vstring(f_in, buf, MAXPATHLEN)) < 0)
 185                         exit_cleanup(RERR_PROTOCOL);
 186         } else {
 187                 *buf = '\0';
 188                 len = -1;
 189         }
 190         *len_ptr = len;
 191
 192         if (iflags & ITEM_TRANSFER) {
 193                 if (!S_ISREG(the_file_list->files[ndx]->mode)) {
 194                         rprintf(FERROR,
 195                                 "received request to transfer non-regular file: %d [%s]\n",
 196                                 ndx, who_am_i());
 197                         exit_cleanup(RERR_PROTOCOL);
 198                 }
 199         } else if (f_out >= 0) {
 200                 write_ndx_and_attrs(f_out, ndx, iflags,
 201                                     fnamecmp_type, buf, len);
 202         }
 203
 204         return iflags;
 205 }
 206
 207 void send_files(struct file_list *flist, int f_out, int f_in)
 208 {
 209         int fd = -1;
 210         struct sum_struct *s;
 211         struct map_struct *mbuf = NULL;
 212         STRUCT_STAT st;
 213         char *fname2, fname[MAXPATHLEN];
 214         char xname[MAXPATHLEN];
 215         uchar fnamecmp_type;
 216         int iflags, xlen;
 217         struct file_struct *file;
 218         int phase = 0, max_phase = protocol_version >= 29 ? 2 : 1;
 219         struct stats initial_stats;
 220         int save_make_backups = make_backups;
 221         int itemizing = am_daemon ? daemon_log_format_has_i
 222                       : !am_server && log_format_has_i;
 223         int f_xfer = write_batch < 0 ? batch_fd : f_out;
 224         int i, j;
 225
 226         if (verbose > 2)
 227                 rprintf(FINFO, "send_files starting\n");
 228
 229         while (1) {
 230                 unsigned int offset;
 231
 232                 i = read_int(f_in);
 233                 if (i == -1) {
 234                         if (++phase > max_phase)
 235                                 break;
 236                         csum_length = SUM_LENGTH;
 237                         if (verbose > 2)
 238                                 rprintf(FINFO, "send_files phase=%d\n", phase);
 239                         write_int(f_out, -1);
 240                         /* For inplace: redo phase turns off the backup
 241                          * flag so that we do a regular inplace send. */
 242                         make_backups = 0;
 243                         append_mode = 0;
 244                         continue;
 245                 }
 246
 247                 iflags = read_item_attrs(f_in, f_out, i, &fnamecmp_type,
 248                                          xname, &xlen);
 249                 if (iflags == ITEM_IS_NEW) /* no-op packet */
 250                         continue;
 251
 252                 file = flist->files[i];
 253                 if (file->dir.root) {
 254                         /* N.B. We're sure that this fits, so offset is OK. */
 255                         offset = strlcpy(fname, file->dir.root, sizeof fname);
 256                         if (!offset || fname[offset-1] != '/')
 257                                 fname[offset++] = '/';
 258                 } else
 259                         offset = 0;
 260                 fname2 = f_name(file, fname + offset);
 261
 262                 if (verbose > 2)
 263                         rprintf(FINFO, "send_files(%d, %s)\n", i, fname);
 264
 265                 if (!(iflags & ITEM_TRANSFER)) {
 266                         maybe_log_item(file, iflags, itemizing, xname);
 267                         continue;
 268                 }
 269                 if (phase == 2) {
 270                         rprintf(FERROR,
 271                                 "got transfer request in phase 2 [%s]\n",
 272                                 who_am_i());
 273                         exit_cleanup(RERR_PROTOCOL);
 274                 }
 275
 276                 updating_basis_file = inplace && (protocol_version >= 29
 277                         ? fnamecmp_type == FNAMECMP_FNAME : !make_backups);
 278
 279                 stats.current_file_index = i;
 280                 stats.num_transferred_files++;
 281                 stats.total_transferred_size += file->length;
 282
 283                 if (!do_xfers) { /* log the transfer */
 284                         if (!am_server && log_format)
 285                                 log_item(file, &stats, iflags, NULL);
 286                         write_ndx_and_attrs(f_out, i, iflags, fnamecmp_type,
 287                                             xname, xlen);
 288                         continue;
 289                 }
 290
 291                 initial_stats = stats;
 292
 293                 if (!(s = receive_sums(f_in))) {
 294                         io_error |= IOERR_GENERAL;
 295                         rprintf(FERROR, "receive_sums failed\n");
 296                         return;
 297                 }
 298
 299                 fd = do_open(fname, O_RDONLY, 0);
 300                 if (fd == -1) {
 301                         if (errno == ENOENT) {
 302                                 enum logcode c = am_daemon
 303                                     && protocol_version < 28 ? FERROR
 304                                                              : FINFO;
 305                                 io_error |= IOERR_VANISHED;
 306                                 rprintf(c, "file has vanished: %s\n",
 307                                         full_fname(fname));
 308                         } else {
 309                                 io_error |= IOERR_GENERAL;
 310                                 rsyserr(FERROR, errno,
 311                                         "send_files failed to open %s",
 312                                         full_fname(fname));
 313                         }
 314                         free_sums(s);
 315                         continue;
 316                 }
 317
 318                 /* map the local file */
 319                 if (do_fstat(fd, &st) != 0) {
 320                         io_error |= IOERR_GENERAL;
 321                         rsyserr(FERROR, errno, "fstat failed");
 322                         free_sums(s);
 323                         close(fd);
 324                         return;
 325                 }
 326
 327                 if (st.st_size) {
 328                         int32 read_size = MAX(s->blength * 3, MAX_MAP_SIZE);
 329                         mbuf = map_file(fd, st.st_size, read_size, s->blength);
 330                 } else
 331                         mbuf = NULL;
 332
 333                 if (verbose > 2) {
 334                         rprintf(FINFO, "send_files mapped %s of size %.0f\n",
 335                                 fname, (double)st.st_size);
 336                 }
 337
 338                 write_ndx_and_attrs(f_out, i, iflags, fnamecmp_type,
 339                                     xname, xlen);
 340                 write_sum_head(f_xfer, s);
 341
 342                 if (verbose > 2)
 343                         rprintf(FINFO, "calling match_sums %s\n", fname);
 344
 345                 if (log_before_transfer)
 346                         log_item(file, &initial_stats, iflags, NULL);
 347                 else if (!am_server && verbose && do_progress)
 348                         rprintf(FINFO, "%s\n", fname2);
 349
 350                 set_compression(fname);
 351
 352                 match_sums(f_xfer, s, mbuf, st.st_size);
 353                 if (do_progress)
 354                         end_progress(st.st_size);
 355
 356                 if (!log_before_transfer)
 357                         log_item(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 }