Annotation of parser3/src/types/pa_vobject.h, revision 1.38.2.1
1.6 paf 1: /** @file
1.7 paf 2: Parser: @b object class decl.
3:
1.38 paf 4: Copyright (c) 2001, 2003 ArtLebedev Group (http://www.artlebedev.com)
1.16 paf 5: Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
1.1 paf 6: */
7:
8: #ifndef PA_VOBJECT_H
9: #define PA_VOBJECT_H
10:
1.38.2.1! paf 11: static const char* IDENT_VOBJECT_H="$Date: 2003/01/21 15:51:20 $";
1.19 paf 12:
1.1 paf 13: #include "pa_vjunction.h"
14: #include "pa_vclass.h"
1.4 paf 15: #include "pa_vstateless_object.h"
1.6 paf 16:
1.23 paf 17: // defines
18:
19: #define BASE_NAME "BASE"
20:
1.38.2.1! paf 21: // forwards
! 22:
! 23: //class VObject; DECLARE_OBJECT_PTR(VObject)
! 24:
1.26 paf 25: /** parser class instance, stores
26: - class VObject::fclass;
27: - fields VObject::ffields (dynamic, not static, which are stored in class).
28: - links to base/derived instances [VObject::fbase, VObject::fderived]
1.6 paf 29: */
1.24 paf 30: class VObject: public VStateless_object {
1.38.2.1! paf 31:
! 32: VStateless_class& fclass;
! 33: HashStringValue ffields;
! 34: VObjectPtr fderived;
! 35: ValuePtr fbase;
! 36:
1.1 paf 37: public: // Value
38:
1.24 paf 39: const char *type() const { return fclass.name_cstr(); }
1.38.2.1! paf 40: override ValuePtr as(const char *atype, bool looking_up);
1.12 parser 41:
1.25 paf 42: /// VObject: fclass
1.38.2.1! paf 43: override VStateless_class *get_class() { return &fclass; }
! 44: override VStateless_class *get_last_derived_class() { return get_last_derived().get_class(); }
! 45: override ValuePtr base() { return fbase; }
! 46:
! 47: override bool is_defined() const;
! 48: override ValuePtr as_expr_result(bool);
! 49: override int as_int() const;
! 50: override double as_double();
! 51: override bool as_bool() const;
! 52: override VFilePtr as_vfile(Pool& pool, String::Untaint_lang lang=String::UL_UNSPECIFIED,
! 53: bool origins_mode=false);
1.33 paf 54:
1.38.2.1! paf 55: override HashStringValuePtr get_hash(const String *source);
! 56: override Table *get_table();
1.33 paf 57:
1.38.2.1! paf 58: override ValuePtr get_element(ConstStringPtr aname, Value& aself, bool /*looking_up*/);
! 59: override bool put_element(ConstStringPtr aname, ValuePtr avalue, bool replace);
1.1 paf 60:
1.37 paf 61: /// VObject: remember derived [the only client]
1.38.2.1! paf 62: override VObjectPtr set_derived(VObjectPtr aderived) {
! 63: VObjectPtr result=fderived;
1.25 paf 64: fderived=aderived;
1.34 paf 65: return result;
1.24 paf 66: }
67:
1.1 paf 68: public: // creation
69:
1.38.2.1! paf 70: VObject(Pool& apool, VStateless_class& aclass): fclass(aclass) {
! 71: if(VStateless_classPtr base_class=fclass.base_class()) {
! 72: fbase=fclass.base_class()->create_new_value();
! 73: fbase->set_derived(VObjectPtr(this));
! 74: }
1.1 paf 75: }
76:
77: private:
78:
1.37 paf 79: VObject& get_last_derived() {
80: return fderived?fderived->get_last_derived():*this;
1.26 paf 81: }
1.37 paf 82:
1.38.2.1! paf 83: ValuePtr stateless_object__get_element(ConstStringPtr aname, Value& aself);
1.25 paf 84: };
85:
86: class Temp_derived {
87: Value& fvalue;
1.38.2.1! paf 88: VObjectPtr fsaved_derived;
1.25 paf 89: public:
1.38.2.1! paf 90: Temp_derived(Value& avalue, VObjectPtr aderived) :
1.25 paf 91: fvalue(avalue),
92: fsaved_derived(avalue.set_derived(aderived)) {}
93: ~Temp_derived() { fvalue.set_derived(fsaved_derived); }
1.1 paf 94: };
95:
96: #endif
E-mail: