Annotation of parser3/src/types/pa_varray.h, revision 1.9
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.9 ! moko 11: #define IDENT_PA_VARRAY_H "$Id: pa_varray.h,v 1.8 2024/09/21 15:23:23 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.9 ! moko 46: void fit(size_t index);
! 47:
1.5 moko 48: inline void put(size_t index, T element){
49: this->fit(index);
1.2 moko 50: this->felements[index]=element;
1.5 moko 51: if(index >= this->fsize){
52: this->fsize=index+1;
53: }
54: }
55:
56: inline void insert(size_t index, T element) {
57: if(index >= this->fsize){
58: this->fit(index);
59: this->felements[index]=element;
60: this->fsize=index+1;
61: } else {
62: Array<T>::insert(index, element);
63: }
64: }
65:
66: size_t used() const{
67: if(!fused){
68: for(Array_iterator<T> i(*this); i;) {
69: if(i.next())
70: fused++;
71: }
72: }
73: return fused;
74: }
75:
76: inline void clear(size_t index) {
1.7 moko 77: if(index < this->count()){
1.5 moko 78: this->felements[index]=NULL;
1.7 moko 79: if(index+1 == this->count())
80: this->fsize--;
1.2 moko 81: }
82: }
1.5 moko 83:
84: inline void clear() { Array<T>::clear(); }
85:
1.8 moko 86: inline void remove(size_t index) {
87: if(index < this->count()){
88: Array<T>::remove(index);
89: }
90: }
91:
1.5 moko 92: inline void invalidate(){
93: fused=0;
94: }
95:
1.2 moko 96: };
97:
98:
1.1 moko 99: class VArray: public VHashBase {
100: public: // value
101:
102: override const char* type() const { return VARRAY_TYPE; }
103: override VStateless_class *get_class() { return array_class; }
104:
1.5 moko 105: /// VArray: used elements count
106: override int as_int() const { return farray.used(); }
107: override double as_double() const { return farray.used(); }
108: override bool is_defined() const { return farray.used()!=0; }
109: override bool as_bool() const { return farray.used()!=0; }
110: override Value& as_expr_result() { return *new VInt(farray.used()); }
1.1 moko 111:
112: /// VArray: virtual hash
113: override HashStringValue *get_hash() { return &hash(); }
114: override HashStringValue* get_fields() { return &hash(); }
115: override HashStringValue* get_fields_reference() { return &hash(); }
116:
117: /// VArray: json-string
118: override const String* get_json_string(Json_options& options);
119:
120: /// VArray: (key)=value
121: override Value* get_element(const String& aname) {
122: // $element first
1.4 moko 123: if(Value* result=farray.get(index(aname)))
1.1 moko 124: return result;
125:
126: // $fields -- pseudo field to make 'hash' and 'array' more like 'table'
127: if(SYMBOLS_EQ(aname,FIELDS_SYMBOL))
128: return this;
129:
130: #if !defined(FEATURE_GET_ELEMENT4CALL) || !defined(OPTIMIZE_BYTECODE_GET_ELEMENT__SPECIAL)
131: // $method, CLASS, CLASS_NAME
132: if(Value* result=VStateless_object::get_element(aname))
133: return result;
134: #endif
135: return NULL;
136: }
137:
138: #ifdef FEATURE_GET_ELEMENT4CALL
139: override Value* get_element4call(const String& aname) {
140: // $method first
141: if(Value* result=VStateless_object::get_element(aname))
142: return result;
143:
144: // $element
1.4 moko 145: if(Value* result=farray.get(index(aname)))
1.1 moko 146: return result;
147:
148: return bark("%s method not found", &aname);
149: }
150: #endif
151:
152: /// VArray: (key)=value
153: override const VJunction* put_element(const String& aname, Value* avalue) {
1.5 moko 154: farray.put(index(aname), avalue);
155: invalidate();
1.1 moko 156: return 0;
157: }
158:
159: public: // VHashBase
160:
161: override HashStringValue& hash();
162: override void set_default(Value*) { }
163: override Value* get_default() { return 0; }
1.5 moko 164: override void add(Value* avalue) { farray+=avalue; /* only json uses it, thus no need to invalidate()*/ }
1.1 moko 165:
166: public: // usage
167:
1.5 moko 168: VArray(size_t initial=0): farray(initial), fhash(0) {}
1.6 moko 169: VArray(size_t size, Value** elements): farray(size, elements), fhash(0) {}
1.5 moko 170: ~VArray() { invalidate(); }
1.1 moko 171:
172: ArrayValue &array() { return farray; }
173:
174: static size_t index(int aindex){
175: if(aindex<0)
1.9 ! moko 176: throw Exception("number.format", 0, "index out of range (negative)");
1.1 moko 177: return aindex;
178: }
179:
1.7 moko 180: static size_t index(const String::Body& aindex){ return pa_atoui(aindex.cstr()); }
181: static size_t index(const String& aindex){ return pa_atoui(aindex.cstr(), 10, &aindex); }
1.1 moko 182:
1.5 moko 183: bool contains(size_t index){
184: return farray.get(index) != NULL;
1.1 moko 185: }
186:
1.5 moko 187: void invalidate() {
1.1 moko 188: #ifdef USE_DESTRUCTORS
189: if(fhash)
190: delete(fhash);
191: #endif
192: fhash=0;
1.5 moko 193: farray.invalidate();
1.1 moko 194: }
195:
196: private:
197:
198: ArrayValue farray;
199: HashStringValue *fhash;
200:
201: };
202:
203: #endif
E-mail: