Annotation of sbbs/sbbs3/str.cpp, revision 1.1.1.2

1.1       root        1: /* str.cpp */
                      2: 
                      3: /* Synchronet high-level string i/o routines */
                      4: 
1.1.1.2 ! root        5: /* $Id: str.cpp,v 1.51 2004/12/01 03:07:32 rswindell Exp $ */
1.1       root        6: 
                      7: /****************************************************************************
                      8:  * @format.tab-size 4          (Plain Text/Source Code File Header)                    *
                      9:  * @format.use-tabs true       (see http://www.synchro.net/ptsc_hdr.html)              *
                     10:  *                                                                                                                                                     *
1.1.1.2 ! root       11:  * Copyright 2003 Rob Swindell - http://www.synchro.net/copyright.html         *
1.1       root       12:  *                                                                                                                                                     *
                     13:  * This program is free software; you can redistribute it and/or                       *
                     14:  * modify it under the terms of the GNU General Public License                         *
                     15:  * as published by the Free Software Foundation; either version 2                      *
                     16:  * of the License, or (at your option) any later version.                                      *
                     17:  * See the GNU General Public License for more details: gpl.txt or                     *
                     18:  * http://www.fsf.org/copyleft/gpl.html                                                                                *
                     19:  *                                                                                                                                                     *
                     20:  * Anonymous FTP access to the most recent released source is available at     *
                     21:  * ftp://vert.synchro.net, ftp://cvs.synchro.net and ftp://ftp.synchro.net     *
                     22:  *                                                                                                                                                     *
                     23:  * Anonymous CVS access to the development source and modification history     *
                     24:  * is available at cvs.synchro.net:/cvsroot/sbbs, example:                                     *
                     25:  * cvs -d :pserver:[email protected]:/cvsroot/sbbs login                       *
                     26:  *     (just hit return, no password is necessary)                                                     *
                     27:  * cvs -d :pserver:[email protected]:/cvsroot/sbbs checkout src                *
                     28:  *                                                                                                                                                     *
                     29:  * For Synchronet coding style and modification guidelines, see                                *
                     30:  * http://www.synchro.net/source.html                                                                          *
                     31:  *                                                                                                                                                     *
                     32:  * You are encouraged to submit any modifications (preferably in Unix diff     *
                     33:  * format) via e-mail to [email protected]                                                                      *
                     34:  *                                                                                                                                                     *
                     35:  * Note: If this box doesn't appear square, then you need to fix your tabs.    *
                     36:  ****************************************************************************/
                     37: 
                     38: #include "sbbs.h"
                     39: 
                     40: /****************************************************************************/
                     41: /* Lists all users who have access to the current sub.                      */
                     42: /****************************************************************************/
