X-Git-Url: https://git.ucc.asn.au/?a=blobdiff_plain;f=Usermode%2Finclude%2Fspiderscript.h;h=e0497305523d6dffc2cbc590cb14e78c72f0fc54;hb=f12d3444d2efeae97f8a4fc7ecf65b23087a653a;hp=e6fdaab2101f1726e4044dd8cda52cfedb35afd0;hpb=5e007006d5b007c29268e4c949a8c9d472233257;p=tpg%2Facess2.git

diff --git a/Usermode/include/spiderscript.h b/Usermode/include/spiderscript.h
index e6fdaab2..e0497305 100644
--- a/Usermode/include/spiderscript.h
+++ b/Usermode/include/spiderscript.h
@@ -51,7 +51,7 @@ enum eSpiderScript_DataTypes
 	 */
 	SS_DATATYPE_OBJECT,
 	/**
-	 * \brief Array data type
+	 * \brief Array data type (invalid when using static typing)
 	 */
 	SS_DATATYPE_ARRAY,
 	/**
@@ -65,6 +65,31 @@ enum eSpiderScript_DataTypes
 	NUM_SS_DATATYPES
 };
 
+#define SS_MAKEARRAY(_type)	((_type) + 0x10000)
+#define SS_DOWNARRAY(_type)	((_type) - 0x10000)
+#define SS_GETARRAYDEPTH(_type)	((_type) >> 16)
+
+enum eSpiderValueOps
+{
+	SS_VALUEOP_NOP,
+
+	SS_VALUEOP_ADD,
+	SS_VALUEOP_SUBTRACT,
+	SS_VALUEOP_NEGATE,
+	SS_VALUEOP_MULIPLY,
+	SS_VALUEOP_DIVIDE,
+	SS_VALUEOP_MODULO,
+
+	SS_VALUEOP_BITNOT,
+	SS_VALUEOP_BITAND,
+	SS_VALUEOP_BITOR,
+	SS_VALUEOP_BITXOR,
+
+	SS_VALUEOP_SHIFTLEFT,
+	SS_VALUEOP_SHIFTRIGHT,
+	SS_VALUEOP_ROTATELEFT
+};
+
 /**
  * \brief Namespace definition
  */
@@ -111,7 +136,7 @@ struct sSpiderValue
 	 int	ReferenceCount;	//!< Reference count
 	
 	union {
-		uint64_t	Integer;	//!< Integer data
+		int64_t	Integer;	//!< Integer data
 		double	Real;	//!< Real Number data
 		/**
 		 * \brief String data
@@ -215,6 +240,12 @@ struct sSpiderFunction
 	 * \brief Function handler
 	 */
 	tSpiderValue	*(*Handler)(tSpiderScript *Script, int nParams, tSpiderValue **Parameters);
+
+	/**
+	 * \brief What type is returned
+	 */
+	 int	ReturnType;	
+
 	/**
 	 * \brief Argument types
 	 * 
@@ -242,10 +273,34 @@ extern tSpiderScript	*SpiderScript_ParseFile(tSpiderVariant *Variant, const char
  * \return Return value
  */
 extern tSpiderValue	*SpiderScript_ExecuteFunction(tSpiderScript *Script,
-	tSpiderNamespace *Namespace, const char *Function,
+	const char *Function, const char *DefaultNamespaces[],
+	int NArguments, tSpiderValue **Arguments,
+	void **FunctionIdent
+	);
+/**
+ * \brief Execute an object method
+ */
+extern tSpiderValue	*SpiderScript_ExecuteMethod(tSpiderScript *Script,
+	tSpiderObject *Object, const char *MethodName,
+	int NArguments, tSpiderValue **Arguments
+	);
+/**
+ * \brief Creates an object instance
+ */
+extern tSpiderValue	*SpiderScript_CreateObject(tSpiderScript *Script,
+	const char *ClassName, const char *DefaultNamespaces[],
 	int NArguments, tSpiderValue **Arguments
 	);
 
+/**
+ * \brief Convert a script to bytecode and save to a file
+ */
+extern int	SpiderScript_SaveBytecode(tSpiderScript *Script, const char *DestFile);
+/**
+ * \brief Save the AST of a script to a file
+ */
+extern int	SpiderScript_SaveAST(tSpiderScript *Script, const char *Filename);
+
 /**
  * \brief Free a script
  * \param Script	Script structure to free
@@ -258,13 +313,18 @@ extern tSpiderObject	*SpiderScript_AllocateObject(tSpiderObjectDef *Class, int E
  * \name tSpiderValue Manipulation functions
  * \{
  */
+extern void	SpiderScript_DereferenceValue(tSpiderValue *Object);
+extern void	SpiderScript_ReferenceValue(tSpiderValue *Object);
 extern tSpiderValue	*SpiderScript_CreateInteger(uint64_t Value);
 extern tSpiderValue	*SpiderScript_CreateReal(double Value);
 extern tSpiderValue	*SpiderScript_CreateString(int Length, const char *Data);
+extern tSpiderValue	*SpiderScript_StringConcat(const tSpiderValue *Str1, const tSpiderValue *Str2);
 extern tSpiderValue	*SpiderScript_CastValueTo(int Type, tSpiderValue *Source);
 extern int	SpiderScript_IsValueTrue(tSpiderValue *Value);
 extern void	SpiderScript_FreeValue(tSpiderValue *Value);
 extern char	*SpiderScript_DumpValue(tSpiderValue *Value);
+
+extern tSpiderValue	*SpiderScript_DoOp(tSpiderValue *Left, enum eSpiderValueOps Op, int bCanCast, tSpiderValue *Right);
 /**
  * \}
  */