1 files changed, 287 insertions, 0 deletions
diff --git a/engines/zvision/scr_file_handling.cpp b/engines/zvision/scr_file_handling.cpp
new file mode 100644
index 0000000000..61feb12b7e
--- /dev/null
+++ b/engines/zvision/scr_file_handling.cpp
@@ -0,0 +1,287 @@
+/* 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 <stdio.h>
+
+#include "zvision/scriptManager.h"
+#include "zvision/utility.h"
+#include "zvision/puzzle.h"
+
+#include "common/textconsole.h"
+#include "common/file.h"
+#include "common/tokenizer.h"
+
+namespace ZVision {
+
+void ScriptManager::parseScrFile(Common::String fileName) {
+	Common::File file;
+	if (!file.open(fileName))
+		return; // File.open already throws a warning if the file doesn't exist, so there is no need to throw another
+
+	while(!file.eos()) {
+		Common::String line = file.readLine();
+		if (file.err()) {
+			warning("Error parsing scr file: %s", fileName);
+			return;
+		}
+
+		trimCommentsAndWhiteSpace(line);
+		if (line.empty())
+			continue;
+
+		if (line.matchString("puzzle:*", true)) {
+			Puzzle puzzle;
+			sscanf(line.c_str(),"puzzle:%u",&(puzzle.id));
+
+			parsePuzzle(puzzle, file);
+			_puzzles.push_back(puzzle);
+		} else if (line.matchString("control:*", true)) {
+			Control control;
+			char controlType[20];
+			sscanf(line.c_str(),"control:%u %s",&(control.id), controlType);
+
+			parseControl(control, file);
+			_controls.push_back(control);
+		}
+	}
+}
+
+void ScriptManager::parsePuzzle(Puzzle &puzzle, Common::SeekableReadStream &stream) {
+	Common::String line = stream.readLine();
+	trimCommentsAndWhiteSpace(line);
+
+	while (!line.contains('}')) {
+		if (line.matchString("criteria {", true))
+			puzzle.criteriaList.push_back(parseCriteria(stream));
+		else if (line.matchString("results {", true))
+			parseResult(stream, puzzle.resultActions);
+		else if (line.matchString("flags {", true))
+			puzzle.flags = parseFlags(stream);
+	}
+}
+
+Criteria ScriptManager::parseCriteria(Common::SeekableReadStream &stream) const {
+	Criteria criteria;
+
+	// Loop until we find the closing brace
+	Common::String line = stream.readLine();
+	trimCommentsAndWhiteSpace(line);
+
+	while (!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.id));
+
+		// Parse the operator out of the second token
+		token = tokenizer.nextToken();
+		if (token.c_str()[0] == '=')
+			criteria.criteriaOperator = EQUAL_TO;
+		else if (token.c_str()[0] == '!')
+			criteria.criteriaOperator = NOT_EQUAL_TO;
+		else if (token.c_str()[0] == '>')
+			criteria.criteriaOperator = GREATER_THAN;
+		else if (token.c_str()[0] == '<')
+			criteria.criteriaOperator = 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.isArgumentAnId = true;
+		} else {
+			sscanf(token.c_str(), "%u", &(criteria.argument));
+			criteria.isArgumentAnId = false;
+		}
+
+		line = stream.readLine();
+		trimCommentsAndWhiteSpace(line);
+	}
+
+	return criteria;
+}
+
+void ScriptManager::parseResult(Common::SeekableReadStream &stream, Common::List<ResultAction> &actionList) const {
+	// Loop until we find the closing brace
+	Common::String line = stream.readLine();
+	trimCommentsAndWhiteSpace(line);
+
+	while (!line.contains('}')) {
+		// Parse for the action type
+		if (line.matchString("*:add*", true)) {
+			actionList.push_back(ActionAdd(line));
+		} else if (line.matchString("*:animplay*", true)) {
+			
+
+		} else if (line.matchString("*:animpreload*", true)) {
+			
+
+		} else if (line.matchString("*:animunload*", true)) {
+			
+
+		} else if (line.matchString("*:attenuate*", true)) {
+			
+
+		} else if (line.matchString("*:assign*", true)) {
+			
+
+		} else if (line.matchString("*:change_location*", true)) {
+			
+
+		} 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)) {
+			
+
+		} 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)) {
+			
+
+		} 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)) {
+			
+
+		} else if (line.matchString("*:set_venus*", true)) {
+			
+
+		} else if (line.matchString("*:stop*", true)) {
+			
+
+		} else if (line.matchString("*:streamvideo*", true)) {
+			
+
+		} 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 {
+			warning("Unhandled result action type: ", line);
+		}
+
+		line = stream.readLine();
+		trimCommentsAndWhiteSpace(line);
+	}
+
+	return;
+}
+
+byte ScriptManager::parseFlags(Common::SeekableReadStream &stream) const {
+	byte flags;
+
+	// Loop until we find the closing brace
+	Common::String line = stream.readLine();
+	trimCommentsAndWhiteSpace(line);
+
+	while (!line.contains('}')) {
+		if (line.matchString("ONCE_PER_INST", true)) {
+			flags |= ONCE_PER_INST;
+		} else if (line.matchString("DO_ME_NOW", true)) {
+			flags |= DO_ME_NOW;
+		} else if (line.matchString("DISABLED", true)) {
+			flags |= DISABLED;
+		}
+	}
+
+	return flags;
+}
+
+void ScriptManager::parseControl(Control &control, Common::SeekableReadStream &stream) {
+
+}
+
+} // End of namespace ZVision