X-Git-Url: https://git.mxchange.org/?a=blobdiff_plain;f=src%2FMain%2Ffg_props.cxx;h=770ca620ea91c281920b2277b6a4418bbdfada57;hb=6077e8a8248db3e27ff10cd654219c8dbb758861;hp=110fdcdae72aa59d9852746cb67b179483b28aa8;hpb=7fd44010e127a7e5cfa367795a5ede925ddb67ec;p=flightgear.git

diff --git a/src/Main/fg_props.cxx b/src/Main/fg_props.cxx
index 110fdcdae..770ca620e 100644
--- a/src/Main/fg_props.cxx
+++ b/src/Main/fg_props.cxx
@@ -24,181 +24,269 @@
 #  include <simgear/compiler.h>
 #endif
 
+#include <simgear/misc/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.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
+#ifdef FG_WEATHERCM
 #  include <WeatherCM/FGLocalWeatherDatabase.h>
 #else
-#  include <Weather/weather.hxx>
-#endif
-#include <Objects/matlib.hxx>
+#  include <Environment/environment.hxx>
+#endif // FG_WEATHERCM
 
+#include <GUI/gui.h>
+
+#include "globals.hxx"
 #include "fgfs.hxx"
 #include "fg_props.hxx"
 
-#if !defined(SG_HAVE_NATIVE_SGI_COMPILERS)
 SG_USING_STD(istream);
 SG_USING_STD(ostream);
-#endif
 
+#ifdef FG_WEATHERCM
 static double getWindNorth ();
 static double getWindEast ();
 static double getWindDown ();
+#endif // FG_WEATHERCM
 
-// 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;
+static bool winding_ccw = true; // FIXME: temporary
 
-/**
- * Utility function.
- */
-static inline void
-_set_view_from_axes ()
-{
-				// Take no action when hat is centered
-  if ( ( axisLong <  0.01 ) &&
-       ( axisLong > -0.01 ) &&
-       ( axisLat  <  0.01 ) &&
-       ( axisLat  > -0.01 )
-     )
-    return;
+static bool fdm_data_logging = false; // FIXME: temporary
 
-  double viewDir = 999;
-
-  /* Do all the quick and easy cases */
-  if (axisLong < 0) {		// Longitudinal axis forward
-    if (axisLat == axisLong)
-      viewDir = 45;
-    else if (axisLat == - axisLong)
-      viewDir = 315;
-    else if (axisLat == 0)
-      viewDir = 0;
-  } else if (axisLong > 0) {	// Longitudinal axis backward
-    if (axisLat == - axisLong)
-      viewDir = 135;
-    else if (axisLat == axisLong)
-      viewDir = 225;
-    else if (axisLat == 0)
-      viewDir = 180;
-  } else if (axisLong = 0) {	// Longitudinal axis neutral
-    if (axisLat < 0)
-      viewDir = 90;
-    else if (axisLat > 0)
-      viewDir = 270;
-    else return; /* And assertion failure maybe? */
-  }
-
-  /* Do all the difficult cases */
-  if ( viewDir > 900 )
-    viewDir = SGD_RADIANS_TO_DEGREES * atan2 ( -axisLat, -axisLong );
-  if ( viewDir < -1 ) viewDir += 360;
-
-//  SG_LOG(SG_INPUT, SG_ALERT, "Joystick Lat=" << axisLat << "   and Long="
-//	<< axisLong << "  gave angle=" << viewDir );
+static bool frozen = false;	// FIXME: temporary
 
-  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);
-}
 
 
 ////////////////////////////////////////////////////////////////////////
 // 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();
+}
+
 
-/**
- * Get the pause state of the sim.
- */
-static bool
-getFreeze ()
+static void
+addLoggingClass (const string &name)
 {
-  return globals->get_freeze();
+  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_ALERT, "Unknown logging class: " << name);
 }
 
 
 /**
- * Set the pause state of the sim.
+ * Set the logging classes.
  */
 static void