1.1.1.2 ! root       43: void sbbs_t::userlist(long mode)
1.1       root       44: {
                     45:        char    name[256],sort=0;
                     46:        char    tmp[512];
                     47:        int             i,j,k,users=0;
1.1.1.2 ! root       48:        char *  line[2500];
1.1       root       49:        user_t  user;
                     50: 
1.1.1.2 ! root       51:        if(lastuser(&cfg)<=(sizeof(line)/sizeof(line[0])))
1.1       root       52:                sort=yesno(text[SortAlphaQ]);
                     53:        if(sort) {
1.1.1.2 ! root       54:                bputs(text[CheckingSlots]); 
        !            55:        }
1.1       root       56:        else {
1.1.1.2 ! root       57:                CRLF; 
        !            58:        }
1.1       root       59:        j=0;
                     60:        k=lastuser(&cfg);
                     61:        for(i=1;i<=k && !msgabort();i++) {
                     62:                if(sort && (online==ON_LOCAL || !rioctl(TXBC)))
                     63:                        bprintf("%-4d\b\b\b\b",i);
                     64:                user.number=i;
                     65:                getuserdat(&cfg,&user);
                     66:                if(user.misc&(DELETED|INACTIVE))
                     67:                        continue;
                     68:                users++;
                     69:                if(mode==UL_SUB) {
                     70:                        if(!usrgrps)
                     71:                                continue;
                     72:                        if(!chk_ar(cfg.grp[usrgrp[curgrp]]->ar,&user))
                     73:                                continue;
                     74:                        if(!chk_ar(cfg.sub[usrsub[curgrp][cursub[curgrp]]]->ar,&user)
                     75:                                || (cfg.sub[usrsub[curgrp][cursub[curgrp]]]->read_ar[0]
                     76:                                && !chk_ar(cfg.sub[usrsub[curgrp][cursub[curgrp]]]->read_ar,&user)))
1.1.1.2 ! root       77:                                continue; 
        !            78:                }
1.1       root       79:                else if(mode==UL_DIR) {
                     80:                        if(user.rest&FLAG('T'))
                     81:                                continue;
                     82:                        if(!usrlibs)
                     83:                                continue;
                     84:                        if(!chk_ar(cfg.lib[usrlib[curlib]]->ar,&user))
                     85:                                continue;
                     86:                        if(!chk_ar(cfg.dir[usrdir[curlib][curdir[curlib]]]->ar,&user))
1.1.1.2 ! root       87:                                continue; 
        !            88:                }
1.1       root       89:                if(sort) {
                     90:                        if((line[j]=(char *)MALLOC(128))==0) {
                     91:                                errormsg(WHERE,ERR_ALLOC,nulstr,83);
                     92:                                for(i=0;i<j;i++)
                     93:                                        FREE(line[i]);
1.1.1.2 ! root       94:                                return; 
        !            95:                        }
1.1       root       96:                        sprintf(name,"%s #%d",user.alias,i);
                     97:                        sprintf(line[j],text[UserListFmt],name
                     98:                                ,cfg.sys_misc&SM_LISTLOC ? user.location : user.note
                     99:                                ,unixtodstr(&cfg,user.laston,tmp)
1.1.1.2 ! root      100:                                ,user.modem); 
        !           101:                }
1.1       root      102:                else {
                    103:                        sprintf(name,"%s #%u",user.alias,i);
                    104:                        bprintf(text[UserListFmt],name
                    105:                                ,cfg.sys_misc&SM_LISTLOC ? user.location : user.note
                    106:                                ,unixtodstr(&cfg,user.laston,tmp)
1.1.1.2 ! root      107:                                ,user.modem); 
        !           108:                }
        !           109:                j++; 
        !           110:        }
1.1       root      111:        if(i<=k) {      /* aborted */
                    112:                if(sort)
                    113:                        for(i=0;i<j;i++)
                    114:                                FREE(line[i]);
1.1.1.2 ! root      115:                return; 
        !           116:        }
1.1       root      117:        if(!sort) {
1.1.1.2 ! root      118:                CRLF; 
        !           119:        }
1.1       root      120:        bprintf(text[NTotalUsers],users);
                    121:        if(mode==UL_SUB)
                    122:                bprintf(text[NUsersOnCurSub],j);
                    123:        else if(mode==UL_DIR)
                    124:                bprintf(text[NUsersOnCurDir],j);
                    125:        if(!sort)
                    126:                return;
                    127:        CRLF;
                    128:        qsort((void *)line,j,sizeof(line[0])
                    129:                ,(int(*)(const void*, const void*))pstrcmp);
                    130:        for(i=0;i<j && !msgabort();i++)
                    131:                bputs(line[i]);
                    132:        for(i=0;i<j;i++)
                    133:                FREE(line[i]);
                    134: }
                    135: 
                    136: /****************************************************************************/
                    137: /* SIF input function. See SIF.DOC for more info                                               */
                    138: /****************************************************************************/
                    139: void sbbs_t::sif(char *fname, char *answers, long len)
                    140: {
                    141:        char    str[256],tmplt[256],HUGE16 *buf;
                    142:        uint    t,max,min,mode,cr;
                    143:        int             file;
                    144:        long    length,l=0,m,top,a=0;
                    145: 
                    146:        sprintf(str,"%s%s.sif",cfg.text_dir,fname);
                    147:        if((file=nopen(str,O_RDONLY))==-1) {
                    148:                errormsg(WHERE,ERR_OPEN,str,O_RDONLY);
                    149:                answers[0]=0;
1.1.1.2 ! root      150:                return; 
        !           151:        }
1.1       root      152:        length=filelength(file);
                    153:        if((buf=(char *)MALLOC(length))==0) {
                    154:                close(file);
                    155:                errormsg(WHERE,ERR_ALLOC,str,length);
                    156:                answers[0]=0;
1.1.1.2 ! root      157:                return; 
        !           158:        }
1.1       root      159:        if(lread(file,buf,length)!=length) {
                    160:                close(file);
                    161:                errormsg(WHERE,ERR_READ,str,length);
                    162:                answers[0]=0;
1.1.1.2 ! root      163:                return; 
        !           164:        }
1.1       root      165:        close(file);
                    166:        while(l<length && online) {
                    167:                mode=min=max=t=cr=0;
                    168:                top=l;
                    169:                while(l<length && buf[l++]!=STX);
                    170:                for(m=l;m<length;m++)
                    171:                        if(buf[m]==ETX || !buf[m]) {
                    172:                                buf[m]=0;
1.1.1.2 ! root      173:                                break; 
        !           174:                        }
1.1       root      175:                if(l>=length) break;
                    176:                if(online==ON_REMOTE) {
                    177:                        rioctl(IOCM|ABORT);
1.1.1.2 ! root      178:                        rioctl(IOCS|ABORT); 
        !           179:                }
1.1       root      180:                putmsg(buf+l,P_SAVEATR);
                    181:                m++;
                    182:                if(toupper(buf[m])!='C' && toupper(buf[m])!='S')
                    183:                        continue;
                    184:                SYNC;
                    185:                if(online==ON_REMOTE)
                    186:                        rioctl(IOSM|ABORT);
                    187:                if(a>=len) {
                    188:                        errormsg(WHERE,ERR_LEN,fname,len);
1.1.1.2 ! root      189:                        break; 
        !           190:                }
1.1       root      191:                if((buf[m]&0xdf)=='C') {
                    192:                if((buf[m+1]&0xdf)=='U') {              /* Uppercase only */
                    193:                                mode|=K_UPPER;
1.1.1.2 ! root      194:                                m++; 
        !           195:                        }
1.1       root      196:                        else if((buf[m+1]&0xdf)=='N') { /* Numbers only */
                    197:                                mode|=K_NUMBER;
1.1.1.2 ! root      198:                                m++; 
        !           199:                        }
1.1       root      200:                        if((buf[m+1]&0xdf)=='L') {              /* Draw line */
                    201:                        if(useron.misc&COLOR)
                    202:                                        attr(cfg.color[clr_inputline]);
                    203:                                else
1.1.1.2 ! root      204:                                        attr(BLACK|BG_LIGHTGRAY);
1.1       root      205:                                bputs(" \b");
1.1.1.2 ! root      206:                                m++; 
        !           207:                        }
1.1       root      208:                        if((buf[m+1]&0xdf)=='R') {              /* Add CRLF */
                    209:                                cr=1;
1.1.1.2 ! root      210:                                m++; 
        !           211:                        }
1.1       root      212:                        if(buf[m+1]=='"') {
                    213:                                m+=2;
                    214:                                for(l=m;l<length;l++)
                    215:                                        if(buf[l]=='"') {
                    216:                                                buf[l]=0;
1.1.1.2 ! root      217:                                                break; 
        !           218:                                        }
        !           219:                                answers[a++]=(char)getkeys((char *)buf+m,0); 
        !           220:                        }
1.1       root      221:                        else {
                    222:                                answers[a]=getkey(mode);
                    223:                                outchar(answers[a++]);
                    224:                                attr(LIGHTGRAY);
1.1.1.2 ! root      225:                                CRLF; 
        !           226:                        }
1.1       root      227:                        if(cr) {
                    228:                                answers[a++]=CR;
1.1.1.2 ! root      229:                                answers[a++]=LF; 
        !           230:                        } 
        !           231:                }
1.1       root      232:                else if((buf[m]&0xdf)=='S') {           /* String */
                    233:                        if((buf[m+1]&0xdf)=='U') {              /* Uppercase only */
                    234:                                mode|=K_UPPER;
1.1.1.2 ! root      235:                                m++; 
        !           236:                        }
1.1       root      237:                        else if((buf[m+1]&0xdf)=='F') { /* Force Upper/Lowr case */
                    238:                                mode|=K_UPRLWR;
1.1.1.2 ! root      239:                                m++; 
        !           240:                        }
1.1       root      241:                        else if((buf[m+1]&0xdf)=='N') { /* Numbers only */
                    242:                                mode|=K_NUMBER;
1.1.1.2 ! root      243:                                m++; 
        !           244:                        }
1.1       root      245:                        if((buf[m+1]&0xdf)=='L') {              /* Draw line */
                    246:                                mode|=K_LINE;
1.1.1.2 ! root      247:                                m++; 
        !           248:                        }
1.1       root      249:                        if((buf[m+1]&0xdf)=='R') {              /* Add CRLF */
                    250:                                cr=1;
1.1.1.2 ! root      251:                                m++; 
        !           252:                        }
1.1       root      253:                        if(isdigit(buf[m+1])) {
                    254:                                max=buf[++m]&0xf;
                    255:                                if(isdigit(buf[m+1]))
1.1.1.2 ! root      256:                                        max=max*10+(buf[++m]&0xf); 
        !           257:                        }
1.1       root      258:                        if(buf[m+1]=='.' && isdigit(buf[m+2])) {
                    259:                                m++;
                    260:                                min=buf[++m]&0xf;
                    261:                                if(isdigit(buf[m+1]))
1.1.1.2 ! root      262:                                        min=min*10+(buf[++m]&0xf); 
        !           263:                        }
1.1       root      264:                        if(buf[m+1]=='"') {
                    265:                                m++;
                    266:                                mode&=~K_NUMBER;
                    267:                                while(buf[++m]!='"' && t<80)
                    268:                                        tmplt[t++]=buf[m];
                    269:                                tmplt[t]=0;
1.1.1.2 ! root      270:                                max=strlen(tmplt); 
        !           271:                        }
1.1       root      272:                        if(t) {
                    273:                                if(gettmplt(str,tmplt,mode)<min) {
                    274:                                        l=top;
1.1.1.2 ! root      275:                                        continue; 
        !           276:                                } 
        !           277:                        }
1.1       root      278:                        else {
                    279:                                if(!max)
                    280:                                        continue;
                    281:                                if(getstr(str,max,mode)<min) {
                    282:                                        l=top;
1.1.1.2 ! root      283:                                        continue; 
        !           284:                                } 
        !           285:                        }
1.1       root      286:                        if(!cr) {
                    287:                                for(cr=0;str[cr];cr++)
                    288:                                        answers[a+cr]=str[cr];
                    289:                                while(cr<max)
                    290:                                        answers[a+cr++]=ETX;
1.1.1.2 ! root      291:                                a+=max; 
        !           292:                        }
1.1       root      293:                        else {
                    294:                                putrec(answers,a,max,str);
                    295:                                putrec(answers,a+max,2,crlf);
1.1.1.2 ! root      296:                                a+=max+2; 
        !           297:                        } 
        !           298:                } 
        !           299:        }
1.1       root      300:        answers[a]=0;
                    301:        FREE((char *)buf);
                    302: }
                    303: 
                    304: /****************************************************************************/
                    305: /* SIF output function. See SIF.DOC for more info                                              */
                    306: /****************************************************************************/
                    307: void sbbs_t::sof(char *fname, char *answers, long len)
                    308: {
                    309:        char str[256],HUGE16 *buf,max,min,cr;
                    310:        int file;
                    311:        long length,l=0,m,a=0;
                    312: 
                    313:        sprintf(str,"%s%s.sif",cfg.text_dir,fname);
                    314:        if((file=nopen(str,O_RDONLY))==-1) {
                    315:                errormsg(WHERE,ERR_OPEN,str,O_RDONLY);
                    316:                answers[0]=0;
1.1.1.2 ! root      317:                return; 
        !           318:        }
1.1       root      319:        length=filelength(file);
                    320:        if((buf=(char *)MALLOC(length))==0) {
                    321:                close(file);
                    322:                errormsg(WHERE,ERR_ALLOC,str,length);
                    323:                answers[0]=0;
1.1.1.2 ! root      324:                return; 
        !           325:        }
1.1       root      326:        if(lread(file,buf,length)!=length) {
                    327:                close(file);
                    328:                errormsg(WHERE,ERR_READ,str,length);
                    329:                answers[0]=0;
1.1.1.2 ! root      330:                return; 
        !           331:        }
1.1       root      332:        close(file);
                    333:        while(l<length && online) {
                    334:                min=max=cr=0;
                    335:                while(l<length && buf[l++]!=STX);
                    336:                for(m=l;m<length;m++)
                    337:                        if(buf[m]==ETX || !buf[m]) {
                    338:                                buf[m]=0;
1.1.1.2 ! root      339:                                break; 
        !           340:                        }
1.1       root      341:                if(l>=length) break;
                    342:                if(online==ON_REMOTE) {
                    343:                        rioctl(IOCM|ABORT);
1.1.1.2 ! root      344:                        rioctl(IOCS|ABORT); 
        !           345:                }
1.1       root      346:                putmsg(buf+l,P_SAVEATR);
                    347:                m++;
                    348:                if(toupper(buf[m])!='C' && toupper(buf[m])!='S')
                    349:                        continue;
                    350:                SYNC;
                    351:                if(online==ON_REMOTE)
                    352:                        rioctl(IOSM|ABORT);
                    353:                if(a>=len) {
                    354:                        bprintf("\r\nSOF: %s defined more data than buffer size "
                    355:                                "(%lu bytes)\r\n",fname,len);
1.1.1.2 ! root      356:                        break; 
        !           357:                }
1.1       root      358:                if((buf[m]&0xdf)=='C') {
                    359:                        if((buf[m+1]&0xdf)=='U')                /* Uppercase only */
                    360:                                m++;
                    361:                        else if((buf[m+1]&0xdf)=='N')   /* Numbers only */
                    362:                                m++;
                    363:                        if((buf[m+1]&0xdf)=='L') {              /* Draw line */
                    364:                        if(useron.misc&COLOR)
                    365:                                        attr(cfg.color[clr_inputline]);
                    366:                                else
1.1.1.2 ! root      367:                                        attr(BLACK|BG_LIGHTGRAY);
1.1       root      368:                                bputs(" \b");
1.1.1.2 ! root      369:                                m++; 
        !           370:                        }
1.1       root      371:                        if((buf[m+1]&0xdf)=='R') {              /* Add CRLF */
                    372:                                cr=1;
1.1.1.2 ! root      373:                                m++; 
        !           374:                        }
1.1       root      375:                        outchar(answers[a++]);
                    376:                        attr(LIGHTGRAY);
                    377:                        CRLF;
                    378:                        if(cr)
1.1.1.2 ! root      379:                                a+=2; 
        !           380:                }
1.1       root      381:                else if((buf[m]&0xdf)=='S') {           /* String */
                    382:                        if((buf[m+1]&0xdf)=='U')
                    383:                                m++;
                    384:                        else if((buf[m+1]&0xdf)=='F')
                    385:                                m++;
                    386:                        else if((buf[m+1]&0xdf)=='N')   /* Numbers only */
                    387:                                m++;
                    388:                        if((buf[m+1]&0xdf)=='L') {
                    389:                        if(useron.misc&COLOR)
                    390:                                        attr(cfg.color[clr_inputline]);
                    391:                                else
1.1.1.2 ! root      392:                                        attr(BLACK|BG_LIGHTGRAY);
        !           393:                                m++; 
        !           394:                        }
1.1       root      395:                        if((buf[m+1]&0xdf)=='R') {
                    396:                                cr=1;
1.1.1.2 ! root      397:                                m++; 
        !           398:                        }
1.1       root      399:                        if(isdigit(buf[m+1])) {
                    400:                                max=buf[++m]&0xf;
                    401:                                if(isdigit(buf[m+1]))
1.1.1.2 ! root      402:                                        max=max*10+(buf[++m]&0xf); 
        !           403:                        }
1.1       root      404:                        if(buf[m+1]=='.' && isdigit(buf[m+2])) {
                    405:                                m++;
                    406:                                min=buf[++m]&0xf;
                    407:                                if(isdigit(buf[m+1]))
1.1.1.2 ! root      408:                                        min=min*10+(buf[++m]&0xf); 
        !           409:                        }
1.1       root      410:                        if(buf[m+1]=='"') {
                    411:                                max=0;
                    412:                                m++;
                    413:                                while(buf[++m]!='"' && max<80)
1.1.1.2 ! root      414:                                        max++; 
        !           415:                        }
1.1       root      416:                        if(!max)
                    417:                                continue;
                    418:                        getrec(answers,a,max,str);
                    419:                        bputs(str);
                    420:                        attr(LIGHTGRAY);
                    421:                        CRLF;
                    422:                        if(!cr)
                    423:                                a+=max;
                    424:                        else
1.1.1.2 ! root      425:                                a+=max+2; 
        !           426:                } 
        !           427:        }
1.1       root      428:        FREE((char *)buf);
                    429: }
                    430: 
                    431: /****************************************************************************/
                    432: /* Creates data file 'datfile' from input via sif file 'siffile'            */
                    433: /****************************************************************************/
                    434: void sbbs_t::create_sif_dat(char *siffile, char *datfile)
                    435: {
                    436:        char *buf;
                    437:        int file;
                    438: 
                    439:        if((buf=(char *)MALLOC(SIF_MAXBUF))==NULL) {
                    440:                errormsg(WHERE,ERR_ALLOC,siffile,SIF_MAXBUF);
1.1.1.2 ! root      441:                return; 
        !           442:        }
1.1       root      443:        memset(buf,SIF_MAXBUF,0);        /* initialize to null */
                    444:        sif(siffile,buf,SIF_MAXBUF);
                    445:        if((file=nopen(datfile,O_WRONLY|O_TRUNC|O_CREAT))==-1) {
                    446:                FREE(buf);
                    447:                errormsg(WHERE,ERR_OPEN,datfile,O_WRONLY|O_TRUNC|O_CREAT);
1.1.1.2 ! root      448:                return; 
        !           449:        }
1.1       root      450:        write(file,buf,strlen(buf));
                    451:        close(file);
                    452:        FREE(buf);
                    453: }
                    454: 
                    455: /****************************************************************************/
                    456: /* Reads data file 'datfile' and displays output via sif file 'siffile'     */
                    457: /****************************************************************************/
                    458: void sbbs_t::read_sif_dat(char *siffile, char *datfile)
                    459: {
                    460:        char *buf;
                    461:        int file;
                    462:        long length;
                    463: 
                    464:        if((file=nopen(datfile,O_RDONLY))==-1) {
                    465:                errormsg(WHERE,ERR_OPEN,datfile,O_RDONLY);
1.1.1.2 ! root      466:                return; 
        !           467:        }
1.1       root      468:        length=filelength(file);
                    469:        if(!length) {
                    470:                close(file);
1.1.1.2 ! root      471:                return; 
        !           472:        }
1.1       root      473:        if((buf=(char *)MALLOC(length))==NULL) {
                    474:                close(file);
                    475:                errormsg(WHERE,ERR_ALLOC,datfile,length);
1.1.1.2 ! root      476:                return; 
        !           477:        }
1.1       root      478:        read(file,buf,length);
                    479:        close(file);
                    480:        sof(siffile,buf,length);
                    481:        FREE(buf);
                    482: }
                    483: 
                    484: /****************************************************************************/
                    485: /* Get string by template. A=Alpha, N=Number, !=Anything                    */
                    486: /* First character MUST be an A,N or !.                                     */
                    487: /* Modes - K_LINE and K_UPPER are supported.                                */
                    488: /****************************************************************************/
