Return to speedr.c CVS log

Up to [CSRG BSD Unix] / 42BSD / old / berknet

Annotation of 42BSD/old/berknet/speedr.c, revision 1.1

1.1     ! root        1: static char sccsid[] = "@(#)speedr.c   4.1     (Berkeley)      10/2/82";
        !             2: 
        !             3: /*
        !             4:        speedr.c
        !             5: 
        !             6:        with speeds.c used to time the links
        !             7: */
        !             8: # include "defs.h"
        !             9: 
        !            10: /* global */
        !            11: struct daemonparms netd;
        !            12: 
        !            13: main(argc,argv)
        !            14:   char **argv; {
        !            15:        char buf[2000];
        !            16:        int savd, n;
        !            17:        register int i;
        !            18:        debugflg = DBV;
        !            19:        setupdaemon(argc,argv);
        !            20:        initseqno();
        !            21:        savd = netd.dp_datasize;
        !            22:        putchar('!');
        !            23:        for(;;){
        !            24:                netd.dp_datasize = savd;
        !            25:                while(nread(&n,2) == BROKENREAD);
        !            26: # ifdef SWAB
        !            27:                swab(&n,&n,2);
        !            28: # endif
        !            29:                printf("Length = %d\n",n);
        !            30:                netd.dp_datasize = n;
        !            31:                for(;;){
        !            32:                        while((i=nread(buf,n)) == BROKENREAD);
        !            33:                        if(i != n)putchar('#');
        !            34:                        if(buf[0] == 'Z')break;
        !            35:                        }
        !            36:                }
        !            37:        }

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