[BACK]Return to pa_request.h CVS log [TXT] [DIR] Up to [parser3project] / parser3 / src / include

Diff for /parser3/src/include/pa_request.h between versions 1.160.2.34 and 1.160.2.37.2.17

version 1.160.2.34, 2003/03/08 16:43:16 version 1.160.2.37.2.17, 2003/04/02 16:05:19
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_hash.h"  #include "pa_hash.h"
 #include "pa_wcontext.h"  #include "pa_wcontext.h"
 #include "pa_value.h"  #include "pa_value.h"
Line 26  static const char* IDENT_REQUEST_H="$Dat Line 24  static const char* IDENT_REQUEST_H="$Dat
   
 // consts  // consts
   
 const uint ANTI_ENDLESS_EXECUTE_RECOURSION=500;  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
   
Line 49  class Temp_lang; Line 32  class Temp_lang;
 class Methoded;  class Methoded;
 class VMethodFrame;  class VMethodFrame;
 class GdomeDOMString_auto_ptr;  class GdomeDOMString_auto_ptr;
 class VMail; DECLARE_OBJECT_PTR(VMail);  class VMail;
 class VForm; DECLARE_OBJECT_PTR(VForm);  class VForm;
 class VResponse; DECLARE_OBJECT_PTR(VResponse);  class VResponse;
 class VCookie; DECLARE_OBJECT_PTR(VCookie);  class VCookie;
 class VStateless_class; DECLARE_OBJECT_PTR(VStateless_class);  class VStateless_class;
   
 /// Main workhorse.  /// Main workhorse.
 class Request: public PA_Object {  class Request: public PA_Object {
Line 62  class Request: public PA_Object { Line 45  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          union StackItem {
         Pool& fpool;                  Value* fvalue;
                   ArrayOperation* fops;
                   VMethodFrame* fmethod_frame;
           public:
                   Value& value() const { return *fvalue; }
                   const String& string() const { 
                           const String* result=fvalue->get_string();
                           assert(result);
                           return *result; 
                   }
                   ArrayOperation& ops() const { return *fops; }
                   VMethodFrame& method_frame() const { return *fmethod_frame; }
   
                   /// needed to fill unused Array entries
                   StackItem() {}
                   StackItem(Value& avalue): fvalue(&avalue) {}            
                   StackItem(ArrayOperation& aops): fops(&aops) {}
                   StackItem(VMethodFrame& amethod_frame): fmethod_frame(&amethod_frame) {}
           };
   
           class Trace {
                   const String* fname;
                   Operation::Info forigin;
           public:
                   Trace(const String* aname, Operation::Info aorigin):
                           fname(aname), forigin(aorigin) {}
   
                   const String* name() { return fname; }
                   Operation::Info origin() { return forigin; }
           };
   
         ///@{ core data          ///@{ core data
   
Line 71  class Request: public PA_Object { Line 83  class Request: public PA_Object {
         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;
           /// list of all used files, Operation::file_no = index to it
           Array<StringBody> file_list;
   
         /**     endless execute(execute(... preventing counter           /**     endless execute(execute(... preventing counter 
                 @see ANTI_ENDLESS_EXECUTE_RECOURSION                  @see ANTI_ENDLESS_EXECUTE_RECOURSION
Line 80  class Request: public PA_Object { Line 94  class Request: public PA_Object {
   
         ///@}          ///@}
   
 public:          /// execution stack
           Stack<StackItem> stack;
         class StackItem {  
         public:  
                 StringPtr string(Pool& pool) const { return value->get_string(&pool); }  
                 ValuePtr value;  
                 ArrayOperationPtr ops;  
                 void *ptr;  
   
                 /// needed to fill unused Array entries          /// exception stack trace
                 StackItem() {}          Stack<Trace> exception_trace;
                 StackItem(ValuePtr avalue): value(avalue) {}              public:
                 StackItem(ArrayOperationPtr aops): ops(aops) {}  
                 StackItem(void *aptr): ptr(aptr) {}  
         };  
   
         //@{ request processing status          //@{ request processing status
         /// exception stack trace  
         Stack<StringPtr> exception_trace;  
         /// execution 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          /// @see Stack::wipe_unused
         Pool& pool() { return fpool; }          void wipe_unused_execution_stack() {
                   stack.wipe_unused();
           }
   
 #ifdef RESOURCES_DEBUG  #ifdef RESOURCES_DEBUG
         /// measures          /// measures
Line 124  public: Line 127  public:
         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 149  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 162  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                  uint file_no); // 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 185  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); \                          write_##modification##_lang(*string); \
                 else \                  else \
                         write_##modification##_lang(dual.get_value()); \                          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); \  
                 else \  
                         write_##modification##_lang(dual.get_value(), origin); \  
         }          }
   
         /// 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; }
           bool get_interrupted() { return finterrupted; }
         void interrupt() { finterrupted=true; }  
         bool interrupted() { return finterrupted; }  
   
 public:  public:
                   
Line 270  public: Line 259  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 275  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 290  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          GdomeDOMString_auto_ptr transcode(const StringBody s);
 #ifndef NO_STRING_ORIGIN  
                 , StringPtr origin  
 #endif  
                 );  
         /// @see Charset::transcode          /// @see Charset::transcode
         StringPtr transcode(xmlChar* s          const String& transcode(GdomeDOMString* s);
 #ifndef NO_STRING_ORIGIN          /// @see Charset::transcode
                 , StringPtr origin          const String& transcode(xmlChar* s);
 #endif  
                 );  
   
 #endif  #endif
   
Line 322  private: Line 305  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, uint file_no);
   
 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(Value& ncontext, const String& name, 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 344  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 382  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 397  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 408  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 422  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 442  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
   
Removed from v.1.160.2.34  
changed lines
  Added in v.1.160.2.37.2.17

E-mail: