Synchronet now requires the libarchive development package (e.g. libarchive-dev on Debian-based Linux distros, libarchive.org for more info) to build successfully.

sbbs.h 54.6 KB
Newer Older
1
/* Synchronet class (sbbs_t) definition and exported function prototypes */
2
// vi: tabstop=4
3 4 5 6 7 8
/* $Id$ */

/****************************************************************************
 * @format.tab-size 4		(Plain Text/Source Code File Header)			*
 * @format.use-tabs true	(see http://www.synchro.net/ptsc_hdr.html)		*
 *																			*
9
 * Copyright Rob Swindell - http://www.synchro.net/copyright.html			*
10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42
 *																			*
 * This program is free software; you can redistribute it and/or			*
 * modify it under the terms of the GNU General Public License				*
 * as published by the Free Software Foundation; either version 2			*
 * of the License, or (at your option) any later version.					*
 * See the GNU General Public License for more details: gpl.txt or			*
 * http://www.fsf.org/copyleft/gpl.html										*
 *																			*
 * Anonymous FTP access to the most recent released source is available at	*
 * ftp://vert.synchro.net, ftp://cvs.synchro.net and ftp://ftp.synchro.net	*
 *																			*
 * Anonymous CVS access to the development source and modification history	*
 * is available at cvs.synchro.net:/cvsroot/sbbs, example:					*
 * cvs -d :pserver:anonymous@cvs.synchro.net:/cvsroot/sbbs login			*
 *     (just hit return, no password is necessary)							*
 * cvs -d :pserver:anonymous@cvs.synchro.net:/cvsroot/sbbs checkout src		*
 *																			*
 * For Synchronet coding style and modification guidelines, see				*
 * http://www.synchro.net/source.html										*
 *																			*
 * You are encouraged to submit any modifications (preferably in Unix diff	*
 * format) via e-mail to mods@synchro.net									*
 *																			*
 * Note: If this box doesn't appear square, then you need to fix your tabs.	*
 ****************************************************************************/

#ifndef _SBBS_H
#define _SBBS_H

/****************************/
/* Standard library headers */
/****************************/

rswindell's avatar
rswindell committed
43 44 45
/***************/
/* OS-specific */
/***************/
46
#if defined(_WIN32)			/* Windows */
47

deuce's avatar
deuce committed
48 49 50
	#define NOCRYPT     /* Stop windows.h from loading wincrypt.h */
                    /* Is windows.h REALLY necessary?!?! */
	#define WIN32_LEAN_AND_MEAN
51 52 53 54 55 56
	#include <io.h>
	#include <share.h>
	#include <windows.h>
	#include <process.h>	/* _beginthread() prototype */
	#include <direct.h>		/* _mkdir() prototype */
	#include <mmsystem.h>	/* SND_ASYNC */
57

58
	#if defined(_DEBUG) && defined(_MSC_VER)
59 60 61
		#include <crtdbg.h> /* Windows debug macros and stuff */
	#endif

62
#if defined(__cplusplus)
63
	extern "C"
64
#endif
deuce's avatar
deuce committed
65
	HINSTANCE hK32;
66

67
#elif defined(__unix__)		/* Unix-variant */
68

69
	#include <unistd.h>		/* close */
70 71 72

#endif

73 74 75 76 77 78
#ifdef _THREAD_SUID_BROKEN
extern int	thread_suid_broken;			/* NPTL is no longer broken */
#else
#define thread_suid_broken FALSE
#endif

rswindell's avatar
rswindell committed
79 80 81
/******************/
/* ANSI C Library */
/******************/
82 83 84 85
#include <time.h>
#include <errno.h>
#include <stdio.h>
#include <ctype.h>
86
#include <fcntl.h>			/* open */
87 88 89
#include <stdarg.h>
#include <stdlib.h>
#include <string.h>
90

91
#ifndef __unix__
92 93 94 95 96

	#include <malloc.h>

#endif

97 98
#include <sys/stat.h>

deuce's avatar
deuce committed
99 100 101 102 103 104
#ifdef __unix__
	#define XP_UNIX
#else
	#define XP_PC
	#define XP_WIN
#endif
rswindell's avatar
rswindell committed
105 106 107

#if defined(JAVASCRIPT)
#include "comio.h"			/* needed for COM_HANDLE definition only */
108
#if __GNUC__ > 5
rswindell's avatar
rswindell committed
109 110 111 112
	#pragma GCC diagnostic push
	#pragma GCC diagnostic ignored "-Wmisleading-indentation"
	#pragma GCC diagnostic ignored "-Wignored-attributes"
#endif
deuce's avatar
deuce committed
113 114
#include <jsversion.h>
#include <jsapi.h>
115
#if __GNUC_ > 5
rswindell's avatar
rswindell committed
116 117
	#pragma GCC diagnostic pop
#endif
deuce's avatar
deuce committed
118
#define JS_DestroyScript(cx,script)
119

