|
|
| version 1.66, 2001/04/20 09:04:16 | version 1.93, 2001/06/28 07:44:17 |
|---|---|
| Line 4 | Line 4 |
| Copyright(c) 2001 ArtLebedev Group(http://www.artlebedev.com) | Copyright(c) 2001 ArtLebedev Group(http://www.artlebedev.com) |
| Author: Alexander Petrosyan <paf@design.ru>(http://design.ru/paf) | Author: Alexander Petrosyan <paf@design.ru>(http://design.ru/paf) |
| $Id$ | |
| */ | */ |
| static const char *RCSId="$Id$"; | |
| #include "pa_config_includes.h" | #include "pa_config_includes.h" |
| Line 15 | Line 14 |
| #endif | #endif |
| #include "pa_sapi.h" | #include "pa_sapi.h" |
| #include "classes.h" | |
| #include "pa_common.h" | #include "pa_common.h" |
| #include "pa_globals.h" | |
| #include "pa_request.h" | #include "pa_request.h" |
| #include "pa_socks.h" | #include "pa_socks.h" |
| #include "pa_version.h" | |
| //#define DEBUG_POOL_MALLOC | |
| /// @test disable /cgi-bin/parser3/auto.p | |
| /// IIS refuses to read bigger chunks | /// IIS refuses to read bigger chunks |
| const size_t READ_POST_CHUNK_SIZE=0x400*0x400; // 1M | const size_t READ_POST_CHUNK_SIZE=0x400*0x400; // 1M |
| Line 50 static LONG WINAPI TopLevelExceptionFilt | Line 51 static LONG WINAPI TopLevelExceptionFilt |
| #endif | #endif |
| // SAPI | // SAPI |
| // appends to parser3.log located beside my binary | |
| // appends to parser3.log located beside my binary if openable, to stderr otherwize | |
| void SAPI::log(Pool& pool, const char *fmt, ...) { | void SAPI::log(Pool& pool, const char *fmt, ...) { |
| bool opened; | bool opened; |
| FILE *f=0; | FILE *f=0; |
| Line 81 void SAPI::log(Pool& pool, const char *f | Line 83 void SAPI::log(Pool& pool, const char *f |
| if(opened) | if(opened) |
| fclose(f); | fclose(f); |
| else | |
| fflush(f); | |
| } | } |
| const char *SAPI::get_env(Pool& pool, const char *name) { | const char *SAPI::get_env(Pool& pool, const char *name) { |
| Line 101 size_t SAPI::read_post(Pool& pool, char | Line 105 size_t SAPI::read_post(Pool& pool, char |
| } | } |
| void SAPI::add_header_attribute(Pool& pool, const char *key, const char *value) { | void SAPI::add_header_attribute(Pool& pool, const char *key, const char *value) { |
| if(1||cgi) | if(cgi) |
| printf("%s: %s\n", key, value); | printf("%s: %s\n", key, value); |
| } | } |
| Line 147 int main(int argc, char *argv[]) { | Line 151 int main(int argc, char *argv[]) { |
| if(!cgi) { | if(!cgi) { |
| if(argc<2) { | if(argc<2) { |
| printf("Usage: %s <file>\n", argv0?argv0:"parser3"); | printf( |
| exit(1); | "Parser/%s Copyright(c) 2001 ArtLebedev Group(http://www.artlebedev.com)\n" |
| "Author: Alexander Petrosyan <paf@design.ru>(http://design.ru/paf)\n" | |
| "\n" | |
| "Usage: %s <file>\n", | |
| PARSER_VERSION, | |
| argv0?argv0:"parser3"); | |
| return 1; | |
| } | } |
| } | } |
| Line 168 int main(int argc, char *argv[]) { | Line 178 int main(int argc, char *argv[]) { |
| // init socks | // init socks |
| init_socks(pool); | init_socks(pool); |
| // init global classes | |
| init_methoded_array(pool); | |
| // init global variables | // init global variables |
| pa_globals_init(pool); | pa_globals_init(pool); |
| if(!filespec_to_process) | if(!filespec_to_process) |
| PTHROW(0, 0, | PTHROW(0, 0, |
| 0, | 0, |
| "no file to process"); | "Parser/%s", PARSER_VERSION); |
| // Request info | // Request info |
| Request::Info request_info; | Request::Info request_info; |
| Line 195 int main(int argc, char *argv[]) { | Line 207 int main(int argc, char *argv[]) { |
| } else { | } else { |
| static char buf[MAX_STRING]; | static char buf[MAX_STRING]; |
| strncpy(buf, filespec_to_process, MAX_STRING); | strncpy(buf, filespec_to_process, MAX_STRING); |
| rsplit(buf, '/'); rsplit(buf, '\\');// strip filename | if(rsplit(buf, '/') || rsplit(buf, '\\')) // strip filename |
| request_info.document_root=buf; | request_info.document_root=buf; |
| else | |
| request_info.document_root=""; | |
| } | } |
| request_info.path_translated=filespec_to_process; | request_info.path_translated=filespec_to_process; |
| request_info.method=request_method; | request_info.method=request_method; |
| const char *query_string=SAPI::get_env(pool, "QUERY_STRING"); | const char *query_string=SAPI::get_env(pool, "QUERY_STRING"); |
| request_info.query_string=query_string; | request_info.query_string=query_string; |
| if(cgi) | if(cgi) { |
| if(const char *env_request_uri=SAPI::get_env(pool, "REQUEST_URI")) | if(const char *env_request_uri=SAPI::get_env(pool, "REQUEST_URI")) |
| request_info.uri=env_request_uri; | request_info.uri=env_request_uri; |
| else if(const char *path_info=SAPI::get_env(pool, "PATH_INFO")) | else if(const char *path_info=SAPI::get_env(pool, "PATH_INFO")) |
| Line 220 int main(int argc, char *argv[]) { | Line 234 int main(int argc, char *argv[]) { |
| PTHROW(0, 0, | PTHROW(0, 0, |
| 0, | 0, |
| "CGI: no PATH_INFO defined(in reinventing REQUEST_URI)"); | "CGI: no PATH_INFO defined(in reinventing REQUEST_URI)"); |
| else | |
| if(const char *script_name=SAPI::get_env(pool, "SCRIPT_NAME")) { | |
| size_t script_name_len=strlen(script_name); | |
| size_t uri_len=strlen(request_info.uri); | |
| if(strncmp(request_info.uri,script_name, script_name_len)==0 && | |
| script_name_len != uri_len) // under IIS they are the same | |
| PTHROW(0, 0, | |
| 0, | |
| "CGI: illegal call"); | |
| } | |
| } else | |
| request_info.uri=0; | request_info.uri=0; |
| request_info.content_type=SAPI::get_env(pool, "CONTENT_TYPE"); | request_info.content_type=SAPI::get_env(pool, "CONTENT_TYPE"); |
| Line 232 int main(int argc, char *argv[]) { | Line 256 int main(int argc, char *argv[]) { |
| // prepare to process request | // prepare to process request |
| Request request(pool, | Request request(pool, |
| request_info, | request_info, |
| cgi ? String::UL_HTML_TYPO : String::UL_AS_IS | cgi ? String::UL_USER_HTML : String::UL_AS_IS |
| ); | ); |
| // some root-controlled location | // some root-controlled location |
| Line 247 int main(int argc, char *argv[]) { | Line 271 int main(int argc, char *argv[]) { |
| // beside by binary | // beside by binary |
| static char site_auto_path[MAX_STRING]; | static char site_auto_path[MAX_STRING]; |
| strncpy(site_auto_path, argv[0], MAX_STRING); // filespec of my binary | strncpy(site_auto_path, argv0, MAX_STRING); // filespec of my binary |
| rsplit(site_auto_path, '/'); rsplit(site_auto_path, '\\');// strip filename | if(!( |
| rsplit(site_auto_path, '/') || | |
| rsplit(site_auto_path, '\\'))) { // strip filename | |
| // no path, just filename | |
| site_auto_path[0]='.'; site_auto_path[1]=0; | |
| } | |
| // process the request | // process the request |
| request.core( | request.core( |
| Line 259 int main(int argc, char *argv[]) { | Line 288 int main(int argc, char *argv[]) { |
| // | // |
| done_socks(); | done_socks(); |
| #ifdef DEBUG_POOL_MALLOC | |
| extern void log_pool_stats(Pool& pool); | |
| log_pool_stats(pool); | |
| #endif | |
| // must be last in PTRY{}PCATCH | // must be last in PTRY{}PCATCH |
| #ifdef WIN32 | #ifdef WIN32 |
| SetUnhandledExceptionFilter(0); | SetUnhandledExceptionFilter(0); |