1*12286Stut #ifndef lint 2*12286Stut static char *sccsid = "@(#)hunt5.c 4.1 (Berkeley) 05/06/83"; 3*12286Stut #endif 4*12286Stut 5*12286Stut #include <stdio.h> 6*12286Stut #include <sys/types.h> 7*12286Stut #include <sys/stat.h> 8*12286Stut 9*12286Stut extern char *soutput, *tagout, usedir[]; 10*12286Stut 11*12286Stut result(master, nf, fc) 12*12286Stut union ptr { 13*12286Stut unsigned *a; 14*12286Stut long *b; 15*12286Stut } *master; 16*12286Stut FILE *fc; 17*12286Stut { 18*12286Stut int i, c; 19*12286Stut char *s; 20*12286Stut long lp; 21*12286Stut extern int iflong; 22*12286Stut char res[100]; 23*12286Stut 24*12286Stut for(i=0; i<nf; i++) 25*12286Stut { 26*12286Stut lp = iflong ? master.b[i] : master.a[i]; 27*12286Stut fseek(fc,lp, 0); 28*12286Stut fgets(res, 100, fc); 29*12286Stut for(s=res; c = *s; s++) 30*12286Stut if (c== ';') 31*12286Stut { 32*12286Stut *s=0; 33*12286Stut break; 34*12286Stut } 35*12286Stut if (tagout !=0) 36*12286Stut { 37*12286Stut if (res[0]=='/' || usedir[0]==0) 38*12286Stut sprintf(tagout, "%s", res); 39*12286Stut else 40*12286Stut sprintf(tagout, "%s/%s", usedir, res); 41*12286Stut while (*tagout) tagout++; 42*12286Stut } 43*12286Stut else 44*12286Stut { 45*12286Stut if (res[0]!='/' || usedir[0]==0) 46*12286Stut printf("%s/", usedir); 47*12286Stut printf("%s\n", res); 48*12286Stut } 49*12286Stut } 50*12286Stut } 51*12286Stut 52*12286Stut long 53*12286Stut gdate(f) 54*12286Stut FILE *f; 55*12286Stut { 56*12286Stut struct stat sb; 57*12286Stut fstat (f->_file, &sb); 58*12286Stut return (sb . st_mtime); 59*12286Stut } 60