1.1.1.2 ! root      489: size_t sbbs_t::gettmplt(char *strout,char *templt, long mode)
1.1       root      490: {
                    491:        char    ch,str[256];
                    492:        char    tmplt[128];
                    493:        uint    t=strlen(templt),c=0;
                    494: 
                    495:        sys_status&=~SS_ABORT;
1.1.1.2 ! root      496:        SAFECOPY(tmplt, templt);
1.1       root      497:        strupr(tmplt);
                    498:        if(useron.misc&ANSI) {
                    499:                if(mode&K_LINE) {
                    500:                        if(useron.misc&COLOR)
                    501:                                attr(cfg.color[clr_inputline]);
                    502:                        else
1.1.1.2 ! root      503:                                attr(BLACK|BG_LIGHTGRAY); 
        !           504:                }
1.1       root      505:                while(c<t) {
                    506:                        if(tmplt[c]=='N' || tmplt[c]=='A' || tmplt[c]=='!')
1.1.1.2 ! root      507:                                outchar(' ');
1.1       root      508:                        else
                    509:                                outchar(tmplt[c]);
1.1.1.2 ! root      510:                        c++; 
        !           511:                }
        !           512:                cursor_left(t); 
        !           513:        }
1.1       root      514:        c=0;
                    515:        if(mode&K_EDIT) {
                    516:                strcpy(str,strout);
                    517:                bputs(str);
1.1.1.2 ! root      518:                c=strlen(str); 
        !           519:        }
1.1       root      520:        while((ch=getkey(mode))!=CR && online && !(sys_status&SS_ABORT)) {
1.1.1.2 ! root      521:                if(ch==BS || ch==DEL) {
1.1       root      522:                        if(!c)
                    523:                                continue;
                    524:                        for(ch=1,c--;c;c--,ch++)
                    525:                                if(tmplt[c]=='N' || tmplt[c]=='A' || tmplt[c]=='!')
                    526:                                        break;
1.1.1.2 ! root      527:                        cursor_left(ch);
1.1       root      528:                        bputs(" \b");
1.1.1.2 ! root      529:                        continue; 
        !           530:                }
        !           531:                if(ch==CTRL_X) {
1.1       root      532:                        for(;c;c--) {
                    533:                                outchar(BS);
                    534:                                if(tmplt[c-1]=='N' || tmplt[c-1]=='A' || tmplt[c-1]=='!')
                    535:                                        bputs(" \b"); 
                    536:                        }
                    537:                }
                    538:                else if(c<t) {
                    539:                        if(tmplt[c]=='N' && !isdigit(ch))
                    540:                                continue;
                    541:                        if(tmplt[c]=='A' && !isalpha(ch))
                    542:                                continue;
                    543:                        outchar(ch);
                    544:                        str[c++]=ch;
                    545:                        while(c<t && tmplt[c]!='N' && tmplt[c]!='A' && tmplt[c]!='!'){
                    546:                                str[c]=tmplt[c];
1.1.1.2 ! root      547:                                outchar(tmplt[c++]); 
        !           548:                        } 
        !           549:                } 
        !           550:        }
1.1       root      551:        str[c]=0;
                    552:        attr(LIGHTGRAY);
                    553:        CRLF;
                    554:        if(!(sys_status&SS_ABORT))
                    555:                strcpy(strout,str);
                    556:        return(c);
                    557: }
                    558: 
                    559: /*****************************************************************************/
                    560: /* Accepts a user's input to change a new-scan time pointer                  */
                    561: /* Returns 0 if input was aborted or invalid, 1 if complete                                     */
                    562: /*****************************************************************************/
                    563: bool sbbs_t::inputnstime(time_t *dt)
                    564: {
                    565:        int hour;
                    566:        struct tm tm;
1.1.1.2 ! root      567:        bool pm=false;
        !           568:        char str[256];
1.1       root      569: 
                    570:        bputs(text[NScanDate]);
                    571:        bputs(timestr(dt));
                    572:        CRLF;
1.1.1.2 ! root      573:        if(localtime_r(dt,&tm)==NULL) {
1.1       root      574:                errormsg(WHERE,ERR_CHK,"time ptr",0);
                    575:                return(FALSE);
                    576:        }
                    577: 
                    578:        bputs(text[NScanYear]);
                    579:        ultoa(tm.tm_year+1900,str,10);
                    580:        if(!getstr(str,4,K_EDIT|K_AUTODEL|K_NUMBER|K_NOCRLF) || sys_status&SS_ABORT) {
                    581:                CRLF;
1.1.1.2 ! root      582:                return(false); 
        !           583:        }
1.1       root      584:        tm.tm_year=atoi(str);
                    585:        if(tm.tm_year<1970) {           /* unix time is seconds since 1/1/1970 */
                    586:                CRLF;
1.1.1.2 ! root      587:                return(false); 
        !           588:        }
1.1       root      589:        tm.tm_year-=1900;       /* tm_year is years since 1900 */
                    590: 
                    591:        bputs(text[NScanMonth]);
                    592:        ultoa(tm.tm_mon+1,str,10);
                    593:        if(!getstr(str,2,K_EDIT|K_AUTODEL|K_NUMBER|K_NOCRLF) || sys_status&SS_ABORT) {
                    594:                CRLF;
1.1.1.2 ! root      595:                return(false); 
        !           596:        }
1.1       root      597:        tm.tm_mon=atoi(str);
                    598:        if(tm.tm_mon<1 || tm.tm_mon>12) {
                    599:                CRLF;
1.1.1.2 ! root      600:                return(false); 
        !           601:        }
1.1       root      602:        tm.tm_mon--;            /* tm_mon is zero-based */
                    603: 
                    604:        bputs(text[NScanDay]);
                    605:        ultoa(tm.tm_mday,str,10);
                    606:        if(!getstr(str,2,K_EDIT|K_AUTODEL|K_NUMBER|K_NOCRLF) || sys_status&SS_ABORT) {
                    607:                CRLF;
1.1.1.2 ! root      608:                return(false); 
        !           609:        }
1.1       root      610:        tm.tm_mday=atoi(str);
                    611:        if(tm.tm_mday<1 || tm.tm_mday>31) {
                    612:                CRLF;
1.1.1.2 ! root      613:                return(false); 
        !           614:        }
1.1       root      615:        bputs(text[NScanHour]);
                    616:        if(cfg.sys_misc&SM_MILITARY)
                    617:                hour=tm.tm_hour;
                    618:        else {
                    619:                if(tm.tm_hour==0) {     /* 12 midnite */
1.1.1.2 ! root      620:                        pm=false;
        !           621:                        hour=12; 
        !           622:                }
1.1       root      623:                else if(tm.tm_hour>12) {
                    624:                        hour=tm.tm_hour-12;
1.1.1.2 ! root      625:                        pm=true; 
        !           626:                }
1.1       root      627:                else {
                    628:                        hour=tm.tm_hour;
1.1.1.2 ! root      629:                        pm=false; 
        !           630:                } 
        !           631:        }
1.1       root      632:        ultoa(hour,str,10);
                    633:        if(!getstr(str,2,K_EDIT|K_AUTODEL|K_NUMBER|K_NOCRLF) || sys_status&SS_ABORT) {
                    634:                CRLF;
1.1.1.2 ! root      635:                return(false); 
        !           636:        }
1.1       root      637:        tm.tm_hour=atoi(str);
                    638:        if(tm.tm_hour>24) {
                    639:                CRLF;
1.1.1.2 ! root      640:                return(false); 
        !           641:        }
1.1       root      642: 
                    643:        bputs(text[NScanMinute]);
                    644:        ultoa(tm.tm_min,str,10);
                    645:        if(!getstr(str,2,K_EDIT|K_AUTODEL|K_NUMBER|K_NOCRLF) || sys_status&SS_ABORT) {
                    646:                CRLF;
1.1.1.2 ! root      647:                return(false); 
        !           648:        }
1.1       root      649: 
                    650:        tm.tm_min=atoi(str);
                    651:        if(tm.tm_min>59) {
                    652:                CRLF;
1.1.1.2 ! root      653:                return(false); 
        !           654:        }
1.1       root      655:        tm.tm_sec=0;
                    656:        if(!(cfg.sys_misc&SM_MILITARY) && tm.tm_hour && tm.tm_hour<13) {
                    657:                if(pm && yesno(text[NScanPmQ])) {
                    658:                                if(tm.tm_hour<12)
1.1.1.2 ! root      659:                                        tm.tm_hour+=12; 
        !           660:                }
1.1       root      661:                else if(!pm && !yesno(text[NScanAmQ])) {
                    662:                                if(tm.tm_hour<12)
1.1.1.2 ! root      663:                                        tm.tm_hour+=12; 
        !           664:                }
1.1       root      665:                else if(tm.tm_hour==12)
1.1.1.2 ! root      666:                        tm.tm_hour=0; 
        !           667:        }
1.1       root      668:        else {
1.1.1.2 ! root      669:                CRLF; 
        !           670:        }
1.1       root      671:        *dt=mktime(&tm);
                    672:        return(true);
                    673: }
                    674: 
                    675: /*****************************************************************************/
                    676: /* Checks a password for uniqueness and validity                              */
                    677: /*****************************************************************************/
                    678: bool sbbs_t::chkpass(char *pass, user_t* user, bool unique)
                    679: {
                    680:        char c,d,first[128],last[128],sysop[41],sysname[41],*p;
                    681:        char alias[LEN_ALIAS+1], name[LEN_NAME+1], handle[LEN_HANDLE+1];
                    682: 
                    683:        if(strlen(pass)<4) {
                    684:                bputs(text[PasswordTooShort]);
1.1.1.2 ! root      685:                return(0)        !           686:        }
1.1       root      687:        if(!strcmp(pass,user->pass)) {
                    688:                bputs(text[PasswordNotChanged]);
1.1.1.2 ! root      689:                return(0)        !           690:        }
1.1       root      691:        d=strlen(pass);
                    692:        for(c=1;c<d;c++)
                    693:                if(pass[c]!=pass[c-1])
                    694:                        break;
                    695:        if(c==d) {
                    696:                bputs(text[PasswordInvalid]);
1.1.1.2 ! root      697:                return(0)        !           698:        }
1.1       root      699:        for(c=0;c<3;c++)        /* check for 1234 and ABCD */
                    700:                if(pass[c]!=pass[c+1]+1)
                    701:                        break;
                    702:        if(c==3) {
                    703:                bputs(text[PasswordObvious]);
1.1.1.2 ! root      704:                return(0)        !           705:        }
1.1       root      706:        for(c=0;c<3;c++)        /* check for 4321 and ZYXW */
                    707:                if(pass[c]!=pass[c+1]-1)
                    708:                        break;
                    709:        if(c==3) {
                    710:                bputs(text[PasswordObvious]);
1.1.1.2 ! root      711:                return(0)        !           712:        }
1.1       root      713:        strcpy(name,user->name);
                    714:        strupr(name);
                    715:        strcpy(alias,user->alias);
                    716:        strupr(alias);
                    717:        strcpy(first,alias);
1.1.1.2 ! root      718:        p=strchr(first,' ');
1.1       root      719:        if(p) {
                    720:                *p=0;
1.1.1.2 ! root      721:                strcpy(last,p+1); 
        !           722:        }
1.1       root      723:        else
                    724:                last[0]=0;
                    725:        strcpy(handle,user->handle);
                    726:        strupr(handle);
                    727:        strcpy(sysop,cfg.sys_op);
                    728:        strupr(sysop);
                    729:        strcpy(sysname,cfg.sys_name);
                    730:        strupr(sysname);
                    731:        if((unique && user->pass[0]
                    732:                        && (strstr(pass,user->pass) || strstr(user->pass,pass)))
                    733:                || (name[0]
                    734:                        && (strstr(pass,name) || strstr(name,pass)))
                    735:                || strstr(pass,alias) || strstr(alias,pass)
                    736:                || strstr(pass,first) || strstr(first,pass)
                    737:                || (last[0]
                    738:                        && (strstr(pass,last) || strstr(last,pass)))
                    739:                || strstr(pass,handle) || strstr(handle,pass)
                    740:                || (user->zipcode[0]
                    741:                        && (strstr(pass,user->zipcode) || strstr(user->zipcode,pass)))
                    742:                || (sysname[0]
                    743:                        && (strstr(pass,sysname) || strstr(sysname,pass)))
                    744:                || (sysop[0]
                    745:                        && (strstr(pass,sysop) || strstr(sysop,pass)))
                    746:                || (cfg.sys_id[0]
                    747:                        && (strstr(pass,cfg.sys_id) || strstr(cfg.sys_id,pass)))
                    748:                || (cfg.node_phone[0] && strstr(pass,cfg.node_phone))
                    749:                || (user->phone[0] && strstr(user->phone,pass))
                    750:                || !strncmp(pass,"QWER",3)
                    751:                || !strncmp(pass,"ASDF",3)
                    752:                || !strncmp(pass,"!@#$",3)
                    753:                )
                    754:                {
                    755:                bputs(text[PasswordObvious]);
1.1.1.2 ! root      756:                return(0)        !           757:        }
1.1       root      758:        return(1);
                    759: }
                    760: 
                    761: /****************************************************************************/
                    762: /* Displays information about sub-board subnum                                                         */
                    763: /****************************************************************************/
                    764: void sbbs_t::subinfo(uint subnum)
                    765: {
                    766:        char str[256];
                    767: 
                    768:        bputs(text[SubInfoHdr]);
                    769:        bprintf(text[SubInfoLongName],cfg.sub[subnum]->lname);
                    770:        bprintf(text[SubInfoShortName],cfg.sub[subnum]->sname);
                    771:        bprintf(text[SubInfoQWKName],cfg.sub[subnum]->qwkname);
                    772:        bprintf(text[SubInfoMaxMsgs],cfg.sub[subnum]->maxmsgs);
                    773:        if(cfg.sub[subnum]->misc&SUB_QNET)
                    774:                bprintf(text[SubInfoTagLine],cfg.sub[subnum]->tagline);
                    775:        if(cfg.sub[subnum]->misc&SUB_FIDO)
                    776:                bprintf(text[SubInfoFidoNet]
                    777:                        ,cfg.sub[subnum]->origline
1.1.1.2 ! root      778:                        ,smb_faddrtoa(&cfg.sub[subnum]->faddr,str));
1.1       root      779:        sprintf(str,"%s%s.msg",cfg.sub[subnum]->data_dir,cfg.sub[subnum]->code);
                    780:        if(fexist(str) && yesno(text[SubInfoViewFileQ]))
                    781:                printfile(str,0);
                    782: }
                    783: 
                    784: /****************************************************************************/
                    785: /* Displays information about transfer directory dirnum                                        */
                    786: /****************************************************************************/
                    787: void sbbs_t::dirinfo(uint dirnum)
                    788: {
                    789:        char str[256];
                    790: 
                    791:        bputs(text[DirInfoHdr]);
                    792:        bprintf(text[DirInfoLongName],cfg.dir[dirnum]->lname);
                    793:        bprintf(text[DirInfoShortName],cfg.dir[dirnum]->sname);
                    794:        if(cfg.dir[dirnum]->exts[0])
                    795:                bprintf(text[DirInfoAllowedExts],cfg.dir[dirnum]->exts);
                    796:        bprintf(text[DirInfoMaxFiles],cfg.dir[dirnum]->maxfiles);
                    797:        sprintf(str,"%s%s.msg",cfg.dir[dirnum]->data_dir,cfg.dir[dirnum]->code);
                    798:        if(fexist(str) && yesno(text[DirInfoViewFileQ]))
                    799:                printfile(str,0);
                    800: }
                    801: 
                    802: /****************************************************************************/
                    803: /* Searches the file <name>.can in the TEXT directory for matches                      */
