![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to js_console.cpp CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Synchronet] / sbbs / sbbs3|
Return to js_console.cpp CVS log | Up to [Synchronet] / sbbs / sbbs3 |
1.1 root 1: /* js_console.cpp */
2:
3: /* Synchronet JavaScript "Console" Object */
4:
5: /* $Id: js_console.cpp,v 1.58 2004/12/31 02:39:19 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 2003 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: #ifdef JAVASCRIPT
41:
42: /*****************************/
43: /* Console Object Properites */
44: /*****************************/
45: enum {
46: CON_PROP_STATUS
47: ,CON_PROP_LNCNTR
48: ,CON_PROP_ATTR
49: ,CON_PROP_TOS
50: ,CON_PROP_ROWS
51: ,CON_PROP_COLUMNS
52: ,CON_PROP_AUTOTERM
53: ,CON_PROP_TERMINAL
54: ,CON_PROP_WORDWRAP
55: ,CON_PROP_QUESTION
56: ,CON_PROP_TIMEOUT /* User inactivity timeout reference */
57: ,CON_PROP_TIMELEFT_WARN /* low timeleft warning flag */
58: ,CON_PROP_ABORTED
59: ,CON_PROP_ABORTABLE
60: ,CON_PROP_TELNET_MODE
61: ,CON_PROP_GETSTR_OFFSET
62: ,CON_PROP_CTRLKEY_PASSTHRU
63: /* read only */
64: ,CON_PROP_INBUF_LEVEL
65: ,CON_PROP_INBUF_SPACE
66: ,CON_PROP_OUTBUF_LEVEL
67: ,CON_PROP_OUTBUF_SPACE
68: };
69:
70: static JSBool js_console_get(JSContext *cx, JSObject *obj, jsval id, jsval *vp)
71: {
72: ulong val;
73: jsint tiny;
74: JSString* js_str;
75: sbbs_t* sbbs;
76:
77: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
78: return(JS_FALSE);
79:
80: tiny = JSVAL_TO_INT(id);
81:
82: switch(tiny) {
83: case CON_PROP_STATUS:
84: val=sbbs->console;
85: break;
86: case CON_PROP_LNCNTR:
87: val=sbbs->lncntr;
88: break;
89: case CON_PROP_ATTR:
90: val=sbbs->curatr;
91: break;
92: case CON_PROP_TOS:
93: val=sbbs->tos;
94: break;
95: case CON_PROP_ROWS:
96: val=sbbs->rows;
97: break;
98: case CON_PROP_COLUMNS:
99: val=sbbs->cols;
100: break;
101: case CON_PROP_AUTOTERM:
102: val=sbbs->autoterm;
103: break;
104: case CON_PROP_TERMINAL:
105: if((js_str=JS_NewStringCopyZ(cx, sbbs->terminal))==NULL)
106: return(JS_FALSE);
107: *vp = STRING_TO_JSVAL(js_str);
108: return(JS_TRUE);
109: case CON_PROP_TIMEOUT:
110: val=sbbs->timeout;
111: break;
112: case CON_PROP_TIMELEFT_WARN:
113: val=sbbs->timeleft_warn;
114: break;
115: case CON_PROP_ABORTED:
116: *vp=BOOLEAN_TO_JSVAL(INT_TO_BOOL(sbbs->sys_status&SS_ABORT));
117: return(JS_TRUE);
118: case CON_PROP_ABORTABLE:
119: *vp=BOOLEAN_TO_JSVAL(INT_TO_BOOL(sbbs->rio_abortable));
120: return(JS_TRUE);
121: case CON_PROP_TELNET_MODE:
122: val=sbbs->telnet_mode;
123: break;
124: case CON_PROP_GETSTR_OFFSET:
125: val=sbbs->getstr_offset;
126: break;
127: case CON_PROP_WORDWRAP:
128: if((js_str=JS_NewStringCopyZ(cx, sbbs->wordwrap))==NULL)
129: return(JS_FALSE);
130: *vp = STRING_TO_JSVAL(js_str);
131: return(JS_TRUE);
132: case CON_PROP_QUESTION:
133: if((js_str=JS_NewStringCopyZ(cx, sbbs->question))==NULL)
134: return(JS_FALSE);
135: *vp = STRING_TO_JSVAL(js_str);
136: return(JS_TRUE);
137: case CON_PROP_CTRLKEY_PASSTHRU:
138: val=sbbs->cfg.ctrlkey_passthru;
139: break;
140: case CON_PROP_INBUF_LEVEL:
141: val=RingBufFull(&sbbs->inbuf);
142: break;
143: case CON_PROP_INBUF_SPACE:
144: val=RingBufFree(&sbbs->inbuf);
145: break;
146: case CON_PROP_OUTBUF_LEVEL:
147: val=RingBufFull(&sbbs->outbuf);
148: break;
149: case CON_PROP_OUTBUF_SPACE:
150: val=RingBufFree(&sbbs->outbuf);
151: break;
152: default:
153: return(JS_TRUE);
154: }
155:
156: *vp = INT_TO_JSVAL(val);
157:
158: return(JS_TRUE);
159: }
160:
161: static JSBool js_console_set(JSContext *cx, JSObject *obj, jsval id, jsval *vp)
162: {
163: int32 val=0;
164: jsint tiny;
165: sbbs_t* sbbs;
166: JSString* str;
167:
168: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
169: return(JS_FALSE);
170:
171: tiny = JSVAL_TO_INT(id);
172:
173: if(JSVAL_IS_NUMBER(*vp) || JSVAL_IS_BOOLEAN(*vp))
174: JS_ValueToInt32(cx, *vp, &val);
175:
176: switch(tiny) {
177: case CON_PROP_STATUS:
178: sbbs->console=val;
179: break;
180: case CON_PROP_LNCNTR:
181: sbbs->lncntr=val;
182: break;
183: case CON_PROP_ATTR:
184: if(JSVAL_IS_STRING(*vp)) {
185: if((str=JS_ValueToString(cx, *vp))==NULL)
186: break;
187: val=attrstr(JS_GetStringBytes(str));
188: }
189: sbbs->attr(val);
190: break;
191: case CON_PROP_TOS:
192: sbbs->tos=val;
193: break;
194: case CON_PROP_ROWS:
195: sbbs->rows=val;
196: break;
197: case CON_PROP_COLUMNS:
198: sbbs->cols=val;
199: break;
200: case CON_PROP_AUTOTERM:
201: sbbs->autoterm=val;
202: break;
203: case CON_PROP_TERMINAL:
204: if((str=JS_ValueToString(cx, *vp))==NULL)
205: break;
206: SAFECOPY(sbbs->terminal,JS_GetStringBytes(str));
207: break;
208: case CON_PROP_TIMEOUT:
209: sbbs->timeout=val;
210: break;
211: case CON_PROP_TIMELEFT_WARN:
212: sbbs->timeleft_warn=val;
213: break;
214: case CON_PROP_ABORTED:
215: if(val)
216: sbbs->sys_status|=SS_ABORT;
217: else
218: sbbs->sys_status&=~SS_ABORT;
219: break;
220: case CON_PROP_ABORTABLE:
221: sbbs->rio_abortable=val
222: ? true:false; // This is a dumb bool conversion to make BC++ happy
223: break;
224: case CON_PROP_TELNET_MODE:
225: sbbs->telnet_mode=val;
226: break;
227: case CON_PROP_GETSTR_OFFSET:
228: sbbs->getstr_offset=val;
229: break;
230: case CON_PROP_QUESTION:
231: if((str=JS_ValueToString(cx, *vp))==NULL)
232: break;
233: SAFECOPY(sbbs->question,JS_GetStringBytes(str));
234: break;
235: case CON_PROP_CTRLKEY_PASSTHRU:
236: sbbs->cfg.ctrlkey_passthru=val;
237: break;
238: default:
239: return(JS_TRUE);
240: }
241:
242: return(JS_TRUE);
243: }
244:
245: #define CON_PROP_FLAGS JSPROP_ENUMERATE
246:
247: static jsSyncPropertySpec js_console_properties[] = {
248: /* name ,tinyid ,flags ,ver */
249:
250: { "status" ,CON_PROP_STATUS ,CON_PROP_FLAGS ,310},
251: { "line_counter" ,CON_PROP_LNCNTR ,CON_PROP_FLAGS ,310},
252: { "attributes" ,CON_PROP_ATTR ,CON_PROP_FLAGS ,310},
253: { "top_of_screen" ,CON_PROP_TOS ,CON_PROP_FLAGS ,310},
254: { "screen_rows" ,CON_PROP_ROWS ,CON_PROP_FLAGS ,310},
255: { "screen_columns" ,CON_PROP_COLUMNS ,CON_PROP_FLAGS ,311},
256: { "autoterm" ,CON_PROP_AUTOTERM ,CON_PROP_FLAGS ,310},
257: { "terminal" ,CON_PROP_TERMINAL ,CON_PROP_FLAGS ,311},
258: { "timeout" ,CON_PROP_TIMEOUT ,CON_PROP_FLAGS ,310},
259: { "timeleft_warning" ,CON_PROP_TIMELEFT_WARN ,CON_PROP_FLAGS ,310},
260: { "aborted" ,CON_PROP_ABORTED ,CON_PROP_FLAGS ,310},
261: { "abortable" ,CON_PROP_ABORTABLE ,CON_PROP_FLAGS ,310},
262: { "telnet_mode" ,CON_PROP_TELNET_MODE ,CON_PROP_FLAGS ,310},
263: { "wordwrap" ,CON_PROP_WORDWRAP ,JSPROP_ENUMERATE|JSPROP_READONLY ,310},
264: { "question" ,CON_PROP_QUESTION ,CON_PROP_FLAGS ,310},
265: { "getstr_offset" ,CON_PROP_GETSTR_OFFSET ,CON_PROP_FLAGS ,311},
266: { "ctrlkey_passthru" ,CON_PROP_CTRLKEY_PASSTHRU ,CON_PROP_FLAGS ,310},
267: { "input_buffer_level",CON_PROP_INBUF_LEVEL ,JSPROP_ENUMERATE|JSPROP_READONLY, 312},
268: { "input_buffer_space",CON_PROP_INBUF_SPACE ,JSPROP_ENUMERATE|JSPROP_READONLY, 312},
269: { "output_buffer_level",CON_PROP_OUTBUF_LEVEL ,JSPROP_ENUMERATE|JSPROP_READONLY, 312},
270: { "output_buffer_space",CON_PROP_OUTBUF_SPACE ,JSPROP_ENUMERATE|JSPROP_READONLY, 312},
271: {0}
272: };
273:
274: #ifdef _DEBUG
275: static char* con_prop_desc[] = {
276: "status bitfield (see <tt>CON_*</tt> in <tt>sbbsdefs.js</tt> for bit definitions)"
277: ,"current line counter (used for automatic screen pause)"
278: ,"current display attributes (set with number or string value)"
279: ,"set to 1 if the terminal cursor is already at the top of the screen"
280: ,"number of terminal screen rows (in lines)"
281: ,"number of terminal screen columns (in character cells)"
282: ,"bitfield of automatically detected terminal settings "
283: "(see <tt>USER_*</tt> in <tt>sbbsdefs.js</tt> for bit definitions)"
284: ,"terminal type description (e.g. 'ANSI')"
285: ,"user inactivity timeout reference"
286: ,"low timeleft warning flag"
287: ,"input/output has been aborted"
288: ,"output can be aborted with Ctrl-C"
289: ,"current telnet mode bitfield (see <tt>TELNET_MODE_*</tt> in <tt>sbbsdefs.js</tt> for bit definitions)"
290: ,"word-wrap buffer (used by getstr) - <small>READ ONLY</small>"
291: ,"current yes/no question (set by yesno and noyes)"
292: ,"cursor position offset for use with <tt>getstr(K_USEOFFSET)</tt>"
293: ,"control key pass-through bitmask, set bits represent control key combinations "
294: "<i>not</i> handled by <tt>inkey()</tt> method"
295: ,"number of bytes currently in the input buffer (from the remote client) - <small>READ ONLY</small>"
296: ,"number of bytes available in the input buffer - <small>READ ONLY</small>"
297: ,"number of bytes currently in the output buffer (from the local server) - <small>READ ONLY</small>"
298: ,"number of bytes available in the output buffer - <small>READ ONLY</small>"
299: ,NULL
300: };
301: #endif
302:
303: /**************************/
304: /* Console Object Methods */
305: /**************************/
306:
307: static JSBool
308: js_inkey(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
309: {
310: char key[2];
311: int32 mode=0;
312: int32 timeout=0;
313: sbbs_t* sbbs;
314: JSString* js_str;
315:
316: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
317: return(JS_FALSE);
318:
319: if(argc)
320: JS_ValueToInt32(cx,argv[0],&mode);
321: if(argc>1)
322: JS_ValueToInt32(cx,argv[1],&timeout);
323: key[0]=sbbs->inkey(mode,timeout);
324: key[1]=0;
325:
326: if((js_str = JS_NewStringCopyZ(cx, key))==NULL)
327: return(JS_FALSE);
328:
329: *rval = STRING_TO_JSVAL(js_str);
330: return(JS_TRUE);
331: }
332:
333: static JSBool
334: js_getkey(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
335: {
336: char key[2];
337: int32 mode=0;
338: sbbs_t* sbbs;
339: JSString* js_str;
340:
341: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
342: return(JS_FALSE);
343:
344: if(argc)
345: JS_ValueToInt32(cx,argv[0],&mode);
346: key[0]=sbbs->getkey(mode);
347: key[1]=0;
348:
349: if((js_str = JS_NewStringCopyZ(cx, key))==NULL)
350: return(JS_FALSE);
351:
352: *rval = STRING_TO_JSVAL(js_str);
353: return(JS_TRUE);
354: }
355:
356: static JSBool
357: js_handle_ctrlkey(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
358: {
359: char key;
360: int32 mode=0;
361: sbbs_t* sbbs;
362: JSString* js_str;
363:
364: *rval = JSVAL_FALSE;
365:
366: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
367: return(JS_FALSE);
368:
369: if(JSVAL_IS_INT(argv[0]))
370: key=(char)JSVAL_TO_INT(argv[0]);
371: else {
372: if((js_str=JS_ValueToString(cx, argv[0]))==NULL)
373: return(JS_FALSE);
374: key=*JS_GetStringBytes(js_str);
375: }
376:
377: if(argc>1)
378: JS_ValueToInt32(cx, argv[1], &mode);
379:
380: *rval = BOOLEAN_TO_JSVAL(sbbs->handle_ctrlkey(key,mode)==0);
381: return(JS_TRUE);
382: }
383:
384: static JSBool
385: js_getstr(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
386: {
387: char *p;
388: long mode=0;
389: uintN i;
390: size_t maxlen=0;
391: sbbs_t* sbbs;
392: JSString* js_str=NULL;
393:
394: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
395: return(JS_FALSE);
396:
397: for(i=0;i<argc;i++) {
398: if(JSVAL_IS_NUMBER(argv[i])) {
399: if(!maxlen)
400: JS_ValueToInt32(cx,argv[i],(int32*)&maxlen);
401: else
402: JS_ValueToInt32(cx,argv[i],(int32*)&mode);
403: continue;
404: }
405: if(JSVAL_IS_STRING(argv[i])) {
406: js_str = JS_ValueToString(cx, argv[i]);
407: if (!js_str)
408: return(JS_FALSE);
409: }
410: }
411:
412: if(!maxlen) maxlen=128;
413:
414: if((p=(char *)calloc(1,maxlen+1))==NULL)
415: return(JS_FALSE);
416:
417: if(js_str!=NULL)
418: sprintf(p,"%.*s",(int)maxlen,JS_GetStringBytes(js_str));
419:
420: sbbs->getstr(p,maxlen,mode);
421:
422: js_str = JS_NewStringCopyZ(cx, p);
423:
424: free(p);
425:
426: if(js_str==NULL)
427: return(JS_FALSE);
428:
429: *rval = STRING_TO_JSVAL(js_str);
430: return(JS_TRUE);
431: }
432:
433: static JSBool
434: js_getnum(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
435: {
436: ulong maxnum=~0;
437: sbbs_t* sbbs;
438:
439: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
440: return(JS_FALSE);
441:
442: if(argc && JSVAL_IS_NUMBER(argv[0]))
443: JS_ValueToInt32(cx,argv[0],(int32*)&maxnum);
444:
445: *rval = INT_TO_JSVAL(sbbs->getnum(maxnum));
446: return(JS_TRUE);
447: }
448:
449: static JSBool
450: js_getkeys(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
451: {
452: char key[2];
453: uintN i;
454: long val;
455: ulong maxnum=~0;
456: sbbs_t* sbbs;
457: JSString* js_str=NULL;
458:
459: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
460: return(JS_FALSE);
461:
462: for(i=0;i<argc;i++) {
463: if(JSVAL_IS_NUMBER(argv[i])) {
464: JS_ValueToInt32(cx,argv[i],(int32*)&maxnum);
465: continue;
466: }
467: if(JSVAL_IS_STRING(argv[i])) {
468: js_str = JS_ValueToString(cx, argv[i]);
469: }
470: }
471: if(js_str==NULL)
472: return(JS_FALSE);
473:
474: val=sbbs->getkeys(JS_GetStringBytes(js_str),maxnum);
475:
476: if(val==-1) { // abort
477: *rval = INT_TO_JSVAL(0);
478: } else if(val<0) { // number
479: val&=~0x80000000;
480: *rval = INT_TO_JSVAL(val);
481: } else { // key
482: key[0]=(uchar)val;
483: key[1]=0;
484: if((js_str = JS_NewStringCopyZ(cx, key))==NULL)
485: return(JS_FALSE);
486: *rval = STRING_TO_JSVAL(js_str);
487: }
488:
489: return(JS_TRUE);
490: }
491:
492: static JSBool
493: js_gettemplate(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
494: {
495: char str[128];
496: long mode=0;
497: uintN i;
498: sbbs_t* sbbs;
499: JSString* js_str=NULL;
500: JSString* js_fmt=NULL;
501:
502: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
503: return(JS_FALSE);
504:
505: for(i=0;i<argc;i++) {
506: if(JSVAL_IS_STRING(argv[i])) {
507: if(js_fmt==NULL)
508: js_fmt = JS_ValueToString(cx, argv[i]);
509: else
510: js_str = JS_ValueToString(cx, argv[i]);
511: } else if(JSVAL_IS_NUMBER(argv[i]))
512: JS_ValueToInt32(cx,argv[i],(int32*)&mode);
513: }
514:
515: if(js_fmt==NULL)
516: return(JS_FALSE);
517:
518: if(js_str==NULL)
519: str[0]=0;
520: else
521: SAFECOPY(str,JS_GetStringBytes(js_str));
522:
523: sbbs->gettmplt(str,JS_GetStringBytes(js_fmt),mode);
524:
525: if((js_str=JS_NewStringCopyZ(cx, str))==NULL)
526: return(JS_FALSE);
527:
528: *rval = STRING_TO_JSVAL(js_str);
529: return(JS_TRUE);
530: }
531:
532: static JSBool
533: js_ungetstr(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
534: {
535: char* p;
536: sbbs_t* sbbs;
537: JSString* js_str;
538:
539: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
540: return(JS_FALSE);
541:
542: if((js_str=JS_ValueToString(cx, argv[0]))==NULL)
543: return(JS_FALSE);
544:
545: p=JS_GetStringBytes(js_str);
546:
547: while(p && *p)
548: sbbs->ungetkey(*(p++));
549: *rval=JSVAL_VOID;
550: return(JS_TRUE);
551: }
552:
553: static JSBool
554: js_yesno(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
555: {
556: sbbs_t* sbbs;
557: JSString* js_str;
558:
559: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
560: return(JS_FALSE);
561:
562: if((js_str=JS_ValueToString(cx, argv[0]))==NULL)
563: return(JS_FALSE);
564:
565: *rval = BOOLEAN_TO_JSVAL(sbbs->yesno(JS_GetStringBytes(js_str)));
566: return(JS_TRUE);
567: }
568:
569: static JSBool
570: js_noyes(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
571: {
572: sbbs_t* sbbs;
573: JSString* js_str;
574:
575: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
576: return(JS_FALSE);
577:
578: if((js_str=JS_ValueToString(cx, argv[0]))==NULL)
579: return(JS_FALSE);
580:
581: *rval = BOOLEAN_TO_JSVAL(sbbs->noyes(JS_GetStringBytes(js_str)));
582: return(JS_TRUE);
583: }
584:
585: static JSBool
586: js_mnemonics(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
587: {
588: sbbs_t* sbbs;
589: JSString* js_str;
590:
591: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
592: return(JS_FALSE);
593:
594: if((js_str=JS_ValueToString(cx, argv[0]))==NULL)
595: return(JS_FALSE);
596:
597: sbbs->mnemonics(JS_GetStringBytes(js_str));
598: *rval=JSVAL_VOID;
599: return(JS_TRUE);
600: }
601:
602: static JSBool
603: js_clear(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
604: {
605: sbbs_t* sbbs;
606:
607: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
608: return(JS_FALSE);
609:
610: sbbs->CLS;
611: *rval=JSVAL_VOID;
612: return(JS_TRUE);
613: }
614:
615: static JSBool
616: js_clearline(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
617: {
618: sbbs_t* sbbs;
619:
620: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
621: return(JS_FALSE);
622:
623: sbbs->clearline();
624: *rval=JSVAL_VOID;
625: return(JS_TRUE);
626: }
627:
628: static JSBool
629: js_cleartoeol(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
630: {
631: sbbs_t* sbbs;
632:
633: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
634: return(JS_FALSE);
635:
636: sbbs->cleartoeol();
637: *rval=JSVAL_VOID;
638: return(JS_TRUE);
639: }
640:
641: static JSBool
642: js_crlf(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
643: {
644: sbbs_t* sbbs;
645:
646: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
647: return(JS_FALSE);
648:
649: sbbs->outchar(CR);
650: sbbs->outchar(LF);
651: *rval=JSVAL_VOID;
652: return(JS_TRUE);
653: }
654:
655: static JSBool
656: js_pause(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
657: {
658: sbbs_t* sbbs;
659:
660: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
661: return(JS_FALSE);
662:
663: sbbs->pause();
664: *rval=JSVAL_VOID;
665: return(JS_TRUE);
666: }
667:
668: static JSBool
669: js_beep(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
670: {
671: sbbs_t* sbbs;
672: int32 i;
673: int32 count=1;
674:
675: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
676: return(JS_FALSE);
677:
678: if(argc)
679: JS_ValueToInt32(cx, argv[0], &count);
680: for(i=0;i<count;i++)
681: sbbs->outchar('\a');
682:
683: *rval=JSVAL_VOID;
684: return(JS_TRUE);
685: }
686:
687: static JSBool
688: js_print(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
689: {
690: JSString* str;
691: sbbs_t* sbbs;
692:
693: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
694: return(JS_FALSE);
695:
696: str = JS_ValueToString(cx, argv[0]);
697: if (!str)
698: return(JS_FALSE);
699:
700: sbbs->bputs(JS_GetStringBytes(str));
701: *rval=JSVAL_VOID;
702: return(JS_TRUE);
703: }
704:
705: static JSBool
706: js_strlen(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
707: {
708: JSString* str;
709:
710: if((str=JS_ValueToString(cx, argv[0]))==NULL)
711: return(JS_FALSE);
712:
713: *rval = INT_TO_JSVAL(bstrlen(JS_GetStringBytes(str)));
714: return(JS_TRUE);
715: }
716:
717: static JSBool
718: js_write(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
719: {
720: JSString* str;
721: sbbs_t* sbbs;
722:
723: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
724: return(JS_FALSE);
725:
726: str = JS_ValueToString(cx, argv[0]);
727: if (!str)
728: return(JS_FALSE);
729:
730: sbbs->rputs(JS_GetStringBytes(str));
731: *rval=JSVAL_VOID;
732: return(JS_TRUE);
733: }
734:
735: static JSBool
736: js_putmsg(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
737: {
738: long mode=0;
739: JSString* str;
740: sbbs_t* sbbs;
741:
742: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
743: return(JS_FALSE);
744:
745: str = JS_ValueToString(cx, argv[0]);
746: if (!str)
747: return(JS_FALSE);
748:
749: if(argc>1 && JSVAL_IS_NUMBER(argv[1]))
750: JS_ValueToInt32(cx,argv[1],(int32*)&mode);
751:
752: sbbs->putmsg(JS_GetStringBytes(str),mode);
753: *rval=JSVAL_VOID;
754: return(JS_TRUE);
755: }
756:
757: static JSBool
758: js_printfile(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
759: {
760: long mode=0;
761: JSString* str;
762: sbbs_t* sbbs;
763:
764: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
765: return(JS_FALSE);
766:
767: str = JS_ValueToString(cx, argv[0]);
768: if (!str)
769: return(JS_FALSE);
770:
771: if(argc>1 && JSVAL_IS_NUMBER(argv[1]))
772: JS_ValueToInt32(cx,argv[1],(int32*)&mode);
773:
774: sbbs->printfile(JS_GetStringBytes(str),mode);
775: *rval=JSVAL_VOID;
776: return(JS_TRUE);
777: }
778:
779: static JSBool
780: js_printtail(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
781: {
782: int lines=0;
783: long mode=0;
784: uintN i;
785: sbbs_t* sbbs;
786: JSString* js_str=NULL;
787:
788: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
789: return(JS_FALSE);
790:
791: for(i=0;i<argc;i++) {
792: if(JSVAL_IS_NUMBER(argv[i])) {
793: if(!lines)
794: JS_ValueToInt32(cx,argv[i],(int32*)&lines);
795: else
796: JS_ValueToInt32(cx,argv[i],(int32*)&mode);
797: } else if(JSVAL_IS_STRING(argv[i]))
798: js_str = JS_ValueToString(cx, argv[i]);
799: }
800:
801: if(js_str==NULL)
802: return(JS_FALSE);
803:
804: if(!lines)
805: lines=5;
806:
807: sbbs->printtail(JS_GetStringBytes(js_str),lines,mode);
808: *rval=JSVAL_VOID;
809: return(JS_TRUE);
810: }
811:
812: static JSBool
813: js_editfile(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
814: {
815: JSString* str;
816: sbbs_t* sbbs;
817:
818: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
819: return(JS_FALSE);
820:
821: if((str=JS_ValueToString(cx, argv[0]))==NULL)
822: return(JS_FALSE);
823:
824: sbbs->editfile(JS_GetStringBytes(str));
825: *rval=JSVAL_VOID;
826: return(JS_TRUE);
827: }
828:
829:
830: static JSBool
831: js_uselect(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
832: {
833: uintN i;
834: int32 num=0;
835: char* title=NULL;
836: char* item=NULL;
837: char* ar_str;
838: uchar* ar=NULL;
839: sbbs_t* sbbs;
840: JSString* js_str;
841:
842: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
843: return(JS_FALSE);
844:
845: if(!argc) {
846: *rval = INT_TO_JSVAL(sbbs->uselect(0,0,NULL,NULL,NULL));
847: return(JS_TRUE);
848: }
849:
850: for(i=0;i<argc;i++) {
851: if(JSVAL_IS_NUMBER(argv[i])) {
852: JS_ValueToInt32(cx,argv[i],&num);
853: continue;
854: }
855: if((js_str=JS_ValueToString(cx, argv[i]))==NULL)
856: return(JS_FALSE);
857:
858: if(title==NULL)
859: title=JS_GetStringBytes(js_str);
860: else if(item==NULL)
861: item=JS_GetStringBytes(js_str);
862: else {
863: ar_str=JS_GetStringBytes(js_str);
864: ar=arstr(NULL,ar_str,&sbbs->cfg);
865: }
866: }
867:
868: *rval = INT_TO_JSVAL(sbbs->uselect(1, num, title, item, ar));
869: return(JS_TRUE);
870: }
871:
872: static JSBool
873: js_center(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
874: {
875: JSString* str;
876: sbbs_t* sbbs;
877:
878: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
879: return(JS_FALSE);
880:
881: str = JS_ValueToString(cx, argv[0]);
882: if (!str)
883: return(JS_FALSE);
884:
885: sbbs->center(JS_GetStringBytes(str));
886: *rval=JSVAL_VOID;
887: return(JS_TRUE);
888: }
889:
890: static JSBool
891: js_saveline(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
892: {
893: sbbs_t* sbbs;
894:
895: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
896: return(JS_FALSE);
897:
898: sbbs->slatr[sbbs->slcnt]=sbbs->latr;
899: sprintf(sbbs->slbuf[sbbs->slcnt<SAVE_LINES ? sbbs->slcnt++ : sbbs->slcnt]
900: ,"%.*s",sbbs->lbuflen,sbbs->lbuf);
901: sbbs->lbuflen=0;
902: *rval=JSVAL_VOID;
903: return(JS_TRUE);
904: }
905:
906: static JSBool
907: js_restoreline(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
908: {
909: sbbs_t* sbbs;
910:
911: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
912: return(JS_FALSE);
913:
914: sbbs->lbuflen=0;
915: sbbs->attr(sbbs->slatr[--sbbs->slcnt]);
916: sbbs->rputs(sbbs->slbuf[sbbs->slcnt]);
917: sbbs->curatr=LIGHTGRAY;
918: *rval=JSVAL_VOID;
919: return(JS_TRUE);
920: }
921:
922: static JSBool
923: js_ansi(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
924: {
925: int32 attr=0;
926: JSString* js_str;
927: sbbs_t* sbbs;
928:
929: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
930: return(JS_FALSE);
931:
932: if(argc)
933: JS_ValueToInt32(cx,argv[0],&attr);
934: if((js_str=JS_NewStringCopyZ(cx,sbbs->ansi(attr)))==NULL)
935: return(JS_FALSE);
936:
937: *rval = STRING_TO_JSVAL(js_str);
938: return(JS_TRUE);
939: }
940:
941: static JSBool
942: js_pushxy(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
943: {
944: sbbs_t* sbbs;
945:
946: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
947: return(JS_FALSE);
948:
949: sbbs->ANSI_SAVE();
950: *rval=JSVAL_VOID;
951: return(JS_TRUE);
952: }
953:
954: static JSBool
955: js_popxy(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
956: {
957: sbbs_t* sbbs;
958:
959: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
960: return(JS_FALSE);
961:
962: sbbs->ANSI_RESTORE();
963: *rval=JSVAL_VOID;
964: return(JS_TRUE);
965: }
966:
967: static JSBool
968: js_gotoxy(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
969: {
970: int32 x=1,y=1;
971: jsval val;
972: sbbs_t* sbbs;
973:
974: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
975: return(JS_FALSE);
976:
977: if(JSVAL_IS_OBJECT(argv[0])) {
978: JS_GetProperty(cx, JSVAL_TO_OBJECT(argv[0]),"x", &val);
979: JS_ValueToInt32(cx,val,&x);
980: JS_GetProperty(cx, JSVAL_TO_OBJECT(argv[0]),"y", &val);
981: JS_ValueToInt32(cx,val,&y);
982: } else {
983: JS_ValueToInt32(cx,argv[0],&x);
984: JS_ValueToInt32(cx,argv[1],&y);
985: }
986:
987: sbbs->GOTOXY(x,y);
988: *rval=JSVAL_VOID;
989: return(JS_TRUE);
990: }
991:
992:
993: static JSBool
994: js_getxy(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
995: {
996: sbbs_t* sbbs;
997: int x,y;
998: JSObject* screen;
999:
1000: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
1001: return(JS_FALSE);
1002:
1003: sbbs->ansi_getxy(&x,&y);
1004:
1005: if((screen=JS_NewObject(cx,NULL,NULL,obj))==NULL)
1006: return(JS_TRUE);
1007:
1008: JS_DefineProperty(cx, screen, "x", INT_TO_JSVAL(x)
1009: ,NULL,NULL,JSPROP_ENUMERATE);
1010: JS_DefineProperty(cx, screen, "y", INT_TO_JSVAL(y)
1011: ,NULL,NULL,JSPROP_ENUMERATE);
1012:
1013: *rval = OBJECT_TO_JSVAL(screen);
1014: return(JS_TRUE);
1015: }
1016:
1017: static JSBool
1018: js_cursor_home(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
1019: {
1020: sbbs_t* sbbs;
1021:
1022: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
1023: return(JS_FALSE);
1024:
1025: sbbs->cursor_home();
1026: *rval=JSVAL_VOID;
1027: return(JS_TRUE);
1028: }
1029:
1030: static JSBool
1031: js_cursor_up(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
1032: {
1033: int32 val=1;
1034: sbbs_t* sbbs;
1035:
1036: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
1037: return(JS_FALSE);
1038:
1039: if(argc)
1040: JS_ValueToInt32(cx,argv[0],&val);
1041: sbbs->cursor_up(val);
1042: *rval=JSVAL_VOID;
1043: return(JS_TRUE);
1044: }
1045:
1046: static JSBool
1047: js_cursor_down(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
1048: {
1049: int32 val=1;
1050: sbbs_t* sbbs;
1051:
1052: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
1053: return(JS_FALSE);
1054:
1055: if(argc)
1056: JS_ValueToInt32(cx,argv[0],&val);
1057: sbbs->cursor_down(val);
1058: *rval=JSVAL_VOID;
1059: return(JS_TRUE);
1060: }
1061:
1062: static JSBool
1063: js_cursor_right(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
1064: {
1065: int32 val=1;
1066: sbbs_t* sbbs;
1067:
1068: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
1069: return(JS_FALSE);
1070:
1071: if(argc)
1072: JS_ValueToInt32(cx,argv[0],&val);
1073: sbbs->cursor_right(val);
1074: *rval=JSVAL_VOID;
1075: return(JS_TRUE);
1076: }
1077:
1078: static JSBool
1079: js_cursor_left(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
1080: {
1081: int32 val=1;
1082: sbbs_t* sbbs;
1083:
1084: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
1085: return(JS_FALSE);
1086:
1087: if(argc)
1088: JS_ValueToInt32(cx,argv[0],&val);
1089: sbbs->cursor_left(val);
1090: *rval=JSVAL_VOID;
1091: return(JS_TRUE);
1092: }
1093:
1094: static JSBool
1095: js_getlines(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
1096: {
1097: sbbs_t* sbbs;
1098:
1099: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
1100: return(JS_FALSE);
1101:
1102: sbbs->ansi_getlines();
1103: *rval=JSVAL_VOID;
1104: return(JS_TRUE);
1105: }
1106:
1107: static JSBool
1108: js_lock_input(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
1109: {
1110: sbbs_t* sbbs;
1111: JSBool lock=TRUE;
1112:
1113: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
1114: return(JS_FALSE);
1115:
1116: if(argc)
1117: JS_ValueToBoolean(cx, argv[0], &lock);
1118:
1119: if(lock) {
1120: pthread_mutex_lock(&sbbs->input_thread_mutex);
1121: sbbs->input_thread_mutex_locked=true;
1122: } else if(sbbs->input_thread_mutex_locked) {
1123: pthread_mutex_unlock(&sbbs->input_thread_mutex);
1124: sbbs->input_thread_mutex_locked=false;
1125: }
1126:
1127: *rval=JSVAL_VOID;
1128: return(JS_TRUE);
1129: }
1130:
1131: static JSBool
1132: js_telnet_cmd(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
1133: {
1134: sbbs_t* sbbs;
1135: int32 cmd,opt;
1136:
1137: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
1138: return(JS_FALSE);
1139:
1140: JS_ValueToInt32(cx,argv[0],&cmd);
1141: JS_ValueToInt32(cx,argv[0],&opt);
1142:
1143: sbbs->send_telnet_cmd((uchar)cmd,(uchar)opt);
1144:
1145: *rval=JSVAL_VOID;
1146: return(JS_TRUE);
1147: }
1148:
1149:
1150: static jsSyncMethodSpec js_console_functions[] = {
1151: {"inkey", js_inkey, 0, JSTYPE_STRING, JSDOCSTR("[number mode] [,number timeout]")
1152: ,JSDOCSTR("get a single key with optional <i>timeout</i> in milliseconds (defaults to 0, for no wait), "
1153: "see <tt>K_*</tt> in <tt>sbbsdefs.js</tt> for <i>mode</i> bits")
1154: ,311
1155: },
1156: {"getkey", js_getkey, 0, JSTYPE_STRING, JSDOCSTR("[number mode]")
1157: ,JSDOCSTR("get a single key, with wait, "
1158: "see <tt>K_*</tt> in <tt>sbbsdefs.js</tt> for <i>mode</i> bits")
1159: ,310
1160: },
1161: {"getstr", js_getstr, 0, JSTYPE_STRING, JSDOCSTR("[string][,maxlen][,mode]")
1162: ,JSDOCSTR("get a text string from the user, "
1163: "see <tt>K_*</tt> in <tt>sbbsdefs.js</tt> for <i>mode</i> bits")
1164: ,310
1165: },
1166: {"getnum", js_getnum, 0, JSTYPE_NUMBER, JSDOCSTR("[maxnum]")
1167: ,JSDOCSTR("get a number between 1 and <i>maxnum</i> from the user")
1168: ,310
1169: },
1170: {"getkeys", js_getkeys, 1, JSTYPE_NUMBER, JSDOCSTR("string keys [,maxnum]")
1171: ,JSDOCSTR("get one key from of a list of valid command <i>keys</i>, "
1172: "or a number between 1 and <i>maxnum</i>")
1173: ,310
1174: },
1175: {"gettemplate", js_gettemplate, 1, JSTYPE_STRING, JSDOCSTR("format [,string] [,mode]")
1176: ,JSDOCSTR("get a string based on template")
1177: ,310
1178: },
1179: {"ungetstr", js_ungetstr, 1, JSTYPE_VOID, ""
1180: ,JSDOCSTR("put a string in the keyboard buffer")
1181: ,310
1182: },
1183: {"yesno", js_yesno, 1, JSTYPE_BOOLEAN, JSDOCSTR("string question")
1184: ,JSDOCSTR("YES/no question")
1185: ,310
1186: },
1187: {"noyes", js_noyes, 1, JSTYPE_BOOLEAN, JSDOCSTR("string question")
1188: ,JSDOCSTR("NO/yes question")
1189: ,310
1190: },
1191: {"mnemonics", js_mnemonics, 1, JSTYPE_VOID, JSDOCSTR("string text")
1192: ,JSDOCSTR("print a mnemonics string")
1193: ,310
1194: },
1195: {"clear", js_clear, 0, JSTYPE_VOID, ""
1196: ,JSDOCSTR("clear screen and home cursor")
1197: ,310
1198: },
1199: {"home", js_cursor_home, 0, JSTYPE_VOID, ""
1200: ,JSDOCSTR("send cursor to home position (x,y:1,1)")
1201: ,311
1202: },
1203: {"clearline", js_clearline, 0, JSTYPE_VOID, ""
1204: ,JSDOCSTR("clear current line")
1205: ,310
1206: },
1207: {"cleartoeol", js_cleartoeol, 0, JSTYPE_VOID, ""
1208: ,JSDOCSTR("clear to end-of-line (ANSI)")
1209: ,311
1210: },
1211: {"crlf", js_crlf, 0, JSTYPE_VOID, ""
1212: ,JSDOCSTR("output a carriage-return/line-feed pair (new-line)")
1213: ,310
1214: },
1215: {"pause", js_pause, 0, JSTYPE_VOID, ""
1216: ,JSDOCSTR("display pause prompt and wait for key hit")
1217: ,310
1218: },
1219: {"beep", js_beep, 1, JSTYPE_VOID, JSDOCSTR("[number count]")
1220: ,JSDOCSTR("beep for count number of times (default count is 1)")
1221: ,311
1222: },
1223: {"print", js_print, 1, JSTYPE_VOID, JSDOCSTR("string text")
1224: ,JSDOCSTR("display a string (supports Ctrl-A codes)")
1225: ,310
1226: },
1227: {"write", js_write, 1, JSTYPE_VOID, JSDOCSTR("string text")
1228: ,JSDOCSTR("display a raw string")
1229: ,310
1230: },
1231: {"putmsg", js_putmsg, 1, JSTYPE_VOID, JSDOCSTR("string text [,number mode]")
1232: ,JSDOCSTR("display message text (Ctrl-A codes, @-codes, pipe codes, etc), "
1233: "see <tt>P_*</tt> in <tt>sbbsdefs.js</tt> for <i>mode</i> bits")
1234: ,310
1235: },
1236: {"center", js_center, 1, JSTYPE_VOID, JSDOCSTR("string text")
1237: ,JSDOCSTR("display a string centered on the screen")
1238: ,310
1239: },
1240: {"strlen", js_strlen, 1, JSTYPE_NUMBER, JSDOCSTR("string text")
1241: ,JSDOCSTR("returns the number of characters in text, excluding Ctrl-A codes")
1242: ,310
1243: },
1244: {"printfile", js_printfile, 1, JSTYPE_VOID, JSDOCSTR("string text [,number mode]")
1245: ,JSDOCSTR("print a message text file with optional mode")
1246: ,310
1247: },
1248: {"printtail", js_printtail, 2, JSTYPE_VOID, JSDOCSTR("string text, number lines [,number mode]")
1249: ,JSDOCSTR("print last x lines of file with optional mode")
1250: ,310
1251: },
1252: {"editfile", js_editfile, 1, JSTYPE_VOID, JSDOCSTR("string filename")
1253: ,JSDOCSTR("edit/create a text file using the user's preferred message editor")
1254: ,310
1255: },
1256: {"uselect", js_uselect, 0, JSTYPE_NUMBER, JSDOCSTR("[number, string title, string item, string ars]")
1257: ,JSDOCSTR("user selection menu, call for each item, then with no args to display select menu")
1258: ,312
1259: },
1260: {"saveline", js_saveline, 0, JSTYPE_VOID, ""
1261: ,JSDOCSTR("save last output line")
1262: ,310
1263: },
1264: {"restoreline", js_restoreline, 0, JSTYPE_VOID, ""
1265: ,JSDOCSTR("restore last output line")
1266: ,310
1267: },
1268: {"ansi", js_ansi, 1, JSTYPE_STRING, JSDOCSTR("number attribute")
1269: ,JSDOCSTR("returns ANSI encoding of specified attribute")
1270: ,310
1271: },
1272: {"ansi_save", js_pushxy, 0, JSTYPE_ALIAS },
1273: {"ansi_pushxy", js_pushxy, 0, JSTYPE_ALIAS },
1274: {"pushxy", js_pushxy, 0, JSTYPE_VOID, ""
1275: ,JSDOCSTR("save current cursor position (AKA ansi_save)")
1276: ,311
1277: },
1278: {"ansi_restore", js_popxy, 0, JSTYPE_ALIAS },
1279: {"ansi_popxy", js_popxy, 0, JSTYPE_ALIAS },
1280: {"popxy", js_popxy, 0, JSTYPE_VOID, ""
1281: ,JSDOCSTR("restore saved cursor position (AKA ansi_restore)")
1282: ,311
1283: },
1284: {"ansi_gotoxy", js_gotoxy, 1, JSTYPE_ALIAS },
1285: {"gotoxy", js_gotoxy, 1, JSTYPE_VOID, JSDOCSTR("number x,y")
1286: ,JSDOCSTR("Move cursor to a specific screen coordinate (ANSI), "
1287: "arguments can be separate x and y cooridinates or an object with x and y properites "
1288: "(like that returned from <tt>console.getxy()</tt>)")
1289: ,311
1290: },
1291: {"ansi_up", js_cursor_up, 0, JSTYPE_ALIAS },
1292: {"up", js_cursor_up, 0, JSTYPE_VOID, JSDOCSTR("[number rows]")
1293: ,JSDOCSTR("Move cursor up one or more rows (ANSI)")
1294: ,311
1295: },
1296: {"ansi_down", js_cursor_down, 0, JSTYPE_ALIAS },
1297: {"down", js_cursor_down, 0, JSTYPE_VOID, JSDOCSTR("[number rows]")
1298: ,JSDOCSTR("Move cursor down one or more rows (ANSI)")
1299: ,311
1300: },
1301: {"ansi_right", js_cursor_right, 0, JSTYPE_ALIAS },
1302: {"right", js_cursor_right, 0, JSTYPE_VOID, JSDOCSTR("[number columns]")
1303: ,JSDOCSTR("Move cursor right one or more columns (ANSI)")
1304: ,311
1305: },
1306: {"ansi_left", js_cursor_left, 0, JSTYPE_ALIAS },
1307: {"left", js_cursor_left, 0, JSTYPE_VOID, JSDOCSTR("[number columns]")
1308: ,JSDOCSTR("Move cursor left one or more columns (ANSI)")
1309: ,311
1310: },
1311: {"ansi_getlines", js_getlines, 0, JSTYPE_ALIAS },
1312: {"getlines", js_getlines, 0, JSTYPE_VOID, ""
1313: ,JSDOCSTR("Auto-detect the number of rows/lines on the user's terminal (ANSI)")
1314: ,311
1315: },
1316: {"ansi_getxy", js_getxy, 0, JSTYPE_ALIAS },
1317: {"getxy", js_getxy, 0, JSTYPE_OBJECT, ""
1318: ,JSDOCSTR("Returns the current cursor position as an object (with x and y properties)")
1319: ,311
1320: },
1321: {"lock_input", js_lock_input, 1, JSTYPE_VOID, JSDOCSTR("[boolean lock]")
1322: ,JSDOCSTR("Lock the user input thread (allowing direct client socket access)")
1323: ,310
1324: },
1325: {"telnet_cmd", js_telnet_cmd, 2, JSTYPE_VOID, JSDOCSTR("number cmd [,number option]")
1326: ,JSDOCSTR("Send telnet command (with optional command option) to remote client")
1327: ,310
1328: },
1329: {"handle_ctrlkey", js_handle_ctrlkey, 1, JSTYPE_BOOLEAN, JSDOCSTR("string key [,number mode]")
1330: ,JSDOCSTR("Call internal control key handler for specified control key, returns true if handled")
1331: ,311
1332: },
1333: {0}
1334: };
1335:
1336:
1337: static JSClass js_console_class = {
1338: "Console" /* name */
1339: ,0 /* flags */
1340: ,JS_PropertyStub /* addProperty */
1341: ,JS_PropertyStub /* delProperty */
1342: ,js_console_get /* getProperty */
1343: ,js_console_set /* setProperty */
1344: ,JS_EnumerateStub /* enumerate */
1345: ,JS_ResolveStub /* resolve */
1346: ,JS_ConvertStub /* convert */
1347: ,JS_FinalizeStub /* finalize */
1348: };
1349:
1350: JSObject* js_CreateConsoleObject(JSContext* cx, JSObject* parent)
1351: {
1352: JSObject* obj;
1353: sbbs_t* sbbs;
1354:
1355: if((sbbs=(sbbs_t*)JS_GetContextPrivate(cx))==NULL)
1356: return(NULL);
1357:
1358: if((obj=JS_DefineObject(cx, parent, "console", &js_console_class, NULL
1359: ,JSPROP_ENUMERATE|JSPROP_READONLY))==NULL)
1360: return(NULL);
1361:
1362: if(!js_DefineSyncProperties(cx, obj, js_console_properties))
1363: return(NULL);
1364:
1365: if (!js_DefineSyncMethods(cx, obj, js_console_functions, FALSE))
1366: return(NULL);
1367:
1368: /* Create an array of pre-defined colors */
1369:
1370: JSObject* color_list;
1371:
1372: if((color_list=JS_NewArrayObject(cx,0,NULL))==NULL)
1373: return(NULL);
1374:
1375: if(!JS_DefineProperty(cx, obj, "color_list", OBJECT_TO_JSVAL(color_list)
1376: ,NULL, NULL, 0))
1377: return(NULL);
1378:
1379: for(uint i=0;i<sbbs->cfg.total_colors;i++) {
1380:
1381: jsval val=INT_TO_JSVAL(sbbs->cfg.color[i]);
1382: if(!JS_SetElement(cx, color_list, i, &val))
1383: return(NULL);
1384: }
1385:
1386: #ifdef _DEBUG
1387: js_DescribeSyncObject(cx,obj,"Controls the user's Telnet/RLogin terminal",310);
1388: js_CreateArrayOfStrings(cx, obj, "_property_desc_list", con_prop_desc, JSPROP_READONLY);
1389: #endif
1390:
1391: return(obj);
1392: }
1393:
1394: #endif /* JAVSCRIPT */
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.