]> git.mxchange.org Git - flightgear.git/blobdiff - src/Environment/environment_ctrl.cxx
Harald JOHNSEN:
[flightgear.git] / src / Environment / environment_ctrl.cxx
index e5114a2a25377e45f5f013dd91700678dbbd7354..9872c6d0c5f16d157c894961e26c27264eb7cddc 100644 (file)
@@ -316,24 +316,27 @@ FGInterpolateEnvironmentCtrl::bucket::operator< (const bucket &b) const
 
 FGMetarEnvironmentCtrl::FGMetarEnvironmentCtrl ()
     : env( new FGInterpolateEnvironmentCtrl ),
-      _icao( fgGetString("/sim/presets/airport-id") ),
+      _icao( "" ),
       search_interval_sec( 60.0 ),        // 1 minute
       same_station_interval_sec( 900.0 ), // 15 minutes
       search_elapsed( 9999.0 ),
       fetch_elapsed( 9999.0 ),
       proxy_host( fgGetNode("/sim/presets/proxy/host", true) ),
       proxy_port( fgGetNode("/sim/presets/proxy/port", true) ),
-      proxy_auth( fgGetNode("/sim/presets/proxy/authentication", true) )
+      proxy_auth( fgGetNode("/sim/presets/proxy/authentication", true) ),
+      metar_max_age( fgGetNode("/environment/params/metar-max-age-min", true) ),
+      _error_count( 0 ),
+      _error_dt( 0.0 )
 {
-#ifdef ENABLE_THREADS
+#if defined(ENABLE_THREADS) && ENABLE_THREADS
     thread = new MetarThread(this);
-    thread->start();
+    thread->start( 1 );
 #endif // ENABLE_THREADS
 }
 
 FGMetarEnvironmentCtrl::~FGMetarEnvironmentCtrl ()
 {
-#ifdef ENABLE_THREADS
+#if defined(ENABLE_THREADS) && ENABLE_THREADS
    thread->cancel();
    thread->join();
 #endif // ENABLE_THREADS
@@ -391,25 +394,28 @@ FGMetarEnvironmentCtrl::init ()
         = fgGetNode( "/position/latitude-deg", true );
 
     bool found_metar = false;
-    while ( !found_metar ) {
+
+    while ( !found_metar && (_error_count < 3) ) {
         FGAirport a = globals->get_airports()
             ->search( longitude->getDoubleValue(),
                       latitude->getDoubleValue(),
                       true );
-        if ( fetch_data( a.id ) ) {
-            cout << "closest station w/ metar = " << a.id << endl;
+        FGMetarResult result = fetch_data( a.getId() );
+        if ( result.m != NULL ) {
+            SG_LOG( SG_GENERAL, SG_INFO, "closest station w/ metar = " << a.getId());
             last_apt = a;
-            _icao = a.id;
+            _icao = a.getId();
             search_elapsed = 0.0;
             fetch_elapsed = 0.0;
+            update_metar_properties( result.m );
             update_env_config();
             env->init();
             found_metar = true;
         } else {
             // mark as no metar so it doesn't show up in subsequent
             // searches.
-            cout << "no metar at metar = " << a.id << endl;
-            globals->get_airports()->no_metar( a.id );
+            SG_LOG( SG_GENERAL, SG_INFO, "no metar at metar = " << a.getId() );
+            globals->get_airports()->no_metar( a.getId() );
         }
     }
 }
@@ -417,6 +423,9 @@ FGMetarEnvironmentCtrl::init ()
 void
 FGMetarEnvironmentCtrl::reinit ()
 {
+    _error_count = 0;
+    _error_dt = 0.0;
+
 #if 0
     update_env_config();
 #endif
@@ -427,256 +436,259 @@ FGMetarEnvironmentCtrl::reinit ()
 void
 FGMetarEnvironmentCtrl::update(double delta_time_sec)
 {
+
+    _dt += delta_time_sec;
+    if (_error_count >= 3)
+       return;
+
+    FGMetarResult result;
+
     static const SGPropertyNode *longitude
         = fgGetNode( "/position/longitude-deg", true );
     static const SGPropertyNode *latitude
         = fgGetNode( "/position/latitude-deg", true );
     search_elapsed += delta_time_sec;
     fetch_elapsed += delta_time_sec;
+
+    // if time for a new search request, push it onto the request
+    // queue
     if ( search_elapsed > search_interval_sec ) {
         FGAirport a = globals->get_airports()
             ->search( longitude->getDoubleValue(),
                       latitude->getDoubleValue(),
                       true );
-        if ( last_apt.id != a.id
+        if ( last_apt.getId() != a.getId()
              || fetch_elapsed > same_station_interval_sec )
         {
-            if ( fetch_data( a.id ) ) {
-                cout << "closest station w/ metar = " << a.id << endl;
-                last_apt = a;
-                _icao = a.id;
-                search_elapsed = 0.0;
-                fetch_elapsed = 0.0;
-                update_env_config();
-                env->reinit();
-            } else {
-                // mark as no metar so it doesn't show up in subsequent
-                // searches.
-                cout << "no metar at metar = " << a.id << endl;
-                globals->get_airports()->no_metar( a.id );
-            }
+            SG_LOG( SG_GENERAL, SG_INFO, "closest station w/ metar = " << a.getId());
+            request_queue.push( a.getId() );
+            last_apt = a;
+            _icao = a.getId();
+            search_elapsed = 0.0;
+            fetch_elapsed = 0.0;
         } else {
             search_elapsed = 0.0;
-            // cout << "same station, waiting = "
-            //      << same_station_interval_sec - fetch_elapsed << endl;
+            SG_LOG( SG_GENERAL, SG_INFO, "same station, waiting = "
+                 << same_station_interval_sec - fetch_elapsed );
+        }
+    }
+
+#if defined(ENABLE_THREADS) && ENABLE_THREADS
+    // No loader thread running so manually fetch the data
+    string id = "";
+    while ( !request_queue.empty() ) {
+        id = request_queue.front();
+        request_queue.pop();
+    }
+
+    if ( !id.empty() ) {
+        SG_LOG( SG_GENERAL, SG_INFO, "inline fetching = " << id );
+        result = fetch_data( id );
+        result_queue.push( result );
+    }
+#endif // ENABLE_THREADS
+
+    // process any results from the loader.
+    while ( !result_queue.empty() ) {
+        result = result_queue.front();
+        result_queue.pop();
+        if ( result.m != NULL ) {
+            update_metar_properties( result.m );
+            fgSetString("/environment/metar/last-metar", result.m->getData());
+            delete result.m;
+            update_env_config();
+            env->reinit();
+        } else {
+            // mark as no metar so it doesn't show up in subsequent
+            // searches, and signal an immediate re-search.
+            SG_LOG( SG_GENERAL, SG_WARN,
+                    "no metar at station = " << result.icao );
+            globals->get_airports()->no_metar( result.icao );
+            search_elapsed = 9999.0;
         }
     }
 
     env->update(delta_time_sec);
 }
 
+
 void
 FGMetarEnvironmentCtrl::setEnvironment (FGEnvironment * environment)
 {
     env->setEnvironment(environment);
 }
 
-bool
-FGMetarEnvironmentCtrl::fetch_data (const string &icao)
+FGMetarResult
+FGMetarEnvironmentCtrl::fetch_data( const string &icao )
 {
-    char s[128];
-    double d, dt;
-    int i;
+    FGMetarResult result;
+    result.icao = icao;
 
-    if ((icao == "") && (_icao == "")) {
-        _icao = fgGetString("/sim/presets/airport-id");
+    // if the last error was more than three seconds ago,
+    // then pretent nothing happened.
+    if (_error_dt < 3) {
+        _error_dt += _dt;
 
-    } else if (icao != "") {
-        _icao = icao;
+    } else {
+        _error_dt = 0.0;
+        _error_count = 0;
     }
 
     // fetch station elevation if exists
-    FGAirport a = globals->get_airports()->search( _icao );
-    station_elevation_ft = a.elevation;
+    FGAirport a = globals->get_airports()->search( icao );
+    station_elevation_ft = a.getElevation();
 
     // fetch current metar data
-    SGMetar *m = NULL;
-#ifdef ENABLE_THREADS
-
-    // We are only interested in the latest metar report
-    // FIXME: Do we want to keep the latest valid report instead?
-    while (!metar_queue.empty()) {
-        if (m != NULL)
-            delete m;
-
-        m = metar_queue.pop();
-    }
-
-    if ( m != NULL ) {
-
-#else
     try {
         string host = proxy_host->getStringValue();
         string auth = proxy_auth->getStringValue();
         string port = proxy_port->getStringValue();
-        m = new SGMetar( _icao, host, port, auth);
+        result.m = new FGMetar( icao, host, port, auth);
 
-#endif // ENABLE_THREADS
+        long max_age = metar_max_age->getLongValue();
+        if (max_age && result.m->getAge_min() > max_age) {
+            SG_LOG( SG_GENERAL, SG_WARN, "METAR data too old");
+            delete result.m;
+            result.m = NULL;
+        }
 
-        d = m->getMinVisibility().getVisibility_m();
-        d = (d != SGMetarNaN) ? d : 10000;
-        fgSetDouble("/environment/metar/min-visibility-m", d);
+    } catch (const sg_io_exception& e) {
+        SG_LOG( SG_GENERAL, SG_WARN, "Error fetching live weather data: "
+                << e.getFormattedMessage().c_str() );
+#if defined(ENABLE_THREADS) && ENABLE_THREADS
+        if (_error_count++ >= 3) {
+           SG_LOG( SG_GENERAL, SG_WARN, "Stop fetching data permanently.");
+           thread->cancel();
+           thread->join();
+        }
+#endif
 
-        dt =  m->getMaxVisibility().getVisibility_m();
-        d = (dt != SGMetarNaN) ? dt : d;
-        fgSetDouble("/environment/metar/max-visibility-m", d);
+        result.m = NULL;
+    }
 
-        SGMetarVisibility *dirvis = m->getDirVisibility();
-        for (i = 0; i < 8; i++, dirvis++) {
-            const char *min = "/environment/metar/visibility[%d]/min-m";
-            const char *max = "/environment/metar/visibility[%d]/max-m";
-            char s[128];
+    _dt = 0;
 
-            d = dirvis->getVisibility_m();
-            d = (d != SGMetarNaN) ? d : 10000;
+    return result;
+}
 
-            snprintf(s, 128, min, i);
-            fgSetDouble(s, d);
-            snprintf(s, 128, max, i);
-            fgSetDouble(s, d);
-        }
 
-        i = m->getWindDir();
-        if ( i == -1 ) {
-            fgSetInt("/environment/metar/base-wind-range-from",
-                        m->getWindRangeFrom() );
-            fgSetInt("/environment/metar/base-wind-range-to",
-                        m->getWindRangeTo() );
-        } else {
-            fgSetInt("/environment/metar/base-wind-range-from", i);
-            fgSetInt("/environment/metar/base-wind-range-to", i);
-        }
-        fgSetDouble("/environment/metar/base-wind-speed-kt",
-                    m->getWindSpeed_kt() );
-
-        d = m->getGustSpeed_kt();
-        d = (d != SGMetarNaN) ? d : 0.0;
-        fgSetDouble("/environment/metar/gust-wind-speed-kt", d);
-
-        d = m->getTemperature_C();
-        if (d != SGMetarNaN) {
-            dt = m->getDewpoint_C();
-            dt = (dt != SGMetarNaN) ? dt : 0.0;
-            fgSetDouble("/environment/metar/dewpoint-degc", dt);
-            fgSetDouble("/environment/metar/rel-humidity-norm",
-                        m->getRelHumidity() );
-        }   
-        d = (d != SGMetarNaN) ? d : 15.0;
-        fgSetDouble("/environment/metar/temperature-degc", d);
-
-        d = m->getPressure_inHg();
-        d = (d != SGMetarNaN) ? d : 30.0;
-        fgSetDouble("/environment/metar/pressure-inhg", d);
-
-        vector<SGMetarCloud> cv = m->getClouds();
-        vector<SGMetarCloud>::iterator cloud;
-
-        const char *cl = "/environment/clouds/layer[%i]";
-        for (i = 0, cloud = cv.begin(); cloud != cv.end(); cloud++, i++) {
-            const char *coverage_string[5] = 
-                          { "clear", "few", "scattered", "broken", "overcast" };
-            const double thickness[5] = { 0, 65, 600,750, 1000};
-            int q;
-
-            snprintf(s, 128, cl, i);
-            strncat(s, "/coverage", 128);
-            q = cloud->getCoverage();
-            q = (q != -1 ) ? q : 0;
-            fgSetString(s, coverage_string[q] );
-
-            snprintf(s, 128, cl, i);
-            strncat(s, "/elevation-ft", 128);
-            d = cloud->getAltitude_ft();
-            d = (d != SGMetarNaN) ? d : -9999;
-            fgSetDouble(s, d + station_elevation_ft);
-
-            snprintf(s, 128, cl, i);
-            strncat(s, "/thickness-ft", 128);
-            fgSetDouble(s, thickness[q]);
-
-            snprintf(s, 128, cl, i);
-            strncat(s, "/span-m", 128);
-            fgSetDouble(s, 40000.0);
-        }
-        for (; i < FGEnvironmentMgr::MAX_CLOUD_LAYERS; i++) {
-            snprintf(s, 128, cl, i);
-            strncat(s, "/coverage", 128);
-            fgSetString(s, "clear");
-
-            snprintf(s, 128, cl, i);
-            strncat(s, "/elevation-ft", 128);
-            fgSetDouble(s, -9999);
-
-            snprintf(s, 128, cl, i);
-            strncat(s, "/thickness-ft", 128);
-            fgSetDouble(s, 0);
-
-            snprintf(s, 128, cl, i);
-            strncat(s, "/span-m", 128);
-            fgSetDouble(s, 40000.0);
-        }
+void
+FGMetarEnvironmentCtrl::update_metar_properties( FGMetar *m )
+{
+    int i;
+    double d;
+    char s[128];
 
-        delete m;
+    fgSetString("/environment/metar/station-id", m->getId());
+    fgSetDouble("/environment/metar/min-visibility-m",
+                m->getMinVisibility().getVisibility_m() );
+    fgSetDouble("/environment/metar/max-visibility-m",
+                m->getMaxVisibility().getVisibility_m() );
 
+    SGMetarVisibility *dirvis = m->getDirVisibility();
+    for (i = 0; i < 8; i++, dirvis++) {
+        const char *min = "/environment/metar/visibility[%d]/min-m";
+        const char *max = "/environment/metar/visibility[%d]/max-m";
+
+        d = dirvis->getVisibility_m();
+
+        snprintf(s, 128, min, i);
+        fgSetDouble(s, d);
+        snprintf(s, 128, max, i);
+        fgSetDouble(s, d);
     }
-#ifdef ENABLE_THREADS
 
-    mutex.lock();
-    metar_cond.signal();
-    mutex.unlock();
+    fgSetInt("/environment/metar/base-wind-range-from",
+             m->getWindRangeFrom() );
+    fgSetInt("/environment/metar/base-wind-range-to",
+             m->getWindRangeTo() );
+    fgSetDouble("/environment/metar/base-wind-speed-kt",
+                m->getWindSpeed_kt() );
+    fgSetDouble("/environment/metar/gust-wind-speed-kt",
+                m->getGustSpeed_kt() );
+    fgSetDouble("/environment/metar/temperature-degc",
+                m->getTemperature_C() );
+    fgSetDouble("/environment/metar/dewpoint-degc",
+                m->getDewpoint_C() );
+    fgSetDouble("/environment/metar/rel-humidity-norm",
+                m->getRelHumidity() );
+    fgSetDouble("/environment/metar/pressure-inhg",
+                m->getPressure_inHg() );
+
+    vector<SGMetarCloud> cv = m->getClouds();
+    vector<SGMetarCloud>::iterator cloud;
+
+    const char *cl = "/environment/clouds/layer[%i]";
+    for (i = 0, cloud = cv.begin(); cloud != cv.end(); cloud++, i++) {
+        const char *coverage_string[5] = 
+            { "clear", "few", "scattered", "broken", "overcast" };
+        const double thickness[5] = { 0, 65, 600,750, 1000};
+        int q;
+
+        snprintf(s, 128, cl, i);
+        strncat(s, "/coverage", 128);
+        q = cloud->getCoverage();
+        fgSetString(s, coverage_string[q] );
+
+        snprintf(s, 128, cl, i);
+        strncat(s, "/elevation-ft", 128);
+        fgSetDouble(s, cloud->getAltitude_ft() + station_elevation_ft);
+
+        snprintf(s, 128, cl, i);
+        strncat(s, "/thickness-ft", 128);
+        fgSetDouble(s, thickness[q]);
+
+        snprintf(s, 128, cl, i);
+        strncat(s, "/span-m", 128);
+        fgSetDouble(s, 40000.0);
+    }
 
-    if (m == NULL)
-        return false;
+    for (; i < FGEnvironmentMgr::MAX_CLOUD_LAYERS; i++) {
+        snprintf(s, 128, cl, i);
+        strncat(s, "/coverage", 128);
+        fgSetString(s, "clear");
 
-#else
-    catch (const sg_io_exception& e) {
-        SG_LOG( SG_GENERAL, SG_WARN, "Error fetching live weather data: "
-                                      << e.getFormattedMessage().c_str() );
-        return false;
+        snprintf(s, 128, cl, i);
+        strncat(s, "/elevation-ft", 128);
+        fgSetDouble(s, -9999);
+
+        snprintf(s, 128, cl, i);
+        strncat(s, "/thickness-ft", 128);
+        fgSetDouble(s, 0);
+
+        snprintf(s, 128, cl, i);
+        strncat(s, "/span-m", 128);
+        fgSetDouble(s, 40000.0);
     }
-#endif // ENABLE_THREADS
 
-    return true;
+    fgSetDouble("/environment/metar/rain-norm", m->getRain());
+    fgSetDouble("/environment/metar/hail-norm", m->getHail());
+    fgSetDouble("/environment/metar/snow-norm", m->getSnow());
+    fgSetBool("/environment/metar/snow-cover", m->getSnowCover());
 }
 
-#ifdef ENABLE_THREADS
+
+#if defined(ENABLE_THREADS) && ENABLE_THREADS
 /**
  *
  */
 void
 FGMetarEnvironmentCtrl::MetarThread::run()
 {
-    SGMetar *m = NULL;
-
-    // pthread_cleanup_push( metar_cleanup_handler, fetcher );
+    pthread_cleanup_push( metar_cleanup_handler, fetcher );
     while ( true )
     {
         set_cancel( SGThread::CANCEL_DISABLE );
-        try
-        {
-            cout << "Fetching ..." << endl;
-            // if (m != NULL)  m = NULL;
-            string host = fetcher->proxy_host->getStringValue();
-            string auth = fetcher->proxy_auth->getStringValue();
-            string port = fetcher->proxy_port->getStringValue();
-            m = new SGMetar( fetcher->_icao, host, port, auth );
-
-        } catch (const sg_io_exception& e) {
-            // SG_LOG( SG_GENERAL, SG_WARN, "Error fetching live weather data: "
-            //                             << e.getFormattedMessage().c_str() );
-            m = NULL;
-        }
-        set_cancel( SGThread::CANCEL_DEFERRED );
 
-        fetcher->metar_queue.push( m );
+        string icao = fetcher->request_queue.pop();
+        SG_LOG( SG_GENERAL, SG_INFO, "Thread: fetch metar data = " << icao );
+        FGMetarResult result = fetcher->fetch_data( icao );
+
+        set_cancel( SGThread::CANCEL_DEFERRED );
 
-        // Wait for the next frame signal before we fetch the next metar data
-        fetcher->mutex.lock();
-        fetcher->metar_cond.wait( fetcher->mutex );
-        fetcher->mutex.unlock();
+        fetcher->result_queue.push( result );
     }
-    // pthread_cleanup_pop(1);
+    pthread_cleanup_pop(1);
 }
 
 /**