Return to sbl2smb.c CVS log

Up to [Synchronet] / sbbs / sbbs2 / sbl

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

1.1     ! root        1: /* SBL2SMB.C */
        !             2: 
        !             3: /* Developed 1990-1997 by Rob Swindell; PO Box 501, Yorba Linda, CA 92885 */
        !             4: 
        !             5: /* Scans SBL database and posts any additions/updates into the an SMB base */
        !             6: 
        !             7: #define  uint unsigned int
        !             8: 
        !             9: #include <dos.h>
        !            10: #include "smblib.h"
        !            11: #include "sbldefs.h"
        !            12: 
        !            13: smb_t          smb;
        !            14: extern int     daylight=0;
        !            15: extern long timezone=0L;
        !            16: 
        !            17: unsigned       _stklen=16000;
        !            18: 
        !            19: /****************************************************************************/
        !            20: /* Checks the disk drive for the existence of a file. Returns 1 if it       */
        !            21: /* exists, 0 if it doesn't.                                                 */
        !            22: /****************************************************************************/
        !            23: char fexist(char *filespec)
        !            24: {
        !            25:     struct ffblk f;
        !            26: 
        !            27: if(findfirst(filespec,&f,0)==0)
        !            28:     return(1);
        !            29: return(0);
        !            30: }
        !            31: 
        !            32: 
        !            33: /****************************************************************************/
        !            34: /* Updates 16-bit "rcrc" with character 'ch'                                */
        !            35: /****************************************************************************/
        !            36: void ucrc16(uchar ch, ushort *rcrc) {
        !            37:        ushort i, cy;
        !            38:     uchar nch=ch;
        !            39:  
        !            40: for (i=0; i<8; i++) {
        !            41:     cy=*rcrc & 0x8000;
        !            42:     *rcrc<<=1;
        !            43:     if (nch & 0x80) *rcrc |= 1;
        !            44:     nch<<=1;
        !            45:     if (cy) *rcrc ^= 0x1021; }
        !            46: }
        !            47: 
        !            48: /****************************************************************************/
        !            49: /* Returns 16-crc of string (not counting terminating NULL)                            */
        !            50: /****************************************************************************/
        !            51: ushort crc16(char *str)
        !            52: {
        !            53:        int     i=0;
        !            54:        ushort  crc=0;
        !            55: 
        !            56: ucrc16(0,&crc);
        !            57: while(str[i])
        !            58:        ucrc16(str[i++],&crc);
        !            59: ucrc16(0,&crc);
        !            60: ucrc16(0,&crc);
        !            61: return(crc);
        !            62: }
        !            63: 
        !            64: 
        !            65: /****************************************************************************/
        !            66: /* Converts unix time format (long - time_t) into a char str MM/DD/YY          */
        !            67: /****************************************************************************/
        !            68: char *unixtodstr(time_t unix, char *str)
        !            69: {
        !            70:        struct time curtime;
        !            71:        struct date date;
        !            72: 
        !            73: if(!unix)
        !            74:        strcpy(str,"00/00/00");
        !            75: else {
        !            76:        unixtodos(unix,&date,&curtime);
        !            77:        if((unsigned)date.da_mon>12) {    /* DOS leap year bug */
        !            78:                date.da_mon=1;
        !            79:                date.da_year++; }
        !            80:        if((unsigned)date.da_day>31)
        !            81:                date.da_day=1;
        !            82:        sprintf(str,"%02u/%02u/%02u",date.da_mon,date.da_day
        !            83:                ,date.da_year>=2000 ? date.da_year-2000 : date.da_year-1900); }
        !            84: return(str);
        !            85: }
        !            86: 
        !            87: #define BUF_LEN 8192
        !            88: 
        !            89: int main(int argc, char **argv)
        !            90: {
        !            91:        uchar   str[128],tmp[128],buf[BUF_LEN],*p,software[128];
        !            92:        int     i,file;
        !            93:        ushort  xlat;
        !            94:        long    length;
        !            95:        ulong   offset;
        !            96:        time_t  last,t;
        !            97:        bbs_t   bbs;
        !            98:        smbmsg_t msg;
        !            99:        smbstatus_t status;
        !           100:        FILE    *stream;
        !           101: 
        !           102: fprintf(stderr,"\nSBL2SMB v2.00 - Write SBL to SMB - Developed 1994-1997 "
        !           103:        "Rob Swindell\n\n");
        !           104: if(argc<3) {
        !           105:        fprintf(stderr,"usage: sbl2smb <sbl.dab> <smb_file> [/s:software]\n\n");
        !           106:        fprintf(stderr,"ex: sbl2smb c:\\sbbs\\xtrn\\sbl\\sbl.dab "
        !           107:                "c:\\sbbs\\data\\subs\\syncdata /s:syn\n");
        !           108:        return(1); }
        !           109: 
        !           110: software[0]=0;
        !           111: if(argc>3 && !strnicmp(argv[3],"/S:",3))
        !           112:        strcpy(software,argv[3]+3);
        !           113: 
        !           114: strcpy(smb.file,argv[2]);
        !           115: strupr(smb.file);
        !           116: 
        !           117: strcpy(str,argv[1]);
        !           118: strupr(str);
        !           119: if((file=open(str,O_RDONLY|O_BINARY|O_DENYNONE))==-1) {
        !           120:        printf("error opening %s\n",str);
        !           121:        return(1); }
        !           122: if((stream=fdopen(file,"rb"))==NULL) {
        !           123:        printf("error fdopening %s\n",str);
        !           124:        return(1); }
        !           125: strcpy(tmp,str);
        !           126: p=strrchr(tmp,'.');
        !           127: if(p) {
        !           128:        (*p)=0;
        !           129:        strcat(tmp,"2SMB.DAB");
        !           130:        if((file=open(tmp,O_RDWR|O_BINARY|O_CREAT,S_IWRITE|S_IREAD))==-1) {
        !           131:                printf("error opening %s\n",str);
        !           132:                return(1); }
        !           133:        t=time(NULL);
        !           134:        if(read(file,&last,sizeof(time_t))!=sizeof(time_t))
        !           135:                last=t;
        !           136:        lseek(file,0L,SEEK_SET);
        !           137:        write(file,&t,sizeof(time_t));
        !           138:        close(file); }
        !           139: 
        !           140: sprintf(str,"%s.SHD",smb.file);
        !           141: if(!fexist(str)) {
        !           142:        printf("%s doesn't exist\n",smb.file);
        !           143:        return(0); }
        !           144: fprintf(stderr,"Opening %s\n",smb.file);
        !           145: smb.retry_time=30;
        !           146: if((i=smb_open(&smb))!=0) {
        !           147:        printf("smb_open returned %d\n",i);
        !           148:        return(1); }
        !           149: i=smb_locksmbhdr(&smb);
        !           150: if(i) {
        !           151:        printf("smb_locksmbhdr returned %d\n",i);
        !           152:        return(1); }
        !           153: i=smb_getstatus(&smb);
        !           154: smb_unlocksmbhdr(&smb);
        !           155: if(i) {
        !           156:        printf("smb_getstatus returned %d\n",i);
        !           157:        return(1); }
        !           158: 
        !           159: while(!feof(stream)) {
        !           160:        if(!fread(&bbs,sizeof(bbs_t),1,stream))
        !           161:                break;
        !           162:        if(!bbs.name[0] || bbs.misc&FROM_SMB
        !           163:                || (bbs.updated<last && bbs.created<last))
        !           164:                continue;
        !           165:        if(software[0] && strnicmp(software,bbs.software,strlen(software)))
        !           166:                continue;
        !           167: 
        !           168:        printf("%s\r\n",bbs.name);
        !           169:        memset(buf,0,BUF_LEN);
        !           170: 
        !           171:        sprintf(str,"%-15.15s%s\r\n"
        !           172:                ,"Name:",bbs.name);
        !           173:        strcat(buf,str);
        !           174: 
        !           175:        sprintf(str,"%-15.15s%s\r\n"
        !           176:                ,"Birth:",unixtodstr(bbs.birth,tmp));
        !           177:     strcat(buf,str);
        !           178: 
        !           179:        sprintf(str,"%-15.15s%s\r\n"
        !           180:                ,"Software:",bbs.software);
        !           181:     strcat(buf,str);
        !           182: 
        !           183:        for(i=0;i<bbs.total_sysops;i++) {
        !           184:                sprintf(str,"%-15.15s%s\r\n"
        !           185:                        ,"Sysop:",bbs.sysop[i]);
        !           186:                strcat(buf,str); }
        !           187: 
        !           188:        strcat(buf,"\r\n");
        !           189:        for(i=0;i<bbs.total_numbers;i++) {
        !           190:                sprintf(str,"%-15.15s%s\r\n"
        !           191:                        ,"Number:",bbs.number[i].number);
        !           192:                strcat(buf,str);
        !           193:                sprintf(str,"%-15.15s%s\r\n"
        !           194:                        ,"Modem:",bbs.number[i].modem);
        !           195:         strcat(buf,str);
        !           196:                sprintf(str,"%-15.15s%s\r\n"
        !           197:                        ,"Location:",bbs.number[i].location);
        !           198:         strcat(buf,str);
        !           199:                sprintf(str,"%-15.15s%u\r\n"
        !           200:                        ,"MinRate:",bbs.number[i].min_rate);
        !           201:         strcat(buf,str);
        !           202:                sprintf(str,"%-15.15s%u\r\n"
        !           203:                        ,"MaxRate:",bbs.number[i].max_rate);
        !           204:                strcat(buf,str);
        !           205:                if(i+1<bbs.total_numbers)
        !           206:                        strcat(buf,"\r\n"); }
        !           207: 
        !           208:        if(bbs.total_networks)
        !           209:                strcat(buf,"\r\n");
        !           210:        for(i=0;i<bbs.total_networks;i++) {
        !           211:                sprintf(str,"%-15.15s%s\r\n"
        !           212:                        ,"Network:",bbs.network[i]);
        !           213:         strcat(buf,str);
        !           214:                sprintf(str,"%-15.15s%s\r\n"
        !           215:                        ,"Address:",bbs.address[i]);
        !           216:                strcat(buf,str);
        !           217:                if(i+1<bbs.total_networks)
        !           218:                        strcat(buf,"\r\n"); }
        !           219: 
        !           220:        strcat(buf,"\r\n");
        !           221:        for(i=0;i<bbs.total_terminals;i++) {
        !           222:                sprintf(str,"%-15.15s%s\r\n"
        !           223:                        ,"Terminal:",bbs.terminal[i]);
        !           224:                strcat(buf,str); }
        !           225: 
        !           226:        strcat(buf,"\r\n");
        !           227:        sprintf(str,"%-15.15s%lu\r\n"
        !           228:                ,"Megs:",bbs.megs);
        !           229:        strcat(buf,str);
        !           230:        sprintf(str,"%-15.15s%lu\r\n"
        !           231:                ,"Msgs:",bbs.msgs);
        !           232:     strcat(buf,str);
        !           233:        sprintf(str,"%-15.15s%lu\r\n"
        !           234:                ,"Files:",bbs.files);
        !           235:     strcat(buf,str);
        !           236:        sprintf(str,"%-15.15s%u\r\n"
        !           237:                ,"Nodes:",bbs.nodes);
        !           238:     strcat(buf,str);
        !           239:        sprintf(str,"%-15.15s%u\r\n"
        !           240:                ,"Users:",bbs.users);
        !           241:     strcat(buf,str);
        !           242:        sprintf(str,"%-15.15s%u\r\n"
        !           243:                ,"Subs:",bbs.subs);
        !           244:     strcat(buf,str);
        !           245:        sprintf(str,"%-15.15s%u\r\n"
        !           246:                ,"Dirs:",bbs.dirs);
        !           247:     strcat(buf,str);
        !           248:        sprintf(str,"%-15.15s%u\r\n"
        !           249:                ,"Xtrns:",bbs.xtrns);
        !           250:     strcat(buf,str);
        !           251: 
        !           252:        if(bbs.desc[0][0])
        !           253:                strcat(buf,"\r\n");
        !           254:        for(i=0;i<5;i++) {
        !           255:                if(!bbs.desc[i][0])
        !           256:                        break;
        !           257:                sprintf(str,"%-15.15s%s\r\n"
        !           258:                        ,"Desc:",bbs.desc[i]);
        !           259:                strcat(buf,str); }
        !           260: 
        !           261:        strcat(buf,"\r\n--- SBL2SMB v1.10");
        !           262: 
        !           263:        length=strlen(buf);   /* +2 for translation string */
        !           264: 
        !           265:        if(status.attr&SMB_HYPERALLOC)
        !           266:                offset=smb_hallocdat(&smb);
        !           267:        else {
        !           268:                i=smb_open_da(&smb);
        !           269:                if(i) {
        !           270:                        printf("smb_open_da returned %d\n",i);
        !           271:                        exit(1); }
        !           272:                offset=smb_allocdat(&smb,length+2,1);
        !           273:                fclose(smb.sda_fp); }
        !           274: 
        !           275:        fseek(smb.sdt_fp,offset,SEEK_SET);
        !           276:        xlat=XLAT_NONE;
        !           277:        fwrite(&xlat,2,1,smb.sdt_fp);
        !           278:        fwrite(buf,length,1,smb.sdt_fp);
        !           279:        length+=2;
        !           280: 
        !           281:        memset(&msg,0,sizeof(smbmsg_t));
        !           282:        memcpy(msg.hdr.id,"SHD\x1a",4);
        !           283:        msg.hdr.version=SMB_VERSION;
        !           284:        msg.hdr.when_written.time=time(NULL);
        !           285:     
        !           286:        msg.hdr.offset=offset;
        !           287: 
        !           288:        strcpy(str,"SBL");
        !           289:        i=smb_hfield(&msg,RECIPIENT,strlen(str),str);
        !           290:        if(i) {
        !           291:                printf("smb_hfield returned %d\n",i);
        !           292:                smb_freemsgdat(&smb,offset,length,1);
        !           293:                exit(1); }
        !           294:        strlwr(str);
        !           295:        msg.idx.to=crc16(str);
        !           296: 
        !           297:        strcpy(str,bbs.user);
        !           298:        i=smb_hfield(&msg,SENDER,strlen(str),str);
        !           299:        if(i) {
        !           300:                printf("smb_hfield returned %d\n",i);
        !           301:                smb_freemsgdat(&smb,offset,length,1);
        !           302:                exit(1); }
        !           303:        strlwr(str);
        !           304:        msg.idx.from=crc16(str);
        !           305: 
        !           306:        strcpy(str,bbs.name);
        !           307:        i=smb_hfield(&msg,SUBJECT,strlen(str),str);
        !           308:        if(i) {
        !           309:                printf("smb_hfield returned %d\n",i);
        !           310:                smb_freemsgdat(&smb,offset,length,1);
        !           311:                exit(1); }
        !           312:        strlwr(str);
        !           313:        msg.idx.subj=crc16(str);
        !           314: 
        !           315:        i=smb_dfield(&msg,TEXT_BODY,length);
        !           316:        if(i) {
        !           317:                printf("smb_dfield returned %d\n",i);
        !           318:                smb_freemsgdat(&smb,offset,length,1);
        !           319:                exit(1); }
        !           320: 
        !           321:        i=smb_addmsghdr(&smb,&msg,status.attr&SMB_HYPERALLOC);
        !           322:        if(i) {
        !           323:                printf("smb_addmsghdr returned %d\n",i);
        !           324:                smb_freemsgdat(&smb,offset,length,1);
        !           325:                exit(1); }
        !           326:        smb_freemsgmem(&msg); }
        !           327: return(0);
        !           328: }
        !           329: 
        !           330: /* End of SBL2SMB.C */

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