--- parser3/src/classes/file.C	2008/02/14 09:10:23	1.166
+++ parser3/src/classes/file.C	2008/07/03 09:18:52	1.172
@@ -5,7 +5,7 @@
 	Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
 */
 
-static const char * const IDENT_FILE_C="$Date: 2008/02/14 09:10:23 $";
+static const char * const IDENT_FILE_C="$Date: 2008/07/03 09:18:52 $";
 
 #include "pa_config_includes.h"
 
@@ -232,8 +232,7 @@ static void _load(Request& r, MethodPara
 		:lfile_name.cstr(String::L_FILE_SPEC);
 
 	Value* vcontent_type=0;
-	if(file.headers)
-	{
+	if(file.headers){
 		if(Value* remote_content_type=file.headers->get("CONTENT-TYPE"))
 			vcontent_type=new VString(*new String(remote_content_type->as_string().cstr()));
 	} 
@@ -242,8 +241,21 @@ static void _load(Request& r, MethodPara
 	
 	VFile& self=GET_SELF(r, VFile);
 	self.set(true/*tainted*/, file.str, file.length, user_file_name, vcontent_type);
-	if(file.headers)
+
+	if(file.headers){
 		file.headers->for_each<HashStringValue*>(_load_pass_param, &self.fields());
+	} else {
+		size_t size;
+		time_t atime, mtime, ctime;
+
+		file_stat(lfile_name, size, atime, mtime, ctime);
+	
+		HashStringValue& ff=self.fields();
+		ff.put(adate_name, new VDate(atime));
+		ff.put(mdate_name, new VDate(mtime));
+		ff.put(cdate_name, new VDate(ctime));
+	}
+
 }
 
 static void _create(Request& r, MethodParams& params) {
@@ -276,13 +288,15 @@ static void _stat(Request& r, MethodPara
 		size,
 		atime, mtime, ctime);
 	
+	const char* user_file_name=lfile_name.cstr(String::L_FILE_SPEC);
+
 	VFile& self=GET_SELF(r, VFile);
-	self.set(true/*tainted*/, 0/*no bytes*/, size);
+
+	self.set(true/*tainted*/, 0/*no bytes*/, size, user_file_name, new VString(r.mime_type_of(user_file_name)));
 	HashStringValue& ff=self.fields();
 	ff.put(adate_name, new VDate(atime));
 	ff.put(mdate_name, new VDate(mtime));
 	ff.put(cdate_name, new VDate(ctime));
-	ff.put(content_type_name, new VString(r.mime_type_of(lfile_name.cstr(String::L_FILE_SPEC))));
 }
 
 static bool is_safe_env_key(const char* key) {
@@ -351,11 +365,6 @@ static void append_to_argv(Request& r, A
 	}
 }
 
-inline size_t strpos(const char *s1, const char *s2) {
-	const char *p = strstr(s1, s2);
-	return (p==0)?STRING_NOT_FOUND:p-s1;
-}
-
 /// @todo fix `` in perl - they produced flipping consoles and no output to perl
 static void _exec_cgi(Request& r, MethodParams& params,
 					  bool cgi) {
@@ -863,9 +872,10 @@ static void _sql(Request& r, MethodParam
 		statement_string.cstr(String::L_UNSPECIFIED, r.connection());
 	File_sql_event_handlers handlers(statement_string, statement_cstr);
 
+	ulong offset=0;
+
 	if(params.count()>1)
-		if(HashStringValue* options=
-			params.as_no_junction(1, PARAM_MUST_NOT_BE_CODE).get_hash()) {
+		if(HashStringValue* options=params.as_no_junction(1, PARAM_MUST_NOT_BE_CODE).get_hash()){
 			int valid_options=0;
 			if(Value* vfilename=options->get(NAME_NAME)) {
 				valid_options++;
@@ -875,6 +885,10 @@ static void _sql(Request& r, MethodParam
 				valid_options++;
 				handlers.user_content_type=&vcontent_type->as_string();
 			}
+			if(Value* voffset=options->get(sql_offset_name)) {
+				valid_options++;
+				offset=(ulong)r.process_to_value(*voffset).as_double();
+			}
 			if(valid_options!=options->count())
 				throw Exception(PARSER_RUNTIME,
 					0,
@@ -885,7 +899,7 @@ static void _sql(Request& r, MethodParam
 	r.connection()->query(
 		statement_cstr, 
 		0, 0,
-		0, 0, 
+		offset, 1/*limit*/,
 		handlers,
 		statement_string);