--- parser3/src/classes/void.C	2003/02/04 14:04:47	1.28.2.2
+++ parser3/src/classes/void.C	2004/03/02 16:55:28	1.32
@@ -1,19 +1,20 @@
 /** @file
 	Parser: @b VOID parser class.
 
-	Copyright (c) 2001-2003 ArtLebedev Group (http://www.artlebedev.com)
+	Copyright (c) 2001-2004 ArtLebedev Group (http://www.artlebedev.com)
 	Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
 */
 
-static const char* IDENT_VOID_C="$Date: 2003/02/04 14:04:47 $";
+static const char * const IDENT_VOID_C="$Date: 2004/03/02 16:55:28 $";
 
 #include "classes.h"
+#include "pa_vmethod_frame.h"
+
 #include "pa_request.h"
 #include "pa_vint.h"
 #include "pa_vdouble.h"
 #include "pa_vvoid.h"
 #include "pa_sql_connection.h"
-#include "pa_vmethod_frame.h"
 
 // class
 
@@ -26,40 +27,40 @@ public: // Methoded
 
 // global variable
 
-MethodedPtr void_class(new MVoid);
+DECLARE_CLASS_VAR(void, new MVoid, 0);
 
 // methods
 
-static void _length(Request& r, StringPtr /*method_name*/, MethodParams&  /*params*/) {
+static void _length(Request& r, MethodParams&) {
 	// always zero
-	r.write_no_lang(ValuePtr(new VInt(0)));
+	r.write_no_lang(*new VInt(0));
 }
 
-static void _pos(Request& r, StringPtr method_name, MethodParams& params) {
+static void _pos(Request& r, MethodParams& params) {
 	// just checking for consistency
 	params.as_no_junction(0, "substr must not be code");
 	// never found
-	r.write_no_lang(ValuePtr(new VInt(-1)));
+	r.write_no_lang(*new VInt(-1));
 }
 
-static void _int(Request& r, StringPtr /*method_name*/, MethodParams& params) {
-	VVoid& vvoid=*static_cast<VVoid *>(r.get_self().get());
-	r.write_no_lang(ValuePtr(new VInt(
-		params.count()==0?vvoid.as_int():params.as_int(0, "default must be int", r))));
+static void _int(Request& r, MethodParams& params) {
+	VVoid& vvoid=GET_SELF(r, VVoid);
+	r.write_no_lang(*new VInt(
+		params.count()==0?vvoid.as_int():params.as_int(0, "default must be int", r)));
 }
 
-static void _double(Request& r, StringPtr /*method_name*/, MethodParams& params) {
-	VVoid& vvoid=*static_cast<VVoid *>(r.get_self().get());
-	r.write_no_lang(ValuePtr(new VDouble(
-		params.count()==0?vvoid.as_double():params.as_double(0, "default must be double", r))));
+static void _double(Request& r, MethodParams& params) {
+	VVoid& vvoid=GET_SELF(r, VVoid);
+	r.write_no_lang(*new VDouble(
+		params.count()==0?vvoid.as_double():params.as_double(0, "default must be double", r)));
 }
 
 #ifndef DOXYGEN
 class Void_sql_event_handlers: public SQL_Driver_query_event_handlers {
-	StringPtr statement_string;
+	const String& statement_string;
 public:
-	Void_sql_event_handlers(StringPtr astatement_string): statement_string(astatement_string) {}
-	bool add_column(SQL_Error& /*error*/, void *ptr, size_t size) { /* ignore */ return false; }
+	Void_sql_event_handlers(const String& astatement_string): statement_string(astatement_string) {}
+	bool add_column(SQL_Error& /*error*/, const char* /*str*/, size_t /*length*/) { /* ignore */ return false; }
 	bool before_rows(SQL_Error& error) {
 		// there are some result rows, which is wrong
 		error=SQL_Error("parser.runtime",
@@ -68,24 +69,52 @@ public:
 		return true;
 	}
 	bool add_row(SQL_Error& /*error*/) { /* never */ return false; }
-	bool add_row_cell(SQL_Error& /*error*/, void *ptr, size_t size) { /* never */ return false; }
+	bool add_row_cell(SQL_Error& /*error*/, const char* /*str*/, size_t /*length*/) { /* never */ return false; }
 
 };
 #endif
-static void _sql(Request& r, StringPtr method_name, MethodParams& params) {
-	ValuePtr statement=params.as_junction(0, "statement must be code");
+static void _sql(Request& r, MethodParams& params) {
+	Value& statement=params.as_junction(0, "statement must be code");
 
-	Temp_lang temp_lang(r, String::UL_SQL);
-	StringPtr statement_string=r.process_to_string(statement);
-	CharPtr statement_cstr=
-		statement_string->cstr(String::UL_UNSPECIFIED, r.connection(method_name));
+	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(method_name)->query(
+	r.connection()->query(
 		statement_cstr, 0, 0,
 		handlers,
 		statement_string);
 }
 
+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
 
 MVoid::MVoid(): Methoded("void") {
@@ -95,14 +124,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);
+
+	// ^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);
 }