-// props.cxx -- implementation of SimGear Property Manager.
-//
-// Written by David Megginson - david@megginson.com
-//
-// This module is in the PUBLIC DOMAIN.
-//
-// This program is distributed in the hope that it will be useful, but
-// WITHOUT ANY WARRANTY; without even the implied warranty of
-// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+// props.cxx - implementation of a property list.
+// Started Fall 2000 by David Megginson, david@megginson.com
+// This code is released into the Public Domain.
//
// See props.html for documentation [replace with URL when available].
//
// $Id$
#ifdef HAVE_CONFIG_H
-# include <config.h>
+#include <config.h>
#endif
-#include <simgear/debug/logstream.hxx>
+#include <simgear/compiler.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include STL_IOSTREAM
+#include <algorithm>
#include "props.hxx"
-#include <stdlib.h>
+SG_USING_STD(sort);
+
+
+\f
+////////////////////////////////////////////////////////////////////////
+// Local classes.
+////////////////////////////////////////////////////////////////////////
+
+/**
+ * Comparator class for sorting by index.
+ */
+class CompareIndices
+{
+public:
+ int operator() (const SGPropertyNode * n1, const SGPropertyNode *n2) const {
+ return (n1->getIndex() < n2->getIndex());
+ }
+};
+
-#include <string>
+\f
+////////////////////////////////////////////////////////////////////////
+// Convenience macros for value access.
+////////////////////////////////////////////////////////////////////////
+
+#define GET_BOOL (_value.bool_val->getValue())
+#define GET_INT (_value.int_val->getValue())
+#define GET_LONG (_value.long_val->getValue())
+#define GET_FLOAT (_value.float_val->getValue())
+#define GET_DOUBLE (_value.double_val->getValue())
+#define GET_STRING (_value.string_val->getValue())
-using std::string;
+#define SET_BOOL(val) (_value.bool_val->setValue(val))
+#define SET_INT(val) (_value.int_val->setValue(val))
+#define SET_LONG(val) (_value.long_val->setValue(val))
+#define SET_FLOAT(val) (_value.float_val->setValue(val))
+#define SET_DOUBLE(val) (_value.double_val->setValue(val))
+#define SET_STRING(val) (_value.string_val->setValue(val))
-SGPropertyList current_properties;
-static string empty_string;
+\f
+////////////////////////////////////////////////////////////////////////
+// Default values for every type.
+////////////////////////////////////////////////////////////////////////
+
+const bool SGRawValue<bool>::DefaultValue = false;
+const int SGRawValue<int>::DefaultValue = 0;
+const long SGRawValue<long>::DefaultValue = 0L;
+const float SGRawValue<float>::DefaultValue = 0.0;
+const double SGRawValue<double>::DefaultValue = 0.0L;
+const string SGRawValue<string>::DefaultValue = "";
\f
////////////////////////////////////////////////////////////////////////
-// Implementation of SGValue.
+// Local path normalization code.
////////////////////////////////////////////////////////////////////////
+/**
+ * A component in a path.
+ */
+struct PathComponent
+{
+ string name;
+ int index;
+};
/**
- * Construct a new value.
+ * Parse the name for a path component.
+ *
+ * Name: [_a-zA-Z][-._a-zA-Z0-9]*
*/
-SGValue::SGValue ()
- : _type(UNKNOWN), _tied(false)
+static inline string
+parse_name (const string &path, int &i)
{
+ string name = "";
+ int max = path.size();
+
+ if (path[i] == '.') {
+ i++;
+ if (i < max && path[i] == '.') {
+ i++;
+ name = "..";
+ } else {
+ name = ".";
+ }
+ if (i < max && path[i] != '/')
+ throw string(string("Illegal character after ") + name);
+ }
+
+ else if (isalpha(path[i]) || path[i] == '_') {
+ name += path[i];
+ i++;
+
+ // The rules inside a name are a little
+ // less restrictive.
+ while (i < max) {
+ if (isalpha(path[i]) || isdigit(path[i]) || path[i] == '_' ||
+ path[i] == '-' || path[i] == '.') {
+ name += path[i];
+ } else if (path[i] == '[' || path[i] == '/') {
+ break;
+ } else {
+ throw string("name may contain only ._- and alphanumeric characters");
+ }
+ i++;
+ }
+ }
+
+ else {
+ if (name.size() == 0)
+ throw string("name must begin with alpha or '_'");
+ }
+
+ return name;
}
/**
- * Destroy a value.
+ * Parse the optional integer index for a path component.
+ *
+ * Index: "[" [0-9]+ "]"
*/
-SGValue::~SGValue ()
+static inline int
+parse_index (const string &path, int &i)
{
+ int index = 0;
+
+ if (path[i] != '[')
+ return 0;
+ else
+ i++;
+
+ for (int max = path.size(); i < max; i++) {
+ if (isdigit(path[i])) {
+ index = (index * 10) + (path[i] - '0');
+ } else if (path[i] == ']') {
+ i++;
+ return index;
+ } else {
+ break;
+ }
+ }
+
+ throw string("unterminated index (looking for ']')");
}
/**
- * Return a raw boolean value (no type coercion).
+ * Parse a single path component.
+ *
+ * Component: Name Index?
*/
-bool
-SGValue::getRawBool () const
+static inline PathComponent
+parse_component (const string &path, int &i)
{
- if (_tied) {
- if (_value.bool_func.getter != 0)
- return (*(_value.bool_func.getter))();
- else
- return false;
- } else {
- return _value.bool_val;
- }
+ PathComponent component;
+ component.name = parse_name(path, i);
+ if (component.name[0] != '.')
+ component.index = parse_index(path, i);
+ else
+ component.index = -1;
+ return component;
}
/**
- * Return a raw integer value (no type coercion).
+ * Parse a path into its components.
*/
-int
-SGValue::getRawInt () const
+static void
+parse_path (const string &path, vector<PathComponent> &components)
{
- if (_tied) {
- if (_value.int_func.getter != 0)
- return (*(_value.int_func.getter))();
- else
- return 0;
- } else {
- return _value.int_val;
+ int pos = 0;
+ int max = path.size();
+
+ // Check for initial '/'
+ if (path[pos] == '/') {
+ PathComponent root;
+ root.name = "";
+ root.index = -1;
+ components.push_back(root);
+ pos++;
+ while (pos < max && path[pos] == '/')
+ pos++;
+ }
+
+ while (pos < max) {
+ components.push_back(parse_component(path, pos));
+ while (pos < max && path[pos] == '/')
+ pos++;
}
}
+\f
+////////////////////////////////////////////////////////////////////////
+// Other static utility functions.
+////////////////////////////////////////////////////////////////////////
+
+
/**
- * Return a raw floating-point value (no type coercion).
+ * Locate a child node by name and index.
*/
-float
-SGValue::getRawFloat () const
+static int
+find_child (const string &name, int index, vector<SGPropertyNode *> nodes)
{
- if (_tied) {
- if (_value.float_func.getter != 0)
- return (*(_value.float_func.getter))();
- else
- return 0.0;
- } else {
- return _value.float_val;
+ int nNodes = nodes.size();
+ for (int i = 0; i < nNodes; i++) {
+ SGPropertyNode * node = nodes[i];
+ if (node->getName() == name && node->getIndex() == index)
+ return i;
}
+ return -1;
}
/**
- * Return a raw double-precision floating-point value (no type coercion).
+ * Locate another node, given a relative path.
*/
-double
-SGValue::getRawDouble () const
+static SGPropertyNode *
+find_node (SGPropertyNode * current,
+ const vector<PathComponent> &components,
+ int position,
+ bool create)
{
- if (_tied) {
- if (_value.double_func.getter != 0)
- return (*(_value.double_func.getter))();
+ // Run off the end of the list
+ if (current == 0) {
+ return 0;
+ }
+
+ // Success! This is the one we want.
+ else if (position >= (int)components.size()) {
+ return current;
+ }
+
+ // Empty component means root.
+ else if (components[position].name == "") {
+ return find_node(current->getRootNode(), components, position + 1, create);
+ }
+
+ // . means current directory
+ else if (components[position].name == ".") {
+ return find_node(current, components, position + 1, create);
+ }
+
+ // .. means parent directory
+ else if (components[position].name == "..") {
+ SGPropertyNode * parent = current->getParent();
+ if (parent == 0)
+ throw string("Attempt to move past root with '..'");
else
- return 0.0L;
- } else {
- return _value.double_val;
+ return find_node(parent, components, position + 1, create);
+ }
+
+ // Otherwise, a child name
+ else {
+ SGPropertyNode * child =
+ current->getChild(components[position].name,
+ components[position].index,
+ create);
+ return find_node(child, components, position + 1, create);
}
}
+\f
+////////////////////////////////////////////////////////////////////////
+// Implementation of SGValue.
+////////////////////////////////////////////////////////////////////////
+
+
/**
- * Return a raw string value (no type coercion).
+ * Default constructor.
+ *
+ * The type will be UNKNOWN and the raw value will be "".
*/
-const string &
-SGValue::getRawString () const
+SGValue::SGValue ()
+ : _type(UNKNOWN), _tied(false)
{
- if (_tied && _value.string_func.getter != 0)
- return (*(_value.string_func.getter))();
- else
- return string_val;
+ _value.string_val = new SGRawValueInternal<string>;
}
/**
- * Set a raw boolean value (no type coercion).
- *
- * Return false if the value could not be set, true otherwise.
+ * Copy constructor.
*/
-bool
-SGValue::setRawBool (bool value)
+SGValue::SGValue (const SGValue &source)
{
- if (_tied) {
- if (_value.bool_func.setter != 0) {
- (*_value.bool_func.setter)(value);
- return true;
- } else {
- return false;
- }
- } else {
- _value.bool_val = value;
- return true;
+ _type = source._type;
+ _tied = source._tied;
+ switch (source._type) {
+ case ALIAS:
+ // FIXME!!!
+ _value.alias = (SGValue *)(source.getAlias());
+ break;
+ case BOOL:
+ _value.bool_val = source._value.bool_val->clone();
+ break;
+ case INT:
+ _value.int_val = source._value.int_val->clone();
+ break;
+ case LONG:
+ _value.long_val = source._value.long_val->clone();
+ break;
+ case FLOAT:
+ _value.float_val = source._value.float_val->clone();
+ break;
+ case DOUBLE:
+ _value.double_val = source._value.double_val->clone();
+ break;
+ case STRING:
+ case UNKNOWN:
+ _value.string_val = source._value.string_val->clone();
+ break;
}
}
/**
- * Set a raw integer value (no type coercion).
- *
- * Return false if the value could not be set, true otherwise.
+ * Destructor.
*/
-bool
-SGValue::setRawInt (int value)
+SGValue::~SGValue ()
{
- if (_tied) {
- if (_value.int_func.setter != 0) {
- (*_value.int_func.setter)(value);
- return true;
- } else {
- return false;
- }
- } else {
- _value.int_val = value;
- return true;
- }
+ if (_type != ALIAS)
+ clear_value();
}
/**
- * Set a raw floating-point value (no type coercion).
- *
- * Return false if the value could not be set, true otherwise.
+ * Delete and clear the current value.
*/
-bool
-SGValue::setRawFloat (float value)
+void
+SGValue::clear_value ()
{
- if (_tied) {
- if (_value.float_func.setter != 0) {
- (*_value.float_func.setter)(value);
- return true;
- } else {
- return false;
- }
- } else {
- _value.float_val = value;
- return true;
+ switch (_type) {
+ case ALIAS:
+ _value.alias->clear_value();
+ case BOOL:
+ delete _value.bool_val;
+ _value.bool_val = 0;
+ break;
+ case INT:
+ delete _value.int_val;
+ _value.int_val = 0;
+ break;
+ case LONG:
+ delete _value.long_val;
+ _value.long_val = 0L;
+ break;
+ case FLOAT:
+ delete _value.float_val;
+ _value.float_val = 0;
+ break;
+ case DOUBLE:
+ delete _value.double_val;
+ _value.double_val = 0;
+ break;
+ case STRING:
+ case UNKNOWN:
+ delete _value.string_val;
+ _value.string_val = 0;
+ break;
}
}
/**
- * Set a raw double-precision floating-point value (no type coercion).
+ * Get the current type.
*
- * Return false if the value could not be set, true otherwise.
+ * Does not return a type of ALIAS.
+ */
+SGValue::Type
+SGValue::getType () const
+{
+ if (_type == ALIAS)
+ return _value.alias->getType();
+ else
+ return (Type)_type;
+}
+
+
+/**
+ * Get the current aliased value.
+ */
+SGValue *
+SGValue::getAlias ()
+{
+ return (_type == ALIAS ? _value.alias : 0);
+}
+
+
+/**
+ * Get the current aliased value.
+ */
+const SGValue *
+SGValue::getAlias () const
+{
+ return (_type == ALIAS ? _value.alias : 0);
+}
+
+
+/**
+ * Alias to another value.
*/
bool
-SGValue::setRawDouble (double value)
+SGValue::alias (SGValue * alias)
{
- if (_tied) {
- if (_value.double_func.setter != 0) {
- (*_value.double_func.setter)(value);
- return true;
- } else {
- return false;
- }
- } else {
- _value.double_val = value;
- return true;
- }
+ if (alias == 0 || _type == ALIAS || _tied)
+ return false;
+ clear_value();
+ _value.alias = alias;
+ _type = ALIAS;
+ return true;
}
/**
- * Set a raw string value (no type coercion).
- *
- * Return false if the value could not be set, true otherwise.
+ * Unalias from another value.
*/
bool
-SGValue::setRawString (const string &value)
+SGValue::unalias ()
{
- if (_tied) {
- if (_value.string_func.setter != 0) {
- (*_value.string_func.setter)(value);
- return true;
- } else {
- return false;
- }
- } else {
- string_val = value;
- return true;
- }
+ // FIXME: keep copy of previous value,
+ // as with untie()
+ if (_type != ALIAS)
+ return false;
+ _value.string_val = new SGRawValueInternal<string>;
+ _type = UNKNOWN;
+ return true;
}
/**
- * Get the boolean value of a property.
- *
- * If the native type is not boolean, attempt to coerce it.
+ * Get a boolean value.
*/
bool
SGValue::getBoolValue () const
{
switch (_type) {
+ case ALIAS:
+ return _value.alias->getBoolValue();
case BOOL:
- return getRawBool();
+ return GET_BOOL;
case INT:
- return (getRawInt() == 0 ? false : true);
+ return GET_INT == 0 ? false : true;
+ case LONG:
+ return GET_LONG == 0L ? false : true;
case FLOAT:
- return (getRawFloat() == 0.0 ? false : true);
+ return GET_FLOAT == 0.0 ? false : true;
case DOUBLE:
- return (getRawDouble() == 0.0 ? false : true);
- case UNKNOWN:
+ return GET_DOUBLE == 0.0L ? false : true;
case STRING:
- return ((getRawString() == "true" || getIntValue() != 0) ? true : false);
+ case UNKNOWN:
+ return (GET_STRING == "true" || getDoubleValue() != 0.0L);
}
+
return false;
}
/**
- * Get the integer value of a property.
- *
- * If the native type is not integer, attempt to coerce it.
+ * Get an integer value.
*/
int
SGValue::getIntValue () const
{
switch (_type) {
+ case ALIAS:
+ return _value.alias->getIntValue();
case BOOL:
- return getRawBool();
+ return int(GET_BOOL);
case INT:
- return getRawInt();
+ return GET_INT;
+ case LONG:
+ return int(GET_LONG);
case FLOAT:
- return (int)(getRawFloat());
+ return int(GET_FLOAT);
case DOUBLE:
- return (int)(getRawDouble());
+ return int(GET_DOUBLE);
+ case STRING:
case UNKNOWN:
+ return atoi(GET_STRING.c_str());
+ }
+
+ return 0;
+}
+
+
+/**
+ * Get a long integer value.
+ */
+long
+SGValue::getLongValue () const
+{
+ switch (_type) {
+ case ALIAS:
+ return _value.alias->getLongValue();
+ case BOOL:
+ return long(GET_BOOL);
+ case INT:
+ return long(GET_INT);
+ case LONG:
+ return GET_LONG;
+ case FLOAT:
+ return long(GET_FLOAT);
+ case DOUBLE:
+ return long(GET_DOUBLE);
case STRING:
- return atoi(getRawString().c_str());
+ case UNKNOWN:
+ return strtol(GET_STRING.c_str(), 0, 0);
}
- return false;
}
/**
- * Get the floating-point value of a property.
- *
- * If the native type is not float, attempt to coerce it.
+ * Get a float value.
*/
float
SGValue::getFloatValue () const
{
switch (_type) {
+ case ALIAS:
+ return _value.alias->getFloatValue();
case BOOL:
- return (float)(getRawBool());
+ return float(GET_BOOL);
case INT:
- return (float)(getRawInt());
+ return float(GET_INT);
+ case LONG:
+ return float(GET_LONG);
case FLOAT:
- return getRawFloat();
+ return GET_FLOAT;
case DOUBLE:
- return (float)(getRawDouble());
- case UNKNOWN:
+ return float(GET_DOUBLE);
case STRING:
- return (float)atof(getRawString().c_str());
+ case UNKNOWN:
+ return atof(GET_STRING.c_str());
}
- return false;
+
+ return 0.0;
}
/**
- * Get the double-precision floating-point value of a property.
- *
- * If the native type is not double, attempt to coerce it.
+ * Get a double value.
*/
double
SGValue::getDoubleValue () const
{
switch (_type) {
+ case ALIAS:
+ return _value.alias->getDoubleValue();
case BOOL:
- return (double)(getRawBool());
+ return double(GET_BOOL);
case INT:
- return (double)(getRawInt());
+ return double(GET_INT);
+ case LONG:
+ return double(GET_LONG);
case FLOAT:
- return (double)(getRawFloat());
+ return double(GET_FLOAT);
case DOUBLE:
- return getRawDouble();
- case UNKNOWN:
+ return GET_DOUBLE;
case STRING:
- return atof(getRawString().c_str());
+ case UNKNOWN:
+ return strtod(GET_STRING.c_str(), 0);
}
- return false;
+
+ return 0.0;
}
/**
- * Get the string value of a property.
- *
- * If the native type is not string, attempt to coerce it.
+ * Get a string value.
*/
-const string &
+string
SGValue::getStringValue () const
{
- char buf[512];
+ char buf[128];
+
switch (_type) {
+ case ALIAS:
+ return _value.alias->getStringValue();
case BOOL:
- if (getRawBool())
- string_val = "true";
+ if (GET_BOOL)
+ return "true";
else
- string_val = "false";
- return string_val;
+ return "false";
case INT:
- sprintf(buf, "%d", getRawInt());
- string_val = buf;
- return string_val;
+ sprintf(buf, "%d", GET_INT);
+ return buf;
+ case LONG:
+ sprintf(buf, "%ld", GET_LONG);
+ return buf;
case FLOAT:
- sprintf(buf, "%f", getRawFloat());
- string_val = buf;
- return string_val;
+ sprintf(buf, "%f", GET_FLOAT);
+ return buf;
case DOUBLE:
- sprintf(buf, "%f", getRawDouble());
- string_val = buf;
- return string_val;
- case UNKNOWN:
+ sprintf(buf, "%f", GET_DOUBLE);
+ return buf;
case STRING:
- return getRawString();
+ case UNKNOWN:
+ return GET_STRING;
}
- return empty_string;
+
+ return "";
}
/**
- * Set the boolean value and change the type if unknown.
- *
- * Returns true on success.
+ * Set a bool value.
*/
bool
SGValue::setBoolValue (bool value)
{
- if (_type == UNKNOWN)
- _type = INT;
+ if (_type == UNKNOWN) {
+ clear_value();
+ _value.bool_val = new SGRawValueInternal<bool>;
+ _type = BOOL;
+ }
+
switch (_type) {
+ case ALIAS:
+ return _value.alias->setBoolValue(value);
case BOOL:
- return setRawBool(value);
+ return SET_BOOL(value);
case INT:
- return setRawInt((int)value);
+ return SET_INT(int(value));
+ case LONG:
+ return SET_LONG(long(value));
case FLOAT:
- return setRawFloat((float)value);
+ return SET_FLOAT(float(value));
case DOUBLE:
- return setRawDouble((double)value);
+ return SET_DOUBLE(double(value));
case STRING:
- if (value)
- return setRawString("true");
- else
- return setRawString("false");
+ return SET_STRING(value ? "true" : "false");
}
+
return false;
}
/**
- * Set the integer value and change the type if unknown.
- *
- * Returns true on success.
+ * Set an int value.
*/
bool
SGValue::setIntValue (int value)
{
- if (_type == UNKNOWN)
+ if (_type == UNKNOWN) {
+ clear_value();
+ _value.int_val = new SGRawValueInternal<int>;
_type = INT;
+ }
+
switch (_type) {
+ case ALIAS:
+ return _value.alias->setIntValue(value);
case BOOL:
- if (value == 0)
- return setRawBool(false);
- else
- return setRawBool(true);
+ return SET_BOOL(value == 0 ? false : true);
case INT:
- return setRawInt(value);
+ return SET_INT(value);
+ case LONG:
+ return SET_LONG(long(value));
case FLOAT:
- return setRawFloat((float)value);
+ return SET_FLOAT(float(value));
case DOUBLE:
- return setRawDouble((double)value);
- case STRING:
+ return SET_DOUBLE(double(value));
+ case STRING: {
char buf[128];
sprintf(buf, "%d", value);
- return setRawString(buf);
+ return SET_STRING(buf);
+ }
}
+
return false;
}
/**
- * Set the floating-point value and change the type if unknown.
- *
- * Returns true on success.
+ * Set a long value.
*/
bool
-SGValue::setFloatValue (float value)
+SGValue::setLongValue (long value)
{
- if (_type == UNKNOWN)
- _type = FLOAT;
+ if (_type == UNKNOWN) {
+ clear_value();
+ _value.long_val = new SGRawValueInternal<long>;
+ _type = LONG;
+ }
+
switch (_type) {
+ case ALIAS:
+ return _value.alias->setLongValue(value);
case BOOL:
- if (value == 0.0)
- return setRawBool(false);
- else
- return setRawBool(true);
+ return SET_BOOL(value == 0L ? false : true);
case INT:
- return setRawInt((int)value);
+ return SET_INT(int(value));
+ case LONG:
+ return SET_LONG(value);
case FLOAT:
- return setRawFloat(value);
+ return SET_FLOAT(float(value));
case DOUBLE:
- return setRawDouble((double)value);
- case STRING:
+ return SET_DOUBLE(double(value));
+ case STRING: {
char buf[128];
- sprintf(buf, "%f", value);
- return setRawString(buf);
+ sprintf(buf, "%d", value);
+ return SET_STRING(buf);
+ }
}
+
return false;
}
/**
- * Set the double-precision value and change the type if unknown.
- *
- * Returns true on success.
+ * Set a float value.
*/
bool
-SGValue::setDoubleValue (double value)
+SGValue::setFloatValue (float value)
{
- if (_type == UNKNOWN)
- _type = DOUBLE;
+ if (_type == UNKNOWN) {
+ clear_value();
+ _value.float_val = new SGRawValueInternal<float>;
+ _type = FLOAT;
+ }
+
switch (_type) {
+ case ALIAS:
+ return _value.alias->setFloatValue(value);
case BOOL:
- if (value == 0.0L)
- return setRawBool(false);
- else
- return setRawBool(true);
+ return SET_BOOL(value == 0.0 ? false : true);
case INT:
- return setRawInt((int)value);
+ return SET_INT(int(value));
+ case LONG:
+ return SET_LONG(long(value));
case FLOAT:
- return setRawFloat((float)value);
+ return SET_FLOAT(value);
case DOUBLE:
- return setRawDouble(value);
- case STRING:
+ return SET_DOUBLE(double(value));
+ case STRING: {
char buf[128];
- sprintf(buf, "%lf", value);
- return setRawString(buf);
+ sprintf(buf, "%f", value);
+ return SET_STRING(buf);
+ }
}
+
return false;
}
/**
- * Set the string value and change the type if unknown.
- *
- * Returns true on success.
+ * Set a double value.
*/
bool
-SGValue::setStringValue (const string &value)
+SGValue::setDoubleValue (double value)
{
- if (_type == UNKNOWN)
- _type = STRING;
+ if (_type == UNKNOWN) {
+ clear_value();
+ _value.double_val = new SGRawValueInternal<double>;
+ _type = DOUBLE;
+ }
switch (_type) {
+ case ALIAS:
+ return _value.alias->setDoubleValue(value);
case BOOL:
- if (value == "true" || atoi(value.c_str()) != 0)
- return setRawBool(true);
- else
- return setRawBool(false);
+ return SET_BOOL(value == 0.0L ? false : true);
+ case INT:
+ return SET_INT(int(value));
+ case LONG:
+ return SET_LONG(long(value));
+ case FLOAT:
+ return SET_FLOAT(float(value));
+ case DOUBLE:
+ return SET_DOUBLE(value);
+ case STRING: {
+ char buf[128];
+ sprintf(buf, "%lf", value);
+ return SET_STRING(buf);
+ }
+ }
+
+ return false;
+}
+
+
+/**
+ * Set a string value.
+ */
+bool
+SGValue::setStringValue (string value)
+{
+ if (_type == UNKNOWN) {
+ clear_value();
+ _value.string_val = new SGRawValueInternal<string>;
+ _type = STRING;
+ }
+
+ switch (_type) {
+ case ALIAS:
+ return _value.alias->setStringValue(value);
+ case BOOL:
+ return SET_BOOL((value == "true" || atoi(value.c_str())) ? true : false);
case INT:
- return setRawInt(atoi(value.c_str()));
+ return SET_INT(atoi(value.c_str()));
+ case LONG:
+ return SET_LONG(strtol(value.c_str(), 0, 0));
case FLOAT:
- return setRawFloat(atof(value.c_str()));
+ return SET_FLOAT(atof(value.c_str()));
case DOUBLE:
- return setRawDouble(atof(value.c_str()));
+ return SET_DOUBLE(strtod(value.c_str(), 0));
case STRING:
- return setRawString(value);
+ return SET_STRING(value);
}
+
return false;
}
/**
- * Set a string value and don't modify the type.
- *
- * Returns true on success.
+ * Set a value of unknown type (stored as a string).
*/
bool
-SGValue::setUnknownValue (const string &value)
+SGValue::setUnknownValue (string value)
{
switch (_type) {
+ case ALIAS:
+ return _value.alias->setUnknownValue(value);
case BOOL:
- if (value == "true" || atoi(value.c_str()) != 0)
- return setRawBool(true);
- else
- return setRawBool(false);
+ return SET_BOOL((value == "true" || atoi(value.c_str())) ? true : false);
case INT:
- return setRawInt(atoi(value.c_str()));
+ return SET_INT(atoi(value.c_str()));
+ case LONG:
+ return SET_LONG(strtol(value.c_str(), 0, 0));
case FLOAT:
- return setRawFloat(atof(value.c_str()));
+ return SET_FLOAT(atof(value.c_str()));
case DOUBLE:
- return setRawDouble(atof(value.c_str()));
+ return SET_DOUBLE(strtod(value.c_str(), 0));
case STRING:
case UNKNOWN:
- return setRawString(value);
+ return SET_STRING(value);
}
+
return false;
}
/**
- * Tie a boolean value to external functions.
- *
- * If useDefault is true, attempt the assign the current value
- * (if any) after tying the functions.
- *
- * Returns true on success (i.e. the value is not currently tied).
+ * Tie a bool value.
*/
bool
-SGValue::tieBool (bool_getter getter, bool_setter setter,
- bool useDefault)
+SGValue::tie (const SGRawValue<bool> &value, bool use_default)
{
- if (_tied) {
+ if (_type == ALIAS)
+ return _value.alias->tie(value, use_default);
+ else if (_tied)
return false;
- } else {
- if (useDefault && setter)
- (*setter)(getBoolValue());
- _tied = true;
- _type = BOOL;
- _value.bool_func.getter = getter;
- _value.bool_func.setter = setter;
- return true;
- }
+
+ bool old_val = false;
+ if (use_default)
+ old_val = getBoolValue();
+
+ clear_value();
+ _type = BOOL;
+ _tied = true;
+ _value.bool_val = value.clone();
+
+ if (use_default)
+ setBoolValue(old_val);
+
+ return true;
}
/**
- * Tie an integer value to external functions.
- *
- * If useDefault is true, attempt the assign the current value
- * (if any) after tying the functions.
- *
- * Returns true on success (i.e. the value is not currently tied).
+ * Tie an int value.
*/
bool
-SGValue::tieInt (int_getter getter, int_setter setter,
- bool useDefault)
+SGValue::tie (const SGRawValue<int> &value, bool use_default)
{
- if (_tied) {
+ if (_type == ALIAS)
+ return _value.alias->tie(value, use_default);
+ else if (_tied)
return false;
- } else {
- if (useDefault && setter)
- (*setter)(getIntValue());
- _tied = true;
- _type = INT;
- _value.int_func.getter = getter;
- _value.int_func.setter = setter;
- return true;
- }
+
+ int old_val = 0;
+ if (use_default)
+ old_val = getIntValue();
+
+ clear_value();
+ _type = INT;
+ _tied = true;
+ _value.int_val = value.clone();
+
+ if (use_default)
+ setIntValue(old_val);
+
+ return true;
}
/**
- * Tie a floating-point value to external functions.
- *
- * If useDefault is true, attempt the assign the current value
- * (if any) after tying the functions.
- *
- * Returns true on success (i.e. the value is not currently tied).
+ * Tie a long value.
*/
bool
-SGValue::tieFloat (float_getter getter, float_setter setter,
- bool useDefault)
+SGValue::tie (const SGRawValue<long> &value, bool use_default)
{
- if (_tied) {
+ if (_type == ALIAS)
+ return _value.alias->tie(value, use_default);
+ else if (_tied)
return false;
- } else {
- if (useDefault && setter)
- (*setter)(getFloatValue());
- _tied = true;
- _type = FLOAT;
- _value.float_func.getter = getter;
- _value.float_func.setter = setter;
- return true;
- }
+
+ long old_val;
+ if (use_default)
+ old_val = getLongValue();
+
+ clear_value();
+ _type = LONG;
+ _tied = true;
+ _value.long_val = value.clone();
+
+ if (use_default)
+ setLongValue(old_val);
+
+ return true;
}
/**
- * Tie a double-precision floating-point value to external functions.
- *
- * If useDefault is true, attempt the assign the current value
- * (if any) after tying the functions.
- *
- * Returns true on success (i.e. the value is not currently tied).
+ * Tie a float value.
*/
bool
-SGValue::tieDouble (double_getter getter, double_setter setter,
- bool useDefault)
+SGValue::tie (const SGRawValue<float> &value, bool use_default)
{
- if (_tied) {
+ if (_type == ALIAS)
+ return _value.alias->tie(value, use_default);
+ else if (_tied)
return false;
- } else {
- if (useDefault && setter)
- (*setter)(getDoubleValue());
- _tied = true;
- _type = DOUBLE;
- _value.double_func.getter = getter;
- _value.double_func.setter = setter;
- return true;
- }
+
+ float old_val = 0.0;
+ if (use_default)
+ old_val = getFloatValue();
+
+ clear_value();
+ _type = FLOAT;
+ _tied = true;
+ _value.float_val = value.clone();
+
+ if (use_default)
+ setFloatValue(old_val);
+
+ return true;
}
/**
- * Tie a string value to external functions.
- *
- * If useDefault is true, attempt the assign the current value
- * (if any) after tying the functions.
- *
- * Returns true on success (i.e. the value is not currently tied).
+ * Tie a double value.
*/
bool
-SGValue::tieString (string_getter getter, string_setter setter,
- bool useDefault)
+SGValue::tie (const SGRawValue<double> &value, bool use_default)
{
- if (_tied) {
+ if (_type == ALIAS)
+ return _value.alias->tie(value, use_default);
+ else if (_tied)
return false;
- } else {
- if (useDefault && setter)
- (*setter)(getStringValue());
- _tied = true;
- _type = STRING;
- _value.string_func.getter = getter;
- _value.string_func.setter = setter;
- return true;
- }
+
+ double old_val = 0.0;
+ if (use_default)
+ old_val = getDoubleValue();
+
+ clear_value();
+ _type = DOUBLE;
+ _tied = true;
+ _value.double_val = value.clone();
+
+ if (use_default)
+ setDoubleValue(old_val);
+
+ return true;
}
/**
- * Untie a value from external functions.
- *
- * Will always attempt to intialize the internal value from
- * the getter before untying.
- *
- * Returns true on success (i.e. the value had been tied).
+ * Tie a string value.
+ */
+bool
+SGValue::tie (const SGRawValue<string> &value, bool use_default)
+{
+ if (_type == ALIAS)
+ return _value.alias->tie(value, use_default);
+ else if (_tied)
+ return false;
+
+ string old_val;
+ if (use_default)
+ old_val = getStringValue();
+
+ clear_value();
+ _type = STRING;
+ _tied = true;
+ _value.string_val = value.clone();
+
+ if (use_default)
+ setStringValue(old_val);
+
+ return true;
+}
+
+
+/**
+ * Untie a value.
*/
bool
SGValue::untie ()
return false;
switch (_type) {
+ case ALIAS: {
+ return _value.alias->untie();
+ }
case BOOL: {
- bool value = getRawBool();
- _tied = false;
- setRawBool(value);
+ bool val = getBoolValue();
+ clear_value();
+ _value.bool_val = new SGRawValueInternal<bool>;
+ SET_BOOL(val);
break;
}
case INT: {
- int value = getRawInt();
- _tied = false;
- setRawInt(value);
+ int val = getIntValue();
+ clear_value();
+ _value.int_val = new SGRawValueInternal<int>;
+ SET_INT(val);
+ break;
+ }
+ case LONG: {
+ long val = getLongValue();
+ clear_value();
+ _value.long_val = new SGRawValueInternal<long>;
+ SET_LONG(val);
break;
}
case FLOAT: {
- float value = getRawFloat();
- _tied = false;
- setRawFloat(value);
+ float val = getFloatValue();
+ clear_value();
+ _value.float_val = new SGRawValueInternal<float>;
+ SET_FLOAT(val);
break;
}
case DOUBLE: {
- double value = getRawDouble();
- _tied = false;
- setRawDouble(value);
+ double val = getDoubleValue();
+ clear_value();
+ _value.double_val = new SGRawValueInternal<double>;
+ SET_DOUBLE(val);
break;
}
case STRING: {
- string value = getRawString();
- _tied = false;
- setRawString(value);
+ string val = getStringValue();
+ clear_value();
+ _value.string_val = new SGRawValueInternal<string>;
+ SET_STRING(val);
break;
}
}
+ _tied = false;
return true;
}
\f
////////////////////////////////////////////////////////////////////////
-// Implementation of SGPropertyList.
+// Implementation of SGPropertyNode.
////////////////////////////////////////////////////////////////////////
/**
- * Constructor.
+ * Utility function: given a value, find the property node.
*/
-SGPropertyList::SGPropertyList ()
+static SGPropertyNode *
+find_node_by_value (SGPropertyNode * start_node, const SGValue * value)
{
+ if (start_node->getValue() == value) {
+ return start_node;
+ } else for (int i = 0; i < start_node->nChildren(); i++) {
+ SGPropertyNode * child =
+ find_node_by_value(start_node->getChild(i), value);
+ if (child != 0)
+ return child;
+ }
+ return 0;
}
/**
- * Destructor.
+ * Default constructor: always creates a root node.
*/
-SGPropertyList::~SGPropertyList ()
+SGPropertyNode::SGPropertyNode ()
+ : _value(0), _name(""), _index(0), _parent(0), _target(0)
{
}
/**
- * Return true if a value is present.
+ * Convenience constructor.
*/
-bool
-SGPropertyList::hasValue (const string &name) const
+SGPropertyNode::SGPropertyNode (const string &name,
+ int index, SGPropertyNode * parent)
+ : _value(0), _name(name), _index(index), _parent(parent), _target(0)
{
- const_iterator el = _props.find(name);
- if (el == _props.end())
- return false;
- else
- return true;
}
/**
- * Look up the SGValue structure associated with a property.
- *
- * Run some basic validity checks on the property name: it must
- * not be empty, must begin with '/', must never have two '//' in a row,
- * and must not end with '/'.
+ * Destructor.
+ */
+SGPropertyNode::~SGPropertyNode ()
+{
+ delete _value;
+ for (int i = 0; i < (int)_children.size(); i++)
+ delete _children[i];
+}
+
+
+/**
+ * Get a value, optionally creating it if not present.
*/
SGValue *
-SGPropertyList::getValue (const string &name, bool create)
-{
- const_iterator el = _props.find(name);
- if (el == _props.end()) {
- if (!create)
- return 0;
- else {
- FG_LOG(FG_GENERAL, FG_DEBUG, "Creating new property '" << name << '\'');
- if (name.size() == 0 ||
- name[0] != '/' ||
- name[name.size()-1] == '/' ||
- name.find("//") != string::npos) {
- FG_LOG(FG_GENERAL, FG_ALERT, "Illegal property name: '"
- << name << '\'');
- return 0;
- }
- }
- }
- return &(_props[name]);
+SGPropertyNode::getValue (bool create)
+{
+ if (_value == 0 && create)
+ _value = new SGValue();
+ return _value;
}
/**
- * Look up a const value (never created).
+ * Alias to another node.
*/
-const SGValue *
-SGPropertyList::getValue (const string &name) const
+bool
+SGPropertyNode::alias (SGPropertyNode * target)
{
- value_map::const_iterator el = _props.find(name);
- if (el == _props.end())
- return 0;
- else
- return &(el->second);
+ if (_value == 0)
+ _value = new SGValue();
+ _target = target;
+ return _value->alias(target->getValue(true));
}
/**
- * Extract a boolean from the value.
- *
- * Note that this is inefficient for use in a tight loop: it is
- * better to get the SGValue and query it repeatedly.
+ * Alias to another node by path.
*/
bool
-SGPropertyList::getBoolValue (const string &name, bool defaultValue) const
+SGPropertyNode::alias (const string &path)
{
- const SGValue * val = getValue(name);
- if (val == 0)
- return defaultValue;
- else
- return val->getBoolValue();
+ return alias(getNode(path, true));
}
/**
- * Extract an integer from the value.
- *
- * Note that this is inefficient for use in a tight loop: it is
- * better to get the SGValue and query it repeatedly.
+ * Remove an alias.
*/
-int
-SGPropertyList::getIntValue (const string &name, int defaultValue) const
+bool
+SGPropertyNode::unalias ()
{
- const SGValue * val = getValue(name);
- if (val == 0)
- return defaultValue;
- else
- return val->getIntValue();
+ _target = 0;
+ return (_value != 0 ? _value->unalias() : false);
}
/**
- * Extract a float from the value.
- *
- * Note that this is inefficient for use in a tight loop: it is
- * better to get the SGValue and query it repeatedly.
+ * Test whether this node is aliased.
*/
-float
-SGPropertyList::getFloatValue (const string &name, float defaultValue) const
+bool
+SGPropertyNode::isAlias () const
{
- const SGValue * val = getValue(name);
- if (val == 0)
- return defaultValue;
- else
- return val->getFloatValue();
+ return (_value != 0 ? _value->isAlias() : false);
}
/**
- * Extract a double from the value.
+ * Get the target of an alias.
*
- * Note that this is inefficient for use in a tight loop: it is
- * better to get the SGValue and query it repeatedly.
+ * This is tricky, because it is actually the value that is aliased,
+ * and someone could realias or unalias the value directly without
+ * going through the property node. The node caches its best guess,
+ * but it may have to search the whole property tree.
+ *
+ * @return The target node for the alias, or 0 if the node is not aliased.
*/
-double
-SGPropertyList::getDoubleValue (const string &name, double defaultValue) const
+SGPropertyNode *
+SGPropertyNode::getAliasTarget ()
{
- const SGValue * val = getValue(name);
- if (val == 0)
- return defaultValue;
- else
- return val->getDoubleValue();
+ if (_value == 0 || !_value->isAlias()) {
+ return 0;
+ } else if (_target != 0 && _target->getValue() == _value->getAlias()) {
+ return _target;
+ } else {
+ _target = find_node_by_value(getRootNode(), _value->getAlias());
+ }
+}
+
+
+const SGPropertyNode *
+SGPropertyNode::getAliasTarget () const
+{
+ if (_value == 0 || !_value->isAlias()) {
+ return 0;
+ } else if (_target != 0 && _target->getValue() == _value->getAlias()) {
+ return _target;
+ } else {
+ // FIXME: const cast
+ _target =
+ find_node_by_value((SGPropertyNode *)getRootNode(), _value->getAlias());
+ }
}
/**
- * Extract a string from the value.
- *
- * Note that this is inefficient for use in a tight loop: it is
- * better to save the SGValue and query it repeatedly.
+ * Get a non-const child by index.
*/
-const string &
-SGPropertyList::getStringValue (const string &name,
- const string &defaultValue) const
+SGPropertyNode *
+SGPropertyNode::getChild (int position)
{
- const SGValue * val = getValue(name);
- if (val == 0)
- return defaultValue;
+ if (position >= 0 && position < nChildren())
+ return _children[position];
else
- return val->getStringValue();
+ return 0;
}
/**
- * Assign a bool to the value and change the type if unknown.
- *
- * Note that this is inefficient for use in a tight loop: it is
- * better to save the SGValue and modify it repeatedly.
- *
- * Returns true on success.
+ * Get a const child by index.
*/
-bool
-SGPropertyList::setBoolValue (const string &name, bool value)
+const SGPropertyNode *
+SGPropertyNode::getChild (int position) const
{
- return getValue(name, true)->setBoolValue(value);
+ if (position >= 0 && position < nChildren())
+ return _children[position];
+ else
+ return 0;
}
/**
- * Assign an integer to the value and change the type if unknown.
- *
- * Note that this is inefficient for use in a tight loop: it is
- * better to save the SGValue and modify it repeatedly.
- *
- * Returns true on success.
+ * Get a non-const child by name and index, creating if necessary.
*/
-bool
-SGPropertyList::setIntValue (const string &name, int value)
+SGPropertyNode *
+SGPropertyNode::getChild (const string &name, int index, bool create)
{
- return getValue(name, true)->setIntValue(value);
+ int pos = find_child(name, index, _children);
+ if (pos >= 0) {
+ return _children[pos];
+ } else if (create) {
+ _children.push_back(new SGPropertyNode(name, index, this));
+ return _children[_children.size()-1];
+ } else {
+ return 0;
+ }
}
/**
- * Assign a float to the value and change the type if unknown.
- *
- * Note that this is inefficient for use in a tight loop: it is
- * better to save the SGValue and modify it repeatedly.
- *
- * Returns true on success.
+ * Get a const child by name and index.
*/
-bool
-SGPropertyList::setFloatValue (const string &name, float value)
+const SGPropertyNode *
+SGPropertyNode::getChild (const string &name, int index) const
{
- return getValue(name, true)->setFloatValue(value);
+ int pos = find_child(name, index, _children);
+ if (pos >= 0)
+ return _children[pos];
+ else
+ return 0;
}
/**
- * Assign a double to the value and change the type if unknown.
- *
- * Note that this is inefficient for use in a tight loop: it is
- * better to save the SGValue and modify it repeatedly.
- *
- * Returns true on success.
+ * Get all children with the same name (but different indices).
*/
-bool
-SGPropertyList::setDoubleValue (const string &name, double value)
+vector<SGPropertyNode *>
+SGPropertyNode::getChildren (const string &name)
{
- return getValue(name, true)->setDoubleValue(value);
+ vector<SGPropertyNode *> children;
+ int max = _children.size();
+
+ for (int i = 0; i < max; i++)
+ if (_children[i]->getName() == name)
+ children.push_back(_children[i]);
+
+ sort(children.begin(), children.end(), CompareIndices());
+ return children;
}
/**
- * Assign a string to the value and change the type if unknown.
- *
- * Note that this is inefficient for use in a tight loop: it is
- * better to save the SGValue and modify it repeatedly.
- *
- * Returns true on success.
+ * Get all children const with the same name (but different indices).
*/
+vector<const SGPropertyNode *>
+SGPropertyNode::getChildren (const string &name) const
+{
+ vector<const SGPropertyNode *> children;
+ int max = _children.size();
+
+ for (int i = 0; i < max; i++)
+ if (_children[i]->getName() == name)
+ children.push_back(_children[i]);
+
+ sort(children.begin(), children.end(), CompareIndices());
+ return children;
+}
+
+
+string
+SGPropertyNode::getPath (bool simplify) const
+{
+ if (_parent == 0)
+ return "";
+
+ string path = _parent->getPath(simplify);
+ path += '/';
+ path += _name;
+ if (_index != 0 || !simplify) {
+ char buffer[128];
+ sprintf(buffer, "[%d]", _index);
+ path += buffer;
+ }
+ return path;
+}
+
+SGValue::Type
+SGPropertyNode::getType () const
+{
+ if (_value != 0)
+ return _value->getType();
+ else
+ return SGValue::UNKNOWN;
+}
+
+
+bool
+SGPropertyNode::getBoolValue () const
+{
+ return (_value == 0 ? SGRawValue<bool>::DefaultValue
+ : _value->getBoolValue());
+}
+
+int
+SGPropertyNode::getIntValue () const
+{
+ return (_value == 0 ? SGRawValue<int>::DefaultValue
+ : _value->getIntValue());
+}
+
+long
+SGPropertyNode::getLongValue () const
+{
+ return (_value == 0 ? SGRawValue<long>::DefaultValue
+ : _value->getLongValue());
+}
+
+float
+SGPropertyNode::getFloatValue () const
+{
+ return (_value == 0 ? SGRawValue<float>::DefaultValue
+ : _value->getFloatValue());
+}
+
+double
+SGPropertyNode::getDoubleValue () const
+{
+ return (_value == 0 ? SGRawValue<double>::DefaultValue
+ : _value->getDoubleValue());
+}
+
+string
+SGPropertyNode::getStringValue () const
+{
+ return (_value == 0 ? SGRawValue<string>::DefaultValue
+ : _value->getStringValue());
+}
+
bool
-SGPropertyList::setStringValue (const string &name, const string &value)
+SGPropertyNode::setBoolValue (bool val)
{
- return getValue(name, true)->setStringValue(value);
+ if (_value == 0)
+ _value = new SGValue();
+ return _value->setBoolValue(val);
}
+bool
+SGPropertyNode::setIntValue (int val)
+{
+ if (_value == 0)
+ _value = new SGValue();
+ return _value->setIntValue(val);
+}
-/**
- * Assign a string to the value, but don't change the type.
- *
- * Note that this is inefficient for use in a tight loop: it is
- * better to save the SGValue and modify it repeatedly.
- *
- * Returns true on success.
- */
bool
-SGPropertyList::setUnknownValue (const string &name, const string &value)
+SGPropertyNode::setLongValue (long val)
{
- return getValue(name, true)->setUnknownValue(value);
+ if (_value == 0)
+ _value = new SGValue();
+ return _value->setLongValue(val);
}
+bool
+SGPropertyNode::setFloatValue (float val)
+{
+ if (_value == 0)
+ _value = new SGValue();
+ return _value->setFloatValue(val);
+}
-/**
- * Tie a boolean value to external functions.
- *
- * Invokes SGValue::tieBool
- */
bool
-SGPropertyList::tieBool (const string &name,
- bool_getter getter,
- bool_setter setter,
- bool useDefault)
+SGPropertyNode::setDoubleValue (double val)
{
- FG_LOG(FG_GENERAL, FG_DEBUG, "Tying bool property '" << name << '\'');
- useDefault = useDefault && hasValue(name);
- return getValue(name, true)->tieBool(getter, setter, useDefault);
+ if (_value == 0)
+ _value = new SGValue();
+ return _value->setDoubleValue(val);
}
+bool
+SGPropertyNode::setStringValue (string val)
+{
+ if (_value == 0)
+ _value = new SGValue();
+ return _value->setStringValue(val);
+}
-/**
- * Tie an integer value to external functions.
- *
- * Invokes SGValue::tieInt
- */
bool
-SGPropertyList::tieInt (const string &name,
- int_getter getter,
- int_setter setter,
- bool useDefault)
+SGPropertyNode::setUnknownValue (string val)
{
- FG_LOG(FG_GENERAL, FG_DEBUG, "Tying int property '" << name << '\'');
- useDefault = useDefault && hasValue(name);
- return getValue(name, true)->tieInt(getter, setter, useDefault);
+ if (_value == 0)
+ _value = new SGValue();
+ return _value->setUnknownValue(val);
}
+bool
+SGPropertyNode::isTied () const
+{
+ return (_value == 0 ? false : _value->isTied());
+}
-/**
- * Tie a float value to external functions.
- *
- * Invokes SGValue::tieFloat
- */
bool
-SGPropertyList::tieFloat (const string &name,
- float_getter getter,
- float_setter setter,
- bool useDefault)
+SGPropertyNode::tie (const SGRawValue<bool> &rawValue, bool useDefault)
{
- FG_LOG(FG_GENERAL, FG_DEBUG, "Tying float property '" << name << '\'');
- useDefault = useDefault && hasValue(name);
- return getValue(name, true)->tieFloat(getter, setter, useDefault);
+ if (_value == 0)
+ _value = new SGValue();
+ return _value->tie(rawValue, useDefault);
}
+bool
+SGPropertyNode::tie (const SGRawValue<int> &rawValue, bool useDefault)
+{
+ if (_value == 0)
+ _value = new SGValue();
+ return _value->tie(rawValue, useDefault);
+}
-/**
- * Tie a double value to external functions.
- *
- * Invokes SGValue::tieDouble
- */
bool
-SGPropertyList::tieDouble (const string &name,
- double_getter getter,
- double_setter setter,
- bool useDefault)
+SGPropertyNode::tie (const SGRawValue<long> &rawValue, bool useDefault)
{
- FG_LOG(FG_GENERAL, FG_DEBUG, "Tying double property '" << name << '\'');
- useDefault = useDefault && hasValue(name);
- return getValue(name, true)->tieDouble(getter, setter, useDefault);
+ if (_value == 0)
+ _value = new SGValue();
+ return _value->tie(rawValue, useDefault);
}
+bool
+SGPropertyNode::tie (const SGRawValue<float> &rawValue, bool useDefault)
+{
+ if (_value == 0)
+ _value = new SGValue();
+ return _value->tie(rawValue, useDefault);
+}
-/**
- * Tie a string value to external functions.
- *
- * Invokes SGValue::tieString
- */
bool
-SGPropertyList::tieString (const string &name,
- string_getter getter,
- string_setter setter,
- bool useDefault)
+SGPropertyNode::tie (const SGRawValue<double> &rawValue, bool useDefault)
{
- FG_LOG(FG_GENERAL, FG_DEBUG, "Tying string property '" << name << '\'');
- useDefault = useDefault && hasValue(name);
- return getValue(name, true)->tieString(getter, setter, useDefault);
+ if (_value == 0)
+ _value = new SGValue();
+ return _value->tie(rawValue, useDefault);
}
+bool
+SGPropertyNode::tie (const SGRawValue<string> &rawValue, bool useDefault)
+{
+ if (_value == 0)
+ _value = new SGValue();
+ return _value->tie(rawValue, useDefault);
+}
-/**
- * Untie a value from external functions.
- *
- * Invokes SGValue::untie
- */
bool
-SGPropertyList::untie (const string &name)
+SGPropertyNode::untie ()
+{
+ return (_value == 0 ? false : _value->untie());
+}
+
+SGPropertyNode *
+SGPropertyNode::getRootNode ()
+{
+ if (_parent == 0)
+ return this;
+ else
+ return _parent->getRootNode();
+}
+
+const SGPropertyNode *
+SGPropertyNode::getRootNode () const
+{
+ if (_parent == 0)
+ return this;
+ else
+ return _parent->getRootNode();
+}
+
+SGPropertyNode *
+SGPropertyNode::getNode (const string &relative_path, bool create)
+{
+ vector<PathComponent> components;
+ parse_path(relative_path, components);
+ return find_node(this, components, 0, create);
+}
+
+const SGPropertyNode *
+SGPropertyNode::getNode (const string &relative_path) const
{
- FG_LOG(FG_GENERAL, FG_DEBUG, "Untying property '" << name << '\'');
- return getValue(name, true)->untie();
+ vector<PathComponent> components;
+ parse_path(relative_path, components);
+ // FIXME: cast away const
+ return find_node((SGPropertyNode *)this, components, 0, false);
}
\f
////////////////////////////////////////////////////////////////////////
-// Implementation of SGPropertyNode.
+// Convenience methods using relative paths.
////////////////////////////////////////////////////////////////////////
/**
- * Extract the base name of the next level down from the parent.
- *
- * The parent must have a '/' appended. Note that basename may
- * be modified even if the test fails.
+ * Test whether another node has a value attached.
*/
-static bool
-get_base (const string &parent, const string &child,
- string &basename)
+bool
+SGPropertyNode::hasValue (const string &relative_path) const
{
- // First, check that the parent name
- // is a prefix of the child name, and
- // extract the remainder
- if (child.find(parent) != 0)
- return false;
-
- basename = child.substr(parent.size());
-
- string::size_type pos = basename.find('/');
- if (pos != string::npos) {
- basename.resize(pos);
- }
-
- if (basename.size() == 0)
- return false;
- else
- return true;
+ const SGPropertyNode * node = getNode(relative_path);
+ return (node == 0 ? false : node->hasValue());
}
/**
- * Constructor.
+ * Get the value for another node.
*/
-SGPropertyNode::SGPropertyNode (const string &path,
- SGPropertyList * props)
- : _props(props), _node(0)
+SGValue *
+SGPropertyNode::getValue (const string &relative_path, bool create)
{
- setPath(path);
+ SGPropertyNode * node = getNode(relative_path, create);
+ if (node != 0 && !node->hasValue())
+ node->setUnknownValue("");
+ return (node == 0 ? 0 : node->getValue(create));
}
/**
- * Destructor.
+ * Get the value for another node.
*/
-SGPropertyNode::~SGPropertyNode ()
+const SGValue *
+SGPropertyNode::getValue (const string &relative_path) const
{
- delete _node;
- _node = 0;
+ const SGPropertyNode * node = getNode(relative_path);
+ return (node == 0 ? 0 : node->getValue());
}
/**
- * Set the path.
- *
- * Strip the trailing '/', if any.
+ * Get the value type for another node.
*/
-void
-SGPropertyNode::setPath (const string &path)
+SGValue::Type
+SGPropertyNode::getType (const string &relative_path) const
{
- _path = path;
-
- // Chop the final '/', if present.
- if (_path.size() > 0 && _path[_path.size()-1] == '/')
- _path.resize(_path.size()-1);
+ const SGPropertyNode * node = getNode(relative_path);
+ return (node == 0 ? SGValue::UNKNOWN : node->getType());
}
/**
- * Return the local name of the property.
- *
- * The local name is just everything after the last slash.
+ * Get a bool value for another node.
*/
-const string &
-SGPropertyNode::getName () const
+bool
+SGPropertyNode::getBoolValue (const string &relative_path,
+ bool defaultValue) const
{
- string::size_type pos = _path.rfind('/');
- if (pos != string::npos) {
- _name = _path.substr(pos+1);
- return _name;
- } else {
- return empty_string;
- }
+ const SGPropertyNode * node = getNode(relative_path);
+ return (node == 0 ? defaultValue : node->getBoolValue());
}
/**
- * Return the number of children for the current node.
+ * Get an int value for another node.
*/
int
-SGPropertyNode::size () const
+SGPropertyNode::getIntValue (const string &relative_path,
+ int defaultValue) const
{
- if (_props == 0)
- return 0;
+ const SGPropertyNode * node = getNode(relative_path);
+ return (node == 0 ? defaultValue : node->getIntValue());
+}
- int s = 0;
- string base;
- string lastBase;
- string pattern = _path;
- pattern += '/';
+/**
+ * Get a long value for another node.
+ */
+long
+SGPropertyNode::getLongValue (const string &relative_path,
+ long defaultValue) const
+{
+ const SGPropertyNode * node = getNode(relative_path);
+ return (node == 0 ? defaultValue : node->getLongValue());
+}
- SGPropertyList::const_iterator it = _props->begin();
- SGPropertyList::const_iterator end = _props->end();
- while (it != end) {
- if (get_base(pattern, it->first, base) && base != lastBase) {
- s++;
- lastBase = base;
- }
- it++;
- }
- return s;
+/**
+ * Get a float value for another node.
+ */
+float
+SGPropertyNode::getFloatValue (const string &relative_path,
+ float defaultValue) const
+{
+ const SGPropertyNode * node = getNode(relative_path);
+ return (node == 0 ? defaultValue : node->getFloatValue());
}
/**
- * Initialize a node to represent this node's parent.
- *
- * A return value of true means success; otherwise, the node supplied
- * is unmodified.
+ * Get a double value for another node.
*/
-SGPropertyNode &
-SGPropertyNode::getParent () const
+double
+SGPropertyNode::getDoubleValue (const string &relative_path,
+ double defaultValue) const
{
- if (_node == 0)
- _node = new SGPropertyNode();
-
- string::size_type pos = _path.rfind('/');
- if (pos != string::npos) {
- _node->setPropertyList(_props);
- _node->setPath(_path.substr(0, pos-1));
- }
- return *_node;
+ const SGPropertyNode * node = getNode(relative_path);
+ return (node == 0 ? defaultValue : node->getDoubleValue());
}
/**
- * Initialize a node to represent this node's nth child.
- *
- * A return value of true means success; otherwise, the node supplied
- * is unmodified.
- */
-SGPropertyNode &
-SGPropertyNode::getChild (int n) const
-{
- if (_node == 0)
- _node = new SGPropertyNode();
-
- if (_props == 0)
- return *_node;
-
- int s = 0;
- string base;
- string lastBase;
- string pattern = _path;
- pattern += '/';
-
- SGPropertyList::const_iterator it = _props->begin();
- SGPropertyList::const_iterator end = _props->end();
- while (it != end) {
- if (get_base(pattern, it->first, base) && base != lastBase) {
- if (s == n) {
- _node->setPropertyList(_props);
- _node->setPath(_path + string("/") + base);
- return *_node;
- } else {
- s++;
- lastBase = base;
- }
- }
- it++;
- }
-
- return *_node;
+ * Get a string value for another node.
+ */
+string
+SGPropertyNode::getStringValue (const string &relative_path,
+ string defaultValue) const
+{
+ const SGPropertyNode * node = getNode(relative_path);
+ return (node == 0 ? defaultValue : node->getStringValue());
}
/**
- * Return a node for an arbitrary subpath.
- *
- * Never returns 0.
+ * Set a bool value for another node.
*/
-SGPropertyNode &
-SGPropertyNode::getSubNode (const string &subpath) const
+bool
+SGPropertyNode::setBoolValue (const string &relative_path, bool value)
{
- if (_node == 0)
- _node = new SGPropertyNode();
-
- _node->setPropertyList(_props);
- _node->setPath(_path + string("/") + subpath);
- return *_node;
+ return getNode(relative_path, true)->setBoolValue(value);
}
/**
- * Test whether the specified subpath has a value.
+ * Set an int value for another node.
*/
bool
-SGPropertyNode::hasValue (const string &subpath) const
+SGPropertyNode::setIntValue (const string &relative_path, int value)
{
- if (_props == 0)
- return false;
-
- if (subpath.size() == 0)
- return _props->hasValue(_path);
- else
- return _props->hasValue(_path + string("/") + subpath);
+ return getNode(relative_path, true)->setIntValue(value);
}
/**
- * Return the value of the current node.
- *
- * Currently, this does a lookup each time, but we could cache the
- * value safely as long as it's non-zero.
- *
- * Note that this will not create the value if it doesn't already exist.
+ * Set a long value for another node.
*/
-SGValue *
-SGPropertyNode::getValue (const string &subpath)
+bool
+SGPropertyNode::setLongValue (const string &relative_path, long value)
{
- if (_props == 0)
- return 0;
+ return getNode(relative_path, true)->setLongValue(value);
+}
- if (subpath.size() == 0)
- return _props->getValue(_path);
- else
- return _props->getValue(_path + string("/") + subpath);
+
+/**
+ * Set a float value for another node.
+ */
+bool
+SGPropertyNode::setFloatValue (const string &relative_path, float value)
+{
+ return getNode(relative_path, true)->setFloatValue(value);
}
/**
- * Return a bool value.
+ * Set a double value for another node.
*/
bool
-SGPropertyNode::getBoolValue (const string &subpath, bool defaultValue) const
+SGPropertyNode::setDoubleValue (const string &relative_path, double value)
{
- if (_props == 0)
- return defaultValue;
+ return getNode(relative_path, true)->setDoubleValue(value);
+}
- if (subpath == "")
- return _props->getBoolValue(_path, defaultValue);
- else
- return _props->getBoolValue(_path + string("/") + subpath,
- defaultValue);
+
+/**
+ * Set a string value for another node.
+ */
+bool
+SGPropertyNode::setStringValue (const string &relative_path, string value)
+{
+ return getNode(relative_path, true)->setStringValue(value);
}
/**
- * Return an int value.
+ * Set an unknown value for another node.
*/
-int
-SGPropertyNode::getIntValue (const string &subpath, int defaultValue) const
+bool
+SGPropertyNode::setUnknownValue (const string &relative_path, string value)
{
- if (_props == 0)
- return defaultValue;
+ return getNode(relative_path, true)->setUnknownValue(value);
+}
- if (subpath == "")
- return _props->getIntValue(_path, defaultValue);
- else
- return _props->getIntValue(_path + string("/") + subpath,
- defaultValue);
+
+/**
+ * Test whether another node is tied.
+ */
+bool
+SGPropertyNode::isTied (const string &relative_path) const
+{
+ const SGPropertyNode * node = getNode(relative_path);
+ return (node == 0 ? false : node->isTied());
}
/**
- * Return a float value.
+ * Tie a node reached by a relative path, creating it if necessary.
*/
-float
-SGPropertyNode::getFloatValue (const string &subpath, float defaultValue) const
+bool
+SGPropertyNode::tie (const string &relative_path,
+ const SGRawValue<bool> &rawValue,
+ bool useDefault)
{
- if (_props == 0)
- return defaultValue;
+ return getNode(relative_path, true)->tie(rawValue, useDefault);
+}
- if (subpath == "")
- return _props->getFloatValue(_path, defaultValue);
- else
- return _props->getFloatValue(_path + string("/") + subpath,
- defaultValue);
+
+/**
+ * Tie a node reached by a relative path, creating it if necessary.
+ */
+bool
+SGPropertyNode::tie (const string &relative_path,
+ const SGRawValue<int> &rawValue,
+ bool useDefault)
+{
+ return getNode(relative_path, true)->tie(rawValue, useDefault);
}
/**
- * Return a double value.
+ * Tie a node reached by a relative path, creating it if necessary.
*/
-double
-SGPropertyNode::getDoubleValue (const string &subpath,
- double defaultValue) const
+bool
+SGPropertyNode::tie (const string &relative_path,
+ const SGRawValue<long> &rawValue,
+ bool useDefault)
{
- if (_props == 0)
- return defaultValue;
+ return getNode(relative_path, true)->tie(rawValue, useDefault);
+}
- if (subpath == "")
- return _props->getDoubleValue(_path, defaultValue);
- else
- return _props->getDoubleValue(_path + string("/") + subpath,
- defaultValue);
+
+/**
+ * Tie a node reached by a relative path, creating it if necessary.
+ */
+bool
+SGPropertyNode::tie (const string &relative_path,
+ const SGRawValue<float> &rawValue,
+ bool useDefault)
+{
+ return getNode(relative_path, true)->tie(rawValue, useDefault);
}
/**
- * Return a string value.
+ * Tie a node reached by a relative path, creating it if necessary.
*/
-const string &
-SGPropertyNode::getStringValue (const string &subpath,
- const string &defaultValue) const
+bool
+SGPropertyNode::tie (const string &relative_path,
+ const SGRawValue<double> &rawValue,
+ bool useDefault)
{
- if (_props == 0)
- return defaultValue;
+ return getNode(relative_path, true)->tie(rawValue, useDefault);
+}
- if (subpath == "")
- return _props->getStringValue(_path, defaultValue);
- else
- return _props->getStringValue(_path + string("/") + subpath,
- defaultValue);
+
+/**
+ * Tie a node reached by a relative path, creating it if necessary.
+ */
+bool
+SGPropertyNode::tie (const string &relative_path,
+ const SGRawValue<string> &rawValue,
+ bool useDefault)
+{
+ return getNode(relative_path, true)->tie(rawValue, useDefault);
}
+/**
+ * Attempt to untie another node reached by a relative path.
+ */
+bool
+SGPropertyNode::untie (const string &relative_path)
+{
+ SGPropertyNode * node = getNode(relative_path);
+ return (node == 0 ? false : node->untie());
+}
+
// end of props.cxx