1dot13/source
1
0
Fork 0
mirror of https://github.com/1dot13/source.git synced 2026-07-22 13:40:22 +02:00
Code Issues Packages Projects Releases Wiki Activity
Files
master
source/Strategic/XML_Creatures.cpp
T
Marco Antonio J. Costaandmajcosta 86ad401186 add newline at end of file where it's lacking 
.editorconfig already enforces it but it's getting changed piecemeal in
every commit. just get it done with.

the script:
```

find . -type f -not -path "./.git/*" -not -path "./.vs/*" | while read -r file; do
	isFile=$(file -0 "$file" | cut -d $'\0' -f2)
	case "$isFile" in
		(*text*)
			echo "$file is text"
			if [[ $(tail -c 1 "$file" | wc -l) -ne 1 ]]; then
				echo "" >> "$file"
			fi
			;;
		(*)
			echo "file isn't text"
			;;
	esac
done
```
2024-12-14 19:05:48 -03:00

652 lines
25 KiB
C++
Raw Permalink Blame History

#include "expat.h"
#include "string.h"
#include "Campaign Types.h"
#include "FileMan.h"
#include "MemMan.h"
#include "Debug Control.h"
#include "Creature Spreading.h"
// Buggler: creature XML externalization stuff
#define MAX_CHAR_DATA_LENGTH 500
#define INVALID_CREATURESITE_INDEX -1
#define INVALID_COMPOSITION_INDEX -1
// This array stores all XML-read creature placement data, valid giLairID starts at 1
CREATUREPLACEMENT gCreaturePlacements[ MAX_NUMBER_OF_INFECTIBLE_SITES + 1];
CREATURECOMPOSITION gCreatureComposition[ MAX_NUMBER_OF_CREATURE_COMPOSITIONS ];
// actual infectible sites defined in XML
UINT8 NUMBER_OF_INFECTIBLE_SITES;
UINT8 NUMBER_OF_CREATURE_COMPOSITIONS;
typedef enum
{
CREATURE_ELEMENT_NONE = 0,
CREATURE_ELEMENT_CREATUREINFO,
CREATURE_ELEMENT_COMPOSITIONLIST,
CREATURE_ELEMENT_COMPOSITION,
CREATURE_ELEMENT_COMPINDEX,
CREATURE_ELEMENT_LARVAEPERCENT,
CREATURE_ELEMENT_INFANTPERCENT,
CREATURE_ELEMENT_YMALEPERCENT,
CREATURE_ELEMENT_YFEMALEPERCENT,
CREATURE_ELEMENT_AMALEPERCENT,
CREATURE_ELEMENT_AFEMALEPERCENT,
CREATURE_ELEMENT_MAXPOPULATION,
CREATURE_ELEMENT_PLACEMENTLIST,
CREATURE_ELEMENT_PLACEMENT,
CREATURE_ELEMENT_INDEX,
CREATURE_ELEMENT_ATTACKSOURCE,
CREATURE_ELEMENT_ATTACKSOURCE_SECTOR,
CREATURE_ELEMENT_ATTACKSOURCE_GRIDNO,
CREATURE_ELEMENT_ALTERNATEMAP,
CREATURE_ELEMENT_ALTERNATEMAP_SECTOR,
CREATURE_ELEMENT_ALTERNATEMAP_Z,
CREATURE_ELEMENT_WARPTO,
CREATURE_ELEMENT_WARPTO_SECTOR,
CREATURE_ELEMENT_WARPTO_Z,
CREATURE_ELEMENT_WARPTO_GRIDNO,
CREATURE_ELEMENT_CREATURESECTOR,
CREATURE_ELEMENT_QUEEN,
CREATURE_ELEMENT_QUEEN_SECTOR,
CREATURE_ELEMENT_QUEEN_Z,
CREATURE_ELEMENT_HABITAT,
CREATURE_ELEMENT_HABITAT_SECTOR,
CREATURE_ELEMENT_HABITAT_Z,
CREATURE_ELEMENT_HABITAT_COMPOSITION,
CREATURE_ELEMENT_HABITAT_VALID,
} CREATURE_PARSE_STAGE;
typedef struct
{
CREATURE_PARSE_STAGE curElement;
CHAR8 szCharData[MAX_CHAR_DATA_LENGTH+1];
CREATUREPLACEMENT curPlacementInfo;
CREATURECOMPOSITION curCompositionInfo;
UINT32 curIndex;
UINT32 uiHighestIndex;
UINT32 uiCompHighestIndex;
UINT32 curHabitat;
UINT32 currentDepth;
UINT32 maxReadDepth;
} CreatureParseData;
static void XMLCALL
creatureplacementStartElementHandle(void *userData, const XML_Char *name, const XML_Char **atts)
{
CreatureParseData * pData = (CreatureParseData *) userData;
if(pData->currentDepth <= pData->maxReadDepth) //are we reading this element?
{
if(strcmp(name, "CREATURE_INFO") == 0 && pData->curElement == CREATURE_ELEMENT_NONE)
{
pData->curElement = CREATURE_ELEMENT_CREATUREINFO;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "COMPOSITION_LIST") == 0 && pData->curElement == CREATURE_ELEMENT_CREATUREINFO)
{
pData->curElement = CREATURE_ELEMENT_COMPOSITIONLIST;
pData->maxReadDepth++; //we are not skipping this element
// Initiate Array by setting all values to 0
for (UINT16 x = 0; x < MAX_NUMBER_OF_CREATURE_COMPOSITIONS; x++)
{
gCreatureComposition[x].ubLarvaePercent = 0;
gCreatureComposition[x].ubInfantPercent = 0;
gCreatureComposition[x].ubYoungMalePercent = 0;
gCreatureComposition[x].ubYoungFemalePercent = 0;
gCreatureComposition[x].ubAdultMalePercent = 0;
gCreatureComposition[x].ubAdultFemalePercent = 0;
gCreatureComposition[x].iMaxPopulation = 0;
}
}
else if(strcmp(name, "COMPOSITION") == 0 && pData->curElement == CREATURE_ELEMENT_COMPOSITIONLIST)
{
pData->curElement = CREATURE_ELEMENT_COMPOSITION;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "CompIndex") == 0 && pData->curElement == CREATURE_ELEMENT_COMPOSITION)
{
pData->curElement = CREATURE_ELEMENT_COMPINDEX;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "LarvaePercent") == 0 && pData->curElement == CREATURE_ELEMENT_COMPOSITION)
{
pData->curElement = CREATURE_ELEMENT_LARVAEPERCENT;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "InfantPercent") == 0 && pData->curElement == CREATURE_ELEMENT_COMPOSITION)
{
pData->curElement = CREATURE_ELEMENT_INFANTPERCENT;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "YoungMalePercent") == 0 && pData->curElement == CREATURE_ELEMENT_COMPOSITION)
{
pData->curElement = CREATURE_ELEMENT_YMALEPERCENT;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "YoungFemalePercent") == 0 && pData->curElement == CREATURE_ELEMENT_COMPOSITION)
{
pData->curElement = CREATURE_ELEMENT_YFEMALEPERCENT;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "AdultMalePercent") == 0 && pData->curElement == CREATURE_ELEMENT_COMPOSITION)
{
pData->curElement = CREATURE_ELEMENT_AMALEPERCENT;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "AdultFemalePercent") == 0 && pData->curElement == CREATURE_ELEMENT_COMPOSITION)
{
pData->curElement = CREATURE_ELEMENT_AFEMALEPERCENT;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "MaxPopulation") == 0 && pData->curElement == CREATURE_ELEMENT_COMPOSITION)
{
pData->curElement = CREATURE_ELEMENT_MAXPOPULATION;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "PLACEMENT_LIST") == 0 && pData->curElement == CREATURE_ELEMENT_CREATUREINFO)
{
pData->curElement = CREATURE_ELEMENT_PLACEMENTLIST;
pData->maxReadDepth++; //we are not skipping this element
// Initiate Array by setting all values to 0
for (UINT16 x = 0; x < MAX_NUMBER_OF_INFECTIBLE_SITES + 1; x++)
{
gCreaturePlacements[x].sAltMapX = 0;
gCreaturePlacements[x].sAltMapY = 0;
gCreaturePlacements[x].ubAltMapZ = 0;
gCreaturePlacements[x].sQueenX = 0;
gCreaturePlacements[x].sQueenY = 0;
gCreaturePlacements[x].ubQueenZ = 0;
gCreaturePlacements[x].sAttackSourceX = 0;
gCreaturePlacements[x].sAttackSourceY = 0;
gCreaturePlacements[x].iAttackSourceGridNo = 0;
gCreaturePlacements[x].sWarpToX = 0;
gCreaturePlacements[x].sWarpToY = 0;
gCreaturePlacements[x].ubWarpToZ = 0;
gCreaturePlacements[x].iWarpToGridNo = 0;
for (UINT16 y = 0; y < MAX_NUMBER_OF_CREATURE_SECTORS; y++)
{
gCreaturePlacements[x].Habitat[y].sX = 0;
gCreaturePlacements[x].Habitat[y].sY = 0;
gCreaturePlacements[x].Habitat[y].ubZ = 0;
gCreaturePlacements[x].Habitat[y].ubComposition = 0;
gCreaturePlacements[x].Habitat[y].fValid = 0;
}
}
}
else if(strcmp(name, "PLACEMENT") == 0 && pData->curElement == CREATURE_ELEMENT_PLACEMENTLIST)
{
pData->curElement = CREATURE_ELEMENT_PLACEMENT;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "Index") == 0 && pData->curElement == CREATURE_ELEMENT_PLACEMENT)
{
pData->curElement = CREATURE_ELEMENT_INDEX;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "ATTACKSOURCE") == 0 && pData->curElement == CREATURE_ELEMENT_PLACEMENT)
{
pData->curElement = CREATURE_ELEMENT_ATTACKSOURCE;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "SectorGrid") == 0 && pData->curElement == CREATURE_ELEMENT_ATTACKSOURCE)
{
pData->curElement = CREATURE_ELEMENT_ATTACKSOURCE_SECTOR;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "GridNo") == 0 && pData->curElement == CREATURE_ELEMENT_ATTACKSOURCE)
{
pData->curElement = CREATURE_ELEMENT_ATTACKSOURCE_GRIDNO;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "ALTERNATEMAP") == 0 && pData->curElement == CREATURE_ELEMENT_PLACEMENT)
{
pData->curElement = CREATURE_ELEMENT_ALTERNATEMAP;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "SectorGrid") == 0 && pData->curElement == CREATURE_ELEMENT_ALTERNATEMAP)
{
pData->curElement = CREATURE_ELEMENT_ALTERNATEMAP_SECTOR;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "SectorZ") == 0 && pData->curElement == CREATURE_ELEMENT_ALTERNATEMAP)
{
pData->curElement = CREATURE_ELEMENT_ALTERNATEMAP_Z;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "WARPTOSECTOR") == 0 && pData->curElement == CREATURE_ELEMENT_PLACEMENT)
{
pData->curElement = CREATURE_ELEMENT_WARPTO;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "SectorGrid") == 0 && pData->curElement == CREATURE_ELEMENT_WARPTO)
{
pData->curElement = CREATURE_ELEMENT_WARPTO_SECTOR;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "SectorZ") == 0 && pData->curElement == CREATURE_ELEMENT_WARPTO)
{
pData->curElement = CREATURE_ELEMENT_WARPTO_Z;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "GridNo") == 0 && pData->curElement == CREATURE_ELEMENT_WARPTO)
{
pData->curElement = CREATURE_ELEMENT_WARPTO_GRIDNO;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "CREATURESECTOR") == 0 && pData->curElement == CREATURE_ELEMENT_PLACEMENT)
{
pData->curElement = CREATURE_ELEMENT_CREATURESECTOR;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "QUEENSECTOR") == 0 && pData->curElement == CREATURE_ELEMENT_CREATURESECTOR)
{
pData->curElement = CREATURE_ELEMENT_QUEEN;
pData->curHabitat = 0;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "SectorGrid") == 0 && pData->curElement == CREATURE_ELEMENT_QUEEN)
{
pData->curElement = CREATURE_ELEMENT_QUEEN_SECTOR;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "SectorZ") == 0 && pData->curElement == CREATURE_ELEMENT_QUEEN)
{
pData->curElement = CREATURE_ELEMENT_QUEEN_Z;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "HABITATSECTOR") == 0 && pData->curElement == CREATURE_ELEMENT_CREATURESECTOR)
{
pData->curElement = CREATURE_ELEMENT_HABITAT;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "SectorGrid") == 0 && pData->curElement == CREATURE_ELEMENT_HABITAT)
{
pData->curElement = CREATURE_ELEMENT_HABITAT_SECTOR;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "SectorZ") == 0 && pData->curElement == CREATURE_ELEMENT_HABITAT)
{
pData->curElement = CREATURE_ELEMENT_HABITAT_Z;
pData->maxReadDepth++; //we are not skipping this element
}
else if(strcmp(name, "Composition") == 0 && pData->curElement == CREATURE_ELEMENT_HABITAT)
{
pData->curElement = CREATURE_ELEMENT_HABITAT_COMPOSITION;
pData->maxReadDepth++; //we are not skipping this element
}
pData->szCharData[0] = '\0';
}
pData->currentDepth++;
}
static void XMLCALL
creatureplacementCharacterDataHandle(void *userData, const XML_Char *str, int len)
{
CreatureParseData * pData = (CreatureParseData *) userData;
if(pData->currentDepth <= pData->maxReadDepth && strlen(pData->szCharData) < MAX_CHAR_DATA_LENGTH)
strncat(pData->szCharData,str,__min((unsigned int)len,MAX_CHAR_DATA_LENGTH-strlen(pData->szCharData)));
}
static void XMLCALL
creatureplacementEndElementHandle(void *userData, const XML_Char *name)
{
CreatureParseData * pData = (CreatureParseData *) userData;
if(pData->currentDepth <= pData->maxReadDepth) //we're at the end of an element that we've been reading
{
if(strcmp(name, "CREATURE_INFO") == 0 && pData->curElement == CREATURE_ELEMENT_CREATUREINFO)
{
pData->curElement = CREATURE_ELEMENT_NONE;
}
else if(strcmp(name, "COMPOSITION_LIST") == 0 && pData->curElement == CREATURE_ELEMENT_COMPOSITIONLIST)
{
pData->curElement = CREATURE_ELEMENT_CREATUREINFO;
// CompIndex starts at 0
NUMBER_OF_CREATURE_COMPOSITIONS = pData->uiCompHighestIndex + 1;
}
else if(strcmp(name, "COMPOSITION") == 0 && pData->curElement == CREATURE_ELEMENT_COMPOSITION)
{
pData->curElement = CREATURE_ELEMENT_COMPOSITIONLIST;
if ( pData->curIndex != INVALID_CREATURESITE_INDEX )
{
// valid creature composition index starts at 0
gCreatureComposition[pData->curIndex].ubLarvaePercent = pData->curCompositionInfo.ubLarvaePercent;
gCreatureComposition[pData->curIndex].ubInfantPercent = pData->curCompositionInfo.ubInfantPercent;
gCreatureComposition[pData->curIndex].ubYoungMalePercent = pData->curCompositionInfo.ubYoungMalePercent;
gCreatureComposition[pData->curIndex].ubYoungFemalePercent = pData->curCompositionInfo.ubYoungFemalePercent;
gCreatureComposition[pData->curIndex].ubAdultMalePercent = pData->curCompositionInfo.ubAdultMalePercent;
gCreatureComposition[pData->curIndex].ubAdultFemalePercent = pData->curCompositionInfo.ubAdultFemalePercent;
gCreatureComposition[pData->curIndex].iMaxPopulation = pData->curCompositionInfo.iMaxPopulation;
}
}
else if(strcmp(name, "CompIndex") == 0 && pData->curElement == CREATURE_ELEMENT_COMPINDEX)
{
pData->curElement = CREATURE_ELEMENT_COMPOSITION;
pData->curIndex = atol(pData->szCharData);
// CompIndex starts at 0
if ( pData->curIndex < 0 || pData->curIndex > MAX_NUMBER_OF_CREATURE_COMPOSITIONS )
{
pData->curIndex = INVALID_COMPOSITION_INDEX;
}
else if ( pData->curIndex > pData->uiCompHighestIndex )
{
pData->uiCompHighestIndex = pData->curIndex;
}
}
else if(strcmp(name, "LarvaePercent") == 0 && pData->curElement == CREATURE_ELEMENT_LARVAEPERCENT)
{
pData->curElement = CREATURE_ELEMENT_COMPOSITION;
pData->curCompositionInfo.ubLarvaePercent = (UINT8) atol(pData->szCharData);
}
else if(strcmp(name, "InfantPercent") == 0 && pData->curElement == CREATURE_ELEMENT_INFANTPERCENT)
{
pData->curElement = CREATURE_ELEMENT_COMPOSITION;
pData->curCompositionInfo.ubInfantPercent = (UINT8) atol(pData->szCharData);
}
else if(strcmp(name, "YoungMalePercent") == 0 && pData->curElement == CREATURE_ELEMENT_YMALEPERCENT)
{
pData->curElement = CREATURE_ELEMENT_COMPOSITION;
pData->curCompositionInfo.ubYoungMalePercent = (UINT8) atol(pData->szCharData);
}
else if(strcmp(name, "YoungFemalePercent") == 0 && pData->curElement == CREATURE_ELEMENT_YFEMALEPERCENT)
{
pData->curElement = CREATURE_ELEMENT_COMPOSITION;
pData->curCompositionInfo.ubYoungFemalePercent = (UINT8) atol(pData->szCharData);
}
else if(strcmp(name, "AdultMalePercent") == 0 && pData->curElement == CREATURE_ELEMENT_AMALEPERCENT)
{
pData->curElement = CREATURE_ELEMENT_COMPOSITION;
pData->curCompositionInfo.ubAdultMalePercent = (UINT8) atol(pData->szCharData);
}
else if(strcmp(name, "AdultFemalePercent") == 0 && pData->curElement == CREATURE_ELEMENT_AFEMALEPERCENT)
{
pData->curElement = CREATURE_ELEMENT_COMPOSITION;
pData->curCompositionInfo.ubAdultFemalePercent = (UINT8) atol(pData->szCharData);
}
else if(strcmp(name, "MaxPopulation") == 0 && pData->curElement == CREATURE_ELEMENT_MAXPOPULATION)
{
pData->curElement = CREATURE_ELEMENT_COMPOSITION;
pData->curCompositionInfo.iMaxPopulation = (INT32) atol(pData->szCharData);
}
else if(strcmp(name, "PLACEMENT_LIST") == 0 && pData->curElement == CREATURE_ELEMENT_PLACEMENTLIST)
{
pData->curElement = CREATURE_ELEMENT_CREATUREINFO;
NUMBER_OF_INFECTIBLE_SITES = pData->uiHighestIndex;
}
else if(strcmp(name, "PLACEMENT") == 0 && pData->curElement == CREATURE_ELEMENT_PLACEMENT)
{
pData->curElement = CREATURE_ELEMENT_PLACEMENTLIST;
if ( pData->curIndex != INVALID_CREATURESITE_INDEX )
{
// valid giLairID starts at 1
gCreaturePlacements[pData->curIndex].sAltMapX = pData->curPlacementInfo.sAltMapX;
gCreaturePlacements[pData->curIndex].sAltMapY = pData->curPlacementInfo.sAltMapY;
gCreaturePlacements[pData->curIndex].ubAltMapZ = pData->curPlacementInfo.ubAltMapZ;
gCreaturePlacements[pData->curIndex].sQueenX = pData->curPlacementInfo.sQueenX;
gCreaturePlacements[pData->curIndex].sQueenY = pData->curPlacementInfo.sQueenY;
gCreaturePlacements[pData->curIndex].ubQueenZ = pData->curPlacementInfo.ubQueenZ;
gCreaturePlacements[pData->curIndex].sAttackSourceX = pData->curPlacementInfo.sAttackSourceX;
gCreaturePlacements[pData->curIndex].sAttackSourceY = pData->curPlacementInfo.sAttackSourceY;
gCreaturePlacements[pData->curIndex].iAttackSourceGridNo = pData->curPlacementInfo.iAttackSourceGridNo;
gCreaturePlacements[pData->curIndex].sWarpToX = pData->curPlacementInfo.sWarpToX;
gCreaturePlacements[pData->curIndex].sWarpToY = pData->curPlacementInfo.sWarpToY;
gCreaturePlacements[pData->curIndex].ubWarpToZ = pData->curPlacementInfo.ubWarpToZ;
gCreaturePlacements[pData->curIndex].iWarpToGridNo = pData->curPlacementInfo.iWarpToGridNo;
for (UINT8 y = 0; y < MAX_NUMBER_OF_CREATURE_SECTORS; y++)
{
gCreaturePlacements[pData->curIndex].Habitat[y].sX = pData->curPlacementInfo.Habitat[y].sX;
gCreaturePlacements[pData->curIndex].Habitat[y].sY = pData->curPlacementInfo.Habitat[y].sY;
gCreaturePlacements[pData->curIndex].Habitat[y].ubZ = pData->curPlacementInfo.Habitat[y].ubZ;
gCreaturePlacements[pData->curIndex].Habitat[y].ubComposition = pData->curPlacementInfo.Habitat[y].ubComposition;
gCreaturePlacements[pData->curIndex].Habitat[y].fValid = pData->curPlacementInfo.Habitat[y].fValid;
// Clear pData Habitat Array as different creature site has different number of habitats
pData->curPlacementInfo.Habitat[y].sX = 0;
pData->curPlacementInfo.Habitat[y].sY = 0;
pData->curPlacementInfo.Habitat[y].ubZ = 0;
pData->curPlacementInfo.Habitat[y].ubComposition = 0;
pData->curPlacementInfo.Habitat[y].fValid = 0;
}
}
}
else if(strcmp(name, "Index") == 0 && pData->curElement == CREATURE_ELEMENT_INDEX)
{
pData->curElement = CREATURE_ELEMENT_PLACEMENT;
pData->curIndex = atol(pData->szCharData);
if ( !pData->curIndex || pData->curIndex > MAX_NUMBER_OF_INFECTIBLE_SITES + 1 )
{
pData->curIndex = INVALID_CREATURESITE_INDEX;
}
else if ( pData->curIndex > pData->uiHighestIndex )
{
pData->uiHighestIndex = pData->curIndex;
}
}
else if(strcmp(name, "ATTACKSOURCE") == 0 && pData->curElement == CREATURE_ELEMENT_ATTACKSOURCE)
{
pData->curElement = CREATURE_ELEMENT_PLACEMENT;
}
else if(strcmp(name, "SectorGrid") == 0 && pData->curElement == CREATURE_ELEMENT_ATTACKSOURCE_SECTOR)
{
UINT8 x, y;
pData->curElement = CREATURE_ELEMENT_ATTACKSOURCE;
y = (UINT8)pData->szCharData[0] & 0x1F;
x = (UINT8)atol(&pData->szCharData[1]);
if ( x > 0 && x <= 16 && y > 0 && y <= 16 )
{
pData->curPlacementInfo.sAttackSourceX = x;
pData->curPlacementInfo.sAttackSourceY = y;
}
SGP_THROW_IFFALSE( (SECTOR(x,y) >= 0 && SECTOR(x,y) < 256) , L"Illegal sector number in CreaturePlacements.XML" );
}
else if(strcmp(name, "GridNo") == 0 && pData->curElement == CREATURE_ELEMENT_ATTACKSOURCE_GRIDNO)
{
pData->curElement = CREATURE_ELEMENT_ATTACKSOURCE;
pData->curPlacementInfo.iAttackSourceGridNo = (INT32) atol(pData->szCharData);
}
else if(strcmp(name, "ALTERNATEMAP") == 0 && pData->curElement == CREATURE_ELEMENT_ALTERNATEMAP)
{
pData->curElement = CREATURE_ELEMENT_PLACEMENT;
}
else if(strcmp(name, "SectorGrid") == 0 && pData->curElement == CREATURE_ELEMENT_ALTERNATEMAP_SECTOR)
{
UINT8 x, y;
pData->curElement = CREATURE_ELEMENT_ALTERNATEMAP;
y = (UINT8)pData->szCharData[0] & 0x1F;
x = (UINT8)atol(&pData->szCharData[1]);
if ( x > 0 && x <= 16 && y > 0 && y <= 16 )
{
pData->curPlacementInfo.sAltMapX = x;
pData->curPlacementInfo.sAltMapY = y;
}
SGP_THROW_IFFALSE( (SECTOR(x,y) >= 0 && SECTOR(x,y) < 256) , L"Illegal sector number in CreaturePlacements.XML" );
}
else if(strcmp(name, "SectorZ") == 0 && pData->curElement == CREATURE_ELEMENT_ALTERNATEMAP_Z)
{
pData->curElement = CREATURE_ELEMENT_ALTERNATEMAP;
pData->curPlacementInfo.ubAltMapZ = (UINT8) atol(pData->szCharData);
}
else if(strcmp(name, "WARPTOSECTOR") == 0 && pData->curElement == CREATURE_ELEMENT_WARPTO)
{
pData->curElement = CREATURE_ELEMENT_PLACEMENT;
}
else if(strcmp(name, "SectorGrid") == 0 && pData->curElement == CREATURE_ELEMENT_WARPTO_SECTOR)
{
UINT8 x, y;
pData->curElement = CREATURE_ELEMENT_WARPTO;
y = (UINT8)pData->szCharData[0] & 0x1F;
x = (UINT8)atol(&pData->szCharData[1]);
if ( x > 0 && x <= 16 && y > 0 && y <= 16 )
{
pData->curPlacementInfo.sWarpToX = x;
pData->curPlacementInfo.sWarpToY = y;
}
SGP_THROW_IFFALSE( (SECTOR(x,y) >= 0 && SECTOR(x,y) < 256) , L"Illegal sector number in CreaturePlacements.XML" );
}
else if(strcmp(name, "SectorZ") == 0 && pData->curElement == CREATURE_ELEMENT_WARPTO_Z)
{
pData->curElement = CREATURE_ELEMENT_WARPTO;
pData->curPlacementInfo.ubWarpToZ = (UINT8) atol(pData->szCharData);
}
else if(strcmp(name, "GridNo") == 0 && pData->curElement == CREATURE_ELEMENT_WARPTO_GRIDNO)
{
pData->curElement = CREATURE_ELEMENT_WARPTO;
pData->curPlacementInfo.iWarpToGridNo = (INT32) atol(pData->szCharData);
}
else if(strcmp(name, "CREATURESECTOR") == 0 && pData->curElement == CREATURE_ELEMENT_CREATURESECTOR)
{
pData->curElement = CREATURE_ELEMENT_PLACEMENT;
}
else if(strcmp(name, "QUEENSECTOR") == 0 && pData->curElement == CREATURE_ELEMENT_QUEEN)
{
pData->curElement = CREATURE_ELEMENT_CREATURESECTOR;
}
else if(strcmp(name, "SectorGrid") == 0 && pData->curElement == CREATURE_ELEMENT_QUEEN_SECTOR)
{
UINT8 x, y;
pData->curElement = CREATURE_ELEMENT_QUEEN;
y = (UINT8)pData->szCharData[0] & 0x1F;
x = (UINT8)atol(&pData->szCharData[1]);
if ( x > 0 && x <= 16 && y > 0 && y <= 16 )
{
pData->curPlacementInfo.sQueenX = x;
pData->curPlacementInfo.sQueenY = y;
}
SGP_THROW_IFFALSE( (SECTOR(x,y) >= 0 && SECTOR(x,y) < 256) , L"Illegal sector number in CreaturePlacements.XML" );
}
else if(strcmp(name, "SectorZ") == 0 && pData->curElement == CREATURE_ELEMENT_QUEEN_Z)
{
pData->curElement = CREATURE_ELEMENT_QUEEN;
pData->curPlacementInfo.ubQueenZ = (UINT8) atol(pData->szCharData);
}
else if(strcmp(name, "HABITATSECTOR") == 0 && pData->curElement == CREATURE_ELEMENT_HABITAT)
{
pData->curElement = CREATURE_ELEMENT_CREATURESECTOR;
}
else if(strcmp(name, "SectorGrid") == 0 && pData->curElement == CREATURE_ELEMENT_HABITAT_SECTOR)
{
UINT8 x, y;
pData->curElement = CREATURE_ELEMENT_HABITAT;
y = (UINT8)pData->szCharData[0] & 0x1F;
x = (UINT8)atol(&pData->szCharData[1]);
if ( x > 0 && x <= 16 && y > 0 && y <= 16 )
{
pData->curPlacementInfo.Habitat[pData->curHabitat].sX = x;
pData->curPlacementInfo.Habitat[pData->curHabitat].sY = y;
}
SGP_THROW_IFFALSE( (SECTOR(x,y) >= 0 && SECTOR(x,y) < 256) , L"Illegal sector number in CreaturePlacements.XML" );
}
else if(strcmp(name, "SectorZ") == 0 && pData->curElement == CREATURE_ELEMENT_HABITAT_Z)
{
pData->curElement = CREATURE_ELEMENT_HABITAT;
pData->curPlacementInfo.Habitat[pData->curHabitat].ubZ = (UINT8) atol(pData->szCharData);
}
else if(strcmp(name, "Composition") == 0 && pData->curElement == CREATURE_ELEMENT_HABITAT_COMPOSITION)
{
pData->curElement = CREATURE_ELEMENT_HABITAT;
pData->curPlacementInfo.Habitat[pData->curHabitat].ubComposition = (UINT8) atol(pData->szCharData);
// valid creature habitat if using other than queen habitat
if ( pData->curPlacementInfo.Habitat[pData->curHabitat].ubComposition )
pData->curPlacementInfo.Habitat[pData->curHabitat].fValid = TRUE;
pData->curHabitat++;
}
pData->maxReadDepth--;
}
pData->currentDepth--;
}
BOOLEAN ReadInCreaturePlacements(STR fileName)
{
HWFILE hFile;
UINT32 uiBytesRead;
UINT32 uiFSize;
CHAR8 * lpcBuffer;
XML_Parser parser = XML_ParserCreate(NULL);
CreatureParseData pData;
hFile = FileOpen( fileName, FILE_ACCESS_READ, FALSE );
if ( !hFile )
return( FALSE );
uiFSize = FileGetSize(hFile);
lpcBuffer = (CHAR8 *) MemAlloc(uiFSize+1);
//Read in block
if ( !FileRead( hFile, lpcBuffer, uiFSize, &uiBytesRead ) )
{
MemFree(lpcBuffer);
return( FALSE );
}
lpcBuffer[uiFSize] = 0; //add a null terminator
FileClose( hFile );
XML_SetElementHandler(parser, creatureplacementStartElementHandle, creatureplacementEndElementHandle);
XML_SetCharacterDataHandler(parser, creatureplacementCharacterDataHandle);
memset(&pData,0,sizeof(pData));
NUMBER_OF_INFECTIBLE_SITES = 0;
NUMBER_OF_CREATURE_COMPOSITIONS = 0;
XML_SetUserData(parser, &pData);
if(!XML_Parse(parser, lpcBuffer, uiFSize, TRUE))
{
CHAR8 errorBuf[511];
sprintf(errorBuf, "XML Parser Error in CreaturePlacements.xml: %s at line %d", XML_ErrorString(XML_GetErrorCode(parser)), XML_GetCurrentLineNumber(parser));
LiveMessage(errorBuf);
MemFree(lpcBuffer);
return FALSE;
}
MemFree(lpcBuffer);
XML_ParserFree(parser);
return TRUE;
}
Reference in New Issue View Git Blame Copy Permalink