1 | /* |
1 | /* |
2 | * This file is part of Deliantra, the Roguelike Realtime MMORPG. |
2 | * This file is part of Deliantra, the Roguelike Realtime MMORPG. |
3 | * |
3 | * |
4 | * Copyright (©) 2005,2006,2007,2008,2009,2010 Marc Alexander Lehmann / Robin Redeker / the Deliantra team |
4 | * Copyright (©) 2005,2006,2007,2008,2009,2010,2011,2012 Marc Alexander Lehmann / Robin Redeker / the Deliantra team |
5 | * |
5 | * |
6 | * Deliantra is free software: you can redistribute it and/or modify it under |
6 | * Deliantra is free software: you can redistribute it and/or modify it under |
7 | * the terms of the Affero GNU General Public License as published by the |
7 | * the terms of the Affero GNU General Public License as published by the |
8 | * Free Software Foundation, either version 3 of the License, or (at your |
8 | * Free Software Foundation, either version 3 of the License, or (at your |
9 | * option) any later version. |
9 | * option) any later version. |
… | |
… | |
163 | utf8_string as_string (); // like strdup |
163 | utf8_string as_string (); // like strdup |
164 | |
164 | |
165 | operator bool () { return !!av; } |
165 | operator bool () { return !!av; } |
166 | }; |
166 | }; |
167 | |
167 | |
|
|
168 | // used as dir argument to object_thawer constructor |
|
|
169 | #define RESOURCE_DIR const_utf8_string (0) |
|
|
170 | |
168 | INTERFACE_CLASS(object_thawer) |
171 | INTERFACE_CLASS(object_thawer) |
169 | struct object_thawer |
172 | struct object_thawer |
170 | { |
173 | { |
|
|
174 | static bool errors_are_fatal; // true during server startup only |
|
|
175 | |
171 | char *line; // current beginning of line |
176 | char *line; // current beginning of line |
172 | SV *text; // text part |
177 | SV *text; // text part |
173 | AV *av; // perl part |
178 | AV *av; // perl part |
174 | int linenum; |
179 | int linenum; |
175 | keyword kw; |
180 | keyword kw; |
… | |
… | |
179 | const char *name; |
184 | const char *name; |
180 | |
185 | |
181 | operator bool () const { return !!text; } |
186 | operator bool () const { return !!text; } |
182 | |
187 | |
183 | object_thawer (const_utf8_string path = 0); |
188 | object_thawer (const_utf8_string path = 0); |
|
|
189 | object_thawer (const_utf8_string dir, const_utf8_string file); |
184 | object_thawer (const_utf8_string data, AV *perlav); |
190 | object_thawer (const_utf8_string data, AV *perlav); |
185 | ~object_thawer (); |
191 | ~object_thawer (); |
186 | |
192 | |
187 | void get (attachable *obj, int oid); |
193 | void get (attachable *obj, int oid); |
188 | |
194 | |
189 | // parse next line as keyword-value pair |
195 | // parse next line as keyword-value pair |
190 | MTH void next (); |
196 | MTH void next (); |
191 | |
197 | |
192 | // parse next line, as a single value - skips initial whitespace and comments |
198 | // parse next line, as a single value |
|
|
199 | // skips initial whitespace and comments |
|
|
200 | // and sets kw to KW_value on success. |
193 | MTH void next_line (); |
201 | MTH bool next_line (); |
194 | |
202 | |
195 | // skip the current key-value (usually fetch next line, for |
203 | // skip the current key-value (usually fetch next line, for |
196 | // multiline-fields, skips till the corresponding end-kw |
204 | // multiline-fields, skips till the corresponding end-kw |
197 | MTH void skip (); |
205 | MTH void skip (); |
198 | MTH void skip_block (); // skips till and over KW_end |
206 | MTH void skip_block (); // skips till and over KW_end |
199 | |
207 | |
|
|
208 | // returns true IFF a value was specified and it is not the empty string |
|
|
209 | // formerly, this just etsetd for a value, but the editor is too dumb |
|
|
210 | // and creates lots of empty values. |
200 | bool has_value () { return value; } |
211 | bool has_value () const { return *value_nn; } |
201 | const_utf8_string get_str () { return value_nn; } // empty string when missing |
212 | const_utf8_string get_str () const { return value_nn; } // empty string when missing |
202 | void get_ml (keyword kend, shstr &sh); |
213 | void get_ml (keyword kend, shstr &sh); |
203 | |
214 | |
204 | void get_ornull (shstr &sh) const { sh = value; } |
215 | void get_ornull (shstr &sh) const { sh = value; } |
205 | void get (shstr &sh) const { sh = value; } // might want to check for non-null here |
216 | void get (shstr &sh) const { sh = value; } // might want to check for non-null here |
206 | |
217 | |
207 | bool get_bool () const { return *value_nn == '1'; } |
218 | bool get_bool () const { return *value_nn == '1'; } |
208 | sint32 get_sint32 () const; |
219 | sint32 get_sint32 () const; |
209 | sint64 get_sint64 () const { return strtoll (value_nn, 0, 10); } |
220 | sint64 get_sint64 () const { return strtoll (value_nn, 0, 10); } |
210 | double get_double () const { return strtod (value_nn, 0); } |
221 | double get_double () const { return strtod (value_nn, 0); } |
211 | |
222 | |
212 | void get (float &v) { v = get_double (); } |
223 | void get (float &v) const { v = get_double (); } |
213 | void get (double &v) { v = get_double (); } |
224 | void get (double &v) const { v = get_double (); } |
214 | |
225 | |
215 | void get (bool &i) { i = get_bool (); } |
226 | void get (bool &i) const { i = get_bool (); } |
216 | void get (sint8 &i) { i = get_sint32 (); } |
227 | void get (sint8 &i) const { i = get_sint32 (); } |
217 | void get (uint8 &i) { i = get_sint32 (); } |
228 | void get (uint8 &i) const { i = get_sint32 (); } |
218 | void get (sint16 &i) { i = get_sint32 (); } |
229 | void get (sint16 &i) const { i = get_sint32 (); } |
219 | void get (uint16 &i) { i = get_sint32 (); } |
230 | void get (uint16 &i) const { i = get_sint32 (); } |
220 | void get (sint32 &i) { i = get_sint32 (); } |
231 | void get (sint32 &i) const { i = get_sint32 (); } |
221 | |
232 | |
222 | void get (uint32 &i) { i = get_sint64 (); } |
233 | void get (uint32 &i) const { i = get_sint64 (); } |
223 | void get (sint64 &i) { i = get_sint64 (); } |
234 | void get (sint64 &i) const { i = get_sint64 (); } |
224 | |
235 | |
|
|
236 | void get (region_ptr &r) const; |
|
|
237 | void get (materialtype_t *&mt) const; |
|
|
238 | |
225 | MTH void parse_warn (const_utf8_string msg); |
239 | MTH void parse_warn (const_utf8_string msg) const; |
226 | MTH bool parse_error (const_utf8_string type = 0, const_utf8_string name = 0, bool skip = true); |
240 | MTH bool parse_error (const_utf8_string type = 0, const_utf8_string name = 0, bool skip = true) const; |
227 | |
241 | |
228 | struct delayed_ref { |
242 | struct delayed_ref { |
229 | attachable *op; |
243 | attachable *op; |
230 | object_ptr *ptr; |
244 | object_ptr *ptr; |
231 | const_utf8_string ref; |
245 | const_utf8_string ref; |
232 | }; |
246 | }; |
233 | std::vector<delayed_ref> delrefs; |
247 | std::vector<delayed_ref> delrefs; |
234 | |
248 | |
235 | void delayed_deref (attachable *op, object_ptr &ptr, const_utf8_string ref); |
249 | void delayed_deref (attachable *op, object_ptr &ptr, const_utf8_string ref); |
236 | MTH void resolve_delayed_derefs (bool deref = true); |
250 | MTH void resolve_delayed_derefs (bool deref = true); |
|
|
251 | private: |
|
|
252 | void init (const_utf8_string path); |
|
|
253 | void init_from_file (const_utf8_string path); |
237 | }; |
254 | }; |
238 | |
255 | |
239 | //TODO: remove |
|
|
240 | char *fgets (char *s, int n, object_thawer &thawer); |
|
|
241 | |
|
|
242 | #endif |
256 | #endif |
243 | |
257 | |