1 /*
2 Copyright (C) 1996-1997 Id Software, Inc.
3 
4 This program is free software; you can redistribute it and/or
5 modify it under the terms of the GNU General Public License
6 as published by the Free Software Foundation; either version 2
7 of the License, or (at your option) any later version.
8 
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
12 
13 See the GNU General Public License for more details.
14 
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
18 
19 */
20 
21 #include "pr_comp.h"			// defs shared with qcc
22 #include "progdefs.h"			// generated by program cdefs
23 
24 typedef union eval_s
25 {
26 	string_t		string;
27 	float			_float;
28 	float			vector[3];
29 	func_t			function;
30 	int				_int;
31 	int				edict;
32 } eval_t;
33 
34 #define	MAX_ENT_LEAFS	16
35 typedef struct edict_s
36 {
37 	qboolean	free;
38 	link_t		area;				// linked to a division node or leaf
39 
40 	int			num_leafs;
41 	short		leafnums[MAX_ENT_LEAFS];
42 
43 	entity_state_t	baseline;
44 
45 	float		freetime;			// sv.time when the object was freed
46 	entvars_t	v;					// C exported fields from progs
47 // other fields from progs come immediately after
48 } edict_t;
49 #define	EDICT_FROM_AREA(l) STRUCT_FROM_LINK(l,edict_t,area)
50 
51 //============================================================================
52 
53 extern	dprograms_t		*progs;
54 extern	dfunction_t		*pr_functions;
55 extern	char			*pr_strings;
56 extern	ddef_t			*pr_globaldefs;
57 extern	ddef_t			*pr_fielddefs;
58 extern	dstatement_t	*pr_statements;
59 extern	globalvars_t	*pr_global_struct;
60 extern	float			*pr_globals;			// same as pr_global_struct
61 
62 extern	int				pr_edict_size;	// in bytes
63 
64 //============================================================================
65 
66 void PR_Init (void);
67 
68 void PR_ExecuteProgram (func_t fnum);
69 void PR_LoadProgs (void);
70 
71 void PR_Profile_f (void);
72 
73 char	*ED_DbgEdict (entvars_t *v);
74 void	ED_ChkEdict (qboolean LoadChk, qboolean DisableChk);
75 edict_t *ED_Alloc (void);
76 void ED_Free (edict_t *ed);
77 
78 char	*ED_NewString (char *string);
79 // returns a copy of the string allocated from the server's string heap
80 
81 void ED_Print (edict_t *ed);
82 void ED_Write (FILE *f, edict_t *ed);
83 char *ED_ParseEdict (char *data, edict_t *ent);
84 
85 void ED_WriteGlobals (FILE *f);
86 void ED_ParseGlobals (char *data);
87 
88 void ED_LoadFromFile (char *data);
89 
90 //define EDICT_NUM(n) ((edict_t *)(sv.edicts+ (n)*pr_edict_size))
91 //define NUM_FOR_EDICT(e) (((byte *)(e) - sv.edicts)/pr_edict_size)
92 
93 edict_t *EDICT_NUM(int n);
94 int NUM_FOR_EDICT(edict_t *e);
95 
96 #define	NEXT_EDICT(e) ((edict_t *)( (byte *)e + pr_edict_size))
97 
98 #define	EDICT_TO_PROG(e) ((byte *)e - (byte *)sv.edicts)
99 #define PROG_TO_EDICT(e) ((edict_t *)((byte *)sv.edicts + e))
100 
101 //============================================================================
102 
103 #define	G_FLOAT(o) (pr_globals[o])
104 #define	G_INT(o) (*(int *)&pr_globals[o])
105 #define	G_EDICT(o) ((edict_t *)((byte *)sv.edicts+ *(int *)&pr_globals[o]))
106 #define G_EDICTNUM(o) NUM_FOR_EDICT(G_EDICT(o))
107 #define	G_VECTOR(o) (&pr_globals[o])
108 #define	G_STRING(o) (pr_strings + *(string_t *)&pr_globals[o])
109 #define	G_FUNCTION(o) (*(func_t *)&pr_globals[o])
110 
111 #define	E_FLOAT(e,o) (((float*)&e->v)[o])
112 #define	E_INT(e,o) (*(int *)&((float*)&e->v)[o])
113 #define	E_VECTOR(e,o) (&((float*)&e->v)[o])
114 #define	E_STRING(e,o) (pr_strings + *(string_t *)&((float*)&e->v)[o])
115 
116 extern	int		type_size[8];
117 
118 typedef void (*builtin_t) (void);
119 extern	builtin_t *pr_builtins;
120 extern int pr_numbuiltins;
121 
122 extern int		pr_argc;
123 
124 extern	qboolean	pr_trace;
125 extern	dfunction_t	*pr_xfunction;
126 extern	int			pr_xstatement;
127 
128 extern	unsigned short		pr_crc;
129 
130 void PR_RunError (char *error, ...);
131 
132 void	    ED_PrintEdicts (void);
133 void	    ED_PrintNum (int ent);
134 ddef_t	    *ED_FindField (char *name);
135 dfunction_t *ED_FindFunction (char *name);
136 
137 eval_t *GetEdictFieldValue(edict_t *ed, char *field);
138 
139