120 121
#define JSSTRING_TO_RASTRING(cx, str, ret, sizeptr, lenptr) \
{ \
122
	size_t			*JSSTSlenptr=(lenptr); \
123 124 125 126 127 128 129 130 131
	size_t			JSSTSlen; \
	size_t			JSSTSpos; \
	const jschar	*JSSTSstrval; \
	char			*JSSTStmpptr; \
\
	if(JSSTSlenptr==NULL) \
		JSSTSlenptr=&JSSTSlen; \
	if((str) != NULL) { \
		if((JSSTSstrval=JS_GetStringCharsAndLength((cx), (str), JSSTSlenptr))) { \
132 133 134
			if((*(sizeptr) < (*JSSTSlenptr+1 )) || (ret)==NULL) { \
				*(sizeptr) = *JSSTSlenptr+1; \
				if((JSSTStmpptr=(char *)realloc((ret), *(sizeptr)))==NULL) { \
135
					JS_ReportError(cx, "Error reallocating %lu bytes at %s:%d", (*JSSTSlenptr)+1, getfname(__FILE__), __LINE__); \
136
					if((ret) != NULL) free(ret); \
137 138 139 140 141 142 143 144 145 146 147 148 149
					(ret)=NULL; \
				} \
				else { \
					(ret)=JSSTStmpptr; \
				} \
			} \
			if(ret) { \
				for(JSSTSpos=0; JSSTSpos<*JSSTSlenptr; JSSTSpos++) \
					(ret)[JSSTSpos]=(char)JSSTSstrval[JSSTSpos]; \
				(ret)[*JSSTSlenptr]=0; \
			} \
		} \
	} \
deuce's avatar
deuce committed
150 151
	else { \
		if(ret) \
152
			*(ret)=0; \
deuce's avatar
deuce committed
153
	} \
154 155 156 157 158 159 160 161
}

#define JSVALUE_TO_RASTRING(cx, val, ret, sizeptr, lenptr) \
{ \
	JSString	*JSVTSstr=JS_ValueToString((cx), (val)); \
	JSSTRING_TO_RASTRING((cx), JSVTSstr, (ret), (sizeptr), (lenptr)); \
}

162 163
#define JSSTRING_TO_MSTRING(cx, str, ret, lenptr) \
{ \
164
	size_t			*JSSTSlenptr=(lenptr); \
165 166 167 168 169 170 171 172 173 174 175 176 177 178
	size_t			JSSTSlen; \
	size_t			JSSTSpos; \
	const jschar	*JSSTSstrval; \
\
	if(JSSTSlenptr==NULL) \
		JSSTSlenptr=&JSSTSlen; \
	(ret)=NULL; \
	if((str) != NULL) { \
		if((JSSTSstrval=JS_GetStringCharsAndLength((cx), (str), JSSTSlenptr))) { \
			if(((ret)=(char *)malloc(*JSSTSlenptr+1))) { \
				for(JSSTSpos=0; JSSTSpos<*JSSTSlenptr; JSSTSpos++) \
					(ret)[JSSTSpos]=(char)JSSTSstrval[JSSTSpos]; \
				(ret)[*JSSTSlenptr]=0; \
			} \
179
			else JS_ReportError((cx), "Error allocating %lu bytes at %s:%d", (*JSSTSlenptr)+1, getfname(__FILE__), __LINE__); \
180 181 182 183 184 185 186 187 188 189
		} \
	} \
}

#define JSVALUE_TO_MSTRING(cx, val, ret, lenptr) \
{ \
	JSString	*JSVTSstr=JS_ValueToString((cx), (val)); \
	JSSTRING_TO_MSTRING((cx), JSVTSstr, (ret), lenptr); \
}

190 191
#define JSSTRING_TO_STRBUF(cx, str, ret, bufsize, lenptr) \
{ \
192
	size_t			*JSSTSlenptr=(lenptr); \
193 194 195 196 197 198
	size_t			JSSTSlen; \
	size_t			JSSTSpos; \
	const jschar	*JSSTSstrval; \
\
	if(JSSTSlenptr==NULL) \
		JSSTSlenptr=&JSSTSlen; \
199
	if((bufsize) < 1 || (str)==NULL) \
200 201 202
		*JSSTSlenptr = 0; \
	else { \
		if((JSSTSstrval=JS_GetStringCharsAndLength((cx), (str), JSSTSlenptr))) { \
203 204
			if(*JSSTSlenptr >= (bufsize)) \
				*JSSTSlenptr = (bufsize)-1; \
205 206 207 208 209 210 211 212 213 214 215 216 217 218 219
			for(JSSTSpos=0; JSSTSpos<*JSSTSlenptr; JSSTSpos++) \
				(ret)[JSSTSpos]=(char)JSSTSstrval[JSSTSpos]; \
		} \
		else \
			*JSSTSlenptr=0; \
	} \
	(ret)[*JSSTSlenptr]=0; \
}

#define JSVALUE_TO_STRBUF(cx, val, ret, bufsize, lenptr) \
{ \
	JSString	*JSVTSstr=JS_ValueToString((cx), (val)); \
	JSSTRING_TO_STRBUF((cx), JSVTSstr, (ret), (bufsize), lenptr); \
}

220 221 222 223 224 225
#define HANDLE_PENDING(cx, p ) \
	if(JS_IsExceptionPending(cx)) { \
		if(p != NULL) \
			free(p); \
		return JS_FALSE; \
	}
226