-setFreeze (bool freeze)
+setLoggingClasses (const char * c)
 {
-  globals->set_freeze(freeze);
+  string classes = c;
+  logbuf::set_log_classes(SG_NONE);
+
+  if (classes == "none") {
+    SG_LOG(SG_GENERAL, SG_INFO, "Disabled all logging classes");
+    return;
+  }
+
+  if (classes.empty() || classes == "all") { // default
+    logbuf::set_log_classes(SG_ALL);
+    SG_LOG(SG_GENERAL, SG_INFO, "Enabled all logging classes: "
+	   << getLoggingClasses());
+    return;
+  }
+
+  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());
 }
 
+
 /**
- * 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)
+{
+  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_INFO, "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)
 {
-  globals->get_current_view()
-    ->set_goal_view_offset(offset * SGD_DEGREES_TO_RADIANS);
+  aircraft_dir = dir;
+}
+
+
+/**
+ * Return the number of milliseconds elapsed since simulation started.
+ */
+static double
+getElapsedTime_sec ()
+{
+  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;
 }
 
 
@@ -206,15 +294,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));
@@ -242,46 +333,22 @@ 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);
+  st->update(lon, lat, cur_time_override->getLongValue(), warp);
   fgUpdateSkyAndLightingParams();
 }
 
 /**
  * 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;
-}
-
-
-/**
- * Get the texture rendering state.
- */
-static bool
-getTextures ()
-{
-  return (material_lib.get_step() == 0);
-}
-
-
-/**
- * Set the texture rendering state.
- */
-static void
-setTextures (bool textures)
-{
-  if (textures)
-    material_lib.set_step(0);
-  else
-    material_lib.set_step(1);
+  // cout << t << " " << buf << endl;
+  return buf;
 }
 
 
@@ -311,648 +378,462 @@ 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;
-  }
-}
-
+#ifdef FG_WEATHERCM
 
 /**
- * Return the current engine0 EGT.
+ * Get the current visibility (meters).
  */
 static double
-getEGT ()
+getVisibility ()
 {
-  if ( current_aircraft.fdm_state->get_engine(0) != NULL ) {
-      return current_aircraft.fdm_state->get_engine(0)->get_EGT();
-  } else {
-      return 0.0;
-  }
+  return WeatherDatabase->getWeatherVisibility();
 }
 
+
 /**
- * Return the current engine0 CHT.
+ * Set the current visibility (meters).
  */
-static double
-getCHT ()
+static void
+setVisibility (double visibility)
 {
-  if ( current_aircraft.fdm_state->get_engine(0) != NULL ) {
-      return current_aircraft.fdm_state->get_engine(0)->get_CHT();
-  } else {
-      return 0.0;
-  }
+  WeatherDatabase->setWeatherVisibility(visibility);
 }
 
 /**
- * Return the current engine0 Manifold Pressure.
+ * Get the current wind north velocity (feet/second).
  */
 static double
-getMP ()
+getWindNorth ()
 {
-  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 current_aircraft.fdm_state->get_V_north_airmass();
 }
 
 
 /**
- * Return the current engine0 fuel flow
+ * Set the current wind north velocity (feet/second).
  */
-static double
-getFuelFlow ()
+static void
+setWindNorth (double speed)
 {
-  if ( current_aircraft.fdm_state->get_engine(0) != NULL ) {
-      return current_aircraft.fdm_state->get_engine(0)->get_Fuel_Flow();
-  } else {
-      return 0.0;
-  }
+  current_aircraft.fdm_state
+    ->set_Velocities_Local_Airmass(speed, getWindEast(), getWindDown());
 }
 
+
 /**
- * Return the fuel level in tank 1
+ * Get the current wind east velocity (feet/second).
  */
 static double
-getTank1Fuel ()
+getWindEast ()
 {
-  return current_aircraft.fdm_state->get_Tank1Fuel();
+  return current_aircraft.fdm_state->get_V_east_airmass();
 }
 
-static void
-setTank1Fuel ( double gals )
-{
-  current_aircraft.fdm_state->set_Tank1Fuel( gals );
-}
 
 /**
- * Return the fuel level in tank 2
+ * Set the current wind east velocity (feet/second).
  */
-static double
-getTank2Fuel ()
-{
-  return current_aircraft.fdm_state->get_Tank2Fuel();
-}
-
 static void
-setTank2Fuel ( double gals )
+setWindEast (double speed)
 {
-  current_aircraft.fdm_state->set_Tank2Fuel( gals );
+  SG_LOG(SG_GENERAL, SG_INFO,, "Set wind-east to " << speed );
+  current_aircraft.fdm_state->set_Velocities_Local_Airmass(getWindNorth(),
+							   speed,
+							   getWindDown());
 }
 
 
 /**
- * Get the autopilot altitude lock (true=on).
+ * Get the current wind down velocity (feet/second).
  */
-static bool
-getAPAltitudeLock ()
+static double
+getWindDown ()
 {
-    return (current_autopilot->get_AltitudeEnabled() &&
-	    current_autopilot->get_AltitudeMode()
-	    == FGAutopilot::FG_ALTITUDE_LOCK);
+  return current_aircraft.fdm_state->get_V_down_airmass();
 }
 
 
 /**
- * Set the autopilot altitude lock (true=on).
+ * Set the current wind down velocity (feet/second).
  */
 static void
-setAPAltitudeLock (bool lock)
+setWindDown (double speed)
 {
-  current_autopilot->set_AltitudeMode(FGAutopilot::FG_ALTITUDE_LOCK);
-  current_autopilot->set_AltitudeEnabled(lock);
+  current_aircraft.fdm_state->set_Velocities_Local_Airmass(getWindNorth(),
+							   getWindEast(),
+							   speed);
 }
 
+#endif // FG_WEATHERCM
 
-/**
- * Get the autopilot target altitude in feet.
- */
-static double
-getAPAltitude ()
+static long
+getWarp ()
 {
-  return current_autopilot->get_TargetAltitude() * SG_METER_TO_FEET;
+  return globals->get_warp();
 }
 
-
-/**
- * Set the autopilot target altitude in feet.
- */
 static void
-setAPAltitude (double altitude)
+setWarp (long warp)
 {
-    current_autopilot->set_TargetAltitude( altitude * SG_FEET_TO_METER );
+  globals->set_warp(warp);
 }
 
-/**
- * Get the autopilot altitude lock (true=on).
- */
-static bool
-getAPGSLock ()
+static long
+getWarpDelta ()
 {
-    return (current_autopilot->get_AltitudeEnabled() &&
-	    (current_autopilot->get_AltitudeMode()
-	     == FGAutopilot::FG_ALTITUDE_GS1));
+  return globals->get_warp_delta();
 }
 
-
-/**
- * Set the autopilot altitude lock (true=on).
- */
 static void
-setAPGSLock (bool lock)
+setWarpDelta (long delta)
 {
-  current_autopilot->set_AltitudeMode(FGAutopilot::FG_ALTITUDE_GS1);
-  current_autopilot->set_AltitudeEnabled(lock);
+  globals->set_warp_delta(delta);
 }
 
-
-/**
- * Get the autopilot terrain lock (true=on).
- */
 static bool
-getAPTerrainLock ()
+getWindingCCW ()
 {
-    return (current_autopilot->get_AltitudeEnabled() &&
-	    (current_autopilot->get_AltitudeMode()
-	     == FGAutopilot::FG_ALTITUDE_TERRAIN));
+  return winding_ccw;
 }
 
-
-/**
- * Set the autopilot terrain lock (true=on).
- */
 static void
