Return to pa_vhash.h CVS log

Up to [parser3project] / parser3 / src / types

Annotation of parser3/src/types/pa_vhash.h, revision 1.46

1.10      paf         1: /** @file
                      2:        Parser: @b hash parser type decl.
                      3: 
1.46    ! paf         4:        Copyright (c) 2001-2003 ArtLebedev Group (http://www.artlebedev.com)
1.29      paf         5:        Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
1.1       paf         6: */
                      7: 
                      8: #ifndef PA_VHASH_H
                      9: #define PA_VHASH_H
1.34      paf        10: 
1.46    ! paf        11: static const char* IDENT_VHASH_H="$Date: 2003/06/06 12:05:25 $";
1.1       paf        12: 
1.13      paf        13: #include "classes.h"
1.1       paf        14: #include "pa_value.h"
                     15: #include "pa_hash.h"
1.21      parser     16: #include "pa_vint.h"
1.46    ! paf        17: #include "pa_globals.h"
1.1       paf        18: 
1.39      paf        19: // defines
                     20: 
                     21: #define VHASH_TYPE "hash"
1.42      paf        22: #define HASH_FIELDS_NAME "fields"
1.39      paf        23: 
1.26      paf        24: // externs
                     25: 
1.46    ! paf        26: extern Methoded* hash_class;
        !            27: extern const String hash_default_element_name;
1.13      paf        28: 
1.26      paf        29: // forwards
                     30: 
                     31: class VHash_lock;
                     32: 
1.11      paf        33: /// value of type 'hash', implemented with Hash
1.46    ! paf        34: class VHash: public VStateless_object {
1.26      paf        35:        friend class VHash_lock;
1.1       paf        36: public: // value
                     37: 
1.46    ! paf        38:        override const char* type() const { return VHASH_TYPE; }
        !            39:        override VStateless_class *get_class() { return hash_class; }
1.17      parser     40: 
1.19      parser     41:        /// VHash: finteger
1.46    ! paf        42:        override int as_int() const { return fhash.count(); }
1.19      parser     43:        /// VHash: finteger
1.46    ! paf        44:        override double as_double() const { return as_int(); }
1.17      parser     45:        /// VHash: count!=0
1.46    ! paf        46:        override bool is_defined() const { return as_int()!=0; }
1.23      parser     47:        /// VHash: count!=0
1.46    ! paf        48:        override bool as_bool() const { return is_defined(); }
1.20      parser     49:        /// VHash: count
1.46    ! paf        50:        override Value& as_expr_result(bool ) { return *new VInt(as_int()); }
1.1       paf        51: 
1.11      paf        52:        /// VHash: fhash
1.46    ! paf        53:        override HashStringValue *get_hash() { return &hash(); }
1.14      paf        54: 
1.11      paf        55:        /// VHash: (key)=value
1.46    ! paf        56:        override Value* get_element(const String& aname, Value& aself, bool looking_up) { 
1.45      paf        57:                // $element
1.46    ! paf        58:                if(Value* result=fhash.get(aname))
1.13      paf        59:                        return result;
1.42      paf        60: 
                     61:                // $fields -- pseudo field to make 'hash' more like 'table'
                     62:                if(aname == HASH_FIELDS_NAME)
                     63:                        return this;
1.13      paf        64: 
1.45      paf        65:                // $method
1.46    ! paf        66:                if(Value* result=VStateless_object::get_element(aname, aself, looking_up))
1.16      parser     67:                        return result;
                     68: 
                     69:                // default value
1.22      parser     70:                return get_default();
1.1       paf        71:        }
                     72:        
1.11      paf        73:        /// VHash: (key)=value
1.46    ! paf        74:        override bool put_element(const String& aname, Value* avalue, bool /*replace*/) { 
        !            75:                if(flocked) {
1.40      paf        76:                        if(!fhash.put_replace(aname, avalue))
                     77:                                throw Exception("parser.runtime",
                     78:                                        &aname,
1.46    ! paf        79:                                        "can not insert new hash key (hash flocked)");
        !            80:                } else
        !            81:                        fhash.put(aname, avalue);
1.36      paf        82: 
                     83:                return true;
1.1       paf        84:        }
                     85: 
                     86: public: // usage
                     87: 
1.46    ! paf        88:        VHash(): flocked(false) {}
1.18      parser     89: 
1.46    ! paf        90:        VHash(const HashStringValue& source): fhash(source), flocked(false) {}
1.7       paf        91: 
1.46    ! paf        92:        HashStringValue& hash() { 
        !            93:                check_lock();
1.26      paf        94:                return fhash; 
                     95:        }
1.1       paf        96: 
1.44      paf        97:        void set_default(Value* adefault) { 
1.46    ! paf        98:                fhash.put(hash_default_element_name, adefault);
1.22      parser     99:        }
1.46    ! paf       100:        Value* get_default() { 
        !           101:                return fhash.get(hash_default_element_name); 
1.22      parser    102:        }
1.13      paf       103: 
1.46    ! paf       104:        void check_lock() {
        !           105:                if(flocked)
1.30      paf       106:                        throw Exception("parser.runtime",
1.46    ! paf       107:                                0,
        !           108:                                "can not modify hash (flocked)");
1.26      paf       109:        }
                    110: 
1.1       paf       111: private:
1.6       paf       112: 
1.46    ! paf       113:        bool flocked;
        !           114:        HashStringValue fhash;
1.26      paf       115: 
                    116: };
                    117: 
                    118: class VHash_lock {
                    119:        VHash& fhash;
                    120:        bool saved;
                    121: public:
1.46    ! paf       122:        VHash_lock(VHash& ahash): fhash(ahash) {
        !           123:                saved=fhash.flocked;
        !           124:                fhash.flocked=true;
1.26      paf       125:        }
                    126:        ~VHash_lock() {
1.46    ! paf       127:                fhash.flocked=saved;
1.26      paf       128:        }
1.6       paf       129: 
1.1       paf       130: };
                    131: 
                    132: #endif