227 228
#define JSSTRING_TO_ASTRING(cx, str, ret, maxsize, lenptr) \
{ \
229
	size_t			*JSSTSlenptr=(lenptr); \
230 231 232 233 234 235 236 237 238
	size_t			JSSTSlen; \
	size_t			JSSTSpos; \
	const jschar	*JSSTSstrval; \
\
	if(JSSTSlenptr==NULL) \
		JSSTSlenptr=&JSSTSlen; \
	(ret)=NULL; \
	if((str) != NULL) { \
		if((JSSTSstrval=JS_GetStringCharsAndLength((cx), (str), JSSTSlenptr))) { \
239 240 241
			if(*JSSTSlenptr >= (maxsize)) { \
				*JSSTSlenptr = (maxsize)-1; \
			} \
242
			if(((ret)=(char *)alloca(*JSSTSlenptr+1))) { \
243
				for(JSSTSpos=0; JSSTSpos<*JSSTSlenptr; JSSTSpos++) { \
244
					(ret)[JSSTSpos]=(char)JSSTSstrval[JSSTSpos]; \
245
				} \
246 247
				(ret)[*JSSTSlenptr]=0; \
			} \
248
			else JS_ReportError((cx), "Error allocating %lu bytes on stack at %s:%d", (*JSSTSlenptr)+1, getfname(__FILE__), __LINE__); \
249 250 251 252 253 254 255 256 257 258
		} \
	} \
}

#define JSVALUE_TO_ASTRING(cx, val, ret, maxsize, lenptr) \
{ \
	JSString	*JSVTSstr=JS_ValueToString((cx), (val)); \
	JSSTRING_TO_ASTRING((cx), JSVTSstr, (ret), (maxsize), (lenptr)); \
}

rswindell's avatar
rswindell committed
259 260
#endif

261 262 263 264
#ifdef USE_CRYPTLIB
#include <cryptlib.h>
#endif

265
/* xpdev */
266 267 268
#ifndef LINK_LIST_THREADSAFE
 #define LINK_LIST_THREADSAFE
#endif
269
#include "genwrap.h"
rswindell's avatar
rswindell committed
270
#include "semfile.h"
271
#include "netwrap.h"
272 273
#include "dirwrap.h"
#include "filewrap.h"
274
#include "datewrap.h"
275
#include "sockwrap.h"
deuce's avatar
deuce committed
276
#include "multisock.h"
277
#include "eventwrap.h"
278
#include "link_list.h"
279
#include "msg_queue.h"
280
#include "xpdatetime.h"
281
#include "unicode_defs.h"
282

283 284 285 286 287 288 289 290
/***********************/
/* Synchronet-specific */
/***********************/
#include "startup.h"
#ifdef __cplusplus
	#include "threadwrap.h"	/* pthread_mutex_t */
#endif

291 292 293 294 295 296 297 298 299
#include "smblib.h"
#include "ars_defs.h"
#include "scfgdefs.h"
#include "scfglib.h"
#include "userdat.h"
#include "riodefs.h"
#include "cmdshell.h"
#include "ringbuf.h"    /* RingBuf definition */
#include "client.h"		/* client_t definition */
300 301
#include "crc16.h"
#include "crc32.h"
302
#include "telnet.h"
303
#include "nopen.h"
304
#include "text.h"
305

306
/* Synchronet Node Instance class definition */
307
#if defined(__cplusplus) && defined(JAVASCRIPT)
308 309 310 311 312
class sbbs_t
{

public:

deuce's avatar
deuce committed
313
	sbbs_t(ushort node_num, union xp_sockaddr *addr, size_t addr_len, const char* host_name, SOCKET
314
		,scfg_t*, char* text[], client_t* client_info, bool is_event_thread = false);
315 316
	~sbbs_t();

317 318
	bbs_startup_t*	startup;

319
	bool	init(void);
320
	BOOL	terminated;
321 322 323 324

	client_t client;
	SOCKET	client_socket;
	SOCKET	client_socket_dup;
deuce's avatar
deuce committed
325
	union xp_sockaddr	client_addr;
326
	char	client_name[128];
rswindell's avatar
rswindell committed
327
	char	client_ident[128];
deuce's avatar
deuce committed
328 329
	char	client_ipaddr[INET6_ADDRSTRLEN];
	char	local_addr[INET6_ADDRSTRLEN];
330
#ifdef USE_CRYPTLIB
331
	CRYPT_SESSION	ssh_session;
332
#endif
deuce's avatar
deuce committed
333
	int		session_channel;
334
	bool	ssh_mode;
335
	SOCKET	passthru_socket;
336
	bool	passthru_socket_active;
337
	void	passthru_socket_activate(bool);
338
    bool	passthru_thread_running;
339 340 341 342 343 344 345 346 347 348 349

	scfg_t	cfg;

	int		outchar_esc;		   // track ANSI escape seq output

	int 	rioctl(ushort action); // remote i/o control
	bool	rio_abortable;