-setAPTerrainLock (bool lock)
+setWindingCCW (bool state)
 {
-  current_autopilot->set_AltitudeMode(FGAutopilot::FG_ALTITUDE_TERRAIN);
-  current_autopilot->set_AltitudeEnabled(lock);
+  winding_ccw = state;
+  if ( winding_ccw )
+    glFrontFace ( GL_CCW );
+  else
+    glFrontFace ( GL_CW );
 }
 
-
-/**
- * Get the autopilot target altitude in feet.
- */
-static double
-getAPClimb ()
+static bool
+getFullScreen ()
 {
-  return current_autopilot->get_TargetClimbRate() * SG_METER_TO_FEET;
+#if defined(FX) && !defined(WIN32)
+  return globals->get_fullscreen();
+#else
+  return false;
+#endif
 }
 
-
-/**
- * Set the autopilot target altitude in feet.
- */
 static void
-setAPClimb (double rate)
+setFullScreen (bool state)
 {
-    current_autopilot->set_TargetClimbRate( rate * SG_FEET_TO_METER );
+#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 heading lock (true=on).
- */
 static bool
-getAPHeadingLock ()
+getFDMDataLogging ()
 {
-    return
-      (current_autopilot->get_HeadingEnabled() &&
-       current_autopilot->get_HeadingMode() == DEFAULT_AP_HEADING_LOCK);
+  return fdm_data_logging;
 }
 
-
-/**
- * Set the autopilot heading lock (true=on).
- */
 static void
-setAPHeadingLock (bool lock)
+setFDMDataLogging (bool state)
 {
-    if (lock) {
-	current_autopilot->set_HeadingMode(DEFAULT_AP_HEADING_LOCK);
-	current_autopilot->set_HeadingEnabled(true);
-    } else {
-	current_autopilot->set_HeadingEnabled(false);
-    }
+				// kludge; no getter or setter available
+  if (state != fdm_data_logging) {
+    fgToggleFDMdataLogging();
+    fdm_data_logging = state;
+  }
 }
 
+
+////////////////////////////////////////////////////////////////////////
+// Tie the properties.
+////////////////////////////////////////////////////////////////////////
 
-/**
- * Get the autopilot heading bug in degrees.
- */
-static double
-getAPHeadingBug ()
+void
+fgInitProps ()
 {
-  return current_autopilot->get_DGTargetHeading();
-}
+  SG_LOG(SG_GENERAL, SG_DEBUG, "start of fgInitProps()" );
+				// 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);
 
-/**
- * Set the autopilot heading bug in degrees.
- */
-static void
-setAPHeadingBug (double heading)
-{
-  current_autopilot->set_DGTargetHeading( heading );
-}
+				// Orientation
+  fgTie("/orientation/heading-magnetic-deg", getHeadingMag);
 
+				// Environment
+#ifdef FG_WEATHERCM
+  fgTie("/environment/visibility-m", getVisibility, setVisibility);
+  fgSetArchivable("/environment/visibility-m");
+  fgTie("/environment/wind-from-north-fps", getWindNorth, setWindNorth);
+  fgSetArchivable("/environment/wind-from-north-fps");
+  fgTie("/environment/wind-from-east-fps", getWindEast, setWindEast);
+  fgSetArchivable("/environment/wind-from-east-fps");
+  fgTie("/environment/wind-from-down-fps", getWindDown, setWindDown);
+  fgSetArchivable("/environment/wind-from-down-fps");
+#endif
 
-/**
- * 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);
-}
+  fgTie("/environment/magnetic-variation-deg", getMagVar);
+  fgTie("/environment/magnetic-dip-deg", getMagDip);
 
+  fgTie("/sim/time/warp", getWarp, setWarp, false);
+  fgTie("/sim/time/warp-delta", getWarpDelta, setWarpDelta);
 
-/**
- * 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);
-    }
+				// 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);
+
+  SG_LOG(SG_GENERAL, SG_DEBUG, "end of fgInitProps()" );
 }
 
-/**
- * Return true if the autopilot is locked to NAV1.
- */
-static bool
-getAPNAV1Lock ()
+
+void
+fgUpdateProps ()
 {
-  return
-    (current_autopilot->get_HeadingEnabled() &&
-     current_autopilot->get_HeadingMode() == FGAutopilot::FG_HEADING_NAV1);
 }
 
 
-/**
- * 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);
-  }
-}
+
+////////////////////////////////////////////////////////////////////////
+// Save and restore.
+////////////////////////////////////////////////////////////////////////
+
 
 /**
- * Get the autopilot autothrottle lock.
+ * Save the current state of the simulator to a stream.
  */
-static bool
-getAPAutoThrottleLock ()
+bool
+fgSaveFlight (ostream &output, bool write_all)
 {
-  return current_autopilot->get_AutoThrottleEnabled();
+
+  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");
+
+  try {
+    writeProperties(output, globals->get_props(), write_all);
+  } catch (const sg_exception &e) {
+    guiErrorMessage("Error saving flight: ", e);
+    return false;
+  }
+  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;
     }
-}
 
