Return to store.c CVS log

Up to [CSRG BSD Unix] / 40BSD / cmd / berknet

Annotation of 40BSD/cmd/berknet/store.c, revision 1.1

1.1     ! root        1: /*
        !             2:        store.c
        !             3: 
        !             4:        send a file to the program "receive.c" 
        !             5: */
        !             6: # include "defs.h"
        !             7: main(argc,argv)
        !             8:   char **argv; {
        !             9:        FILE *fp;
        !            10:        int buf[BUFSIZ], n;
        !            11:        long work;
        !            12:        char str[50];
        !            13:        char ifile[20],ofile[20];
        !            14:        struct stat statbuf;
        !            15: 
        !            16:        printf("from file: ");
        !            17:        fflush(stdout);
        !            18:        gets(ifile,stdout);
        !            19:        printf("to file: ");
        !            20:        fflush(stdout);
        !            21:        gets(ofile,stdout);
        !            22:        fp = fopen(ifile,"r");
        !            23:        if(fp == NULL){
        !            24:                perror(ifile);
        !            25:                exit(1);
        !            26:                }
        !            27:        debugflg = DBV;
        !            28:        setupdaemon(argc,argv);
        !            29:        strcpy(str,ofile);
        !            30:        strcat(str,"                             ");
        !            31:        sendreset();
        !            32:        xwrite(str,20);
        !            33:        if(stat(ifile,&statbuf) < 0){
        !            34:                perror(ifile);
        !            35:                exit(1);
        !            36:                }
        !            37:        work = getsize(&statbuf);
        !            38:        work = fixuplong(work);
        !            39:        xwrite(&work,4);
        !            40:        while((n = fread(buf,1,BUFSIZ,fp)) > 0)
        !            41:                xwrite(buf,n);
        !            42:        fclose(fp);
        !            43:        }

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