|
version 1.160.2.36, 2003/03/12 10:47:12
|
version 1.160.2.37.2.10, 2003/03/24 13:43:41
|
|
Line 10
|
Line 10
|
| |
|
| static const char* IDENT_REQUEST_H="$Date$"; |
static const char* IDENT_REQUEST_H="$Date$"; |
| |
|
| #include "pa_pool.h" |
|
| #include "pa_request_info.h" |
#include "pa_request_info.h" |
| #include "pa_hash.h" |
#include "pa_hash.h" |
| #include "pa_wcontext.h" |
#include "pa_wcontext.h" |
|
Line 28 static const char* IDENT_REQUEST_H="$Dat
|
Line 27 static const char* IDENT_REQUEST_H="$Dat
|
| |
|
| const uint ANTI_ENDLESS_EXECUTE_RECOURSION=1000; |
const uint ANTI_ENDLESS_EXECUTE_RECOURSION=1000; |
| |
|
| // defines |
|
| |
|
| #ifndef NO_STRING_ORIGIN |
|
| # define COMPILE_PARAMS \ |
|
| VStateless_class* aclass, const char* source \ |
|
| , const char* file |
|
| # define COMPILE(aclass, source, file) \ |
|
| real_compile(aclass, source, file) |
|
| #else |
|
| # define COMPILE_PARAMS \ |
|
| VStateless_class* aclass, const char* source |
|
| # define COMPILE(aclass, source, file) \ |
|
| real_compile(aclass, source) |
|
| #endif |
|
| |
|
| // forwards |
// forwards |
| |
|
| class Temp_lang; |
class Temp_lang; |
|
Line 62 class Request: public PA_Object {
|
Line 46 class Request: public PA_Object {
|
| friend class Request_context_saver; |
friend class Request_context_saver; |
| friend class Temp_request_self; |
friend class Temp_request_self; |
| |
|
| /// all files and classes and other hard-to-place allocations go to this pool |
|
| Pool& fpool; |
|
| |
|
| ///@{ core data |
///@{ core data |
| |
|
| /// classes |
/// classes |
| HashStringValue fclasses; |
HashStringValue fclasses; |
| |
|
| /// already used files to avoid cyclic uses |
/// already used files to avoid cyclic uses |
| Hash<StringPtr, bool> used_files; |
Hash<const StringBody, bool> used_files; |
| |
|
| /** endless execute(execute(... preventing counter |
/** endless execute(execute(... preventing counter |
| @see ANTI_ENDLESS_EXECUTE_RECOURSION |
@see ANTI_ENDLESS_EXECUTE_RECOURSION |
|
Line 82 class Request: public PA_Object {
|
Line 63 class Request: public PA_Object {
|
| |
|
| public: |
public: |
| |
|
| class StackItem { |
union StackItem { |
| public: |
const String* string() const { return value->get_string(); } |
| StringPtr string(Pool& pool) const { return value->get_string(&pool); } |
Value* value; |
| ValuePtr value; |
ArrayOperation* ops; |
| ArrayOperationPtr ops; |
VMethodFrame* method_frame; |
| void *ptr; |
|
| |
|
| /// needed to fill unused Array entries |
/// needed to fill unused Array entries |
| StackItem() {} |
StackItem() {} |
| StackItem(ValuePtr avalue): value(avalue) {} |
StackItem(Value* avalue): value(avalue) {} |
| StackItem(ArrayOperationPtr aops): ops(aops) {} |
StackItem(ArrayOperation* aops): ops(aops) {} |
| StackItem(void *aptr): ptr(aptr) {} |
StackItem(VMethodFrame* amethod_frame): method_frame(amethod_frame) {} |
| }; |
}; |
| |
|
| //@{ request processing status |
//@{ request processing status |
| /// exception stack trace |
/// exception stack trace |
| Stack<StringPtr> exception_trace; |
//Stack<String*> exception_trace; |
| /// execution stack |
/// execution stack |
| Stack<StackItem> stack; |
Stack<StackItem> stack; |
| /// contexts |
/// contexts |
| VMethodFrame *method_frame; |
VMethodFrame* method_frame; |
| Value *rcontext; |
Value* rcontext; |
| WContext *wcontext; |
WContext* wcontext; |
| /// current language |
/// current language |
| String_UL flang; |
String::Language flang; |
| /// current connection |
/// current connection |
| SQL_Connection *fconnection; |
SQL_Connection* fconnection; |
| //@} |
//@} |
| /// interrupted flag, raised on signals [SIGPIPE] |
/// interrupted flag, raised on signals [SIGPIPE] |
| bool finterrupted; |
bool finterrupted; |
| |
|
| public: |
public: |
| |
|
| /// all files and classes and other hard-to-place allocations go to this pool |
|
| Pool& pool() { return fpool; } |
|
| |
|
| #ifdef RESOURCES_DEBUG |
#ifdef RESOURCES_DEBUG |
| /// measures |
/// measures |
| double sql_connect_time; |
double sql_connect_time; |
| double sql_request_time; |
double sql_request_time; |
| #endif |
#endif |
| |
|
| Request(Pool& apool, SAPI_Info& asapi_info, Request_info& arequest_info, |
Request(SAPI_Info& asapi_info, Request_info& arequest_info, |
| String_UL adefault_lang, ///< all tainted data default untainting lang |
String::Language adefault_lang, ///< all tainted data default untainting lang |
| bool status_allowed ///< status class allowed |
bool status_allowed ///< status class allowed |
| ); |
); |
| ~Request(); |
~Request(); |
|
Line 146 public:
|
Line 123 public:
|
| /// executes ops |
/// executes ops |
| void execute(ArrayOperation& ops); // execute.C |
void execute(ArrayOperation& ops); // execute.C |
| /// execute ops with anti-recoursion check |
/// execute ops with anti-recoursion check |
| void recoursion_checked_execute(StringPtr name, ArrayOperation& ops) { |
void recoursion_checked_execute(/*const String& name, */ArrayOperation& ops) { |
| // anti_endless_execute_recoursion |
// anti_endless_execute_recoursion |
| if(++anti_endless_execute_recoursion==ANTI_ENDLESS_EXECUTE_RECOURSION) { |
if(++anti_endless_execute_recoursion==ANTI_ENDLESS_EXECUTE_RECOURSION) { |
| anti_endless_execute_recoursion=0; // give @exception a chance |
anti_endless_execute_recoursion=0; // give @exception a chance |
| throw Exception("parser.runtime", |
throw Exception("parser.runtime", |
| name, |
0, //&name, |
| "call canceled - endless recursion detected"); |
"call canceled - endless recursion detected"); |
| } |
} |
| execute(ops); // execute it |
execute(ops); // execute it |
|
Line 159 public:
|
Line 136 public:
|
| } |
} |
| |
|
| /// compiles the file, maybe forcing it's class @a name and @a base_class. |
/// compiles the file, maybe forcing it's class @a name and @a base_class. |
| VStateless_classPtr use_file(VStateless_class& aclass, |
void use_file(VStateless_class& aclass, |
| StringPtr file_name, |
const String& file_name, |
| bool ignore_class_path=false, |
bool ignore_class_path=false, |
| bool fail_on_read_problem=true, bool fail_on_file_absence=true); // pa_request.C |
bool fail_on_read_problem=true, bool fail_on_file_absence=true); // pa_request.C |
| /// compiles a @a source buffer |
/// compiles a @a source buffer |
| VStateless_classPtr use_buf(VStateless_class& aclass, |
void use_buf(VStateless_class& aclass, |
| const char* source, |
const char* source, |
| StringPtr filespec, const char* filespec_cstr); // pa_request.C |
const String& filespec, const char* filespec_cstr); // pa_request.C |
| |
|
| /// processes any code-junction there may be inside of @a value |
/// processes any code-junction there may be inside of @a value |
| StringOrValue process(ValuePtr input_value, bool intercept_string=true); // execute.C |
StringOrValue process(Value& input_value, bool intercept_string=true); // execute.C |
| //@{ convinient helpers |
//@{ convinient helpers |
| StringPtr process_to_string(ValuePtr input_value) { |
const String& process_to_string(Value& input_value) { |
| return process(input_value, true/*intercept_string*/).as_string(&pool()); |
return process(input_value, true/*intercept_string*/).as_string(); |
| } |
} |
| ValuePtr process_to_value(ValuePtr input_value, bool intercept_string=true) { |
Value& process_to_value(Value& input_value, bool intercept_string=true) { |
| return process(input_value, intercept_string).as_value(); |
return process(input_value, intercept_string).as_value(); |
| } |
} |
| //@} |
//@} |
|
Line 182 public:
|
Line 159 public:
|
| |
|
| #define DEFINE_DUAL(modification) \ |
#define DEFINE_DUAL(modification) \ |
| void write_##modification##_lang(StringOrValue dual) { \ |
void write_##modification##_lang(StringOrValue dual) { \ |
| if(StringPtr string=dual.get_string()) \ |
if(const String* string=dual.get_string()) \ |
| write_##modification##_lang(*string); \ |
|
| else \ |
|
| write_##modification##_lang(dual.get_value()); \ |
|
| } |
|
| #define DEFINE_DUAL_CHECKED(modification) \ |
|
| void write_##modification##_lang(StringOrValue dual, StringPtr origin) { \ |
|
| if(StringPtr string=dual.get_string()) \ |
|
| write_##modification##_lang(*string); \ |
write_##modification##_lang(*string); \ |
| else \ |
else \ |
| write_##modification##_lang(dual.get_value(), origin); \ |
write_##modification##_lang(*dual.get_value()); \ |
| } |
} |
| |
|
| /// appending, sure of clean string inside |
/// appending, sure of clean string inside |
| void write_no_lang(const String& astring) { |
void write_no_lang(const String& astring) { |
| wcontext->write(astring, |
wcontext->write(astring, |
| String::UL_CLEAN | flang&String::UL_OPTIMIZE_BIT); |
(String::Language)(String::L_CLEAN | flang&String::L_OPTIMIZE_BIT)); |
| } |
} |
| /// appending sure value, that would be converted to clean string |
/// appending sure value, that would be converted to clean string |
| void write_no_lang(ValuePtr avalue) { |
void write_no_lang(Value& avalue) { |
| if(wcontext->get_in_expression()) |
if(wcontext->get_in_expression()) |
| wcontext->write(pool(), avalue); |
wcontext->write(avalue); |
| else |
else |
| wcontext->write(pool(), avalue, |
wcontext->write(avalue, |
| String::UL_CLEAN | flang&String::UL_OPTIMIZE_BIT); |
(String::Language)(String::L_CLEAN | flang&String::L_OPTIMIZE_BIT)); |
| } |
} |
| |
|
| /// appending string, passing language built into string being written |
/// appending string, passing language built into string being written |
| void write_pass_lang(const String& astring) { |
void write_pass_lang(const String& astring) { |
| wcontext->write(astring, String::UL_PASS_APPENDED); |
wcontext->write(astring, String::L_PASS_APPENDED); |
| } |
} |
| /// appending possible string, passing language built into string being written |
/// appending possible string, passing language built into string being written |
| void write_pass_lang(ValuePtr avalue) { |
void write_pass_lang(Value& avalue) { |
| wcontext->write(pool(), avalue, String::UL_PASS_APPENDED); |
wcontext->write(avalue, String::L_PASS_APPENDED); |
| } |
} |
| DEFINE_DUAL(pass) |
DEFINE_DUAL(pass) |
| |
|
| /// appending possible string, assigning untaint language |
/// appending possible string, assigning untaint language |
| void write_assign_lang(ValuePtr avalue) { |
void write_assign_lang(Value& avalue) { |
| wcontext->write(pool(), avalue, flang); |
wcontext->write(avalue, flang); |
| } |
|
| /// appending possible string, assigning untaint language |
|
| void write_assign_lang(ValuePtr avalue, StringPtr origin) { |
|
| wcontext->write(pool(), avalue, flang, origin); |
|
| } |
} |
| /// appending string, assigning untaint language |
/// appending string, assigning untaint language |
| void write_assign_lang(const String& astring) { |
void write_assign_lang(const String& astring) { |
| wcontext->write(astring, flang); |
wcontext->write(astring, flang); |
| } |
} |
| DEFINE_DUAL(assign) |
DEFINE_DUAL(assign) |
| DEFINE_DUAL_CHECKED(assign) |
|
| |
|
| /// returns relative to @a path path to @a file |
/// returns relative to @a path path to @a file |
| StringPtr relative(const char* apath, StringPtr relative_name); |
const String& relative(const char* apath, const String& relative_name); |
| |
|
| /// returns an absolute @a path to relative @a name |
/// returns an absolute @a path to relative @a name |
| StringPtr absolute(StringPtr relative_name); |
const String& absolute(const String& relative_name); |
| |
|
| /// returns the mime type of 'user_file_name_cstr' |
/// returns the mime type of 'user_file_name_cstr' |
| StringPtr mime_type_of(const char* user_file_name_cstr); |
const String& mime_type_of(const char* user_file_name_cstr); |
| |
|
| /// returns current SQL connection if any |
/// returns current SQL connection if any |
| SQL_Connection *connection(StringPtr source) { |
SQL_Connection* connection(bool fail_on_error=true) { |
| if(!fconnection && source) |
if(fail_on_error && !fconnection) |
| throw Exception("parser.runtime", |
throw Exception("parser.runtime", |
| source, |
0, |
| "outside of 'connect' operator"); |
"outside of 'connect' operator"); |
| |
|
| return fconnection; |
return fconnection; |
| } |
} |
| |
|
| bool origins_mode(); |
|
| |
|
| void set_interrupted(bool ainterrupted) { finterrupted=ainterrupted; } |
void set_interrupted(bool ainterrupted) { finterrupted=ainterrupted; } |
| bool get_interrupted() { return finterrupted; } |
bool get_interrupted() { return finterrupted; } |
| |
|
|
Line 270 public:
|
Line 233 public:
|
| Request_charsets charsets; |
Request_charsets charsets; |
| |
|
| /// 'MAIN' class conglomerat & operators are methods of this class |
/// 'MAIN' class conglomerat & operators are methods of this class |
| VStateless_classPtr main_class; |
VStateless_class& main_class; |
| /// $form:elements |
/// $form:elements |
| VFormPtr form; |
VForm& form; |
| /// $mail |
/// $mail |
| VMailPtr mail; |
VMail& mail; |
| /// $response:elements |
/// $response:elements |
| VResponsePtr response; |
VResponse& response; |
| /// $cookie:elements |
/// $cookie:elements |
| VCookiePtr cookie; |
VCookie& cookie; |
| |
|
| /// classes configured data |
/// classes configured data |
| HashStringObject classes_conf; |
HashStringObject classes_conf; |
|
Line 286 public:
|
Line 249 public:
|
| public: // status read methods |
public: // status read methods |
| |
|
| VMethodFrame *get_method_frame() { return method_frame; } |
VMethodFrame *get_method_frame() { return method_frame; } |
| ValuePtr get_self(); |
Value& get_self(); |
| #define GET_SELF(request, type) (*static_cast<type *>(request.get_self().get())) |
#define GET_SELF(request, type) (static_cast<type &>(request.get_self())) |
| /* for strange reason call to this: |
/* for strange reason call to this: |
| r.get_self<VHash>() |
r.get_self<VHash>() |
| refuses to compile |
refuses to compile |
|
Line 301 public: // status read methods
|
Line 264 public: // status read methods
|
| public: // charset helpers |
public: // charset helpers |
| |
|
| /// @see Charset::transcode |
/// @see Charset::transcode |
| GdomeDOMString_auto_ptr transcode(StringPtr s); |
GdomeDOMString_auto_ptr transcode(const String& s); |
| /// @see Charset::transcode |
/// @see Charset::transcode |
| StringPtr transcode(GdomeDOMString* s |
const String& transcode(GdomeDOMString* s |
| #ifndef NO_STRING_ORIGIN |
#ifndef NO_STRING_ORIGIN |
| , StringPtr origin |
, const String& origin |
| #endif |
#endif |
| ); |
); |
| /// @see Charset::transcode |
/// @see Charset::transcode |
| StringPtr transcode(xmlChar* s |
const String& transcode(xmlChar* s |
| #ifndef NO_STRING_ORIGIN |
#ifndef NO_STRING_ORIGIN |
| , StringPtr origin |
, const String& origin |
| #endif |
#endif |
| ); |
); |
| |
|
|
Line 322 private:
|
Line 285 private:
|
| /// already executed some @conf method |
/// already executed some @conf method |
| bool configure_admin_done; |
bool configure_admin_done; |
| |
|
| void configure_admin(VStateless_class& conf_class, StringPtr source); |
void configure_admin(VStateless_class& conf_class); |
| |
|
| private: // compile.C |
private: // compile.C |
| |
|
| VStateless_class& real_compile(COMPILE_PARAMS); |
VStateless_class& compile(VStateless_class* aclass, const char* source, const char* file); |
| |
|
| private: // execute.C |
private: // execute.C |
| |
|
| /// for @postprocess[body] |
/// for @postprocess[body] |
| StringPtr execute_method(VMethodFrame& amethodFrame, const Method& method); |
const String& execute_method(VMethodFrame& amethodFrame, const Method& method); |
| //{ for @conf[filespec] and @auto[filespec] |
//{ for @conf[filespec] and @auto[filespec] |
| StringPtr execute_method(ValuePtr aself, |
const String* execute_method(Value& aself, |
| const Method& method, VStringPtr optional_param, |
const Method& method, VString* optional_param, |
| bool do_return_string); |
bool do_return_string); |
| struct Execute_nonvirtual_method_result { |
struct Execute_nonvirtual_method_result { |
| StringPtr string; |
const String* string; |
| MethodPtr method; |
Method* method; |
| |
Execute_nonvirtual_method_result(): string(0), method(0) {} |
| }; |
}; |
| Execute_nonvirtual_method_result execute_nonvirtual_method(VStateless_class& aclass, |
Execute_nonvirtual_method_result execute_nonvirtual_method(VStateless_class& aclass, |
| StringPtr method_name, VStringPtr optional_param, |
const String& method_name, VString* optional_param, |
| bool do_return_string); |
bool do_return_string); |
| //} |
//} |
| /// for @main[] |
/// for @main[] |
| StringPtr execute_virtual_method(ValuePtr aself, StringPtr method_name); |
const String* execute_virtual_method(Value& aself, const String& method_name); |
| |
|
| ValuePtr get_element(StringPtr& remember_name, bool can_call_operator); |
Value* get_element(bool can_call_operator); |
| |
|
| private: // defaults |
private: // defaults |
| |
|
| const String_UL fdefault_lang; |
const String::Language fdefault_lang; |
| |
|
| private: // mime types |
private: // mime types |
| |
|
|
Line 360 private: // mime types
|
Line 324 private: // mime types
|
| |
|
| private: // lang manipulation |
private: // lang manipulation |
| |
|
| String_UL set_lang(String_UL alang) { |
String::Language set_lang(String::Language alang) { |
| String_UL result=flang; |
String::Language result=flang; |
| flang=alang; |
flang=alang; |
| return result; |
return result; |
| } |
} |
| void restore_lang(String_UL alang) { |
void restore_lang(String::Language alang) { |
| flang=alang; |
flang=alang; |
| } |
} |
| |
|
| private: // connection manipulation |
private: // connection manipulation |
| |
|
| SQL_Connection *set_connection(SQL_Connection *aconnection) { |
SQL_Connection* set_connection(SQL_Connection* aconnection) { |
| SQL_Connection *result=fconnection; |
SQL_Connection* result=fconnection; |
| fconnection=aconnection; |
fconnection=aconnection; |
| return result; |
return result; |
| } |
} |
| void restore_connection(SQL_Connection *aconnection) { |
void restore_connection(SQL_Connection* aconnection) { |
| fconnection=aconnection; |
fconnection=aconnection; |
| } |
} |
| |
|
| private: |
private: |
| |
|
| void output_result(VFilePtr body_file, bool header_only, bool as_attachment); |
void output_result(VFile* body_file, bool header_only, bool as_attachment); |
| }; |
}; |
| |
|
| /// Auto-object used to save request context across ^try body |
/// Auto-object used to save request context across ^try body |
|
Line 398 class Request_context_saver {
|
Line 362 class Request_context_saver {
|
| Value *rcontext; |
Value *rcontext; |
| WContext *wcontext; |
WContext *wcontext; |
| /// current language |
/// current language |
| String_UL flang; |
String::Language flang; |
| /// current connection |
/// current connection |
| SQL_Connection *fconnection; |
SQL_Connection* fconnection; |
| |
|
| public: |
public: |
| Request_context_saver(Request& ar) : |
Request_context_saver(Request& ar) : |
| exception_trace(ar.exception_trace.top_index()), |
//exception_trace(ar.exception_trace.top_index()), |
| stack(ar.stack.top_index()), |
stack(ar.stack.top_index()), |
| method_frame(ar.method_frame), |
method_frame(ar.method_frame), |
| rcontext(ar.rcontext), |
rcontext(ar.rcontext), |
|
Line 413 public:
|
Line 377 public:
|
| fconnection(ar.fconnection), |
fconnection(ar.fconnection), |
| fr(ar) {} |
fr(ar) {} |
| void restore() { |
void restore() { |
| fr.exception_trace.top_index(exception_trace); |
//fr.exception_trace.top_index(exception_trace); |
| fr.stack.top_index(stack); |
fr.stack.top_index(stack); |
| fr.method_frame=method_frame, fr.rcontext=rcontext; fr.wcontext=wcontext; |
fr.method_frame=method_frame, fr.rcontext=rcontext; fr.wcontext=wcontext; |
| fr.flang=flang; |
fr.flang=flang; |
|
Line 424 public:
|
Line 388 public:
|
| /// Auto-object used for temporary changing Request::flang. |
/// Auto-object used for temporary changing Request::flang. |
| class Temp_lang { |
class Temp_lang { |
| Request& frequest; |
Request& frequest; |
| String_UL saved_lang; |
String::Language saved_lang; |
| public: |
public: |
| Temp_lang(Request& arequest, String_UL alang) : |
Temp_lang(Request& arequest, String::Language alang) : |
| frequest(arequest), |
frequest(arequest), |
| saved_lang(arequest.set_lang(alang)) { |
saved_lang(arequest.set_lang(alang)) { |
| } |
} |
|
Line 438 public:
|
Line 402 public:
|
| /// Auto-object used for temporary changing Request::fconnection. |
/// Auto-object used for temporary changing Request::fconnection. |
| class Temp_connection { |
class Temp_connection { |
| Request& frequest; |
Request& frequest; |
| SQL_Connection *saved_connection; |
SQL_Connection* saved_connection; |
| public: |
public: |
| Temp_connection(Request& arequest, SQL_Connection *aconnection) : |
Temp_connection(Request& arequest, SQL_Connection* aconnection) : |
| frequest(arequest), |
frequest(arequest), |
| saved_connection(arequest.set_connection(aconnection)) { |
saved_connection(arequest.set_connection(aconnection)) { |
| } |
} |
|
Line 458 public:
|
Line 422 public:
|
| |
|
| // externs |
// externs |
| |
|
| extern StringPtr main_method_name; |
extern const String main_method_name; |
| extern StringPtr auto_method_name; |
extern const String auto_method_name; |
| extern StringPtr body_name; |
extern const String body_name; |
| extern StringPtr content_disposition_name; |
extern const String content_disposition_name; |
| extern StringPtr content_disposition_value; |
extern const String content_disposition_value; |
| extern StringPtr content_disposition_filename_name; |
extern const String content_disposition_filename_name; |
| |
|
| // defines for statics |
// defines for statics |
| |
|