Return to pa_request.h CVS log

Up to [parser3project] / parser3 / src / include

Annotation of parser3/src/include/pa_request.h, revision 1.39

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.39    ! paf         6:        $Id: pa_request.h,v 1.38 2001/03/11 09:24:42 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.31      paf        28: #      define COMPILE_PARAMS char *source, String *name, VClass *base_class, char *file
                     29: #      define COMPILE(source, name, base_class, file) real_compile(source, name, base_class, file)
1.7       paf        30: #else
1.31      paf        31: #      define COMPILE_PARAMS char *source, String *name, VClass *base_class
                     32: #      define COMPILE(source, name, base_class, file) real_compile(source, name, base_class)
1.7       paf        33: #endif
1.4       paf        34: 
1.39    ! paf        35: class Temp_lang;
1.1       paf        36: 
1.7       paf        37: class Request : public Pooled {
1.39    ! paf        38:        friend Temp_lang;
1.1       paf        39: public:
                     40:        
1.17      paf        41:        Request(Pool& apool);
1.3       paf        42:        ~Request() {}
1.1       paf        43: 
1.7       paf        44:        // global classes
1.6       paf        45:        Hash& classes() { return fclasses; }
1.12      paf        46:        Array& classes_array() { return fclasses_array; }
1.6       paf        47: 
                     48:        // core request processing
                     49:        void core();
1.17      paf        50: 
1.31      paf        51:        VClass *use(char *file, 
                     52:                String *name=0, 
                     53:                VClass *base_class=0, 
                     54:                bool fail_on_read_problem=true); // core.C
1.33      paf        55:        Value& autocalc(
                     56:                Value& value, 
1.37      paf        57:                const String *name=0,
1.38      paf        58:                bool intercept_string=true); // execute.C
1.28      paf        59: 
                     60:        void write(const String& astring) {
                     61:                wcontext->write(astring, String::Untaint_lang::NO);  // write(const) = clean
                     62:        }
1.22      paf        63: 
1.25      paf        64:        void write(Value& avalue) {
                     65:                // appending possible string, assigning untaint language
1.39    ! paf        66:                wcontext->write(avalue, flang); 
1.22      paf        67:        }
                     68: 
1.17      paf        69: public:
1.22      paf        70:        
                     71:        // default base
                     72:        VClass root_class;
1.23      paf        73:        // $ENV:fields here
                     74:        VClass env_class;
1.17      paf        75: 
1.22      paf        76:        // contexts
                     77:        Value *self, *root, *rcontext;
                     78:        WContext *wcontext;
1.6       paf        79: 
1.7       paf        80: private: // core data
1.6       paf        81: 
                     82:        // classes
                     83:        Hash fclasses;
1.12      paf        84:        Array fclasses_array;
1.6       paf        85: 
1.7       paf        86:        // execution stack
                     87:        Stack stack;
                     88: 
                     89: private: // core.C
                     90: 
1.12      paf        91:        char *execute_MAIN();
1.7       paf        92: 
                     93: private: // compile.C
                     94: 
1.12      paf        95:        VClass& real_compile(COMPILE_PARAMS);
1.7       paf        96: 
                     97: private: // execute.C
                     98: 
1.29      paf        99:        char *execute_static_method(VClass& vclass, String& method_name, bool return_cstr);
1.11      paf       100:        void execute(const Array& ops);
1.9       paf       101: 
                    102:        Value *get_element();
1.22      paf       103: 
                    104: private: // lang&raw 
                    105:        
1.39    ! paf       106:        String::Untaint_lang flang;
1.22      paf       107: 
1.39    ! paf       108: private: // lang manipulation
1.22      paf       109: 
1.39    ! paf       110:        String::Untaint_lang set_lang(String::Untaint_lang alang) {
        !           111:                String::Untaint_lang result=flang;
        !           112:                flang=alang;
        !           113:                return result;
        !           114:        }
        !           115:        void restore_lang(String::Untaint_lang alang) {
        !           116:                flang=alang;
        !           117:        }
        !           118: 
        !           119: };
        !           120: 
        !           121: class Temp_lang {
        !           122:        Request& frequest;
        !           123:        String::Untaint_lang saved_lang;
        !           124: public:
        !           125:        Temp_lang(Request& arequest, String::Untaint_lang alang) : 
        !           126:                frequest(arequest),
        !           127:                saved_lang(arequest.set_lang(alang)) {
        !           128:        }
        !           129:        ~Temp_lang() { 
        !           130:                frequest.restore_lang(saved_lang); 
        !           131:        }
1.4       paf       132: };
1.1       paf       133: 
                    134: #endif