// along with this program; if not, write to the Free Software
// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
//
-// $Id$
-
#ifdef HAVE_CONFIG_H
# include <config.h>
#endif
-#include "navradio.hxx"
-
#include <sstream>
+#include <cstring>
+#include <cstdio>
#include <simgear/sg_inlines.h>
#include <simgear/timing/sg_time.hxx>
-#include <simgear/math/vector.hxx>
#include <simgear/math/sg_random.h>
#include <simgear/misc/sg_path.hxx>
#include <simgear/math/sg_geodesy.hxx>
#include <simgear/structure/exception.hxx>
#include <simgear/math/interpolater.hxx>
+#include <simgear/misc/strutils.hxx>
+#include <simgear/sound/sample_group.hxx>
#include <Navaids/navrecord.hxx>
-
+#include <Sound/audioident.hxx>
#include <Airports/runways.hxx>
#include <Navaids/navlist.hxx>
#include <Main/util.hxx>
+#include "navradio.hxx"
using std::string;
return 4.0 * fabs(xx/4.0 + 0.25 - floor(xx/4.0 + 0.75)) - 1.0;
}
-// Calculate a unit vector in the horizontal tangent plane
-// starting at the given "tail" of the vector and going off
-// with the given heading.
-static SGVec3d tangentVector(const SGGeod& tail, const SGVec3d& tail_xyz,
- const double heading)
+// Calculate a Cartesian unit vector in the
+// local horizontal plane, i.e. tangent to the
+// surface of the earth at the local ground zero.
+// The tangent vector passes through the given <midpoint>
+// and points forward along the given <heading>.
+// The <heading> is given in degrees.
+static SGVec3d tangentVector(const SGGeod& midpoint, const double heading)
{
-// The fudge factor here is presumably intended to improve
-// numerical stability. I don't know if it is necessary.
-// It gets divided out later.
- double fudge(100.0);
- SGGeod head;
- double az2; // ignored
- SGGeodesy::direct(tail, heading, fudge, head, az2);
- head.setElevationM(tail.getElevationM());
+// The size of the delta is presumably chosen to give
+// numerical stability. I don't know how the value was chosen.
+// It probably doesn't matter much. It gets divided out.
+ double delta(100.0); // in meters
+ SGGeod head, tail;
+ double az2; // ignored
+ SGGeodesy::direct(midpoint, heading, delta, head, az2);
+ SGGeodesy::direct(midpoint, 180+heading, delta, tail, az2);
+ head.setElevationM(midpoint.getElevationM());
+ tail.setElevationM(midpoint.getElevationM());
SGVec3d head_xyz = SGVec3d::fromGeod(head);
- return (head_xyz - tail_xyz) * (1.0/fudge);
+ SGVec3d tail_xyz = SGVec3d::fromGeod(tail);
+// Awkward formula here, needed because vector-by-scalar
+// multiplication is defined, but not vector-by-scalar division.
+ return (head_xyz - tail_xyz) * (0.5/delta);
+}
+
+// Create a "serviceable" node with a default value of "true"
+SGPropertyNode_ptr createServiceableProp(SGPropertyNode* aParent,
+ const char* aName)
+{
+ SGPropertyNode_ptr n =
+ aParent->getChild(aName, 0, true)->getChild("serviceable", 0, true);
+ simgear::props::Type typ = n->getType();
+ if ((typ == simgear::props::NONE) || (typ == simgear::props::UNSPECIFIED)) {
+ n->setBoolValue(true);
+ }
+ return n;
}
+static std::auto_ptr<SGInterpTable> static_terminalRangeInterp,
+ static_lowRangeInterp, static_highRangeInterp;
+
// Constructor
FGNavRadio::FGNavRadio(SGPropertyNode *node) :
- lon_node(fgGetNode("/position/longitude-deg", true)),
- lat_node(fgGetNode("/position/latitude-deg", true)),
- alt_node(fgGetNode("/position/altitude-ft", true)),
- is_valid_node(NULL),
- power_btn_node(NULL),
- freq_node(NULL),
- alt_freq_node(NULL),
- sel_radial_node(NULL),
- vol_btn_node(NULL),
- ident_btn_node(NULL),
- audio_btn_node(NULL),
- backcourse_node(NULL),
- nav_serviceable_node(NULL),
- cdi_serviceable_node(NULL),
- gs_serviceable_node(NULL),
- tofrom_serviceable_node(NULL),
- fmt_freq_node(NULL),
- fmt_alt_freq_node(NULL),
- heading_node(NULL),
- radial_node(NULL),
- recip_radial_node(NULL),
- target_radial_true_node(NULL),
- target_auto_hdg_node(NULL),
- time_to_intercept(NULL),
- to_flag_node(NULL),
- from_flag_node(NULL),
- inrange_node(NULL),
- signal_quality_norm_node(NULL),
- cdi_deflection_node(NULL),
- cdi_deflection_norm_node(NULL),
- cdi_xtrack_error_node(NULL),
- cdi_xtrack_hdg_err_node(NULL),
- has_gs_node(NULL),
- loc_node(NULL),
- loc_dist_node(NULL),
- gs_deflection_node(NULL),
- gs_deflection_deg_node(NULL),
- gs_deflection_norm_node(NULL),
- gs_rate_of_climb_node(NULL),
- gs_dist_node(NULL),
- gs_inrange_node(NULL),
- nav_id_node(NULL),
- id_c1_node(NULL),
- id_c2_node(NULL),
- id_c3_node(NULL),
- id_c4_node(NULL),
- nav_slaved_to_gps_node(NULL),
- gps_cdi_deflection_node(NULL),
- gps_to_flag_node(NULL),
- gps_from_flag_node(NULL),
- gps_has_gs_node(NULL),
+ _operable(false),
play_count(0),
- last_time(0),
+ _nav_search(true),
+ _last_freq(0.0),
target_radial(0.0),
+ effective_range(0.0),
+ target_gs(0.0),
+ twist(0.0),
horiz_vel(0.0),
last_x(0.0),
- last_loc_dist(0.0),
last_xtrack_error(0.0),
+ xrate_ms(0.0),
_localizerWidth(5.0),
_name(node->getStringValue("name", "nav")),
_num(node->getIntValue("number", 0)),
- _time_before_search_sec(-1.0)
+ _time_before_search_sec(-1.0),
+ _gsCart(SGVec3d::zeros()),
+ _gsAxis(SGVec3d::zeros()),
+ _gsVertical(SGVec3d::zeros()),
+ _toFlag(false),
+ _fromFlag(false),
+ _cdiDeflection(0.0),
+ _cdiCrossTrackErrorM(0.0),
+ _gsNeedleDeflection(0.0),
+ _gsNeedleDeflectionNorm(0.0),
+ _audioIdent(NULL)
{
- SGPath path( globals->get_fg_root() );
- SGPath term = path;
- term.append( "Navaids/range.term" );
- SGPath low = path;
- low.append( "Navaids/range.low" );
- SGPath high = path;
- high.append( "Navaids/range.high" );
-
- term_tbl = new SGInterpTable( term.str() );
- low_tbl = new SGInterpTable( low.str() );
- high_tbl = new SGInterpTable( high.str() );
+ if (!static_terminalRangeInterp.get()) {
+ // one-time interpolator init
+ SGPath path( globals->get_fg_root() );
+ SGPath term = path;
+ term.append( "Navaids/range.term" );
+ SGPath low = path;
+ low.append( "Navaids/range.low" );
+ SGPath high = path;
+ high.append( "Navaids/range.high" );
+
+ static_terminalRangeInterp.reset(new SGInterpTable(term.str()));
+ static_lowRangeInterp.reset(new SGInterpTable(low.str()));
+ static_highRangeInterp.reset(new SGInterpTable(high.str()));
+ }
+
+ string branch("/instrumentation/" + _name);
+ _radio_node = fgGetNode(branch.c_str(), _num, true);
}
// Destructor
FGNavRadio::~FGNavRadio()
{
- delete term_tbl;
- delete low_tbl;
- delete high_tbl;
+ if (gps_course_node) {
+ gps_course_node->removeChangeListener(this);
+ }
+
+ if (nav_slaved_to_gps_node) {
+ nav_slaved_to_gps_node->removeChangeListener(this);
+ }
+
+ delete _audioIdent;
}
void
FGNavRadio::init ()
{
- morse.init();
-
- string branch;
- branch = "/instrumentation/" + _name;
-
- SGPropertyNode *node = fgGetNode(branch.c_str(), _num, true );
-
+ SGPropertyNode* node = _radio_node.get();
bus_power_node =
- fgGetNode(("/systems/electrical/outputs/" + _name).c_str(), true);
+ fgGetNode(("/systems/electrical/outputs/" + _name).c_str(), true);
// inputs
is_valid_node = node->getChild("data-is-valid", 0, true);
audio_btn_node->setBoolValue( true );
backcourse_node = node->getChild("back-course-btn", 0, true);
backcourse_node->setBoolValue( false );
+
nav_serviceable_node = node->getChild("serviceable", 0, true);
- cdi_serviceable_node = (node->getChild("cdi", 0, true))
- ->getChild("serviceable", 0, true);
- gs_serviceable_node = (node->getChild("gs", 0, true))
- ->getChild("serviceable");
- tofrom_serviceable_node = (node->getChild("to-from", 0, true))
- ->getChild("serviceable", 0, true);
+ cdi_serviceable_node = createServiceableProp(node, "cdi");
+ gs_serviceable_node = createServiceableProp(node, "gs");
+ tofrom_serviceable_node = createServiceableProp(node, "to-from");
+
+ falseCoursesEnabledNode =
+ fgGetNode("/sim/realism/false-radio-courses-enabled");
+ if (!falseCoursesEnabledNode) {
+ falseCoursesEnabledNode =
+ fgGetNode("/sim/realism/false-radio-courses-enabled", true);
+ falseCoursesEnabledNode->setBoolValue(true);
+ }
// frequencies
SGPropertyNode *subnode = node->getChild("frequencies", 0, true);
alt_freq_node = subnode->getChild("standby-mhz", 0, true);
fmt_freq_node = subnode->getChild("selected-mhz-fmt", 0, true);
fmt_alt_freq_node = subnode->getChild("standby-mhz-fmt", 0, true);
+ is_loc_freq_node = subnode->getChild("is-localizer-frequency", 0, true );
// radials
subnode = node->getChild("radials", 0, true);
gs_deflection_node = node->getChild("gs-needle-deflection", 0, true);
gs_deflection_deg_node = node->getChild("gs-needle-deflection-deg", 0, true);
gs_deflection_norm_node = node->getChild("gs-needle-deflection-norm", 0, true);
+ gs_direct_node = node->getChild("gs-direct-deg", 0, true);
gs_rate_of_climb_node = node->getChild("gs-rate-of-climb", 0, true);
+ gs_rate_of_climb_fpm_node = node->getChild("gs-rate-of-climb-fpm", 0, true);
gs_dist_node = node->getChild("gs-distance", 0, true);
gs_inrange_node = node->getChild("gs-in-range", 0, true);
// gps slaving support
nav_slaved_to_gps_node = node->getChild("slaved-to-gps", 0, true);
+ nav_slaved_to_gps_node->addChangeListener(this);
+
gps_cdi_deflection_node = fgGetNode("/instrumentation/gps/cdi-deflection", true);
gps_to_flag_node = fgGetNode("/instrumentation/gps/to-flag", true);
gps_from_flag_node = fgGetNode("/instrumentation/gps/from-flag", true);
gps_has_gs_node = fgGetNode("/instrumentation/gps/has-gs", true);
+ gps_course_node = fgGetNode("/instrumentation/gps/desired-course-deg", true);
+ gps_course_node->addChangeListener(this);
+
+ gps_xtrack_error_nm_node = fgGetNode("/instrumentation/gps/wp/wp[1]/course-error-nm", true);
+ _magvarNode = fgGetNode("/environment/magnetic-variation-deg", true);
std::ostringstream temp;
- temp << _name << "nav-ident" << _num;
- nav_fx_name = temp.str();
- temp << _name << "dme-ident" << _num;
- dme_fx_name = temp.str();
+ temp << _name << "-ident-" << _num;
+ if( NULL == _audioIdent )
+ _audioIdent = new VORAudioIdent( temp.str() );
+ _audioIdent->init();
+
+ // dme-in-range is deprecated,
+ // temporarily create dme-in-range alias for instrumentation/dme[0]/in-range
+ // remove after flightgear 2.6.0
+ node->getNode( "dme-in-range", true )->alias( fgGetNode("/instrumentation/dme[0]/in-range", true ) );
+}
+
+void
+FGNavRadio::reinit ()
+{
+ _time_before_search_sec = -1.0;
}
void
FGNavRadio::bind ()
{
+ _radio_node->tie( "operable", SGRawValueMethods<FGNavRadio,bool>( *this, &FGNavRadio::isOperable ) );
}
void
FGNavRadio::unbind ()
{
+ _radio_node->untie("operable");
}
double FGNavRadio::adjustNavRange( double stationElev, double aircraftElev,
double nominalRange )
{
- if (nominalRange < 0.0) {
+ if (nominalRange <= 0.0) {
nominalRange = FG_NAV_DEFAULT_RANGE;
}
// << " station elev = " << stationElev << endl;
if ( nominalRange < 25.0 + SG_EPSILON ) {
- // Standard Terminal Service Volume
- return term_tbl->interpolate( alt ) * usability_factor;
+ // Standard Terminal Service Volume
+ return static_terminalRangeInterp->interpolate( alt ) * usability_factor;
} else if ( nominalRange < 50.0 + SG_EPSILON ) {
// Standard Low Altitude Service Volume
// table is based on range of 40, scale to actual range
- return low_tbl->interpolate( alt ) * nominalRange / 40.0
+ return static_lowRangeInterp->interpolate( alt ) * nominalRange / 40.0
* usability_factor;
} else {
// Standard High Altitude Service Volume
// table is based on range of 130, scale to actual range
- return high_tbl->interpolate( alt ) * nominalRange / 130.0
+ return static_highRangeInterp->interpolate( alt ) * nominalRange / 130.0
* usability_factor;
}
}
return FG_LOC_DEFAULT_RANGE;
}
+// Frequencies with odd 100kHz numbers in the range from 108.00 - 111.95
+// are LOC/GS (ILS) frequency pairs
+// (108.00, 108.05, 108.20, 108.25.. =VOR)
+// (108.10, 108.15, 108.30, 108.35.. =ILS)
+static inline bool IsLocalizerFrequency( double f )
+{
+ if( f < 108.0 || f >= 112.00 ) return false;
+ return (((SGMiscd::roundToInt(f * 100.0) % 100)/10) % 2) != 0;
+}
+
//////////////////////////////////////////////////////////////////////////
// Update the various nav values based on position and valid tuned in navs
fmt_freq_node->setStringValue(tmp);
sprintf( tmp, "%.2f", alt_freq_node->getDoubleValue() );
fmt_alt_freq_node->setStringValue(tmp);
+ is_loc_freq_node->setBoolValue( IsLocalizerFrequency( freq_node->getDoubleValue() ));
if (power_btn_node->getBoolValue()
&& (bus_power_node->getDoubleValue() > 1.0)
&& nav_serviceable_node->getBoolValue() )
- {
- if (nav_slaved_to_gps_node->getBoolValue()) {
- updateGPSSlaved();
- } else {
- updateReceiver(dt);
- }
-
+ {
+ _operable = true;
+ updateReceiver(dt);
updateCDI(dt);
} else {
clearOutputs();
}
- updateAudio();
+ updateAudio( dt );
}
void FGNavRadio::clearOutputs()
{
inrange_node->setBoolValue( false );
+ signal_quality_norm_node->setDoubleValue( 0.0 );
cdi_deflection_node->setDoubleValue( 0.0 );
cdi_deflection_norm_node->setDoubleValue( 0.0 );
cdi_xtrack_error_node->setDoubleValue( 0.0 );
cdi_xtrack_hdg_err_node->setDoubleValue( 0.0 );
time_to_intercept->setDoubleValue( 0.0 );
+ heading_node->setDoubleValue(0.0);
gs_deflection_node->setDoubleValue( 0.0 );
gs_deflection_deg_node->setDoubleValue(0.0);
gs_deflection_norm_node->setDoubleValue(0.0);
+ gs_direct_node->setDoubleValue(0.0);
gs_inrange_node->setBoolValue( false );
+ loc_node->setBoolValue( false );
+ has_gs_node->setBoolValue(false);
to_flag_node->setBoolValue( false );
from_flag_node->setBoolValue( false );
+ is_valid_node->setBoolValue(false);
+ nav_id_node->setStringValue("");
+
+ _operable = false;
+ _navaid = NULL;
}
void FGNavRadio::updateReceiver(double dt)
{
+ SGVec3d aircraft = SGVec3d::fromGeod(globals->get_aircraft_position());
+ double loc_dist = 0;
+
// Do a nav station search only once a second to reduce
// unnecessary work. (Also, make sure to do this before caching
// any values!)
search();
}
+ if (_navaid)
+ {
+ loc_dist = dist(aircraft, _navaid->cart());
+ loc_dist_node->setDoubleValue( loc_dist );
+ }
+
+ if (nav_slaved_to_gps_node->getBoolValue()) {
+ // when slaved to GPS: only allow stuff above: tune NAV station
+ // All other data driven by GPS only.
+ updateGPSSlaved();
+ return;
+ }
+
if (!_navaid) {
_cdiDeflection = 0.0;
_cdiCrossTrackErrorM = 0.0;
_toFlag = _fromFlag = false;
_gsNeedleDeflection = 0.0;
_gsNeedleDeflectionNorm = 0.0;
+ heading_node->setDoubleValue(0.0);
inrange_node->setBoolValue(false);
+ signal_quality_norm_node->setDoubleValue(0.0);
+ gs_dist_node->setDoubleValue( 0.0 );
+ gs_inrange_node->setBoolValue(false);
return;
}
- SGGeod pos = SGGeod::fromDegFt(lon_node->getDoubleValue(),
- lat_node->getDoubleValue(),
- alt_node->getDoubleValue());
-
double nav_elev = _navaid->get_elev_ft();
- SGVec3d aircraft = SGVec3d::fromGeod(pos);
- double loc_dist = dist(aircraft, _navaid->cart());
- loc_dist_node->setDoubleValue( loc_dist );
+
bool is_loc = loc_node->getBoolValue();
double signal_quality_norm = signal_quality_norm_node->getDoubleValue();
// compute forward and reverse wgs84 headings to localizer
//////////////////////////////////////////////////////////
double hdg;
- SGGeodesy::inverse(pos, _navaid->geod(), hdg, az2, s);
+ SGGeodesy::inverse(globals->get_aircraft_position(), _navaid->geod(), hdg, az2, s);
heading_node->setDoubleValue(hdg);
double radial = az2 - twist;
double recip = radial + 180.0;
double offset = radial - target_radial;
SG_NORMALIZE_RANGE(offset, -180.0, 180.0);
effective_range
- = adjustILSRange( nav_elev, pos.getElevationM(), offset,
+ = adjustILSRange( nav_elev, globals->get_aircraft_position().getElevationM(), offset,
loc_dist * SG_METER_TO_NM );
} else {
effective_range
- = adjustNavRange( nav_elev, pos.getElevationM(), _navaid->get_range() );
+ = adjustNavRange( nav_elev, globals->get_aircraft_position().getElevationM(), _navaid->get_range() );
}
double effective_range_m = effective_range * SG_NM_TO_METER;
SG_NORMALIZE_RANGE(r, -180.0, 180.0);
if ( is_loc ) {
- // The factor of 30.0 gives a period of 120 which gives us 3 cycles and six
- // zeros i.e. six courses: one front course, one back course, and four
- // false courses. Three of the six are reverse sensing.
- _cdiDeflection = 30.0 * sawtooth(r / 30.0);
+ if (falseCoursesEnabledNode->getBoolValue()) {
+ // The factor of 30.0 gives a period of 120 which gives us 3 cycles and six
+ // zeros i.e. six courses: one front course, one back course, and four
+ // false courses. Three of the six are reverse sensing.
+ _cdiDeflection = 30.0 * sawtooth(r / 30.0);
+ } else {
+ // no false courses, but we do need to create a back course
+ if (fabs(r) > 90.0) { // front course
+ _cdiDeflection = r - copysign(180.0, r);
+ } else {
+ _cdiDeflection = r; // back course
+ }
+
+ _cdiDeflection = -_cdiDeflection; // reverse for outbound radial
+ } // of false courses disabled
+
const double VOR_FULL_ARC = 20.0; // VOR is -10 .. 10 degree swing
- _cdiDeflection *= VOR_FULL_ARC / _localizerWidth; // increased localiser sensitivity
+ _cdiDeflection *= VOR_FULL_ARC / _localizerWidth; // increased localizer sensitivity
+
+ if (backcourse_node->getBoolValue()) {
+ _cdiDeflection = -_cdiDeflection;
+ }
} else {
// handle the TO side of the VOR
if (fabs(r) > 90.0) {
r = ( r<0.0 ? -r-180.0 : -r+180.0 );
}
_cdiDeflection = r;
- } // of non-localiser case
+ } // of non-localizer case
SG_CLAMP_RANGE(_cdiDeflection, -10.0, 10.0 );
_cdiDeflection *= signal_quality_norm;
- // cross-track error (in metres)
+ // cross-track error (in meters)
_cdiCrossTrackErrorM = loc_dist * sin(r * SGD_DEGREES_TO_RADIANS);
updateGlideSlope(dt, aircraft, signal_quality_norm);
-
- last_loc_dist = loc_dist;
}
void FGNavRadio::updateGlideSlope(double dt, const SGVec3d& aircraft, double signal_quality_norm)
{
- _gsNeedleDeflection = 0.0;
- if (!_gs || !inrange_node->getBoolValue()) {
- gs_dist_node->setDoubleValue( 0.0 );
- gs_inrange_node->setBoolValue(false);
- return;
+ bool gsInRange = (_gs && inrange_node->getBoolValue());
+ double gsDist = 0;
+
+ if (gsInRange)
+ {
+ gsDist = dist(aircraft, _gsCart);
+ gsInRange = (gsDist < (_gs->get_range() * SG_NM_TO_METER));
}
-
- double gsDist = dist(aircraft, _gsCart);
- gs_dist_node->setDoubleValue(gsDist);
- bool gsInRange = (gsDist < (_gs->get_range() * SG_NM_TO_METER));
+
gs_inrange_node->setBoolValue(gsInRange);
-
- if (!gsInRange) {
+ gs_dist_node->setDoubleValue( gsDist );
+
+ if (!gsInRange)
+ {
+ _gsNeedleDeflection = 0.0;
+ _gsNeedleDeflectionNorm = 0.0;
return;
}
SGVec3d pos = aircraft - _gsCart; // relative vector from gs antenna to aircraft
// The positive GS axis points along the runway in the landing direction,
// toward the far end, not toward the approach area, so we need a - sign here:
- double dot_h = -dot(pos, _gsAxis);
- double dot_v = dot(pos, _gsVertical);
- double angle = atan2(dot_v, dot_h) * SGD_RADIANS_TO_DEGREES;
- double deflectionAngle = target_gs - angle;
-
- // Construct false glideslopes. The scale factor of 1.5
- // in the sawtooth gives a period of 6 degrees.
- // There will be zeros at 3, 6r, 9, 12r et cetera
- // where "r" indicates reverse sensing.
- // This is is consistent with conventional pilot lore
- // e.g. http://www.allstar.fiu.edu/aerojava/ILS.htm
- // but inconsistent with
- // http://www.freepatentsonline.com/3757338.html
- //
- // It may be that some of each exist.
- if (deflectionAngle < 0) {
- deflectionAngle = 1.5 * sawtooth(deflectionAngle / 1.5);
- } else {
- // no false GS below the true GS
+ double comp_h = -dot(pos, _gsAxis); // component in horiz direction
+ double comp_v = dot(pos, _gsVertical); // component in vertical direction
+ //double comp_b = dot(pos, _gsBaseline); // component in baseline direction
+ //if (comp_b) {} // ... (useful for debugging)
+
+// _gsDirect represents the angle of elevation of the aircraft
+// as seen by the GS transmitter.
+ _gsDirect = atan2(comp_v, comp_h) * SGD_RADIANS_TO_DEGREES;
+// At this point, if the aircraft is centered on the glide slope,
+// _gsDirect will be a small positive number, e.g. 3.0 degrees
+
+// Aim the branch cut straight down
+// into the ground below the GS transmitter:
+ if (_gsDirect < -90.0) _gsDirect += 360.0;
+
+ double deflectionAngle = target_gs - _gsDirect;
+
+ if (falseCoursesEnabledNode->getBoolValue()) {
+ // Construct false glideslopes. The scale factor of 1.5
+ // in the sawtooth gives a period of 6 degrees.
+ // There will be zeros at 3, 6r, 9, 12r et cetera
+ // where "r" indicates reverse sensing.
+ // This is is consistent with conventional pilot lore
+ // e.g. http://www.allstar.fiu.edu/aerojava/ILS.htm
+ // but inconsistent with
+ // http://www.freepatentsonline.com/3757338.html
+ //
+ // It may be that some of each exist.
+ if (deflectionAngle < 0) {
+ deflectionAngle = 1.5 * sawtooth(deflectionAngle / 1.5);
+ } else {
+ // no false GS below the true GS
+ }
}
+// GS is documented to be 1.4 degrees thick,
+// i.e. plus or minus 0.7 degrees from the midline:
+ SG_CLAMP_RANGE(deflectionAngle, -0.7, 0.7);
+
+// Many older instrument xml frontends depend on
+// the un-normalized gs-needle-deflection.
+// Apparently the interface standard is plus or minus 3.5 "volts"
+// for a full-scale deflection:
_gsNeedleDeflection = deflectionAngle * 5.0;
_gsNeedleDeflection *= signal_quality_norm;
- SG_CLAMP_RANGE(deflectionAngle, -0.7, 0.7);
_gsNeedleDeflectionNorm = (deflectionAngle / 0.7) * signal_quality_norm;
//////////////////////////////////////////////////////////
// Calculate desired rate of climb for intercepting the GS
//////////////////////////////////////////////////////////
- double gs_diff = target_gs - angle;
+ double gs_diff = target_gs - _gsDirect;
// convert desired vertical path angle into a climb rate
- double des_angle = angle - 10 * gs_diff;
+ double des_angle = _gsDirect - 10 * gs_diff;
+ /* printf("target_gs=%.1f angle=%.1f gs_diff=%.1f des_angle=%.1f\n",
+ target_gs, _gsDirect, gs_diff, des_angle); */
// estimate horizontal speed towards ILS in meters per minute
double elapsedDistance = last_x - gsDist;
last_x = gsDist;
double new_vel = ( elapsedDistance / dt );
- horiz_vel = 0.75 * horiz_vel + 0.25 * new_vel;
+ horiz_vel = 0.99 * horiz_vel + 0.01 * new_vel;
+ /* printf("vel=%.1f (dist=%.1f dt=%.2f)\n", horiz_vel, elapsedDistance, dt);*/
gs_rate_of_climb_node
->setDoubleValue( -sin( des_angle * SGD_DEGREES_TO_RADIANS )
* horiz_vel * SG_METER_TO_FEET );
+ gs_rate_of_climb_fpm_node
+ ->setDoubleValue( gs_rate_of_climb_node->getDoubleValue() * 60 );
+}
+
+void FGNavRadio::valueChanged (SGPropertyNode* prop)
+{
+ if (prop == gps_course_node) {
+ if (!nav_slaved_to_gps_node->getBoolValue()) {
+ return;
+ }
+
+ // GPS desired course has changed, sync up our selected-course
+ double v = prop->getDoubleValue();
+ if (v != sel_radial_node->getDoubleValue()) {
+ sel_radial_node->setDoubleValue(v);
+ }
+ } else if (prop == nav_slaved_to_gps_node) {
+ if (prop->getBoolValue()) {
+ // slaved-to-GPS activated, clear obsolete NAV outputs and sync up selected course
+ clearOutputs();
+ sel_radial_node->setDoubleValue(gps_course_node->getDoubleValue());
+ }
+ // slave-to-GPS enabled/disabled, resync NAV station (update all outputs)
+ _navaid = NULL;
+ _time_before_search_sec = 0;
+ }
}
void FGNavRadio::updateGPSSlaved()
_toFlag = gps_to_flag_node->getBoolValue();
_fromFlag = gps_from_flag_node->getBoolValue();
- inrange_node->setBoolValue(_toFlag | _fromFlag);
+ bool gpsValid = (_toFlag | _fromFlag);
+ inrange_node->setBoolValue(gpsValid);
+ if (!gpsValid) {
+ signal_quality_norm_node->setDoubleValue(0.0);
+ _cdiDeflection = 0.0;
+ _cdiCrossTrackErrorM = 0.0;
+ _gsNeedleDeflection = 0.0;
+ _gsNeedleDeflectionNorm = 0.0;
+ return;
+ }
+
+ // this is unfortunate, but panel instruments use this value to decide
+ // if the navradio output is valid.
+ signal_quality_norm_node->setDoubleValue(1.0);
_cdiDeflection = gps_cdi_deflection_node->getDoubleValue();
// clmap to some range (+/- 10 degrees) as the regular deflection
SG_CLAMP_RANGE(_cdiDeflection, -10.0, 10.0 );
- _cdiCrossTrackErrorM = 0.0; // FIXME, supply this
+ _cdiCrossTrackErrorM = gps_xtrack_error_nm_node->getDoubleValue() * SG_NM_TO_METER;
_gsNeedleDeflection = 0.0; // FIXME, supply this
+
+ double trtrue = gps_course_node->getDoubleValue() + _magvarNode->getDoubleValue();
+ SG_NORMALIZE_RANGE(trtrue, 0.0, 360.0);
+ target_radial_true_node->setDoubleValue( trtrue );
}
void FGNavRadio::updateCDI(double dt)
SG_CLAMP_RANGE( adjustment, -30.0, 30.0 );
// determine the target heading to fly to intercept the
- // tgt_radial = target radial (true) + cdi offset adjustmest -
+ // tgt_radial = target radial (true) + cdi offset adjustment -
// xtrack heading error adjustment
double nta_hdg;
double trtrue = target_radial_true_node->getDoubleValue();
//////////////////////////////////////////////////////////
// compute the time to intercept selected radial (based on
- // current and last cross track errors and dt
+ // current and last cross track errors and dt)
//////////////////////////////////////////////////////////
double t = 0.0;
if ( inrange && cdi_serviceable ) {
- double xrate_ms = (last_xtrack_error - _cdiCrossTrackErrorM) / dt;
+ double cur_rate = (last_xtrack_error - _cdiCrossTrackErrorM) / dt;
+ xrate_ms = 0.99 * xrate_ms + 0.01 * cur_rate;
if ( fabs(xrate_ms) > 0.00001 ) {
t = _cdiCrossTrackErrorM / xrate_ms;
} else {
gs_deflection_node->setDoubleValue(_gsNeedleDeflection);
gs_deflection_deg_node->setDoubleValue(_gsNeedleDeflectionNorm * 0.7);
gs_deflection_norm_node->setDoubleValue(_gsNeedleDeflectionNorm);
+ gs_direct_node->setDoubleValue(_gsDirect);
last_xtrack_error = _cdiCrossTrackErrorM;
}
-void FGNavRadio::updateAudio()
+void FGNavRadio::updateAudio( double dt )
{
if (!_navaid || !inrange_node->getBoolValue() || !nav_serviceable_node->getBoolValue()) {
+ _audioIdent->setIdent("", 0.0 );
return;
}
// play station ident via audio system if on + ident,
// otherwise turn it off
- if (!power_btn_node->getBoolValue()
+ if (!power_btn_node->getBoolValue()
|| !(bus_power_node->getDoubleValue() > 1.0)
|| !ident_btn_node->getBoolValue()
|| !audio_btn_node->getBoolValue() ) {
- globals->get_soundmgr()->stop( nav_fx_name );
- globals->get_soundmgr()->stop( dme_fx_name );
+ _audioIdent->setIdent("", 0.0 );
return;
}
- SGSoundSample *sound = globals->get_soundmgr()->find( nav_fx_name );
- double vol = vol_btn_node->getDoubleValue();
- SG_CLAMP_RANGE(vol, 0.0, 1.0);
-
- if ( sound != NULL ) {
- sound->set_volume( vol );
- } else {
- SG_LOG( SG_COCKPIT, SG_ALERT, "Can't find nav-vor-ident sound" );
- }
-
- sound = globals->get_soundmgr()->find( dme_fx_name );
- if ( sound != NULL ) {
- sound->set_volume( vol );
- } else {
- SG_LOG( SG_COCKPIT, SG_ALERT, "Can't find nav-dme-ident sound" );
- }
+ _audioIdent->setIdent( _navaid->get_trans_ident(), vol_btn_node->getFloatValue() );
- if ( last_time < globals->get_time_params()->get_cur_time() - 30 ) {
- last_time = globals->get_time_params()->get_cur_time();
- play_count = 0;
- }
-
- if ( play_count < 4 ) {
- // play VOR ident
- if ( !globals->get_soundmgr()->is_playing(nav_fx_name) ) {
- globals->get_soundmgr()->play_once( nav_fx_name );
- ++play_count;
- }
- } else if ( play_count < 5 && has_dme) {
- // play DME ident
- if ( !globals->get_soundmgr()->is_playing(nav_fx_name) &&
- !globals->get_soundmgr()->is_playing(dme_fx_name) ) {
- globals->get_soundmgr()->play_once( dme_fx_name );
- ++play_count;
- }
- }
+ _audioIdent->update( dt );
}
FGNavRecord* FGNavRadio::findPrimaryNavaid(const SGGeod& aPos, double aFreqMHz)
{
- FGNavRecord* nav = globals->get_navlist()->findByFreq(aFreqMHz, aPos);
- if (nav) {
- return nav;
- }
-
- return globals->get_loclist()->findByFreq(aFreqMHz, aPos);
+ return FGNavList::findByFreq(aFreqMHz, aPos, FGNavList::navFilter());
}
-// Update current nav/adf radio stations based on current postition
+// Update current nav/adf radio stations based on current position
void FGNavRadio::search()
{
+ // set delay for next search
_time_before_search_sec = 1.0;
- SGGeod pos = SGGeod::fromDegFt(lon_node->getDoubleValue(),
- lat_node->getDoubleValue(), alt_node->getDoubleValue());
+
double freq = freq_node->getDoubleValue();
-
- FGNavRecord* nav = findPrimaryNavaid(pos, freq);
- if (nav == _navaid) {
- return; // found the same as last search, we're done
+
+ // immediate NAV search when frequency has changed (toggle between nav and g/s search otherwise)
+ _nav_search |= (_last_freq != freq);
+
+ // do we need to search a new NAV station in this iteration?
+ if (_nav_search)
+ {
+ _last_freq = freq;
+ FGNavRecord* nav = findPrimaryNavaid(globals->get_aircraft_position(), freq);
+ if (nav == _navaid) {
+ if (nav && (nav->type() != FGPositioned::VOR))
+ _nav_search = false; // search glideslope on next iteration
+ return; // nav hasn't changed, we're done
+ }
+ // remember new navaid station
+ _navaid = nav;
}
-
- _navaid = nav;
- char identBuffer[5] = " ";
+
+ // search glideslope station
+ if ((_navaid.valid()) && (_navaid->type() != FGPositioned::VOR))
+ {
+ FGNavList::TypeFilter gsFilter(FGPositioned::GS);
+ FGNavRecord* gs = FGNavList::findByFreq(freq, globals->get_aircraft_position(),
+ &gsFilter);
+ if ((!_nav_search) && (gs == _gs))
+ {
+ _nav_search = true; // search NAV on next iteration
+ return; // g/s hasn't changed, neither has nav - we're done
+ }
+ // remember new glideslope station
+ _gs = gs;
+ }
+
+ _nav_search = true; // search NAV on next iteration
+
+ // nav or gs station has changed
+ updateNav();
+}
+
+// Update current nav/adf/glideslope outputs when station has changed
+void FGNavRadio::updateNav()
+{
+ // update necessary, nav and/or gs has changed
+ FGNavRecord* nav = _navaid;
+ string identBuffer(4, ' ');
if (nav) {
- FGNavRecord* dme = globals->get_dmelist()->findByFreq(freq, pos);
- has_dme = (dme != NULL);
-
nav_id_node->setStringValue(nav->get_ident());
- strncpy(identBuffer, nav->ident().c_str(), 5);
+ identBuffer = simgear::strutils::rpad( nav->ident(), 4, ' ' );
- effective_range = adjustNavRange(nav->get_elev_ft(), pos.getElevationM(), nav->get_range());
+ effective_range = adjustNavRange(nav->get_elev_ft(), globals->get_aircraft_position().getElevationM(), nav->get_range());
loc_node->setBoolValue(nav->type() != FGPositioned::VOR);
twist = nav->get_multiuse();
if (nav->type() == FGPositioned::VOR) {
target_radial = sel_radial_node->getDoubleValue();
_gs = NULL;
- has_gs_node->setBoolValue(false);
} else { // ILS or LOC
- _gs = globals->get_gslist()->findByFreq(freq, pos);
- has_gs_node->setBoolValue(_gs != NULL);
- _localizerWidth = localizerWidth(nav);
+ _localizerWidth = nav->localizerWidth();
twist = 0.0;
- effective_range = nav->get_range();
+ effective_range = nav->get_range();
target_radial = nav->get_multiuse();
SG_NORMALIZE_RANGE(target_radial, 0.0, 360.0);
-
+
if (_gs) {
int tmp = (int)(_gs->get_multiuse() / 1000.0);
target_gs = (double)tmp / 100.0;
-
- // GS axis unit tangent vector
- // (along the runway)
+
+ double gs_radial = fmod(_gs->get_multiuse(), 1000.0);
+ SG_NORMALIZE_RANGE(gs_radial, 0.0, 360.0);
_gsCart = _gs->cart();
- _gsAxis = tangentVector(_gs->geod(), _gsCart, target_radial);
+
+ // GS axis unit tangent vector
+ // (along the runway):
+ _gsAxis = tangentVector(_gs->geod(), gs_radial);
// GS baseline unit tangent vector
- // (perpendicular to the runay along the ground)
- SGVec3d baseline = tangentVector(_gs->geod(), _gsCart, target_radial + 90.0);
- _gsVertical = cross(baseline, _gsAxis);
+ // (transverse to the runway along the ground)
+ _gsBaseline = tangentVector(_gs->geod(), gs_radial + 90.0);
+ _gsVertical = cross(_gsBaseline, _gsAxis);
} // of have glideslope
} // of found LOC or ILS
- audioNavidChanged();
} else { // found nothing
_gs = NULL;
nav_id_node->setStringValue("");
- has_dme = false;
- globals->get_soundmgr()->remove( nav_fx_name );
- globals->get_soundmgr()->remove( dme_fx_name );
+ loc_node->setBoolValue(false);
+ _audioIdent->setIdent("", 0.0 );
}
+ has_gs_node->setBoolValue(_gs != NULL);
is_valid_node->setBoolValue(nav != NULL);
id_c1_node->setIntValue( (int)identBuffer[0] );
id_c2_node->setIntValue( (int)identBuffer[1] );
id_c3_node->setIntValue( (int)identBuffer[2] );
id_c4_node->setIntValue( (int)identBuffer[3] );
}
-
-double FGNavRadio::localizerWidth(FGNavRecord* aLOC)
-{
- FGRunway* rwy = aLOC->runway();
- assert(rwy);
-
- SGVec3d thresholdCart(SGVec3d::fromGeod(rwy->threshold()));
- double axisLength = dist(aLOC->cart(), thresholdCart);
- double landingLength = dist(thresholdCart, SGVec3d::fromGeod(rwy->end()));
-
-// Reference: http://dcaa.slv.dk:8000/icaodocs/
-// ICAO standard width at threshold is 210 m = 689 feet = approx 700 feet.
-// ICAO 3.1.1 half course = DDM = 0.0775
-// ICAO 3.1.3.7.1 Sensitivity 0.00145 DDM/m at threshold
-// implies peg-to-peg of 214 m ... we will stick with 210.
-// ICAO 3.1.3.7.1 "Course sector angle shall not exceed 6 degrees."
-
-// Very short runway: less than 1200 m (4000 ft) landing length:
- if (landingLength < 1200.0) {
-// ICAO fudges localizer sensitivity for very short runways.
-// This produces a non-monotonic sensitivity-versus length relation.
- axisLength += 1050.0;
- }
-
-// Example: very short: San Diego KMYF (Montgomery Field) ILS RWY 28R
-// Example: short: Tom's River KMJX (Robert J. Miller) ILS RWY 6
-// Example: very long: Denver KDEN (Denver) ILS RWY 16R
- double raw_width = 210.0 / axisLength * SGD_RADIANS_TO_DEGREES;
- return raw_width < 6.0? raw_width : 6.0;
-}
-
-void FGNavRadio::audioNavidChanged()
-{
- if ( globals->get_soundmgr()->exists(nav_fx_name)) {
- globals->get_soundmgr()->remove(nav_fx_name);
- }
-
- try {
- string trans_ident(_navaid->get_trans_ident());
- SGSoundSample* sound = morse.make_ident(trans_ident, LO_FREQUENCY);
- sound->set_volume( 0.3 );
- if (!globals->get_soundmgr()->add( sound, nav_fx_name )) {
- SG_LOG(SG_COCKPIT, SG_WARN, "Failed to add v1-vor-ident sound");
- }
-
- if ( globals->get_soundmgr()->exists( dme_fx_name ) ) {
- globals->get_soundmgr()->remove( dme_fx_name );
- }
-
- sound = morse.make_ident( trans_ident, HI_FREQUENCY );
- sound->set_volume( 0.3 );
- globals->get_soundmgr()->add( sound, dme_fx_name );
-
- int offset = (int)(sg_random() * 30.0);
- play_count = offset / 4;
- last_time = globals->get_time_params()->get_cur_time() - offset;
- } catch (sg_io_exception& e) {
- SG_LOG(SG_GENERAL, SG_ALERT, e.getFormattedMessage());
- }
-}