--- parser3/src/main/pa_request.C	2007/04/23 10:30:32	1.286
+++ parser3/src/main/pa_request.C	2009/04/16 01:09:54	1.299
@@ -1,11 +1,11 @@
 /** @file
 	Parser: request class main part. @see compile.C and execute.C.
 
-	Copyright (c) 2001-2005 ArtLebedev Group (http://www.artlebedev.com)
+	Copyright (c) 2001-2009 ArtLebedev Group (http://www.artlebedev.com)
 	Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
 */
 
-static const char * const IDENT_REQUEST_C="$Date: 2007/04/23 10:30:32 $";
+static const char * const IDENT_REQUEST_C="$Date: 2009/04/16 01:09:54 $";
 
 #include "pa_sapi.h"
 #include "pa_common.h"
@@ -58,9 +58,10 @@ const char* ORIGINS_CONTENT_TYPE="text/p
 
 const String main_method_name(MAIN_METHOD_NAME);
 const String auto_method_name(AUTO_METHOD_NAME);
+const String content_transfer_encoding_name(CONTENT_TRANSFER_ENCODING_NAME);
 const String content_disposition_name(CONTENT_DISPOSITION_NAME);
 const String content_disposition_inline(CONTENT_DISPOSITION_INLINE);
-const String content_disposition_value(CONTENT_DISPOSITION_VALUE);
+const String content_disposition_attachment(CONTENT_DISPOSITION_ATTACHMENT);
 const String content_disposition_filename_name(CONTENT_DISPOSITION_FILENAME_NAME);
 const String body_name(BODY_NAME);
 const String exception_type_part_name(EXCEPTION_TYPE_PART_NAME);
