Initial commit

engines/hdb/lua-script.h

@@ -0,0 +1,99 @@
+/* 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 3 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, see <http://www.gnu.org/licenses/>.
+ *
+ */
+
+#ifndef HDB_LUA_SCRIPT_H
+#define HDB_LUA_SCRIPT_H
+
+struct lua_State;
+
+namespace HDB {
+
+struct Global {
+	char	global[32];			// name of global variable
+	int		valueOrString;	// value = 0, string = 1
+	double	value;				// value
+	char	string[32];			// string
+
+	Global() : valueOrString(0), value(0) {
+		global[0] = 0;
+		string[0] = 0;
+	}
+};
+
+class LuaScript {
+public:
+	LuaScript();
+	~LuaScript();
+
+	bool loadLua(const char *name);
+	void saveGlobalNumber(const char *global, double value);
+	void saveGlobalString(const char *global, const char *string);
+	void loadGlobal(const char *global);
+	void purgeGlobals();
+	void save(Common::OutSaveFile *out);
+	void loadSaveFile(Common::InSaveFile *in);
+
+	void init();
+	bool initScript(Common::SeekableReadStream *stream, const char *scriptName, int32 length);
+
+	void pushInt(int value);
+	void pushString(char *string);
+	void pushFunction(char *func);
+	void call(int args, int returns);
+	bool callFunction(const char *name, int returns);
+	void invokeLuaFunction(char *luaFunc, int x, int y, int value1, int value2);
+
+	bool executeMPC(Common::SeekableReadStream *stream, const char *name, const char *scriptName, int32 length);
+	bool executeFile(const Common::String &filename);
+	bool executeChunk(Common::String &chunk, const Common::String &chunkName) const;
+	void checkParameters(const char *func, int params);
+
+	const char *getStringOffStack();
+
+	void setLuaGlobalValue(const char *name, int value);
+	bool isValid() {
+		return _systemInit;
+	}
+
+	// Platform-specific Constants
+	int _cameraXOff;
+	int _cameraYOff;
+
+private:
+	lua_State *_state;
+	int _pcallErrorhandlerRegistryIndex;
+
+	Common::SeekableReadStream* _globalLuaStream;
+	int32 _globalLuaLength;
+	bool _systemInit;
+
+	bool registerExtensions();
+	void stripComments(char *chunk);
+	void addPatches(Common::String &chunk, const char *scriptName);
+
+	Common::Array<Global *> _globals;
+};
+
+void lua_printstack(lua_State *L);
+
+}
+
+#endif // !HDB_LUA_SCRIPT_H