home *** CD-ROM | disk | FTP | other *** search
/ minnie.tuhs.org / unixen.tar / unixen / PDP-11 / Trees / V7 / usr / src / cmd / refer / hunt5.c < prev    next >
Encoding:
C/C++ Source or Header  |  1979-01-10  |  789 b   |  51 lines
  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. }
  51.