--- parser3/src/targets/cgi/parser3.C	2002/02/08 08:31:32	1.154
+++ parser3/src/targets/cgi/parser3.C	2002/02/20 12:40:24	1.162
@@ -1,10 +1,10 @@
 /** @file
 	Parser: scripting and CGI main.
 
-	Copyright(c) 2001, 2002 ArtLebedev Group(http://www.artlebedev.com)
+	Copyright(c) 2001, 2002 ArtLebedev Group (http://www.artlebedev.com)
 	Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
 
-	$Id: parser3.C,v 1.154 2002/02/08 08:31:32 paf Exp $
+	$Id: parser3.C,v 1.162 2002/02/20 12:40:24 paf Exp $
 */
 
 #include "pa_config_includes.h"
@@ -29,6 +29,15 @@
 #endif
 
 //#define DEBUG_POOL_MALLOC
+//#define DEBUG_STRING_APPENDS_VS_EXPANDS
+
+#ifdef DEBUG_STRING_APPENDS_VS_EXPANDS
+extern ulong 
+	string_piece_appends, 
+	wcontext_result_size,
+	total_alloc_size,
+	string_string_shortcut_economy;
+#endif
 
 // consts
 
@@ -52,6 +61,8 @@ const char **RCSIds[]={
 	0
 };
 
+const char *PARSER_ROOT_CONFIG_ENV_NAME="PARSER_ROOT_CONFIG";
+
 /// IIS refuses to read bigger chunks
 const size_t READ_POST_CHUNK_SIZE=0x400*0x400; // 1M 
 
@@ -293,22 +304,29 @@ void real_parser_handler(
 		true /* status_allowed */);
 	
 	// some root-controlled location
+	const char *root_config_filespec;
+	if(const char *root_config_by_env=getenv(PARSER_ROOT_CONFIG_ENV_NAME))
+		root_config_filespec=root_config_by_env;
+	else {
 #ifdef ROOT_CONFIG_DIR
-	const char *root_config_filespec=ROOT_CONFIG_DIR "/" CONFIG_FILE_NAME;
+		root_config_filespec=ROOT_CONFIG_DIR "/" CONFIG_FILE_NAME;
 #else
 #	ifdef WIN32
-	// c:\windows
-	char root_config_path[MAX_STRING];
-	GetWindowsDirectory(root_config_path, MAX_STRING);
-	
-	char root_config_filespec[MAX_STRING];
-	snprintf(root_config_filespec, MAX_STRING, 
-		"%s/%s", 
-		root_config_path, CONFIG_FILE_NAME);
+		// c:\windows
+		char windows_dir[MAX_STRING];
+		GetWindowsDirectory(windows_dir, MAX_STRING);
+
+		char buf[MAX_STRING];
+		snprintf(buf, MAX_STRING, 
+			"%s/%s", 
+			windows_dir, CONFIG_FILE_NAME);
+		
+		root_config_filespec=buf;
 #	else
 #error must be compiled either configure/make or MSVC++
 #	endif
 #endif
+	}
 	
 	// beside by binary
 	// @todo full path, not ./!
@@ -339,6 +357,16 @@ void real_parser_handler(
 	extern void log_pool_stats(Pool& pool);
 	log_pool_stats(pool);
 #endif
+
+#ifdef DEBUG_STRING_APPENDS_VS_EXPANDS
+	SAPI::log(pool, 
+		"string piece appends=%lu, wcontext_result_size=%lu, string_string_shortcut_economy_closer=%lu, total_alloc_size=%lu", 
+		string_piece_appends,
+		wcontext_result_size,
+		string_string_shortcut_economy,
+		total_alloc_size);
+#endif
+
 }
 
 void call_real_parser_handler__do_SEH(
@@ -399,7 +427,7 @@ int main(int argc, char *argv[]) {
 	if(!cgi) {
 		if(argc<2) {
 			printf(
-				"Parser/%s Copyright(c) 2001, 2002 ArtLebedev Group(http://www.artlebedev.com)\n"
+				"Parser/%s Copyright(c) 2001, 2002 ArtLebedev Group (http://www.artlebedev.com)\n"
 				"Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)\n"
 				"\n"
 				"Usage: %s <file>\n",
@@ -468,5 +496,6 @@ int main(int argc, char *argv[]) {
 	if(!cgi)
 		SAPI::send_body(pool, "\n", 1);
 #endif
+//_asm int 3;
 	return 0;
 }