-// kludge
-static double
-getAPElevatorControl ()
-{
-  if (getAPAltitudeLock())
-      return current_autopilot->get_TargetAltitude();
-  else
-    return controls.get_elevator();
-}
-
-// kludge
-static void
-setAPElevatorControl (double value)
-{
-    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);
+    try {
+        readProperties(fullpath, props);
+    } catch (const sg_exception &e) {
+        guiErrorMessage("Error reading properties: ", e);
+        return false;
     }
+    return true;
 }
 
-// kludge
-static double
-getAPThrottleControl ()
-{
-  if (getAPAutoThrottleLock())
-    return 0.0;			// always resets
-  else
-    return controls.get_throttle(0);
-}
 
-// kludge
-static void
-setAPThrottleControl (double value)
+
+////////////////////////////////////////////////////////////////////////
+// Property convenience functions.
+////////////////////////////////////////////////////////////////////////
+
+SGPropertyNode *
+fgGetNode (const char * path, bool create)
 {
-  if (getAPAutoThrottleLock())
-    current_autopilot->AutoThrottleAdjust(value < 0.0 ? -0.01 : 0.01);
-  else
-    controls.set_throttle(0, value);
+  return globals->get_props()->getNode(path, create);
 }
 
-
-/**
- * Get the current visibility (meters).
- */
-static double
-getVisibility ()
+SGPropertyNode * 
+fgGetNode (const char * path, int index, bool create)
 {
-#ifndef FG_OLD_WEATHER
-  return WeatherDatabase->getWeatherVisibility();
-#else
-  return current_weather.get_visibility();
-#endif
+  return globals->get_props()->getNode(path, index, create);
 }
 
-
-/**
- * Set the current visibility (meters).
- */
-static void
-setVisibility (double visibility)
+bool
+fgHasNode (const char * path)
 {
-#ifndef FG_OLD_WEATHER
-  WeatherDatabase->setWeatherVisibility(visibility);
-#else
-  current_weather.set_visibility(visibility);
-#endif
+  return (fgGetNode(path, false) != 0);
 }
 
-/**
- * Get the current wind north velocity (feet/second).
- */
-static double
-getWindNorth ()
+void
+fgAddChangeListener (SGPropertyChangeListener * listener, const char * path)
 {
-  return current_aircraft.fdm_state->get_V_north_airmass();
+  fgGetNode(path, true)->addChangeListener(listener);
 }
 
-
-/**
- * Set the current wind north velocity (feet/second).
- */
-static void
-setWindNorth (double speed)
+void
+fgAddChangeListener (SGPropertyChangeListener * listener,
+		     const char * path, int index)
 {
-  current_aircraft.fdm_state
-    ->set_Velocities_Local_Airmass(speed, getWindEast(), getWindDown());
+  fgGetNode(path, index, true)->addChangeListener(listener);
 }
 