1.1.1.2 ! root      804: /* Returns TRUE if found in list, FALSE if not.                                                                */
        !           805: /* Displays bad<name>.can in text directory if found.                                          */
1.1       root      806: /****************************************************************************/
1.1.1.2 ! root      807: bool sbbs_t::trashcan(char *insearchof, char *name)
1.1       root      808: {
1.1.1.2 ! root      809:        char str[MAX_PATH+1];
        !           810:        bool result;
1.1       root      811: 
1.1.1.2 ! root      812:        result=::trashcan(&cfg, insearchof, name)
        !           813:                ? true:false; // This is a dumb bool conversion to make BC++ happy
        !           814:        if(result) {
        !           815:                sprintf(str,"%sbad%s.msg",cfg.text_dir,name);
        !           816:                if(fexistcase(str)) {
        !           817:                        printfile(str,0);
        !           818:                        mswait(500); // give time for tx buffer to clear before disconnect
        !           819:                }
        !           820:        }
        !           821:        return(result);
        !           822: }
1.1       root      823: 
1.1.1.2 ! root      824: char* sbbs_t::timestr(time_t *intime)
        !           825: {
        !           826:        return(::timestr(&cfg,intime,timestr_output));
        !           827: }
1.1       root      828: 
1.1.1.2 ! root      829: void sbbs_t::sys_info()
        !           830: {
        !           831:        char    tmp[128];
        !           832:        uint    i;
        !           833:        stats_t stats;
        !           834: 
        !           835:        bputs(text[SiHdr]);
        !           836:        getstats(&cfg,0,&stats);
        !           837:        bprintf(text[SiSysName],cfg.sys_name);
        !           838:        bprintf(text[SiSysID],cfg.sys_id);      /* QWK ID */
        !           839:        for(i=0;i<cfg.total_faddrs;i++)
        !           840:                bprintf(text[SiSysFaddr],smb_faddrtoa(&cfg.faddr[i],tmp));
        !           841:        if(cfg.sys_psname[0])                           /* PostLink/PCRelay */
        !           842:                bprintf(text[SiSysPsite],cfg.sys_psname,cfg.sys_psnum);
        !           843:        bprintf(text[SiSysLocation],cfg.sys_location);
        !           844:        bprintf(text[SiSysop],cfg.sys_op);
        !           845:        bprintf(text[SiSysNodes],cfg.sys_nodes);
        !           846: //     bprintf(text[SiNodeNumberName],cfg.node_num,cfg.node_name);
        !           847:        bprintf(text[SiNodePhone],cfg.node_phone);
        !           848:        bprintf(text[SiTotalLogons],ultoac(stats.logons,tmp));
        !           849:        bprintf(text[SiLogonsToday],ultoac(stats.ltoday,tmp));
        !           850:        bprintf(text[SiTotalTime],ultoac(stats.timeon,tmp));
        !           851:        bprintf(text[SiTimeToday],ultoac(stats.ttoday,tmp));
        !           852:        ver();
        !           853:        if(yesno(text[ViewSysInfoFileQ])) {
        !           854:                CLS;
        !           855:                sprintf(tmp,"%ssystem.msg", cfg.text_dir);
        !           856:                printfile(tmp,0); 
        !           857:        }
        !           858:        if(yesno(text[ViewLogonMsgQ])) {
        !           859:                CLS;
        !           860:                menu("logon"); 
        !           861:        }
        !           862: }
