scummvm/engines/zvision/scr_file_handling.cpp
richiesams 77219705e6 ZVISION: Prevent endless looping due to incorrect file structure
Some of the .scr files don't properly close the last curly brace
2013-08-18 19:52:58 -05:00

330 lines
9.3 KiB
C++

/* ScummVM - Graphic Adventure Engine
*
* ScummVM is the legal property of its developers, whose names
* are too numerous to list here. Please refer to the COPYRIGHT
* file distributed with this source distribution.
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License
* as published by the Free Software Foundation; either version 2
* of the License, or (at your option) any later version.
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
*
*/
#include "common/scummsys.h"
#include "zvision/script_manager.h"
#include "zvision/utility.h"
#include "zvision/puzzle.h"
#include "zvision/actions.h"
#include "common/textconsole.h"
#include "common/file.h"
#include "common/tokenizer.h"
namespace ZVision {
void ScriptManager::parseScrFile(const Common::String &fileName, bool isGlobal) {
Common::File file;
if (!file.open(fileName)) {
warning("Script file not found: %s", fileName.c_str());
return;
}
while(!file.eos()) {
Common::String line = file.readLine();
if (file.err()) {
warning("Error parsing scr file: %s", fileName.c_str());
return;
}
trimCommentsAndWhiteSpace(&line);
if (line.empty())
continue;
if (line.matchString("puzzle:*", true)) {
Puzzle puzzle;
sscanf(line.c_str(),"puzzle:%u",&(puzzle.key));
parsePuzzle(puzzle, file);
if (isGlobal) {
_globalPuzzles.push_back(puzzle);
} else {
_activePuzzles.push_back(puzzle);
}
} else if (line.matchString("control:*", true)) {
Common::SharedPtr<Control> control;
// Some controls don't require nodes. They just initialize the scene
if (parseControl(line, file, control)) {
_activeControls.push_back(control);
}
}
}
}
void ScriptManager::parsePuzzle(Puzzle &puzzle, Common::SeekableReadStream &stream) {
Common::String line = stream.readLine();
trimCommentsAndWhiteSpace(&line);
while (!stream.eos() && !line.contains('}')) {
if (line.matchString("criteria {", true)) {
Puzzle::Criteria criteria;
if (parseCriteria(&criteria, stream)) {
puzzle.criteriaList.push_back(criteria);
}
} else if (line.matchString("results {", true)) {
parseResults(stream, puzzle.resultActions);
} else if (line.matchString("flags {", true)) {
puzzle.flags = parseFlags(stream);
}
line = stream.readLine();
trimCommentsAndWhiteSpace(&line);
}
}
bool ScriptManager::parseCriteria(Puzzle::Criteria *criteria, Common::SeekableReadStream &stream) const {
// Loop until we find the closing brace
Common::String line = stream.readLine();
trimCommentsAndWhiteSpace(&line);
// Criteria can be empty
if (line.contains('}')) {
return false;
}
while (!stream.eos() && !line.contains('}')) {
// Split the string into tokens using ' ' as a delimiter
Common::StringTokenizer tokenizer(line);
Common::String token;
// Parse the id out of the first token
token = tokenizer.nextToken();
sscanf(token.c_str(), "[%u]", &(criteria->key));
// Parse the operator out of the second token
token = tokenizer.nextToken();
if (token.c_str()[0] == '=')
criteria->criteriaOperator = Puzzle::EQUAL_TO;
else if (token.c_str()[0] == '!')
criteria->criteriaOperator = Puzzle::NOT_EQUAL_TO;
else if (token.c_str()[0] == '>')
criteria->criteriaOperator = Puzzle::GREATER_THAN;
else if (token.c_str()[0] == '<')
criteria->criteriaOperator = Puzzle::LESS_THAN;
// First determine if the last token is an id or a value
// Then parse it into 'argument'
token = tokenizer.nextToken();
if (token.contains('[')) {
sscanf(token.c_str(), "[%u]", &(criteria->argument));
criteria->argumentIsAKey = true;
} else {
sscanf(token.c_str(), "%u", &(criteria->argument));
criteria->argumentIsAKey = false;
}
line = stream.readLine();
trimCommentsAndWhiteSpace(&line);
}
return true;
}
void ScriptManager::parseResults(Common::SeekableReadStream &stream, Common::List<Common::SharedPtr<ResultAction> > &actionList) const {
// Loop until we find the closing brace
Common::String line = stream.readLine();
trimCommentsAndWhiteSpace(&line);
// TODO: Re-order the if-then statements in order of highest occurrence
while (!stream.eos() && !line.contains('}')) {
if (line.empty()) {
line = stream.readLine();
trimCommentsAndWhiteSpace(&line);
continue;
}
// Parse for the action type
if (line.matchString("*:add*", true)) {
actionList.push_back(Common::SharedPtr<ResultAction>(new ActionAdd(line)));
} else if (line.matchString("*:animplay*", true)) {
actionList.push_back(Common::SharedPtr<ResultAction>(new ActionPlayAnimation(line)));
} else if (line.matchString("*:animpreload*", true)) {
actionList.push_back(Common::SharedPtr<ResultAction>(new ActionPreloadAnimation(line)));
} else if (line.matchString("*:animunload*", true)) {
//actionList.push_back(Common::SharedPtr<ResultAction>(new ActionUnloadAnimation(line)));
} else if (line.matchString("*:attenuate*", true)) {
} else if (line.matchString("*:assign*", true)) {
} else if (line.matchString("*:change_location*", true)) {
actionList.push_back(Common::SharedPtr<ResultAction>(new ActionChangeLocation(line)));
} else if (line.matchString("*:crossfade*", true)) {
} else if (line.matchString("*:debug*", true)) {
} else if (line.matchString("*:delay_render*", true)) {
} else if (line.matchString("*:disable_control*", true)) {
} else if (line.matchString("*:disable_venus*", true)) {
} else if (line.matchString("*:display_message*", true)) {
} else if (line.matchString("*:dissolve*", true)) {
} else if (line.matchString("*:distort*", true)) {
} else if (line.matchString("*:enable_control*", true)) {
} else if (line.matchString("*:flush_mouse_events*", true)) {
} else if (line.matchString("*:inventory*", true)) {
} else if (line.matchString("*:kill*", true)) {
} else if (line.matchString("*:menu_bar_enable*", true)) {
} else if (line.matchString("*:music*", true)) {
actionList.push_back(Common::SharedPtr<ResultAction>(new ActionMusic(line)));
} else if (line.matchString("*:pan_track*", true)) {
} else if (line.matchString("*:playpreload*", true)) {
} else if (line.matchString("*:preferences*", true)) {
} else if (line.matchString("*:quit*", true)) {
actionList.push_back(Common::SharedPtr<ResultAction>(new ActionQuit()));
} else if (line.matchString("*:random*", true)) {
} else if (line.matchString("*:region*", true)) {
} else if (line.matchString("*:restore_game*", true)) {
} else if (line.matchString("*:rotate_to*", true)) {
} else if (line.matchString("*:save_game*", true)) {
} else if (line.matchString("*:set_partial_screen*", true)) {
} else if (line.matchString("*:set_screen*", true)) {
actionList.push_back(Common::SharedPtr<ResultAction>(new ActionSetScreen(line)));
} else if (line.matchString("*:set_venus*", true)) {
} else if (line.matchString("*:stop*", true)) {
} else if (line.matchString("*:streamvideo*", true)) {
actionList.push_back(Common::SharedPtr<ResultAction>(new ActionStreamVideo(line)));
} else if (line.matchString("*:syncsound*", true)) {
} else if (line.matchString("*:timer*", true)) {
} else if (line.matchString("*:ttytext*", true)) {
} else if (line.matchString("*:universe_music*", true)) {
} else if (line.matchString("*:copy_file*", true)) {
// Not used. Purposely left empty
} else {
warning("Unhandled result action type: %s", line.c_str());
}
line = stream.readLine();
trimCommentsAndWhiteSpace(&line);
}
return;
}
uint ScriptManager::parseFlags(Common::SeekableReadStream &stream) const {
uint flags = 0;
// Loop until we find the closing brace
Common::String line = stream.readLine();
trimCommentsAndWhiteSpace(&line);
while (!stream.eos() && !line.contains('}')) {
if (line.matchString("ONCE_PER_INST", true)) {
flags |= Puzzle::ONCE_PER_INST;
} else if (line.matchString("DO_ME_NOW", true)) {
flags |= Puzzle::DO_ME_NOW;
} else if (line.matchString("DISABLED", true)) {
flags |= Puzzle::DISABLED;
}
line = stream.readLine();
trimCommentsAndWhiteSpace(&line);
}
return flags;
}
bool ScriptManager::parseControl(Common::String &line, Common::SeekableReadStream &stream, Common::SharedPtr<Control> &control) {
uint32 key;
char controlTypeBuffer[20];
sscanf(line.c_str(), "control:%u %s {", &key, controlTypeBuffer);
Common::String controlType(controlTypeBuffer);
if (controlType.equalsIgnoreCase("push_toggle")) {
Control::parsePushToggleControl(key, _engine, stream);
return false;
} else if (controlType.equalsIgnoreCase("flat")) {
Control::parseFlatControl(_engine);
return false;
} else if (controlType.equalsIgnoreCase("pana")) {
Control::parsePanoramaControl(_engine, stream);
return false;
}
else if (controlType.equalsIgnoreCase("tilt")) {
Control::parseTiltControl(_engine, stream);
return false;
}
return true;
}
} // End of namespace ZVision