Save first filename and linenum in case exit_cleanup() recurses.
[rsync/rsync.git] / cleanup.c
1 /*
2  * End-of-run cleanup routines.
3  *
4  * Copyright (C) 1996-2000 Andrew Tridgell
5  * Copyright (C) 1996 Paul Mackerras
6  * Copyright (C) 2002 Martin Pool
7  * Copyright (C) 2003-2009 Wayne Davison
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 3 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License along
20  * with this program; if not, visit the http://fsf.org website.
21  */
22
23 #include "rsync.h"
24
25 extern int am_server;
26 extern int am_daemon;
27 extern int am_sender;
28 extern int am_generator;
29 extern int io_error;
30 extern int keep_partial;
31 extern int got_xfer_error;
32 extern int protocol_version;
33 extern int output_needs_newline;
34 extern char *partial_dir;
35 extern char *logfile_name;
36
37 #ifdef HAVE_SIGACTION
38 static struct sigaction sigact;
39 #endif
40
41 /**
42  * Close all open sockets and files, allowing a (somewhat) graceful
43  * shutdown() of socket connections.  This eliminates the abortive
44  * TCP RST sent by a Winsock-based system when the close() occurs.
45  **/
46 void close_all(void)
47 {
48 #ifdef SHUTDOWN_ALL_SOCKETS
49         int max_fd;
50         int fd;
51         int ret;
52         STRUCT_STAT st;
53
54         max_fd = sysconf(_SC_OPEN_MAX) - 1;
55         for (fd = max_fd; fd >= 0; fd--) {
56                 if ((ret = do_fstat(fd, &st)) == 0) {
57                         if (is_a_socket(fd))
58                                 ret = shutdown(fd, 2);
59                         ret = close(fd);
60                 }
61         }
62 #endif
63 }
64
65 /**
66  * @file cleanup.c
67  *
68  * Code for handling interrupted transfers.  Depending on the @c
69  * --partial option, we may either delete the temporary file, or go
70  * ahead and overwrite the destination.  This second behaviour only
71  * occurs if we've sent literal data and therefore hopefully made
72  * progress on the transfer.
73  **/
74
75 /**
76  * Set to True once literal data has been sent across the link for the
77  * current file. (????)
78  *
79  * Handling the cleanup when a transfer is interrupted is tricky when
80  * --partial is selected.  We need to ensure that the partial file is
81  * kept if any real data has been transferred.
82  **/
83 int cleanup_got_literal = 0;
84
85 static const char *cleanup_fname;
86 static const char *cleanup_new_fname;
87 static struct file_struct *cleanup_file;
88 static int cleanup_fd_r, cleanup_fd_w;
89 static pid_t cleanup_pid = 0;
90
91 pid_t cleanup_child_pid = -1;
92
93 /**
94  * Eventually calls exit(), passing @p code, therefore does not return.
95  *
96  * @param code one of the RERR_* codes from errcode.h.
97  **/
98 NORETURN void _exit_cleanup(int code, const char *file, int line)
99 {
100         static int cleanup_step = 0;
101         static int exit_code = 0, exit_line = 0;
102         static const char *exit_file = NULL;
103         static int unmodified_code = 0;
104
105         SIGACTION(SIGUSR1, SIG_IGN);
106         SIGACTION(SIGUSR2, SIG_IGN);
107
108         if (exit_code) { /* Preserve first exit info when recursing. */
109                 code = exit_code;
110                 file = exit_file;
111                 line = exit_line;
112         }
113
114         /* If this is the exit at the end of the run, the server side
115          * should not attempt to output a message (see log_exit()). */
116         if (am_server && code == 0)
117                 am_server = 2;
118
119         /* Some of our actions might cause a recursive call back here, so we
120          * keep track of where we are in the cleanup and never repeat a step. */
121         switch (cleanup_step) {
122 #include "case_N.h" /* case 0: cleanup_step++; */
123
124                 exit_code = unmodified_code = code;
125                 exit_file = file;
126                 exit_line = line;
127
128                 if (output_needs_newline) {
129                         fputc('\n', stdout);
130                         output_needs_newline = 0;
131                 }
132
133                 if (DEBUG_GTE(EXIT, 2)) {
134                         rprintf(FINFO,
135                                 "_exit_cleanup(code=%d, file=%s, line=%d): entered\n",
136                                 code, file, line);
137                 }
138
139                 /* FALLTHROUGH */
140 #include "case_N.h"
141
142                 if (exit_code && exit_code != RERR_RCVR_ERROR
143                  && exit_code != RERR_STREAMIO && exit_code != RERR_SIGNAL1
144                  && (protocol_version >= 31 || (!am_sender && !am_generator))) {
145                         send_msg_int(MSG_ERROR_EXIT, exit_code);
146                         if (am_server && !am_sender && !am_generator)
147                                 noop_io_until_death();
148                 }
149
150                 /* FALLTHROUGH */
151 #include "case_N.h"
152
153                 if (cleanup_child_pid != -1) {
154                         int status;
155                         int pid = wait_process(cleanup_child_pid, &status, WNOHANG);
156                         if (pid == cleanup_child_pid) {
157                                 status = WEXITSTATUS(status);
158                                 if (status > code)
159                                         code = exit_code = status;
160                         }
161                 }
162
163                 /* FALLTHROUGH */
164 #include "case_N.h"
165
166                 if (cleanup_got_literal && cleanup_fname && cleanup_new_fname
167                  && keep_partial && handle_partial_dir(cleanup_new_fname, PDIR_CREATE)) {
168                         const char *fname = cleanup_fname;
169                         cleanup_fname = NULL;
170                         if (cleanup_fd_r != -1)
171                                 close(cleanup_fd_r);
172                         if (cleanup_fd_w != -1) {
173                                 flush_write_file(cleanup_fd_w);
174                                 close(cleanup_fd_w);
175                         }
176                         finish_transfer(cleanup_new_fname, fname, NULL, NULL,
177                                         cleanup_file, 0, !partial_dir);
178                 }
179
180                 /* FALLTHROUGH */
181 #include "case_N.h"
182
183                 if (!code || am_server || (!am_sender && !am_generator))
184                         io_flush(FULL_FLUSH);
185
186                 /* FALLTHROUGH */
187 #include "case_N.h"
188
189                 if (cleanup_fname)
190                         do_unlink(cleanup_fname);
191                 if (code)
192                         kill_all(SIGUSR1);
193                 if (cleanup_pid && cleanup_pid == getpid()) {
194                         char *pidf = lp_pid_file();
195                         if (pidf && *pidf)
196                                 unlink(lp_pid_file());
197                 }
198
199                 if (code == 0) {
200                         if (io_error & IOERR_DEL_LIMIT)
201                                 code = exit_code = RERR_DEL_LIMIT;
202                         if (io_error & IOERR_VANISHED)
203                                 code = exit_code = RERR_VANISHED;
204                         if (io_error & IOERR_GENERAL || got_xfer_error)
205                                 code = exit_code = RERR_PARTIAL;
206                 }
207
208                 if ((code && code != RERR_RCVR_ERROR)
209                  || am_daemon || (logfile_name && (am_server || !INFO_GTE(STATS, 1))))
210                         log_exit(code, file, line);
211
212                 /* FALLTHROUGH */
213 #include "case_N.h"
214
215                 if (DEBUG_GTE(EXIT, 1)) {
216                         rprintf(FINFO,
217                                 "_exit_cleanup(code=%d, file=%s, line=%d): "
218                                 "about to call exit(%d)\n",
219                                 unmodified_code, file, line, code);
220                 }
221
222                 /* FALLTHROUGH */
223 #include "case_N.h"
224
225                 if (am_server && code)
226                         msleep(100);
227                 close_all();
228
229                 /* FALLTHROUGH */
230         default:
231                 break;
232         }
233
234         exit(code);
235 }
236
237 void cleanup_disable(void)
238 {
239         cleanup_fname = cleanup_new_fname = NULL;
240         cleanup_got_literal = 0;
241 }
242
243
244 void cleanup_set(const char *fnametmp, const char *fname, struct file_struct *file,
245                  int fd_r, int fd_w)
246 {
247         cleanup_fname = fnametmp;
248         cleanup_new_fname = fname; /* can be NULL on a partial-dir failure */
249         cleanup_file = file;
250         cleanup_fd_r = fd_r;
251         cleanup_fd_w = fd_w;
252 }
253
254 void cleanup_set_pid(pid_t pid)
255 {
256         cleanup_pid = pid;
257 }