![[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: ! 5: /* $Id: getstr.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: ! 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 */ ! 52: char str1[256],str2[256]; ! 53: uchar ch; ! 54: uchar ins=0,atr; ! 55: ! 56: console&=~CON_UPARROW; ! 57: sys_status&=~SS_ABORT; ! 58: if(mode&K_LINE && useron.misc&ANSI && !(mode&K_NOECHO)) { ! 59: attr(cfg.color[clr_inputline]); ! 60: for(i=0;i<maxlen;i++) ! 61: outchar(SP); ! 62: bprintf("\x1b[%dD",maxlen); } ! 63: if(wordwrap[0]) { ! 64: strcpy(str1,wordwrap); ! 65: wordwrap[0]=0; } ! 66: else str1[0]=0; ! 67: if(mode&K_EDIT) ! 68: strcat(str1,strout); ! 69: else ! 70: strout[0]=0; ! 71: if(strlen(str1)>maxlen) ! 72: str1[maxlen]=0; ! 73: atr=curatr; ! 74: if(!(mode&K_NOECHO)) { ! 75: if(mode&K_AUTODEL && str1[0]) { ! 76: i=(cfg.color[clr_inputline]&0x77)<<4; ! 77: i|=(cfg.color[clr_inputline]&0x77)>>4; ! 78: attr(i); } ! 79: rputs(str1); ! 80: if(mode&K_EDIT && !(mode&(K_LINE|K_AUTODEL)) && useron.misc&ANSI) ! 81: bputs("\x1b[K"); /* destroy to eol */ } ! 82: ! 83: i=l=strlen(str1); ! 84: if(mode&K_AUTODEL && str1[0] && !(mode&K_NOECHO)) { ! 85: ch=getkey(mode|K_GETSTR); ! 86: attr(atr); ! 87: if(isprint(ch) || ch==DEL) { ! 88: for(i=0;i<l;i++) ! 89: bputs("\b \b"); ! 90: i=l=0; } ! 91: else { ! 92: for(i=0;i<l;i++) ! 93: outchar(BS); ! 94: rputs(str1); ! 95: i=l; } ! 96: if(ch!=SP && ch!=TAB) ! 97: ungetkey(ch); } ! 98: ! 99: while(!(sys_status&SS_ABORT) && (ch=getkey(mode|K_GETSTR))!=CR && online) { ! 100: if(sys_status&SS_ABORT) ! 101: break; ! 102: if(ch==LF && mode&K_MSG) /* Down-arrow same as CR */ ! 103: break; ! 104: if(ch==TAB && (mode&K_TAB || !(mode&K_WRAP))) /* TAB same as CR */ ! 105: break; ! 106: if(!i && mode&K_UPRLWR && (ch==SP || ch==TAB)) ! 107: continue; /* ignore beginning white space if upper/lower */ ! 108: if(mode&K_E71DETECT && (uchar)ch==(CR|0x80) && l>1) { ! 109: if(strstr(str1,"��")) { ! 110: bputs("\r\n\r\nYou must set your terminal to NO PARITY, " ! 111: "8 DATA BITS, and 1 STOP BIT (N-8-1).\7\r\n"); ! 112: return(0); } } ! 113: switch(ch) { ! 114: case 1: /* Ctrl-A for ANSI */ ! 115: if(!(mode&K_MSG) || useron.rest&FLAG('A') || i>maxlen-3) ! 116: break; ! 117: if(ins) { ! 118: if(l<maxlen) ! 119: l++; ! 120: for(x=l;x>i;x--) ! 121: str1[x]=str1[x-1]; ! 122: rprintf("%.*s",l-i,str1+i); ! 123: rprintf("\x1b[%dD",l-i); ! 124: if(i==maxlen-1) ! 125: ins=0; } ! 126: outchar(str1[i++]=1); ! 127: break; ! 128: case 2: /* Ctrl-B Beginning of Line */ ! 129: if(useron.misc&ANSI && i && !(mode&K_NOECHO)) { ! 130: bprintf("\x1b[%dD",i); ! 131: i=0; } ! 132: break; ! 133: case 4: /* Ctrl-D Delete word right */ ! 134: if(i<l) { ! 135: x=i; ! 136: while(x<l && str1[x]!=SP) { ! 137: outchar(SP); ! 138: x++; } ! 139: while(x<l && str1[x]==SP) { ! 140: outchar(SP); ! 141: x++; } ! 142: bprintf("\x1b[%dD",x-i); /* move cursor back */ ! 143: z=i; ! 144: while(z<l-(x-i)) { /* move chars in string */ ! 145: outchar(str1[z]=str1[z+(x-i)]); ! 146: z++; } ! 147: while(z<l) { /* write over extra chars */ ! 148: outchar(SP); ! 149: z++; } ! 150: bprintf("\x1b[%dD",z-i); ! 151: l-=x-i; } /* l=new length */ ! 152: break; ! 153: case 5: /* Ctrl-E End of line */ ! 154: if(useron.misc&ANSI && i<l) { ! 155: bprintf("\x1b[%dC",l-i); /* move cursor to eol */ ! 156: i=l; } ! 157: break; ! 158: case 6: /* Ctrl-F move cursor forewards */ ! 159: if(i<l && (useron.misc&ANSI)) { ! 160: bputs("\x1b[C"); /* move cursor right one */ ! 161: i++; } ! 162: break; ! 163: case 7: /* Ctrl-G */ ! 164: if(!(mode&K_MSG)) ! 165: break; ! 166: if(useron.rest&FLAG('B')) { ! 167: if (i+6<maxlen) { ! 168: if(ins) { ! 169: for(x=l+6;x>i;x--) ! 170: str1[x]=str1[x-6]; ! 171: if(l+5<maxlen) ! 172: l+=6; ! 173: if(i==maxlen-1) ! 174: ins=0; } ! 175: str1[i++]='('; ! 176: str1[i++]='b'; ! 177: str1[i++]='e'; ! 178: str1[i++]='e'; ! 179: str1[i++]='p'; ! 180: str1[i++]=')'; ! 181: if(!(mode&K_NOECHO)) ! 182: bputs("(beep)"); } ! 183: if(ins) ! 184: redrwstr(str1,i,l,0); ! 185: break; } ! 186: if(ins) { ! 187: if(l<maxlen) ! 188: l++; ! 189: for(x=l;x>i;x--) ! 190: str1[x]=str1[x-1]; ! 191: if(i==maxlen-1) ! 192: ins=0; } ! 193: if(i<maxlen) { ! 194: str1[i++]=BEL; ! 195: if(!(mode&K_NOECHO)) ! 196: outchar(BEL); } ! 197: break; ! 198: case 8: /* Ctrl-H/Backspace */ ! 199: if(!i) ! 200: break; ! 201: i--; ! 202: l--; ! 203: if(i!=l) { /* Deleting char in middle of line */ ! 204: outchar(BS); ! 205: z=i; ! 206: while(z<l) { /* move the characters in the line */ ! 207: outchar(str1[z]=str1[z+1]); ! 208: z++; } ! 209: outchar(SP); /* write over the last char */ ! 210: bprintf("\x1b[%dD",(l-i)+1); } ! 211: else if(!(mode&K_NOECHO)) ! 212: bputs("\b \b"); ! 213: break; ! 214: case 9: /* Ctrl-I/TAB */ ! 215: if(!(i%TABSIZE)) { ! 216: if(ins) { ! 217: if(l<maxlen) ! 218: l++; ! 219: for(x=l;x>i;x--) ! 220: str1[x]=str1[x-1]; ! 221: if(i==maxlen-1) ! 222: ins=0; } ! 223: str1[i++]=SP; ! 224: if(!(mode&K_NOECHO)) ! 225: outchar(SP); } ! 226: while(i<maxlen && i%TABSIZE) { ! 227: if(ins) { ! 228: if(l<maxlen) ! 229: l++; ! 230: for(x=l;x>i;x--) ! 231: str1[x]=str1[x-1]; ! 232: if(i==maxlen-1) ! 233: ins=0; } ! 234: str1[i++]=SP; ! 235: if(!(mode&K_NOECHO)) ! 236: outchar(SP); } ! 237: if(ins && !(mode&K_NOECHO)) ! 238: redrwstr(str1,i,l,0); ! 239: break; ! 240: ! 241: case 12: /* Ctrl-L Center line (used to be Ctrl-V) */ ! 242: str1[l]=0; ! 243: l=bstrlen(str1); ! 244: if(!l) break; ! 245: for(x=0;x<(maxlen-l)/2;x++) ! 246: str2[x]=SP; ! 247: str2[x]=0; ! 248: strcat(str2,str1); ! 249: strcpy(strout,str2); ! 250: l=strlen(strout); ! 251: if(mode&K_NOECHO) ! 252: return(l); ! 253: if(mode&K_MSG) ! 254: redrwstr(strout,i,l,K_MSG); ! 255: else { ! 256: while(i--) ! 257: bputs("\b"); ! 258: bputs(strout); ! 259: if(mode&K_LINE) ! 260: attr(LIGHTGRAY); } ! 261: CRLF; ! 262: return(l); ! 263: ! 264: case 14: /* Ctrl-N Next word */ ! 265: if(i<l && (useron.misc&ANSI)) { ! 266: x=i; ! 267: while(str1[i]!=SP && i<l) ! 268: i++; ! 269: while(str1[i]==SP && i<l) ! 270: i++; ! 271: bprintf("\x1b[%dC",i-x); } ! 272: break; ! 273: case 18: /* Ctrl-R Redraw Line */ ! 274: if(!(mode&K_NOECHO)) ! 275: redrwstr(str1,i,l,0); ! 276: break; ! 277: case 22: /* Ctrl-V Toggles Insert/Overwrite */ ! 278: if(!(useron.misc&ANSI) || mode&K_NOECHO) ! 279: break; ! 280: if(ins) { ! 281: ins=0; ! 282: redrwstr(str1,i,l,0); } ! 283: else if(i<l) { ! 284: ins=1; ! 285: bprintf("\x1b[s\x1b[79C"); /* save pos */ ! 286: z=curatr; /* and go to EOL */ ! 287: attr(z|BLINK|HIGH); ! 288: outchar('�'); ! 289: attr(z); ! 290: bputs("\x1b[u"); } /* restore pos */ ! 291: break; ! 292: case 23: /* Ctrl-W Delete word left */ ! 293: if(i<l) { ! 294: x=i; /* x=original offset */ ! 295: while(i && str1[i-1]==SP) { ! 296: outchar(BS); ! 297: i--; } ! 298: while(i && str1[i-1]!=SP) { ! 299: outchar(BS); ! 300: i--; } ! 301: z=i; /* i=z=new offset */ ! 302: while(z<l-(x-i)) { /* move chars in string */ ! 303: outchar(str1[z]=str1[z+(x-i)]); ! 304: z++; } ! 305: while(z<l) { /* write over extra chars */ ! 306: outchar(SP); ! 307: z++; } ! 308: bprintf("\x1b[%dD",z-i); /* back to new x corridnant */ ! 309: l-=x-i; } /* l=new length */ ! 310: else { ! 311: while(i && str1[i-1]==SP) { ! 312: i--; ! 313: l--; ! 314: if(!(mode&K_NOECHO)) ! 315: bputs("\b \b"); } ! 316: while(i && str1[i-1]!=SP) { ! 317: i--; ! 318: l--; ! 319: if(!(mode&K_NOECHO)) ! 320: bputs("\b \b"); } } ! 321: break; ! 322: case 24: /* Ctrl-X Delete entire line */ ! 323: if(mode&K_NOECHO) ! 324: l=0; ! 325: else { ! 326: while(i<l) { ! 327: outchar(SP); ! 328: i++; } ! 329: while(l) { ! 330: l--; ! 331: bputs("\b \b"); } } ! 332: i=0; ! 333: break; ! 334: case 25: /* Ctrl-Y Delete to end of line */ ! 335: if(useron.misc&ANSI && !(mode&K_NOECHO)) { ! 336: bputs("\x1b[K"); ! 337: l=i; } ! 338: break; ! 339: case 28: /* Ctrl-\ Previous word */ ! 340: if(i && (useron.misc&ANSI) && !(mode&K_NOECHO)) { ! 341: x=i; ! 342: while(str1[i-1]==SP && i) ! 343: i--; ! 344: while(str1[i-1]!=SP && i) ! 345: i--; ! 346: bprintf("\x1b[%dD",x-i); } ! 347: break; ! 348: case 29: /* Ctrl-]/Left Arrow Reverse Cursor Movement */ ! 349: if(i && (useron.misc&ANSI) && !(mode&K_NOECHO)) { ! 350: bputs("\x1b[D"); /* move cursor left one */ ! 351: i--; } ! 352: break; ! 353: case 30: /* Ctrl-^/Up Arrow */ ! 354: if(!(mode&K_EDIT)) ! 355: break; ! 356: if(i>l) ! 357: l=i; ! 358: str1[l]=0; ! 359: strcpy(strout,str1); ! 360: if((stripattr(strout) || ins) && !(mode&K_NOECHO)) ! 361: redrwstr(strout,i,l,K_MSG); ! 362: if(mode&K_LINE && !(mode&K_NOECHO)) ! 363: attr(LIGHTGRAY); ! 364: console|=CON_UPARROW; ! 365: return(l); ! 366: case DEL: /* Ctrl-BkSpc (DEL) Delete current char */ ! 367: if(i==l) { /* Backspace if end of line */ ! 368: if(i) { ! 369: i--; ! 370: l--; ! 371: if(!(mode&K_NOECHO)) ! 372: bputs("\b \b"); ! 373: } ! 374: break; ! 375: } ! 376: l--; ! 377: z=i; ! 378: while(z<l) { /* move the characters in the line */ ! 379: outchar(str1[z]=str1[z+1]); ! 380: z++; } ! 381: outchar(SP); /* write over the last char */ ! 382: bprintf("\x1b[%dD",(l-i)+1); ! 383: break; ! 384: default: ! 385: if(mode&K_WRAP && i==maxlen && ch>=SP && !ins) { ! 386: str1[i]=0; ! 387: if(ch==SP && !(mode&K_CHAT)) { /* don't wrap a space */ ! 388: strcpy(strout,str1); /* as last char */ ! 389: if(stripattr(strout) && !(mode&K_NOECHO)) ! 390: redrwstr(strout,i,l,K_MSG); ! 391: if(!(mode&K_NOECHO)) ! 392: CRLF; ! 393: return(i); } ! 394: x=i-1; ! 395: z=1; ! 396: wordwrap[0]=ch; ! 397: while(str1[x]!=SP && x) ! 398: wordwrap[z++]=str1[x--]; ! 399: if(x<(maxlen/2)) { ! 400: wordwrap[1]=0; /* only wrap one character */ ! 401: strcpy(strout,str1); ! 402: if(stripattr(strout) && !(mode&K_NOECHO)) ! 403: redrwstr(strout,i,l,K_MSG); ! 404: if(!(mode&K_NOECHO)) ! 405: CRLF; ! 406: return(i); } ! 407: wordwrap[z]=0; ! 408: if(!(mode&K_NOECHO)) ! 409: while(z--) { ! 410: bputs("\b \b"); ! 411: i--; } ! 412: strrev(wordwrap); ! 413: str1[x]=0; ! 414: strcpy(strout,str1); ! 415: if(stripattr(strout) && !(mode&K_NOECHO)) ! 416: redrwstr(strout,i,x,(char)mode); ! 417: if(!(mode&K_NOECHO)) ! 418: CRLF; ! 419: return(x); } ! 420: if(i<maxlen && ch>=SP) { ! 421: if(mode&K_UPRLWR) ! 422: if(!i || (i && (str1[i-1]==SP || str1[i-1]=='-' ! 423: || str1[i-1]=='.' || str1[i-1]=='_'))) ! 424: ch=toupper(ch); ! 425: else ! 426: ch=tolower(ch); ! 427: if(ins) { ! 428: if(l<maxlen) /* l<maxlen */ ! 429: l++; ! 430: for(x=l;x>i;x--) ! 431: str1[x]=str1[x-1]; ! 432: rprintf("%.*s",l-i,str1+i); ! 433: rprintf("\x1b[%dD",l-i); ! 434: if(i==maxlen-1) { ! 435: bputs(" \b\b"); ! 436: ins=0; } } ! 437: str1[i++]=ch; ! 438: if(!(mode&K_NOECHO)) ! 439: outchar(ch); } } ! 440: if(i>l) ! 441: l=i; ! 442: if(mode&K_CHAT && !l) ! 443: return(0); } ! 444: if(!online) ! 445: return(0); ! 446: if(i>l) ! 447: l=i; ! 448: str1[l]=0; ! 449: if(!(sys_status&SS_ABORT)) { ! 450: strcpy(strout,str1); ! 451: if((stripattr(strout) || ins) && !(mode&K_NOECHO)) ! 452: redrwstr(strout,i,l,K_MSG); } ! 453: else ! 454: l=0; ! 455: if(mode&K_LINE && !(mode&K_NOECHO)) attr(LIGHTGRAY); ! 456: if(!(mode&(K_NOCRLF|K_NOECHO))) { ! 457: outchar(CR); ! 458: if(!(mode&K_MSG && sys_status&SS_ABORT)) ! 459: outchar(LF); ! 460: lncntr=0; } ! 461: return(l); ! 462: } ! 463: ! 464: /****************************************************************************/ ! 465: /* Hot keyed number input routine. */ ! 466: /* Returns a valid number between 1 and max, 0 if no number entered, or -1 */ ! 467: /* if the user hit 'Q' or ctrl-c */ ! 468: /****************************************************************************/ ! 469: long sbbs_t::getnum(ulong max) ! 470: { ! 471: uchar ch,n=0; ! 472: long i=0; ! 473: ! 474: while(online) { ! 475: ch=getkey(K_UPPER); ! 476: if(ch>0x7f) ! 477: continue; ! 478: if(ch=='Q') { ! 479: outchar('Q'); ! 480: if(useron.misc&COLDKEYS) ! 481: ch=getkey(K_UPPER); ! 482: if(ch==BS) { ! 483: bputs("\b \b"); ! 484: continue; } ! 485: CRLF; ! 486: lncntr=0; ! 487: return(-1); } ! 488: else if(sys_status&SS_ABORT) { ! 489: CRLF; ! 490: lncntr=0; ! 491: return(-1); } ! 492: else if(ch==CR) { ! 493: CRLF; ! 494: lncntr=0; ! 495: return(i); } ! 496: else if(ch==BS && n) { ! 497: bputs("\b \b"); ! 498: i/=10; ! 499: n--; } ! 500: else if(isdigit(ch) && (i*10UL)+(ch&0xf)<=max && (ch!='0' || n)) { ! 501: i*=10L; ! 502: n++; ! 503: i+=ch&0xf; ! 504: outchar(ch); ! 505: if(i*10UL>max && !(useron.misc&COLDKEYS)) { ! 506: CRLF; ! 507: lncntr=0; ! 508: return(i); } } } ! 509: return(0); ! 510: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.