--- parser3/src/include/pa_request.h	2001/03/13 17:17:26	1.49
+++ parser3/src/include/pa_request.h	2001/03/18 14:45:26	1.59
@@ -3,7 +3,7 @@
 	Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
 	Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
 
-	$Id: pa_request.h,v 1.49 2001/03/13 17:17:26 paf Exp $
+	$Id: pa_request.h,v 1.59 2001/03/18 14:45:26 paf Exp $
 */
 
 #ifndef PA_REQUEST_H
@@ -18,17 +18,8 @@
 #include "pa_vobject.h"
 #include "pa_venv.h"
 #include "pa_vform.h"
-
-#define UNNAMED_NAME "unnamed"
-
-#define MAIN_METHOD_NAME "main"
-#define AUTO_METHOD_NAME "auto"
-
-#define ROOT_CLASS_NAME "ROOT"
-#define MAIN_CLASS_NAME "MAIN"
-#define TABLE_CLASS_NAME "table"
-#define ENV_CLASS_NAME "env"
-#define FORM_CLASS_NAME "form"
+#include "pa_vrequest.h"
+#include "pa_vresponse.h"
 
 #ifndef NO_STRING_ORIGIN
 #	define COMPILE_PARAMS  \
@@ -53,14 +44,29 @@ class Request : public Pooled {
 	friend Temp_lang;
 public:
 	
-	Request(Pool& apool);
+	struct Info {
+		const char *document_root;
+		const char *path_translated;
+		const char *method;
+		const char *query_string;
+		const char *uri;
+		const char *content_type;
+		size_t content_length;
+	};
+	
+	Request(Pool& apool,
+		Info& ainfo,
+		String::Untaint_lang adefault_lang
+	);
 	~Request() {}
 
 	// global classes
 	Hash& classes() { return fclasses; }
 
 	// core request processing
-	void core();
+	void core(Exception& system_exception,
+		const char *sys_auto_path1,
+		const char *sys_auto_path2);
 
 	void execute(const Array& ops);
 
@@ -77,25 +83,33 @@ public:
 		const String *name=0,
 		bool intercept_string=true); // execute.C
 
+	// write(const) = clean
 	void write(const String& astring) {
-		wcontext->write(astring, String::Untaint_lang::NO);  // write(const) = clean
+		wcontext->write(astring, String::Untaint_lang::NO);
 	}
+	// appending, sure of clean string inside
 	void write_no_lang(String& astring) {
-		// appending, sure of clean string inside
 		wcontext->write(astring, String::Untaint_lang::NO);
 	}
-
+	// appending string, passing language built into string being written
+	void write_pass_lang(String& astring) {
+		wcontext->write(astring, String::Untaint_lang::PASS_APPEND); 
+	}
+	// appending possible string, assigning untaint language
 	void write_assign_lang(Value& avalue) {
-		// appending possible string, assigning untaint language
 		wcontext->write(avalue, flang); 
 	}
+	// appending possible string, passing language built into string being written
 	void write_pass_lang(Value& avalue) {
-		// appending possible string, passing language built into string being written
-		wcontext->write(avalue, String::Untaint_lang::PASS_APPENDED); 
+		wcontext->write(avalue, String::Untaint_lang::PASS_APPEND); 
 	}
+	// appending sure value, that would be converted to clean string
 	void write_no_lang(Value& avalue) {
-		// appending sure value, no strings inside
-		wcontext->write(avalue, String::Untaint_lang::NO); 
+		wcontext->write(avalue, String::Untaint_lang::NO);
+	}
+	// appending sure value, not VString
+	void write_expr_result(Value& avalue) {
+		wcontext->write(avalue); 
 	}
 
 	void fail_if_junction_(bool is, Value& value, const String& method_name, char *msg);
@@ -105,12 +119,19 @@ public:
 
 public:
 	
+	//
+	Info& info;
+
 	// default base
-	VClass root_class;
+	VClass ROOT;
 	// $env:fields here
-	VEnv env_class;
+	VEnv env;
 	// $form:elements here
-	VForm form_class;
+	VForm form;
+	// $request:elements here
+	VRequest request;
+	// $response:
+	VResponse response;
 
 	// contexts
 	Value *self, *root, *rcontext;
@@ -130,8 +151,10 @@ private: // compile.C
 
 private: // execute.C
 
-	char *execute_method(Value& aself, const Method& method, bool return_cstr);
-	char *execute_method(Value& aself, const String& method_name, bool return_cstr);
+	const String *execute_method(Value& aself, const Method& method, 
+		bool return_cstr=true);
+	const String *execute_method(Value& aself, const String& method_name, 
+		bool return_cstr=true);
 
 	Value *get_element();
 
@@ -139,6 +162,11 @@ private: // lang&raw
 	
 	String::Untaint_lang flang;
 
+private: // defaults
+
+	const String::Untaint_lang fdefault_lang;
+	Value *fdefault_content_type;
+
 private: // lang manipulation
 
 	String::Untaint_lang set_lang(String::Untaint_lang alang) {
@@ -150,11 +178,9 @@ private: // lang manipulation
 		flang=alang;
 	}
 
-private: // web
-
-	const char *document_root;
-	const char *page_filespec;
+private:
 
+	void output_result(const String& body_string);
 };
 
 class Temp_lang {