void CP_ParseEventTrigger (const char *name, const char **text)
{
const char *errhead = "CP_ParseEventTrigger: unexpected end of file (event ";
const char *token;
if (ccs.numCampaignTriggerEvents >= MAX_CAMPAIGN_TRIGGER_EVENTS) {
Com_Printf("CP_ParseEventTrigger: max event def limit hit\n");
return;
}
token = cgi->Com_EParse(text, errhead, name);
if (!*text)
return;
if (!*text || token[0] != '{') {
Com_Printf("CP_ParseEventTrigger: event def '%s' without body ignored\n", name);
return;
}
cgi->Com_RegisterConstList(eventConstants);
campaignTriggerEvent_t *event = &ccs.campaignTriggerEvents[ccs.numCampaignTriggerEvents];
OBJZERO(*event);
Com_DPrintf(DEBUG_CLIENT, "...found event %s\n", name);
ccs.numCampaignTriggerEvents++;
event->active = true;
event->id = Mem_PoolStrDup(name, cp_campaignPool, 0);
do {
token = cgi->Com_EParse(text, errhead, name);
if (!*text)
break;
if (*token == '}')
break;
if (!Com_ParseBlockToken(name, text, event, event_vals, cp_campaignPool, token)) {
Com_Printf("CP_ParseEventTrigger: Ignoring unknown event value '%s'\n", token);
}
} while (*text);
cgi->Com_UnregisterConstList(eventConstants);
}
/**
* @brief Copies an entry from the building description file into the list of building types.
* @note Parses one "building" entry in the basemanagement.ufo file and writes
* it into the next free entry in bmBuildings[0], which is the list of buildings
* in the first base (building_t).
* @param[in] name Unique script id of a building. This is parsed from "building xxx" -> id=xxx.
* @param[in] text the whole following text that is part of the "building" item definition in .ufo.
* @param[in] link Bool value that decides whether to link the tech pointer in or not
* @sa CL_ParseScriptFirst (link is false here)
* @sa CL_ParseScriptSecond (link it true here)
*/
void B_ParseBuildings (const char *name, const char **text, bool link)
{
building_t *building;
technology_t *techLink;
const char *errhead = "B_ParseBuildings: unexpected end of file (names ";
const char *token;
/* get id list body */
token = Com_Parse(text);
if (!*text || *token != '{') {
Com_Printf("B_ParseBuildings: building \"%s\" without body ignored\n", name);
return;
}
if (ccs.numBuildingTemplates >= MAX_BUILDINGS)
cgi->Com_Error(ERR_DROP, "B_ParseBuildings: too many buildings");
if (!link) {
int i;
for (i = 0; i < ccs.numBuildingTemplates; i++) {
if (Q_streq(ccs.buildingTemplates[i].id, name)) {
Com_Printf("B_ParseBuildings: Second building with same name found (%s) - second ignored\n", name);
return;
}
}
/* new entry */
building = &ccs.buildingTemplates[ccs.numBuildingTemplates];
OBJZERO(*building);
building->id = Mem_PoolStrDup(name, cp_campaignPool, 0);
Com_DPrintf(DEBUG_CLIENT, "...found building %s\n", building->id);
/* set standard values */
building->tpl = building; /* Self-link just in case ... this way we can check if it is a template or not. */
building->idx = -1; /* No entry in buildings list (yet). */
building->base = NULL;
building->buildingType = MAX_BUILDING_TYPE;
building->dependsBuilding = NULL;
building->maxCount = -1; /* Default: no limit */
building->size[0] = 1;
building->size[1] = 1;
ccs.numBuildingTemplates++;
do {
/* get the name type */
token = cgi->Com_EParse(text, errhead, name);
if (!*text)
break;
if (*token == '}')
break;
/* get values */
if (Q_streq(token, "type")) {
token = cgi->Com_EParse(text, errhead, name);
if (!*text)
return;
building->buildingType = B_GetBuildingTypeByBuildingID(token);
if (building->buildingType >= MAX_BUILDING_TYPE)
Com_Printf("didn't find buildingType '%s'\n", token);
} else {
/* no linking yet */
if (Q_streq(token, "depends")) {
cgi->Com_EParse(text, errhead, name);
if (!*text)
return;
} else {
if (!Com_ParseBlockToken(name, text, building, valid_building_vars, cp_campaignPool, token))
Com_Printf("B_ParseBuildings: unknown token \"%s\" ignored (building %s)\n", token, name);
}
}
} while (*text);
if (building->size[0] < 1 || building->size[1] < 1 || building->size[0] >= BASE_SIZE || building->size[1] >= BASE_SIZE) {
Com_Printf("B_ParseBuildings: Invalid size for building %s (%i, %i)\n", building->id, (int)building->size[0], (int)building->size[1]);
ccs.numBuildingTemplates--;
}
} else {
building = B_GetBuildingTemplate(name);
if (!building)
cgi->Com_Error(ERR_DROP, "B_ParseBuildings: Could not find building with id %s\n", name);
techLink = RS_GetTechByProvided(name);
if (techLink)
building->tech = techLink;
do {
/* get the name type */
token = cgi->Com_EParse(text, errhead, name);
if (!*text)
break;
if (*token == '}')
break;
/* get values */
if (Q_streq(token, "depends")) {
const building_t *dependsBuilding = B_GetBuildingTemplate(cgi->Com_EParse(text, errhead, name));
if (!dependsBuilding)
cgi->Com_Error(ERR_DROP, "Could not find building depend of %s\n", building->id);
building->dependsBuilding = dependsBuilding;
if (!*text)
return;
}
} while (*text);
}
}
/**
* @brief Parse medals and ranks defined in the medals.ufo file.
* @sa CL_ParseScriptFirst
*/
void CL_ParseRanks (const char* name, const char** text)
{
rank_t* rank;
const char* errhead = "CL_ParseRanks: unexpected end of file (medal/rank ";
const char* token;
/* get name list body body */
token = Com_Parse(text);
if (!*text || *token != '{') {
Com_Printf("CL_ParseRanks: rank/medal \"%s\" without body ignored\n", name);
return;
}
for (int i = 0; i < ccs.numRanks; i++) {
if (Q_streq(name, ccs.ranks[i].name)) {
Com_Printf("CL_ParseRanks: Rank with same name '%s' already loaded.\n", name);
return;
}
}
/* parse ranks */
if (ccs.numRanks >= MAX_RANKS) {
Com_Printf("CL_ParseRanks: Too many rank descriptions, '%s' ignored.\n", name);
ccs.numRanks = MAX_RANKS;
return;
}
rank = &ccs.ranks[ccs.numRanks++];
OBJZERO(*rank);
rank->id = Mem_PoolStrDup(name, cp_campaignPool, 0);
rank->level = -1;
do {
/* get the name type */
token = cgi->Com_EParse(text, errhead, name);
if (!*text)
break;
if (*token == '}')
break;
if (Com_ParseBlockToken(name, text, rank, rankValues, cp_campaignPool, token)) {
continue;
} else if (Q_streq(token, "type")) {
/* employeeType_t */
token = cgi->Com_EParse(text, errhead, name);
if (!*text)
return;
/* error check is performed in E_GetEmployeeType function */
rank->type = E_GetEmployeeType(token);
} else
Com_Printf("CL_ParseRanks: unknown token \"%s\" ignored (medal/rank %s)\n", token, name);
} while (*text);
if (rank->image == nullptr || !strlen(rank->image))
cgi->Com_Error(ERR_DROP, "CL_ParseRanks: image is missing for rank %s", rank->id);
if (rank->name == nullptr || !strlen(rank->name))
cgi->Com_Error(ERR_DROP, "CL_ParseRanks: name is missing for rank %s", rank->id);
if (rank->shortname == nullptr || !strlen(rank->shortname))
rank->shortname = rank->name;
if (rank->level == -1)
cgi->Com_Error(ERR_DROP, "CL_ParseRanks: level is missing for rank %s", rank->id);
}
/**
* @sa CL_ParseScriptFirst
*/
static void CP_ParseAlienTeam (const char *name, const char **text)
{
const char *errhead = "CP_ParseAlienTeam: unexpected end of file (alienteam ";
const char *token;
int i;
alienTeamCategory_t *alienCategory;
/* get it's body */
token = Com_Parse(text);
if (!*text || *token != '{') {
Com_Printf("CP_ParseAlienTeam: alien team category \"%s\" without body ignored\n", name);
return;
}
if (ccs.numAlienCategories >= ALIENCATEGORY_MAX) {
Com_Printf("CP_ParseAlienTeam: maximum number of alien team category reached (%i)\n", ALIENCATEGORY_MAX);
return;
}
/* search for category with same name */
for (i = 0; i < ccs.numAlienCategories; i++)
if (Q_streq(name, ccs.alienCategories[i].id))
break;
if (i < ccs.numAlienCategories) {
Com_Printf("CP_ParseAlienTeam: alien category def \"%s\" with same name found, second ignored\n", name);
return;
}
alienCategory = &ccs.alienCategories[ccs.numAlienCategories++];
Q_strncpyz(alienCategory->id, name, sizeof(alienCategory->id));
do {
token = Com_EParse(text, errhead, name);
if (!*text)
break;
if (*token == '}')
break;
if (Q_streq(token, "equipment")) {
linkedList_t **list = &alienCategory->equipment;
token = Com_EParse(text, errhead, name);
if (!*text || *token != '{') {
Com_Printf("CP_ParseAlienTeam: alien team category \"%s\" has equipment with no opening brace\n", name);
break;
}
do {
token = Com_EParse(text, errhead, name);
if (!*text || *token == '}')
break;
LIST_AddString(list, token);
} while (*text);
} else if (Q_streq(token, "category")) {
token = Com_EParse(text, errhead, name);
if (!*text || *token != '{') {
Com_Printf("CP_ParseAlienTeam: alien team category \"%s\" has category with no opening brace\n", name);
break;
}
do {
token = Com_EParse(text, errhead, name);
if (!*text || *token == '}')
break;
alienCategory->missionCategories[alienCategory->numMissionCategories] = CP_GetAlienMissionTypeByID(token);
if (alienCategory->missionCategories[alienCategory->numMissionCategories] == INTERESTCATEGORY_NONE)
Com_Printf("CP_ParseAlienTeam: alien team category \"%s\" is used with no mission category. It won't be used in game.\n", name);
alienCategory->numMissionCategories++;
} while (*text);
} else if (Q_streq(token, "team")) {
alienTeamGroup_t *group;
token = Com_EParse(text, errhead, name);
if (!*text || *token != '{') {
Com_Printf("CP_ParseAlienTeam: alien team \"%s\" has team with no opening brace\n", name);
break;
}
if (alienCategory->numAlienTeamGroups >= MAX_ALIEN_GROUP_PER_CATEGORY) {
Com_Printf("CP_ParseAlienTeam: maximum number of alien team reached (%i) in category \"%s\"\n", MAX_ALIEN_GROUP_PER_CATEGORY, name);
break;
}
group = &alienCategory->alienTeamGroups[alienCategory->numAlienTeamGroups];
group->idx = alienCategory->numAlienTeamGroups;
group->categoryIdx = alienCategory - ccs.alienCategories;
alienCategory->numAlienTeamGroups++;
do {
token = Com_EParse(text, errhead, name);
if (!Com_ParseBlockToken(name, text, group, alien_group_vals, cp_campaignPool, token)) {
const teamDef_t *teamDef;
if (!*text || *token == '}')
break;
/* This is an alien team */
if (group->numAlienTeams >= MAX_TEAMS_PER_MISSION)
Com_Error(ERR_DROP, "CL_ParseAlienTeam: MAX_TEAMS_PER_MISSION hit");
teamDef = Com_GetTeamDefinitionByID(token);
if (teamDef)
group->alienTeams[group->numAlienTeams++] = teamDef;
}
} while (*text);
} else {
Com_Printf("CP_ParseAlienTeam: unknown token \"%s\" ignored (category %s)\n", token, name);
continue;
}
} while (*text);
if (LIST_IsEmpty(alienCategory->equipment))
Sys_Error("alien category equipment list is empty");
}
/**
* @sa CL_ParseClientData
*/
static void CP_ParseCampaign (const char *name, const char **text)
{
const char *errhead = "CP_ParseCampaign: unexpected end of file (campaign ";
campaign_t *cp;
const char *token;
int i;
salary_t *s;
/* search for campaigns with same name */
for (i = 0; i < ccs.numCampaigns; i++)
if (Q_streq(name, ccs.campaigns[i].id))
break;
if (i < ccs.numCampaigns) {
Com_Printf("CP_ParseCampaign: campaign def \"%s\" with same name found, second ignored\n", name);
return;
}
if (ccs.numCampaigns >= MAX_CAMPAIGNS) {
Com_Printf("CP_ParseCampaign: Max campaigns reached (%i)\n", MAX_CAMPAIGNS);
return;
}
/* initialize the campaign */
cp = &ccs.campaigns[ccs.numCampaigns++];
OBJZERO(*cp);
cp->idx = ccs.numCampaigns - 1;
Q_strncpyz(cp->id, name, sizeof(cp->id));
/* some default values */
cp->team = TEAM_PHALANX;
Q_strncpyz(cp->researched, "researched_human", sizeof(cp->researched));
/* get it's body */
token = Com_Parse(text);
if (!*text || *token != '{') {
Com_Printf("CP_ParseCampaign: campaign def \"%s\" without body ignored\n", name);
ccs.numCampaigns--;
return;
}
/* some default values */
s = &cp->salaries;
s->base[EMPL_SOLDIER] = 3000;
s->rankBonus[EMPL_SOLDIER] = 500;
s->base[EMPL_WORKER] = 3000;
s->rankBonus[EMPL_WORKER] = 500;
s->base[EMPL_SCIENTIST] = 3000;
s->rankBonus[EMPL_SCIENTIST] = 500;
s->base[EMPL_PILOT] = 3000;
s->rankBonus[EMPL_PILOT] = 500;
s->aircraftFactor = 1;
s->aircraftDivisor = 25;
s->baseUpkeep = 20000;
s->adminInitial = 1000;
s->admin[EMPL_SOLDIER] = 75;
s->admin[EMPL_WORKER] = 75;
s->admin[EMPL_SCIENTIST] = 75;
s->admin[EMPL_PILOT] = 75;
s->debtInterest = 0.005;
do {
token = Com_EParse(text, errhead, name);
if (!*text)
break;
if (*token == '}')
break;
/* check for some standard values */
if (Com_ParseBlockToken(name, text, cp, campaign_vals, NULL, token)) {
continue;
} else if (Q_streq(token, "salary")) {
CP_ParseSalary(token, text, s);
} else if (Q_streq(token, "events")) {
token = Com_EParse(text, errhead, name);
if (!*text)
return;
cp->events = CP_GetEventsByID(token);
} else {
Com_Printf("CP_ParseCampaign: unknown token \"%s\" ignored (campaign %s)\n", token, name);
Com_EParse(text, errhead, name);
}
} while (*text);
if (cp->difficulty < -4)
cp->difficulty = -4;
else if (cp->difficulty > 4)
cp->difficulty = 4;
}
/**
* @sa CL_ParseClientData
*/
static void CP_ParseCampaign (const char *name, const char **text)
{
const char *errhead = "CP_ParseCampaign: unexpected end of file (campaign ";
campaign_t *cp;
const char *token;
int i;
salary_t *s;
bool drop = false;
/* search for campaigns with same name */
for (i = 0; i < ccs.numCampaigns; i++)
if (Q_streq(name, ccs.campaigns[i].id))
break;
if (i < ccs.numCampaigns) {
Com_Printf("CP_ParseCampaign: campaign def \"%s\" with same name found, second ignored\n", name);
return;
}
if (ccs.numCampaigns >= MAX_CAMPAIGNS) {
Com_Printf("CP_ParseCampaign: Max campaigns reached (%i)\n", MAX_CAMPAIGNS);
return;
}
/* initialize the campaign */
cp = &ccs.campaigns[ccs.numCampaigns++];
OBJZERO(*cp);
cp->idx = ccs.numCampaigns - 1;
Q_strncpyz(cp->id, name, sizeof(cp->id));
/* some default values */
cp->team = TEAM_PHALANX;
Q_strncpyz(cp->researched, "researched_human", sizeof(cp->researched));
cp->researchRate = 0.8f;
cp->produceRate = 1.0f;
cp->healingRate = 1.0f;
cp->ufoReductionRate = NON_OCCURRENCE_PROBABILITY;
cp->initialInterest = INITIAL_OVERALL_INTEREST;
/* get it's body */
token = Com_Parse(text);
if (!*text || *token != '{') {
Com_Printf("CP_ParseCampaign: campaign def \"%s\" without body ignored\n", name);
ccs.numCampaigns--;
return;
}
/* set undefined markers */
s = &cp->salaries;
for (i = 0; i < MAX_EMPL; i++) {
s->base[i] = -1;
s->rankBonus[i] = -1;
s->admin[i] = -1;
}
s->aircraftFactor = -1;
s->aircraftDivisor = -1;
s->baseUpkeep = -1;
s->adminInitial = -1;
s->debtInterest = -1;
do {
token = cgi->Com_EParse(text, errhead, name);
if (!*text)
break;
if (*token == '}')
break;
/* check for some standard values */
if (Com_ParseBlockToken(name, text, cp, campaign_vals, NULL, token)) {
continue;
} else if (Q_streq(token, "salary")) {
CP_ParseSalary(token, text, s);
} else if (Q_streq(token, "events")) {
token = cgi->Com_EParse(text, errhead, name);
if (!*text)
return;
cp->events = CP_GetEventsByID(token);
} else {
Com_Printf("CP_ParseCampaign: unknown token \"%s\" ignored (campaign %s)\n", token, name);
cgi->Com_EParse(text, errhead, name);
}
} while (*text);
if (cp->difficulty < -4)
cp->difficulty = -4;
else if (cp->difficulty > 4)
cp->difficulty = 4;
/* checking for undefined values */
for (i = 0; i < MAX_EMPL; i++) {
if (s->base[i] == -1 || s->rankBonus[i] == -1 || s->admin[i] == -1) {
drop = true;
break;
}
}
if (drop || s->aircraftFactor == -1 || s->aircraftDivisor == -1 || s->baseUpkeep == -1
|| s->adminInitial == -1 || s->debtInterest == -1) {
Com_Printf("CP_ParseCampaign: check salary definition. Campaign def \"%s\" ignored\n", name);
ccs.numCampaigns--;
return;
}
}
/**
* @brief Copies an entry from the installation description file into the list of installation templates.
* @note Parses one "installation" entry in the installation.ufo file and writes
* it into the next free entry in installationTemplates.
* @param[in] name Unique test-id of a installationTemplate_t.
* @param[in] text the rest of the script file that is tokenized here
*/
void INS_ParseInstallations (const char *name, const char **text)
{
installationTemplate_t *installation;
const char *errhead = "INS_ParseInstallations: unexpected end of file (names ";
const char *token;
int i;
/* get id list body */
token = Com_Parse(text);
if (!*text || *token != '{') {
Com_Printf("INS_ParseInstallations: installation \"%s\" without body ignored\n", name);
return;
}
if (!name) {
Com_Printf("INS_ParseInstallations: installation name not specified.\n");
return;
}
if (ccs.numInstallationTemplates >= MAX_INSTALLATION_TEMPLATES) {
Com_Printf("INS_ParseInstallations: too many installation templates\n");
ccs.numInstallationTemplates = MAX_INSTALLATION_TEMPLATES; /* just in case it's bigger. */
return;
}
for (i = 0; i < ccs.numInstallationTemplates; i++) {
if (Q_streq(ccs.installationTemplates[i].name, name)) {
Com_Printf("INS_ParseInstallations: Second installation with same name found (%s) - second ignored\n", name);
return;
}
}
/* new entry */
installation = &ccs.installationTemplates[ccs.numInstallationTemplates];
OBJZERO(*installation);
installation->id = Mem_PoolStrDup(name, cp_campaignPool, 0);
Com_DPrintf(DEBUG_CLIENT, "...found installation %s\n", installation->id);
ccs.numInstallationTemplates++;
do {
/* get the name type */
token = Com_EParse(text, errhead, name);
if (!*text)
break;
if (*token == '}')
break;
/* check for some standard values */
if (!Com_ParseBlockToken(name, text, installation, installation_vals, cp_campaignPool, token)) {
/* other values */
if (Q_streq(token, "cost")) {
char cvarname[MAX_VAR] = "mn_installation_";
Q_strcat(cvarname, installation->id, sizeof(cvarname));
Q_strcat(cvarname, "_cost", sizeof(cvarname));
token = Com_EParse(text, errhead, name);
if (!*text)
return;
installation->cost = atoi(token);
Cvar_Set(cvarname, va(_("%d c"), atoi(token)));
} else if (Q_streq(token, "buildtime")) {
char cvarname[MAX_VAR];
token = Com_EParse(text, errhead, name);
if (!*text)
return;
installation->buildTime = atoi(token);
Com_sprintf(cvarname, sizeof(cvarname), "mn_installation_%s_buildtime", installation->id);
Cvar_Set(cvarname, va(ngettext("%d day", "%d days", atoi(token)), atoi(token)));
}
}
} while (*text);
}
