diff --git a/server/scrcore.cpp b/server/scrcore.cpp new file mode 100644 index 0000000..8606615 --- /dev/null +++ b/server/scrcore.cpp @@ -0,0 +1,166 @@ + +#include "main.h" +#include +#include "format.h" + +//---------------------------------------------------------------------------------- + +int AMXAPI aux_LoadProgram(AMX* amx, char* filename) +{ + FILE* fp; + if ((fp = fopen(filename, "rb")) == NULL) + { + return AMX_ERR_NOTFOUND; + } + AMX_HEADER hdr; + fread(&hdr, sizeof hdr, 1, fp); + amx_Align16(&hdr.magic); + amx_Align32((uint32_t *)&hdr.size); + amx_Align32((uint32_t *)&hdr.stp); + + if (hdr.magic != AMX_MAGIC) + { + fclose(fp); + return AMX_ERR_FORMAT; + } + + void* memblock; + if ((memblock = malloc(hdr.stp)) == NULL) + { + fclose(fp); + return AMX_ERR_MEMORY; + } + + rewind(fp); + fread(memblock, 1, (size_t)hdr.size, fp); + fclose(fp); + + //amx_SetDebugHook(amx, (AMX_DEBUG)amx_Debug); + memset(amx, 0, sizeof(*amx)); + int result = amx_Init(amx, memblock); + if (result != AMX_ERR_NONE) + { + free(memblock); + amx->base = NULL; + } + return result; +} + +//---------------------------------------------------------------------------------- + +int AMXAPI aux_LoadProgramFromMemory(AMX* amx, char* filedata) +{ + AMX_HEADER hdr; + + memcpy(&hdr, filedata, sizeof hdr); + + amx_Align16(&hdr.magic); + amx_Align32((uint32_t *)&hdr.size); + amx_Align32((uint32_t *)&hdr.stp); + + if (hdr.magic != AMX_MAGIC) + { + return AMX_ERR_FORMAT; + } + + void* memblock; + if ((memblock = malloc(hdr.stp)) == NULL) + { + return AMX_ERR_MEMORY; + } + + memcpy(memblock, filedata, (size_t)hdr.size); + + //amx_SetDebugHook(amx, (AMX_DEBUG)amx_Debug); + memset(amx, 0, sizeof(*amx)); + int result = amx_Init(amx, memblock); + if (result != AMX_ERR_NONE) + { + free(memblock); + amx->base = NULL; + } + return result; +} + +//---------------------------------------------------------------------------------- + +int AMXAPI aux_FreeProgram(AMX *amx) +{ + if (amx->base != NULL) + { + amx_Cleanup(amx); + free(amx->base); + memset(amx, 0, sizeof(AMX)); + } + return AMX_ERR_NONE; +} + +//---------------------------------------------------------------------------------- + +char * AMXAPI aux_StrError(int errnum) +{ + static char *messages[] = { + /* AMX_ERR_NONE */ "(none)", + /* AMX_ERR_EXIT */ "Forced exit", + /* AMX_ERR_ASSERT */ "Assertion failed", + /* AMX_ERR_STACKERR */ "Stack/heap collision (insufficient stack size)", + /* AMX_ERR_BOUNDS */ "Array index out of bounds", + /* AMX_ERR_MEMACCESS */ "Invalid memory access", + /* AMX_ERR_INVINSTR */ "Invalid instruction", + /* AMX_ERR_STACKLOW */ "Stack underflow", + /* AMX_ERR_HEAPLOW */ "Heap underflow", + /* AMX_ERR_CALLBACK */ "No (valid) native function callback", + /* AMX_ERR_NATIVE */ "Native function failed", + /* AMX_ERR_DIVIDE */ "Divide by zero", + /* AMX_ERR_SLEEP */ "(sleep mode)", + /* 13 */ "(reserved)", + /* 14 */ "(reserved)", + /* 15 */ "(reserved)", + /* AMX_ERR_MEMORY */ "Out of memory", + /* AMX_ERR_FORMAT */ "Invalid/unsupported P-code file format", + /* AMX_ERR_VERSION */ "File is for a newer version of the AMX", + /* AMX_ERR_NOTFOUND */ "File or function is not found", + /* AMX_ERR_INDEX */ "Invalid index parameter (bad entry point)", + /* AMX_ERR_DEBUG */ "Debugger cannot run", + /* AMX_ERR_INIT */ "AMX not initialized (or doubly initialized)", + /* AMX_ERR_USERDATA */ "Unable to set user data field (table full)", + /* AMX_ERR_INIT_JIT */ "Cannot initialize the JIT", + /* AMX_ERR_PARAMS */ "Parameter error", + }; + if (errnum < 0 || errnum >= sizeof messages / sizeof messages[0]) + return "(unknown)"; + return messages[errnum]; +} + +//---------------------------------------------------------------------------------- + +void AMXPrintError(CGameMode* pGameMode, AMX *amx, int error) +{ + if (error != AMX_ERR_NONE) + { + logprintf("Script[%s]: Run time error %d: \"%s\"",// on line %ld\n", + pGameMode->GetFileName(), error, aux_StrError(error));//, (long)amx->curline); + } +} + +//---------------------------------------------------------------------------------- + +cell* get_amxaddr(AMX *amx,cell amx_addr) +{ + return (cell *)(amx->base + (int)(((AMX_HEADER *)amx->base)->dat + amx_addr)); +} + +//---------------------------------------------------------------------------------- + +int set_amxstring(AMX *amx,cell amx_addr,const char *source,int max) +{ + cell* dest = (cell *)(amx->base + (int)(((AMX_HEADER *)amx->base)->dat + amx_addr)); + cell* start = dest; + while (max--&&*source) + *dest++=(cell)*source++; + *dest = 0; + return dest-start; +} + +//---------------------------------------------------------------------------------- + diff --git a/server/server.vcproj b/server/server.vcproj index b24362e..4795790 100644 --- a/server/server.vcproj +++ b/server/server.vcproj @@ -331,6 +331,9 @@ + +