Return to sblpack.c CVS log

Up to [Synchronet] / sbbs / sbbs2 / sbl

Annotation of sbbs/sbbs2/sbl/sblpack.c, revision 1.1

1.1     ! root        1: /* SBLPACK.C */
        !             2: 
        !             3: /* Developed 1990-1997 by Rob Swindell; PO Box 501, Yorba Linda, CA 92885 */
        !             4: 
        !             5: /***************************************/
        !             6: /* Synchronet BBS List Database Packer */
        !             7: /***************************************/
        !             8: 
        !             9: #include <stdio.h>
        !            10: #include <share.h>
        !            11: #include <time.h>
        !            12: #include <io.h>
        !            13: #include <fcntl.h>
        !            14: #include <sys/stat.h>
        !            15: #include "gen_defs.h"
        !            16: #include "sbldefs.h"
        !            17: 
        !            18: int main(void)
        !            19: {
        !            20:        int file;
        !            21:        FILE *in,*out;
        !            22:        bbs_t bbs;
        !            23: 
        !            24: printf("\nSBLPACK v1.00  Developed 1995-1997 Rob Swindell\n\n");
        !            25: 
        !            26: if((file=open("SBL.DAB",O_RDWR|O_BINARY|O_DENYNONE|O_CREAT
        !            27:        ,S_IWRITE|S_IREAD))==-1) {
        !            28:        printf("\n\7Error opening/creating SBL.DAB\n");
        !            29:        exit(1); }
        !            30: if((in=fdopen(file,"w+b"))==NULL) {
        !            31:        printf("\n\7Error converting SBL.DAB file handle to stream\n");
        !            32:        exit(1); }
        !            33: setvbuf(in,0L,_IOFBF,2048);
        !            34: if((out=fopen("SBL.TMP","wb"))==NULL) {
        !            35:        printf("\n\7Error opening SBL.TMP file\n");
        !            36:        exit(1); }
        !            37: 
        !            38: while(!feof(in)) {
        !            39:        if(!fread(&bbs,sizeof(bbs_t),1,in))
        !            40:                break;
        !            41:        putchar('.');
        !            42:        if(!bbs.name[0])
        !            43:                continue;
        !            44:        fwrite(&bbs,sizeof(bbs_t),1,out); }
        !            45: fcloseall();
        !            46: putchar('\n');
        !            47: if(remove("SBL.DAB")) {
        !            48:        printf("\n\7Data file in use, can't remove.\n");
        !            49:        remove("SBL.TMP");
        !            50:        exit(1); }
        !            51: rename("SBL.TMP","SBL.DAB");
        !            52: printf("\nDone.\n");
        !            53: return(0);
        !            54: }
        !            55: 

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