1 // inputvalue.hxx - provide input to autopilot components
3 // Written by Torsten Dreyer
4 // Copyright (C) 2010 Torsten Dreyer - Torsten (at) t3r (dot) de
6 // This program is free software; you can redistribute it and/or
7 // modify it under the terms of the GNU General Public License as
8 // published by the Free Software Foundation; either version 2 of the
9 // License, or (at your option) any later version.
11 // This program is distributed in the hope that it will be useful, but
12 // WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 // General Public License for more details.
16 // You should have received a copy of the GNU General Public License
17 // along with this program; if not, write to the Free Software
18 // Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
21 #include "inputvalue.hxx"
22 #include <Main/fg_props.hxx>
23 using namespace FGXMLAutopilot;
25 PeriodicalValue::PeriodicalValue( SGPropertyNode_ptr root )
27 SGPropertyNode_ptr minNode = root->getChild( "min" );
28 SGPropertyNode_ptr maxNode = root->getChild( "max" );
29 if( minNode == NULL || maxNode == NULL ) {
30 SG_LOG(SG_AUTOPILOT, SG_ALERT, "periodical defined, but no <min> and/or <max> tag. Period ignored." );
32 minPeriod = new InputValue( minNode );
33 maxPeriod = new InputValue( maxNode );
37 double PeriodicalValue::normalize( double value ) const
39 return SGMiscd::normalizePeriodic( minPeriod->get_value(), maxPeriod->get_value(), value );
42 double PeriodicalValue::normalizeSymmetric( double value ) const
44 double minValue = minPeriod->get_value();
45 double maxValue = maxPeriod->get_value();
47 value = SGMiscd::normalizePeriodic( minValue, maxValue, value );
48 double width_2 = (maxValue - minValue)/2;
49 return value > width_2 ? width_2 - value : value;
52 InputValue::InputValue( SGPropertyNode_ptr node, double value, double offset, double scale) :
56 parse( node, value, offset, scale );
60 void InputValue::parse( SGPropertyNode_ptr node, double aValue, double aOffset, double aScale )
75 if( (n = node->getChild("condition")) != NULL ) {
76 _condition = sgReadCondition(fgGetNode("/"), n);
79 if( (n = node->getChild( "scale" )) != NULL ) {
80 _scale = new InputValue( n, aScale );
83 if( (n = node->getChild( "offset" )) != NULL ) {
84 _offset = new InputValue( n, aOffset );
87 if( (n = node->getChild( "max" )) != NULL ) {
88 _max = new InputValue( n );
91 if( (n = node->getChild( "min" )) != NULL ) {
92 _min = new InputValue( n );
95 if( (n = node->getChild( "abs" )) != NULL ) {
96 _abs = n->getBoolValue();
99 if( (n = node->getChild( "period" )) != NULL ) {
100 _periodical = new PeriodicalValue( n );
103 SGPropertyNode *valueNode = node->getChild( "value" );
104 if ( valueNode != NULL ) {
105 _value = valueNode->getDoubleValue();
108 if ((n = node->getChild("expression")) != NULL) {
109 _expression = SGReadDoubleExpression(fgGetNode("/"), n->getChild(0));
113 n = node->getChild( "property" );
114 // if no <property> element, check for <prop> element for backwards
117 n = node->getChild( "prop" );
120 _property = fgGetNode( n->getStringValue(), true );
121 if ( valueNode != NULL ) {
122 // initialize property with given value
123 // if both <prop> and <value> exist
124 double s = get_scale();
126 _property->setDoubleValue( (_value - get_offset())/s );
128 _property->setDoubleValue( 0 ); // if scale is zero, value*scale is zero
132 } // of have a <property> or <prop>
135 if (valueNode == NULL) {
136 // no <value>, <prop> or <expression> element, use text node
137 const char * textnode = node->getStringValue();
139 // try to convert to a double value. If the textnode does not start with a number
140 // endp will point to the beginning of the string. We assume this should be
142 _value = strtod( textnode, &endp );
143 if( endp == textnode ) {
144 _property = fgGetNode( textnode, true );
149 void InputValue::set_value( double aValue )
154 double s = get_scale();
156 _property->setDoubleValue( (aValue - get_offset())/s );
158 _property->setDoubleValue( 0 ); // if scale is zero, value*scale is zero
161 double InputValue::get_value() const
163 double value = _value;
166 // compute the expression value
167 value = _expression->getValue(NULL);
168 } else if( _property != NULL ) {
169 value = _property->getDoubleValue();
173 value *= _scale->get_value();
176 value += _offset->get_value();
179 double m = _min->get_value();
185 double m = _max->get_value();
191 value = _periodical->normalize( value );
194 return _abs ? fabs(value) : value;