|
|
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: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.