X-Git-Url: https://git.mxchange.org/?a=blobdiff_plain;f=src%2FMain%2Ffg_props.cxx;h=2c93ad36cb47de433224de253cadc54726b0239e;hb=09d4176e963be04dec40943083e369081b8f7a18;hp=8f8d42bfef2f36281c7a3235034c99ba71bdef43;hpb=a54e10ac12300a98807374d5278eabb938ec40c0;p=flightgear.git

diff --git a/src/Main/fg_props.cxx b/src/Main/fg_props.cxx
index 8f8d42bfe..2c93ad36c 100644
--- a/src/Main/fg_props.cxx
+++ b/src/Main/fg_props.cxx
@@ -24,148 +24,260 @@
 #  include <simgear/compiler.h>
 #endif
 
+#include <simgear/structure/exception.hxx>
+#include <simgear/magvar/magvar.hxx>
+#include <simgear/timing/sg_time.hxx>
+#include <simgear/misc/sg_path.hxx>
+#include <simgear/scene/material/matlib.hxx>
+#include <simgear/sound/soundmgr_openal.hxx>
+
 #include STL_IOSTREAM
 
-#include <Autopilot/newauto.hxx>
+#include <ATC/ATCdisplay.hxx>
 #include <Aircraft/aircraft.hxx>
 #include <Time/tmp.hxx>
 #include <FDM/UIUCModel/uiuc_aircraftdir.h>
-#ifndef FG_OLD_WEATHER
-#  include <WeatherCM/FGLocalWeatherDatabase.h>
-#else
-#  include <Weather/weather.hxx>
-#endif
+#include <Environment/environment.hxx>
 
-#include "fgfs.hxx"
+#include <GUI/gui.h>
+
+#include "globals.hxx"
 #include "fg_props.hxx"
 
-#if !defined(SG_HAVE_NATIVE_SGI_COMPILERS)
 SG_USING_STD(istream);
 SG_USING_STD(ostream);
-#endif
 
-#define DEFAULT_AP_HEADING_LOCK FGAutopilot::FG_DG_HEADING_LOCK
+static bool winding_ccw = true; // FIXME: temporary
+
+static bool fdm_data_logging = false; // FIXME: temporary
 
-static double getWindNorth ();
-static double getWindEast ();
-static double getWindDown ();
+static bool frozen = false;	// FIXME: temporary
+
+
+
+////////////////////////////////////////////////////////////////////////
+// Default property bindings (not yet handled by any module).
+////////////////////////////////////////////////////////////////////////
+
+struct LogClassMapping {
+  sgDebugClass c;
+  string name;
+  LogClassMapping(sgDebugClass cc, string nname) { c = cc; name = nname; }
+};
+
+LogClassMapping log_class_mappings [] = {
+  LogClassMapping(SG_NONE, "none"),
+  LogClassMapping(SG_TERRAIN, "terrain"),
+  LogClassMapping(SG_ASTRO, "astro"),
+  LogClassMapping(SG_FLIGHT, "flight"),
+  LogClassMapping(SG_INPUT, "input"),
+  LogClassMapping(SG_GL, "gl"),
+  LogClassMapping(SG_VIEW, "view"),
+  LogClassMapping(SG_COCKPIT, "cockpit"),
+  LogClassMapping(SG_GENERAL, "general"),
+  LogClassMapping(SG_MATH, "math"),
+  LogClassMapping(SG_EVENT, "event"),
+  LogClassMapping(SG_AIRCRAFT, "aircraft"),
+  LogClassMapping(SG_AUTOPILOT, "autopilot"),
+  LogClassMapping(SG_IO, "io"),
+  LogClassMapping(SG_CLIPPER, "clipper"),
+  LogClassMapping(SG_NETWORK, "network"),
+  LogClassMapping(SG_UNDEFD, "")
+};
+
+
+/**
+ * Get the logging classes.
+ */
+static const char *
+getLoggingClasses ()
+{
+  sgDebugClass classes = logbuf::get_log_classes();
+  static string result = "";	// FIXME
+  for (int i = 0; log_class_mappings[i].c != SG_UNDEFD; i++) {
+    if ((classes&log_class_mappings[i].c) > 0) {
+      if (!result.empty())
+	result += '|';
+      result += log_class_mappings[i].name;
+    }
+  }
+  return result.c_str();
+}
+
+
+static void
+addLoggingClass (const string &name)
+{
+  sgDebugClass classes = logbuf::get_log_classes();
+  for (int i = 0; log_class_mappings[i].c != SG_UNDEFD; i++) {
+    if (name == log_class_mappings[i].name) {
+      logbuf::set_log_classes(sgDebugClass(classes|log_class_mappings[i].c));
+      return;
+    }
+  }
+  SG_LOG(SG_GENERAL, SG_WARN, "Unknown logging class: " << name);
+}
 
-// Allow the view to be set from two axes (i.e. a joystick hat)
-// This needs to be in FGViewer itself, somehow.
-static double axisLong = 0.0;
-static double axisLat = 0.0;
 
 /**
- * Utility function.
+ * Set the logging classes.
  */
