Return to kitlists.c CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / rn

Annotation of 43BSD/contrib/rn/kitlists.c, revision 1.1.1.1

1.1       root        1: /* $Header: kitlists.c,v 4.3 85/05/01 11:42:08 lwall Exp $
                      2:  *
                      3:  * $Log:       kitlists.c,v $
                      4:  * Revision 4.3  85/05/01  11:42:08  lwall
                      5:  * Baseline for release with 4.3bsd.
                      6:  * 
                      7:  */
                      8: 
                      9: #include <stdio.h>
                     10: 
                     11: #define MAXKIT 100
                     12: #define MAXKITSIZE 63000
                     13: #define KITOVERHEAD 700
                     14: #define FILEOVERHEAD 80
                     15: 
                     16: long tot[MAXKIT];
                     17: FILE *outfp[MAXKIT];           /* of course, not this many file descriptors */
                     18: 
                     19: main(argc,argv)
                     20: int argc;
                     21: char **argv;
                     22: {
                     23:     FILE *inp, *popen();
                     24:     char buf[1024], filnam[128];
                     25:     char *index();
                     26:     register char *s;
                     27:     register int i, newtot;
                     28:     
                     29:     sprintf(buf,"\
                     30: ls -l `awk '{print $1}' <%s'` | awk '{print $8 \" \" $4}' | sort +1nr\
                     31: ", argc > 1 ? argv[1] : "MANIFEST.new");
                     32:     inp = popen(buf,"r");
                     33: 
                     34:     while (fgets(buf,1024,inp) != Nullch) {
                     35:        s = index(buf,' ');
                     36:        *s++ = '\0';
                     37:        for (i=1;
                     38:          (newtot = tot[i] + atol(s) + FILEOVERHEAD) > MAXKITSIZE-KITOVERHEAD;
                     39:          i++) 
                     40:            ;
                     41:        if (!tot[i]) {
                     42:            sprintf(filnam,"kit%d.list",i);
                     43:            outfp[i] = fopen(filnam,"w");
                     44:        }
                     45:        tot[i] = newtot;
                     46:        printf("Adding %s to kit %d giving %d bytes\n",buf,i,newtot);
                     47:        fprintf(outfp[i],"%s\n",buf);
                     48:     }
                     49: }

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