    RingBuf	inbuf;
    RingBuf	outbuf;
	HANDLE	input_thread;
350
	pthread_mutex_t	input_thread_mutex;
351
	bool	input_thread_mutex_created;
352
	pthread_mutex_t	ssh_mutex;
353
	bool	ssh_mutex_created;
354

355 356 357 358
	#define OUTCOM_RETRY_DELAY		80		// milliseconds
	#define OUTCOM_RETRY_ATTEMPTS	1000	// 80 seconds
	int 	_outcom(uchar ch); 	   // send character, without retry (on buffer flow condition)
	int		outcom(uchar ch, int max_attempts = OUTCOM_RETRY_ATTEMPTS);		// send character, with retry
359
	int 	incom(unsigned long timeout=0);		   // receive character
360

361
	void	spymsg(const char *msg);		// send message to active spies
362

363
	int		putcom(const char *str, size_t len=0);  // Send string
364 365
	void	hangup(void);		   // Hangup modem

366 367
	uchar	telnet_local_option[0x100];
	uchar	telnet_remote_option[0x100];
rswindell's avatar
rswindell committed
368
	void	send_telnet_cmd(uchar cmd, uchar opt);
369
	bool	request_telnet_opt(uchar cmd, uchar opt, unsigned waitforack=0);
370

371
    uchar	telnet_cmd[64];
rswindell's avatar
rswindell committed
372
    uint	telnet_cmdlen;
373
	ulong	telnet_mode;
rswindell's avatar
rswindell committed
374
	/* 	input_thread() writes to these variables: */
375
	uchar	telnet_last_rxch;
376
	char	telnet_location[128];
rswindell's avatar
rswindell committed
377
	char	telnet_terminal[TELNET_TERM_MAXLEN+1];
378
	long 	telnet_rows;
rswindell's avatar
rswindell committed
379 380 381
	long	telnet_cols;
	long	telnet_speed;

382
	xpevent_t	telnet_ack_event;
383

384
	time_t	event_time;				// Time of next exclusive event
385
	const char*	event_code;				// Internal code of next exclusive event
386
	bool	is_event_thread;
387 388
	bool	event_thread_running;
    bool	output_thread_running;
389
    bool	input_thread_running;
390
	bool	terminate_output_thread;
391

392 393 394
	JSRuntime*		js_runtime;
	JSContext*		js_cx;
	JSObject*		js_glob;
395 396 397
	JSRuntime*		js_hotkey_runtime;
	JSContext*		js_hotkey_cx;
	JSObject*		js_hotkey_glob;
398
	js_callback_t	js_callback;
399 400
	long			js_execfile(const char *fname, const char* startup_dir, JSObject* scope = NULL, JSContext* cx = NULL);
	JSContext*		js_init(JSRuntime**, JSObject**, const char* desc);
401
	void			js_cleanup(void);
402
	bool			js_create_user_objects(JSContext*, JSObject* glob);
403

404
	char	syspage_semfile[MAX_PATH+1];	/* Sysop page semaphore file */
405 406 407 408 409
	char 	menu_dir[128];	/* Over-ride default menu dir */
	char 	menu_file[128]; /* Over-ride menu file */

	user_t	useron; 		/* User currently online */
	node_t	thisnode;		/* Node information */
410 411 412 413 414 415
	smb_t	smb;			/* Currently active message base */
	link_list_t smb_list;
#define SMB_STACK_PUSH	true
#define SMB_STACK_POP	false
	int 	smb_stack(smb_t* smb, bool push);

416
	char	rlogin_name[LEN_ALIAS+1];
417
	char	rlogin_pass[LEN_PASS+1];
418
	char	rlogin_term[TELNET_TERM_MAXLEN+1];	/* RLogin passed terminal type/speed (e.g. "xterm/57600") */
419 420 421 422 423 424 425 426

	uint	temp_dirnum;

	FILE	*nodefile_fp,
			*node_ext_fp,
			*logfile_fp;

	int 	nodefile;		/* File handle for node.dab */
427
	pthread_mutex_t	nodefile_mutex;
428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449
	int		node_ext;		/* File handle for node.exb */

							/* Batch download queue */
	char 	**batdn_name;	/* Filenames */
	ushort	*batdn_alt; 	/* Alternate path */
	uint 	*batdn_dir, 	/* Directory for each file */
			 batdn_total;	/* Total files */
	long 	*batdn_offset;	/* Offset for data */
	ulong	*batdn_size;	/* Size of file in bytes */
	ulong	*batdn_cdt; 	/* Credit value of file */

							/* Batch upload queue */
	char 	**batup_desc,	/* Description for each file */
			**batup_name;	/* Filenames */
	long	*batup_misc;	/* Miscellaneous bits */
	ushort	*batup_alt; 	/* Alternate path */
	uint 	*batup_dir, 	/* Directory for each file */
			batup_total;	/* Total files */

	/*********************************/
	/* Color Configuration Variables */
	/*********************************/
450 451
	char 	*text[TOTAL_TEXT];			/* Text from ctrl\text.dat */
	char 	*text_sav[TOTAL_TEXT];		/* Text from ctrl\text.dat */
452

453
	char 	dszlog[127];	/* DSZLOG enviornment variable */
454
    int     keybuftop,keybufbot;    /* Keyboard input buffer pointers (for ungetkey) */
455
	char    keybuf[KEY_BUFSIZE];    /* Keyboard input buffer */
456 457
	size_t	keybuf_space(void);
	size_t	keybuf_level(void);
458 459

