19fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream/*
29fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamCopyright (C) 1996-1997 Id Software, Inc.
39fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
49fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamThis program is free software; you can redistribute it and/or
59fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreammodify it under the terms of the GNU General Public License
69fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamas published by the Free Software Foundation; either version 2
79fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamof the License, or (at your option) any later version.
89fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
99fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamThis program is distributed in the hope that it will be useful,
109fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreambut WITHOUT ANY WARRANTY; without even the implied warranty of
119fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamMERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
129fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
139fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamSee the GNU General Public License for more details.
149fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
159fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamYou should have received a copy of the GNU General Public License
169fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamalong with this program; if not, write to the Free Software
179fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamFoundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
189fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
199fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream*/
209fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
219fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#include "pr_comp.h"			// defs shared with qcc
229fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#include "progdefs.h"			// generated by program cdefs
239fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
249fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamtypedef union eval_s
259fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream{
269fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	string_t		string;
279fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	float			_float;
289fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	float			vector[3];
299fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	func_t			function;
309fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int				_int;
319fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int				edict;
329fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream} eval_t;
339fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
349fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	MAX_ENT_LEAFS	16
359fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamtypedef struct edict_s
369fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream{
379fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	qboolean	free;
389fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	link_t		area;				// linked to a division node or leaf
399fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
409fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int			num_leafs;
419fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	short		leafnums[MAX_ENT_LEAFS];
429fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
439fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	entity_state_t	baseline;
449fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
459fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	float		freetime;			// sv.time when the object was freed
469fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	entvars_t	v;					// C exported fields from progs
479fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream// other fields from progs come immediately after
489fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream} edict_t;
499fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	EDICT_FROM_AREA(l) STRUCT_FROM_LINK(l,edict_t,area)
509fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
519fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream//============================================================================
529fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
539fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern	dprograms_t		*progs;
549fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern	dfunction_t		*pr_functions;
559fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern	char			*pr_strings;
569fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern	ddef_t			*pr_globaldefs;
579fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern	ddef_t			*pr_fielddefs;
589fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern	dstatement_t	*pr_statements;
599fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern	globalvars_t	*pr_global_struct;
609fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern	float			*pr_globals;			// same as pr_global_struct
619fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
629fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern	int				pr_edict_size;	// in bytes
639fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
649fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream//============================================================================
659fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
669fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamvoid PR_Init (void);
679fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
689fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamvoid PR_ExecuteProgram (func_t fnum);
699fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamvoid PR_LoadProgs (void);
709fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
719fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamvoid PR_Profile_f (void);
729fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
739fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamedict_t *ED_Alloc (void);
749fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamvoid ED_Free (edict_t *ed);
759fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
769fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamchar	*ED_NewString (char *string);
779fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream// returns a copy of the string allocated from the server's string heap
789fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
799fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamvoid ED_Print (edict_t *ed);
809fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamvoid ED_Write (FILE *f, edict_t *ed);
819fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamchar *ED_ParseEdict (char *data, edict_t *ent);
829fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
839fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamvoid ED_WriteGlobals (FILE *f);
849fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamvoid ED_ParseGlobals (char *data);
859fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
869fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamvoid ED_LoadFromFile (char *data);
879fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
889fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream//define EDICT_NUM(n) ((edict_t *)(sv.edicts+ (n)*pr_edict_size))
899fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream//define NUM_FOR_EDICT(e) (((byte *)(e) - sv.edicts)/pr_edict_size)
909fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
919fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamedict_t *EDICT_NUM(int n);
929fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamint NUM_FOR_EDICT(edict_t *e);
939fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
949fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	NEXT_EDICT(e) ((edict_t *)( (byte *)e + pr_edict_size))
959fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
969fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	EDICT_TO_PROG(e) ((byte *)e - (byte *)sv.edicts)
979fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define PROG_TO_EDICT(e) ((edict_t *)((byte *)sv.edicts + e))
989fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
999fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream//============================================================================
1009fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1019fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	G_FLOAT(o) (pr_globals[o])
1029fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	G_INT(o) (*(int *)&pr_globals[o])
1039fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	G_EDICT(o) ((edict_t *)((byte *)sv.edicts+ *(int *)&pr_globals[o]))
1049fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define G_EDICTNUM(o) NUM_FOR_EDICT(G_EDICT(o))
1059fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	G_VECTOR(o) (&pr_globals[o])
1069fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	G_STRING(o) (PR_GetString(*(string_t *)&pr_globals[o]))
1079fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	G_FUNCTION(o) (*(func_t *)&pr_globals[o])
1089fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1099fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	E_FLOAT(e,o) (((float*)&e->v)[o])
1109fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	E_INT(e,o) (*(int *)&((float*)&e->v)[o])
1119fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	E_VECTOR(e,o) (&((float*)&e->v)[o])
1129fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	E_STRING(e,o) (PR_GetString(*(string_t *)&((float*)&e->v)[o]))
1139fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1149fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern	int		type_size[8];
1159fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1169fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamtypedef void (*builtin_t) (void);
1179fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern	builtin_t *pr_builtins;
1189fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern int pr_numbuiltins;
1199fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1209fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern int		pr_argc;
1219fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1229fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern	qboolean	pr_trace;
1239fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern	dfunction_t	*pr_xfunction;
1249fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern	int			pr_xstatement;
1259fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1269fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern func_t SpectatorConnect;
1279fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern func_t SpectatorThink;
1289fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern func_t SpectatorDisconnect;
1299fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1309fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamvoid PR_RunError (char *error, ...);
1319fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1329fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamvoid ED_PrintEdicts (void);
1339fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamvoid ED_PrintNum (int ent);
1349fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1359fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreameval_t *GetEdictFieldValue(edict_t *ed, char *field);
1369fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1379fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream//
1389fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream// PR STrings stuff
1399fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream//
1409fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define MAX_PRSTR 1024
1419fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1429fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern char *pr_strtbl[MAX_PRSTR];
1439fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamextern int num_prstr;
1449fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1459fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamchar *PR_GetString(int num);
1469fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamint PR_SetString(char *s);
1479fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
148