Added scripting support; not yet integrated with the rest of the app.

git-svn-id: svn://svn.code.sf.net/p/magicseteditor/code/trunk@13 0fc631ac-6414-0410-93d0-97cfa31319b6

src/script/context.hpp

@@ -0,0 +1,99 @@
+//+----------------------------------------------------------------------------+
+//| Description:  Magic Set Editor - Program to make Magic (tm) cards          |
+//| Copyright:    (C) 2001 - 2006 Twan van Laarhoven                           |
+//| License:      GNU General Public License 2 or later (see file COPYING)     |
+//+----------------------------------------------------------------------------+
+
+#ifndef HEADER_SCRIPT_CONTEXT
+#define HEADER_SCRIPT_CONTEXT
+
+// ----------------------------------------------------------------------------- : Includes
+
+#include <script/script.hpp>
+
+class Dependency;
+
+// ----------------------------------------------------------------------------- : VectorIntMap
+
+/// A map like data structure that stores the elements in a vector.
+/** K should be an integer type, the keys should be dense. */
+template <typename K, typename V>
+class VectorIntMap {
+  public:
+	inline V& operator [] (K key) {
+		if (values.size() <= key) {
+			values.resize(key + 1);
+		}
+		return values[key];
+	}
+  private:
+	vector<V> values;
+};
+
+// ----------------------------------------------------------------------------- : Context
+
+/// Context for script evaluation
+class Context {
+  public:
+	Context();
+	
+	/// Evaluate a script inside this context.
+	/** This function is safely reentrant.
+	 *  @param openScope if false, variables set in this eval call will leak out.
+	 */
+	ScriptValueP eval(const Script& script, bool openScope = true);
+	
+	/// Analyze the dependencies of a script
+	/** All things the script depends on are marked with signalDependent(dep).
+	 *  The return value of this function should be ignored
+	 */
+	ScriptValueP dependencies(const Dependency& dep, const Script& script);
+		
+	/// Set a variable to a new value (in the current scope)
+	void setVariable(const String& name, const ScriptValueP& value);
+	
+	/// Get the value of a variable, throws if it not set
+	ScriptValueP getVariable(const String& name);
+	/// Get the value of a variable, returns nil if it is not set
+	ScriptValueP getVariableOrNil(const String& name);
+	
+  public:// public for FOR_EACH
+	/// Record of a variable
+	struct Variable {
+		unsigned int level; ///< Scope level on which this variable was set
+		ScriptValueP value; ///< Value of this variable
+	};
+	/// Record of a variable binding that is being shadowed (overwritten) by another binding
+	struct Binding {
+		int      variable; ///< Name of the overwritten variable.
+		Variable value;    ///< Old value of that variable.
+	};
+  private:
+	/// Variables, indexed by integer naem (using stringToVariable)
+	VectorIntMap<unsigned int, Variable> variables;
+	/// Shadowed variable bindings
+	vector<Binding> shadowed;
+	/// Number of scopes opened
+	unsigned int level;
+	/// Stack of values
+	vector<ScriptValueP> stack;	
+	
+	// utility types for dependency analysis
+	struct Jump;
+	struct JumpOrder;
+	
+	/// Set a variable to a new value (in the current scope)
+	void setVariable(int name, const ScriptValueP& value);
+	/// Open a new scope
+	/** returns the number of shadowed binding before that scope */
+	size_t openScope();
+	/// Close a scope, must be passed a value from openScope
+	void closeScope(size_t scope);
+	/// Return the bindings in the current scope
+	void getBindings(size_t scope, vector<Binding>&);
+	/// Remove all bindings made in the current scope
+	void resetBindings(size_t scope);
+};
+
+// ----------------------------------------------------------------------------- : EOF
+#endif