![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to inkey.cpp CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Synchronet] / sbbs / sbbs3|
Return to inkey.cpp CVS log | Up to [Synchronet] / sbbs / sbbs3 |
1.1 root 1: /* inkey.cpp */
2:
3: /* Synchronet single key input function (no wait) */
4:
5: /* $Id: inkey.cpp,v 1.2 2000/12/11 23:21:11 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: #define LAST_STAT_LINE 16
41:
42: #define nosound()
43:
44: /****************************************************************************/
45: /* Returns character if a key has been hit remotely and responds */
46: /* Called from functions getkey, msgabort and main_sec */
47: /****************************************************************************/
48: char sbbs_t::inkey(long mode)
49: {
50: char str[512];
51: char tmp[512];
52: uchar ch=0;
53: uint i,j;
54:
55: if(keybuftop!=keybufbot) {
56: ch=keybuf[keybufbot++];
57: if(keybufbot==KEY_BUFSIZE)
58: keybufbot=0;
59: } else
60: ch=incom();
61: if(ch==0) {
62: if(!(mode&K_GETSTR) || mode&K_LOWPRIO || cfg.node_misc&NM_LOWPRIO)
63: mswait(1);
64: return(0);
65: }
66:
67: if(cfg.node_misc&NM_7BITONLY
68: && (!(sys_status&SS_USERON) || useron.misc&NO_EXASCII))
69: ch&=0x7f;
70:
71: timeout=time(NULL);
72: if(ch==3) { /* Ctrl-C Abort */
73: sys_status|=SS_ABORT;
74: if(mode&K_SPIN) /* back space once if on spinning cursor */
75: bputs("\b \b");
76: return(0); }
77: if(ch==26 && action!=NODE_PCHT) { /* Ctrl-Z toggle raw input mode */
78: if(mode&K_SPIN)
79: bputs("\b ");
80: SAVELINE;
81: attr(LIGHTGRAY);
82: CRLF;
83: bputs(text[RawMsgInputModeIsNow]);
84: if(console&CON_RAW_IN)
85: bputs(text[OFF]);
86: else
87: bputs(text[ON]);
88: console^=CON_RAW_IN;
89: CRLF;
90: CRLF;
91: RESTORELINE;
92: lncntr=0;
93: if(action!=NODE_MAIN && action!=NODE_XFER)
94: return(26);
95: return(0); }
96: if(console&CON_RAW_IN) /* ignore ctrl-key commands if in raw mode */
97: return(ch);
98:
99: if(ch<SP) { /* Control chars */
100: if(ch==LF) /* ignore LF's in not in raw mode */
101: return(0);
102: if(ch==15) { /* Ctrl-O toggles pause temporarily */
103: useron.misc^=UPAUSE;
104: return(0); }
105: if(ch==0x10) { /* Ctrl-P Private node-node comm */
106: if(!(sys_status&SS_USERON))
107: return(0); /* keep from being recursive */
108: if(mode&K_SPIN)
109: bputs("\b ");
110: if(sys_status&SS_SPLITP) {
111: #if 0 /* screen size */
112: if((scrnbuf=(uchar*)MALLOC((24L*80L)*2L))==NULL) {
113: errormsg(WHERE,ERR_ALLOC,nulstr,(24L*80L)*2L);
114: return(CR); }
115: gettext(1,1,80,24,scrnbuf);
116: x=lclwx();
117: y=lclwy();
118: CLS;
119: #endif
120: }
121: else {
122: SAVELINE;
123: attr(LIGHTGRAY);
124: CRLF; }
125: nodesync(); /* read any waiting messages */
126: nodemsg(); /* send a message */
127: SYNC;
128: if(sys_status&SS_SPLITP) {
129: #if 0 /* screen size */
130: lncntr=0;
131: CLS;
132: for(i=0;i<((24*80)-1)*2;i+=2) {
133: if(scrnbuf[i+1]!=curatr)
134: attr(scrnbuf[i+1]);
135: outchar(scrnbuf[i]); }
136: FREE(scrnbuf);
137: GOTOXY(x,y);
138: #endif
139: }
140: else {
141: CRLF;
142: RESTORELINE; }
143: lncntr=0;
144: return(0); }
145:
146: if(ch==21) { /* Ctrl-U Users online */
147: if(!(sys_status&SS_USERON))
148: return(0);
149: if(mode&K_SPIN)
150: bputs("\b ");
151: if(sys_status&SS_SPLITP) {
152: #if 0 /* screen size */
153: if((scrnbuf=(uchar*)MALLOC((24L*80L)*2L))==NULL) {
154: errormsg(WHERE,ERR_ALLOC,nulstr,(24L*80L)*2L);
155: return(CR); }
156: gettext(1,1,80,24,scrnbuf);
157: x=lclwx();
158: y=lclwy();
159: CLS;
160: #endif
161: }
162: else {
163: SAVELINE;
164: attr(LIGHTGRAY);
165: CRLF; }
166: whos_online(true); /* list users */
167: ASYNC;
168: if(sys_status&SS_SPLITP) {
169: #if 0 /* screen size */
170: CRLF;
171: nodesync();
172: pause();
173: CLS;
174: for(i=0;i<((24*80)-1)*2;i+=2) {
175: if(scrnbuf[i+1]!=curatr)
176: attr(scrnbuf[i+1]);
177: outchar(scrnbuf[i]); }
178: FREE(scrnbuf);
179: GOTOXY(x,y);
180: #endif
181: }
182: else {
183: CRLF;
184: RESTORELINE; }
185: lncntr=0;
186: return(0); }
187: if(ch==20 && !(sys_status&SS_SPLITP)) { /* Ctrl-T Time information */
188: if(!(sys_status&SS_USERON))
189: return(0);
190: if(mode&K_SPIN)
191: bputs("\b ");
192: SAVELINE;
193: attr(LIGHTGRAY);
194: now=time(NULL);
195: bprintf(text[TiLogon],timestr(&logontime));
196: bprintf(text[TiNow],timestr(&now));
197: bprintf(text[TiTimeon]
198: ,sectostr(now-logontime,tmp));
199: bprintf(text[TiTimeLeft]
200: ,sectostr(timeleft,tmp));
201: SYNC;
202: RESTORELINE;
203: lncntr=0;
204: return(0); }
205: if(ch==11 && !(sys_status&SS_SPLITP)) { /* Ctrl-k Control key menu */
206: if(!(sys_status&SS_USERON))
207: return(0);
208: if(mode&K_SPIN)
209: bputs("\b ");
210: SAVELINE;
211: attr(LIGHTGRAY);
212: lncntr=0;
213: bputs(text[ControlKeyMenu]);
214: ASYNC;
215: RESTORELINE;
216: lncntr=0;
217: return(0); }
218:
219: if(ch==ESC && console&CON_R_INPUT) {
220: if(mode&K_GETSTR)
221: i=60; // 3 seconds in GETSTR mode
222: else
223: i=20; // 1 second otherwise
224: for(;i && !rioctl(RXBC);i--)
225: mswait(50);
226: if(!i) // timed-out waiting for '['
227: return(ESC);
228: ch=incom();
229: if(ch!='[') {
230: ungetkey(ESC);
231: ungetkey(ch);
232: return(0); }
233: i=j=0;
234: autoterm|=ANSI; /* <ESC>[x means they have ANSI */
235: if(!(useron.misc&ANSI) && useron.misc&AUTOTERM && sys_status&SS_USERON
236: && useron.number) {
237: useron.misc|=ANSI;
238: putuserrec(&cfg,useron.number,U_MISC,8,ultoa(useron.misc,str,16)); }
239: while(i<10 && j<30) { /* up to 3 seconds */
240: if(rioctl(RXBC)) {
241: ch=incom();
242: if(ch!=';' && !isdigit(ch) && ch!='R') { /* other ANSI */
243: switch(ch) {
244: case 'A':
245: return(0x1e); /* ctrl-^ (up arrow) */
246: case 'B':
247: return(LF); /* ctrl-j (dn arrow) */
248: case 'C':
249: return(0x6); /* ctrl-f (rt arrow) */
250: case 'D':
251: return(0x1d); /* ctrl-] (lf arrow) */
252: case 'H':
253: return(0x2); /* ctrl-b (beg line) */
254: case 'K':
255: return(0x5); /* ctrl-e (end line) */
256: }
257: ungetkey(ESC);
258: ungetkey('[');
259: for(j=0;j<i;j++)
260: ungetkey(str[j]);
261: ungetkey(ch);
262: return(0); }
263: if(ch=='R') { /* cursor position report */
264: if(i && !(useron.rows)) { /* auto-detect rows */
265: str[i]=0;
266: rows=atoi(str);
267: if(rows<5 || rows>99) rows=24; }
268: return(0); }
269: str[i++]=ch; }
270: else {
271: mswait(100);
272: j++; } }
273:
274: ungetkey(ESC); /* should only get here if time-out */
275: ungetkey('[');
276: for(j=0;j<i;j++)
277: ungetkey(str[j]);
278: return(0); }
279:
280: } /* end of control chars */
281:
282: return(ch);
283: }
284:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.