1.1       root      863: 
1.1.1.2 ! root      864: void sbbs_t::user_info()
        !           865: {
        !           866:        float   f;
        !           867:        char    str[128];
        !           868:        char    tmp[128];
        !           869:        char    tmp2[128];
        !           870:        struct  tm tm;
        !           871: 
        !           872:        bprintf(text[UserStats],useron.alias,useron.number);
        !           873: 
        !           874:        if(localtime_r(&useron.laston,&tm)!=NULL)
        !           875:                bprintf(text[UserDates]
        !           876:                        ,unixtodstr(&cfg,useron.firston,str)
        !           877:                        ,unixtodstr(&cfg,useron.expire,tmp)
        !           878:                        ,unixtodstr(&cfg,useron.laston,tmp2)
        !           879:                        ,tm.tm_hour,tm.tm_min);
        !           880: 
        !           881:        bprintf(text[UserTimes]
        !           882:                ,useron.timeon,useron.ttoday
        !           883:                ,cfg.level_timeperday[useron.level]
        !           884:                ,useron.tlast
        !           885:                ,cfg.level_timepercall[useron.level]
        !           886:                ,useron.textra);
        !           887:        if(useron.posts)
        !           888:                f=(float)useron.logons/useron.posts;
        !           889:        else
        !           890:                f=0;
        !           891:        bprintf(text[UserLogons]
        !           892:                ,useron.logons,useron.ltoday
        !           893:                ,cfg.level_callsperday[useron.level],useron.posts
        !           894:                ,f ? (uint)(100/f) : useron.posts>useron.logons ? 100 : 0
        !           895:                ,useron.ptoday);
        !           896:        bprintf(text[UserEmails]
        !           897:                ,useron.emails,useron.fbacks
        !           898:                ,getmail(&cfg,useron.number,0),useron.etoday);
        !           899:        CRLF;
        !           900:        bprintf(text[UserUploads]
        !           901:                ,ultoac(useron.ulb,tmp),useron.uls);
        !           902:        bprintf(text[UserDownloads]
        !           903:                ,ultoac(useron.dlb,tmp),useron.dls,nulstr);
        !           904:        bprintf(text[UserCredits],ultoac(useron.cdt,tmp)
        !           905:                ,ultoac(useron.freecdt,tmp2)
        !           906:                ,ultoac(cfg.level_freecdtperday[useron.level],str));
        !           907:        bprintf(text[UserMinutes],ultoac(useron.min,tmp));
        !           908: }
