bool Parser::parseText(string& text, string source)
{
Tokenizer tz;
// Open the given text data
tz.setReadLowerCase(!case_sensitive_);
if (!tz.openString(text, 0, 0, source))
{
LOG_MESSAGE(1, "Unable to open text data for parsing");
return false;
}
// Do parsing
return pt_root_->parse(tz);
}
bool Parser::parseText(string_view text, string_view source) const
{
Tokenizer tz;
// Open the given text data
tz.setReadLowerCase(!case_sensitive_);
if (!tz.openString(text, 0, 0, source))
{
Log::error("Unable to open text data for parsing");
return false;
}
// Do parsing
return pt_root_->parse(tz);
}
// -----------------------------------------------------------------------------
// Parses ZMAPINFO-format definitions in [entry]
// -----------------------------------------------------------------------------
bool MapInfo::parseZMapInfo(ArchiveEntry* entry)
{
Tokenizer tz;
tz.setReadLowerCase(true);
tz.openMem(entry->data(), entry->name());
while (!tz.atEnd())
{
// Include
if (tz.check("include"))
{
// Get entry at include path
auto include_entry = entry->parent()->entryAtPath(tz.next().text);
if (!include_entry)
{
Log::warning(
"Warning - Parsing ZMapInfo \"{}\": Unable to include \"{}\" at line {}",
entry->name(),
tz.current().text,
tz.lineNo());
}
else if (!parseZMapInfo(include_entry))
return false;
}
// Map
else if (tz.check("map") || tz.check("defaultmap") || tz.check("adddefaultmap"))
{
if (!parseZMap(tz, tz.current().text))
return false;
}
// DoomEdNums
else if (tz.check("doomednums"))
{
if (!parseDoomEdNums(tz))
return false;
}
// Unknown block (skip it)
else if (tz.check("{"))
{
Log::warning(2, "Warning - Parsing ZMapInfo \"{}\": Skipping {{}} block", entry->name());
tz.adv();
tz.skipSection("{", "}");
continue;
}
// Unknown
else
{
Log::warning(2, R"(Warning - Parsing ZMapInfo "{}": Unknown token "{}")", entry->name(), tz.current().text);
}
tz.adv();
}
Log::info(2, "Parsed ZMapInfo entry {} successfully", entry->name());
return true;
}
// -----------------------------------------------------------------------------
// Parses a ZMAPINFO map definition of [type] beginning at the current token in
// tokenizer [tz]
// -----------------------------------------------------------------------------
bool MapInfo::parseZMap(Tokenizer& tz, std::string_view type)
{
// TODO: Handle adddefaultmap
auto map = default_map_;
// Normal map, get lump/name/etc
tz.adv();
if (type == "map")
{
// Entry name should be just after map keyword
map.entry_name = tz.current().text;
// Parse map name
tz.adv();
if (tz.check("lookup"))
{
map.lookup_name = true;
map.name = tz.next().text;
}
else
{
map.lookup_name = false;
map.name = tz.current().text;
}
tz.adv();
}
if (!tz.advIf("{"))
{
Log::error(R"(Error Parsing ZMapInfo: Expecting "{{", got "{}" at line {})", tz.current().text, tz.lineNo());
return false;
}
while (!tz.checkOrEnd("}"))
{
// Block (skip it)
if (tz.advIf("{"))
tz.skipSection("{", "}");
// LevelNum
else if (tz.check("levelnum"))
{
if (!checkEqualsToken(tz, "ZMapInfo"))
return false;
// Parse number
// TODO: Checks
tz.next().toInt(map.level_num);
}
// Sky1
else if (tz.check("sky1"))
{
if (!checkEqualsToken(tz, "ZMapInfo"))
return false;
map.sky1 = tz.next().text;
// Scroll speed
// TODO: Checks
if (tz.advIfNext(","))
tz.next().toFloat(map.sky1_scroll_speed);
}
// Sky2
else if (tz.check("sky2"))
{
if (!checkEqualsToken(tz, "ZMapInfo"))
return false;
map.sky2 = tz.next().text;
// Scroll speed
// TODO: Checks
if (tz.advIfNext(","))
tz.next().toFloat(map.sky2_scroll_speed);
}
// Skybox
else if (tz.check("skybox"))
{
if (!checkEqualsToken(tz, "ZMapInfo"))
return false;
map.sky1 = tz.next().text;
}
// DoubleSky
else if (tz.check("doublesky"))
map.sky_double = true;
// ForceNoSkyStretch
else if (tz.check("forcenoskystretch"))
map.sky_force_no_stretch = true;
// SkyStretch
else if (tz.check("skystretch"))
map.sky_stretch = true;
// Fade
else if (tz.check("fade"))
{
if (!checkEqualsToken(tz, "ZMapInfo"))
return false;
if (!strToCol(tz.next().text, map.fade))
return false;
}
// OutsideFog
else if (tz.check("outsidefog"))
{
if (!checkEqualsToken(tz, "ZMapInfo"))
return false;
if (!strToCol(tz.next().text, map.fade_outside))
return false;
}
// EvenLighting
else if (tz.check("evenlighting"))
{
map.lighting_wallshade_h = 0;
map.lighting_wallshade_v = 0;
}
// SmoothLighting
else if (tz.check("smoothlighting"))
map.lighting_smooth = true;
// VertWallShade
else if (tz.check("vertwallshade"))
{
if (!checkEqualsToken(tz, "ZMapInfo"))
return false;
// TODO: Checks
tz.next().toInt(map.lighting_wallshade_v);
}
// HorzWallShade
else if (tz.check("horzwallshade"))
{
if (!checkEqualsToken(tz, "ZMapInfo"))
return false;
// TODO: Checks
tz.next().toInt(map.lighting_wallshade_h);
}
// ForceFakeContrast
else if (tz.check("forcefakecontrast"))
map.force_fake_contrast = true;
tz.adv();
}
