mux/src/externs.h File Reference

#include "db.h"
#include "match.h"
#include "mudconf.h"
#include "svdrand.h"

Include dependency graph for externs.h:

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Data Structures
struct	PortInfo
struct	TASK_RECORD
class	CTaskHeap
class	CScheduler
Defines
#define	notify(p, m)   notify_check(p,p,m, MSG_PUP_ALWAYS|MSG_ME_ALL|MSG_F_DOWN)
#define	notify_saypose(p, m)   notify_check(p,p,m, MSG_PUP_ALWAYS|MSG_ME_ALL|MSG_F_DOWN|MSG_SAYPOSE)
#define	notify_html(p, m)   notify_check(p,p,m, MSG_PUP_ALWAYS|MSG_ME_ALL|MSG_F_DOWN|MSG_HTML)
#define	notify_quiet(p, m)   notify_check(p,p,m, MSG_PUP_ALWAYS|MSG_ME)
#define	notify_with_cause(p, c, m)   notify_check(p,c,m, MSG_PUP_ALWAYS|MSG_ME_ALL|MSG_F_DOWN)
#define	notify_with_cause_ooc(p, c, m)   notify_check(p,c,m, MSG_PUP_ALWAYS|MSG_ME_ALL|MSG_F_DOWN|MSG_OOC)
#define	notify_with_cause_html(p, c, m)   notify_check(p,c,m, MSG_PUP_ALWAYS|MSG_ME_ALL|MSG_F_DOWN|MSG_HTML)
#define	notify_quiet_with_cause(p, c, m)   notify_check(p,c,m, MSG_PUP_ALWAYS|MSG_ME)
#define	notify_all(p, c, m)   notify_check(p,c,m, MSG_ME_ALL|MSG_NBR_EXITS|MSG_F_UP|MSG_F_CONTENTS)
#define	notify_all_from_inside(p, c, m)   notify_check(p,c,m, MSG_ME_ALL|MSG_NBR_EXITS_A|MSG_F_UP|MSG_F_CONTENTS|MSG_S_INSIDE)
#define	notify_all_from_inside_saypose(p, c, m)   notify_check(p,c,m, MSG_ME_ALL|MSG_NBR_EXITS_A|MSG_F_UP|MSG_F_CONTENTS|MSG_S_INSIDE|MSG_SAYPOSE)
#define	notify_all_from_inside_html(p, c, m)   notify_check(p,c,m, MSG_ME_ALL|MSG_NBR_EXITS_A|MSG_F_UP|MSG_F_CONTENTS|MSG_S_INSIDE|MSG_HTML)
#define	DUMP_I_NORMAL   0
#define	DUMP_I_PANIC   1
#define	DUMP_I_RESTART   2
#define	DUMP_I_FLAT   3
#define	DUMP_I_SIGNAL   4
#define	NUM_DUMP_TYPES   5
#define	ENDLINE   "\n"
#define	match_controlled(player, name)   match_controlled_handler(player, name, false)
#define	match_controlled_quiet(player, name)   match_controlled_handler(player, name, true)
#define	IEEE_MAKE_NAN   1
#define	IEEE_MAKE_IND   2
#define	IEEE_MAKE_PINF   3
#define	IEEE_MAKE_NINF   4
#define	Protect(f)   (cmdp->perms & f)
#define	Invalid_Objtype(x)
#define	atr_get(t, a, o, f)   atr_get_real(t,a,o,f, __FILE__, __LINE__)
#define	atr_pget(t, a, o, f)   atr_pget_real(t,a,o,f, __FILE__, __LINE__)
#define	check_zone(player, thing)   check_zone_handler(player, thing, false)
#define	ATTRIB_ACCESS   1
#define	ATTRIB_RENAME   2
#define	ATTRIB_DELETE   4
#define	ATTRIB_INFO   8
#define	BOOT_QUIET   1
#define	BOOT_PORT   2
#define	CEMIT_NOHEADER   1
#define	CHOWN_ONE   1
#define	CHOWN_ALL   2
#define	CHOWN_NOZONE   8
#define	CLIST_FULL   1
#define	CLIST_HEADERS   2
#define	CLONE_LOCATION   0
#define	CLONE_INHERIT   1
#define	CLONE_PRESERVE   2
#define	CLONE_INVENTORY   4
#define	CLONE_SET_COST   8
#define	CLONE_SET_LOC   16
#define	CLONE_SET_NAME   32
#define	CLONE_FROM_PARENT   64
#define	CBOOT_QUIET   1
#define	COMTITLE_ON   1
#define	COMTITLE_OFF   2
#define	CRE_INVENTORY   0
#define	CRE_LOCATION   1
#define	CRE_SET_LOC   2
#define	CSET_PUBLIC   0
#define	CSET_PRIVATE   1
#define	CSET_LOUD   2
#define	CSET_QUIET   3
#define	CSET_LIST   4
#define	CSET_OBJECT   5
#define	CSET_SPOOF   6
#define	CSET_NOSPOOF   7
#define	CSET_HEADER   8
#define	CSET_LOG   9
#define	DBCK_DEFAULT   1
#define	DBCK_FULL   2
#define	DECOMP_DBREF   1
#define	DEST_ONE   1
#define	DEST_OVERRIDE   4
#define	DEST_INSTANT   8
#define	DIG_TELEPORT   1
#define	DOLIST_SPACE   0
#define	DOLIST_DELIMIT   1
#define	DOLIST_NOTIFY   2
#define	DOING_MESSAGE   0
#define	DOING_HEADER   1
#define	DOING_POLL   2
#define	DOING_UNIQUE   3
#define	DOING_MASK   15
#define	DOING_QUIET   16
#define	DROP_QUIET   1
#define	DUMP_STRUCT   1
#define	DUMP_TEXT   2
#define	DUMP_FLATFILE   4
#define	EXAM_DEFAULT   0
#define	EXAM_BRIEF   1
#define	EXAM_LONG   2
#define	EXAM_DEBUG   4
#define	EXAM_PARENT   8
#define	FIXDB_OWNER   1
#define	FIXDB_LOC   2
#define	FIXDB_CON   4
#define	FIXDB_EXITS   8
#define	FIXDB_NEXT   16
#define	FIXDB_PENNIES   32
#define	FIXDB_ZONE   64
#define	FIXDB_LINK   128
#define	FIXDB_PARENT   256
#define	FIXDB_NAME   2048
#define	FLAG_REMOVE   1
#define	GET_QUIET   1
#define	GIVE_QUIET   64
#define	GLOB_ENABLE   1
#define	GLOB_DISABLE   2
#define	HALT_ALL   1
#define	HOOK_BEFORE   1
#define	HOOK_AFTER   2
#define	HOOK_PERMIT   4
#define	HOOK_IGNORE   8
#define	HOOK_IGSWITCH   16
#define	HOOK_AFAIL   32
#define	HOOK_CLEAR   64
#define	HOOK_LIST   128
#define	ICMD_DISABLE   0
#define	ICMD_IGNORE   1
#define	ICMD_ON   2
#define	ICMD_OFF   4
#define	ICMD_CLEAR   8
#define	ICMD_CHECK   16
#define	ICMD_DROOM   32
#define	ICMD_IROOM   64
#define	ICMD_CROOM   128
#define	ICMD_LROOM   256
#define	ICMD_LALLROOM   512
#define	KILL_KILL   1
#define	KILL_SLAY   2
#define	LOOK_LOOK   1
#define	LOOK_OUTSIDE   8
#define	MAIL_STATS   1
#define	MAIL_DSTATS   2
#define	MAIL_FSTATS   3
#define	MAIL_DEBUG   4
#define	MAIL_NUKE   5
#define	MAIL_FOLDER   6
#define	MAIL_LIST   7
#define	MAIL_READ   8
#define	MAIL_CLEAR   9
#define	MAIL_UNCLEAR   10
#define	MAIL_PURGE   11
#define	MAIL_FILE   12
#define	MAIL_TAG   13
#define	MAIL_UNTAG   14
#define	MAIL_FORWARD   15
#define	MAIL_SEND   16
#define	MAIL_EDIT   17
#define	MAIL_URGENT   18
#define	MAIL_ALIAS   19
#define	MAIL_ALIST   20
#define	MAIL_PROOF   21
#define	MAIL_ABORT   22
#define	MAIL_QUICK   23
#define	MAIL_REVIEW   24
#define	MAIL_RETRACT   25
#define	MAIL_CC   26
#define	MAIL_SAFE   27
#define	MAIL_REPLY   28
#define	MAIL_REPLYALL   29
#define	MAIL_BCC   30
#define	MAIL_QUOTE   0x100
#define	MALIAS_DESC   1
#define	MALIAS_CHOWN   2
#define	MALIAS_ADD   3
#define	MALIAS_REMOVE   4
#define	MALIAS_DELETE   5
#define	MALIAS_RENAME   6
#define	MALIAS_LIST   8
#define	MALIAS_STATUS   9
#define	MARK_SET   0
#define	MARK_CLEAR   1
#define	MOTD_ALL   0
#define	MOTD_WIZ   1
#define	MOTD_DOWN   2
#define	MOTD_FULL   4
#define	MOTD_LIST   8
#define	MOTD_BRIEF   16
#define	MOVE_QUIET   1
#define	NFY_NFY   0
#define	NFY_NFYALL   1
#define	NFY_DRAIN   2
#define	NFY_QUIET   3
#define	OPEN_LOCATION   0
#define	OPEN_INVENTORY   1
#define	PCRE_PLAYER   1
#define	PCRE_ROBOT   2
#define	PEMIT_PEMIT   1
#define	PEMIT_OEMIT   2
#define	PEMIT_WHISPER   3
#define	PEMIT_FSAY   4
#define	PEMIT_FEMIT   5
#define	PEMIT_FPOSE   6
#define	PEMIT_FPOSE_NS   7
#define	PEMIT_CONTENTS   8
#define	PEMIT_HERE   16
#define	PEMIT_ROOM   32
#define	PEMIT_LIST   64
#define	PEMIT_HTML   128
#define	PS_BRIEF   0
#define	PS_LONG   1
#define	PS_SUMM   2
#define	PS_ALL   4
#define	QUERY_SQL   1
#define	QUEUE_KICK   1
#define	QUEUE_WARP   2
#define	QUOTA_SET   1
#define	QUOTA_FIX   2
#define	QUOTA_TOT   4
#define	QUOTA_REM   8
#define	QUOTA_ALL   16
#define	SAY_SAY   1
#define	SAY_NOSPACE   1
#define	SAY_POSE   2
#define	SAY_POSE_NOSPC   3
#define	SAY_PREFIX   4
#define	SAY_EMIT   5
#define	SAY_NOEVAL   8
#define	SHOUT_SHOUT   1
#define	SHOUT_WALLPOSE   2
#define	SHOUT_WALLEMIT   3
#define	SHOUT_WIZSHOUT   4
#define	SHOUT_WIZPOSE   5
#define	SHOUT_WIZEMIT   6
#define	SHOUT_ADMINSHOUT   7
#define	SAY_NOTAG   32
#define	SAY_HERE   64
#define	SAY_ROOM   128
#define	SAY_HTML   256
#define	SET_QUIET   1
#define	SHOUT_DEFAULT   0
#define	SHOUT_WIZARD   1
#define	SHOUT_ADMIN   2
#define	SHUTDN_NORMAL   0
#define	SHUTDN_PANIC   1
#define	SHUTDN_EXIT   2
#define	SHUTDN_COREDUMP   4
#define	SRCH_SEARCH   1
#define	SRCH_MARK   2
#define	SRCH_UNMARK   3
#define	STAT_PLAYER   0
#define	STAT_ALL   1
#define	STAT_ME   2
#define	SWITCH_DEFAULT   0
#define	SWITCH_ANY   1
#define	SWITCH_ONE   2
#define	SWEEP_ME   1
#define	SWEEP_HERE   2
#define	SWEEP_COMMANDS   4
#define	SWEEP_LISTEN   8
#define	SWEEP_PLAYER   16
#define	SWEEP_CONNECT   32
#define	SWEEP_EXITS   64
#define	SWEEP_SCAN   128
#define	SWEEP_VERBOSE   256
#define	TELEPORT_DEFAULT   1
#define	TELEPORT_QUIET   2
#define	TELEPORT_LIST   4
#define	TIMECHK_RESET   1
#define	TIMECHK_SCREEN   2
#define	TIMECHK_LOG   4
#define	TOAD_NO_CHOWN   1
#define	TRIG_QUIET   1
#define	TWARP_QUEUE   1
#define	TWARP_DUMP   2
#define	TWARP_CLEAN   4
#define	TWARP_IDLE   8
#define	TWARP_EVENTS   32
#define	WAIT_UNTIL   1
#define	HUSH_ENTER   1
#define	HUSH_LEAVE   2
#define	HUSH_EXIT   4
#define	EV_FIGNORE   0x00000000
#define	EV_FMAND   0x00000100
#define	EV_FCHECK   0x00000200
#define	EV_STRIP_CURLY   0x00000400
#define	EV_EVAL   0x00000800
#define	EV_STRIP_TS   0x00001000
#define	EV_STRIP_LS   0x00002000
#define	EV_STRIP_ESC   0x00004000
#define	EV_STRIP_AROUND   0x00008000
#define	EV_TOP   0x00010000
#define	EV_NOTRACE   0x00020000
#define	EV_NO_COMPRESS   0x00040000
#define	EV_NO_LOCATION   0x00080000
#define	EV_NOFCHECK   0x00100000
#define	MSG_PUP_ALWAYS   0x00000001UL
#define	MSG_INV   0x00000002UL
#define	MSG_INV_L   0x00000004UL
#define	MSG_INV_EXITS   0x00000008UL
#define	MSG_NBR   0x00000010UL
#define	MSG_NBR_A   0x00000020UL
#define	MSG_NBR_EXITS   0x00000040UL
#define	MSG_NBR_EXITS_A   0x00000080UL
#define	MSG_LOC   0x00000100UL
#define	MSG_LOC_A   0x00000200UL
#define	MSG_FWDLIST   0x00000400UL
#define	MSG_ME   0x00000800UL
#define	MSG_S_INSIDE   0x00001000UL
#define	MSG_S_OUTSIDE   0x00002000UL
#define	MSG_HTML   0x00004000UL
#define	MSG_OOC   0x00008000UL
#define	MSG_SAYPOSE   0x00010000UL
#define	MSG_ME_ALL   (MSG_ME|MSG_INV_EXITS|MSG_FWDLIST)
#define	MSG_F_CONTENTS   (MSG_INV)
#define	MSG_F_UP   (MSG_NBR_A|MSG_LOC_A)
#define	MSG_F_DOWN   (MSG_INV_L)
#define	LK_IDESC   0x0001
#define	LK_OBEYTERSE   0x0002
#define	LK_SHOWATTR   0x0004
#define	LK_SHOWEXIT   0x0008
#define	LK_SHOWVRML   0x0010
#define	VE_LOC_XAM   0x01
#define	VE_LOC_DARK   0x02
#define	VE_LOC_LIGHT   0x04
#define	VE_BASE_DARK   0x10
#define	SA_EXIT   1
#define	SA_DFLT   2
#define	STARTLOG(key, p, s)   if ((((key) & mudconf.log_options) != 0) && start_log(p, s)) {
#define	ENDLOG   end_log(); }
#define	LOG_SIMPLE(key, p, s, m)
#define	safe_nothing(b, p)   safe_copy_buf(FUNC_FAIL_MESSAGE,3,(b),(p))
#define	safe_noperm(b, p)   safe_copy_buf(FUNC_NOPERM_MESSAGE,21,(b),(p))
#define	safe_nomatch(b, p)   safe_copy_buf(FUNC_NOMATCH_MESSAGE,12,(b),(p))
#define	safe_range(b, p)   safe_copy_buf(OUT_OF_RANGE,16,(b),(p))
#define	safe_ambiguous(b, p)   safe_copy_buf(FUNC_AMBIGUOUS,13,(b),(p))
#define	safe_notfound(b, p)   safe_copy_buf(FUNC_NOT_FOUND,13,(b),(p))
#define	MAX_LISTEN_PORTS   10
#define	PRIORITY_SYSTEM   100
#define	PRIORITY_PLAYER   200
#define	PRIORITY_OBJECT   300
#define	PRIORITY_SUSPEND   400
#define	PRIORITY_CF_DEQUEUE_ENABLED   PRIORITY_OBJECT
#define	PRIORITY_CF_DEQUEUE_DISABLED   (PRIORITY_PLAYER-1)
#define	IU_DONE   0
#define	IU_NEXT_TASK   1
#define	IU_REMOVE_TASK   2
#define	IU_UPDATE_TASK   3
#define	CIF_TOTALTIME   0
#define	CIF_LONGESTCONNECT   1
#define	CIF_LASTCONNECT   2
#define	CIF_NUMCONNECTS   3
#define	fetch_totaltime(t)   (fetch_ConnectionInfoField((t), CIF_TOTALTIME))
#define	fetch_longestconnect(t)   (fetch_ConnectionInfoField((t), CIF_LONGESTCONNECT))
#define	fetch_lastconnect(t)   (fetch_ConnectionInfoField((t), CIF_LASTCONNECT))
#define	fetch_numconnections(t)   (fetch_ConnectionInfoField((t), CIF_NUMCONNECTS))
Typedefs
typedef void	FTASK (void *, int)
typedef struct TASK_RECORD *	PTASK_RECORD
typedef int	SCHCMP (PTASK_RECORD, PTASK_RECORD)
typedef int	SCHLOOK (PTASK_RECORD)
Functions
void	boot_slave (dbref executor, dbref caller, dbref enactor, int key)
	Lauch reverse-DNS slave process.
void	close_sockets (bool emergency, char *message)
void	CleanUpSlaveSocket (void)
void	CleanUpSlaveProcess (void)
void	cf_log_notfound (dbref, char *, const char *, char *)
int	cf_modify_bits (int *, char *, void *, UINT32, dbref, char *)
void DCL_CDECL	cf_log_syntax (dbref player, char *cmd, const char *fmt,...)
void	ValidateConfigurationDbrefs (void)
int	cf_read (void)
void	cf_init (void)
void	cf_list (dbref, char *, char **)
void	cf_display (dbref, char *, char *, char **)
void	list_cf_access (dbref)
int	cf_set (char *, char *, dbref)
	CF_HAND (cf_cf_access)
	CF_HAND (cf_access)
	CF_HAND (cf_cmd_alias)
	CF_HAND (cf_acmd_access)
	CF_HAND (cf_attr_access)
	CF_HAND (cf_func_access)
	CF_HAND (cf_flag_access)
	CF_HAND (cf_flag_name)
	CF_HAND (cf_art_rule)
void	local_startup (void)
void	local_presync_database (void)
void	local_presync_database_sigsegv (void)
void	local_dump_database (int)
void	local_dump_complete_signal (void)
void	local_shutdown (void)
void	local_dbck (void)
void	local_connect (dbref, int, int)
void	local_disconnect (dbref, int)
void	local_data_create (dbref)
void	local_data_clone (dbref, dbref)
void	local_data_free (dbref)
void	load_mail (FILE *)
int	dump_mail (FILE *)
mail *	mail_fetch (dbref, int)
void DCL_CDECL	raw_broadcast (int, char *,...)
void	list_siteinfo (dbref)
void	logged_out0 (dbref executor, dbref caller, dbref enactor, int key)
void	logged_out1 (dbref executor, dbref caller, dbref enactor, int key, char *arg)
void	init_logout_cmdtab (void)
void	desc_reload (dbref)
void	make_portlist (dbref, dbref, char *, char **)
int	nfy_que (dbref, int, int, int)
int	halt_que (dbref, dbref)
void	wait_que (dbref executor, dbref caller, dbref enactor, bool, CLinearTimeAbsolute &, dbref, int, char *, char *[], int, char *[])
char *	crypt (const char *inptr, const char *inkey)
void	tcache_init (void)
char *	parse_to (char **, char, int)
char *	parse_arglist (dbref executor, dbref caller, dbref enactor, char *, char, int, char *[], int, char *[], int, int *)
int	get_gender (dbref)
void	mux_exec (char *buff, char **bufc, dbref executor, dbref caller, dbref enactor, int eval, char **dstr, char *cargs[], int ncargs)
void	save_global_regs (const char *, char *[], int[])
void	save_and_clear_global_regs (const char *, char *[], int[])
void	restore_global_regs (const char *, char *[], int[])
char **	PushPointers (int nNeeded)
void	PopPointers (char **p, int nNeeded)
int *	PushIntegers (int nNeeded)
void	PopIntegers (int *pi, int nNeeded)
void	notify_except (dbref, dbref, dbref, const char *, int key)
void	notify_except2 (dbref, dbref, dbref, dbref, const char *)
void	notify_check (dbref, dbref, const char *, int)
bool	Hearer (dbref)
void	report (void)
bool	atr_match (dbref thing, dbref player, char type, char *str, char *raw_str, bool check_parents)
bool	regexp_match (char *pattern, char *str, int case_opt, char *args[], int nargs)
bool	list_check (dbref thing, dbref player, char type, char *str, char *raw_str, bool check_parent)
bool	html_escape (const char *src, char *dest, char **destp)
void	dump_database_internal (int)
void	fork_and_dump (int key)
void	helpindex_clean (int)
void	helpindex_load (dbref)
void	helpindex_init (void)
void	help_helper (dbref executor, int iHelpfile, char *topic_arg, char *buff, char **bufc)
int	cf_ntab_access (int *, char *, void *, UINT32, dbref, char *)
bool	start_log (const char *primary, const char *secondary)
void	end_log (void)
void	log_perror (const char *, const char *, const char *, const char *)
void	log_text (const char *)
void	log_number (int)
void DCL_CDECL	log_printf (const char *fmt,...)
void	log_name (dbref)
void	log_name_and_loc (dbref)
void	log_type_and_name (dbref)
void	look_in (dbref, dbref, int)
void	show_vrml_url (dbref, dbref)
size_t	decode_attr_flags (int aflags, char *buff)
void	move_object (dbref, dbref)
void	move_via_generic (dbref, dbref, dbref, int)
bool	move_via_teleport (dbref, dbref, dbref, int)
void	move_exit (dbref, dbref, bool, const char *, int)
void	do_enter_internal (dbref, dbref, bool)
dbref	start_home (void)
dbref	default_home (void)
bool	can_set_home (dbref, dbref, dbref)
dbref	new_home (dbref)
dbref	clone_home (dbref, dbref)
void	divest_object (dbref)
dbref	create_obj (dbref, int, const char *, int)
void	destroy_obj (dbref)
void	empty_obj (dbref)
dbref	create_player (char *name, char *pass, dbref executor, bool isrobot, const char **pmsg)
void	AddToPublicChannel (dbref player)
bool	add_player_name (dbref, const char *)
bool	delete_player_name (dbref, const char *)
dbref	lookup_player (dbref, char *, bool)
void	load_player_names (void)
void	badname_add (char *)
void	badname_remove (char *)
bool	badname_check (char *)
void	badname_list (dbref, const char *)
void	ChangePassword (dbref player, const char *szPassword)
const char *	mux_crypt (const char *szPassword, const char *szSalt, int *piType)
int	QueueMax (dbref)
	Returns the player's upper limit of queued commands.
int	a_Queue (dbref, int)
	Adjusts the count of queued commands up or down.
void	pcache_reload (dbref)
	Re-initializes Money and QueueMax items from the database.
void	pcache_init (void)
	Initializes the player cache.
char *DCL_CDECL	tprintf (const char *,...)
void DCL_CDECL	safe_tprintf_str (char *, char **, const char *,...)
dbref	insert_first (dbref, dbref)
dbref	remove_first (dbref, dbref)
dbref	reverse_list (dbref)
bool	member (dbref, dbref)
bool	could_doit (dbref, dbref, int)
bool	can_see (dbref, dbref, bool)
void	add_quota (dbref, int)
bool	canpayfees (dbref, dbref, int, int)
void	giveto (dbref, int)
bool	payfor (dbref, int)
char *	MakeCanonicalObjectName (const char *pName, int *pnName, bool *pbValid)
char *	MakeCanonicalExitName (const char *pName, int *pnName, bool *pbValid)
bool	ValidatePlayerName (const char *pName)
bool	ok_password (const char *szPassword, const char **pmsg)
void	handle_ears (dbref, bool, bool)
dbref	match_possessed (dbref, dbref, char *, dbref, bool)
void	parse_range (char **, dbref *, dbref *)
bool	parse_thing_slash (dbref, char *, char **, dbref *)
bool	get_obj_and_lock (dbref, char *, dbref *, ATTR **, char *, char **)
dbref	where_is (dbref)
dbref	where_room (dbref)
bool	locatable (dbref, dbref, dbref)
bool	nearby (dbref, dbref)
bool	exit_visible (dbref, dbref, int)
bool	exit_displayable (dbref, dbref, int)
void	did_it (dbref, dbref, int, const char *, int, const char *, int, char *[], int)
bool	bCanReadAttr (dbref executor, dbref target, ATTR *tattr, bool bParentCheck)
bool	bCanSetAttr (dbref executor, dbref target, ATTR *tattr)
bool	bCanLockAttr (dbref executor, dbref target, ATTR *tattr)
bool	parse_attrib (dbref, char *, dbref *, ATTR **)
bool	parse_attrib_wild (dbref, char *, dbref *, bool, bool, bool)
void	edit_string (char *, char **, char *, char *)
dbref	match_controlled_handler (dbref player, const char *name, bool bQuiet)
void	set_modified (dbref thing)
bool	eval_boolexp (dbref, dbref, dbref, BOOLEXP *)
BOOLEXP *	parse_boolexp (dbref, const char *, bool)
bool	eval_boolexp_atr (dbref, dbref, dbref, char *)
bool	xlate (char *)
double	MakeSpecialFloat (int iWhich)
char *	unparse_boolexp (dbref, BOOLEXP *)
char *	unparse_boolexp_quiet (dbref, BOOLEXP *)
char *	unparse_boolexp_decompile (dbref, BOOLEXP *)
char *	unparse_boolexp_function (dbref, BOOLEXP *)
int	chown_all (dbref from_player, dbref to_player, dbref acting_player, int key)
void	olist_push (void)
void	olist_pop (void)
void	olist_add (dbref)
dbref	olist_first (void)
dbref	olist_next (void)
bool	wild (char *, char *, char *[], int)
bool	wild_match (char *, const char *)
bool	quick_wild (const char *, const char *)
bool	check_access (dbref player, int mask)
void	set_prefix_cmds (void)
	Fills in the table of single-character prefix commands.
char *	process_command (dbref executor, dbref caller, dbref enactor, bool, char *, char *[], int)
bool	Commer (dbref)
void	s_Pass (dbref, const char *)
void	s_Name (dbref, const char *)
void	s_Moniker (dbref thing, const char *s)
const char *	Name (dbref thing)
const char *	PureName (dbref thing)
const char *	Moniker (dbref thing)
int	fwdlist_load (FWDLIST *, dbref, char *)
void	fwdlist_set (dbref, FWDLIST *)
void	fwdlist_clr (dbref)
int	fwdlist_rewrite (FWDLIST *, char *)
FWDLIST *	fwdlist_get (dbref)
void	atr_push (void)
void	atr_pop (void)
int	atr_head (dbref, char **)
int	atr_next (char **)
int	init_dbfile (char *game_dir_file, char *game_pag_file, int nCachePages)
void	atr_cpy (dbref dest, dbref source, bool bInternal)
void	atr_chown (dbref)
void	atr_clr (dbref, int)
void	atr_add_raw_LEN (dbref, int, const char *, int)
void	atr_add_raw (dbref, int, const char *)
void	atr_add (dbref, int, char *, dbref, int)
void	atr_set_flags (dbref, int, int)
const char *	atr_get_raw_LEN (dbref, int, size_t *)
const char *	atr_get_raw (dbref, int)
char *	atr_get_LEN (dbref, int, dbref *, int *, size_t *)
char *	atr_get_real (dbref, int, dbref *, int *, const char *, const int)
char *	atr_pget_LEN (dbref, int, dbref *, int *, size_t *)
char *	atr_pget_real (dbref, int, dbref *, int *, const char *, const int)
char *	atr_get_str_LEN (char *s, dbref, int, dbref *, int *, size_t *)
char *	atr_get_str (char *, dbref, int, dbref *, int *)
char *	atr_pget_str_LEN (char *, dbref, int, dbref *, int *, size_t *)
char *	atr_pget_str (char *, dbref, int, dbref *, int *)
bool	atr_get_info (dbref, int, dbref *, int *)
bool	atr_pget_info (dbref, int, dbref *, int *)
void	atr_free (dbref)
bool	check_zone_handler (dbref player, dbref thing, bool bPlayerCheck)
void	ReleaseAllResources (dbref obj)
bool	fwdlist_ck (dbref player, dbref thing, int anum, char *atext)
int	ReplaceFile (char *old_name, char *new_name)
void	RemoveFile (char *name)
void	destroy_player (dbref agent, dbref victim)
void	do_pemit_list (dbref player, int key, bool bDoContents, int pemit_flags, char *list, int chPoseType, char *message)
void	do_pemit_single (dbref player, int key, bool bDoContents, int pemit_flags, char *recipient, int chPoseType, char *message)
void	do_say (dbref executor, dbref caller, dbref enactor, int key, char *message)
int	boot_off (dbref player, const char *message)
void	do_mail_clear (dbref player, char *msglist)
void	do_mail_purge (dbref player)
void	malias_cleanup (dbref player)
void	count_mail (dbref player, int folder, int *rcount, int *ucount, int *ccount)
void	check_mail_expiration (void)
void	check_mail (dbref player, int folder, bool silent)
const char *	mail_fetch_message (dbref player, int num)
int	mail_fetch_from (dbref player, int num)
void	raw_notify_html (dbref player, const char *msg)
void	do_lock (dbref executor, dbref caller, dbref enactor, int key, int nargs, char *name, char *keytext)
void	check_events (void)
void	list_system_resources (dbref player)
void	init_timer (void)
void	dispatch_DatabaseDump (void *pUnused, int iUnused)
void	dispatch_FreeListReconstruction (void *pUnused, int iUnused)
void	dispatch_IdleCheck (void *pUnused, int iUnused)
void	dispatch_CheckEvents (void *pUnused, int iUnused)
void	dispatch_CacheTick (void *pUnused, int iUnused)
int	fetch_cmds (dbref target)
void	fetch_ConnectionInfoFields (dbref target, long anFields[4])
long	fetch_ConnectionInfoField (dbref target, int iField)
void	put_ConnectionInfoFields (dbref target, long anFields[4], CLinearTimeAbsolute &ltaLogout)
CLinearTimeAbsolute	fetch_logouttime (dbref target)
void	FLOAT_Initialize (void)
void	mux_FPInit ()
void	mux_FPSet ()
void	mux_FPRestore ()
double	ulp (double)
double	mux_strtod (const char *s00, char **se)
char *	mux_dtoa (double d, int mode, int ndigits, int *decpt, int *sign, char **rve)
void	build_version (void)
void	init_version (void)
void	pcache_sync (void)
	Flushes any dirty player items to the database.
void	pcache_trim (void)
	Ages and trims the player cache of stale entries.
void	cache_redirect (void)
void	cache_pass2 (void)
char *	modSpeech (dbref player, char *message, bool bWhich, char *command)
void	stack_clr (dbref obj)
bool	parse_and_get_attrib (dbref, char *[], char **, dbref *, char *, char **)
Variables
NAMETAB	sigactions_nametab []
bool	break_called
const signed char	mux_RegisterSet [256]
const char *	ColorTable [256]
int	anum_alc_top
const char *	NOMATCH_MESSAGE
const char *	AMBIGUOUS_MESSAGE
const char *	NOPERM_MESSAGE
const char *	FUNC_FAIL_MESSAGE
const char *	FUNC_NOMATCH_MESSAGE
const char *	OUT_OF_RANGE
const char *	FUNC_NOT_FOUND
const char *	FUNC_AMBIGUOUS
const char *	FUNC_NOPERM_MESSAGE
PortInfo	aMainGamePorts [MAX_LISTEN_PORTS]
int	nMainGamePorts
int	maxd
unsigned int	ndescriptors
long	DebugTotalFiles
long	DebugTotalSockets
pid_t	game_pid
CScheduler	scheduler
NAMETAB	enable_names []
CLinearTimeAbsolute	cs_ltime

---

Define Documentation

#define atr_get	(	t,
		a,
		o,
		f		)	atr_get_real(t,a,o,f, __FILE__, __LINE__)

Definition at line 369 of file externs.h.

Referenced by add_mail_message(), add_quota(), add_to(), atr_chown(), atr_cpy(), atr_set_flags(), check_connect(), check_pass(), cmdtest(), connect_player(), could_doit(), db_write_object(), dbclean_RenumberAttributes(), debug_examine(), do_chanlog(), do_chown(), do_comlast(), do_decomp(), do_edit_msg(), do_examine(), do_expmail_stop(), do_icmd(), do_last(), do_mail_proof(), do_newpassword(), do_page(), do_password(), do_postpend(), do_prepend(), do_prog(), do_report(), eval_boolexp(), exam_wildattrs(), fetch_ConnectionInfoField(), fetch_ConnectionInfoFields(), fetch_logouttime(), FUNCTION(), fwdlist_get(), handle_prog(), idle_timeout_val(), look_atrs1(), modSpeech(), mung_quotas(), mux_exec(), nfy_que(), notify_check(), pay_quota(), process_cmdent(), process_command(), process_hook(), PureName(), record_login(), SendChannelMessage(), and show_quota().

#define atr_pget	(	t,
		a,
		o,
		f		)	atr_pget_real(t,a,o,f, __FILE__, __LINE__)

Definition at line 372 of file externs.h.

Referenced by add_prefix(), check_attr(), check_filter(), connect_player(), default_handler(), desc_reload(), destroy_player(), did_it(), do_alias(), do_chanlist(), do_toad(), eval_boolexp(), exam_wildattrs(), FUNCTION(), get_exit_dest(), get_gender(), give_money(), hasattr_handler(), look_contents(), look_exits(), look_in(), mail_return(), move_exit(), page_return(), parse_and_get_attrib(), player_folder(), process_command(), show_a_desc(), show_desc(), and show_vrml_url().

#define ATTRIB_ACCESS   1

Definition at line 389 of file externs.h.

Referenced by do_attribute().

#define ATTRIB_DELETE   4

Definition at line 391 of file externs.h.

Referenced by do_attribute().

#define ATTRIB_INFO   8

Definition at line 392 of file externs.h.

#define ATTRIB_RENAME   2

Definition at line 390 of file externs.h.

Referenced by do_attribute().

#define BOOT_PORT   2

Definition at line 394 of file externs.h.

Referenced by do_boot().

#define BOOT_QUIET   1

Definition at line 393 of file externs.h.

Referenced by do_boot().

#define CBOOT_QUIET   1

Definition at line 410 of file externs.h.

Referenced by do_chboot().

#define CEMIT_NOHEADER   1

Definition at line 395 of file externs.h.

Referenced by do_cemit().

#define check_zone	(	player,
		thing		)	check_zone_handler(player, thing, false)

Definition at line 381 of file externs.h.

#define CHOWN_ALL   2

Definition at line 397 of file externs.h.

#define CHOWN_NOZONE   8

Definition at line 399 of file externs.h.

Referenced by chown_all(), destroy_player(), and do_toad().

#define CHOWN_ONE   1

Definition at line 396 of file externs.h.

#define CIF_LASTCONNECT   2

Definition at line 977 of file externs.h.

Referenced by shutdownsock().

#define CIF_LONGESTCONNECT   1

Definition at line 976 of file externs.h.

Referenced by shutdownsock().

#define CIF_NUMCONNECTS   3

Definition at line 978 of file externs.h.

Referenced by shutdownsock().

#define CIF_TOTALTIME   0

Definition at line 975 of file externs.h.

Referenced by shutdownsock().

#define CLIST_FULL   1

Definition at line 400 of file externs.h.

Referenced by do_chanlist().

#define CLIST_HEADERS   2

Definition at line 401 of file externs.h.

Referenced by do_chanlist().

#define CLONE_FROM_PARENT   64

Definition at line 409 of file externs.h.

Referenced by do_clone().

#define CLONE_INHERIT   1

Definition at line 403 of file externs.h.

Referenced by do_clone().

#define CLONE_INVENTORY   4

Definition at line 405 of file externs.h.

Referenced by do_clone().

#define CLONE_LOCATION   0

Definition at line 402 of file externs.h.

#define CLONE_PRESERVE   2

Definition at line 404 of file externs.h.

Referenced by do_clone().

#define CLONE_SET_COST   8

Definition at line 406 of file externs.h.

Referenced by do_clone().

#define CLONE_SET_LOC   16

Definition at line 407 of file externs.h.

#define CLONE_SET_NAME   32

Definition at line 408 of file externs.h.

#define COMTITLE_OFF   2

Definition at line 412 of file externs.h.

Referenced by do_comtitle().

#define COMTITLE_ON   1

Definition at line 411 of file externs.h.

Referenced by do_comtitle().

#define CRE_INVENTORY   0

Definition at line 413 of file externs.h.

#define CRE_LOCATION   1

Definition at line 414 of file externs.h.

#define CRE_SET_LOC   2

Definition at line 415 of file externs.h.

#define CSET_HEADER   8

Definition at line 424 of file externs.h.

Referenced by do_chopen().

#define CSET_LIST   4

Definition at line 420 of file externs.h.

Referenced by do_chopen().

#define CSET_LOG   9

Definition at line 425 of file externs.h.

Referenced by do_chopen().

#define CSET_LOUD   2

Definition at line 418 of file externs.h.

Referenced by do_chopen().

#define CSET_NOSPOOF   7

Definition at line 423 of file externs.h.

Referenced by do_chopen().

#define CSET_OBJECT   5

Definition at line 421 of file externs.h.

Referenced by do_chopen().

#define CSET_PRIVATE   1

Definition at line 417 of file externs.h.

Referenced by do_chopen().

#define CSET_PUBLIC   0

Definition at line 416 of file externs.h.

Referenced by do_chopen().

#define CSET_QUIET   3

Definition at line 419 of file externs.h.

Referenced by do_chopen().

#define CSET_SPOOF   6

Definition at line 422 of file externs.h.

Referenced by do_chopen().

#define DBCK_DEFAULT   1

Definition at line 426 of file externs.h.

#define DBCK_FULL   2

Definition at line 427 of file externs.h.

Referenced by check_dead_refs(), check_loc_contents(), check_loc_exits(), and dbconvert().

#define DECOMP_DBREF   1

Definition at line 428 of file externs.h.

Referenced by do_decomp().

#define DEST_INSTANT   8

Definition at line 432 of file externs.h.

Referenced by do_destroy().

#define DEST_ONE   1

Definition at line 430 of file externs.h.

#define DEST_OVERRIDE   4

Definition at line 431 of file externs.h.

Referenced by do_destroy().

#define DIG_TELEPORT   1

Definition at line 433 of file externs.h.

Referenced by do_dig().

#define DOING_HEADER   1

Definition at line 438 of file externs.h.

Referenced by do_doing().

#define DOING_MASK   15

Definition at line 441 of file externs.h.

Referenced by do_doing().

#define DOING_MESSAGE   0

Definition at line 437 of file externs.h.

Referenced by do_doing().

#define DOING_POLL   2

Definition at line 439 of file externs.h.

#define DOING_QUIET   16

Definition at line 442 of file externs.h.

Referenced by do_doing().

#define DOING_UNIQUE   3

Definition at line 440 of file externs.h.

Referenced by do_doing().

#define DOLIST_DELIMIT   1

Definition at line 435 of file externs.h.

Referenced by do_dolist().

#define DOLIST_NOTIFY   2

Definition at line 436 of file externs.h.

Referenced by do_dolist().

#define DOLIST_SPACE   0

Definition at line 434 of file externs.h.

#define DROP_QUIET   1

Definition at line 443 of file externs.h.

Referenced by do_drop().

#define DUMP_FLATFILE   4

Definition at line 446 of file externs.h.

Referenced by fork_and_dump().

#define DUMP_I_FLAT   3

Definition at line 178 of file externs.h.

Referenced by do_backup(), and fork_and_dump().

#define DUMP_I_NORMAL   0

Definition at line 175 of file externs.h.

Referenced by do_backup(), dump_database(), and fork_and_dump().

#define DUMP_I_PANIC   1

Definition at line 176 of file externs.h.

Referenced by do_shutdown(), and dump_database_internal().

#define DUMP_I_RESTART   2

Definition at line 177 of file externs.h.

Referenced by do_restart(), and sighandler().

#define DUMP_I_SIGNAL   4

Definition at line 179 of file externs.h.

Referenced by dump_database_internal(), and sighandler().

#define DUMP_STRUCT   1

Definition at line 444 of file externs.h.

Referenced by fork_and_dump().

#define DUMP_TEXT   2

Definition at line 445 of file externs.h.

Referenced by fork_and_dump().

#define ENDLINE   "\n"

Definition at line 197 of file externs.h.

Referenced by add_comsys(), AssertionFailed(), cache_del(), cache_pass2(), cache_put(), db_read(), db_write(), del_comsys(), do_log(), do_mail_nuke(), do_shutdown(), dup_bool(), end_log(), eval_boolexp(), get_list(), init_dbfile(), CHashPage::Insert(), load_channels(), load_comsys(), load_comsystem(), load_game(), load_malias(), log_perror(), main(), make_socket(), CGuests::MakeGuestChar(), OutOfMemory(), pool_err(), putbool_subexp(), ReplaceFile(), report_timecheck(), save_comsys(), CHashPage::Split(), start_log(), unparse_boolexp1(), and write_pidfile().

#define ENDLOG   end_log(); }

Definition at line 721 of file externs.h.

Referenced by boot_slave(), CF_HAND(), cf_log_notfound(), cf_log_syntax(), cf_status_from_succfail(), check_connect(), do_backup(), do_boot(), do_command(), do_fixdb(), do_global(), do_link(), do_logged_out_internal(), do_mail_read(), do_name(), do_newpassword(), do_pcreate(), do_quota(), do_restart(), do_shout(), do_shutdown(), do_toad(), dump_database(), eval_boolexp(), failconn(), fcache_read(), fork_and_dump(), get_slave_result(), helpindex_read(), init_dbfile(), init_version(), CHashFile::Insert(), load_game(), Log_header_err(), Log_pointer_err(), log_signal(), log_signal_ignore(), Log_simple_err(), LogStatBuf(), main(), new_connection(), new_mail_message(), pool_err(), pool_free(), pool_free_lbuf(), process_command(), purge_going(), queue_write_LEN(), report(), report_timecheck(), ReportTopic(), shovechars(), shutdownsock(), sighandler(), Task_RunQueueEntry(), ValidateHelpFileIndex(), and write_pidfile().

#define EV_EVAL   0x00000800

Definition at line 654 of file externs.h.

Referenced by add_mail_message(), add_prefix(), BuildChannelMessage(), check_filter(), default_handler(), delim_check(), did_it(), do_if(), do_postpend(), do_prepend(), do_switch(), do_think(), do_ufun(), eval_boolexp(), filter_handler(), FUNCTION(), get_exit_dest(), get_handler(), look_contents(), look_exits(), look_in(), mail_return(), modSpeech(), mux_exec(), page_return(), parse_arglist(), parse_arglist_lite(), process_cmdent(), process_command(), process_hook(), process_sex(), ReportTopic(), search_perform(), show_a_desc(), switch_handler(), and u_comp().

#define EV_FCHECK   0x00000200

Definition at line 652 of file externs.h.

Referenced by add_mail_message(), BuildChannelMessage(), default_handler(), delim_check(), did_it(), do_if(), do_postpend(), do_prepend(), do_switch(), do_think(), do_ufun(), eval_boolexp(), filter_handler(), FUNCTION(), get_exit_dest(), look_contents(), look_exits(), look_in(), mail_return(), modSpeech(), mux_exec(), page_return(), parse_arglist(), parse_arglist_lite(), process_cmdent(), process_command(), process_hook(), search_perform(), show_a_desc(), switch_handler(), and u_comp().

#define EV_FIGNORE   0x00000000

Definition at line 650 of file externs.h.

Referenced by add_prefix(), check_filter(), default_handler(), did_it(), eval_boolexp(), FUNCTION(), get_handler(), and ReportTopic().

#define EV_FMAND   0x00000100

Definition at line 651 of file externs.h.

Referenced by mux_exec().

#define EV_NO_COMPRESS   0x00040000

Definition at line 661 of file externs.h.

Referenced by FUNCTION(), parse_to(), parse_to_cleanup(), process_cmdent(), and ReportTopic().

#define EV_NO_LOCATION   0x00080000

Definition at line 662 of file externs.h.

Referenced by FUNCTION(), mail_return(), mux_exec(), and page_return().

#define EV_NOFCHECK   0x00100000

Definition at line 663 of file externs.h.

Referenced by FUNCTION(), mux_exec(), and parse_arglist_lite().

#define EV_NOTRACE   0x00020000

Definition at line 660 of file externs.h.

Referenced by mux_exec(), and search_perform().

#define EV_STRIP_AROUND   0x00008000

Definition at line 658 of file externs.h.

Referenced by parse_to_cleanup(), and process_cmdent().

#define EV_STRIP_CURLY   0x00000400

Definition at line 653 of file externs.h.

Referenced by add_mail_message(), check_filter(), default_handler(), do_dolist(), do_postpend(), do_prepend(), filter_handler(), FUNCTION(), mux_exec(), parse_to(), process_cmdent(), process_command(), switch_handler(), and u_comp().

#define EV_STRIP_ESC   0x00004000

Definition at line 657 of file externs.h.

#define EV_STRIP_LS   0x00002000

Definition at line 656 of file externs.h.

Referenced by do_verb(), parse_to(), parse_to_cleanup(), and process_cmdent().

#define EV_STRIP_TS   0x00001000

Definition at line 655 of file externs.h.

Referenced by do_verb(), parse_range(), parse_to_cleanup(), process_cmdent(), and search_setup().

#define EV_TOP   0x00010000

Definition at line 659 of file externs.h.

Referenced by add_prefix(), BuildChannelMessage(), check_filter(), default_handler(), did_it(), do_if(), do_switch(), do_think(), eval_boolexp(), FUNCTION(), get_exit_dest(), look_contents(), look_exits(), look_in(), mail_return(), modSpeech(), mux_exec(), page_return(), process_cmdent(), process_command(), and show_a_desc().

#define EXAM_BRIEF   1

Definition at line 448 of file externs.h.

Referenced by do_examine().

#define EXAM_DEBUG   4

Definition at line 450 of file externs.h.

Referenced by do_examine().

#define EXAM_DEFAULT   0

Definition at line 447 of file externs.h.

Referenced by do_examine().

#define EXAM_LONG   2

Definition at line 449 of file externs.h.

#define EXAM_PARENT   8

Definition at line 451 of file externs.h.

Referenced by do_examine().

#define fetch_lastconnect

(

t

)

(fetch_ConnectionInfoField((t), CIF_LASTCONNECT))

Definition at line 981 of file externs.h.

Referenced by FUNCTION().

#define fetch_longestconnect

(

t

)

(fetch_ConnectionInfoField((t), CIF_LONGESTCONNECT))

Definition at line 980 of file externs.h.

Referenced by FUNCTION().

#define fetch_numconnections

(

t

)

(fetch_ConnectionInfoField((t), CIF_NUMCONNECTS))

Definition at line 982 of file externs.h.

Referenced by FUNCTION().

#define fetch_totaltime

(

t

)

(fetch_ConnectionInfoField((t), CIF_TOTALTIME))

Definition at line 979 of file externs.h.

Referenced by FUNCTION().

#define FIXDB_CON   4

Definition at line 456 of file externs.h.

Referenced by do_fixdb().

#define FIXDB_EXITS   8

Definition at line 457 of file externs.h.

Referenced by do_fixdb().

#define FIXDB_LINK   128

Definition at line 461 of file externs.h.

#define FIXDB_LOC   2

Definition at line 455 of file externs.h.

Referenced by do_fixdb().

#define FIXDB_NAME   2048

Definition at line 463 of file externs.h.

Referenced by do_fixdb().

#define FIXDB_NEXT   16

Definition at line 458 of file externs.h.

Referenced by do_fixdb().

#define FIXDB_OWNER   1

Definition at line 454 of file externs.h.

Referenced by do_fixdb().

#define FIXDB_PARENT   256

Definition at line 462 of file externs.h.

#define FIXDB_PENNIES   32

Definition at line 459 of file externs.h.

Referenced by do_fixdb().

#define FIXDB_ZONE   64

Definition at line 460 of file externs.h.

#define FLAG_REMOVE   1

Definition at line 464 of file externs.h.

Referenced by do_flag().

#define GET_QUIET   1

Definition at line 465 of file externs.h.

Referenced by do_get().

#define GIVE_QUIET   64

Definition at line 466 of file externs.h.

Referenced by give_money(), and give_thing().

#define GLOB_DISABLE   2

Definition at line 468 of file externs.h.

Referenced by do_global().

#define GLOB_ENABLE   1

Definition at line 467 of file externs.h.

Referenced by do_global().

#define HALT_ALL   1

Definition at line 470 of file externs.h.

Referenced by do_halt().

#define HOOK_AFAIL   32

Definition at line 477 of file externs.h.

Referenced by do_hook(), hook_fail(), hook_name(), process_command(), and show_hook().

#define HOOK_AFTER   2

Definition at line 473 of file externs.h.

Referenced by do_hook(), hook_name(), and show_hook().

#define HOOK_BEFORE   1

Definition at line 472 of file externs.h.

Referenced by do_hook(), hook_name(), process_cmdent(), and show_hook().

#define HOOK_CLEAR   64

Definition at line 478 of file externs.h.

Referenced by do_hook().

#define HOOK_IGNORE   8

Definition at line 475 of file externs.h.

Referenced by do_hook(), higcheck(), hook_name(), process_command(), and show_hook().

#define HOOK_IGSWITCH   16

Definition at line 476 of file externs.h.

Referenced by do_hook(), process_command(), and show_hook().

#define HOOK_LIST   128

Definition at line 479 of file externs.h.

Referenced by do_hook().

#define HOOK_PERMIT   4

Definition at line 474 of file externs.h.

Referenced by do_hook(), higcheck(), hook_name(), process_command(), and show_hook().

#define HUSH_ENTER   1

Definition at line 644 of file externs.h.

Referenced by do_enter_internal(), do_teleport_single(), move_via_teleport(), and process_enter_loc().

#define HUSH_EXIT   4

Definition at line 646 of file externs.h.

Referenced by do_move(), move_exit(), and move_via_exit().

#define HUSH_LEAVE   2

Definition at line 645 of file externs.h.

Referenced by do_leave(), do_teleport_single(), move_via_teleport(), and process_leave_loc().

#define ICMD_CHECK   16

Definition at line 485 of file externs.h.

Referenced by do_icmd().

#define ICMD_CLEAR   8

Definition at line 484 of file externs.h.

Referenced by do_icmd().

#define ICMD_CROOM   128

Definition at line 488 of file externs.h.

Referenced by do_icmd().

#define ICMD_DISABLE   0

Definition at line 480 of file externs.h.

#define ICMD_DROOM   32

Definition at line 486 of file externs.h.

Referenced by do_icmd().

#define ICMD_IGNORE   1

Definition at line 481 of file externs.h.

#define ICMD_IROOM   64

Definition at line 487 of file externs.h.

Referenced by do_icmd().

#define ICMD_LALLROOM   512

Definition at line 490 of file externs.h.

Referenced by do_icmd().

#define ICMD_LROOM   256

Definition at line 489 of file externs.h.

Referenced by do_icmd().

#define ICMD_OFF   4

Definition at line 483 of file externs.h.

Referenced by do_icmd().

#define ICMD_ON   2

Definition at line 482 of file externs.h.

Referenced by do_icmd().

#define IEEE_MAKE_IND   2

Definition at line 302 of file externs.h.

Referenced by ParseFloat().

#define IEEE_MAKE_NAN   1

Definition at line 301 of file externs.h.

Referenced by ParseFloat().

#define IEEE_MAKE_NINF   4

Definition at line 304 of file externs.h.

Referenced by ParseFloat().

#define IEEE_MAKE_PINF   3

Definition at line 303 of file externs.h.

Referenced by ParseFloat().

#define Invalid_Objtype

(

x

)

Value:

((Protect(CA_LOCATION) && !Has_location(x)) || \
 (Protect(CA_CONTENTS) && !Has_contents(x)) || \
 (Protect(CA_PLAYER) && !isPlayer(x)))

Definition at line 335 of file externs.h.

Referenced by check_command(), and process_cmdent().

#define IU_DONE   0

Definition at line 920 of file externs.h.

Referenced by CallBack_NotifySemaphoreFirstOrQuiet(), CTaskHeap::TraverseOrdered(), and CTaskHeap::TraverseUnordered().

#define IU_NEXT_TASK   1

Definition at line 921 of file externs.h.

Referenced by CallBack_HaltQueue(), CallBack_NotifySemaphoreDrainOrAll(), CallBack_NotifySemaphoreFirstOrQuiet(), CallBack_ShowDispatches(), CallBack_ShowSemaphore(), CallBack_ShowWait(), and CallBack_Warp().

#define IU_REMOVE_TASK   2

Definition at line 922 of file externs.h.

Referenced by CallBack_HaltQueue(), CallBack_NotifySemaphoreDrainOrAll(), and CTaskHeap::TraverseUnordered().

#define IU_UPDATE_TASK   3

Definition at line 923 of file externs.h.

Referenced by CallBack_NotifySemaphoreDrainOrAll(), CallBack_NotifySemaphoreFirstOrQuiet(), CallBack_Warp(), and CTaskHeap::TraverseUnordered().

#define KILL_KILL   1

Definition at line 491 of file externs.h.

Referenced by do_kill().

#define KILL_SLAY   2

Definition at line 492 of file externs.h.

Referenced by do_kill().

#define LK_IDESC   0x0001

Definition at line 692 of file externs.h.

Referenced by look_in(), and show_desc().

#define LK_OBEYTERSE   0x0002

Definition at line 693 of file externs.h.

Referenced by announce_connect(), do_look(), look_in(), move_object(), and show_desc().

#define LK_SHOWATTR   0x0004

Definition at line 694 of file externs.h.

Referenced by do_look(), and look_in().

#define LK_SHOWEXIT   0x0008

Definition at line 695 of file externs.h.

Referenced by announce_connect(), do_look(), look_in(), and move_object().

#define LK_SHOWVRML   0x0010

Definition at line 696 of file externs.h.

Referenced by announce_connect(), and look_in().

#define LOG_SIMPLE	(	key,
		p,
		s,
		m		)

Value:

STARTLOG(key,p,s) \
        log_text(m); \
    ENDLOG

Definition at line 723 of file externs.h.

Referenced by create_obj().

#define LOOK_LOOK   1

Definition at line 493 of file externs.h.

#define LOOK_OUTSIDE   8

Definition at line 494 of file externs.h.

Referenced by do_look().

#define MAIL_ABORT   22

Definition at line 516 of file externs.h.

Referenced by do_mail().

#define MAIL_ALIAS   19

Definition at line 513 of file externs.h.

Referenced by do_mail().

#define MAIL_ALIST   20

Definition at line 514 of file externs.h.

Referenced by do_mail().

#define MAIL_BCC   30

Definition at line 524 of file externs.h.

Referenced by do_mail().

#define MAIL_CC   26

Definition at line 520 of file externs.h.

Referenced by do_mail().

#define MAIL_CLEAR   9

Definition at line 503 of file externs.h.

Referenced by do_mail().

#define MAIL_DEBUG   4

Definition at line 498 of file externs.h.

Referenced by do_mail().

#define MAIL_DSTATS   2

Definition at line 496 of file externs.h.

Referenced by do_mail().

#define MAIL_EDIT   17

Definition at line 511 of file externs.h.

Referenced by do_mail().

#define MAIL_FILE   12

Definition at line 506 of file externs.h.

Referenced by do_mail().

#define MAIL_FOLDER   6

Definition at line 500 of file externs.h.

Referenced by do_mail().

#define MAIL_FORWARD   15

Definition at line 509 of file externs.h.

Referenced by do_mail().

#define MAIL_FSTATS   3

Definition at line 497 of file externs.h.

Referenced by do_mail().

#define MAIL_LIST   7

Definition at line 501 of file externs.h.

Referenced by do_mail().

#define MAIL_NUKE   5

Definition at line 499 of file externs.h.

Referenced by do_mail().

#define MAIL_PROOF   21

Definition at line 515 of file externs.h.

Referenced by do_mail().

#define MAIL_PURGE   11

Definition at line 505 of file externs.h.

Referenced by do_mail().

#define MAIL_QUICK   23

Definition at line 517 of file externs.h.

Referenced by do_mail().

#define MAIL_QUOTE   0x100

Definition at line 525 of file externs.h.

Referenced by do_mail(), and do_mail_reply().

#define MAIL_READ   8

Definition at line 502 of file externs.h.

Referenced by do_mail().

#define MAIL_REPLY   28

Definition at line 522 of file externs.h.

Referenced by do_mail().

#define MAIL_REPLYALL   29

Definition at line 523 of file externs.h.

Referenced by do_mail().

#define MAIL_RETRACT   25

Definition at line 519 of file externs.h.

Referenced by do_mail().

#define MAIL_REVIEW   24

Definition at line 518 of file externs.h.

Referenced by do_mail().

#define MAIL_SAFE   27

Definition at line 521 of file externs.h.

Referenced by do_mail().

#define MAIL_SEND   16

Definition at line 510 of file externs.h.

Referenced by do_mail().

#define MAIL_STATS   1

Definition at line 495 of file externs.h.

Referenced by do_mail().

#define MAIL_TAG   13

Definition at line 507 of file externs.h.

Referenced by do_mail().

#define MAIL_UNCLEAR   10

Definition at line 504 of file externs.h.

Referenced by do_mail().

#define MAIL_UNTAG   14

Definition at line 508 of file externs.h.

Referenced by do_mail().

#define MAIL_URGENT   18

Definition at line 512 of file externs.h.

Referenced by do_mail().

#define MALIAS_ADD   3

Definition at line 529 of file externs.h.

Referenced by do_malias().

#define MALIAS_CHOWN   2

Definition at line 528 of file externs.h.

Referenced by do_malias().

#define MALIAS_DELETE   5

Definition at line 531 of file externs.h.

Referenced by do_malias().

#define MALIAS_DESC   1

Definition at line 527 of file externs.h.

Referenced by do_malias().

#define MALIAS_LIST   8

Definition at line 533 of file externs.h.

Referenced by do_malias().

#define MALIAS_REMOVE   4

Definition at line 530 of file externs.h.

Referenced by do_malias().

#define MALIAS_RENAME   6

Definition at line 532 of file externs.h.

Referenced by do_malias().

#define MALIAS_STATUS   9

Definition at line 534 of file externs.h.

Referenced by do_malias().

#define MARK_CLEAR   1

Definition at line 536 of file externs.h.

Referenced by do_markall().

#define MARK_SET   0

Definition at line 535 of file externs.h.

Referenced by do_markall().

#define match_controlled	(	player,
		name		)	match_controlled_handler(player, name, false)

Definition at line 289 of file externs.h.

Referenced by do_alias(), do_cut(), do_force(), do_forwardlist(), do_halt(), do_mvattr(), do_name(), do_pemit_single(), do_power(), do_ps(), do_set(), do_sweep(), do_unlock(), and search_setup().

#define match_controlled_quiet	(	player,
		name		)	match_controlled_handler(player, name, true)

Definition at line 290 of file externs.h.

Referenced by do_destroy(), and FUNCTION().

#define MAX_LISTEN_PORTS   10

Definition at line 811 of file externs.h.

#define MOTD_ALL   0

Definition at line 537 of file externs.h.

Referenced by do_motd().

#define MOTD_BRIEF   16

Definition at line 542 of file externs.h.

Referenced by do_motd().

#define MOTD_DOWN   2

Definition at line 539 of file externs.h.

Referenced by do_motd().

#define MOTD_FULL   4

Definition at line 540 of file externs.h.

Referenced by do_motd().

#define MOTD_LIST   8

Definition at line 541 of file externs.h.

Referenced by do_motd().

#define MOTD_WIZ   1

Definition at line 538 of file externs.h.

Referenced by do_motd().

#define MOVE_QUIET   1

Definition at line 543 of file externs.h.

Referenced by do_enter(), do_leave(), and do_move().

#define MSG_F_CONTENTS   (MSG_INV)

Definition at line 686 of file externs.h.

Referenced by notify_check().

#define MSG_F_DOWN   (MSG_INV_L)

Definition at line 688 of file externs.h.

Referenced by notify_check(), notify_except(), and notify_except2().

#define MSG_F_UP   (MSG_NBR_A|MSG_LOC_A)

Definition at line 687 of file externs.h.

Referenced by notify_check(), notify_except(), and notify_except2().

#define MSG_FWDLIST   0x00000400UL

Definition at line 677 of file externs.h.

Referenced by announce_connect(), announce_disconnect(), and notify_check().

#define MSG_HTML   0x00004000UL

Definition at line 681 of file externs.h.

Referenced by notify_check().

#define MSG_INV   0x00000002UL

Definition at line 668 of file externs.h.

Referenced by announce_connect(), announce_disconnect(), handle_ears(), and notify_check().

#define MSG_INV_EXITS   0x00000008UL

Definition at line 670 of file externs.h.

Referenced by notify_check().

#define MSG_INV_L   0x00000004UL

Definition at line 669 of file externs.h.

Referenced by notify_check().

#define MSG_LOC   0x00000100UL

Definition at line 675 of file externs.h.

Referenced by announce_connect(), announce_disconnect(), handle_ears(), and notify_check().

#define MSG_LOC_A   0x00000200UL

Definition at line 676 of file externs.h.

Referenced by notify_check().

#define MSG_ME   0x00000800UL

Definition at line 678 of file externs.h.

Referenced by handle_ears(), notify_check(), notify_except(), and notify_except2().

#define MSG_ME_ALL   (MSG_ME|MSG_INV_EXITS|MSG_FWDLIST)

Definition at line 685 of file externs.h.

Referenced by notify_except(), and notify_except2().

#define MSG_NBR   0x00000010UL

Definition at line 671 of file externs.h.

Referenced by announce_connect(), announce_disconnect(), handle_ears(), and notify_check().

#define MSG_NBR_A   0x00000020UL

Definition at line 672 of file externs.h.

Referenced by notify_check().

#define MSG_NBR_EXITS   0x00000040UL

Definition at line 673 of file externs.h.

Referenced by announce_connect(), announce_disconnect(), and notify_check().

#define MSG_NBR_EXITS_A   0x00000080UL

Definition at line 674 of file externs.h.

Referenced by notify_check(), notify_except(), and notify_except2().

#define MSG_OOC   0x00008000UL

Definition at line 682 of file externs.h.

Referenced by notify_check().

#define MSG_PUP_ALWAYS   0x00000001UL

Definition at line 667 of file externs.h.

Referenced by notify_check().

#define MSG_S_INSIDE   0x00001000UL

Definition at line 679 of file externs.h.

Referenced by notify_check(), notify_except(), and notify_except2().

#define MSG_S_OUTSIDE   0x00002000UL

Definition at line 680 of file externs.h.

Referenced by notify_check(), notify_except(), and notify_except2().

#define MSG_SAYPOSE   0x00010000UL

Definition at line 683 of file externs.h.

Referenced by do_say(), and notify_check().

#define NFY_DRAIN   2

Definition at line 546 of file externs.h.

Referenced by CallBack_NotifySemaphoreDrainOrAll(), destroy_bad_obj(), destroy_obj(), and do_notify().

#define NFY_NFY   0

Definition at line 544 of file externs.h.

Referenced by CallBack_NotifySemaphoreFirstOrQuiet(), and nfy_que().

#define NFY_NFYALL   1

Definition at line 545 of file externs.h.

#define NFY_QUIET   3

Definition at line 547 of file externs.h.

Referenced by do_notify(), and nfy_que().

#define notify	(	p,
		m		)	notify_check(p,p,m, MSG_PUP_ALWAYS|MSG_ME_ALL|MSG_F_DOWN)

Definition at line 121 of file externs.h.

Referenced by add_mail_message(), badname_list(), CallBack_ShowDispatches(), CallBack_ShowSemaphore(), CallBack_ShowWait(), canpayfees(), CF_HAND(), cf_log_notfound(), cf_log_syntax(), cf_set(), cf_status_from_succfail(), check_dead_refs(), check_floating(), check_mail(), chown_all(), convert_flags(), create_obj(), dbclean_CheckALISTtoAT(), dbclean_CheckALISTtoDB(), dbclean_CheckANHtoAT(), dbclean_CheckATtoANH(), debug_examine(), decode_power(), decompile_flags(), destroy_obj(), did_it(), disp_from_on(), display_flagtab(), display_powertab(), do_addcommand(), do_admin(), do_apply_marked(), do_attribute(), do_backup(), do_boot(), do_chownall(), do_chzone(), do_clone(), do_command(), do_create(), do_dbck(), do_dbclean(), do_decomp(), do_delcommand(), do_destroy(), do_dig(), do_doing(), do_dolist(), do_drop(), do_dump(), do_edit_msg(), do_enter(), do_enter_internal(), do_entrances(), do_examine(), do_expmail_abort(), do_expmail_start(), do_expmail_stop(), do_find(), do_fixdb(), do_flag(), do_function(), do_get(), do_give(), do_halt(), do_help(), do_hook(), do_icmd(), do_inventory(), do_kill(), do_last(), do_leave(), do_list(), do_listcommands(), do_log(), do_mail(), do_mail_cc(), do_mail_change_folder(), do_mail_debug(), do_mail_file(), do_mail_flags(), do_mail_fwd(), do_mail_list(), do_mail_nuke(), do_mail_proof(), do_mail_purge(), do_mail_quick(), do_mail_read(), do_mail_reply(), do_mail_retract(), do_mail_retract1(), do_mail_review(), do_mail_stats(), do_mail_stub(), do_malias(), do_malias_add(), do_malias_adminlist(), do_malias_chown(), do_malias_create(), do_malias_delete(), do_malias_desc(), do_malias_list(), do_malias_list_all(), do_malias_remove(), do_malias_rename(), do_malias_send(), do_malias_status(), do_markall(), do_moniker(), do_move(), do_notify(), do_page(), do_password(), do_pemit_single(), do_postpend(), do_prepend(), do_processcom(), do_prog(), do_ps(), do_queue(), do_quitprog(), do_report(), do_restart(), do_score(), do_search(), do_shutdown(), do_stats(), do_sweep(), do_teleport(), do_think(), do_train(), do_verb(), do_version(), do_wait(), er_mark_disabled(), eval_boolexp(), exam_wildattrs(), fcache_load(), fh_any(), fh_going_bit(), flag_set(), FUNCTION(), fwdlist_load(), get_stats(), give_money(), give_thing(), help_write(), helpindex_load(), hook_loop(), list_bufstats(), list_costs(), list_sites(), list_system_resources(), CGuests::ListAll(), listset_nametab(), look_contents(), look_exits(), look_in(), look_simple(), mail_check(), make_numlist(), match_status(), move_exit(), move_object(), mux_exec(), page_check(), parse_boolexp_L(), parse_msglist(), pool_trace(), power_set(), process_cmdent(), process_command(), record_login(), ReportMatchedTopics(), search_mark(), search_setup(), send_mail(), setup_que(), show_a_desc(), ShowPsLine(), sp_ok(), sweep_check(), Task_RunQueueEntry(), tcache_finish(), view_atr(), and whisper_pose().

#define notify_all	(	p,
		c,
		m		)	notify_check(p,c,m, MSG_ME_ALL|MSG_NBR_EXITS|MSG_F_UP|MSG_F_CONTENTS)

Definition at line 131 of file externs.h.

Referenced by do_destroy().

#define notify_all_from_inside	(	p,
		c,
		m		)	notify_check(p,c,m, MSG_ME_ALL|MSG_NBR_EXITS_A|MSG_F_UP|MSG_F_CONTENTS|MSG_S_INSIDE)

Definition at line 132 of file externs.h.

Referenced by do_pemit_single(), do_say(), and do_train().

#define notify_all_from_inside_html	(	p,
		c,
		m		)	notify_check(p,c,m, MSG_ME_ALL|MSG_NBR_EXITS_A|MSG_F_UP|MSG_F_CONTENTS|MSG_S_INSIDE|MSG_HTML)

Definition at line 134 of file externs.h.

Referenced by do_say().

#define notify_all_from_inside_saypose	(	p,
		c,
		m		)	notify_check(p,c,m, MSG_ME_ALL|MSG_NBR_EXITS_A|MSG_F_UP|MSG_F_CONTENTS|MSG_S_INSIDE|MSG_SAYPOSE)

Definition at line 133 of file externs.h.

Referenced by do_say().

#define notify_html	(	p,
		m		)	notify_check(p,p,m, MSG_PUP_ALWAYS|MSG_ME_ALL|MSG_F_DOWN|MSG_HTML)

Definition at line 123 of file externs.h.

Referenced by did_it(), look_contents(), look_exits(), look_in(), process_leave_loc(), and show_vrml_url().

#define notify_quiet	(	p,
		m		)	notify_check(p,p,m, MSG_PUP_ALWAYS|MSG_ME)

Definition at line 124 of file externs.h.

Referenced by can_destroy_player(), destroy_player(), do_alias(), do_boot(), do_chown(), do_clone(), do_create(), do_cut(), do_decomp(), do_destroy(), do_dig(), do_edit(), do_examine(), do_find(), do_forwardlist(), do_function(), do_global(), do_link(), do_lock(), do_look(), do_moniker(), do_motd(), do_mvattr(), do_name(), do_newpassword(), do_notify(), do_parent(), do_pcreate(), do_power(), do_quota(), do_set(), do_setvattr(), do_sweep(), do_teleport_single(), do_toad(), do_trigger(), do_unlink(), do_unlock(), do_use(), do_verb(), do_wait(), do_wipe(), exam_wildattrs(), link_exit(), match_controlled_handler(), move_via_teleport(), open_exit(), parse_linkable_room(), process_command(), set_attr_internal(), and show_quota().

#define notify_quiet_with_cause	(	p,
		c,
		m		)	notify_check(p,c,m, MSG_PUP_ALWAYS|MSG_ME)

Definition at line 128 of file externs.h.

#define notify_saypose	(	p,
		m		)	notify_check(p,p,m, MSG_PUP_ALWAYS|MSG_ME_ALL|MSG_F_DOWN|MSG_SAYPOSE)

Definition at line 122 of file externs.h.

Referenced by do_say().

#define notify_with_cause	(	p,
		c,
		m		)	notify_check(p,c,m, MSG_PUP_ALWAYS|MSG_ME_ALL|MSG_F_DOWN)

Definition at line 125 of file externs.h.

Referenced by do_pemit_single(), wall_broadcast(), and whisper_pose().

#define notify_with_cause_html	(	p,
		c,
		m		)	notify_check(p,c,m, MSG_PUP_ALWAYS|MSG_ME_ALL|MSG_F_DOWN|MSG_HTML)

Definition at line 127 of file externs.h.

Referenced by do_pemit_single().

#define notify_with_cause_ooc	(	p,
		c,
		m		)	notify_check(p,c,m, MSG_PUP_ALWAYS|MSG_ME_ALL|MSG_F_DOWN|MSG_OOC)

Definition at line 126 of file externs.h.

Referenced by do_kill(), do_page(), give_money(), give_thing(), mail_return(), page_return(), and SendChannelMessage().

#define NUM_DUMP_TYPES   5

Definition at line 180 of file externs.h.

Referenced by dump_database_internal().

#define OPEN_INVENTORY   1

Definition at line 549 of file externs.h.

Referenced by do_open().

#define OPEN_LOCATION   0

Definition at line 548 of file externs.h.

#define PCRE_PLAYER   1

Definition at line 550 of file externs.h.

#define PCRE_ROBOT   2

Definition at line 551 of file externs.h.

Referenced by do_pcreate().

#define PEMIT_CONTENTS   8

Definition at line 559 of file externs.h.

Referenced by do_pemit().

#define PEMIT_FEMIT   5

Definition at line 556 of file externs.h.

Referenced by do_pemit_single().

#define PEMIT_FPOSE   6

Definition at line 557 of file externs.h.

Referenced by do_pemit_single().

#define PEMIT_FPOSE_NS   7

Definition at line 558 of file externs.h.

Referenced by do_pemit_single().

#define PEMIT_FSAY   4

Definition at line 555 of file externs.h.

Referenced by do_pemit_single().

#define PEMIT_HERE   16

Definition at line 560 of file externs.h.

Referenced by do_pemit(), and do_pemit_single().

#define PEMIT_HTML   128

Definition at line 563 of file externs.h.

Referenced by do_pemit(), and do_pemit_single().

#define PEMIT_LIST   64

Definition at line 562 of file externs.h.

Referenced by do_pemit().

#define PEMIT_OEMIT   2

Definition at line 553 of file externs.h.

Referenced by do_pemit_single(), and FUNCTION().

#define PEMIT_PEMIT   1

Definition at line 552 of file externs.h.

Referenced by do_pemit_single(), and FUNCTION().

#define PEMIT_ROOM   32

Definition at line 561 of file externs.h.

Referenced by do_pemit(), and do_pemit_single().

#define PEMIT_WHISPER   3

Definition at line 554 of file externs.h.

Referenced by do_pemit(), and do_pemit_single().

#define PRIORITY_CF_DEQUEUE_DISABLED   (PRIORITY_PLAYER-1)

Definition at line 889 of file externs.h.

Referenced by do_global(), and do_queue().

#define PRIORITY_CF_DEQUEUE_ENABLED   PRIORITY_OBJECT

Definition at line 888 of file externs.h.

Referenced by CScheduler::CScheduler(), do_global(), and do_queue().

#define PRIORITY_OBJECT   300

Definition at line 883 of file externs.h.

Referenced by CallBack_NotifySemaphoreDrainOrAll(), CallBack_NotifySemaphoreFirstOrQuiet(), init_timer(), and wait_que().

#define PRIORITY_PLAYER   200

Definition at line 882 of file externs.h.

Referenced by CallBack_NotifySemaphoreDrainOrAll(), CallBack_NotifySemaphoreFirstOrQuiet(), and wait_que().

#define PRIORITY_SUSPEND   400

Definition at line 884 of file externs.h.

Referenced by wait_que().

#define PRIORITY_SYSTEM   100

Definition at line 881 of file externs.h.

Referenced by dispatch_CacheTick(), dispatch_CheckEvents(), dispatch_DatabaseDump(), dispatch_FreeListReconstruction(), dispatch_IdleCheck(), do_timewarp(), init_timer(), save_command(), sighandler(), and Task_ProcessCommand().

#define Protect

(

f

)

(cmdp->perms & f)

Definition at line 333 of file externs.h.

Referenced by check_command(), and process_cmdent().

#define PS_ALL   4

Definition at line 567 of file externs.h.

Referenced by do_ps().

#define PS_BRIEF   0

Definition at line 564 of file externs.h.

Referenced by do_ps().

#define PS_LONG   1

Definition at line 565 of file externs.h.

Referenced by do_ps(), and ShowPsLine().

#define PS_SUMM   2

Definition at line 566 of file externs.h.

Referenced by CallBack_ShowSemaphore(), CallBack_ShowWait(), and do_ps().

#define QUERY_SQL   1

Definition at line 568 of file externs.h.

#define QUEUE_KICK   1

Definition at line 569 of file externs.h.

Referenced by do_queue().

#define QUEUE_WARP   2

Definition at line 570 of file externs.h.

Referenced by do_queue(), and do_timewarp().

#define QUOTA_ALL   16

Definition at line 575 of file externs.h.

Referenced by do_quota().

#define QUOTA_FIX   2

Definition at line 572 of file externs.h.

Referenced by do_quota(), and mung_quotas().

#define QUOTA_REM   8

Definition at line 574 of file externs.h.

Referenced by do_quota(), and mung_quotas().

#define QUOTA_SET   1

Definition at line 571 of file externs.h.

Referenced by do_quota().

#define QUOTA_TOT   4

Definition at line 573 of file externs.h.

Referenced by do_quota(), and mung_quotas().

#define SA_DFLT   2

Definition at line 717 of file externs.h.

Referenced by cf_init().

#define SA_EXIT   1

Definition at line 716 of file externs.h.

Referenced by sighandler().

#define safe_ambiguous	(	b,
		p		)	safe_copy_buf(FUNC_AMBIGUOUS,13,(b),(p))

Definition at line 742 of file externs.h.

Referenced by safe_match_result().

#define safe_nomatch	(	b,
		p		)	safe_copy_buf(FUNC_NOMATCH_MESSAGE,12,(b),(p))

Definition at line 740 of file externs.h.

Referenced by FUNCTION(), get_handler(), internalPlayerFind(), lattr_handler(), and process_sex().

#define safe_noperm	(	b,
		p		)	safe_copy_buf(FUNC_NOPERM_MESSAGE,21,(b),(p))

Definition at line 739 of file externs.h.

Referenced by check_command(), FUNCTION(), get_handler(), grep_handler(), hasattr_handler(), mux_exec(), parse_and_get_attrib(), scan_zone(), and set_attr_internal().

#define safe_notfound	(	b,
		p		)	safe_copy_buf(FUNC_NOT_FOUND,13,(b),(p))

Definition at line 743 of file externs.h.

Referenced by FUNCTION(), and safe_match_result().

#define safe_nothing	(	b,
		p		)	safe_copy_buf(FUNC_FAIL_MESSAGE,3,(b),(p))

Definition at line 738 of file externs.h.

Referenced by FUNCTION().

#define safe_range	(	b,
		p		)	safe_copy_buf(OUT_OF_RANGE,16,(b),(p))

Definition at line 741 of file externs.h.

Referenced by centerjustcombo(), and FUNCTION().

#define SAY_EMIT   5

Definition at line 585 of file externs.h.

Referenced by do_say(), and FUNCTION().

#define SAY_HERE   64

Definition at line 597 of file externs.h.

Referenced by do_say(), and do_shout().

#define SAY_HTML   256

Definition at line 599 of file externs.h.

Referenced by do_say(), and do_shout().

#define SAY_NOEVAL   8

Definition at line 586 of file externs.h.

Referenced by do_say().

#define SAY_NOSPACE   1

Definition at line 581 of file externs.h.

#define SAY_NOTAG   32

Definition at line 596 of file externs.h.

Referenced by do_say(), do_shout(), and say_shout().

#define SAY_POSE   2

Definition at line 582 of file externs.h.

Referenced by do_say().

#define SAY_POSE_NOSPC   3

Definition at line 583 of file externs.h.

Referenced by do_say().

#define SAY_PREFIX   4

Definition at line 584 of file externs.h.

Referenced by do_say().

#define SAY_ROOM   128

Definition at line 598 of file externs.h.

Referenced by do_say(), and do_shout().

#define SAY_SAY   1

Definition at line 580 of file externs.h.

Referenced by do_say().

#define SET_QUIET   1

Definition at line 600 of file externs.h.

Referenced by do_set(), flag_set(), power_set(), and set_attr_internal().

#define SHOUT_ADMIN   2

Definition at line 603 of file externs.h.

Referenced by do_shout(), and wall_broadcast().

#define SHOUT_ADMINSHOUT   7

Definition at line 593 of file externs.h.

Referenced by do_shout().

#define SHOUT_DEFAULT   0

Definition at line 601 of file externs.h.

#define SHOUT_SHOUT   1

Definition at line 587 of file externs.h.

Referenced by do_shout().

#define SHOUT_WALLEMIT   3

Definition at line 589 of file externs.h.

Referenced by do_shout().

#define SHOUT_WALLPOSE   2

Definition at line 588 of file externs.h.

Referenced by do_shout().

#define SHOUT_WIZARD   1

Definition at line 602 of file externs.h.

Referenced by do_shout(), and wall_broadcast().

#define SHOUT_WIZEMIT   6

Definition at line 592 of file externs.h.

Referenced by do_shout().

#define SHOUT_WIZPOSE   5

Definition at line 591 of file externs.h.

Referenced by do_shout().

#define SHOUT_WIZSHOUT   4

Definition at line 590 of file externs.h.

Referenced by do_shout().

#define SHUTDN_COREDUMP   4

Definition at line 607 of file externs.h.

#define SHUTDN_EXIT   2

Definition at line 606 of file externs.h.

#define SHUTDN_NORMAL   0

Definition at line 604 of file externs.h.

#define SHUTDN_PANIC   1

Definition at line 605 of file externs.h.

Referenced by do_shutdown().

#define SRCH_MARK   2

Definition at line 609 of file externs.h.

Referenced by search_mark().

#define SRCH_SEARCH   1

Definition at line 608 of file externs.h.

Referenced by do_search().

#define SRCH_UNMARK   3

Definition at line 610 of file externs.h.

Referenced by search_mark().

#define STARTLOG	(	key,
		p,
		s		)	if ((((key) & mudconf.log_options) != 0) && start_log(p, s)) {

Definition at line 719 of file externs.h.

Referenced by boot_slave(), CF_HAND(), cf_log_notfound(), cf_log_syntax(), cf_status_from_succfail(), check_connect(), do_backup(), do_boot(), do_command(), do_fixdb(), do_global(), do_link(), do_logged_out_internal(), do_mail_read(), do_name(), do_newpassword(), do_pcreate(), do_quota(), do_restart(), do_shout(), do_shutdown(), do_toad(), dump_database(), eval_boolexp(), failconn(), fcache_read(), fork_and_dump(), get_slave_result(), helpindex_read(), init_dbfile(), init_version(), CHashFile::Insert(), load_game(), Log_header_err(), Log_pointer_err(), log_signal(), log_signal_ignore(), Log_simple_err(), LogStatBuf(), main(), new_connection(), new_mail_message(), pool_err(), pool_free(), pool_free_lbuf(), process_command(), purge_going(), queue_write_LEN(), report(), report_timecheck(), ReportTopic(), shovechars(), shutdownsock(), sighandler(), Task_RunQueueEntry(), ValidateHelpFileIndex(), and write_pidfile().

#define STAT_ALL   1

Definition at line 612 of file externs.h.

Referenced by do_stats().

#define STAT_ME   2

Definition at line 613 of file externs.h.

Referenced by do_stats().

#define STAT_PLAYER   0

Definition at line 611 of file externs.h.

Referenced by do_stats().

#define SWEEP_COMMANDS   4

Definition at line 619 of file externs.h.

Referenced by do_sweep(), and sweep_check().

#define SWEEP_CONNECT   32

Definition at line 622 of file externs.h.

Referenced by do_sweep(), and sweep_check().

#define SWEEP_EXITS   64

Definition at line 623 of file externs.h.

Referenced by do_sweep().

#define SWEEP_HERE   2

Definition at line 618 of file externs.h.

Referenced by do_sweep().

#define SWEEP_LISTEN   8

Definition at line 620 of file externs.h.

Referenced by do_sweep(), and sweep_check().

#define SWEEP_ME   1

Definition at line 617 of file externs.h.

Referenced by do_sweep().

#define SWEEP_PLAYER   16

Definition at line 621 of file externs.h.

Referenced by do_sweep(), and sweep_check().

#define SWEEP_SCAN   128

Definition at line 624 of file externs.h.

#define SWEEP_VERBOSE   256

Definition at line 625 of file externs.h.

Referenced by do_sweep().

#define SWITCH_ANY   1

Definition at line 615 of file externs.h.

Referenced by do_switch().

#define SWITCH_DEFAULT   0

Definition at line 614 of file externs.h.

Referenced by do_switch().

#define SWITCH_ONE   2

Definition at line 616 of file externs.h.

Referenced by do_switch().

#define TELEPORT_DEFAULT   1

Definition at line 626 of file externs.h.

#define TELEPORT_LIST   4

Definition at line 628 of file externs.h.

Referenced by do_teleport().

#define TELEPORT_QUIET   2

Definition at line 627 of file externs.h.

Referenced by do_teleport_single().

#define TIMECHK_LOG   4

Definition at line 631 of file externs.h.

Referenced by do_timecheck().

#define TIMECHK_RESET   1

Definition at line 629 of file externs.h.

Referenced by do_timecheck().

#define TIMECHK_SCREEN   2

Definition at line 630 of file externs.h.

Referenced by do_timecheck().

#define TOAD_NO_CHOWN   1

Definition at line 632 of file externs.h.

Referenced by do_toad().

#define TRIG_QUIET   1

Definition at line 633 of file externs.h.

Referenced by do_trigger().

#define TWARP_CLEAN   4

Definition at line 636 of file externs.h.

Referenced by do_timewarp().

#define TWARP_DUMP   2

Definition at line 635 of file externs.h.

Referenced by do_timewarp().

#define TWARP_EVENTS   32

Definition at line 639 of file externs.h.

Referenced by do_timewarp().

#define TWARP_IDLE   8

Definition at line 637 of file externs.h.

Referenced by do_timewarp().

#define TWARP_QUEUE   1

Definition at line 634 of file externs.h.

Referenced by do_timewarp().

#define VE_BASE_DARK   0x10

Definition at line 711 of file externs.h.

Referenced by exit_displayable(), exit_visible(), FUNCTION(), look_exits(), match_exit_internal(), and room_list().

#define VE_LOC_DARK   0x02

Definition at line 708 of file externs.h.

Referenced by exit_displayable(), exit_visible(), FUNCTION(), look_exits(), match_exit_internal(), and room_list().

#define VE_LOC_LIGHT   0x04

Definition at line 709 of file externs.h.

#define VE_LOC_XAM   0x01

Definition at line 707 of file externs.h.

Referenced by exit_visible(), FUNCTION(), match_exit_internal(), and room_list().

#define WAIT_UNTIL   1

Definition at line 640 of file externs.h.

Referenced by do_wait().

---

Typedef Documentation

typedef void FTASK(void *, int)

Definition at line 867 of file externs.h.

typedef struct TASK_RECORD * PTASK_RECORD

typedef int SCHCMP(PTASK_RECORD, PTASK_RECORD)

Definition at line 891 of file externs.h.

typedef int SCHLOOK(PTASK_RECORD)

Definition at line 892 of file externs.h.

---

Function Documentation

int a_Queue	(	dbref	player,
		int	adj
	)

Adjusts the count of queued commands up or down.

cque.cpp uses this as it schedules and performs queued commands.

Parameters:

	player	dbref of player object responsible for command.
	adj	new (+) or completed (-) commands being queued.

Returns:

None.

Definition at line 239 of file player_c.cpp.

References Good_obj, OwnsOthers, pcache_find(), and player_cache::queue.

Referenced by CallBack_HaltQueue(), CallBack_NotifySemaphoreDrainOrAll(), halt_que(), setup_que(), and Task_RunQueueEntry().

{
    if (  Good_obj(player)
       && OwnsOthers(player))
    {
        PCACHE *pp = pcache_find(player);
        pp->queue += adj;
        return pp->queue;
    }
    return 0;
}

bool add_player_name	(	dbref	,
		const char *
	)

Definition at line 701 of file player.cpp.

References alloc_lbuf, free_lbuf, Good_obj, hashaddLEN(), hashfindLEN(), hashreplLEN(), ISOUTOFMEMORY, isPlayer, MEMALLOC, MEMFREE, mudstate, mux_strlwr(), statedata::player_htab, and safe_str.

Referenced by CGuests::Create(), create_obj(), do_alias(), do_fixdb(), do_name(), and load_player_names().

{
    bool stat;
    char *temp, *tp;

    // Convert to all lowercase.
    //
    tp = temp = alloc_lbuf("add_player_name");
    safe_str(name, temp, &tp);
    *tp = '\0';
    mux_strlwr(temp);

    dbref *p = (int *)hashfindLEN(temp, strlen(temp), &mudstate.player_htab);
    if (p)
    {
        // Entry found in the hashtable.  If a player, succeed if the
        // numbers match (already correctly in the hash table), fail
        // if they don't.
        //
        if (Good_obj(*p) && isPlayer(*p))
        {
            free_lbuf(temp);
            if (*p == player)
            {
                return true;
            }
            else
            {
                return false;
            }
        }

        // It's an alias (or an incorrect entry). Clobber it.
        //
        MEMFREE(p);
        p = (dbref *)MEMALLOC(sizeof(int));
        ISOUTOFMEMORY(p);

        *p = player;
        stat = hashreplLEN(temp, strlen(temp), p, &mudstate.player_htab);
        free_lbuf(temp);
    }
    else
    {
        p = (dbref *)MEMALLOC(sizeof(int));
        ISOUTOFMEMORY(p);

        *p = player;
        stat = (hashaddLEN(temp, strlen(temp), p, &mudstate.player_htab) >= 0);
        free_lbuf(temp);
    }
    return stat;
}

void add_quota	(	dbref	,
		int
	)

Definition at line 276 of file predicates.cpp.

References A_RQUOTA, atr_add_raw(), atr_get, free_lbuf, mux_atol(), and mux_ltoa().

Referenced by chown_all(), destroy_obj(), do_chown(), and link_exit().

{
    dbref aowner;
    int aflags;
    char buf[20];

    char *quota = atr_get(who, A_RQUOTA, &aowner, &aflags);
    mux_ltoa(mux_atol(quota) + payment, buf);
    free_lbuf(quota);
    atr_add_raw(who, A_RQUOTA, buf);
}

void AddToPublicChannel

(

dbref

player

)

Definition at line 530 of file player.cpp.

References do_addcom(), mudconf, confdata::public_channel, and confdata::public_channel_alias.

Referenced by check_connect(), and do_pcreate().

{
    if (  mudconf.public_channel[0] != '\0'
       && mudconf.public_channel_alias[0] != '\0')
    {
        do_addcom(player, player, player, 0, 2,
            mudconf.public_channel_alias, mudconf.public_channel);
    }
}

void atr_add	(	dbref	,
		int	,
		char *	,
		dbref	,
		int
	)

Definition at line 2008 of file db.cpp.

References AMATCH_CMD, AMATCH_LISTEN, atr_add_raw(), atr_clr(), atr_encode(), statedata::bfCommands, statedata::bfListens, statedata::bfNoCommands, statedata::bfNoListens, CBitField::Clear(), mudstate, and set_modified().

Referenced by add_folder_name(), atr_chown(), atr_cpy(), atr_set_flags(), check_dead_refs(), do_alias(), do_chanlog(), do_chown(), do_edit(), do_edit_msg(), do_forwardlist(), do_mvattr(), SendChannelMessage(), set_attr_internal(), and set_player_folder().

{
    set_modified(thing);

    if (!buff || !*buff)
    {
        atr_clr(thing, atr);
    }
    else
    {
        switch (buff[0])
        {
        case AMATCH_LISTEN:

            // Since this could be a ^-Command, we no longer assert that the
            // object has none.
            //
            mudstate.bfNoListens.Clear(thing);
            break;

        case AMATCH_CMD:

            // Since this could be a $-Command, we no longer assert that the
            // object has none.
            //
            mudstate.bfNoCommands.Clear(thing);
            break;
        }

        // Since this could overwrite an existing ^-Command or $-Command, we
        // longer assert that the object has one.
        //
        mudstate.bfListens.Clear(thing);
        mudstate.bfCommands.Clear(thing);

        char *tbuff = atr_encode(buff, thing, owner, flags, atr);
        atr_add_raw(thing, atr, tbuff);
    }
}

void atr_add_raw	(	dbref	,
		int	,
		const char *
	)

Definition at line 2003 of file db.cpp.

References atr_add_raw_LEN().

Referenced by add_quota(), atr_add(), connect_player(), create_obj(), db_read(), dbclean_RenumberAttributes(), did_it(), do_destroy(), do_expmail_start(), do_icmd(), do_lock(), do_mail_cc(), do_mail_fwd(), do_mail_reply(), do_page(), do_pcreate(), do_postpend(), do_prepend(), do_prog(), get_list(), get_slave_result(), mung_quotas(), pay_quota(), pcache_save(), record_login(), s_Moniker(), s_Name(), s_Pass(), s_Pennies(), s_PenniesDirect(), set_modified(), and shutdownsock().

{
    atr_add_raw_LEN(thing, atr, szValue, szValue ? strlen(szValue) : 0);
}

void atr_add_raw_LEN	(	dbref	,
		int	,
		const char *	,
		int
	)

Definition at line 1843 of file db.cpp.

References A_DAILY, A_FORWARDLIST, A_LIST, A_LISTEN, A_QUEUEMAX, A_STARTUP, A_TIMEOUT, al_add(), atr_clr(), ATRLIST_CHUNK, cache_put(), db, desc_reload(), FLAG_WORD1, FLAG_WORD2, object::fs, HAS_DAILY, HAS_FWDLIST, HAS_LISTEN, HAS_STARTUP, INITIAL_ATRLIST_SIZE, ISOUTOFMEMORY, LBUF_SIZE, makekey(), MEMALLOC, MEMFREE, pcache_reload(), StringCloneLen(), and flagset::word.

Referenced by add_to(), al_store(), atr_add_raw(), and put_ConnectionInfoFields().

{
    if (  !szValue
       || '\0' == szValue[0])
    {
        atr_clr(thing, atr);
        return;
    }

#ifdef MEMORY_BASED
    ATRLIST *list;
    bool found = false;
    int hi, lo, mid;
    char *text = StringCloneLen(szValue, nValue);

    if (!db[thing].pALHead)
    {
        db[thing].nALAlloc = INITIAL_ATRLIST_SIZE;
        list = (ATRLIST *)MEMALLOC(db[thing].nALAlloc*sizeof(ATRLIST));
        ISOUTOFMEMORY(list);
        db[thing].pALHead  = list;
        db[thing].nALUsed  = 1;
        list[0].number = atr;
        list[0].data = text;
        list[0].size = nValue + 1;
        found = true;
    }
    else
    {
        // Binary search for the attribute
        //
        lo = 0;
        hi = db[thing].nALUsed - 1;

        list = db[thing].pALHead;
        while (lo <= hi)
        {
            mid = ((hi - lo) >> 1) + lo;
            if (list[mid].number > atr)
            {
                hi = mid - 1;
            }
            else if (list[mid].number < atr)
            {
                lo = mid + 1;
            }
            else // if (list[mid].number == atr)
            {
                MEMFREE(list[mid].data);
                list[mid].data = text;
                list[mid].size = nValue + 1;
                found = true;
                break;
            }
        }

        if (!found)
        {
            // We didn't find it, and lo == hi + 1.  The attribute should be
            // inserted between (0,hi) and (lo,nALUsed-1).
            //
            if (db[thing].nALUsed < db[thing].nALAlloc)
            {
                memmove( list + lo + 1,
                         list + lo,
                         (db[thing].nALUsed - lo) * sizeof(ATRLIST));
            }
            else
            {
                // Expand the list.
                //
                db[thing].nALAlloc += ATRLIST_CHUNK;
                list = (ATRLIST *)MEMALLOC(db[thing].nALAlloc
                     * sizeof(ATRLIST));
                ISOUTOFMEMORY(list);

                // Copy bottom part.
                //
                if (lo > 0)
                {
                    memcpy(list, db[thing].pALHead, lo * sizeof(ATRLIST));
                }
    
                // Copy top part.
                //
                if (lo < db[thing].nALUsed)
                {
                    memcpy( list + lo + 1,
                            db[thing].pALHead + lo,
                            (db[thing].nALUsed - lo) * sizeof(ATRLIST));
                }
                MEMFREE(db[thing].pALHead);
                db[thing].pALHead = list;
            }
            db[thing].nALUsed++;
            list[lo].data = text;
            list[lo].number = atr;
            list[lo].size = nValue + 1;
        }
    }

#else // MEMORY_BASED

    if (nValue > LBUF_SIZE-1)
    {
        nValue = LBUF_SIZE-1;
    }

    Aname okey;
    makekey(thing, atr, &okey);
    if (atr == A_LIST)
    {
        // A_LIST is never compressed and it's never listed within itself.
        //
        cache_put(&okey, szValue, nValue+1);
    }
    else
    {
        if (!al_add(thing, atr))
        {
            return;
        }
        cache_put(&okey, szValue, nValue+1);
    }
#endif // MEMORY_BASED

    switch (atr)
    {
    case A_STARTUP:

        db[thing].fs.word[FLAG_WORD1] |= HAS_STARTUP;
        break;

    case A_DAILY:

        db[thing].fs.word[FLAG_WORD2] |= HAS_DAILY;
        break;

    case A_FORWARDLIST:

        db[thing].fs.word[FLAG_WORD2] |= HAS_FWDLIST;
        break;

    case A_LISTEN:

        db[thing].fs.word[FLAG_WORD2] |= HAS_LISTEN;
        break;

    case A_TIMEOUT:

        desc_reload(thing);
        break;

    case A_QUEUEMAX:

        pcache_reload(thing);
        break;
    }
}

void atr_chown

(

dbref

)

Definition at line 2359 of file db.cpp.

References AF_LOCK, atr_add(), atr_get, atr_head(), atr_next(), atr_pop(), atr_push(), free_lbuf, and Owner.

Referenced by do_chown().

{
    dbref owner = Owner(obj);

    char *as;
    atr_push();
    for (int atr = atr_head(obj, &as); atr; atr = atr_next(&as))
    {
        int   aflags;
        dbref aowner;
        char *buf = atr_get(obj, atr, &aowner, &aflags);
        if (  aowner != owner
           && !(aflags & AF_LOCK))
        {
            atr_add(obj, atr, buf, owner, aflags);
        }
        free_lbuf(buf);
    }
    atr_pop();
}

void atr_clr	(	dbref	,
		int
	)

Definition at line 1739 of file db.cpp.

References A_DAILY, A_FORWARDLIST, A_LISTEN, A_QUEUEMAX, A_STARTUP, A_TIMEOUT, al_delete(), statedata::bfCommands, statedata::bfListens, statedata::bStandAlone, cache_del(), CBitField::Clear(), db, desc_reload(), FLAG_WORD1, FLAG_WORD2, object::fs, fwdlist_clr(), HAS_DAILY, HAS_FWDLIST, HAS_LISTEN, HAS_STARTUP, makekey(), MEMFREE, mudstate, mux_assert, pcache_reload(), and flagset::word.

Referenced by al_store(), atr_add(), atr_add_raw_LEN(), atr_free(), dbclean_CheckALISTtoAT(), dbclean_CheckALISTtoDB(), do_alias(), do_chanlog(), do_expmail_start(), do_forwardlist(), do_icmd(), do_mvattr(), do_unlock(), do_wipe(), nfy_que(), shutdownsock(), and CGuests::WipeAttrs().

{
#ifdef MEMORY_BASED

    if (  !db[thing].nALUsed
       || !db[thing].pALHead)
    {
        return;
    }

    mux_assert(0 <= db[thing].nALUsed);

    // Binary search for the attribute.
    //
    int lo = 0;
    int mid;
    int hi = db[thing].nALUsed - 1;
    ATRLIST *list = db[thing].pALHead;
    while (lo <= hi)
    {
        mid = ((hi - lo) >> 1) + lo;
        if (list[mid].number > atr)
        {
            hi = mid - 1;
        }
        else if (list[mid].number < atr)
        {
            lo = mid + 1;
        }
        else // (list[mid].number == atr)
        {
            MEMFREE(list[mid].data);
            list[mid].data = NULL;
            db[thing].nALUsed--;
            if (mid != db[thing].nALUsed)
            {
                memmove( list + mid,
                         list + mid + 1,
                         (db[thing].nALUsed - mid) * sizeof(ATRLIST));
            }
            break;
        }
    }
#else // MEMORY_BASED
    Aname okey;

    makekey(thing, atr, &okey);
    cache_del(&okey);
    al_delete(thing, atr);
#endif // MEMORY_BASED

    switch (atr)
    {
    case A_STARTUP:

        db[thing].fs.word[FLAG_WORD1] &= ~HAS_STARTUP;
        break;

    case A_DAILY:

        db[thing].fs.word[FLAG_WORD2] &= ~HAS_DAILY;
        break;

    case A_FORWARDLIST:

        db[thing].fs.word[FLAG_WORD2] &= ~HAS_FWDLIST;
        if (!mudstate.bStandAlone)
        {
            // We should clear the hashtable, too.
            //
            fwdlist_clr(thing);
        }
        break;

    case A_LISTEN:

        db[thing].fs.word[FLAG_WORD2] &= ~HAS_LISTEN;
        break;

    case A_TIMEOUT:

        desc_reload(thing);
        break;

    case A_QUEUEMAX:

        pcache_reload(thing);
        break;

    default:

        // Since this could overwrite an existing ^-Command or $-Command, we
        // longer assert that the object has one.
        //
        mudstate.bfListens.Clear(thing);
        mudstate.bfCommands.Clear(thing);
        break;
    }
}

void atr_cpy	(	dbref	dest,
		dbref	source,
		bool	bInternal
	)

Definition at line 2310 of file db.cpp.

References AF_GOD, AF_INTERNAL, AF_LOCK, AF_NOCLONE, AF_WIZARD, atr_add(), atr_get, atr_head(), atr_next(), atr_num(), atr_pop(), atr_push(), Controls, attr::flags, free_lbuf, God, Owner, and Wizard.

Referenced by CGuests::Create(), do_clone(), and CGuests::MakeGuestChar().

{
    dbref owner = Owner(dest);

    char *as;
    atr_push();
    for (int atr = atr_head(source, &as); atr; atr = atr_next(&as))
    {
        int   aflags;
        dbref aowner;
        char *buf = atr_get(source, atr, &aowner, &aflags);

        if (!(aflags & AF_LOCK))
        {
            // Change owner.
            //
            aowner = owner;
        }

        ATTR *at = atr_num(atr);
        if (  atr
           && at)
        {
            if (  !(at->flags & (AF_INTERNAL|AF_NOCLONE))
               && (  bInternal
                  || God(owner)
                  || (  !God(dest)
                     && !(aflags & AF_LOCK)
                     && (  (  Controls(owner, dest)
                           && !(at->flags & (AF_WIZARD|AF_GOD))
                           && !(aflags & (AF_WIZARD|AF_GOD)))
                        || (  Wizard(owner)
                           && !(at->flags & AF_GOD))))))
            {
                // Only set attrs that owner has perm to set.
                //
                atr_add(dest, atr, buf, aowner, aflags);
            }
        }
        free_lbuf(buf);
    }
    atr_pop();
}

void atr_free

(

dbref

)

Definition at line 2275 of file db.cpp.

References A_LIST, al_store(), atr_clr(), atr_head(), atr_next(), atr_pop(), atr_push(), statedata::bfCommands, statedata::bfListens, statedata::bfNoCommands, statedata::bfNoListens, CBitField::Clear(), db, MEMFREE, statedata::mod_al_id, mudstate, and CBitField::Set().

Referenced by create_obj(), destroy_bad_obj(), and destroy_obj().

{
#ifdef MEMORY_BASED
    if (db[thing].pALHead)
    {
        MEMFREE(db[thing].pALHead);
    }
    db[thing].pALHead  = NULL;
    db[thing].nALAlloc = 0;
    db[thing].nALUsed  = 0;
#else // MEMORY_BASED
    char *as;
    atr_push();
    for (int atr = atr_head(thing, &as); atr; atr = atr_next(&as))
    {
        atr_clr(thing, atr);
    }
    atr_pop();
    if (mudstate.mod_al_id == thing)
    {
        al_store(); // remove from cache
    }
    atr_clr(thing, A_LIST);
#endif // MEMORY_BASED

    mudstate.bfCommands.Clear(thing);
    mudstate.bfNoCommands.Set(thing);
    mudstate.bfListens.Clear(thing);
    mudstate.bfNoListens.Set(thing);
}

bool atr_get_info	(	dbref	,
		int	,
		dbref *	,
		int *
	)

Definition at line 2171 of file db.cpp.

References atr_decode_LEN(), atr_get_raw_LEN(), and Owner.

Referenced by bCanLockAttr(), bCanReadAttr(), bCanSetAttr(), check_dead_refs(), debug_examine(), do_chown(), do_comlast(), do_lock(), do_set(), do_unlock(), do_verb(), find_wild_attrs(), and FUNCTION().

{
    size_t nLen;
    const char *buff = atr_get_raw_LEN(thing, atr, &nLen);
    if (!buff)
    {
        *owner = Owner(thing);
        *flags = 0;
        return false;
    }
    atr_decode_LEN(buff, nLen, NULL, thing, owner, flags, &nLen);
    return true;
}

char* atr_get_LEN	(	dbref	,
		int	,
		dbref *	,
		int *	,
		size_t *
	)

Definition at line 2157 of file db.cpp.

References alloc_lbuf, and atr_get_str_LEN().

Referenced by grep_util(), Moniker(), Name(), and PureName().

{
    char *buff = alloc_lbuf("atr_get");
    return atr_get_str_LEN(buff, thing, atr, owner, flags, pLen);
}

const char* atr_get_raw	(	dbref	,
		int
	)

Definition at line 2127 of file db.cpp.

References atr_get_raw_LEN().

Referenced by check_zone_handler(), db_write_object(), dbclean_CheckALISTtoAT(), dbclean_CheckALISTtoDB(), do_destroy(), do_mail_cc(), do_mail_fwd(), do_mail_proof(), do_mail_reply(), FUNCTION(), hasattr_handler(), move_exit(), pcache_reload1(), Pennies(), purge_going(), and show_a_desc().

{
    size_t Len;
    return atr_get_raw_LEN(thing, atr, &Len);
}

const char* atr_get_raw_LEN	(	dbref	,
		int	,
		size_t *
	)

Definition at line 2114 of file db.cpp.

References cache_get(), and makekey().

Referenced by al_fetch(), atr_get_info(), atr_get_raw(), atr_get_str_LEN(), atr_head(), atr_pget_info(), atr_pget_str_LEN(), do_postpend(), do_prepend(), and mem_usage().

{
    Aname okey;

    makekey(thing, atr, &okey);
    int nLen;
    const char *a = cache_get(&okey, &nLen);
    nLen = a ? (nLen-1) : 0;
    *pLen = nLen;
    return a;
}

char* atr_get_real	(	dbref	,
		int	,
		dbref *	,
		int *	,
		const char *	,
		const	int
	)

Definition at line 2163 of file db.cpp.

References atr_get_str_LEN(), and pool_alloc_lbuf().

{
    size_t nLen;
    char *buff = pool_alloc_lbuf("atr_get", file, line);
    return atr_get_str_LEN(buff, thing, atr, owner, flags, &nLen);
}

char* atr_get_str	(	char *	,
		dbref	,
		int	,
		dbref *	,
		int *
	)

Definition at line 2151 of file db.cpp.

References atr_get_str_LEN().

Referenced by atr_match1(), Commer(), do_edit(), do_examine(), do_mvattr(), FUNCTION(), Hearer(), CGuests::ListAll(), Name(), process_preload(), and sweep_check().

{
    size_t nLen;
    return atr_get_str_LEN(s, thing, atr, owner, flags, &nLen);
}

char* atr_get_str_LEN	(	char *	s,
		dbref	,
		int	,
		dbref *	,
		int *	,
		size_t *
	)

Definition at line 2133 of file db.cpp.

References atr_decode_LEN(), atr_get_raw_LEN(), and Owner.

Referenced by add_folder_name(), announce_connect(), atr_get_LEN(), atr_get_real(), atr_get_str(), get_folder_name(), and get_folder_number().

{
    const char *buff = atr_get_raw_LEN(thing, atr, pLen);
    if (!buff)
    {
        *owner = Owner(thing);
        *flags = 0;
        *pLen = 0;
        *s = '\0';
    }
    else
    {
        atr_decode_LEN(buff, *pLen, s, thing, owner, flags, pLen);
    }
    return s;
}

int atr_head	(	dbref	,
		char **
	)

Definition at line 2467 of file db.cpp.

References A_LIST, al_extend(), atr_get_raw_LEN(), atr_next(), atrcount::count, alist::data, db, ISOUTOFMEMORY, statedata::iter_alist, alist::len, MEMALLOC, statedata::mod_al_id, statedata::mod_alist, statedata::mod_alist_len, mudstate, and atrcount::thing.

Referenced by atr_chown(), atr_cpy(), atr_free(), atr_match1(), Commer(), db_write_object(), dbclean_CheckALISTtoAT(), dbclean_CheckALISTtoDB(), dbclean_RemoveStaleAttributeNames(), dbclean_RenumberAttributes(), debug_examine(), do_decomp(), find_wild_attrs(), Hearer(), look_atrs1(), mem_usage(), sweep_check(), and CGuests::WipeAttrs().

{
#ifdef MEMORY_BASED
    if (db[thing].nALUsed)
    {
        ATRCOUNT *atr = (ATRCOUNT *) MEMALLOC(sizeof(ATRCOUNT));
        ISOUTOFMEMORY(atr);
        atr->thing = thing;
        atr->count = 1;
        *attrp = (char *)atr;
        return db[thing].pALHead[0].number;
    }
    return 0;
#else // MEMORY_BASED
    const char *astr;
    size_t alen;

    // Get attribute list.  Save a read if it is in the modify atr list
    //
    if (thing == mudstate.mod_al_id)
    {
        astr = mudstate.mod_alist;
        alen = mudstate.mod_alist_len;
    }
    else
    {
        astr = atr_get_raw_LEN(thing, A_LIST, &alen);
    }

    // If no list, return nothing.
    //
    if (!alen)
    {
        return 0;
    }

    // Set up the list and return the first entry.
    //
    al_extend(&mudstate.iter_alist.data, &mudstate.iter_alist.len, alen+1, false);
    memcpy(mudstate.iter_alist.data, astr, alen+1);
    *attrp = mudstate.iter_alist.data;
    return atr_next(attrp);
#endif // MEMORY_BASED
}

bool atr_match	(	dbref	thing,
		dbref	player,
		char	type,
		char *	str,
		char *	raw_str,
		bool	check_parents
	)

Definition at line 322 of file game.cpp.

References AMATCH_CMD, AMATCH_LISTEN, atr_match1(), Good_obj, Halted, hashflush(), ITER_PARENTS, match(), mudstate, No_Command, Parent, statedata::parent_htab, and strip_ansi().

Referenced by list_check(), notify_check(), and process_command().

{
    int lev, result;
    bool exclude, insert;
    dbref parent;

    // If thing is halted or we are matching $-commands on a NO_COMMAND
    // object, don't check anything
    //
    if (  Halted(thing)
       || (  AMATCH_CMD == type
          && No_Command(thing)))
    {
        return false;
    }

    // If we're matching ^-commands, strip ANSI
    //
    if (AMATCH_LISTEN == type)
    {
        // Remember, strip_ansi returns a pointer to a static buffer
        // within itself.
        //
        size_t junk;
        str = strip_ansi(str, &junk);
    }

    // If not checking parents, just check the thing
    //
    bool match = false;
    if (!check_parents)
    {
        return (atr_match1(thing, thing, player, type, str, raw_str, false, false) > 0);
    }

    // Check parents, ignoring halted objects
    //
    exclude = false;
    insert = true;
    hashflush(&mudstate.parent_htab);
    ITER_PARENTS(thing, parent, lev)
    {
        if (!Good_obj(Parent(parent)))
        {
            insert = false;
        }
        result = atr_match1(thing, parent, player, type, str, raw_str,
            exclude, insert);
        if (result > 0)
        {
            match = true;
        }
        else if (result < 0)
        {
            return match;
        }
        exclude = true;
    }
    return match;
}

int atr_next

(

char **

)

Definition at line 2384 of file db.cpp.

References al_decode(), atrcount::count, db, MEMFREE, and atrcount::thing.

Referenced by atr_chown(), atr_cpy(), atr_free(), atr_head(), atr_match1(), Commer(), db_write_object(), dbclean_CheckALISTtoAT(), dbclean_CheckALISTtoDB(), dbclean_RemoveStaleAttributeNames(), dbclean_RenumberAttributes(), debug_examine(), do_decomp(), find_wild_attrs(), Hearer(), look_atrs1(), mem_usage(), sweep_check(), and CGuests::WipeAttrs().

{
#ifdef MEMORY_BASED
    ATRCOUNT *atr;

    if (!attrp || !*attrp)
    {
        return 0;
    }
    else
    {
        atr = (ATRCOUNT *) * attrp;
        if (atr->count >= db[atr->thing].nALUsed)
        {
            MEMFREE(atr);
            atr = NULL;
            return 0;
        }
        atr->count++;
        return db[atr->thing].pALHead[atr->count - 1].number;
    }

#else // MEMORY_BASED
    if (!*attrp || !**attrp)
    {
        return 0;
    }
    else
    {
        return al_decode(attrp);
    }
#endif // MEMORY_BASED
}

bool atr_pget_info	(	dbref	,
		int	,
		dbref *	,
		int *
	)

Definition at line 2241 of file db.cpp.

References AF_PRIVATE, atr_decode_LEN(), atr_get_raw_LEN(), atr_num(), attr::flags, Good_obj, ITER_PARENTS, Owner, and Parent.

Referenced by bCanReadAttr(), do_alias(), do_forwardlist(), FUNCTION(), and set_attr_internal().

{
    dbref parent;
    int lev;
    ATTR *ap;

    ITER_PARENTS(thing, parent, lev)
    {
        size_t nLen;
        const char *buff = atr_get_raw_LEN(parent, atr, &nLen);
        if (buff && *buff)
        {
            atr_decode_LEN(buff, nLen, NULL, thing, owner, flags, &nLen);
            if ((lev == 0) || !(*flags & AF_PRIVATE))
            {
                return true;
            }
        }
        if ((lev == 0) && Good_obj(Parent(parent)))
        {
            ap = atr_num(atr);
            if (!ap || ap->flags & AF_PRIVATE)
                break;
        }
    }
    *owner = Owner(thing);
    *flags = 0;
    return false;
}

char* atr_pget_LEN	(	dbref	,
		int	,
		dbref *	,
		int *	,
		size_t *
	)

Definition at line 2227 of file db.cpp.

References alloc_lbuf, and atr_pget_str_LEN().

Referenced by FUNCTION(), and get_handler().

{
    char *buff = alloc_lbuf("atr_pget");
    return atr_pget_str_LEN(buff, thing, atr, owner, flags, pLen);
}

char* atr_pget_real	(	dbref	,
		int	,
		dbref *	,
		int *	,
		const char *	,
		const	int
	)

Definition at line 2233 of file db.cpp.

References atr_pget_str_LEN(), and pool_alloc_lbuf().

{
    size_t nLen;
    char *buff = pool_alloc_lbuf("atr_pget", file, line);
    return atr_pget_str_LEN(buff, thing, atr, owner, flags, &nLen);
}

char* atr_pget_str	(	char *	,
		dbref	,
		int	,
		dbref *	,
		int *
	)

Definition at line 2221 of file db.cpp.

References atr_pget_str_LEN().

Referenced by do_set(), do_use(), FUNCTION(), and load_player_names().

{
    size_t nLen;
    return atr_pget_str_LEN(s, thing, atr, owner, flags, &nLen);
}

char* atr_pget_str_LEN	(	char *	,
		dbref	,
		int	,
		dbref *	,
		int *	,
		size_t *
	)

Definition at line 2185 of file db.cpp.

References AF_PRIVATE, atr_decode_LEN(), atr_get_raw_LEN(), atr_num(), attr::flags, Good_obj, ITER_PARENTS, Owner, and Parent.

Referenced by announce_connect(), announce_disconnect(), atr_pget_LEN(), atr_pget_real(), atr_pget_str(), and mux_exec().

{
    dbref parent;
    int lev;
    ATTR *ap;
    const char *buff;

    ITER_PARENTS(thing, parent, lev)
    {
        buff = atr_get_raw_LEN(parent, atr, pLen);
        if (buff && *buff)
        {
            atr_decode_LEN(buff, *pLen, s, thing, owner, flags, pLen);
            if (  lev == 0
               || !(*flags & AF_PRIVATE))
            {
                return s;
            }
        }
        if (  lev == 0
           && Good_obj(Parent(parent)))
        {
            ap = atr_num(atr);
            if (!ap || ap->flags & AF_PRIVATE)
            {
                break;
            }
        }
    }
    *owner = Owner(thing);
    *flags = 0;
    *s = '\0';
    *pLen = 0;
    return s;
}

void atr_pop

(

void

)

Definition at line 2436 of file db.cpp.

References alist::data, free_sbuf, statedata::iter_alist, alist::len, MEMFREE, mudstate, and alist::next.

Referenced by atr_chown(), atr_cpy(), atr_free(), atr_match1(), Commer(), dbclean_CheckALISTtoAT(), dbclean_CheckALISTtoDB(), dbclean_RemoveStaleAttributeNames(), dbclean_RenumberAttributes(), find_wild_attrs(), and Hearer().

{
#ifndef MEMORY_BASED
    ALIST *old_alist = mudstate.iter_alist.next;

    if (mudstate.iter_alist.data)
    {
        MEMFREE(mudstate.iter_alist.data);
        mudstate.iter_alist.data = NULL;
    }
    if (old_alist)
    {
        mudstate.iter_alist.data = old_alist->data;
        mudstate.iter_alist.len = old_alist->len;
        mudstate.iter_alist.next = old_alist->next;
        char *cp = (char *)old_alist;
        free_sbuf(cp);
    }
    else
    {
        mudstate.iter_alist.data = NULL;
        mudstate.iter_alist.len = 0;
        mudstate.iter_alist.next = NULL;
    }
#endif // !MEMORY_BASED
}

void atr_push

(

void

)

Definition at line 2422 of file db.cpp.

References alloc_sbuf, alist::data, statedata::iter_alist, alist::len, mudstate, and alist::next.

Referenced by atr_chown(), atr_cpy(), atr_free(), atr_match1(), Commer(), dbclean_CheckALISTtoAT(), dbclean_CheckALISTtoDB(), dbclean_RemoveStaleAttributeNames(), dbclean_RenumberAttributes(), find_wild_attrs(), and Hearer().

{
#ifndef MEMORY_BASED
    ALIST *new_alist = (ALIST *) alloc_sbuf("atr_push");
    new_alist->data = mudstate.iter_alist.data;
    new_alist->len = mudstate.iter_alist.len;
    new_alist->next = mudstate.iter_alist.next;

    mudstate.iter_alist.data = NULL;
    mudstate.iter_alist.len = 0;
    mudstate.iter_alist.next = new_alist;
#endif // !MEMORY_BASED
}

void atr_set_flags	(	dbref	,
		int	,
		int
	)

Definition at line 2048 of file db.cpp.

References atr_add(), atr_get, and free_lbuf.

Referenced by do_lock(), do_set(), do_unlock(), and FUNCTION().

{
    dbref aowner;
    int aflags;
    char *buff = atr_get(thing, atr, &aowner, &aflags);
    atr_add(thing, atr, buff, aowner, flags);
    free_lbuf(buff);
}

void badname_add

(

char *

)

Definition at line 876 of file player.cpp.

References statedata::badname_head, ISOUTOFMEMORY, MEMALLOC, mudstate, badname_struc::name, badname_struc::next, and StringClone().

Referenced by CF_HAND().

{
    // Make a new node and link it in at the top.
    //
    BADNAME *bp = (BADNAME *)MEMALLOC(sizeof(BADNAME));
    ISOUTOFMEMORY(bp);
    bp->name = StringClone(bad_name);
    bp->next = mudstate.badname_head;
    mudstate.badname_head = bp;
}

bool badname_check

(

char *

)

Definition at line 914 of file player.cpp.

References statedata::badname_head, mudstate, badname_struc::name, badname_struc::next, quick_wild(), and statedata::wild_invk_ctr.

Referenced by create_obj(), do_alias(), and do_name().

{
    BADNAME *bp;

    // Walk the badname list, doing wildcard matching.  If we get a hit then
    // return false.  If no matches in the list, return true.
    //
    for (bp = mudstate.badname_head; bp; bp = bp->next)
    {
        mudstate.wild_invk_ctr = 0;
        if (quick_wild(bp->name, bad_name))
        {
            return false;
        }
    }
    return true;
}

void badname_list	(	dbref	,
		const char *
	)

Definition at line 932 of file player.cpp.

References alloc_lbuf, statedata::badname_head, free_lbuf, mudstate, badname_struc::name, badname_struc::next, notify, safe_chr, and safe_str.

Referenced by do_list().

{
    BADNAME *bp;
    char *buff, *bufp;

    // Construct an lbuf with all the names separated by spaces.
    //
    buff = bufp = alloc_lbuf("badname_list");
    safe_str(prefix, buff, &bufp);
    for (bp = mudstate.badname_head; bp; bp = bp->next)
    {
        safe_chr(' ', buff, &bufp);
        safe_str(bp->name, buff, &bufp);
    }
    *bufp = '\0';

    // Now display it.
    //
    notify(player, buff);
    free_lbuf(buff);
}

void badname_remove

(

char *

)

Definition at line 887 of file player.cpp.

References statedata::badname_head, MEMFREE, mudstate, badname_struc::name, badname_struc::next, and string_compare().

Referenced by CF_HAND().

{
    // Look for an exact match on the bad name and remove if found.
    //
    BADNAME *bp;
    BADNAME *backp = NULL;
    for (bp = mudstate.badname_head; bp; backp = bp, bp = bp->next)
    {
        if (!string_compare(bad_name, bp->name))
        {
            if (backp)
            {
                backp->next = bp->next;
            }
            else
            {
                mudstate.badname_head = bp->next;
            }
            MEMFREE(bp->name);
            bp->name = NULL;
            MEMFREE(bp);
            bp = NULL;
            return;
        }
    }
}

bool bCanLockAttr	(	dbref	executor,
		dbref	target,
		ATTR *	tattr
	)

Definition at line 1980 of file predicates.cpp.

References AF_CONST, AF_GOD, AF_INTERNAL, AF_IS_LOCK, AF_WIZARD, atr_get_info(), attr::flags, God, attr::number, Owner, and Wizard.

Referenced by do_lock(), and do_unlock().

{
    if (!tattr)
    {
        return false;
    }

    int mDeny = AF_INTERNAL|AF_IS_LOCK|AF_CONST;
    if (!God(executor))
    {
        if (God(target))
        {
            return false;
        }
        if (Wizard(executor))
        {
            mDeny = AF_INTERNAL|AF_IS_LOCK|AF_CONST|AF_GOD;
        }
        else
        {
            mDeny = AF_INTERNAL|AF_IS_LOCK|AF_CONST|AF_WIZARD|AF_GOD;
        }
    }

    dbref aowner;
    int aflags;
    if (  (tattr->flags & mDeny)
       || !atr_get_info(target, tattr->number, &aowner, &aflags)
       || (aflags & mDeny))
    {
        return false;
    }
    else if (  Wizard(executor)
            || Owner(executor) == aowner)
    {
        return true;
    }
    else
    {
        return false;
    }
}

bool bCanReadAttr	(	dbref	executor,
		dbref	target,
		ATTR *	tattr,
		bool	bParentCheck
	)

Definition at line 1871 of file predicates.cpp.

References A_DESC, AF_DARK, AF_INTERNAL, AF_MDARK, AF_VISUAL, atr_get_info(), atr_pget_info(), statedata::bStandAlone, Examinable, attr::flags, God, mudconf, mudstate, nearby(), attr::number, Owner, confdata::read_rem_desc, and WizRoy.

Referenced by debug_examine(), do_decomp(), do_verb(), eval_boolexp(), exam_wildattrs(), find_wild_attrs(), FUNCTION(), get_handler(), hasattr_handler(), list_attraccess(), and look_atrs1().

{
    if (!tattr)
    {
        return false;
    }

    dbref aowner;
    int aflags;

    if (  !mudstate.bStandAlone
       && bCheckParent)
    {
        atr_pget_info(target, tattr->number, &aowner, &aflags);
    }
    else
    {
        atr_get_info(target, tattr->number, &aowner, &aflags);
    }

    int mAllow = AF_VISUAL;
    if (  (tattr->flags & mAllow)
       || (aflags & mAllow))
    {
        if (  mudstate.bStandAlone
           || tattr->number != A_DESC
           || mudconf.read_rem_desc
           || nearby(executor, target))
        {
            return true;
        }
    }
    int mDeny = 0;
    if (WizRoy(executor))
    {
        if (God(executor))
        {
            mDeny = AF_INTERNAL;
        }
        else
        {
            mDeny = AF_INTERNAL|AF_DARK;
        }
    }
    else if (  Owner(executor) == aowner
            || Examinable(executor, target))
    {
        mDeny = AF_INTERNAL|AF_DARK|AF_MDARK;
    }
    if (mDeny)
    {
        if (  (tattr->flags & mDeny)
           || (aflags & mDeny))
        {
            return false;
        }
        else
        {
            return true;
        }
    }
    return false;
}

bool bCanSetAttr	(	dbref	executor,
		dbref	target,
		ATTR *	tattr
	)

Definition at line 1935 of file predicates.cpp.

References AF_CONST, AF_GOD, AF_INTERNAL, AF_IS_LOCK, AF_LOCK, AF_WIZARD, atr_get_info(), Controls, attr::flags, God, attr::number, and Wizard.

Referenced by do_alias(), do_chown(), do_edit(), do_mvattr(), do_notify(), do_set(), do_wait(), do_wipe(), FUNCTION(), set_attr_internal(), and CGuests::WipeAttrs().

{
    if (!tattr)
    {
        return false;
    }

    int mDeny = AF_INTERNAL|AF_IS_LOCK|AF_CONST;
    if (!God(executor))
    {
        if (God(target))
        {
            return false;
        }
        if (Wizard(executor))
        {
            mDeny = AF_INTERNAL|AF_IS_LOCK|AF_CONST|AF_LOCK|AF_GOD;
        }
        else if (Controls(executor, target))
        {
            mDeny = AF_INTERNAL|AF_IS_LOCK|AF_CONST|AF_LOCK|AF_WIZARD|AF_GOD;
        }
        else
        {
            return false;
        }
    }

    dbref aowner;
    int aflags;
    if (  (tattr->flags & mDeny)
#ifdef FIRANMUX
       || Immutable(target)
#endif
       || (  atr_get_info(target, tattr->number, &aowner, &aflags)
          && (aflags & mDeny)))
    {
        return false;
    }
    else
    {
        return true;
    }
}

int boot_off	(	dbref	player,
		const char *	message
	)

Definition at line 1085 of file netcommon.cpp.

References DESC_SAFEITER_PLAYER, queue_string(), queue_write_LEN(), R_BOOT, and shutdownsock().

Referenced by destroy_player(), do_boot(), and do_toad().

{
    DESC *d, *dnext;
    int count = 0;
    DESC_SAFEITER_PLAYER(player, d, dnext)
    {
        if (message && *message)
        {
            queue_string(d, message);
            queue_write_LEN(d, "\r\n", 2);
        }
        shutdownsock(d, R_BOOT);
        count++;
    }
    return count;
}

void boot_slave	(	dbref	executor,
		dbref	caller,
		dbref	enactor,
		int
	)

Lauch reverse-DNS slave process.

This spawns the reverse-DNS slave process and creates a socket-oriented, bi-directional communiocation path between that process and this process. Any existing slave process is killed.

Parameters:

	executor	dbref of Executor.
	caller	dbref of Caller.
	enactor	dbref of Enactor.

Returns:

None.

Definition at line 649 of file bsd.cpp.

References CleanUpSlaveProcess(), CleanUpSlaveSocket(), CMuxAlarm::Clear(), DebugTotalSockets, ENDLOG, LOG_ALWAYS, log_number(), log_text(), make_nonblocking(), maxd, MuxAlarm, slave_pid, slave_socket, and STARTLOG.

Referenced by main(), and shovechars().

{
    char *pFailedFunc = 0;
    int sv[2];
    int i;
    int maxfds;

#ifdef HAVE_GETDTABLESIZE
    maxfds = getdtablesize();
#else // HAVE_GETDTABLESIZE
    maxfds = sysconf(_SC_OPEN_MAX);
#endif // HAVE_GETDTABLESIZE

    CleanUpSlaveSocket();
    CleanUpSlaveProcess();

    if (socketpair(AF_UNIX, SOCK_DGRAM, 0, sv) < 0)
    {
        pFailedFunc = "socketpair() error: ";
        goto failure;
    }

    // Set to nonblocking.
    //
    if (make_nonblocking(sv[0]) < 0)
    {
        pFailedFunc = "make_nonblocking() error: ";
        close(sv[0]);
        close(sv[1]);
        goto failure;
    }
    slave_pid = fork();
    switch (slave_pid)
    {
    case -1:

        pFailedFunc = "fork() error: ";
        close(sv[0]);
        close(sv[1]);
        goto failure;

    case 0:

        // If we don't clear this alarm, the child will eventually receive a
        // SIG_PROF.
        //
        MuxAlarm.Clear();

        // Child.  The following calls to dup2() assume only the minimal
        // dup2() functionality.  That is, the destination descriptor is
        // always available for it, and sv[1] is never that descriptor.
        // It is likely that the standard defined behavior of dup2()
        // would handle the job by itself more directly, but a little
        // extra code is low-cost insurance.
        //
        close(sv[0]);
        if (sv[1] != 0)
        {
            close(0);
            if (dup2(sv[1], 0) == -1)
            {
                _exit(1);
            }
        }
        if (sv[1] != 1)
        {
            close(1);
            if (dup2(sv[1], 1) == -1)
            {
                _exit(1);
            }
        }
        for (i = 3; i < maxfds; i++)
        {
            close(i);
        }
        execlp("bin/slave", "slave", NULL);
        _exit(1);
    }
    close(sv[1]);

    slave_socket = sv[0];
    DebugTotalSockets++;
    if (make_nonblocking(slave_socket) < 0)
    {
        pFailedFunc = "make_nonblocking() error: ";
        CleanUpSlaveSocket();
        goto failure;
    }
    if (maxd <= slave_socket)
    {
        maxd = slave_socket + 1;
    }

    STARTLOG(LOG_ALWAYS, "NET", "SLAVE");
    log_text("DNS lookup slave started on fd ");
    log_number(slave_socket);
    ENDLOG;
    return;

failure:

    CleanUpSlaveProcess();
    STARTLOG(LOG_ALWAYS, "NET", "SLAVE");
    log_text(pFailedFunc);
    log_number(errno);
    ENDLOG;
}

void build_version

(

void

)

Definition at line 27 of file version.cpp.

References mudstate, MUX_BUILD_NUM, MUX_RELEASE_DATE, MUX_VERSION, statedata::short_ver, and statedata::version.

Referenced by main().

{
#ifdef WIN32
#if defined(ALPHA)
        sprintf( mudstate.version, "MUX %s for Win32 #%s [ALPHA]",
            MUX_VERSION, MUX_BUILD_NUM);
        sprintf( mudstate.short_ver, "MUX %s Alpha Win32", MUX_VERSION);
#elif defined(BETA)
        sprintf( mudstate.version, "MUX %s for Win32 #%s [BETA]",
            MUX_VERSION, MUX_BUILD_NUM);
        sprintf( mudstate.short_ver, "MUX %s Beta Win32", MUX_VERSION);
#else // RELEASED
        sprintf( mudstate.version, "MUX %s for Win32 #%s [%s]",
            MUX_VERSION, MUX_BUILD_NUM, MUX_RELEASE_DATE);
        sprintf( mudstate.short_ver, "MUX %s Win32", MUX_VERSION);
#endif // ALPHA, BETA, RELEASED
#else // WIN32
#if defined(ALPHA)
        sprintf( mudstate.version, "MUX %s #%s [ALPHA]", MUX_VERSION,
            MUX_BUILD_NUM);
        sprintf( mudstate.short_ver, "MUX %s Alpha", MUX_VERSION);
#elif defined(BETA)
        sprintf( mudstate.version, "MUX %s #%s [BETA]", MUX_VERSION,
            MUX_BUILD_NUM);
        sprintf( mudstate.short_ver, "MUX %s Beta", MUX_VERSION);
#else // RELEASED
        sprintf( mudstate.version, "MUX %s #%s [%s]", MUX_VERSION,
            MUX_BUILD_NUM, MUX_RELEASE_DATE);
        sprintf( mudstate.short_ver, "MUX %s", MUX_VERSION);
#endif // ALPHA, BETA, RELEASED
#endif // WIN32
}

void cache_pass2

(

void

)

Definition at line 77 of file attrcache.cpp.

References tagAttrRecord::attrKey, tagAttrRecord::attrText, cache_put(), cache_redirected, cnt, ENDLINE, mux_assert, N_TEMP_FILES, tagCacheEntryHeader::nSize, RemoveFile(), and TempFiles.

Referenced by dbconvert().

{
    ATTR_RECORD Record;
    cache_redirected = false;
    fprintf(stderr, "2nd Pass:\n");
    for (int i = 0; i < N_TEMP_FILES; i++)
    {
        fprintf(stderr, "File %d: ", i);
        long int li = fseek(TempFiles[i], 0, SEEK_SET);
        mux_assert(0L == li);

        int cnt = 1000;
        size_t nSize;
        for (;;)
        {
            size_t cc = fread(&nSize, 1, sizeof(nSize), TempFiles[i]);
            if (cc != sizeof(nSize))
            {
                break;
            }
            cc = fread(&Record, 1, nSize, TempFiles[i]);
            mux_assert(cc == nSize);
            cache_put(&Record.attrKey, Record.attrText, nSize - sizeof(Aname));
            if (cnt-- == 0)
            {
                fputc('.', stderr);
                fflush(stderr);
                cnt = 1000;
            }
        }
        fclose(TempFiles[i]);
        char TempFileName[20];
        sprintf(TempFileName, "$convtemp.%d", i);
        RemoveFile(TempFileName);
        fprintf(stderr, ENDLINE);
    }
}

void cache_redirect

(

void

)

Definition at line 64 of file attrcache.cpp.

References cache_redirected, mux_assert, N_TEMP_FILES, and TempFiles.

Referenced by dbconvert().

{
    for (int i = 0; i < N_TEMP_FILES; i++)
    {
        char TempFileName[20];
        sprintf(TempFileName, "$convtemp.%d", i);
        TempFiles[i] = fopen(TempFileName, "wb+");
        mux_assert(TempFiles[i]);
        setvbuf(TempFiles[i], NULL, _IOFBF, 16384);
    }
    cache_redirected = true;
}

bool can_see	(	dbref	,
		dbref	,
		bool
	)

Definition at line 134 of file predicates.cpp.

References Connected, Dark, confdata::dark_sleepers, isExit, isPlayer, IsReal, Light, mudconf, MyopicExam, Puppet, and confdata::see_own_dark.

Referenced by look_contents().

{
    // Don't show if all the following apply: Sleeping players should not be
    // seen.  The thing is a disconnected player.  The player is not a
    // puppet.
    //
    if (  mudconf.dark_sleepers
       && isPlayer(thing)
       && !Connected(thing)
       && !Puppet(thing))
    {
        return false;
    }

    // You don't see yourself or exits.
    //
    if (  player == thing
       || isExit(thing))
    {
        return false;
    }

    // If loc is not dark, you see it if it's not dark or you control it.  If
    // loc is dark, you see it if you control it.  Seeing your own dark
    // objects is controlled by mudconf.see_own_dark.  In dark locations, you
    // also see things that are LIGHT and !DARK.
    //
    if (can_see_loc)
    {
#ifdef REALITY_LVLS
       return ((!Dark(thing) && IsReal(player, thing)) ||
#else
        return (!Dark(thing) ||
#endif /* REALITY_LVLS */
            (mudconf.see_own_dark && MyopicExam(player, thing)));
    }
    else
    {
#ifdef REALITY_LVLS
        return ((Light(thing) && !Dark(thing) && IsReal(player, thing)) ||
#else
        return ((Light(thing) && !Dark(thing)) ||
#endif /* REALITY_LVLS */
            (mudconf.see_own_dark && MyopicExam(player, thing)));
    }
}

bool can_set_home	(	dbref	,
		dbref	,
		dbref
	)

Definition at line 124 of file object.cpp.

References Abode, Controls, Going, Good_obj, TYPE_PLAYER, TYPE_ROOM, TYPE_THING, and Typeof.

Referenced by clone_home(), do_link(), and new_home().

{
    if (  !Good_obj(player)
       || !Good_obj(home)
       || thing == home)
    {
        return false;
    }

    switch (Typeof(home))
    {
    case TYPE_PLAYER:
    case TYPE_ROOM:
    case TYPE_THING:
        if (Going(home))
        {
            return false;
        }
        if (  Controls(player, home)
           || Abode(home))
        {
            return true;
        }
    }
    return false;
}

bool canpayfees	(	dbref	,
		dbref	,
		int	,
		int
	)

Definition at line 217 of file predicates.cpp.

References Free_Money, confdata::many_coins, mudconf, notify, Owner, pay_quota(), payfor(), Pennies(), confdata::quotas, tprintf(), and Wizard.

Referenced by create_obj(), do_chown(), and link_exit().

{
    if (  !Wizard(who)
       && !Wizard(Owner(who))
       && !Free_Money(who)
       && !Free_Money(Owner(who))
       && (Pennies(Owner(who)) < pennies))
    {
        if (player == who)
        {
            notify(player, tprintf("Sorry, you don't have enough %s.",
                       mudconf.many_coins));
        }
        else
        {
            notify(player, tprintf("Sorry, that player doesn't have enough %s.",
                mudconf.many_coins));
        }
        return false;
    }
    if (mudconf.quotas)
    {
        if (!pay_quota(who, quota))
        {
            if (player == who)
            {
                notify(player, "Sorry, your building contract has run out.");
            }
            else
            {
                notify(player,
                    "Sorry, that player's building contract has run out.");
            }
            return false;
        }
    }
    payfor(who, pennies);
    return true;
}

void cf_display	(	dbref	,
		char *	,
		char *	,
		char **
	)

Definition at line 2174 of file conf.cpp.

References check_access(), conftable, confparm::interpreter, confparm::loc, mux_stricmp(), confparm::pname, confparm::rperms, safe_chr, and safe_ltoa().

Referenced by FUNCTION().

{
    CONF *tp;

    for (tp = conftable; tp->pname; tp++)
    {
        if (!mux_stricmp(tp->pname, param_name))
        {
            if (check_access(player, tp->rperms))
            {
                if (tp->interpreter == cf_int)
                {
                    safe_ltoa(*(tp->loc), buff, bufc);
                    return;
                }
                else if (tp->interpreter == cf_dbref)
                {
                    safe_chr('#', buff, bufc);
                    safe_ltoa(*(tp->loc), buff, bufc);
                    return;
                }
                else if (tp->interpreter == cf_bool)
                {
                    bool *pb = (bool *)tp->loc;
                    safe_bool(*pb, buff, bufc);
                    return;
                }
                else if (tp->interpreter == cf_string)
                {
                    safe_str((char *)tp->loc, buff, bufc);
                    return;
                }
                else if (tp->interpreter == cf_string_dyn)
                {
                    safe_str(*(char **)tp->loc, buff, bufc);
                    return;
                }
                else if (tp->interpreter == cf_int_array)
                {
                    IntArray *pia = (IntArray *)(tp->loc);
                    ITL itl;
                    ItemToList_Init(&itl, buff, bufc);
                    for (int i = 0; i < pia->n; i++)
                    {
                        if (!ItemToList_AddInteger(&itl, pia->pi[i]))
                        {
                            break;
                        }
                    }
                    ItemToList_Final(&itl);
                    return;
                }
                else if (tp->interpreter == cf_seconds)
                {
                    CLinearTimeDelta *pltd = (CLinearTimeDelta *)(tp->loc);
                    safe_str(pltd->ReturnSecondsString(7), buff, bufc);
                    return;
                }
            }
            safe_noperm(buff, bufc);
            return;
        }
    }
    safe_nomatch(buff, bufc);
}

CF_HAND

(

cf_art_rule

)

Definition at line 3412 of file stringutil.cpp.

References cf_log_syntax(), ArtRuleset::m_bUseAn, ArtRuleset::m_pNextRule, ArtRuleset::m_pRegexp, ArtRuleset::m_pRegexpStudy, MEMALLOC, mux_isspace, mux_tolower, pcre_compile(), pcre_study(), and UNUSED_PARAMETER.

{
    UNUSED_PARAMETER(pExtra);
    UNUSED_PARAMETER(nExtra);

    char* pCurrent = str;

    while (mux_isspace(*pCurrent))
    {
        pCurrent++;
    }
    char* pArticle = pCurrent;
    while (  !mux_isspace(*pCurrent)
          && *pCurrent != '\0')
    {
        pCurrent++;
    }
    if (*pCurrent == '\0')
    {
        cf_log_syntax(player, cmd, "No article or regexp specified.");
        return -1;
    }

    bool bUseAn = false;
    bool bOkay = false;

    if (pCurrent - pArticle <= 2)
    {
        if (mux_tolower(pArticle[0]) == 'a')
        {
            if (mux_tolower(pArticle[1]) == 'n')
            {
                bUseAn = true;
                bOkay = true;
            }

            if (mux_isspace(pArticle[1]))
            {
                bOkay = true;
            }
        }
    }

    if (!bOkay)
    {
        *pCurrent = '\0';
        cf_log_syntax(player, cmd, "Invalid article '%s'.", pArticle);
        return -1;
    }

    while (mux_isspace(*pCurrent))
    {
        pCurrent++;
    }

    if (*pCurrent == '\0')
    {
        cf_log_syntax(player, cmd, "No regexp specified.");
        return -1;
    }

    const char *errptr;
    int erroffset;
    pcre* reNewRegexp = pcre_compile(pCurrent, 0, &errptr, &erroffset, NULL);
    if (!reNewRegexp)
    {
        cf_log_syntax(player, cmd, "Error processing regexp '%s':.",
              pCurrent, errptr);
        return -1;
    }

    pcre_extra *study = pcre_study(reNewRegexp, 0, &errptr);

    // Push new rule at head of list.
    ArtRuleset** arRules = (ArtRuleset **) vp;
    ArtRuleset* arNewRule = (ArtRuleset *) MEMALLOC(sizeof(ArtRuleset));

    arNewRule->m_pNextRule = *arRules;
    arNewRule->m_bUseAn = bUseAn;
    arNewRule->m_pRegexp = reNewRegexp;
    arNewRule->m_pRegexpStudy = study;

    *arRules = arNewRule;
    return 0;
}

CF_HAND

(

cf_flag_name

)

Definition at line 1259 of file flags.cpp.

{
    UNUSED_PARAMETER(vp);
    UNUSED_PARAMETER(pExtra);
    UNUSED_PARAMETER(nExtra);
    UNUSED_PARAMETER(player);
    UNUSED_PARAMETER(cmd);

    MUX_STRTOK_STATE tts;
    mux_strtok_src(&tts, str);
    mux_strtok_ctl(&tts, " \t=,");
    char *flagstr = mux_strtok_parse(&tts);
    char *namestr = mux_strtok_parse(&tts);

    if (  !flagstr
       || !*flagstr
       || !namestr
       || !*namestr)
    {
        return -1;
    }

    if (flag_rename(flagstr, namestr))
    {
        return 0;
    }
    else
    {
        return -1;
    }
}

CF_HAND

(

cf_flag_access

)

Definition at line 943 of file flags.cpp.

{
    UNUSED_PARAMETER(vp);
    UNUSED_PARAMETER(pExtra);
    UNUSED_PARAMETER(nExtra);

    MUX_STRTOK_STATE tts;
    mux_strtok_src(&tts, str);
    mux_strtok_ctl(&tts, " \t=,");
    char *fstr = mux_strtok_parse(&tts);
    char *permstr = mux_strtok_parse(&tts);

    if (!fstr || !*fstr)
    {
        return -1;
    }

    FLAGNAMEENT *fp;
    if ((fp = find_flag(fstr)) == NULL)
    {
        cf_log_notfound(player, cmd, "No such flag", fstr);
        return -1;
    }
    FLAGBITENT *fbe = fp->fbe;

    // Don't change the handlers on special things.
    //
    if (  (fbe->handler != fh_any)
       && (fbe->handler != fh_wizroy)
       && (fbe->handler != fh_wiz)
       && (fbe->handler != fh_god)
       && (fbe->handler != fh_restrict_player)
       && (fbe->handler != fh_privileged))
    {
        STARTLOG(LOG_CONFIGMODS, "CFG", "PERM");
        log_text("Cannot change access for flag: ");
        log_text(fp->flagname);
        ENDLOG;
        return -1;
    }

    if (!strcmp(permstr, "any"))
    {
        fbe->handler = fh_any;
    }
    else if (!strcmp(permstr, "royalty"))
    {
        fbe->handler = fh_wizroy;
    }
    else if (!strcmp(permstr, "wizard"))
    {
        fbe->handler = fh_wiz;
    }
    else if (!strcmp(permstr, "god"))
    {
        fbe->handler = fh_god;
    }
    else if (!strcmp(permstr, "restrict_player"))
    {
        fbe->handler = fh_restrict_player;
    }
    else if (!strcmp(permstr, "privileged"))
    {
        fbe->handler = fh_privileged;
    }
    else if (!strcmp(permstr, "staff"))
    {
        fbe->handler = fh_staff;
    }
    else
    {
        cf_log_notfound(player, cmd, "Flag access", permstr);
        return -1;
    }
    return 0;
}

CF_HAND

(

cf_func_access

)

Definition at line 9125 of file functions.cpp.

{
    UNUSED_PARAMETER(vp);

    char *ap;
    for (ap = str; *ap && !mux_isspace(*ap); ap++)
    {
        *ap = mux_tolower(*ap); // Nothing.
    }
    int nstr = ap - str;

    if (*ap)
    {
        *ap++ = '\0';
    }

    FUN *fp = (FUN *)hashfindLEN(str, nstr, &mudstate.func_htab);
    if (fp)
    {
        return cf_modify_bits(&fp->perms, ap, pExtra, nExtra, player, cmd);
    }
    UFUN *ufp = (UFUN *)hashfindLEN(str, nstr, &mudstate.ufunc_htab);
    if (ufp)
    {
        return cf_modify_bits(&ufp->perms, ap, pExtra, nExtra, player, cmd);
    }
    cf_log_notfound(player, cmd, "Function", str);
    return -1;
}

CF_HAND

(

cf_attr_access

)

Definition at line 3029 of file command.cpp.

References atr_str(), cf_log_notfound(), cf_modify_bits(), attr::flags, mux_isspace, descriptor_data::player, and UNUSED_PARAMETER.

{
    UNUSED_PARAMETER(vp);

    ATTR *ap;
    char *sp;

    for (sp = str; *sp && !mux_isspace(*sp); sp++)
    {
        ; // Nothing
    }
    if (*sp)
    {
        *sp++ = '\0';
    }
    while (mux_isspace(*sp))
    {
        sp++;
    }

    ap = atr_str(str);
    if (ap)
    {
        return cf_modify_bits(&(ap->flags), sp, pExtra, nExtra, player, cmd);
    }
    else
    {
        cf_log_notfound(player, cmd, "Attribute", str);
        return -1;
    }
}

CF_HAND

(

cf_acmd_access

)

Definition at line 2994 of file command.cpp.

References cf_modify_bits(), statedata::command_htab, hashfindLEN(), MakeCanonicalAttributeCommand(), mudstate, attr::name, CMDENT::perms, descriptor_data::player, and UNUSED_PARAMETER.

{
    UNUSED_PARAMETER(vp);

    ATTR *ap;

    for (ap = attr; ap->name; ap++)
    {
        int nBuffer;
        bool bValid;
        char *buff = MakeCanonicalAttributeCommand(ap->name, &nBuffer, &bValid);
        if (!bValid)
        {
            continue;
        }

        CMDENT *cmdp = (CMDENT *)hashfindLEN(buff, nBuffer, &mudstate.command_htab);
        if (cmdp != NULL)
        {
            int save = cmdp->perms;
            int failure = cf_modify_bits(&(cmdp->perms), str, pExtra, nExtra,
                 player, cmd);
            if (failure != 0)
            {
                cmdp->perms = save;
                return -1;
            }
        }
    }
    return 0;
}

CF_HAND

(

cf_cmd_alias

)

Definition at line 3064 of file command.cpp.

References CMDENT::callseq, cf_log_notfound(), CMDENT::cmdname, CMDENT::extra, find_nametab_ent(), name_table::flag, CMDENT::handler, hashaddLEN(), hashfindLEN(), ISOUTOFMEMORY, MEMALLOC, mux_strtok_ctl(), mux_strtok_parse(), mux_strtok_src(), name_table::perm, CMDENT::perms, descriptor_data::player, StringClone(), SW_GOT_UNIQUE, SW_MULTIPLE, CMDENT::switches, and UNUSED_PARAMETER.

{
    UNUSED_PARAMETER(pExtra);
    UNUSED_PARAMETER(nExtra);

    char *ap;
    CMDENT *cmdp, *cmd2;
    NAMETAB *nt;

    MUX_STRTOK_STATE tts;
    mux_strtok_src(&tts, str);
    mux_strtok_ctl(&tts, " \t=,");
    char *alias = mux_strtok_parse(&tts);
    char *orig = mux_strtok_parse(&tts);

    if (!orig)
    {
        // We only got one argument to @alias. Bad.
        //
        return -1;
    }

    for (ap = orig; *ap && (*ap != '/'); ap++) ;
    if (*ap == '/')
    {
        // Switch form of command aliasing: create an alias for
        // a command + a switch
        //
        *ap++ = '\0';

        // Look up the command
        //
        cmdp = (CMDENT *) hashfindLEN(orig, strlen(orig), (CHashTable *) vp);
        if (cmdp == NULL || cmdp->switches == NULL)
        {
            cf_log_notfound(player, cmd, "Command", orig);
            return -1;
        }

        // Look up the switch
        //
        nt = find_nametab_ent(player, (NAMETAB *) cmdp->switches, ap);
        if (!nt)
        {
            cf_log_notfound(player, cmd, "Switch", ap);
            return -1;
        }

        if (!hashfindLEN(alias, strlen(alias), (CHashTable *)vp))
        {
            // Create the new command table entry.
            //
            cmd2 = (CMDENT *)MEMALLOC(sizeof(CMDENT));
            ISOUTOFMEMORY(cmd2);
            cmd2->cmdname = StringClone(alias);
            cmd2->switches = cmdp->switches;
            cmd2->perms = cmdp->perms | nt->perm;
            cmd2->extra = (cmdp->extra | nt->flag) & ~SW_MULTIPLE;
            if (!(nt->flag & SW_MULTIPLE))
            {
                cmd2->extra |= SW_GOT_UNIQUE;
            }
            cmd2->callseq = cmdp->callseq;
            cmd2->handler = cmdp->handler;

            hashaddLEN(cmd2->cmdname, strlen(cmd2->cmdname), cmd2, (CHashTable *) vp);
        }
    }
    else
    {
        // A normal (non-switch) alias
        //
        void *hp = hashfindLEN(orig, strlen(orig), (CHashTable *) vp);
        if (hp == NULL)
        {
            cf_log_notfound(player, cmd, "Entry", orig);
            return -1;
        }
        hashaddLEN(alias, strlen(alias), hp, (CHashTable *) vp);
    }
    return 0;
}

CF_HAND

(

cf_access

)

Definition at line 2938 of file command.cpp.

References cf_log_notfound(), cf_modify_bits(), cf_ntab_access(), statedata::command_htab, hashfindLEN(), mudconf, mudstate, mux_isspace, mux_stricmp(), CMDENT::perms, descriptor_data::player, confdata::restrict_home, CMDENT::switches, and UNUSED_PARAMETER.

{
    UNUSED_PARAMETER(vp);

    CMDENT *cmdp;
    char *ap;
    bool set_switch;

    for (ap = str; *ap && !mux_isspace(*ap) && (*ap != '/'); ap++) ;
    if (*ap == '/')
    {
        set_switch = true;
        *ap++ = '\0';
    }
    else
    {
        set_switch = false;
        if (*ap)
        {
            *ap++ = '\0';
        }
        while (mux_isspace(*ap))
        {
            ap++;
        }
    }

    cmdp = (CMDENT *)hashfindLEN(str, strlen(str), &mudstate.command_htab);
    if (cmdp != NULL)
    {
        if (set_switch)
        {
            return cf_ntab_access((int *)cmdp->switches, ap, pExtra, nExtra,
                                  player, cmd);
        }
        else
        {
            return cf_modify_bits(&(cmdp->perms), ap, pExtra, nExtra, player,
                                  cmd);
        }
    }
    else
    {
        if (!mux_stricmp(str, "home"))
        {
            return cf_modify_bits(&(mudconf.restrict_home), ap, pExtra,
                                  nExtra, player, cmd);
        }
        cf_log_notfound(player, cmd, "Command", str);
        return -1;
    }
}

CF_HAND

(

cf_cf_access

)

Definition at line 1940 of file conf.cpp.

References statedata::bReadingConfiguration, CA_STATIC, cf_modify_bits(), conftable, ENDLOG, confparm::flags, LOG_CONFIGMODS, log_name(), log_text(), mudstate, mux_isspace, NOPERM_MESSAGE, notify, confparm::pname, STARTLOG, and UNUSED_PARAMETER.

{
    UNUSED_PARAMETER(vp);

    CONF *tp;
    char *ap;

    for (ap = str; *ap && !mux_isspace(*ap); ap++)
    {
        ; // Nothing
    }
    if (*ap)
    {
        *ap++ = '\0';
    }

    for (tp = conftable; tp->pname; tp++)
    {
        if (!strcmp(tp->pname, str))
        {
            // Cannot modify parameters set CA_STATIC.
            //
            if (  tp->flags & CA_STATIC
               && !mudstate.bReadingConfiguration)
            {
                notify(player, NOPERM_MESSAGE);
                STARTLOG(LOG_CONFIGMODS, "CFG", "PERM");
                log_name(player);
                log_text(" tried to change access to static param: ");
                log_text(tp->pname);
                ENDLOG;
                return -1;
            }
            return cf_modify_bits(&tp->flags, ap, pExtra, nExtra, player, cmd);
        }
    }
    cf_log_notfound(player, cmd, "Config directive", str);
    return -1;
}

void cf_init

(

void

)

Definition at line 39 of file conf.cpp.

References A_USER_START, statedata::access_list, confdata::active_q_chunk, AF_ODARK, statedata::aHelpDesc, confdata::allow_guest_from_registered_site, confdata::art_rules, statedata::attr_next, confdata::autozone, statedata::badname_head, statedata::bCanRestart, statedata::bReadingConfiguration, statedata::bStackLimitReached, confdata::cache_names, confdata::cache_pages, confdata::cache_tick_period, confdata::check_interval, confdata::check_offset, confdata::clone_copy_cost, confdata::cmd_quota_incr, confdata::cmd_quota_max, confdata::compress, confdata::compress_db, confdata::comsys_db, confdata::conn_file, confdata::conn_timeout, confdata::control_flags, confdata::crashdb, confdata::crea_file, confdata::createmax, confdata::createmin, confdata::creg_file, statedata::curr_cmd, statedata::curr_enactor, statedata::curr_executor, confdata::dark_sleepers, alist::data, statedata::db_size, statedata::db_top, statedata::debug_cmd, confdata::default_home, confdata::destroy_going_now, confdata::digcost, statedata::doing_hdr, confdata::down_file, confdata::downmotd_msg, confdata::dump_interval, confdata::dump_msg, confdata::dump_offset, statedata::dumped, statedata::dumper, statedata::dumping, statedata::epoch, confdata::eval_comtitle, confdata::events_daily_hour, statedata::events_flag, confdata::ex_flags, confdata::exam_public, confdata::exit_flags, confdata::exit_quota, confdata::fascist_tport, confdata::fixed_home_msg, confdata::fixed_tel_msg, FLAG_WORD1, FLAG_WORD3, confdata::fork_dump, statedata::freelist, confdata::full_file, confdata::fullmotd_msg, statedata::func_invk_ctr, confdata::func_invk_lim, statedata::func_nest_lev, confdata::func_nest_lim, confdata::game_dir, confdata::game_pag, statedata::generation, statedata::glob_reg_len, confdata::global_error_obj, statedata::global_regs, GOD, confdata::guest_char, confdata::guest_file, confdata::guest_nuker, confdata::guest_prefix, confdata::guests_channel, confdata::guests_channel_alias, confdata::have_comsys, confdata::have_mailer, confdata::have_zones, confdata::hook_obj, confdata::idle_interval, confdata::idle_timeout, confdata::idle_wiz_dark, statedata::in_loop, confdata::indb, confdata::indent_desc, confdata::init_size, statedata::inpipe, ISOUTOFMEMORY, statedata::iter_alist, confdata::killguarantee, confdata::killmax, confdata::killmin, alist::len, confdata::linkcost, statedata::lock_nest_lev, confdata::lock_nest_lim, LOG_ALWAYS, LOG_BUGS, LOG_CONFIGMODS, LOG_DBSAVES, confdata::log_info, LOG_LOGIN, LOG_NET, confdata::log_options, LOG_PCREATES, LOG_PROBLEMS, LOG_SECURITY, LOG_SHOUTS, LOG_STARTUP, LOG_SUSPECTCMDS, LOG_TIMEUSE, LOG_WIZARD, statedata::logging, LOGOPT_LOC, LOGOPT_TIMESTAMP, confdata::machinecost, confdata::mail_db, statedata::mail_db_size, statedata::mail_db_top, confdata::mail_expiration, confdata::mail_per_hour, confdata::many_coins, statedata::markbits, confdata::markdata, confdata::master_room, confdata::match_mine, confdata::match_mine_pl, confdata::max_cache_size, confdata::max_cmdsecs, MAX_GLOBAL_REGS, confdata::max_players, MEMALLOC, statedata::mHelpDesc, confdata::min_guests, statedata::min_size, statedata::mod_al_id, statedata::mod_alist, statedata::mod_alist_len, statedata::mod_size, confdata::motd_file, confdata::motd_msg, statedata::mstat_curr, statedata::mstat_idrss, statedata::mstat_isrss, statedata::mstat_ixrss, statedata::mstat_secs, confdata::mud_name, mudconf, mudstate, tag_int_array::n, confdata::name_spaces, alist::next, statedata::nHearNest, statedata::nHelpDesc, statedata::nObjEvalNest, NOTHING, confdata::nStackLimit, statedata::nStackNest, statedata::ntfy_nest_lev, confdata::ntfy_nest_lim, confdata::number_guests, statedata::olist, confdata::one_coin, confdata::opencost, confdata::outdb, confdata::output_limit, confdata::pagecost, statedata::panicking, confdata::paranoid_alloc, confdata::parent_nest_lim, confdata::paycheck, confdata::payfind, confdata::paylimit, confdata::paystart, confdata::pcreate_per_hour, confdata::pemit_any, confdata::pemit_players, tag_int_array::pi, statedata::pipe_nest_lev, confdata::player_flags, confdata::player_listen, confdata::player_quota, confdata::ports, confdata::postdump_msg, statedata::pout, statedata::poutbufc, statedata::poutnew, statedata::poutobj, confdata::pub_flags, confdata::public_channel, confdata::public_channel_alias, confdata::pueblo_msg, confdata::queue_chunk, confdata::queuemax, confdata::quiet_look, confdata::quiet_whisper, confdata::quit_file, confdata::quotas, confdata::read_rem_desc, confdata::read_rem_name, confdata::regf_file, confdata::reset_players, confdata::restrict_home, confdata::retry_limit, ROBOT, confdata::robot_flags, confdata::robot_speak, confdata::robotcost, confdata::room_flags, confdata::room_quota, confdata::rpt_cmdsecs, confdata::run_startup, SA_DFLT, confdata::sacadjust, confdata::sacfactor, confdata::safe_unowned, confdata::safe_wipe, confdata::safer_passwords, confdata::searchcost, confdata::see_own_dark, CLinearTimeDelta::SetSeconds(), statedata::shutdown_flag, confdata::sig_action, confdata::site_chars, confdata::site_file, confdata::space_compress, confdata::stack_limit, confdata::start_home, confdata::start_quota, confdata::start_room, confdata::status_file, StringClone(), statedata::suspect_list, confdata::sweep_dark, confdata::switch_df_all, confdata::terse_contents, confdata::terse_exits, confdata::terse_look, confdata::terse_movemsg, confdata::thing_flags, confdata::thing_quota, confdata::timeslice, confdata::toad_recipient, confdata::trace_limit, confdata::trace_topdown, statedata::train_nest_lev, confdata::uncompress, confdata::use_hostname, confdata::use_http, confdata::vattr_flags, confdata::vattr_per_hour, confdata::waitcost, statedata::wild_invk_ctr, confdata::wild_invk_lim, confdata::wizmotd_file, confdata::wizmotd_msg, flagset::word, statedata::write_protect, confdata::zone_nest_lim, and statedata::zone_nest_num.

Referenced by dbconvert(), and main().

{
    int i;

    mudconf.indb = StringClone("netmux.db");
    mudconf.outdb = StringClone("");
    mudconf.crashdb = StringClone("");
    mudconf.game_dir = StringClone("");
    mudconf.game_pag = StringClone("");
    mudconf.mail_db   = StringClone("mail.db");
    mudconf.comsys_db = StringClone("comsys.db");

    mudconf.compress_db = false;
    mudconf.compress = StringClone("gzip");
    mudconf.uncompress = StringClone("gzip -d");
    mudconf.status_file = StringClone("shutdown.status");
    mudconf.max_cache_size = 1*1024*1024;

    mudconf.ports.n = 1;
    mudconf.ports.pi = (int *)MEMALLOC(sizeof(int));
    ISOUTOFMEMORY(mudconf.ports.pi);
    mudconf.ports.pi[0] = 2860;

    mudconf.init_size = 1000;
    mudconf.guest_char = -1;
    mudconf.guest_nuker = GOD;
    mudconf.number_guests = 30;
    mudconf.min_guests = 1;
    strcpy(mudconf.guest_prefix, "Guest");
    mudconf.guest_file     = StringClone("text/guest.txt");
    mudconf.conn_file      = StringClone("text/connect.txt");
    mudconf.creg_file      = StringClone("text/register.txt");
    mudconf.regf_file      = StringClone("text/create_reg.txt");
    mudconf.motd_file      = StringClone("text/motd.txt");
    mudconf.wizmotd_file   = StringClone("text/wizmotd.txt");
    mudconf.quit_file      = StringClone("text/quit.txt");
    mudconf.down_file      = StringClone("text/down.txt");
    mudconf.full_file      = StringClone("text/full.txt");
    mudconf.site_file      = StringClone("text/badsite.txt");
    mudconf.crea_file      = StringClone("text/newuser.txt");
    mudconf.motd_msg[0] = '\0';
    mudconf.wizmotd_msg[0] = '\0';
    mudconf.downmotd_msg[0] = '\0';
    mudconf.fullmotd_msg[0] = '\0';
    mudconf.dump_msg[0] = '\0';
    mudconf.postdump_msg[0] = '\0';
    mudconf.fixed_home_msg[0] = '\0';
    mudconf.fixed_tel_msg[0] = '\0';
    strcpy(mudconf.public_channel, "Public");
    strcpy(mudconf.public_channel_alias, "pub");
    strcpy(mudconf.guests_channel, "Guests");
    strcpy(mudconf.guests_channel_alias, "g");
    strcpy(mudconf.pueblo_msg, "</xch_mudtext><img xch_mode=html>");
    mudconf.art_rules = NULL;
    mudconf.indent_desc = false;
    mudconf.name_spaces = true;
#ifndef WIN32
    mudconf.fork_dump = true;
    mudstate.dumping  = false;
    mudstate.dumper   = 0;
    mudstate.dumped   = 0;
    mudstate.write_protect = false;
#endif
    mudconf.restrict_home = false;
    mudconf.have_comsys = true;
    mudconf.have_mailer = true;
    mudconf.have_zones = true;
    mudconf.paranoid_alloc = false;
    mudconf.sig_action = SA_DFLT;
    mudconf.max_players = -1;
    mudconf.dump_interval = 3600;
    mudconf.check_interval = 600;
    mudconf.events_daily_hour = 7;
    mudconf.dump_offset = 0;
    mudconf.check_offset = 300;
    mudconf.idle_timeout = 3600;
    mudconf.conn_timeout = 120;
    mudconf.idle_interval = 60;
    mudconf.retry_limit = 3;
    mudconf.output_limit = 16384;
    mudconf.paycheck = 0;
    mudconf.paystart = 0;
    mudconf.paylimit = 10000;
#ifdef REALITY_LVLS
    mudconf.no_levels = 0;
    mudconf.def_room_rx = 1;
    mudconf.def_room_tx = ~(RLEVEL)0;
    mudconf.def_player_rx = 1;
    mudconf.def_player_tx = 1;
    mudconf.def_exit_rx = 1;
    mudconf.def_exit_tx = 1;
    mudconf.def_thing_rx = 1;
    mudconf.def_thing_tx = 1;
#endif /* REALITY_LVLS */
    mudconf.start_quota = 20;
    mudconf.site_chars = 25;
    mudconf.payfind = 0;
    mudconf.digcost = 10;
    mudconf.linkcost = 1;
    mudconf.opencost = 1;
    mudconf.createmin = 10;
    mudconf.createmax = 505;
    mudconf.killmin = 10;
    mudconf.killmax = 100;
    mudconf.killguarantee = 100;
    mudconf.robotcost = 1000;
    mudconf.pagecost = 10;
    mudconf.searchcost = 100;
    mudconf.waitcost = 10;
    mudconf.machinecost = 64;
    mudconf.exit_quota = 1;
    mudconf.player_quota = 1;
    mudconf.room_quota = 1;
    mudconf.thing_quota = 1;
    mudconf.mail_expiration = 14;
    mudconf.queuemax = 100;
    mudconf.queue_chunk = 10;
    mudconf.active_q_chunk  = 10;
    mudconf.sacfactor       = 5;
    mudconf.sacadjust       = -1;
    mudconf.trace_limit     = 200;

    mudconf.autozone        = true;
    mudconf.use_hostname    = true;
    mudconf.clone_copy_cost = false;
    mudconf.dark_sleepers   = true;
    mudconf.ex_flags        = true;
    mudconf.exam_public     = true;
    mudconf.fascist_tport   = false;
    mudconf.idle_wiz_dark   = false;
    mudconf.match_mine      = true;
    mudconf.match_mine_pl   = true;
    mudconf.pemit_players   = false;
    mudconf.pemit_any       = false;
    mudconf.player_listen   = false;
    mudconf.pub_flags       = true;
    mudconf.quiet_look      = true;
    mudconf.quiet_whisper   = true;
    mudconf.quotas          = false;
    mudconf.read_rem_desc   = false;
    mudconf.read_rem_name   = false;
    mudconf.reset_players   = false;
    mudconf.robot_speak     = true;
    mudconf.safe_unowned    = false;
    mudconf.safer_passwords = false;
    mudconf.see_own_dark    = true;
    mudconf.sweep_dark      = false;
    mudconf.switch_df_all   = true;
    mudconf.terse_contents  = true;
    mudconf.terse_exits     = true;
    mudconf.terse_look      = true;
    mudconf.terse_movemsg   = true;
    mudconf.trace_topdown   = true;
    mudconf.use_http        = false;

    // -- ??? Running SC on a non-SC DB may cause problems.
    //
    mudconf.space_compress = true;
    mudconf.allow_guest_from_registered_site = true;
    mudconf.start_room = 0;
    mudconf.start_home = NOTHING;
    mudconf.default_home = NOTHING;
    mudconf.master_room = NOTHING;

    for (i = FLAG_WORD1; i <= FLAG_WORD3; i++)
    {
        mudconf.player_flags.word[i] = 0;
        mudconf.room_flags.word[i] = 0;
        mudconf.exit_flags.word[i] = 0;
        mudconf.thing_flags.word[i] = 0;
        mudconf.robot_flags.word[i] = 0;
    }
    mudconf.robot_flags.word[FLAG_WORD1] |= ROBOT;

    mudconf.vattr_flags = AF_ODARK;
    strcpy(mudconf.mud_name, "MUX");
    strcpy(mudconf.one_coin, "penny");
    strcpy(mudconf.many_coins, "pennies");
    mudconf.timeslice.SetSeconds(1);
    mudconf.cmd_quota_max = 100;
    mudconf.cmd_quota_incr = 1;
    mudconf.rpt_cmdsecs.SetSeconds(120);
    mudconf.max_cmdsecs.SetSeconds(60);
    mudconf.cache_tick_period.SetSeconds(30);
    mudconf.control_flags = 0xffffffff; // Everything for now...
    mudconf.log_options = LOG_ALWAYS | LOG_BUGS | LOG_SECURITY |
        LOG_NET | LOG_LOGIN | LOG_DBSAVES | LOG_CONFIGMODS |
        LOG_SHOUTS | LOG_STARTUP | LOG_WIZARD | LOG_SUSPECTCMDS |
        LOG_PROBLEMS | LOG_PCREATES | LOG_TIMEUSE;
    mudconf.log_info = LOGOPT_TIMESTAMP | LOGOPT_LOC;
    mudconf.markdata[0] = 0x01;
    mudconf.markdata[1] = 0x02;
    mudconf.markdata[2] = 0x04;
    mudconf.markdata[3] = 0x08;
    mudconf.markdata[4] = 0x10;
    mudconf.markdata[5] = 0x20;
    mudconf.markdata[6] = 0x40;
    mudconf.markdata[7] = 0x80;
    mudconf.func_nest_lim = 50;
    mudconf.func_invk_lim = 2500;
    mudconf.wild_invk_lim = 100000;
    mudconf.ntfy_nest_lim = 20;
    mudconf.lock_nest_lim = 20;
    mudconf.parent_nest_lim = 10;
    mudconf.zone_nest_lim = 20;
    mudconf.stack_limit = 50;
    mudconf.cache_names = true;
    mudconf.toad_recipient = -1;
    mudconf.eval_comtitle = true;
    mudconf.run_startup = true;
    mudconf.safe_wipe = false;
    mudconf.destroy_going_now = false;
    mudconf.nStackLimit = 10000;
    mudconf.hook_obj = NOTHING;
    mudconf.global_error_obj = NOTHING;
    mudconf.cache_pages = 40;
    mudconf.mail_per_hour = 50;
    mudconf.vattr_per_hour = 5000;
    mudconf.pcreate_per_hour = 100;

    mudstate.events_flag = 0;
    mudstate.bReadingConfiguration = false;
    mudstate.bCanRestart = false;
    mudstate.panicking = false;
    mudstate.logging = 0;
    mudstate.epoch = 0;
    mudstate.generation = 0;
    mudstate.curr_executor = NOTHING;
    mudstate.curr_enactor = NOTHING;
    mudstate.shutdown_flag  = false;
    mudstate.attr_next = A_USER_START;
    mudstate.debug_cmd = "< init >";
    mudstate.curr_cmd  = "< none >";
    strcpy(mudstate.doing_hdr, "Doing");
    mudstate.access_list = NULL;
    mudstate.suspect_list = NULL;
    mudstate.badname_head = NULL;
    mudstate.mstat_ixrss[0] = 0;
    mudstate.mstat_ixrss[1] = 0;
    mudstate.mstat_idrss[0] = 0;
    mudstate.mstat_idrss[1] = 0;
    mudstate.mstat_isrss[0] = 0;
    mudstate.mstat_isrss[1] = 0;
    mudstate.mstat_secs[0] = 0;
    mudstate.mstat_secs[1] = 0;
    mudstate.mstat_curr = 0;
    mudstate.iter_alist.data = NULL;
    mudstate.iter_alist.len = 0;
    mudstate.iter_alist.next = NULL;
    mudstate.mod_alist = NULL;
    mudstate.mod_alist_len = 0;
    mudstate.mod_size = 0;
    mudstate.mod_al_id = NOTHING;
    mudstate.olist = NULL;
    mudstate.min_size = 0;
    mudstate.db_top = 0;
    mudstate.db_size = 0;
    mudstate.mail_db_top = 0;
    mudstate.mail_db_size = 0;
    mudstate.freelist = NOTHING;
    mudstate.markbits = NULL;
    mudstate.func_nest_lev = 0;
    mudstate.func_invk_ctr = 0;
    mudstate.wild_invk_ctr = 0;
    mudstate.ntfy_nest_lev = 0;
    mudstate.train_nest_lev = 0;
    mudstate.lock_nest_lev = 0;
    mudstate.zone_nest_num = 0;
    mudstate.pipe_nest_lev = 0;
    mudstate.inpipe = false;
    mudstate.pout = NULL;
    mudstate.poutnew = NULL;
    mudstate.poutbufc = NULL;
    mudstate.poutobj = NOTHING;
    for (i = 0; i < MAX_GLOBAL_REGS; i++)
    {
        mudstate.global_regs[i] = NULL;
        mudstate.glob_reg_len[i] = 0;
    }
    mudstate.nObjEvalNest = 0;
    mudstate.in_loop = 0;
    mudstate.bStackLimitReached = false;
    mudstate.nStackNest = 0;
    mudstate.nHearNest  = 0;
    mudstate.aHelpDesc = NULL;
    mudstate.mHelpDesc = 0;
    mudstate.nHelpDesc = 0;
}

void cf_list	(	dbref	,
		char *	,
		char **
	)

Definition at line 2243 of file conf.cpp.

References check_access(), conftable, ItemToList_AddString(), ItemToList_Init(), confparm::pname, and confparm::rperms.

Referenced by FUNCTION().

{
    CONF *tp;
    ITL itl;
    ItemToList_Init(&itl, buff, bufc);

    for (tp = conftable; tp->pname; tp++)
    {
        if (check_access(player, tp->rperms))
        {
            if (!ItemToList_AddString(&itl, tp->pname))
            {
                break;
            }
        }
    }
    ItemToList_Final(&itl);
    return;
}

void cf_log_notfound	(	dbref	,
		char *	,
		const char *	,
		char *
	)

Definition at line 331 of file conf.cpp.

References statedata::bReadingConfiguration, ENDLOG, Log, LOG_STARTUP, mudstate, notify, STARTLOG, CLogFile::tinyprintf(), and tprintf().

Referenced by CF_HAND().

{
    if (mudstate.bReadingConfiguration)
    {
        STARTLOG(LOG_STARTUP, "CNF", "NFND");
        Log.tinyprintf("%s: %s %s not found", cmd, thingname, thing);
        ENDLOG;
    }
    else
    {
        notify(player, tprintf("%s %s not found", thingname, thing));
    }
}

void DCL_CDECL cf_log_syntax	(	dbref	player,
		char *	cmd,
		const char *	fmt,
			...
	)

Definition at line 348 of file conf.cpp.

References alloc_lbuf, statedata::bReadingConfiguration, ENDLOG, free_lbuf, LBUF_SIZE, LOG_STARTUP, log_text(), mudstate, mux_vsnprintf(), notify, and STARTLOG.

Referenced by add_helpfile(), and CF_HAND().

{
    va_list ap;
    va_start(ap, fmt);

    char *buf = alloc_lbuf("cf_log_syntax");
    mux_vsnprintf(buf, LBUF_SIZE, fmt, ap);
    if (mudstate.bReadingConfiguration)
    {
        STARTLOG(LOG_STARTUP, "CNF", "SYNTX")
        log_text(cmd);
        log_text(": ");
        log_text(buf);
        ENDLOG;
    }
    else
    {
        notify(player, buf);
    }
    free_lbuf(buf);
    va_end(ap);
}

int cf_modify_bits	(	int *	,
		char *	,
		void *	,
		UINT32	,
		dbref	,
		char *
	)

Referenced by CF_HAND().

int cf_ntab_access	(	int *	,
		char *	,
		void *	,
		UINT32	,
		dbref	,
		char *
	)

Referenced by CF_HAND().

int cf_read

(

void

)

Definition at line 2118 of file conf.cpp.

References statedata::bReadingConfiguration, confdata::config_file, DefaultSuffixes, confdata::indb, ISOUTOFMEMORY, MEMALLOC, MEMFREE, mudconf, mudstate, pFilename, and pSuffix.

Referenced by main().

{
    int retval;

    mudstate.bReadingConfiguration = true;
    retval = cf_include(NULL, mudconf.config_file, (void *)0, 0, 0, "init");
    mudstate.bReadingConfiguration = false;

    // Fill in missing DB file names.
    //
    unsigned int nInDB = strlen(mudconf.indb);
    for (int i = 0; DefaultSuffixes[i].pFilename; i++)
    {
        char **p = DefaultSuffixes[i].pFilename;
        if (**p == '\0')
        {
            // The filename is an empty string so we should construct
            // a default filename.
            //
            char *pSuffix = DefaultSuffixes[i].pSuffix;
            int nSuffix = strlen(pSuffix);
            char *buff = (char *)MEMALLOC(nInDB + nSuffix + 1);
            ISOUTOFMEMORY(buff);
            memcpy(buff, mudconf.indb, nInDB);
            memcpy(buff + nInDB, pSuffix, nSuffix+1);
            MEMFREE(*p);
            *p = buff;
        }
    }
    return retval;
}

int cf_set	(	char *	,
		char *	,
		dbref
	)

Definition at line 1983 of file conf.cpp.

References alloc_lbuf, statedata::bReadingConfiguration, check_access(), conftable, confparm::flags, mudstate, NOPERM_MESSAGE, notify, and confparm::pname.

Referenced by CF_HAND(), and do_admin().

{
    CONF *tp;
    int i;
    char *buff = 0;

    // Search the config parameter table for the command. If we find
    // it, call the handler to parse the argument.
    //
    for (tp = conftable; tp->pname; tp++)
    {
        if (!strcmp(tp->pname, cp))
        {
            if (  !mudstate.bReadingConfiguration
               && !check_access(player, tp->flags))
            {
                notify(player, NOPERM_MESSAGE);
                return -1;
            }
            if (!mudstate.bReadingConfiguration)
            {
                buff = alloc_lbuf("cf_set");
                strcpy(buff, ap);
            }
            i = tp->interpreter(tp->loc, ap, tp->pExtra, tp->nExtra, player, cp);
            if (!mudstate.bReadingConfiguration)
            {
                STARTLOG(LOG_CONFIGMODS, "CFG", "UPDAT");
                log_name(player);
                log_text(" entered config directive: ");
                log_text(cp);
                log_text(" with args '");
                log_text(buff);
                log_text("'.  Status: ");
                switch (i)
                {
                case 0:
                    log_text("Success.");
                    break;

                case 1:
                    log_text("Partial success.");
                    break;

                case -1:
                    log_text("Failure.");
                    break;

                default:
                    log_text("Strange.");
                }
                ENDLOG;
                free_lbuf(buff);
            }
            return i;
        }
    }

    // Config directive not found.  Complain about it.
    //
    cf_log_notfound(player, "Set", "Config directive", cp);
    return -1;
}

void ChangePassword	(	dbref	player,
		const char *	szPassword
	)

Definition at line 282 of file player.cpp.

References GenerateSalt(), mux_crypt(), and s_Pass().

Referenced by check_pass(), CGuests::Create(), create_player(), do_newpassword(), and do_password().

{
    int iType;
    s_Pass(player, mux_crypt(szPassword, GenerateSalt(), &iType));
}

bool check_access	(	dbref	player,
		int	mask
	)

Definition at line 935 of file command.cpp.

References Announce, statedata::bReadingConfiguration, Builder, CA_ADMIN, CA_ANNOUNCE, CA_BUILDER, CA_CANTBE_MASK, CA_DISABLED, CA_GOD, CA_HEAD, CA_IMMORTAL, CA_MUSTBE_MASK, CA_NO_GUEST, CA_NO_HAVEN, CA_NO_ROBOT, CA_NO_SLAVE, CA_NO_SUSPECT, CA_NO_UNINS, CA_ROBOT, CA_STAFF, CA_STATIC, CA_UNINS, CA_WIZARD, God, Guest, Head, Immortal, mudstate, Player_haven, Robot, Slave, Staff, Suspect, Uninspected, Wizard, and WizRoy.

Referenced by cf_display(), cf_list(), cf_set(), check_command(), decompile_flags(), display_nametab(), do_decomp(), find_nametab_ent(), interp_nametab(), list_cf_access(), list_cmdaccess(), list_cmdswitches(), list_cmdtable(), list_functable(), listset_nametab(), mux_exec(), process_cmdent(), process_command(), and search_nametab().

{
    if (mask & (CA_DISABLED|CA_STATIC))
    {
        return false;
    }
    if (  God(player)
       || mudstate.bReadingConfiguration)
    {
        return true;
    }

    if (mask & CA_MUSTBE_MASK)
    {
        // Since CA_GOD by itself is a frequent case, for the sake of
        // performance, we test CA_GOD specifically. If CA_GOD were ever
        // combined with anything, it would be passed through to the general
        // case.
        //
        if ((mask & CA_MUSTBE_MASK) == CA_GOD)
        {
            return false;
        }

        // Since God(player) is always false here, CA_GOD is still handled by
        // the following code even though it doesn't appear in any of the
        // cases explicitly.  CA_WIZARD by itself is also a common case, but
        // since we have have a bit (mask & CA_MUSTBE_MASK), and since that
        // bit is not a lone CA_GOD bit (handled above), and since CA_WIZARD
        // it tested first below, it doesn't make sense to test CA_WIZARD
        // as a special case.
        //
        if (!(  ((mask & CA_WIZARD)   && Wizard(player))
             || ((mask & CA_ADMIN)    && WizRoy(player))
             || ((mask & CA_BUILDER)  && Builder(player))
             || ((mask & CA_STAFF)    && Staff(player))
             || ((mask & CA_HEAD)     && Head(player))
             || ((mask & CA_ANNOUNCE) && Announce(player))
             || ((mask & CA_IMMORTAL) && Immortal(player))
             || ((mask & CA_UNINS)    && Uninspected(player))
             || ((mask & CA_ROBOT)    && Robot(player))))
        {
            return false;
        }
    }

    // Check for forbidden flags.
    //
    if (  (mask & CA_CANTBE_MASK)
       && !Wizard(player))
    {
        if (  ((mask & CA_NO_HAVEN)   && Player_haven(player))
           || ((mask & CA_NO_ROBOT)   && Robot(player))
           || ((mask & CA_NO_SLAVE)   && Slave(player))
           || ((mask & CA_NO_SUSPECT) && Suspect(player))
           || ((mask & CA_NO_GUEST)   && Guest(player))
           || ((mask & CA_NO_UNINS)   && Uninspected(player)))
        {
            return false;
        }
    }
    return true;
}

void check_events

(

void

)

Definition at line 1364 of file netcommon.cpp.

References A_DAILY, did_it(), DO_WHOLE_DB, ET_DAILY, confdata::events_daily_hour, statedata::events_flag, Flags2, CLinearTimeAbsolute::GetLocal(), Going, HAS_DAILY, FIELDEDTIME::iHour, ITER_PARENTS, mudconf, mudstate, Owner, and CLinearTimeAbsolute::ReturnFields().

Referenced by dispatch_CheckEvents().

{
    dbref thing, parent;
    int lev;

    CLinearTimeAbsolute ltaNow;
    ltaNow.GetLocal();

    FIELDEDTIME ft;
    if (!ltaNow.ReturnFields(&ft))
    {
        return;
    }

    // Resetting every midnight.
    //
    static int iLastHourChecked = 25;
    if (  iLastHourChecked == 23
       && ft.iHour < iLastHourChecked)
    {
        mudstate.events_flag &= ~ET_DAILY;
    }
    iLastHourChecked = ft.iHour;

    if (  ft.iHour == mudconf.events_daily_hour
       && !(mudstate.events_flag & ET_DAILY))
    {
        mudstate.events_flag |= ET_DAILY;
        DO_WHOLE_DB(thing)
        {
            if (Going(thing))
            {
                continue;
            }

            ITER_PARENTS(thing, parent, lev)
            {
                if (Flags2(thing) & HAS_DAILY)
                {
                    did_it(Owner(thing), thing, 0, NULL, 0, NULL, A_DAILY, (char **)NULL, 0);
                    break;
                }
            }
        }
    }

}

void check_mail	(	dbref	player,
		int	folder,
		bool	silent
	)

Definition at line 3070 of file mail.cpp.

References count_mail(), get_folder_name(), notify, tprintf(), and urgent_mail().

Referenced by announce_connect(), and do_mail_change_folder().

{
    // Check for new @mail
    //
    int rc;     // Read messages.
    int uc;     // Unread messages.
    int cc;     // Cleared messages.
    int gc;     // urgent messages.

    // Just count messages
    //
    count_mail(player, folder, &rc, &uc, &cc);
    urgent_mail(player, folder, &gc);
#ifdef MAIL_ALL_FOLDERS
    notify(player,
           tprintf("MAIL: %d messages in folder %d [%s] (%d unread, %d cleared).\r\n",
               rc + uc, folder, get_folder_name(player, folder), uc, cc));
#else // MAIL_ALL_FOLDERS
    if (rc + uc > 0)
    {
        notify(player, tprintf("MAIL: %d messages in folder %d [%s] (%d unread, %d cleared).", rc + uc, folder, get_folder_name(player, folder), uc, cc));
    }
    else if (!silent)
    {
        notify(player, tprintf("\r\nMAIL: You have no mail.\r\n"));
    }
    if (gc > 0)
    {
        notify(player, tprintf("URGENT MAIL: You have %d urgent messages in folder %d [%s].", gc, folder, get_folder_name(player, folder)));
    }
#endif // MAIL_ALL_FOLDERS
}

void check_mail_expiration

(

void

)

Definition at line 3024 of file mail.cpp.

References DO_WHOLE_DB, MailList::FirstItem(), CLinearTimeAbsolute::GetLocal(), MailList::IsEnd(), M_Safe, confdata::mail_expiration, mudconf, MailList::NextItem(), MailList::RemoveItem(), CLinearTimeDelta::ReturnSeconds(), and CLinearTimeAbsolute::SetString().

Referenced by fork_and_dump().

{
    // Negative values for expirations never expire.
    //
    if (0 > mudconf.mail_expiration)
    {
        return;
    }

    dbref thing;
    int expire_secs = mudconf.mail_expiration * 86400;

    CLinearTimeAbsolute ltaNow;
    ltaNow.GetLocal();

    CLinearTimeAbsolute ltaMail;
    DO_WHOLE_DB(thing)
    {
        MailList ml(thing);
        struct mail *mp;
        for (mp = ml.FirstItem(); !ml.IsEnd(); mp = ml.NextItem())
        {
            if (M_Safe(mp))
            {
                continue;
            }

            const char *pMailTimeStr = mp->time;
            if (!ltaMail.SetString(pMailTimeStr))
            {
                continue;
            }

            CLinearTimeDelta ltd(ltaMail, ltaNow);
            if (ltd.ReturnSeconds() <= expire_secs)
            {
                continue;
            }

            // Delete this one.
            //
            ml.RemoveItem();
        }
    }
}

bool check_zone_handler	(	dbref	player,
		dbref	thing,
		bool	bPlayerCheck
	)

Definition at line 3112 of file db.cpp.

References A_LENTER, atr_get_raw(), check_zone_handler(), could_doit(), Good_obj, confdata::have_zones, isPlayer, mudconf, mudstate, Zone, confdata::zone_nest_lim, and statedata::zone_nest_num.

Referenced by check_zone_handler(), and do_chzone().

{
    mudstate.zone_nest_num++;

    if (  !mudconf.have_zones
       || !Good_obj(Zone(thing))
       || mudstate.zone_nest_num >= mudconf.zone_nest_lim
       || isPlayer(thing) != bPlayerCheck)
    {
        mudstate.zone_nest_num = 0;
        return false;
    }

    // If the zone doesn't have an enterlock, DON'T allow control.
    //
    if (  atr_get_raw(Zone(thing), A_LENTER)
       && could_doit(player, Zone(thing), A_LENTER))
    {
        mudstate.zone_nest_num = 0;
        return true;
    }
    else if (thing == Zone(thing))
    {
        return false;
    }
    return check_zone_handler(player, Zone(thing), false);
}

int chown_all	(	dbref	from_player,
		dbref	to_player,
		dbref	acting_player,
		int	key
	)

Definition at line 244 of file walkdb.cpp.

References add_quota(), CHOWN_NOZONE, CHOWN_OK, DO_WHOLE_DB, confdata::exit_quota, FLAG_WORD1, Flags, God, HALT, INHERIT, isPlayer, mudconf, NOTHING, notify, Owner, confdata::player_quota, confdata::room_quota, s_Flags, s_Owner, s_Zone, confdata::thing_quota, TYPE_EXIT, TYPE_PLAYER, TYPE_ROOM, TYPE_THING, and Typeof.

Referenced by destroy_player(), do_chownall(), and do_toad().

{
    if (!isPlayer(from_player))
    {
        from_player = Owner(from_player);
    }
    if (!isPlayer(to_player))
    {
        to_player = Owner(to_player);
    }
    int count     = 0;
    if (  God(from_player)
       && !God(acting_player))
    {
        notify(acting_player, "Permission denied.");
    }
    else
    {
        int i;
        int quota_out = 0;
        int quota_in  = 0;
        DO_WHOLE_DB(i)
        {
            if (  Owner(i) == from_player
               && Owner(i) != i)
            {
                switch (Typeof(i))
                {
                case TYPE_PLAYER:

                    s_Owner(i, i);
                    quota_out += mudconf.player_quota;
                    break;

                case TYPE_THING:

                    s_Owner(i, to_player);
                    quota_out += mudconf.thing_quota;
                    quota_in -= mudconf.thing_quota;
                    break;

                case TYPE_ROOM:

                    s_Owner(i, to_player);
                    quota_out += mudconf.room_quota;
                    quota_in -= mudconf.room_quota;
                    break;

                case TYPE_EXIT:

                    s_Owner(i, to_player);
                    quota_out += mudconf.exit_quota;
                    quota_in -= mudconf.exit_quota;
                    break;

                default:

                    s_Owner(i, to_player);
                }
                s_Flags(i, FLAG_WORD1,
                    (Flags(i) & ~(CHOWN_OK | INHERIT)) | HALT);

                if (key & CHOWN_NOZONE)
                {
                    s_Zone(i, NOTHING);
                }
                count++;
            }
        }
        add_quota(from_player, quota_out);
        add_quota(to_player, quota_in);
    }
    return count;
}

void CleanUpSlaveProcess

(

void

)

Definition at line 478 of file bsd.cpp.

References slave_pid.

Referenced by boot_slave(), do_restart(), get_slave_result(), main(), new_connection(), and sighandler().

{
    if (slave_pid > 0)
    {
        kill(slave_pid, SIGKILL);
        waitpid(slave_pid, NULL, 0);
    }
    slave_pid = 0;
}

void CleanUpSlaveSocket

(

void

)

Definition at line 465 of file bsd.cpp.

References DebugTotalSockets, INVALID_SOCKET, IS_INVALID_SOCKET, SD_BOTH, and slave_socket.

Referenced by boot_slave(), do_restart(), get_slave_result(), main(), new_connection(), and sighandler().

{
    if (!IS_INVALID_SOCKET(slave_socket))
    {
        shutdown(slave_socket, SD_BOTH);
        if (close(slave_socket) == 0)
        {
            DebugTotalSockets--;
        }
        slave_socket = INVALID_SOCKET;
    }
}

dbref clone_home	(	dbref	,
		dbref
	)

Definition at line 166 of file object.cpp.

References can_set_home(), Home, new_home(), and Owner.

Referenced by do_clone().

{
    dbref loc = Home(thing);
    if (can_set_home(Owner(player), player, loc))
    {
        return loc;
    }
    return new_home(player);
}

void close_sockets	(	bool	emergency,
		char *	message
	)

Definition at line 3336 of file bsd.cpp.

References aMainGamePorts, DebugTotalSockets, DESC_SAFEITER_ALL, descriptor_data::descriptor, INVALID_SOCKET, IS_SOCKET_ERROR, log_perror(), nMainGamePorts, queue_string(), queue_write_LEN(), R_GOING_DOWN, SD_BOTH, shutdownsock(), PortInfo::socket, SOCKET_CLOSE, and SOCKET_WRITE.

Referenced by emergency_shutdown(), and main().

{
    DESC *d, *dnext;

    DESC_SAFEITER_ALL(d, dnext)
    {
        if (emergency)
        {
            SOCKET_WRITE(d->descriptor, message, strlen(message), 0);
            if (IS_SOCKET_ERROR(shutdown(d->descriptor, SD_BOTH)))
            {
                log_perror("NET", "FAIL", NULL, "shutdown");
            }
            if (SOCKET_CLOSE(d->descriptor) == 0)
            {
                DebugTotalSockets--;
            }
        }
        else
        {
            queue_string(d, message);
            queue_write_LEN(d, "\r\n", 2);
            shutdownsock(d, R_GOING_DOWN);
        }
    }
    for (int i = 0; i < nMainGamePorts; i++)
    {
        if (SOCKET_CLOSE(aMainGamePorts[i].socket) == 0)
        {
            DebugTotalSockets--;
        }
        aMainGamePorts[i].socket = INVALID_SOCKET;
    }
}

bool Commer

(

dbref

)

Definition at line 1356 of file db.cpp.

References AF_NOPROG, alloc_lbuf, AMATCH_CMD, AMATCH_LISTEN, atr_get_str(), atr_head(), atr_next(), atr_num(), atr_pop(), atr_push(), statedata::bfCommands, statedata::bfListens, statedata::bfNoCommands, statedata::bfNoListens, CBitField::Clear(), free_lbuf, CBitField::IsSet(), mudstate, and CBitField::Set().

Referenced by check_loc_contents(), and sweep_check().

{
    if (mudstate.bfNoCommands.IsSet(thing))
    {
        // We already know that there are no commands on this thing.
        //
        return false;
    }
    else if (mudstate.bfCommands.IsSet(thing))
    {
        // We already know that there are definitely commands on this thing.
        //
        return true;
    }

    bool bFoundListens = false;

    char *as;
    atr_push();
    char *buff = alloc_lbuf("Commer");
    for (int atr = atr_head(thing, &as); atr; atr = atr_next(&as))
    {
        ATTR *ap = atr_num(atr);
        if (  !ap
           || (ap->flags & AF_NOPROG))
        {
            continue;
        }

        int   aflags;
        dbref aowner;

        atr_get_str(buff, thing, atr, &aowner, &aflags);

        if (aflags & AF_NOPROG)
        {
            continue;
        }

        if (  AMATCH_CMD != buff[0]
           && AMATCH_LISTEN != buff[0])
        {
            continue;
        }

        // Search for unescaped ':'
        //
        char *s = strchr(buff+1, ':');
        if (!s)
        {
            continue;
        }

        if (AMATCH_CMD == buff[0])
        {
            free_lbuf(buff);
            atr_pop();
            mudstate.bfCommands.Set(thing);
            if (bFoundListens)
            {
                mudstate.bfListens.Set(thing);
                mudstate.bfNoListens.Clear(thing);
            }
            return true;
        }
        else // AMATCH_LISTEN == buff[0]
        {
            bFoundListens = true;
        }
    }
    free_lbuf(buff);
    atr_pop();
    mudstate.bfNoCommands.Set(thing);
    if (bFoundListens)
    {
        mudstate.bfListens.Set(thing);
        mudstate.bfNoListens.Clear(thing);
    }
    else
    {
        mudstate.bfNoListens.Set(thing);
        mudstate.bfListens.Clear(thing);
    }
    return false;
}

bool could_doit	(	dbref	,
		dbref	,
		int
	)

Definition at line 107 of file predicates.cpp.

References atr_get, eval_boolexp_atr(), free_lbuf, HOME, isPlayer, Key, and Pass_Locks.

Referenced by atr_match1(), check_zone_handler(), do_drop(), do_enter_internal(), do_get(), do_leave(), do_link(), do_teleport_single(), do_use(), fwdlist_load(), give_money(), give_thing(), link_exit(), look_in(), mail_check(), move_exit(), move_via_teleport(), notify_check(), open_exit(), page_check(), promote_match(), sp_ok(), test_join_access(), test_receive_access(), and test_transmit_access().

{
    if (thing == HOME)
    {
        return true;
    }

    // If nonplayer tries to get key, then no.
    //
    if (  !isPlayer(player)
       && Key(thing))
    {
        return false;
    }
    if (Pass_Locks(player))
    {
        return true;
    }

    dbref aowner;
    int   aflags;
    char *key = atr_get(thing, locknum, &aowner, &aflags);
    bool doit = eval_boolexp_atr(player, thing, thing, key);
    free_lbuf(key);
    return doit;
}

void count_mail	(	dbref	player,
		int	folder,
		int *	rcount,
		int *	ucount,
		int *	ccount
	)

Definition at line 2017 of file mail.cpp.

References Cleared, MailList::FirstItem(), Folder, MailList::IsEnd(), MailList::NextItem(), and Read.

Referenced by check_mail(), and FUNCTION().

{
    int rc = 0;
    int uc = 0;
    int cc = 0;

    MailList ml(player);
    struct mail *mp;
    for (mp = ml.FirstItem(); !ml.IsEnd(); mp = ml.NextItem())
    {
        if (Folder(mp) == folder)
        {
            if (Read(mp))
            {
                rc++;
            }
            else
            {
                uc++;
            }

            if (Cleared(mp))
            {
                cc++;
            }
        }
    }
    *rcount = rc;
    *ucount = uc;
    *ccount = cc;
}

dbref create_obj	(	dbref	,
		int	,
		const char *	,
		int
	)

Definition at line 182 of file object.cpp.

References A_CREATED, A_LAST, A_MODIFIED, A_QUOTA, A_RQUOTA, add_player_name(), alloc_sbuf, atr_add_raw(), atr_free(), confdata::autozone, badname_check(), canpayfees(), object::cpu_time_used, confdata::createmax, confdata::createmin, db, db_grow(), statedata::db_top, confdata::digcost, confdata::exit_flags, confdata::exit_quota, FLAG_WORD1, free_lbuf, free_sbuf, statedata::freelist, object::fs, CLinearTimeAbsolute::GetLocal(), Good_obj, Inherits, IS_CLEAN, Link, LOG_BUGS, LOG_PROBLEMS, LOG_SIMPLE, lookup_player(), MakeCanonicalExitName(), MakeCanonicalObjectName(), mudconf, mudstate, munge_space(), mux_ltoa(), Name, NOPERM_MESSAGE, NOTHING, notify, OBJECT_ENDOWMENT, confdata::opencost, Owner, confdata::paystart, confdata::player_flags, confdata::player_quota, CLinearTimeAbsolute::ReturnDateString(), confdata::robot_flags, confdata::robotcost, confdata::room_flags, confdata::room_quota, s_Contents, s_Exits, s_Link, s_Location, s_Name(), s_Next, s_Owner, s_Parent, s_Pennies(), s_ThAttrib, s_ThMail, s_Zone, CLinearTimeDelta::Set100ns(), CLinearTimeAbsolute::Set100ns(), confdata::start_quota, confdata::thing_flags, confdata::thing_quota, tprintf(), object::tThrottleExpired, TYPE_EXIT, TYPE_PLAYER, TYPE_ROOM, TYPE_THING, Unmark, ValidatePlayerName(), flagset::word, and Zone.

Referenced by create_player(), do_clone(), do_create(), do_dig(), FUNCTION(), and open_exit().

{
    dbref obj, owner;
    int quota = 0, value = 0, nValidName;
    FLAGSET f;
    char *buff;
    const char *pValidName;
    const char *tname;
    bool okname = false, self_owned = false, require_inherit = false;

    switch (objtype)
    {
    case TYPE_ROOM:

        cost = mudconf.digcost;
        quota = mudconf.room_quota;
        f = mudconf.room_flags;
        pValidName = MakeCanonicalObjectName(name, &nValidName, &okname);
        tname = "a room";
        break;

    case TYPE_THING:

        if (cost < mudconf.createmin)
            cost = mudconf.createmin;
        if (cost > mudconf.createmax)
            cost = mudconf.createmax;
        quota = mudconf.thing_quota;
        f = mudconf.thing_flags;
        value = OBJECT_ENDOWMENT(cost);
        pValidName = MakeCanonicalObjectName(name, &nValidName, &okname);
        tname = "a thing";
        break;

    case TYPE_EXIT:

        cost = mudconf.opencost;
        quota = mudconf.exit_quota;
        f = mudconf.exit_flags;
        pValidName = MakeCanonicalExitName(name, &nValidName, &okname);
        tname = "an exit";
        break;

    case TYPE_PLAYER:

        if (cost)
        {
            cost = mudconf.robotcost;
            quota = mudconf.player_quota;
            f = mudconf.robot_flags;
            value = 0;
            tname = "a robot";
            require_inherit = true;
        }
        else
        {
            cost = 0;
            quota = 0;
            f = mudconf.player_flags;
            value = mudconf.paystart;
            quota = mudconf.start_quota;
            self_owned = true;
            tname = "a player";
        }
        buff = munge_space(name);
        pValidName = name;
        if (!badname_check(buff))
        {
            notify(player, "That name is not allowed.");
            free_lbuf(buff);
            return NOTHING;
        }
        if (*buff)
        {
            okname = ValidatePlayerName(buff);
            if (!okname)
            {
                notify(player, "That's a silly name for a player.");
                free_lbuf(buff);
                return NOTHING;
            }
        }
        if (okname)
        {
            okname = (lookup_player(NOTHING, buff, false) == NOTHING);
            if (!okname)
            {
                notify(player, tprintf("The name %s is already taken.", name));
                free_lbuf(buff);
                return NOTHING;
            }
        }
        free_lbuf(buff);
        break;

    default:
        LOG_SIMPLE(LOG_BUGS, "BUG", "OTYPE", tprintf("Bad object type in create_obj: %d.", objtype));
        return NOTHING;
    }

    if (!okname)
    {
        notify(player, tprintf("That's a silly name for %s!", tname));
        return NOTHING;
    }

    if (!self_owned)
    {
        if (!Good_obj(player))
        {
            return NOTHING;
        }
        owner = Owner(player);
        if (!Good_obj(owner))
        {
            return NOTHING;
        }
    }
    else
    {
        owner = NOTHING;
    }

    if (require_inherit)
    {
        if (!Inherits(player))
        {
            notify(player, NOPERM_MESSAGE);
            return NOTHING;
        }
    }

    // Make sure the creator can pay for the object.
    //
    if ((player != NOTHING) && !canpayfees(player, player, cost, quota))
    {
        return NOTHING;
    }

    // Get the first object from the freelist.  If the object is not clean,
    // discard the remainder of the freelist and go get a completely new object.
    //
    obj = NOTHING;
    if (mudstate.freelist != NOTHING)
    {
        obj = mudstate.freelist;
        if (IS_CLEAN(obj))
        {
            mudstate.freelist = Link(obj);
        }
        else
        {
            LOG_SIMPLE(LOG_PROBLEMS, "FRL", "DAMAG", tprintf("Freelist damaged, bad object #%d.", obj));
            obj = NOTHING;
            mudstate.freelist = NOTHING;
        }
    }
    if (obj == NOTHING)
    {
        obj = mudstate.db_top;
        db_grow(mudstate.db_top + 1);
    }
    atr_free(obj);  // just in case.

    // Set things up according to the object type.
    //
    s_Location(obj, NOTHING);
    s_Contents(obj, NOTHING);
    s_Exits(obj, NOTHING);
    s_Next(obj, NOTHING);
    s_Link(obj, NOTHING);
    s_Parent(obj, NOTHING);

    if (mudconf.autozone && player != NOTHING)
    {
        s_Zone(obj, Zone(player));
    }
    else
    {
        s_Zone(obj, NOTHING);
    }
    f.word[FLAG_WORD1] |= objtype;
    db[obj].fs = f;
    s_Owner(obj, (self_owned ? obj : owner));
    s_Pennies(obj, value);
    Unmark(obj);
    pValidName = munge_space(pValidName);
    s_Name(obj, pValidName);
    free_lbuf(pValidName);
    db[obj].cpu_time_used.Set100ns(0);

    db[obj].tThrottleExpired.Set100ns(0);
    s_ThAttrib(obj, 0);
    s_ThMail(obj, 0);

    CLinearTimeAbsolute ltaNow;
    ltaNow.GetLocal();
    buff = ltaNow.ReturnDateString(7);
    atr_add_raw(obj, A_CREATED, buff);
    atr_add_raw(obj, A_MODIFIED, buff);

    if (objtype == TYPE_PLAYER)
    {
        atr_add_raw(obj, A_LAST, buff);

        buff = alloc_sbuf("create_obj.quota");
        mux_ltoa(quota, buff);
        atr_add_raw(obj, A_QUOTA, buff);
        atr_add_raw(obj, A_RQUOTA, buff);
        add_player_name(obj, Name(obj));
        free_sbuf(buff);
        s_Zone(obj, NOTHING);
    }
    return obj;
}

dbref create_player	(	char *	name,
		char *	pass,
		dbref	executor,
		bool	isrobot,
		const char **	pmsg
	)

Definition at line 545 of file player.cpp.

References ChangePassword(), create_obj(), free_lbuf, local_data_create(), NOTHING, ok_password(), s_Home, start_home(), ThrottlePlayerCreate(), trim_spaces(), and TYPE_PLAYER.

Referenced by check_connect(), db_make_minimal(), do_pcreate(), and CGuests::MakeGuestChar().

{
    *pmsg = NULL;

    // Potentially throttle the rate of player creation.
    //
    if (ThrottlePlayerCreate())
    {
        *pmsg = "The limit of new players for this hour has been reached. Please try again later.";
        return NOTHING;
    }

    // Make sure the password is OK.  Name is checked in create_obj.
    //
    char *pbuf = trim_spaces(password);
    if (!ok_password(pbuf, pmsg))
    {
        free_lbuf(pbuf);
        return NOTHING;
    }

    // If so, go create him.
    //
    dbref player = create_obj(creator, TYPE_PLAYER, name, isrobot);
    if (player == NOTHING)
    {
        *pmsg = "Either there is already a player with that name, or that name is illegal.";
        free_lbuf(pbuf);
        return NOTHING;
    }

    // Initialize everything.
    //
    ChangePassword(player, pbuf);
    s_Home(player, start_home());
    free_lbuf(pbuf);
    local_data_create(player);
    return player;
}

char* crypt	(	const char *	inptr,
		const char *	inkey
	)

Definition at line 118 of file crypt-entry.cpp.

References __md5_crypt(), _ufc_foobar, crypt_r(), and md5_salt_prefix.

{
#ifdef _LIBC
  /* Try to find out whether we have to use MD5 encryption replacement.  */
  if (strncmp (md5_salt_prefix, salt, sizeof (md5_salt_prefix) - 1) == 0)
    return __md5_crypt (key, salt);
#endif

  return crypt_r (key, salt, &_ufc_foobar);
}

size_t decode_attr_flags	(	int	aflags,
		char *	buff
	)

Definition at line 774 of file look.cpp.

References attr_decode_table, ATTR_DECODE_ENTRY::letter, and ATTR_DECODE_ENTRY::mask.

Referenced by FUNCTION(), and view_atr().

{
    char *p = buff;
    PATTR_DECODE_ENTRY pEntry;
    for (pEntry = attr_decode_table; pEntry->mask; pEntry++)
    {
        if (aflags & pEntry->mask)
        {
            *p++ = pEntry->letter;
        }
    }
    *p = '\0';
    return p - buff;
}

dbref default_home

(

void

)

Definition at line 111 of file object.cpp.

References confdata::default_home, mudconf, NOTHING, confdata::start_home, and confdata::start_room.

Referenced by check_dead_refs(), and new_home().

{
    if (mudconf.default_home != NOTHING)
    {
        return mudconf.default_home;
    }
    if (mudconf.start_home != NOTHING)
    {
        return mudconf.start_home;
    }
    return mudconf.start_room;
}

bool delete_player_name	(	dbref	,
		const char *
	)

Definition at line 755 of file player.cpp.

References alloc_lbuf, free_lbuf, hashdeleteLEN(), hashfindLEN(), MEMFREE, mudstate, mux_strlwr(), NOTHING, statedata::player_htab, and safe_str.

Referenced by CGuests::Create(), destroy_player(), do_alias(), do_fixdb(), do_name(), and do_toad().

{
    char *temp, *tp;

    tp = temp = alloc_lbuf("delete_player_name");
    safe_str(name, temp, &tp);
    *tp = '\0';
    mux_strlwr(temp);

    dbref *p = (int *)hashfindLEN(temp, strlen(temp), &mudstate.player_htab);
    if (  !p
       || *p == NOTHING
       || (  player != NOTHING
          && *p != player))
    {
        free_lbuf(temp);
        return false;
    }
    MEMFREE(p);
    p = NULL;
    hashdeleteLEN(temp, strlen(temp), &mudstate.player_htab);
    free_lbuf(temp);
    return true;
}

void desc_reload

(

dbref

)

Definition at line 1130 of file netcommon.cpp.

References A_TIMEOUT, atr_pget, DESC_ITER_PLAYER, free_lbuf, confdata::idle_timeout, mudconf, mux_atol(), and descriptor_data::timeout.

Referenced by atr_add_raw_LEN(), and atr_clr().

{
    DESC *d;
    char *buf;
    dbref aowner;
    FLAG aflags;

    DESC_ITER_PLAYER(player, d)
    {
        buf = atr_pget(player, A_TIMEOUT, &aowner, &aflags);
        if (buf)
        {
            d->timeout = mux_atol(buf);
            if (d->timeout <= 0)
            {
                d->timeout = mudconf.idle_timeout;
            }
        }
        free_lbuf(buf);
    }
}

void destroy_obj

(

dbref

)

Definition at line 432 of file object.cpp.

References A_SEMAPHORE, add_quota(), atr_free(), statedata::bStandAlone, statedata::db_top, destroy_bad_obj(), confdata::digcost, confdata::exit_quota, FLAG_WORD1, FLAG_WORD2, FLAG_WORD3, fwdlist_clr(), giveto(), GOD, GOING, Good_obj, Good_owner, halt_que(), confdata::linkcost, local_data_free(), Location, mudconf, mudstate, Name, NFY_DRAIN, nfy_que(), NOTHING, notify, OBJECT_DEPOSIT, confdata::one_coin, confdata::opencost, Owner, Pennies(), confdata::player_quota, Quiet, confdata::quotas, ReleaseAllResources(), Robot, confdata::robotcost, confdata::room_quota, s_Contents, s_Exits, s_Flags, s_Link, s_Location, s_Name(), s_Next, s_Owner, s_Parent, s_Pennies(), s_Powers, s_Powers2, s_Zone, stack_clr(), confdata::thing_quota, tprintf(), TYPE_EXIT, TYPE_GARBAGE, TYPE_PLAYER, TYPE_ROOM, TYPE_THING, and Typeof.

Referenced by check_dead_refs(), check_exit_chains(), check_loc_exits(), destroy_exit(), destroy_player(), destroy_thing(), do_destroy(), empty_obj(), and purge_going().

{
    if (!Good_obj(obj))
    {
        if (  (obj >= 0)
           && (obj < mudstate.db_top))
        {
            destroy_bad_obj(obj);
        }
        return;
    }

    // Validate the owner.
    //
    dbref owner = Owner(obj);
    bool good_owner = Good_owner(owner);

    // Halt any pending commands (waiting or semaphore).
    //
    if (!mudstate.bStandAlone)
    {
        if (  halt_que(NOTHING, obj) > 0
           && good_owner
           && !Quiet(obj)
           && !Quiet(owner))
        {
            notify(owner, "Halted.");
        }
        nfy_que(obj, A_SEMAPHORE, NFY_DRAIN, 0);

        // Remove forwardlists and stacks.
        //
        fwdlist_clr(obj);
        stack_clr(obj);
    }

    // Compensate the owner for the object.
    //
    if (  good_owner
       && owner != obj)
    {
        int val = 0;
        int quota = 0;
        switch (Typeof(obj))
        {
        case TYPE_ROOM:
            val = mudconf.digcost;
            quota = mudconf.room_quota;
            break;

        case TYPE_THING:
            val = OBJECT_DEPOSIT(Pennies(obj));
            quota = mudconf.thing_quota;
            break;

        case TYPE_EXIT:
            if (Location(obj) == NOTHING)
            {
                val = mudconf.opencost;
            }
            else
            {
                val = mudconf.opencost + mudconf.linkcost;
            }
            quota = mudconf.exit_quota;
            break;

        case TYPE_PLAYER:
            if (Robot(obj))
            {
                val = mudconf.robotcost;
            }
            else
            {
                val = 0;
            }
            quota = mudconf.player_quota;
            break;
        }
        if (val)
        {
            giveto(owner, val);
            if (  !Quiet(owner)
               && !Quiet(obj))
            {
                notify(owner, tprintf(
                       "You get back your %d %s deposit for %s(#%d).",
                        val, mudconf.one_coin, Name(obj), obj));
            }
        }
        if (  mudconf.quotas
           && quota)
        {
            add_quota(owner, quota);
        }
    }
    if (!mudstate.bStandAlone)
    {
        ReleaseAllResources(obj);
    }
    atr_free(obj);
    s_Name(obj, NULL);
    s_Flags(obj, FLAG_WORD1, (TYPE_GARBAGE | GOING));
    s_Flags(obj, FLAG_WORD2, 0);
    s_Flags(obj, FLAG_WORD3, 0);
    s_Powers(obj, 0);
    s_Powers2(obj, 0);
    s_Location(obj, NOTHING);
    s_Contents(obj, NOTHING);
    s_Exits(obj, NOTHING);
    s_Next(obj, NOTHING);
    s_Link(obj, NOTHING);
    s_Owner(obj, GOD);
    s_Pennies(obj, 0);
    s_Parent(obj, NOTHING);
    s_Zone(obj, NOTHING);

    local_data_free(obj);
}

void destroy_player	(	dbref	agent,
		dbref	victim
	)

Definition at line 679 of file object.cpp.

References A_ALIAS, atr_pget, boot_off(), chown_all(), CHOWN_NOZONE, delete_player_name(), destroy_obj(), free_lbuf, halt_que(), move_via_generic(), Name, NOTHING, notify_quiet, and tprintf().

Referenced by CGuests::DestroyGuestChar(), do_destroy(), and purge_going().

{
    // Bye bye...
    //
    boot_off(victim, "You have been destroyed!");
    halt_que(victim, NOTHING);
    int count = chown_all(victim, player, player, CHOWN_NOZONE);

    // Remove the name from the name hash table.
    //
    delete_player_name(victim, Name(victim));
    dbref aowner;
    int aflags;
    char *buf = atr_pget(victim, A_ALIAS, &aowner, &aflags);
    delete_player_name(victim, buf);
    free_lbuf(buf);

    move_via_generic(victim, NOTHING, player, 0);
    destroy_obj(victim);
    notify_quiet(player, tprintf("(%d objects @chowned to you)", count));
}

void did_it	(	dbref	,
		dbref	,
		int	,
		const char *	,
		int	,
		const char *	,
		int	,
		char *	[],
		int
	)

Definition at line 2261 of file predicates.cpp.

References A_CHARGES, A_RUNOUT, AF_HTML, alloc_lbuf, alloc_sbuf, atr_add_raw(), atr_pget, CMuxAlarm::bAlarmed, EV_EVAL, EV_FCHECK, EV_FIGNORE, EV_TOP, free_lbuf, free_sbuf, statedata::global_regs, Good_obj, Has_location, Html, IsReal, Location, MAX_GLOBAL_REGS, mudstate, mux_atol(), mux_exec(), mux_ltoa(), MuxAlarm, Name, NOTHING, notify, notify_except2(), notify_except2_rlevel(), notify_html, PopIntegers(), PopPointers(), PushIntegers(), PushPointers(), restore_global_regs(), safe_str, save_global_regs(), tprintf(), and wait_que().

Referenced by check_events(), do_clone(), do_drop(), do_enter_internal(), do_get(), do_kill(), do_leave(), do_teleport_single(), do_trigger(), do_use(), do_verb(), give_money(), give_thing(), look_in(), look_simple(), move_exit(), move_via_exit(), move_via_generic(), move_via_teleport(), notify_check(), process_enter_loc(), process_leave_loc(), process_preload(), send_mail(), show_a_desc(), and show_desc().

{
    if (MuxAlarm.bAlarmed)
    {
        return;
    }

    char *d, *buff, *act, *charges, *bp, *str;
    dbref loc, aowner;
    int num, aflags;

    // If we need to call exec() from within this function, we first save
    // the state of the global registers, in order to avoid munging them
    // inappropriately. Do note that the restoration to their original
    // values occurs BEFORE the execution of the @a-attribute. Therefore,
    // any changing of setq() values done in the @-attribute and @o-attribute
    // will NOT be passed on. This prevents odd behaviors that result from
    // odd @verbs and so forth (the idea is to preserve the caller's control
    // of the global register values).
    //

    bool need_pres = false;
    char **preserve = NULL;
    int *preserve_len = NULL;

    // message to player.
    //
    if (what > 0)
    {
        d = atr_pget(thing, what, &aowner, &aflags);
        if (*d)
        {
            need_pres = true;
            preserve = PushPointers(MAX_GLOBAL_REGS);
            preserve_len = PushIntegers(MAX_GLOBAL_REGS);
            save_global_regs("did_it_save", preserve, preserve_len);
            buff = bp = alloc_lbuf("did_it.1");
            str = d;
            mux_exec(buff, &bp, thing, player, player,
                EV_EVAL | EV_FIGNORE | EV_FCHECK | EV_TOP, &str, args, nargs);
            *bp = '\0';
            if (  (aflags & AF_HTML)
               && Html(player))
            {
                safe_str("\r\n", buff, &bp);
                *bp = '\0';
                notify_html(player, buff);
            }
            else
            {
                notify(player, buff);
            }
            free_lbuf(buff);
        }
        else if (def)
        {
            notify(player, def);
        }
        free_lbuf(d);
    }
    if (what < 0 && def)
    {
        notify(player, def);
    }

    // message to neighbors.
    //
    if (  owhat > 0
       && Has_location(player)
       && Good_obj(loc = Location(player)))
    {
        d = atr_pget(thing, owhat, &aowner, &aflags);
        if (*d)
        {
            if (!need_pres)
            {
                need_pres = true;
                preserve = PushPointers(MAX_GLOBAL_REGS);
                preserve_len = PushIntegers(MAX_GLOBAL_REGS);
                save_global_regs("did_it_save", preserve, preserve_len);
            }
            buff = bp = alloc_lbuf("did_it.2");
            str = d;
            mux_exec(buff, &bp, thing, player, player,
                     EV_EVAL | EV_FIGNORE | EV_FCHECK | EV_TOP, &str, args, nargs);
            *bp = '\0';
            if (*buff)
            {
#ifdef REALITY_LVLS
                notify_except2_rlevel(loc, player, player, thing, tprintf("%s %s", Name(player), buff));
#else
                notify_except2(loc, player, player, thing, tprintf("%s %s", Name(player), buff));
#endif /* REALITY_LVLS */
            }
            free_lbuf(buff);
        }
        else if (odef)
        {
#ifdef REALITY_LVLS
            notify_except2_rlevel(loc, player, player, thing, tprintf("%s %s", Name(player), odef));
#else
            notify_except2(loc, player, player, thing, tprintf("%s %s", Name(player), odef));
#endif /* REALITY_LVLS */
        }
        free_lbuf(d);
    }
    if (  owhat < 0
       && odef
       && Has_location(player)
       && Good_obj(loc = Location(player)))
    {
#ifdef REALITY_LVLS
        notify_except2_rlevel(loc, player, player, thing, tprintf("%s %s", Name(player), odef));
#else
        notify_except2(loc, player, player, thing, tprintf("%s %s", Name(player), odef));
#endif /* REALITY_LVLS */
    }

    // If we preserved the state of the global registers, restore them.
    //
    if (need_pres)
    {
        restore_global_regs("did_it_restore", preserve, preserve_len);
        PopIntegers(preserve_len, MAX_GLOBAL_REGS);
        PopPointers(preserve, MAX_GLOBAL_REGS);
    }

    // do the action attribute.
    //
#ifdef REALITY_LVLS
    if (awhat > 0 && IsReal(thing, player))
#else
    if (awhat > 0)
#endif /* REALITY_LVLS */
    {
        if (*(act = atr_pget(thing, awhat, &aowner, &aflags)))
        {
            charges = atr_pget(thing, A_CHARGES, &aowner, &aflags);
            if (*charges)
            {
                num = mux_atol(charges);
                if (num > 0)
                {
                    buff = alloc_sbuf("did_it.charges");
                    mux_ltoa(num-1, buff);
                    atr_add_raw(thing, A_CHARGES, buff);
                    free_sbuf(buff);
                }
                else if (*(buff = atr_pget(thing, A_RUNOUT, &aowner, &aflags)))
                {
                    free_lbuf(act);
                    act = buff;
                }
                else
                {
                    free_lbuf(act);
                    free_lbuf(buff);
                    free_lbuf(charges);
                    return;
                }
            }
            free_lbuf(charges);
            CLinearTimeAbsolute lta;
            wait_que(thing, player, player, false, lta, NOTHING, 0, act,
                args, nargs, mudstate.global_regs);
        }
        free_lbuf(act);
    }
}

void dispatch_CacheTick	(	void *	pUnused,
		int	iUnused
	)

Definition at line 141 of file timer.cpp.

References cache_tick(), confdata::cache_tick_period, statedata::debug_cmd, CScheduler::DeferTask(), dispatch_CacheTick(), CLinearTimeAbsolute::GetUTC(), mudconf, mudstate, PRIORITY_SYSTEM, scheduler, CLinearTimeDelta::SetSeconds(), and UNUSED_PARAMETER.

Referenced by CallBack_ShowDispatches(), dispatch_CacheTick(), and init_timer().

{
    UNUSED_PARAMETER(pUnused);
    UNUSED_PARAMETER(iUnused);

    char *cmdsave = mudstate.debug_cmd;
    mudstate.debug_cmd = (char *)"< cachetick >";

    CLinearTimeDelta ltd = 0;
    if (mudconf.cache_tick_period <= ltd)
    {
        mudconf.cache_tick_period.SetSeconds(1);
    }

    cache_tick();

    // Schedule ourselves again.
    //
    CLinearTimeAbsolute ltaNextTime;
    ltaNextTime.GetUTC();
    ltaNextTime += mudconf.cache_tick_period;
    scheduler.DeferTask(ltaNextTime, PRIORITY_SYSTEM, dispatch_CacheTick, 0, 0);
    mudstate.debug_cmd = cmdsave;
}

void dispatch_CheckEvents	(	void *	pUnused,
		int	iUnused
	)

Definition at line 118 of file timer.cpp.

References CF_EVENTCHECK, check_events(), confdata::control_flags, statedata::debug_cmd, CScheduler::DeferTask(), dispatch_CheckEvents(), statedata::events_counter, CLinearTimeAbsolute::GetUTC(), mudconf, mudstate, PRIORITY_SYSTEM, scheduler, time_15m, and UNUSED_PARAMETER.

Referenced by CallBack_ShowDispatches(), dispatch_CheckEvents(), do_timewarp(), and init_timer().

{
    UNUSED_PARAMETER(pUnused);
    UNUSED_PARAMETER(iUnused);

    if (mudconf.control_flags & CF_EVENTCHECK)
    {
        char *cmdsave = mudstate.debug_cmd;
        mudstate.debug_cmd = (char *)"< eventcheck >";
        check_events();
        mudstate.debug_cmd = cmdsave;
    }

    // Schedule ourselves again.
    //
    CLinearTimeAbsolute ltaNow;
    ltaNow.GetUTC();
    CLinearTimeDelta ltd = time_15m;
    mudstate.events_counter = ltaNow + ltd;
    scheduler.DeferTask(mudstate.events_counter, PRIORITY_SYSTEM, dispatch_CheckEvents, 0, 0);
}

void dispatch_DatabaseDump	(	void *	pUnused,
		int	iUnused
	)

Definition at line 52 of file timer.cpp.

References CF_CHECKPOINT, confdata::control_flags, statedata::debug_cmd, CScheduler::DeferTask(), dispatch_DatabaseDump(), statedata::dump_counter, confdata::dump_interval, statedata::dumping, fork_and_dump(), CLinearTimeAbsolute::GetUTC(), mudconf, mudstate, PRIORITY_SYSTEM, scheduler, CLinearTimeDelta::SetSeconds(), and UNUSED_PARAMETER.

Referenced by CallBack_ShowDispatches(), dispatch_DatabaseDump(), do_timewarp(), init_timer(), and sighandler().

{
    UNUSED_PARAMETER(pUnused);
    UNUSED_PARAMETER(iUnused);

    int nNextTimeInSeconds = mudconf.dump_interval;

    if (mudconf.control_flags & CF_CHECKPOINT)
    {
        char *cmdsave = mudstate.debug_cmd;
        mudstate.debug_cmd = (char *)"< dump >";
#ifndef WIN32
        if (mudstate.dumping)
        {
            // There is a dump in progress. These usually happen very quickly.
            // We will reschedule ourselves to try again in 20 seconds.
            // Ordinarily, you would think "...a dump is a dump...", but some
            // dumps might not be the type of dump we're going to do.
            //
            nNextTimeInSeconds = 20;
        }
        else
#endif // !WIN32
        {
            fork_and_dump(0);
        }
        mudstate.debug_cmd = cmdsave;
    }

    // Schedule ourselves again.
    //
    CLinearTimeAbsolute ltaNow;
    ltaNow.GetUTC();
    CLinearTimeDelta ltd;
    ltd.SetSeconds(nNextTimeInSeconds);
    mudstate.dump_counter = ltaNow + ltd;
    scheduler.DeferTask(mudstate.dump_counter, PRIORITY_SYSTEM, dispatch_DatabaseDump, 0, 0);
}

void dispatch_FreeListReconstruction	(	void *	pUnused,
		int	iUnused
	)

Definition at line 23 of file timer.cpp.

References CF_DBCHECK, statedata::check_counter, confdata::check_interval, confdata::control_flags, statedata::debug_cmd, CScheduler::DeferTask(), dispatch_FreeListReconstruction(), do_dbck(), CLinearTimeAbsolute::GetUTC(), Guest, mudconf, mudstate, NOTHING, pcache_trim(), pool_reset(), PRIORITY_SYSTEM, scheduler, CLinearTimeDelta::SetSeconds(), and UNUSED_PARAMETER.

Referenced by CallBack_ShowDispatches(), dispatch_FreeListReconstruction(), do_timewarp(), and init_timer().

{
    UNUSED_PARAMETER(pUnused);
    UNUSED_PARAMETER(iUnused);

    if (mudconf.control_flags & CF_DBCHECK)
    {
        char *cmdsave = mudstate.debug_cmd;
        mudstate.debug_cmd = (char *)"< dbck >";
        do_dbck(NOTHING, NOTHING, NOTHING, 0);
        Guest.CleanUp();
        pcache_trim();
        pool_reset();
        mudstate.debug_cmd = cmdsave;
    }

    // Schedule ourselves again.
    //
    CLinearTimeAbsolute ltaNow;
    ltaNow.GetUTC();
    CLinearTimeDelta ltd;
    ltd.SetSeconds(mudconf.check_interval);
    mudstate.check_counter = ltaNow + ltd;
    scheduler.DeferTask(mudstate.check_counter, PRIORITY_SYSTEM,
        dispatch_FreeListReconstruction, 0, 0);
}

void dispatch_IdleCheck	(	void *	pUnused,
		int	iUnused
	)

Definition at line 93 of file timer.cpp.

References CF_IDLECHECK, check_idle(), confdata::control_flags, statedata::debug_cmd, CScheduler::DeferTask(), dispatch_IdleCheck(), CLinearTimeAbsolute::GetUTC(), statedata::idle_counter, confdata::idle_interval, mudconf, mudstate, PRIORITY_SYSTEM, scheduler, CLinearTimeDelta::SetSeconds(), and UNUSED_PARAMETER.

Referenced by CallBack_ShowDispatches(), dispatch_IdleCheck(), do_timewarp(), and init_timer().

{
    UNUSED_PARAMETER(pUnused);
    UNUSED_PARAMETER(iUnused);

    if (mudconf.control_flags & CF_IDLECHECK)
    {
        char *cmdsave = mudstate.debug_cmd;
        mudstate.debug_cmd = (char *)"< idlecheck >";
        check_idle();
        mudstate.debug_cmd = cmdsave;
    }

    // Schedule ourselves again.
    //
    CLinearTimeAbsolute ltaNow;
    ltaNow.GetUTC();
    CLinearTimeDelta ltd;
    ltd.SetSeconds(mudconf.idle_interval);
    mudstate.idle_counter = ltaNow + ltd;
    scheduler.DeferTask(mudstate.idle_counter, PRIORITY_SYSTEM, dispatch_IdleCheck, 0, 0);
}

void divest_object

(

dbref

)

Definition at line 577 of file object.cpp.

References Contents, Controls, Going, Good_obj, Has_location, Home, HOME, Key, move_via_generic(), new_home(), NOTHING, s_Home, and SAFE_DOLIST.

Referenced by do_enter_internal(), do_kill(), do_move(), empty_obj(), give_thing(), move_exit(), move_via_teleport(), process_dropped_dropto(), and send_dropto().

{
    dbref curr, temp;

    SAFE_DOLIST(curr, temp, Contents(thing))
    {
        if (  !Controls(thing, curr)
           && Has_location(curr)
           && Key(curr))
        {
            if (  !Good_obj(Home(curr))
               || Going(Home(curr)))
            {
                s_Home(curr, new_home(curr));
            }
            move_via_generic(curr, HOME, NOTHING, 0);
        }
    }
}

void do_enter_internal	(	dbref	,
		dbref	,
		bool
	)

Definition at line 898 of file move.cpp.

References A_AEFAIL, A_EFAIL, A_LENTER, A_OEFAIL, Controls, could_doit(), did_it(), divest_object(), Enter_ok, HUSH_ENTER, Location, move_via_generic(), NOPERM_MESSAGE, NOTHING, notify, and process_sticky_dropto().

Referenced by do_enter(), and process_command().

{
    int oattr, aattr;

    if (!Enter_ok(thing) && !Controls(player, thing))
    {
        oattr = quiet ? 0 : A_OEFAIL;
        aattr = quiet ? 0 : A_AEFAIL;
        did_it(player, thing, A_EFAIL, NOPERM_MESSAGE,
               oattr, NULL, aattr, (char **)NULL, 0);
    }
    else if (player == thing)
    {
        notify(player, "You can't enter yourself!");
    }
    else if (could_doit(player, thing, A_LENTER))
    {
        dbref loc = Location(player);
        oattr = quiet ? HUSH_ENTER : 0;
        move_via_generic(player, thing, NOTHING, oattr);
        divest_object(player);
        process_sticky_dropto(loc, player);
    }
    else
    {
        oattr = quiet ? 0 : A_OEFAIL;
        aattr = quiet ? 0 : A_AEFAIL;
        did_it(player, thing, A_EFAIL, "You can't enter that.",
               oattr, NULL, aattr, (char **)NULL, 0);
    }
}

void do_lock	(	dbref	executor,
		dbref	caller,
		dbref	enactor,
		int	key,
		int	nargs,
		char *	name,
		char *	keytext
	)

Definition at line 435 of file set.cpp.

References A_LOCK, AF_LOCK, AMBIGUOUS, atr_add_raw(), atr_get_info(), atr_set_flags(), bCanLockAttr(), Controls, free_boolexp(), init_match(), MAT_EXIT_PARENTS, match_everything(), match_result(), NOPERM_MESSAGE, NOTHING, notify_quiet, NOTYPE, attr::number, parse_attrib(), parse_boolexp(), Quiet, RemoveSetOfCharacters(), TRUE_BOOLEXP, unparse_boolexp_quiet(), and UNUSED_PARAMETER.

Referenced by CGuests::MakeGuestChar().

{
    UNUSED_PARAMETER(caller);
    UNUSED_PARAMETER(enactor);
    UNUSED_PARAMETER(nargs);

    dbref thing;
    ATTR *ap;

    if (  parse_attrib(executor, name, &thing, &ap)
       && ap)
    {
        dbref aowner;
        int aflags;
        if (!atr_get_info(thing, ap->number, &aowner, &aflags))
        {
            notify_quiet(executor, "Attribute not present on object.");
            return;
        }

        if (bCanLockAttr(executor, thing, ap))
        {
            aflags |= AF_LOCK;
            atr_set_flags(thing, ap->number, aflags);
            if (  !Quiet(executor)
               && !Quiet(thing))
            {
                notify_quiet(executor, "Attribute locked.");
            }
        }
        else
        {
            notify_quiet(executor, NOPERM_MESSAGE);
        }
        return;
    }
    init_match(executor, name, NOTYPE);
    match_everything(MAT_EXIT_PARENTS);
    thing = match_result();

    switch (thing)
    {
    case NOTHING:
        notify_quiet(executor, "I don't see what you want to lock!");
        return;

    case AMBIGUOUS:
        notify_quiet(executor, "I don't know which one you want to lock!");
        return;

    default:
        if (!Controls(executor, thing))
        {
            notify_quiet(executor, "You can't lock that!");
            return;
        }
    }

    char *pRestrictedKeyText = RemoveSetOfCharacters(keytext, "\r\n\t");
    struct boolexp *okey = parse_boolexp(executor, pRestrictedKeyText, false);
    if (okey == TRUE_BOOLEXP)
    {
        notify_quiet(executor, "I don't understand that key.");
    }
    else
    {
        // Everything ok, do it.
        //
        if (!key)
        {
            key = A_LOCK;
        }
        atr_add_raw(thing, key, unparse_boolexp_quiet(executor, okey));
        if (  !Quiet(executor)
           && !Quiet(thing))
        {
            notify_quiet(executor, "Locked.");
        }
    }
    free_boolexp(okey);
}

void do_mail_clear	(	dbref	player,
		char *	msglist
	)

Definition at line 1095 of file mail.cpp.

References do_mail_flags(), and M_CLEARED.

Referenced by do_mail(), do_mail_debug(), do_mail_stub(), and ReleaseAllResources().

{
    do_mail_flags(player, msglist, M_CLEARED, false);
}

void do_mail_purge

(

dbref

player

)

Definition at line 1638 of file mail.cpp.

References Cleared, MailList::FirstItem(), MailList::IsEnd(), MailList::NextItem(), notify, and MailList::RemoveItem().

Referenced by announce_disconnect(), do_mail(), do_mail_debug(), do_mail_stub(), and ReleaseAllResources().

{
    // Go through player's mail, and remove anything marked cleared.
    //
    MailList ml(player);
    struct mail *mp;
    for (mp = ml.FirstItem(); !ml.IsEnd(); mp = ml.NextItem())
    {
        if (Cleared(mp))
        {
            ml.RemoveItem();
        }
    }
    notify(player, "MAIL: Mailbox purged.");
}

void do_pemit_list	(	dbref	player,
		int	key,
		bool	bDoContents,
		int	pemit_flags,
		char *	list,
		int	chPoseType,
		char *	message
	)

Definition at line 1333 of file speech.cpp.

References do_pemit_single(), mux_strtok_ctl(), mux_strtok_parse(), and mux_strtok_src().

Referenced by do_pemit(), and FUNCTION().

{
    // Send a message to a list of dbrefs. The list is destructively
    // modified.
    //
    if (  message[0] == '\0'
       || list[0] == '\0')
    {
        return;
    }

    char *p;
    MUX_STRTOK_STATE tts;
    mux_strtok_src(&tts, list);
    mux_strtok_ctl(&tts, " ");
    for (p = mux_strtok_parse(&tts); p; p = mux_strtok_parse(&tts))
    {
        do_pemit_single(player, key, bDoContents, pemit_flags, p, chPoseType,
            message);
    }
}

void do_pemit_single	(	dbref	player,
		int	key,
		bool	bDoContents,
		int	pemit_flags,
		char *	recipient,
		int	chPoseType,
		char *	message
	)

Definition at line 1050 of file speech.cpp.

References A_AWAY, alloc_lbuf, AMBIGUOUS, Connected, Controls, free_lbuf, Has_contents, init_match(), isPlayer, isRoom, Location, Long_Fingers, match_controlled, match_everything(), match_result(), modSpeech(), Moniker(), mudconf, nearby(), NOPERM_MESSAGE, NOTHING, notify, notify_all_from_inside, notify_except(), notify_except2(), notify_with_cause, notify_with_cause_html, page_check(), page_return(), confdata::pemit_any, PEMIT_FEMIT, PEMIT_FPOSE, PEMIT_FPOSE_NS, PEMIT_FSAY, PEMIT_HERE, PEMIT_HTML, PEMIT_OEMIT, PEMIT_PEMIT, confdata::pemit_players, PEMIT_ROOM, PEMIT_WHISPER, confdata::quiet_whisper, safe_str, tprintf(), TYPE_PLAYER, where_is(), whisper_pose(), and Wizard.

Referenced by do_pemit(), do_pemit_list(), and FUNCTION().

{
    dbref target, loc;
    char *buf2, *bp;
    int depth;
    bool ok_to_do = false;

    switch (key)
    {
    case PEMIT_FSAY:
    case PEMIT_FPOSE:
    case PEMIT_FPOSE_NS:
    case PEMIT_FEMIT:
        target = match_controlled(player, recipient);
        if (target == NOTHING)
        {
            return;
        }
        ok_to_do = true;
        break;

    default:
        init_match(player, recipient, TYPE_PLAYER);
        match_everything(0);
        target = match_result();
    }

    char *newMessage = NULL;
    char *saystring = NULL;

    char *p;
    switch (target)
    {
    case NOTHING:
        switch (key)
        {
        case PEMIT_WHISPER:
            notify(player, "Whisper to whom?");
            break;

        case PEMIT_PEMIT:
            notify(player, "Emit to whom?");
            break;

        case PEMIT_OEMIT:
            notify(player, "Emit except to whom?");
            break;

        default:
            notify(player, "Sorry.");
            break;
        }
        break;

    case AMBIGUOUS:
        notify(player, "I don't know who you mean!");
        break;

    default:

        // Enforce locality constraints.
        //
        if (  !ok_to_do
           && (  nearby(player, target)
              || Long_Fingers(player)
              || Controls(player, target)))
        {
            ok_to_do = true;
        }
        if (  !ok_to_do
           && key == PEMIT_PEMIT
           && isPlayer(target)
           && mudconf.pemit_players)
        {
            if (!page_check(player, target))
            {
                return;
            }
            ok_to_do = true;
        }
        if (  !ok_to_do
           && (  !mudconf.pemit_any
              || key != PEMIT_PEMIT))
        {
            notify(player, "You are too far away to do that.");
            return;
        }
        if (  bDoContents
           && !Controls(player, target)
           && !mudconf.pemit_any)
        {
            notify(player, NOPERM_MESSAGE);
            return;
        }
        loc = where_is(target);

        switch (key)
        {
        case PEMIT_PEMIT:
            if (bDoContents)
            {
                if (Has_contents(target))
                {
                    notify_all_from_inside(target, player, message);
                }
            }
            else
            {
                if (pemit_flags & PEMIT_HTML)
                {
                    notify_with_cause_html(target, player, message);
                }
                else
                {
                    notify_with_cause(target, player, message);
                }
            }
            break;

        case PEMIT_OEMIT:
            notify_except(Location(target), player, target, message, 0);
            break;

        case PEMIT_WHISPER:
            if (  isPlayer(target)
               && !Connected(target))
            {
                page_return(player, target, "Away", A_AWAY,
                    tprintf("Sorry, %s is not connected.", Moniker(target)));
                return;
            }
            switch (chPoseType)
            {
            case ':':
                message++;
                whisper_pose(player, target, message, true);
                break;

            case ';':
                message++;
                whisper_pose(player, target, message, false);
                break;

            case '"':
                message++;

            default:
                newMessage = modSpeech(player, message, true, "whisper");
                if (newMessage)
                {
                    message = newMessage;
                }
                notify(player, tprintf("You whisper \"%s\" to %s.", message,
                    Moniker(target)));
                notify_with_cause(target, player,
                    tprintf("%s whispers \"%s\"", Moniker(player), message));
                if (newMessage)
                {
                    free_lbuf(newMessage);
                }
            }
            if (  !mudconf.quiet_whisper
               && !Wizard(player))
            {
                loc = where_is(player);
                if (loc != NOTHING)
                {
                    buf2 = alloc_lbuf("do_pemit.whisper.buzz");
                    bp = buf2;
                    safe_str(Moniker(player), buf2, &bp);
                    safe_str(" whispers something to ", buf2, &bp);
                    safe_str(Moniker(target), buf2, &bp);
                    *bp = '\0';
                    notify_except2(loc, player, player, target, buf2);
                    free_lbuf(buf2);
                }
            }
            break;

        case PEMIT_FSAY:
            newMessage = modSpeech(target, message, true, "@fsay");
            if (newMessage)
            {
                message = newMessage;
            }
            notify(target, tprintf("You say, \"%s\"", message));
            if (loc != NOTHING)
            {
                saystring = modSpeech(target, message, false, "@fsay");
                if (saystring)
                {
                    p = tprintf("%s %s \"%s\"", Moniker(target),
                        saystring, message);
                    notify_except(loc, player, target, p, 0);
                }
                else
                {
                    p = tprintf("%s says, \"%s\"", Moniker(target),
                        message);
                    notify_except(loc, player, target, p, 0);
                }
            }
            if (saystring)
            {
                free_lbuf(saystring);
            }
            if (newMessage)
            {
                free_lbuf(newMessage);
            }
            break;

        case PEMIT_FPOSE:
            newMessage = modSpeech(target, message, true, "@fpose");
            if (newMessage)
            {
                message = newMessage;
            }
            p = tprintf("%s %s", Moniker(target), message);
            notify_all_from_inside(loc, player, p);
            if (newMessage)
            {
                free_lbuf(newMessage);
            }
            break;

        case PEMIT_FPOSE_NS:
            newMessage = modSpeech(target, message, true, "@fpose");
            if (newMessage)
            {
                message = newMessage;
            }
            p = tprintf("%s%s", Moniker(target), message);
            notify_all_from_inside(loc, player, p);
            if (newMessage)
            {
                free_lbuf(newMessage);
            }
            break;

        case PEMIT_FEMIT:
            if (  (pemit_flags & PEMIT_HERE)
               || !pemit_flags)
            {
                notify_all_from_inside(loc, player, message);
            }
            if (pemit_flags & PEMIT_ROOM)
            {
                if (  isRoom(loc)
                   && (pemit_flags & PEMIT_HERE))
                {
                    return;
                }
                depth = 0;
                while (  !isRoom(loc)
                      && depth++ < 20)
                {
                    loc = Location(loc);
                    if (  loc == NOTHING
                       || loc == Location(loc))
                    {
                        return;
                    }
                }
                if (isRoom(loc))
                {
                    notify_all_from_inside(loc, player, message);
                }
            }
            break;
        }
    }
}

void do_say	(	dbref	executor,
		dbref	caller,
		dbref	enactor,
		int	key,
		char *	message
	)

Definition at line 153 of file speech.cpp.

References free_lbuf, Good_obj, isRoom, Location, modSpeech(), Moniker(), MSG_SAYPOSE, notify_all_from_inside, notify_all_from_inside_html, notify_all_from_inside_saypose, notify_except(), notify_except_rlevel(), notify_saypose, SAY_EMIT, SAY_HERE, SAY_HTML, SAY_NOEVAL, SAY_NOTAG, SAY_POSE, SAY_POSE_NOSPC, SAY_PREFIX, SAY_ROOM, SAY_SAY, sp_ok(), tprintf(), UNUSED_PARAMETER, and where_is().

Referenced by FUNCTION().

{
    UNUSED_PARAMETER(caller);
    UNUSED_PARAMETER(enactor);

    // Make sure speaker is somewhere if speaking in a place
    //
    dbref loc = where_is(executor);
    if ( !(  Good_obj(loc)
          && sp_ok(executor)))
    {
        return;
    }

    int say_flags, depth;

    // Convert prefix-coded messages into the normal type
    //
    say_flags = key & (SAY_NOEVAL | SAY_NOTAG | SAY_HERE | SAY_ROOM | SAY_HTML);
    key &= ~(SAY_NOEVAL | SAY_NOTAG | SAY_HERE | SAY_ROOM | SAY_HTML);

    if (key == SAY_PREFIX)
    {
        switch (*message)
        {
        case '"':
            message++;
            key = SAY_SAY;
            break;

        case ':':
            message++;
            if (*message == ' ')
            {
                message++;
                key = SAY_POSE_NOSPC;
            }
            else
            {
                key = SAY_POSE;
            }
            break;

        case ';':
            message++;
            key = SAY_POSE_NOSPC;
            break;

        case '\\':
            message++;

            // FALLTHROUGH
            //

        default:
            key = SAY_EMIT;
            break;
        }
    }

    char *command = "";
    if (SAY_SAY == key)
    {
        command = "say";
    }
    else if (SAY_POSE == key || SAY_POSE_NOSPC == key)
    {
        command = "pose";
    }
    else if (SAY_EMIT == key)
    {
        command = "@emit";
    }

    // Parse speechmod if present.
    //
    char *messageOrig = message;
    char *messageNew = NULL;
    if (!(say_flags & SAY_NOEVAL))
    {
        messageNew = modSpeech(executor, message, true, command);
        if (messageNew)
        {
            message = messageNew;
        }
    }

    // Send the message on its way
    //
    char *saystring;
    switch (key)
    {
    case SAY_SAY:
        saystring = modSpeech(executor, messageOrig, false, command);
        if (saystring)
        {
            notify_saypose(executor, tprintf("%s %s \"%s\"",
                Moniker(executor), saystring, message));
#ifdef REALITY_LVLS
            notify_except_rlevel(loc, executor, executor, tprintf("%s %s \"%s\"", Moniker(executor), saystring, message), MSG_SAYPOSE);
#else
            notify_except(loc, executor, executor, tprintf("%s %s \"%s\"", Moniker(executor), saystring, message), MSG_SAYPOSE);
#endif
            free_lbuf(saystring);
        }
        else
        {
            notify_saypose(executor, tprintf("You say, \"%s\"", message));
#ifdef REALITY_LVLS
            notify_except_rlevel(loc, executor, executor, tprintf("%s says, \"%s\"", Moniker(executor), message), MSG_SAYPOSE);
#else
            notify_except(loc, executor, executor, tprintf("%s says, \"%s\"", Moniker(executor), message), MSG_SAYPOSE);
#endif
        }
        break;

    case SAY_POSE:
#ifdef REALITY_LVLS
        notify_except_rlevel(loc, executor, -1, tprintf("%s %s", Moniker(executor), message), MSG_SAYPOSE);
#else
        notify_all_from_inside_saypose(loc, executor, tprintf("%s %s", Moniker(executor), message));
#endif
        break;

    case SAY_POSE_NOSPC:
#ifdef REALITY_LVLS
        notify_except_rlevel(loc, executor, -1, tprintf("%s%s", Moniker(executor), message), MSG_SAYPOSE);
#else
        notify_all_from_inside_saypose(loc, executor, tprintf("%s%s", Moniker(executor), message));
#endif
        break;

    case SAY_EMIT:
        if (  (say_flags & SAY_HERE)
           || (say_flags & SAY_HTML)
           || !say_flags)
        {
            if (say_flags & SAY_HTML)
            {
                notify_all_from_inside_html(loc, executor, message);
            }
            else
            {

#ifdef REALITY_LVLS
                notify_except_rlevel(loc, executor, -1, message, SAY_EMIT);
#else
                notify_all_from_inside(loc, executor, message);
#endif
            }
        }
        if (say_flags & SAY_ROOM)
        {
            if (  isRoom(loc)
               && (say_flags & SAY_HERE))
            {
                if (messageNew)
                {
                    free_lbuf(messageNew);
                }
                return;
            }
            for (depth = 0; !isRoom(loc) && (depth < 20); depth++)
            {
                loc = Location(loc);
                if (  !Good_obj(loc)
                   || (loc == Location(loc)))
                {
                    if (messageNew)
                    {
                        free_lbuf(messageNew);
                    }
                    return;
                }
            }
            if (isRoom(loc))
            {
#ifdef REALITY_LVLS
                notify_except_rlevel(loc, executor, -1, message, -1);
#else
                notify_all_from_inside(loc, executor, message);
#endif
            }
        }
        break;
    }
    if (messageNew)
    {
        free_lbuf(messageNew);
    }
}

void dump_database_internal

(

int

)

Definition at line 1294 of file game.cpp.

References DUMP_PROCEDURE::bUseTemporary, confdata::compress, confdata::compress_db, confdata::comsys_db, db_write(), DebugTotalFiles, DUMP_I_PANIC, DUMP_I_SIGNAL, dump_mail(), statedata::dumping, DumpProcedures, statedata::epoch, F_MUX, DUMP_PROCEDURE::fType, confdata::have_comsys, confdata::have_mailer, local_dump_database(), log_perror(), confdata::mail_db, mudconf, mudstate, NUM_DUMP_TYPES, confdata::outdb, OUTPUT_FLAGS, OUTPUT_VERSION, POPEN_WRITE_OP, DUMP_PROCEDURE::ppszOutputBase, DUMP_PROCEDURE::pszErrorMessage, RemoveFile(), ReplaceFile(), save_comsys(), SIZEOF_PATHNAME, DUMP_PROCEDURE::szOutputSuffix, and tprintf().

Referenced by do_backup(), do_restart(), do_shutdown(), dump_database(), fork_and_dump(), and sighandler().

{
    char tmpfile[SIZEOF_PATHNAME+32];
    char outfn[SIZEOF_PATHNAME+32];
    char prevfile[SIZEOF_PATHNAME+32];
    FILE *f;

    if (  dump_type < 0
       || NUM_DUMP_TYPES <= dump_type)
    {
        return;
    }

    bool bPotentialConflicts = false;
#ifndef WIN32
    // If we are already dumping for some reason, and suddenly get a type 1 or
    // type 4 dump, basically don't touch mail and comsys files. The other
    // dump will take care of them as well as can be expected for now, and if
    // we try to, we'll just step on them.
    //
    if (  mudstate.dumping
       && (  dump_type == DUMP_I_PANIC
          || dump_type == DUMP_I_SIGNAL))
    {
        bPotentialConflicts = true;
    }
#endif

    // Call the local dump function only if another dump is not already
    // in progress.
    //
    local_dump_database(dump_type);

    if (0 < dump_type)
    {
        DUMP_PROCEDURE *dp = &DumpProcedures[dump_type];

        sprintf(outfn, "%s%s", *(dp->ppszOutputBase), dp->szOutputSuffix);
        if (dp->bUseTemporary)
        {
            sprintf(tmpfile, "%s.#%d#", outfn, mudstate.epoch);
            RemoveFile(tmpfile);
            f = fopen(tmpfile, "wb");
        }
        else
        {
            RemoveFile(outfn);
            f = fopen(outfn, "wb");
        }

        if (f)
        {
            DebugTotalFiles++;
            setvbuf(f, NULL, _IOFBF, 16384);
            db_write(f, F_MUX, dp->fType);
            if (fclose(f) == 0)
            {
                DebugTotalFiles--;
            }

            if (dp->bUseTemporary)
            {
                ReplaceFile(tmpfile, outfn);
            }
        }
        else
        {
            log_perror("DMP", "FAIL", dp->pszErrorMessage, outfn);
        }

        if (!bPotentialConflicts)
        {
            if (mudconf.have_mailer)
            {
                f = fopen(mudconf.mail_db, "wb");
                if (f)
                {
                    DebugTotalFiles++;
                    dump_mail(f);
                    if (fclose(f) == 0)
                    {
                        DebugTotalFiles--;
                    }
                }
            }
            if (mudconf.have_comsys)
            {
                save_comsys(mudconf.comsys_db);
            }
        }
        return;
    }

    // Nuke our predecessor
    //
    if (mudconf.compress_db)
    {
        sprintf(prevfile, "%s.prev.gz", mudconf.outdb);
        sprintf(tmpfile, "%s.#%d#.gz", mudconf.outdb, mudstate.epoch - 1);
        RemoveFile(tmpfile);
        sprintf(tmpfile, "%s.#%d#.gz", mudconf.outdb, mudstate.epoch);
        strcpy(outfn, mudconf.outdb);
        strcat(outfn, ".gz");

        f = popen(tprintf("%s > %s", mudconf.compress, tmpfile), POPEN_WRITE_OP);
        if (f)
        {
            DebugTotalFiles++;
            setvbuf(f, NULL, _IOFBF, 16384);
            db_write(f, F_MUX, OUTPUT_VERSION | OUTPUT_FLAGS);
            if (pclose(f) != -1)
            {
                DebugTotalFiles--;
            }
            ReplaceFile(outfn, prevfile);
            if (ReplaceFile(tmpfile, outfn) < 0)
            {
                log_perror("SAV", "FAIL", "Renaming output file to DB file", tmpfile);
            }
        }
        else
        {
            log_perror("SAV", "FAIL", "Opening", tmpfile);
        }
    }
    else
    {
        sprintf(prevfile, "%s.prev", mudconf.outdb);
        sprintf(tmpfile, "%s.#%d#", mudconf.outdb, mudstate.epoch - 1);
        RemoveFile(tmpfile);
        sprintf(tmpfile, "%s.#%d#", mudconf.outdb, mudstate.epoch);

        f = fopen(tmpfile, "wb");
        if (f)
        {
            DebugTotalFiles++;
            setvbuf(f, NULL, _IOFBF, 16384);
            db_write(f, F_MUX, OUTPUT_VERSION | OUTPUT_FLAGS);
            if (fclose(f) == 0)
            {
                DebugTotalFiles--;
            }
            ReplaceFile(mudconf.outdb, prevfile);
            if (ReplaceFile(tmpfile, mudconf.outdb) < 0)
            {
                log_perror("SAV", "FAIL", "Renaming output file to DB file", tmpfile);
            }
        }
        else
        {
            log_perror("SAV", "FAIL", "Opening", tmpfile);
        }
    }

    if (mudconf.have_mailer)
    {
        f = fopen(mudconf.mail_db, "wb");
        if (f)
        {
            DebugTotalFiles++;
            dump_mail(f);
            if (fclose(f) == 0)
            {
                DebugTotalFiles--;
            }
        }
    }

    if (mudconf.have_comsys)
    {
        save_comsys(mudconf.comsys_db);
    }
}

int dump_mail

(

FILE *

)

Definition at line 2764 of file mail.cpp.

References DO_WHOLE_DB, MailList::FirstItem(), mail::from, MailList::IsEnd(), isPlayer, statedata::mail_db_top, mail_list, MessageFetch(), mudstate, MailList::NextItem(), mail::number, putref(), putstring(), mail::read, save_malias(), mail::subject, mail::time, mail::to, and mail::tolist.

Referenced by dump_database_internal().

{
    dbref thing;
    int count = 0, i;

    // Write out version number
    //
    fprintf(fp, "+V5\n");
    putref(fp, mudstate.mail_db_top);
    DO_WHOLE_DB(thing)
    {
        if (isPlayer(thing))
        {
            MailList ml(thing);
            struct mail *mp;
            for (mp = ml.FirstItem(); !ml.IsEnd(); mp = ml.NextItem())
            {
                putref(fp, mp->to);
                putref(fp, mp->from);
                putref(fp, mp->number);
                putstring(fp, mp->tolist);
                putstring(fp, mp->time);
                putstring(fp, mp->subject);
                putref(fp, mp->read);
                count++;
            }
        }
    }

    fprintf(fp, "*** END OF DUMP ***\n");

    // Add the db of mail messages
    //
    for (i = 0; i < mudstate.mail_db_top; i++)
    {
        if (0 < mail_list[i].m_nRefs)
        {
            putref(fp, i);
            putstring(fp, MessageFetch(i));
        }
    }
    fprintf(fp, "+++ END OF DUMP +++\n");
    save_malias(fp);

    return count;
}

void edit_string	(	char *	,
		char **	,
		char *	,
		char *
	)

Definition at line 1529 of file set.cpp.

References alloc_lbuf, replace_string(), and safe_str.

Referenced by FUNCTION().

{
    char *cp;

    // Do the substitution.  Idea for prefix/suffix from R'nice@TinyTIM.
    //
    if (!strcmp(from, "^"))
    {
        // Prepend 'to' to string.
        //
        *dst = alloc_lbuf("edit_string.^");
        cp = *dst;
        safe_str(to, *dst, &cp);
        safe_str(src, *dst, &cp);
        *cp = '\0';
    }
    else if (!strcmp(from, "$"))
    {
        // Append 'to' to string.
        //
        *dst = alloc_lbuf("edit_string.$");
        cp = *dst;
        safe_str(src, *dst, &cp);
        safe_str(to, *dst, &cp);
        *cp = '\0';
    }
    else
    {
        // Replace all occurances of 'from' with 'to'. Handle the special
        // cases of from = \$ and \^.
        //
        if (  (  from[0] == '\\'
              || from[0] == '%')
           && (  from[1] == '$'
              || from[1] == '^')
           && from[2] == '\0')
        {
            from++;
        }
        *dst = replace_string(from, to, src);
    }
}

void empty_obj

(

dbref

)

Definition at line 602 of file object.cpp.

References Contents, destroy_obj(), divest_object(), Exits, Going, Good_obj, Has_location, Home, HOME, isExit, isGarbage, Location, Log_header_err(), Log_simple_err(), move_via_generic(), new_home(), next, NOTHING, s_Home, s_Location, s_Next, and SAFE_DOLIST.

Referenced by destroy_thing(), do_destroy(), and purge_going().

{
    dbref targ, next;

    // Send the contents home
    //
    SAFE_DOLIST(targ, next, Contents(obj))
    {
        if (!Has_location(targ))
        {
            Log_simple_err(targ, obj,
                   "Funny object type in contents list of GOING location. Flush terminated.");
            break;
        }
        else if (Location(targ) != obj)
        {
            Log_header_err(targ, obj, Location(targ), true,
                   "Location",
                   "indicates object really in another location during cleanup of GOING location.  Flush terminated.");
            break;
        }
        else
        {
            s_Location(targ, NOTHING);
            s_Next(targ, NOTHING);
            if (  !Good_obj(Home(targ))
               || Going(Home(targ))
               || Home(targ) == obj)
            {
                s_Home(targ, new_home(targ));
            }
            move_via_generic(targ, HOME, NOTHING, 0);
            divest_object(targ);
        }
    }

    // Destroy the exits.
    //
    SAFE_DOLIST(targ, next, Exits(obj))
    {
        if (!isExit(targ) && !isGarbage(targ))
        {
            Log_simple_err(targ, obj, "Funny object type in exit list of GOING location. Flush terminated.");
            break;
        }
        else if (Exits(targ) != obj)
        {
            Log_header_err(targ, obj, Exits(targ), true, "Location",
                   "indicates exit really in another location during cleanup of GOING location.  Flush terminated.");
            break;
        }
        else
        {
            destroy_obj(targ);
        }
    }
}

void end_log

(

void

)

Definition at line 106 of file log.cpp.

References ENDLINE, CLogFile::Flush(), Log, statedata::logging, mudstate, and CLogFile::WriteString().

Referenced by pool_alloc(), pool_alloc_lbuf(), pool_free(), pool_free_lbuf(), and report_timecheck().

{
    Log.WriteString(ENDLINE);
    Log.Flush();
    mudstate.logging--;
}

bool eval_boolexp	(	dbref	,
		dbref	,
		dbref	,
		BOOLEXP *
	)

Definition at line 51 of file boolexp.cpp.

References A_LENTER, A_LOCK, A_NAME, alloc_lbuf, alloc_mbuf, atr_get, atr_num(), atr_pget, CMuxAlarm::bAlarmed, bCanReadAttr(), BOOLEXP_AND, BOOLEXP_ATR, BOOLEXP_CARRY, BOOLEXP_CONST, BOOLEXP_EVAL, BOOLEXP_INDIR, BOOLEXP_IS, BOOLEXP_NOT, BOOLEXP_OR, BOOLEXP_OWNER, statedata::bStandAlone, check_attr(), Contents, DOLIST, ENDLINE, ENDLOG, EV_EVAL, EV_FCHECK, EV_FIGNORE, EV_TOP, eval_boolexp(), eval_boolexp_atr(), free_lbuf, free_mbuf, INDIR_TOKEN, statedata::lock_nest_lev, confdata::lock_nest_lim, Log, LOG_BUGS, log_name_and_loc(), log_text(), MAX_GLOBAL_REGS, member(), mudconf, mudstate, mux_assert, mux_exec(), MuxAlarm, notify, attr::number, Owner, PopIntegers(), PopPointers(), PushIntegers(), PushPointers(), restore_global_regs(), save_global_regs(), STARTLOG, string_compare(), boolexp::sub1, boolexp::sub2, boolexp::thing, TRUE_BOOLEXP, boolexp::type, and CLogFile::WriteString().

Referenced by eval_boolexp(), eval_boolexp_atr(), and FUNCTION().

{
    if (b == TRUE_BOOLEXP)
    {
        return true;
    }

    dbref aowner, obj, source;
    int aflags;
    char *key, *buff, *buff2, *bp, *str;
    ATTR *a;
    bool bCheck, c;

    switch (b->type)
    {
    case BOOLEXP_AND:
        return   eval_boolexp(player, thing, from, b->sub1)
              && eval_boolexp(player, thing, from, b->sub2);

    case BOOLEXP_OR:
        return   eval_boolexp(player, thing, from, b->sub1)
              || eval_boolexp(player, thing, from, b->sub2);

    case BOOLEXP_NOT:
        return !eval_boolexp(player, thing, from, b->sub1);

    case BOOLEXP_INDIR:

        // BOOLEXP_INDIR (i.e. @) is a unary operation which is replaced at
        // evaluation time by the lock of the object whose number is the
        // argument of the operation.
        //
        mudstate.lock_nest_lev++;
        if (mudstate.lock_nest_lev >= mudconf.lock_nest_lim)
        {
            if (mudstate.bStandAlone)
            {
                Log.WriteString("Lock exceeded recursion limit." ENDLINE);
            }
            else
            {
                STARTLOG(LOG_BUGS, "BUG", "LOCK");
                log_name_and_loc(player);
                log_text(": Lock exceeded recursion limit.");
                ENDLOG;
                notify(player, "Sorry, broken lock!");
            }
            mudstate.lock_nest_lev--;
            return false;
        }
        if (  b->sub1->type != BOOLEXP_CONST
           || b->sub1->thing < 0)
        {
            if (mudstate.bStandAlone)
            {
                Log.WriteString("Broken lock." ENDLINE);
            }
            else
            {
                STARTLOG(LOG_BUGS, "BUG", "LOCK");
                log_name_and_loc(player);
                buff = alloc_mbuf("eval_boolexp.LOG.indir");
                sprintf(buff, ": Lock had bad indirection (%c, type %d)",
                    INDIR_TOKEN, b->sub1->type);
                log_text(buff);
                free_mbuf(buff);
                ENDLOG;
                notify(player, "Sorry, broken lock!");
            }
            mudstate.lock_nest_lev--;
            return false;
        }
        key = atr_get(b->sub1->thing, A_LOCK, &aowner, &aflags);
        c = eval_boolexp_atr(player, b->sub1->thing, from, key);
        free_lbuf(key);
        mudstate.lock_nest_lev--;
        return c;

    case BOOLEXP_CONST:
        return   b->thing == player
              || member(b->thing, Contents(player));

    case BOOLEXP_ATR:
        a = atr_num(b->thing);
        if (!a)
        {
            // No such attribute.
            //
            return false;
        }

        // First check the object itself, then its contents.
        //
        if (check_attr(player, from, a, (char *)b->sub1))
        {
            return true;
        }
        DOLIST(obj, Contents(player))
        {
            if (check_attr(obj, from, a, (char *)b->sub1))
            {
                return true;
            }
        }
        return false;

    case BOOLEXP_EVAL:

        a = atr_num(b->thing);
        if (  !a
           || MuxAlarm.bAlarmed)
        {
            // No such attribute.
            //
            return false;
        }
        source = from;
        buff = atr_pget(from, a->number, &aowner, &aflags);
        if (!buff || !*buff)
        {
            free_lbuf(buff);
            buff = atr_pget(thing, a->number, &aowner, &aflags);
            source = thing;
        }
        bCheck = false;

        if (  a->number == A_NAME
           || a->number == A_LENTER)
        {
            bCheck = true;
        }
        else if (bCanReadAttr(source, source, a, false))
        {
            bCheck = true;
        }
        if (bCheck)
        {
            char **preserve = NULL;
            int *preserve_len = NULL;
            preserve = PushPointers(MAX_GLOBAL_REGS);
            preserve_len = PushIntegers(MAX_GLOBAL_REGS);
            save_global_regs("eval_boolexp_save", preserve, preserve_len);

            buff2 = bp = alloc_lbuf("eval_boolexp");
            str = buff;
            mux_exec(buff2, &bp, source, player, player,
                EV_FIGNORE | EV_EVAL | EV_FCHECK | EV_TOP, &str,
                (char **)NULL, 0);
            *bp = '\0';

            restore_global_regs("eval_boolexp_save", preserve, preserve_len);
            PopIntegers(preserve_len, MAX_GLOBAL_REGS);
            PopPointers(preserve, MAX_GLOBAL_REGS);

            bCheck = !string_compare(buff2, (char *)b->sub1);
            free_lbuf(buff2);
        }
        free_lbuf(buff);
        return bCheck;

    case BOOLEXP_IS:

        // If an object check, do that.
        //
        if (b->sub1->type == BOOLEXP_CONST)
        {
            return (b->sub1->thing == player);
        }

        // Nope, do an attribute check
        //
        a = atr_num(b->sub1->thing);
        if (!a)
        {
            return false;
        }
        return check_attr(player, from, a, (char *)(b->sub1)->sub1);

    case BOOLEXP_CARRY:

        // If an object check, do that
        //
        if (b->sub1->type == BOOLEXP_CONST)
        {
            return member(b->sub1->thing, Contents(player));
        }

        // Nope, do an attribute check
        //
        a = atr_num(b->sub1->thing);
        if (!a)
        {
            return false;
        }
        DOLIST(obj, Contents(player))
        {
            if (check_attr(obj, from, a, (char *)(b->sub1)->sub1))
            {
                return true;
            }
        }
        return false;

    case BOOLEXP_OWNER:

        return (Owner(b->sub1->thing) == Owner(player));

    default:

        // Bad type
        //
        mux_assert(0);
        return false;
    }
}

bool eval_boolexp_atr	(	dbref	,
		dbref	,
		dbref	,
		char *
	)

Definition at line 267 of file boolexp.cpp.

References eval_boolexp(), free_boolexp(), and parse_boolexp().

Referenced by could_doit(), and eval_boolexp().

{
    bool ret_value;

    BOOLEXP *b = parse_boolexp(player, key, true);
    if (b == NULL)
    {
        ret_value = true;
    }
    else
    {
        ret_value = eval_boolexp(player, thing, from, b);
        free_boolexp(b);
    }
    return ret_value;
}

bool exit_displayable	(	dbref	,
		dbref	,
		int
	)

Definition at line 2217 of file predicates.cpp.

References statedata::bStandAlone, Dark, Light, mudstate, VE_BASE_DARK, and VE_LOC_DARK.

Referenced by look_exits().

{
    // Dark exit
    //
    if (Dark(exit))
    {
        return false;
    }

#ifdef WOD_REALMS
    if (!mudstate.bStandAlone)
    {
        int iRealmDirective = DoThingToThingVisibility(player, exit,
            ACTION_IS_STATIONARY);
        if (REALM_DO_HIDDEN_FROM_YOU == iRealmDirective)
        {
            return false;
        }
    }
#endif // WOD_REALMS

    // Light exit
    //
    if (Light(exit))
    {
        return true;
    }

    // Dark location or base.
    //
    if (key & (VE_LOC_DARK | VE_BASE_DARK))
    {
        return false;
    }

    // Default
    //
    return true;
}

bool exit_visible	(	dbref	,
		dbref	,
		int
	)

Definition at line 2171 of file predicates.cpp.

References statedata::bStandAlone, Dark, Examinable, IsReal, Light, mudstate, VE_BASE_DARK, VE_LOC_DARK, and VE_LOC_XAM.

Referenced by FUNCTION(), match_exit_internal(), and room_list().

{
#ifdef WOD_REALMS
    if (!mudstate.bStandAlone)
    {
        int iRealmDirective = DoThingToThingVisibility(player, exit,
            ACTION_IS_STATIONARY);
        if (REALM_DO_HIDDEN_FROM_YOU == iRealmDirective)
        {
            return false;
        }
    }
#endif // WOD_REALMS

#ifdef REALITY_LVLS
    if (!mudstate.bStandAlone)
    {
    if (!IsReal(player, exit))
       return 0;
    }
#endif /* REALITY_LVLS */

    // Exam exit's location
    //
    if (  (key & VE_LOC_XAM)
       || Examinable(player, exit)
       || Light(exit))
    {
        return true;
    }

    // Dark location or base
    //
    if (  (key & (VE_LOC_DARK | VE_BASE_DARK))
       || Dark(exit))
    {
        return false;
    }

    // Default
    //
    return true;
}

int fetch_cmds

(

dbref

target

)

Definition at line 2891 of file netcommon.cpp.

References descriptor_data::command_count, and DESC_ITER_PLAYER.

Referenced by FUNCTION().

{
    int sum = 0;
    bool bFound = false;

    DESC *d;
    DESC_ITER_PLAYER(target, d)
    {
        sum += d->command_count;
        bFound = true;
    }

    if (bFound)
    {
        return sum;
    }
    else
    {
        return -1;
    }
}

long fetch_ConnectionInfoField	(	dbref	target,
		int	iField
	)

Definition at line 2966 of file netcommon.cpp.

References A_CONNINFO, atr_get, free_lbuf, mux_atol(), and ParseConnectionInfoString().

{
    dbref aowner;
    int   aflags;
    char *pConnInfo = atr_get(target, A_CONNINFO, &aowner, &aflags);
    char *aFields[5];
    ParseConnectionInfoString(pConnInfo, aFields);

    long result;
    if (  !aFields[iField]
       || (result = mux_atol(aFields[iField])) < 0)
    {
        result = 0;
    }
    free_lbuf(pConnInfo);
    return result;
}

void fetch_ConnectionInfoFields	(	dbref	target,
		long	anFields[4]
	)

Definition at line 2924 of file netcommon.cpp.

References A_CONNINFO, atr_get, free_lbuf, mux_atol(), and ParseConnectionInfoString().

Referenced by shutdownsock().

{
    dbref aowner;
    int   aflags;
    char *pConnInfo = atr_get(target, A_CONNINFO, &aowner, &aflags);
    char *aFields[5];
    ParseConnectionInfoString(pConnInfo, aFields);

    for (int i = 0; i < 4; i++)
    {
        long result;
        if (  !aFields[i]
           || (result = mux_atol(aFields[i])) < 0)
        {
            result = 0;
        }
        anFields[i] = result;
    }
    free_lbuf(pConnInfo);
}

CLinearTimeAbsolute fetch_logouttime

(

dbref

target

)

Definition at line 2986 of file netcommon.cpp.

References A_CONNINFO, atr_get, CIF_LOGOUTTIME, free_lbuf, ParseConnectionInfoString(), CLinearTimeAbsolute::SetSeconds(), and CLinearTimeAbsolute::SetSecondsString().

Referenced by FUNCTION().

{
    dbref aowner;
    int   aflags;
    char *pConnInfo = atr_get(target, A_CONNINFO, &aowner, &aflags);
    char *aFields[5];
    ParseConnectionInfoString(pConnInfo, aFields);

    CLinearTimeAbsolute lta;
    if (aFields[CIF_LOGOUTTIME])
    {
        lta.SetSecondsString(aFields[CIF_LOGOUTTIME]);
    }
    else
    {
        lta.SetSeconds(0);
    }
    free_lbuf(pConnInfo);
    return lta;
}

void FLOAT_Initialize

(

void

)

Definition at line 3603 of file strtod.cpp.

References mux_FPInit(), and mux_FPSet().

Referenced by main().

{
    mux_FPInit();
    mux_FPSet();
}

void fork_and_dump

(

int

key

)

Definition at line 1528 of file game.cpp.

References al_store(), alloc_lbuf, check_mail_expiration(), CMuxAlarm::Clear(), dump_database_internal(), DUMP_FLATFILE, DUMP_I_FLAT, DUMP_I_NORMAL, confdata::dump_msg, DUMP_STRUCT, DUMP_TEXT, statedata::dumped, statedata::dumper, statedata::dumping, ENDLOG, statedata::epoch, confdata::fork_dump, free_lbuf, local_dump_complete_signal(), local_presync_database(), LOG_DBSAVES, log_perror(), log_text(), mudconf, mudstate, MuxAlarm, confdata::outdb, pcache_sync(), confdata::postdump_msg, raw_broadcast(), STARTLOG, SYNC, and statedata::write_protect.

Referenced by dispatch_DatabaseDump(), and do_dump().

{
#ifndef WIN32
    static volatile bool bRequestAccepted = false;

    // fork_and_dump is never called with mudstate.dumping true, but we'll
    // ensure that assertion now.
    //
    if (  bRequestAccepted
       || mudstate.dumping)
    {
        return;
    }
    bRequestAccepted = true;
#endif

    // If no options were given, then it means DUMP_TEXT+DUMP_STRUCT.
    //
    if (key == 0)
    {
        key = DUMP_TEXT+DUMP_STRUCT;
    }

    if (*mudconf.dump_msg)
    {
        raw_broadcast(0, "%s", mudconf.dump_msg);
    }
    check_mail_expiration();
    char *buff = alloc_lbuf("fork_and_dump");
    if (key & (DUMP_TEXT|DUMP_STRUCT))
    {
        STARTLOG(LOG_DBSAVES, "DMP", "CHKPT");
        if (key & DUMP_TEXT)
        {
            log_text("SYNCing");
            if (key & DUMP_STRUCT)
            {
                log_text(" and ");
            }
        }
        if (key & DUMP_STRUCT)
        {
            mudstate.epoch++;
            sprintf(buff, "%s.#%d#", mudconf.outdb, mudstate.epoch);
            log_text("Checkpointing: ");
            log_text(buff);
        }
        ENDLOG;
    }
    if (key & DUMP_FLATFILE)
    {
        STARTLOG(LOG_DBSAVES, "DMP", "FLAT");
        log_text("Creating flatfile: ");
        sprintf(buff, "%s.FLAT", mudconf.outdb);
        log_text(buff);
        ENDLOG;
    }
    free_lbuf(buff);

    local_presync_database();

#ifndef MEMORY_BASED
    // Save cached modified attribute list
    //
    al_store();
#endif // MEMORY_BASED

    pcache_sync();
    SYNC;

#ifndef WIN32
    mudstate.write_protect = true;
    int child = 0;
    bool bChildExists = false;
    mudstate.dumping = true;
    mudstate.dumped  = 0;
    bool bAttemptFork = mudconf.fork_dump;
#if !defined(HAVE_PREAD) \
 || !defined(HAVE_PWRITE)
    if (key & DUMP_FLATFILE)
    {
        // Don't attempt a fork()'ed @dump/flat without pread()/pwrite()
        // support.
        //
        bAttemptFork = false;
    }
#endif // !HAVE_PREAD !HAVE_PWRITE
#endif // WIN32
    if (key & (DUMP_STRUCT|DUMP_FLATFILE))
    {
#ifndef WIN32
        if (bAttemptFork)
        {
            child = fork();
        }
        if (child == 0)
        {
            // If we don't clear this alarm, the child will eventually receive a
            // SIG_PROF.
            //
            MuxAlarm.Clear();
#endif
            if (key & DUMP_STRUCT)
            {
                dump_database_internal(DUMP_I_NORMAL);
            }
            if (key & DUMP_FLATFILE)
            {
                dump_database_internal(DUMP_I_FLAT);
            }
#ifndef WIN32
            if (mudconf.fork_dump)
            {
                _exit(0);
            }
        }
        else if (child < 0)
        {
            log_perror("DMP", "FORK", NULL, "fork()");
        }
        else
        {
            mudstate.dumper = child;
            if (mudstate.dumper == mudstate.dumped)
            {
                // The child process executed and exited before fork() returned
                // to the parent process.  Without a process id, the parent's
                // SIGCHLD handler could not be certain that the pid of the
                // exiting process would match the pid of this child.
                //
                // At the this point, we can be sure, however, there's
                // nothing much left to do.
                //
                // See SIGCHLD handler in bsd.cpp.
                //
                mudstate.dumper = 0;
                mudstate.dumped = 0;
            }
            else
            {
                bChildExists = true;
            }
        }
#endif
    }

#ifndef WIN32
    mudstate.write_protect = false;
    if (!bChildExists)
    {
        // We have the ability to fork children, but we are not configured to
        // use it; or, we tried to fork a child and failed; or, we didn't
        // need to dump the structure or a flatfile; or, the child has finished
        // dumping already.
        //
        mudstate.dumper = 0;
        mudstate.dumping = false;
        local_dump_complete_signal();
    }
    bRequestAccepted = false;
#endif

    if (*mudconf.postdump_msg)
    {
        raw_broadcast(0, "%s", mudconf.postdump_msg);
    }
}

bool fwdlist_ck	(	dbref	player,
		dbref	thing,
		int	anum,
		char *	atext
	)

Definition at line 390 of file db.cpp.

References alloc_lbuf, statedata::bStandAlone, free_lbuf, fwdlist_load(), fwdlist_rewrite(), fwdlist_set(), mudstate, and UNUSED_PARAMETER.

Referenced by do_forwardlist().

{
    UNUSED_PARAMETER(anum);

    if (mudstate.bStandAlone)
    {
        return true;
    }

    FWDLIST *fp;
    int count = 0;

    if (atext && *atext)
    {
        fp = (FWDLIST *) alloc_lbuf("fwdlist_ck.fp");
        fwdlist_load(fp, player, atext);
    }
    else
    {
        fp = NULL;
    }

    // Set the cached forwardlist.
    //
    fwdlist_set(thing, fp);
    count = fwdlist_rewrite(fp, atext);
    if (fp)
    {
        free_lbuf(fp);
    }
    return ((count > 0) || !atext || !*atext);
}

void fwdlist_clr

(

dbref

)

Definition at line 270 of file db.cpp.

References fwdlist_get(), statedata::fwdlist_htab, hashdeleteLEN(), MEMFREE, and mudstate.

Referenced by atr_clr(), destroy_bad_obj(), destroy_obj(), and fwdlist_set().

{
    // If a forwardlist exists, delete it
    //
    FWDLIST *xfp = fwdlist_get(thing);
    if (xfp)
    {
        MEMFREE(xfp);
        xfp = NULL;
        hashdeleteLEN(&thing, sizeof(thing), &mudstate.fwdlist_htab);
    }
}

FWDLIST* fwdlist_get

(

dbref

)

Definition at line 423 of file db.cpp.

References A_FORWARDLIST, alloc_lbuf, atr_get, statedata::bStandAlone, free_lbuf, statedata::fwdlist_htab, fwdlist_load(), GOD, hashfindLEN(), and mudstate.

Referenced by check_dead_refs(), do_entrances(), fwdlist_clr(), fwdlist_set(), and notify_check().

{
    static FWDLIST *fp = NULL;
    if (mudstate.bStandAlone)
    {
        if (!fp)
        {
            fp = (FWDLIST *) alloc_lbuf("fwdlist_get");
        }
        dbref aowner;
        int   aflags;
        char *tp = atr_get(thing, A_FORWARDLIST, &aowner, &aflags);
        fwdlist_load(fp, GOD, tp);
        free_lbuf(tp);
    }
    else
    {
        fp = (FWDLIST *) hashfindLEN(&thing, sizeof(thing),
            &mudstate.fwdlist_htab);
    }
    return fp;
}

int fwdlist_load	(	FWDLIST *	,
		dbref	,
		char *
	)

Definition at line 287 of file db.cpp.

References A_LLINK, alloc_lbuf, statedata::bStandAlone, Controls, could_doit(), forward_list::count, forward_list::data, free_lbuf, God, Good_obj, Link_ok, mudstate, mux_atol(), mux_isdigit, mux_isspace, notify, and tprintf().

Referenced by fwdlist_ck(), fwdlist_get(), and process_preload().

{
    dbref target;
    char *tp, *bp, *dp;
    bool fail;

    int count = 0;
    int errors = 0;
    bp = tp = alloc_lbuf("fwdlist_load.str");
    strcpy(tp, atext);
    do
    {
        // Skip spaces.
        //
        for (; mux_isspace(*bp); bp++)
        {
            ; // Nothing.
        }

        // Remember string.
        //
        for (dp = bp; *bp && !mux_isspace(*bp); bp++)
        {
            ; // Nothing.
        }

        // Terminate string.
        //
        if (*bp)
        {
            *bp++ = '\0';
        }

        if (  *dp++ == '#'
           && mux_isdigit(*dp))
        {
            target = mux_atol(dp);
            if (mudstate.bStandAlone)
            {
                fail = !Good_obj(target);
            }
            else
            {
                fail = (  !Good_obj(target)
                       || (  !God(player)
                          && !Controls(player, target)
                          && (  !Link_ok(target)
                             || !could_doit(player, target, A_LLINK))));
            }
            if (fail)
            {
                if (!mudstate.bStandAlone)
                {
                    notify(player,
                        tprintf("Cannot forward to #%d: Permission denied.",
                        target));
                }
                errors++;
            }
            else
            {
                if (count < 1000)
                {
                    fp->data[count++] = target;
                }
            }
        }
    } while (*bp);
    free_lbuf(tp);
    fp->count = count;
    return errors;
}

int fwdlist_rewrite	(	FWDLIST *	,
		char *
	)

Definition at line 364 of file db.cpp.

References forward_list::count, forward_list::data, Good_obj, ItemToList_AddInteger(), ItemToList_Final(), and ItemToList_Init().

Referenced by check_dead_refs(), and fwdlist_ck().

{
    int count = 0;
    atext[0] = '\0';

    if (fp && fp->count)
    {
        char *bp = atext;
        ITL pContext;
        ItemToList_Init(&pContext, atext, &bp, '#');
        for (int i = 0; i < fp->count; i++)
        {
            if (  Good_obj(fp->data[i])
               && ItemToList_AddInteger(&pContext, fp->data[i]))
            {
                count++;
            }
        }
        ItemToList_Final(&pContext);
    }
    return count;
}

void fwdlist_set	(	dbref	,
		FWDLIST *
	)

Definition at line 231 of file db.cpp.

References forward_list::count, forward_list::data, fwdlist_clr(), fwdlist_get(), statedata::fwdlist_htab, hashaddLEN(), hashreplLEN(), ISOUTOFMEMORY, MEMALLOC, MEMFREE, and mudstate.

Referenced by fwdlist_ck(), and process_preload().

{
    FWDLIST *fp, *xfp;
    int i;

    // If fwdlist is null, clear.
    //
    if (!ifp || (ifp->count <= 0))
    {
        fwdlist_clr(thing);
        return;
    }

    // Copy input forwardlist to a correctly-sized buffer.
    //
    fp = (FWDLIST *)MEMALLOC(sizeof(int) * ((ifp->count) + 1));
    ISOUTOFMEMORY(fp);

    for (i = 0; i < ifp->count; i++)
    {
        fp->data[i] = ifp->data[i];
    }
    fp->count = ifp->count;

    // Replace an existing forwardlist, or add a new one.
    //
    xfp = fwdlist_get(thing);
    if (xfp)
    {
        MEMFREE(xfp);
        xfp = NULL;
        hashreplLEN(&thing, sizeof(thing), fp, &mudstate.fwdlist_htab);
    }
    else
    {
        hashaddLEN(&thing, sizeof(thing), fp, &mudstate.fwdlist_htab);
    }
}

int get_gender

(

dbref

)

Definition at line 837 of file eval.cpp.

References A_SEX, atr_pget, free_lbuf, and mux_tolower.

Referenced by handle_ears(), and mux_exec().

{
    dbref aowner;
    int aflags;
    char *atr_gotten = atr_pget(player, A_SEX, &aowner, &aflags);
    char first = atr_gotten[0];
    free_lbuf(atr_gotten);
    switch (mux_tolower(first))
    {
    case 'p':
        return 4;

    case 'm':
        return 3;

    case 'f':
    case 'w':
        return 2;
    }
    return 1;
}

bool get_obj_and_lock	(	dbref	,
		char *	,
		dbref *	,
		ATTR **	,
		char *	,
		char **
	)

Definition at line 1823 of file predicates.cpp.

References A_LOCK, alloc_lbuf, atr_num(), attr, free_lbuf, Good_obj, lock_sw, match_thing_quiet(), parse_thing_slash(), safe_match_result(), safe_str, and search_nametab().

Referenced by FUNCTION().

{
    char *str, *tbuf;
    int anum;

    tbuf = alloc_lbuf("get_obj_and_lock");
    strcpy(tbuf, what);
    if (parse_thing_slash(player, tbuf, &str, it))
    {
        // <obj>/<lock> syntax, use the named lock.
        //
        if (!search_nametab(player, lock_sw, str, &anum))
        {
            free_lbuf(tbuf);
            safe_str("#-1 LOCK NOT FOUND", errmsg, bufc);
            return false;
        }
    }
    else
    {
        // Not <obj>/<lock>, do a normal get of the default lock.
        //
        *it = match_thing_quiet(player, what);
        if (!Good_obj(*it))
        {
            free_lbuf(tbuf);
            safe_match_result(*it, errmsg, bufc);
            return false;
        }
        anum = A_LOCK;
    }

    // Get the attribute definition, fail if not found.
    //
    free_lbuf(tbuf);
    *attr = atr_num(anum);
    if (!(*attr))
    {
        safe_str("#-1 LOCK NOT FOUND", errmsg, bufc);
        return false;
    }
    return true;
}

void giveto	(	dbref	,
		int
	)

Definition at line 288 of file predicates.cpp.

References Free_Money, Owner, Pennies(), s_Pennies(), and Wizard.

Referenced by CallBack_HaltQueue(), CallBack_NotifySemaphoreDrainOrAll(), connect_player(), destroy_obj(), do_chown(), do_kill(), do_processcom(), do_unlink(), give_money(), halt_que(), link_exit(), move_object(), and Task_RunQueueEntry().

{
    if (  Wizard(who)
       || Wizard(Owner(who))
       || Free_Money(who)
       || Free_Money(Owner(who)))
    {
        return;
    }
    who = Owner(who);
    s_Pennies(who, Pennies(who) + pennies);
}

int halt_que	(	dbref	,
		dbref
	)

Definition at line 334 of file cque.cpp.

References a_Queue(), CallBack_HaltQueue(), giveto(), Halt_Entries, Halt_Entries_Run, Halt_Object_Target, Halt_Player_Run, Halt_Player_Target, mudconf, NOTHING, scheduler, CScheduler::TraverseUnordered(), and confdata::waitcost.

Referenced by announce_disconnect(), check_dead_refs(), destroy_bad_obj(), destroy_obj(), destroy_player(), do_chown(), do_command(), do_halt(), do_kill(), setup_que(), and Task_RunQueueEntry().

{
    Halt_Player_Target = executor;
    Halt_Object_Target = object;
    Halt_Entries       = 0;
    Halt_Player_Run    = NOTHING;
    Halt_Entries_Run   = 0;

    // Process @wait, timed semaphores, and untimed semaphores.
    //
    scheduler.TraverseUnordered(CallBack_HaltQueue);

    if (Halt_Player_Run != NOTHING)
    {
        giveto(Halt_Player_Run, mudconf.waitcost * Halt_Entries_Run);
        a_Queue(Halt_Player_Run, -Halt_Entries_Run);
        Halt_Player_Run = NOTHING;
    }
    return Halt_Entries;
}

void handle_ears	(	dbref	,
		bool	,
		bool
	)

Definition at line 608 of file predicates.cpp.

References alloc_lbuf, free_lbuf, get_gender(), isExit, MSG_INV, MSG_LOC, MSG_ME, MSG_NBR, Name, notify_check(), and tprintf().

Referenced by do_edit(), do_set(), do_wipe(), fh_hear_bit(), and set_attr_internal().

{
    char *buff, *bp;
    int gender;
    static const char *poss[5] =
    {"", "its", "her", "his", "their"};

    if (could_hear != can_hear)
    {
        buff = alloc_lbuf("handle_ears");
        strcpy(buff, Name(thing));
        if (isExit(thing))
        {
            for (bp = buff; *bp && *bp != ';'; bp++)
            {
                ; // Nothing.
            }
            *bp = '\0';
        }
        gender = get_gender(thing);

        if (can_hear)
        {
            notify_check(thing, thing,
                         tprintf("%s grow%s ears and can now hear.",
                                 buff, (gender == 4) ? "" : "s"),
                         (MSG_ME | MSG_NBR | MSG_LOC | MSG_INV));
        }
        else
        {
            notify_check(thing, thing,
                         tprintf("%s lose%s %s ears and become%s deaf.",
                                 buff, (gender == 4) ? "" : "s",
                                 poss[gender], (gender == 4) ? "" : "s"),
                         (MSG_ME | MSG_NBR | MSG_LOC | MSG_INV));
        }
        free_lbuf(buff);
    }
}

bool Hearer

(

dbref

)

Definition at line 1903 of file game.cpp.

References AF_NOPROG, alloc_lbuf, AMATCH_CMD, AMATCH_LISTEN, atr_get_str(), atr_head(), atr_next(), atr_num(), atr_pop(), atr_push(), statedata::bfCommands, statedata::bfListens, statedata::bfNoCommands, statedata::bfNoListens, CBitField::Clear(), Connected, free_lbuf, H_Listen, statedata::inpipe, CBitField::IsSet(), Monitor, mudstate, statedata::poutobj, Puppet, and CBitField::Set().

Referenced by do_edit(), do_examine(), do_set(), do_wipe(), fh_hear_bit(), look_in(), look_simple(), move_via_exit(), move_via_generic(), move_via_teleport(), process_sticky_dropto(), and set_attr_internal().

{
    if (  mudstate.inpipe
       && thing == mudstate.poutobj)
    {
        return true;
    }

    if (  Connected(thing)
       || Puppet(thing)
       || H_Listen(thing))
    {
        return true;
    }

    if (Monitor(thing))
    {
        if (mudstate.bfListens.IsSet(thing))
        {
            return true;
        }
        else if (mudstate.bfNoListens.IsSet(thing))
        {
            return false;
        }
        else
        {
            bool bFoundCommands = false;

            char *buff = alloc_lbuf("Hearer");
            char *as;
            atr_push();
            for (int atr = atr_head(thing, &as); atr; atr = atr_next(&as))
            {
                ATTR *ap = atr_num(atr);
                if (  !ap
                   || (ap->flags & AF_NOPROG))
                {
                    continue;
                }

                int   aflags;
                dbref aowner;
                atr_get_str(buff, thing, atr, &aowner, &aflags);

                if (aflags & AF_NOPROG)
                {
                    continue;
                }

                char *s = NULL;
                if (  AMATCH_CMD    == buff[0]
                   || AMATCH_LISTEN == buff[0])
                {
                    s = strchr(buff+1, ':');
                    if (s)
                    {
                        if (AMATCH_CMD == buff[0])
                        {
                            bFoundCommands = true;
                        }
                        else
                        {
                            free_lbuf(buff);
                            atr_pop();
                            mudstate.bfListens.Set(thing);
                            return true;
                        }
                    }
                }
            }
            free_lbuf(buff);
            atr_pop();

            mudstate.bfNoListens.Set(thing);

            if (bFoundCommands)
            {
                mudstate.bfNoCommands.Clear(thing);
                mudstate.bfCommands.Set(thing);
            }
            else
            {
                mudstate.bfCommands.Clear(thing);
                mudstate.bfNoCommands.Set(thing);
            }
        }
    }
    return false;
}

void help_helper	(	dbref	executor,
		int	iHelpfile,
		char *	topic_arg,
		char *	buff,
		char **	bufc
	)

Definition at line 416 of file help.cpp.

References statedata::aHelpDesc, alloc_lbuf, free_lbuf, hashfindLEN(), HELP_DESC::ht, MakeCanonicalTopicName(), mudstate, ReportTopic(), safe_str, and ValidateHelpFileIndex().

Referenced by FUNCTION().

{
    if (!ValidateHelpFileIndex(iHelpfile))
    {
        return;
    }

    const char *topic = MakeCanonicalTopicName(topic_arg);

    CHashTable *htab = mudstate.aHelpDesc[iHelpfile].ht;
    struct help_entry *htab_entry =
        (struct help_entry *)hashfindLEN(topic, strlen(topic), htab);
    if (htab_entry)
    {
        char *result = alloc_lbuf("help_helper");
        if (ReportTopic(executor, htab_entry, iHelpfile, result))
        {
            safe_str(result, buff, bufc);
        }
        else
        {
            safe_str("#-1 ERROR", buff, bufc);
        }
        free_lbuf(result);
    }
    else
    {
        safe_str("#-1 TOPIC DOES NOT EXIST", buff, bufc);
    }
}

void helpindex_clean

(

int

)

Definition at line 26 of file help.cpp.

References statedata::aHelpDesc, hash_firstentry(), hash_nextentry(), HELP_DESC::ht, help_entry::key, MEMFREE, and mudstate.

Referenced by helpindex_read(), and main().

{
    CHashTable *htab = mudstate.aHelpDesc[iHelpfile].ht;
    if (htab == NULL)
    {
        return;
    }
    struct help_entry *htab_entry;
    for (htab_entry = (struct help_entry *)hash_firstentry(htab);
         htab_entry;
         htab_entry = (struct help_entry *)hash_nextentry(htab))
    {
        MEMFREE(htab_entry->key);
        htab_entry->key = NULL;
        MEMFREE(htab_entry);
        htab_entry = NULL;
    }
    delete mudstate.aHelpDesc[iHelpfile].ht;
    mudstate.aHelpDesc[iHelpfile].ht = NULL;
}

void helpindex_init

(

void

)

Definition at line 230 of file help.cpp.

References helpindex_load(), and NOTHING.

Referenced by main().

{
    helpindex_load(NOTHING);
}

void helpindex_load

(

dbref

)

Definition at line 217 of file help.cpp.

References helpindex_read(), mudstate, statedata::nHelpDesc, NOTHING, notify, and Quiet.

Referenced by do_readcache(), and helpindex_init().

{
    for (int i = 0; i < mudstate.nHelpDesc; i++)
    {
        helpindex_read(i);
    }
    if (  player != NOTHING
       && !Quiet(player))
    {
        notify(player, "Cache for help indexes refreshed.");
    }
}

bool html_escape	(	const char *	src,
		char *	dest,
		char **	destp
	)

Definition at line 538 of file game.cpp.

References safe_chr, and safe_str.

Referenced by look_contents(), look_exits(), and notify_check().

{
    const char *msg_orig;
    bool ret = false;

    if (destp == 0)
    {
        char *temp = dest;
        destp = &temp;
    }

    for (msg_orig = src; msg_orig && *msg_orig && !ret; msg_orig++)
    {
        char *p = *destp;
        switch (*msg_orig)
        {
        case '<':
            safe_str("&lt;", dest, destp);
            break;

        case '>':
            safe_str("&gt;", dest, destp);
            break;

        case '&':
            safe_str("&amp;", dest, destp);
            break;

        case '\"':
            safe_str("&quot;", dest, destp);
            break;

        default:
            safe_chr(*msg_orig, dest, destp);
            break;
        }

        // For <>&\, this may cause an extra loop around before it figures out that we are
        // out of buffer, but no harm is done in this, and the common case is a single character.
        //
        if (p == *destp)
        {
            ret = true;
        }
    }
    **destp = 0;
    return ret;
}

int init_dbfile	(	char *	game_dir_file,
		char *	game_pag_file,
		int	nCachePages
	)

Definition at line 3083 of file db.cpp.

References statedata::bStandAlone, cache_init(), db_free(), ENDLINE, ENDLOG, HF_OPEN_STATUS_ERROR, Log, LOG_ALWAYS, mudstate, STARTLOG, and CLogFile::tinyprintf().

Referenced by dbconvert(), and main().

{
    if (mudstate.bStandAlone)
    {
        Log.tinyprintf("Opening (%s,%s)" ENDLINE, game_dir_file, game_pag_file);
    }
    int cc = cache_init(game_dir_file, game_pag_file, nCachePages);
    if (cc != HF_OPEN_STATUS_ERROR)
    {
        if (mudstate.bStandAlone)
        {
            Log.tinyprintf("Done opening (%s,%s)." ENDLINE, game_dir_file,
                game_pag_file);
        }
        else
        {
            STARTLOG(LOG_ALWAYS, "INI", "LOAD");
            Log.tinyprintf("Using game db files: (%s,%s).", game_dir_file,
                game_pag_file);
            ENDLOG;
        }
        db_free();
    }
    return cc;
}

void init_logout_cmdtab

(

void

)

Definition at line 1903 of file netcommon.cpp.

References name_table::flag, hashaddLEN(), statedata::logout_cmd_htab, logout_cmdtable, mudstate, and name_table::name.

Referenced by main().

{
    NAMETAB *cp;

    // Make the htab bigger than the number of entries so that we find things
    // on the first check.  Remember that the admin can add aliases.
    //
    for (cp = logout_cmdtable; cp->flag; cp++)
    {
        hashaddLEN(cp->name, strlen(cp->name), cp, &mudstate.logout_cmd_htab);
    }
}

void init_timer

(

void

)

Definition at line 211 of file timer.cpp.

References confdata::cache_tick_period, statedata::check_counter, confdata::check_interval, confdata::check_offset, CScheduler::DeferTask(), dispatch_CacheTick(), dispatch_CanRestart(), dispatch_CheckEvents(), dispatch_DatabaseDump(), dispatch_FreeListReconstruction(), dispatch_IdleCheck(), statedata::dump_counter, confdata::dump_interval, confdata::dump_offset, statedata::events_counter, CLinearTimeAbsolute::GetUTC(), statedata::idle_counter, confdata::idle_interval, mudconf, mudstate, PRIORITY_OBJECT, PRIORITY_SYSTEM, scheduler, CLinearTimeDelta::SetSeconds(), time_15s, time_30s, and time_45s.

Referenced by main().

{
    CLinearTimeAbsolute ltaNow;
    ltaNow.GetUTC();

    // Setup re-occuring Free List Reconstruction task.
    //
    CLinearTimeDelta ltd;
    ltd.SetSeconds((mudconf.check_offset == 0) ? mudconf.check_interval : mudconf.check_offset);
    mudstate.check_counter  = ltaNow + ltd;
    scheduler.DeferTask(mudstate.check_counter, PRIORITY_SYSTEM,
        dispatch_FreeListReconstruction, 0, 0);

    // Setup re-occuring Database Dump task.
    //
    ltd.SetSeconds((mudconf.dump_offset == 0) ? mudconf.dump_interval : mudconf.dump_offset);
    mudstate.dump_counter  = ltaNow + ltd;
    scheduler.DeferTask(mudstate.dump_counter, PRIORITY_SYSTEM,
        dispatch_DatabaseDump, 0, 0);

    // Setup re-occuring Idle Check task.
    //
    ltd.SetSeconds(mudconf.idle_interval);
    mudstate.idle_counter   = ltaNow + ltd;
    scheduler.DeferTask(mudstate.idle_counter, PRIORITY_SYSTEM,
        dispatch_IdleCheck, 0, 0);

    // Setup re-occuring Check Events task.
    //
    mudstate.events_counter = ltaNow + time_15s;
    scheduler.DeferTask(mudstate.events_counter, PRIORITY_SYSTEM,
        dispatch_CheckEvents, 0, 0);

#ifndef MEMORY_BASED
    // Setup re-occuring cache_tick task.
    //
    ltd.SetSeconds(0);
    if (mudconf.cache_tick_period <= ltd)
    {
        mudconf.cache_tick_period.SetSeconds(1);
    }
    scheduler.DeferTask(ltaNow+mudconf.cache_tick_period, PRIORITY_SYSTEM,
        dispatch_CacheTick, 0, 0);
#endif // !MEMORY_BASED

#if 0
    // Setup comsys channel scrubbing.
    //
    scheduler.DeferTask(ltaNow+time_45s, PRIORITY_SYSTEM, dispatch_CleanChannels, 0, 0);
#endif // 0

    // Setup one-shot task to enable restarting 10 seconds after startmux.
    //
    scheduler.DeferTask(ltaNow+time_15s, PRIORITY_OBJECT, dispatch_CanRestart, 0, 0);

#ifdef WIN32
    // Setup Periodic QueryPerformance Calibration.
    //
    scheduler.DeferTask(ltaNow+time_30s, PRIORITY_SYSTEM,
        dispatch_CalibrateQueryPerformance, 0, 0);

#endif // WIN32
}

void init_version

(

void

)

Definition at line 60 of file version.cpp.

References ENDLOG, LOG_ALWAYS, log_text(), mudstate, MUX_BUILD_DATE, STARTLOG, and statedata::version.

Referenced by main().

{
    STARTLOG(LOG_ALWAYS, "INI", "START");
    log_text("Starting: ");
    log_text(mudstate.version);
    ENDLOG;
    STARTLOG(LOG_ALWAYS, "INI", "START");
    log_text("Build date: ");
    log_text(MUX_BUILD_DATE);
    ENDLOG;
}

dbref insert_first	(	dbref	,
		dbref
	)

Definition at line 46 of file predicates.cpp.

References s_Next.

Referenced by do_clone(), do_drop(), do_get(), move_object(), and move_the_exit().

{
    s_Next(thing, head);
    return thing;
}

void list_cf_access

(

dbref

)

Definition at line 2153 of file conf.cpp.

References access_nametab, alloc_mbuf, check_access(), conftable, confparm::flags, God, listset_nametab(), and confparm::pname.

Referenced by do_list().

{
    CONF *tp;
    char *buff;

    buff = alloc_mbuf("list_cf_access");
    for (tp = conftable; tp->pname; tp++)
    {
        if (God(player) || check_access(player, tp->flags))
        {
            sprintf(buff, "%s:", tp->pname);
            listset_nametab(player, access_nametab, tp->flags, buff, true);
        }
    }
    free_mbuf(buff);
}

bool list_check	(	dbref	thing,
		dbref	player,
		char	type,
		char *	str,
		char *	raw_str,
		bool	check_parent
	)

Definition at line 1863 of file game.cpp.

References atr_match(), CMuxAlarm::bAlarmed, statedata::db_top, IsReal, mudstate, MuxAlarm, next, Next, No_Command, and NOTHING.

Referenced by process_command().

{
    bool bMatch = false;

    int limit = mudstate.db_top;
    while (NOTHING != thing)
    {
#ifdef REALITY_LVLS
        if ((thing != player)
           && (!(No_Command(thing)))
           && IsReal(thing, player))
#else
        if (  thing != player
           && !No_Command(thing))
#endif /* REALITY_LVLS */
        {
            bMatch |= atr_match(thing, player, type, str, raw_str, check_parent);
        }

        // Non-authoritative test of circular reference.
        //
        dbref next;
        if (  thing == (next = Next(thing))
           || --limit < 0
           || MuxAlarm.bAlarmed)
        {
            break;
        }
        thing = next;
    }
    return bMatch;
}

void list_siteinfo

(

dbref

)

Definition at line 2670 of file netcommon.cpp.

References statedata::access_list, list_sites(), mudstate, S_ACCESS, S_SUSPECT, and statedata::suspect_list.

Referenced by do_list().

{
    list_sites(player, mudstate.access_list, "Site Access", S_ACCESS);
    list_sites(player, mudstate.suspect_list, "Suspected Sites", S_SUSPECT);
}

void list_system_resources

(

dbref

player

)

Definition at line 4070 of file bsd.cpp.

References DebugTotalFiles, DebugTotalSockets, and notify.

Referenced by do_list().

{
    char buffer[80];

    int nTotal = 0;
    notify(player, "System Resources");

    sprintf(buffer, "Total Open Files: %ld", DebugTotalFiles);
    notify(player, buffer);
    nTotal += DebugTotalFiles;

    sprintf(buffer, "Total Sockets: %ld", DebugTotalSockets);
    notify(player, buffer);
    nTotal += DebugTotalSockets;

#ifdef WIN32
    sprintf(buffer, "Total Threads: %ld", DebugTotalThreads);
    notify(player, buffer);
    nTotal += DebugTotalThreads;

    sprintf(buffer, "Total Semaphores: %ld", DebugTotalSemaphores);
    notify(player, buffer);
    nTotal += DebugTotalSemaphores;
#endif // WIN32

    sprintf(buffer, "Total Handles (sum of above): %d", nTotal);
    notify(player, buffer);

#ifdef WIN32
    for (int i = 0; i < NUM_SLAVE_THREADS; i++)
    {
        sprintf(buffer, "Thread %d at line %u", i+1, SlaveThreadInfo[i].iDoing);
        notify(player, buffer);
    }
#endif // WIN32
}

void load_mail

(

FILE *

)

Definition at line 3003 of file mail.cpp.

References load_mail_V5(), and load_malias().

Referenced by load_game().

{
    char nbuf1[8];

    // Read the version number.
    //
    if (!fgets(nbuf1, sizeof(nbuf1), fp))
    {
        return;
    }
    if (strncmp(nbuf1, "+V5", 3) == 0)
    {
        load_mail_V5(fp);
    }
    else
    {
        return;
    }
    load_malias(fp);
}

void load_player_names

(

void

)

Definition at line 845 of file player.cpp.

References A_ALIAS, add_player_name(), alloc_lbuf, atr_pget_str(), DO_WHOLE_DB, free_lbuf, isPlayer, and Name.

Referenced by db_make_minimal(), and db_read().

{
    dbref i;
    DO_WHOLE_DB(i)
    {
        if (isPlayer(i))
        {
            add_player_name(i, Name(i));
        }
    }
    char *alias = alloc_lbuf("load_player_names");
    DO_WHOLE_DB(i)
    {
        if (isPlayer(i))
        {
            dbref aowner;
            int aflags;
            alias = atr_pget_str(alias, i, A_ALIAS, &aowner, &aflags);
            if (*alias)
            {
                add_player_name(i, alias);
            }
        }
    }
    free_lbuf(alias);
}

void local_connect	(	dbref	,
		int	,
		int
	)

Definition at line 152 of file local.cpp.

References UNUSED_PARAMETER.

Referenced by check_connect().

{
    UNUSED_PARAMETER(player);
    UNUSED_PARAMETER(isnew);
    UNUSED_PARAMETER(num);
}

void local_data_clone	(	dbref	,
		dbref
	)

Definition at line 179 of file local.cpp.

References UNUSED_PARAMETER.

Referenced by do_clone().

{
    UNUSED_PARAMETER(clone);
    UNUSED_PARAMETER(source);
}

void local_data_create

(

dbref

)

Definition at line 171 of file local.cpp.

References UNUSED_PARAMETER.

Referenced by create_player(), do_create(), do_dig(), FUNCTION(), and open_exit().

{
    UNUSED_PARAMETER(object);
}

void local_data_free

(

dbref

)

Definition at line 187 of file local.cpp.

References UNUSED_PARAMETER.

Referenced by destroy_obj().

{
    UNUSED_PARAMETER(object);
}

void local_dbck

(

void

)

Definition at line 144 of file local.cpp.

Referenced by do_dbck().

{
}

void local_disconnect	(	dbref	,
		int
	)

Definition at line 163 of file local.cpp.

References UNUSED_PARAMETER.

Referenced by announce_disconnect().

{
    UNUSED_PARAMETER(player);
    UNUSED_PARAMETER(num);
}

void local_dump_complete_signal

(

void

)

Definition at line 130 of file local.cpp.

Referenced by dump_database(), fork_and_dump(), and sighandler().

{
}

void local_dump_database

(

int

)

Definition at line 118 of file local.cpp.

References UNUSED_PARAMETER.

Referenced by dump_database_internal().

{
    UNUSED_PARAMETER(dump_type);
}

void local_presync_database

(

void

)

Definition at line 90 of file local.cpp.

Referenced by do_restart(), do_shutdown(), dump_database(), and fork_and_dump().

{
}

void local_presync_database_sigsegv

(

void

)

Definition at line 98 of file local.cpp.

Referenced by sighandler().

{
}

void local_shutdown

(

void

)

Definition at line 137 of file local.cpp.

Referenced by main().

{
}

void local_startup

(

void

)

Definition at line 67 of file local.cpp.

References commands_no_arg_add(), commands_one_arg_add(), commands_one_arg_cmdarg_add(), commands_two_arg_add(), commands_two_arg_argv_add(), commands_two_arg_argv_cmdarg_add(), commands_two_arg_cmdarg_add(), functions_add(), local_command_table_no_arg, local_command_table_one_arg, local_command_table_one_arg_cmdarg, local_command_table_two_arg, local_command_table_two_arg_argv, local_command_table_two_arg_cmdarg, local_command_table_two_argv_cmdarg, and local_funlist.

Referenced by main().

{
    // Add additional hardcode functions to the above table.
    //
    functions_add(local_funlist);

    // Add additional CMDENT_NO_ARG commands to the above table.
    //
    commands_no_arg_add(local_command_table_no_arg);
    commands_one_arg_add(local_command_table_one_arg);
    commands_one_arg_cmdarg_add(local_command_table_one_arg_cmdarg);
    commands_two_arg_add(local_command_table_two_arg);
    commands_two_arg_cmdarg_add(local_command_table_two_arg_cmdarg);
    commands_two_arg_argv_add(local_command_table_two_arg_argv);
    commands_two_arg_argv_cmdarg_add(local_command_table_two_argv_cmdarg);
}

bool locatable	(	dbref	,
		dbref	,
		dbref
	)

Definition at line 2080 of file predicates.cpp.

References Examinable, Find_Unfindable, Findable, Good_obj, NOTHING, where_is(), where_room(), and Wizard.

Referenced by FUNCTION().

{
    // No sense if trying to locate a bad object
    //
    if (!Good_obj(it))
    {
        return false;
    }

    dbref loc_it = where_is(it);

    // Succeed if we can examine the target, if we are the target, if we can
    // examine the location, if a wizard caused the lookup, or if the target
    // caused the lookup.
    //
    if (  Examinable(player, it)
       || Find_Unfindable(player)
       || loc_it == player
       || (  loc_it != NOTHING
          && (  Examinable(player, loc_it)
             || loc_it == where_is(player)))
       || Wizard(enactor)
       || it == enactor)
    {
        return true;
    }

    dbref room_it = where_room(it);
    bool findable_room;
    if (Good_obj(room_it))
    {
        findable_room = Findable(room_it);
    }
    else
    {
        findable_room = true;
    }

    // Succeed if we control the containing room or if the target is findable
    // and the containing room is not unfindable.
    //
    if (  (  room_it != NOTHING
          && Examinable(player, room_it))
       || Find_Unfindable(player)
       || (  Findable(it)
          && findable_room))
    {
        return true;
    }

    // We can't do it.
    //
    return false;
}

void log_name

(

dbref

)

Definition at line 169 of file log.cpp.

References statedata::bStandAlone, free_lbuf, GOD, Log, confdata::log_info, LOGOPT_FLAGS, LOGOPT_OWNER, mudconf, mudstate, Name, Owner, strip_ansi(), CLogFile::tinyprintf(), unparse_object(), unparse_object_numonly(), and CLogFile::WriteString().

Referenced by CF_HAND(), check_connect(), do_backup(), do_boot(), do_fixdb(), do_global(), do_name(), do_newpassword(), do_pcreate(), do_quota(), do_restart(), do_shout(), do_shutdown(), do_toad(), failconn(), log_name_and_loc(), queue_write_LEN(), report_timecheck(), and shutdownsock().

{
    if (mudstate.bStandAlone)
    {
        Log.tinyprintf("%s(#%d)", Name(target), target);
    }
    else
    {
        char *tp;

        if (mudconf.log_info & LOGOPT_FLAGS)
        {
            tp = unparse_object(GOD, target, false);
        }
        else
        {
            tp = unparse_object_numonly(target);
        }
        Log.WriteString(strip_ansi(tp));
        free_lbuf(tp);
        if (  (mudconf.log_info & LOGOPT_OWNER)
           && target != Owner(target))
        {
            if (mudconf.log_info & LOGOPT_FLAGS)
            {
                tp = unparse_object(GOD, Owner(target), false);
            }
            else
            {
                tp = unparse_object_numonly(Owner(target));
            }
            Log.tinyprintf("[%s]", strip_ansi(tp));
            free_lbuf(tp);
        }
    }
}

void log_name_and_loc

(

dbref

)

Definition at line 210 of file log.cpp.

References Has_location, Location, confdata::log_info, log_name(), log_text(), LOGOPT_LOC, and mudconf.

Referenced by check_connect(), do_boot(), do_command(), do_toad(), eval_boolexp(), process_command(), report(), and Task_RunQueueEntry().

{
    log_name(player);
    if (  (mudconf.log_info & LOGOPT_LOC)
       && Has_location(player))
    {
        log_text(" in ");
        log_name(Location(player));
    }
    return;
}

void log_number

(

int

)

Definition at line 148 of file log.cpp.

References Log, and CLogFile::WriteInteger().

Referenced by boot_slave(), Log_header_err(), report_timecheck(), and shovechars().

{
    Log.WriteInteger(num);
}

void log_perror	(	const char *	,
		const char *	,
		const char *	,
		const char *
	)

Definition at line 117 of file log.cpp.

References ENDLINE, CLogFile::Flush(), Log, log_text(), statedata::logging, mudstate, start_log(), and CLogFile::WriteString().

Referenced by close_sockets(), dump_database_internal(), fork_and_dump(), make_nolinger(), make_nonblocking(), make_socket(), and shovechars().

{
    start_log(primary, secondary);
    if (extra && *extra)
    {
        log_text("(");
        log_text(extra);
        log_text(") ");
    }

    // <Failing_object text>: <strerror() text>
    //
    Log.WriteString(failing_object);
    Log.WriteString(": ");
    Log.WriteString(strerror(errno));
#ifndef WIN32
    Log.WriteString(ENDLINE);
#endif // !WIN32
    Log.Flush();
    mudstate.logging--;
}

void DCL_CDECL log_printf	(	const char *	fmt,
			...
	)

Definition at line 153 of file log.cpp.

References Log, mux_vsnprintf(), SIZEOF_LOG_BUFFER, and CLogFile::WriteBuffer().

{
    va_list ap;
    va_start(ap, fmt);
    char aTempBuffer[SIZEOF_LOG_BUFFER];
    int nString = mux_vsnprintf(aTempBuffer, SIZEOF_LOG_BUFFER, fmt, ap);
    va_end(ap);
    Log.WriteBuffer(nString, aTempBuffer);
}

void log_text

(

const char *

)

Definition at line 143 of file log.cpp.

References Log, strip_ansi(), and CLogFile::WriteString().

Referenced by announce_connect(), announce_disconnect(), boot_slave(), CF_HAND(), cf_log_syntax(), cf_status_from_succfail(), check_connect(), do_backup(), do_boot(), do_command(), do_fixdb(), do_global(), do_link(), do_logged_out_internal(), do_mail_nuke(), do_mail_read(), do_name(), do_newpassword(), do_pcreate(), do_quota(), do_restart(), do_shout(), do_shutdown(), do_toad(), dump_database(), eval_boolexp(), failconn(), fcache_read(), fork_and_dump(), get_slave_result(), helpindex_read(), init_version(), CHashFile::Insert(), load_game(), Log_header_err(), log_name_and_loc(), log_perror(), Log_pointer_err(), log_signal(), log_signal_ignore(), Log_simple_err(), log_type_and_name(), LogStatBuf(), main(), CGuests::MakeGuestChar(), new_connection(), new_mail_message(), pool_free(), pool_free_lbuf(), process_command(), purge_going(), queue_write_LEN(), report(), report_timecheck(), ReportTopic(), shovechars(), shutdownsock(), Task_RunQueueEntry(), and ValidateHelpFileIndex().

{
    Log.WriteString(strip_ansi(text));
}

void log_type_and_name

(

dbref

)

Definition at line 245 of file log.cpp.

References Good_obj, log_text(), Name, and OBJTYP().

Referenced by Log_header_err(), Log_pointer_err(), Log_simple_err(), and purge_going().

{
    char nbuf[16];

    log_text(OBJTYP(thing));
    sprintf(nbuf, " #%d(", thing);
    log_text(nbuf);
    if (Good_obj(thing))
    {
        log_text(Name(thing));
    }
    log_text(")");
    return;
}

void logged_out0	(	dbref	executor,
		dbref	caller,
		dbref	enactor,
		int	key
	)

Definition at line 2512 of file netcommon.cpp.

References logged_out1().

{
    logged_out1(executor, caller, enactor, key, "");
}

void logged_out1	(	dbref	executor,
		dbref	caller,
		dbref	enactor,
		int	key,
		char *	arg
	)

Definition at line 2473 of file netcommon.cpp.

References DESC_ITER_PLAYER, do_logged_out_internal(), descriptor_data::last_time, s_Html, and UNUSED_PARAMETER.

Referenced by logged_out0().

{
    UNUSED_PARAMETER(caller);
    UNUSED_PARAMETER(enactor);

    // PUEBLOCLIENT affects all the player's connections.
    //
    if (key == CMD_PUEBLOCLIENT)
    {
        DESC *d;
        DESC_ITER_PLAYER(executor, d)
        {
            do_logged_out_internal(d, key, arg);
        }
        // Set the player's flag.
        //
        s_Html(executor);
        return;
    }

    // Other logged-out commands affect only the player's most recently
    // used connection.
    //
    DESC *d;
    DESC *dLatest = NULL;
    DESC_ITER_PLAYER(executor, d)
    {
        if (  dLatest == NULL
           || dLatest->last_time < d->last_time)
        {
            dLatest = d;
        }
    }
    if (dLatest != NULL)
    {
        do_logged_out_internal(dLatest, key, arg);
    }
}

void look_in	(	dbref	,
		dbref	,
		int
	)

Definition at line 1201 of file look.cpp.

References A_AFAIL, A_ASUCC, A_FAIL, A_LOCK, A_NAMEFORMAT, A_OFAIL, A_OSUCC, A_SUCC, alloc_lbuf, atr_pget, CONTENTS_LOCAL, could_doit(), did_it(), EV_EVAL, EV_FCHECK, EV_TOP, free_lbuf, Good_obj, Hearer(), Html, isRoom, LK_IDESC, LK_OBEYTERSE, LK_SHOWATTR, LK_SHOWEXIT, LK_SHOWVRML, Location, look_atrs(), look_contents(), look_exits(), MAX_GLOBAL_REGS, mudconf, mux_exec(), notify, notify_html, confdata::quiet_look, restore_global_regs(), save_and_clear_global_regs(), show_desc(), show_vrml_url(), Terse, confdata::terse_contents, confdata::terse_exits, and unparse_object().

Referenced by announce_connect(), do_look(), and move_object().

{
    // Only makes sense for things that can hear.
    //
    if (!Hearer(player))
    {
        return;
    }

    // If he needs the VMRL URL, send it:
    //
    if (key & LK_SHOWVRML)
    {
        show_vrml_url(player, loc);
    }

    // Use @nameformat (by Marlek) if it's present, otherwise, use the
    // name and if the player can link to it, it's dbref as well.
    //
    dbref aowner;
    int aflags;
    char *NameFormatBuffer = atr_pget(loc, A_NAMEFORMAT, &aowner, &aflags);
    char *NameFormat = NameFormatBuffer;

    if (*NameFormat)
    {
        char *FormatOutput = alloc_lbuf("look_name.FO");
        char *tPtr = FormatOutput;

        char *preserve[MAX_GLOBAL_REGS];
        int preserve_len[MAX_GLOBAL_REGS];
        save_and_clear_global_regs("look_in_save", preserve, preserve_len);

        mux_exec(FormatOutput, &tPtr, loc, player, player,
                EV_FCHECK | EV_EVAL | EV_TOP,
                &NameFormat, 0, 0);
        *tPtr = '\0';

        restore_global_regs("look_in_restore", preserve, preserve_len);
        notify(player, FormatOutput);

        free_lbuf(FormatOutput);
    }
    else
    {
        // Okay, no @NameFormat.  Show the normal name.
        //
        char *buff = unparse_object(player, loc, true);
        if (Html(player))
        {
            notify_html(player, "<center><h3>");
            notify(player, buff);
            notify_html(player, "</h3></center>");
        }
        else
        {
            notify(player, buff);
        }
        free_lbuf(buff);
    }
    free_lbuf(NameFormatBuffer);

    if (!Good_obj(loc))
    {
        // If we went to NOTHING et al, then skip the rest.
        //
        return;
    }

    // Tell him the description.
    //
    int showkey = 0;
    if (loc == Location(player))
    {
        showkey |= LK_IDESC;
    }
    if (key & LK_OBEYTERSE)
    {
        showkey |= LK_OBEYTERSE;
    }
    show_desc(player, loc, showkey);

    bool is_terse = (key & LK_OBEYTERSE) ? Terse(player) : false;

    // Tell him the appropriate messages if he has the key.
    //
    if (isRoom(loc))
    {
        int pattr, oattr, aattr;
        if (could_doit(player, loc, A_LOCK))
        {
            pattr = A_SUCC;
            oattr = A_OSUCC;
            aattr = A_ASUCC;
        }
        else
        {
            pattr = A_FAIL;
            oattr = A_OFAIL;
            aattr = A_AFAIL;
        }
        if (is_terse)
        {
            pattr = 0;
        }
        did_it(player, loc, pattr, NULL, oattr, NULL, aattr, (char **)NULL, 0);
    }

    // Tell him the attributes, contents and exits.
    //
    if (  (key & LK_SHOWATTR)
       && !mudconf.quiet_look
       && !is_terse)
    {
        look_atrs(player, loc, false);
    }
    if (  !is_terse
       || mudconf.terse_contents)
    {
        look_contents(player, loc, "Contents:", CONTENTS_LOCAL);
    }
    if (  (key & LK_SHOWEXIT)
       && (  !is_terse
          || mudconf.terse_exits))
    {
        look_exits(player, loc, "Obvious exits:");
    }
}

dbref lookup_player	(	dbref	,
		char *	,
		bool
	)

Definition at line 780 of file player.cpp.

References alloc_lbuf, find_connected_name(), free_lbuf, God, Good_obj, hashfindLEN(), Hidden, is_integer(), isPlayer, LOOKUP_TOKEN, mudstate, mux_atol(), mux_strlwr(), NOTHING, NUMBER_TOKEN, statedata::player_htab, safe_str, and string_compare().

Referenced by connect_player(), CGuests::Create(), create_obj(), do_alias(), do_chown(), do_editchannel(), do_fixdb(), do_icmd(), do_last(), do_mail_debug(), do_mail_retract1(), do_mail_review(), do_mail_stats(), do_malias_add(), do_malias_chown(), do_malias_create(), do_malias_remove(), do_name(), do_newpassword(), do_page(), do_quota(), do_stats(), FUNCTION(), internalPlayerFind(), make_numlist(), CGuests::MakeGuestChar(), match_player(), parse_msglist(), and search_setup().

{
    if (string_compare(name, "me") == 0)
    {
        return doer;
    }

    while (*name == LOOKUP_TOKEN)
    {
        name++;
    }
    dbref thing;
    if (*name == NUMBER_TOKEN)
    {
        name++;
        if (!is_integer(name, NULL))
        {
            return NOTHING;
        }
        thing = mux_atol(name);
        if (!Good_obj(thing))
        {
            return NOTHING;
        }
        if ( !(  isPlayer(thing)
              || God(doer)))
        {
            thing = NOTHING;
        }
        return thing;
    }
    char *temp, *tp;
    tp = temp = alloc_lbuf("lookup_player");
    safe_str(name, temp, &tp);
    *tp = '\0';
    mux_strlwr(temp);
    dbref *p = (int *)hashfindLEN(temp, strlen(temp), &mudstate.player_htab);
    free_lbuf(temp);
    if (!p)
    {
        if (check_who)
        {
            thing = find_connected_name(doer, name);
            if (Hidden(thing))
            {
                thing = NOTHING;
            }
        }
        else
        {
            thing = NOTHING;
        }
    }
    else if (!Good_obj(*p))
    {
        thing = NOTHING;
    }
    else
    {
        thing = *p;
    }

    return thing;
}

struct mail* mail_fetch	(	dbref	,
		int
	)

Definition at line 1976 of file mail.cpp.

References MailList::FirstItem(), Folder, MailList::IsEnd(), MailList::NextItem(), and player_folder().

Referenced by do_mail_fwd(), do_mail_reply(), mail_fetch_from(), and mail_fetch_message().

{
    int i = 0;
    MailList ml(player);
    struct mail *mp;
    for (mp = ml.FirstItem(); !ml.IsEnd(); mp = ml.NextItem())
    {
        if (Folder(mp) == player_folder(player))
        {
            i++;
            if (i == num)
            {
                return mp;
            }
        }
    }
    return NULL;
}

int mail_fetch_from	(	dbref	player,
		int	num
	)

Definition at line 2005 of file mail.cpp.

References mail::from, mail_fetch(), and NOTHING.

Referenced by FUNCTION().

{
    struct mail *mp = mail_fetch(player, num);
    if (mp)
    {
        return mp->from;
    }
    return NOTHING;
}

const char* mail_fetch_message	(	dbref	player,
		int	num
	)

Definition at line 1995 of file mail.cpp.

References mail_fetch(), MessageFetch(), and mail::number.

Referenced by FUNCTION().

{
    struct mail *mp = mail_fetch(player, num);
    if (mp)
    {
        return MessageFetch(mp->number);
    }
    return NULL;
}

void make_portlist	(	dbref	,
		dbref	,
		char *	,
		char **
	)

Definition at line 35 of file netcommon.cpp.

References DESC_ITER_CONN, descriptor_data::descriptor, ItemToList_AddInteger(), ItemToList_Final(), ItemToList_Init(), descriptor_data::player, and UNUSED_PARAMETER.

Referenced by FUNCTION().

{
    UNUSED_PARAMETER(player);

    ITL itl;
    ItemToList_Init(&itl, buff, bufc);

    DESC *d;
    DESC_ITER_CONN(d)
    {
        if (  d->player == target
           && !ItemToList_AddInteger(&itl, d->descriptor))
        {
            break;
        }
    }
    ItemToList_Final(&itl);
}

char* MakeCanonicalExitName	(	const char *	pName,
		int *	pnName,
		bool *	pbValid
	)

Definition at line 374 of file predicates.cpp.

References ANSI_ENDGOAL_NORMAL, ANSI_TruncateToField(), MakeCanonicalObjectName(), MBUF_SIZE, safe_mb_chr, safe_mb_str, and strip_ansi().

Referenced by create_obj(), and do_name().

{
    static char Buf[MBUF_SIZE];
    static char Out[MBUF_SIZE];

    *pnName = 0;
    *pbValid = false;

    if (!pName)
    {
        return NULL;
    }

    // Build the non-ANSI version so that we can parse for semicolons
    // safely.
    //
    char *pStripped = strip_ansi(pName);
    char *pBuf = Buf;
    safe_mb_str(pStripped, Buf, &pBuf);
    *pBuf = '\0';

    size_t nBuf = pBuf - Buf;
    pBuf = Buf;

    bool bHaveDisplay = false;

    char *pOut = Out;

    for (; nBuf;)
    {
        // Build (q,n) as the next segment.  Leave the the remaining segments as
        // (pBuf,nBuf).
        //
        char *q = strchr(pBuf, ';');
        size_t n;
        if (q)
        {
            *q = '\0';
            n = q - pBuf;
            q = pBuf;
            pBuf += n + 1;
            nBuf -= n + 1;
        }
        else
        {
            n = nBuf;
            q = pBuf;
            pBuf += nBuf;
            nBuf = 0;
        }

        if (bHaveDisplay)
        {
            // We already have the displayable name. We don't allow ANSI in
            // any segment but the first, so we can pull them directly from
            // the stripped buffer.
            //
            int  nN;
            bool bN;
            char *pN = MakeCanonicalObjectName(q, &nN, &bN);
            if (  bN
               && nN < MBUF_SIZE - (pOut - Out) - 1)
            {
                safe_mb_chr(';', Out, &pOut);
                safe_mb_str(pN, Out, &pOut);
            }
        }
        else
        {
            // We don't have the displayable name, yet. We know where the next
            // semicolon occurs, so we limit the visible width of the
            // truncation to that.  We should be picking up all the visible
            // characters leading up to the semicolon, but not including the
            // semi-colon.
            //
            int vw;
            ANSI_TruncateToField(pName, sizeof(Out), Out, n, &vw,
                ANSI_ENDGOAL_NORMAL);

            // vw should always be equal to n, but we'll just make sure.
            //
            if ((size_t)vw == n)
            {
                int  nN;
                bool bN;
                char *pN = MakeCanonicalObjectName(Out, &nN, &bN);
                if (  bN
                   && nN <= MBUF_SIZE - 1)
                {
                    safe_mb_str(pN, Out, &pOut);
                    bHaveDisplay = true;
                }
            }
        }
    }
    if (bHaveDisplay)
    {
        *pnName = pOut - Out;
        *pbValid = true;
        *pOut = '\0';
        return Out;
    }
    else
    {
        return NULL;
    }
}

char* MakeCanonicalObjectName	(	const char *	pName,
		int *	pnName,
		bool *	pbValid
	)

Definition at line 305 of file predicates.cpp.

References ANSI_ENDGOAL_NORMAL, ANSI_TruncateToField(), MBUF_SIZE, mux_isspace, mux_ObjectNameSet, and strip_ansi().

Referenced by create_obj(), do_clone(), do_fixdb(), do_name(), FUNCTION(), and MakeCanonicalExitName().

{
    static char Buf[MBUF_SIZE];

    *pnName = 0;
    *pbValid = false;

    if (!pName)
    {
        return NULL;
    }

    // Build up what the real name would be. If we pass all the
    // checks, this is what we will return as a result.
    //
    int nVisualWidth;
    int nBuf = ANSI_TruncateToField(pName, sizeof(Buf), Buf, MBUF_SIZE,
        &nVisualWidth, ANSI_ENDGOAL_NORMAL);

    // Disallow pure ANSI names. There must be at least -something-
    // visible.
    //
    if (nVisualWidth <= 0)
    {
        return NULL;
    }

    // Get the stripped version (Visible parts without color info).
    //
    size_t nStripped;
    char *pStripped = strip_ansi(Buf, &nStripped);

    // Do not allow LOOKUP_TOKEN, NUMBER_TOKEN, NOT_TOKEN, or SPACE
    // as the first character, or SPACE as the last character
    //
    if (  strchr("*!#", *pStripped)
       || mux_isspace(pStripped[0])
       || mux_isspace(pStripped[nStripped-1]))
    {
        return NULL;
    }

    // Only printable characters besides ARG_DELIMITER, AND_TOKEN,
    // and OR_TOKEN are allowed.
    //
    for (unsigned int i = 0; i < nStripped; i++)
    {
        if (!mux_ObjectNameSet(pStripped[i]))
        {
            return NULL;
        }
    }

    // Special names are specifically dis-allowed.
    //
    if (  (nStripped == 2 && memcmp("me", pStripped, 2) == 0)
       || (nStripped == 4 && (  memcmp("home", pStripped, 4) == 0
                             || memcmp("here", pStripped, 4) == 0)))
    {
        return NULL;
    }

    *pnName = nBuf;
    *pbValid = true;
    return Buf;
}

double MakeSpecialFloat

(

int

iWhich

)

Definition at line 82 of file funmath.cpp.

References SpecialFloatUnion::d, and SpecialFloatTable.

Referenced by mux_atof().

{
    return SpecialFloatTable[iWhich].d;
}

void malias_cleanup

(

dbref

player

)

Definition at line 4210 of file mail.cpp.

References ma_top, malias, and malias_cleanup1().

Referenced by ReleaseAllResources().

{
    for (int i = 0; i < ma_top; i++)
    {
        malias_cleanup1(malias[i], player);
    }
}

dbref match_controlled_handler	(	dbref	player,
		const char *	name,
		bool	bQuiet
	)

Definition at line 22 of file set.cpp.

References Controls, Good_obj, init_match(), MAT_EXIT_PARENTS, match_everything(), match_result(), noisy_match_result(), NOPERM_MESSAGE, NOTHING, notify_quiet, and NOTYPE.

{
    dbref mat;
    init_match(executor, name, NOTYPE);
    match_everything(MAT_EXIT_PARENTS);
    if (bQuiet)
    {
        mat = match_result();
    }
    else
    {
        mat = noisy_match_result();
    }
    if (!Good_obj(mat))
    {
        return mat;
    }

    if (Controls(executor, mat))
    {
        return mat;
    }
    if (!bQuiet)
    {
        notify_quiet(executor, NOPERM_MESSAGE);
    }
    return NOTHING;
}

dbref match_possessed	(	dbref	,
		dbref	,
		char *	,
		dbref	,
		bool
	)

Definition at line 1599 of file predicates.cpp.

References alloc_lbuf, Controls, d1, Dark, Enter_ok, free_lbuf, Good_obj, init_match(), match_neighbor(), match_possessed(), match_possession(), match_result(), NOPERM, NOTHING, NOTYPE, Opaque, and promote_dflt().

Referenced by do_get(), do_look(), and match_possessed().

{
    // First, check normally.
    //
    if (Good_obj(dflt))
    {
        return dflt;
    }

    // Didn't find it directly.  Recursively do a contents check.
    //
    dbref result, result1;
    char *buff, *place, *s1, *d1, *temp;
    char *start = target;
    while (*target)
    {
        // Fail if no ' characters.
        //
        place = target;
        target = strchr(place, '\'');
        if (  target == NULL
           || !*target)
        {
            return dflt;
        }

        // If string started with a ', skip past it
        //
        if (place == target)
        {
            target++;
            continue;
        }

        // If next character is not an s or a space, skip past
        //
        temp = target++;
        if (!*target)
        {
            return dflt;
        }
        if (  *target != 's'
           && *target != 'S'
           && *target != ' ')
        {
            continue;
        }

        // If character was not a space make sure the following character is
        // a space.
        //
        if (*target != ' ')
        {
            target++;
            if (!*target)
            {
                return dflt;
            }
            if (*target != ' ')
            {
                continue;
            }
        }

        // Copy the container name to a new buffer so we can terminate it.
        //
        buff = alloc_lbuf("is_posess");
        for (s1 = start, d1 = buff; *s1 && (s1 < temp); *d1++ = (*s1++))
        {
            ; // Nothing.
        }
        *d1 = '\0';

        // Look for the container here and in our inventory.  Skip past if we
        // can't find it.
        //
        init_match(thing, buff, NOTYPE);
        if (player == thing)
        {
            match_neighbor();
            match_possession();
        }
        else
        {
            match_possession();
        }
        result1 = match_result();

        free_lbuf(buff);
        if (!Good_obj(result1))
        {
            dflt = promote_dflt(dflt, result1);
            continue;
        }

        // If we don't control it and it is either dark or opaque, skip past.
        //
        bool control = Controls(player, result1);
        if (  (  Dark(result1)
              || Opaque(result1))
           && !control)
        {
            dflt = promote_dflt(dflt, NOTHING);
            continue;
        }

        // Validate object has the ENTER bit set, if requested.
        //
        if (  check_enter
           && !Enter_ok(result1)
           && !control)
        {
            dflt = promote_dflt(dflt, NOPERM);
            continue;
        }

        // Look for the object in the container.
        //
        init_match(result1, target, NOTYPE);
        match_possession();
        result = match_result();
        result = match_possessed(player, result1, target, result, check_enter);
        if (Good_obj(result))
        {
            return result;
        }
        dflt = promote_dflt(dflt, result);
    }
    return dflt;
}

bool member	(	dbref	,
		dbref
	)

Definition at line 95 of file predicates.cpp.

References DOLIST.

Referenced by eval_boolexp().

{
    DOLIST(list, list)
    {
        if (list == thing)
        {
            return true;
        }
    }
    return false;
}

char* modSpeech	(	dbref	player,
		char *	message,
		bool	bWhich,
		char *	command
	)

Definition at line 19 of file speech.cpp.

References A_SAYSTRING, A_SPEECHMOD, alloc_lbuf, atr_get, CMuxAlarm::bAlarmed, EV_EVAL, EV_FCHECK, EV_TOP, free_lbuf, mux_exec(), and MuxAlarm.

Referenced by BuildChannelMessage(), do_page(), do_pemit_single(), do_say(), do_shout(), and whisper_pose().

{
    dbref aowner;
    int aflags;
    char *mod = atr_get(player, bWhich ? A_SPEECHMOD : A_SAYSTRING,
        &aowner, &aflags);

    if (  mod[0] == '\0'
       || MuxAlarm.bAlarmed)
    {
        free_lbuf(mod);
        return NULL;
    }

    char *mod_orig = mod;
    char *new_message = alloc_lbuf("modspeech");
    char *t_ptr = new_message;
    char *args[2];
    args[0] = message;
    args[1] = command;
    mux_exec(new_message, &t_ptr, player, player, player,
        EV_FCHECK | EV_EVAL | EV_TOP, &mod, args, 2);
    *t_ptr = '\0';
    free_lbuf(mod_orig);
    return new_message;
}

const char* Moniker

(

dbref

thing

)

Definition at line 528 of file db.cpp.

References A_MONIKER, aszSpecialDBRefNames, atr_get_LEN(), confdata::cache_names, db, free_lbuf, LBUF_SIZE, MEMFREE, object::moniker, mudconf, object::name, Name, PureName(), StringClone(), StringCloneLen(), strip_accents(), and strip_ansi().

Referenced by announce_connect(), announce_disconnect(), BuildChannelMessage(), do_chanlist(), do_chboot(), do_destroy(), do_page(), do_pemit_single(), do_say(), do_shout(), do_train(), FUNCTION(), mail_check(), mail_return(), page_check(), page_return(), say_shout(), trimmed_name(), unparse_object(), and whisper_pose().

{
    if (thing < 0)
    {
        return aszSpecialDBRefNames[-thing];
    }
    if (db[thing].moniker)
    {
        return db[thing].moniker;
    }

    // Compare accent-stripped, ansi-stripped version of @moniker against
    // accent-stripped, ansi-stripped version of @name.
    //
    const char *pPureName = strip_accents(PureName(thing));
    char *pPureNameCopy = StringClone(pPureName);

    size_t nMoniker;
    dbref  aowner;
    int    aflags;
    char *pMoniker = atr_get_LEN(thing, A_MONIKER, &aowner, &aflags,
        &nMoniker);
    char *pPureMoniker = strip_accents(strip_ansi(pMoniker));

    const char *pReturn = NULL;
    static char tbuff[LBUF_SIZE];
    if (strcmp(pPureNameCopy, pPureMoniker) == 0)
    {
        // The stripped version of @moniker is the same as the stripped
        // version of @name, so (possibly cache and) use the unstripped
        // version of @moniker.
        //
        if (mudconf.cache_names)
        {
#ifdef MEMORY_BASED
            db[thing].moniker = StringCloneLen(pMoniker, nMoniker);
#else // MEMORY_BASED
            if (strcmp(pMoniker, Name(thing)) == 0)
            {
                db[thing].moniker = db[thing].name;
            }
            else
            {
                db[thing].moniker = StringCloneLen(pMoniker, nMoniker);
            }
#endif // MEMORY_BASED
            pReturn = db[thing].moniker;
        }
        else
        {
            memcpy(tbuff, pMoniker, nMoniker+1);
            pReturn = tbuff;
        }
    }
    else
    {
        // @moniker can't be used, so instead reflect @name (whether it
        // contains ANSI color and accents or not).
        //
#ifdef MEMORY_BASED
        if (mudconf.cache_names)
        {
            db[thing].moniker = StringClone(Name(thing));
            pReturn = db[thing].moniker;
        }
        else
        {
            pReturn = Name(thing);
        }
#else // MEMORY_BASED
        if (mudconf.cache_names)
        {
            db[thing].moniker = db[thing].name;
            pReturn = db[thing].moniker;
        }
        else
        {
            pReturn = Name(thing);
        }
#endif // MEMORY_BASED
    }
    free_lbuf(pMoniker);
    MEMFREE(pPureNameCopy);

    return pReturn;
}

void move_exit	(	dbref	,
		dbref	,
		bool	,
		const char *	,
		int
	)

Definition at line 468 of file move.cpp.

References A_AFAIL, A_EXITVARDEST, A_FAIL, A_LOCK, A_OFAIL, atr_get_raw(), atr_pget, could_doit(), Dark, did_it(), divest_object(), free_lbuf, get_atr(), get_exit_dest(), Going, Good_obj, HOME, Home, HUSH_EXIT, Location, move_via_exit(), NOTHING, notify, TYPE_EXIT, TYPE_PLAYER, TYPE_ROOM, TYPE_THING, Typeof, and Wizard.

Referenced by do_move(), do_teleport_single(), and process_command().

{
    int oattr, aattr;
    bool bDoit = false;

    dbref loc = Location(exit);
    if (atr_get_raw(exit, A_EXITVARDEST) != NULL)
    {
        loc = get_exit_dest(player, exit);
    }

    if (loc == HOME)
    {
        loc = Home(player);
    }

#ifdef WOD_REALMS
    if (Good_obj(loc) && (REALM_DO_HIDDEN_FROM_YOU != DoThingToThingVisibility(player, exit, ACTION_IS_MOVING)))
    {
        if (isShroud(player))
        {
            bDoit = true;
            int iShroudWarded = get_atr("SHROUD_WARDED");
            if (iShroudWarded > 0)
            {
                int owner, flags;
                char *buff = atr_pget(exit, iShroudWarded, &owner, &flags);
                if (buff)
                {
                    if (*buff)
                    {
                        bDoit = false;
                    }
                    free_lbuf(buff);
                }
            }
        }

        if (!bDoit && isUmbra(player))
        {
            bDoit = true;
            int iUmbraWarded = get_atr("UMBRA_WARDED");
            if (iUmbraWarded > 0)
            {
                int owner, flags;
                char *buff = atr_pget(exit, iUmbraWarded, &owner, &flags);
                if (buff)
                {
                    if (*buff)
                    {
                        bDoit = false;
                    }
                    free_lbuf(buff);
                }
            }
        }

        if (!bDoit && could_doit(player, exit, A_LOCK))
        {
            bDoit = true;
        }
    }
#else
    if (Good_obj(loc) && could_doit(player, exit, A_LOCK))
    {
        bDoit = true;
    }
#endif
    if (bDoit)
    {
        switch (Typeof(loc))
        {
        case TYPE_ROOM:
            move_via_exit(player, loc, NOTHING, exit, hush);
            if (divest)
                divest_object(player);
            break;
        case TYPE_PLAYER:
        case TYPE_THING:
            if (Going(loc))
            {
                notify(player, "You can't go that way.");
                return;
            }
            move_via_exit(player, loc, NOTHING, exit, hush);
            divest_object(player);
            break;
        case TYPE_EXIT:
            notify(player, "You can't go that way.");
            return;
        }
    }
    else
    {
        if ((Wizard(player) && Dark(player)) || (hush & HUSH_EXIT))
        {
            oattr = 0;
            aattr = 0;
        }
        else
        {
            oattr = A_OFAIL;
            aattr = A_AFAIL;
        }
        did_it(player, exit, A_FAIL, failmsg, oattr, NULL, aattr, (char **)NULL, 0);
    }
}

void move_object	(	dbref	,
		dbref
	)

Definition at line 180 of file move.cpp.

References Contents, Controls, giveto(), HOME, Home, insert_first(), isPlayer, LK_OBEYTERSE, LK_SHOWEXIT, Location, look_in(), mudconf, NOTHING, notify, confdata::one_coin, confdata::payfind, confdata::paylimit, Pennies(), RandomINT32(), remove_first(), s_Contents, s_Location, s_Next, and tprintf().

Referenced by check_connect(), check_dead_refs(), CGuests::Create(), do_pcreate(), CGuests::MakeGuestChar(), move_via_exit(), move_via_generic(), and move_via_teleport().

{
    dbref src = Location(thing);

    // Remove from the source location
    //
    if (src != NOTHING)
    {
        s_Contents(src, remove_first(Contents(src), thing));
    }

    // Special check for HOME
    //
    if (dest == HOME)
    {
        dest = Home(thing);
    }

    // Add to destination location
    //
    if (dest != NOTHING)
    {
        s_Contents(dest, insert_first(Contents(dest), thing));
    }
    else
    {
        s_Next(thing, NOTHING);
    }
    s_Location(thing, dest);

    // Look around and do the penny check
    //
    look_in(thing, dest, (LK_SHOWEXIT | LK_OBEYTERSE));
    if (  isPlayer(thing)
       && mudconf.payfind > 0
       && Pennies(thing) < mudconf.paylimit
       && !Controls(thing, dest)
       && RandomINT32(0, mudconf.payfind-1) == 0)
    {
        giveto(thing, 1);
        notify(thing, tprintf("You found a %s!", mudconf.one_coin));
    }
}

void move_via_generic	(	dbref	,
		dbref	,
		dbref	,
		int
	)

Definition at line 314 of file move.cpp.

References A_AMOVE, A_MOVE, A_OMOVE, did_it(), Hearer(), HOME, Home, Location, move_object(), process_enter_loc(), and process_leave_loc().

Referenced by check_contents_chains(), destroy_player(), destroy_thing(), divest_object(), do_clone(), do_create(), do_drop(), do_enter_internal(), do_get(), do_kill(), do_leave(), do_move(), empty_obj(), FUNCTION(), give_thing(), process_dropped_dropto(), and send_dropto().

{
    if (dest == HOME)
    {
        dest = Home(thing);
    }

    dbref src = Location(thing);
    bool canhear = Hearer(thing);
    process_leave_loc(thing, dest, cause, canhear, hush);
    move_object(thing, dest);
    did_it(thing, thing, A_MOVE, NULL, A_OMOVE, NULL, A_AMOVE,
           (char **)NULL, 0);
    process_enter_loc(thing, src, cause, canhear, hush);
}

bool move_via_teleport	(	dbref	,
		dbref	,
		dbref	,
		int
	)

Definition at line 372 of file move.cpp.

References A_AMOVE, A_ATOFAIL, A_ATPORT, A_LTELOUT, A_MOVE, A_OMOVE, A_OTOFAIL, A_OTPORT, A_OXTPORT, A_TOFAIL, A_TPORT, could_doit(), did_it(), divest_object(), Good_obj, Hearer(), HOME, Home, HUSH_ENTER, HUSH_LEAVE, isExit, isRoom, Location, move_object(), move_the_exit(), mudconf, NOTHING, notify_quiet, confdata::ntfy_nest_lim, process_enter_loc(), process_leave_loc(), and process_sticky_dropto().

Referenced by do_dig(), and do_teleport_single().

{
    dbref curr;
    int count;
    char *failmsg;

    dbref src = Location(thing);
    if ((dest != HOME) && Good_obj(src))
    {
        curr = src;
        for (count = mudconf.ntfy_nest_lim; count > 0; count--)
        {
            if (!could_doit(thing, curr, A_LTELOUT))
            {
                if ((thing == cause) || (cause == NOTHING))
                {
                    failmsg = "You can't teleport out!";
                }
                else
                {
                    failmsg = "You can't be teleported out!";
                    notify_quiet(cause, "You can't teleport that out!");
                }
                did_it(thing, src,
                       A_TOFAIL, failmsg, A_OTOFAIL, NULL,
                       A_ATOFAIL, (char **)NULL, 0);
                return false;
            }
            if (isRoom(curr))
            {
                break;
            }
            curr = Location(curr);
        }
    }

    if (isExit(thing))
    {
        move_the_exit(thing, dest);
        return true;
    }
    if (dest == HOME)
    {
        dest = Home(thing);
    }
    bool canhear = Hearer(thing);
    if (!(hush & HUSH_LEAVE))
    {
        did_it(thing, thing, 0, NULL, A_OXTPORT, NULL, 0,
            (char **)NULL, 0);
    }
    process_leave_loc(thing, dest, NOTHING, canhear, hush);

    move_object(thing, dest);

    if (!(hush & HUSH_ENTER))
    {
        did_it(thing, thing, A_TPORT, NULL, A_OTPORT, NULL, A_ATPORT,
            (char **)NULL, 0);
    }
    did_it(thing, thing, A_MOVE, NULL, A_OMOVE, NULL, A_AMOVE,
        (char **)NULL, 0);
    process_enter_loc(thing, src, NOTHING, canhear, hush);
    divest_object(thing);
    process_sticky_dropto(src, thing);
    return true;
}

const char* mux_crypt	(	const char *	szPassword,
		const char *	szSalt,
		int *	piType
	)

Definition at line 307 of file player.cpp.

References BLOWFISH_PREFIX_LENGTH, crypt(), CRYPT_BLOWFISH, CRYPT_CLEARTEXT, CRYPT_DES, CRYPT_DES_EXT, CRYPT_FAIL, CRYPT_MD5, CRYPT_OTHER, CRYPT_SHA1, EncodeBase64(), ENCODED_HASH_LENGTH, ENCODED_SALT_LENGTH, SHA1_CONTEXT::H, MD5_PREFIX_LENGTH, SHA1_Compute(), SHA1_Final(), SHA1_Init(), and SHA1_PREFIX_LENGTH.

Referenced by ChangePassword(), and check_pass().

{
    const char *pSaltField = NULL;
    size_t nSaltField = 0;

    *piType = CRYPT_FAIL;

    if (szSetting[0] == '$')
    {
        const char *p = strchr(szSetting+1, '$');
        if (p)
        {
            p++;
            size_t nAlgo = p - szSetting;
            if (  nAlgo == SHA1_PREFIX_LENGTH
               && memcmp(szSetting, szSHA1Prefix, SHA1_PREFIX_LENGTH) == 0)
            {
                // SHA-1
                //
                pSaltField = p;
                p = strchr(pSaltField, '$');
                if (p)
                {
                    nSaltField = p - pSaltField;
                }
                else
                {
                    nSaltField = strlen(pSaltField);
                }
                if (nSaltField <= ENCODED_SALT_LENGTH)
                {
                    *piType = CRYPT_SHA1;
                }
            }
            else if (  nAlgo == MD5_PREFIX_LENGTH
                    && memcmp(szSetting, szMD5Prefix, MD5_PREFIX_LENGTH) == 0)
            {
                *piType = CRYPT_MD5;
            }
            else if (  nAlgo == BLOWFISH_PREFIX_LENGTH
                    && memcmp(szSetting, szBlowfishPrefix, BLOWFISH_PREFIX_LENGTH) == 0)
            {
                *piType = CRYPT_BLOWFISH;
            }
            else
            {
                *piType = CRYPT_OTHER;
            }
        }
    }
    else if (szSetting[0] == '_')
    {
        *piType = CRYPT_DES_EXT;
    }
    else
    {
#if 0
        // Strictly speaking, we can say the algorithm is DES.
        //
        *piType = CRYPT_DES;
#else
        // However, in order to support clear-text passwords, we restrict
        // ourselves to only verifying an existing DES-encrypted password and
        // we assume a fixed salt of 'XX'.  If you have been using a different
        // salt, or if you need to generate a DES-encrypted password, the
        // following code won't work.
        //
        size_t nSetting = strlen(szSetting);
        if (  nSetting == 13
           && memcmp(szSetting, "XX", 2) == 0)
        {
            *piType = CRYPT_DES;
        }
        else
        {
            *piType = CRYPT_CLEARTEXT;
        }
#endif
    }

    switch (*piType)
    {
    case CRYPT_FAIL:
        return szFail;

    case CRYPT_CLEARTEXT:
        return szPassword;

    case CRYPT_MD5:
    case CRYPT_BLOWFISH:
    case CRYPT_OTHER:
    case CRYPT_DES_EXT:
#ifdef WIN32
        // The WIN32 release only supports SHA1, DES, and clear-text.
        //
        return szFail;
#endif // WIN32

    case CRYPT_DES:
#if defined(HAVE_LIBCRYPT) \
 || defined(HAVE_CRYPT)
        return crypt(szPassword, szSetting);
#else
        return szFail;
#endif
    }

    // Calculate SHA-1 Hash.
    //
    SHA1_CONTEXT shac;

    SHA1_Init(&shac);
    SHA1_Compute(&shac, nSaltField, pSaltField);
    SHA1_Compute(&shac, strlen(szPassword), szPassword);
    SHA1_Final(&shac);

    // Serialize 5 UINT32 words into big-endian.
    //
    char szHashRaw[21];
    char *p = szHashRaw;

    int i;
    for (i = 0; i <= 4; i++)
    {
        *p++ = (UINT8)(shac.H[i] >> 24);
        *p++ = (UINT8)(shac.H[i] >> 16);
        *p++ = (UINT8)(shac.H[i] >>  8);
        *p++ = (UINT8)(shac.H[i]      );
    }
    *p = '\0';

    //          1         2         3         4
    // 12345678901234567890123456789012345678901234567
    // $SHA1$ssssssssssss$hhhhhhhhhhhhhhhhhhhhhhhhhhhh
    //
    static char buf[SHA1_PREFIX_LENGTH + ENCODED_SALT_LENGTH + 1 + ENCODED_HASH_LENGTH + 1 + 16];
    strcpy(buf, szSHA1Prefix);
    memcpy(buf + SHA1_PREFIX_LENGTH, pSaltField, nSaltField);
    buf[SHA1_PREFIX_LENGTH + nSaltField] = '$';
    EncodeBase64(20, szHashRaw, buf + SHA1_PREFIX_LENGTH + nSaltField + 1);
    return buf;
}

char* mux_dtoa	(	double	d,
		int	mode,
		int	ndigits,
		int *	decpt,
		int *	sign,
		char **	rve
	)

Definition at line 2626 of file strtod.cpp.

References Balloc(), Bcopy, Bfree(), Bias, bigtens, Bletch, Bndry_mask, cmp(), d2b(), diff(), dtoa_result, dval, Exp_11, Exp_mask, Exp_msk1, Exp_shift1, Flt_Rounds, Frac_mask, Frac_mask1, freedtoa(), hi0bits(), i2b(), Int_max, Bigint::k, Log2P, Long, lshift(), mult(), multadd(), n_bigtens, nrv_alloc(), P, pow5mult(), Quick_max, quorem(), Rounding, rv_alloc(), Sign_bit, Ten_pmax, tens, Bigint::wds, word0, word1, and Bigint::x.

Referenced by mux_ftoa(), and NearestPretty().

{
 /* Arguments ndigits, decpt, sign are similar to those
    of ecvt and fcvt; trailing zeros are suppressed from
    the returned string.  If not null, *rve is set to point
    to the end of the return value.  If d is +-Infinity or NaN,
    then *decpt is set to 9999.

    mode:
        0 ==> shortest string that yields d when read in
            and rounded to nearest.
        1 ==> like 0, but with Steele & White stopping rule;
            e.g. with IEEE P754 arithmetic , mode 0 gives
            1e23 whereas mode 1 gives 9.999999999999999e22.
        2 ==> max(1,ndigits) significant digits.  This gives a
            return value similar to that of ecvt, except
            that trailing zeros are suppressed.
        3 ==> through ndigits past the decimal point.  This
            gives a return value similar to that from fcvt,
            except that trailing zeros are suppressed, and
            ndigits can be negative.
        4,5 ==> similar to 2 and 3, respectively, but (in
            round-nearest mode) with the tests of mode 0 to
            possibly return a shorter string that rounds to d.
            With IEEE arithmetic and compilation with
            -DHonor_FLT_ROUNDS, modes 4 and 5 behave the same
            as modes 2 and 3 when FLT_ROUNDS != 1.
        6-9 ==> Debugging modes similar to mode - 4:  don't try
            fast floating-point estimate (if applicable).

        Values of mode other than 0-9 are treated as mode 0.

        Sufficient space is allocated to the return value
        to hold the suppressed trailing zeros.
    */

    int bbits, b2, b5, be, dig, i, ieps, ilim = 0, ilim0 = 0, ilim1 = 0,
        j, j1, k, k0, k_check, leftright, m2, m5, s2, s5,
        spec_case, try_quick;
    Long L;
#ifndef Sudden_Underflow
    int denorm;
    ULong x;
#endif
    Bigint *b = NULL, *b1 = NULL, *delta = NULL, *mlo = NULL, *mhi = NULL, *S = NULL;
    double d2, ds, eps;
    char *s, *s0;
#ifdef Honor_FLT_ROUNDS
    int rounding;
#endif
#ifdef SET_INEXACT
    int inexact, oldinexact;
#endif

    if (dtoa_result)
    {
        freedtoa(dtoa_result);
        dtoa_result = 0;
    }

    if (word0(d) & Sign_bit)
    {
        /* set sign for everything, including 0's and NaNs */
        *sign = 1;
        word0(d) &= ~Sign_bit;  /* clear sign bit */
    }
    else
    {
        *sign = 0;
    }

#if defined(IEEE_Arith) + defined(VAX)
#ifdef IEEE_Arith
    if ((word0(d) & Exp_mask) == Exp_mask)
#else
    if (word0(d)  == 0x8000)
#endif
    {
        /* Infinity or NaN */
        *decpt = 9999;
#ifdef IEEE_Arith
        if (!word1(d) && !(word0(d) & 0xfffff))
        {
            return nrv_alloc("Inf", rve, 8);
        }
#endif
        return nrv_alloc("NaN", rve, 3);
    }
#endif
#ifdef IBM
    dval(d) += 0; /* normalize */
#endif
    if (!dval(d))
    {
        *decpt = 1;
        return nrv_alloc("0", rve, 1);
    }

#ifdef SET_INEXACT
    try_quick = oldinexact = get_inexact();
    inexact = 1;
#endif
#ifdef Honor_FLT_ROUNDS
    if ((rounding = Flt_Rounds) >= 2)
    {
        if (*sign)
        {
            rounding = rounding == 2 ? 0 : 2;
        }
        else
        {
            if (rounding != 2)
            {
                rounding = 0;
            }
        }
    }
#endif

    b = d2b(dval(d), &be, &bbits);
#ifdef Sudden_Underflow
    i = (int)(word0(d) >> Exp_shift1 & (Exp_mask>>Exp_shift1));
#else
    if ((i = (int)(word0(d) >> Exp_shift1 & (Exp_mask>>Exp_shift1))))
    {
#endif
        dval(d2) = dval(d);
        word0(d2) &= Frac_mask1;
        word0(d2) |= Exp_11;
#ifdef IBM
        if (j = 11 - hi0bits(word0(d2) & Frac_mask))
        {
            dval(d2) /= 1 << j;
        }
#endif

        /* log(x)   ~=~ log(1.5) + (x-1.5)/1.5
         * log10(x)  =  log(x) / log(10)
         *      ~=~ log(1.5)/log(10) + (x-1.5)/(1.5*log(10))
         * log10(d) = (i-Bias)*log(2)/log(10) + log10(d2)
         *
         * This suggests computing an approximation k to log10(d) by
         *
         * k = (i - Bias)*0.301029995663981
         *  + ( (d2-1.5)*0.289529654602168 + 0.176091259055681 );
         *
         * We want k to be too large rather than too small.
         * The error in the first-order Taylor series approximation
         * is in our favor, so we just round up the constant enough
         * to compensate for any error in the multiplication of
         * (i - Bias) by 0.301029995663981; since |i - Bias| <= 1077,
         * and 1077 * 0.30103 * 2^-52 ~=~ 7.2e-14,
         * adding 1e-13 to the constant term more than suffices.
         * Hence we adjust the constant term to 0.1760912590558.
         * (We could get a more accurate k by invoking log10,
         *  but this is probably not worthwhile.)
         */

        i -= Bias;
#ifdef IBM
        i <<= 2;
        i += j;
#endif
#ifndef Sudden_Underflow
        denorm = 0;
    }
    else
    {
        /* d is denormalized */

        i = bbits + be + (Bias + (P-1) - 1);
        x = i > 32  ? word0(d) << (64 - i) | word1(d) >> (i - 32)
                : word1(d) << (32 - i);
        dval(d2) = x;
        word0(d2) -= 31*Exp_msk1; /* adjust exponent */
        i -= (Bias + (P-1) - 1) + 1;
        denorm = 1;
    }
#endif
    ds = (dval(d2)-1.5)*0.289529654602168 + 0.1760912590558 + i*0.301029995663981;
    k = (int)ds;
    if (ds < 0. && ds != k)
    {
        k--;    /* want k = floor(ds) */
    }
    k_check = 1;
    if (k >= 0 && k <= Ten_pmax)
    {
        if (dval(d) < tens[k])
        {
            k--;
        }
        k_check = 0;
    }
    j = bbits - i - 1;
    if (j >= 0)
    {
        b2 = 0;
        s2 = j;
    }
    else
    {
        b2 = -j;
        s2 = 0;
    }
    if (k >= 0)
    {
        b5 = 0;
        s5 = k;
        s2 += k;
    }
    else
    {
        b2 -= k;
        b5 = -k;
        s5 = 0;
    }
    if (mode < 0 || mode > 9)
    {
        mode = 0;
    }

#ifndef SET_INEXACT
#ifdef Check_FLT_ROUNDS
    try_quick = Rounding == 1;
#else
    try_quick = 1;
#endif
#endif /*SET_INEXACT*/

    if (mode > 5)
    {
        mode -= 4;
        try_quick = 0;
    }
    leftright = 1;
    switch (mode)
    {
    case 0:
    case 1:
        ilim = ilim1 = -1;
        i = 18;
        ndigits = 0;
        break;
    case 2:
        leftright = 0;
        /* no break */
    case 4:
        if (ndigits <= 0)
        {
            ndigits = 1;
        }
        ilim = ilim1 = i = ndigits;
        break;
    case 3:
        leftright = 0;
        /* no break */
    case 5:
        i = ndigits + k + 1;
        ilim = i;
        ilim1 = i - 1;
        if (i <= 0)
        {
            i = 1;
        }
    }
    s = s0 = rv_alloc(i);

#ifdef Honor_FLT_ROUNDS
    if (mode > 1 && rounding != 1)
    {
        leftright = 0;
    }
#endif

    if (ilim >= 0 && ilim <= Quick_max && try_quick)
    {
        /* Try to get by with floating-point arithmetic. */

        i = 0;
        dval(d2) = dval(d);
        k0 = k;
        ilim0 = ilim;
        ieps = 2; /* conservative */
        if (k > 0)
        {
            ds = tens[k&0xf];
            j = k >> 4;
            if (j & Bletch)
            {
                /* prevent overflows */
                j &= Bletch - 1;
                dval(d) /= bigtens[n_bigtens-1];
                ieps++;
            }
            for (; j; j >>= 1, i++)
            {
                if (j & 1)
                {
                    ieps++;
                    ds *= bigtens[i];
                }
            }
            dval(d) /= ds;
        }
        else if ((j1 = -k))
        {
            dval(d) *= tens[j1 & 0xf];
            for (j = j1 >> 4; j; j >>= 1, i++)
            {
                if (j & 1)
                {
                    ieps++;
                    dval(d) *= bigtens[i];
                }
            }
        }
        if (k_check && dval(d) < 1. && ilim > 0)
        {
            if (ilim1 <= 0)
            {
                goto fast_failed;
            }
            ilim = ilim1;
            k--;
            dval(d) *= 10.;
            ieps++;
        }
        dval(eps) = ieps*dval(d) + 7.;
        word0(eps) -= (P-1)*Exp_msk1;
        if (ilim == 0)
        {
            S = mhi = 0;
            dval(d) -= 5.;
            if (dval(d) > dval(eps))
            {
                goto one_digit;
            }
            if (dval(d) < -dval(eps))
            {
                goto no_digits;
            }
            goto fast_failed;
        }
#ifndef No_leftright
        if (leftright)
        {
            /* Use Steele & White method of only
             * generating digits needed.
             */
            dval(eps) = 0.5/tens[ilim-1] - dval(eps);
            for (i = 0;;)
            {
                L = (Long)dval(d);
                dval(d) -= L;
                *s++ = '0' + (int)L;
                if (dval(d) < dval(eps))
                {
                    goto ret1;
                }
                if (1. - dval(d) < dval(eps))
                {
                    goto bump_up;
                }
                if (++i >= ilim)
                {
                    break;
                }
                dval(eps) *= 10.;
                dval(d) *= 10.;
            }
        }
        else
        {
#endif
            /* Generate ilim digits, then fix them up. */
            dval(eps) *= tens[ilim-1];
            for (i = 1;; i++, dval(d) *= 10.)
            {
                L = (Long)(dval(d));
                if (!(dval(d) -= L))
                {
                    ilim = i;
                }
                *s++ = '0' + (int)L;
                if (i == ilim)
                {
                    if (dval(d) > 0.5 + dval(eps))
                    {
                        goto bump_up;
                    }
                    else if (dval(d) < 0.5 - dval(eps))
                    {
                        while (*--s == '0')
                        {
                            ; // Nothing.
                        }
                        s++;
                        goto ret1;
                    }
                    break;
                }
            }
#ifndef No_leftright
        }
#endif
fast_failed:
        s = s0;
        dval(d) = dval(d2);
        k = k0;
        ilim = ilim0;
    }

    /* Do we have a "small" integer? */

    if (be >= 0 && k <= Int_max)
    {
        /* Yes. */
        ds = tens[k];
        if (ndigits < 0 && ilim <= 0)
        {
            S = mhi = 0;
            if (ilim < 0 || dval(d) <= 5*ds)
            {
                goto no_digits;
            }
            goto one_digit;
        }
        for (i = 1; ; i++, dval(d) *= 10.0)
        {
            L = (Long)(dval(d) / ds);
            dval(d) -= L*ds;
#ifdef Check_FLT_ROUNDS
            /* If FLT_ROUNDS == 2, L will usually be high by 1 */
            if (dval(d) < 0)
            {
                L--;
                dval(d) += ds;
            }
#endif
            if (ds <= dval(d))
            {
                L++;
                dval(d) -= ds;
            }
            *s++ = '0' + (int)L;
            if (!dval(d))
            {
#ifdef SET_INEXACT
                inexact = 0;
#endif
                break;
            }
            if (i == ilim)
            {
#ifdef Honor_FLT_ROUNDS
                if (mode > 1)
                {
                    switch (rounding)
                    {
                    case 0: goto ret1;
                    case 2: goto bump_up;
                    }
                }
#endif
                dval(d) += dval(d);
                if (dval(d) > ds || dval(d) == ds && L & 1)
                {
bump_up:
                    while (*--s == '9')
                    {
                        if (s == s0)
                        {
                            k++;
                            *s = '0';
                            break;
                        }
                    }
                    ++*s++;
                }
                break;
            }
        }
        goto ret1;
    }

    m2 = b2;
    m5 = b5;
    mhi = mlo = 0;
    if (leftright)
    {
        i =
#ifndef Sudden_Underflow
            denorm ? be + (Bias + (P-1) - 1 + 1) :
#endif
#ifdef IBM
            1 + 4*P - 3 - bbits + ((bbits + be - 1) & 3);
#else
            1 + P - bbits;
#endif
        b2 += i;
        s2 += i;
        mhi = i2b(1);
    }
    if (m2 > 0 && s2 > 0)
    {
        i = m2 < s2 ? m2 : s2;
        b2 -= i;
        m2 -= i;
        s2 -= i;
    }
    if (b5 > 0)
    {
        if (leftright)
        {
            if (m5 > 0)
            {
                mhi = pow5mult(mhi, m5);
                b1 = mult(mhi, b);
                Bfree(b);
                b = b1;
            }
            if ((j = b5 - m5))
            {
                b = pow5mult(b, j);
            }
        }
        else
        {
            b = pow5mult(b, b5);
        }
    }
    S = i2b(1);
    if (s5 > 0)
    {
        S = pow5mult(S, s5);
    }

    /* Check for special case that d is a normalized power of 2. */

    spec_case = 0;
    if ((mode < 2 || leftright)
#ifdef Honor_FLT_ROUNDS
            && rounding == 1
#endif
                )
    {
        if (!word1(d) && !(word0(d) & Bndry_mask)
#ifndef Sudden_Underflow
         && word0(d) & (Exp_mask & ~Exp_msk1)
#endif
                )
        {
            /* The special case */
            b2 += Log2P;
            s2 += Log2P;
            spec_case = 1;
        }
    }

    /* Arrange for convenient computation of quotients:
     * shift left if necessary so divisor has 4 leading 0 bits.
     *
     * Perhaps we should just compute leading 28 bits of S once
     * and for all and pass them and a shift to quorem, so it
     * can do shifts and ors to compute the numerator for q.
     */
#ifdef Pack_32
    if ((i = ((s5 ? 32 - hi0bits(S->x[S->wds-1]) : 1) + s2) & 0x1f))
    {
        i = 32 - i;
    }
#else
    if ((i = ((s5 ? 32 - hi0bits(S->x[S->wds-1]) : 1) + s2) & 0xf))
    {
        i = 16 - i;
    }
#endif
    if (i > 4)
    {
        i -= 4;
        b2 += i;
        m2 += i;
        s2 += i;
    }
    else if (i < 4)
    {
        i += 28;
        b2 += i;
        m2 += i;
        s2 += i;
    }
    if (b2 > 0)
    {
        b = lshift(b, b2);
    }
    if (s2 > 0)
    {
        S = lshift(S, s2);
    }
    if (k_check)
    {
        if (cmp(b,S) < 0)
        {
            k--;
            b = multadd(b, 10, 0);  /* we botched the k estimate */
            if (leftright)
            {
                mhi = multadd(mhi, 10, 0);
            }
            ilim = ilim1;
        }
    }
    if (ilim <= 0 && (mode == 3 || mode == 5))
    {
        if (ilim < 0 || cmp(b,S = multadd(S,5,0)) <= 0)
        {
            /* no digits, fcvt style */
no_digits:
            k = -1 - ndigits;
            goto ret;
        }
one_digit:
        *s++ = '1';
        k++;
        goto ret;
    }
    if (leftright)
    {
        if (m2 > 0)
        {
            mhi = lshift(mhi, m2);
        }

        /* Compute mlo -- check for special case
         * that d is a normalized power of 2.
         */

        mlo = mhi;
        if (spec_case)
        {
            mhi = Balloc(mhi->k);
            Bcopy(mhi, mlo);
            mhi = lshift(mhi, Log2P);
        }

        for (i = 1;;i++)
        {
            dig = quorem(b,S) + '0';
            /* Do we yet have the shortest decimal string
             * that will round to d?
             */
            j = cmp(b, mlo);
            delta = diff(S, mhi);
            j1 = delta->sign ? 1 : cmp(b, delta);
            Bfree(delta);
#ifndef ROUND_BIASED
            if (j1 == 0 && mode != 1 && !(word1(d) & 1)
#ifdef Honor_FLT_ROUNDS
                && rounding >= 1
#endif
                                   )
            {
                if (dig == '9')
                {
                    goto round_9_up;
                }
                if (j > 0)
                {
                    dig++;
                }
#ifdef SET_INEXACT
                else if (!b->x[0] && b->wds <= 1)
                {
                    inexact = 0;
                }
#endif
                *s++ = dig;
                goto ret;
            }
#endif
            if (j < 0 || j == 0 && mode != 1
#ifndef ROUND_BIASED
                            && !(word1(d) & 1)
#endif
                    )
            {
                if (!b->x[0] && b->wds <= 1)
                {
#ifdef SET_INEXACT
                    inexact = 0;
#endif
                    goto accept_dig;
                }
#ifdef Honor_FLT_ROUNDS
                if (mode > 1)
                {
                    switch (rounding)
                    {
                    case 0: goto accept_dig;
                    case 2: goto keep_dig;
                    }
                }
#endif /*Honor_FLT_ROUNDS*/
                if (j1 > 0)
                {
                    b = lshift(b, 1);
                    j1 = cmp(b, S);
                    if (  (j1 > 0 || j1 == 0 && dig & 1)
                       && dig++ == '9')
                    {
                        goto round_9_up;
                    }
                }
accept_dig:
                *s++ = dig;
                goto ret;
            }
            if (j1 > 0)
            {
#ifdef Honor_FLT_ROUNDS
                if (!rounding)
                {
                    goto accept_dig;
                }
#endif
                if (dig == '9')
                {
                    /* possible if i == 1 */
round_9_up:
                    *s++ = '9';
                    goto roundoff;
                }
                *s++ = dig + 1;
                goto ret;
            }
#ifdef Honor_FLT_ROUNDS
keep_dig:
#endif
            *s++ = dig;
            if (i == ilim)
            {
                break;
            }
            b = multadd(b, 10, 0);
            if (mlo == mhi)
            {
                mlo = mhi = multadd(mhi, 10, 0);
            }
            else
            {
                mlo = multadd(mlo, 10, 0);
                mhi = multadd(mhi, 10, 0);
            }
        }
    }
    else
    {
        for (i = 1;; i++)
        {
            *s++ = dig = quorem(b,S) + '0';
            if (!b->x[0] && b->wds <= 1)
            {
#ifdef SET_INEXACT
                inexact = 0;
#endif
                goto ret;
            }
            if (i >= ilim)
            {
                break;
            }
            b = multadd(b, 10, 0);
        }
    }

    /* Round off last digit */

#ifdef Honor_FLT_ROUNDS
    switch (rounding)
    {
    case 0: goto trimzeros;
    case 2: goto roundoff;
    }
#endif
    b = lshift(b, 1);
    j = cmp(b, S);
    if (j > 0 || j == 0 && dig & 1)
    {
roundoff:
        while (*--s == '9')
        {
            if (s == s0)
            {
                k++;
                *s++ = '1';
                goto ret;
            }
        }
        ++*s++;
    }
    else
    {
#ifdef Honor_FLT_ROUNDS
trimzeros:
#endif
        while (*--s == '0')
        {
            ; // Nothing.
        }
        s++;
    }
ret:
    Bfree(S);
    if (mhi)
    {
        if (mlo && mlo != mhi)
        {
            Bfree(mlo);
        }
        Bfree(mhi);
    }
ret1:
#ifdef SET_INEXACT
    if (inexact)
    {
        if (!oldinexact)
        {
            word0(d) = Exp_1 + (70 << Exp_shift);
            word1(d) = 0;
            dval(d) += 1.;
        }
    }
    else if (!oldinexact)
    {
        clear_inexact();
    }
#endif
    Bfree(b);
    *s = 0;
    *decpt = k + 1;
    if (rve)
    {
        *rve = s;
    }
    return s0;
}

void mux_exec	(	char *	buff,
		char **	bufc,
		dbref	executor,
		dbref	caller,
		dbref	enactor,
		int	eval,
		char **	dstr,
		char *	cargs[],
		int	ncargs
	)

Definition at line 1087 of file eval.cpp.

References A_VA, alloc_lbuf, alloc_mbuf, ANSI_ENDGOAL_NORMAL, ANSI_String_Copy(), ANSI_String_Finalize(), ANSI_String_In_Init(), ANSI_String_Out_Init(), ufun::atr, atr_get, atr_pget_str_LEN(), CMuxAlarm::bAlarmed, statedata::bStackLimitReached, check_access(), statedata::curr_cmd, EV_EVAL, EV_FCHECK, EV_FMAND, EV_NO_LOCATION, EV_NOFCHECK, EV_NOTRACE, EV_STRIP_CURLY, EV_TOP, ufun::flags, tagFun::flags, FN_NOEVAL, FN_PRES, FN_PRIV, free_lbuf, free_mbuf, tagFun::fun, statedata::func_htab, statedata::func_invk_ctr, confdata::func_invk_lim, statedata::func_nest_lev, confdata::func_nest_lim, get_gender(), statedata::glob_reg_len, statedata::global_regs, Going, hashfindLEN(), ISOUTOFMEMORY, isSpecial, LBUF_SIZE, MAX_ARG, MAX_GLOBAL_REGS, tagFun::maxArgs, tagFun::maxArgsParsed, MEMALLOC, MEMFREE, tagFun::minArgs, mudconf, mudstate, mux_exec(), mux_isazAZ, mux_isspace, mux_ltoa(), mux_RegisterSet, mux_tolower, mux_toupper, MuxAlarm, Name, tagFun::name, notify, confdata::nStackLimit, statedata::nStackNest, ufun::obj, parse_arglist_lite(), parse_to_lite(), tagFun::perms, ufun::perms, PopIntegers(), PopPointers(), statedata::pout, PushIntegers(), PushPointers(), restore_global_regs(), safe_copy_buf(), safe_noperm, safe_str, save_global_regs(), SBUF_SIZE, confdata::space_compress, tcache_add(), tcache_empty(), tcache_finish(), Trace, confdata::trace_limit, confdata::trace_topdown, statedata::ufunc_htab, and where_is().

Referenced by add_mail_message(), add_prefix(), BuildChannelMessage(), check_filter(), default_handler(), delim_check(), did_it(), do_if(), do_postpend(), do_prepend(), do_switch(), do_think(), do_ufun(), eval_boolexp(), filter_handler(), FUNCTION(), get_exit_dest(), get_handler(), look_contents(), look_exits(), look_in(), mail_return(), modSpeech(), mux_exec(), page_return(), parse_arglist(), parse_arglist_lite(), process_cmdent(), process_command(), process_hook(), process_sex(), ReportTopic(), search_perform(), show_a_desc(), switch_handler(), and u_comp().

{
    if (  *dstr == NULL
       || **dstr == '\0'
       || MuxAlarm.bAlarmed)
    {
        return;
    }

    // Stack Limit checking with thanks to RhostMUSH.
    //
    if (mudconf.nStackLimit < mudstate.nStackNest)
    {
        mudstate.bStackLimitReached = true;
        return;
    }

    char *TempPtr;
    char *tstr, *tbuf, *start, *oldp, *savestr;
    const char *constbuf;
    int ch;
    char *realbuff = NULL, *realbp = NULL;
    dbref aowner;
    int nfargs, aflags, feval, i;
    bool ansi = false;
    FUN *fp;
    UFUN *ufp;

    static const char *subj[5] = {"", "it", "she", "he", "they"};
    static const char *poss[5] = {"", "its", "her", "his", "their"};
    static const char *obj[5] =  {"", "it", "her", "him", "them"};
    static const char *absp[5] = {"", "its", "hers", "his", "theirs"};

    // This is scratch buffer is used potentially on every invocation of
    // mux_exec. Do not assume that its contents are valid after you
    // execute any function that could re-enter mux_exec.
    //
    static char mux_scratch[LBUF_SIZE];

    char *pdstr = *dstr;

    int at_space = 1;
    int gender = -1;

    bool is_trace = Trace(executor) && !(eval & EV_NOTRACE);
    bool is_top = false;

    // Extend the buffer if we need to.
    //
    if (LBUF_SIZE - SBUF_SIZE < (*bufc) - buff)
    {
        realbuff = buff;
        realbp = *bufc;
        buff = (char *)MEMALLOC(LBUF_SIZE);
        ISOUTOFMEMORY(buff);
        *bufc = buff;
    }

    oldp = start = *bufc;

    // If we are tracing, save a copy of the starting buffer.
    //
    savestr = NULL;
    if (is_trace)
    {
        is_top = tcache_empty();
        savestr = alloc_lbuf("exec.save");
        strcpy(savestr, pdstr);
    }

    // Save Parser Mode.
    //
    bool bSpaceIsSpecialSave = isSpecial(L1, ' ');
    bool bParenthesisIsSpecialSave = isSpecial(L1, '(');
    bool bBracketIsSpecialSave = isSpecial(L1, '[');

    // Setup New Parser Mode.
    //
    bool bSpaceIsSpecial = mudconf.space_compress && !(eval & EV_NO_COMPRESS);
    isSpecial(L1, ' ') = bSpaceIsSpecial;
    isSpecial(L1, '(') = (eval & EV_FCHECK) != 0;
    isSpecial(L1, '[') = (eval & EV_NOFCHECK) == 0;

    size_t nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
    for (;;)
    {
        // Handle mundane characters specially. There are usually a lot of them.
        // Just copy them.
        //
        if (!isSpecial(L1, *pdstr))
        {
            char *p = pdstr + 1;
            while (!isSpecial(L1, *p++))
            {
                ; // Nothing.
            }
            size_t n = p - pdstr - 1;
            if (nBufferAvailable < n)
            {
                n = nBufferAvailable;
            }
            memcpy(*bufc, pdstr, n);
            nBufferAvailable -= n;
            *bufc += n;
            at_space = 0;
            pdstr = p - 1;
        }


        // At this point, **dstr must be one of the following characters:
        //
        // 0x00 0x20 0x25 0x28 0x5B 0x5C 0x7B
        // NULL  SP   %    (     [    \   {
        //
        // Test softcode shows the following distribution:
        //
        // NULL occurs 116948 times
        //   (  occurs  49567 times
        //   %  occurs  24553 times
        //   [  occurs   7618 times
        //  SP  occurs   1323 times
        //
        if (*pdstr == '\0')
        {
            break;
        }
        else if (*pdstr == '(')
        {
            // *pdstr == '('
            //
            // Arglist start.  See if what precedes is a function. If so,
            // execute it if we should.
            //
            at_space = 0;

            // Load an sbuf with an lowercase version of the func name, and
            // see if the func exists. Trim trailing spaces from the name if
            // configured.
            //
            char *pEnd = *bufc - 1;
            if (mudconf.space_compress && (eval & EV_FMAND))
            {
                while (  oldp <= pEnd
                      && mux_isspace(*pEnd))
                {
                    pEnd--;
                }
            }

            // _strlwr(tbuf);
            //
            char *p2 = mux_scratch;
            for (char *p = oldp; p <= pEnd; p++)
            {
                *p2++ = mux_tolower(*p);
            }
            *p2 = '\0';

            int ntbuf = p2 - mux_scratch;
            fp = (FUN *)hashfindLEN(mux_scratch, ntbuf, &mudstate.func_htab);

            // If not a builtin func, check for global func.
            //
            ufp = NULL;
            if (fp == NULL)
            {
                ufp = (UFUN *)hashfindLEN(mux_scratch, ntbuf, &mudstate.ufunc_htab);
            }

            // Do the right thing if it doesn't exist.
            //
            if (!fp && !ufp)
            {
                if (eval & EV_FMAND)
                {
                    *bufc = oldp;
                    safe_str("#-1 FUNCTION (", buff, bufc);
                    safe_str(mux_scratch, buff, bufc);
                    safe_str(") NOT FOUND", buff, bufc);
                    nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
                    break;
                }
                else if (nBufferAvailable)
                {
                    *(*bufc)++ = '(';
                    nBufferAvailable--;
                }
            }
            else
            {
                // Get the arglist and count the number of args. Neg # of args
                // means catenate subsequent args.
                //
                if (ufp)
                {
                    nfargs = MAX_ARG;
                }
                else
                {
                    nfargs = fp->maxArgsParsed;
                }

                tstr = pdstr;
                if (  fp
                   && (fp->flags & FN_NOEVAL))
                {
                    feval = eval & ~(EV_EVAL|EV_TOP|EV_STRIP_CURLY);
                }
                else
                {
                    feval = eval & ~EV_TOP;
                }

                char **fargs = PushPointers(MAX_ARG);
                pdstr = parse_arglist_lite(executor, caller, enactor,
                      pdstr + 1, ')', feval, fargs, nfargs, cargs, ncargs,
                      &nfargs);


                // If no closing delim, just insert the '(' and continue normally.
                //
                if (!pdstr)
                {
                    pdstr = tstr;
                    if (nBufferAvailable)
                    {
                        *(*bufc)++ = *pdstr;
                        nBufferAvailable--;
                    }
                }
                else
                {
                    pdstr--;

                    // If it's a user-defined function, perform it now.
                    //
                    mudstate.func_nest_lev++;
                    mudstate.func_invk_ctr++;
                    if (mudconf.func_nest_lim <= mudstate.func_nest_lev)
                    {
                         safe_str("#-1 FUNCTION RECURSION LIMIT EXCEEDED", buff, &oldp);
                    }
                    else if (mudconf.func_invk_lim <= mudstate.func_invk_ctr)
                    {
                        safe_str("#-1 FUNCTION INVOCATION LIMIT EXCEEDED", buff, &oldp);
                    }
                    else if (Going(executor))
                    {
                        safe_str("#-1 BAD EXECUTOR", buff, &oldp);
                    }
                    else if (!check_access(executor, ufp ? ufp->perms : fp->perms))
                    {
                        safe_noperm(buff, &oldp);
                    }
                    else if (MuxAlarm.bAlarmed)
                    {
                        safe_str("#-1 CPU LIMITED", buff, &oldp);
                    }
                    else if (ufp)
                    {
                        tstr = atr_get(ufp->obj, ufp->atr, &aowner, &aflags);
                        if (ufp->flags & FN_PRIV)
                        {
                            i = ufp->obj;
                        }
                        else
                        {
                            i = executor;
                        }
                        TempPtr = tstr;

                        char **preserve = NULL;
                        int *preserve_len = NULL;

                        if (ufp->flags & FN_PRES)
                        {
                            preserve = PushPointers(MAX_GLOBAL_REGS);
                            preserve_len = PushIntegers(MAX_GLOBAL_REGS);
                            save_global_regs("eval_save", preserve, preserve_len);
                        }

                        mux_exec(buff, &oldp, i, executor, enactor, feval,
                                 &TempPtr, fargs, nfargs);

                        if (ufp->flags & FN_PRES)
                        {
                            restore_global_regs("eval_restore", preserve, preserve_len);
                            PopIntegers(preserve_len, MAX_GLOBAL_REGS);
                            PopPointers(preserve, MAX_GLOBAL_REGS);
                            preserve = NULL;
                            preserve_len = NULL;
                        }
                        free_lbuf(tstr);
                    }
                    else
                    {
                        // If the number of args is right, perform the func.
                        // Otherwise, return an error message.
                        //
                        if (  fp->minArgs <= nfargs
                           && nfargs <= fp->maxArgs
                           && !MuxAlarm.bAlarmed)
                        {
                            fp->fun(buff, &oldp, executor, caller, enactor,
                                    fargs, nfargs, cargs, ncargs);
                        }
                        else
                        {
                            if (fp->minArgs == fp->maxArgs)
                            {
                                sprintf(mux_scratch,
                                    "#-1 FUNCTION (%s) EXPECTS %d ARGUMENTS",
                                    fp->name, fp->minArgs);
                            }
                            else if (fp->minArgs + 1 == fp->maxArgs)
                            {
                                sprintf(mux_scratch,
                                    "#-1 FUNCTION (%s) EXPECTS %d OR %d ARGUMENTS",
                                    fp->name, fp->minArgs, fp->maxArgs);
                            }
                            else if (MuxAlarm.bAlarmed)
                            {
                                sprintf(mux_scratch, "#-1 CPU LIMITED");
                            }
                            else
                            {
                                sprintf(mux_scratch,
                                    "#-1 FUNCTION (%s) EXPECTS BETWEEN %d AND %d ARGUMENTS",
                                    fp->name, fp->minArgs, fp->maxArgs);
                            }
                            safe_str(mux_scratch, buff, &oldp);
                        }
                    }
                    *bufc = oldp;
                    nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
                    mudstate.func_nest_lev--;
                }

                // Return the space allocated for the arguments.
                //
                for (i = 0; i < nfargs; i++)
                {
                    free_lbuf(fargs[i]);
                }
                PopPointers(fargs, MAX_ARG);
                fargs = NULL;
            }
            eval &= ~EV_FCHECK;
            isSpecial(L1, '(') = false;
        }
        else if (*pdstr == '%')
        {
            // Percent-replace start.  Evaluate the chars following and
            // perform the appropriate substitution.
            //
            at_space = 0;
            if (!(eval & EV_EVAL))
            {
                if (nBufferAvailable)
                {
                    *(*bufc)++ = '%';
                    nBufferAvailable--;
                }
                pdstr++;
                if (nBufferAvailable)
                {
                    *(*bufc)++ = *pdstr;
                    nBufferAvailable--;
                }
            }
            else
            {
                pdstr++;
                ch = *pdstr;
                unsigned char cType_L2 = isSpecial(L2, ch);
                TempPtr = *bufc;
                int iCode = cType_L2 & 0x7F;
                if (iCode == 1)
                {
                    // 30 31 32 33 34 35 36 37 38 39
                    // 0  1  2  3  4  5  6  7  8  9
                    //
                    // Command argument number N.
                    //
                    i = ch - '0';
                    if (  i < ncargs
                       && cargs[i])
                    {
                        safe_str(cargs[i], buff, bufc);
                        nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
                    }
                }
                else if (iCode == 2)
                {
                    // 51
                    // Q
                    //
                    pdstr++;
                    i = mux_RegisterSet[(unsigned char)*pdstr];
                    if (  0 <= i
                       && i < MAX_GLOBAL_REGS)
                    {
                        if (  mudstate.glob_reg_len[i] > 0
                           && mudstate.global_regs[i])
                        {
                            safe_copy_buf(mudstate.global_regs[i],
                                mudstate.glob_reg_len[i], buff, bufc);
                            nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
                        }
                    }
                    else if (*pdstr == '\0')
                    {
                        pdstr--;
                    }
                }
                else if (iCode <= 4)
                {
                    if (iCode == 3)
                    {
                        // 23
                        // #
                        //
                        // Enactor DB number.
                        //
                        mux_scratch[0] = '#';
                        i = mux_ltoa(enactor, mux_scratch+1);
                        safe_copy_buf(mux_scratch, i+1, buff, bufc);
                        nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
                    }
                    else if (iCode == 4)
                    {
                        // 21
                        // !
                        //
                        // iCode == '!'
                        // Executor DB number.
                        //
                        mux_scratch[0] = '#';
                        i = mux_ltoa(executor, mux_scratch+1);
                        safe_copy_buf(mux_scratch, i+1, buff, bufc);
                        nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
                    }
                    else
                    {
                        // iCode == 0
                        //
                        // Just copy
                        //
                        if (nBufferAvailable)
                        {
                            *(*bufc)++ = ch;
                            nBufferAvailable--;
                        }
                    }
                }
                else if (iCode <= 6)
                {
                    if (iCode == 6)
                    {
                        // 43 58
                        // C  X
                        //
                        // Color
                        //
                        const char *pColor = ColorTable[(unsigned char)pdstr[1]];
                        if (pColor)
                        {
                            pdstr++;
                            ansi = true;
                            safe_str(pColor, buff, bufc);
                            nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
                        }
                        else if (pdstr[1] && nBufferAvailable)
                        {
                            *(*bufc)++ = *pdstr;
                            nBufferAvailable--;
                        }
                    }
                    else
                    {
                        // 52
                        // R
                        //
                        // Carriage return.
                        //
                        safe_copy_buf("\r\n", 2, buff, bufc);
                        nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
                    }
                }
                else if (iCode <= 8)
                {
                    if (iCode == 7)
                    {
                        // 42
                        // B
                        //
                        // Blank.
                        //
                        if (nBufferAvailable)
                        {
                            *(*bufc)++ = ' ';
                            nBufferAvailable--;
                        }
                    }
                    else
                    {
                        // 54
                        // T
                        //
                        // Tab.
                        //
                        if (nBufferAvailable)
                        {
                            *(*bufc)++ = '\t';
                            nBufferAvailable--;
                        }
                    }
                }
                else if (iCode <= 10)
                {
                    if (iCode == 9)
                    {
                        // 4C
                        // L
                        //
                        // Enactor Location DB Ref
                        //
                        if (!(eval & EV_NO_LOCATION))
                        {
                            mux_scratch[0] = '#';
                            i = mux_ltoa(where_is(enactor), mux_scratch+1);
                            safe_copy_buf(mux_scratch, i+1, buff, bufc);
                            nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
                        }
                    }
                    else
                    {
                        // 56
                        // V
                        //
                        // Variable attribute.
                        //
                        pdstr++;
                        if (mux_isazAZ(*pdstr))
                        {
                            i = A_VA + mux_toupper(*pdstr) - 'A';
                            size_t nAttrGotten;
                            atr_pget_str_LEN(mux_scratch, executor, i,
                                &aowner, &aflags, &nAttrGotten);
                            if (0 < nAttrGotten)
                            {
                                if (nAttrGotten > nBufferAvailable)
                                {
                                    nAttrGotten = nBufferAvailable;
                                }
                                memcpy(*bufc, mux_scratch, nAttrGotten);
                                *bufc += nAttrGotten;
                                nBufferAvailable -= nAttrGotten;
                            }
                        }
                        else if (*pdstr == '\0')
                        {
                            pdstr--;
                        }
                    }
                }
                else if (iCode <= 14)
                {
                    if (iCode <= 12)
                    {
                        if (iCode == 11)
                        {
                            // 25
                            // %
                            //
                            // Percent - a literal %
                            //
                            if (nBufferAvailable)
                            {
                                *(*bufc)++ = '%';
                                nBufferAvailable--;
                            }
                        }
                        else
                        {
                            // 4E
                            // N
                            //
                            // Enactor name
                            //
                            safe_str(Name(enactor), buff, bufc);
                            nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
                        }
                    }
                    else
                    {
                        if (iCode == 13)
                        {
                            // 7C
                            // |
                            //
                            // piped command output.
                            //
                            safe_str(mudstate.pout, buff, bufc);
                            nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
                        }
                        else
                        {
                            // 53
                            // S
                            //
                            // Subjective pronoun.
                            //
                            if (gender < 0)
                            {
                                gender = get_gender(enactor);
                            }
                            if (!gender)
                            {
                                constbuf  = Name(enactor);
                            }
                            else
                            {
                                constbuf  = subj[gender];
                            }
                            safe_str(constbuf, buff, bufc);
                            nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
                        }
                    }
                }
                else
                {
                    if (iCode <= 16)
                    {
                        if (iCode == 15)
                        {
                            // 50
                            // P
                            //
                            // Personal pronoun.
                            //
                            if (gender < 0)
                            {
                                gender = get_gender(enactor);
                            }

                            if (!gender)
                            {
                                safe_str(Name(enactor), buff, bufc);
                                nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
                                if (nBufferAvailable)
                                {
                                    *(*bufc)++ = 's';
                                    nBufferAvailable--;
                                }
                            }
                            else
                            {
                                safe_str((char *)poss[gender], buff, bufc);
                                nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
                            }
                        }
                        else
                        {
                            // 4F
                            // O
                            //
                            // Objective pronoun.
                            //
                            if (gender < 0)
                            {
                                gender = get_gender(enactor);
                            }
                            if (!gender)
                            {
                                constbuf = Name(enactor);
                            }
                            else
                            {
                                constbuf = obj[gender];
                            }
                            safe_str(constbuf, buff, bufc);
                            nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
                        }
                    }
                    else
                    {
                        if (iCode == 17)
                        {
                            // 41
                            // A
                            //
                            // Absolute posessive.
                            // Idea from Empedocles.
                            //
                            if (gender < 0)
                            {
                                gender = get_gender(enactor);
                            }

                            if (!gender)
                            {
                                safe_str(Name(enactor), buff, bufc);
                                nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
                                if (nBufferAvailable)
                                {
                                    *(*bufc)++ = 's';
                                    nBufferAvailable--;
                                }
                            }
                            else
                            {
                                safe_str(absp[gender], buff, bufc);
                                nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
                            }
                        }
                        else if (iCode == 18)
                        {
                            // 00
                            // \0
                            //
                            // All done.
                            //
                            pdstr--;
                        }
                        else if (iCode == 19)
                        {
                            // 4D
                            // M
                            //
                            // Last command
                            //
                            safe_str(mudstate.curr_cmd, buff, bufc);
                            nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
                        }
                        else
                        {
                            // 40
                            // @
                            //
                            // iCode == '@'
                            // Caller DB number.
                            //
                            mux_scratch[0] = '#';
                            i = mux_ltoa(caller, mux_scratch+1);
                            safe_copy_buf(mux_scratch, i+1, buff, bufc);
                            nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
                        }
                    }
                }

                // For some escape letters, if the escape letter
                // was upper-case, then upper-case the first
                // letter of the value.
                //
                if (cType_L2 & 0x80)
                {
                    *TempPtr = mux_toupper(*TempPtr);
                }
            }
        }
        else if (*pdstr == '[')
        {
            // Function start.  Evaluate the contents of the square brackets
            // as a function. If no closing bracket, insert the '[' and
            // continue.
            //
            tstr = pdstr++;
            mudstate.nStackNest++;
            tbuf = parse_to_lite(&pdstr, ']', '\0', &at_space, &at_space);
            at_space = 0;
            if (pdstr == NULL)
            {
                if (nBufferAvailable)
                {
                    *(*bufc)++ = '[';
                    nBufferAvailable--;
                }
                pdstr = tstr;
            }
            else
            {
                mudstate.nStackNest--;
                TempPtr = tbuf;
                mux_exec(buff, bufc, executor, caller, enactor,
                    (eval | EV_FCHECK | EV_FMAND) & ~EV_TOP, &TempPtr, cargs,
                    ncargs);
                nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;
                pdstr--;
            }
        }

        // At this point, *pdstr must be one of the following characters:
        //
        // 0x20 0x5C 0x7B
        // SP    \    {
        //
        else if (*pdstr == ' ')
        {
            // A space. Add a space if not compressing or if previous char was
            // not a space.
            //
            if (bSpaceIsSpecial && !at_space)
            {
                if (nBufferAvailable)
                {
                    *(*bufc)++ = ' ';
                    nBufferAvailable--;
                }
                at_space = 1;
            }
        }
        else if (*pdstr == '{')
        {
            // *pdstr == '{'
            //
            // Literal start.  Insert everything up to the terminating '}'
            // without parsing. If no closing brace, insert the '{' and
            // continue.
            //
            tstr = pdstr++;
            mudstate.nStackNest++;
            tbuf = parse_to_lite(&pdstr, '}', '\0', &at_space, &at_space);
            at_space = 0;
            if (pdstr == NULL)
            {
                if (nBufferAvailable)
                {
                    *(*bufc)++ = '{';
                    nBufferAvailable--;
                }
                pdstr = tstr;
            }
            else
            {
                mudstate.nStackNest--;
                if (!(eval & EV_STRIP_CURLY))
                {
                    if (nBufferAvailable)
                    {
                        *(*bufc)++ = '{';
                        nBufferAvailable--;
                    }
                }

                if (eval & EV_EVAL)
                {
                    // Preserve leading spaces (Felan)
                    //
                    if (*tbuf == ' ')
                    {
                        if (nBufferAvailable)
                        {
                            *(*bufc)++ = ' ';
                            nBufferAvailable--;
                        }
                        tbuf++;
                    }

                    TempPtr = tbuf;
                    mux_exec(buff, bufc, executor, caller, enactor,
                        (eval & ~(EV_STRIP_CURLY | EV_FCHECK | EV_TOP)),
                        &TempPtr, cargs, ncargs);
                }
                else
                {
                    TempPtr = tbuf;
                    mux_exec(buff, bufc, executor, caller, enactor,
                        eval & ~EV_TOP, &TempPtr, cargs, ncargs);
                }
                nBufferAvailable = LBUF_SIZE - (*bufc - buff) - 1;

                if (!(eval & EV_STRIP_CURLY))
                {
                    if (nBufferAvailable)
                    {
                        *(*bufc)++ = '}';
                        nBufferAvailable--;
                    }
                }
                pdstr--;
            }
        }
        else if (*pdstr == '\\')
        {
            // *pdstr must be \.
            //
            // General escape. Add the following char without special
            // processing.
            //
            at_space = 0;
            pdstr++;
            if (*pdstr)
            {
                if (nBufferAvailable)
                {
                    *(*bufc)++ = *pdstr;
                    nBufferAvailable--;
                }
            }
            else
            {
                pdstr--;
            }
        }
        else
        {
            // *pdstr must be ESC.
            //
            at_space = 0;
            if (nBufferAvailable)
            {
                *(*bufc)++ = *pdstr;
                nBufferAvailable--;
            }
            pdstr++;
            if (*pdstr)
            {
                if (nBufferAvailable)
                {
                    *(*bufc)++ = *pdstr;
                    nBufferAvailable--;
                }
            }
            else
            {
                pdstr--;
            }
        }
        pdstr++;
    }

    // If we're eating spaces, and the last thing was a space, eat it up.
    // Complicated by the fact that at_space is initially true. So check to
    // see if we actually put something in the buffer, too.
    //
    if (  bSpaceIsSpecial
       && at_space
       && start != *bufc)
    {
        (*bufc)--;
    }

    **bufc = '\0';

    // Collect and report trace information.
    //
    if (is_trace)
    {
        tcache_add(executor, savestr, start);
        if (  is_top
           || !mudconf.trace_topdown)
        {
            tcache_finish();
        }
        if (  is_top
           && 0 < tcache_count - mudconf.trace_limit)
        {
            tbuf = alloc_mbuf("exec.trace_diag");
            sprintf(tbuf, "%d lines of trace output discarded.", tcache_count
                - mudconf.trace_limit);
            notify(executor, tbuf);
            free_mbuf(tbuf);
        }
    }

    if (  realbuff
       || ansi
       || (eval & EV_TOP))
    {
        // We need to transfer and/or ANSI optimize the result.
        //
        static struct ANSI_In_Context aic;
        static struct ANSI_Out_Context aoc;

        ANSI_String_Out_Init(&aoc, mux_scratch, sizeof(mux_scratch),
            sizeof(mux_scratch), ANSI_ENDGOAL_NORMAL);
        if (realbuff)
        {
            *realbp = '\0';
            ANSI_String_In_Init(&aic, realbuff, ANSI_ENDGOAL_NORMAL);
            ANSI_String_Copy(&aoc, &aic, sizeof(mux_scratch));
        }
        ANSI_String_In_Init(&aic, buff, ANSI_ENDGOAL_NORMAL);
        ANSI_String_Copy(&aoc, &aic, sizeof(mux_scratch));
        if (realbuff)
        {
            MEMFREE(buff);
            buff = realbuff;
        }

        int nVisualWidth;
        int nLen = ANSI_String_Finalize(&aoc, &nVisualWidth);
        memcpy(buff, mux_scratch, nLen+1);
        *bufc = buff + nLen;
    }

    *dstr = pdstr;

    // Restore Parser Mode.
    //
    isSpecial(L1, ' ') = bSpaceIsSpecialSave;
    isSpecial(L1, '(') = bParenthesisIsSpecialSave;
    isSpecial(L1, '[') = bBracketIsSpecialSave;
}

void mux_FPInit

(

)

Definition at line 3589 of file strtod.cpp.

Referenced by FLOAT_Initialize().

{
}

void mux_FPRestore

(

)

Definition at line 3597 of file strtod.cpp.

Referenced by FUNCTION().

{
}

void mux_FPSet

(

)

Definition at line 3593 of file strtod.cpp.

Referenced by FLOAT_Initialize(), and FUNCTION().

{
}

double mux_strtod	(	const char *	s00,
		char **	se
	)

Referenced by mux_atof().

const char* Name

(

dbref

thing

)

Definition at line 450 of file db.cpp.

References A_NAME, aszSpecialDBRefNames, atr_get_LEN(), atr_get_str(), db, free_lbuf, LBUF_SIZE, object::name, and StringCloneLen().

{
    if (thing < 0)
    {
        return aszSpecialDBRefNames[-thing];
    }

    dbref aowner;
    int aflags;
#ifdef MEMORY_BASED
    static char tbuff[LBUF_SIZE];
    atr_get_str(tbuff, thing, A_NAME, &aowner, &aflags);
    return tbuff;
#else // MEMORY_BASED
    if (!db[thing].name)
    {
        size_t len;
        char *pName = atr_get_LEN(thing, A_NAME, &aowner, &aflags, &len);
        db[thing].name = StringCloneLen(pName, len);
        free_lbuf(pName);
    }
    return db[thing].name;
#endif // MEMORY_BASED
}

bool nearby	(	dbref	,
		dbref
	)

Definition at line 2140 of file predicates.cpp.

References Can_Hide, Good_obj, Hidden, See_Hidden, and where_is().

Referenced by bCanReadAttr(), do_examine(), do_pemit_single(), do_verb(), exam_wildattrs(), FUNCTION(), and nearby_or_control().

{
    if (  !Good_obj(player)
       || !Good_obj(thing))
    {
        return false;
    }
    if (  Can_Hide(thing)
       && Hidden(thing)
       && !See_Hidden(player))
    {
        return false;
    }
    dbref thing_loc = where_is(thing);
    if (thing_loc == player)
    {
        return true;
    }
    dbref player_loc = where_is(player);
    if (  thing_loc == player_loc
       || thing == player_loc)
    {
        return true;
    }
    return false;
}

dbref new_home

(

dbref

)

Definition at line 151 of file object.cpp.

References can_set_home(), default_home(), Home, Location, and Owner.

Referenced by check_contents_chains(), check_dead_refs(), clone_home(), divest_object(), do_create(), empty_obj(), and FUNCTION().

{
    dbref loc = Location(player);
    if (can_set_home(Owner(player), player, loc))
    {
        return loc;
    }
    loc = Home(Owner(player));
    if (can_set_home(Owner(player), player, loc))
    {
        return loc;
    }
    return default_home();
}

int nfy_que	(	dbref	,
		int	,
		int	,
		int
	)

Definition at line 525 of file cque.cpp.

References add_to(), atr_clr(), atr_get, CallBack_NotifySemaphoreDrainOrAll(), CallBack_NotifySemaphoreFirstOrQuiet(), free_lbuf, mux_atol(), NFY_NFY, NFY_QUIET, Notify_Attr, Notify_Key, Notify_Num_Done, Notify_Num_Max, Notify_Sem, scheduler, CScheduler::TraverseOrdered(), and CScheduler::TraverseUnordered().

Referenced by destroy_bad_obj(), destroy_obj(), and do_notify().

{
    int cSemaphore = 1;
    if (attr)
    {
        int   aflags;
        dbref aowner;
        char *str = atr_get(sem, attr, &aowner, &aflags);
        cSemaphore = mux_atol(str);
        free_lbuf(str);
    }

    Notify_Num_Done = 0;
    if (cSemaphore > 0)
    {
        Notify_Key     = key;
        Notify_Sem     = sem;
        Notify_Attr    = attr;
        Notify_Num_Max = count;
        if (  key == NFY_NFY
           || key == NFY_QUIET)
        {
            scheduler.TraverseOrdered(CallBack_NotifySemaphoreFirstOrQuiet);
        }
        else
        {
            scheduler.TraverseUnordered(CallBack_NotifySemaphoreDrainOrAll);
        }
    }

    // Update the sem waiters count.
    //
    if (key == NFY_NFY)
    {
        add_to(sem, -count, attr);
    }
    else
    {
        atr_clr(sem, attr);
    }

    return Notify_Num_Done;
}

void notify_check	(	dbref	,
		dbref	,
		const char *	,
		int
	)

Definition at line 587 of file game.cpp.

References A_AAHEAR, A_AHEAR, A_AMHEAR, A_FILTER, A_INFILTER, A_INPREFIX, A_LISTEN, A_LUSE, A_PREFIX, add_prefix(), alloc_lbuf, alloc_sbuf, AMATCH_LISTEN, atr_get, atr_match(), Audible, check_filter(), Contents, could_doit(), forward_list::count, statedata::curr_enactor, statedata::curr_executor, forward_list::data, dflt_from_msg(), did_it(), DOLIST, Exits, free_lbuf, free_sbuf, fwdlist_get(), Good_obj, H_Listen, Halted, Has_location, Html, html_escape(), statedata::inpipe, isPlayer, Location, Monitor, MSG_F_CONTENTS, MSG_F_DOWN, MSG_F_UP, MSG_FWDLIST, MSG_HTML, MSG_INV, MSG_INV_EXITS, MSG_INV_L, MSG_LOC, MSG_LOC_A, MSG_ME, MSG_NBR, MSG_NBR_A, MSG_NBR_EXITS, MSG_NBR_EXITS_A, MSG_OOC, MSG_PUP_ALWAYS, MSG_S_INSIDE, MSG_S_OUTSIDE, MSG_SAYPOSE, mudconf, mudstate, Name, statedata::nHearNest, Nospoof, notify_check(), statedata::ntfy_nest_lev, confdata::ntfy_nest_lim, NUM_ENV_VARS, Owner, confdata::player_listen, Puppet, raw_notify(), raw_notify_html(), safe_chr, safe_str, TYPE_PLAYER, TYPE_ROOM, TYPE_THING, Typeof, where_is(), and wild().

Referenced by announce_connect(), announce_disconnect(), handle_ears(), notify_check(), notify_except(), and notify_except2().

{
    // If speaker is invalid or message is empty, just exit.
    //
    if (  !Good_obj(target)
       || !msg
       || !*msg)
    {
        return;
    }

#ifdef WOD_REALMS
    if ((key & MSG_OOC) == 0)
    {
        if ((key & MSG_SAYPOSE) != 0)
        {
            if (REALM_DO_HIDDEN_FROM_YOU == DoThingToThingVisibility(target, sender, ACTION_IS_TALKING))
            {
                return;
            }
        }
        else
        {
            if (REALM_DO_HIDDEN_FROM_YOU == DoThingToThingVisibility(target, sender, ACTION_IS_MOVING))
            {
                return;
            }
        }
    }
#endif // WOD_REALMS

    // Enforce a recursion limit
    //
    mudstate.ntfy_nest_lev++;
    if (mudconf.ntfy_nest_lim <= mudstate.ntfy_nest_lev)
    {
        mudstate.ntfy_nest_lev--;
        return;
    }

    char *msg_ns, *mp, *tbuff, *tp, *buff;
    char *args[NUM_ENV_VARS];
    dbref aowner,  recip, obj;
    int i, nargs, aflags;
    FWDLIST *fp;

    // If we want NOSPOOF output, generate it.  It is only needed if we are
    // sending the message to the target object.
    //
    if (key & MSG_ME)
    {
        mp = msg_ns = alloc_lbuf("notify_check");
        if (  Nospoof(target)
           && target != sender
           && target != mudstate.curr_enactor
           && target != mudstate.curr_executor)
        {
            // I'd really like to use tprintf here but I can't because the
            // caller may have.  notify(target, tprintf(...)) is quite common
            // in the code.
            //
            tbuff = alloc_sbuf("notify_check.nospoof");
            safe_chr('[', msg_ns, &mp);
            safe_str(Name(sender), msg_ns, &mp);
            sprintf(tbuff, "(#%d)", sender);
            safe_str(tbuff, msg_ns, &mp);

            if (sender != Owner(sender))
            {
                safe_chr('{', msg_ns, &mp);
                safe_str(Name(Owner(sender)), msg_ns, &mp);
                safe_chr('}', msg_ns, &mp);
            }
            if (sender != mudstate.curr_enactor)
            {
                sprintf(tbuff, "<-(#%d)", mudstate.curr_enactor);
                safe_str(tbuff, msg_ns, &mp);
            }
            safe_str("] ", msg_ns, &mp);
            free_sbuf(tbuff);
        }
        safe_str(msg, msg_ns, &mp);
        *mp = '\0';
    }
    else
    {
        msg_ns = NULL;
    }

    // msg contains the raw message, msg_ns contains the NOSPOOFed msg.
    //
    bool check_listens = !Halted(target);
    switch (Typeof(target))
    {
    case TYPE_PLAYER:
        if (key & MSG_ME)
        {
            if (key & MSG_HTML)
            {
                raw_notify_html(target, msg_ns);
            }
            else
            {
                if (Html(target))
                {
                    char *msg_ns_escaped;

                    msg_ns_escaped = alloc_lbuf("notify_check_escape");
                    html_escape(msg_ns, msg_ns_escaped, 0);
                    raw_notify(target, msg_ns_escaped);
                    free_lbuf(msg_ns_escaped);
                }
                else
                {
                    raw_notify(target, msg_ns);
                }
            }
        }
        if (!mudconf.player_listen)
        {
            check_listens = false;
        }

        // FALLTHROUGH

    case TYPE_THING:
    case TYPE_ROOM:

        // If we're in a pipe, objects can receive raw_notify if
        // they're not a player. (players were already notified
        // above.
        //
        if (  mudstate.inpipe
           && !isPlayer(target))
        {
            raw_notify(target, msg_ns);
        }

        // Forward puppet message if it is for me.
        //
        bool has_neighbors = Has_location(target);
        dbref targetloc = where_is(target);
        bool is_audible = Audible(target);

        if ( (key & MSG_ME)
           && Puppet(target)
           && (target != Owner(target))
           && (  (key & MSG_PUP_ALWAYS)
              || (  targetloc != Location(Owner(target))
                 && targetloc != Owner(target))))
        {
            tp = tbuff = alloc_lbuf("notify_check.puppet");
            safe_str(Name(target), tbuff, &tp);
            safe_str("> ", tbuff, &tp);
            safe_str(msg_ns, tbuff, &tp);
            *tp = '\0';
            raw_notify(Owner(target), tbuff);
            free_lbuf(tbuff);
        }

        // Check for @Listen match if it will be useful.
        //
        bool pass_listen = false;
        nargs = 0;
        if (  check_listens
           && (key & (MSG_ME | MSG_INV_L))
           && H_Listen(target))
        {
            tp = atr_get(target, A_LISTEN, &aowner, &aflags);
            if (*tp && wild(tp, (char *)msg, args, NUM_ENV_VARS))
            {
                for (nargs = NUM_ENV_VARS; nargs && (!args[nargs - 1] || !(*args[nargs - 1])); nargs--)
                {
                    ; // Nothing
                }
                pass_listen = true;
            }
            free_lbuf(tp);
        }

        // If we matched the @listen or are monitoring, check the
        // USE lock.
        //
        bool pass_uselock = false;
        if (  (key & MSG_ME)
           && check_listens
           && (  pass_listen
              || Monitor(target)))
        {
            pass_uselock = could_doit(sender, target, A_LUSE);
        }

        // Process AxHEAR if we pass LISTEN, USElock and it's for me.
        //
        if (  (key & MSG_ME)
           && pass_listen
           && pass_uselock
           && mudstate.nHearNest <= 2)
        {
            mudstate.nHearNest++;
            if (sender != target)
            {
                did_it(sender, target, 0, NULL, 0, NULL, A_AHEAR, args, nargs);
            }
            else
            {
                did_it(sender, target, 0, NULL, 0, NULL, A_AMHEAR, args,
                    nargs);
            }
            did_it(sender, target, 0, NULL, 0, NULL, A_AAHEAR, args, nargs);
            mudstate.nHearNest--;
        }

        // Get rid of match arguments. We don't need them anymore.
        //
        if (pass_listen)
        {
            for (i = 0; i < nargs; i++)
            {
                if (args[i] != NULL)
                {
                    free_lbuf(args[i]);
                }
            }
        }

        // Process ^-listens if for me, MONITOR, and we pass USElock.
        //
        if (  (key & MSG_ME)
           && pass_uselock
           && sender != target
           && Monitor(target))
        {
            atr_match(target, sender, AMATCH_LISTEN, (char *)msg, (char *)msg,
                false);
        }

        // Deliver message to forwardlist members.
        //
        if ( (key & MSG_FWDLIST)
           && is_audible
           && check_filter(target, sender, A_FILTER, msg))
        {
            tbuff = dflt_from_msg(sender, target);
            buff = add_prefix(target, sender, A_PREFIX, msg, tbuff);
            free_lbuf(tbuff);

            fp = fwdlist_get(target);
            if (fp)
            {
                for (i = 0; i < fp->count; i++)
                {
                    recip = fp->data[i];
                    if (  !Good_obj(recip)
                       || recip == target)
                    {
                        continue;
                    }
                    notify_check(recip, sender, buff,
                             MSG_ME | MSG_F_UP | MSG_F_CONTENTS | MSG_S_INSIDE);
                }
            }
            free_lbuf(buff);
        }

        // Deliver message through audible exits.
        //
        if (key & MSG_INV_EXITS)
        {
            DOLIST(obj, Exits(target))
            {
                recip = Location(obj);
                if (  Audible(obj)
                   && (  recip != target
                      && check_filter(obj, sender, A_FILTER, msg)))
                {
                    buff = add_prefix(obj, target, A_PREFIX, msg,
                        "From a distance,");
                    notify_check(recip, sender, buff,
                        MSG_ME | MSG_F_UP | MSG_F_CONTENTS | MSG_S_INSIDE);
                    free_lbuf(buff);
                }
            }
        }

        // Deliver message through neighboring audible exits.
        //
        if (  has_neighbors
           && (  (key & MSG_NBR_EXITS)
              || (  (key & MSG_NBR_EXITS_A)
                 && is_audible)))
        {
            // If from inside, we have to add the prefix string of
            // the container.
            //
            if (key & MSG_S_INSIDE)
            {
                tbuff = dflt_from_msg(sender, target);
                buff = add_prefix(target, sender, A_PREFIX, msg, tbuff);
                free_lbuf(tbuff);
            }
            else
            {
                buff = (char *)msg;
            }

            DOLIST(obj, Exits(Location(target)))
            {
                recip = Location(obj);
                if (  Good_obj(recip)
                   && Audible(obj)
                   && recip != targetloc
                   && recip != target
                   && check_filter(obj, sender, A_FILTER, msg))
                {
                    tbuff = add_prefix(obj, target, A_PREFIX, buff,
                        "From a distance,");
                    notify_check(recip, sender, tbuff,
                        MSG_ME | MSG_F_UP | MSG_F_CONTENTS | MSG_S_INSIDE);
                    free_lbuf(tbuff);
                }
            }
            if (key & MSG_S_INSIDE)
            {
                free_lbuf(buff);
            }
        }

        // Deliver message to contents.
        //
        if (  (  (key & MSG_INV)
              || (  (key & MSG_INV_L)
                 && pass_listen))
           && check_filter(target, sender, A_INFILTER, msg))
        {
            // Don't prefix the message if we were given the MSG_NOPREFIX key.
            //
            if (key & MSG_S_OUTSIDE)
            {
                buff = add_prefix(target, sender, A_INPREFIX, msg, "");
            }
            else
            {
                buff = (char *)msg;
            }
            DOLIST(obj, Contents(target))
            {
                if (obj != target)
                {
                    notify_check(obj, sender, buff,
                        MSG_ME | MSG_F_DOWN | MSG_S_OUTSIDE | key & MSG_HTML);
                }
            }
            if (key & MSG_S_OUTSIDE)
            {
                free_lbuf(buff);
            }
        }

        // Deliver message to neighbors.
        //
        if (  has_neighbors
           && (  (key & MSG_NBR)
              || (  (key & MSG_NBR_A)
                 && is_audible
                 && check_filter(target, sender, A_FILTER, msg))))
        {
            if (key & MSG_S_INSIDE)
            {
                tbuff = dflt_from_msg(sender, target);
                buff = add_prefix(target, sender, A_PREFIX, msg, "");
                free_lbuf(tbuff);
            }
            else
            {
                buff = (char *)msg;
            }
            DOLIST(obj, Contents(targetloc))
            {
                if (  obj != target
                   && obj != targetloc)
                {
                    notify_check(obj, sender, buff,
                    MSG_ME | MSG_F_DOWN | MSG_S_OUTSIDE);
                }
            }
            if (key & MSG_S_INSIDE)
            {
                free_lbuf(buff);
            }
        }

        // Deliver message to container.
        //
        if (  has_neighbors
           && (  (key & MSG_LOC)
              || ( (key & MSG_LOC_A)
                 && is_audible
                 && check_filter(target, sender, A_FILTER, msg))))
        {
            if (key & MSG_S_INSIDE)
            {
                tbuff = dflt_from_msg(sender, target);
                buff = add_prefix(target, sender, A_PREFIX, msg, tbuff);
                free_lbuf(tbuff);
            }
            else
            {
                buff = (char *)msg;
            }
            notify_check(targetloc, sender, buff,
                MSG_ME | MSG_F_UP | MSG_S_INSIDE);
            if (key & MSG_S_INSIDE)
            {
                free_lbuf(buff);
            }
        }
    }
    if (msg_ns)
    {
        free_lbuf(msg_ns);
    }
    mudstate.ntfy_nest_lev--;
}

void notify_except	(	dbref	,
		dbref	,
		dbref	,
		const char *	,
		int	key
	)

Definition at line 1012 of file game.cpp.

References Contents, DOLIST, MSG_F_DOWN, MSG_F_UP, MSG_ME, MSG_ME_ALL, MSG_NBR_EXITS_A, MSG_S_INSIDE, MSG_S_OUTSIDE, and notify_check().

Referenced by do_move(), do_pemit_single(), and do_say().

{
    dbref first;

    if (loc != exception)
    {
        notify_check(loc, player, msg, (MSG_ME_ALL | MSG_F_UP | MSG_S_INSIDE | MSG_NBR_EXITS_A | key));
    }
    DOLIST(first, Contents(loc))
    {
        if (first != exception)
        {
            notify_check(first, player, msg, (MSG_ME | MSG_F_DOWN | MSG_S_OUTSIDE | key));
        }
    }
}

void notify_except2	(	dbref	,
		dbref	,
		dbref	,
		dbref	,
		const char *
	)

Definition at line 1029 of file game.cpp.

References Contents, DOLIST, MSG_F_DOWN, MSG_F_UP, MSG_ME, MSG_ME_ALL, MSG_NBR_EXITS_A, MSG_S_INSIDE, MSG_S_OUTSIDE, and notify_check().

Referenced by did_it(), do_pemit_single(), do_toad(), process_enter_loc(), and process_leave_loc().

{
    dbref first;

    if (  loc != exc1
       && loc != exc2)
    {
        notify_check(loc, player, msg, (MSG_ME_ALL | MSG_F_UP | MSG_S_INSIDE | MSG_NBR_EXITS_A));
    }
    DOLIST(first, Contents(loc))
    {
        if (  first != exc1
           && first != exc2)
        {
            notify_check(first, player, msg, (MSG_ME | MSG_F_DOWN | MSG_S_OUTSIDE));
        }
    }
}

bool ok_password	(	const char *	szPassword,
		const char **	pmsg
	)

Definition at line 544 of file predicates.cpp.

References statedata::bStandAlone, mudconf, mudstate, mux_islower, mux_isprint, mux_isspace, mux_isupper, and confdata::safer_passwords.

Referenced by create_player(), do_newpassword(), and do_password().

{
    *pmsg = NULL;

    if (*password == '\0')
    {
        *pmsg = "Null passwords are not allowed.";
        return false;
    }

    const char *scan;
    int num_upper = 0;
    int num_special = 0;
    int num_lower = 0;

    for (scan = password; *scan; scan++)
    {
        if (  !mux_isprint(*scan)
           || mux_isspace(*scan))
        {
            *pmsg = "Illegal character in password.";
            return false;
        }
        if (mux_isupper(*scan))
        {
            num_upper++;
        }
        else if (mux_islower(*scan))
        {
            num_lower++;
        }
        else if (  *scan != '\''
                && *scan != '-')
        {
            num_special++;
        }
    }

    if (  !mudstate.bStandAlone
       && mudconf.safer_passwords)
    {
        if (num_upper < 1)
        {
            *pmsg = "The password must contain at least one capital letter.";
            return false;
        }
        if (num_lower < 1)
        {
            *pmsg = "The password must contain at least one lowercase letter.";
            return false;
        }
        if (num_special < 1)
        {
            *pmsg = "The password must contain at least one number or a symbol other than the apostrophe or dash.";
            return false;
        }
    }
    return true;
}

void olist_add

(

dbref

)

Definition at line 1189 of file walkdb.cpp.

References alloc_lbuf, objlist_stack::count, objlist_block::data, objlist_stack::head, mudstate, objlist_block::next, OBLOCK_SIZE, statedata::olist, and objlist_stack::tail.

Referenced by find_wild_attrs(), and search_perform().

{
    OBLOCK *op;

    if (!mudstate.olist->head)
    {
        op = (OBLOCK *) alloc_lbuf("olist_add.first");
        mudstate.olist->head = mudstate.olist->tail = op;
        mudstate.olist->count = 0;
        op->next = NULL;
    }
    else if (mudstate.olist->count >= OBLOCK_SIZE)
    {
        op = (OBLOCK *) alloc_lbuf("olist_add.next");
        mudstate.olist->tail->next = op;
        mudstate.olist->tail = op;
        mudstate.olist->count = 0;
        op->next = NULL;
    }
    else
    {
        op = mudstate.olist->tail;
    }
    op->data[mudstate.olist->count++] = item;
}

dbref olist_first

(

void

)

Definition at line 1217 of file walkdb.cpp.

References objlist_stack::cblock, objlist_stack::citm, objlist_stack::count, objlist_block::data, objlist_stack::head, mudstate, NOTHING, statedata::olist, and objlist_stack::tail.

Referenced by do_decomp(), do_edit(), do_search(), do_wipe(), exam_wildattrs(), FUNCTION(), grep_util(), lattr_handler(), and search_mark().

{
    if (!mudstate.olist->head)
    {
        return NOTHING;
    }
    if (  (mudstate.olist->head == mudstate.olist->tail)
       && (mudstate.olist->count == 0))
    {
        return NOTHING;
    }
    mudstate.olist->cblock = mudstate.olist->head;
    mudstate.olist->citm = 0;
    return mudstate.olist->cblock->data[mudstate.olist->citm++];
}

dbref olist_next

(

void

)

Definition at line 1233 of file walkdb.cpp.

References objlist_stack::cblock, objlist_stack::citm, objlist_stack::count, objlist_block::data, mudstate, objlist_block::next, NOTHING, OBLOCK_SIZE, statedata::olist, and objlist_stack::tail.

Referenced by do_decomp(), do_edit(), do_search(), do_wipe(), exam_wildattrs(), FUNCTION(), grep_util(), lattr_handler(), and search_mark().

{
    if (!mudstate.olist->cblock)
    {
        return NOTHING;
    }
    if (  (mudstate.olist->cblock == mudstate.olist->tail)
       && (mudstate.olist->citm >= mudstate.olist->count))
    {
        return NOTHING;
    }
    dbref thing = mudstate.olist->cblock->data[mudstate.olist->citm++];
    if (mudstate.olist->citm >= OBLOCK_SIZE)
    {
        mudstate.olist->cblock = mudstate.olist->cblock->next;
        mudstate.olist->citm = 0;
    }
    return thing;
}

void olist_pop

(

void

)

Definition at line 1174 of file walkdb.cpp.

References free_lbuf, objlist_stack::head, MEMFREE, mudstate, objlist_stack::next, objlist_block::next, and statedata::olist.

Referenced by do_decomp(), do_edit(), do_examine(), do_search(), do_wipe(), FUNCTION(), grep_util(), lattr_handler(), and CGuests::WipeAttrs().

{
    OLSTK *ol = mudstate.olist->next;
    OBLOCK *op, *onext;
    for (op = mudstate.olist->head; op != NULL; op = onext)
    {
        onext = op->next;
        free_lbuf(op);
    }
    MEMFREE(mudstate.olist);
    mudstate.olist = ol;
}

void olist_push

(

void

)

Definition at line 1158 of file walkdb.cpp.

References objlist_stack::cblock, objlist_stack::citm, objlist_stack::count, objlist_stack::head, ISOUTOFMEMORY, MEMALLOC, mudstate, objlist_stack::next, statedata::olist, and objlist_stack::tail.

Referenced by do_decomp(), do_edit(), do_examine(), do_search(), do_wipe(), FUNCTION(), grep_util(), lattr_handler(), and CGuests::WipeAttrs().

{
    OLSTK *ol = (OLSTK *)MEMALLOC(sizeof(OLSTK));
    ISOUTOFMEMORY(ol);
    ol->next = mudstate.olist;
    mudstate.olist = ol;

    ol->head = NULL;
    ol->tail = NULL;
    ol->cblock = NULL;
    ol->count = 0;
    ol->citm = 0;
}

bool parse_and_get_attrib	(	dbref	,
		char *	[],
		char **	,
		dbref *	,
		char *	,
		char **
	)

Definition at line 32 of file funceval.cpp.

References atr_pget, atr_str(), free_lbuf, attr::number, parse_attrib(), safe_noperm, and See_attr.

Referenced by do_ufun(), filter_handler(), and FUNCTION().

{
    ATTR *ap;

    // Two possibilities for the first arg: <obj>/<attr> and <attr>.
    //
    if (!parse_attrib(executor, fargs[0], thing, &ap))
    {
        *thing = executor;
        ap = atr_str(fargs[0]);
    }

    // Make sure we got a good attribute.
    //
    if (!ap)
    {
        return false;
    }

    // Use it if we can access it, otherwise return an error.
    //
    if (!See_attr(executor, *thing, ap))
    {
        safe_noperm(buff, bufc);
        return false;
    }

    dbref aowner;
    int aflags;
    *atext = atr_pget(*thing, ap->number, &aowner, &aflags);
    if (!*atext)
    {
        return false;
    }
    else if (!**atext)
    {
        free_lbuf(*atext);
        return false;
    }
    return true;
}

char* parse_arglist	(	dbref	executor,
		dbref	caller,
		dbref	enactor,
		char *	,
		char	,
		int	,
		char *	[],
		int	,
		char *	[],
		int	,
		int *
	)

Definition at line 726 of file eval.cpp.

References alloc_lbuf, EV_EVAL, EV_FCHECK, mux_exec(), parse_to(), and parse_to_lite().

Referenced by do_verb(), and process_cmdent().

{
    char *rstr, *tstr, *bp, *str;
    int arg, peval;

    if (dstr == NULL)
    {
        *nArgsParsed = 0;
        return NULL;
    }

    int nLen;
    int iWhichDelim;
    rstr = parse_to_lite(&dstr, delim, '\0', &nLen, &iWhichDelim);
    arg = 0;

    peval = (eval & ~EV_EVAL);

    while (  arg < nfargs
          && rstr)
    {
        if (arg < nfargs - 1)
        {
            tstr = parse_to(&rstr, ',', peval);
        }
        else
        {
            tstr = parse_to(&rstr, '\0', peval);
        }

        bp = fargs[arg] = alloc_lbuf("parse_arglist");
        if (eval & EV_EVAL)
        {
            str = tstr;
            mux_exec(fargs[arg], &bp, executor, caller, enactor,
                     eval | EV_FCHECK, &str, cargs, ncargs);
            *bp = '\0';
        }
        else
        {
            strcpy(fargs[arg], tstr);
        }
        arg++;
    }
    *nArgsParsed = arg;
    return dstr;
}

bool parse_attrib	(	dbref	,
		char *	,
		dbref *	,
		ATTR **
	)

Definition at line 1368 of file set.cpp.

References alloc_lbuf, atr_str(), attr, free_lbuf, NOTHING, and parse_thing_slash().

Referenced by default_handler(), do_addcommand(), do_chown(), do_delcommand(), do_function(), do_lock(), do_prog(), do_set(), do_trigger(), do_unlock(), FUNCTION(), get_handler(), and parse_and_get_attrib().

{
    ATTR *tattr = NULL;
    *thing = NOTHING;

    if (!str)
    {
        *attr = tattr;
        return false;
    }

    // Break apart string into obj and attr.
    //
    char *buff = alloc_lbuf("parse_attrib");
    strcpy(buff, str);
    char *AttrName;
    bool retval = parse_thing_slash(player, buff, &AttrName, thing);

    // Get the named attribute from the object if we can.
    //
    if (retval)
    {
        tattr = atr_str(AttrName);
    }

    free_lbuf(buff);
    *attr = tattr;
    return retval;
}

bool parse_attrib_wild	(	dbref	,
		char *	,
		dbref *	,
		bool	,
		bool	,
		bool
	)

Definition at line 1459 of file set.cpp.

References alloc_lbuf, find_wild_attrs(), free_lbuf, Good_obj, hashflush(), init_match(), ITER_PARENTS, MAT_EXIT_PARENTS, match_everything(), match_result(), mudstate, NOTYPE, Parent, statedata::parent_htab, and parse_thing_slash().

Referenced by do_decomp(), do_edit(), do_examine(), do_wipe(), FUNCTION(), grep_util(), and lattr_handler().

{
    if (!str)
    {
        return false;
    }

    dbref parent;
    int lev;
    bool check_exclude, hash_insert;
    char *buff = alloc_lbuf("parse_attrib_wild");
    strcpy(buff, str);

    // Separate name and attr portions at the first /.
    //
    if (!parse_thing_slash(player, buff, &str, thing))
    {
        // Not in obj/attr format, return if not defaulting to.
        //
        if (!df_star)
        {
            free_lbuf(buff);
            return false;
        }

        // Look for the object, return failure if not found.
        //
        init_match(player, buff, NOTYPE);
        match_everything(MAT_EXIT_PARENTS);
        *thing = match_result();

        if (!Good_obj(*thing))
        {
            free_lbuf(buff);
            return false;
        }
        str = (char *)"*";
    }

    // Check the object (and optionally all parents) for attributes.
    //
    if (check_parents)
    {
        check_exclude = false;
        hash_insert = check_parents;
        hashflush(&mudstate.parent_htab);
        ITER_PARENTS(*thing, parent, lev)
        {
            if (!Good_obj(Parent(parent)))
            {
                hash_insert = false;
            }
            find_wild_attrs(player, parent, str, check_exclude, hash_insert, get_locks);
            check_exclude = true;
        }
    }
    else
    {
        find_wild_attrs(player, *thing, str, false, false, get_locks);
    }
    free_lbuf(buff);
    return true;
}

BOOLEXP* parse_boolexp	(	dbref	,
		const char *	,
		bool
	)

Definition at line 692 of file boolexp.cpp.

References statedata::bStandAlone, mudstate, parse_boolexp_E(), parse_player, parsebuf, parsestore, parsing_internal, and TRUE_BOOLEXP.

Referenced by db_write_object(), debug_examine(), do_decomp(), do_examine(), do_lock(), eval_boolexp_atr(), FUNCTION(), and view_atr().

{
    size_t n = strlen(buf);
    if (n > sizeof(parsestore)-1)
    {
        n = sizeof(parsestore)-1;
    }
    memcpy(parsestore, buf, n+1);
    parsebuf = parsestore;
    parse_player = player;
    if (  buf == NULL
       || *buf == '\0')
    {
        return TRUE_BOOLEXP;
    }
    if (!mudstate.bStandAlone)
    {
        parsing_internal = internal;
    }
    return parse_boolexp_E();
}

void parse_range	(	char **	,
		dbref *	,
		dbref *
	)

Definition at line 1734 of file predicates.cpp.

References statedata::db_top, EV_STRIP_TS, mudstate, mux_atol(), mux_isspace, NUMBER_TOKEN, and parse_to().

Referenced by do_entrances(), do_find(), and search_setup().

{
    char *buff1 = *name;
    if (buff1 && *buff1)
    {
        *name = parse_to(&buff1, ',', EV_STRIP_TS);
    }
    if (buff1 && *buff1)
    {
        char *buff2 = parse_to(&buff1, ',', EV_STRIP_TS);
        if (buff1 && *buff1)
        {
            while (mux_isspace(*buff1))
            {
                buff1++;
            }

            if (*buff1 == NUMBER_TOKEN)
            {
                buff1++;
            }

            *high_bound = mux_atol(buff1);
            if (*high_bound >= mudstate.db_top)
            {
                *high_bound = mudstate.db_top - 1;
            }
        }
        else
        {
            *high_bound = mudstate.db_top - 1;
        }

        while (mux_isspace(*buff2))
        {
            buff2++;
        }

        if (*buff2 == NUMBER_TOKEN)
        {
            buff2++;
        }

        *low_bound = mux_atol(buff2);
        if (*low_bound < 0)
        {
            *low_bound = 0;
        }
    }
    else
    {
        *low_bound = 0;
        *high_bound = mudstate.db_top - 1;
    }
}

bool parse_thing_slash	(	dbref	,
		char *	,
		char **	,
		dbref *
	)

Definition at line 1790 of file predicates.cpp.

References Good_obj, init_match(), MAT_EXIT_PARENTS, match_everything(), match_result(), NOTHING, and NOTYPE.

Referenced by get_obj_and_lock(), parse_attrib(), and parse_attrib_wild().

{
    // Get name up to '/'.
    //
    char *str = thing;
    while (  *str != '\0'
          && *str != '/')
    {
        str++;
    }

    // If no '/' in string, return failure.
    //
    if (*str == '\0')
    {
        *after = NULL;
        *it = NOTHING;
        return false;
    }
    *str++ = '\0';
    *after = str;

    // Look for the object.
    //
    init_match(player, thing, NOTYPE);
    match_everything(MAT_EXIT_PARENTS);
    *it = match_result();

    // Return status of search.
    //
    return Good_obj(*it);
}

char* parse_to	(	char **	,
		char	,
		int
	)

Definition at line 179 of file eval.cpp.

References EV_NO_COMPRESS, EV_STRIP_CURLY, EV_STRIP_LS, isSpecial, mudconf, mux_isspace, NEXTCHAR, parse_to_cleanup(), confdata::space_compress, and stacklim.

Referenced by check_filter(), do_cpattr(), do_dolist(), do_force_prefixed(), do_mail_quick(), do_notify(), do_prog(), do_wait(), parse_arglist(), parse_range(), process_cmdent(), search_setup(), and Task_RunQueueEntry().

{
#define stacklim 32
    char stack[stacklim];
    char *rstr, *cstr, *zstr, *strFirewall;
    int sp, tp, bracketlev;

    if (  dstr == NULL
       || *dstr == NULL)
    {
        return NULL;
    }

    if (**dstr == '\0')
    {
        rstr = *dstr;
        *dstr = NULL;
        return rstr;
    }
    sp = 0;
    bool first = true;
    strFirewall = rstr = *dstr;
    if (  (  mudconf.space_compress
          || (eval & EV_STRIP_LS))
       && !(eval & EV_NO_COMPRESS))
    {
        while (mux_isspace(*rstr))
        {
            rstr++;
        }
        *dstr = rstr;
    }
    zstr = cstr = rstr;
    int iOriginalCode = isSpecial(L3, delim);
    isSpecial(L3, ' ') = 1; // Spaces are special.
    if (iOriginalCode <= 3)
    {
        // We can override this code.
        //
        isSpecial(L3, delim) = 8;
    }

    for (;;)
    {
        int iCode = isSpecial(L3, *cstr);

TryAgain:
        if (iCode == 0)
        {
            // Mundane characters and not the delimiter we are looking for.
            //
            first = false;
            do
            {
                NEXTCHAR
                iCode = isSpecial(L3, *cstr);
            } while (iCode == 0);
        }

        if (iCode <= 4)
        {
            // 1 is 0x20 ' '  delim overridable
            // 2 is 0x5B '['  delim overridable
            // 3 is 0x28 '('  delim overridable
            // 4 is 0x25 '%', 0x5C '\\', or 0x1B ESC not overridable.
            //
            if (iCode <= 2)
            {
                // 1 is 0x20 ' '  delim overridable
                // 2 is 0x5B '['  delim overridable
                //
                if (iCode == 1)
                {
                    // space
                    //
                    if (  mudconf.space_compress
                       && !(eval & EV_NO_COMPRESS))
                    {
                        if (first)
                        {
                            rstr++;
                        }
                        else if (  strFirewall < cstr
                                && cstr[-1] == ' ')
                        {
                            zstr--;
                        }
                    }
                    NEXTCHAR
                }
                else
                {
                    // '['
                    //
                    first = false;
                    if (sp < stacklim)
                    {
                        stack[sp++] = ']';
                    }
                    NEXTCHAR
                }
            }
            else
            {
                // 3 is 0x28 '('  delim overridable
                // 4 is 0x25 '%', 0x5C '\\', or 0x1B ESC not overridable.
                //
                if (iCode == 3)
                {
                    first = false;
                    if (sp < stacklim)
                    {
                        stack[sp++] = ')';
                    }
                    NEXTCHAR
                }
                else
                {
                    // %, \, and ESC escapes.
                    //
                    first = false;
                    NEXTCHAR
                    if (*cstr)
                    {
                        NEXTCHAR
                    }
                }
            }
        }
        else
        {
            // 5 is 0x29 ')' or 0x5D ']'  not overridable.
            // 6 is 0x7B '{' not overridable.
            // 7 is 0x00 '\0' not overridable.
            // 8 is the client-specific terminator.
            //
            if (iCode <= 6)
            {
                // 5 is 0x29 ')' or 0x5D ']'  not overridable.
                // 6 is 0x7B '{' not overridable.
                //
                if (iCode == 5)
                {
                    // ) and ]
                    //
                    for (tp = sp - 1; tp >= 0 && stack[tp] != *cstr; tp--)
                    {
                        ; // Nothing.
                    }

                    // If we hit something on the stack, unwind to it. Otherwise (it's
                    // not on stack), if it's our delim we are done, and we convert the
                    // delim to a null and return a ptr to the char after the null. If
                    // it's not our delimiter, skip over it normally.
                    //
                    if (tp >= 0)
                    {
                        sp = tp;
                    }
                    else if (*cstr == delim)
                    {
                        rstr = parse_to_cleanup(eval, first, cstr, rstr, zstr, strFirewall);
                        *dstr = ++cstr;
                        isSpecial(L3, delim) = iOriginalCode;
                        isSpecial(L3, ' ') = 0; // Spaces no longer special
                        return rstr;
                    }
                    first = false;
                    NEXTCHAR
                }
                else
                {
                    // {
                    //
                    bracketlev = 1;
                    if (eval & EV_STRIP_CURLY)
                    {
                        cstr++;
                    }
                    else
                    {
                        NEXTCHAR;
                    }
                    for (;;)
                    {
                        int iCodeL4 = isSpecial(L4, *cstr);
                        if (iCodeL4 == 0)
                        {
                            // Mudane Characters
                            //
                            do
                            {
                                NEXTCHAR
                                iCodeL4 = isSpecial(L4, *cstr);
                            } while (iCodeL4 == 0);
                        }


                        if (iCodeL4 == 1)
                        {
                            // %, \, and ESC escapes.
                            //
                            if (cstr[1])
                            {
                                NEXTCHAR
                            }
                        }
                        else if (iCodeL4 == 2)
                        {
                            // '{'
                            //
                            bracketlev++;
                        }
                        else if (iCodeL4 == 3)
                        {
                            // '}'
                            //
                            bracketlev--;
                            if (bracketlev <= 0)
                            {
                                break;
                            }
                        }
                        else
                        {
                            // '\0'
                            //
                            break;
                        }
                        NEXTCHAR
                    }

                    if (bracketlev == 0)
                    {
                        if (eval & EV_STRIP_CURLY)
                        {
                            cstr++;
                        }
                        else
                        {
                            NEXTCHAR
                        }
                    }
                    first = false;
                }
            }
            else
            {
                // 7 is 0x00 '\0' not overridable.
                // 8 is the client-specific terminator.
                //
                if (iCode == 7)
                {
                    // '\0' - End of string.
                    //
                    isSpecial(L3, delim) = iOriginalCode;
                    isSpecial(L3, ' ') = 0; // Spaces no longer special
                    break;
                }
                else
                {
                    // Client-Specific terminator
                    //
                    if (sp == 0)
                    {
                        rstr = parse_to_cleanup(eval, first, cstr, rstr, zstr, strFirewall);
                        *dstr = ++cstr;
                        isSpecial(L3, delim) = iOriginalCode;
                        isSpecial(L3, ' ') = 0; // Spaces no longer special
                        return rstr;
                    }

                    // At this point, we need to process the iOriginalCode.
                    //
                    iCode = iOriginalCode;
                    goto TryAgain;
                }
            }
        }
    }
    rstr = parse_to_cleanup(eval, first, cstr, rstr, zstr, strFirewall);
    *dstr = NULL;
    return rstr;
}

bool payfor	(	dbref	,
		int
	)

Definition at line 257 of file predicates.cpp.

References Free_Money, Owner, Pennies(), s_Pennies(), and Wizard.

Referenced by canpayfees(), do_entrances(), do_find(), do_kill(), do_mail_stats(), do_processcom(), FUNCTION(), get_stats(), give_money(), open_exit(), page_check(), and setup_que().

{
    if (  Wizard(who)
       || Wizard(Owner(who))
       || Free_Money(who)
       || Free_Money(Owner(who)))
    {
        return true;
    }
    who = Owner(who);
    int tmp;
    if ((tmp = Pennies(who)) >= cost)
    {
        s_Pennies(who, tmp - cost);
        return true;
    }
    return false;
}

void pcache_init

(

void

)

Initializes the player cache.

This is called once to initialize the player cache and supporting data structures: Player cache structures are pooled, the Hash Table initializes itself, and the singly-linked list is started.

Returns:

None.

Definition at line 53 of file player_c.cpp.

References pcache_head, pool_init(), and POOL_PCACHE.

Referenced by main().

{
    pool_init(POOL_PCACHE, sizeof(PCACHE));
    pcache_head = NULL;
}

void pcache_reload

(

dbref

player

)

Re-initializes Money and QueueMax items from the database.

Parameters:

player

player object dbref.

Returns:

None.

Definition at line 151 of file player_c.cpp.

References Good_obj, OwnsOthers, pcache_find(), pcache_reload1(), and pcache_save().

Referenced by atr_add_raw_LEN(), and atr_clr().

{
    if (  Good_obj(player)
       && OwnsOthers(player))
    {
        PCACHE *pp = pcache_find(player);
        pcache_save(pp);
        pcache_reload1(player, pp);
    }
}

void pcache_sync

(

void

)

Flushes any dirty player items to the database.

The primary access is via the singly-linked list. Upon return, all the player cache records are marked as clean.

Returns:

None.

Definition at line 220 of file player_c.cpp.

References pcache_head, and pcache_save().

Referenced by do_dbclean(), do_restart(), do_shutdown(), dump_database(), fork_and_dump(), and sighandler().

{
    PCACHE *pp = pcache_head;
    while (pp)
    {
        pcache_save(pp);
        pp = pp->next;
    }
}

void pcache_trim

(

void

)

Ages and trims the player cache of stale entries.

pcache_trim() relies primarily on the singly-linked list, but it also maintains the Hash Table. To be trimmed, a player cache record must not have outstanding commands in the command queue.

The one level of aging is accomplished with PR_REF. On the first pass through the linked list, the PR_REF bit is removed. On the second pass through the list, the record is trimmed.

Returns:

None.

Definition at line 175 of file player_c.cpp.

References player_cache::cflags, free_pcache, hashdeleteLEN(), player_cache::next, pcache_head, pcache_htab, pcache_save(), PF_REF, player_cache::player, and player_cache::queue.

Referenced by dispatch_FreeListReconstruction().

{
    PCACHE *pp = pcache_head;
    PCACHE *pplast = NULL;
    while (pp)
    {
        PCACHE *ppnext = pp->next;
        if (  pp->queue
           || (pp->cflags & PF_REF))
        {
            // This entry either has outstanding commands in the queue or we
            // need to let it age.
            //
            pp->cflags &= ~PF_REF;
            pplast = pp;
        }
        else
        {
            // Unlink and destroy this entry.
            //
            if (pplast)
            {
                pplast->next = ppnext;
            }
            else
            {
                pcache_head = ppnext;
            }

            pcache_save(pp);
            hashdeleteLEN(&(pp->player), sizeof(pp->player), &pcache_htab);
            free_pcache(pp);
        }
        pp = ppnext;
    }
}

void PopIntegers	(	int *	pi,
		int	nNeeded
	)

Definition at line 1073 of file eval.cpp.

References free_lbuf, INTS_PER_FRAME, tag_intsframe::next, tag_intsframe::nints, pIntsFrame, and UNUSED_PARAMETER.

Referenced by add_prefix(), check_filter(), did_it(), do_ufun(), eval_boolexp(), FUNCTION(), mux_exec(), and process_hook().

{
    UNUSED_PARAMETER(pi);

    if (pIntsFrame->nints == INTS_PER_FRAME)
    {
        IntsFrame *p = pIntsFrame->next;
        free_lbuf((char *)pIntsFrame);
        pIntsFrame = p;
    }
    //mux_assert(pi == pIntsFrame->ints + pIntsFrame->nints);
    pIntsFrame->nints += nNeeded;
}

void PopPointers	(	char **	p,
		int	nNeeded
	)

Definition at line 1035 of file eval.cpp.

References free_lbuf, tag_ptrsframe::next, tag_ptrsframe::nptrs, pPtrsFrame, PTRS_PER_FRAME, and UNUSED_PARAMETER.

Referenced by add_prefix(), check_filter(), did_it(), do_ufun(), eval_boolexp(), FUNCTION(), mux_exec(), and process_hook().

{
    UNUSED_PARAMETER(p);

    if (pPtrsFrame->nptrs == PTRS_PER_FRAME)
    {
        PtrsFrame *q = pPtrsFrame->next;
        free_lbuf((char *)pPtrsFrame);
        pPtrsFrame = q;
    }
    //mux_assert(p == pPtrsFrame->ptrs + pPtrsFrame->nptrs);
    pPtrsFrame->nptrs += nNeeded;
}

char* process_command	(	dbref	executor,
		dbref	caller,
		dbref	enactor,
		bool	,
		char *	,
		char *	[],
		int
	)

Definition at line 1649 of file command.cpp.

References A_EALIAS, A_LALIAS, A_VA, alloc_lbuf, AMATCH_CMD, atr_get, atr_match(), atr_pget, statedata::bStackLimitReached, CMDENT::callseq, check_access(), CmdCheck, CMDENT::cmdname, cmdtest(), statedata::command_htab, Contents, CS_NOSQUISH, statedata::curr_cmd, statedata::debug_cmd, do_comsystem(), do_enter_internal(), do_leave(), do_move(), DOLIST, ENDLOG, EV_EVAL, EV_FCHECK, EV_STRIP_CURLY, EV_TOP, Fixed, confdata::fixed_home_msg, free_lbuf, statedata::func_invk_ctr, statedata::func_nest_lev, confdata::global_error_obj, Going, Good_obj, goto_cmdp, Halted, Has_contents, Has_location, hashfindLEN(), confdata::have_comsys, confdata::have_zones, higcheck(), HOOK_AFAIL, hook_fail(), HOOK_IGNORE, HOOK_IGSWITCH, HOOK_PERMIT, CMDENT::hookmask, init_match_check_keys(), isPlayer, isRoom, last_match_result(), LBUF_SIZE, list_check(), Location, statedata::lock_nest_lev, LOG_ALLCOMMANDS, LOG_ALWAYS, LOG_BADCOMMANDS, LOG_BUGS, log_name_and_loc(), confdata::log_options, LOG_SUSPECTCMDS, log_text(), confdata::master_room, match_exit_with_parents(), match_master_exit(), confdata::match_mine, confdata::match_mine_pl, match_zone_exit(), matches_exit_from_list(), move_exit(), mudconf, mudstate, mux_assert, mux_exec(), mux_isspace, mux_strtok_ctl(), mux_strtok_parse(), mux_strtok_src(), mux_tolower, Name, No_Command, NOPERM_MESSAGE, NOTHING, notify, notify_quiet, statedata::nStackNest, statedata::ntfy_nest_lev, Owner, CMDENT::perms, prefix_cmds, process_cmdent(), confdata::restrict_home, search_nametab(), Slave, confdata::space_compress, STARTLOG, string_compare(), Suspect, SW_MULTIPLE, CMDENT::switches, tprintf(), TYPE_EXIT, Verbose, WizRoy, Zone, and zonecmdtest().

Referenced by do_command(), do_train(), and Task_RunQueueEntry().

{
    static char preserve_cmd[LBUF_SIZE];
    char *pOriginalCommand = arg_command;
    static char SpaceCompressCommand[LBUF_SIZE];
    static char LowerCaseCommand[LBUF_SIZE];
    char *pCommand;
    char *p, *q, *arg, *pSlash, *cmdsave, *bp, *str, check2[2];
    int aflags, i;
    dbref exit, aowner;
    CMDENT *cmdp;

    // Robustify player.
    //
    cmdsave = mudstate.debug_cmd;
    mudstate.debug_cmd = (char *)"< process_command >";
    mudstate.nStackNest = 0;
    mudstate.bStackLimitReached = false;
    *(check2 + 1) = '\0';

    mux_assert(pOriginalCommand);

    if (!Good_obj(executor))
    {
        // We are using SpaceCompressCommand temporarily.
        //
        STARTLOG(LOG_BUGS, "CMD", "PLYR");
        sprintf(SpaceCompressCommand, "Bad player in process_command: %d",
            executor);
        log_text(SpaceCompressCommand);
        ENDLOG;
        mudstate.debug_cmd = cmdsave;
        return pOriginalCommand;
    }

    // Make sure player isn't going or halted.
    //
    if (  Going(executor)
       || (  Halted(executor)
          && !(  isPlayer(executor)
              && interactive)))
    {
        notify(Owner(executor),
            tprintf("Attempt to execute command by halted object #%d", executor));
        mudstate.debug_cmd = cmdsave;
        return pOriginalCommand;
    }
    if (  Suspect(executor)
       && (mudconf.log_options & LOG_SUSPECTCMDS))
    {
        STARTLOG(LOG_SUSPECTCMDS, "CMD", "SUSP");
        log_name_and_loc(executor);
        log_text(" entered: ");
        log_text(pOriginalCommand);
        ENDLOG;
    }
    else
    {
        STARTLOG(LOG_ALLCOMMANDS, "CMD", "ALL");
        log_name_and_loc(executor);
        log_text(" entered: ");
        log_text(pOriginalCommand);
        ENDLOG;
    }

    // Reset recursion limits.
    //
    mudstate.func_nest_lev = 0;
    mudstate.func_invk_ctr = 0;
    mudstate.ntfy_nest_lev = 0;
    mudstate.lock_nest_lev = 0;

    if (Verbose(executor))
    {
        notify(Owner(executor), tprintf("%s] %s", Name(executor), pOriginalCommand));
    }

    // Eat leading whitespace, and space-compress if configured.
    //
    while (mux_isspace(*pOriginalCommand))
    {
        pOriginalCommand++;
    }
    strcpy(preserve_cmd, pOriginalCommand);
    mudstate.debug_cmd = pOriginalCommand;
    mudstate.curr_cmd = preserve_cmd;

    if (mudconf.space_compress)
    {
        // Compress out the spaces and use that as the command
        //
        pCommand = SpaceCompressCommand;

        p = pOriginalCommand;
        q = SpaceCompressCommand;
        while (  *p
              && q < SpaceCompressCommand + LBUF_SIZE)
        {
            while (  *p
                  && !mux_isspace(*p)
                  && q < SpaceCompressCommand + LBUF_SIZE)
            {
                *q++ = *p++;
            }

            while (mux_isspace(*p))
            {
                p++;
            }

            if (  *p
               && q < SpaceCompressCommand + LBUF_SIZE)
            {
                *q++ = ' ';
            }
        }
        *q = '\0';
    }
    else
    {
        // Don't compress the spaces. Use the original command
        // (without leading spaces) as the command to use.
        //
        pCommand = pOriginalCommand;
    }

    // Now comes the fun stuff.  First check for single-letter leadins.
    // We check these before checking HOME because they are among the
    // most frequently executed commands, and they can never be the
    // HOME command.
    //
    i = pCommand[0] & 0xff;
    int cval = 0;
    int hval = 0;
    if (i && (prefix_cmds[i] != NULL))
    {
        // CmdCheck tests for @icmd. higcheck tests for i/p hooks.
        // Both from RhostMUSH.
        // cval/hval values: 0 normal, 1 disable, 2 ignore
        //
        *check2 = (char)i;
        if (CmdCheck(executor))
        {
            cval = cmdtest(executor, check2);
        }
        else if (CmdCheck(Owner(executor)))
        {
            cval = cmdtest(Owner(executor), check2);
        }
        else
        {
            cval = 0;
        }

        if (cval == 0)
        {
            cval = zonecmdtest(executor, check2);
        }

        if (prefix_cmds[i]->hookmask & (HOOK_IGNORE|HOOK_PERMIT))
        {
            hval = higcheck(executor, caller, enactor, prefix_cmds[i], pCommand);
        }
        else
        {
            hval = 0;
        }

        if (  cval != 2
           && hval != 2)
        {
            if (  cval == 1
               || hval == 1)
            {
                if (prefix_cmds[i]->hookmask & HOOK_AFAIL)
                {
                    hook_fail(executor, prefix_cmds[i], pCommand);
                }
                else
                {
                    notify(executor, NOPERM_MESSAGE);
                }
                return preserve_cmd;
            }
            process_cmdent(prefix_cmds[i], NULL, executor, caller, enactor,
                interactive, pCommand, pCommand, args, nargs);
            if (mudstate.bStackLimitReached)
            {
                STARTLOG(LOG_ALWAYS, "CMD", "SPAM");
                log_name_and_loc(executor);
                log_text(" entered: ");
                log_text(pOriginalCommand);
                ENDLOG;
            }
            mudstate.bStackLimitReached = false;

            mudstate.debug_cmd = cmdsave;
            return preserve_cmd;
        }
    }

    if (  mudconf.have_comsys
       && !Slave(executor)
       && !do_comsystem(executor, pCommand))
    {
        return preserve_cmd;
    }

    // Check for the HOME command.
    //
    if (  Has_location(executor)
       && string_compare(pCommand, "home") == 0)
    {
        // CmdCheck tests for @icmd. higcheck tests for i/p hooks.
        // Both from RhostMUSH.
        // cval/hval values: 0 normal, 1 disable, 2 ignore.
        //
        if (CmdCheck(executor))
        {
            cval = cmdtest(executor, "home");
        }
        else if (CmdCheck(Owner(executor)))
        {
            cval = cmdtest(Owner(executor), "home");
        }
        else
        {
            cval = 0;
        }

        if (cval == 0)
        {
            cval = zonecmdtest(executor, "home");
        }

        if (cval != 2)
        {
            if (!check_access(executor, mudconf.restrict_home))
            {
                notify(executor, NOPERM_MESSAGE);
                return preserve_cmd;
            }
            if (cval == 1)
            {
                notify(executor, NOPERM_MESSAGE);
                return preserve_cmd;
            }
            if (  (  Fixed(executor)
                  || Fixed(Owner(executor)))
               && !WizRoy(executor))
            {
                notify(executor, mudconf.fixed_home_msg);
                return preserve_cmd;
            }
            do_move(executor, caller, enactor, 0, "home");
            mudstate.debug_cmd = cmdsave;
            return preserve_cmd;
        }
    }

    // Only check for exits if we may use the goto command.
    //
    if (check_access(executor, goto_cmdp->perms))
    {
        // CmdCheck tests for @icmd. higcheck tests for i/p hooks.
        // Both from RhostMUSH.
        // cval/hval values: 0 normal, 1 disable, 2 ignore
        // Master room exits are not affected.
        //
        if (CmdCheck(executor))
        {
            cval = cmdtest(executor, "goto");
        }
        else if (CmdCheck(Owner(executor)))
        {
            cval = cmdtest(Owner(executor), "goto");
        }
        else
        {
            cval = 0;
        }

        if (cval == 0)
        {
            cval = zonecmdtest(executor, "goto");
        }

        if (goto_cmdp->hookmask & (HOOK_IGNORE|HOOK_PERMIT))
        {
            hval = higcheck(executor, caller, enactor, goto_cmdp, "goto");
        }
        else
        {
            hval = 0;
        }

        if (  cval != 2
           && hval != 2)
        {
            // Check for an exit name.
            //
            init_match_check_keys(executor, pCommand, TYPE_EXIT);
            match_exit_with_parents();
            exit = last_match_result();
            if (exit != NOTHING)
            {
                if (cval || hval)
                {
                    if (goto_cmdp->hookmask & HOOK_AFAIL)
                    {
                        hook_fail(executor, goto_cmdp, "goto");
                    }
                    else
                    {
                        notify(executor, NOPERM_MESSAGE);
                    }
                    return preserve_cmd;
                }
                move_exit(executor, exit, false, "You can't go that way.", 0);
                mudstate.debug_cmd = cmdsave;
                return preserve_cmd;
            }

            // Check for an exit in the master room.
            //
            init_match_check_keys(executor, pCommand, TYPE_EXIT);
            match_master_exit();
            exit = last_match_result();
            if (exit != NOTHING)
            {
                move_exit(executor, exit, true, NULL, 0);
                mudstate.debug_cmd = cmdsave;
                return preserve_cmd;
            }
        }
    }

    // Set up a lowercase command and an arg pointer for the hashed
    // command check.  Since some types of argument processing destroy
    // the arguments, make a copy so that we keep the original command
    // line intact.  Store the edible copy in LowerCaseCommand after
    // the lower-cased command.
    //

    // Make lowercase command
    //
    for (p = pCommand, q = LowerCaseCommand;
         *p && !mux_isspace(*p);
         p++, q++)
    {
        *q = mux_tolower(*p);
    }
    *q = '\0';
    int nLowerCaseCommand = q - LowerCaseCommand;

    // Skip spaces before arg
    //
    while (mux_isspace(*p))
    {
        p++;
    }

    // Remember where arg starts
    //
    arg = p;

    // Strip off any command switches and save them.
    //
    pSlash = strchr(LowerCaseCommand, '/');
    if (pSlash)
    {
        nLowerCaseCommand = pSlash - LowerCaseCommand;
        *pSlash++ = '\0';
    }

    // Check for a builtin command (or an alias of a builtin command)
    //
    cmdp = (CMDENT *)hashfindLEN(LowerCaseCommand, nLowerCaseCommand, &mudstate.command_htab);

    /* If command is checked to ignore NONMATCHING switches, fall through */
    if (cmdp)
    {
        // CmdCheck tests for @icmd. higcheck tests for i/p hooks.
        // Both from RhostMUSH.
        // cval/hval values: 0 normal, 1 disable, 2 ignore
        //
        if (CmdCheck(executor))
        {
            cval = cmdtest(executor, cmdp->cmdname);
        }
        else if (CmdCheck(Owner(executor)))
        {
            cval = cmdtest(Owner(executor), cmdp->cmdname);
        }
        else
        {
            cval = 0;
        }

        if (cval == 0)
        {
            cval = zonecmdtest(executor, cmdp->cmdname);
        }

        if (cmdp->hookmask & (HOOK_IGNORE|HOOK_PERMIT))
        {
            hval = higcheck(executor, caller, enactor, cmdp, LowerCaseCommand);
        }
        else
        {
            hval = 0;
        }

        // If the command contains a switch, but the command doesn't support
        // any switches or the command contains one that isn't supported,
        // HOOK_IGSWITCH will allow us to treat the entire command as if it
        // weren't a built-in command.
        //
        int flagvalue;
        if (  (cmdp->hookmask & HOOK_IGSWITCH)
           && pSlash)
        {
            if (cmdp->switches)
            {
                search_nametab(executor, cmdp->switches, pSlash, &flagvalue);
                if (flagvalue & SW_MULTIPLE)
                {
                    MUX_STRTOK_STATE ttswitch;
                    // All the switches given a command shouldn't exceed 200 chars together
                    char switch_buff[200];
                    char *switch_ptr;
                    sprintf(switch_buff, "%.199s", pSlash);
                    mux_strtok_src(&ttswitch, switch_buff);
                    mux_strtok_ctl(&ttswitch, "/");
                    switch_ptr = mux_strtok_parse(&ttswitch);
                    while (  switch_ptr
                          && *switch_ptr)
                    {
                        search_nametab(executor, cmdp->switches, switch_ptr, &flagvalue);
                        if (flagvalue == -1)
                        {
                            break;
                        }
                        switch_ptr = mux_strtok_parse(&ttswitch);
                    }
                }
                if (flagvalue == -1)
                {
                    cval = 2;
                }
            }
            else
            {
                // Switch exists but no switches allowed for command.
                //
                cval = 2;
            }
        }

        if (  cval != 2
           && hval != 2)
        {
            if (  cval == 1
               || hval == 1)
            {
                if (cmdp->hookmask & HOOK_AFAIL)
                {
                    hook_fail(executor, cmdp, LowerCaseCommand);
                }
                else
                {
                    notify(executor, NOPERM_MESSAGE);
                }
                return preserve_cmd;
            }
            if (  mudconf.space_compress
               && (cmdp->callseq & CS_NOSQUISH))
            {
                // We handle this specially -- there is no space compression
                // involved, so we must go back to the original command.
                // We skip over the command and a single space to position
                // arg at the arguments.
                //
                arg = pCommand = pOriginalCommand;
                while (*arg && !mux_isspace(*arg))
                {
                    arg++;
                }
                if (*arg)
                {
                    // We stopped on the space, advance to next.
                    //
                    arg++;
                }
            }
            process_cmdent(cmdp, pSlash, executor, caller, enactor, interactive,
                arg, pCommand, args, nargs);
            if (mudstate.bStackLimitReached)
            {
                STARTLOG(LOG_ALWAYS, "CMD", "SPAM");
                log_name_and_loc(executor);
                log_text(" entered: ");
                log_text(pOriginalCommand);
                ENDLOG;
            }
            mudstate.bStackLimitReached = false;
            mudstate.debug_cmd = cmdsave;
            return preserve_cmd;
        }
    }

    // Check for enter and leave aliases, user-defined commands on the
    // player, other objects where the player is, on objects in the
    // player's inventory, and on the room that holds the player. We
    // evaluate the command line here to allow chains of $-commands
    // to work.
    //
    bp = LowerCaseCommand;
    str = pCommand;
    mux_exec(LowerCaseCommand, &bp, executor, caller, enactor,
        EV_EVAL | EV_FCHECK | EV_STRIP_CURLY | EV_TOP, &str, args, nargs);
    *bp = '\0';
    bool succ = false;

    // Idea for enter/leave aliases from R'nice@TinyTIM
    //
    if (Has_location(executor) && Good_obj(Location(executor)))
    {
        // Check for a leave alias.
        //
        p = atr_pget(Location(executor), A_LALIAS, &aowner, &aflags);
        if (*p)
        {
            if (matches_exit_from_list(LowerCaseCommand, p))
            {
                free_lbuf(p);

                // CmdCheck tests for @icmd. higcheck tests for i/p hooks.
                // Both from RhostMUSH.
                // cval/hval values: 0 normal, 1 disable, 2 ignore
                //
                if (CmdCheck(executor))
                {
                    cval = cmdtest(executor, "leave");
                }
                else if (CmdCheck(Owner(executor)))
                {
                    cval = cmdtest(Owner(executor), "leave");
                }
                else
                {
                    cval = 0;
                }

                if (cval == 0)
                {
                    cval = zonecmdtest(executor, "leave");
                }

                cmdp = (CMDENT *)hashfindLEN((char *)"leave", strlen("leave"), &mudstate.command_htab);

                if (cmdp->hookmask & (HOOK_IGNORE|HOOK_PERMIT))
                {
                    hval = higcheck(executor, caller, enactor, cmdp, "leave");
                }
                else
                {
                    hval = 0;
                }

                if (  cval != 2
                   && hval != 2)
                {
                    if (  cval == 1
                       || hval == 1)
                    {
                        if (cmdp->hookmask & HOOK_AFAIL)
                        {
                            hook_fail(executor, cmdp, "leave");
                        }
                        else
                        {
                            notify(executor, NOPERM_MESSAGE);
                        }
                        return preserve_cmd;
                    }
                    do_leave(executor, caller, executor, 0);
                    return preserve_cmd;
                }
            }
        }
        free_lbuf(p);

        DOLIST(exit, Contents(Location(executor)))
        {
            p = atr_pget(exit, A_EALIAS, &aowner, &aflags);
            if (*p)
            {
                if (matches_exit_from_list(LowerCaseCommand, p))
                {
                    free_lbuf(p);

                    // Check for enter aliases.
                    //
                    // CmdCheck tests for @icmd. higcheck tests for i/p hooks.
                    // Both from RhostMUSH.
                    // cval/hval values: 0 normal, 1 disable, 2 ignore
                    //
                    if (CmdCheck(executor))
                    {
                        cval = cmdtest(executor, "enter");
                    }
                    else if (CmdCheck(Owner(executor)))
                    {
                        cval = cmdtest(Owner(executor), "enter");
                    }
                    else
                    {
                        cval = 0;
                    }

                    if (cval == 0)
                    {
                        cval = zonecmdtest(executor, "enter");
                    }

                    cmdp = (CMDENT *)hashfindLEN((char *)"enter", strlen("enter"), &mudstate.command_htab);

                    if (cmdp->hookmask & (HOOK_IGNORE|HOOK_PERMIT))
                    {
                        hval = higcheck(executor, caller, enactor, cmdp, "enter");
                    }
                    else
                    {
                        hval = 0;
                    }

                    if (  cval != 2
                       && hval != 2)
                    {
                        if (  cval == 1
                           || hval == 1)
                        {
                            if (cmdp->hookmask & HOOK_AFAIL)
                            {
                                hook_fail(executor, cmdp, "enter");
                            }
                            else
                            {
                                notify(executor, NOPERM_MESSAGE);
                            }
                            return preserve_cmd;
                        }
                        do_enter_internal(executor, exit, false);
                        return preserve_cmd;
                    }
                    else if (cval == 1)
                    {
                        notify_quiet(executor, NOPERM_MESSAGE);
                        return preserve_cmd;
                    }
                }
            }
            free_lbuf(p);
        }
    }

    // Check for $-command matches on me.
    //
    if (mudconf.match_mine && !No_Command(executor))
    {
        if (  (  !isPlayer(executor)
              || mudconf.match_mine_pl)
           && atr_match(executor, executor, AMATCH_CMD, LowerCaseCommand, preserve_cmd, true))
        {
            succ = true;
        }
    }

    // Check for $-command matches on nearby things and on my room.
    //
    if (Has_location(executor))
    {
        succ |= list_check(Contents(Location(executor)), executor, AMATCH_CMD, LowerCaseCommand, preserve_cmd, true);

        if (!No_Command(Location(executor)))
        {
            succ |= atr_match(Location(executor), executor, AMATCH_CMD, LowerCaseCommand, preserve_cmd, true);
        }
    }

    // Check for $-command matches in my inventory.
    //
    if (Has_contents(executor))
    {
        succ |= list_check(Contents(executor), executor, AMATCH_CMD, LowerCaseCommand, preserve_cmd, true);
    }

    if (  !succ
       && mudconf.have_zones)
    {
        // now do check on zones.
        //
        dbref zone = Zone(executor);
        dbref loc = Location(executor);
        dbref zone_loc = NOTHING;
        if (  Good_obj(loc)
           && Good_obj(zone_loc = Zone(loc)))
        {
            if (isRoom(zone_loc))
            {
                // zone of player's location is a parent room.
                //
                if (loc != zone)
                {
                    // check parent room exits.
                    //
                    init_match_check_keys(executor, pCommand, TYPE_EXIT);
                    match_zone_exit();
                    exit = last_match_result();
                    if (exit != NOTHING)
                    {
                        move_exit(executor, exit, true, NULL, 0);
                        mudstate.debug_cmd = cmdsave;
                        return preserve_cmd;
                    }
                    succ |= list_check(Contents(zone_loc), executor,
                               AMATCH_CMD, LowerCaseCommand, preserve_cmd,
                               true);

                    // end of parent room checks.
                    //
                }
            }
            else
            {
                // try matching commands on area zone object.
                //
                if (!No_Command(zone_loc))
                {
                    succ |= atr_match(zone_loc, executor, AMATCH_CMD,
                       LowerCaseCommand, preserve_cmd, true);
                }
            }
        }

        // End of matching on zone of player's location.
        //

        // if nothing matched with parent room/zone object, try matching
        // zone commands on the player's personal zone.
        //
        if (  !succ
           && Good_obj(zone)
           && !No_Command(zone)
           && zone_loc != zone)
        {
            succ |= atr_match(zone, executor, AMATCH_CMD, LowerCaseCommand, preserve_cmd, true);
        }
    }

    // If we didn't find anything, try in the master room.
    //
    if (!succ)
    {
        if (  Good_obj(mudconf.master_room)
           && Has_contents(mudconf.master_room))
        {
            succ |= list_check(Contents(mudconf.master_room), executor,
                AMATCH_CMD, LowerCaseCommand, preserve_cmd, false);

            if (!No_Command(mudconf.master_room))
            {
                succ |= atr_match(mudconf.master_room, executor, AMATCH_CMD,
                    LowerCaseCommand, preserve_cmd, false);
            }
        }
    }

    // If we still didn't find anything, tell how to get help.
    //
    if (!succ)
    {
        if (  Good_obj(mudconf.global_error_obj)
           && !Going(mudconf.global_error_obj))
        {
            char *errtext = atr_get(mudconf.global_error_obj, A_VA, &aowner, &aflags);
            char *errbuff = alloc_lbuf("process_command.error_msg");
            char *errbufc = errbuff;
            str = errtext;
            mux_exec(errbuff, &errbufc, mudconf.global_error_obj, caller, enactor,
                EV_EVAL | EV_FCHECK | EV_STRIP_CURLY | EV_TOP, &str,
                &pCommand, 1);
            *errbufc = '\0';
            notify(executor, errbuff);
            free_lbuf(errtext);
            free_lbuf(errbuff);
        }
        else
        {
            // We use LowerCaseCommand for another purpose.
            //
            notify(executor, "Huh?  (Type \"help\" for help.)");
            STARTLOG(LOG_BADCOMMANDS, "CMD", "BAD");
            log_name_and_loc(executor);
            log_text(" entered: ");
            log_text(pCommand);
            ENDLOG;
        }
    }
    mudstate.debug_cmd = cmdsave;
    return preserve_cmd;
}

const char* PureName

(

dbref

thing

)

Definition at line 475 of file db.cpp.

References A_NAME, aszSpecialDBRefNames, atr_get, atr_get_LEN(), confdata::cache_names, db, free_lbuf, mudconf, object::name, object::purename, StringCloneLen(), and strip_ansi().

Referenced by do_find(), match_exit_internal(), match_here(), match_list(), Moniker(), and search_perform().

{
    if (thing < 0)
    {
        return aszSpecialDBRefNames[-thing];
    }

    dbref aowner;
    int aflags;

    char *pName, *pPureName;
    if (mudconf.cache_names)
    {
        if (!db[thing].purename)
        {
            size_t nName;
            size_t nPureName;
#ifdef MEMORY_BASED
            pName = atr_get_LEN(thing, A_NAME, &aowner, &aflags, &nName);
            pPureName = strip_ansi(pName, &nPureName);
            free_lbuf(pName);
            db[thing].purename = StringCloneLen(pPureName, nPureName);
#else // MEMORY_BASED
            if (!db[thing].name)
            {
                pName = atr_get_LEN(thing, A_NAME, &aowner, &aflags, &nName);
                db[thing].name = StringCloneLen(pName, nName);
                free_lbuf(pName);
            }
            else
            {
                nName = strlen(db[thing].name);
            }
            pName = db[thing].name;
            pPureName = strip_ansi(pName, &nPureName);
            if (nPureName == nName)
            {
                db[thing].purename = pName;
            }
            else
            {
                db[thing].purename = StringCloneLen(pPureName, nPureName);
            }
#endif // MEMORY_BASED
        }
        return db[thing].purename;
    }
    pName = atr_get(thing, A_NAME, &aowner, &aflags);
    pPureName = strip_ansi(pName);
    free_lbuf(pName);
    return pPureName;
}

int* PushIntegers

(

int

nNeeded

)

Definition at line 1059 of file eval.cpp.

References alloc_lbuf, tag_intsframe::ints, INTS_PER_FRAME, tag_intsframe::next, tag_intsframe::nints, and pIntsFrame.

Referenced by add_prefix(), check_filter(), did_it(), do_ufun(), eval_boolexp(), FUNCTION(), mux_exec(), and process_hook().

{
    if (  !pIntsFrame
       || pIntsFrame->nints < nNeeded)
    {
        IntsFrame *p = (IntsFrame *)alloc_lbuf("PushIntegers");
        p->next = pIntsFrame;
        p->nints = INTS_PER_FRAME;
        pIntsFrame = p;
    }
    pIntsFrame->nints -= nNeeded;
    return pIntsFrame->ints + pIntsFrame->nints;
}

char** PushPointers

(

int

nNeeded

)

Definition at line 1021 of file eval.cpp.

References alloc_lbuf, tag_ptrsframe::next, tag_ptrsframe::nptrs, pPtrsFrame, tag_ptrsframe::ptrs, and PTRS_PER_FRAME.

Referenced by add_prefix(), check_filter(), did_it(), do_ufun(), eval_boolexp(), FUNCTION(), mux_exec(), and process_hook().

{
    if (  !pPtrsFrame
       || pPtrsFrame->nptrs < nNeeded)
    {
        PtrsFrame *p = (PtrsFrame *)alloc_lbuf("PushPointers");
        p->next = pPtrsFrame;
        p->nptrs = PTRS_PER_FRAME;
        pPtrsFrame = p;
    }
    pPtrsFrame->nptrs -= nNeeded;
    return pPtrsFrame->ptrs + pPtrsFrame->nptrs;
}

void put_ConnectionInfoFields	(	dbref	target,
		long	anFields[4],
		CLinearTimeAbsolute &	ltaLogout
	)

Definition at line 2946 of file netcommon.cpp.

References A_CONNINFO, alloc_lbuf, atr_add_raw_LEN(), free_lbuf, mux_i64toa(), mux_ltoa(), and CLinearTimeAbsolute::ReturnSeconds().

Referenced by shutdownsock().

{
    char *pConnInfo = alloc_lbuf("put_CIF");
    char *p = pConnInfo;
    for (int i = 0; i < 4; i++)
    {
        p += mux_ltoa(anFields[i], p);
        *p++ = ' ';
    }
    p += mux_i64toa(ltaLogout.ReturnSeconds(), p);
    *p++ = 0;

    atr_add_raw_LEN(target, A_CONNINFO, pConnInfo, p - pConnInfo);
    free_lbuf(pConnInfo);
}

int QueueMax

(

dbref

player

)

Returns the player's upper limit of queued commands.

If a QueueMax is set on the player, we use that. Otherwise, there is a configurable game-wide limit (given by player_queue_limit) unless the player is a Wizard in which case, we reason that well behaved Wizard code should be able to schedule as much work as there are objects in the database -- larger game, more work to be expected in the queue.

Parameters:

player

dbref of player object.

Returns:

None.

Definition at line 263 of file player_c.cpp.

References statedata::db_top, Good_obj, mudconf, mudstate, OwnsOthers, pcache_find(), player_cache::qmax, confdata::queuemax, and Wizard.

Referenced by setup_que().

{
    int m = 0;
    if (  Good_obj(player)
       && OwnsOthers(player))
    {
        PCACHE *pp = pcache_find(player);
        if (pp->qmax >= 0)
        {
            m = pp->qmax;
        }
        else
        {
            // @queuemax was not valid so we use the game-wide limit.
            //
            m = mudconf.queuemax;
            if (  Wizard(player)
               && m < mudstate.db_top + 1)
            {
                m = mudstate.db_top + 1;
            }
        }
    }
    return m;
}

bool quick_wild	(	const char *	,
		const char *
	)

Definition at line 35 of file wild.cpp.

References EQUAL, mudconf, mudstate, NOTEQUAL, quick_wild(), statedata::wild_invk_ctr, and confdata::wild_invk_lim.

Referenced by badname_check(), check_filter(), do_chanlist(), do_comlist(), find_wild_attrs(), FUNCTION(), list_vattrs(), quick_wild(), ReportMatchedTopics(), wild(), wild1(), and wild_match().

{
    if (mudstate.wild_invk_ctr >= mudconf.wild_invk_lim)
    {
        return false;
    }
    mudstate.wild_invk_ctr++;

    while (*tstr != '*')
    {
        switch (*tstr)
        {
        case '?':

            // Single character match.  Return false if at end of data.
            //
            if (!*dstr)
            {
                return false;
            }
            break;

        case '\\':

            // Escape character.  Move up, and force literal match of next
            // character.
            //
            tstr++;

            // FALL THROUGH

        default:

            // Literal character.  Check for a match. If matching end of data,
            // return true.
            //
            if (NOTEQUAL(*dstr, *tstr))
            {
                return false;
            }
            if (!*dstr)
            {
                return true;
            }
        }
        tstr++;
        dstr++;
    }

    // Skip over '*'.
    //
    tstr++;

    // Return true on trailing '*'.
    //
    if (!*tstr)
    {
        return true;
    }

    // Skip over wildcards.
    //
    while (  *tstr == '?'
          || *tstr == '*')
    {
        if (*tstr == '?')
        {
            if (!*dstr)
            {
                return false;
            }
            dstr++;
        }
        tstr++;
    }

    // Skip over a backslash in the pattern string if it is there.
    //
    if (*tstr == '\\')
    {
        tstr++;
    }

    // Return true on trailing '*'.
    //
    if (!*tstr)
    {
        return true;
    }

    // Scan for possible matches.
    //
    while (*dstr)
    {
        if (  EQUAL(*dstr, *tstr)
           && quick_wild(tstr + 1, dstr + 1))
        {
            return true;
        }
        dstr++;
    }
    return false;
}

void DCL_CDECL raw_broadcast	(	int	,
		char *	,
			...
	)

Definition at line 209 of file netcommon.cpp.

References DESC_ITER_CONN, Flags, LBUF_SIZE, mux_vsnprintf(), descriptor_data::player, process_output(), queue_string(), and queue_write_LEN().

Referenced by announce_connect(), announce_disconnect(), do_backup(), do_fixdb(), do_kill(), do_name(), do_restart(), do_shutdown(), fork_and_dump(), load_restart_db(), and sighandler().

{
    if (!fmt || !*fmt)
    {
        return;
    }

    char buff[LBUF_SIZE];

    va_list ap;
    va_start(ap, fmt);
    mux_vsnprintf(buff, LBUF_SIZE, fmt, ap);
    va_end(ap);

    DESC *d;
    DESC_ITER_CONN(d)
    {
        if ((Flags(d->player) & inflags) == inflags)
        {
            queue_string(d, buff);
            queue_write_LEN(d, "\r\n", 2);
            process_output(d, false);
        }
    }
}

void raw_notify_html	(	dbref	player,
		const char *	msg
	)

Definition at line 126 of file netcommon.cpp.

References Connected, DESC_ITER_PLAYER, Html, statedata::inpipe, mudstate, statedata::poutbufc, statedata::poutnew, statedata::poutobj, queue_string(), and safe_str.

Referenced by notify_check().

{
    if (!msg || !*msg)
    {
        return;
    }

    if (  mudstate.inpipe
       && player == mudstate.poutobj)
    {
        safe_str(msg, mudstate.poutnew, &mudstate.poutbufc);
        return;
    }
    if (  !Connected(player)
       || !Html(player))
    {
        return;
    }

    DESC *d;
    DESC_ITER_PLAYER(player, d)
    {
        queue_string(d, msg);
    }
}

bool regexp_match	(	char *	pattern,
		char *	str,
		int	case_opt,
		char *	args[],
		int	nargs
	)

Definition at line 73 of file game.cpp.

References alloc_lbuf, CMuxAlarm::bAlarmed, free_lbuf, LBUF_SIZE, MEMFREE, MuxAlarm, pcre_compile(), pcre_copy_substring(), and pcre_exec().

Referenced by atr_match1(), and process_cmdent().

{
    int matches;
    int i;
    const char *errptr;
    int erroffset;

    /*
     * Load the regexp pattern. This allocates memory which must be
     * later freed. A free() of the regexp does free all structures
     * under it.
     */

    pcre *re;
    if (  MuxAlarm.bAlarmed
       || (re = pcre_compile(pattern, case_opt, &errptr, &erroffset, NULL)) == NULL)
    {
        /*
         * This is a matching error. We have an error message in
         * regexp_errbuf that we can ignore, since we're doing
         * command-matching.
         */
        return false;
    }

    // To capture N substrings, you need space for 3(N+1) offsets in the
    // offset vector. We'll allow 2N-1 substrings and possibly ignore some.
    //
    const int ovecsize = 6 * nargs;
    int *ovec = new int[ovecsize];

    /*
     * Now we try to match the pattern. The relevant fields will
     * automatically be filled in by this.
     */
    matches = pcre_exec(re, NULL, str, strlen(str), 0, 0, ovec, ovecsize);
    if (matches < 0)
    {
        delete [] ovec;
        MEMFREE(re);
        return false;
    }

    if (matches == 0)
    {
        // There were too many substring matches. See docs for
        // pcre_copy_substring().
        //
        matches = ovecsize / 3;
    }

    /*
     * Now we fill in our args vector. Note that in regexp matching,
     * 0 is the entire string matched, and the parenthesized strings
     * go from 1 to 9. We DO PRESERVE THIS PARADIGM, for consistency
     * with other languages.
     */

    for (i = 0; i < nargs; ++i)
    {
        args[i] = alloc_lbuf("regexp_match");
        if (pcre_copy_substring(str, ovec, matches, i,
                                args[i], LBUF_SIZE) < 0)
        {
            free_lbuf(args[i]);
            args[i] = NULL;
        }
    }

    delete [] ovec;
    MEMFREE(re);
    return true;
}

void ReleaseAllResources

(

dbref

obj

)

Definition at line 3145 of file db.cpp.

References del_comsys(), do_channelnuke(), do_clearcom(), do_comdisconnect(), do_mail_clear(), do_mail_purge(), confdata::have_comsys, confdata::have_mailer, malias_cleanup(), and mudconf.

Referenced by CGuests::Create(), destroy_bad_obj(), destroy_obj(), and do_toad().

{
    if (mudconf.have_comsys)
    {
        do_comdisconnect(obj);
        do_clearcom(obj, obj, obj, 0);
        do_channelnuke(obj);
        del_comsys(obj);
    }
    if (mudconf.have_mailer)
    {
        do_mail_clear(obj, NULL);
        do_mail_purge(obj);
        malias_cleanup(obj);
    }
}

dbref remove_first	(	dbref	,
		dbref
	)

Definition at line 52 of file predicates.cpp.

References DOLIST, Next, and s_Next.

Referenced by destroy_exit(), do_drop(), do_get(), move_object(), and move_the_exit().

{
    if (head == thing)
    {
        return Next(thing);
    }

    dbref prev;

    DOLIST(prev, head)
    {
        if (Next(prev) == thing)
        {
            s_Next(prev, Next(thing));
            return head;
        }
    }
    return head;
}

void RemoveFile

(

char *

name

)

Definition at line 3428 of file db.cpp.

Referenced by cache_pass2(), dump_database_internal(), and main().

{
    unlink(name);
}

int ReplaceFile	(	char *	old_name,
		char *	new_name
	)

Definition at line 3415 of file db.cpp.

References ENDLINE, Log, and CLogFile::tinyprintf().

Referenced by dump_database_internal(), save_comsys(), and CLogFile::SetPrefix().

{
    if (rename(old_name, new_name) == 0)
    {
        return 0;
    }
    else
    {
        Log.tinyprintf("rename %s to %s fails with errno of %s(%d)" ENDLINE, old_name, new_name, strerror(errno), errno);
    }
    return -1;
}

void report

(

void

)

Definition at line 45 of file game.cpp.

References statedata::curr_enactor, statedata::curr_executor, statedata::debug_cmd, ENDLOG, Good_obj, LOG_BUGS, log_name_and_loc(), log_text(), mudstate, and STARTLOG.

Referenced by sighandler().

{
    STARTLOG(LOG_BUGS, "BUG", "INFO");
    log_text("Command: '");
    log_text(mudstate.debug_cmd);
    log_text("'");
    ENDLOG;
    if (Good_obj(mudstate.curr_executor))
    {
        STARTLOG(LOG_BUGS, "BUG", "INFO");
        log_text("Player: ");
        log_name_and_loc(mudstate.curr_executor);
        if (  mudstate.curr_enactor != mudstate.curr_executor
           && Good_obj(mudstate.curr_enactor))
        {
            log_text(" Enactor: ");
            log_name_and_loc(mudstate.curr_enactor);
        }
        ENDLOG;
    }
}

void restore_global_regs	(	const char *	,
		char *	[],
		int	[]
	)

Definition at line 2148 of file eval.cpp.

References free_lbuf, statedata::glob_reg_len, statedata::global_regs, MAX_GLOBAL_REGS, mudstate, and UNUSED_PARAMETER.

Referenced by add_prefix(), check_filter(), did_it(), do_ufun(), eval_boolexp(), FUNCTION(), look_contents(), look_exits(), look_in(), mux_exec(), and process_hook().

{
    UNUSED_PARAMETER(funcname);

    int i;

    for (i = 0; i < MAX_GLOBAL_REGS; i++)
    {
        if (preserve[i])
        {
            if (mudstate.global_regs[i])
            {
                free_lbuf(mudstate.global_regs[i]);
            }
            mudstate.global_regs[i] = preserve[i];
            mudstate.glob_reg_len[i] = preserve_len[i];
        }
        else
        {
            if (mudstate.global_regs[i])
            {
                mudstate.global_regs[i][0] = '\0';
            }
            mudstate.glob_reg_len[i] = 0;
        }
    }
}

dbref reverse_list

(

dbref

)

Definition at line 76 of file predicates.cpp.

References Next, NOTHING, and s_Next.

Referenced by process_sticky_dropto().

{
    dbref newlist, rest;

    newlist = NOTHING;
    while (list != NOTHING)
    {
        rest = Next(list);
        s_Next(list, newlist);
        newlist = list;
        list = rest;
    }
    return newlist;
}

void s_Moniker	(	dbref	thing,
		const char *	s
	)

Definition at line 655 of file db.cpp.

References A_MONIKER, atr_add_raw(), confdata::cache_names, db, MEMFREE, object::moniker, and mudconf.

Referenced by do_moniker().

{
    atr_add_raw(thing, A_MONIKER, s);
    if (mudconf.cache_names)
    {
#ifndef MEMORY_BASED
        if (db[thing].name == db[thing].moniker)
        {
            db[thing].moniker = NULL;
        }
#endif // !MEMORY_BASED
        if (db[thing].moniker)
        {
            MEMFREE(db[thing].moniker);
            db[thing].moniker = NULL;
        }
    }
}

void s_Name	(	dbref	,
		const char *
	)

Definition at line 615 of file db.cpp.

References A_NAME, atr_add_raw(), confdata::cache_names, db, MEMFREE, object::moniker, mudconf, object::name, object::purename, and StringClone().

Referenced by CGuests::Create(), create_obj(), db_make_minimal(), db_read(), destroy_bad_obj(), destroy_obj(), do_clone(), do_fixdb(), do_name(), and do_toad().

{
    atr_add_raw(thing, A_NAME, s);
#ifndef MEMORY_BASED
    if (db[thing].name)
    {
        if (mudconf.cache_names)
        {
            if (db[thing].name == db[thing].purename)
            {
                db[thing].purename = NULL;
            }
            if (db[thing].name == db[thing].moniker)
            {
                db[thing].moniker = NULL;
            }
        }
        MEMFREE(db[thing].name);
        db[thing].name = NULL;
    }
    if (s)
    {
        db[thing].name = StringClone(s);
    }
#endif // !MEMORY_BASED
    if (mudconf.cache_names)
    {
        if (db[thing].purename)
        {
            MEMFREE(db[thing].purename);
            db[thing].purename = NULL;
        }
        if (db[thing].moniker)
        {
            MEMFREE(db[thing].moniker);
            db[thing].moniker = NULL;
        }
    }
}

void s_Pass	(	dbref	,
		const char *
	)

Definition at line 674 of file db.cpp.

References A_PASS, and atr_add_raw().

Referenced by ChangePassword().

{
    atr_add_raw(thing, A_PASS, s);
}

void DCL_CDECL safe_tprintf_str	(	char *	,
		char **	,
		const char *	,
			...
	)

Definition at line 32 of file predicates.cpp.

References LBUF_SIZE, and mux_vsnprintf().

Referenced by do_drop(), do_malias_list(), do_newpassword(), do_page(), FUNCTION(), get_handler(), grep_util(), and unparse_boolexp1().

{
    va_list ap;
    va_start(ap, fmt);
    size_t nAvailable = LBUF_SIZE - (*bp - str);
    size_t len = mux_vsnprintf(*bp, (int)nAvailable, fmt, ap);
    va_end(ap);
    *bp += len;
}

void save_and_clear_global_regs	(	const char *	,
		char *	[],
		int	[]
	)

Definition at line 2127 of file eval.cpp.

References statedata::glob_reg_len, statedata::global_regs, MAX_GLOBAL_REGS, mudstate, and UNUSED_PARAMETER.

Referenced by look_contents(), look_exits(), and look_in().

{
    UNUSED_PARAMETER(funcname);

    int i;

    for (i = 0; i < MAX_GLOBAL_REGS; i++)
    {
        preserve[i] = mudstate.global_regs[i];
        preserve_len[i] = mudstate.glob_reg_len[i];

        mudstate.global_regs[i] = NULL;
        mudstate.glob_reg_len[i] = 0;
    }
}

void save_global_regs	(	const char *	,
		char *	[],
		int	[]
	)

Definition at line 2100 of file eval.cpp.

References alloc_lbuf, statedata::glob_reg_len, statedata::global_regs, MAX_GLOBAL_REGS, and mudstate.

Referenced by add_prefix(), check_filter(), did_it(), do_ufun(), eval_boolexp(), FUNCTION(), mux_exec(), and process_hook().

{
    int i;

    for (i = 0; i < MAX_GLOBAL_REGS; i++)
    {
        if (mudstate.global_regs[i])
        {
            preserve[i] = alloc_lbuf(funcname);
            int n = mudstate.glob_reg_len[i];
            memcpy(preserve[i], mudstate.global_regs[i], n);
            preserve[i][n] = '\0';
            preserve_len[i] = n;
        }
        else
        {
            preserve[i] = NULL;
            preserve_len[i] = 0;
        }
    }
}

void set_modified

(

dbref

thing

)

Definition at line 15 of file set.cpp.

References A_MODIFIED, atr_add_raw(), CLinearTimeAbsolute::GetLocal(), and CLinearTimeAbsolute::ReturnDateString().

Referenced by atr_add(), do_forwardlist(), do_moniker(), do_name(), do_unlock(), and do_wipe().

{
    CLinearTimeAbsolute ltaNow;
    ltaNow.GetLocal();
    atr_add_raw(thing, A_MODIFIED, ltaNow.ReturnDateString(7));
}

void set_prefix_cmds

(

void

)

Fills in the table of single-character prefix commands.

Command entries for known prefix commands (" : ; \ # & - ~) are copied from the regular command table. Entries for all other starting characters are set to NULL.

Returns:

None.

Definition at line 912 of file command.cpp.

References prefix_cmds, and SET_PREFIX_CMD.

Referenced by do_addcommand(), and do_delcommand().

{
    for (int i = 0; i < 256; i++)
    {
        prefix_cmds[i] = NULL;
    }

#define SET_PREFIX_CMD(s) prefix_cmds[(unsigned char)(s)[0]] = \
        (CMDENT *) hashfindLEN((char *)(s), 1, &mudstate.command_htab)
    SET_PREFIX_CMD("\"");
    SET_PREFIX_CMD(":");
    SET_PREFIX_CMD(";");
    SET_PREFIX_CMD("\\");
    SET_PREFIX_CMD("#");
    SET_PREFIX_CMD("&");
    SET_PREFIX_CMD("-");
    SET_PREFIX_CMD("~");
#undef SET_PREFIX_CMD
}

void show_vrml_url	(	dbref	,
		dbref
	)

Definition at line 2661 of file look.cpp.

References A_VRML_URL, alloc_lbuf, atr_pget, free_lbuf, Html, notify_html, and safe_str.

Referenced by look_in(), and process_enter_loc().

{
    char *vrml_url;
    dbref aowner;
    int aflags;

    // If they don't care about HTML, just return.
    //
    if (!Html(thing))
    {
        return;
    }

    vrml_url = atr_pget(loc, A_VRML_URL, &aowner, &aflags);
    if (*vrml_url)
    {
        char *vrml_message, *vrml_cp;

        vrml_message = vrml_cp = alloc_lbuf("show_vrml_url");
        safe_str("<img xch_graph=load href=\"", vrml_message, &vrml_cp);
        safe_str(vrml_url, vrml_message, &vrml_cp);
        safe_str("\">", vrml_message, &vrml_cp);
        *vrml_cp = 0;
        notify_html(thing, vrml_message);
        free_lbuf(vrml_message);
    }
    else
    {
        notify_html(thing, "<img xch_graph=hide>");
    }
    free_lbuf(vrml_url);
}

void stack_clr

(

dbref

obj

)

Definition at line 3554 of file funceval.cpp.

References stack::data, free_lbuf, MEMFREE, next, stack::next, s_Stack, and Stack.

Referenced by destroy_bad_obj(), destroy_obj(), and FUNCTION().

{
    // Clear the stack.
    //
    STACK *sp, *next;
    for (sp = Stack(obj); sp != NULL; sp = next)
    {
        next = sp->next;
        free_lbuf(sp->data);
        MEMFREE(sp);
        sp = NULL;
    }
    s_Stack(obj, NULL);
}

dbref start_home

(

void

)

Definition at line 102 of file object.cpp.

References mudconf, NOTHING, confdata::start_home, and confdata::start_room.

Referenced by create_player().

{
    if (mudconf.start_home != NOTHING)
    {
        return mudconf.start_home;
    }
    return mudconf.start_room;
}

bool start_log	(	const char *	primary,
		const char *	secondary
	)

Definition at line 52 of file log.cpp.

References statedata::bStandAlone, ENDLINE, CLinearTimeAbsolute::GetLocal(), FIELDEDTIME::iDayOfMonth, FIELDEDTIME::iHour, FIELDEDTIME::iMinute, FIELDEDTIME::iMonth, FIELDEDTIME::iSecond, FIELDEDTIME::iYear, Log, confdata::log_info, statedata::logging, LOGOPT_TIMESTAMP, confdata::mud_name, mudconf, mudstate, CLinearTimeAbsolute::ReturnFields(), CLogFile::tinyprintf(), and CLogFile::WriteString().

Referenced by log_perror(), pool_alloc(), pool_alloc_lbuf(), pool_free(), pool_free_lbuf(), and report_timecheck().

{
    mudstate.logging++;
    if (  1 <= mudstate.logging
       && mudstate.logging <= 2)
    {
        if (!mudstate.bStandAlone)
        {
            // Format the timestamp.
            //
            char buffer[256];
            buffer[0] = '\0';
            if (mudconf.log_info & LOGOPT_TIMESTAMP)
            {
                CLinearTimeAbsolute ltaNow;
                ltaNow.GetLocal();
                FIELDEDTIME ft;
                ltaNow.ReturnFields(&ft);
                sprintf(buffer, "%d.%02d%02d:%02d%02d%02d ",ft.iYear,
                    ft.iMonth, ft.iDayOfMonth, ft.iHour, ft.iMinute,
                    ft.iSecond);
            }

            // Write the header to the log.
            //
            if (  secondary
               && *secondary)
            {
                Log.tinyprintf("%s%s %3s/%-5s: ", buffer, mudconf.mud_name,
                    primary, secondary);
            }
            else
            {
                Log.tinyprintf("%s%s %-9s: ", buffer, mudconf.mud_name,
                    primary);
            }
        }

        // If a recursive call, log it and return indicating no log.
        //
        if (mudstate.logging == 1)
        {
            return true;
        }
        Log.WriteString("Recursive logging request." ENDLINE);
    }
    mudstate.logging--;
    return false;
}

void tcache_init

(

void

)

Definition at line 874 of file eval.cpp.

References tcache_head.

Referenced by main().

{
    tcache_head = NULL;
    tcache_top = true;
    tcache_count = 0;
}

char* DCL_CDECL tprintf	(	const char *	,
			...
	)

Definition at line 22 of file predicates.cpp.

References LBUF_SIZE, and mux_vsnprintf().

Referenced by add_helpfile(), add_mail_message(), announce_connect(), announce_disconnect(), atr_encode(), CallBack_ShowDispatches(), canpayfees(), cf_log_notfound(), check_dead_refs(), check_floating(), check_mail(), convert_flags(), create_obj(), dbclean_CheckALISTtoAT(), dbclean_CheckALISTtoDB(), dbclean_CheckANHtoAT(), dbclean_CheckATtoANH(), debug_examine(), decode_power(), decompile_flags(), destroy_obj(), destroy_player(), did_it(), disp_from_on(), do_addcom(), do_addcommand(), do_attribute(), do_backup(), do_boot(), do_cemit(), do_chanlog(), do_channelwho(), do_chboot(), do_chopen(), do_chown(), do_chownall(), do_clone(), do_comconnectchannel(), do_comlast(), do_comlist(), do_comtitle(), do_comwho(), do_comwho_line(), do_cpattr(), do_create(), do_createchannel(), do_dbclean(), do_decomp(), do_delcom(), do_delcomchannel(), do_delcommand(), do_destroy(), do_destroychannel(), do_dig(), do_doing(), do_edit(), do_editchannel(), do_entrances(), do_examine(), do_expmail_start(), do_find(), do_fixdb(), do_flag(), do_function(), do_get(), do_halt(), do_hook(), do_icmd(), do_joinchannel(), do_kill(), do_last(), do_leavechannel(), do_link(), do_listcommands(), do_mail_cc(), do_mail_change_folder(), do_mail_debug(), do_mail_file(), do_mail_flags(), do_mail_fwd(), do_mail_list(), do_mail_nuke(), do_mail_proof(), do_mail_read(), do_mail_reply(), do_mail_retract(), do_mail_review(), do_mail_stats(), do_malias_add(), do_malias_adminlist(), do_malias_chown(), do_malias_create(), do_malias_delete(), do_malias_desc(), do_malias_list(), do_malias_list_all(), do_malias_remove(), do_malias_send(), do_malias_status(), do_motd(), do_move(), do_mvattr(), do_page(), do_pcreate(), do_pemit_single(), do_postpend(), do_prepend(), do_processcom(), do_prog(), do_queue(), do_say(), do_score(), do_shout(), do_stats(), do_toad(), do_train(), dump_database_internal(), dump_info(), dump_users(), edit_string_ansi(), FUNCTION(), fwdlist_load(), get_slave_result(), get_stats(), give_money(), give_thing(), handle_ears(), handle_prog(), hook_loop(), list_costs(), list_db_stats(), list_options(), list_process(), list_vattrs(), CGuests::ListAll(), load_game(), look_exits(), mail_check(), mail_return(), make_numlist(), CGuests::MakeGuestChar(), move_object(), new_mail_message(), open_exit(), page_check(), page_return(), parse_boolexp_L(), pool_free(), pool_free_lbuf(), pool_trace(), process_cmdent(), process_command(), process_enter_loc(), process_leave_loc(), record_login(), report_timecheck(), ReportMatchedTopics(), say_shout(), search_mark(), search_setup(), send_mail(), SendChannelMessage(), show_quota(), ShowPsLine(), SiteMonSend(), sweep_check(), tcache_finish(), view_atr(), and whisper_pose().

{
    static char buff[LBUF_SIZE];
    va_list ap;
    va_start(ap, fmt);
    mux_vsnprintf(buff, LBUF_SIZE, fmt, ap);
    va_end(ap);
    return buff;
}

double ulp

(

double

)

Definition at line 1016 of file strtod.cpp.

References dval, Exp_mask, Exp_msk1, Exp_shift, Long, P, word0, and word1.

Referenced by mux_strtod(), and NearestPretty().

{
    register Long L;
    double a;

    L = (word0(x) & Exp_mask) - (P-1)*Exp_msk1;
#ifndef Avoid_Underflow
#ifndef Sudden_Underflow
    if (L > 0)
    {
#endif
#endif
#ifdef IBM
        L |= Exp_msk1 >> 4;
#endif
        word0(a) = L;
        word1(a) = 0;
#ifndef Avoid_Underflow
#ifndef Sudden_Underflow
    }
    else
    {
        L = -L >> Exp_shift;
        if (L < Exp_shift)
        {
            word0(a) = 0x80000 >> L;
            word1(a) = 0;
        }
        else
        {
            word0(a) = 0;
            L -= Exp_shift;
            word1(a) = L >= 31 ? 1 : 1 << 31 - L;
        }
    }
#endif
#endif
    return dval(a);
}

char* unparse_boolexp	(	dbref	,
		BOOLEXP *
	)

Definition at line 229 of file unparse.cpp.

References boolexp_buf, BOOLEXP_CONST, buftop, F_EXAMINE, and unparse_boolexp1().

Referenced by debug_examine(), do_examine(), and view_atr().

{
    buftop = boolexp_buf;
    unparse_boolexp1(player, b, BOOLEXP_CONST, F_EXAMINE);
    *buftop = '\0';
    return boolexp_buf;
}

char* unparse_boolexp_decompile	(	dbref	,
		BOOLEXP *
	)

Definition at line 237 of file unparse.cpp.

References boolexp_buf, BOOLEXP_CONST, buftop, F_DECOMPILE, and unparse_boolexp1().

Referenced by do_decomp().

{
    buftop = boolexp_buf;
    unparse_boolexp1(player, b, BOOLEXP_CONST, F_DECOMPILE);
    *buftop = '\0';
    return boolexp_buf;
}

char* unparse_boolexp_function	(	dbref	,
		BOOLEXP *
	)

Definition at line 245 of file unparse.cpp.

References boolexp_buf, BOOLEXP_CONST, buftop, F_FUNCTION, and unparse_boolexp1().

Referenced by FUNCTION().

{
    buftop = boolexp_buf;
    unparse_boolexp1(player, b, BOOLEXP_CONST, F_FUNCTION);
    *buftop = '\0';
    return boolexp_buf;
}

char* unparse_boolexp_quiet	(	dbref	,
		BOOLEXP *
	)

Definition at line 221 of file unparse.cpp.

References boolexp_buf, BOOLEXP_CONST, buftop, F_QUIET, and unparse_boolexp1().

Referenced by db_read(), and do_lock().

{
    buftop = boolexp_buf;
    unparse_boolexp1(player, b, BOOLEXP_CONST, F_QUIET);
    *buftop = '\0';
    return boolexp_buf;
}

void ValidateConfigurationDbrefs

(

void

)

Definition at line 2049 of file conf.cpp.

References statedata::db_top, confdata::default_home, confdata::guest_char, confdata::guest_nuker, confdata::master_room, mudconf, mudstate, NOTHING, confdata::start_home, and confdata::start_room.

Referenced by do_admin(), and main().

{
    static dbref *Table[] =
    {
        &mudconf.default_home,
        &mudconf.guest_char,
        &mudconf.guest_nuker,
        &mudconf.master_room,
        &mudconf.start_home,
        &mudconf.start_room,
        0
    };

    for (int i = 0; Table[i]; i++)
    {
        if (*Table[i] != NOTHING)
        {
            if (*Table[i] < 0 || mudstate.db_top <= *Table[i])
            {
                *Table[i] = NOTHING;
            }
        }
    }
}

bool ValidatePlayerName

(

const char *

pName

)

Definition at line 486 of file predicates.cpp.

References statedata::bStandAlone, mudconf, mudstate, mux_isspace, mux_PlayerNameSet, confdata::name_spaces, and PLAYER_NAME_LIMIT.

Referenced by create_obj(), do_alias(), do_fixdb(), do_name(), and FUNCTION().

{
    if (!pName)
    {
        return false;
    }
    size_t nName = strlen(pName);

    // Verify that name is not empty, but not too long, either.
    //
    if (  nName <= 0
       || PLAYER_NAME_LIMIT <= nName)
    {
        return false;
    }

    // Do not allow LOOKUP_TOKEN, NUMBER_TOKEN, NOT_TOKEN, or SPACE
    // as the first character, or SPACE as the last character
    //
    if (  strchr("*!#", *pName)
       || mux_isspace(pName[0])
       || mux_isspace(pName[nName-1]))
    {
        return false;
    }

    if (  mudstate.bStandAlone
       || mudconf.name_spaces)
    {
        mux_PlayerNameSet[(unsigned char)' '] = 1;
    }
    else
    {
        mux_PlayerNameSet[(unsigned char)' '] = 0;
    }

    // Only printable characters besides ARG_DELIMITER, AND_TOKEN,
    // and OR_TOKEN are allowed.
    //
    for (unsigned int i = 0; i < nName; i++)
    {
        if (!mux_PlayerNameSet(pName[i]))
        {
            return false;
        }
    }

    // Special names are specifically dis-allowed.
    //
    if (  (nName == 2 && memcmp("me", pName, 2) == 0)
       || (nName == 4 && (  memcmp("home", pName, 4) == 0
                         || memcmp("here", pName, 4) == 0)))
    {
        return false;
    }
    return true;
}

void wait_que	(	dbref	executor,
		dbref	caller,
		dbref	enactor,
		bool	,
		CLinearTimeAbsolute &	,
		dbref	,
		int	,
		char *	,
		char *	[],
		int	,
		char *	[]
	)

Definition at line 801 of file cque.cpp.

References bque::attr, CF_INTERP, confdata::control_flags, CScheduler::DeferImmediateTask(), CScheduler::DeferTask(), bque::enactor, isPlayer, bque::IsTimed, mudconf, NOTHING, PRIORITY_OBJECT, PRIORITY_PLAYER, PRIORITY_SUSPEND, scheduler, bque::sem, setup_que(), Task_RunQueueEntry(), Task_SemaphoreTimeout(), and bque::waittime.

Referenced by announce_connect(), announce_disconnect(), atr_match1(), bind_and_queue(), did_it(), do_dolist(), do_force(), do_if(), do_switch(), do_wait(), handle_prog(), and process_cmdent().

{
    if (!(mudconf.control_flags & CF_INTERP))
    {
        return;
    }

    BQUE *tmp = setup_que(executor, caller, enactor, command, args, nargs, sargs);
    if (!tmp)
    {
        return;
    }

    int iPriority;
    if (isPlayer(tmp->enactor))
    {
        iPriority = PRIORITY_PLAYER;
    }
    else
    {
        iPriority = PRIORITY_OBJECT;
    }

    tmp->IsTimed = bTimed;
    tmp->waittime = ltaWhen;
    tmp->sem = sem;
    tmp->attr = attr;

    if (sem == NOTHING)
    {
        // Not a semaphore, so let it run it immediately or put it on
        // the wait queue.
        //
        if (tmp->IsTimed)
        {
            scheduler.DeferTask(tmp->waittime, iPriority, Task_RunQueueEntry, tmp, 0);
        }
        else
        {
            scheduler.DeferImmediateTask(iPriority, Task_RunQueueEntry, tmp, 0);
        }
    }
    else
    {
        if (!tmp->IsTimed)
        {
            // In this case, the timeout task below will never run,
            // but it allows us to manage all semaphores together in
            // the same data structure.
            //
            iPriority = PRIORITY_SUSPEND;
        }
        scheduler.DeferTask(tmp->waittime, iPriority, Task_SemaphoreTimeout, tmp, 0);
    }
}

dbref where_is

(

dbref

)

Definition at line 2028 of file predicates.cpp.

References Exits, Good_obj, Location, NOTHING, TYPE_EXIT, TYPE_PLAYER, TYPE_THING, and Typeof.

Referenced by do_pemit_single(), do_say(), FUNCTION(), locatable(), mux_exec(), nearby(), and notify_check().

{
    if (!Good_obj(what))
    {
        return NOTHING;
    }

    dbref loc;
    switch (Typeof(what))
    {
    case TYPE_PLAYER:
    case TYPE_THING:
        loc = Location(what);
        break;

    case TYPE_EXIT:
        loc = Exits(what);
        break;

    default:
        loc = NOTHING;
        break;
    }
    return loc;
}

dbref where_room

(

dbref

)

Definition at line 2059 of file predicates.cpp.

References Good_obj, Has_location, isRoom, Location, mudconf, NOTHING, and confdata::ntfy_nest_lim.

Referenced by do_teleport_single(), dump_users(), and locatable().

{
    for (int count = mudconf.ntfy_nest_lim; count > 0; count--)
    {
        if (!Good_obj(what))
        {
            break;
        }
        if (isRoom(what))
        {
            return what;
        }
        if (!Has_location(what))
        {
            break;
        }
        what = Location(what);
    }
    return NOTHING;
}

bool wild	(	char *	,
		char *	,
		char *	[],
		int
	)

Definition at line 364 of file wild.cpp.

References alloc_lbuf, arglist, free_lbuf, mudstate, NOTEQUAL, numargs, quick_wild(), wild1(), and statedata::wild_invk_ctr.

Referenced by atr_match1(), notify_check(), and process_cmdent().

{
    mudstate.wild_invk_ctr = 0;

    int i;
    char *scan;

    // Initialize the return array.
    //
    for (i = 0; i < nargs; i++)
    {
        args[i] = NULL;
    }

    // Do fast match.
    //
    while (  *tstr != '*'
          && *tstr != '?')
    {
        if (*tstr == '\\')
        {
            tstr++;
        }
        if (NOTEQUAL(*dstr, *tstr))
        {
            return false;
        }
        if (!*dstr)
        {
            return true;
        }
        tstr++;
        dstr++;
    }

    // Allocate space for the return args.
    //
    i = 0;
    scan = tstr;
    while (  *scan
          && i < nargs)
    {
        switch (*scan)
        {
        case '?':

            args[i] = alloc_lbuf("wild.?");
            i++;
            break;

        case '*':

            args[i] = alloc_lbuf("wild.*");
            i++;
        }
        scan++;
    }

    // Put stuff in globals for quick recursion.
    //
    arglist = args;
    numargs = nargs;

    // Do the match.
    //
    bool value = nargs ? wild1(tstr, dstr, 0) : quick_wild(tstr, dstr);

    // Clean out any fake match data left by wild1.
    //
    for (i = 0; i < nargs; i++)
    {
        if (  args[i] != NULL
           && (  !*args[i]
              || !value))
        {
            free_lbuf(args[i]);
            args[i] = NULL;
        }
    }
    return value;
}

bool wild_match	(	char *	,
		const char *
	)

Definition at line 452 of file wild.cpp.

References mudstate, mux_atol(), mux_isdigit, quick_wild(), and statedata::wild_invk_ctr.

Referenced by check_attr(), do_switch(), and switch_handler().

{
    switch (*tstr)
    {
    case '>':

        tstr++;
        if (  mux_isdigit(*tstr)
           || *tstr == '-')
        {
            long lt = mux_atol(tstr);
            long ld = mux_atol(dstr);
            return (lt < ld);
        }
        else
        {
            return (strcmp(tstr, dstr) < 0);
        }

    case '<':

        tstr++;
        if (  mux_isdigit(*tstr)
           || *tstr == '-')
        {
            long lt = mux_atol(tstr);
            long ld = mux_atol(dstr);
            return (lt > ld);
        }
        else
        {
            return (strcmp(tstr, dstr) > 0);
        }
    }
    mudstate.wild_invk_ctr = 0;
    return quick_wild(tstr, dstr);
}

bool xlate

(

char *

)

Definition at line 2272 of file functions.cpp.

References PARSE_FLOAT_RESULT::iString, mux_isspace, PARSE_FLOAT_RESULT::nDigitsA, PARSE_FLOAT_RESULT::nDigitsB, ParseFloat(), PARSE_FLOAT_RESULT::pDigitsA, and PARSE_FLOAT_RESULT::pDigitsB.

Referenced by do_break(), do_if(), filter_handler(), FUNCTION(), process_hook(), and search_perform().

{
    const char *p = arg;
    if (p[0] == '#')
    {
        if (p[1] == '-')
        {
            // '#-...' is false. This includes '#-0000' and '#-ABC'.
            // This cases are unlikely in practice. We can always come back
            // and cover these.
            //
            return false;
        }
        return true;
    }

    PARSE_FLOAT_RESULT pfr;
    if (ParseFloat(&pfr, p))
    {
        // Examine whether number was a zero value.
        //
        if (pfr.iString)
        {
            // This covers NaN, +Inf, -Inf, and Ind.
            //
            return false;
        }

        // We can ignore leading sign, exponent sign, and exponent as 0, -0,
        // and +0. Also, 0E+100 and 0.0e-100 are all zero.
        //
        // However, we need to cover 00000.0 and 0.00000 cases.
        //
        while (pfr.nDigitsA--)
        {
            if (*pfr.pDigitsA != '0')
            {
                return true;
            }
            pfr.pDigitsA++;
        }
        while (pfr.nDigitsB--)
        {
            if (*pfr.pDigitsB != '0')
            {
                return true;
            }
            pfr.pDigitsB++;
        }
        return false;
    }
    while (mux_isspace(*p))
    {
        p++;
    }
    if (p[0] == '\0')
    {
        return false;
    }
    return true;
}

---

Variable Documentation

PortInfo aMainGamePorts[MAX_LISTEN_PORTS]

Definition at line 32 of file bsd.cpp.

Referenced by close_sockets(), dump_restart_db(), load_restart_db(), and main().

const char* AMBIGUOUS_MESSAGE

Definition at line 18 of file match.cpp.

Referenced by match_status().

int anum_alc_top

Definition at line 1110 of file db.cpp.

Referenced by db_write(), dbclean_CheckALISTtoAT(), dbclean_CheckALISTtoDB(), dbclean_CheckANHtoAT(), dbclean_CheckATtoANH(), dbclean_RemoveStaleAttributeNames(), and dbclean_RenumberAttributes().

bool break_called

Definition at line 21 of file cque.cpp.

Referenced by do_break(), and Task_RunQueueEntry().

const char* ColorTable[256]

Definition at line 939 of file eval.cpp.

Referenced by FUNCTION().

CLinearTimeAbsolute cs_ltime

Definition at line 21 of file attrcache.cpp.

Referenced by cache_init(), and list_db_stats().

long DebugTotalFiles

Definition at line 2258 of file game.cpp.

Referenced by CF_HAND(), do_shutdown(), dump_database_internal(), fcache_read(), helpindex_read(), list_system_resources(), load_comsys(), load_game(), load_restart_db(), ReportTopic(), and save_comsys().

long DebugTotalSockets

Definition at line 2259 of file game.cpp.

Referenced by boot_slave(), CleanUpSlaveSocket(), close_sockets(), list_system_resources(), load_restart_db(), make_socket(), new_connection(), and SetupPorts().

NAMETAB enable_names[]

Definition at line 736 of file wiz.cpp.

Referenced by do_global(), and do_list().

const char* FUNC_AMBIGUOUS

Definition at line 24 of file match.cpp.

const char* FUNC_FAIL_MESSAGE

Definition at line 20 of file match.cpp.

const char* FUNC_NOMATCH_MESSAGE

Definition at line 21 of file match.cpp.

const char* FUNC_NOPERM_MESSAGE

Definition at line 25 of file match.cpp.

const char* FUNC_NOT_FOUND

Definition at line 23 of file match.cpp.

pid_t game_pid

Definition at line 52 of file bsd.cpp.

Referenced by check_panicking(), list_process(), main(), and write_pidfile().

int maxd

Definition at line 49 of file bsd.cpp.

Referenced by boot_slave(), load_restart_db(), and shovechars().

const signed char mux_RegisterSet[256]

Definition at line 139 of file eval.cpp.

Referenced by FUNCTION(), mux_exec(), and real_regmatch().

unsigned int ndescriptors

Definition at line 35 of file bsd.cpp.

Referenced by initializesock(), load_restart_db(), and shovechars().

int nMainGamePorts

Definition at line 33 of file bsd.cpp.

Referenced by close_sockets(), dump_restart_db(), load_restart_db(), and main().

const char* NOMATCH_MESSAGE

Definition at line 17 of file match.cpp.

Referenced by do_examine(), do_function(), do_prog(), look_simple(), and match_status().

const char* NOPERM_MESSAGE

Definition at line 19 of file match.cpp.

Referenced by CF_HAND(), cf_set(), create_obj(), do_addcommand(), do_alias(), do_boot(), do_cemit(), do_channelwho(), do_cheader(), do_chopen(), do_chown(), do_clone(), do_createchannel(), do_delcommand(), do_destroychannel(), do_doing(), do_drop(), do_editchannel(), do_enter(), do_enter_internal(), do_examine(), do_forwardlist(), do_function(), do_get(), do_halt(), do_last(), do_link(), do_lock(), do_notify(), do_parent(), do_pemit_single(), do_prog(), do_ps(), do_quitprog(), do_quota(), do_restart(), do_set(), do_shutdown(), do_teleport_single(), do_trigger(), do_unlink(), do_unlock(), do_wait(), flag_set(), FUNCTION(), get_stats(), give_thing(), link_exit(), match_controlled_handler(), match_status(), open_exit(), power_set(), process_cmdent(), process_command(), and set_attr_internal().

const char* OUT_OF_RANGE

Definition at line 22 of file match.cpp.

CScheduler scheduler

Definition at line 19 of file timer.cpp.

Referenced by dispatch_CacheTick(), dispatch_CheckEvents(), dispatch_DatabaseDump(), dispatch_FreeListReconstruction(), dispatch_IdleCheck(), do_global(), do_ps(), do_queue(), do_timewarp(), halt_que(), init_timer(), nfy_que(), process_preload(), save_command(), shovechars(), sighandler(), Task_ProcessCommand(), and wait_que().

NAMETAB sigactions_nametab[]

Definition at line 4008 of file bsd.cpp.

---