1.1       root      909: 
1.1.1.2 ! root      910: void sbbs_t::xfer_policy()
        !           911: {
        !           912:        char    str[MAX_PATH+1];
1.1       root      913: 
1.1.1.2 ! root      914:        if(!usrlibs) return;
        !           915:        sprintf(str,"%smenu/tpolicy.*", cfg.text_dir);
        !           916:        if(fexist(str))
        !           917:                menu("tpolicy");
        !           918:        else {
        !           919:                bprintf(text[TransferPolicyHdr],cfg.sys_name);
        !           920:                bprintf(text[TpUpload]
        !           921:                        ,cfg.dir[usrdir[curlib][curdir[curlib]]]->up_pct);
        !           922:                bprintf(text[TpDownload]
        !           923:                        ,cfg.dir[usrdir[curlib][curdir[curlib]]]->dn_pct);
1.1       root      924:                }
1.1.1.2 ! root      925: }
1.1       root      926: 
1.1.1.2 ! root      927: const char* prot_menu_file[] = {
        !           928:         "ulprot"
        !           929:        ,"dlprot"
        !           930:        ,"batuprot"
        !           931:        ,"batdprot"
        !           932:        ,"biprot"
        !           933: };
1.1       root      934: 
1.1.1.2 ! root      935: void sbbs_t::xfer_prot_menu(enum XFER_TYPE type)
        !           936: {
        !           937:        char path[MAX_PATH+1];
1.1       root      938: 
1.1.1.2 ! root      939:        sprintf(path,"%smenu/%s.*",cfg.text_dir,prot_menu_file[type]);
        !           940:        if(fexistcase(path)) {
        !           941:                menu(prot_menu_file[type]);
        !           942:                return;
1.1       root      943:        }
1.1.1.2 ! root      944: 
        !           945:        CRLF;
        !           946:        int printed=0;
        !           947:        for(int i=0;i<cfg.total_prots;i++) {
        !           948:                if(!chk_ar(cfg.prot[i]->ar,&useron))
        !           949:                        continue;
        !           950:                if(type==XFER_UPLOAD && cfg.prot[i]->ulcmd[0]==0)
        !           951:                        continue;
        !           952:                if(type==XFER_DOWNLOAD && cfg.prot[i]->dlcmd[0]==0)
        !           953:                        continue;
        !           954:                if(type==XFER_BATCH_UPLOAD && cfg.prot[i]->batulcmd[0]==0)
        !           955:                        continue;
        !           956:                if(type==XFER_BATCH_DOWNLOAD && cfg.prot[i]->batdlcmd[0]==0)
        !           957:                        continue;
        !           958:                if(type==XFER_BIDIR && cfg.prot[i]->bicmd[0]==0)
        !           959:                        continue;
        !           960:                if(printed && (printed%2)==0)
        !           961:                        CRLF;
        !           962:                bprintf(text[TransferProtLstFmt],cfg.prot[i]->mnemonic,cfg.prot[i]->name);
        !           963:                printed++;
        !           964:        }
        !           965:        CRLF;
1.1       root      966: }
                    967: 
