--- parser3/src/include/pa_request.h 2001/03/13 17:17:26 1.49 +++ parser3/src/include/pa_request.h 2001/03/19 19:17:43 1.63 @@ -1,9 +1,11 @@ -/* - Parser +/** @file + Parser: request class decl. + Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com) + Author: Alexander Petrosyan (http://design.ru/paf) - $Id: pa_request.h,v 1.49 2001/03/13 17:17:26 paf Exp $ + $Id: pa_request.h,v 1.63 2001/03/19 19:17:43 paf Exp $ */ #ifndef PA_REQUEST_H @@ -18,17 +20,9 @@ #include "pa_vobject.h" #include "pa_venv.h" #include "pa_vform.h" - -#define UNNAMED_NAME "unnamed" - -#define MAIN_METHOD_NAME "main" -#define AUTO_METHOD_NAME "auto" - -#define ROOT_CLASS_NAME "ROOT" -#define MAIN_CLASS_NAME "MAIN" -#define TABLE_CLASS_NAME "table" -#define ENV_CLASS_NAME "env" -#define FORM_CLASS_NAME "form" +#include "pa_vrequest.h" +#include "pa_vresponse.h" +#include "pa_vcookie.h" #ifndef NO_STRING_ORIGIN # define COMPILE_PARAMS \ @@ -49,71 +43,115 @@ class Temp_lang; +/// Main workhorse. class Request : public Pooled { friend Temp_lang; public: + + /// some information from web server + struct Info { + const char *document_root; + const char *path_translated; + const char *method; + const char *query_string; + const char *uri; + const char *content_type; + size_t content_length; + const char *cookie; + }; - Request(Pool& apool); + Request(Pool& apool, + Info& ainfo, + String::Untaint_lang adefault_lang ///< all tainted data default untainting lang + ); ~Request() {} - // global classes + /// global classes Hash& classes() { return fclasses; } - // core request processing - void core(); + /// core request processing + void core(Exception& system_exception, + const char *sys_auto_path1, + const char *sys_auto_path2); + /// executes ops void execute(const Array& ops); + /// compiles the file, maybe forcing it's class \a name and \a base_class. VStateless_class *use_file( const char *file, bool fail_on_read_problem=true, const String *name=0, VStateless_class *base_class=0); // core.C + /// compiles a \a source buffer VStateless_class *use_buf( const char *source, const char *file, VStateless_class *aclass=0, const String *name=0, VStateless_class *base_class=0); // core.C + /// processes any code-junction there may be inside of \a value Value& process( Value& value, const String *name=0, bool intercept_string=true); // execute.C + /// write(const) = clean void write(const String& astring) { - wcontext->write(astring, String::Untaint_lang::NO); // write(const) = clean + wcontext->write(astring, String::Untaint_lang::NO); } + /// appending, sure of clean string inside void write_no_lang(String& astring) { - // appending, sure of clean string inside wcontext->write(astring, String::Untaint_lang::NO); } - + /// appending string, passing language built into string being written + void write_pass_lang(String& astring) { + wcontext->write(astring, String::Untaint_lang::PASS_APPENDED); + } + /// appending possible string, assigning untaint language void write_assign_lang(Value& avalue) { - // appending possible string, assigning untaint language wcontext->write(avalue, flang); } + /// appending possible string, passing language built into string being written void write_pass_lang(Value& avalue) { - // appending possible string, passing language built into string being written wcontext->write(avalue, String::Untaint_lang::PASS_APPENDED); } + /// appending sure value, that would be converted to clean string void write_no_lang(Value& avalue) { - // appending sure value, no strings inside - wcontext->write(avalue, String::Untaint_lang::NO); + wcontext->write(avalue, String::Untaint_lang::NO); + } + /// appending sure value, not VString + void write_expr_result(Value& avalue) { + wcontext->write(avalue); } + /// handy is-value-a-junction ensurer void fail_if_junction_(bool is, Value& value, const String& method_name, char *msg); + /// returns relative to \a path path to \a file char *relative(const char *path, const char *file); + + /// returns an absolute \a path to relative \a name char *absolute(const char *name); public: - // default base - VClass root_class; - // $env:fields here - VEnv env_class; - // $form:elements here - VForm form_class; + /// info from web server + Info& info; + + /// default base + VClass ROOT; + /// $env:fields here + VEnv env; + /// $form:elements here + VForm form; + /// $request:elements here + VRequest request; + /// $response: + VResponse response; + /// $cookie: + VCookie cookie; - // contexts + /// contexts Value *self, *root, *rcontext; + /// contexts WContext *wcontext; private: // core data @@ -130,8 +168,10 @@ private: // compile.C private: // execute.C - char *execute_method(Value& aself, const Method& method, bool return_cstr); - char *execute_method(Value& aself, const String& method_name, bool return_cstr); + const String *execute_method(Value& aself, const Method& method, + bool return_cstr=true); + const String *execute_method(Value& aself, const String& method_name, + bool return_cstr=true); Value *get_element(); @@ -139,6 +179,11 @@ private: // lang&raw String::Untaint_lang flang; +private: // defaults + + const String::Untaint_lang fdefault_lang; + Value *fdefault_content_type; + private: // lang manipulation String::Untaint_lang set_lang(String::Untaint_lang alang) { @@ -150,13 +195,12 @@ private: // lang manipulation flang=alang; } -private: // web - - const char *document_root; - const char *page_filespec; +private: + void output_result(const String& body_string); }; +/// Auto-object used for temporary changing Request::flang. class Temp_lang { Request& frequest; String::Untaint_lang saved_lang;