zdoom/gzdoom-gles
0
0
Fork 0
mirror of https://github.com/ZDoom/gzdoom-gles.git synced 2024-11-24 13:11:33 +00:00
Code Issues Projects Releases Packages Wiki Activity

- Fixed: More endian issues in the ACS VM.

Browse source
This commit is contained in:
Braden Obrzut 2015-06-05 22:22:54 -04:00
parent 7497b329c2
commit 662345adb8
1 changed files with 10 additions and 11 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

21
src/p_acs.cpp
View file

@ -1959,13 +1959,12 @@ bool FBehavior::Init(int lumpnum, FileReader * fr, int len)
chunk = (DWORD *)FindChunk (MAKE_ID('M','S','T','R')); chunk = (DWORD *)FindChunk (MAKE_ID('M','S','T','R'));
if (chunk != NULL) if (chunk != NULL)
{ {
for (DWORD i = 0; i < chunk[1]/4; ++i) for (DWORD i = 0; i < LittleLong(chunk[1])/4; ++i)
{ {
// MapVarStore[chunk[i+2]] |= LibraryID; const char *str = LookupString(MapVarStore[LittleLong(chunk[i+2])]);
const char *str = LookupString(MapVarStore[chunk[i+2]]);
if (str != NULL) if (str != NULL)
{ {
MapVarStore[chunk[i+2]] = GlobalACSStrings.AddString(str, NULL, 0); MapVarStore[LittleLong(chunk[i+2])] = GlobalACSStrings.AddString(str, NULL, 0);
} }
} }
} }
@ -1973,7 +1972,7 @@ bool FBehavior::Init(int lumpnum, FileReader * fr, int len)
chunk = (DWORD *)FindChunk (MAKE_ID('A','S','T','R')); chunk = (DWORD *)FindChunk (MAKE_ID('A','S','T','R'));
if (chunk != NULL) if (chunk != NULL)
{ {
for (DWORD i = 0; i < chunk[1]/4; ++i) for (DWORD i = 0; i < LittleLong(chunk[1])/4; ++i)
{ {
int arraynum = MapVarStore[LittleLong(chunk[i+2])]; int arraynum = MapVarStore[LittleLong(chunk[i+2])];
if ((unsigned)arraynum < (unsigned)NumArrays) if ((unsigned)arraynum < (unsigned)NumArrays)
@ -2000,13 +1999,13 @@ bool FBehavior::Init(int lumpnum, FileReader * fr, int len)
// First byte is version, it should be 0 // First byte is version, it should be 0
if(*chunkData++ == 0) if(*chunkData++ == 0)
{ {
int arraynum = MapVarStore[uallong(*(const int*)(chunkData))]; int arraynum = MapVarStore[uallong(LittleLong(*(const int*)(chunkData)))];
chunkData += 4; chunkData += 4;
if ((unsigned)arraynum < (unsigned)NumArrays) if ((unsigned)arraynum < (unsigned)NumArrays)
{ {
SDWORD *elems = ArrayStore[arraynum].Elements; SDWORD *elems = ArrayStore[arraynum].Elements;
// Ending zeros may be left out. // Ending zeros may be left out.
for (int j = MIN(chunk[1]-5, ArrayStore[arraynum].ArraySize); j > 0; --j, ++elems, ++chunkData) for (int j = MIN(LittleLong(chunk[1])-5, ArrayStore[arraynum].ArraySize); j > 0; --j, ++elems, ++chunkData)
{ {
// For ATAG, a value of 0 = Integer, 1 = String, 2 = FunctionPtr // For ATAG, a value of 0 = Integer, 1 = String, 2 = FunctionPtr
// Our implementation uses the same tags for both String and FunctionPtr // Our implementation uses the same tags for both String and FunctionPtr
@ -2073,7 +2072,7 @@ bool FBehavior::Init(int lumpnum, FileReader * fr, int len)
ScriptFunction *func = &((ScriptFunction *)Functions)[j]; ScriptFunction *func = &((ScriptFunction *)Functions)[j];
if (func->Address == 0 && func->ImportNum == 0) if (func->Address == 0 && func->ImportNum == 0)
{ {
int libfunc = lib->FindFunctionName ((char *)(chunk + 2) + chunk[3+j]); int libfunc = lib->FindFunctionName ((char *)(chunk + 2) + LittleLong(chunk[3+j]));
if (libfunc >= 0) if (libfunc >= 0)
{ {
ScriptFunction *realfunc = &((ScriptFunction *)lib->Functions)[libfunc]; ScriptFunction *realfunc = &((ScriptFunction *)lib->Functions)[libfunc];
@ -2086,14 +2085,14 @@ bool FBehavior::Init(int lumpnum, FileReader * fr, int len)
if (realfunc->ArgCount != func->ArgCount) if (realfunc->ArgCount != func->ArgCount)
{ {
Printf (TEXTCOLOR_ORANGE "Function %s in %s has %d arguments. %s expects it to have %d.\n", Printf (TEXTCOLOR_ORANGE "Function %s in %s has %d arguments. %s expects it to have %d.\n",
(char *)(chunk + 2) + chunk[3+j], lib->ModuleName, realfunc->ArgCount, (char *)(chunk + 2) + LittleLong(chunk[3+j]), lib->ModuleName, realfunc->ArgCount,
ModuleName, func->ArgCount); ModuleName, func->ArgCount);
Format = ACS_Unknown; Format = ACS_Unknown;
} }
// The next two properties do not affect code compatibility, so it is // The next two properties do not affect code compatibility, so it is
// okay for them to be different in the imported module than they are // okay for them to be different in the imported module than they are
// in this one, as long as we make sure to use the real values. // in this one, as long as we make sure to use the real values.
func->LocalCount = realfunc->LocalCount; func->LocalCount = LittleLong(realfunc->LocalCount);
func->HasReturnValue = realfunc->HasReturnValue; func->HasReturnValue = realfunc->HasReturnValue;
} }
} }
@ -2105,7 +2104,7 @@ bool FBehavior::Init(int lumpnum, FileReader * fr, int len)
if (chunk != NULL) if (chunk != NULL)
{ {
char *parse = (char *)&chunk[2]; char *parse = (char *)&chunk[2];
for (DWORD j = 0; j < chunk[1]; ) for (DWORD j = 0; j < LittleLong(chunk[1]); )
{ {
DWORD varNum = LittleLong(*(DWORD *)&parse[j]); DWORD varNum = LittleLong(*(DWORD *)&parse[j]);
j += 4; j += 4;