zdoom/raze
0
0
Fork 0
mirror of https://github.com/ZDoom/Raze.git synced 2025-02-21 11:01:01 +00:00
Code Issues Projects Releases Packages Wiki Activity

Maybe, possibly, unfuck gamearrays.

Browse source 
git-svn-id: https://svn.eduke32.com/eduke32@6368 1a8010ca-5511-0410-912e-c29ae57300e0
This commit is contained in:
terminx 2017-07-18 20:53:22 +00:00
parent af0a291a59
commit 484f640f71
5 changed files with 86 additions and 104 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
source/build/include/m32script.h
View file

@ -45,8 +45,8 @@ extern void VM_OnEvent(int32_t iEventID, int32_t iActor);
extern void VM_ScriptInfo(void); extern void VM_ScriptInfo(void);
extern void VM_Disasm(ofstype beg, int32_t size); extern void VM_Disasm(ofstype beg, int32_t size);
extern int32_t Gv_NewVar(const char *pszLabel, intptr_t lValue, uint32_t dwFlags); void Gv_NewVar(const char *pszLabel, intptr_t lValue, uint32_t dwFlags);
extern int32_t Gv_NewArray(const char *pszLabel, void *arrayptr, int32_t asize, uint32_t dwFlags); void Gv_NewArray(const char *pszLabel, void *arrayptr, intptr_t asize, uint32_t dwFlags);
extern void Gv_Init(void); extern void Gv_Init(void);
extern int32_t __fastcall Gv_GetVarX(int32_t id); extern int32_t __fastcall Gv_GetVarX(int32_t id);

31
source/duke3d/src/gameexec.cpp
View file

@ -4600,10 +4600,11 @@ finish_qsprintf:
switch (aGameArrays[tw].flags & GAMEARRAY_TYPE_MASK) switch (aGameArrays[tw].flags & GAMEARRAY_TYPE_MASK)
{ {
case 0: aGameArrays[tw].pValues[arrayIndex] = newValue; break; case 0: aGameArrays[tw].pValues[arrayIndex] = newValue; break;
case GAMEARRAY_INT32: ((int32_t *)aGameArrays[tw].pValues)[arrayIndex] = newValue; break; case GAMEARRAY_INT16: ((int16_t *) aGameArrays[tw].pValues)[arrayIndex] = newValue; break;
case GAMEARRAY_INT16: ((int16_t *)aGameArrays[tw].pValues)[arrayIndex] = newValue; break; case GAMEARRAY_INT8: ((int8_t *) aGameArrays[tw].pValues)[arrayIndex] = newValue; break;
case GAMEARRAY_UINT8: ((uint8_t *)aGameArrays[tw].pValues)[arrayIndex] = newValue; break; case GAMEARRAY_UINT16: ((uint16_t *) aGameArrays[tw].pValues)[arrayIndex] = newValue; break;
case GAMEARRAY_UINT8: ((int8_t *) aGameArrays[tw].pValues)[arrayIndex] = newValue; break;
case GAMEARRAY_BITMAP: case GAMEARRAY_BITMAP:
if (newValue) if (newValue)
((uint8_t *)aGameArrays[tw].pValues)[arrayIndex >> 3] |= (1 << (arrayIndex & 7)); ((uint8_t *)aGameArrays[tw].pValues)[arrayIndex >> 3] |= (1 << (arrayIndex & 7));
@ -4660,10 +4661,7 @@ finish_qsprintf:
break; break;
} }
#endif #endif
case GAMEARRAY_INT32: default:
case GAMEARRAY_INT16:
case GAMEARRAY_UINT8:
case GAMEARRAY_BITMAP:
kread(kFile, aGameArrays[arrayNum].pValues, numBytes); kread(kFile, aGameArrays[arrayNum].pValues, numBytes);
break; break;
} }
@ -4719,10 +4717,7 @@ finish_qsprintf:
break; break;
} }
#endif #endif
case GAMEARRAY_INT32: default:
case GAMEARRAY_INT16:
case GAMEARRAY_UINT8:
case GAMEARRAY_BITMAP:
Bfwrite(aGameArrays[arrayNum].pValues, 1, numBytes, fil); Bfwrite(aGameArrays[arrayNum].pValues, 1, numBytes, fil);
break; break;
} }
@ -4817,14 +4812,18 @@ finish_qsprintf:
for (; numElements > 0; --numElements) for (; numElements > 0; --numElements)
aGameArrays[destArray].pValues[destArrayIndex += destInc] = Gv_GetArrayValue(srcArray, srcArrayIndex += srcInc); aGameArrays[destArray].pValues[destArrayIndex += destInc] = Gv_GetArrayValue(srcArray, srcArrayIndex += srcInc);
break; break;
case GAMEARRAY_INT32:
for (; numElements > 0; --numElements)
((int32_t *)aGameArrays[destArray].pValues)[destArrayIndex += destInc] = Gv_GetArrayValue(srcArray, srcArrayIndex += srcInc);
break;
case GAMEARRAY_INT16: case GAMEARRAY_INT16:
for (; numElements > 0; --numElements) for (; numElements > 0; --numElements)
((int16_t *) aGameArrays[destArray].pValues)[destArrayIndex += destInc] = Gv_GetArrayValue(srcArray, srcArrayIndex += srcInc); ((int16_t *) aGameArrays[destArray].pValues)[destArrayIndex += destInc] = Gv_GetArrayValue(srcArray, srcArrayIndex += srcInc);
break; break;
case GAMEARRAY_INT8:
for (; numElements > 0; --numElements)
((int8_t *) aGameArrays[destArray].pValues)[destArrayIndex += destInc] = Gv_GetArrayValue(srcArray, srcArrayIndex += srcInc);
break;
case GAMEARRAY_UINT16:
for (; numElements > 0; --numElements)
((uint16_t *) aGameArrays[destArray].pValues)[destArrayIndex += destInc] = Gv_GetArrayValue(srcArray, srcArrayIndex += srcInc);
break;
case GAMEARRAY_UINT8: case GAMEARRAY_UINT8:
for (; numElements > 0; --numElements) for (; numElements > 0; --numElements)
((uint8_t *) aGameArrays[destArray].pValues)[destArrayIndex += destInc] = Gv_GetArrayValue(srcArray, srcArrayIndex += srcInc); ((uint8_t *) aGameArrays[destArray].pValues)[destArrayIndex += destInc] = Gv_GetArrayValue(srcArray, srcArrayIndex += srcInc);

