Annotation of parser3/src/types/pa_varray.h, revision 1.7
1.1 moko 1: /** @file
2: Parser: @b array parser type decl.
3:
4: Copyright (c) 2001-2023 Art. Lebedev Studio (http://www.artlebedev.com)
5: Authors: Konstantin Morshnev <moko@design.ru>, Alexandr Petrosian <paf@design.ru>
6: */
7:
8: #ifndef PA_VARRAY_H
9: #define PA_VARRAY_H
10:
1.7 ! moko 11: #define IDENT_PA_VARRAY_H "$Id: pa_varray.h,v 1.6 2024/09/18 22:24:18 moko Exp $"
1.1 moko 12:
13: #include "classes.h"
14: #include "pa_value.h"
15: #include "pa_array.h"
16: #include "pa_vhash.h"
17: #include "pa_vint.h"
18: #include "pa_globals.h"
19: #include "pa_symbols.h"
20:
21: // defines
22:
1.2 moko 23: #define VARRAY_TYPE "array"
1.1 moko 24:
25: extern Methoded* array_class;
26:
1.2 moko 27: /// Sparse Array
28: template<typename T> class SparseArray: public Array<T> {
1.5 moko 29:
30: mutable size_t fused;
31:
1.2 moko 32: public:
1.5 moko 33: inline SparseArray(size_t initial=0) : Array<T>(initial), fused(0) {}
1.2 moko 34:
1.6 moko 35: inline SparseArray(size_t size, T* elements) : Array<T>(size), fused(size) {
36: T* elements_end=elements + size;
37: for(T* dst=this->felements; elements < elements_end;)
38: *dst++=*elements++;
39: this->fsize=size;
40: }
41:
1.4 moko 42: inline T get(size_t index) const {
43: return index < this->count() ? this->felements[index] : NULL;
44: }
45:
1.5 moko 46: inline void put(size_t index, T element){
47: this->fit(index);
1.2 moko 48: this->felements[index]=element;
1.5 moko 49: if(index >= this->fsize){
50: this->fsize=index+1;
51: }
52: }
53:
54: inline void insert(size_t index, T element) {
55: if(index >= this->fsize){
56: this->fit(index);
57: this->felements[index]=element;
58: this->fsize=index+1;
59: } else {
60: Array<T>::insert(index, element);
61: }
62: }
63:
64: size_t used() const{
65: if(!fused){
66: for(Array_iterator<T> i(*this); i;) {
67: if(i.next())
68: fused++;
69: }
70: }
71: return fused;
72: }
73:
74: inline void clear(size_t index) {
1.7 ! moko 75: if(index < this->count()){
1.5 moko 76: this->felements[index]=NULL;
1.7 ! moko 77: if(index+1 == this->count())
! 78: this->fsize--;
1.2 moko 79: }
80: }
1.5 moko 81:
82: inline void clear() { Array<T>::clear(); }
83:
84: inline void invalidate(){
85: fused=0;
86: }
87:
1.2 moko 88: };
89:
90:
1.1 moko 91: class VArray: public VHashBase {
92: public: // value
93:
94: override const char* type() const { return VARRAY_TYPE; }
95: override VStateless_class *get_class() { return array_class; }
96:
1.5 moko 97: /// VArray: used elements count
98: override int as_int() const { return farray.used(); }
99: override double as_double() const { return farray.used(); }
100: override bool is_defined() const { return farray.used()!=0; }
101: override bool as_bool() const { return farray.used()!=0; }
102: override Value& as_expr_result() { return *new VInt(farray.used()); }
1.1 moko 103:
104: /// VArray: virtual hash
105: override HashStringValue *get_hash() { return &hash(); }
106: override HashStringValue* get_fields() { return &hash(); }
107: override HashStringValue* get_fields_reference() { return &hash(); }
108:
109: /// VArray: json-string
110: override const String* get_json_string(Json_options& options);
111:
112: /// VArray: (key)=value
113: override Value* get_element(const String& aname) {
114: // $element first
1.4 moko 115: if(Value* result=farray.get(index(aname)))
1.1 moko 116: return result;
117:
118: // $fields -- pseudo field to make 'hash' and 'array' more like 'table'
119: if(SYMBOLS_EQ(aname,FIELDS_SYMBOL))
120: return this;
121:
122: #if !defined(FEATURE_GET_ELEMENT4CALL) || !defined(OPTIMIZE_BYTECODE_GET_ELEMENT__SPECIAL)
123: // $method, CLASS, CLASS_NAME
124: if(Value* result=VStateless_object::get_element(aname))
125: return result;
126: #endif
127: return NULL;
128: }
129:
130: #ifdef FEATURE_GET_ELEMENT4CALL
131: override Value* get_element4call(const String& aname) {
132: // $method first
133: if(Value* result=VStateless_object::get_element(aname))
134: return result;
135:
136: // $element
1.4 moko 137: if(Value* result=farray.get(index(aname)))
1.1 moko 138: return result;
139:
140: return bark("%s method not found", &aname);
141: }
142: #endif
143:
144: /// VArray: (key)=value
145: override const VJunction* put_element(const String& aname, Value* avalue) {
1.5 moko 146: farray.put(index(aname), avalue);
147: invalidate();
1.1 moko 148: return 0;
149: }
150:
151: public: // VHashBase
152:
153: override HashStringValue& hash();
154: override void set_default(Value*) { }
155: override Value* get_default() { return 0; }
1.5 moko 156: override void add(Value* avalue) { farray+=avalue; /* only json uses it, thus no need to invalidate()*/ }
1.1 moko 157:
158: public: // usage
159:
1.5 moko 160: VArray(size_t initial=0): farray(initial), fhash(0) {}
1.6 moko 161: VArray(size_t size, Value** elements): farray(size, elements), fhash(0) {}
1.5 moko 162: ~VArray() { invalidate(); }
1.1 moko 163:
164: ArrayValue &array() { return farray; }
165:
166: static size_t index(int aindex){
167: if(aindex<0)
168: throw Exception("number.format", 0, "out of range (negative)");
169: return aindex;
170: }
171:
1.7 ! moko 172: static size_t index(const String::Body& aindex){ return pa_atoui(aindex.cstr()); }
! 173: static size_t index(const String& aindex){ return pa_atoui(aindex.cstr(), 10, &aindex); }
1.1 moko 174: static size_t index(const Value& aindex){ return index(aindex.as_int()); }
175:
1.5 moko 176: bool contains(size_t index){
177: return farray.get(index) != NULL;
1.1 moko 178: }
179:
1.5 moko 180: void clear(size_t index){
181: farray.clear(index);
182: invalidate();
1.1 moko 183: }
184:
185: void clear(){
186: farray.clear();
1.5 moko 187: invalidate();
1.1 moko 188: }
189:
1.5 moko 190: void invalidate() {
1.1 moko 191: #ifdef USE_DESTRUCTORS
192: if(fhash)
193: delete(fhash);
194: #endif
195: fhash=0;
1.5 moko 196: farray.invalidate();
1.1 moko 197: }
198:
199: private:
200:
201: ArrayValue farray;
202: HashStringValue *fhash;
203:
204: };
205:
206: #endif
E-mail: