git-svn-id: http://bladebattles.com/kurok/SVN@11 20cd92bb-ff49-0410-b73e-96a06e42c3b9
[kurok.git] / progs.h
blobe2a05f0361b3ad66b2798b087c6bd2e4816cb607
1 /*
2 Copyright (C) 1996-1997 Id Software, Inc.
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.
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.
13 See the GNU General Public License for more details.
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.
21 #include "pr_comp.h" // defs shared with qcc
22 #include "progdefs.h" // generated by program cdefs
24 typedef union eval_s
26 string_t string;
27 float _float;
28 float vector[3];
29 func_t function;
30 int _int;
31 int edict;
32 } eval_t;
34 #define MAX_ENT_LEAFS 16
35 typedef struct edict_s
37 qboolean free;
38 link_t area; // linked to a division node or leaf
40 int num_leafs;
41 short leafnums[MAX_ENT_LEAFS];
43 entity_state_t baseline;
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)
51 //============================================================================
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
62 extern int pr_edict_size; // in bytes
64 //============================================================================
66 void PR_Init (void);
68 void PR_ExecuteProgram (func_t fnum);
69 void PR_LoadProgs (void);
71 void PR_Profile_f (void);
73 edict_t *ED_Alloc (void);
74 void ED_Free (edict_t *ed);
76 char *ED_NewString (char *string);
77 // returns a copy of the string allocated from the server's string heap
79 void ED_Print (edict_t *ed);
80 void ED_Write (FILE *f, edict_t *ed);
81 char *ED_ParseEdict (char *data, edict_t *ent);
83 void ED_WriteGlobals (FILE *f);
84 void ED_ParseGlobals (char *data);
86 void ED_LoadFromFile (char *data);
88 //define EDICT_NUM(n) ((edict_t *)(sv.edicts+ (n)*pr_edict_size))
89 //define NUM_FOR_EDICT(e) (((byte *)(e) - sv.edicts)/pr_edict_size)
91 edict_t *EDICT_NUM(int n);
92 int NUM_FOR_EDICT(edict_t *e);
94 #define NEXT_EDICT(e) ((edict_t *)( (byte *)e + pr_edict_size))
96 #define EDICT_TO_PROG(e) ((byte *)e - (byte *)sv.edicts)
97 #define PROG_TO_EDICT(e) ((edict_t *)((byte *)sv.edicts + e))
99 //============================================================================
101 #define G_FLOAT(o) (pr_globals[o])
102 #define G_INT(o) (*(int *)&pr_globals[o])
103 #define G_EDICT(o) ((edict_t *)((byte *)sv.edicts+ *(int *)&pr_globals[o]))
104 #define G_EDICTNUM(o) NUM_FOR_EDICT(G_EDICT(o))
105 #define G_VECTOR(o) (&pr_globals[o])
106 #define G_STRING(o) (pr_strings + *(string_t *)&pr_globals[o])
107 #define G_FUNCTION(o) (*(func_t *)&pr_globals[o])
109 #define E_FLOAT(e,o) (((float*)&e->v)[o])
110 #define E_INT(e,o) (*(int *)&((float*)&e->v)[o])
111 #define E_VECTOR(e,o) (&((float*)&e->v)[o])
112 #define E_STRING(e,o) (pr_strings + *(string_t *)&((float*)&e->v)[o])
114 extern int type_size[8];
116 typedef void (*builtin_t) (void);
117 extern builtin_t *pr_builtins;
118 extern int pr_numbuiltins;
120 extern int pr_argc;
122 extern qboolean pr_trace;
123 extern dfunction_t *pr_xfunction;
124 extern int pr_xstatement;
126 extern unsigned short pr_crc;
128 void PR_RunError (char *error, ...);
130 void ED_PrintEdicts (void);
131 void ED_PrintNum (int ent);
133 eval_t *GetEdictFieldValue(edict_t *ed, char *field);