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