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
|
/*
* send S records to rpcg
*/
#include <u.h>
#include <libc.h>
#include <bio.h>
static int dbg;
static char buf[2048];
static int run=1;
static void stuffbym(char*, int, int);
static void getdot(void);
void
main(int argc, char **argv)
{
int n;
char *l;
Biobuf *f;
static int p;
ARGBEGIN{
case 'd': dbg++; break;
case 'n': run=0; break;
}ARGEND
f = Bopen(*argv? *argv: "k.mx", OREAD);
if(f == 0) {
fprint(2, "sload: cannot open k.mx: %r\n");
exits("sload");
}
getdot();
while((l = Brdline(f, '\n')) != 0) {
l[Blinelen(f)-1] = '\r';
stuffbym(l, Blinelen(f), 16);
getdot();
if(++p % 25 == 0)
write(2, ".", 1);
}
exits(0);
}
static void
stuffbym(char *l, int n, int m)
{
int nr, ns;
while(n > 0) {
ns = n;
if(ns > m)
ns = m;
write(1, l, ns);
l += ns;
n -= ns;
}
}
static void
getdot(void)
{
char c;
for(;;){
if(read(0, &c, 1) != 1)
exits("bang");
write(2, &c, 1);
if(c == '.')
break;
}
}
|
