2 * interactive diff, inspired/stolen from
3 * kernighan and pike, _unix programming environment_.
13 void copy(Biobuf*, char*, Biobuf*, char*);
14 void idiff(Biobuf*, char*, Biobuf*, char*, Biobuf*, char*, Biobuf*, char*);
15 int opentemp(char*, int, long);
16 void rundiff(char*, char*, int);
21 fprint(2, "usage: idiff [-bw] file1 file2\n");
26 main(int argc, char **argv)
29 char diffout[40], idiffout[40];
30 Biobuf *b1, *b2, bdiff, bout, bstdout;
47 if((d = dirstat(argv[0])) == nil)
48 sysfatal("stat %s: %r", argv[0]);
50 sysfatal("%s is a directory", argv[0]);
52 if((d = dirstat(argv[1])) == nil)
53 sysfatal("stat %s: %r", argv[1]);
55 sysfatal("%s is a directory", argv[1]);
58 if((b1 = Bopen(argv[0], OREAD)) == nil)
59 sysfatal("open %s: %r", argv[0]);
60 if((b2 = Bopen(argv[1], OREAD)) == nil)
61 sysfatal("open %s: %r", argv[1]);
63 strcpy(diffout, "/tmp/idiff.XXXXXX");
64 fd = opentemp(diffout, ORDWR|ORCLOSE, 0);
65 strcpy(idiffout, "/tmp/idiff.XXXXXX");
66 ofd = opentemp(idiffout, ORDWR|ORCLOSE, 0);
67 rundiff(argv[0], argv[1], fd);
69 Binit(&bdiff, fd, OREAD);
70 Binit(&bout, ofd, OWRITE);
71 idiff(b1, argv[0], b2, argv[1], &bdiff, diffout, &bout, idiffout);
75 Binit(&bout, ofd, OREAD);
76 Binit(&bstdout, 1, OWRITE);
77 copy(&bout, idiffout, &bstdout, "<stdout>");
82 opentemp(char *template, int mode, long perm)
89 sysfatal("strdup out of memory");
93 if(access(p, 0) < 0 && (fd=create(p, mode, perm)) >= 0)
98 sysfatal("could not create temporary file");
106 rundiff(char *arg1, char *arg2, int outfd)
113 arg[narg++] = "/bin/diff";
123 switch(pid = fork()){
125 sysfatal("fork: %r");
130 exec("/bin/diff", arg);
131 sysfatal("exec: %r");
136 sysfatal("wait: %r");
138 sysfatal("wait got unexpected pid %d", w->pid);
139 if((p = strchr(w->msg, ':')) && strcmp(p, ": some") != 0)
140 sysfatal("%s", w->msg);
152 arg[narg++] = "/bin/rc";
157 switch(pid = fork()){
159 sysfatal("fork: %r");
162 exec("/bin/rc", arg);
163 sysfatal("exec: %r");
168 sysfatal("wait: %r");
170 sysfatal("wait got unexpected pid %d", wpid);
175 parse(char *s, int *pfrom1, int *pto1, int *pcmd, int *pfrom2, int *pto2)
177 *pfrom1 = *pto1 = *pfrom2 = *pto2 = 0;
181 sysfatal("bad diff output0");
183 *pfrom1 = strtol(s, &s, 10);
186 *pto1 = strtol(s, &s, 10);
190 sysfatal("bad diff output1");
193 sysfatal("bad diff output2");
196 sysfatal("bad diff output3");
198 *pfrom2 = strtol(s, &s, 10);
201 *pto2 = strtol(s, &s, 10);
207 skiplines(Biobuf *b, char *name, int n)
212 while(Brdline(b, '\n')==nil){
214 sysfatal("early end of file on %s", name);
215 Bseek(b, Blinelen(b), 1);
221 copylines(Biobuf *bin, char *nin, Biobuf *bout, char *nout, int n)
227 while((p=Brdline(bin, '\n'))==nil){
228 if(Blinelen(bin) <= 0)
229 sysfatal("early end of file on %s", nin);
233 m = Bread(bin, buf, m);
234 if(Bwrite(bout, buf, m) != m)
235 sysfatal("error writing %s: %r", nout);
237 if(Bwrite(bout, p, Blinelen(bin)) != Blinelen(bin))
238 sysfatal("error writing %s: %r", nout);
243 copy(Biobuf *bin, char *nin, Biobuf *bout, char *nout)
249 while((m = Bread(bin, buf, sizeof buf)) > 0)
250 if(Bwrite(bout, buf, m) != m)
251 sysfatal("error writing %s: %r", nout);
255 idiff(Biobuf *b1, char *name1, Biobuf *b2, char *name2, Biobuf *bdiff, char *namediff, Biobuf *bout, char *nameout)
258 int interactive, defaultanswer, cmd, diffoffset;
259 int n, from1, to1, from2, to2, nf1, nf2;
266 Binit(&berr, 2, OWRITE);
267 while(diffoffset = Boffset(bdiff), p = Brdline(bdiff, '\n')){
268 p[Blinelen(bdiff)-1] = '\0';
269 parse(p, &from1, &to1, &cmd, &from2, &to2);
270 p[Blinelen(bdiff)-1] = '\n';
271 n = to1-from1 + to2-from2 + 1; /* #lines from diff */
278 to1++; /* make half-open intervals */
281 p[Blinelen(bdiff)-1] = '\0';
282 fprint(2, "%s\n", p);
283 p[Blinelen(bdiff)-1] = '\n';
284 copylines(bdiff, namediff, &berr, "<stderr>", n);
287 skiplines(bdiff, namediff, n);
291 memset(buf, 0, sizeof buf);
292 if(read(0, buf, sizeof buf - 1) < 0)
293 sysfatal("read console: %r");
295 buf[0] = defaultanswer;
299 copylines(b1, name1, bout, nameout, from1-nf1);
300 skiplines(b1, name1, to1-from1);
301 skiplines(b2, name2, from2-nf2);
302 copylines(b2, name2, bout, nameout, to2-from2);
305 copylines(b1, name1, bout, nameout, to1-nf1);
306 skiplines(b2, name2, to2-nf2);
309 copylines(b1, name1, bout, nameout, from1-nf1);
310 skiplines(b1, name1, to1-from1);
311 skiplines(b2, name2, to2-nf2);
312 if(Bseek(bdiff, diffoffset, 0) != diffoffset)
313 sysfatal("seek in diff output: %r");
314 copylines(bdiff, namediff, bout, nameout, n+1);
320 if(buf[1]=='<' || buf[1]=='>' || buf[1]=='='){
322 defaultanswer = buf[1];
324 fprint(2, "must be q<, q>, or q=\n");
327 fprint(2, "expect: <, >, =, q<, q>, q=, !cmd\n");
330 }while(buf[0] != '<' && buf[0] != '>' && buf[0] != '=');
334 copy(b1, name1, bout, nameout);