projects / unix-history / blame
| Commit | Line | Data |
|---|---|---|
| 2b1a705e TL |
1 | # include "stdio.h" |
| 2 | extern char *soutput, *tagout, usedir[]; | |
| 3 | ||
| 4 | result(master, nf, fc) | |
| 5 | union ptr {unsigned *a; long *b;} *master; | |
| 6 | FILE *fc; | |
| 7 | { | |
| 8 | int i, c; | |
| 9 | char *s; | |
| 10 | long lp; | |
| 11 | extern int iflong; | |
| 12 | char res[100]; | |
| 13 | ||
| 14 | for(i=0; i<nf; i++) | |
| 15 | { | |
| 16 | lp = iflong ? master.b[i] : master.a[i]; | |
| 17 | fseek(fc,lp, 0); | |
| 18 | fgets(res, 100, fc); | |
| 19 | for(s=res; c = *s; s++) | |
| 20 | if (c== ';') | |
| 21 | { | |
| 22 | *s=0; | |
| 23 | break; | |
| 24 | } | |
| 25 | if (tagout !=0) | |
| 26 | { | |
| 27 | if (res[0]=='/' || usedir[0]==0) | |
| 28 | sprintf(tagout, "%s", res); | |
| 29 | else | |
| 30 | sprintf(tagout, "%s/%s", usedir, res); | |
| 31 | while (*tagout) tagout++; | |
| 32 | } | |
| 33 | else | |
| 34 | { | |
| 35 | if (res[0]!='/' || usedir[0]==0) | |
| 36 | printf("%s/", usedir); | |
| 37 | printf("%s\n", res); | |
| 38 | } | |
| 39 | } | |
| 40 | } | |
| 41 | ||
| 42 | # include "sys/types.h" | |
| 43 | # include "sys/stat.h" | |
| 44 | long gdate(f) | |
| 45 | FILE *f; | |
| 46 | { | |
| 47 | struct stat sb; | |
| 48 | fstat (f->_file, &sb); | |
| 49 | return (sb . st_mtime); | |
| 50 | } |