-static inline void
-_set_view_from_axes ()
+static void
+setLoggingClasses (const char * c)
 {
-				// Take no action when hat is centered
-  if (axisLong == 0 && axisLat == 0)
+  string classes = c;
+  logbuf::set_log_classes(SG_NONE);
+
+  if (classes == "none") {
+    SG_LOG(SG_GENERAL, SG_INFO, "Disabled all logging classes");
     return;
+  }
 
-  double viewDir = 0;
-
-  if (axisLong < 0) {		// Longitudinal axis forward
-    if (axisLat < 0)
-      viewDir = 45;
-    else if (axisLat > 0)
-      viewDir = 315;
-    else
-      viewDir = 0;
-  } else if (axisLong > 0) {	// Longitudinal axis backward
-    if (axisLat < 0)
-      viewDir = 135;
-    else if (axisLat > 0)
-      viewDir = 225;
-    else
-      viewDir = 180;
-  } else {			// Longitudinal axis neutral
-    if (axisLat < 0)
-      viewDir = 90;
-    else
-      viewDir = 270;
+  if (classes.empty() || classes == "all") { // default
+    logbuf::set_log_classes(SG_ALL);
+    SG_LOG(SG_GENERAL, SG_INFO, "Enabled all logging classes: "
+	   << getLoggingClasses());
+    return;
   }
 
-  globals->get_current_view()->set_goal_view_offset(viewDir*SGD_DEGREES_TO_RADIANS);
-//   globals->get_current_view()->set_view_offset(viewDir*SGD_DEGREES_TO_RADIANS);
+  string rest = classes;
+  string name = "";
+  int sep = rest.find('|');
+  while (sep > 0) {
+    name = rest.substr(0, sep);
+    rest = rest.substr(sep+1);
+    addLoggingClass(name);
+    sep = rest.find('|');
+  }
+  addLoggingClass(rest);
+  SG_LOG(SG_GENERAL, SG_INFO, "Set logging classes to "
+	 << getLoggingClasses());
 }
 
-
-////////////////////////////////////////////////////////////////////////
-// Default property bindings (not yet handled by any module).
-////////////////////////////////////////////////////////////////////////
 
 /**
- * Return the current aircraft directory (UIUC) as a string.
+ * Get the logging priority.
  */
-static string 
-getAircraftDir ()
+static const char *
+getLoggingPriority ()
 {
-  return aircraft_dir;
+  switch (logbuf::get_log_priority()) {
+  case SG_BULK:
+    return "bulk";
+  case SG_DEBUG:
+    return "debug";
+  case SG_INFO:
+    return "info";
+  case SG_WARN:
+    return "warn";
+  case SG_ALERT:
+    return "alert";
+  default:
+    SG_LOG(SG_GENERAL, SG_WARN, "Internal: Unknown logging priority number: "
+	   << logbuf::get_log_priority());
+    return "unknown";
+  }
 }
 
 
 /**
- * Set the current aircraft directory (UIUC).
+ * Set the logging priority.
  */
 static void
-setAircraftDir (string dir)
-{
-  if (getAircraftDir() != dir) {
-    aircraft_dir = dir;
-//     needReinit(); FIXME!!
+setLoggingPriority (const char * p)
+{
+  if (p == 0)
+      return;
+  string priority = p;
+  if (priority == "bulk") {
+    logbuf::set_log_priority(SG_BULK);
+  } else if (priority == "debug") {
+    logbuf::set_log_priority(SG_DEBUG);
+  } else if (priority.empty() || priority == "info") { // default
+    logbuf::set_log_priority(SG_INFO);
+  } else if (priority == "warn") {
+    logbuf::set_log_priority(SG_WARN);
+  } else if (priority == "alert") {
+    logbuf::set_log_priority(SG_ALERT);
+  } else {
+    SG_LOG(SG_GENERAL, SG_WARN, "Unknown logging priority " << priority);
   }
+  SG_LOG(SG_GENERAL, SG_DEBUG, "Logging priority is " << getLoggingPriority());
 }
 
 
 /**
- * Get the current view offset in degrees.
+ * Return the current frozen state.
  */
-static double
-getViewOffset ()
+static bool
+getFreeze ()
 {
-  return (globals->get_current_view()
-	  ->get_view_offset() * SGD_RADIANS_TO_DEGREES);
+  return frozen;
 }
 
 
+/**
+ * Set the current frozen state.
+ */
 static void
-setViewOffset (double offset)
-{
-  globals->get_current_view()->set_view_offset(offset * SGD_DEGREES_TO_RADIANS);
+setFreeze (bool f)
+{
+    frozen = f;
+
+    // Stop sound on a pause
+    SGSoundMgr *s = globals->get_soundmgr();
+    if ( s != NULL ) {
+        if ( f ) {
+            s->pause();
+        } else {
+            s->resume();
+        }
+    }
 }
 
-static double
-getGoalViewOffset ()
+
+/**
+ * Return the current aircraft directory (UIUC) as a string.
+ */
+static const char *
+getAircraftDir ()
 {
-  return (globals->get_current_view()
-	  ->get_goal_view_offset() * SGD_RADIANS_TO_DEGREES);
+  return aircraft_dir.c_str();
 }
 
+
+/**
+ * Set the current aircraft directory (UIUC).
+ */
 static void
-setGoalViewOffset (double offset)
+setAircraftDir (const char * dir)
+{
+  aircraft_dir = dir;
+}
+
+
+/**
+ * Return the number of milliseconds elapsed since simulation started.
+ */
+static double
+getElapsedTime_sec ()
 {
-  globals->get_current_view()
-    ->set_goal_view_offset(offset * SGD_DEGREES_TO_RADIANS);
+  return globals->get_sim_time_sec();
 }
 
 
 /**
  * Return the current Zulu time.
  */
-static string 
+static const char *
 getDateString ()
 {
-  string out;
-  char buf[64];
+  static char buf[64];		// FIXME
   struct tm * t = globals->get_time_params()->getGmt();
   sprintf(buf, "%.4d-%.2d-%.2dT%.2d:%.2d:%.2d",
 	  t->tm_year + 1900, t->tm_mon + 1, t->tm_mday,
 	  t->tm_hour, t->tm_min, t->tm_sec);
-  out = buf;
-  return out;
+  return buf;
 }
 
 
@@ -173,15 +285,18 @@ getDateString ()
  * Set the current Zulu time.
  */
 static void
-setDateString (string date_string)
+setDateString (const char * date_string)
 {
+  static const SGPropertyNode *cur_time_override
+	= fgGetNode("/sim/time/cur-time-override", true);
+
   SGTime * st = globals->get_time_params();
   struct tm * current_time = st->getGmt();
   struct tm new_time;
 
 				// Scan for basic ISO format
 				// YYYY-MM-DDTHH:MM:SS
-  int ret = sscanf(date_string.c_str(), "%d-%d-%dT%d:%d:%d",
+  int ret = sscanf(date_string, "%d-%d-%dT%d:%d:%d",
 		   &(new_time.tm_year), &(new_time.tm_mon),
 		   &(new_time.tm_mday), &(new_time.tm_hour),
 		   &(new_time.tm_min), &(new_time.tm_sec));
@@ -191,7 +306,7 @@ setDateString (string date_string)
 				// if the save file has been edited
 				// by hand.
   if (ret != 6) {
-    SG_LOG(SG_INPUT, SG_ALERT, "Date/time string " << date_string
+    SG_LOG(SG_INPUT, SG_WARN, "Date/time string " << date_string
 	   << " not in YYYY-MM-DDTHH:MM:SS format; skipped");
     return;
   }
@@ -209,23 +324,21 @@ setDateString (string date_string)
   double lon = current_aircraft.fdm_state->get_Longitude();
   double lat = current_aircraft.fdm_state->get_Latitude();
   globals->set_warp(warp);
-  st->update(lon, lat, warp);
-  fgUpdateSkyAndLightingParams();
+  st->update(lon, lat, cur_time_override->getLongValue(), warp);
 }
 
 /**
  * Return the GMT as a string.
  */
-static string 
+static const char *
 getGMTString ()
 {
-  string out;
-  char buf[16];
-  struct tm * t = globals->get_time_params()->getGmt();
+  static char buf[16];		// FIXME
+  struct tm *t = globals->get_time_params()->getGmt();
   sprintf(buf, " %.2d:%.2d:%.2d",
 	  t->tm_hour, t->tm_min, t->tm_sec);
-  out = buf;
-  return out;
+  // cout << t << " " << buf << endl;
+  return buf;
 }
 
 /**
@@ -254,593 +367,413 @@ getMagDip ()
 static double
 getHeadingMag ()
 {
-  return current_aircraft.fdm_state->get_Psi() * SGD_RADIANS_TO_DEGREES - getMagVar();
+  double magheading;
+  magheading = current_aircraft.fdm_state->get_Psi() * SGD_RADIANS_TO_DEGREES - getMagVar();
+  if (magheading < 0) magheading += 360;
+  return magheading;
 }
 
-
-/**
- * Return the current engine0 rpm
- */
-static double
-getRPM ()
-{
-  if ( current_aircraft.fdm_state->get_engine(0) != NULL ) {
-      return current_aircraft.fdm_state->get_engine(0)->get_RPM();
-  } else {
-      return 0.0;
-  }
-}
-
-
-/**
- * Return the current engine0 EGT.
- */
-static double
-getEGT ()
+static long
+getWarp ()
 {
-  if ( current_aircraft.fdm_state->get_engine(0) != NULL ) {
-      return current_aircraft.fdm_state->get_engine(0)->get_EGT();
-  } else {
-      return 0.0;
-  }
+  return globals->get_warp();
 }
 
-/**
- * Return the current engine0 CHT.
- */
-static double
-getCHT ()
+static void
+setWarp (long warp)
 {
-  if ( current_aircraft.fdm_state->get_engine(0) != NULL ) {
-      return current_aircraft.fdm_state->get_engine(0)->get_CHT();
-  } else {
-      return 0.0;
-  }
+  globals->set_warp(warp);
 }
 
-/**
- * Return the current engine0 Manifold Pressure.
- */
-static double
-getMP ()
+static long
+getWarpDelta ()
 {
-  if ( current_aircraft.fdm_state->get_engine(0) != NULL ) {
-      return current_aircraft.fdm_state->get_engine(0)->get_Manifold_Pressure();
-  } else {
-      return 0.0;
-  }
+  return globals->get_warp_delta();
 }
 
-
-/**
- * Return the current engine0 fuel flow
- */
-static double
-getFuelFlow ()
+static void
+setWarpDelta (long delta)
 {
-  if ( current_aircraft.fdm_state->get_engine(0) != NULL ) {
-      return current_aircraft.fdm_state->get_engine(0)->get_Fuel_Flow();
-  } else {
-      return 0.0;
-  }
+  globals->set_warp_delta(delta);
 }
 
-/**
- * Return the fuel level in tank 1
- */
-static double
-getTank1Fuel ()
+static bool
+getWindingCCW ()
 {
-  return current_aircraft.fdm_state->get_Tank1Fuel();
+  return winding_ccw;
 }
 
 static void
-setTank1Fuel ( double gals )
+setWindingCCW (bool state)
 {
-  current_aircraft.fdm_state->set_Tank1Fuel( gals );
+  winding_ccw = state;
+  if ( winding_ccw )
+    glFrontFace ( GL_CCW );
+  else
+    glFrontFace ( GL_CW );
 }
 
-/**
- * Return the fuel level in tank 2
- */
-static double
-getTank2Fuel ()
+static bool
+getFullScreen ()
 {
-  return current_aircraft.fdm_state->get_Tank2Fuel();
+#if defined(FX) && !defined(WIN32)
+  return globals->get_fullscreen();
+#else
+  return false;
+#endif
 }
 
 static void
-setTank2Fuel ( double gals )
+setFullScreen (bool state)
 {
-  current_aircraft.fdm_state->set_Tank2Fuel( gals );
+#if defined(FX) && !defined(WIN32)
+  globals->set_fullscreen(state);
+#  if defined(XMESA_FX_FULLSCREEN) && defined(XMESA_FX_WINDOW)
+  XMesaSetFXmode( state ? XMESA_FX_FULLSCREEN : XMESA_FX_WINDOW );
+#  endif
+#endif
 }
 
-
-/**
- * Get the autopilot altitude lock (true=on).
- */
 static bool
-getAPAltitudeLock ()
+getFDMDataLogging ()
 {
-    return current_autopilot->get_AltitudeEnabled();
+  return fdm_data_logging;
 }
 
-
-/**
- * Set the autopilot altitude lock (true=on).
- */
 static void
-setAPAltitudeLock (bool lock)
+setFDMDataLogging (bool state)
 {
-  current_autopilot->set_AltitudeMode(FGAutopilot::FG_ALTITUDE_LOCK);
-  current_autopilot->set_AltitudeEnabled(lock);
+				// kludge; no getter or setter available
+  if (state != fdm_data_logging) {
+    fgToggleFDMdataLogging();
+    fdm_data_logging = state;
+  }
 }
 
-/**
- * Get the autopilot target altitude in feet.
- */
-static double
-getAPAltitude ()
+
+////////////////////////////////////////////////////////////////////////
+// Tie the properties.
+////////////////////////////////////////////////////////////////////////
+
+FGProperties::FGProperties ()
 {
-  return current_autopilot->get_TargetAltitude() * SG_METER_TO_FEET;
 }
 
-
-/**
- * Set the autopilot target altitude in feet.
- */
-static void
-setAPAltitude (double altitude)
+FGProperties::~FGProperties ()
 {
-    current_autopilot->set_TargetAltitude( altitude * SG_FEET_TO_METER );
 }
 
-/**
- * Get the autopilot altitude lock (true=on).
- */
-static bool
-getAPGSLock ()
+void
+FGProperties::init ()
 {
-    return current_autopilot->get_AltitudeEnabled();
 }
 
-
-/**
- * Set the autopilot altitude lock (true=on).
- */
-static void
-setAPGSLock (bool lock)
+void
+FGProperties::bind ()
 {
-  current_autopilot->set_AltitudeMode(FGAutopilot::FG_ALTITUDE_GS1);
-  current_autopilot->set_AltitudeEnabled(lock);
-}
+				// Simulation
+  fgTie("/sim/logging/priority", getLoggingPriority, setLoggingPriority);
+  fgTie("/sim/logging/classes", getLoggingClasses, setLoggingClasses);
+  fgTie("/sim/freeze/master", getFreeze, setFreeze);
+  fgTie("/sim/aircraft-dir", getAircraftDir, setAircraftDir);
 
+  fgTie("/sim/time/elapsed-sec", getElapsedTime_sec);
+  fgTie("/sim/time/gmt", getDateString, setDateString);
+  fgSetArchivable("/sim/time/gmt");
+  fgTie("/sim/time/gmt-string", getGMTString);
 
-/**
- * Get the autopilot target altitude in feet.
- */
-static double
-getAPClimb ()
-{
-  return current_autopilot->get_TargetClimbRate() * SG_METER_TO_FEET;
-}
+				// Orientation
+  fgTie("/orientation/heading-magnetic-deg", getHeadingMag);
 
+  fgTie("/environment/magnetic-variation-deg", getMagVar);
+  fgTie("/environment/magnetic-dip-deg", getMagDip);
 
-/**
- * Set the autopilot target altitude in feet.
- */
-static void
-setAPClimb (double rate)
-{
-    current_autopilot->set_TargetClimbRate( rate * SG_FEET_TO_METER );
-}
+  fgTie("/sim/time/warp", getWarp, setWarp, false);
+  fgTie("/sim/time/warp-delta", getWarpDelta, setWarpDelta);
 
+				// Misc. Temporary junk.
+  fgTie("/sim/temp/winding-ccw", getWindingCCW, setWindingCCW, false);
+  fgTie("/sim/temp/full-screen", getFullScreen, setFullScreen);
+  fgTie("/sim/temp/fdm-data-logging", getFDMDataLogging, setFDMDataLogging);
+}
 
-/**
- * Get the autopilot heading lock (true=on).
- */
-static bool
-getAPHeadingLock ()
+void
+FGProperties::unbind ()
 {
-    return
-      (current_autopilot->get_HeadingEnabled() &&
-       current_autopilot->get_HeadingMode() == DEFAULT_AP_HEADING_LOCK);
-}
+				// Simulation
+  fgUntie("/sim/logging/priority");
+  fgUntie("/sim/logging/classes");
+  fgUntie("/sim/freeze/master");
+  fgUntie("/sim/aircraft-dir");
 
+  fgUntie("/sim/time/elapsed-sec");
+  fgUntie("/sim/time/gmt");
+  fgUntie("/sim/time/gmt-string");
 
-/**
- * Set the autopilot heading lock (true=on).
- */
-static void
-setAPHeadingLock (bool lock)
-{
-    if (lock) {
-	current_autopilot->set_HeadingMode(DEFAULT_AP_HEADING_LOCK);
-	current_autopilot->set_HeadingEnabled(true);
-    } else {
-	current_autopilot->set_HeadingEnabled(false);
-    }
-}
+				// Orientation
+  fgUntie("/orientation/heading-magnetic-deg");
 
+				// Environment
+  fgUntie("/environment/magnetic-variation-deg");
+  fgUntie("/environment/magnetic-dip-deg");
 
-/**
- * Get the autopilot heading bug in degrees.
- */
-static double
-getAPHeadingBug ()
-{
-  return current_autopilot->get_DGTargetHeading();
-}
+  fgUntie("/sim/time/warp");
+  fgUntie("/sim/time/warp-delta");
 
+				// Misc. Temporary junk.
+  fgUntie("/sim/temp/winding-ccw");
+  fgUntie("/sim/temp/full-screen");
+  fgUntie("/sim/temp/fdm-data-logging");
+}
 
-/**
- * Set the autopilot heading bug in degrees.
- */
-static void
-setAPHeadingBug (double heading)
+void
+FGProperties::update (double dt)
 {
-  current_autopilot->set_DGTargetHeading( heading );
-}
+                                // Date and time
+    struct tm * t = globals->get_time_params()->getGmt();
 
+    fgSetInt("/sim/time/utc/year", t->tm_year + 1900);
+    fgSetInt("/sim/time/utc/month", t->tm_mon + 1);
+    fgSetInt("/sim/time/utc/day", t->tm_mday);
+    fgSetInt("/sim/time/utc/hour", t->tm_hour);
+    fgSetInt("/sim/time/utc/minute", t->tm_min);
+    fgSetInt("/sim/time/utc/second", t->tm_sec);
 
-/**
- * Get the autopilot wing leveler lock (true=on).
- */
-static bool
-getAPWingLeveler ()
-{
-    return
-      (current_autopilot->get_HeadingEnabled() &&
-       current_autopilot->get_HeadingMode() == FGAutopilot::FG_TC_HEADING_LOCK);
+    fgSetDouble("/sim/time/utc/day-seconds",
+                t->tm_hour * 3600 +
+                t->tm_min * 60 +
+                t->tm_sec);
 }
 
 
-/**
- * Set the autopilot wing leveler lock (true=on).
- */
-static void
-setAPWingLeveler (bool lock)
-{
-    if (lock) {
-	current_autopilot->set_HeadingMode(FGAutopilot::FG_TC_HEADING_LOCK);
-	current_autopilot->set_HeadingEnabled(true);
-    } else {
-	current_autopilot->set_HeadingEnabled(false);
-    }
-}
+
+////////////////////////////////////////////////////////////////////////
+// Save and restore.
+////////////////////////////////////////////////////////////////////////
+
 
 /**
- * Return true if the autopilot is locked to NAV1.
+ * Save the current state of the simulator to a stream.
  */
-static bool
-getAPNAV1Lock ()
+bool
+fgSaveFlight (ostream &output, bool write_all)
 {
-  return
-    (current_autopilot->get_HeadingEnabled() &&
-     current_autopilot->get_HeadingMode() == FGAutopilot::FG_HEADING_NAV1);
-}
 
+  fgSetBool("/sim/presets/onground", false);
+  fgSetArchivable("/sim/presets/onground");
+  fgSetBool("/sim/presets/trim", false);
+  fgSetArchivable("/sim/presets/trim");
+  fgSetString("/sim/presets/speed-set", "UVW");
+  fgSetArchivable("/sim/presets/speed-set");
 
-/**
- * Set the autopilot NAV1 lock.
- */
-static void
-setAPNAV1Lock (bool lock)
-{
-  if (lock) {
-    current_autopilot->set_HeadingMode(FGAutopilot::FG_HEADING_NAV1);
-    current_autopilot->set_HeadingEnabled(true);
-  } else if (current_autopilot->get_HeadingMode() ==
-	     FGAutopilot::FG_HEADING_NAV1) {
-    current_autopilot->set_HeadingEnabled(false);
+  try {
+    writeProperties(output, globals->get_props(), write_all);
+  } catch (const sg_exception &e) {
+    guiErrorMessage("Error saving flight: ", e);
+    return false;
   }
-}
-
-/**
- * Get the autopilot autothrottle lock.
- */
-static bool
-getAPAutoThrottleLock ()
-{
-  return current_autopilot->get_AutoThrottleEnabled();
+  return true;
 }
 
 
 /**
- * Set the autothrottle lock.
+ * Restore the current state of the simulator from a stream.
  */
-static void
-setAPAutoThrottleLock (bool lock)
+bool
+fgLoadFlight (istream &input)
 {
-  current_autopilot->set_AutoThrottleEnabled(lock);
-}
+  SGPropertyNode props;
+  try {
+    readProperties(input, &props);
+  } catch (const sg_exception &e) {
+    guiErrorMessage("Error reading saved flight: ", e);
+    return false;
+  }
 
+  fgSetBool("/sim/presets/onground", false);
+  fgSetBool("/sim/presets/trim", false);
+  fgSetString("/sim/presets/speed-set", "UVW");
 
-// kludge
-static double
-getAPRudderControl ()
-{
-    if (getAPHeadingLock())
-        return current_autopilot->get_TargetHeading();
-    else
-        return controls.get_rudder();
+  copyProperties(&props, globals->get_props());
+  // When loading a flight, make it the
+  // new initial state.
+  globals->saveInitialState();
+  return true;
 }
 
-// kludge
-static void
-setAPRudderControl (double value)
+
+bool
+fgLoadProps (const char * path, SGPropertyNode * props, bool in_fg_root)
 {
-    if (getAPHeadingLock()) {
-        SG_LOG(SG_GENERAL, SG_DEBUG, "setAPRudderControl " << value );
-        value -= current_autopilot->get_TargetHeading();
-        current_autopilot->HeadingAdjust(value < 0.0 ? -1.0 : 1.0);
+    string fullpath;
+    if (in_fg_root) {
+        SGPath loadpath(globals->get_fg_root());
+        loadpath.append(path);
+        fullpath = loadpath.str();
     } else {
-        controls.set_rudder(value);
+        fullpath = path;
     }
+
+    try {
+        readProperties(fullpath, props);
+    } catch (const sg_exception &e) {
+        guiErrorMessage("Error reading properties: ", e);
+        return false;
+    }
+    return true;
 }
 
-// kludge
-static double
-getAPElevatorControl ()
+
+
+////////////////////////////////////////////////////////////////////////
+// Property convenience functions.
+////////////////////////////////////////////////////////////////////////
+
+SGPropertyNode *
+fgGetNode (const char * path, bool create)
 {
-  if (getAPAltitudeLock())
-      return current_autopilot->get_TargetAltitude();
-  else
-    return controls.get_elevator();
+  return globals->get_props()->getNode(path, create);
 }
 
-// kludge
-static void
-setAPElevatorControl (double value)
+SGPropertyNode * 
+fgGetNode (const char * path, int index, bool create)
 {
-    if (getAPAltitudeLock()) {
-        SG_LOG(SG_GENERAL, SG_DEBUG, "setAPElevatorControl " << value );
-        value -= current_autopilot->get_TargetAltitude();
-        current_autopilot->AltitudeAdjust(value < 0.0 ? 100.0 : -100.0);
-    } else {
-        controls.set_elevator(value);
-    }
+  return globals->get_props()->getNode(path, index, create);
 }
 
-// kludge
-static double
-getAPThrottleControl ()
+bool
+fgHasNode (const char * path)
 {
-  if (getAPAutoThrottleLock())
-    return 0.0;			// always resets
-  else
-    return controls.get_throttle(0);
+  return (fgGetNode(path, false) != 0);
 }
 
-// kludge
-static void
-setAPThrottleControl (double value)
+void
+fgAddChangeListener (SGPropertyChangeListener * listener, const char * path)
 {
-  if (getAPAutoThrottleLock())
-    current_autopilot->AutoThrottleAdjust(value < 0.0 ? -0.01 : 0.01);
-  else
-    controls.set_throttle(0, value);
+  fgGetNode(path, true)->addChangeListener(listener);
 }
 
-
-/**
- * Get the current visibility (meters).
- */
-static double
-getVisibility ()
+void
+fgAddChangeListener (SGPropertyChangeListener * listener,
+		     const char * path, int index)
 {
-#ifndef FG_OLD_WEATHER
-  return WeatherDatabase->getWeatherVisibility();
-#else
-  return current_weather.get_visibility();
-#endif
+  fgGetNode(path, index, true)->addChangeListener(listener);
 }
 
-
-/**
- * Set the current visibility (meters).
- */
-static void
-setVisibility (double visibility)
+bool
+fgGetBool (const char * name, bool defaultValue)
 {
-#ifndef FG_OLD_WEATHER
-  WeatherDatabase->setWeatherVisibility(visibility);
-#else
-  current_weather.set_visibility(visibility);
-#endif
+  return globals->get_props()->getBoolValue(name, defaultValue);
 }
 
-/**
- * Get the current wind north velocity (feet/second).
- */
-static double
-getWindNorth ()
+int
+fgGetInt (const char * name, int defaultValue)
 {
-  return current_aircraft.fdm_state->get_V_north_airmass();
+  return globals->get_props()->getIntValue(name, defaultValue);
 }
 
-
-/**
- * Set the current wind north velocity (feet/second).
- */
-static void
-setWindNorth (double speed)
+int
+fgGetLong (const char * name, long defaultValue)
 {
-  current_aircraft.fdm_state
-    ->set_Velocities_Local_Airmass(speed, getWindEast(), getWindDown());
+  return globals->get_props()->getLongValue(name, defaultValue);
 }
 
-
-/**
- * Get the current wind east velocity (feet/second).
- */
-static double
-getWindEast ()
+float
+fgGetFloat (const char * name, float defaultValue)
 {
-  return current_aircraft.fdm_state->get_V_east_airmass();
+  return globals->get_props()->getFloatValue(name, defaultValue);
 }
 
-
-/**
- * Set the current wind east velocity (feet/second).
- */
-static void
-setWindEast (double speed)
+double
+fgGetDouble (const char * name, double defaultValue)
 {
-  cout << "Set wind-east to " << speed << endl;
-  current_aircraft.fdm_state->set_Velocities_Local_Airmass(getWindNorth(),
-							   speed,
-							   getWindDown());
+  return globals->get_props()->getDoubleValue(name, defaultValue);
 }
 
-
-/**
- * Get the current wind down velocity (feet/second).
- */
-static double
-getWindDown ()
+const char *
+fgGetString (const char * name, const char * defaultValue)
 {
-  return current_aircraft.fdm_state->get_V_down_airmass();
+  return globals->get_props()->getStringValue(name, defaultValue);
 }
 
-
-/**
- * Set the current wind down velocity (feet/second).
- */
-static void
-setWindDown (double speed)
+bool
+fgSetBool (const char * name, bool val)
 {
-  current_aircraft.fdm_state->set_Velocities_Local_Airmass(getWindNorth(),
-							   getWindEast(),
-							   speed);
+  return globals->get_props()->setBoolValue(name, val);
 }
 
-static double
-getFOV ()
+bool
+fgSetInt (const char * name, int val)
 {
-  return globals->get_current_view()->get_fov();
+  return globals->get_props()->setIntValue(name, val);
 }
 
-static void
-setFOV (double fov)
+bool
+fgSetLong (const char * name, long val)
 {
-  globals->get_current_view()->set_fov( fov );
+  return globals->get_props()->setLongValue(name, val);
 }
 
-
-static void
-setViewAxisLong (double axis)
+bool
+fgSetFloat (const char * name, float val)
 {
-  axisLong = axis;
+  return globals->get_props()->setFloatValue(name, val);
 }
 
-static void
-setViewAxisLat (double axis)
+bool
+fgSetDouble (const char * name, double val)
 {
-  axisLat = axis;
+  return globals->get_props()->setDoubleValue(name, val);
 }
 
+bool
+fgSetString (const char * name, const char * val)
+{
+  return globals->get_props()->setStringValue(name, val);
+}
 
 void
-fgInitProps ()
+fgSetArchivable (const char * name, bool state)
 {
-				// Simulation
-  fgTie("/sim/aircraft-dir", getAircraftDir, setAircraftDir);
-  fgTie("/sim/view/offset", getViewOffset, setViewOffset);
-  fgTie("/sim/view/goal-offset", getGoalViewOffset, setGoalViewOffset);
-  fgTie("/sim/time/gmt", getDateString, setDateString);
-  fgTie("/sim/time/gmt-string", getGMTString);
-
-				// Orientation
-  fgTie("/orientation/heading-magnetic", getHeadingMag);
-
-				// Engine
-  fgTie("/engines/engine0/rpm", getRPM);
-  fgTie("/engines/engine0/egt", getEGT);
-  fgTie("/engines/engine0/cht", getCHT);
-  fgTie("/engines/engine0/mp", getMP);
-  fgTie("/engines/engine0/fuel-flow", getFuelFlow);
-
-  //consumables
-  fgTie("/consumables/fuel/tank1/level", getTank1Fuel, setTank1Fuel, false);
-  fgTie("/consumables/fuel/tank2/level", getTank2Fuel, setTank2Fuel, false);
-
-				// Autopilot
-  fgTie("/autopilot/locks/altitude", getAPAltitudeLock, setAPAltitudeLock);
-  fgTie("/autopilot/settings/altitude", getAPAltitude, setAPAltitude);
-  fgTie("/autopilot/locks/glide-slope", getAPGSLock, setAPGSLock);
-  fgTie("/autopilot/settings/climb-rate", getAPClimb, setAPClimb, false);
-  fgTie("/autopilot/locks/heading", getAPHeadingLock, setAPHeadingLock);
-  fgTie("/autopilot/settings/heading-bug", getAPHeadingBug, setAPHeadingBug,
-	false);
-  fgTie("/autopilot/locks/wing-leveler", getAPWingLeveler, setAPWingLeveler);
-  fgTie("/autopilot/locks/nav1", getAPNAV1Lock, setAPNAV1Lock);
-  fgTie("/autopilot/locks/auto-throttle",
-	getAPAutoThrottleLock, setAPAutoThrottleLock);
-  fgTie("/autopilot/control-overrides/rudder",
-	getAPRudderControl, setAPRudderControl);
-  fgTie("/autopilot/control-overrides/elevator",
-	getAPElevatorControl, setAPElevatorControl);
-  fgTie("/autopilot/control-overrides/throttle",
-	getAPThrottleControl, setAPThrottleControl);
-
-				// Environment
-  fgTie("/environment/visibility", getVisibility, setVisibility);
-  fgTie("/environment/wind-north", getWindNorth, setWindNorth);
-  fgTie("/environment/wind-east", getWindEast, setWindEast);
-  fgTie("/environment/wind-down", getWindDown, setWindDown);
-  fgTie("/environment/magnetic-variation", getMagVar);
-  fgTie("/environment/magnetic-dip", getMagDip);
-
-				// View
-  fgTie("/sim/field-of-view", getFOV, setFOV);
-  fgTie("/sim/view/axes/long", (double(*)())0, setViewAxisLong);
-  fgTie("/sim/view/axes/lat", (double(*)())0, setViewAxisLat);
+  SGPropertyNode * node = globals->get_props()->getNode(name);
+  if (node == 0)
+    SG_LOG(SG_GENERAL, SG_DEBUG,
+	   "Attempt to set archive flag for non-existant property "
+	   << name);
+  else
+    node->setAttribute(SGPropertyNode::ARCHIVE, state);
 }
 
-
 void
-fgUpdateProps ()
+fgSetReadable (const char * name, bool state)
 {
-  _set_view_from_axes();
+  SGPropertyNode * node = globals->get_props()->getNode(name);
+  if (node == 0)
+    SG_LOG(SG_GENERAL, SG_DEBUG,
+	   "Attempt to set read flag for non-existant property "
+	   << name);
+  else
+    node->setAttribute(SGPropertyNode::READ, state);
 }
 
-
-
-////////////////////////////////////////////////////////////////////////
-// Save and restore.
-////////////////////////////////////////////////////////////////////////
-
-
-/**
- * Save the current state of the simulator to a stream.
- */
-bool
-fgSaveFlight (ostream &output)
+void
+fgSetWritable (const char * name, bool state)
 {
-  return writeProperties(output, globals->get_props());
+  SGPropertyNode * node = globals->get_props()->getNode(name);
+  if (node == 0)
+    SG_LOG(SG_GENERAL, SG_DEBUG,
+	   "Attempt to set write flag for non-existant property "
+	   << name);
+  else
+    node->setAttribute(SGPropertyNode::WRITE, state);
 }
 
-
-/**
- * Restore the current state of the simulator from a stream.
- */
-bool
-fgLoadFlight (istream &input)
+void
+fgUntie (const char * name)
 {
-  SGPropertyNode props;
-  if (readProperties(input, &props)) {
-    copyProperties(&props, globals->get_props());
-				// When loading a flight, make it the
-				// new initial state.
-    globals->saveInitialState();
-  } else {
-    SG_LOG(SG_INPUT, SG_ALERT, "Error restoring flight; aborted");
-    return false;
-  }
-
-  return true;
+  if (!globals->get_props()->untie(name))
+    SG_LOG(SG_GENERAL, SG_WARN, "Failed to untie property " << name);
 }
 
-// end of fg_props.cxx
 
+// end of fg_props.cxx