	ushort	node_connection;
460
	char	connection[LEN_MODEM+1];	/* Connection Description */
461 462 463 464 465
	ulong	cur_rate;		/* Current Connection (DCE) Rate */
	ulong	cur_cps;		/* Current Average Transfer CPS */
	ulong	dte_rate;		/* Current COM Port (DTE) Rate */
	time_t 	timeout;		/* User inactivity timeout reference */
	ulong 	timeleft_warn;	/* low timeleft warning flag */
rswindell's avatar
rswindell committed
466
	uint	curatr; 		/* Current Text Attributes Always */
467
	uint	hot_attr;		/* Auto-Mouse hot-spot attribute (when non-zero) */
rswindell's avatar
rswindell committed
468
	uint	attr_stack[64];	/* Saved attributes (stack) */
469
	int 	attr_sp;		/* Attribute stack pointer */
470
	long 	lncntr; 		/* Line Counter - for PAUSE */
471
	bool	msghdr_tos;		/* Message header was displayed at Top of Screen */
rswindell's avatar
rswindell committed
472
	long	row;			/* Current row */
473 474
	long 	rows;			/* Current number of Rows for User */
	long	cols;			/* Current number of Columns for User */
475
	long	column;			/* Current column counter (for line counter) */
rswindell's avatar
rswindell committed
476
	long	tabstop;		/* Current symmetric-tabstop (size) */
477
	long	lastlinelen;	/* The previously displayed line length */
478
	long 	autoterm;		/* Auto-detected terminal type */
rswindell's avatar
rswindell committed
479
	char	terminal[TELNET_TERM_MAXLEN+1];	// <- answer() writes to this
480
	long	cterm_version;	/* (MajorVer*1000) + MinorVer */
481
	link_list_t savedlines;
482 483
	char 	lbuf[LINE_BUFSIZE+1];/* Temp storage for each line output */
	int		lbuflen;		/* Number of characters in line buffer */
rswindell's avatar
rswindell committed
484
	uint	latr;			/* Starting attribute of line buffer */
485 486
	ulong	console;		/* Defines current Console settings */
	char 	wordwrap[81];	/* Word wrap buffer */
487
	time_t	now,			/* Used to store current time in Unix format */
488
			last_sysop_auth,/* Time sysop was last authenticated */
489
			answertime, 	/* Time call was answered */
490 491
			logontime,		/* Time user logged on */
			starttime,		/* Time stamp to use for time left calcs */
492
			ns_time,		/* File new-scan time */
493 494 495 496
			last_ns_time;	/* Most recent new-file-scan this call */
	uchar 	action;			/* Current action of user */
	long 	online; 		/* Remote/Local or not online */
	long 	sys_status; 	/* System Status */
497
	subscan_t	*subscan;	/* User sub configuration/scan info */
498 499 500 501 502 503 504 505

	ulong	logon_ulb,		/* Upload Bytes This Call */
			logon_dlb,		/* Download Bytes This Call */
			logon_uls,		/* Uploads This Call */
			logon_dls,		/* Downloads This Call */
			logon_posts,	/* Posts This Call */
			logon_emails,	/* Emails This Call */
			logon_fbacks;	/* Feedbacks This Call */
506
	uchar	logon_ml;		/* ML of the user upon logon */
507 508 509 510 511 512 513

	uint 	main_cmds;		/* Number of Main Commands this call */
	uint 	xfer_cmds;		/* Number of Xfer Commands this call */
	ulong	posts_read; 	/* Number of Posts read this call */
	char 	temp_uler[31];  /* User who uploaded the files to temp dir */
	char 	temp_file[41];	/* Origin of extracted temp files */
	long 	temp_cdt;		/* Credit value of file that was extracted */
514
	bool 	autohang;		/* Used for auto-hangup after transfer */
515 516 517
	size_t 	logcol; 		/* Current column of log file */
	uint 	criterrs; 		/* Critical error counter */

518 519 520 521 522 523
	uint 	curgrp; 		/* Current group */
	uint	*cursub;		/* Current sub-board for each group */
	uint	curlib; 		/* Current library */
	uint	*curdir;		/* Current directory for each library */
	uint 	*usrgrp;		/* Real group numbers */
	uint	usrgrps;		/* Number groups this user has access to */
524
	uint	usrgrp_total;	/* Total number of groups */
525 526
	uint 	*usrlib;		/* Real library numbers */
	uint	usrlibs;		/* Number of libs this user can access */
527
	uint	usrlib_total;	/* Total number of libraries */
528 529 530 531
	uint 	**usrsub;		/* Real sub numbers */
	uint	*usrsubs;		/* Num of subs with access for each grp */
	uint 	**usrdir;		/* Real dir numbers */
	uint	*usrdirs;		/* Num of dirs with access for each lib */
532 533 534
	uint	cursubnum;		/* For ARS */
	uint	curdirnum;		/* For ARS */
	ulong 	timeleft;		/* Number of seconds user has left online */
535

536 537 538 539 540 541 542 543 544
	char 	*comspec;		/* Pointer to environment variable COMSPEC */
	ushort	altul;			/* Upload to alternate path flag */
	char 	cid[LEN_CID+1]; /* Caller ID (IP Address) of current caller */
	char 	*noaccess_str;	/* Why access was denied via ARS */
	long 	noaccess_val;	/* Value of parameter not met in ARS */
	int		errorlevel; 	/* Error level of external program */

	csi_t	main_csi;		/* Main Command Shell Image */

545
	smbmsg_t*	current_msg;	/* For message header @-codes */
rswindell's avatar
rswindell committed
546 547 548
	const char*	current_msg_subj;
	const char*	current_msg_from;
	const char*	current_msg_to;
549
	file_t*		current_file;
550

551 552 553
			/* Global command shell variables */
	uint	global_str_vars;
	char **	global_str_var;
rswindell's avatar
rswindell committed
554
	uint32_t *	global_str_var_name;
555
	uint	global_int_vars;
deuce's avatar
deuce committed
556
	int32_t *	global_int_var;
rswindell's avatar
rswindell committed
557
	uint32_t *	global_int_var_name;
558 559
	char *	sysvar_p[MAX_SYSVARS];
	uint	sysvar_pi;
deuce's avatar
deuce committed
560
	int32_t	sysvar_l[MAX_SYSVARS];
561 562 563
	uint	sysvar_li;

    /* ansi_term.cpp */
564 565
	const char*	ansi(int atr);			/* Returns ansi escape sequence for atr */
	char*	ansi(int atr, int curatr, char* str);
566 567 568 569
    bool	ansi_gotoxy(int x, int y);
	bool	ansi_getxy(int* x, int* y);
	bool	ansi_save(void);
	bool	ansi_restore(void);
570
	void	ansi_getlines(void);
rswindell's avatar
rswindell committed
571
	int		ansi_mouse(enum ansi_mouse_mode, bool enable);
572 573 574 575 576

			/* Command Shell Methods */
	int		exec(csi_t *csi);
	int		exec_function(csi_t *csi);
	int		exec_misc(csi_t *csi, char *path);
rswindell's avatar
rswindell committed
577 578 579
	int		exec_net(csi_t *csi);
	int		exec_msg(csi_t *csi);
	int		exec_file(csi_t *csi);
580
	long	exec_bin(const char *mod, csi_t *csi, const char* startup_dir=NULL);
581 582
	void	clearvars(csi_t *bin);
	void	freevars(csi_t *bin);
deuce's avatar
deuce committed
583 584
	char**	getstrvar(csi_t *bin, uint32_t name);
	int32_t*	getintvar(csi_t *bin, uint32_t name);
585 586
	char*	copystrvar(csi_t *csi, char *p, char *str);
	void	skipto(csi_t *csi, uchar inst);
587
	bool	ftp_cmd(csi_t* csi, SOCKET ctrl_sock, const char* cmdsrc, char* rsp);
rswindell's avatar
rswindell committed
588
	bool	ftp_put(csi_t* csi, SOCKET ctrl_sock, char* src, char* dest);
589 590 591
	bool	ftp_get(csi_t* csi, SOCKET ctrl_sock, char* src, char* dest, bool dir=false);
	SOCKET	ftp_data_sock(csi_t* csi, SOCKET ctrl_sock, SOCKADDR_IN*);

592 593 594
	bool	select_shell(void);
	bool	select_editor(void);

595 596 597
	void	sys_info(void);
	void	user_info(void);
	void	xfer_policy(void);
598 599

	void	xfer_prot_menu(enum XFER_TYPE);
600 601
	void	node_stats(uint node_num);
	void	sys_stats(void);
602
	void	logonlist(const char* args = "");
603
	bool	spy(uint node_num);
604 605 606

	void	reset_logon_vars(void);

rswindell's avatar
rswindell committed
607
	uint	finduser(char *str, bool silent_failure = false);
608 609 610 611 612 613 614 615 616 617

	int 	sub_op(uint subnum);

	int		dir_op(uint dirnum);
	int		getuserxfers(int fromuser, int destuser, char *fname);

	void	getmsgptrs(void);
	void	putmsgptrs(void);
	void	getusrsubs(void);
	void	getusrdirs(void);
618 619
	uint	getusrsub(uint subnum);
	uint	getusrgrp(uint subnum);
620 621
	uint	getusrdir(uint dirnum);
	uint	getusrlib(uint dirnum);
622

623
	uint	userdatdupe(uint usernumber, uint offset, uint datlen, char *dat
624
				,bool del=false, bool next=false);
625
	ulong	gettimeleft(bool handle_out_of_time=true);
626 627 628
	bool	gettimeleft_inside;

	/* str.cpp */
629 630
	char*	timestr(time_t);
	char*	datestr(time_t);
631
    char	timestr_output[60];
632
	char	datestr_output[60];
633
	char*	age_of_posted_item(char* buf, size_t max, time_t);
634
	void	userlist(long mode);
635
	size_t	gettmplt(char *outstr, const char *tmplt, long mode);
636
	void	sif(char *fname, char *answers, long len);	/* Synchronet Interface File */
637 638 639 640
	void	sof(char *fname, char *answers, long len);
	void	create_sif_dat(char *siffile, char *datfile);
	void	read_sif_dat(char *siffile, char *datfile);
	void	printnodedat(uint number, node_t* node);
deuce's avatar
deuce committed
641
	bool	inputnstime32(time32_t *dt);
642
	bool	inputnstime(time_t *dt);
643
	bool	chkpass(char *pass, user_t* user, bool unique);
644
	char *	cmdstr(const char *instr, const char *fpath, const char *fspec, char *outstr);
645 646 647 648
	char	cmdstr_output[512];

	void	subinfo(uint subnum);
	void	dirinfo(uint dirnum);
649
	bool	trashcan(const char *insearch, const char *name);
650 651
	void	time_bank(void);
	void	change_user(void);
652 653 654

	/* writemsg.cpp */
	void	automsg(void);
655
	bool	writemsg(const char *str, const char *top, char *subj, long mode, uint subnum
656
				,const char *to, const char* from, const char** editor=NULL, const char** charset=NULL);
657
	char*	quotes_fname(int xedit, char* buf, size_t len);
658
	char*	msg_tmp_fname(int xedit, char* fname, size_t len);
659
	char	putmsg(const char *str, long mode, long org_cols = 0, JSObject* obj = NULL);
660
	bool	msgabort(void);
661 662
	bool	email(int usernumber, const char *top = NULL, const char *title = NULL
				, long mode = WM_NONE, smb_t* resmb = NULL, smbmsg_t* remsg = NULL);
663 664
	void	forwardmail(smbmsg_t* msg, int usernum);
	void	removeline(char *str, char *str2, char num, char skip);
665
	ulong	msgeditor(char *buf, const char *top, char *title);
666
	bool	editfile(char *path, bool msg=false);
rswindell's avatar
rswindell committed
667
	ushort	chmsgattr(smbmsg_t);
668
	bool	quotemsg(smb_t*, smbmsg_t*, bool tails = false);
669
	void	editmsg(smbmsg_t* msg, uint subnum);
670
	void	editor_inf(int xeditnum, const char *to, const char* from, const char *subj, long mode
671
				,uint subnum, const char* tagfile);
672 673
	void	copyfattach(uint to, uint from, char *title);
	bool	movemsg(smbmsg_t* msg, uint subnum);
674 675
	int		process_edited_text(char* buf, FILE* stream, long mode, unsigned* lines, unsigned maxlines);
	int		process_edited_file(const char* src, const char* dest, long mode, unsigned* lines, unsigned maxlines);
676
	void	editor_info_to_msg(smbmsg_t*, const char* editor, const char* charset);
677
	char	editor_details[128];
678

679
	/* postmsg.cpp */
680
	bool	postmsg(uint subnum, long wm_mode = WM_NONE, smb_t* resmb = NULL, smbmsg_t* remsg = NULL);
681

682 683 684
	/* mail.cpp */
	int		delmail(uint usernumber,int which);
	void	telluser(smbmsg_t* msg);
685
	void	delallmail(uint usernumber, int which, bool permanent=true, long lm_mode = 0);
686 687

