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