1 bc7cb1a1 2003-11-23 devnull #include <u.h>
2 bc7cb1a1 2003-11-23 devnull #include <libc.h>
3 bc7cb1a1 2003-11-23 devnull #include <bio.h>
5 bc7cb1a1 2003-11-23 devnull #define LB 2048
8 bc7cb1a1 2003-11-23 devnull int three;
10 aa808685 2004-04-19 devnull char ldr[3][4] = { "", "\t", "\t\t" };
12 bc7cb1a1 2003-11-23 devnull Biobuf *ib1;
13 bc7cb1a1 2003-11-23 devnull Biobuf *ib2;
14 bc7cb1a1 2003-11-23 devnull Biobuf *openfil(char*);
15 bc7cb1a1 2003-11-23 devnull int rd(Biobuf*, char*);
16 bc7cb1a1 2003-11-23 devnull void wr(char*, int);
17 bc7cb1a1 2003-11-23 devnull void copy(Biobuf*, char*, int);
18 bc7cb1a1 2003-11-23 devnull int compare(char*, char*);
21 bc7cb1a1 2003-11-23 devnull main(int argc, char *argv[])
24 bc7cb1a1 2003-11-23 devnull char lb1[LB],lb2[LB];
27 bc7cb1a1 2003-11-23 devnull ARGBEGIN{
28 bc7cb1a1 2003-11-23 devnull case '1':
29 bc7cb1a1 2003-11-23 devnull if(!one) {
31 bc7cb1a1 2003-11-23 devnull ldr[1][0] =
32 bc7cb1a1 2003-11-23 devnull ldr[2][l--] = '\0';
36 bc7cb1a1 2003-11-23 devnull case '2':
37 bc7cb1a1 2003-11-23 devnull if(!two) {
39 bc7cb1a1 2003-11-23 devnull ldr[2][l--] = '\0';
43 bc7cb1a1 2003-11-23 devnull case '3':
44 bc7cb1a1 2003-11-23 devnull three = 1;
48 bc7cb1a1 2003-11-23 devnull goto Usage;
52 bc7cb1a1 2003-11-23 devnull if(argc < 2) {
54 bc7cb1a1 2003-11-23 devnull fprint(2, "usage: comm [-123] file1 file2\n");
55 bc7cb1a1 2003-11-23 devnull exits("usage");
58 bc7cb1a1 2003-11-23 devnull ib1 = openfil(argv[0]);
59 bc7cb1a1 2003-11-23 devnull ib2 = openfil(argv[1]);
62 bc7cb1a1 2003-11-23 devnull if(rd(ib1,lb1) < 0){
63 bc7cb1a1 2003-11-23 devnull if(rd(ib2,lb2) < 0)
64 bc7cb1a1 2003-11-23 devnull exits(0);
65 bc7cb1a1 2003-11-23 devnull copy(ib2,lb2,2);
67 bc7cb1a1 2003-11-23 devnull if(rd(ib2,lb2) < 0)
68 bc7cb1a1 2003-11-23 devnull copy(ib1,lb1,1);
71 bc7cb1a1 2003-11-23 devnull switch(compare(lb1,lb2)) {
73 bc7cb1a1 2003-11-23 devnull wr(lb1,3);
74 bc7cb1a1 2003-11-23 devnull if(rd(ib1,lb1) < 0) {
75 bc7cb1a1 2003-11-23 devnull if(rd(ib2,lb2) < 0)
76 bc7cb1a1 2003-11-23 devnull exits(0);
77 bc7cb1a1 2003-11-23 devnull copy(ib2,lb2,2);
79 bc7cb1a1 2003-11-23 devnull if(rd(ib2,lb2) < 0)
80 bc7cb1a1 2003-11-23 devnull copy(ib1,lb1,1);
81 bc7cb1a1 2003-11-23 devnull continue;
84 bc7cb1a1 2003-11-23 devnull wr(lb1,1);
85 bc7cb1a1 2003-11-23 devnull if(rd(ib1,lb1) < 0)
86 bc7cb1a1 2003-11-23 devnull copy(ib2,lb2,2);
87 bc7cb1a1 2003-11-23 devnull continue;
90 bc7cb1a1 2003-11-23 devnull wr(lb2,2);
91 bc7cb1a1 2003-11-23 devnull if(rd(ib2,lb2) < 0)
92 bc7cb1a1 2003-11-23 devnull copy(ib1,lb1,1);
93 bc7cb1a1 2003-11-23 devnull continue;
99 bc7cb1a1 2003-11-23 devnull rd(Biobuf *file, char *buf)
101 bc7cb1a1 2003-11-23 devnull int i, c;
104 bc7cb1a1 2003-11-23 devnull while((c = Bgetc(file)) != Beof) {
105 bc7cb1a1 2003-11-23 devnull *buf = c;
106 bc7cb1a1 2003-11-23 devnull if(c == '\n' || i > LB-2) {
107 bc7cb1a1 2003-11-23 devnull *buf = '\0';
108 bc7cb1a1 2003-11-23 devnull return 0;
113 bc7cb1a1 2003-11-23 devnull return -1;
117 bc7cb1a1 2003-11-23 devnull wr(char *str, int n)
120 bc7cb1a1 2003-11-23 devnull switch(n){
132 bc7cb1a1 2003-11-23 devnull if(three)
135 bc7cb1a1 2003-11-23 devnull print("%s%s\n", ldr[n-1],str);
139 bc7cb1a1 2003-11-23 devnull copy(Biobuf *ibuf, char *lbuf, int n)
142 bc7cb1a1 2003-11-23 devnull wr(lbuf,n);
143 bc7cb1a1 2003-11-23 devnull while(rd(ibuf,lbuf) >= 0);
144 bc7cb1a1 2003-11-23 devnull exits(0);
148 bc7cb1a1 2003-11-23 devnull compare(char *a, char *b)
150 bc7cb1a1 2003-11-23 devnull while(*a == *b){
151 bc7cb1a1 2003-11-23 devnull if(*a == '\0')
152 bc7cb1a1 2003-11-23 devnull return 0;
156 bc7cb1a1 2003-11-23 devnull if(*a < *b)
157 bc7cb1a1 2003-11-23 devnull return 1;
158 bc7cb1a1 2003-11-23 devnull return 2;
162 bc7cb1a1 2003-11-23 devnull openfil(char *s)
164 bc7cb1a1 2003-11-23 devnull Biobuf *b;
166 bc7cb1a1 2003-11-23 devnull if(s[0]=='-' && s[1]==0)
167 732489da 2005-01-14 devnull s = unsharp("#d/0");
168 bc7cb1a1 2003-11-23 devnull b = Bopen(s, OREAD);
170 bc7cb1a1 2003-11-23 devnull return b;
171 bc7cb1a1 2003-11-23 devnull fprint(2,"comm: cannot open %s: %r\n",s);
172 bc7cb1a1 2003-11-23 devnull exits("open");
173 bc7cb1a1 2003-11-23 devnull return 0; /* shut up ken */