	/* getmsg.cpp */
688
	int		loadmsg(smbmsg_t *msg, ulong number);
rswindell's avatar
rswindell committed
689
	void	show_msgattr(smbmsg_t*);
690
	void	show_msghdr(smb_t*, smbmsg_t*, const char *subj = NULL, const char* from = NULL, const char* to = NULL);
rswindell's avatar
rswindell committed
691 692
	bool	show_msg(smb_t*, smbmsg_t*, long p_mode = 0, post_t* post = NULL);
	bool	msgtotxt(smb_t*, smbmsg_t*, const char *fname, bool header = true, ulong gettxt_mode = GETMSGTXT_ALL);
693 694
	const char* msghdr_text(const smbmsg_t*, uint index);
	char	msghdr_utf8_text[128];
rswindell's avatar
rswindell committed
695 696
	const char* msghdr_field(const smbmsg_t*, const char* str, char* buf = NULL, bool can_utf8 = false);
	char	msgghdr_field_cp437_str[128];
697 698 699
	ulong	getlastmsg(uint subnum, uint32_t *ptr, time_t *t);
	time_t	getmsgtime(uint subnum, ulong ptr);
	ulong	getmsgnum(uint subnum, time_t t);
700
	void	download_msg_attachments(smb_t*, smbmsg_t*, bool del);
701 702

	/* readmail.cpp */
rswindell's avatar
rswindell committed
703
	void	readmail(uint usernumber, int which, long lm_mode = 0);
704
	bool	readmail_inside;
705
	long	searchmail(mail_t*, long start, long msgss, int which, const char *search, const char* order);
706 707

	/* bulkmail.cpp */
708 709
	bool	bulkmail(uchar *ar);
	int		bulkmailhdr(smb_t*, smbmsg_t*, uint usernum);
710 711

	/* con_out.cpp */
rswindell's avatar
rswindell committed
712
	size_t	bstrlen(const char *str, long mode = 0);
rswindell's avatar
rswindell committed
713
	int		bputs(const char *str, long mode = 0);	/* BBS puts function */
714
	int		rputs(const char *str, size_t len=0);	/* BBS raw puts function */
715 716 717
	int		bprintf(const char *fmt, ...)			/* BBS printf function */
#if defined(__GNUC__)   // Catch printf-format errors
    __attribute__ ((format (printf, 2, 3)));		// 1 is 'this'
rswindell's avatar
rswindell committed
718 719 720 721 722
#endif
	;
	int		bprintf(long mode, const char *fmt, ...)
#if defined(__GNUC__)   // Catch printf-format errors
    __attribute__ ((format (printf, 3, 4)));		// 1 is 'this', 2 is 'mode'
723 724 725 726 727
#endif
	;
	int		rprintf(const char *fmt, ...)			/* BBS raw printf function */
#if defined(__GNUC__)   // Catch printf-format errors
    __attribute__ ((format (printf, 2, 3)));		// 1 is 'this'
728 729 730 731 732
#endif
	;
	int		comprintf(const char *fmt, ...)			/* BBS direct-comm printf function */
#if defined(__GNUC__)   // Catch printf-format errors
    __attribute__ ((format (printf, 2, 3)));		// 1 is 'this'
733 734
#endif
	;
735
	void	backspace(int count=1);			/* Output destructive backspace(s) via outchar */
736
	int		outchar(char ch);				/* Output a char - check echo and emu.  */
737
	int		outchar(enum unicode_codepoint, char cp437_fallback);
738
	int		outchar(enum unicode_codepoint, const char* cp437_fallback = NULL);
rswindell's avatar
rswindell committed
739
	void	inc_row(int count);
740
	void	inc_column(int count);
741
	void	center(char *str, unsigned int columns = 0);
rswindell's avatar
rswindell committed
742
	void	wide(const char*);
rswindell's avatar
rswindell committed
743
	void	clearscreen(long term);
744 745
	void	clearline(void);
	void	cleartoeol(void);
rswindell's avatar
rswindell committed
746
	void	cleartoeos(void);
747 748 749 750 751
	void	cursor_home(void);
	void	cursor_up(int count=1);
	void	cursor_down(int count=1);
	void	cursor_left(int count=1);
	void	cursor_right(int count=1);
752
	bool	cursor_xy(int x, int y);
753 754 755
	void	carriage_return(int count=1);
	void	line_feed(int count=1);
	void	newline(int count=1);
756
	long	term_supports(long cmp_flags=0);
757 758
	const char* term_type(long term_supports = -1);
	const char* term_charset(long term_supports = -1);
759
	int		backfill(const char* str, float pct, int full_attr, int empty_attr);
760
	void	progress(const char* str, int count, int total, int interval=1);
761 762
	bool	saveline(void);
	bool	restoreline(void);
763
	int		petscii_to_ansibbs(unsigned char);
rswindell's avatar
rswindell committed
764
	size_t	print_utf8_as_cp437(const char*, size_t);
765 766
	int		attr(int);				/* Change text color/attributes */
	void	ctrl_a(char);			/* Performs Ctrl-Ax attribute changes */
rswindell's avatar
rswindell committed
767
	char*	auto_utf8(const char*, long* mode);
768 769 770 771 772 773 774 775 776 777 778 779 780 781 782
	enum output_rate {
		output_rate_unlimited,
		output_rate_300 = 300,
		output_rate_600 = 600,
		output_rate_1200 = 1200,
		output_rate_2400 = 2400,
		output_rate_4800 = 4800,
		output_rate_9600 = 9600,
		output_rate_19200 = 19200,
		output_rate_38400 = 38400,
		output_rate_57600 = 57600,
		output_rate_76800 = 76800,
		output_rate_115200 = 115200,
	} cur_output_rate;
	void	set_output_rate(enum output_rate);
783 784