1.1.1.2 ! root      968: void sbbs_t::node_stats(uint node_num)
1.1       root      969: {
1.1.1.2 ! root      970:        char    tmp[128];
        !           971:        stats_t stats;
1.1       root      972: 
1.1.1.2 ! root      973:        if(node_num>cfg.sys_nodes) {
        !           974:                bputs(text[InvalidNode]);
        !           975:                return; 
1.1       root      976:        }
1.1.1.2 ! root      977:        if(!node_num) node_num=cfg.node_num;
        !           978:        bprintf(text[NodeStatsHdr],node_num);
        !           979:        getstats(&cfg,node_num,&stats);
        !           980:        bprintf(text[StatsTotalLogons],ultoac(stats.logons,tmp));
        !           981:        bprintf(text[StatsLogonsToday],ultoac(stats.ltoday,tmp));
        !           982:        bprintf(text[StatsTotalTime],ultoac(stats.timeon,tmp));
        !           983:        bprintf(text[StatsTimeToday],ultoac(stats.ttoday,tmp));
        !           984:        bprintf(text[StatsUploadsToday],ultoac(stats.ulb,tmp)
        !           985:                ,stats.uls);
        !           986:        bprintf(text[StatsDownloadsToday],ultoac(stats.dlb,tmp)
        !           987:                ,stats.dls);
        !           988:        bprintf(text[StatsPostsToday],ultoac(stats.ptoday,tmp));
        !           989:        bprintf(text[StatsEmailsToday],ultoac(stats.etoday,tmp));
        !           990:        bprintf(text[StatsFeedbacksToday],ultoac(stats.ftoday,tmp));
1.1       root      991: }
                    992: 
1.1.1.2 ! root      993: void sbbs_t::sys_stats(void)
1.1       root      994: {
1.1.1.2 ! root      995:        char    tmp[128];
        !           996:        stats_t stats;
1.1       root      997: 
1.1.1.2 ! root      998:        bputs(text[SystemStatsHdr]);
        !           999:        getstats(&cfg,0,&stats);
        !          1000:        bprintf(text[StatsTotalLogons],ultoac(stats.logons,tmp));
        !          1001:        bprintf(text[StatsLogonsToday],ultoac(stats.ltoday,tmp));
        !          1002:        bprintf(text[StatsTotalTime],ultoac(stats.timeon,tmp));
        !          1003:        bprintf(text[StatsTimeToday],ultoac(stats.ttoday,tmp));
        !          1004:        bprintf(text[StatsUploadsToday],ultoac(stats.ulb,tmp)
        !          1005:                ,stats.uls);
        !          1006:        bprintf(text[StatsDownloadsToday],ultoac(stats.dlb,tmp)
        !          1007:                ,stats.dls);
        !          1008:        bprintf(text[StatsPostsToday],ultoac(stats.ptoday,tmp));
        !          1009:        bprintf(text[StatsEmailsToday],ultoac(stats.etoday,tmp));
        !          1010:        bprintf(text[StatsFeedbacksToday],ultoac(stats.ftoday,tmp));
1.1       root     1011: }
                   1012: 
1.1.1.2 ! root     1013: void sbbs_t::logonlist(void)
1.1       root     1014: {
1.1.1.2 ! root     1015:        char    str[MAX_PATH+1];
1.1       root     1016: 
1.1.1.2 ! root     1017:        sprintf(str,"%slogon.lst", cfg.data_dir);
        !          1018:        if(flength(str)<1) {
        !          1019:                bputs("\r\n\r\n");
        !          1020:                bputs(text[NoOneHasLoggedOnToday]); 
        !          1021:        } else {
        !          1022:                bputs(text[CallersToday]);
        !          1023:                printfile(str,P_NOATCODES|P_OPENCLOSE);
        !          1024:                CRLF; 
        !          1025:        }
1.1       root     1026: }
                   1027: 
1.1.1.2 ! root     1028: extern SOCKET  spy_socket[];
        !          1029: extern RingBuf* node_inbuf[];
        !          1030: 
        !          1031: bool sbbs_t::spy(uint i /* node_num */)
