source: cpp/frams/param/param.h @ 483

Last change on this file since 483 was 483, checked in by Maciej Komosinski, 8 years ago

Unified DEBUG macro ( -> _DEBUG )

  • Property svn:eol-style set to native
File size: 13.6 KB
RevLine 
[286]1// This file is a part of Framsticks SDK.  http://www.framsticks.com/
2// Copyright (C) 1999-2015  Maciej Komosinski and Szymon Ulatowski.
3// See LICENSE.txt for details.
[109]4
5#ifndef _PARAM_H_
6#define _PARAM_H_
7
8#include <stdio.h>
[247]9#include <stdint.h>
[109]10#include <frams/util/sstring.h>
11#include <frams/util/list.h>
12#include <frams/util/statrick.h>
[382]13#include <common/virtfile/virtfile.h>
[375]14#include <common/log.h>
[109]15
16class ExtValue;
17class ExtObject;
18
19// ParamInterface flags:
[316]20#define PARAM_READONLY       1  //< Param is not able to change this member
21#define PARAM_DONTSAVE       2  //< Param will not save this member
22#define PARAM_SETLEVEL(x) (((x)&3)<<2)  //< internal use
23#define PARAM_LEVEL(x)    (((x)>>2)&3)  //< internal use
24#define PARAM_USERREADONLY  16  //< GUI should not change this member (even if Param can)
25#define PARAM_USERHIDDEN    32  //< GUI should not display this member
26#define MUTPARAM_ALLOCENTRY 64  //< for mutableparam (private!)
27#define MUTPARAM_ALLOCDATA 128  //< for mutableparam (private!)
28#define PARAM_NOSTATIC  256     //< (FramScript) don't access this member in a static object (ClassName.field)
29#define PARAM_CONST     512     //< (FramScript) constant value
30#define PARAM_CANOMITNAME 1024  //< affects Param::save2()/load2() - for example one-liners in f0 genetic encoding
31#define PARAM_DONTLOAD    2048  //< Param::load() skips this field
32#define PARAM_NOISOLATION 4096  //< don't use proxy object in master/slave interactions
33#define PARAM_DEPRECATED  8192  //< this member is deprecated
[333]34#define PARAM_LINECOMMENT 16384 //< Param::load() adds "@line ..." comment when loading multiline (internal use)
[478]35#define PARAM_OBJECTSET 32768   //< setting this field is handled by the object's assign(...) function and cannot change the object reference
[109]36
[247]37typedef int32_t paInt;
38#define PA_INT_SCANF "%d"
[284]39#define PA_INT_SCANF_X "%x"
[247]40
[154]41// the result of param::set() is a combination of bits:
[109]42
[154]43// read-only: cannot modify
[109]44#define PSET_RONLY      1
45
[154]46// value has been modified
[109]47#define PSET_CHANGED    2
48
[154]49//value has been adjusted because it tried to exceed min or max
[109]50#define PSET_HITMIN     4
51#define PSET_HITMAX     8
52
[393]53#define PSET_NOPROPERTY 16
54
55#define PSET_PARSEFAILED        32
56
[154]57// useful combination: need to get and display the value so that a user knows that the value they tried to set has been rejected or changed
[393]58#define PSET_WARN (PSET_RONLY | PSET_HITMIN | PSET_HITMAX | PSET_PARSEFAILED)
[109]59
60
61struct ParamEntry;
62
63/** Property get/set interface - runtime access to named properties */
64class ParamInterface
65{
66public:
[319]67        virtual ~ParamInterface() {}
68
[154]69        virtual int getGroupCount() = 0; ///< @return the number of property groups
70        virtual int getPropCount() = 0; ///< @return the number of properties
[109]71
[154]72        virtual const char* getName() = 0;
73        virtual const char* getDescription() { return 0; }
74        virtual ParamEntry *getParamTab() const { return NULL; }
[109]75
[154]76        int findId(const char *n);      ///< find id number for internal name
77        int findIdn(const char *naz, int n);
[109]78
[154]79        virtual const char *id(int i) = 0;      ///< get internal name
80        virtual const char *name(int i) = 0;    ///< get the human-readable name
[109]81
[154]82        /** get type description.
83                first character defines basic datatype:
84                - d = integer
85                - f = floating point
86                - s = string
87                - o = ExtObject
88                - x = ExtValue (universal datatype)
89                */
90        virtual const char *type(int i) = 0;
[109]91
[154]92        virtual const char *help(int i) = 0;    ///< get long description (tooltip)
[109]93
[154]94        virtual int flags(int i) = 0;           ///< get flags
[109]95
[154]96        virtual int group(int i) = 0;           ///< get group id for a property
97        virtual const char *grname(int gi) = 0; ///< get group name
98        virtual int grmember(int gi, int n) = 0;        ///< get property id for n'th member of group "gi"
[109]99
[154]100        virtual void call(int i, ExtValue* args, ExtValue *ret) = 0;
[109]101
[154]102        void get(int, ExtValue &retval);        ///< most universal get, can be used for every datatype
[109]103
[154]104        virtual SString getString(int) = 0;     ///< get string value, you can only use this for "s" type property
[247]105        virtual paInt getInt(int) = 0;  ///< get long value, you can only use this for "d" type property
[154]106        virtual double getDouble(int) = 0;      ///< get double value, you can only use this for "f" type property
107        virtual ExtObject getObject(int) = 0;   ///< get object reference, you can only use this for "o" type property
108        virtual ExtValue getExtValue(int) = 0;  ///< get extvalue object, you can only use this for "x" type property
[109]109
[154]110        SString get(int);               ///< old style get, can convert long or double to string
111        SString getText(int);           ///< like getString, returns enumeration label for subtype "d 0 n ~enum1~enum2...
[109]112
[154]113        SString getStringById(const char*prop);  ///< get string value, you can only use this for "s" type property
[247]114        paInt getIntById(const char* prop);    ///< get long value, you can only use this for "d" type property
[154]115        double getDoubleById(const char* prop);///< get double value, you can only use this for "f" type property
116        ExtObject getObjectById(const char* prop);///< get object reference, you can only use this for "o" type property
117        ExtValue getExtValueById(const char* prop);///< get extvalue object, you can only use this for "x" type property
118        ExtValue getById(const char* prop);
[109]119
[154]120        int setInt(int i, const char* str);
121        int setDouble(int i, const char* str);
[247]122        virtual int setInt(int, paInt) = 0;             ///< set long value, you can only use this for "d" type prop
[154]123        virtual int setDouble(int, double) = 0; ///< set double value, you can only use this for "f" type prop
124        virtual int setString(int, const SString &) = 0;        ///< set string value, you can only use this for "s" type prop
125        virtual int setObject(int, const ExtObject &) = 0;      ///< set object reference, you can only use this for "o" type prop
126        virtual int setExtValue(int, const ExtValue &) = 0;     ///< 4 in 1
[109]127
[154]128        int set(int, const ExtValue &);///< most universal set, can be used for every datatype
[109]129
[154]130        int set(int, const char*);              ///< oldstyle set, can convert string to long or double
[109]131
[247]132        int setIntById(const char* prop, paInt);///< set long value, you can only use this for "d" type prop
[154]133        int setDoubleById(const char* prop, double);///< set double value, you can only use this for "f" type prop
134        int setStringById(const char* prop, const SString &);///< set string value, you can only use this for "s" type prop
135        int setObjectById(const char* prop, const ExtObject &);///< set object reference, you can only use this for "o" type prop
136        int setExtValueById(const char* prop, const ExtValue &); ///< for ExtValue types only
137        int setById(const char* prop, const ExtValue &);///< can be used for all property types
[109]138
[154]139        /** get valid minimum, maximum and default value for property 'prop'
140                @return 0 if min/max/def information is not available */
[247]141        int getMinMax(int prop, paInt& minumum, paInt& maximum, paInt& def);
[154]142        /** get valid minimum, maximum and default value for property 'prop'
143                @return 0 if min/max/def information is not available */
144        int getMinMax(int prop, double& minumum, double& maximum, double& def);
[253]145        int getMinMax(int prop, int& minumum, int& maximum, SString& def);
[109]146
[278]147        virtual void setDefault();
148        virtual void setDefault(int i);
[154]149        void setMin();
150        void setMax();
151        void setMin(int i);
152        void setMax(int i);
[109]153
[154]154        /** copy all property values from other ParamInterface object */
155        void copyFrom(ParamInterface *src);
[109]156
[154]157        /** Copy all property values from compatible ParamInterface object.
158                This method is more efficient than copyFrom,
159                but can be used only if the other object has the same properties sequence, e.g.:
160                - any two Param objects having common paramtab
161                - any ParamInterface object and the Param with paramtab constructed by ParamObject::makeParamTab
162                */
163        void quickCopyFrom(ParamInterface *src);
[109]164
[154]165        int save(VirtFILE*, const char* altname = NULL, bool force = 0);
166        int saveprop(VirtFILE*, int i, const char* p, bool force = 0);
[333]167        int load(VirtFILE*, bool warn_unknown_fields = true, bool *abortable = NULL, int *linenum = NULL);///< @return the number of fields loaded
[393]168        int load2(const SString &, int &);///< @return the number of fields loaded (or'ed with LOAD2_PARSE_FAILED if a parsing error was detected)
[109]169
[154]170        static const char* SERIALIZATION_PREFIX;
[393]171        static const int LOAD2_PARSE_FAILED=(1<<30); ///< this bit is set in return value from load2 if a parse error was detected while loading. usage: if (load2(...) & LOAD2_PARSE_FAILED) ...
172        static const int LOAD2_IGNORE_PARSE_FAILED=(~LOAD2_PARSE_FAILED); ///< bitmask to be used if the parsing error is to be ignored. usage: int number_of_loaded_fields=load2(...) & LOAD2_IGNORE_PARSE_FAILED;
[230]173
[483]174#ifdef _DEBUG
[230]175        virtual void sanityCheck(int i) {}
176#endif
[109]177};
178
179// implementations:
180
181extern char MakeCodeGuardHappy;
182
183#define PROCOFFSET(_proc_) ( (void (*)(void*,ExtValue*,ExtValue*)) &(FIELDSTRUCT :: _proc_ ## _statrick))
184#define STATICPROCOFFSET(_proc_) ( (void (*)(void*,ExtValue*,ExtValue*)) &(FIELDSTRUCT :: _proc_))
185#define GETOFFSET(_proc_) ( (void (*)(void*,ExtValue*)) &(FIELDSTRUCT :: _proc_ ## _statrick))
186#define SETOFFSET(_proc_) ( (int (*)(void*,const ExtValue*)) &(FIELDSTRUCT :: _proc_ ## _statrick))
187
[247]188#define FIELDOFFSET(_fld_) ((intptr_t)((char*)(&((FIELDSTRUCT*)&MakeCodeGuardHappy)->_fld_)-((char*)((FIELDSTRUCT*)&MakeCodeGuardHappy))))
[109]189
[483]190#ifdef _DEBUG
[247]191#define PARAM_ILLEGAL_OFFSET ((intptr_t)0xdeadbeef)
[230]192#else
193#define PARAM_ILLEGAL_OFFSET 0
194#endif
195
[109]196#define FIELD(_fld_) FIELDOFFSET(_fld_),0,0
197#define LONGOFFSET(_o_) (_o_),0,0
[230]198#define PROCEDURE(_proc_) PARAM_ILLEGAL_OFFSET,(void*)PROCOFFSET(_proc_),0
199#define STATICPROCEDURE(_proc_) PARAM_ILLEGAL_OFFSET,(void*)STATICPROCOFFSET(_proc_),0
200#define GETSET(_proc_) PARAM_ILLEGAL_OFFSET,(void*)GETOFFSET(get_ ## _proc_),(void*)SETOFFSET(set_ ## _proc_)
[109]201#define GETFIELD(_proc_) FIELDOFFSET(_proc_),(void*)GETOFFSET(get_ ## _proc_),0
202#define SETFIELD(_proc_) FIELDOFFSET(_proc_),0,(void*)SETOFFSET(set_ ## _proc_)
[230]203#define GETONLY(_proc_) PARAM_ILLEGAL_OFFSET,(void*)GETOFFSET(get_ ## _proc_),0
204#define SETONLY(_proc_) PARAM_ILLEGAL_OFFSET,0,(void*)SETOFFSET(set_ ## _proc_)
[109]205
206#define PARAMPROCARGS ExtValue* args,ExtValue* ret
207#define PARAMSETARGS const ExtValue* arg
208#define PARAMGETARGS ExtValue* ret
209
210#define PARAMPROCDEF(name) STATRICKDEF2(name,ExtValue*,ExtValue*)
211#define PARAMGETDEF(name) STATRICKDEF1(get_ ## name,ExtValue*)
212#define PARAMSETDEF(name) STATRICKRDEF1(int,set_ ## name,const ExtValue*)
213
214///////////////////////////////
215
216struct ParamEntry
217{
[154]218        const char *id;
[478]219        paInt group, flags;
[154]220        const char *name, *type;
[247]221        intptr_t offset;
[154]222        void *fun1; ///< procedure or get
223        void *fun2; ///< set
224        const char *help;
[109]225};
226
[154]227struct ParamEntryConstructor : public ParamEntry
[109]228{
229public:
[478]230        ParamEntryConstructor(const char *_id, paInt _group = 0, paInt _flags = 0, const char *_name = 0, const char *_type = 0, intptr_t _offset = 0, void *_fun1 = 0, void *_fun2 = 0, const char *_help = 0)
[154]231        {
232                id = _id; group = _group; flags = _flags; name = _name; type = _type; offset = _offset; fun1 = _fun1; fun2 = _fun2; help = _help;
233        }
[109]234};
235
[154]236class SimpleAbstractParam : public virtual ParamInterface
[109]237{
238protected:
[154]239        virtual void *getTarget(int i);
240        const char* myname;
241        bool dontcheckchanges;
[109]242
243public:
[154]244        void *object;
[109]245
[154]246        const char* getName() { return myname; }
247        void setName(const char* n) { myname = n; }
[109]248
[154]249        /**
250                @param t ParamEntry table
251                @param o controlled object
252                @param n Param's name
253                */
254        SimpleAbstractParam(void* o = 0, const char*n = 0) :myname(n), dontcheckchanges(0), object(o) {}
255        void setDontCheckChanges(bool x) { dontcheckchanges = x; }
[109]256
[154]257        void select(void *o) { object = o; }
258        void* getSelected() { return object; }
[109]259
[253]260        virtual ParamEntry *entry(int i) = 0;
[154]261        const char *id(int i) { return (i >= getPropCount()) ? 0 : entry(i)->id; }
262        const char *name(int i) { return entry(i)->name; }
263        const char *type(int i) { return entry(i)->type; }
264        const char *help(int i) { return entry(i)->help; }
265        int flags(int i) { return entry(i)->flags; }
266        int group(int i) { return entry(i)->group; }
267        void call(int i, ExtValue* args, ExtValue *ret);
[109]268
[154]269        SString getString(int);
[247]270        paInt getInt(int);
[154]271        double getDouble(int);
272        ExtObject getObject(int);
273        ExtValue getExtValue(int);
[109]274
[154]275        template<typename T> void messageOnExceedRange(int i, int setflags, T valuetoset) ///< prints a warning when setflags indicates that allowed param range has been exceeded during set
276        {
277                if (setflags & (PSET_HITMIN | PSET_HITMAX))
278                {
279                        SString svaluetoset = SString::valueOf(valuetoset); //converts any type to SString
280                        SString actual = get(i);
[375]281                        logPrintf("Param", "set", LOG_WARN, "Setting '%s.%s = %s' exceeded allowed range (too %s). Adjusted to %s.",
[348]282                                getName(), id(i), svaluetoset.c_str(), (setflags&PSET_HITMAX) ? "big" : "small", actual.c_str());
[154]283                }
284        }
[109]285
[247]286        int setInt(int, paInt);
[154]287        int setDouble(int, double);
288        int setString(int, const SString &);
289        int setObject(int, const ExtObject &);
290        int setExtValue(int, const ExtValue &);
[109]291
[154]292        int isequal(int i, void* defdata);
293        void save2(SString&, void *defdata, bool addcr = true, bool all_names = true);
[109]294
[278]295        virtual void setDefault();
296        virtual void setDefault(int i);
[230]297
[483]298#ifdef _DEBUG
[230]299        void sanityCheck(int i);
300#endif
[109]301};
302
[154]303class Param : public SimpleAbstractParam
[109]304{
305protected:
[154]306        ParamEntry *entry(int i) { return tab + tab[0].group + i; }
[109]307public:
[154]308        ParamEntry *tab;
309        /**
310                @param t ParamEntry table
311                @param o controlled object
312                @param n Param's name
313                */
[109]314
[154]315        Param(ParamEntry *t = 0, void* o = 0, const char*n = 0) :SimpleAbstractParam(o, n), tab(t)
316        {
317                if (!n&&tab) myname = tab[0].name;
318        }
[109]319
[154]320        Param(const Param& p) :SimpleAbstractParam(p.object, p.myname), tab(p.tab) {}
321        void operator=(const Param&p) { object = p.object; myname = p.myname; tab = p.tab; }
[109]322
[154]323        const char* getDescription() { return tab[0].type; }
[109]324
[154]325        int getGroupCount() { return tab[0].group; }
326        int getPropCount() { return tab[0].flags; }
327        const char *grname(int i) { return (i < getGroupCount()) ? tab[i].id : 0; }
328        int grmember(int, int);
329        void setParamTab(ParamEntry *t, int dontupdatename = 0) { tab = t; if ((!dontupdatename) && tab) myname = tab[0].name; }
330        ParamEntry *getParamTab() const { return tab; }
[109]331};
332
333extern ParamEntry empty_paramtab[];
334
335#endif
Note: See TracBrowser for help on using the repository browser.