	/* getstr.cpp */
785
	size_t	getstr_offset;
786
	size_t	getstr(char *str, size_t length, long mode, const str_list_t history = NULL);
787
	long	getnum(ulong max, ulong dflt=0);
788
	void	insert_indicator(void);
789 790

	/* getkey.cpp */
791
	char	getkey(long mode); 		/* Waits for a key hit local or remote  */
792
	long	getkeys(const char *str, ulong max, long mode = K_UPPER);
793
	void	ungetkey(char ch, bool insert = false);		/* Places 'ch' into the input buffer    */
rswindell's avatar
rswindell committed
794
	void	ungetstr(const char* str, bool insert = false);
795
	char	question[MAX_TEXTDAT_ITEM_LEN+1];
796 797
	bool	yesno(const char *str, long mode = 0);
	bool	noyes(const char *str, long mode = 0);
rswindell's avatar
rswindell committed
798
	bool	pause_inside;
799
	void	pause(void);
800 801
	const char *	mnestr;
	void	mnemonics(const char *str);
802

rswindell's avatar
rswindell committed
803
	/* inkey.cpp */
804
	char	inkey(long mode, unsigned long timeout=0);
rswindell's avatar
rswindell committed
805
	char	handle_ctrlkey(char ch, long mode=0);
rswindell's avatar
rswindell committed
806 807 808 809 810 811 812 813 814
	long	mouse_mode;			// Mouse reporting mode flags
	link_list_t mouse_hotspots;	// Mouse hot-spots
	void	add_hotspot(struct mouse_hotspot*);
	void	clear_hotspots(void);
	void	scroll_hotspots(long count);
	void	add_hotspot(char cmd, long minx = -1, long maxx = -1, long y = -1);
	void	add_hotspot(ulong num, long minx = -1, long maxx = -1, long y = -1);
	void	add_hotspot(const char* cmd, long minx = -1, long maxx = -1, long y = -1);
	void	set_mouse(long mode);
rswindell's avatar
rswindell committed
815

816
	/* prntfile.cpp */
817 818 819
	bool	printfile(const char* fname, long mode, long org_cols = 0, JSObject* obj = NULL);
	bool	printtail(const char* fname, int lines, long mode, long org_cols = 0, JSObject* obj = NULL);
	bool	menu(const char *code, long mode = 0, JSObject* obj = NULL);
820
	bool	menu_exists(const char *code, const char* ext=NULL, char* realpath=NULL);
821

822
	int		uselect(int add, uint n, const char *title, const char *item, const uchar *ar);
823 824
	uint	uselect_total, uselect_num[500];

825 826
	long	mselect(const char *title, str_list_t list, unsigned max_selections, const char* item_fmt, const char* selected_str, const char* unselected_str, const char* prompt_fmt);

827 828 829
	void	redrwstr(char *strin, int i, int l, long mode);

	/* atcodes.cpp */
830 831
	int		show_atcode(const char *code, JSObject* obj = NULL);
	const char*	atcode(char* sp, char* str, size_t maxlen, long* pmode = NULL, bool centered = false, JSObject* obj = NULL);
832 833

	/* getnode.cpp */
834 835
	int		getsmsg(int usernumber, bool clearline = false);
	int		getnmsg(bool clearline = false);
836
	int		whos_online(bool listself);/* Lists active nodes, returns active nodes */
837
	void	nodelist(void);
838 839
	int		getnodeext(uint number, char * str);
	int		getnodedat(uint number, node_t * node, bool lock);
840
	void	nodesync(bool clearline = false);
841 842
	user_t	nodesync_user;
	bool	nodesync_inside;
843
	uint	count_nodes(bool self = true);
844 845 846 847

	/* putnode.cpp */
	int		putnodedat(uint number, node_t * node);
	int		putnodeext(uint number, char * str);
848

849
	/* login.ccp */
850
	int		login(char *user_name, char *pw_prompt, const char* user_pw = NULL, const char* sys_pw = NULL);
851
	void	badlogin(char* user, char* passwd, const char* protocol=NULL, xp_sockaddr* addr=NULL, bool delay=true);
852
	char*	parse_login(char*);
853 854 855 856 857

	/* answer.cpp */
	bool	answer();

	/* logon.ccp */
858
	bool	logon(void);
859 860

	/* logout.cpp */