--- parser3/src/classes/void.C	2004/02/11 15:33:13	1.31
+++ parser3/src/classes/void.C	2005/08/26 12:01:38	1.36
@@ -1,11 +1,11 @@
 /** @file
 	Parser: @b VOID parser class.
 
-	Copyright (c) 2001-2004 ArtLebedev Group (http://www.artlebedev.com)
+	Copyright (c) 2001-2005 ArtLebedev Group (http://www.artlebedev.com)
 	Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
 */
 
-static const char * const IDENT_VOID_C="$Date: 2004/02/11 15:33:13 $";
+static const char * const IDENT_VOID_C="$Date: 2005/08/26 12:01:38 $";
 
 #include "classes.h"
 #include "pa_vmethod_frame.h"
@@ -16,6 +16,10 @@ static const char * const IDENT_VOID_C="
 #include "pa_vvoid.h"
 #include "pa_sql_connection.h"
 
+// externs
+
+extern String sql_bind_name;
+
 // class
 
 class MVoid: public Methoded {
@@ -73,18 +77,80 @@ public:
 
 };
 #endif
+
+extern int marshal_binds(HashStringValue& hash, SQL_Driver::Placeholder*& placeholders);
+extern void unmarshal_bind_updates(HashStringValue& hash, int placeholder_count, SQL_Driver::Placeholder* placeholders);
+
 static void _sql(Request& r, MethodParams& params) {
 	Value& statement=params.as_junction(0, "statement must be code");
 
+	HashStringValue* bind=0;
+	if(params.count()>1) {
+		Value& voptions=params.as_no_junction(1, "options must be hash, not code");
+		if(voptions.is_defined() && !voptions.is_string())
+			if(HashStringValue* options=voptions.get_hash()) {
+				int valid_options=0;
+				if(Value* vbind=options->get(sql_bind_name)) {
+					valid_options++;
+					bind=vbind->get_hash();
+				}
+				if(valid_options!=options->count())
+					throw Exception("parser.runtime",
+						0,
+						"called with invalid option");
+			} else
+				throw Exception("parser.runtime",
+					0,
+					"options must be hash");
+	}
+
+	SQL_Driver::Placeholder* placeholders=0;
+	uint placeholders_count=0;
+	if(bind)
+		placeholders_count=marshal_binds(*bind, placeholders);
+
 	Temp_lang temp_lang(r, String::L_SQL);
 	const String& statement_string=r.process_to_string(statement);
 	const char* statement_cstr=
 		statement_string.cstr(String::L_UNSPECIFIED, r.connection());
 	Void_sql_event_handlers handlers(statement_string);
 	r.connection()->query(
-		statement_cstr, 0, 0,
+		statement_cstr, 
+		placeholders_count, placeholders,
+		0, 0,
 		handlers,
 		statement_string);
+
+	if(bind)
+		unmarshal_bind_updates(*bind, placeholders_count, placeholders);
+}
+
+static void _left_right(Request& r, MethodParams& params) {
+	ssize_t sn=params.as_int(0, "n must be int", r);
+	if(sn<0)
+		throw Exception("parser.runtime",
+			0, 
+			"n(%d) must be >=0", sn);
+
+	// return nothing
+}
+
+static void _mid(Request& r, MethodParams& params) {
+	ssize_t sbegin=params.as_int(0, "p must be int", r);
+	if(sbegin<0)
+		throw Exception("parser.runtime",
+			0, 
+			"p(%d) must be >=0", sbegin);
+
+	if(params.count()>1) {
+		ssize_t sn=params.as_int(1, "n must be int", r);
+		if(sn<0)
+			throw Exception("parser.runtime",
+				0, 
+				"n(%d) must be >=0", sn);
+	}
+
+	// return nothing
 }
 
 // constructor
@@ -96,14 +162,21 @@ MVoid::MVoid(): Methoded("void") {
 	// ^void.pos[substr]
 	add_native_method("pos", Method::CT_DYNAMIC, _pos, 1, 1);
 
-	// ^void.int[] 
+	// ^void.int[]
 	// ^void.int(default)
 	add_native_method("int", Method::CT_DYNAMIC, _int, 0, 1);
 
-	// ^void.double[] 
+	// ^void.double[]
 	// ^void.double(default)
 	add_native_method("double", Method::CT_DYNAMIC, _double, 0, 1);
 
 	// ^sql[query]
-	add_native_method("sql", Method::CT_STATIC, _sql, 1, 1);
+	add_native_method("sql", Method::CT_STATIC, _sql, 1, 2);
+
+	// ^void.left() ^void.right()
+	add_native_method("left", Method::CT_DYNAMIC, _left_right, 1, 1);
+	add_native_method("right", Method::CT_DYNAMIC, _left_right, 1, 1);
+
+	// ^void.mid(p;n)
+	add_native_method("mid", Method::CT_DYNAMIC, _mid, 1, 2);
 }