@@ -125,7 +126,7 @@ Request::Request(SAPI_Info& asapi_info,
 	form(*new VForm(charsets, arequest_info)),
 	mail(*new VMail),
 	response(*new VResponse(arequest_info, charsets)),
-	cookie(*new VCookie),
+	cookie(*new VCookie(charsets, arequest_info)),
 	console(*new VConsole),
 
 	// private
@@ -159,7 +160,7 @@ Request::Request(SAPI_Info& asapi_info,
 	if(status_allowed)
 		classes().put(String::Body(STATUS_CLASS_NAME), new VStatus());
 	// request class
-	classes().put(String::Body(REQUEST_CLASS_NAME), new VRequest(arequest_info, charsets));	
+	classes().put(String::Body(REQUEST_CLASS_NAME), new VRequest(arequest_info, charsets, form));	
 	// cookie class
 	classes().put(String::Body(COOKIE_CLASS_NAME), &cookie);
 	// console class
@@ -305,9 +306,6 @@ struct timeval mt[10];
 gettimeofday(&mt[0],NULL);
 #endif
 	try {
-		// filling cookies
-		cookie.fill_fields(request_info);
-
 		// filling mail received
 		mail.fill_received(*this);
 
@@ -464,40 +462,41 @@ t[9]-t[3]
 				false)) {
 			if(Junction* junction=value->get_junction()) {
 				if(const Method *method=junction->method) {
-// preparing to pass parameters to 
-//	@unhandled_exception[exception;stack]
-VMethodFrame frame(/*method->name, */ *junction, 0/*no caller*/);
-frame.set_self(main_class);
-
-// $exception
-frame.store_param(details.vhash);
-// $stack[^table::set{name	origin}]
-Table::columns_type stack_trace_columns(new ArrayString);
-*stack_trace_columns+=new String("name");
-*stack_trace_columns+=new String("file");
-*stack_trace_columns+=new String("lineno");
-*stack_trace_columns+=new String("colno");
-Table& stack_trace=*new Table(stack_trace_columns);
-if(!exception_trace.is_empty()/*signed!*/) 
-for(size_t i=exception_trace.bottom_index(); i<exception_trace.top_index(); i++) {
-	Trace trace=exception_trace.get(i);
-	Table::element_type row(new ArrayString);
-
-	*row+=trace.name(); // name column
-	Operation::Origin origin=trace.origin();
-	if(origin.file_no) {
-		*row+=new String(file_list[origin.file_no], String::L_TAINTED); // 'file' column
-		*row+=new String(String::Body::Format(1+origin.line), String::L_CLEAN); // 'lineno' column
-		*row+=new String(String::Body::Format(1+origin.col), String::L_CLEAN); // 'colno' column
-	}
-	stack_trace+=row;
-}
-frame.store_param(*new VTable(&stack_trace));
-
-// future $response:body=
-//   execute ^unhandled_exception[exception;stack]
-exception_trace.clear(); // forget all about previous life, in case there would be error inside of this method, error handled  would not be mislead by old stack contents (see extract_origin)
-body_string=&execute_method(frame, *method).as_string();
+					// preparing to pass parameters to 
+					//	@unhandled_exception[exception;stack]
+					VMethodFrame frame(/*method->name, */ *junction, 0/*no caller*/);
+					frame.set_self(main_class);
+
+					// $exception
+					frame.store_param(details.vhash);
+					// $stack[^table::create{name	file	lineno	colno}]
+					Table::columns_type stack_trace_columns(new ArrayString);
+					*stack_trace_columns+=new String("name");
+					*stack_trace_columns+=new String("file");
+					*stack_trace_columns+=new String("lineno");
+					*stack_trace_columns+=new String("colno");
+					Table& stack_trace=*new Table(stack_trace_columns);
+					if(!exception_trace.is_empty()/*signed!*/) 
+						for(size_t i=exception_trace.bottom_index(); i<exception_trace.top_index(); i++) {
+							Trace trace=exception_trace.get(i);
+							Table::element_type row(new ArrayString);
+
+							*row+=trace.name(); // name column
+							Operation::Origin origin=trace.origin();
+							if(origin.file_no) {
+								*row+=new String(file_list[origin.file_no], String::L_TAINTED); // 'file' column
+								*row+=new String(String::Body::Format(1+origin.line), String::L_CLEAN); // 'lineno' column
+								*row+=new String(String::Body::Format(1+origin.col), String::L_CLEAN); // 'colno' column
+							}
+							stack_trace+=row;
+						}
+
+					frame.store_param(*new VTable(&stack_trace));
+
+					// future $response:body=
+					//   execute ^unhandled_exception[exception;stack]
+					exception_trace.clear(); // forget all about previous life, in case there would be error inside of this method, error handled  would not be mislead by old stack contents (see extract_origin)
+					body_string=&execute_method(frame, *method).as_string();
 				}
 			}
 		}
@@ -523,6 +522,7 @@ body_string=&execute_method(frame, *meth
 
 		// ERROR. write it out
 		output_result(body_file, header_only, false);
+
 		} catch(const Exception& e) { // exception in unhandled exception
 			Request::Exception_details details=get_details(e);
 			const char* exception_cstr=get_exception_cstr(e, details);
@@ -602,22 +602,27 @@ void Request::use_buf(VStateless_class&
 	// temporary zero @auto so to maybe-replace it in compiled code
 	Temp_method temp_method_auto(aclass, auto_method_name, 0);
 
-	// compile loaded class
-	VStateless_class& cclass=compile(&aclass, source, main_alias, file_no, line_no_offset);
+	// compile loaded classes
+	ArrayClass& cclasses=compile(&aclass, source, main_alias, file_no, line_no_offset);
 
-	// locate and execute possible @conf[] static
 	VString* vfilespec=
 		new VString(*new String(file_list[file_no], String::L_TAINTED));
-	Execute_nonvirtual_method_result executed=execute_nonvirtual_method(cclass, 
-		conf_method_name, vfilespec,
-		false/*no string result needed*/);
-	if(executed.method)
-		configure_admin(cclass/*, executed.method->name*/);
-
-	// locate and execute possible @auto[] static
-	execute_nonvirtual_method(cclass, 
-		auto_method_name, vfilespec,
-		false/*no result needed*/);
+
+	for(size_t i=0; i<cclasses.count(); i++){
+		VStateless_class& cclass=*cclasses.get(i);
+
+		// locate and execute possible @conf[] static
+		Execute_nonvirtual_method_result executed=execute_nonvirtual_method(cclass, 
+			conf_method_name, vfilespec,
+			false/*no string result needed*/);
+		if(executed.method)
+			configure_admin(cclass/*, executed.method->name*/);
+
+		// locate and execute possible @auto[] static
+		execute_nonvirtual_method(cclass, 
+			auto_method_name, vfilespec,
+			false/*no result needed*/);
+	}
 }
 
 const String& Request::relative(const char* apath, const String& relative_name) {
@@ -657,21 +662,21 @@ public:
 };
 #endif
 static void add_header_attribute(
-				 HashStringValue::key_type aattribute, 
-				 HashStringValue::value_type ameaning, 
+				 HashStringValue::key_type name, 
+				 HashStringValue::value_type value, 
 				 Add_header_attribute_info* info) {
-	if(aattribute==BODY_NAME
-		|| aattribute==DOWNLOAD_NAME
-		|| aattribute==CHARSET_NAME)
+	if(name==BODY_NAME
+		|| name==DOWNLOAD_NAME
+		|| name==CHARSET_NAME)
 		return;
+	
+	const char* aname=String(name, String::L_URI).cstr(String::L_UNSPECIFIED, 0, &info->r.charsets);
 
-	const char* a=aattribute.cstr();
 	SAPI::add_header_attribute(info->r.sapi_info,
-		a, 
-		attributed_meaning_to_string(*ameaning, String::L_HTTP_HEADER, false).
-			cstr(String::L_UNSPECIFIED));
+		aname, 
+		attributed_meaning_to_string(*value, String::L_URI, false).cstr(String::L_UNSPECIFIED, 0, &info->r.charsets));
 
-	if(strcasecmp(a, "last-modified")==0)
+	if(strcasecmp(aname, "last-modified")==0)
 		info->add_last_modified = false;
 }
 
@@ -839,7 +844,7 @@ void Request::output_result(VFile* body_
 		if(sfile_name!=NONAME_DAT) {
 			VHash& hash=*new VHash();
 			HashStringValue &h=hash.hash();
-			h.put(value_name, new VString( as_attachment ? content_disposition_value : content_disposition_inline ));
+			h.put(value_name, new VString( as_attachment ? content_disposition_attachment : content_disposition_inline ));
 
 			h.put(content_disposition_filename_name, vfile_name);
 			response.fields().put(content_disposition_name, &hash);
@@ -980,7 +985,7 @@ Request::Exception_details Request::get_
 			new VString(*new String(comment, 0, true/*tainted*/)));
 
 	// $.handled(0)
-	hash.put(exception_handled_part_name, new VBool(false));
+	hash.put(exception_handled_part_name, &VBool::get(false));
 
 	return Request::Exception_details(trace, problem_source, vhash);
 }