-
-/**
- * Get the current wind east velocity (feet/second).
- */
-static double
-getWindEast ()
+bool
+fgGetBool (const char * name, bool defaultValue)
 {
-  return current_aircraft.fdm_state->get_V_east_airmass();
+  return globals->get_props()->getBoolValue(name, defaultValue);
 }
 
-
-/**
- * Set the current wind east velocity (feet/second).
- */
-static void
-setWindEast (double speed)
+int
+fgGetInt (const char * name, int defaultValue)
 {
-  cout << "Set wind-east to " << speed << endl;
-  current_aircraft.fdm_state->set_Velocities_Local_Airmass(getWindNorth(),
-							   speed,
-							   getWindDown());
+  return globals->get_props()->getIntValue(name, defaultValue);
 }
 
-
-/**
- * Get the current wind down velocity (feet/second).
- */
-static double
-getWindDown ()
+int
+fgGetLong (const char * name, long defaultValue)
 {
-  return current_aircraft.fdm_state->get_V_down_airmass();
+  return globals->get_props()->getLongValue(name, defaultValue);
 }
 
-
-/**
- * Set the current wind down velocity (feet/second).
- */
-static void
-setWindDown (double speed)
+float
+fgGetFloat (const char * name, float defaultValue)
 {
-  current_aircraft.fdm_state->set_Velocities_Local_Airmass(getWindNorth(),
-							   getWindEast(),
-							   speed);
+  return globals->get_props()->getFloatValue(name, defaultValue);
 }
 
-static double
-getFOV ()
+double
+fgGetDouble (const char * name, double defaultValue)
 {
-  return globals->get_current_view()->get_fov();
+  return globals->get_props()->getDoubleValue(name, defaultValue);
 }
 
-static void
-setFOV (double fov)
+const char *
+fgGetString (const char * name, const char * defaultValue)
 {
-  globals->get_current_view()->set_fov( fov );
+  return globals->get_props()->getStringValue(name, defaultValue);
 }
 
-static long
-getWarp ()
+bool
+fgSetBool (const char * name, bool val)
 {
-  return globals->get_warp();
+  return globals->get_props()->setBoolValue(name, val);
 }
 
-static void
-setWarp (long warp)
+bool
+fgSetInt (const char * name, int val)
 {
-  globals->set_warp(warp);
+  return globals->get_props()->setIntValue(name, val);
 }
 
-static long
-getWarpDelta ()
+bool
+fgSetLong (const char * name, long val)
 {
-  return globals->get_warp_delta();
+  return globals->get_props()->setLongValue(name, val);
 }
 
-static void
-setWarpDelta (long delta)
+bool
+fgSetFloat (const char * name, float val)
 {
-  globals->set_warp_delta(delta);
+  return globals->get_props()->setFloatValue(name, val);
 }
 
-static void
-setViewAxisLong (double axis)
+bool
+fgSetDouble (const char * name, double val)
 {
-  axisLong = axis;
+  return globals->get_props()->setDoubleValue(name, val);
 }
 
-static void
-setViewAxisLat (double axis)
+bool
+fgSetString (const char * name, const char * val)
 {
-  axisLat = axis;
+  return globals->get_props()->setStringValue(name, val);
 }
 
-
 void
-fgInitProps ()
+fgSetArchivable (const char * name, bool state)
 {
-				// Simulation
-  fgTie("/sim/freeze", getFreeze, setFreeze);
-  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);
-  fgTie("/sim/rendering/textures", getTextures, setTextures);
-
-				// 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/locks/terrain", getAPTerrainLock, setAPTerrainLock);
-  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/time/warp", getWarp, setWarp);
-  fgTie("/sim/time/warp-delta", getWarpDelta, setWarpDelta);
-  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_ALERT,
+	   "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_ALERT,
+	   "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_ALERT,
+	   "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