mirror of
https://github.com/libretro/libretro-tyrquake.git
synced 2024-12-09 00:53:35 +00:00
84d52679a5
Well, it turns out that progs->numstrings is actually the number of bytes dedicated to storage of the progs strings, not the number of strings. Consequently, our attempt to calculate the strings size was completely bogus. To avoid futher confusion, we'll rename the numstrings member in the progs header. Thanks to O.Sezer <sezero@users.sourceforge.net> for pointing this out :) Signed-off-by: Tyrann <tyrann@disenchant.net>
189 lines
3.4 KiB
C
189 lines
3.4 KiB
C
/*
|
|
Copyright (C) 1996-1997 Id Software, Inc.
|
|
|
|
This program is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU General Public License
|
|
as published by the Free Software Foundation; either version 2
|
|
of the License, or (at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
|
|
|
See the GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, write to the Free Software
|
|
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
|
|
*/
|
|
|
|
#ifndef PR_COMP_H
|
|
#define PR_COMP_H
|
|
|
|
#include <inttypes.h>
|
|
|
|
#include "qtypes.h"
|
|
|
|
// this file is shared by quake and qcc
|
|
|
|
typedef int32_t func_t;
|
|
typedef int32_t string_t;
|
|
|
|
typedef enum {
|
|
ev_void, ev_string, ev_float, ev_vector, ev_entity, ev_field,
|
|
ev_function, ev_pointer
|
|
} etype_t;
|
|
|
|
|
|
#define OFS_NULL 0
|
|
#define OFS_RETURN 1
|
|
#define OFS_PARM0 4 // leave 3 ofs for each parm to hold vectors
|
|
#define OFS_PARM1 7
|
|
#define OFS_PARM2 10
|
|
#define OFS_PARM3 13
|
|
#define OFS_PARM4 16
|
|
#define OFS_PARM5 19
|
|
#define OFS_PARM6 22
|
|
#define OFS_PARM7 25
|
|
#define RESERVED_OFS 28
|
|
|
|
|
|
enum {
|
|
OP_DONE,
|
|
OP_MUL_F,
|
|
OP_MUL_V,
|
|
OP_MUL_FV,
|
|
OP_MUL_VF,
|
|
OP_DIV_F,
|
|
OP_ADD_F,
|
|
OP_ADD_V,
|
|
OP_SUB_F,
|
|
OP_SUB_V,
|
|
|
|
OP_EQ_F,
|
|
OP_EQ_V,
|
|
OP_EQ_S,
|
|
OP_EQ_E,
|
|
OP_EQ_FNC,
|
|
|
|
OP_NE_F,
|
|
OP_NE_V,
|
|
OP_NE_S,
|
|
OP_NE_E,
|
|
OP_NE_FNC,
|
|
|
|
OP_LE,
|
|
OP_GE,
|
|
OP_LT,
|
|
OP_GT,
|
|
|
|
OP_LOAD_F,
|
|
OP_LOAD_V,
|
|
OP_LOAD_S,
|
|
OP_LOAD_ENT,
|
|
OP_LOAD_FLD,
|
|
OP_LOAD_FNC,
|
|
|
|
OP_ADDRESS,
|
|
|
|
OP_STORE_F,
|
|
OP_STORE_V,
|
|
OP_STORE_S,
|
|
OP_STORE_ENT,
|
|
OP_STORE_FLD,
|
|
OP_STORE_FNC,
|
|
|
|
OP_STOREP_F,
|
|
OP_STOREP_V,
|
|
OP_STOREP_S,
|
|
OP_STOREP_ENT,
|
|
OP_STOREP_FLD,
|
|
OP_STOREP_FNC,
|
|
|
|
OP_RETURN,
|
|
OP_NOT_F,
|
|
OP_NOT_V,
|
|
OP_NOT_S,
|
|
OP_NOT_ENT,
|
|
OP_NOT_FNC,
|
|
OP_IF,
|
|
OP_IFNOT,
|
|
OP_CALL0,
|
|
OP_CALL1,
|
|
OP_CALL2,
|
|
OP_CALL3,
|
|
OP_CALL4,
|
|
OP_CALL5,
|
|
OP_CALL6,
|
|
OP_CALL7,
|
|
OP_CALL8,
|
|
OP_STATE,
|
|
OP_GOTO,
|
|
OP_AND,
|
|
OP_OR,
|
|
|
|
OP_BITAND,
|
|
OP_BITOR
|
|
};
|
|
|
|
|
|
typedef struct statement_s {
|
|
uint16_t op;
|
|
int16_t a, b, c;
|
|
} dstatement_t;
|
|
|
|
typedef struct {
|
|
uint16_t type; /* if DEF_SAVEGLOBGAL bit is set, the variable needs
|
|
to be saved in savegames */
|
|
uint16_t ofs;
|
|
int32_t s_name;
|
|
} ddef_t;
|
|
|
|
#define DEF_SAVEGLOBAL (1<<15)
|
|
|
|
#define MAX_PARMS 8
|
|
|
|
typedef struct {
|
|
int32_t first_statement; /* negative numbers are builtins */
|
|
int32_t parm_start;
|
|
int32_t locals; /* total ints of parms + locals */
|
|
|
|
int32_t profile; /* runtime */
|
|
|
|
int32_t s_name;
|
|
int32_t s_file; /* source file defined in */
|
|
|
|
int32_t numparms;
|
|
byte parm_size[MAX_PARMS];
|
|
} dfunction_t;
|
|
|
|
|
|
#define PROG_VERSION 6
|
|
typedef struct {
|
|
int32_t version;
|
|
int32_t crc; /* check of header file */
|
|
|
|
int32_t ofs_statements;
|
|
int32_t numstatements; /* statement 0 is an error */
|
|
|
|
int32_t ofs_globaldefs;
|
|
int32_t numglobaldefs;
|
|
|
|
int32_t ofs_fielddefs;
|
|
int32_t numfielddefs;
|
|
|
|
int32_t ofs_functions;
|
|
int32_t numfunctions; /* function 0 is an empty */
|
|
|
|
int32_t ofs_strings;
|
|
int32_t strings_size; /* first string is a null string */
|
|
|
|
int32_t ofs_globals;
|
|
int32_t numglobals;
|
|
|
|
int32_t entityfields;
|
|
} dprograms_t;
|
|
|
|
#endif /* PR_COMP_H */
|