Commit | Line | Data |
---|---|---|
720b47f2 AT |
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 | /* | |
21 | Utilities used in rsync | |
22 | ||
23 | tridge, June 1996 | |
24 | */ | |
25 | #include "rsync.h" | |
26 | ||
71c46176 AT |
27 | static int64 total_written; |
28 | static int64 total_read; | |
720b47f2 AT |
29 | |
30 | extern int verbose; | |
dc5ddbcc | 31 | extern int sparse_files; |
6ba9279f | 32 | extern int io_timeout; |
720b47f2 | 33 | |
71c46176 | 34 | int64 write_total(void) |
720b47f2 AT |
35 | { |
36 | return total_written; | |
37 | } | |
38 | ||
71c46176 | 39 | int64 read_total(void) |
720b47f2 AT |
40 | { |
41 | return total_read; | |
42 | } | |
43 | ||
44 | static int buffer_f_in = -1; | |
45 | ||
46 | void setup_nonblocking(int f_in,int f_out) | |
47 | { | |
48 | set_blocking(f_out,0); | |
49 | buffer_f_in = f_in; | |
50 | } | |
51 | ||
52 | ||
3a6a366f AT |
53 | static char *read_buffer; |
54 | static char *read_buffer_p; | |
55 | static int read_buffer_len; | |
56 | static int read_buffer_size; | |
720b47f2 AT |
57 | |
58 | ||
59 | /* This function was added to overcome a deadlock problem when using | |
60 | * ssh. It looks like we can't allow our receive queue to get full or | |
61 | * ssh will clag up. Uggh. */ | |
62 | static void read_check(int f) | |
63 | { | |
64 | int n; | |
65 | ||
05c629f7 AT |
66 | if (f == -1) return; |
67 | ||
720b47f2 AT |
68 | if (read_buffer_len == 0) { |
69 | read_buffer_p = read_buffer; | |
70 | } | |
71 | ||
72 | if ((n=num_waiting(f)) <= 0) | |
73 | return; | |
74 | ||
05c629f7 AT |
75 | /* things could deteriorate if we read in really small chunks */ |
76 | if (n < 10) n = 1024; | |
77 | ||
720b47f2 AT |
78 | if (read_buffer_p != read_buffer) { |
79 | memmove(read_buffer,read_buffer_p,read_buffer_len); | |
80 | read_buffer_p = read_buffer; | |
81 | } | |
82 | ||
83 | if (n > (read_buffer_size - read_buffer_len)) { | |
84 | read_buffer_size += n; | |
85 | if (!read_buffer) | |
86 | read_buffer = (char *)malloc(read_buffer_size); | |
87 | else | |
88 | read_buffer = (char *)realloc(read_buffer,read_buffer_size); | |
89 | if (!read_buffer) out_of_memory("read check"); | |
90 | read_buffer_p = read_buffer; | |
91 | } | |
92 | ||
93 | n = read(f,read_buffer+read_buffer_len,n); | |
94 | if (n > 0) { | |
95 | read_buffer_len += n; | |
96 | } | |
97 | } | |
98 | ||
6ba9279f AT |
99 | static time_t last_io; |
100 | ||
101 | ||
102 | static void check_timeout(void) | |
103 | { | |
104 | time_t t; | |
105 | ||
106 | if (!io_timeout) return; | |
107 | ||
108 | if (!last_io) { | |
109 | last_io = time(NULL); | |
110 | return; | |
111 | } | |
112 | ||
113 | t = time(NULL); | |
114 | ||
115 | if (last_io && io_timeout && (t-last_io)>io_timeout) { | |
116 | fprintf(FERROR,"read timeout after %d second - exiting\n", | |
117 | (int)(t-last_io)); | |
118 | exit_cleanup(1); | |
119 | } | |
120 | } | |
720b47f2 AT |
121 | |
122 | static int readfd(int fd,char *buffer,int N) | |
123 | { | |
6ba9279f AT |
124 | int ret; |
125 | int total=0; | |
126 | struct timeval tv; | |
127 | ||
128 | if (read_buffer_len < N) | |
129 | read_check(buffer_f_in); | |
130 | ||
131 | while (total < N) { | |
132 | if (read_buffer_len > 0 && buffer_f_in == fd) { | |
133 | ret = MIN(read_buffer_len,N-total); | |
134 | memcpy(buffer+total,read_buffer_p,ret); | |
135 | read_buffer_p += ret; | |
136 | read_buffer_len -= ret; | |
a070c37b | 137 | total += ret; |
6ba9279f AT |
138 | continue; |
139 | } | |
140 | ||
141 | while ((ret = read(fd,buffer + total,N-total)) == -1) { | |
142 | fd_set fds; | |
143 | ||
144 | if (errno != EAGAIN && errno != EWOULDBLOCK) | |
145 | return -1; | |
146 | FD_ZERO(&fds); | |
147 | FD_SET(fd, &fds); | |
148 | tv.tv_sec = io_timeout; | |
149 | tv.tv_usec = 0; | |
150 | ||
151 | if (select(fd+1, &fds, NULL, NULL, &tv) != 1) { | |
152 | check_timeout(); | |
153 | } | |
154 | } | |
155 | ||
156 | if (ret <= 0) | |
157 | return total; | |
158 | total += ret; | |
7f28dbee | 159 | } |
720b47f2 | 160 | |
6ba9279f AT |
161 | if (io_timeout) |
162 | last_io = time(NULL); | |
720b47f2 | 163 | return total; |
720b47f2 AT |
164 | } |
165 | ||
166 | ||
167 | int read_int(int f) | |
168 | { | |
4fe159a8 | 169 | int ret; |
720b47f2 | 170 | char b[4]; |
4fe159a8 | 171 | if ((ret=readfd(f,b,4)) != 4) { |
720b47f2 | 172 | if (verbose > 1) |
9e31c482 AT |
173 | fprintf(FERROR,"(%d) Error reading %d bytes : %s\n", |
174 | getpid(),4,ret==-1?strerror(errno):"EOF"); | |
34ccb63e | 175 | exit_cleanup(1); |
720b47f2 AT |
176 | } |
177 | total_read += 4; | |
178 | return IVAL(b,0); | |
179 | } | |
180 | ||
71c46176 | 181 | int64 read_longint(int f) |
3a6a366f AT |
182 | { |
183 | extern int remote_version; | |
71c46176 | 184 | int64 ret; |
3a6a366f AT |
185 | char b[8]; |
186 | ret = read_int(f); | |
71c46176 AT |
187 | |
188 | if (ret != -1) return ret; | |
189 | ||
190 | #ifndef HAVE_LONGLONG | |
191 | fprintf(FERROR,"Integer overflow - attempted 64 bit offset\n"); | |
192 | exit_cleanup(1); | |
193 | #else | |
194 | if (remote_version >= 16) { | |
3a6a366f AT |
195 | if ((ret=readfd(f,b,8)) != 8) { |
196 | if (verbose > 1) | |
197 | fprintf(FERROR,"(%d) Error reading %d bytes : %s\n", | |
198 | getpid(),8,ret==-1?strerror(errno):"EOF"); | |
199 | exit_cleanup(1); | |
200 | } | |
201 | total_read += 8; | |
71c46176 | 202 | ret = IVAL(b,0) | (((int64)IVAL(b,4))<<32); |
3a6a366f | 203 | } |
71c46176 AT |
204 | #endif |
205 | ||
3a6a366f AT |
206 | return ret; |
207 | } | |
208 | ||
720b47f2 AT |
209 | void read_buf(int f,char *buf,int len) |
210 | { | |
4fe159a8 AT |
211 | int ret; |
212 | if ((ret=readfd(f,buf,len)) != len) { | |
720b47f2 | 213 | if (verbose > 1) |
9e31c482 AT |
214 | fprintf(FERROR,"(%d) Error reading %d bytes : %s\n", |
215 | getpid(),len,ret==-1?strerror(errno):"EOF"); | |
34ccb63e | 216 | exit_cleanup(1); |
720b47f2 AT |
217 | } |
218 | total_read += len; | |
219 | } | |
220 | ||
575f2fca AT |
221 | void read_sbuf(int f,char *buf,int len) |
222 | { | |
223 | read_buf(f,buf,len); | |
224 | buf[len] = 0; | |
225 | } | |
226 | ||
182dca5c AT |
227 | unsigned char read_byte(int f) |
228 | { | |
d89322c4 AT |
229 | unsigned char c; |
230 | read_buf(f,(char *)&c,1); | |
231 | return c; | |
182dca5c | 232 | } |
720b47f2 | 233 | |
7bec6a5c | 234 | |
3a6a366f AT |
235 | static char last_byte; |
236 | static int last_sparse; | |
7bec6a5c AT |
237 | |
238 | int sparse_end(int f) | |
239 | { | |
7bec6a5c AT |
240 | if (last_sparse) { |
241 | lseek(f,-1,SEEK_CUR); | |
242 | return (write(f,&last_byte,1) == 1 ? 0 : -1); | |
243 | } | |
d5ee1f8e | 244 | last_sparse = 0; |
7bec6a5c AT |
245 | return 0; |
246 | } | |
247 | ||
248 | int write_sparse(int f,char *buf,int len) | |
249 | { | |
dc5ddbcc AT |
250 | int l1=0,l2=0; |
251 | int ret; | |
7bec6a5c | 252 | |
dc5ddbcc AT |
253 | if (!sparse_files) |
254 | return write(f,buf,len); | |
7bec6a5c | 255 | |
dc5ddbcc AT |
256 | for (l1=0;l1<len && buf[l1]==0;l1++) ; |
257 | for (l2=0;l2<(len-l1) && buf[len-(l2+1)]==0;l2++) ; | |
7bec6a5c AT |
258 | |
259 | last_byte = buf[len-1]; | |
7bec6a5c | 260 | |
dc5ddbcc AT |
261 | if (l1 == len || l2 > 0) |
262 | last_sparse=1; | |
263 | ||
264 | if (l1 > 0) | |
265 | lseek(f,l1,SEEK_CUR); | |
266 | ||
267 | if (l1 == len) | |
7bec6a5c | 268 | return len; |
7bec6a5c | 269 | |
dc5ddbcc AT |
270 | if ((ret=write(f,buf+l1,len-(l1+l2))) != len-(l1+l2)) { |
271 | if (ret == -1 || ret == 0) return ret; | |
272 | return (l1+ret); | |
273 | } | |
274 | ||
275 | if (l2 > 0) | |
276 | lseek(f,l2,SEEK_CUR); | |
7bec6a5c | 277 | |
dc5ddbcc | 278 | return len; |
7bec6a5c AT |
279 | } |
280 | ||
720b47f2 AT |
281 | |
282 | static int writefd(int fd,char *buf,int len) | |
283 | { | |
284 | int total = 0; | |
05c629f7 | 285 | fd_set w_fds, r_fds; |
e92338c8 | 286 | int fd_count, count, got_select=0; |
58d433ab | 287 | struct timeval tv; |
720b47f2 AT |
288 | |
289 | if (buffer_f_in == -1) | |
290 | return write(fd,buf,len); | |
291 | ||
292 | while (total < len) { | |
293 | int ret = write(fd,buf+total,len-total); | |
294 | ||
295 | if (ret == 0) return total; | |
296 | ||
4fe159a8 AT |
297 | if (ret == -1 && !(errno == EWOULDBLOCK || errno == EAGAIN)) |
298 | return -1; | |
720b47f2 | 299 | |
e92338c8 | 300 | if (ret == -1 && got_select) { |
97d6916e AT |
301 | /* hmmm, we got a write select on the fd and then failed to write. |
302 | Why doesn't that mean that the fd is dead? It doesn't on some | |
303 | systems it seems (eg. IRIX) */ | |
feaa89c4 | 304 | u_sleep(1000); |
97d6916e | 305 | #if 0 |
e92338c8 AT |
306 | fprintf(FERROR,"write exception\n"); |
307 | exit_cleanup(1); | |
97d6916e | 308 | #endif |
e92338c8 AT |
309 | } |
310 | ||
9a52223b AT |
311 | got_select = 0; |
312 | ||
313 | ||
720b47f2 AT |
314 | if (ret == -1) { |
315 | read_check(buffer_f_in); | |
316 | ||
05c629f7 AT |
317 | fd_count = fd+1; |
318 | FD_ZERO(&w_fds); | |
319 | FD_ZERO(&r_fds); | |
320 | FD_SET(fd,&w_fds); | |
321 | if (buffer_f_in != -1) { | |
322 | FD_SET(buffer_f_in,&r_fds); | |
323 | if (buffer_f_in > fd) | |
324 | fd_count = buffer_f_in+1; | |
325 | } | |
e92338c8 | 326 | |
58d433ab AT |
327 | tv.tv_sec = BLOCKING_TIMEOUT; |
328 | tv.tv_usec = 0; | |
e92338c8 AT |
329 | count = select(fd_count,buffer_f_in == -1? NULL: &r_fds, |
330 | &w_fds,NULL,&tv); | |
331 | if (count == -1 && errno != EINTR) { | |
332 | if (verbose > 1) | |
333 | fprintf(FERROR,"select error: %s\n", strerror(errno)); | |
334 | exit_cleanup(1); | |
335 | } | |
336 | ||
6ba9279f AT |
337 | if (count == 0) { |
338 | check_timeout(); | |
339 | continue; | |
340 | } | |
e92338c8 AT |
341 | |
342 | if (FD_ISSET(fd, &w_fds)) { | |
343 | got_select = 1; | |
344 | } | |
720b47f2 AT |
345 | } else { |
346 | total += ret; | |
347 | } | |
348 | } | |
349 | ||
6ba9279f AT |
350 | if (io_timeout) |
351 | last_io = time(NULL); | |
352 | ||
720b47f2 AT |
353 | return total; |
354 | } | |
355 | ||
356 | ||
357 | ||
358 | void write_int(int f,int x) | |
359 | { | |
4fe159a8 | 360 | int ret; |
720b47f2 AT |
361 | char b[4]; |
362 | SIVAL(b,0,x); | |
4fe159a8 | 363 | if ((ret=writefd(f,b,4)) != 4) { |
dc5ddbcc | 364 | fprintf(FERROR,"write_int failed : %s\n", |
4fe159a8 | 365 | ret==-1?strerror(errno):"EOF"); |
34ccb63e | 366 | exit_cleanup(1); |
720b47f2 AT |
367 | } |
368 | total_written += 4; | |
369 | } | |
370 | ||
71c46176 | 371 | void write_longint(int f, int64 x) |
3a6a366f AT |
372 | { |
373 | extern int remote_version; | |
374 | char b[8]; | |
375 | int ret; | |
376 | ||
377 | if (remote_version < 16 || x <= 0x7FFFFFFF) { | |
378 | write_int(f, (int)x); | |
379 | return; | |
380 | } | |
381 | ||
382 | write_int(f, -1); | |
383 | SIVAL(b,0,(x&0xFFFFFFFF)); | |
384 | SIVAL(b,4,((x>>32)&0xFFFFFFFF)); | |
385 | ||
386 | if ((ret=writefd(f,b,8)) != 8) { | |
387 | fprintf(FERROR,"write_longint failed : %s\n", | |
388 | ret==-1?strerror(errno):"EOF"); | |
389 | exit_cleanup(1); | |
390 | } | |
391 | total_written += 8; | |
392 | } | |
393 | ||
720b47f2 AT |
394 | void write_buf(int f,char *buf,int len) |
395 | { | |
4fe159a8 AT |
396 | int ret; |
397 | if ((ret=writefd(f,buf,len)) != len) { | |
dc5ddbcc | 398 | fprintf(FERROR,"write_buf failed : %s\n", |
4fe159a8 | 399 | ret==-1?strerror(errno):"EOF"); |
34ccb63e | 400 | exit_cleanup(1); |
720b47f2 AT |
401 | } |
402 | total_written += len; | |
403 | } | |
404 | ||
405 | ||
182dca5c AT |
406 | void write_byte(int f,unsigned char c) |
407 | { | |
408 | write_buf(f,(char *)&c,1); | |
409 | } | |
410 | ||
720b47f2 AT |
411 | void write_flush(int f) |
412 | { | |
413 | } | |
414 | ||
415 |