1.1       root     1032: {
1.1.1.2 ! root     1033:        char    ch;
        !          1034:        char    ansi_seq[32];
        !          1035:        int             ansi_len;
        !          1036:        int             in;
        !          1037: 
        !          1038:        if(!i || i>MAX_NODES) {
        !          1039:                bprintf("Invalid node number: %d\r\n",i);
        !          1040:                return(false);
        !          1041:        }
        !          1042:        if(i==cfg.node_num) {
        !          1043:                bprintf("Can't spy on yourself.\r\n");
        !          1044:                return(false);
        !          1045:        }
        !          1046:        if(spy_socket[i-1]!=INVALID_SOCKET) {
        !          1047:                bprintf("Node %d already being spied (%lx)\r\n",i,spy_socket[i-1]);
        !          1048:                return(false);
        !          1049:        }
        !          1050:        bprintf("*** Synchronet Remote Spy on Node %d: Ctrl-C to Abort ***"
        !          1051:                "\r\n\r\n",i);
        !          1052:        spy_socket[i-1]=client_socket;
        !          1053:        ansi_len=0;
        !          1054:        while(online 
        !          1055:                && client_socket!=INVALID_SOCKET 
        !          1056:                && spy_socket[i-1]!=INVALID_SOCKET 
        !          1057:                && !msgabort()) {
        !          1058:                in=incom(1000);
        !          1059:                if(in==NOINP) {
        !          1060:                        gettimeleft();
        !          1061:                        continue;
        !          1062:                }
        !          1063:                ch=in;
        !          1064:                if(ch==ESC) {
        !          1065:                        if(!ansi_len) {
        !          1066:                                ansi_seq[ansi_len++]=ch;
        !          1067:                                continue;
        !          1068:                        }
        !          1069:                        ansi_len=0;
        !          1070:                }
        !          1071:                if(ansi_len && ansi_len<(int)sizeof(ansi_seq)-2) {
        !          1072:                        if(ansi_len==1) {
        !          1073:                                if(ch=='[') {
        !          1074:                                        ansi_seq[ansi_len++]=ch;
        !          1075:                                        continue;
        !          1076:                                }
        !          1077:                                ansi_len=0;
        !          1078:                        }
        !          1079:                        if(ch=='R') { /* throw-away cursor position report */
        !          1080:                                ansi_len=0;
        !          1081:                                continue;
        !          1082:                        }
        !          1083:                        ansi_seq[ansi_len++]=ch;
        !          1084:                        if(isalpha(ch)) {
        !          1085:                                RingBufWrite(node_inbuf[i-1],(uchar*)ansi_seq,ansi_len);
        !          1086:                                ansi_len=0;
        !          1087:                        }
        !          1088:                        continue;
        !          1089:                }
        !          1090:                if(ch<' ') {
        !          1091:                        lncntr=0;                                               /* defeat pause */
        !          1092:                        spy_socket[i-1]=INVALID_SOCKET; /* disable spy output */
        !          1093:                        ch=handle_ctrlkey(ch,K_NONE);
        !          1094:                        spy_socket[i-1]=client_socket;  /* enable spy output */
        !          1095:                        if(ch==0)
        !          1096:                                continue;
        !          1097:                }
        !          1098:                if(node_inbuf[i-1]!=NULL) 
        !          1099:                        RingBufWrite(node_inbuf[i-1],(uchar*)&ch,1);
        !          1100:        }
        !          1101:        spy_socket[i-1]=INVALID_SOCKET;
        !          1102:        return(true);
        !          1103: }
        !          1104: 
        !          1105: void sbbs_t::time_bank(void)
        !          1106: {
        !          1107:        char    str[128];
        !          1108:        char    tmp[128];
        !          1109:        char    tmp2[128];
        !          1110:        int             s;
        !          1111: 
        !          1112:        if(cfg.sys_misc&SM_TIMEBANK) {  /* Allow users to deposit free time */
        !          1113:                s=(cfg.level_timeperday[useron.level]-useron.ttoday)+useron.textra;
        !          1114:                if(s<0) s=0;
        !          1115:                if(s>cfg.level_timepercall[useron.level])
        !          1116:                        s=cfg.level_timepercall[useron.level];
        !          1117:                s-=(now-starttime)/60;
        !          1118:                if(s<0) s=0;
        !          1119:                bprintf(text[FreeMinLeft],s);
        !          1120:                bprintf(text[UserMinutes],ultoac(useron.min,tmp));
        !          1121:                if(cfg.max_minutes && useron.min>=cfg.max_minutes) {
        !          1122:                        bputs(text[YouHaveTooManyMinutes]);
        !          1123:                        return; 
        !          1124:                }
        !          1125:                if(cfg.max_minutes)
        !          1126:                        while(s>0 && s+useron.min>cfg.max_minutes) s--;
        !          1127:                bprintf(text[FreeMinToDeposit],s);
        !          1128:                s=getnum(s);
        !          1129:                if(s>0) {
        !          1130:                        logline("  ","Minute Bank Deposit");
        !          1131:                        useron.min=adjustuserrec(&cfg,useron.number,U_MIN,10,s);
        !          1132:                        useron.ttoday=(ushort)adjustuserrec(&cfg,useron.number,U_TTODAY,10,s);
        !          1133:                        sprintf(str,"Minute Adjustment: %u",s*cfg.cdt_min_value);
        !          1134:                        logline("*+",str); 
        !          1135:                } 
        !          1136:        }
        !          1137: 
        !          1138:        if(!(cfg.sys_misc&SM_NOCDTCVT)) {
        !          1139:                bprintf(text[ConversionRate],cfg.cdt_min_value);
        !          1140:                bprintf(text[UserCredits]
        !          1141:                        ,ultoac(useron.cdt,tmp)
        !          1142:                        ,ultoac(useron.freecdt,tmp2)
        !          1143:                        ,ultoac(cfg.level_freecdtperday[useron.level],str));
        !          1144:                bprintf(text[UserMinutes],ultoac(useron.min,tmp));
        !          1145:                if(useron.cdt/102400L<1L) {
        !          1146:                        bprintf(text[YouOnlyHaveNCredits],ultoac(useron.cdt,tmp));
        !          1147:                        return; 
        !          1148:                }
        !          1149:                if(cfg.max_minutes && useron.min>=cfg.max_minutes) {
        !          1150:                        bputs(text[YouHaveTooManyMinutes]);
        !          1151:                        return; 
        !          1152:                }
        !          1153:                s=useron.cdt/102400L;
        !          1154:                if(cfg.max_minutes)
        !          1155:                        while(s>0 && (s*cfg.cdt_min_value)+useron.min>cfg.max_minutes) s--;
        !          1156:                bprintf(text[CreditsToMin],s);
        !          1157:                s=getnum(s);
        !          1158:                if(s>0) {
        !          1159:                        logline("  ","Credit to Minute Conversion");
        !          1160:                        useron.cdt=adjustuserrec(&cfg,useron.number,U_CDT,10,-(s*102400L));
        !          1161:                        useron.min=adjustuserrec(&cfg,useron.number,U_MIN,10,s*cfg.cdt_min_value);
        !          1162:                        sprintf(str,"Credit Adjustment: %ld",-(s*102400L));
        !          1163:                        logline("$-",str);
        !          1164:                        sprintf(str,"Minute Adjustment: %u",s*cfg.cdt_min_value);
        !          1165:                        logline("*+",str); 
        !          1166:                } 
        !          1167:        }
1.1       root     1168: }
                   1169: 
1.1.1.2 ! root     1170: void sbbs_t::change_user(void)
        !          1171: {
        !          1172:        uint    i;
        !          1173:        char    str[256];
        !          1174:        char    tmp[128];
        !          1175: 
        !          1176:        if(!chksyspass())
        !          1177:                return;
        !          1178:        bputs(text[ChUserPrompt]);
        !          1179:        if(!getstr(str,LEN_ALIAS,K_UPPER))
        !          1180:                return;
        !          1181:        if((i=finduser(str))==0)
        !          1182:                return;
        !          1183:        if(online==ON_REMOTE) {
        !          1184:                getuserrec(&cfg,i,U_LEVEL,2,str);
        !          1185:                if(atoi(str)>logon_ml) {
        !          1186:                        getuserrec(&cfg,i,U_PASS,8,tmp);
        !          1187:                        bputs(text[ChUserPwPrompt]);
        !          1188:                        console|=CON_R_ECHOX;
        !          1189:                        if(!(cfg.sys_misc&SM_ECHO_PW))
        !          1190:                                console|=CON_L_ECHOX;
        !          1191:                        getstr(str,8,K_UPPER);
        !          1192:                        console&=~(CON_R_ECHOX|CON_L_ECHOX);
        !          1193:                        if(strcmp(str,tmp))
        !          1194:                                return;
        !          1195:                }
        !          1196:        }
        !          1197:        putmsgptrs();
        !          1198:        putuserrec(&cfg,useron.number,U_CURSUB,0
        !          1199:                ,cfg.sub[usrsub[curgrp][cursub[curgrp]]]->code);
        !          1200:        putuserrec(&cfg,useron.number,U_CURDIR,0
        !          1201:                ,cfg.dir[usrdir[curlib][curdir[curlib]]]->code);
        !          1202:        useron.number=i;
        !          1203:        getuserdat(&cfg,&useron);
        !          1204:        getnodedat(cfg.node_num,&thisnode,1);
        !          1205:        thisnode.useron=useron.number;
        !          1206:        putnodedat(cfg.node_num,&thisnode);
        !          1207:        getmsgptrs();
        !          1208:        if(REALSYSOP) sys_status&=~SS_TMPSYSOP;
        !          1209:        else sys_status|=SS_TMPSYSOP;
        !          1210:        sprintf(str,"Changed into %s #%u",useron.alias,useron.number);
        !          1211:        logline("S+",str);
        !          1212: }

unix.superglobalmegacorp.com

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