![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to getstr.cpp CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Synchronet] / sbbs / sbbs3|
Return to getstr.cpp CVS log | Up to [Synchronet] / sbbs / sbbs3 |
1.1 root 1: /* getstr.cpp */
2:
3: /* Synchronet string input routines */
4:
1.1.1.2 ! root 5: /* $Id: getstr.cpp,v 1.19 2004/05/30 06:47:52 deuce 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: /* Waits for remote or local user to input a CR terminated string. 'length' */
42: /* is the maximum number of characters that getstr will allow the user to */
43: /* input into the string. 'mode' specifies upper case characters are echoed */
44: /* or wordwrap or if in message input (^A sequences allowed). ^W backspaces */
45: /* a word, ^X backspaces a line, ^Gs, BSs, TABs are processed, LFs ignored. */
46: /* ^N non-destructive BS, ^V center line. Valid keys are echoed. */
47: /****************************************************************************/
48: size_t sbbs_t::getstr(char *strout, size_t maxlen, long mode)
49: {
50: size_t i,l,x,z; /* i=current position, l=length, j=printed chars */
51: /* x&z=misc */
1.1.1.2 ! root 52: char str1[256],str2[256],undo[256];
1.1 root 53: uchar ch;
1.1.1.2 ! root 54: uchar atr;
1.1 root 55:
1.1.1.2 ! root 56: console&=~(CON_UPARROW|CON_DOWNARROW|CON_LEFTARROW|CON_BACKSPACE|CON_DELETELINE);
! 57: if(!(mode&K_WRAP))
! 58: console&=~CON_INSERT;
1.1 root 59: sys_status&=~SS_ABORT;
60: if(mode&K_LINE && useron.misc&ANSI && !(mode&K_NOECHO)) {
61: attr(cfg.color[clr_inputline]);
62: for(i=0;i<maxlen;i++)
1.1.1.2 ! root 63: outchar(' ');
! 64: cursor_left(maxlen);
! 65: }
1.1 root 66: if(wordwrap[0]) {
67: strcpy(str1,wordwrap);
1.1.1.2 ! root 68: wordwrap[0]=0;
! 69: }
1.1 root 70: else str1[0]=0;
71: if(mode&K_EDIT)
72: strcat(str1,strout);
73: else
74: strout[0]=0;
75: if(strlen(str1)>maxlen)
76: str1[maxlen]=0;
77: atr=curatr;
78: if(!(mode&K_NOECHO)) {
79: if(mode&K_AUTODEL && str1[0]) {
80: i=(cfg.color[clr_inputline]&0x77)<<4;
81: i|=(cfg.color[clr_inputline]&0x77)>>4;
1.1.1.2 ! root 82: attr(i);
! 83: }
1.1 root 84: rputs(str1);
85: if(mode&K_EDIT && !(mode&(K_LINE|K_AUTODEL)) && useron.misc&ANSI)
1.1.1.2 ! root 86: cleartoeol(); /* destroy to eol */
! 87: }
1.1 root 88:
1.1.1.2 ! root 89: SAFECOPY(undo,str1);
1.1 root 90: i=l=strlen(str1);
91: if(mode&K_AUTODEL && str1[0] && !(mode&K_NOECHO)) {
92: ch=getkey(mode|K_GETSTR);
93: attr(atr);
94: if(isprint(ch) || ch==DEL) {
95: for(i=0;i<l;i++)
96: bputs("\b \b");
1.1.1.2 ! root 97: i=l=0;
! 98: }
1.1 root 99: else {
100: for(i=0;i<l;i++)
101: outchar(BS);
102: rputs(str1);
1.1.1.2 ! root 103: i=l;
! 104: }
! 105: if(ch!=' ' && ch!=TAB)
! 106: ungetkey(ch);
! 107: }
1.1 root 108:
1.1.1.2 ! root 109: if(mode&K_USEOFFSET) {
! 110: i=getstr_offset;
! 111: if(i>l)
! 112: i=l;
! 113: if(l-i) {
! 114: cursor_left(l-i);
! 115: }
! 116: }
! 117:
! 118: if(console&CON_INSERT && useron.misc&ANSI && !(mode&K_NOECHO))
! 119: insert_indicator();
! 120:
! 121: while(!(sys_status&SS_ABORT) && online && input_thread_running) {
! 122: if(mode&K_LEFTEXIT
! 123: && console&(CON_LEFTARROW|CON_BACKSPACE|CON_DELETELINE))
! 124: break;
! 125: if(console&CON_UPARROW)
1.1 root 126: break;
1.1.1.2 ! root 127: if((ch=getkey(mode|K_GETSTR))==CR)
1.1 root 128: break;
1.1.1.2 ! root 129: if(sys_status&SS_ABORT || !online)
! 130: break;
! 131: if(ch==LF && mode&K_MSG) { /* Down-arrow same as CR */
! 132: console|=CON_DOWNARROW;
! 133: break;
! 134: }
1.1 root 135: if(ch==TAB && (mode&K_TAB || !(mode&K_WRAP))) /* TAB same as CR */
136: break;
1.1.1.2 ! root 137: if(!i && mode&K_UPRLWR && (ch==' ' || ch==TAB))
1.1 root 138: continue; /* ignore beginning white space if upper/lower */
139: if(mode&K_E71DETECT && (uchar)ch==(CR|0x80) && l>1) {
140: if(strstr(str1,"��")) {
141: bputs("\r\n\r\nYou must set your terminal to NO PARITY, "
142: "8 DATA BITS, and 1 STOP BIT (N-8-1).\7\r\n");
1.1.1.2 ! root 143: return(0);
! 144: }
! 145: }
! 146: getstr_offset=i;
1.1 root 147: switch(ch) {
1.1.1.2 ! root 148: case CTRL_A: /* Ctrl-A for ANSI */
1.1 root 149: if(!(mode&K_MSG) || useron.rest&FLAG('A') || i>maxlen-3)
150: break;
1.1.1.2 ! root 151: if(console&CON_INSERT) {
1.1 root 152: if(l<maxlen)
153: l++;
154: for(x=l;x>i;x--)
155: str1[x]=str1[x-1];
156: rprintf("%.*s",l-i,str1+i);
1.1.1.2 ! root 157: cursor_left(l-i);
! 158: #if 0
1.1 root 159: if(i==maxlen-1)
1.1.1.2 ! root 160: console&=~CON_INSERT;
! 161: #endif
! 162: }
1.1 root 163: outchar(str1[i++]=1);
164: break;
1.1.1.2 ! root 165: case CTRL_B: /* Ctrl-B Beginning of Line */
1.1 root 166: if(useron.misc&ANSI && i && !(mode&K_NOECHO)) {
1.1.1.2 ! root 167: cursor_left(i);
! 168: i=0;
! 169: }
1.1 root 170: break;
1.1.1.2 ! root 171: case CTRL_D: /* Ctrl-D Delete word right */
1.1 root 172: if(i<l) {
173: x=i;
1.1.1.2 ! root 174: while(x<l && str1[x]!=' ') {
! 175: outchar(' ');
! 176: x++;
! 177: }
! 178: while(x<l && str1[x]==' ') {
! 179: outchar(' ');
! 180: x++;
! 181: }
! 182: cursor_left(x-i); /* move cursor back */
1.1 root 183: z=i;
184: while(z<l-(x-i)) { /* move chars in string */
185: outchar(str1[z]=str1[z+(x-i)]);
1.1.1.2 ! root 186: z++;
! 187: }
1.1 root 188: while(z<l) { /* write over extra chars */
1.1.1.2 ! root 189: outchar(' ');
! 190: z++;
! 191: }
! 192: cursor_left(z-i);
! 193: l-=x-i; /* l=new length */
! 194: }
1.1 root 195: break;
1.1.1.2 ! root 196: case CTRL_E: /* Ctrl-E End of line */
1.1 root 197: if(useron.misc&ANSI && i<l) {
1.1.1.2 ! root 198: cursor_right(l-i); /* move cursor to eol */
! 199: i=l;
! 200: }
1.1 root 201: break;
1.1.1.2 ! root 202: case CTRL_F: /* Ctrl-F move cursor forewards */
1.1 root 203: if(i<l && (useron.misc&ANSI)) {
1.1.1.2 ! root 204: cursor_right(); /* move cursor right one */
! 205: i++;
! 206: }
1.1 root 207: break;
1.1.1.2 ! root 208: case CTRL_G: /* Bell */
1.1 root 209: if(!(mode&K_MSG))
210: break;
211: if(useron.rest&FLAG('B')) {
212: if (i+6<maxlen) {
1.1.1.2 ! root 213: if(console&CON_INSERT) {
1.1 root 214: for(x=l+6;x>i;x--)
215: str1[x]=str1[x-6];
216: if(l+5<maxlen)
217: l+=6;
1.1.1.2 ! root 218: #if 0
1.1 root 219: if(i==maxlen-1)
1.1.1.2 ! root 220: console&=~CON_INSERT;
! 221: #endif
! 222: }
1.1 root 223: str1[i++]='(';
224: str1[i++]='b';
225: str1[i++]='e';
226: str1[i++]='e';
227: str1[i++]='p';
228: str1[i++]=')';
229: if(!(mode&K_NOECHO))
1.1.1.2 ! root 230: bputs("(beep)");
! 231: }
! 232: if(console&CON_INSERT)
1.1 root 233: redrwstr(str1,i,l,0);
1.1.1.2 ! root 234: break;
! 235: }
! 236: if(console&CON_INSERT) {
1.1 root 237: if(l<maxlen)
238: l++;
239: for(x=l;x>i;x--)
240: str1[x]=str1[x-1];
1.1.1.2 ! root 241: #if 0
1.1 root 242: if(i==maxlen-1)
1.1.1.2 ! root 243: console&=~CON_INSERT;
! 244: #endif
! 245: }
! 246: if(i<maxlen) {
1.1 root 247: str1[i++]=BEL;
248: if(!(mode&K_NOECHO))
1.1.1.2 ! root 249: outchar(BEL);
! 250: }
! 251: break;
! 252: case CTRL_H: /* Ctrl-H/Backspace */
! 253: if(i==0) {
! 254: console|=CON_BACKSPACE;
1.1 root 255: break;
1.1.1.2 ! root 256: }
1.1 root 257: i--;
258: l--;
259: if(i!=l) { /* Deleting char in middle of line */
260: outchar(BS);
261: z=i;
262: while(z<l) { /* move the characters in the line */
263: outchar(str1[z]=str1[z+1]);
1.1.1.2 ! root 264: z++;
! 265: }
! 266: outchar(' '); /* write over the last char */
! 267: cursor_left((l-i)+1);
! 268: }
1.1 root 269: else if(!(mode&K_NOECHO))
270: bputs("\b \b");
271: break;
1.1.1.2 ! root 272: case CTRL_I: /* Ctrl-I/TAB */
! 273: if(!(i%EDIT_TABSIZE)) {
! 274: if(console&CON_INSERT) {
1.1 root 275: if(l<maxlen)
276: l++;
277: for(x=l;x>i;x--)
278: str1[x]=str1[x-1];
1.1.1.2 ! root 279: #if 0
1.1 root 280: if(i==maxlen-1)
1.1.1.2 ! root 281: console&=~CON_INSERT;
! 282: #endif
! 283: }
! 284: str1[i++]=' ';
1.1 root 285: if(!(mode&K_NOECHO))
1.1.1.2 ! root 286: outchar(' ');
! 287: }
! 288: while(i<maxlen && i%EDIT_TABSIZE) {
! 289: if(console&CON_INSERT) {
1.1 root 290: if(l<maxlen)
291: l++;
292: for(x=l;x>i;x--)
293: str1[x]=str1[x-1];
1.1.1.2 ! root 294: #if 0
1.1 root 295: if(i==maxlen-1)
1.1.1.2 ! root 296: console&=~CON_INSERT;
! 297: #endif
! 298: }
! 299: str1[i++]=' ';
1.1 root 300: if(!(mode&K_NOECHO))
1.1.1.2 ! root 301: outchar(' ');
! 302: }
! 303: if(console&CON_INSERT && !(mode&K_NOECHO))
1.1 root 304: redrwstr(str1,i,l,0);
305: break;
306:
1.1.1.2 ! root 307: case CTRL_L: /* Ctrl-L Center line (used to be Ctrl-V) */
1.1 root 308: str1[l]=0;
309: l=bstrlen(str1);
310: if(!l) break;
311: for(x=0;x<(maxlen-l)/2;x++)
1.1.1.2 ! root 312: str2[x]=' ';
1.1 root 313: str2[x]=0;
314: strcat(str2,str1);
315: strcpy(strout,str2);
316: l=strlen(strout);
317: if(mode&K_NOECHO)
318: return(l);
319: if(mode&K_MSG)
320: redrwstr(strout,i,l,K_MSG);
321: else {
322: while(i--)
323: bputs("\b");
324: bputs(strout);
325: if(mode&K_LINE)
1.1.1.2 ! root 326: attr(LIGHTGRAY);
! 327: }
! 328: if(!(mode&K_NOCRLF))
! 329: CRLF;
1.1 root 330: return(l);
331:
1.1.1.2 ! root 332: case CTRL_N: /* Ctrl-N Next word */
1.1 root 333: if(i<l && (useron.misc&ANSI)) {
334: x=i;
1.1.1.2 ! root 335: while(str1[i]!=' ' && i<l)
1.1 root 336: i++;
1.1.1.2 ! root 337: while(str1[i]==' ' && i<l)
1.1 root 338: i++;
1.1.1.2 ! root 339: cursor_right(i-x);
! 340: }
1.1 root 341: break;
1.1.1.2 ! root 342: case CTRL_R: /* Ctrl-R Redraw Line */
1.1 root 343: if(!(mode&K_NOECHO))
344: redrwstr(str1,i,l,0);
345: break;
1.1.1.2 ! root 346: case CTRL_V: /* Ctrl-V Toggles Insert/Overwrite */
1.1 root 347: if(!(useron.misc&ANSI) || mode&K_NOECHO)
348: break;
1.1.1.2 ! root 349: console^=CON_INSERT;
! 350: insert_indicator();
1.1 root 351: break;
1.1.1.2 ! root 352: case CTRL_W: /* Ctrl-W Delete word left */
1.1 root 353: if(i<l) {
354: x=i; /* x=original offset */
1.1.1.2 ! root 355: while(i && str1[i-1]==' ') {
1.1 root 356: outchar(BS);
1.1.1.2 ! root 357: i--;
! 358: }
! 359: while(i && str1[i-1]!=' ') {
1.1 root 360: outchar(BS);
1.1.1.2 ! root 361: i--;
! 362: }
1.1 root 363: z=i; /* i=z=new offset */
364: while(z<l-(x-i)) { /* move chars in string */
365: outchar(str1[z]=str1[z+(x-i)]);
1.1.1.2 ! root 366: z++;
! 367: }
1.1 root 368: while(z<l) { /* write over extra chars */
1.1.1.2 ! root 369: outchar(' ');
! 370: z++;
! 371: }
! 372: cursor_left(z-i); /* back to new x corridnant */
! 373: l-=x-i; /* l=new length */
! 374: } else {
! 375: while(i && str1[i-1]==' ') {
1.1 root 376: i--;
377: l--;
378: if(!(mode&K_NOECHO))
1.1.1.2 ! root 379: bputs("\b \b");
! 380: }
! 381: while(i && str1[i-1]!=' ') {
1.1 root 382: i--;
383: l--;
384: if(!(mode&K_NOECHO))
1.1.1.2 ! root 385: bputs("\b \b");
! 386: }
! 387: }
1.1 root 388: break;
1.1.1.2 ! root 389: case CTRL_Y: /* Ctrl-Y Delete to end of line */
! 390: if(i!=l) { /* if not at EOL */
! 391: if(useron.misc&ANSI && !(mode&K_NOECHO))
! 392: cleartoeol();
! 393: l=i;
! 394: break;
! 395: }
! 396: /* fall-through */
! 397: case CTRL_X: /* Ctrl-X Delete entire line */
1.1 root 398: if(mode&K_NOECHO)
399: l=0;
400: else {
1.1.1.2 ! root 401: if(useron.misc&ANSI) {
! 402: cursor_left(i);
! 403: cleartoeol();
! 404: l=0;
! 405: } else {
! 406: while(i<l) {
! 407: outchar(' ');
! 408: i++;
! 409: }
! 410: while(l) {
! 411: l--;
! 412: bputs("\b \b");
! 413: }
! 414: }
! 415: }
1.1 root 416: i=0;
1.1.1.2 ! root 417: console|=CON_DELETELINE;
1.1 root 418: break;
1.1.1.2 ! root 419: case CTRL_Z: /* Undo */
! 420: SAFECOPY(str1,undo);
! 421: i=l=strlen(str1);
! 422: rprintf("\r%s",str1);
! 423: if(useron.misc&ANSI)
! 424: cleartoeol(); /* destroy to eol */
1.1 root 425: break;
426: case 28: /* Ctrl-\ Previous word */
427: if(i && (useron.misc&ANSI) && !(mode&K_NOECHO)) {
428: x=i;
1.1.1.2 ! root 429: while(str1[i-1]==' ' && i)
1.1 root 430: i--;
1.1.1.2 ! root 431: while(str1[i-1]!=' ' && i)
1.1 root 432: i--;
1.1.1.2 ! root 433: cursor_left(x-i);
! 434: }
1.1 root 435: break;
436: case 29: /* Ctrl-]/Left Arrow Reverse Cursor Movement */
1.1.1.2 ! root 437: if(i==0) {
! 438: if(mode&K_LEFTEXIT)
! 439: console|=CON_LEFTARROW;
! 440: break;
! 441: }
! 442: if((useron.misc&ANSI) && !(mode&K_NOECHO)) {
! 443: cursor_left(); /* move cursor left one */
! 444: i--;
! 445: }
1.1 root 446: break;
447: case 30: /* Ctrl-^/Up Arrow */
448: if(!(mode&K_EDIT))
449: break;
1.1.1.2 ! root 450: #if 1
1.1 root 451: if(i>l)
452: l=i;
453: str1[l]=0;
454: strcpy(strout,str1);
1.1.1.2 ! root 455: if((strip_invalid_attr(strout) || console&CON_INSERT) && !(mode&K_NOECHO))
1.1 root 456: redrwstr(strout,i,l,K_MSG);
457: if(mode&K_LINE && !(mode&K_NOECHO))
458: attr(LIGHTGRAY);
459: console|=CON_UPARROW;
460: return(l);
1.1.1.2 ! root 461: #else
! 462: console|=CON_UPARROW;
! 463: break;
! 464: #endif
1.1 root 465: case DEL: /* Ctrl-BkSpc (DEL) Delete current char */
466: if(i==l) { /* Backspace if end of line */
467: if(i) {
468: i--;
469: l--;
470: if(!(mode&K_NOECHO))
471: bputs("\b \b");
472: }
473: break;
474: }
475: l--;
476: z=i;
477: while(z<l) { /* move the characters in the line */
478: outchar(str1[z]=str1[z+1]);
1.1.1.2 ! root 479: z++;
! 480: }
! 481: outchar(' '); /* write over the last char */
! 482: cursor_left((l-i)+1);
1.1 root 483: break;
484: default:
1.1.1.2 ! root 485: if(mode&K_WRAP && i==maxlen && ch>=' ' && !(console&CON_INSERT)) {
1.1 root 486: str1[i]=0;
1.1.1.2 ! root 487: if(ch==' ' && !(mode&K_CHAT)) { /* don't wrap a space */
1.1 root 488: strcpy(strout,str1); /* as last char */
1.1.1.2 ! root 489: if(strip_invalid_attr(strout) && !(mode&K_NOECHO))
1.1 root 490: redrwstr(strout,i,l,K_MSG);
1.1.1.2 ! root 491: if(!(mode&(K_NOECHO|K_NOCRLF)))
1.1 root 492: CRLF;
1.1.1.2 ! root 493: return(i);
! 494: }
1.1 root 495: x=i-1;
496: z=1;
497: wordwrap[0]=ch;
1.1.1.2 ! root 498: while(str1[x]!=' ' && x)
1.1 root 499: wordwrap[z++]=str1[x--];
500: if(x<(maxlen/2)) {
501: wordwrap[1]=0; /* only wrap one character */
502: strcpy(strout,str1);
1.1.1.2 ! root 503: if(strip_invalid_attr(strout) && !(mode&K_NOECHO))
1.1 root 504: redrwstr(strout,i,l,K_MSG);
1.1.1.2 ! root 505: if(!(mode&(K_NOECHO|K_NOCRLF)))
1.1 root 506: CRLF;
1.1.1.2 ! root 507: return(i);
! 508: }
1.1 root 509: wordwrap[z]=0;
510: if(!(mode&K_NOECHO))
511: while(z--) {
1.1.1.2 ! root 512: rputs("\b \b");
! 513: i--;
! 514: }
1.1 root 515: strrev(wordwrap);
516: str1[x]=0;
517: strcpy(strout,str1);
1.1.1.2 ! root 518: if(strip_invalid_attr(strout) && !(mode&K_NOECHO))
! 519: redrwstr(strout,i,x,mode);
! 520: if(!(mode&(K_NOECHO|K_NOCRLF)))
1.1 root 521: CRLF;
1.1.1.2 ! root 522: return(x);
! 523: }
! 524: if(i<maxlen && ch>=' ') {
1.1 root 525: if(mode&K_UPRLWR)
1.1.1.2 ! root 526: if(!i || (i && (str1[i-1]==' ' || str1[i-1]=='-'
1.1 root 527: || str1[i-1]=='.' || str1[i-1]=='_')))
528: ch=toupper(ch);
529: else
530: ch=tolower(ch);
1.1.1.2 ! root 531: if(console&CON_INSERT && i!=l) {
1.1 root 532: if(l<maxlen) /* l<maxlen */
533: l++;
534: for(x=l;x>i;x--)
535: str1[x]=str1[x-1];
536: rprintf("%.*s",l-i,str1+i);
1.1.1.2 ! root 537: cursor_left(l-i);
! 538: #if 0
1.1 root 539: if(i==maxlen-1) {
540: bputs(" \b\b");
1.1.1.2 ! root 541: console&=~CON_INSERT;
! 542: }
! 543: #endif
! 544: }
1.1 root 545: str1[i++]=ch;
546: if(!(mode&K_NOECHO))
1.1.1.2 ! root 547: outchar(ch);
! 548: } else
! 549: outchar(BEL); /* Added at Angus McLeod's request */
! 550: }
1.1 root 551: if(i>l)
552: l=i;
553: if(mode&K_CHAT && !l)
1.1.1.2 ! root 554: return(0);
! 555: }
! 556: getstr_offset=i;
1.1 root 557: if(!online)
558: return(0);
559: if(i>l)
560: l=i;
561: str1[l]=0;
562: if(!(sys_status&SS_ABORT)) {
563: strcpy(strout,str1);
1.1.1.2 ! root 564: if((strip_invalid_attr(strout) || console&CON_INSERT) && !(mode&K_NOECHO))
! 565: redrwstr(strout,i,l,K_MSG);
! 566: }
1.1 root 567: else
568: l=0;
569: if(mode&K_LINE && !(mode&K_NOECHO)) attr(LIGHTGRAY);
570: if(!(mode&(K_NOCRLF|K_NOECHO))) {
571: outchar(CR);
572: if(!(mode&K_MSG && sys_status&SS_ABORT))
573: outchar(LF);
1.1.1.2 ! root 574: lncntr=0;
! 575: }
1.1 root 576: return(l);
577: }
578:
579: /****************************************************************************/
580: /* Hot keyed number input routine. */
581: /* Returns a valid number between 1 and max, 0 if no number entered, or -1 */
582: /* if the user hit 'Q' or ctrl-c */
583: /****************************************************************************/
584: long sbbs_t::getnum(ulong max)
585: {
586: uchar ch,n=0;
587: long i=0;
588:
589: while(online) {
590: ch=getkey(K_UPPER);
591: if(ch>0x7f)
592: continue;
593: if(ch=='Q') {
594: outchar('Q');
595: if(useron.misc&COLDKEYS)
596: ch=getkey(K_UPPER);
1.1.1.2 ! root 597: if(ch==BS || ch==DEL) {
1.1 root 598: bputs("\b \b");
1.1.1.2 ! root 599: continue;
! 600: }
1.1 root 601: CRLF;
602: lncntr=0;
1.1.1.2 ! root 603: return(-1);
! 604: }
1.1 root 605: else if(sys_status&SS_ABORT) {
606: CRLF;
607: lncntr=0;
1.1.1.2 ! root 608: return(-1);
! 609: }
1.1 root 610: else if(ch==CR) {
611: CRLF;
612: lncntr=0;
1.1.1.2 ! root 613: return(i);
! 614: }
! 615: else if((ch==BS || ch==DEL) && n) {
1.1 root 616: bputs("\b \b");
617: i/=10;
1.1.1.2 ! root 618: n--;
! 619: }
1.1 root 620: else if(isdigit(ch) && (i*10UL)+(ch&0xf)<=max && (ch!='0' || n)) {
621: i*=10L;
622: n++;
623: i+=ch&0xf;
624: outchar(ch);
625: if(i*10UL>max && !(useron.misc&COLDKEYS)) {
626: CRLF;
627: lncntr=0;
1.1.1.2 ! root 628: return(i);
! 629: }
! 630: }
! 631: }
1.1 root 632: return(0);
633: }
1.1.1.2 ! root 634:
! 635: void sbbs_t::insert_indicator(void)
! 636: {
! 637: ANSI_SAVE();
! 638: GOTOXY(80,1);
! 639: uchar z=curatr; /* and go to EOL */
! 640: if(console&CON_INSERT) {
! 641: attr(BLINK|BLACK|(LIGHTGRAY<<4));
! 642: outchar('I');
! 643: } else {
! 644: attr(LIGHTGRAY);
! 645: outchar(' ');
! 646: }
! 647: attr(z);
! 648: ANSI_RESTORE();
! 649: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.