![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to atcodes.cpp CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Synchronet] / sbbs / sbbs3|
Return to atcodes.cpp CVS log | Up to [Synchronet] / sbbs / sbbs3 |
1.1 ! root 1: /* atcodes.cpp */ ! 2: ! 3: /* Synchronet "@code" functions */ ! 4: ! 5: /* $Id: atcodes.cpp,v 1.3 2000/11/14 02:16:57 rswindell Exp $ */ ! 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: * * ! 11: * Copyright 2000 Rob Swindell - http://www.synchro.net/copyright.html * ! 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: #include "cmdshell.h" ! 40: ! 41: /****************************************************************************/ ! 42: /* Returns 0 if invalid @ code. Returns length of @ code if valid. */ ! 43: /****************************************************************************/ ! 44: int sbbs_t::atcodes(char *instr) ! 45: { ! 46: char str[64],str2[64],*p,*tp,*sp; ! 47: int i,len; ! 48: long l; ! 49: stats_t stats; ! 50: node_t node; ! 51: struct tm tm; ! 52: struct tm * tm_p; ! 53: ! 54: sprintf(str,"%.40s",instr); ! 55: tp=strchr(str+1,'@'); ! 56: if(!tp) /* no terminating @ */ ! 57: return(0); ! 58: sp=strchr(str+1,SP); ! 59: if(sp && sp<tp) /* space before terminating @ */ ! 60: return(0); ! 61: len=(tp-str)+1; ! 62: (*tp)=0; ! 63: sp=(str+1); ! 64: ! 65: if(!strcmp(sp,"VER")) ! 66: bputs(VERSION); ! 67: ! 68: else if(!strcmp(sp,"REV")) ! 69: bprintf("%c",REVISION); ! 70: ! 71: else if(!strcmp(sp,"BBS") || !strcmp(sp,"BOARDNAME")) ! 72: bputs(cfg.sys_name); ! 73: ! 74: else if(!strcmp(sp,"BAUD") || !strcmp(sp,"BPS")) ! 75: bprintf("%lu",cur_rate); ! 76: ! 77: else if(!strcmp(sp,"CONN")) ! 78: bputs(connection); ! 79: ! 80: else if(!strcmp(sp,"SYSOP")) ! 81: bputs(cfg.sys_op); ! 82: ! 83: else if(!strcmp(sp,"LOCATION")) ! 84: bputs(cfg.sys_location); ! 85: ! 86: else if(!strcmp(sp,"NODE")) ! 87: bprintf("%u",cfg.node_num); ! 88: ! 89: else if(!strcmp(sp,"TNODE")) ! 90: bprintf("%u",cfg.sys_nodes); ! 91: ! 92: else if(!strcmp(sp,"INETADDR")) ! 93: bputs(cfg.sys_inetaddr); ! 94: ! 95: else if(!strcmp(sp,"FIDOADDR")) { ! 96: if(cfg.total_faddrs) ! 97: bputs(faddrtoa(cfg.faddr[0])); ! 98: } ! 99: ! 100: else if(!strcmp(sp,"QWKID")) ! 101: bputs(cfg.sys_id); ! 102: ! 103: else if(!strcmp(sp,"TIME") || !strcmp(sp,"SYSTIME")) { ! 104: now=time(NULL); ! 105: tm_p=gmtime(&now); ! 106: if(tm_p!=NULL) ! 107: tm=*tm_p; ! 108: else ! 109: memset(&tm,0,sizeof(tm)); ! 110: bprintf("%02d:%02d %s" ! 111: ,tm.tm_hour==0 ? 12 ! 112: : tm.tm_hour>12 ? tm.tm_hour-12 ! 113: : tm.tm_hour, tm.tm_min, tm.tm_hour>11 ? "pm":"am"); ! 114: } ! 115: ! 116: else if(!strcmp(sp,"DATE") || !strcmp(sp,"SYSDATE")) { ! 117: now=time(NULL); ! 118: bputs(unixtodstr(&cfg,now,str2)); } ! 119: ! 120: else if(!strcmp(sp,"TMSG")) { ! 121: l=0; ! 122: for(i=0;i<cfg.total_subs;i++) ! 123: l+=getposts(i); /* l=total posts */ ! 124: bprintf("%lu",l); } ! 125: ! 126: else if(!strcmp(sp,"TUSER")) ! 127: bprintf("%u",lastuser(&cfg)); ! 128: ! 129: else if(!strcmp(sp,"TFILE")) { ! 130: l=0; ! 131: for(i=0;i<cfg.total_dirs;i++) ! 132: l+=getfiles(i); ! 133: bprintf("%lu",l); } ! 134: ! 135: else if(!strcmp(sp,"TCALLS") || !strcmp(sp,"NUMCALLS")) { ! 136: getstats(&cfg,0,&stats); ! 137: bprintf("%lu",stats.logons); } ! 138: ! 139: else if(!strcmp(sp,"PREVON") || !strcmp(sp,"LASTCALLERNODE") ! 140: || !strcmp(sp,"LASTCALLERSYSTEM")) ! 141: bputs(lastuseron); ! 142: ! 143: else if(!strcmp(sp,"CLS")) ! 144: CLS; ! 145: ! 146: else if(!strcmp(sp,"PAUSE") || !strcmp(sp,"MORE")) ! 147: pause(); ! 148: ! 149: else if(!strcmp(sp,"NOPAUSE") || !strcmp(sp,"POFF")) ! 150: sys_status^=SS_PAUSEOFF; ! 151: ! 152: else if(!strcmp(sp,"PON") || !strcmp(sp,"AUTOMORE")) ! 153: sys_status^=SS_PAUSEON; ! 154: ! 155: /* NOSTOP */ ! 156: ! 157: /* STOP */ ! 158: ! 159: else if(!strcmp(sp,"BELL") || !strcmp(sp,"BEEP")) ! 160: outchar(BEL); ! 161: ! 162: // else if(!strcmp(sp,"EVENT")) ! 163: // bputs(sectostr(sys_eventtime,str2)); ! 164: ! 165: /* LASTCALL */ ! 166: ! 167: else if(!strncmp(sp,"NODE",4)) { ! 168: i=atoi(sp+4); ! 169: if(i && i<=cfg.sys_nodes) { ! 170: getnodedat(i,&node,0); ! 171: printnodedat(i,&node); } } ! 172: ! 173: else if(!strcmp(sp,"WHO")) ! 174: whos_online(true); ! 175: ! 176: /* User Codes */ ! 177: ! 178: else if(!strcmp(sp,"USER") || !strcmp(sp,"ALIAS") || !strcmp(sp,"NAME")) ! 179: bputs(useron.alias); ! 180: ! 181: else if(!strcmp(sp,"FIRST")) { ! 182: strcpy(str2,useron.alias); ! 183: tp=strchr(str2,SP); ! 184: if(tp) *tp=0; ! 185: bputs(str2); } ! 186: ! 187: else if(!strcmp(sp,"USERNUM")) ! 188: bprintf("%u",useron.number); ! 189: ! 190: else if(!strcmp(sp,"PHONE") || !strcmp(sp,"HOMEPHONE") ! 191: || !strcmp(sp,"DATAPHONE") || !strcmp(sp,"DATA")) ! 192: bputs(useron.phone); ! 193: ! 194: else if(!strcmp(sp,"ADDR1")) ! 195: bputs(useron.address); ! 196: ! 197: else if(!strcmp(sp,"FROM")) ! 198: bputs(useron.location); ! 199: ! 200: else if(!strcmp(sp,"CITY")) { ! 201: strcpy(str2,useron.location); ! 202: p=strchr(str2,','); ! 203: if(p) { ! 204: *p=0; ! 205: bputs(str2); } } ! 206: ! 207: else if(!strcmp(sp,"STATE")) { ! 208: p=strchr(useron.location,','); ! 209: if(p) { ! 210: p++; ! 211: if(*p==SP) ! 212: p++; ! 213: bputs(p); } } ! 214: ! 215: else if(!strcmp(sp,"CPU") || !strcmp(sp,"HOST")) ! 216: bputs(useron.comp); ! 217: ! 218: else if(!strcmp(sp,"BDATE")) ! 219: bputs(useron.birth); ! 220: ! 221: else if(!strcmp(sp,"CALLS") || !strcmp(sp,"NUMTIMESON")) ! 222: bprintf("%u",useron.logons); ! 223: ! 224: else if(!strcmp(sp,"MEMO")) ! 225: bputs(unixtodstr(&cfg,useron.pwmod,str2)); ! 226: ! 227: else if(!strcmp(sp,"SEC") || !strcmp(sp,"SECURITY")) ! 228: bprintf("%u",useron.level); ! 229: ! 230: else if(!strcmp(sp,"SINCE")) ! 231: bputs(unixtodstr(&cfg,useron.firston,str2)); ! 232: ! 233: else if(!strcmp(sp,"TIMEON") || !strcmp(sp,"TIMEUSED")) { ! 234: now=time(NULL); ! 235: bprintf("%u",(now-logontime)/60); } ! 236: ! 237: else if(!strcmp(sp,"TUSED")) { /* Synchronet only */ ! 238: now=time(NULL); ! 239: bputs(sectostr(now-logontime,str2)+1); } ! 240: ! 241: else if(!strcmp(sp,"TLEFT")) { /* Synchronet only */ ! 242: gettimeleft(); ! 243: bputs(sectostr(timeleft,str2)+1); } ! 244: ! 245: else if(!strcmp(sp,"TPERD")) /* Synchronet only */ ! 246: bputs(sectostr(cfg.level_timeperday[useron.level],str)+1); ! 247: ! 248: else if(!strcmp(sp,"TPERC")) /* Synchronet only */ ! 249: bputs(sectostr(cfg.level_timepercall[useron.level],str)+1); ! 250: ! 251: else if(!strcmp(sp,"TIMELIMIT")) ! 252: bprintf("%u",cfg.level_timepercall[useron.level]); ! 253: ! 254: else if(!strcmp(sp,"MINLEFT") || !strcmp(sp,"LEFT") || !strcmp(sp,"TIMELEFT")) { ! 255: gettimeleft(); ! 256: bprintf("%u",timeleft/60); } ! 257: ! 258: else if(!strcmp(sp,"LASTON")) ! 259: bputs(timestr(&useron.laston)); ! 260: ! 261: else if(!strcmp(sp,"LASTDATEON")) ! 262: bputs(unixtodstr(&cfg,useron.laston,str2)); ! 263: ! 264: else if(!strcmp(sp,"LASTTIMEON")) { ! 265: tm_p=gmtime(&useron.laston); ! 266: if(tm_p) ! 267: tm=*tm_p; ! 268: else ! 269: memset(&tm,0,sizeof(tm)); ! 270: bprintf("%02d:%02d %s" ! 271: ,tm.tm_hour==0 ? 12 ! 272: : tm.tm_hour>12 ? tm.tm_hour-12 ! 273: : tm.tm_hour, tm.tm_min, tm.tm_hour>11 ? "pm":"am"); ! 274: } ! 275: ! 276: else if(!strcmp(sp,"MSGLEFT") || !strcmp(sp,"MSGSLEFT")) ! 277: bprintf("%u",useron.posts); ! 278: ! 279: else if(!strcmp(sp,"MSGREAD")) ! 280: bprintf("%u",posts_read); ! 281: ! 282: else if(!strcmp(sp,"FREESPACE")) ! 283: bprintf("%lu",getfreediskspace(cfg.temp_dir)); ! 284: ! 285: else if(!strcmp(sp,"UPBYTES")) ! 286: bprintf("%lu",useron.ulb); ! 287: ! 288: else if(!strcmp(sp,"UPK")) ! 289: bprintf("%lu",useron.ulb/1024L); ! 290: ! 291: else if(!strcmp(sp,"UPS") || !strcmp(sp,"UPFILES")) ! 292: bprintf("%u",useron.uls); ! 293: ! 294: else if(!strcmp(sp,"DLBYTES")) ! 295: bprintf("%lu",useron.dlb); ! 296: ! 297: else if(!strcmp(sp,"DOWNK")) ! 298: bprintf("%lu",useron.dlb/1024L); ! 299: ! 300: else if(!strcmp(sp,"DOWNS") || !strcmp(sp,"DLFILES")) ! 301: bprintf("%u",useron.dls); ! 302: ! 303: else if(!strcmp(sp,"LASTNEW")) ! 304: bputs(unixtodstr(&cfg,ns_time,str2)); ! 305: ! 306: else if(!strcmp(sp,"NEWFILETIME")) ! 307: bputs(timestr(&ns_time)); ! 308: ! 309: /* MAXDL */ ! 310: ! 311: else if(!strcmp(sp,"MAXDK") || !strcmp(sp,"DLKLIMIT") || !strcmp(sp,"KBLIMIT")) ! 312: bprintf("%lu",cfg.level_freecdtperday[useron.level]/1024L); ! 313: ! 314: else if(!strcmp(sp,"DAYBYTES")) /* amt of free cdts used today */ ! 315: bprintf("%lu",cfg.level_freecdtperday[useron.level]-useron.freecdt); ! 316: ! 317: else if(!strcmp(sp,"BYTELIMIT")) ! 318: bprintf("%lu",cfg.level_freecdtperday[useron.level]); ! 319: ! 320: else if(!strcmp(sp,"KBLEFT")) ! 321: bprintf("%lu",(useron.cdt+useron.freecdt)/1024L); ! 322: ! 323: else if(!strcmp(sp,"BYTESLEFT")) ! 324: bprintf("%lu",useron.cdt+useron.freecdt); ! 325: ! 326: else if(!strcmp(sp,"CONF")) ! 327: bprintf("%s %s" ! 328: ,usrgrps ? cfg.grp[usrgrp[curgrp]]->sname :nulstr ! 329: ,usrgrps ? cfg.sub[usrsub[curgrp][cursub[curgrp]]]->sname : nulstr); ! 330: ! 331: else if(!strcmp(sp,"CONFNUM")) ! 332: bprintf("%u %u",curgrp+1,cursub[curgrp]+1); ! 333: ! 334: else if(!strcmp(sp,"NUMDIR")) ! 335: bprintf("%u %u",usrlibs ? curlib+1 : 0,usrlibs ? curdir[curlib]+1 : 0); ! 336: ! 337: else if(!strcmp(sp,"EXDATE") || !strcmp(sp,"EXPDATE")) ! 338: bputs(unixtodstr(&cfg,useron.expire,str2)); ! 339: ! 340: else if(!strcmp(sp,"EXPDAYS")) { ! 341: now=time(NULL); ! 342: l=useron.expire-now; ! 343: if(l<0) ! 344: l=0; ! 345: bprintf("%u",l/(1440L*60L)); } ! 346: ! 347: else if(!strcmp(sp,"MEMO1")) ! 348: bputs(useron.note); ! 349: ! 350: else if(!strcmp(sp,"MEMO2") || !strcmp(sp,"COMPANY")) ! 351: bputs(useron.name); ! 352: ! 353: else if(!strcmp(sp,"ZIP")) ! 354: bputs(useron.zipcode); ! 355: ! 356: else if(!strcmp(sp,"HANGUP")) ! 357: hangup(); ! 358: ! 359: else ! 360: return(syncatcodes(sp, len)); ! 361: ! 362: return(len); ! 363: } ! 364: ! 365: int sbbs_t::syncatcodes(char *sp, int len) ! 366: { ! 367: char str2[128],*tp; ! 368: stats_t stats; ! 369: ! 370: /* Synchronet Specific */ ! 371: ! 372: if(!strncmp(sp,"SETSTR:",7)) ! 373: strcpy(main_csi.str,sp+7); ! 374: ! 375: else if(!strncmp(sp,"EXEC:",5)) ! 376: exec_bin(sp+5,&main_csi); ! 377: ! 378: else if(!strncmp(sp,"MENU:",5)) ! 379: menu(sp+5); ! 380: ! 381: else if(!strncmp(sp,"TYPE:",5)) ! 382: printfile(cmdstr(sp+5,nulstr,nulstr,str2),0); ! 383: ! 384: else if(!strcmp(sp,"QUESTION")) ! 385: bputs(question); ! 386: ! 387: else if(!strncmp(sp,"NAME-L",6)) ! 388: bprintf("%-*.*s",len,len,useron.alias); ! 389: ! 390: else if(!strncmp(sp,"NAME-R",6)) ! 391: bprintf("%*.*s",len,len,useron.alias); ! 392: ! 393: else if(!strcmp(sp,"HANDLE")) ! 394: bputs(useron.handle); ! 395: ! 396: else if(!strcmp(sp,"CID") || !strcmp(sp,"IP")) ! 397: bputs(cid); ! 398: ! 399: else if(!strcmp(sp,"LOCAL-IP")) { ! 400: struct in_addr in_addr; ! 401: in_addr.s_addr=local_addr; ! 402: bprintf("%s",inet_ntoa(in_addr)); ! 403: } ! 404: ! 405: else if(!strcmp(sp,"CRLF")) { ! 406: CRLF; ! 407: } ! 408: ! 409: else if(!strcmp(sp,"PUSHXY")) ! 410: ANSI_SAVE(); ! 411: ! 412: else if(!strcmp(sp,"POPXY")) ! 413: ANSI_RESTORE(); ! 414: ! 415: else if(!strcmp(sp,"UP")) ! 416: rputs("\x1b[A"); ! 417: ! 418: else if(!strcmp(sp,"DOWN")) ! 419: rputs("\x1b[B"); ! 420: ! 421: else if(!strcmp(sp,"RIGHT")) ! 422: rputs("\x1b[C"); ! 423: ! 424: else if(!strcmp(sp,"LEFT")) ! 425: rputs("\x1b[D"); ! 426: ! 427: else if(!strncmp(sp,"UP:",3)) ! 428: rprintf("\x1b[%dA",atoi(sp+3)); ! 429: ! 430: else if(!strncmp(sp,"DOWN:",5)) ! 431: rprintf("\x1b[%dB",atoi(sp+5)); ! 432: ! 433: else if(!strncmp(sp,"LEFT:",5)) ! 434: rprintf("\x1b[%dC",atoi(sp+5)); ! 435: ! 436: else if(!strncmp(sp,"RIGHT:",6)) ! 437: rprintf("\x1b[%dD",atoi(sp+6)); ! 438: ! 439: else if(!strncmp(sp,"GOTOXY:",7)) { ! 440: tp=strchr(sp,','); ! 441: if(tp!=NULL) { ! 442: tp++; ! 443: GOTOXY(atoi(sp+7),atoi(tp)); ! 444: } ! 445: } ! 446: ! 447: else if(!strcmp(sp,"GRP")) ! 448: bputs(usrgrps ? cfg.grp[usrgrp[curgrp]]->sname : nulstr); ! 449: ! 450: else if(!strncmp(sp,"GRP-L",5)) ! 451: bprintf("%-*.*s",len,len,usrgrps ? cfg.grp[usrgrp[curgrp]]->sname : nulstr); ! 452: ! 453: else if(!strncmp(sp,"GRP-R",5)) ! 454: bprintf("%*.*s",len,len,usrgrps ? cfg.grp[usrgrp[curgrp]]->sname : nulstr); ! 455: ! 456: else if(!strcmp(sp,"GRPL")) ! 457: bputs(usrgrps ? cfg.grp[usrgrp[curgrp]]->lname : nulstr); ! 458: ! 459: else if(!strncmp(sp,"GRPL-L",6)) ! 460: bprintf("%-*.*s",len,len,usrgrps ? cfg.grp[usrgrp[curgrp]]->lname : nulstr); ! 461: ! 462: else if(!strncmp(sp,"GRPL-R",6)) ! 463: bprintf("%*.*s",len,len,usrgrps ? cfg.grp[usrgrp[curgrp]]->lname : nulstr); ! 464: ! 465: else if(!strcmp(sp,"GN")) ! 466: bprintf("%u",usrgrps ? curgrp+1 : 0); ! 467: ! 468: else if(!strcmp(sp,"GL")) ! 469: bprintf("%-4u",usrgrps ? curgrp+1 : 0); ! 470: ! 471: else if(!strcmp(sp,"GR")) ! 472: bprintf("%4u",usrgrps ? curgrp+1 : 0); ! 473: ! 474: else if(!strcmp(sp,"SUB")) ! 475: bputs(usrgrps ? cfg.sub[usrsub[curgrp][cursub[curgrp]]]->sname : nulstr); ! 476: ! 477: else if(!strncmp(sp,"SUB-L",5)) ! 478: bprintf("%-*.*s",len,len,usrgrps ! 479: ? cfg.sub[usrsub[curgrp][cursub[curgrp]]]->sname : nulstr); ! 480: ! 481: else if(!strncmp(sp,"SUB-R",5)) ! 482: bprintf("%*.*s",len,len,usrgrps ! 483: ? cfg.sub[usrsub[curgrp][cursub[curgrp]]]->sname : nulstr); ! 484: ! 485: else if(!strcmp(sp,"SUBL")) ! 486: bputs(usrgrps ? cfg.sub[usrsub[curgrp][cursub[curgrp]]]->lname : nulstr); ! 487: ! 488: else if(!strncmp(sp,"SUBL-L",6)) ! 489: bprintf("%-*.*s",len,len,usrgrps ! 490: ? cfg.sub[usrsub[curgrp][cursub[curgrp]]]->lname : nulstr); ! 491: ! 492: else if(!strncmp(sp,"SUBL-R",6)) ! 493: bprintf("%*.*s",len,len,usrgrps ! 494: ? cfg.sub[usrsub[curgrp][cursub[curgrp]]]->lname : nulstr); ! 495: ! 496: else if(!strcmp(sp,"SN")) ! 497: bprintf("%u",usrgrps ? cursub[curgrp]+1 : 0); ! 498: ! 499: else if(!strcmp(sp,"SL")) ! 500: bprintf("%-4u",usrgrps ? cursub[curgrp]+1 : 0); ! 501: ! 502: else if(!strcmp(sp,"SR")) ! 503: bprintf("%4u",usrgrps ? cursub[curgrp]+1 : 0); ! 504: ! 505: else if(!strcmp(sp,"LIB")) ! 506: bputs(usrlibs ? cfg.lib[usrlib[curlib]]->sname : nulstr); ! 507: ! 508: else if(!strncmp(sp,"LIB-L",5)) ! 509: bprintf("%-*.*s",len,len,usrlibs ? cfg.lib[usrlib[curlib]]->sname : nulstr); ! 510: ! 511: else if(!strncmp(sp,"LIB-R",5)) ! 512: bprintf("%*.*s",len,len,usrlibs ? cfg.lib[usrlib[curlib]]->sname : nulstr); ! 513: ! 514: else if(!strcmp(sp,"LIBL")) ! 515: bputs(usrlibs ? cfg.lib[usrlib[curlib]]->lname : nulstr); ! 516: ! 517: else if(!strncmp(sp,"LIBL-L",6)) ! 518: bprintf("%-*.*s",len,len,usrlibs ? cfg.lib[usrlib[curlib]]->lname : nulstr); ! 519: ! 520: else if(!strncmp(sp,"LIBL-R",6)) ! 521: bprintf("%*.*s",len,len,usrlibs ? cfg.lib[usrlib[curlib]]->lname : nulstr); ! 522: ! 523: else if(!strcmp(sp,"LN")) ! 524: bprintf("%u",usrlibs ? curlib+1 : 0); ! 525: ! 526: else if(!strcmp(sp,"LL")) ! 527: bprintf("%-4u",usrlibs ? curlib+1 : 0); ! 528: ! 529: else if(!strcmp(sp,"LR")) ! 530: bprintf("%4u",usrlibs ? curlib+1 : 0); ! 531: ! 532: else if(!strcmp(sp,"DIR")) ! 533: bputs(usrlibs ? cfg.dir[usrdir[curlib][curdir[curlib]]]->sname :nulstr); ! 534: ! 535: else if(!strncmp(sp,"DIR-L",5)) ! 536: bprintf("%-*.*s",len,len,usrlibs ! 537: ? cfg.dir[usrdir[curlib][curdir[curlib]]]->sname : nulstr); ! 538: ! 539: else if(!strncmp(sp,"DIR-R",5)) ! 540: bprintf("%*.*s",len,len,usrlibs ! 541: ? cfg.dir[usrdir[curlib][curdir[curlib]]]->sname : nulstr); ! 542: ! 543: else if(!strcmp(sp,"DIRL")) ! 544: bputs(usrlibs ? cfg.dir[usrdir[curlib][curdir[curlib]]]->lname : nulstr); ! 545: ! 546: else if(!strncmp(sp,"DIRL-L",6)) ! 547: bprintf("%-*.*s",len,len,usrlibs ! 548: ? cfg.dir[usrdir[curlib][curdir[curlib]]]->lname : nulstr); ! 549: ! 550: else if(!strncmp(sp,"DIRL-R",6)) ! 551: bprintf("%*.*s",len,len,usrlibs ! 552: ? cfg.dir[usrdir[curlib][curdir[curlib]]]->lname : nulstr); ! 553: ! 554: else if(!strcmp(sp,"DN")) ! 555: bprintf("%u",usrlibs ? curdir[curlib]+1 : 0); ! 556: ! 557: else if(!strcmp(sp,"DL")) ! 558: bprintf("%-4u",usrlibs ? curdir[curlib]+1 : 0); ! 559: ! 560: else if(!strcmp(sp,"DR")) ! 561: bprintf("%4u",usrlibs ? curdir[curlib]+1 : 0); ! 562: ! 563: else if(!strcmp(sp,"NOACCESS")) { ! 564: if(noaccess_str==text[NoAccessTime]) ! 565: bprintf(noaccess_str,noaccess_val/60,noaccess_val%60); ! 566: else if(noaccess_str==text[NoAccessDay]) ! 567: bprintf(noaccess_str,wday[noaccess_val]); ! 568: else ! 569: bprintf(noaccess_str,noaccess_val); } ! 570: ! 571: else if(!strcmp(sp,"LAST")) { ! 572: tp=strrchr(useron.alias,SP); ! 573: if(tp) tp++; ! 574: else tp=useron.alias; ! 575: bputs(tp); } ! 576: ! 577: else if(!strcmp(sp,"REAL")) { ! 578: strcpy(str2,useron.name); ! 579: tp=strchr(str2,SP); ! 580: if(tp) *tp=0; ! 581: bputs(str2); } ! 582: ! 583: else if(!strcmp(sp,"FIRSTREAL")) { ! 584: strcpy(str2,useron.name); ! 585: tp=strchr(str2,SP); ! 586: if(tp) *tp=0; ! 587: bputs(str2); } ! 588: ! 589: else if(!strcmp(sp,"LASTREAL")) { ! 590: tp=strrchr(useron.name,SP); ! 591: if(tp) tp++; ! 592: else tp=useron.name; ! 593: bputs(tp); } ! 594: ! 595: else if(!strcmp(sp,"MAILW")) ! 596: bprintf("%u",getmail(&cfg,useron.number,0)); ! 597: ! 598: else if(!strcmp(sp,"MAILP")) ! 599: bprintf("%u",getmail(&cfg,useron.number,1)); ! 600: ! 601: else if(!strncmp(sp,"MAILW:",6)) ! 602: bprintf("%u",getmail(&cfg,atoi(sp+6),0)); ! 603: ! 604: else if(!strncmp(sp,"MAILP:",6)) ! 605: bprintf("%u",getmail(&cfg,atoi(sp+6),1)); ! 606: ! 607: else if(!strcmp(sp,"MSGREPLY")) ! 608: bprintf("%c",cfg.sys_misc&SM_RA_EMU ? 'R' : 'A'); ! 609: ! 610: else if(!strcmp(sp,"MSGREREAD")) ! 611: bprintf("%c",cfg.sys_misc&SM_RA_EMU ? 'A' : 'R'); ! 612: ! 613: else if(!strncmp(sp,"STATS.",6)) { ! 614: getstats(&cfg,0,&stats); ! 615: sp+=6; ! 616: if(!strcmp(sp,"LOGONS")) ! 617: bprintf("%u",stats.logons); ! 618: else if(!strcmp(sp,"LTODAY")) ! 619: bprintf("%u",stats.ltoday); ! 620: else if(!strcmp(sp,"TIMEON")) ! 621: bprintf("%u",stats.timeon); ! 622: else if(!strcmp(sp,"TTODAY")) ! 623: bprintf("%u",stats.ttoday); ! 624: else if(!strcmp(sp,"ULS")) ! 625: bprintf("%u",stats.uls); ! 626: else if(!strcmp(sp,"ULB")) ! 627: bprintf("%u",stats.ulb); ! 628: else if(!strcmp(sp,"DLS")) ! 629: bprintf("%u",stats.dls); ! 630: else if(!strcmp(sp,"DLB")) ! 631: bprintf("%u",stats.dlb); ! 632: else if(!strcmp(sp,"PTODAY")) ! 633: bprintf("%u",stats.ptoday); ! 634: else if(!strcmp(sp,"ETODAY")) ! 635: bprintf("%u",stats.etoday); ! 636: else if(!strcmp(sp,"FTODAY")) ! 637: bprintf("%u",stats.ftoday); ! 638: else if(!strcmp(sp,"NUSERS")) ! 639: bprintf("%u",stats.nusers); ! 640: } ! 641: ! 642: else return(0); ! 643: ! 644: return(len); ! 645: } ! 646:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.