13 |
|
#include <ctype.h> |
14 |
|
|
15 |
|
#include "platform.h" |
16 |
– |
#include "rtprocess.h" |
16 |
|
#include "rtio.h" |
17 |
|
|
18 |
|
#define MAXFILE 512 /* maximum number of files */ |
22 |
|
FILE *input[MAXFILE]; |
23 |
|
int bytsiz[MAXFILE]; |
24 |
|
char *tabc[MAXFILE]; |
25 |
< |
int nfiles; |
25 |
> |
int nfiles = 0; |
26 |
|
|
27 |
|
char buf[MAXLINE]; |
28 |
|
|
29 |
|
int |
30 |
< |
main(argc, argv) |
32 |
< |
int argc; |
33 |
< |
char *argv[]; |
30 |
> |
main(int argc, char *argv[]) |
31 |
|
{ |
32 |
|
long incnt = 0; |
33 |
|
int unbuff = 0; |
37 |
|
int puteol; |
38 |
|
int i; |
39 |
|
|
43 |
– |
nfiles = 0; |
40 |
|
for (i = 1; i < argc; i++) { |
41 |
|
if (argv[i][0] == '-') { |
42 |
|
switch (argv[i][1]) { |
43 |
|
case 't': |
44 |
|
curtab = argv[i]+2; |
45 |
+ |
if (!*curtab) curtab = "\n"; |
46 |
|
break; |
47 |
|
case 'u': |
48 |
|
unbuff = !unbuff; |
53 |
|
incnt = atol(argv[++i]); |
54 |
|
break; |
55 |
|
case 'f': |
56 |
+ |
case 'F': |
57 |
|
curbytes = sizeof(float); |
58 |
|
break; |
59 |
|
case 'd': |
60 |
+ |
case 'D': |
61 |
|
curbytes = sizeof(double); |
62 |
|
break; |
63 |
|
case 'i': |
64 |
+ |
case 'I': |
65 |
|
curbytes = sizeof(int); |
66 |
|
break; |
67 |
|
case 'w': |
68 |
+ |
case 'W': |
69 |
|
curbytes = 2; |
70 |
|
break; |
71 |
|
case 'b': |
150 |
|
if (bytsiz[i] > 0) { /* binary input */ |
151 |
|
if (getbinary(buf, bytsiz[i], 1, input[i]) < 1) |
152 |
|
break; |
153 |
< |
if (i) |
154 |
< |
fputs(tabc[i], stdout); |
154 |
< |
putbinary(buf, bytsiz[i], 1, stdout); |
153 |
> |
if (putbinary(buf, bytsiz[i], 1, stdout) != 1) |
154 |
> |
break; |
155 |
|
} else if (bytsiz[i] < 0) { /* multi-line input */ |
156 |
|
int n = -bytsiz[i]; |
157 |
|
while (n--) { |
160 |
|
if ((i > 0) | (n < -bytsiz[i]-1)) |
161 |
|
fputs(tabc[i], stdout); |
162 |
|
buf[strlen(buf)-1] = '\0'; |
163 |
< |
fputs(buf, stdout); |
163 |
> |
if (fputs(buf, stdout) == EOF) |
164 |
> |
break; |
165 |
|
} |
166 |
|
if (n >= 0) /* fell short? */ |
167 |
|
break; |
171 |
|
if (i) |
172 |
|
fputs(tabc[i], stdout); |
173 |
|
buf[strlen(buf)-1] = '\0'; |
174 |
< |
fputs(buf, stdout); |
174 |
> |
if (fputs(buf, stdout) == EOF) |
175 |
> |
break; |
176 |
|
} |
177 |
|
} |
178 |
|
if (i < nfiles) |
182 |
|
if (unbuff) |
183 |
|
fflush(stdout); |
184 |
|
} while (--incnt); |
185 |
+ |
/* check ending */ |
186 |
+ |
if (fflush(stdout) == EOF) { |
187 |
+ |
fputs(argv[0], stderr); |
188 |
+ |
fputs(": write error on standard output\n", stderr); |
189 |
+ |
return(1); |
190 |
+ |
} |
191 |
+ |
if (incnt > 0) { |
192 |
+ |
fputs(argv[0], stderr); |
193 |
+ |
fputs(": warning: premature EOD\n", stderr); |
194 |
+ |
} |
195 |
|
return(0); |
196 |
|
} |