handle rsh clients that don't like half-open connections
[rsync/rsync.git] / main.c
1 /* 
2    Copyright (C) Andrew Tridgell 1996
3    Copyright (C) Paul Mackerras 1996
4    
5    This program is free software; you can redistribute it and/or modify
6    it under the terms of the GNU General Public License as published by
7    the Free Software Foundation; either version 2 of the License, or
8    (at your option) any later version.
9    
10    This program is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13    GNU General Public License for more details.
14    
15    You should have received a copy of the GNU General Public License
16    along with this program; if not, write to the Free Software
17    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
18 */
19
20 #include "rsync.h"
21
22 time_t starttime = 0;
23 int64 total_size = 0;
24
25 extern int csum_length;
26
27 extern int verbose;
28
29 static void report(int f)
30 {
31         int64 in,out,tsize;
32         time_t t = time(NULL);
33         extern int am_server;
34         extern int am_sender;
35         extern int am_daemon;
36
37         if (am_daemon) {
38                 syslog(LOG_INFO,"wrote %.0f bytes  read %.0f bytes  total size %.0f\n",
39                        (double)write_total(),(double)read_total(),
40                        (double)total_size);
41                 if (f == -1 || !am_sender) return;
42         }
43
44         if (!verbose) return;
45
46         if (am_server && am_sender) {
47                 write_longint(f,read_total());
48                 write_longint(f,write_total());
49                 write_longint(f,total_size);
50                 write_flush(f);
51                 return;
52         }
53     
54         if (am_sender) {
55                 in = read_total();
56                 out = write_total();
57                 tsize = total_size;
58         } else {
59                 out = read_longint(f);
60                 in = read_longint(f);
61                 tsize = read_longint(f);
62         }
63         
64         printf("wrote %.0f bytes  read %.0f bytes  %.2f bytes/sec\n",
65                (double)out,(double)in,(in+out)/(0.5 + (t-starttime)));
66         printf("total size is %.0f  speedup is %.2f\n",
67                (double)tsize,(1.0*tsize)/(in+out));
68 }
69
70
71 static int do_cmd(char *cmd,char *machine,char *user,char *path,int *f_in,int *f_out)
72 {
73         char *args[100];
74         int i,argc=0, ret;
75         char *tok,*dir=NULL;
76         extern int local_server;
77         extern char *rsync_path;
78
79         if (!local_server) {
80                 if (!cmd)
81                         cmd = getenv(RSYNC_RSH_ENV);
82                 if (!cmd)
83                         cmd = RSYNC_RSH;
84                 cmd = strdup(cmd);
85                 if (!cmd) 
86                         goto oom;
87
88                 for (tok=strtok(cmd," ");tok;tok=strtok(NULL," ")) {
89                         args[argc++] = tok;
90                 }
91
92 #if HAVE_REMSH
93                 /* remsh (on HPUX) takes the arguments the other way around */
94                 args[argc++] = machine;
95                 if (user) {
96                         args[argc++] = "-l";
97                         args[argc++] = user;
98                 }
99 #else
100                 if (user) {
101                         args[argc++] = "-l";
102                         args[argc++] = user;
103                 }
104                 args[argc++] = machine;
105 #endif
106
107                 args[argc++] = rsync_path;
108
109                 server_options(args,&argc);
110         }
111
112         args[argc++] = ".";
113
114         if (path && *path) 
115                 args[argc++] = path;
116
117         args[argc] = NULL;
118
119         if (verbose > 3) {
120                 rprintf(FINFO,"cmd=");
121                 for (i=0;i<argc;i++)
122                         rprintf(FINFO,"%s ",args[i]);
123                 rprintf(FINFO,"\n");
124         }
125
126         if (local_server) {
127                 ret = local_child(argc, args, f_in, f_out);
128         } else {
129                 ret = piped_child(args,f_in,f_out);
130         }
131
132         if (dir) free(dir);
133
134         return ret;
135
136 oom:
137         out_of_memory("do_cmd");
138         return 0; /* not reached */
139 }
140
141
142
143
144 static char *get_local_name(struct file_list *flist,char *name)
145 {
146         STRUCT_STAT st;
147         extern int orig_umask;
148
149   if (do_stat(name,&st) == 0) {
150     if (S_ISDIR(st.st_mode)) {
151       if (chdir(name) != 0) {
152         rprintf(FERROR,"chdir %s : %s (1)\n",name,strerror(errno));
153         exit_cleanup(1);
154       }
155       return NULL;
156     }
157     if (flist->count > 1) {
158       rprintf(FERROR,"ERROR: destination must be a directory when copying more than 1 file\n");
159       exit_cleanup(1);
160     }
161     return name;
162   }
163
164   if (flist->count == 1)
165     return name;
166
167   if (!name) 
168     return NULL;
169
170   if (do_mkdir(name,0777 & ~orig_umask) != 0) {
171     rprintf(FERROR,"mkdir %s : %s (1)\n",name,strerror(errno));
172     exit_cleanup(1);
173   } else {
174     rprintf(FINFO,"created directory %s\n",name);
175   }
176
177   if (chdir(name) != 0) {
178     rprintf(FERROR,"chdir %s : %s (2)\n",name,strerror(errno));
179     exit_cleanup(1);
180   }
181
182   return NULL;
183 }
184
185
186
187
188 static void do_server_sender(int f_in, int f_out, int argc,char *argv[])
189 {
190         int i;
191         struct file_list *flist;
192         char *dir = argv[0];
193         extern int relative_paths;
194         extern int recurse;
195
196         if (verbose > 2)
197                 rprintf(FINFO,"server_sender starting pid=%d\n",(int)getpid());
198   
199         if (!relative_paths && chdir(dir) != 0) {
200                 rprintf(FERROR,"chdir %s: %s (3)\n",dir,strerror(errno));
201                 exit_cleanup(1);
202         }
203         argc--;
204         argv++;
205   
206         if (strcmp(dir,".")) {
207                 int l = strlen(dir);
208                 if (strcmp(dir,"/") == 0) 
209                         l = 0;
210                 for (i=0;i<argc;i++)
211                         argv[i] += l+1;
212         }
213
214         if (argc == 0 && recurse) {
215                 argc=1;
216                 argv--;
217                 argv[0] = ".";
218         }
219         
220         flist = send_file_list(f_out,argc,argv);
221         if (!flist || flist->count == 0) {
222                 exit_cleanup(0);
223         }
224
225         send_files(flist,f_out,f_in);
226         report(f_out);
227         io_flush();
228         exit_cleanup(0);
229 }
230
231
232 static int do_recv(int f_in,int f_out,struct file_list *flist,char *local_name)
233 {
234         int pid;
235         int status=0;
236         int recv_pipe[2];
237         extern int preserve_hard_links;
238         extern int am_server;
239
240         if (preserve_hard_links)
241                 init_hard_links(flist);
242
243         if (pipe(recv_pipe) < 0) {
244                 rprintf(FERROR,"pipe failed in do_recv\n");
245                 exit_cleanup(1);
246         }
247   
248         io_flush();
249
250         if ((pid=do_fork()) == 0) {
251                 close(recv_pipe[0]);
252                 if (f_in != f_out) close(f_out);
253
254                 recv_files(f_in,flist,local_name,recv_pipe[1]);
255                 if (!am_server)
256                         report(f_in);
257
258                 if (verbose > 3)
259                         rprintf(FINFO,"do_recv waiting on %d\n",pid);
260
261                 io_flush();
262                 _exit(0);
263         }
264
265         close(recv_pipe[1]);
266         io_close_input(f_in);
267         if (f_in != f_out) close(f_in);
268         generate_files(f_out,flist,local_name,recv_pipe[0]);
269
270         io_flush();
271         waitpid(pid, &status, 0);
272         return status;
273 }
274
275
276 static void do_server_recv(int f_in, int f_out, int argc,char *argv[])
277 {
278         int status;
279         struct file_list *flist;
280         char *local_name=NULL;
281         char *dir = NULL;
282         extern int delete_mode;
283         extern int am_daemon;
284
285         if (verbose > 2)
286                 rprintf(FINFO,"server_recv(%d) starting pid=%d\n",argc,(int)getpid());
287         
288         if (argc > 0) {
289                 dir = argv[0];
290                 argc--;
291                 argv++;
292                 if (!am_daemon && chdir(dir) != 0) {
293                         rprintf(FERROR,"chdir %s : %s (4)\n",
294                                 dir,strerror(errno));
295                         exit_cleanup(1);
296                 }    
297         }
298
299         if (delete_mode)
300                 recv_exclude_list(f_in);
301
302         flist = recv_file_list(f_in);
303         if (!flist || flist->count == 0) {
304                 rprintf(FERROR,"server_recv: nothing to do\n");
305                 exit_cleanup(1);
306         }
307         
308         if (argc > 0) {    
309                 if (strcmp(dir,".")) {
310                         argv[0] += strlen(dir);
311                         if (argv[0][0] == '/') argv[0]++;
312                 }
313                 local_name = get_local_name(flist,argv[0]);
314         }
315
316         status = do_recv(f_in,f_out,flist,local_name);
317         exit_cleanup(status);
318 }
319
320
321 void start_server(int f_in, int f_out, int argc, char *argv[])
322 {
323         extern int cvs_exclude;
324         extern int am_sender;
325
326         setup_protocol(f_out, f_in);
327         
328         if (am_sender) {
329                 recv_exclude_list(f_in);
330                 if (cvs_exclude)
331                         add_cvs_excludes();
332                 do_server_sender(f_in, f_out, argc, argv);
333         } else {
334                 do_server_recv(f_in, f_out, argc, argv);
335         }
336         exit_cleanup(0);
337 }
338
339 int client_run(int f_in, int f_out, int pid, int argc, char *argv[])
340 {
341         struct file_list *flist;
342         int status = 0, status2 = 0;
343         char *local_name = NULL;
344         extern int am_sender;
345
346         setup_protocol(f_out,f_in);
347         
348         if (am_sender) {
349                 extern int cvs_exclude;
350                 extern int delete_mode;
351                 if (cvs_exclude)
352                         add_cvs_excludes();
353                 if (delete_mode) 
354                         send_exclude_list(f_out);
355                 flist = send_file_list(f_out,argc,argv);
356                 if (verbose > 3) 
357                         rprintf(FINFO,"file list sent\n");
358                 send_files(flist,f_out,f_in);
359                 if (pid != -1) {
360                         if (verbose > 3)
361                                 rprintf(FINFO,"client_run waiting on %d\n",pid);
362                         io_flush();
363                         waitpid(pid, &status, 0);
364                 }
365                 report(-1);
366                 exit_cleanup(status);
367         }
368         
369         send_exclude_list(f_out);
370         
371         flist = recv_file_list(f_in);
372         if (!flist || flist->count == 0) {
373                 rprintf(FINFO,"client: nothing to do\n");
374                 exit_cleanup(0);
375         }
376         
377         local_name = get_local_name(flist,argv[0]);
378         
379         status2 = do_recv(f_in,f_out,flist,local_name);
380         
381         if (pid != -1) {
382                 if (verbose > 3)
383                         rprintf(FINFO,"client_run2 waiting on %d\n",pid);
384                 io_flush();
385                 waitpid(pid, &status, 0);
386         }
387         
388         return status | status2;
389 }
390
391
392 int start_client(int argc, char *argv[])
393 {
394         char *p;
395         char *shell_machine = NULL;
396         char *shell_path = NULL;
397         char *shell_user = NULL;
398         int pid;
399         int f_in,f_out;
400         extern int local_server;
401         extern int am_sender;
402         extern char *shell_cmd;
403
404         p = strchr(argv[0],':');
405
406         if (p) {
407                 if (p[1] == ':') {
408                         *p = 0;
409                         return start_socket_client(argv[0], p+2, argc-1, argv+1);
410                 }
411
412                 if (argc < 2) {
413                         usage(FERROR);
414                         exit_cleanup(1);
415                 }
416
417                 am_sender = 0;
418                 *p = 0;
419                 shell_machine = argv[0];
420                 shell_path = p+1;
421                 argc--;
422                 argv++;
423         } else {
424                 am_sender = 1;
425
426                 p = strchr(argv[argc-1],':');
427                 if (!p) {
428                         local_server = 1;
429                 } else if (p[1] == ':') {
430                         *p = 0;
431                         return start_socket_client(argv[argc-1], p+2, argc-1, argv);
432                 }
433
434                 if (argc < 2) {
435                         usage(FERROR);
436                         exit_cleanup(1);
437                 }
438                 
439                 if (local_server) {
440                         shell_machine = NULL;
441                         shell_path = argv[argc-1];
442                 } else {
443                         *p = 0;
444                         shell_machine = argv[argc-1];
445                         shell_path = p+1;
446                 }
447                 argc--;
448         }
449         
450         if (shell_machine) {
451                 p = strchr(shell_machine,'@');
452                 if (p) {
453                         *p = 0;
454                         shell_user = shell_machine;
455                         shell_machine = p+1;
456                 }
457         }
458
459         if (verbose > 3) {
460                 rprintf(FINFO,"cmd=%s machine=%s user=%s path=%s\n",
461                         shell_cmd?shell_cmd:"",
462                         shell_machine?shell_machine:"",
463                         shell_user?shell_user:"",
464                         shell_path?shell_path:"");
465         }
466         
467         if (!am_sender && argc != 1) {
468                 usage(FERROR);
469                 exit_cleanup(1);
470         }
471         
472         pid = do_cmd(shell_cmd,shell_machine,shell_user,shell_path,&f_in,&f_out);
473         
474 #if HAVE_SETLINEBUF
475         setlinebuf(stdout);
476         setlinebuf(stderr);
477 #endif
478
479         return client_run(f_in, f_out, pid, argc, argv);
480 }
481
482
483 RETSIGTYPE sigusr1_handler(int val) {
484         exit_cleanup(1);
485 }
486
487 int main(int argc,char *argv[])
488 {       
489         extern int am_root;
490         extern int orig_umask;
491         extern int dry_run;
492         extern int am_daemon;
493         extern int am_server;
494
495         signal(SIGUSR1, sigusr1_handler);
496
497         starttime = time(NULL);
498         am_root = (getuid() == 0);
499
500         if (argc < 2) {
501                 usage(FERROR);
502                 exit_cleanup(1);
503         }
504
505         /* we set a 0 umask so that correct file permissions can be
506            carried across */
507         orig_umask = (int)umask(0);
508
509         parse_arguments(argc, argv);
510
511         argc -= optind;
512         argv += optind;
513         optind = 0;
514
515         signal(SIGCHLD,SIG_IGN);
516         signal(SIGINT,SIGNAL_CAST sig_int);
517         signal(SIGPIPE,SIGNAL_CAST sig_int);
518         signal(SIGHUP,SIGNAL_CAST sig_int);
519
520         if (am_daemon) {
521                 return daemon_main();
522         }
523
524         if (argc < 1) {
525                 usage(FERROR);
526                 exit_cleanup(1);
527         }
528
529         if (dry_run)
530                 verbose = MAX(verbose,1);
531
532 #ifndef SUPPORT_LINKS
533         if (!am_server && preserve_links) {
534                 rprintf(FERROR,"ERROR: symbolic links not supported\n");
535                 exit_cleanup(1);
536         }
537 #endif
538
539         if (am_server) {
540                 start_server(STDIN_FILENO, STDOUT_FILENO, argc, argv);
541         }
542
543         return start_client(argc, argv);
544 }
545