|
|
| version 1.90, 2001/05/24 09:29:52 | version 1.111, 2001/09/18 16:05:43 |
|---|---|
| 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 23 | Line 22 |
| //#define DEBUG_POOL_MALLOC | //#define DEBUG_POOL_MALLOC |
| // consts | |
| /// 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 61 void SAPI::log(Pool& pool, const char *f | Line 61 void SAPI::log(Pool& pool, const char *f |
| if(argv0) { | if(argv0) { |
| // beside by binary | // beside by binary |
| char file_spec[MAX_STRING]; | char file_spec[MAX_STRING]; |
| strncpy(file_spec, argv0, MAX_STRING); // filespec of my binary | strncpy(file_spec, argv0, MAX_STRING-1); file_spec[MAX_STRING-1]=0; // filespec of my binary |
| rsplit(file_spec, '/'); rsplit(file_spec, '\\');// strip filename | rsplit(file_spec, '/'); rsplit(file_spec, '\\');// strip filename |
| strcat(file_spec, "/parser3.log"); | strcat(file_spec, "/parser3.log"); |
| f=fopen(file_spec, "at"); | f=fopen(file_spec, "at"); |
| Line 89 void SAPI::log(Pool& pool, const char *f | Line 89 void SAPI::log(Pool& pool, const char *f |
| } | } |
| const char *SAPI::get_env(Pool& pool, const char *name) { | const char *SAPI::get_env(Pool& pool, const char *name) { |
| return getenv(name); | return getenv(name); |
| } | } |
| size_t SAPI::read_post(Pool& pool, char *buf, size_t max_bytes) { | size_t SAPI::read_post(Pool& pool, char *buf, size_t max_bytes) { |
| Line 124 void SAPI::send_body(Pool& pool, const v | Line 124 void SAPI::send_body(Pool& pool, const v |
| stdout_write(buf, size); | stdout_write(buf, size); |
| } | } |
| // | |
| char *full_file_spec(char *file_name) { | |
| if(file_name && !strchr(file_name, '/')) { | |
| static char cwd[MAX_STRING]; getcwd(cwd, MAX_STRING); | |
| static char buf[MAX_STRING]; | |
| snprintf(buf, MAX_STRING, "%s/%s", cwd, file_name); | |
| return buf; | |
| } | |
| return file_name; | |
| } | |
| /** | /** |
| main workhorse | main workhorse |
| Line 133 void SAPI::send_body(Pool& pool, const v | Line 145 void SAPI::send_body(Pool& pool, const v |
| wich is tested but seems slow. | wich is tested but seems slow. |
| */ | */ |
| int main(int argc, char *argv[]) { | int main(int argc, char *argv[]) { |
| int result; | |
| argv0=argv[0]; | argv0=argv[0]; |
| umask(2); | umask(2); |
| #ifdef WIN32 | |
| setmode(fileno(stdin), _O_BINARY); | |
| setmode(fileno(stdout), _O_BINARY); | |
| setmode(fileno(stderr), _O_BINARY); | |
| #endif | |
| // were we started as CGI? | // were we started as CGI? |
| cgi= | cgi= |
| getenv("SERVER_SOFTWARE") || | getenv("SERVER_SOFTWARE") || |
| Line 163 int main(int argc, char *argv[]) { | Line 170 int main(int argc, char *argv[]) { |
| } | } |
| } | } |
| #ifdef WIN32 | |
| setmode(fileno(stdin), _O_BINARY); | |
| setmode(fileno(stdout), _O_BINARY); | |
| setmode(fileno(stderr), _O_BINARY); | |
| #endif | |
| char *filespec_to_process=cgi?getenv("PATH_TRANSLATED"):argv[1]; | char *filespec_to_process=cgi?getenv("PATH_TRANSLATED"):argv[1]; |
| #ifdef WIN32 | #ifdef WIN32 |
| back_slashes_to_slashes(filespec_to_process); | back_slashes_to_slashes(filespec_to_process); |
| #endif | #endif |
| filespec_to_process=full_file_spec(filespec_to_process); | |
| const char *request_method=getenv("REQUEST_METHOD"); | const char *request_method=getenv("REQUEST_METHOD"); |
| bool header_only=request_method && strcasecmp(request_method, "HEAD")==0; | bool header_only=request_method && strcasecmp(request_method, "HEAD")==0; |
| Line 198 int main(int argc, char *argv[]) { | Line 212 int main(int argc, char *argv[]) { |
| // IIS | // IIS |
| size_t len=strlen(filespec_to_process)-strlen(path_info); | size_t len=strlen(filespec_to_process)-strlen(path_info); |
| char *buf=(char *)pool.malloc(len+1); | char *buf=(char *)pool.malloc(len+1); |
| strncpy(buf, filespec_to_process, len); | memcpy(buf, filespec_to_process, len); buf[len]=0; |
| buf[len]=0; | |
| request_info.document_root=buf; | request_info.document_root=buf; |
| } else | } else |
| PTHROW(0, 0, | PTHROW(0, 0, |
| Line 207 int main(int argc, char *argv[]) { | Line 220 int main(int argc, char *argv[]) { |
| "CGI: no PATH_INFO defined(in reinventing DOCUMENT_ROOT)"); | "CGI: no PATH_INFO defined(in reinventing DOCUMENT_ROOT)"); |
| } 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-1); buf[MAX_STRING-1]=0; |
| if(rsplit(buf, '/') || rsplit(buf, '\\')) // strip filename | if(rsplit(buf, '/') || rsplit(buf, '\\')) // strip filename |
| request_info.document_root=buf; | request_info.document_root=buf; |
| else | else |
| request_info.document_root=""; | 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 ? request_method : "GET"; |
| 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) { |
| Line 257 int main(int argc, char *argv[]) { | Line 270 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||1 ? String::UL_USER_HTML : String::UL_AS_IS | cgi ? String::UL_USER_HTML : String::UL_AS_IS |
| ); | ); |
| // some root-controlled location | // some root-controlled location |
| #ifdef WIN32 | #ifdef SYSCONFDIR |
| // c:\windows | const char *root_config_filespec=SYSCONFDIR "/" CONFIG_FILE_NAME; |
| static char root_auto_path[MAX_STRING]; | |
| GetWindowsDirectory(root_auto_path, MAX_STRING); | |
| #else | #else |
| // ~nobody todo: figure out a better place | # ifdef WIN32 |
| const char *root_auto_path=SAPI::get_env(pool, "HOME"); | // 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); | |
| # else | |
| #error must be compiled either configure/make or MSVC++ | |
| # endif | |
| #endif | #endif |
| // beside by binary | // beside by binary |
| static char site_auto_path[MAX_STRING]; | // @todo full path, not ./! |
| strncpy(site_auto_path, argv0, MAX_STRING); // filespec of my binary | static char site_config_path[MAX_STRING]; |
| strncpy(site_config_path, argv0, MAX_STRING-1); site_config_path[MAX_STRING-1]=0; // filespec of my binary | |
| if(!( | if(!( |
| rsplit(site_auto_path, '/') || | rsplit(site_config_path, '/') || |
| rsplit(site_auto_path, '\\'))) { // strip filename | rsplit(site_config_path, '\\'))) { // strip filename |
| // no path, just filename | // no path, just filename |
| site_auto_path[0]='.'; site_auto_path[1]=0; | site_config_path[0]='.'; site_config_path[1]=0; |
| } | } |
| char site_config_filespec[MAX_STRING]; | |
| snprintf(site_config_filespec, MAX_STRING, | |
| "%s/%s", | |
| site_config_path, CONFIG_FILE_NAME); | |
| // process the request | // process the request |
| request.core( | request.core( |
| root_auto_path, false, | root_config_filespec, false, |
| site_auto_path, false, | site_config_filespec, false, |
| header_only); | header_only); |
| // | // |
| Line 298 int main(int argc, char *argv[]) { | Line 325 int main(int argc, char *argv[]) { |
| #ifdef WIN32 | #ifdef WIN32 |
| SetUnhandledExceptionFilter(0); | SetUnhandledExceptionFilter(0); |
| #endif | #endif |
| // successful finish | // successful finish |
| return 0; | result=0; |
| } PCATCH(e) { // global problem | } PCATCH(e) { // global problem |
| // must be first in PCATCH{} | // must be first in PCATCH{} |
| #ifdef WIN32 | #ifdef WIN32 |
| Line 330 int main(int argc, char *argv[]) { | Line 358 int main(int argc, char *argv[]) { |
| SAPI::send_body(pool, body, content_length); | SAPI::send_body(pool, body, content_length); |
| // unsuccessful finish | // unsuccessful finish |
| return 1; | result=1; |
| } | } |
| PEND_CATCH | PEND_CATCH |
| #ifndef WIN32 | |
| // | |
| if(!cgi) | |
| SAPI::send_body(pool, "\n", 1); | |
| #endif | |
| return result; | |
| } | } |