dvander@27: /* Pawn Abstract Machine (for the Pawn language) dvander@27: * dvander@27: * Copyright (c) ITB CompuPhase, 1997-2006 dvander@27: * dvander@27: * This software is provided "as-is", without any express or implied warranty. dvander@27: * In no event will the authors be held liable for any damages arising from dvander@27: * the use of this software. dvander@27: * dvander@27: * Permission is granted to anyone to use this software for any purpose, dvander@27: * including commercial applications, and to alter it and redistribute it dvander@27: * freely, subject to the following restrictions: dvander@27: * dvander@27: * 1. The origin of this software must not be misrepresented; you must not dvander@27: * claim that you wrote the original software. If you use this software in dvander@27: * a product, an acknowledgment in the product documentation would be dvander@27: * appreciated but is not required. dvander@27: * 2. Altered source versions must be plainly marked as such, and must not be dvander@27: * misrepresented as being the original software. dvander@27: * 3. This notice may not be removed or altered from any source distribution. dvander@27: * faluco@62: * Version: $Id: amx.h 3633 2006-08-11 16:20:18Z thiadmer $ dvander@27: */ dvander@27: dvander@27: #ifndef AMX_H_INCLUDED dvander@27: #define AMX_H_INCLUDED dvander@27: dvander@27: #include /* for size_t */ dvander@27: #include dvander@27: dvander@27: #if defined FREEBSD && !defined __FreeBSD__ dvander@27: #define __FreeBSD__ dvander@27: #endif dvander@27: #if defined LINUX || defined __FreeBSD__ || defined __OpenBSD__ dvander@27: #include dvander@27: #endif dvander@27: dvander@27: #if defined __GNUC__ dvander@27: #include dvander@27: #define HAVE_STDINT_H dvander@27: #elif !defined HAVE_STDINT_H dvander@27: #if defined __LCC__ || defined __DMC__ || defined LINUX || (defined __WATCOMC__ && __WATCOMC__ >= 1200) dvander@27: #if defined HAVE_INTTYPES_H dvander@27: #include dvander@27: #else dvander@27: #include dvander@27: #endif dvander@27: #elif !defined __STDC_VERSION__ || __STDC_VERSION__ < 199901L dvander@27: /* The ISO C99 defines the int16_t and int_32t types. If the compiler got dvander@27: * here, these types are probably undefined. dvander@27: */ dvander@27: #if defined __MACH__ dvander@27: #include dvander@27: typedef unsigned short int uint16_t; dvander@27: typedef unsigned long int uint32_t; dvander@27: #elif defined __FreeBSD__ dvander@27: #include dvander@27: #else dvander@27: typedef short int int16_t; dvander@27: typedef unsigned short int uint16_t; dvander@27: #if defined SN_TARGET_PS2 dvander@27: typedef int int32_t; dvander@27: typedef unsigned int uint32_t; dvander@27: #else dvander@27: typedef long int int32_t; dvander@27: typedef unsigned long int uint32_t; dvander@27: #endif dvander@27: #if defined __WIN32__ || defined _WIN32 || defined WIN32 dvander@27: typedef __int64 int64_t; dvander@27: typedef unsigned __int64 uint64_t; dvander@27: #define HAVE_I64 dvander@27: #elif defined __GNUC__ dvander@27: typedef long long int64_t; dvander@27: typedef unsigned long long uint64_t; dvander@27: #define HAVE_I64 dvander@27: #endif dvander@27: #endif dvander@27: #endif dvander@27: #define HAVE_STDINT_H dvander@27: #endif dvander@27: #if defined _LP64 || defined WIN64 || defined _WIN64 dvander@27: #if !defined __64BIT__ dvander@27: #define __64BIT__ dvander@27: #endif dvander@27: #endif dvander@27: dvander@27: #if HAVE_ALLOCA_H dvander@27: #include dvander@27: #endif dvander@27: #if defined __WIN32__ || defined _WIN32 || defined WIN32 /* || defined __MSDOS__ */ dvander@27: #if !defined alloca dvander@27: #define alloca(n) _alloca(n) dvander@27: #endif dvander@27: #endif dvander@27: dvander@27: #if !defined arraysize dvander@27: #define arraysize(array) (sizeof(array) / sizeof((array)[0])) dvander@27: #endif dvander@27: #if !defined assert_static dvander@27: /* see "Compile-Time Assertions" by Ralf Holly, dvander@27: * C/C++ Users Journal, November 2004 dvander@27: */ dvander@27: #define assert_static(e) \ dvander@27: do { \ dvander@27: enum { assert_static__ = 1/(e) }; \ dvander@27: } while (0) dvander@27: #endif dvander@27: dvander@27: #ifdef __cplusplus dvander@27: extern "C" { dvander@27: #endif dvander@27: dvander@27: #if defined PAWN_DLL dvander@27: #if !defined AMX_NATIVE_CALL dvander@27: #define AMX_NATIVE_CALL __stdcall dvander@27: #endif dvander@27: #if !defined AMXAPI dvander@27: #define AMXAPI __stdcall dvander@27: #endif dvander@27: #endif dvander@27: dvander@27: /* calling convention for native functions */ dvander@27: #if !defined AMX_NATIVE_CALL dvander@27: #define AMX_NATIVE_CALL dvander@27: #endif dvander@27: /* calling convention for all interface functions and callback functions */ dvander@27: #if !defined AMXAPI dvander@27: #if defined STDECL dvander@27: #define AMXAPI __stdcall dvander@27: #elif defined CDECL dvander@27: #define AMXAPI __cdecl dvander@27: #elif defined GCC_HASCLASSVISIBILITY dvander@27: #define AMXAPI __attribute__ ((visibility("default"))) dvander@27: #else dvander@27: #define AMXAPI dvander@27: #endif dvander@27: #endif dvander@27: #if !defined AMXEXPORT dvander@27: #define AMXEXPORT dvander@27: #endif dvander@27: dvander@27: /* File format version (in CUR_FILE_VERSION) dvander@27: * 0 (original version) dvander@27: * 1 (opcodes JUMP.pri, SWITCH and CASETBL) dvander@27: * 2 (compressed files) dvander@27: * 3 (public variables) dvander@27: * 4 (opcodes SWAP.pri/alt and PUSHADDR) dvander@27: * 5 (tagnames table) dvander@27: * 6 (reformatted header) dvander@27: * 7 (name table, opcodes SYMTAG & SYSREQ.D) dvander@27: * 8 (opcode STMT, renewed debug interface) dvander@27: * 9 (macro opcodes) dvander@27: * MIN_FILE_VERSION is the lowest file version number that the current AMX dvander@27: * implementation supports. If the AMX file header gets new fields, this number dvander@27: * often needs to be incremented. MAX_AMX_VERSION is the lowest AMX version that dvander@27: * is needed to support the current file version. When there are new opcodes, dvander@27: * this number needs to be incremented. dvander@27: * The file version supported by the JIT may run behind MIN_AMX_VERSION. So dvander@27: * there is an extra constant for it: MAX_FILE_VER_JIT. dvander@27: */ dvander@27: #define CUR_FILE_VERSION 9 /* current file version; also the current AMX version */ dvander@27: #define MIN_FILE_VERSION 6 /* lowest supported file format version for the current AMX version */ dvander@27: #define MIN_AMX_VERSION 9 /* minimum AMX version needed to support the current file format */ dvander@27: #define MAX_FILE_VER_JIT 8 /* file version supported by the JIT */ dvander@27: #define MIN_AMX_VER_JIT 8 /* AMX version supported by the JIT */ dvander@27: dvander@27: #if !defined PAWN_CELL_SIZE dvander@27: #define PAWN_CELL_SIZE 32 /* by default, use 32-bit cells */ dvander@27: #endif dvander@27: #if PAWN_CELL_SIZE==16 dvander@27: typedef uint16_t ucell; dvander@27: typedef int16_t cell; dvander@27: #elif PAWN_CELL_SIZE==32 dvander@27: typedef uint32_t ucell; dvander@27: typedef int32_t cell; dvander@27: #elif PAWN_CELL_SIZE==64 dvander@27: typedef uint64_t ucell; dvander@27: typedef int64_t cell; dvander@27: #else dvander@27: #error Unsupported cell size (PAWN_CELL_SIZE) dvander@27: #endif dvander@27: dvander@27: #define UNPACKEDMAX (((cell)1 << (sizeof(cell)-1)*8) - 1) dvander@27: #define UNLIMITED (~1u >> 1) dvander@27: dvander@27: struct tagAMX; dvander@27: typedef cell (AMX_NATIVE_CALL *AMX_NATIVE)(struct tagAMX *amx, cell *params); dvander@27: typedef int (AMXAPI *AMX_CALLBACK)(struct tagAMX *amx, cell index, dvander@27: cell *result, cell *params); dvander@27: typedef int (AMXAPI *AMX_DEBUG)(struct tagAMX *amx); dvander@27: typedef int (AMXAPI *AMX_IDLE)(struct tagAMX *amx, int AMXAPI Exec(struct tagAMX *, cell *, int)); dvander@27: #if !defined _FAR dvander@27: #define _FAR dvander@27: #endif dvander@27: dvander@27: #if defined _MSC_VER dvander@27: #pragma warning(disable:4103) /* disable warning message 4103 that complains dvander@27: * about pragma pack in a header file */ dvander@27: #pragma warning(disable:4100) /* "'%$S' : unreferenced formal parameter" */ dvander@27: #endif dvander@27: dvander@27: /* Some compilers do not support the #pragma align, which should be fine. Some dvander@27: * compilers give a warning on unknown #pragmas, which is not so fine... dvander@27: */ dvander@27: #if (defined SN_TARGET_PS2 || defined __GNUC__) && !defined AMX_NO_ALIGN dvander@27: #define AMX_NO_ALIGN dvander@27: #endif dvander@27: dvander@27: #if !defined AMX_NO_ALIGN dvander@27: #if defined LINUX || defined __FreeBSD__ dvander@27: #pragma pack(1) /* structures must be packed (byte-aligned) */ dvander@27: #elif defined MACOS && defined __MWERKS__ dvander@27: #pragma options align=mac68k dvander@27: #else dvander@27: #pragma pack(push) dvander@27: #pragma pack(1) /* structures must be packed (byte-aligned) */ dvander@27: #if defined __TURBOC__ dvander@27: #pragma option -a- /* "pack" pragma for older Borland compilers */ dvander@27: #endif dvander@27: #endif dvander@27: #endif dvander@27: dvander@27: typedef struct tagAMX_NATIVE_INFO { dvander@31: const char _FAR *name; dvander@31: AMX_NATIVE func; dvander@27: } AMX_NATIVE_INFO; dvander@27: dvander@27: #define AMX_USERNUM 4 dvander@27: #define sEXPMAX 19 /* maximum name length for file version <= 6 */ dvander@27: #define sNAMEMAX 31 /* maximum name length of symbol name */ dvander@27: dvander@27: typedef struct tagAMX_FUNCSTUB { dvander@31: ucell address; dvander@31: char name[sEXPMAX+1]; dvander@27: } AMX_FUNCSTUB; dvander@27: dvander@27: typedef struct tagFUNCSTUBNT { dvander@31: ucell address; dvander@31: uint32_t nameofs; dvander@27: } AMX_FUNCSTUBNT; dvander@27: dvander@27: /* The AMX structure is the internal structure for many functions. Not all dvander@27: * fields are valid at all times; many fields are cached in local variables. dvander@27: */ dvander@27: typedef struct tagAMX { dvander@31: unsigned char _FAR *base; /* points to the AMX header plus the code, optionally also the data */ dvander@31: unsigned char _FAR *data; /* points to separate data+stack+heap, may be NULL */ dvander@31: AMX_CALLBACK callback; dvander@31: AMX_DEBUG debug ; /* debug callback */ dvander@27: /* for external functions a few registers must be accessible from the outside */ dvander@31: cell cip ; /* instruction pointer: relative to base + amxhdr->cod */ dvander@31: cell frm ; /* stack frame base: relative to base + amxhdr->dat */ dvander@31: cell hea ; /* top of the heap: relative to base + amxhdr->dat */ dvander@31: cell hlw ; /* bottom of the heap: relative to base + amxhdr->dat */ dvander@31: cell stk ; /* stack pointer: relative to base + amxhdr->dat */ dvander@31: cell stp ; /* top of the stack: relative to base + amxhdr->dat */ dvander@31: int flags ; /* current status, see amx_Flags() */ dvander@27: /* user data */ dvander@31: long usertags[AMX_USERNUM] ; dvander@31: void _FAR *userdata[AMX_USERNUM] ; dvander@27: /* native functions can raise an error */ dvander@31: int error ; dvander@27: /* passing parameters requires a "count" field */ dvander@27: int paramcount; dvander@27: /* the sleep opcode needs to store the full AMX status */ dvander@31: cell pri ; dvander@31: cell alt ; dvander@31: cell reset_stk ; dvander@31: cell reset_hea ; faluco@62: /* extra fields for increased performance */ dvander@31: cell sysreq_d ; /* relocated address/value for the SYSREQ.D opcode */ dvander@27: #if defined JIT dvander@27: /* support variables for the JIT */ dvander@31: int reloc_size ; /* required temporary buffer for relocations */ dvander@31: long code_size ; /* estimated memory footprint of the native code */ dvander@27: #endif dvander@27: } AMX; dvander@27: dvander@27: /* The AMX_HEADER structure is both the memory format as the file format. The dvander@27: * structure is used internaly. dvander@27: */ dvander@27: typedef struct tagAMX_HEADER { dvander@31: int32_t size ; /* size of the "file" */ dvander@31: uint16_t magic ; /* signature */ dvander@31: char file_version ; /* file format version */ dvander@31: char amx_version ; /* required version of the AMX */ dvander@31: int16_t flags ; dvander@31: int16_t defsize ; /* size of a definition record */ dvander@31: int32_t cod ; /* initial value of COD - code block */ dvander@31: int32_t dat ; /* initial value of DAT - data block */ dvander@31: int32_t hea ; /* initial value of HEA - start of the heap */ dvander@31: int32_t stp ; /* initial value of STP - stack top */ dvander@31: int32_t cip ; /* initial value of CIP - the instruction pointer */ dvander@31: int32_t publics ; /* offset to the "public functions" table */ dvander@31: int32_t natives ; /* offset to the "native functions" table */ dvander@31: int32_t libraries ; /* offset to the table of libraries */ dvander@31: int32_t pubvars ; /* the "public variables" table */ dvander@31: int32_t tags ; /* the "public tagnames" table */ dvander@31: int32_t nametable ; /* name table */ dvander@27: } AMX_HEADER; dvander@27: dvander@27: #if PAWN_CELL_SIZE==16 dvander@27: #define AMX_MAGIC 0xf1e2 dvander@27: #elif PAWN_CELL_SIZE==32 dvander@27: #define AMX_MAGIC 0xf1e0 dvander@27: #elif PAWN_CELL_SIZE==64 dvander@27: #define AMX_MAGIC 0xf1e1 dvander@27: #endif dvander@27: dvander@27: enum { dvander@27: AMX_ERR_NONE, dvander@27: /* reserve the first 15 error codes for exit codes of the abstract machine */ dvander@27: AMX_ERR_EXIT, /* forced exit */ dvander@27: AMX_ERR_ASSERT, /* assertion failed */ dvander@27: AMX_ERR_STACKERR, /* stack/heap collision */ dvander@27: AMX_ERR_BOUNDS, /* index out of bounds */ dvander@27: AMX_ERR_MEMACCESS, /* invalid memory access */ dvander@27: AMX_ERR_INVINSTR, /* invalid instruction */ dvander@27: AMX_ERR_STACKLOW, /* stack underflow */ dvander@27: AMX_ERR_HEAPLOW, /* heap underflow */ dvander@27: AMX_ERR_CALLBACK, /* no callback, or invalid callback */ dvander@27: AMX_ERR_NATIVE, /* native function failed */ dvander@27: AMX_ERR_DIVIDE, /* divide by zero */ dvander@27: AMX_ERR_SLEEP, /* go into sleepmode - code can be restarted */ dvander@27: AMX_ERR_INVSTATE, /* invalid state for this access */ dvander@27: dvander@27: AMX_ERR_MEMORY = 16, /* out of memory */ dvander@27: AMX_ERR_FORMAT, /* invalid file format */ dvander@27: AMX_ERR_VERSION, /* file is for a newer version of the AMX */ dvander@27: AMX_ERR_NOTFOUND, /* function not found */ dvander@27: AMX_ERR_INDEX, /* invalid index parameter (bad entry point) */ dvander@27: AMX_ERR_DEBUG, /* debugger cannot run */ dvander@27: AMX_ERR_INIT, /* AMX not initialized (or doubly initialized) */ dvander@27: AMX_ERR_USERDATA, /* unable to set user data field (table full) */ dvander@27: AMX_ERR_INIT_JIT, /* cannot initialize the JIT */ dvander@27: AMX_ERR_PARAMS, /* parameter error */ dvander@27: AMX_ERR_DOMAIN, /* domain error, expression result does not fit in range */ dvander@27: AMX_ERR_GENERAL, /* general error (unknown or unspecific error) */ dvander@27: }; dvander@27: dvander@27: /* AMX_FLAG_CHAR16 0x01 no longer used */ dvander@27: #define AMX_FLAG_DEBUG 0x02 /* symbolic info. available */ dvander@27: #define AMX_FLAG_COMPACT 0x04 /* compact encoding */ dvander@27: #define AMX_FLAG_SLEEP 0x08 /* script uses the sleep instruction (possible re-entry or power-down mode) */ dvander@27: #define AMX_FLAG_NOCHECKS 0x10 /* no array bounds checking; no BREAK opcodes */ faluco@62: #define AMX_FLAG_SYSREQN 0x800 /* script new (optimized) version of SYSREQ opcode */ dvander@27: #define AMX_FLAG_NTVREG 0x1000 /* all native functions are registered */ dvander@27: #define AMX_FLAG_JITC 0x2000 /* abstract machine is JIT compiled */ dvander@27: #define AMX_FLAG_BROWSE 0x4000 /* busy browsing */ dvander@27: #define AMX_FLAG_RELOC 0x8000 /* jump/call addresses relocated */ dvander@27: dvander@27: #define AMX_EXEC_MAIN (-1) /* start at program entry point */ dvander@27: #define AMX_EXEC_CONT (-2) /* continue from last address */ dvander@27: dvander@27: #define AMX_USERTAG(a,b,c,d) ((a) | ((b)<<8) | ((long)(c)<<16) | ((long)(d)<<24)) dvander@27: dvander@27: #if !defined AMX_COMPACTMARGIN dvander@27: #define AMX_COMPACTMARGIN 64 dvander@27: #endif dvander@27: dvander@27: /* for native functions that use floating point parameters, the following dvander@27: * two macros are convenient for casting a "cell" into a "float" type _without_ dvander@27: * changing the bit pattern dvander@27: */ dvander@27: #if PAWN_CELL_SIZE==32 dvander@27: #define amx_ftoc(f) ( * ((cell*)&f) ) /* float to cell */ dvander@27: #define amx_ctof(c) ( * ((float*)&c) ) /* cell to float */ dvander@27: #elif PAWN_CELL_SIZE==64 dvander@27: #define amx_ftoc(f) ( * ((cell*)&f) ) /* float to cell */ dvander@27: #define amx_ctof(c) ( * ((double*)&c) ) /* cell to float */ dvander@27: #else dvander@27: #error Unsupported cell size dvander@27: #endif dvander@27: dvander@27: #define amx_StrParam(amx,param,result) \ dvander@27: do { \ dvander@27: cell *amx_cstr_; int amx_length_; \ dvander@27: amx_GetAddr((amx), (param), &amx_cstr_); \ dvander@27: amx_StrLen(amx_cstr_, &amx_length_); \ dvander@27: if (amx_length_ > 0 && \ dvander@27: ((result) = (void*)alloca((amx_length_ + 1) * sizeof(*(result)))) != NULL) \ dvander@27: amx_GetString((char*)(result), amx_cstr_, sizeof(*(result))>1, amx_length_ + 1); \ dvander@27: else (result) = NULL; \ dvander@27: } while (0) dvander@27: dvander@27: uint16_t * AMXAPI amx_Align16(uint16_t *v); dvander@27: uint32_t * AMXAPI amx_Align32(uint32_t *v); dvander@27: #if defined _I64_MAX || defined HAVE_I64 dvander@27: uint64_t * AMXAPI amx_Align64(uint64_t *v); dvander@27: #endif dvander@27: int AMXAPI amx_Allot(AMX *amx, int cells, cell *amx_addr, cell **phys_addr); dvander@27: int AMXAPI amx_Callback(AMX *amx, cell index, cell *result, cell *params); dvander@27: int AMXAPI amx_Cleanup(AMX *amx); dvander@27: int AMXAPI amx_Clone(AMX *amxClone, AMX *amxSource, void *data); dvander@27: int AMXAPI amx_Exec(AMX *amx, cell *retval, int index); dvander@27: int AMXAPI amx_FindNative(AMX *amx, const char *name, int *index); dvander@27: int AMXAPI amx_FindPublic(AMX *amx, const char *funcname, int *index); dvander@27: int AMXAPI amx_FindPubVar(AMX *amx, const char *varname, cell *amx_addr); dvander@27: int AMXAPI amx_FindTagId(AMX *amx, cell tag_id, char *tagname); dvander@27: int AMXAPI amx_Flags(AMX *amx,uint16_t *flags); dvander@27: int AMXAPI amx_GetAddr(AMX *amx,cell amx_addr,cell **phys_addr); dvander@27: int AMXAPI amx_GetNative(AMX *amx, int index, char *funcname); dvander@27: int AMXAPI amx_GetPublic(AMX *amx, int index, char *funcname); dvander@27: int AMXAPI amx_GetPubVar(AMX *amx, int index, char *varname, cell *amx_addr); dvander@27: int AMXAPI amx_GetString(char *dest,const cell *source, int use_wchar, size_t size); dvander@27: int AMXAPI amx_GetTag(AMX *amx, int index, char *tagname, cell *tag_id); dvander@27: int AMXAPI amx_GetUserData(AMX *amx, long tag, void **ptr); dvander@27: int AMXAPI amx_Init(AMX *amx, void *program); dvander@27: int AMXAPI amx_InitJIT(AMX *amx, void *reloc_table, void *native_code); dvander@27: int AMXAPI amx_MemInfo(AMX *amx, long *codesize, long *datasize, long *stackheap); dvander@27: int AMXAPI amx_NameLength(AMX *amx, int *length); dvander@27: AMX_NATIVE_INFO * AMXAPI amx_NativeInfo(const char *name, AMX_NATIVE func); dvander@27: int AMXAPI amx_NumNatives(AMX *amx, int *number); dvander@27: int AMXAPI amx_NumPublics(AMX *amx, int *number); dvander@27: int AMXAPI amx_NumPubVars(AMX *amx, int *number); dvander@27: int AMXAPI amx_NumTags(AMX *amx, int *number); dvander@27: int AMXAPI amx_Push(AMX *amx, cell value); dvander@27: int AMXAPI amx_PushArray(AMX *amx, cell *amx_addr, cell **phys_addr, const cell array[], int numcells); dvander@27: int AMXAPI amx_PushString(AMX *amx, cell *amx_addr, cell **phys_addr, const char *string, int pack, int use_wchar); dvander@27: int AMXAPI amx_RaiseError(AMX *amx, int error); dvander@27: int AMXAPI amx_Register(AMX *amx, const AMX_NATIVE_INFO *nativelist, int number); dvander@27: int AMXAPI amx_Release(AMX *amx, cell amx_addr); dvander@27: int AMXAPI amx_SetCallback(AMX *amx, AMX_CALLBACK callback); dvander@27: int AMXAPI amx_SetDebugHook(AMX *amx, AMX_DEBUG debug); dvander@27: int AMXAPI amx_SetString(cell *dest, const char *source, int pack, int use_wchar, size_t size); dvander@27: int AMXAPI amx_SetUserData(AMX *amx, long tag, void *ptr); dvander@27: int AMXAPI amx_StrLen(const cell *cstring, int *length); dvander@27: int AMXAPI amx_UTF8Check(const char *string, int *length); dvander@27: int AMXAPI amx_UTF8Get(const char *string, const char **endptr, cell *value); dvander@27: int AMXAPI amx_UTF8Len(const cell *cstr, int *length); dvander@27: int AMXAPI amx_UTF8Put(char *string, char **endptr, int maxchars, cell value); dvander@27: dvander@27: #if PAWN_CELL_SIZE==16 dvander@27: #define amx_AlignCell(v) amx_Align16(v) dvander@27: #elif PAWN_CELL_SIZE==32 dvander@27: #define amx_AlignCell(v) amx_Align32(v) dvander@27: #elif PAWN_CELL_SIZE==64 && (defined _I64_MAX || defined HAVE_I64) dvander@27: #define amx_AlignCell(v) amx_Align64(v) dvander@27: #else dvander@27: #error Unsupported cell size dvander@27: #endif dvander@27: dvander@27: #define amx_RegisterFunc(amx, name, func) \ dvander@27: amx_Register((amx), amx_NativeInfo((name),(func)), 1); dvander@27: dvander@27: #if !defined AMX_NO_ALIGN dvander@27: #if defined LINUX || defined __FreeBSD__ dvander@27: #pragma pack() /* reset default packing */ dvander@27: #elif defined MACOS && defined __MWERKS__ dvander@27: #pragma options align=reset dvander@27: #else dvander@27: #pragma pack(pop) /* reset previous packing */ dvander@27: #endif dvander@27: #endif dvander@27: dvander@27: #ifdef __cplusplus dvander@27: } dvander@27: #endif dvander@27: dvander@27: typedef enum { dvander@27: OP_NONE, /* invalid opcode */ dvander@27: OP_LOAD_PRI, dvander@27: OP_LOAD_ALT, dvander@27: OP_LOAD_S_PRI, dvander@27: OP_LOAD_S_ALT, dvander@27: OP_LREF_PRI, dvander@27: OP_LREF_ALT, dvander@27: OP_LREF_S_PRI, dvander@27: OP_LREF_S_ALT, dvander@27: OP_LOAD_I, dvander@27: OP_LODB_I, dvander@27: OP_CONST_PRI, dvander@27: OP_CONST_ALT, dvander@27: OP_ADDR_PRI, dvander@27: OP_ADDR_ALT, dvander@27: OP_STOR_PRI, dvander@27: OP_STOR_ALT, dvander@27: OP_STOR_S_PRI, dvander@27: OP_STOR_S_ALT, dvander@27: OP_SREF_PRI, dvander@27: OP_SREF_ALT, dvander@27: OP_SREF_S_PRI, dvander@27: OP_SREF_S_ALT, dvander@27: OP_STOR_I, dvander@27: OP_STRB_I, dvander@27: OP_LIDX, dvander@27: OP_LIDX_B, dvander@27: OP_IDXADDR, dvander@27: OP_IDXADDR_B, dvander@27: OP_ALIGN_PRI, dvander@27: OP_ALIGN_ALT, dvander@27: OP_LCTRL, dvander@27: OP_SCTRL, dvander@27: OP_MOVE_PRI, dvander@27: OP_MOVE_ALT, dvander@27: OP_XCHG, dvander@27: OP_PUSH_PRI, dvander@27: OP_PUSH_ALT, dvander@27: OP_PUSH_R, dvander@27: OP_PUSH_C, dvander@27: OP_PUSH, dvander@27: OP_PUSH_S, dvander@27: OP_POP_PRI, dvander@27: OP_POP_ALT, dvander@27: OP_STACK, dvander@27: OP_HEAP, dvander@27: OP_PROC, dvander@27: OP_RET, dvander@27: OP_RETN, dvander@27: OP_CALL, dvander@27: OP_CALL_PRI, dvander@27: OP_JUMP, dvander@27: OP_JREL, dvander@27: OP_JZER, dvander@27: OP_JNZ, dvander@27: OP_JEQ, dvander@27: OP_JNEQ, dvander@27: OP_JLESS, dvander@27: OP_JLEQ, dvander@27: OP_JGRTR, dvander@27: OP_JGEQ, dvander@27: OP_JSLESS, dvander@27: OP_JSLEQ, dvander@27: OP_JSGRTR, dvander@27: OP_JSGEQ, dvander@27: OP_SHL, dvander@27: OP_SHR, dvander@27: OP_SSHR, dvander@27: OP_SHL_C_PRI, dvander@27: OP_SHL_C_ALT, dvander@27: OP_SHR_C_PRI, dvander@27: OP_SHR_C_ALT, dvander@27: OP_SMUL, dvander@27: OP_SDIV, dvander@27: OP_SDIV_ALT, dvander@27: OP_UMUL, dvander@27: OP_UDIV, dvander@27: OP_UDIV_ALT, dvander@27: OP_ADD, dvander@27: OP_SUB, dvander@27: OP_SUB_ALT, dvander@27: OP_AND, dvander@27: OP_OR, dvander@27: OP_XOR, dvander@27: OP_NOT, dvander@27: OP_NEG, dvander@27: OP_INVERT, dvander@27: OP_ADD_C, dvander@27: OP_SMUL_C, dvander@27: OP_ZERO_PRI, dvander@27: OP_ZERO_ALT, dvander@27: OP_ZERO, dvander@27: OP_ZERO_S, dvander@27: OP_SIGN_PRI, dvander@27: OP_SIGN_ALT, dvander@27: OP_EQ, dvander@27: OP_NEQ, dvander@27: OP_LESS, dvander@27: OP_LEQ, dvander@27: OP_GRTR, dvander@27: OP_GEQ, dvander@27: OP_SLESS, dvander@27: OP_SLEQ, dvander@27: OP_SGRTR, dvander@27: OP_SGEQ, dvander@27: OP_EQ_C_PRI, dvander@27: OP_EQ_C_ALT, dvander@27: OP_INC_PRI, dvander@27: OP_INC_ALT, dvander@27: OP_INC, dvander@27: OP_INC_S, dvander@27: OP_INC_I, dvander@27: OP_DEC_PRI, dvander@27: OP_DEC_ALT, dvander@27: OP_DEC, dvander@27: OP_DEC_S, dvander@27: OP_DEC_I, dvander@27: OP_MOVS, dvander@27: OP_CMPS, dvander@27: OP_FILL, dvander@27: OP_HALT, dvander@27: OP_BOUNDS, dvander@27: OP_SYSREQ_PRI, dvander@27: OP_SYSREQ_C, dvander@27: OP_FILE, /* obsolete */ dvander@27: OP_LINE, /* obsolete */ dvander@27: OP_SYMBOL, /* obsolete */ dvander@27: OP_SRANGE, /* obsolete */ dvander@27: OP_JUMP_PRI, dvander@27: OP_SWITCH, dvander@27: OP_CASETBL, dvander@27: OP_SWAP_PRI, dvander@27: OP_SWAP_ALT, dvander@27: OP_PUSH_ADR, dvander@27: OP_NOP, dvander@27: OP_SYSREQ_N, dvander@27: OP_SYMTAG, /* obsolete */ dvander@27: OP_BREAK, dvander@27: OP_PUSH2_C, dvander@27: OP_PUSH2, dvander@27: OP_PUSH2_S, dvander@27: OP_PUSH2_ADR, dvander@27: OP_PUSH3_C, dvander@27: OP_PUSH3, dvander@27: OP_PUSH3_S, dvander@27: OP_PUSH3_ADR, dvander@27: OP_PUSH4_C, dvander@27: OP_PUSH4, dvander@27: OP_PUSH4_S, dvander@27: OP_PUSH4_ADR, dvander@27: OP_PUSH5_C, dvander@27: OP_PUSH5, dvander@27: OP_PUSH5_S, dvander@27: OP_PUSH5_ADR, dvander@27: OP_LOAD_BOTH, dvander@27: OP_LOAD_S_BOTH, dvander@27: OP_CONST, dvander@27: OP_CONST_S, dvander@27: /* ----- */ dvander@27: OP_SYSREQ_D, dvander@27: OP_SYSREQ_ND, dvander@27: /* ----- */ dvander@64: OP_HEAP_I, dvander@119: OP_PUSH_H_C, dvander@119: OP_GENARRAY, dvander@27: OP_NUM_OPCODES dvander@27: } OPCODE; dvander@27: dvander@27: #endif /* AMX_H_INCLUDED */