2 Copyright (C) Andrew Tridgell 1996
3 Copyright (C) Paul Mackerras 1996
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.
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.
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.
21 Utilities used in rsync
27 static int total_written = 0;
28 static int total_read = 0;
31 extern int sparse_files;
43 static int buffer_f_in = -1;
45 void setup_nonblocking(int f_in,int f_out)
47 set_blocking(f_out,0);
52 static char *read_buffer = NULL;
53 static char *read_buffer_p = NULL;
54 static int read_buffer_len = 0;
55 static int read_buffer_size = 0;
58 /* This function was added to overcome a deadlock problem when using
59 * ssh. It looks like we can't allow our receive queue to get full or
60 * ssh will clag up. Uggh. */
61 static void read_check(int f)
67 if (read_buffer_len == 0) {
68 read_buffer_p = read_buffer;
71 if ((n=num_waiting(f)) <= 0)
74 /* things could deteriorate if we read in really small chunks */
77 if (read_buffer_p != read_buffer) {
78 memmove(read_buffer,read_buffer_p,read_buffer_len);
79 read_buffer_p = read_buffer;
82 if (n > (read_buffer_size - read_buffer_len)) {
83 read_buffer_size += n;
85 read_buffer = (char *)malloc(read_buffer_size);
87 read_buffer = (char *)realloc(read_buffer,read_buffer_size);
88 if (!read_buffer) out_of_memory("read check");
89 read_buffer_p = read_buffer;
92 n = read(f,read_buffer+read_buffer_len,n);
99 static int readfd(int fd,char *buffer,int N)
104 if (read_buffer_len < N)
105 read_check(buffer_f_in);
109 if (read_buffer_len > 0 && buffer_f_in == fd) {
110 ret = MIN(read_buffer_len,N-total);
111 memcpy(buffer+total,read_buffer_p,ret);
112 read_buffer_p += ret;
113 read_buffer_len -= ret;
115 while ((ret = read(fd,buffer + total,N - total)) == -1) {
118 if (errno != EAGAIN && errno != EWOULDBLOCK)
122 select(fd+1, &fds, NULL, NULL, NULL);
138 if ((ret=readfd(f,b,4)) != 4) {
140 fprintf(FERROR,"(%d) Error reading %d bytes : %s\n",
141 getpid(),4,ret==-1?strerror(errno):"EOF");
148 void read_buf(int f,char *buf,int len)
151 if ((ret=readfd(f,buf,len)) != len) {
153 fprintf(FERROR,"(%d) Error reading %d bytes : %s\n",
154 getpid(),len,ret==-1?strerror(errno):"EOF");
160 unsigned char read_byte(int f)
163 read_buf(f,(char *)&c,1);
168 static char last_byte=0;
169 static int last_sparse = 0;
171 int sparse_end(int f)
174 lseek(f,-1,SEEK_CUR);
175 return (write(f,&last_byte,1) == 1 ? 0 : -1);
181 int write_sparse(int f,char *buf,int len)
187 return write(f,buf,len);
189 for (l1=0;l1<len && buf[l1]==0;l1++) ;
190 for (l2=0;l2<(len-l1) && buf[len-(l2+1)]==0;l2++) ;
192 last_byte = buf[len-1];
194 if (l1 == len || l2 > 0)
198 lseek(f,l1,SEEK_CUR);
203 if ((ret=write(f,buf+l1,len-(l1+l2))) != len-(l1+l2)) {
204 if (ret == -1 || ret == 0) return ret;
209 lseek(f,l2,SEEK_CUR);
214 int read_write(int fd_in,int fd_out,int size)
216 static char *buf=NULL;
217 int bufsize = sparse_files?SPARSE_WRITE_SIZE:WRITE_SIZE;
221 buf = (char *)malloc(bufsize);
222 if (!buf) out_of_memory("read_write");
225 while (total < size) {
226 int n = MIN(size-total,bufsize);
227 read_buf(fd_in,buf,n);
228 if (write_sparse(fd_out,buf,n) != n)
236 static int writefd(int fd,char *buf,int len)
240 int fd_count, count, got_select=0;
243 if (buffer_f_in == -1)
244 return write(fd,buf,len);
246 while (total < len) {
247 int ret = write(fd,buf+total,len-total);
249 if (ret == 0) return total;
251 if (ret == -1 && !(errno == EWOULDBLOCK || errno == EAGAIN))
254 if (ret == -1 && got_select) {
255 fprintf(FERROR,"write exception\n");
263 read_check(buffer_f_in);
269 if (buffer_f_in != -1) {
270 FD_SET(buffer_f_in,&r_fds);
271 if (buffer_f_in > fd)
272 fd_count = buffer_f_in+1;
275 tv.tv_sec = BLOCKING_TIMEOUT;
277 count = select(fd_count,buffer_f_in == -1? NULL: &r_fds,
279 if (count == -1 && errno != EINTR) {
281 fprintf(FERROR,"select error: %s\n", strerror(errno));
285 if (count == 0) continue;
287 if (FD_ISSET(fd, &w_fds)) {
300 void write_int(int f,int x)
305 if ((ret=writefd(f,b,4)) != 4) {
306 fprintf(FERROR,"write_int failed : %s\n",
307 ret==-1?strerror(errno):"EOF");
313 void write_buf(int f,char *buf,int len)
316 if ((ret=writefd(f,buf,len)) != len) {
317 fprintf(FERROR,"write_buf failed : %s\n",
318 ret==-1?strerror(errno):"EOF");
321 total_written += len;
325 void write_byte(int f,unsigned char c)
327 write_buf(f,(char *)&c,1);
330 void write_flush(int f)