--- parser3/src/targets/isapi/parser3isapi.C 2001/03/22 17:13:52 1.3 +++ parser3/src/targets/isapi/parser3isapi.C 2001/03/23 10:14:37 1.8 @@ -6,8 +6,6 @@ #include #include -#include -#include #include "pa_globals.h" #include "pa_request.h" @@ -18,14 +16,14 @@ //@{ /// service func decl -struct Service_func_context { +struct sapi_func_context { LPEXTENSION_CONTROL_BLOCK lpECB; String *header; DWORD http_response_code; }; -static const char *get_env(Pool& pool, const char *name) { - Service_func_context& ctx=*static_cast(pool.context()); +static const char *sapi_get_env(Pool& pool, const char *name) { + sapi_func_context& ctx=*static_cast(pool.context()); char *variable_buf=(char *)pool.malloc(MAX_STRING); DWORD variable_len = MAX_STRING-1; @@ -34,21 +32,21 @@ static const char *get_env(Pool& pool, c variable_buf, &variable_len)) { variable_buf[variable_len]=0; return variable_buf; + } else if (GetLastError()==ERROR_INSUFFICIENT_BUFFER) { + variable_buf=(char *)pool.malloc(variable_len+1); + + if(ctx.lpECB->GetServerVariable(ctx.lpECB->ConnID, const_cast(name), + variable_buf, &variable_len)) { + variable_buf[variable_len]=0; + return variable_buf; + } } - - variable_buf=(char *)pool.malloc(variable_len+1); - - if(ctx.lpECB->GetServerVariable(ctx.lpECB->ConnID, const_cast(name), - variable_buf, &variable_len)) { - variable_buf[variable_len]=0; - return variable_buf; - } - + return 0; } -static uint read_post(Pool& pool, char *buf, uint max_bytes) { - Service_func_context& ctx=*static_cast(pool.context()); +static uint sapi_read_post(Pool& pool, char *buf, uint max_bytes) { + sapi_func_context& ctx=*static_cast(pool.context()); DWORD read_from_buf=0; DWORD read_from_input=0; @@ -77,8 +75,8 @@ static uint read_post(Pool& pool, char * return total_read; } -static void add_header_attribute(Pool& pool, const char *key, const char *value) { - Service_func_context& ctx=*static_cast(pool.context()); +static void sapi_add_header_attribute(Pool& pool, const char *key, const char *value) { + sapi_func_context& ctx=*static_cast(pool.context()); if(strcasecmp(key, "location")==0) ctx.http_response_code=302; @@ -94,11 +92,12 @@ static void add_header_attribute(Pool& p } /// @todo intelligent cache-control -static void send_header(Pool& pool) { - Service_func_context& ctx=*static_cast(pool.context()); +static void sapi_send_header(Pool& pool) { + sapi_func_context& ctx=*static_cast(pool.context()); - ctx.header->APPEND_CONST("Cache-Control: no-cache\n"); - ctx.header->APPEND_CONST("\n"); + ctx.header->APPEND_CONST( + "Expires: Fri, 23 Mar 2001 09:32:23 GMT\n" + "\n"); HSE_SEND_HEADER_EX_INFO header_info; char status_buf[MAX_STATUS_LENGTH]; @@ -109,9 +108,9 @@ static void send_header(Pool& pool) { case 302: header_info.pszStatus="302 Moved Temporarily"; break; - /*case 401: + case 401:// useless untill parser auth mech header_info.pszStatus="401 Authorization Required"; - break;*/ + break; default: snprintf(status_buf, MAX_STATUS_LENGTH, "%d Undescribed", ctx.http_response_code); @@ -121,6 +120,7 @@ static void send_header(Pool& pool) { header_info.cchStatus=strlen(header_info.pszStatus); header_info.pszHeader=ctx.header->cstr(); header_info.cchHeader=ctx.header->size(); + header_info.fKeepConn=true; ctx.lpECB->dwHttpStatusCode=ctx.http_response_code; @@ -128,8 +128,8 @@ static void send_header(Pool& pool) { HSE_REQ_SEND_RESPONSE_HEADER_EX, &header_info, NULL, NULL); } -static void send_body(Pool& pool, const char *buf, size_t size) { - Service_func_context& ctx=*static_cast(pool.context()); +static void sapi_send_body(Pool& pool, const char *buf, size_t size) { + sapi_func_context& ctx=*static_cast(pool.context()); DWORD num_bytes=size; ctx.lpECB->WriteClient(ctx.lpECB->ConnID, @@ -137,13 +137,13 @@ static void send_body(Pool& pool, const } //@} -/// Service funcs -Service_funcs service_funcs={ - get_env, - read_post, - add_header_attribute, - send_header, - send_body +/// SAPI +SAPI sapi={ + sapi_get_env, + sapi_read_post, + sapi_add_header_attribute, + sapi_send_header, + sapi_send_body }; // @@ -174,68 +174,54 @@ BOOL WINAPI GetExtensionVersion(HSE_VERS return TRUE; } -/// ISAPI // main workhorse +/** + ISAPI // main workhorse + + @todo + think of a better way than @c APPL_PHYSICAL_PATH + of obtaining the @c DOCUMENT_ROOT + because this only gets "the place where last IIS Application was set" + and if someone would redefine Application settings below the / + all ^table:load[/test] would open not /test but /below/test +*/ DWORD WINAPI HttpExtensionProc(LPEXTENSION_CONTROL_BLOCK lpECB) { Pool pool; - // TODO r->no_cache=1; bool header_only=strcasecmp(lpECB->lpszMethod, "HEAD")==0; PTRY { // global try - // must be first in PTRY{}PCATCH - - Service_func_context ctx={ + sapi_func_context ctx={ lpECB, new(pool) String(pool), 200 }; pool.set_context(&ctx); - const char *filespec_to_process=lpECB->lpszPathTranslated; - // Request info Request::Info request_info; - const char *document_root=0; // todo: get from somewhere? - if(!document_root) { - static char fake_document_root[MAX_STRING]; - strncpy(fake_document_root, filespec_to_process, MAX_STRING); - rsplit(fake_document_root, '/'); rsplit(fake_document_root, '\\');// strip filename - document_root=fake_document_root; - } - request_info.document_root=document_root; - request_info.path_translated=filespec_to_process; + if(!(request_info.document_root=sapi_get_env(pool, "APPL_PHYSICAL_PATH"))) + PTHROW(0, 0, + 0, + "can not get server variable APPL_PHYSICAL_PATH (error #%lu)", + GetLastError()); // never + + request_info.path_translated=lpECB->lpszPathTranslated; request_info.method=lpECB->lpszMethod; request_info.query_string=lpECB->lpszQueryString; - char reconstructed_uri[MAX_STRING]; if(lpECB->lpszQueryString && *lpECB->lpszQueryString) { - strncpy(reconstructed_uri, lpECB->lpszPathInfo, - MAX_STRING-1/*'?'*/-strlen(lpECB->lpszQueryString)); + char *reconstructed_uri=(char *)malloc( + strlen(lpECB->lpszPathInfo)+1/*'?'*/+ + strlen(lpECB->lpszQueryString)+1/*0*/); + strcpy(reconstructed_uri, lpECB->lpszPathInfo); strcat(reconstructed_uri, "?"); - strcat(reconstructed_uri, lpECB->lpszPathInfo); + strcat(reconstructed_uri, lpECB->lpszQueryString); request_info.uri=reconstructed_uri; } else request_info.uri=lpECB->lpszPathInfo; request_info.content_type=lpECB->lpszContentType; request_info.content_length=lpECB->cbTotalBytes; - // cookie - request_info.cookie=0; - char cookie_buf[MAX_STRING]; - { - DWORD cookie_len = MAX_STRING-1; - - if (lpECB->GetServerVariable(lpECB->ConnID, "HTTP_COOKIE", cookie_buf, &cookie_len)) { - cookie_buf[cookie_len]=0; - request_info.cookie=cookie_buf; - } else if (GetLastError()==ERROR_INSUFFICIENT_BUFFER) { - char *tmp_cookie_buf=(char *)pool.malloc(cookie_len+1); - - if (lpECB->GetServerVariable(lpECB->ConnID, "HTTP_COOKIE", tmp_cookie_buf, &cookie_len)) { - tmp_cookie_buf[cookie_len]=0; - request_info.cookie=tmp_cookie_buf; - } - } - } + request_info.cookie=sapi_get_env(pool, "HTTP_COOKIE"); // prepare to process request Request request(pool, @@ -244,16 +230,12 @@ DWORD WINAPI HttpExtensionProc(LPEXTENSI ); // some root-controlled location - char *root_auto_path; - // c:\windows - root_auto_path=(char *)pool.malloc(MAX_STRING); + // c:\windows + // must be dynamic: rethrowing from request.core + // may return 'source' which can be inside of 'root auto.p@exeception' + char *root_auto_path=(char *)pool.malloc(MAX_STRING); GetWindowsDirectory(root_auto_path, MAX_STRING); -/* - char *fuck_it="fff"; - DWORD num_bytes=strlen(fuck_it);; - lpECB->WriteClient(lpECB->ConnID, fuck_it, &num_bytes, HSE_IO_SYNC); - return HSE_STATUS_SUCCESS; -*/ + // process the request request.core( root_auto_path, false/*may be abcent*/, // /path/to/admin/auto.p @@ -266,25 +248,24 @@ DWORD WINAPI HttpExtensionProc(LPEXTENSI int content_length=strlen(body); // prepare header - (*service_funcs.add_header_attribute)(pool, "content-type", "text/plain"); + sapi_add_header_attribute(pool, "content-type", "text/plain"); char content_length_cstr[MAX_NUMBER]; - snprintf(content_length_cstr, MAX_NUMBER, "%d", content_length); - (*service_funcs.add_header_attribute)(pool, "content-length", - content_length_cstr); + snprintf(content_length_cstr, MAX_NUMBER, "%lu", content_length); + sapi_add_header_attribute(pool, "content-length", content_length_cstr); // send header - (*service_funcs.send_header)(pool); + sapi_send_header(pool); // send body if(!header_only) - (*service_funcs.send_body)(pool, body, content_length); + sapi_send_body(pool, body, content_length); // unsuccessful finish _endthread(); } PEND_CATCH - return HSE_STATUS_SUCCESS; + return HSE_STATUS_SUCCESS_AND_KEEP_CONN; }