--- parser3/src/classes/string.C	2004/06/22 14:12:57	1.141
+++ parser3/src/classes/string.C	2005/11/22 11:21:35	1.147
@@ -1,11 +1,11 @@
 /** @file
 	Parser: @b string 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_STRING_C="$Date: 2004/06/22 14:12:57 $";
+static const char * const IDENT_STRING_C="$Date: 2005/11/22 11:21:35 $";
 
 #include "classes.h"
 #include "pa_vmethod_frame.h"
@@ -54,8 +54,6 @@ static void _length(Request& r, MethodPa
 static void _int(Request& r, MethodParams& params) {
 	const String& self_string=GET_SELF(r, VString).string();
 	int converted;
-	Value* default_code=params.count()>0?&params.as_junction(0, "default must be int")
-		:0; // (default)
 	try {
 		if(self_string.is_empty())
 			throw Exception("parser.runtime",
@@ -63,8 +61,8 @@ static void _int(Request& r, MethodParam
 				"parameter is empty string, error converting");
 		converted=self_string.as_int();
 	} catch(...) { // convert problem
-		if(default_code)
-			converted=r.process_to_value(*default_code).as_int();
+		if(params.count()>0)
+			converted=params.as_int(0, "default must be int", r); // (default)
 		else
 			rethrow; // we have a problem when no default			
 	}
@@ -74,8 +72,6 @@ static void _int(Request& r, MethodParam
 static void _double(Request& r, MethodParams& params) {
 	const String& self_string=GET_SELF(r, VString).string();
 	double converted;
-	Value* default_code=params.count()>0?&params.as_junction(0, "default must be double")
-		:0; // (default)
 	try {
 		if(self_string.is_empty())
 			throw Exception("parser.runtime",
@@ -83,8 +79,8 @@ static void _double(Request& r, MethodPa
 				"parameter is empty string, error converting");
 		converted=self_string.as_double();
 	} catch(...) { // convert problem
-		if(default_code)
-			converted=r.process_to_value(*default_code).as_double();
+		if(params.count()>0)
+			converted=params.as_double(0, "default must be double", r); // (default)
 		else
 			rethrow; // we have a problem when no default
 	}
@@ -433,7 +429,7 @@ const String* sql_result_string(Request&
 	default_code=0;
 	if(params.count()>1) {
 		Value& voptions=params.as_no_junction(1, "options must be hash, not code");
-		if(!voptions.is_string())
+		if(voptions.is_defined() && !voptions.is_string())
 			if((options=voptions.get_hash())) {
 				int valid_options=0;
 				if(Value* vbind=options->get(sql_bind_name)) {
@@ -478,7 +474,7 @@ const String* sql_result_string(Request&
 	String_sql_event_handlers handlers(statement_string, statement_cstr);
 	r.connection()->query(
 		statement_cstr, 
-		0, 0,
+		placeholders_count, placeholders,
 		offset, limit, 
 		handlers,
 		statement_string);
@@ -591,6 +587,24 @@ static void _append(Request& r, MethodPa
 	va.set_string(c);
 }
 
+static void _base64(Request& r, MethodParams& params) {
+	if(params.count()) {
+		// decode
+		const char* cstr=params.as_string(0, "parameter must be string").cstr();
+		void* decoded_cstr=0;
+		size_t decoded_size=0;
+		pa_base64_decode(cstr, strlen(cstr), decoded_cstr, decoded_size);
+		if(decoded_cstr && decoded_size)
+			r.write_assign_lang(*new String(static_cast<const char*>(decoded_cstr), decoded_size, true));
+	} else {
+		// encode 
+		VString& vself=GET_SELF(r, VString);
+		const char* cstr=vself.string().cstr();
+		const char* encoded=pa_base64_encode(cstr, strlen(cstr));
+		r.write_assign_lang(*new String(encoded, 0, true/*once ?param=base64(something) was needed*/));
+	}
+}
+
 // constructor
 
 MString::MString(): Methoded("string") {
@@ -653,4 +667,8 @@ MString::MString(): Methoded("string") {
 
 	// ^string.append[string]
 	add_native_method("append", Method::CT_DYNAMIC, _append, 1, 1);
+
+	// ^string.base64[] << encode
+	// ^string:base64[encoded string] << decode	
+	add_native_method("base64", Method::CT_ANY, _base64, 0, 1);
 }