Return to pa_venv.h CVS log

Up to [parser3project] / parser3 / src / types

Annotation of parser3/src/types/pa_venv.h, revision 1.28.2.5.2.3

1.10      paf         1: /** @file
1.14      paf         2:        Parser: @b env class decl.
1.10      paf         3: 
1.28.2.3  paf         4:        Copyright (c) 2001-2003 ArtLebedev Group (http://www.artlebedev.com)
1.20      paf         5:        Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
1.2       paf         6: */
                      7: 
                      8: #ifndef PA_VENV_H
                      9: #define PA_VENV_H
1.22      paf        10: 
1.28.2.5.2.3! paf        11: static const char* IDENT_VENV_H="$Date: 2003/03/20 08:11:16 $";
1.28.2.1  paf        12: 
                     13: // includes
1.2       paf        14: 
1.13      paf        15: #include "pa_sapi.h"
1.8       paf        16: #include "pa_common.h"
1.10      paf        17: #include "pa_value.h"
1.3       paf        18: #include "pa_string.h"
1.15      paf        19: 
1.28.2.1  paf        20: // defines
                     21: 
1.15      paf        22: #define ENV_CLASS_NAME "env"
1.2       paf        23: 
1.10      paf        24: /// env class
1.28.2.2  paf        25: class VEnv: public Value {
1.28.2.5.2.1  paf        26:        ;
1.28.2.1  paf        27:        SAPI_Info& finfo;
1.2       paf        28: public: // Value
                     29:        
1.28.2.3  paf        30:        const char* type() const { return "env"; }
1.21      paf        31:        /// VEnv: 0
                     32:        VStateless_class *get_class() { return 0; }
1.2       paf        33: 
1.10      paf        34:        // VEnv: field
1.28.2.5.2.3! paf        35:        Value* get_element(const String& aname, Value& /*aself*/, bool /*looking_up*/) {
1.5       paf        36:                // getenv
1.28.2.5.2.3! paf        37:                String& result=*new String;
        !            38:                if(const char* local_value=SAPI::get_env(finfo, aname.cstr()))
        !            39:                        result.append(strdup(local_value), 0, String::L_TAINTED);
        !            40:                return new VString(result);
1.2       paf        41:        }
                     42: 
                     43: public: // usage
                     44: 
1.28.2.5.2.1  paf        45:        VEnv(SAPI_Info& ainfo): 
1.28.2.5.2.3! paf        46:                
1.28.2.4  paf        47:                finfo(ainfo) {}
1.2       paf        48: 
                     49: };
                     50: 
                     51: #endif