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// this file is shared by quake and qcc
229fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
239fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamtypedef int	func_t;
249fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamtypedef int	string_t;
259fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
269fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamtypedef enum {ev_void, ev_string, ev_float, ev_vector, ev_entity, ev_field, ev_function, ev_pointer} etype_t;
279fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
289fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
299fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	OFS_NULL		0
309fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	OFS_RETURN		1
319fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	OFS_PARM0		4		// leave 3 ofs for each parm to hold vectors
329fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	OFS_PARM1		7
339fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	OFS_PARM2		10
349fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	OFS_PARM3		13
359fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	OFS_PARM4		16
369fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	OFS_PARM5		19
379fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	OFS_PARM6		22
389fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	OFS_PARM7		25
399fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	RESERVED_OFS	28
409fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
419fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
429fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamenum {
439fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_DONE,
449fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_MUL_F,
459fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_MUL_V,
469fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_MUL_FV,
479fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_MUL_VF,
489fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_DIV_F,
499fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_ADD_F,
509fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_ADD_V,
519fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_SUB_F,
529fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_SUB_V,
539fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
549fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_EQ_F,
559fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_EQ_V,
569fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_EQ_S,
579fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_EQ_E,
589fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_EQ_FNC,
599fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
609fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_NE_F,
619fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_NE_V,
629fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_NE_S,
639fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_NE_E,
649fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_NE_FNC,
659fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
669fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_LE,
679fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_GE,
689fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_LT,
699fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_GT,
709fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
719fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_LOAD_F,
729fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_LOAD_V,
739fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_LOAD_S,
749fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_LOAD_ENT,
759fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_LOAD_FLD,
769fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_LOAD_FNC,
779fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
789fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_ADDRESS,
799fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
809fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_STORE_F,
819fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_STORE_V,
829fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_STORE_S,
839fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_STORE_ENT,
849fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_STORE_FLD,
859fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_STORE_FNC,
869fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
879fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_STOREP_F,
889fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_STOREP_V,
899fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_STOREP_S,
909fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_STOREP_ENT,
919fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_STOREP_FLD,
929fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_STOREP_FNC,
939fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
949fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_RETURN,
959fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_NOT_F,
969fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_NOT_V,
979fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_NOT_S,
989fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_NOT_ENT,
999fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_NOT_FNC,
1009fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_IF,
1019fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_IFNOT,
1029fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_CALL0,
1039fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_CALL1,
1049fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_CALL2,
1059fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_CALL3,
1069fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_CALL4,
1079fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_CALL5,
1089fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_CALL6,
1099fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_CALL7,
1109fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_CALL8,
1119fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_STATE,
1129fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_GOTO,
1139fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_AND,
1149fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_OR,
1159fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1169fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_BITAND,
1179fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	OP_BITOR
1189fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream};
1199fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1209fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1219fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamtypedef struct statement_s
1229fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream{
1239fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	unsigned short	op;
1249fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	short	a,b,c;
1259fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream} dstatement_t;
1269fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1279fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamtypedef struct
1289fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream{
1299fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	unsigned short	type;		// if DEF_SAVEGLOBGAL bit is set
1309fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream								// the variable needs to be saved in savegames
1319fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	unsigned short	ofs;
1329fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int			s_name;
1339fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream} ddef_t;
1349fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	DEF_SAVEGLOBAL	(1<<15)
1359fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1369fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	MAX_PARMS	8
1379fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1389fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamtypedef struct
1399fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream{
1409fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		first_statement;	// negative numbers are builtins
1419fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		parm_start;
1429fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		locals;				// total ints of parms + locals
1439fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1449fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		profile;		// runtime
1459fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1469fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		s_name;
1479fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		s_file;			// source file defined in
1489fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1499fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		numparms;
1509fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	byte	parm_size[MAX_PARMS];
1519fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream} dfunction_t;
1529fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1539fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1549fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream#define	PROG_VERSION	6
1559fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstreamtypedef struct
1569fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream{
1579fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		version;
1589fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		crc;			// check of header file
1599fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1609fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		ofs_statements;
1619fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		numstatements;	// statement 0 is an error
1629fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1639fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		ofs_globaldefs;
1649fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		numglobaldefs;
1659fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1669fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		ofs_fielddefs;
1679fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		numfielddefs;
1689fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1699fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		ofs_functions;
1709fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		numfunctions;	// function 0 is an empty
1719fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1729fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		ofs_strings;
1739fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		numstrings;		// first string is a null string
1749fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1759fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		ofs_globals;
1769fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		numglobals;
1779fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
1789fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream	int		entityfields;
1799fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream} dprograms_t;
1809fd67c44777b350dc56f3e70c88963b0d966ffc7quake upstream
181