File: readbuffer.c

package info (click to toggle)
chiark-utils 4.0.0
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 784 kB
  • ctags: 262
  • sloc: perl: 2,568; ansic: 864; makefile: 339; sh: 111
file content (87 lines) | stat: -rw-r--r-- 2,436 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
/*
 * readbuffer.c
 *
 * A program for reading input from devices which don't like constant
 * stopping and starting, such as tape drives.  readbuffer is:
 *  Copyright (C) 1997-1998,2000-2001 Ian Jackson <ian@chiark.greenend.org.uk>
 *
 * readbuffer is part of chiark backup, a system for backing up GNU/Linux and
 * other UN*X-compatible machines, as used on chiark.greenend.org.uk.
 * chiark backup is:
 *  Copyright (C) 1997-1998,2000-2001 Ian Jackson <ian@chiark.greenend.org.uk>
 *  Copyright (C) 1999 Peter Maydell <pmaydell@chiark.greenend.org.uk>
 *
 * This is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as
 * published by the Free Software Foundation; either version 2,
 * or (at your option) any later version.
 *
 * This is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public
 * License along with this file; if not, write to the Free Software
 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 *
 */

#include "rwbuffer.h"

const char *progname= "readbuffer";

static size_t waitempty;

int main(int argc, const char *const *argv) {
  int r,reading;

  startup(argv);
  waitempty= (buffersize*1)/4;
  reading=1;
  maxselfd=2;
  
  while (!seeneof || used) {
    
    FD_ZERO(&readfds);
    if (reading) {
      if (used<buffersize-1) {
	FD_SET(0,&readfds);
      } else {
	reading=0;
      }
    }
    FD_ZERO(&writefds); if (used) FD_SET(1,&writefds);

    callselect();

    if (FD_ISSET(0,&readfds)) {
      r= read(0,rp,min(buffersize-1-used,buf+buffersize-rp));
      if (!r) {
        seeneof=1; reading=0;
      } else if (r<0) {
        if (!(errno == EAGAIN || errno == EINTR)) { perror("read"); exit(1); }
      } else {
        used+= r;
        rp+= r;
        if (rp == buf+buffersize) rp=buf;
      }
    }

    if (FD_ISSET(1,&writefds)) {
      assert(used);
      r= write(1,wp,min(used,buf+buffersize-wp));
      if (r<=0) {
        if (!(errno == EAGAIN || errno == EINTR)) { perror("write"); exit(1); }
      } else {
        used-= r;
        wp+= r;
        if (wp == buf+buffersize) wp=buf;
      }
      if (used < waitempty && !seeneof) {
	reading=1;
      }
    }
  }
  exit(0);
}