Annotation of parser3/src/include/pa_request.h, revision 1.40
1.1 paf 1: /*
1.32 paf 2: Parser
3: Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
1.36 paf 4: Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
1.32 paf 5:
1.40 ! paf 6: $Id: pa_request.h,v 1.39 2001/03/11 12:04:43 paf Exp $
1.1 paf 7: */
8:
9: #ifndef PA_REQUEST_H
10: #define PA_REQUEST_H
11:
12: #include "pa_pool.h"
1.4 paf 13: #include "pa_exception.h"
1.5 paf 14: #include "pa_hash.h"
1.7 paf 15: #include "pa_wcontext.h"
1.6 paf 16: #include "pa_value.h"
1.7 paf 17: #include "pa_stack.h"
1.12 paf 18: #include "pa_vclass.h"
1.7 paf 19:
20: #define MAIN_METHOD_NAME "main"
1.27 paf 21: #define AUTO_METHOD_NAME "auto"
1.35 paf 22: #define MAIN_CLASS_NAME "MAIN"
1.23 paf 23:
1.29 paf 24: #define ROOT_CLASS_NAME "ROOT"
25: #define ENV_CLASS_NAME "ENV"
1.7 paf 26:
27: #ifndef NO_STRING_ORIGIN
1.40 ! paf 28: # define COMPILE_PARAMS \
! 29: const char *source, \
! 30: VClass *aclass, const String *name, \
! 31: VClass *base_class, \
! 32: const char *file
! 33: # define COMPILE(source, aclass, name, base_class, file) \
! 34: real_compile(source, aclass, name, base_class, file)
1.7 paf 35: #else
1.40 ! paf 36: # define COMPILE_PARAMS \
! 37: const char *source, \
! 38: VClass *aclass, const String *name, \
! 39: VClass *base_class
! 40: # define COMPILE(source, aclass, name, base_class, file) \
! 41: real_compile(source, aclass, name, base_class)
1.7 paf 42: #endif
1.4 paf 43:
1.39 paf 44: class Temp_lang;
1.1 paf 45:
1.7 paf 46: class Request : public Pooled {
1.39 paf 47: friend Temp_lang;
1.1 paf 48: public:
49:
1.17 paf 50: Request(Pool& apool);
1.3 paf 51: ~Request() {}
1.1 paf 52:
1.7 paf 53: // global classes
1.6 paf 54: Hash& classes() { return fclasses; }
1.12 paf 55: Array& classes_array() { return fclasses_array; }
1.6 paf 56:
57: // core request processing
58: void core();
1.17 paf 59:
1.40 ! paf 60: void execute(const Array& ops);
! 61:
! 62: VClass *use_file(
! 63: const char *file, bool fail_on_read_problem=true,
! 64: VClass *aclass=0, const String *name=0,
! 65: VClass *base_class=0); // core.C
! 66: VClass *use_buf(
! 67: const char *source, const char *file,
! 68: VClass *aclass=0, const String *name=0,
! 69: VClass *base_class=0); // core.C
! 70: Value& process(
1.33 paf 71: Value& value,
1.37 paf 72: const String *name=0,
1.38 paf 73: bool intercept_string=true); // execute.C
1.28 paf 74:
75: void write(const String& astring) {
76: wcontext->write(astring, String::Untaint_lang::NO); // write(const) = clean
77: }
1.22 paf 78:
1.40 ! paf 79: void write_assign_lang(Value& avalue) {
1.25 paf 80: // appending possible string, assigning untaint language
1.39 paf 81: wcontext->write(avalue, flang);
1.22 paf 82: }
1.40 ! paf 83: void write_pass_lang(Value& avalue) {
! 84: // appending possible string, passing language built into string being written
! 85: wcontext->write(avalue, String::Untaint_lang::PASS_APPENDED);
! 86: }
1.22 paf 87:
1.17 paf 88: public:
1.22 paf 89:
90: // default base
91: VClass root_class;
1.23 paf 92: // $ENV:fields here
93: VClass env_class;
1.17 paf 94:
1.22 paf 95: // contexts
96: Value *self, *root, *rcontext;
97: WContext *wcontext;
1.6 paf 98:
1.7 paf 99: private: // core data
1.6 paf 100:
101: // classes
102: Hash fclasses;
1.12 paf 103: Array fclasses_array;
1.6 paf 104:
1.7 paf 105: // execution stack
106: Stack stack;
107:
108: private: // core.C
109:
1.12 paf 110: char *execute_MAIN();
1.7 paf 111:
112: private: // compile.C
113:
1.12 paf 114: VClass& real_compile(COMPILE_PARAMS);
1.7 paf 115:
116: private: // execute.C
117:
1.29 paf 118: char *execute_static_method(VClass& vclass, String& method_name, bool return_cstr);
1.9 paf 119:
120: Value *get_element();
1.22 paf 121:
122: private: // lang&raw
123:
1.39 paf 124: String::Untaint_lang flang;
1.22 paf 125:
1.39 paf 126: private: // lang manipulation
1.22 paf 127:
1.39 paf 128: String::Untaint_lang set_lang(String::Untaint_lang alang) {
129: String::Untaint_lang result=flang;
130: flang=alang;
131: return result;
132: }
133: void restore_lang(String::Untaint_lang alang) {
134: flang=alang;
135: }
136:
137: };
138:
139: class Temp_lang {
140: Request& frequest;
141: String::Untaint_lang saved_lang;
142: public:
143: Temp_lang(Request& arequest, String::Untaint_lang alang) :
144: frequest(arequest),
145: saved_lang(arequest.set_lang(alang)) {
146: }
147: ~Temp_lang() {
148: frequest.restore_lang(saved_lang);
149: }
1.4 paf 150: };
1.1 paf 151:
152: #endif
E-mail: