1 7a4ee46d 2003-11-23 devnull #include "stdinc.h"
2 7a4ee46d 2003-11-23 devnull #include "dat.h"
3 7a4ee46d 2003-11-23 devnull #include "fns.h"
5 7a4ee46d 2003-11-23 devnull char *host;
8 7a4ee46d 2003-11-23 devnull usage(void)
10 7a4ee46d 2003-11-23 devnull fprint(2, "usage: write [-z] [-h host] [-t type] <datablock\n");
11 7a4ee46d 2003-11-23 devnull threadexitsall("usage");
15 7a4ee46d 2003-11-23 devnull threadmain(int argc, char *argv[])
17 7a4ee46d 2003-11-23 devnull uchar *p, score[VtScoreSize];
18 7a4ee46d 2003-11-23 devnull int type, n, dotrunc;
19 7a4ee46d 2003-11-23 devnull VtConn *z;
21 7a4ee46d 2003-11-23 devnull dotrunc = 0;
22 7a4ee46d 2003-11-23 devnull type = VtDataType;
23 7a4ee46d 2003-11-23 devnull ARGBEGIN{
24 7a4ee46d 2003-11-23 devnull case 'z':
25 7a4ee46d 2003-11-23 devnull dotrunc = 1;
27 7a4ee46d 2003-11-23 devnull case 'h':
28 7a4ee46d 2003-11-23 devnull host = EARGF(usage());
30 7a4ee46d 2003-11-23 devnull case 't':
31 7a4ee46d 2003-11-23 devnull type = atoi(EARGF(usage()));
38 7a4ee46d 2003-11-23 devnull if(argc != 0)
42 7a4ee46d 2003-11-23 devnull fmtinstall('V', vtscorefmt);
44 7a4ee46d 2003-11-23 devnull p = ezmalloc(VtMaxLumpSize+1);
45 7a4ee46d 2003-11-23 devnull n = readn(0, p, VtMaxLumpSize+1);
46 7a4ee46d 2003-11-23 devnull if(n > VtMaxLumpSize)
47 7a4ee46d 2003-11-23 devnull sysfatal("data too big");
48 7a4ee46d 2003-11-23 devnull z = vtdial(host);
49 7a4ee46d 2003-11-23 devnull if(z == nil)
50 7a4ee46d 2003-11-23 devnull sysfatal("could not connect to server: %r");
51 7a4ee46d 2003-11-23 devnull if(vtconnect(z) < 0)
52 7a4ee46d 2003-11-23 devnull sysfatal("vtconnect: %r");
53 7a4ee46d 2003-11-23 devnull if(dotrunc)
54 7a4ee46d 2003-11-23 devnull n = vtzerotruncate(type, p, n);
55 7a4ee46d 2003-11-23 devnull if(vtwrite(z, score, type, p, n) < 0)
56 7a4ee46d 2003-11-23 devnull sysfatal("vtwrite: %r");
57 7a4ee46d 2003-11-23 devnull vthangup(z);
58 7a4ee46d 2003-11-23 devnull print("%V\n", score);
59 7a4ee46d 2003-11-23 devnull threadexitsall(0);