Return to flist.c CVS log

Up to [Research Unix] / researchv10no / cmd / ap / apkeys

Annotation of researchv10no/cmd/ap/apkeys/flist.c, revision 1.1.1.1

1.1       root        1: # include "stdio.h"
                      2: # include "ctype.h"
                      3: # include "assert.h"
                      4: # include "sys/types.h"
                      5: # include "sys/stat.h"
                      6: /*
                      7:  * given a list of names on the standard input,
                      8:  * compare the dates of those files with those of
                      9:  * a standard file and print the ones which pass
                     10:  * also reject inodes if previously seen
                     11:  */
                     12: main(argc,argv)
                     13:        char *argv[];
                     14: {
                     15: char *refname, *upname;
                     16: long reftime, lseek();
                     17: char fname[50];
                     18: struct stat stbuff;
                     19: # define NI 500
                     20: int ilist[NI], nj=0;
                     21: refname = argc>1 ? argv[1] : "";
                     22: upname = argc>2 ? argv[2] : "";
                     23: if (stat(refname, &stbuff) < 0)
                     24:        reftime=0;
                     25: else
                     26:        reftime = stbuff.st_mtime;
                     27: /* update file */
                     28: if (stat(upname, &stbuff) < 0 || stbuff.st_size==0)
                     29:        {
                     30:        if (creat (upname, 0666)== -1)
                     31:                fprintf(stderr, "Can not creat file %s\n",upname);
                     32:        }
                     33: else
                     34:        {
                     35:        int fd; char x[2];
                     36:        fd = open(upname, 2);
                     37:        assert(fd>0);
                     38:        assert(read(fd, x, 1)==1);
                     39:        assert(lseek(fd, 0L, 0)!= -1);
                     40:        assert(write(fd, x, 1)==1);
                     41:        assert(close(fd)==0);
                     42:        }
                     43: while (gets(fname))
                     44:        {
                     45:        int k;
                     46:        k = stat (fname, &stbuff);
                     47:        if (k<0) continue;
                     48:        if (stbuff.st_mtime >reftime)
                     49:                {
                     50:                int i, ino, found=0;
                     51:                ino = stbuff.st_ino;
                     52:                for(i=0; i<nj; i++)
                     53:                        if (ilist[i]==ino)
                     54:                                found=1;
                     55:                if (found) continue;
                     56:                ilist[nj++]=ino;
                     57:                if (nj>=NI) nj = NI/2;
                     58:                puts(fname);
                     59:                }
                     60:        }
                     61: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.