![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to js_system.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Synchronet] / sbbs / src / sbbs3|
Return to js_system.c CVS log | Up to [Synchronet] / sbbs / src / sbbs3 |
1.1 root 1: /* js_system.c */
2:
3: /* Synchronet JavaScript "system" Object */
4:
5: /* $Id: js_system.c,v 1.107 2006/06/15 03:20:00 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 2006 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: /* System Object Properites */
43: enum {
44: SYS_PROP_NAME
45: ,SYS_PROP_OP
46: ,SYS_PROP_ID
47: ,SYS_PROP_MISC
48: ,SYS_PROP_PSNAME
49: ,SYS_PROP_PSNUM
50: ,SYS_PROP_INETADDR
51: ,SYS_PROP_LOCATION
52: ,SYS_PROP_TIMEZONE
53: ,SYS_PROP_PWDAYS
54: ,SYS_PROP_DELDAYS
55:
56: ,SYS_PROP_LASTUSER
57: ,SYS_PROP_LASTUSERON
58: ,SYS_PROP_FREEDISKSPACE
59: ,SYS_PROP_FREEDISKSPACEK
60:
61: ,SYS_PROP_NODES
62: ,SYS_PROP_LASTNODE
63:
64: ,SYS_PROP_NEW_PASS
65: ,SYS_PROP_NEW_MAGIC
66: ,SYS_PROP_NEW_LEVEL
67: ,SYS_PROP_NEW_FLAGS1
68: ,SYS_PROP_NEW_FLAGS2
69: ,SYS_PROP_NEW_FLAGS3
70: ,SYS_PROP_NEW_FLAGS4
71: ,SYS_PROP_NEW_REST
72: ,SYS_PROP_NEW_EXEMPT
73: ,SYS_PROP_NEW_CDT
74: ,SYS_PROP_NEW_MIN
75: ,SYS_PROP_NEW_SHELL
76: ,SYS_PROP_NEW_XEDIT
77: ,SYS_PROP_NEW_MISC
78: ,SYS_PROP_NEW_PROT
79: ,SYS_PROP_NEW_EXPIRE
80: ,SYS_PROP_NEW_UQ
81:
82: ,SYS_PROP_EXPIRED_LEVEL
83: ,SYS_PROP_EXPIRED_FLAGS1
84: ,SYS_PROP_EXPIRED_FLAGS2
85: ,SYS_PROP_EXPIRED_FLAGS3
86: ,SYS_PROP_EXPIRED_FLAGS4
87: ,SYS_PROP_EXPIRED_REST
88: ,SYS_PROP_EXPIRED_EXEMPT
89:
90: /* directories */
91: ,SYS_PROP_NODE_DIR
92: ,SYS_PROP_CTRL_DIR
93: ,SYS_PROP_DATA_DIR
94: ,SYS_PROP_TEXT_DIR
95: ,SYS_PROP_TEMP_DIR
96: ,SYS_PROP_EXEC_DIR
97: ,SYS_PROP_MODS_DIR
98: ,SYS_PROP_LOGS_DIR
99:
100: /* msclock() access */
101: ,SYS_PROP_CLOCK
102: ,SYS_PROP_CLOCK_PER_SEC
103: ,SYS_PROP_TIMER
104:
105: /* filenames */
106: ,SYS_PROP_DEVNULL
107: ,SYS_PROP_TEMP_PATH
108: ,SYS_PROP_CMD_SHELL
109:
110: /* last */
111: ,SYS_PROP_LOCAL_HOSTNAME
112: };
113:
114: static JSBool js_system_get(JSContext *cx, JSObject *obj, jsval id, jsval *vp)
115: {
116: char str[128];
117: char* p=NULL;
118: jsint tiny;
119: JSString* js_str;
120: ulong val;
121: scfg_t* cfg;
122:
123: if((cfg=(scfg_t*)JS_GetPrivate(cx,obj))==NULL)
124: return(JS_FALSE);
125:
126: tiny = JSVAL_TO_INT(id);
127:
128: switch(tiny) {
129: case SYS_PROP_NAME:
130: p=cfg->sys_name;
131: break;
132: case SYS_PROP_OP:
133: p=cfg->sys_op;
134: break;
135: case SYS_PROP_ID:
136: p=cfg->sys_id;
137: break;
138: case SYS_PROP_MISC:
139: JS_NewNumberValue(cx,cfg->sys_misc,vp);
140: break;
141: case SYS_PROP_PSNAME:
142: p=cfg->sys_psname;
143: break;
144: case SYS_PROP_PSNUM:
145: *vp = INT_TO_JSVAL(cfg->sys_psnum);
146: break;
147: case SYS_PROP_INETADDR:
148: p=cfg->sys_inetaddr;
149: break;
150: case SYS_PROP_LOCATION:
151: p=cfg->sys_location;
152: break;
153: case SYS_PROP_TIMEZONE:
154: sys_timezone(cfg);
155: *vp = INT_TO_JSVAL(cfg->sys_timezone);
156: break;
157: case SYS_PROP_NODES:
158: *vp = INT_TO_JSVAL(cfg->sys_nodes);
159: break;
160: case SYS_PROP_LASTNODE:
161: *vp = INT_TO_JSVAL(cfg->sys_lastnode);
162: break;
163: case SYS_PROP_PWDAYS:
164: *vp = INT_TO_JSVAL(cfg->sys_pwdays);
165: break;
166: case SYS_PROP_DELDAYS:
167: *vp = INT_TO_JSVAL(cfg->sys_deldays);
168: break;
169: case SYS_PROP_LASTUSER:
170: *vp = INT_TO_JSVAL(lastuser(cfg));
171: break;
172: case SYS_PROP_LASTUSERON:
173: p=lastuseron;
174: break;
175: case SYS_PROP_FREEDISKSPACE:
176: case SYS_PROP_FREEDISKSPACEK:
177: if(tiny==SYS_PROP_FREEDISKSPACE)
178: val = getfreediskspace(cfg->temp_dir,0);
179: else
180: val = getfreediskspace(cfg->temp_dir,1024);
181: JS_NewNumberValue(cx,val,vp);
182: break;
183:
184: case SYS_PROP_NEW_PASS:
185: p=cfg->new_pass;
186: break;
187: case SYS_PROP_NEW_MAGIC:
188: p=cfg->new_magic;
189: break;
190: case SYS_PROP_NEW_LEVEL:
191: *vp = INT_TO_JSVAL(cfg->new_level);
192: break;
193: case SYS_PROP_NEW_FLAGS1:
194: *vp = INT_TO_JSVAL(cfg->new_flags1);
195: break;
196: case SYS_PROP_NEW_FLAGS2:
197: *vp = INT_TO_JSVAL(cfg->new_flags2);
198: break;
199: case SYS_PROP_NEW_FLAGS3:
200: *vp = INT_TO_JSVAL(cfg->new_flags3);
201: break;
202: case SYS_PROP_NEW_FLAGS4:
203: *vp = INT_TO_JSVAL(cfg->new_flags4);
204: break;
205: case SYS_PROP_NEW_REST:
206: *vp = INT_TO_JSVAL(cfg->new_rest);
207: break;
208: case SYS_PROP_NEW_EXEMPT:
209: *vp = INT_TO_JSVAL(cfg->new_exempt);
210: break;
211: case SYS_PROP_NEW_CDT:
212: JS_NewNumberValue(cx,cfg->new_cdt,vp);
213: break;
214: case SYS_PROP_NEW_MIN:
215: JS_NewNumberValue(cx,cfg->new_min,vp);
216: break;
217: case SYS_PROP_NEW_SHELL:
218: *vp = INT_TO_JSVAL(cfg->new_shell);
219: break;
220: case SYS_PROP_NEW_XEDIT:
221: p=cfg->new_xedit;
222: break;
223: case SYS_PROP_NEW_MISC:
224: JS_NewNumberValue(cx,cfg->new_misc,vp);
225: break;
226: case SYS_PROP_NEW_PROT:
227: sprintf(str,"%c",cfg->new_prot);
228: p=str;
229: break;
230: case SYS_PROP_NEW_EXPIRE:
231: JS_NewNumberValue(cx,cfg->new_expire,vp);
232: break;
233: case SYS_PROP_NEW_UQ:
234: JS_NewNumberValue(cx,cfg->uq,vp);
235: break;
236:
237: case SYS_PROP_EXPIRED_LEVEL:
238: *vp = INT_TO_JSVAL(cfg->expired_level);
239: break;
240: case SYS_PROP_EXPIRED_FLAGS1:
241: *vp = INT_TO_JSVAL(cfg->expired_flags1);
242: break;
243: case SYS_PROP_EXPIRED_FLAGS2:
244: *vp = INT_TO_JSVAL(cfg->expired_flags2);
245: break;
246: case SYS_PROP_EXPIRED_FLAGS3:
247: *vp = INT_TO_JSVAL(cfg->expired_flags3);
248: break;
249: case SYS_PROP_EXPIRED_FLAGS4:
250: *vp = INT_TO_JSVAL(cfg->expired_flags4);
251: break;
252: case SYS_PROP_EXPIRED_REST:
253: *vp = INT_TO_JSVAL(cfg->expired_rest);
254: break;
255: case SYS_PROP_EXPIRED_EXEMPT:
256: *vp = INT_TO_JSVAL(cfg->expired_exempt);
257: break;
258: case SYS_PROP_NODE_DIR:
259: p=cfg->node_dir;
260: break;
261: case SYS_PROP_CTRL_DIR:
262: p=cfg->ctrl_dir;
263: break;
264: case SYS_PROP_DATA_DIR:
265: p=cfg->data_dir;
266: break;
267: case SYS_PROP_TEXT_DIR:
268: p=cfg->text_dir;
269: break;
270: case SYS_PROP_TEMP_DIR:
271: p=cfg->temp_dir;
272: break;
273: case SYS_PROP_EXEC_DIR:
274: p=cfg->exec_dir;
275: break;
276: case SYS_PROP_MODS_DIR:
277: p=cfg->mods_dir;
278: break;
279: case SYS_PROP_LOGS_DIR:
280: p=cfg->logs_dir;
281: break;
282:
283: case SYS_PROP_DEVNULL:
284: p=_PATH_DEVNULL;
285: break;
286: case SYS_PROP_TEMP_PATH:
287: p=_PATH_TMP;
288: break;
289:
290: case SYS_PROP_CMD_SHELL:
291: p=os_cmdshell();
292: break;
293:
294: case SYS_PROP_CLOCK:
295: JS_NewNumberValue(cx,msclock(),vp);
296: break;
297: case SYS_PROP_CLOCK_PER_SEC:
298: JS_NewNumberValue(cx,MSCLOCKS_PER_SEC,vp);
299: break;
300: case SYS_PROP_TIMER:
301: JS_NewNumberValue(cx,xp_timer(),vp);
302: break;
303:
304: case SYS_PROP_LOCAL_HOSTNAME:
305: gethostname(str,sizeof(str));
306: p=str;
307: break;
308: }
309:
310: if(p!=NULL) { /* string property */
311: if((js_str=JS_NewStringCopyZ(cx, p))==NULL)
312: return(JS_FALSE);
313: *vp = STRING_TO_JSVAL(js_str);
314: }
315:
316: return(JS_TRUE);
317: }
318:
319: static JSBool js_system_set(JSContext *cx, JSObject *obj, jsval id, jsval *vp)
320: {
321: jsint tiny;
322: scfg_t* cfg;
323:
324: if((cfg=(scfg_t*)JS_GetPrivate(cx,obj))==NULL)
325: return(JS_FALSE);
326:
327: tiny = JSVAL_TO_INT(id);
328:
329: switch(tiny) {
330: case SYS_PROP_MISC:
331: JS_ValueToInt32(cx, *vp, (int32*)&cfg->sys_misc);
332: break;
333: }
334:
335: return(TRUE);
336: }
337:
338:
339: #define SYSOBJ_FLAGS JSPROP_ENUMERATE|JSPROP_READONLY
340:
341: static jsSyncPropertySpec js_system_properties[] = {
342: /* name, tinyid, flags, ver */
343:
344: { "name", SYS_PROP_NAME, SYSOBJ_FLAGS, 310 },
345: { "operator", SYS_PROP_OP, SYSOBJ_FLAGS, 310 },
346: { "qwk_id", SYS_PROP_ID, SYSOBJ_FLAGS, 310 },
347: { "settings", SYS_PROP_MISC, JSPROP_ENUMERATE, 310 },
348: { "psname", SYS_PROP_PSNAME, SYSOBJ_FLAGS, 310 },
349: { "psnum", SYS_PROP_PSNUM, SYSOBJ_FLAGS, 310 },
350: { "inetaddr", SYS_PROP_INETADDR, JSPROP_READONLY, 310 }, /* alias */
351: { "inet_addr", SYS_PROP_INETADDR, SYSOBJ_FLAGS, 311 },
352: { "location", SYS_PROP_LOCATION, SYSOBJ_FLAGS, 310 },
353: { "timezone", SYS_PROP_TIMEZONE, SYSOBJ_FLAGS, 310 },
354: { "pwdays", SYS_PROP_PWDAYS, SYSOBJ_FLAGS, 310 },
355: { "deldays", SYS_PROP_DELDAYS, SYSOBJ_FLAGS, 310 },
356:
357: { "lastuser", SYS_PROP_LASTUSER ,SYSOBJ_FLAGS, 311 },
358: { "lastuseron", SYS_PROP_LASTUSERON ,SYSOBJ_FLAGS, 310 },
359: { "freediskspace", SYS_PROP_FREEDISKSPACE ,SYSOBJ_FLAGS, 310 },
360: { "freediskspacek", SYS_PROP_FREEDISKSPACEK ,SYSOBJ_FLAGS, 310 },
361:
362: { "nodes", SYS_PROP_NODES, SYSOBJ_FLAGS, 310 },
363: { "lastnode", SYS_PROP_LASTNODE, SYSOBJ_FLAGS, 310 },
364:
365: { "newuser_password", SYS_PROP_NEW_PASS ,SYSOBJ_FLAGS, 310 },
366: { "newuser_magic_word", SYS_PROP_NEW_MAGIC ,SYSOBJ_FLAGS, 310 },
367: { "newuser_level", SYS_PROP_NEW_LEVEL ,SYSOBJ_FLAGS, 310 },
368: { "newuser_flags1", SYS_PROP_NEW_FLAGS1 ,SYSOBJ_FLAGS, 310 },
369: { "newuser_flags2", SYS_PROP_NEW_FLAGS2 ,SYSOBJ_FLAGS, 310 },
370: { "newuser_flags3", SYS_PROP_NEW_FLAGS3 ,SYSOBJ_FLAGS, 310 },
371: { "newuser_flags4", SYS_PROP_NEW_FLAGS4 ,SYSOBJ_FLAGS, 310 },
372: { "newuser_restrictions", SYS_PROP_NEW_REST ,SYSOBJ_FLAGS, 310 },
373: { "newuser_exemptions", SYS_PROP_NEW_EXEMPT ,SYSOBJ_FLAGS, 310 },
374: { "newuser_credits", SYS_PROP_NEW_CDT ,SYSOBJ_FLAGS, 310 },
375: { "newuser_minutes", SYS_PROP_NEW_MIN ,SYSOBJ_FLAGS, 310 },
376: { "newuser_command_shell", SYS_PROP_NEW_SHELL ,SYSOBJ_FLAGS, 310 },
377: { "newuser_editor", SYS_PROP_NEW_XEDIT ,SYSOBJ_FLAGS, 310 },
378: { "newuser_settings", SYS_PROP_NEW_MISC ,SYSOBJ_FLAGS, 310 },
379: { "newuser_download_protocol",SYS_PROP_NEW_PROT ,SYSOBJ_FLAGS, 310 },
380: { "newuser_expiration_days", SYS_PROP_NEW_EXPIRE ,SYSOBJ_FLAGS, 310 },
381: { "newuser_questions", SYS_PROP_NEW_UQ ,SYSOBJ_FLAGS, 310 },
382:
383: { "expired_level", SYS_PROP_EXPIRED_LEVEL ,SYSOBJ_FLAGS, 310 },
384: { "expired_flags1", SYS_PROP_EXPIRED_FLAGS1 ,SYSOBJ_FLAGS, 310 },
385: { "expired_flags2", SYS_PROP_EXPIRED_FLAGS2 ,SYSOBJ_FLAGS, 310 },
386: { "expired_flags3", SYS_PROP_EXPIRED_FLAGS3 ,SYSOBJ_FLAGS, 310 },
387: { "expired_flags4", SYS_PROP_EXPIRED_FLAGS4 ,SYSOBJ_FLAGS, 310 },
388: { "expired_restrictions", SYS_PROP_EXPIRED_REST ,SYSOBJ_FLAGS, 310 },
389: { "expired_exemptions", SYS_PROP_EXPIRED_EXEMPT ,SYSOBJ_FLAGS, 310 },
390:
391: /* directories */
392: { "node_dir", SYS_PROP_NODE_DIR ,SYSOBJ_FLAGS, 310 },
393: { "ctrl_dir", SYS_PROP_CTRL_DIR ,SYSOBJ_FLAGS, 310 },
394: { "data_dir", SYS_PROP_DATA_DIR ,SYSOBJ_FLAGS, 310 },
395: { "text_dir", SYS_PROP_TEXT_DIR ,SYSOBJ_FLAGS, 310 },
396: { "temp_dir", SYS_PROP_TEMP_DIR ,SYSOBJ_FLAGS, 310 },
397: { "exec_dir", SYS_PROP_EXEC_DIR ,SYSOBJ_FLAGS, 310 },
398: { "mods_dir", SYS_PROP_MODS_DIR ,SYSOBJ_FLAGS, 310 },
399: { "logs_dir", SYS_PROP_LOGS_DIR ,SYSOBJ_FLAGS, 310 },
400:
401: /* filenames */
402: { "devnull", SYS_PROP_DEVNULL ,SYSOBJ_FLAGS, 311 },
403: { "temp_path", SYS_PROP_TEMP_PATH ,SYSOBJ_FLAGS, 312 },
404: { "cmd_shell", SYS_PROP_CMD_SHELL ,SYSOBJ_FLAGS, 314 },
405:
406: /* clock access */
407: { "clock_ticks", SYS_PROP_CLOCK ,SYSOBJ_FLAGS, 311 },
408: { "clock_ticks_per_second", SYS_PROP_CLOCK_PER_SEC ,SYSOBJ_FLAGS, 311 },
409: { "timer", SYS_PROP_TIMER ,SYSOBJ_FLAGS, 314 },
410:
411: /* last */
412: { "local_host_name", SYS_PROP_LOCAL_HOSTNAME ,SYSOBJ_FLAGS, 311 },
413: {0}
414: };
415:
416: #ifdef BUILD_JSDOCS
417: static char* sys_prop_desc[] = {
418: "BBS name"
419: ,"operator name"
420: ,"system QWK-ID (for QWK packets)"
421: ,"settings bitfield (see <tt>SS_*</tt> in <tt>sbbsdefs.js</tt> for bit definitions)"
422: ,"PostLink name"
423: ,"PostLink system number"
424: ,"Internet address (host or domain name)"
425: ,"location (city, state)"
426: ,"timezone (use <i>system.zonestr()</i> to get string representation)"
427: ,"days between forced password changes"
428: ,"days to preserve deleted user records"
429:
430: ,"last user record number in user database (includes deleted and inactive user records)"
431: ,"name of last user to logoff"
432: ,"amount of free disk space (in bytes)"
433: ,"amount of free disk space (in kilobytes)"
434:
435: ,"total number of BBS nodes"
436: ,"last displayable node number"
437:
438: ,"new user password"
439: ,"new user magic word"
440: ,"new user level"
441: ,"new user flag set #1"
442: ,"new user flag set #2"
443: ,"new user flag set #3"
444: ,"new user flag set #4"
445: ,"new user restriction flags"
446: ,"new user exemption flags"
447: ,"new user credits"
448: ,"new user extra minutes"
449: ,"new user command shell"
450: ,"new user external editor"
451: ,"new user settings"
452: ,"new user file transfer protocol (command key)"
453: ,"new user expiration days"
454: ,"new user questions bitfield (see <tt>UQ_*</tt> in <tt>sbbsdefs.js</tt> for bit definitions)"
455:
456: ,"expired user level"
457: ,"expired user flag set #1"
458: ,"expired user flag set #2"
459: ,"expired user flag set #3"
460: ,"expired user flag set #4"
461: ,"expired user restriction flags"
462: ,"expired user exemption flags"
463:
464: /* directories */
465: ,"node directory"
466: ,"control file directory"
467: ,"data file directory"
468: ,"text file directory"
469: ,"temporary file directory"
470: ,"executable file directory"
471: ,"modified modules directory (optional)"
472: ,"log file directory"
473:
474: /* filenames */
475: ,"platform-specific \"null\" device filename"
476: ,"platform-specific temporary file directory"
477: ,"platform-specific command processor/shell"
478:
479: /* clock */
480: ,"amount of elapsed processor time in clock 'ticks'"
481: ,"number of clock ticks per second"
482: ,"high-resolution timer, in seconds (fractional seconds supported)"
483:
484: /* INSERT new tabled properties here */
485: ,"private host name that uniquely identifies this system on the local network"
486:
487: /* Manually created (non-tabled) properties */
488: ,"public host name that uniquely identifies this system on the Internet (usually the same as <i>system.inet_addr</i>)"
489: ,"Synchronet version number (e.g. '3.10')"
490: ,"Synchronet revision letter (e.g. 'k')"
491: ,"Synchronet alpha/beta designation (e.g. ' beta')"
492: ,"Synchronet full version information (e.g. '3.10k Beta Debug')"
493: ,"Synchronet version notice (includes version and platform)"
494: ,"Synchronet version number in decimal (e.g. 31301 for v3.13b)"
495: ,"Synchronet version number in hexadecimal (e.g. 0x31301 for v3.13b)"
496: ,"platform description (e.g. 'Win32', 'Linux', 'FreeBSD')"
497: ,"socket library version information"
498: ,"message base library version information"
499: ,"compiler used to build Synchronet"
500: ,"date and time compiled"
501: ,"Synchronet copyright display"
502: ,"JavaScript engine version information"
503: ,"operating system version information"
504: ,"time/date system was brought online (in time_t format)"
505:
506: ,"array of FidoNet Technology Network (FTN) addresses associated with this system"
507: ,NULL
508: };
509: #endif
510:
511:
512: static JSClass js_system_class = {
513: "System" /* name */
514: ,JSCLASS_HAS_PRIVATE /* flags */
515: ,JS_PropertyStub /* addProperty */
516: ,JS_PropertyStub /* delProperty */
517: ,js_system_get /* getProperty */
518: ,js_system_set /* setProperty */
519: ,JS_EnumerateStub /* enumerate */
520: ,JS_ResolveStub /* resolve */
521: ,JS_ConvertStub /* convert */
522: ,JS_FinalizeStub /* finalize */
523: };
524:
525: /* System Stats Propertiess */
526: enum {
527: SYSSTAT_PROP_LOGONS
528: ,SYSSTAT_PROP_LTODAY
529: ,SYSSTAT_PROP_TIMEON
530: ,SYSSTAT_PROP_TTODAY
531: ,SYSSTAT_PROP_ULS
532: ,SYSSTAT_PROP_ULB
533: ,SYSSTAT_PROP_DLS
534: ,SYSSTAT_PROP_DLB
535: ,SYSSTAT_PROP_PTODAY
536: ,SYSSTAT_PROP_ETODAY
537: ,SYSSTAT_PROP_FTODAY
538: ,SYSSTAT_PROP_NUSERS
539:
540: ,SYSSTAT_PROP_TOTALUSERS
541: ,SYSSTAT_PROP_TOTALFILES
542: ,SYSSTAT_PROP_TOTALMSGS
543: ,SYSSTAT_PROP_TOTALMAIL
544: ,SYSSTAT_PROP_FEEDBACK
545: };
546:
547: static JSBool js_sysstats_get(JSContext *cx, JSObject *obj, jsval id, jsval *vp)
548: {
549: jsint tiny;
550: scfg_t* cfg;
551: stats_t stats;
552: uint i;
553: ulong l;
554:
555: if((cfg=(scfg_t*)JS_GetPrivate(cx,obj))==NULL)
556: return(JS_FALSE);
557:
558: tiny = JSVAL_TO_INT(id);
559:
560: if(!getstats(cfg, 0, &stats))
561: return(FALSE);
562:
563: switch(tiny) {
564: case SYSSTAT_PROP_LOGONS:
565: JS_NewNumberValue(cx,stats.logons,vp);
566: break;
567: case SYSSTAT_PROP_LTODAY:
568: JS_NewNumberValue(cx,stats.ltoday,vp);
569: break;
570: case SYSSTAT_PROP_TIMEON:
571: JS_NewNumberValue(cx,stats.timeon,vp);
572: break;
573: case SYSSTAT_PROP_TTODAY:
574: JS_NewNumberValue(cx,stats.ttoday,vp);
575: break;
576: case SYSSTAT_PROP_ULS:
577: JS_NewNumberValue(cx,stats.uls,vp);
578: break;
579: case SYSSTAT_PROP_ULB:
580: JS_NewNumberValue(cx,stats.ulb,vp);
581: break;
582: case SYSSTAT_PROP_DLS:
583: JS_NewNumberValue(cx,stats.dls,vp);
584: break;
585: case SYSSTAT_PROP_DLB:
586: JS_NewNumberValue(cx,stats.dlb,vp);
587: break;
588: case SYSSTAT_PROP_PTODAY:
589: JS_NewNumberValue(cx,stats.ptoday,vp);
590: break;
591: case SYSSTAT_PROP_ETODAY:
592: JS_NewNumberValue(cx,stats.etoday,vp);
593: break;
594: case SYSSTAT_PROP_FTODAY:
595: JS_NewNumberValue(cx,stats.ftoday,vp);
596: break;
597: case SYSSTAT_PROP_NUSERS:
598: JS_NewNumberValue(cx,stats.nusers,vp);
599: break;
600:
601: case SYSSTAT_PROP_TOTALUSERS:
602: *vp = INT_TO_JSVAL(total_users(cfg));
603: break;
604: case SYSSTAT_PROP_TOTALMSGS:
605: l=0;
606: for(i=0;i<cfg->total_subs;i++)
607: l+=getposts(cfg,i);
608: JS_NewNumberValue(cx,l,vp);
609: break;
610: case SYSSTAT_PROP_TOTALFILES:
611: l=0;
612: for(i=0;i<cfg->total_dirs;i++)
613: l+=getfiles(cfg,i);
614: JS_NewNumberValue(cx,l,vp);
615: break;
616: case SYSSTAT_PROP_TOTALMAIL:
617: *vp = INT_TO_JSVAL(getmail(cfg, 0,0));
618: break;
619: case SYSSTAT_PROP_FEEDBACK:
620: *vp = INT_TO_JSVAL(getmail(cfg, 1,0));
621: break;
622: }
623:
624: return(TRUE);
625: }
626:
627: #define SYSSTAT_FLAGS JSPROP_ENUMERATE|JSPROP_READONLY
628:
629: static jsSyncPropertySpec js_sysstats_properties[] = {
630: /* name, tinyid, flags, ver */
631:
632: { "total_logons", SYSSTAT_PROP_LOGONS, SYSSTAT_FLAGS, 310 },
633: { "logons_today", SYSSTAT_PROP_LTODAY, SYSSTAT_FLAGS, 310 },
634: { "total_timeon", SYSSTAT_PROP_TIMEON, SYSSTAT_FLAGS, 310 },
635: { "timeon_today", SYSSTAT_PROP_TTODAY, SYSSTAT_FLAGS, 310 },
636: { "total_files", SYSSTAT_PROP_TOTALFILES, SYSSTAT_FLAGS, 310 },
637: { "files_uploaded_today", SYSSTAT_PROP_ULS, SYSSTAT_FLAGS, 310 },
638: { "bytes_uploaded_today", SYSSTAT_PROP_ULB, SYSSTAT_FLAGS, 310 },
639: { "files_downloaded_today", SYSSTAT_PROP_DLS, SYSSTAT_FLAGS, 310 },
640: { "bytes_downloaded_today", SYSSTAT_PROP_DLB, SYSSTAT_FLAGS, 310 },
641: { "total_messages", SYSSTAT_PROP_TOTALMSGS, SYSSTAT_FLAGS, 310 },
642: { "messages_posted_today", SYSSTAT_PROP_PTODAY, SYSSTAT_FLAGS, 310 },
643: { "total_email", SYSSTAT_PROP_TOTALMAIL, SYSSTAT_FLAGS, 310 },
644: { "email_sent_today", SYSSTAT_PROP_ETODAY, SYSSTAT_FLAGS, 310 },
645: { "total_feedback", SYSSTAT_PROP_FEEDBACK, SYSSTAT_FLAGS, 310 },
646: { "feedback_sent_today", SYSSTAT_PROP_FTODAY, SYSSTAT_FLAGS, 310 },
647: { "total_users", SYSSTAT_PROP_TOTALUSERS, SYSSTAT_FLAGS, 310 },
648: { "new_users_today", SYSSTAT_PROP_NUSERS, SYSSTAT_FLAGS, 310 },
649: {0}
650: };
651:
652: #ifdef BUILD_JSDOCS
653: static char* sysstat_prop_desc[] = {
654: "total logons"
655: ,"logons today"
656: ,"total time used"
657: ,"time used today"
658: ,"total files in file bases"
659: ,"files uploaded today"
660: ,"bytes uploaded today"
661: ,"files downloaded today"
662: ,"bytes downloaded today"
663: ,"total messages in message bases"
664: ,"messages posted today"
665: ,"total messages in mail base"
666: ,"email sent today"
667: ,"total feedback messages waiting"
668: ,"feedback sent today"
669: ,"total user records (does not include deleted or inactive user records)"
670: ,"new users today"
671: ,NULL
672: };
673: #endif
674:
675:
676: static JSClass js_sysstats_class = {
677: "Stats" /* name */
678: ,JSCLASS_HAS_PRIVATE /* flags */
679: ,JS_PropertyStub /* addProperty */
680: ,JS_PropertyStub /* delProperty */
681: ,js_sysstats_get /* getProperty */
682: ,JS_PropertyStub /* setProperty */
683: ,JS_EnumerateStub /* enumerate */
684: ,JS_ResolveStub /* resolve */
685: ,JS_ConvertStub /* convert */
686: ,JS_FinalizeStub /* finalize */
687: };
688:
689: static JSBool
690: js_alias(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
691: {
692: char* p;
693: char buf[128];
694: JSString* js_str;
695: scfg_t* cfg;
696:
697: if((cfg=(scfg_t*)JS_GetPrivate(cx,obj))==NULL)
698: return(JS_FALSE);
699:
700: if((js_str=JS_ValueToString(cx, argv[0]))==NULL) {
701: *rval = INT_TO_JSVAL(0);
702: return(JS_TRUE);
703: }
704:
705: if((p=JS_GetStringBytes(js_str))==NULL) {
706: *rval = INT_TO_JSVAL(0);
707: return(JS_TRUE);
708: }
709:
710: p=alias(cfg,p,buf);
711:
712: if((js_str = JS_NewStringCopyZ(cx, p))==NULL)
713: return(JS_FALSE);
714:
715: *rval = STRING_TO_JSVAL(js_str);
716: return(JS_TRUE);
717: }
718:
719: static JSBool
720: js_username(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
721: {
722: int32 val;
723: char buf[128];
724: JSString* js_str;
725: scfg_t* cfg;
726:
727: if((cfg=(scfg_t*)JS_GetPrivate(cx,obj))==NULL)
728: return(JS_FALSE);
729:
730: val=0;
731: JS_ValueToInt32(cx,argv[0],&val);
732:
733: if((js_str = JS_NewStringCopyZ(cx, username(cfg,val,buf)))==NULL)
734: return(JS_FALSE);
735:
736: *rval = STRING_TO_JSVAL(js_str);
737: return(JS_TRUE);
738: }
739:
740:
741: static JSBool
742: js_matchuser(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
743: {
744: char* p;
745: JSString* js_str;
746: scfg_t* cfg;
747: BOOL sysop_alias=TRUE;
748:
749: if((cfg=(scfg_t*)JS_GetPrivate(cx,obj))==NULL)
750: return(JS_FALSE);
751:
752: if((js_str=JS_ValueToString(cx, argv[0]))==NULL) {
753: *rval = INT_TO_JSVAL(0);
754: return(JS_TRUE);
755: }
756:
757: if(argc>1)
758: JS_ValueToBoolean(cx,argv[1],&sysop_alias);
759:
760: if((p=JS_GetStringBytes(js_str))==NULL) {
761: *rval = INT_TO_JSVAL(0);
762: return(JS_TRUE);
763: }
764:
765: *rval = INT_TO_JSVAL(matchuser(cfg,p,sysop_alias));
766: return(JS_TRUE);
767: }
768:
769: static JSBool
770: js_matchuserdata(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
771: {
772: char* p;
773: JSString* js_str;
774: int32 offset=0;
775: int32 usernumber=0;
776: int len;
777: scfg_t* cfg;
778:
779: if((cfg=(scfg_t*)JS_GetPrivate(cx,obj))==NULL)
780: return(JS_FALSE);
781:
782: JS_ValueToInt32(cx,argv[0],&offset);
783: if((len=user_rec_len(offset))<0)
784: return(JS_FALSE);
785:
786: if((js_str=JS_ValueToString(cx, argv[1]))==NULL) {
787: *rval = INT_TO_JSVAL(0);
788: return(JS_TRUE);
789: }
790:
791: if(argc>2)
792: JS_ValueToInt32(cx,argv[2],&usernumber);
793:
794: if((p=JS_GetStringBytes(js_str))==NULL) {
795: *rval = INT_TO_JSVAL(0);
796: return(JS_TRUE);
797: }
798:
799: *rval = INT_TO_JSVAL(userdatdupe(cfg,usernumber,offset,len,p,FALSE /* deleted users */));
800: return(JS_TRUE);
801: }
802:
803: static JSBool
804: js_trashcan(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
805: {
806: char* str;
807: char* can;
808: JSString* js_str;
809: JSString* js_can;
810: scfg_t* cfg;
811:
812: if((cfg=(scfg_t*)JS_GetPrivate(cx,obj))==NULL)
813: return(JS_FALSE);
814:
815: if((js_can=JS_ValueToString(cx, argv[0]))==NULL) {
816: *rval = BOOLEAN_TO_JSVAL(JS_FALSE);
817: return(JS_TRUE);
818: }
819:
820: if((js_str=JS_ValueToString(cx, argv[1]))==NULL) {
821: *rval = BOOLEAN_TO_JSVAL(JS_FALSE);
822: return(JS_TRUE);
823: }
824:
825: if((can=JS_GetStringBytes(js_can))==NULL) {
826: *rval = BOOLEAN_TO_JSVAL(JS_FALSE);
827: return(JS_TRUE);
828: }
829:
830: if((str=JS_GetStringBytes(js_str))==NULL) {
831: *rval = BOOLEAN_TO_JSVAL(JS_FALSE);
832: return(JS_TRUE);
833: }
834:
835: *rval = BOOLEAN_TO_JSVAL(trashcan(cfg,str,can)); /* user args are reversed */
836: return(JS_TRUE);
837: }
838:
839: static JSBool
840: js_findstr(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
841: {
842: char* str;
843: char* fname;
844: JSString* js_str;
845: JSString* js_fname;
846:
847: if((js_fname=JS_ValueToString(cx, argv[0]))==NULL) {
848: *rval = BOOLEAN_TO_JSVAL(JS_FALSE);
849: return(JS_TRUE);
850: }
851:
852: if((js_str=JS_ValueToString(cx, argv[1]))==NULL) {
853: *rval = BOOLEAN_TO_JSVAL(JS_FALSE);
854: return(JS_TRUE);
855: }
856:
857: if((fname=JS_GetStringBytes(js_fname))==NULL) {
858: *rval = BOOLEAN_TO_JSVAL(JS_FALSE);
859: return(JS_TRUE);
860: }
861:
862: if((str=JS_GetStringBytes(js_str))==NULL) {
863: *rval = BOOLEAN_TO_JSVAL(JS_FALSE);
864: return(JS_TRUE);
865: }
866:
867: *rval = BOOLEAN_TO_JSVAL(findstr(str,fname)); /* user args are reversed */
868: return(JS_TRUE);
869: }
870:
871:
872: static JSBool
873: js_zonestr(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
874: {
875: JSString* js_str;
876: short zone;
877: int32 val=0;
878: scfg_t* cfg;
879:
880: if((cfg=(scfg_t*)JS_GetPrivate(cx,obj))==NULL)
881: return(JS_FALSE);
882:
883: if(argc<1)
884: zone=sys_timezone(cfg);
885: else {
886: JS_ValueToInt32(cx,argv[0],&val);
887: zone=(short)val;
888: }
889:
890: if((js_str = JS_NewStringCopyZ(cx, smb_zonestr(zone,NULL)))==NULL)
891: return(JS_FALSE);
892:
893: *rval = STRING_TO_JSVAL(js_str);
894: return(JS_TRUE);
895: }
896:
897: /* Returns a ctime()-like string in the system-preferred time format */
898: static JSBool
899: js_timestr(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
900: {
901: char str[128];
902: int32 i=0;
903: time_t t;
904: JSString* js_str;
905: scfg_t* cfg;
906:
907: if((cfg=(scfg_t*)JS_GetPrivate(cx,obj))==NULL)
908: return(JS_FALSE);
909:
910: if(argc<1)
911: i=time(NULL); /* use current time */
912: else
913: JS_ValueToInt32(cx,argv[0],&i);
914: t=i;
915: timestr(cfg,&t,str);
916: if((js_str = JS_NewStringCopyZ(cx, str))==NULL)
917: return(JS_FALSE);
918:
919: *rval = STRING_TO_JSVAL(js_str);
920: return(JS_TRUE);
921: }
922:
923:
924: /* Returns a mm/dd/yy or dd/mm/yy formated string */
925: static JSBool
926: js_datestr(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
927: {
928: char str[128];
929: time_t t;
930: JSString* js_str;
931: scfg_t* cfg;
932:
933: if((cfg=(scfg_t*)JS_GetPrivate(cx,obj))==NULL)
934: return(JS_FALSE);
935:
936: if(argc<1)
937: t=time(NULL); /* use current time */
938: else {
939: if(JSVAL_IS_STRING(argv[0])) { /* convert from string to time_t? */
940: *rval = INT_TO_JSVAL(
941: dstrtounix(cfg,JS_GetStringBytes(JS_ValueToString(cx, argv[0]))));
942: return(JS_TRUE);
943: }
944: JS_ValueToInt32(cx,argv[0],(int32*)&t);
945: }
946: unixtodstr(cfg,t,str);
947: if((js_str = JS_NewStringCopyZ(cx, str))==NULL)
948: return(JS_FALSE);
949:
950: *rval = STRING_TO_JSVAL(js_str);
951: return(JS_TRUE);
952: }
953:
954: static JSBool
955: js_secondstr(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
956: {
957: char str[128];
958: int32 t=0;
959: JSString* js_str;
960:
961: *rval = JSVAL_NULL;
962:
963: if(argc<1)
964: return(JS_TRUE);
965:
966: JS_ValueToInt32(cx,argv[0],&t);
967: sectostr(t,str);
968: if((js_str = JS_NewStringCopyZ(cx, str))==NULL)
969: return(JS_FALSE);
970:
971: *rval = STRING_TO_JSVAL(js_str);
972: return(JS_TRUE);
973: }
974:
975: static JSBool
976: js_spamlog(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
977: {
978: uintN i;
979: char* p;
980: char* prot=NULL;
981: char* action=NULL;
982: char* reason=NULL;
983: char* host=NULL;
984: char* ip_addr=NULL;
985: char* to=NULL;
986: char* from=NULL;
987: scfg_t* cfg;
988:
989: if((cfg=(scfg_t*)JS_GetPrivate(cx,obj))==NULL)
990: return(JS_FALSE);
991:
992: for(i=0;i<argc;i++) {
993: if(!JSVAL_IS_STRING(argv[i]))
994: continue;
995: p=JS_GetStringBytes(JS_ValueToString(cx, argv[i]));
996: if(p==NULL)
997: continue;
998: if(prot==NULL)
999: prot=p;
1000: else if(action==NULL)
1001: action=p;
1002: else if(reason==NULL)
1003: reason=p;
1004: else if(host==NULL)
1005: host=p;
1006: else if(ip_addr==NULL)
1007: ip_addr=p;
1008: else if(to==NULL)
1009: to=p;
1010: else if(from==NULL)
1011: from=p;
1012: }
1013: *rval = BOOLEAN_TO_JSVAL(spamlog(cfg,prot,action,reason,host,ip_addr,to,from));
1014: return(JS_TRUE);
1015: }
1016:
1017: static JSBool
1018: js_hacklog(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
1019: {
1020: uintN i;
1021: int32 i32=0;
1022: char* p;
1023: char* prot=NULL;
1024: char* user=NULL;
1025: char* text=NULL;
1026: char* host=NULL;
1027: SOCKADDR_IN addr;
1028: scfg_t* cfg;
1029:
1030: if((cfg=(scfg_t*)JS_GetPrivate(cx,obj))==NULL)
1031: return(JS_FALSE);
1032:
1033: memset(&addr,0,sizeof(addr));
1034: for(i=0;i<argc;i++) {
1035: if(JSVAL_IS_NUMBER(argv[i])) {
1036: JS_ValueToInt32(cx,argv[i],&i32);
1037: if(addr.sin_addr.s_addr==0)
1038: addr.sin_addr.s_addr=i32;
1039: else
1040: addr.sin_port=(ushort)i32;
1041: continue;
1042: }
1043: if(!JSVAL_IS_STRING(argv[i]))
1044: continue;
1045: p=JS_GetStringBytes(JS_ValueToString(cx, argv[i]));
1046: if(p==NULL)
1047: continue;
1048: if(prot==NULL)
1049: prot=p;
1050: else if(user==NULL)
1051: user=p;
1052: else if(text==NULL)
1053: text=p;
1054: else if(host==NULL)
1055: host=p;
1056: }
1057: *rval = BOOLEAN_TO_JSVAL(hacklog(cfg,prot,user,text,host,&addr));
1058: return(JS_TRUE);
1059: }
1060:
1061: static JSBool
1062: js_filter_ip(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
1063: {
1064: uintN i;
1065: char* p;
1066: char* prot=NULL;
1067: char* reason=NULL;
1068: char* host=NULL;
1069: char* ip_addr=NULL;
1070: char* from=NULL;
1071: char* fname=NULL;
1072: scfg_t* cfg;
1073:
1074: if((cfg=(scfg_t*)JS_GetPrivate(cx,obj))==NULL)
1075: return(JS_FALSE);
1076:
1077: for(i=0;i<argc;i++) {
1078: if(!JSVAL_IS_STRING(argv[i]))
1079: continue;
1080: p=JS_GetStringBytes(JS_ValueToString(cx, argv[i]));
1081: if(p==NULL)
1082: continue;
1083: if(prot==NULL)
1084: prot=p;
1085: else if(reason==NULL)
1086: reason=p;
1087: else if(host==NULL)
1088: host=p;
1089: else if(ip_addr==NULL)
1090: ip_addr=p;
1091: else if(from==NULL)
1092: from=p;
1093: else if(fname==NULL)
1094: fname=p;
1095: }
1096: *rval = BOOLEAN_TO_JSVAL(filter_ip(cfg,prot,reason,host,ip_addr,from,fname));
1097: return(JS_TRUE);
1098: }
1099:
1100: static JSBool
1101: js_get_node_message(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
1102: {
1103: char* buf;
1104: int32 node_num;
1105: JSString* js_str;
1106: scfg_t* cfg;
1107:
1108: *rval = JSVAL_NULL;
1109:
1110: if((cfg=(scfg_t*)JS_GetPrivate(cx,obj))==NULL)
1111: return(JS_FALSE);
1112:
1113: node_num=cfg->node_num;
1114: if(argc)
1115: JS_ValueToInt32(cx,argv[0],&node_num);
1116: if(node_num<1)
1117: node_num=1;
1118:
1119: if((buf=getnmsg(cfg,node_num))==NULL)
1120: return(JS_TRUE);
1121:
1122: js_str=JS_NewStringCopyZ(cx, buf);
1123: free(buf);
1124:
1125: if(js_str==NULL)
1126: return(JS_FALSE);
1127: *rval = STRING_TO_JSVAL(js_str);
1128: return(JS_TRUE);
1129: }
1130:
1131:
1132: static JSBool
1133: js_put_node_message(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
1134: {
1135: int32 node=1;
1136: JSString* js_msg;
1137: char* msg;
1138: scfg_t* cfg;
1139:
1140: if((cfg=(scfg_t*)JS_GetPrivate(cx,obj))==NULL)
1141: return(JS_FALSE);
1142:
1143: JS_ValueToInt32(cx,argv[0],&node);
1144: if(node<1)
1145: node=1;
1146:
1147: if((js_msg=JS_ValueToString(cx, argv[1]))==NULL)
1148: return(JS_FALSE);
1149:
1150: if((msg=JS_GetStringBytes(js_msg))==NULL)
1151: return(JS_FALSE);
1152:
1153: *rval = BOOLEAN_TO_JSVAL(putnmsg(cfg,node,msg)==0);
1154:
1155: return(JS_TRUE);
1156: }
1157:
1158: static JSBool
1159: js_get_telegram(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
1160: {
1161: char* buf;
1162: int32 usernumber=1;
1163: JSString* js_str;
1164: scfg_t* cfg;
1165:
1166: *rval = JSVAL_NULL;
1167:
1168: if((cfg=(scfg_t*)JS_GetPrivate(cx,obj))==NULL)
1169: return(JS_FALSE);
1170:
1171: JS_ValueToInt32(cx,argv[0],&usernumber);
1172: if(usernumber<1)
1173: usernumber=1;
1174:
1175: if((buf=getsmsg(cfg,usernumber))==NULL)
1176: return(JS_TRUE);
1177:
1178: js_str=JS_NewStringCopyZ(cx, buf);
1179: free(buf);
1180:
1181: if(js_str==NULL)
1182: return(JS_FALSE);
1183: *rval = STRING_TO_JSVAL(js_str);
1184: return(JS_TRUE);
1185: }
1186:
1187: static JSBool
1188: js_put_telegram(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
1189: {
1190: int32 usernumber=1;
1191: JSString* js_msg;
1192: char* msg;
1193: scfg_t* cfg;
1194:
1195: if((cfg=(scfg_t*)JS_GetPrivate(cx,obj))==NULL)
1196: return(JS_FALSE);
1197:
1198: JS_ValueToInt32(cx,argv[0],&usernumber);
1199: if(usernumber<1)
1200: usernumber=1;
1201:
1202: if((js_msg=JS_ValueToString(cx, argv[1]))==NULL)
1203: return(JS_FALSE);
1204:
1205: if((msg=JS_GetStringBytes(js_msg))==NULL)
1206: return(JS_FALSE);
1207:
1208: *rval = BOOLEAN_TO_JSVAL(putsmsg(cfg,usernumber,msg)==0);
1209:
1210: return(JS_TRUE);
1211: }
1212:
1213: static JSBool
1214: js_new_user(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
1215: {
1216: char* alias;
1217: int i;
1218: scfg_t* cfg;
1219: user_t user;
1220: JSObject* userobj;
1221:
1222: if((cfg=(scfg_t*)JS_GetPrivate(cx,obj))==NULL)
1223: return(JS_FALSE);
1224:
1225: alias=JS_GetStringBytes(JS_ValueToString(cx,argv[0]));
1226:
1227: memset(&user,0,sizeof(user));
1228:
1229: user.sex=' ';
1230: SAFECOPY(user.alias,alias);
1231:
1232: /* statistics */
1233: user.firston=user.laston=user.pwmod=time(NULL);
1234:
1235: /* security */
1236: user.level=cfg->new_level;
1237: user.flags1=cfg->new_flags1;
1238: user.flags2=cfg->new_flags2;
1239: user.flags3=cfg->new_flags3;
1240: user.flags4=cfg->new_flags4;
1241: user.rest=cfg->new_rest;
1242: user.exempt=cfg->new_exempt;
1243:
1244: user.cdt=cfg->new_cdt;
1245: user.min=cfg->new_min;
1246: user.freecdt=cfg->level_freecdtperday[user.level];
1247: if(cfg->new_expire)
1248: user.expire=user.firston+((long)cfg->new_expire*24L*60L*60L);
1249: else
1250: user.expire=0;
1251:
1252: /* settings */
1253: if(cfg->total_fcomps)
1254: strcpy(user.tmpext,cfg->fcomp[0]->ext);
1255: else
1256: strcpy(user.tmpext,"ZIP");
1257:
1258: user.shell=cfg->new_shell;
1259: user.misc=cfg->new_misc|(AUTOTERM|COLOR);
1260: user.prot=cfg->new_prot;
1261: user.qwk=QWK_DEFAULT;
1262:
1263: for(i=0;i<cfg->total_xedits;i++)
1264: if(!stricmp(cfg->xedit[i]->code,cfg->new_xedit) && chk_ar(cfg,cfg->xedit[i]->ar,&user))
1265: break;
1266: if(i<cfg->total_xedits)
1267: user.xedit=i+1;
1268:
1269: i=newuserdat(cfg,&user);
1270:
1271: if(i==0) {
1272: userobj=js_CreateUserObject(cx, obj, cfg, NULL, user.number);
1273: *rval = OBJECT_TO_JSVAL(userobj);
1274: } else
1275: *rval = INT_TO_JSVAL(i);
1276:
1277: return(JS_TRUE);
1278: }
1279:
1280: static JSBool
1281: js_exec(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
1282: {
1283: *rval = INT_TO_JSVAL(system(JS_GetStringBytes(JS_ValueToString(cx, argv[0]))));
1284:
1285: return(JS_TRUE);
1286: }
1287:
1288: static JSBool
1289: js_popen(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
1290: {
1291: char str[1024];
1292: char* cmd;
1293: FILE* fp;
1294: jsint line=0;
1295: jsval val;
1296: JSObject* array;
1297: JSString* js_str;
1298:
1299: if(argc<1)
1300: return(JS_TRUE);
1301:
1302: if((array=JS_NewArrayObject(cx,0,NULL))==NULL)
1303: return(JS_FALSE);
1304:
1305: cmd=JS_GetStringBytes(JS_ValueToString(cx, argv[0]));
1306: if((fp=popen(cmd,"r"))==NULL)
1307: return(JS_TRUE);
1308: while(!feof(fp)) {
1309: if(fgets(str,sizeof(str),fp)==NULL)
1310: break;
1311: if((js_str=JS_NewStringCopyZ(cx,str))==NULL)
1312: break;
1313: val=STRING_TO_JSVAL(js_str);
1314: if(!JS_SetElement(cx, array, line++, &val))
1315: break;
1316: }
1317: pclose(fp);
1318:
1319: *rval = OBJECT_TO_JSVAL(array);
1320:
1321: return(JS_TRUE);
1322: }
1323:
1324: static JSBool
1325: js_chksyspass(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
1326: {
1327: scfg_t* cfg;
1328:
1329: if((cfg=(scfg_t*)JS_GetPrivate(cx,obj))==NULL)
1330: return(JS_FALSE);
1331:
1332: *rval = BOOLEAN_TO_JSVAL(stricmp(JS_GetStringBytes(JS_ValueToString(cx, argv[0]))
1333: ,cfg->sys_pass)==0);
1334:
1335: return(JS_TRUE);
1336: }
1337:
1338:
1339:
1340: static jsSyncMethodSpec js_system_functions[] = {
1341: {"username", js_username, 1, JSTYPE_STRING, JSDOCSTR("number")
1342: ,JSDOCSTR("returns name of user in specified user record <i>number</i>, or empty string if not found")
1343: ,311
1344: },
1345: {"alias", js_alias, 1, JSTYPE_STRING, JSDOCSTR("alias")
1346: ,JSDOCSTR("returns name of user that matches alias (if found in <tt>ctrl/alias.cfg</tt>)")
1347: ,310
1348: },
1349: {"matchuser", js_matchuser, 1, JSTYPE_NUMBER, JSDOCSTR("username [,sysop_alias=<tt>true</tt>]")
1350: ,JSDOCSTR("exact user name matching, returns number of user whose name/alias matches <i>username</i> "
1351: " or 0 if not found, matches well-known sysop aliases by default")
1352: ,310
1353: },
1354: {"matchuserdata", js_matchuserdata, 2, JSTYPE_NUMBER, JSDOCSTR("field, data [,usernumber]")
1355: ,JSDOCSTR("search user database for data in a specific field (specified by offset), "
1356: "returns first matching user record number, optional <i>usernumber</i> specifies user record to skip")
1357: ,310
1358: },
1359: {"trashcan", js_trashcan, 2, JSTYPE_BOOLEAN, JSDOCSTR("path/filename, find_string")
1360: ,JSDOCSTR("search text/filename.can for pseudo-regexp")
1361: ,310
1362: },
1363: {"findstr", js_findstr, 2, JSTYPE_BOOLEAN, JSDOCSTR("path/filename, find_string")
1364: ,JSDOCSTR("search any file for pseudo-regexp")
1365: ,310
1366: },
1367: {"zonestr", js_zonestr, 0, JSTYPE_STRING, JSDOCSTR("[timezone=<i>local</i>]")
1368: ,JSDOCSTR("convert time zone integer to string, defaults to system timezone if <i>timezone</i> not specified")
1369: ,310
1370: },
1371: {"timestr", js_timestr, 0, JSTYPE_STRING, JSDOCSTR("[time=<i>current</i>]")
1372: ,JSDOCSTR("convert time_t integer into a time string, "
1373: "defaults to current time if <i>time</i> not specified")
1374: ,310
1375: },
1376: {"datestr", js_datestr, 0, JSTYPE_STRING, JSDOCSTR("[time=<i>current</i>]")
1377: ,JSDOCSTR("convert time_t integer into a date string (in either <tt>MM/DD/YY</tt> or <tt>DD/MM/YY</tt> format), "
1378: "defaults to current date if <i>time</i> not specified")
1379: ,310
1380: },
1381: {"secondstr", js_secondstr, 0, JSTYPE_STRING, JSDOCSTR("seconds")
1382: ,JSDOCSTR("convert elapsed time in seconds into a string in <tt>hh:mm:ss</tt> format")
1383: ,310
1384: },
1385: {"spamlog", js_spamlog, 6, JSTYPE_BOOLEAN, JSDOCSTR("[protocol, action, reason, host, ip, to, from]")
1386: ,JSDOCSTR("log a suspected SPAM attempt")
1387: ,310
1388: },
1389: {"hacklog", js_hacklog, 5, JSTYPE_BOOLEAN, JSDOCSTR("[protocol, user, text, host, ip, port]")
1390: ,JSDOCSTR("log a suspected hack attempt")
1391: ,310
1392: },
1393: {"filter_ip", js_filter_ip, 4, JSTYPE_BOOLEAN, JSDOCSTR("[protocol, reason, host, ip, username]")
1394: ,JSDOCSTR("add an IP address (with comment) to the system's IP filter file")
1395: ,311
1396: },
1397: {"get_node_message",js_get_node_message,0, JSTYPE_STRING, JSDOCSTR("node_number")
1398: ,JSDOCSTR("read any messages waiting for the specified node and return in a single string")
1399: ,311
1400: },
1401: {"put_node_message",js_put_node_message,2, JSTYPE_BOOLEAN, JSDOCSTR("node_number, message_text")
1402: ,JSDOCSTR("send a node a short text message, delivered immediately")
1403: ,310
1404: },
1405: {"get_telegram", js_get_telegram, 1, JSTYPE_STRING, JSDOCSTR("user_number")
1406: ,JSDOCSTR("returns any short text messages waiting for the specified user")
1407: ,311
1408: },
1409: {"put_telegram", js_put_telegram, 2, JSTYPE_BOOLEAN, JSDOCSTR("user_number, message_text")
1410: ,JSDOCSTR("sends a user a short text message, delivered immediately or during next logon")
1411: ,310
1412: },
1413: {"newuser", js_new_user, 1, JSTYPE_ALIAS },
1414: {"new_user", js_new_user, 1, JSTYPE_OBJECT, JSDOCSTR("name/alias")
1415: ,JSDOCSTR("creates a new user record, returns a new <a href=#User>User</a> object representing the new user account")
1416: ,310
1417: },
1418: {"exec", js_exec, 1, JSTYPE_NUMBER, JSDOCSTR("command-line")
1419: ,JSDOCSTR("executes a native system/shell command-line, returns <i>0</i> on success")
1420: ,311
1421: },
1422: {"popen", js_popen, 0, JSTYPE_ARRAY, JSDOCSTR("command-line")
1423: ,JSDOCSTR("executes a native system/shell command-line, returns array of captured output lines on success "
1424: "(<b>only functional on UNIX systems</b>)")
1425: ,311
1426: },
1427: {"check_syspass", js_chksyspass, 1, JSTYPE_BOOLEAN, JSDOCSTR("password")
1428: ,JSDOCSTR("compares the supplied <i>password</i> against the system password and return's <i>true</i> if it matches")
1429: ,311
1430: },
1431: {0}
1432: };
1433:
1434:
1435: /* node properties */
1436: enum {
1437: /* raw node_t fields */
1438: NODE_PROP_STATUS
1439: ,NODE_PROP_ERRORS
1440: ,NODE_PROP_ACTION
1441: ,NODE_PROP_USERON
1442: ,NODE_PROP_CONNECTION
1443: ,NODE_PROP_MISC
1444: ,NODE_PROP_AUX
1445: ,NODE_PROP_EXTAUX
1446: };
1447:
1448: #ifdef BUILD_JSDOCS
1449: static char* node_prop_desc[] = {
1450: "status (see <tt>nodedefs.js</tt> for valid values)"
1451: ,"error counter"
1452: ,"current user action (see <tt>nodedefs.js</tt>)"
1453: ,"current user number"
1454: ,"connection speed (<tt>0xffff</tt> = Telnet or RLogin)"
1455: ,"miscellaneous bitfield (see <tt>nodedefs.js</tt>)"
1456: ,"auxillary value"
1457: ,"extended auxillary value"
1458: ,NULL
1459: };
1460: #endif
1461:
1462:
1463: static JSBool js_node_get(JSContext *cx, JSObject *obj, jsval id, jsval *vp)
1464: {
1465: uint node_num;
1466: jsint tiny;
1467: node_t node;
1468: scfg_t* cfg;
1469: JSObject* sysobj;
1470: JSObject* node_list;
1471:
1472: tiny = JSVAL_TO_INT(id);
1473:
1474: if((node_list=JS_GetParent(cx, obj))==NULL)
1475: return(JS_FALSE);
1476:
1477: if((sysobj=JS_GetParent(cx, node_list))==NULL)
1478: return(JS_FALSE);
1479:
1480: if((cfg=(scfg_t*)JS_GetPrivate(cx,sysobj))==NULL)
1481: return(JS_FALSE);
1482:
1483: node_num=(uint)JS_GetPrivate(cx,obj)>>1;
1484:
1485: memset(&node,0,sizeof(node));
1486: if(getnodedat(cfg, node_num, &node, NULL))
1487: return(JS_TRUE);
1488:
1489: switch(tiny) {
1490: case NODE_PROP_STATUS:
1491: *vp = INT_TO_JSVAL((int)node.status);
1492: break;
1493: case NODE_PROP_ERRORS:
1494: *vp = INT_TO_JSVAL((int)node.errors);
1495: break;
1496: case NODE_PROP_ACTION:
1497: *vp = INT_TO_JSVAL((int)node.action);
1498: break;
1499: case NODE_PROP_USERON:
1500: *vp = INT_TO_JSVAL((int)node.useron);
1501: break;
1502: case NODE_PROP_CONNECTION:
1503: *vp = INT_TO_JSVAL((int)node.connection);
1504: break;
1505: case NODE_PROP_MISC:
1506: *vp = INT_TO_JSVAL((int)node.misc);
1507: break;
1508: case NODE_PROP_AUX:
1509: *vp = INT_TO_JSVAL((int)node.aux);
1510: break;
1511: case NODE_PROP_EXTAUX:
1512: JS_NewNumberValue(cx,node.extaux,vp);
1513: break;
1514: }
1515: return(JS_TRUE);
1516: }
1517:
1518: static JSBool js_node_set(JSContext *cx, JSObject *obj, jsval id, jsval *vp)
1519: {
1520: uint node_num;
1521: int file;
1522: jsint val=0;
1523: jsint tiny;
1524: node_t node;
1525: scfg_t* cfg;
1526: JSObject* sysobj;
1527: JSObject* node_list;
1528:
1529: if((node_list=JS_GetParent(cx, obj))==NULL)
1530: return(JS_FALSE);
1531:
1532: if((sysobj=JS_GetParent(cx, node_list))==NULL)
1533: return(JS_FALSE);
1534:
1535: if((cfg=(scfg_t*)JS_GetPrivate(cx,sysobj))==NULL)
1536: return(JS_FALSE);
1537:
1538: node_num=(uint)JS_GetPrivate(cx,obj)>>1;
1539:
1540: memset(&node,0,sizeof(node));
1541: if(getnodedat(cfg, node_num, &node, &file))
1542: return(JS_TRUE);
1543:
1544: if(JSVAL_IS_NUMBER(*vp))
1545: JS_ValueToInt32(cx, *vp, &val);
1546:
1547: tiny = JSVAL_TO_INT(id);
1548:
1549: switch(tiny) {
1550: case NODE_PROP_STATUS:
1551: node.status=(BYTE)val;
1552: break;
1553: case NODE_PROP_ERRORS:
1554: node.errors=(BYTE)val;
1555: break;
1556: case NODE_PROP_ACTION:
1557: node.action=(BYTE)val;
1558: break;
1559: case NODE_PROP_USERON:
1560: node.useron=(WORD)val;
1561: break;
1562: case NODE_PROP_CONNECTION:
1563: node.connection=(WORD)val;
1564: break;
1565: case NODE_PROP_MISC:
1566: node.misc=(WORD)val;
1567: break;
1568: case NODE_PROP_AUX:
1569: node.aux=(WORD)val;
1570: break;
1571: case NODE_PROP_EXTAUX:
1572: node.extaux=val;
1573: break;
1574: }
1575: putnodedat(cfg,node_num,&node,file);
1576:
1577: return(JS_TRUE);
1578: }
1579:
1580: static jsSyncPropertySpec js_node_properties[] = {
1581: /* name, tinyid, flags, ver */
1582:
1583: /* raw node_t fields */
1584: { "status", NODE_PROP_STATUS, JSPROP_ENUMERATE, 310 },
1585: { "errors", NODE_PROP_ERRORS, JSPROP_ENUMERATE, 310 },
1586: { "action", NODE_PROP_ACTION, JSPROP_ENUMERATE, 310 },
1587: { "useron", NODE_PROP_USERON, JSPROP_ENUMERATE, 310 },
1588: { "connection", NODE_PROP_CONNECTION, JSPROP_ENUMERATE, 310 },
1589: { "misc", NODE_PROP_MISC, JSPROP_ENUMERATE, 310 },
1590: { "aux", NODE_PROP_AUX, JSPROP_ENUMERATE, 310 },
1591: { "extaux", NODE_PROP_EXTAUX, JSPROP_ENUMERATE, 310 },
1592: {0}
1593: };
1594:
1595: static JSClass js_node_class = {
1596: "Node" /* name */
1597: ,JSCLASS_HAS_PRIVATE /* flags */
1598: ,JS_PropertyStub /* addProperty */
1599: ,JS_PropertyStub /* delProperty */
1600: ,js_node_get /* getProperty */
1601: ,js_node_set /* setProperty */
1602: ,JS_EnumerateStub /* enumerate */
1603: ,JS_ResolveStub /* resolve */
1604: ,JS_ConvertStub /* convert */
1605: ,JS_FinalizeStub /* finalize */
1606: };
1607:
1608: JSObject* DLLCALL js_CreateSystemObject(JSContext* cx, JSObject* parent
1609: ,scfg_t* cfg, time_t uptime, char* host_name, char* socklib_desc)
1610: {
1611: char str[256];
1612: uint i;
1613: jsval val;
1614: JSObject* sysobj;
1615: JSObject* statsobj;
1616: JSObject* nodeobj;
1617: JSObject* node_list;
1618: JSObject* fido_addr_list;
1619: JSString* js_str;
1620:
1621: sysobj = JS_DefineObject(cx, parent, "system", &js_system_class, NULL
1622: ,JSPROP_ENUMERATE|JSPROP_READONLY);
1623:
1624: if(sysobj==NULL)
1625: return(NULL);
1626:
1627: if(!JS_SetPrivate(cx, sysobj, cfg)) /* Store a pointer to scfg_t */
1628: return(NULL);
1629:
1630: if(!js_DefineSyncProperties(cx, sysobj, js_system_properties))
1631: return(NULL);
1632:
1633: if (!js_DefineSyncMethods(cx, sysobj, js_system_functions, FALSE))
1634: return(NULL);
1635:
1636: #ifdef BUILD_JSDOCS
1637: js_DescribeSyncObject(cx,sysobj,"Global system-related properties and methods",310);
1638: js_CreateArrayOfStrings(cx, sysobj, "_property_desc_list", sys_prop_desc, JSPROP_READONLY);
1639: #endif
1640:
1641: /****************************/
1642: /* static string properties */
1643: if((js_str=JS_NewStringCopyZ(cx, host_name))==NULL)
1644: return(NULL);
1645: val = STRING_TO_JSVAL(js_str);
1646: if(!JS_SetProperty(cx, sysobj, "host_name", &val))
1647: return(NULL);
1648:
1649: if((js_str=JS_NewStringCopyZ(cx, VERSION))==NULL)
1650: return(NULL);
1651: val = STRING_TO_JSVAL(js_str);
1652: if(!JS_SetProperty(cx, sysobj, "version", &val))
1653: return(NULL);
1654:
1655: sprintf(str,"%c",REVISION);
1656: if((js_str=JS_NewStringCopyZ(cx, str))==NULL)
1657: return(NULL);
1658: val = STRING_TO_JSVAL(js_str);
1659: if(!JS_SetProperty(cx, sysobj, "revision", &val))
1660: return(NULL);
1661:
1662: SAFECOPY(str,beta_version);
1663: truncsp(str);
1664: if((js_str=JS_NewStringCopyZ(cx, str))==NULL)
1665: return(NULL);
1666: val = STRING_TO_JSVAL(js_str);
1667: if(!JS_SetProperty(cx, sysobj, "beta_version", &val))
1668: return(NULL);
1669:
1670:
1671: sprintf(str,"%s%c%s",VERSION,REVISION,beta_version);
1672: truncsp(str);
1673: #if defined(_DEBUG)
1674: strcat(str," Debug");
1675: #endif
1676: if((js_str=JS_NewStringCopyZ(cx, str))==NULL)
1677: return(NULL);
1678: val = STRING_TO_JSVAL(js_str);
1679: if(!JS_SetProperty(cx, sysobj, "full_version", &val))
1680: return(NULL);
1681:
1682: if((js_str=JS_NewStringCopyZ(cx, VERSION_NOTICE))==NULL)
1683: return(NULL);
1684: val = STRING_TO_JSVAL(js_str);
1685: if(!JS_SetProperty(cx, sysobj, "version_notice", &val))
1686: return(NULL);
1687:
1688: /* Numeric version properties */
1689: if(!JS_NewNumberValue(cx, VERSION_NUM, &val))
1690: return(NULL);
1691: if(!JS_SetProperty(cx, sysobj, "version_num", &val))
1692: return(NULL);
1693:
1694: if(!JS_NewNumberValue(cx, VERSION_HEX, &val))
1695: return(NULL);
1696: if(!JS_SetProperty(cx, sysobj, "version_hex", &val))
1697: return(NULL);
1698:
1699: if((js_str=JS_NewStringCopyZ(cx, PLATFORM_DESC))==NULL)
1700: return(NULL);
1701: val = STRING_TO_JSVAL(js_str);
1702: if(!JS_SetProperty(cx, sysobj, "platform", &val))
1703: return(NULL);
1704:
1705: if((js_str=JS_NewStringCopyZ(cx, socklib_version(str, socklib_desc)))==NULL)
1706: return(NULL);
1707: val = STRING_TO_JSVAL(js_str);
1708: if(!JS_SetProperty(cx, sysobj, "socket_lib", &val))
1709: return(NULL);
1710:
1711: sprintf(str,"SMBLIB %s",smb_lib_ver());
1712: if((js_str=JS_NewStringCopyZ(cx, str))==NULL)
1713: return(NULL);
1714: val = STRING_TO_JSVAL(js_str);
1715: if(!JS_SetProperty(cx, sysobj, "msgbase_lib", &val))
1716: return(NULL);
1717:
1718: DESCRIBE_COMPILER(str);
1719: if((js_str=JS_NewStringCopyZ(cx, str))==NULL)
1720: return(NULL);
1721: val = STRING_TO_JSVAL(js_str);
1722: if(!JS_SetProperty(cx, sysobj, "compiled_with", &val))
1723: return(NULL);
1724:
1725: sprintf(str,"%s %.5s",__DATE__,__TIME__);
1726: if((js_str=JS_NewStringCopyZ(cx, str))==NULL)
1727: return(NULL);
1728: val = STRING_TO_JSVAL(js_str);
1729: if(!JS_SetProperty(cx, sysobj, "compiled_when", &val))
1730: return(NULL);
1731:
1732: if((js_str=JS_NewStringCopyZ(cx, COPYRIGHT_NOTICE))==NULL)
1733: return(NULL);
1734: val = STRING_TO_JSVAL(js_str);
1735: if(!JS_SetProperty(cx, sysobj, "copyright", &val))
1736: return(NULL);
1737:
1738: if((js_str=JS_NewStringCopyZ(cx
1739: ,(char *)JS_GetImplementationVersion()))==NULL)
1740: return(NULL);
1741: val = STRING_TO_JSVAL(js_str);
1742: if(!JS_SetProperty(cx, sysobj, "js_version", &val))
1743: return(NULL);
1744:
1745: if((js_str=JS_NewStringCopyZ(cx,os_version(str)))==NULL)
1746: return(NULL);
1747: val = STRING_TO_JSVAL(js_str);
1748: if(!JS_SetProperty(cx, sysobj, "os_version", &val))
1749: return(NULL);
1750:
1751: /***********************/
1752:
1753: JS_NewNumberValue(cx,uptime,&val);
1754: if(!JS_SetProperty(cx, sysobj, "uptime", &val))
1755: return(NULL);
1756:
1757: /* fido_addr_list property */
1758:
1759: if((fido_addr_list=JS_NewArrayObject(cx, 0, NULL))==NULL)
1760: return(NULL);
1761:
1762: if(!JS_DefineProperty(cx, sysobj, "fido_addr_list", OBJECT_TO_JSVAL(fido_addr_list)
1763: , NULL, NULL, JSPROP_ENUMERATE))
1764: return(NULL);
1765:
1766: for(i=0;i<cfg->total_faddrs;i++) {
1767: val=STRING_TO_JSVAL(JS_NewStringCopyZ(cx,smb_faddrtoa(&cfg->faddr[i],str)));
1768: JS_SetElement(cx, fido_addr_list, i, &val);
1769: }
1770:
1771: statsobj = JS_DefineObject(cx, sysobj, "stats", &js_sysstats_class, NULL
1772: ,JSPROP_ENUMERATE|JSPROP_READONLY);
1773:
1774: if(statsobj==NULL)
1775: return(NULL);
1776:
1777: JS_SetPrivate(cx, statsobj, cfg); /* Store a pointer to scfg_t */
1778:
1779: if(!js_DefineSyncProperties(cx, statsobj, js_sysstats_properties))
1780: return(NULL);
1781:
1782: #ifdef BUILD_JSDOCS
1783: js_DescribeSyncObject(cx,statsobj,"System statistics",310);
1784: js_CreateArrayOfStrings(cx, statsobj, "_property_desc_list", sysstat_prop_desc, JSPROP_READONLY);
1785: #endif
1786:
1787: /* node_list property */
1788:
1789: if((node_list=JS_NewArrayObject(cx, 0, NULL))==NULL)
1790: return(NULL);
1791:
1792: if(!JS_DefineProperty(cx, sysobj, "node_list", OBJECT_TO_JSVAL(node_list)
1793: , NULL, NULL, JSPROP_ENUMERATE))
1794: return(NULL);
1795:
1796: for(i=0;i<cfg->sys_nodes && i<cfg->sys_lastnode;i++) {
1797:
1798: nodeobj = JS_NewObject(cx, &js_node_class, NULL, node_list);
1799:
1800: if(nodeobj==NULL)
1801: return(NULL);
1802:
1803: /* Store node number */
1804: /* We have to shift it to make it look like a pointer to JS. :-( */
1805: if(!JS_SetPrivate(cx, nodeobj, (char*)((i+1)<<1)))
1806: return(NULL);
1807:
1808: if(!js_DefineSyncProperties(cx, nodeobj, js_node_properties))
1809: return(NULL);
1810:
1811: #ifdef BUILD_JSDOCS
1812: if(i==0) {
1813: js_DescribeSyncObject(cx,nodeobj,"BBS node listing",310);
1814: js_CreateArrayOfStrings(cx, nodeobj, "_property_desc_list", node_prop_desc, JSPROP_READONLY);
1815: }
1816: #endif
1817:
1818: val=OBJECT_TO_JSVAL(nodeobj);
1819: if(!JS_SetElement(cx, node_list, i, &val))
1820: return(NULL);
1821: }
1822:
1823: return(sysobj);
1824: }
1825:
1826: #endif /* JAVSCRIPT */
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.