--- parser3/src/classes/file.C	2008/02/14 09:10:23	1.166
+++ parser3/src/classes/file.C	2008/06/07 17:30:33	1.170
@@ -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/06/07 17:30:33 $";
 
 #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) {