114
source/duke3d/src/gamevars.cpp
View file

@ -161,7 +161,7 @@ int Gv_ReadSave(int32_t kFile)
if (kdfread(&g_gameArrayCount,sizeof(g_gameArrayCount),1,kFile) != 1) goto corrupt; if (kdfread(&g_gameArrayCount,sizeof(g_gameArrayCount),1,kFile) != 1) goto corrupt;
for (bssize_t i=0; i<g_gameArrayCount; i++) for (bssize_t i=0; i<g_gameArrayCount; i++)
{ {
if (!(aGameArrays[i].flags & GAMEARRAY_ALLOCATED)) if (aGameArrays[i].flags & GAMEARRAY_READONLY)
continue; continue;
char *const olabel = aGameArrays[i].szLabel; char *const olabel = aGameArrays[i].szLabel;
@ -174,6 +174,7 @@ int Gv_ReadSave(int32_t kFile)
if (kdfread(aGameArrays[i].szLabel,sizeof(uint8_t) * MAXARRAYLABEL, 1, kFile) != 1) if (kdfread(aGameArrays[i].szLabel,sizeof(uint8_t) * MAXARRAYLABEL, 1, kFile) != 1)
goto corrupt; goto corrupt;
hash_add(&h_arrays, aGameArrays[i].szLabel, i, 1); hash_add(&h_arrays, aGameArrays[i].szLabel, i, 1);
intptr_t const asize = aGameArrays[i].size; intptr_t const asize = aGameArrays[i].size;
@ -281,7 +282,7 @@ void Gv_WriteSave(FILE *fil)
for (bssize_t i=0; i<g_gameArrayCount; i++) for (bssize_t i=0; i<g_gameArrayCount; i++)
{ {
if (!(aGameArrays[i].flags & GAMEARRAY_ALLOCATED)) if (aGameArrays[i].flags & GAMEARRAY_READONLY)
continue; continue;
// write for .size and .dwFlags (the rest are pointers): // write for .size and .dwFlags (the rest are pointers):
@ -368,28 +369,43 @@ void Gv_ResetVars(void) /* this is called during a new game and nowhere else */
for (bssize_t i=0; i<MAXGAMEVARS; i++) for (bssize_t i=0; i<MAXGAMEVARS; i++)
{ {
if (aGameVars[i].szLabel != NULL) if (aGameVars[i].szLabel != NULL)
Gv_NewVar(aGameVars[i].szLabel, Gv_NewVar(aGameVars[i].szLabel,
aGameVars[i].flags & GAMEVAR_NODEFAULT ? aGameVars[i].global : aGameVars[i].defaultValue, aGameVars[i].flags & GAMEVAR_NODEFAULT ? aGameVars[i].global : aGameVars[i].defaultValue,
aGameVars[i].flags); aGameVars[i].flags);
} }
for (bssize_t i=0; i<MAXGAMEARRAYS; i++) for (bssize_t i=0; i<MAXGAMEARRAYS; i++)
{ {
if (aGameArrays[i].szLabel != NULL && (aGameArrays[i].flags & GAMEARRAY_RESET)) if (aGameArrays[i].szLabel != NULL)
if (aGameArrays[i].flags & GAMEARRAY_RESET)
Gv_NewArray(aGameArrays[i].szLabel,aGameArrays[i].pValues,aGameArrays[i].size,aGameArrays[i].flags); Gv_NewArray(aGameArrays[i].szLabel,aGameArrays[i].pValues,aGameArrays[i].size,aGameArrays[i].flags);
} }
} }
int32_t Gv_NewArray(const char *pszLabel, void *pArray, intptr_t arraySize, uint32_t nFlags) int __fastcall Gv_GetArrayElementSize(int const arrayIdx)
{ {
Bassert(arraySize); int typeSize = 0;
switch (aGameArrays[arrayIdx].flags & GAMEARRAY_TYPE_MASK)
{
case 0: typeSize = sizeof(uintptr_t); break;
case GAMEARRAY_INT8: typeSize = sizeof(uint8_t); break;
case GAMEARRAY_INT16: typeSize = sizeof(uint16_t); break;
}
return typeSize;
}
void Gv_NewArray(const char *pszLabel, void *arrayptr, intptr_t asize, uint32_t dwFlags)
{
Bassert(asize);
if (EDUKE32_PREDICT_FALSE(g_gameArrayCount >= MAXGAMEARRAYS)) if (EDUKE32_PREDICT_FALSE(g_gameArrayCount >= MAXGAMEARRAYS))
{ {
g_errorCnt++; g_errorCnt++;
C_ReportError(-1); C_ReportError(-1);
initprintf("%s:%d: error: too many arrays!\n",g_scriptFileName,g_lineNumber); initprintf("%s:%d: error: too many arrays!\n",g_scriptFileName,g_lineNumber);
return 0; return;
} }
if (EDUKE32_PREDICT_FALSE(Bstrlen(pszLabel) > (MAXARRAYLABEL-1))) if (EDUKE32_PREDICT_FALSE(Bstrlen(pszLabel) > (MAXARRAYLABEL-1)))
@ -397,7 +413,7 @@ int32_t Gv_NewArray(const char *pszLabel, void *pArray, intptr_t arraySize, uint
g_errorCnt++; g_errorCnt++;
C_ReportError(-1); C_ReportError(-1);
initprintf("%s:%d: error: array name `%s' exceeds limit of %d characters.\n",g_scriptFileName,g_lineNumber,pszLabel, MAXARRAYLABEL); initprintf("%s:%d: error: array name `%s' exceeds limit of %d characters.\n",g_scriptFileName,g_lineNumber,pszLabel, MAXARRAYLABEL);
return 0; return;
} }
int32_t i = hash_find(&h_arrays,pszLabel); int32_t i = hash_find(&h_arrays,pszLabel);
@ -416,7 +432,7 @@ int32_t Gv_NewArray(const char *pszLabel, void *pArray, intptr_t arraySize, uint
else else
C_ReportError(WARNING_DUPLICATEDEFINITION); C_ReportError(WARNING_DUPLICATEDEFINITION);
return 0; return;
} }
i = g_gameArrayCount; i = g_gameArrayCount;
@ -427,39 +443,29 @@ int32_t Gv_NewArray(const char *pszLabel, void *pArray, intptr_t arraySize, uint
if (aGameArrays[i].szLabel != pszLabel) if (aGameArrays[i].szLabel != pszLabel)
Bstrcpy(aGameArrays[i].szLabel,pszLabel); Bstrcpy(aGameArrays[i].szLabel,pszLabel);
if (pArray) if (arrayptr)
aGameArrays[i].pValues = (intptr_t *)pArray; aGameArrays[i].pValues = (intptr_t *)arrayptr;
else else
{ {
if (aGameArrays[i].flags & GAMEARRAY_ALLOCATED) if (aGameArrays[i].flags & GAMEARRAY_ALLOCATED)
Baligned_free(aGameArrays[i].pValues); Baligned_free(aGameArrays[i].pValues);
int typeSize = 0; int const typeSize = Gv_GetArrayElementSize(i);
int const allocSize = typeSize ? asize * typeSize : (asize + 7) >> 3;
switch (aGameArrays[i].flags & GAMEARRAY_TYPE_MASK)
{
case 0: typeSize = sizeof(uintptr_t); break;
case GAMEARRAY_UINT8: typeSize = sizeof(uint8_t); break;
case GAMEARRAY_INT16: typeSize = sizeof(uint16_t); break;
case GAMEARRAY_INT32: typeSize = sizeof(uint32_t); break;
}
int const allocSize = typeSize ? arraySize * typeSize : (arraySize + 7) >> 3;
aGameArrays[i].flags |= GAMEARRAY_ALLOCATED;
aGameArrays[i].pValues = (intptr_t *) Xaligned_alloc(ACTOR_VAR_ALIGNMENT, allocSize); aGameArrays[i].pValues = (intptr_t *) Xaligned_alloc(ACTOR_VAR_ALIGNMENT, allocSize);
Bmemset(aGameArrays[i].pValues, 0, allocSize); Bmemset(aGameArrays[i].pValues, 0, allocSize);
} }
aGameArrays[i].size = arraySize; aGameArrays[i].size = asize;
aGameArrays[i].flags = nFlags & ~GAMEARRAY_RESET; aGameArrays[i].flags = dwFlags & ~GAMEARRAY_RESET;
g_gameArrayCount++; g_gameArrayCount++;
hash_add(&h_arrays, aGameArrays[i].szLabel, i, 1); hash_add(&h_arrays, aGameArrays[i].szLabel, i, 1);
return 1;
} }
int32_t Gv_NewVar(const char *pszLabel, intptr_t lValue, uint32_t dwFlags) void Gv_NewVar(const char *pszLabel, intptr_t lValue, uint32_t dwFlags)
{ {
//Bsprintf(g_szBuf,"Gv_NewVar(%s, %d, %X)",pszLabel, lValue, dwFlags); //Bsprintf(g_szBuf,"Gv_NewVar(%s, %d, %X)",pszLabel, lValue, dwFlags);
//AddLog(g_szBuf); //AddLog(g_szBuf);
@ -469,7 +475,7 @@ int32_t Gv_NewVar(const char *pszLabel, intptr_t lValue, uint32_t dwFlags)
g_errorCnt++; g_errorCnt++;
C_ReportError(-1); C_ReportError(-1);
initprintf("%s:%d: error: too many gamevars!\n",g_scriptFileName,g_lineNumber); initprintf("%s:%d: error: too many gamevars!\n",g_scriptFileName,g_lineNumber);
return 0; return;
} }
if (EDUKE32_PREDICT_FALSE(Bstrlen(pszLabel) > (MAXVARLABEL-1))) if (EDUKE32_PREDICT_FALSE(Bstrlen(pszLabel) > (MAXVARLABEL-1)))
@ -477,7 +483,7 @@ int32_t Gv_NewVar(const char *pszLabel, intptr_t lValue, uint32_t dwFlags)
g_errorCnt++; g_errorCnt++;
C_ReportError(-1); C_ReportError(-1);
initprintf("%s:%d: error: variable name `%s' exceeds limit of %d characters.\n",g_scriptFileName,g_lineNumber,pszLabel, MAXVARLABEL); initprintf("%s:%d: error: variable name `%s' exceeds limit of %d characters.\n",g_scriptFileName,g_lineNumber,pszLabel, MAXVARLABEL);
return 0; return;
} }
int gV = hash_find(&h_gamevars,pszLabel); int gV = hash_find(&h_gamevars,pszLabel);
@ -489,14 +495,14 @@ int32_t Gv_NewVar(const char *pszLabel, intptr_t lValue, uint32_t dwFlags)
{ {
C_ReportError(-1); C_ReportError(-1);
initprintf("%s:%d: warning: cannot redefine internal gamevar `%s'.\n",g_scriptFileName,g_lineNumber,label+(g_labelCnt<<6)); initprintf("%s:%d: warning: cannot redefine internal gamevar `%s'.\n",g_scriptFileName,g_lineNumber,label+(g_labelCnt<<6));
return 0; return;
} }
else if (EDUKE32_PREDICT_FALSE(!(aGameVars[gV].flags & GAMEVAR_SYSTEM))) else if (EDUKE32_PREDICT_FALSE(!(aGameVars[gV].flags & GAMEVAR_SYSTEM)))
{ {
// it's a duplicate in error // it's a duplicate in error
g_warningCnt++; g_warningCnt++;
C_ReportError(WARNING_DUPLICATEDEFINITION); C_ReportError(WARNING_DUPLICATEDEFINITION);
return 0; return;
} }
} }
@ -553,8 +559,6 @@ int32_t Gv_NewVar(const char *pszLabel, intptr_t lValue, uint32_t dwFlags)
aGameVars[gV].pValues[j]=lValue; aGameVars[gV].pValues[j]=lValue;
} }
else aGameVars[gV].global = lValue; else aGameVars[gV].global = lValue;
return 1;
} }
static int Gv_GetVarIndex(const char *szGameLabel) static int Gv_GetVarIndex(const char *szGameLabel)
@ -570,21 +574,6 @@ static int Gv_GetVarIndex(const char *szGameLabel)
return gameVar; return gameVar;
} }
int __fastcall Gv_GetArrayElementSize(int const arrayIdx)
{
int typeSize = 0;
switch (aGameArrays[arrayIdx].flags & GAMEARRAY_TYPE_MASK)
{
case 0: typeSize = sizeof(uintptr_t); break;
case GAMEARRAY_UINT8: typeSize = sizeof(uint8_t); break;
case GAMEARRAY_INT16: typeSize = sizeof(uint16_t); break;
case GAMEARRAY_INT32: typeSize = sizeof(uint32_t); break;
}
return typeSize;
}
int __fastcall Gv_GetArrayAllocSize(int const arrayIdx) int __fastcall Gv_GetArrayAllocSize(int const arrayIdx)
{ {
if (aGameArrays[arrayIdx].flags & GAMEARRAY_BITMAP) if (aGameArrays[arrayIdx].flags & GAMEARRAY_BITMAP)
@ -603,9 +592,12 @@ int __fastcall Gv_GetArrayValue(int const id, int index)
switch (aGameArrays[id].flags & GAMEARRAY_TYPE_MASK) switch (aGameArrays[id].flags & GAMEARRAY_TYPE_MASK)
{ {
case 0: returnValue = (aGameArrays[id].pValues)[index]; break; case 0: returnValue = (aGameArrays[id].pValues)[index]; break;
case GAMEARRAY_INT32: returnValue = ((int32_t *)aGameArrays[id].pValues)[index]; break;
case GAMEARRAY_INT16: returnValue = ((int16_t *)aGameArrays[id].pValues)[index]; break; case GAMEARRAY_INT16: returnValue = ((int16_t *)aGameArrays[id].pValues)[index]; break;
case GAMEARRAY_INT8: returnValue = ((int8_t *)aGameArrays[id].pValues)[index]; break;
case GAMEARRAY_UINT16:returnValue = ((uint16_t *)aGameArrays[id].pValues)[index]; break;
case GAMEARRAY_UINT8: returnValue = ((uint8_t *)aGameArrays[id].pValues)[index]; break; case GAMEARRAY_UINT8: returnValue = ((uint8_t *)aGameArrays[id].pValues)[index]; break;
case GAMEARRAY_BITMAP:returnValue = !!(((uint8_t *)aGameArrays[id].pValues)[index >> 3] & pow2char[index & 7]); break; case GAMEARRAY_BITMAP:returnValue = !!(((uint8_t *)aGameArrays[id].pValues)[index >> 3] & pow2char[index & 7]); break;
} }
@ -614,12 +606,10 @@ int __fastcall Gv_GetArrayValue(int const id, int index)
#define CHECK_INDEX(range) \ #define CHECK_INDEX(range) \
if (EDUKE32_PREDICT_FALSE((unsigned)arrayIndex >= range)) \ if (EDUKE32_PREDICT_FALSE((unsigned)arrayIndex >= range)) \
\ { \
{ \
spriteNum = arrayIndex; \ spriteNum = arrayIndex; \
goto badindex; \ goto badindex; \
\ }
}
int __fastcall Gv_GetVar(int gameVar, int spriteNum, int playerNum) int __fastcall Gv_GetVar(int gameVar, int spriteNum, int playerNum)
{ {
@ -656,9 +646,9 @@ int __fastcall Gv_GetVar(int gameVar, int spriteNum, int playerNum)
} }
else switch (varFlags) else switch (varFlags)
{ {
case GAMEVAR_INT32PTR: returnValue = *(int32_t *)aGameVars[gameVar].global; break; case GAMEVAR_INT32PTR: returnValue = *(int32_t *)aGameVars[gameVar].global; break;
case GAMEVAR_INT16PTR: returnValue = *(int16_t *)aGameVars[gameVar].global; break; case GAMEVAR_INT16PTR: returnValue = *(int16_t *)aGameVars[gameVar].global; break;
case GAMEVAR_UINT8PTR: returnValue = *(char *)aGameVars[gameVar].global; break; case GAMEVAR_UINT8PTR: returnValue = *(char *)aGameVars[gameVar].global; break;
default: EDUKE32_UNREACHABLE_SECTION(returnValue = 0; break); default: EDUKE32_UNREACHABLE_SECTION(returnValue = 0; break);
} }
@ -848,16 +838,13 @@ static const char *gvxerrs[] = {
"invalid pal ID", "invalid pal ID",
}; };
#define CHECK_INDEX(range, error) \ #define CHECK_INDEX(range, error) \
if (EDUKE32_PREDICT_FALSE((unsigned)arrayIndex >= range)) \ if (EDUKE32_PREDICT_FALSE((unsigned)arrayIndex >= range)) \
\ { \
{ \
gameVar = arrayIndex; \ gameVar = arrayIndex; \
returnValue = error; \ returnValue = error; \
goto badindex; \ goto badindex; \
\ }
}
int __fastcall Gv_GetSpecialVarX(int gameVar) int __fastcall Gv_GetSpecialVarX(int gameVar)
{ {
@ -1570,7 +1557,6 @@ static void Gv_AddSystemVars(void)
// SYSTEM_GAMEARRAY // SYSTEM_GAMEARRAY
Gv_NewArray("tilesizx", (void *)&tilesiz[0].x, MAXTILES, GAMEARRAY_SYSTEM|GAMEARRAY_STRIDE2|GAMEARRAY_READONLY|GAMEARRAY_INT16); Gv_NewArray("tilesizx", (void *)&tilesiz[0].x, MAXTILES, GAMEARRAY_SYSTEM|GAMEARRAY_STRIDE2|GAMEARRAY_READONLY|GAMEARRAY_INT16);
Gv_NewArray("tilesizy", (void *)&tilesiz[0].y, MAXTILES, GAMEARRAY_SYSTEM|GAMEARRAY_STRIDE2|GAMEARRAY_READONLY|GAMEARRAY_INT16); Gv_NewArray("tilesizy", (void *)&tilesiz[0].y, MAXTILES, GAMEARRAY_SYSTEM|GAMEARRAY_STRIDE2|GAMEARRAY_READONLY|GAMEARRAY_INT16);
Gv_NewArray("walock", (void *) &walock[0], MAXTILES, GAMEARRAY_SYSTEM|GAMEARRAY_UINT8);
Gv_NewArray("gotpic", (void *) &gotpic[0], MAXTILES, GAMEARRAY_SYSTEM|GAMEARRAY_BITMAP); Gv_NewArray("gotpic", (void *) &gotpic[0], MAXTILES, GAMEARRAY_SYSTEM|GAMEARRAY_BITMAP);
#endif #endif
} }

17
source/duke3d/src/gamevars.h
View file

@ -63,17 +63,18 @@ enum GamearrayFlags_t
GAMEARRAY_RESTORE = 0x00000010, GAMEARRAY_RESTORE = 0x00000010,
GAMEARRAY_VARSIZE = 0x00000020, GAMEARRAY_VARSIZE = 0x00000020,
GAMEARRAY_STRIDE2 = 0x00000100, GAMEARRAY_STRIDE2 = 0x00000100,
GAMEARRAY_ALLOCATED = 0x00000200, // memory allocated for user array GAMEARRAY_ALLOCATED = 0x00000200, // memory allocated for user array
GAMEARRAY_SYSTEM = 0x00000800, GAMEARRAY_SYSTEM = 0x00000800,
GAMEARRAY_READONLY = 0x00001000, GAMEARRAY_READONLY = 0x00001000,
GAMEARRAY_INT32 = 0x00002000, GAMEARRAY_INT16 = 0x00004000,
GAMEARRAY_NORMAL = 0x00004000, GAMEARRAY_INT8 = 0x00008000,
GAMEARRAY_INT16 = 0x00008000, GAMEARRAY_UNSIGNED = 0x00010000,
GAMEARRAY_UINT8 = 0x00010000, GAMEARRAY_UINT16 = GAMEARRAY_INT16 | GAMEARRAY_UNSIGNED,
GAMEARRAY_UINT8 = GAMEARRAY_INT8 | GAMEARRAY_UNSIGNED,
GAMEARRAY_BITMAP = 0x00100000, GAMEARRAY_BITMAP = 0x00100000,
GAMEARRAY_WARN = 0x00200000, GAMEARRAY_WARN = 0x00200000,
GAMEARRAY_TYPE_MASK = GAMEARRAY_UINT8 | GAMEARRAY_INT16 | GAMEARRAY_INT32 | GAMEARRAY_BITMAP, GAMEARRAY_TYPE_MASK = GAMEARRAY_UNSIGNED | GAMEARRAY_INT8 | GAMEARRAY_INT16 | GAMEARRAY_BITMAP,
}; };
#pragma pack(push,1) #pragma pack(push,1)
@ -120,8 +121,8 @@ static FORCE_INLINE void Gv_FillWithVars(T & rv)
} }
int Gv_GetVarByLabel(const char *szGameLabel,int const lDefault,int const spriteNum,int const playerNum); int Gv_GetVarByLabel(const char *szGameLabel,int const lDefault,int const spriteNum,int const playerNum);
int32_t Gv_NewArray(const char *pszLabel,void *arrayptr,intptr_t asize,uint32_t dwFlags); void Gv_NewArray(const char *pszLabel,void *arrayptr,intptr_t asize,uint32_t dwFlags);
int32_t Gv_NewVar(const char *pszLabel,intptr_t lValue,uint32_t dwFlags); void Gv_NewVar(const char *pszLabel,intptr_t lValue,uint32_t dwFlags);
static FORCE_INLINE void A_ResetVars(int const spriteNum) static FORCE_INLINE void A_ResetVars(int const spriteNum)
{ {

24
source/duke3d/src/m32vars.cpp
View file

@ -73,7 +73,7 @@ static void Gv_Clear(void)
#define ASSERT_IMPLIES(x, y) Bassert(!(x) || (y)) #define ASSERT_IMPLIES(x, y) Bassert(!(x) || (y))
int32_t Gv_NewArray(const char *pszLabel, void *arrayptr, int32_t asize, uint32_t dwFlags) void Gv_NewArray(const char *pszLabel, void *arrayptr, intptr_t asize, uint32_t dwFlags)
{ {
ASSERT_IMPLIES(dwFlags&GAMEARRAY_VARSIZE, dwFlags&GAMEARRAY_READONLY); ASSERT_IMPLIES(dwFlags&GAMEARRAY_VARSIZE, dwFlags&GAMEARRAY_READONLY);
ASSERT_IMPLIES(dwFlags&GAMEARRAY_STRIDE2, dwFlags&GAMEARRAY_READONLY); ASSERT_IMPLIES(dwFlags&GAMEARRAY_STRIDE2, dwFlags&GAMEARRAY_READONLY);
@ -83,13 +83,13 @@ int32_t Gv_NewArray(const char *pszLabel, void *arrayptr, int32_t asize, uint32_
if (g_gameArrayCount >= MAXGAMEARRAYS) if (g_gameArrayCount >= MAXGAMEARRAYS)
{ {
C_CUSTOMERROR("too many arrays! (max: %d)", MAXGAMEARRAYS); C_CUSTOMERROR("too many arrays! (max: %d)", MAXGAMEARRAYS);
return 0; return;
} }
if (Bstrlen(pszLabel) > (MAXARRAYLABEL-1)) if (Bstrlen(pszLabel) > (MAXARRAYLABEL-1))
{ {
C_CUSTOMERROR("array name `%s' exceeds limit of %d characters.", pszLabel, MAXARRAYLABEL); C_CUSTOMERROR("array name `%s' exceeds limit of %d characters.", pszLabel, MAXARRAYLABEL);
return 0; return;
} }
const int32_t i = hash_find(&h_arrays, pszLabel); const int32_t i = hash_find(&h_arrays, pszLabel);
@ -102,7 +102,7 @@ int32_t Gv_NewArray(const char *pszLabel, void *arrayptr, int32_t asize, uint32_
C_CUSTOMWARNING("ignored redefining system array `%s'.", pszLabel); C_CUSTOMWARNING("ignored redefining system array `%s'.", pszLabel);
// C_ReportError(WARNING_DUPLICATEDEFINITION); // C_ReportError(WARNING_DUPLICATEDEFINITION);
return 0; return;
} }
if (!(dwFlags&GAMEARRAY_VARSIZE) && !(dwFlags&GAMEARRAY_TYPE_MASK) && (asize<=0 || asize>65536)) if (!(dwFlags&GAMEARRAY_VARSIZE) && !(dwFlags&GAMEARRAY_TYPE_MASK) && (asize<=0 || asize>65536))
@ -110,7 +110,7 @@ int32_t Gv_NewArray(const char *pszLabel, void *arrayptr, int32_t asize, uint32_
// the dummy array with index 0 sets the size to 0 so that accidental accesses as array // the dummy array with index 0 sets the size to 0 so that accidental accesses as array
// will complain. // will complain.
C_CUSTOMERROR("invalid array size %d. Must be between 1 and 65536", asize); C_CUSTOMERROR("invalid array size %d. Must be between 1 and 65536", asize);
return 0; return;
} }
gamearray_t *const gar = &aGameArrays[g_gameArrayCount]; gamearray_t *const gar = &aGameArrays[g_gameArrayCount];
@ -130,11 +130,9 @@ int32_t Gv_NewArray(const char *pszLabel, void *arrayptr, int32_t asize, uint32_
hash_add(&h_arrays, gar->szLabel, g_gameArrayCount, 1); hash_add(&h_arrays, gar->szLabel, g_gameArrayCount, 1);
g_gameArrayCount++; g_gameArrayCount++;
return 1;
} }
int32_t Gv_NewVar(const char *pszLabel, intptr_t lValue, uint32_t dwFlags) void Gv_NewVar(const char *pszLabel, intptr_t lValue, uint32_t dwFlags)
{ {
int32_t i, j; int32_t i, j;
@ -144,13 +142,13 @@ int32_t Gv_NewVar(const char *pszLabel, intptr_t lValue, uint32_t dwFlags)
if (g_gameVarCount >= MAXGAMEVARS) if (g_gameVarCount >= MAXGAMEVARS)
{ {
C_CUSTOMERROR("too many gamevars! (max: %d)", MAXGAMEVARS); C_CUSTOMERROR("too many gamevars! (max: %d)", MAXGAMEVARS);
return 0; return;
} }
if (Bstrlen(pszLabel) > (MAXVARLABEL-1)) if (Bstrlen(pszLabel) > (MAXVARLABEL-1))
{ {
C_CUSTOMERROR("variable name `%s' exceeds limit of %d characters.", pszLabel, MAXVARLABEL); C_CUSTOMERROR("variable name `%s' exceeds limit of %d characters.", pszLabel, MAXVARLABEL);
return 0; return;
} }
i = hash_find(&h_gamevars,pszLabel); i = hash_find(&h_gamevars,pszLabel);
@ -162,14 +160,14 @@ int32_t Gv_NewVar(const char *pszLabel, intptr_t lValue, uint32_t dwFlags)
{ {
C_ReportError(-1); C_ReportError(-1);
initprintf("%s:%d: warning: cannot redefine internal gamevar `%s'.\n",g_szScriptFileName,g_lineNumber,label+(g_numLabels<<6)); initprintf("%s:%d: warning: cannot redefine internal gamevar `%s'.\n",g_szScriptFileName,g_lineNumber,label+(g_numLabels<<6));
return 0; return;
} }
else if (!(aGameVars[i].dwFlags & GAMEVAR_SYSTEM)) else if (!(aGameVars[i].dwFlags & GAMEVAR_SYSTEM))
{ {
// it's a duplicate in error // it's a duplicate in error
// g_numCompilerWarnings++; // g_numCompilerWarnings++;
// C_ReportError(WARNING_DUPLICATEDEFINITION); // C_ReportError(WARNING_DUPLICATEDEFINITION);
return 0; return;
} }
} }
@ -210,8 +208,6 @@ int32_t Gv_NewVar(const char *pszLabel, intptr_t lValue, uint32_t dwFlags)
aGameVars[i].val.plValues[j] = lValue; aGameVars[i].val.plValues[j] = lValue;
} }
else aGameVars[i].val.lValue = lValue; else aGameVars[i].val.lValue = lValue;
return 1;
} }
int32_t __fastcall Gv_GetVarN(int32_t id) // 'N' for "no side-effects"... vars and locals only! int32_t __fastcall Gv_GetVarN(int32_t id) // 'N' for "no side-effects"... vars and locals only!