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