# include <sys/time.h> // for get/setitimer, gettimeofday, struct timeval
#endif
-#include <Debug/fg_debug.h>
-#include <Flight/flight.h>
+#ifdef WIN32
+# include <windows.h>
+# if defined( __CYGWIN__ ) || defined( __CYGWIN32__ )
+# define NEAR /* */
+# define FAR /* */
+# endif
+# include <mmsystem.h>
+#endif
+
+#include <Astro/sky.hxx>
+#include <Astro/solarsystem.hxx>
+#include <Debug/logstream.hxx>
+#include <Flight/flight.hxx>
#include <Include/fg_constants.h>
#include <Main/options.hxx>
+#include <Time/light.hxx>
#include "fg_time.hxx"
#define DEGHR(x) ((x)/15.)
#define RADHR(x) DEGHR(x*RAD_TO_DEG)
+// #define MK_TIME_IS_GMT 0 // default value
+// #define TIME_ZONE_OFFSET_WORK 0 // default value
-fgTIME cur_time_params;
+fgTIME cur_time_params;
-// Initialize the time dependent variables
-void fgTimeInit(fgTIME *t) {
- fgOPTIONS *o;
+// Force an update of the sky and lighting parameters
+static void local_update_sky_and_lighting_params( void ) {
+ // fgSunInit();
+ SolarSystem::theSolarSystem->rebuild();
+ cur_light_params.Update();
+ fgSkyColorsInit();
+}
- o = ¤t_options;
- fgPrintf( FG_EVENT, FG_INFO, "Initializing Time\n");
+// Initialize the time dependent variables
+void fgTimeInit(fgTIME *t) {
+ FG_LOG( FG_EVENT, FG_INFO, "Initializing Time" );
t->gst_diff = -9999.0;
- fgPrintf( FG_EVENT, FG_DEBUG, "o->time_offset = %d\n", o->time_offset);
- t->warp = o->time_offset;
+ FG_LOG( FG_EVENT, FG_DEBUG,
+ "time offset = " << current_options.get_time_offset() );
+
+ t->warp = current_options.get_time_offset();
t->warp_delta = 0;
+
+ t->pause = current_options.get_pause();
}
// Portability wrap to get current time.
void timestamp(fg_timestamp *timestamp) {
-#if defined( HAVE_GETTIMEOFDAY )
+#if defined( WIN32 )
+ unsigned int t;
+ t = timeGetTime();
+ timestamp->seconds = 0;
+ timestamp->millis = t;
+#elif defined( HAVE_GETTIMEOFDAY )
struct timeval current;
struct timezone tz;
// fg_timestamp currtime;
// Return duration in millis from first to last
long timediff(fg_timestamp *first, fg_timestamp *last) {
- return 1000 * (last->seconds - first->seconds) +
- (last->millis - first->millis);
+#if defined( WIN32 )
+ return (last->millis - first->millis);
+#else
+ return ( 1000 * (last->seconds - first->seconds) +
+ (last->millis - first->millis) );
+#endif
}
// Return new timestamp given a time stamp and an interval to add in
void timesum(fg_timestamp *res, fg_timestamp *start, long millis) {
+#ifdef WIN32
+ res->seconds = 0;
+ res->millis = ( start->millis + millis );
+#else
res->seconds = start->seconds +
( start->millis + millis ) / 1000;
res->millis = ( start->millis + millis ) % 1000;
+#endif
}
}
-// given an mjd, return greenwich mean siderial time, gst
+// given an mjd, return greenwich mean sidereal time, gst
double utc_gst (double mjd) {
double gst;
x /= 3600.0;
gst = (1.0/SIDRATE)*hr + x;
- fgPrintf( FG_EVENT, FG_DEBUG, " gst => %.4f\n", gst);
+ FG_LOG( FG_EVENT, FG_DEBUG, " gst => " << gst );
return(gst);
}
}
-// return a courser but cheaper estimate of sidereal time
-double sidereal_course(struct tm *gmt, time_t now, double lng) {
- time_t start, start_gmt;
- struct tm mt;
- long int offset;
- double diff, part, days, hours, lst;
-
- // I believe the mktime() has a SYSV vs. BSD behavior difference.
+// Fix up timezone if using ftime()
+long int fix_up_timezone( long int timezone_orig ) {
+#if !defined( HAVE_GETTIMEOFDAY ) && defined( HAVE_FTIME )
+ // ftime() needs a little extra help finding the current timezone
+ struct timeb current;
+ ftime(¤t);
+ return( current.timezone * 60 );
+#else
+ return( timezone_orig );
+#endif
+}
- // The BSD style mktime() is nice because it returns its result
- // assuming you have specified the input time in GMT
- // The SYSV style mktime() is a pain because it returns its result
- // assuming you have specified the input time in your local
- // timezone. Therefore you have to go to extra trouble to convert
- // back to GMT.
+// Return time_t for Sat Mar 21 12:00:00 GMT
+//
+// I believe the mktime() has a SYSV vs. BSD behavior difference.
+//
+// The BSD style mktime() is nice because it returns its result
+// assuming you have specified the input time in GMT
+//
+// The SYSV style mktime() is a pain because it returns its result
+// assuming you have specified the input time in your local timezone.
+// Therefore you have to go to extra trouble to convert back to GMT.
+//
+// If you are having problems with incorrectly positioned astronomical
+// bodies, this is a really good place to start looking.
- // If you are having problems with incorrectly positioned
- // astronomical bodies, this is a really good place to start
- // looking.
+time_t get_start_gmt(int year) {
+ struct tm mt;
-#if !defined(HAVE_DAYLIGHT)
// For now we assume that if daylight is not defined in
// /usr/include/time.h that we have a machine with a BSD behaving
// mktime()
- int mktime_is_gmt = 1;
-
- // only used for systems with SYSV style mktime() to compensate
- // for mktime() assuming local timezone but we need to define this
- // to keep the compiler happy
- int daylight;
-#else
- int mktime_is_gmt = 0;
-#endif
-
-#if !defined(HAVE_TIMEZONE)
- // only used for systems with SYSV style mktime() to compensate
- // for mktime() assuming local timezone but we need to define this
- // to keep the compiler happy
- long int timezone;
-#endif
-
- // ftime() needs a little extra help finding the current timezone
-#if defined( HAVE_GETTIMEOFDAY )
-#elif defined( HAVE_FTIME )
- struct timeb current;
-#else
-# error Port me
-#endif
+# if !defined(HAVE_DAYLIGHT)
+# define MK_TIME_IS_GMT 1
+# endif
- fgPrintf(FG_EVENT, FG_DEBUG,
- " COURSE: GMT = %d/%d/%2d %d:%02d:%02d\n",
- gmt->tm_mon, gmt->tm_mday, gmt->tm_year,
- gmt->tm_hour, gmt->tm_min, gmt->tm_sec);
+ // timezone seems to work as a proper offset for Linux & Solaris
+# if defined( __linux__ ) || defined( __sun__ )
+# define TIMEZONE_OFFSET_WORKS 1
+# endif
mt.tm_mon = 2;
mt.tm_mday = 21;
- mt.tm_year = gmt->tm_year;
+ mt.tm_year = year;
mt.tm_hour = 12;
mt.tm_min = 0;
mt.tm_sec = 0;
mt.tm_isdst = -1; // let the system determine the proper time zone
- if ( mktime_is_gmt ) {
- start_gmt = mktime(&mt);
- } else {
- start = mktime(&mt);
- daylight = mt.tm_isdst;
+# if defined( MK_TIME_IS_GMT )
+ return ( mktime(&mt) );
+# else // ! defined ( MK_TIME_IS_GMT )
- fgPrintf( FG_EVENT, FG_DEBUG, "start1 = %ld\n", start);
- fgPrintf( FG_EVENT, FG_DEBUG, "start2 = %s (tm_isdst = %d)",
- ctime(&start), mt.tm_isdst);
+ long int start = mktime(&mt);
- // ftime() needs a little extra help finding the current timezone
-#if defined( HAVE_GETTIMEOFDAY )
-#elif defined( HAVE_FTIME )
- ftime(¤t);
- timezone = current.timezone * 60;
-#else
-# error Port me
-#endif
+ FG_LOG( FG_EVENT, FG_DEBUG, "start1 = " << start );
+ // the ctime() call can screw up time progression on some versions
+ // of Linux
+ // fgPrintf( FG_EVENT, FG_DEBUG, "start2 = %s", ctime(&start));
+ FG_LOG( FG_EVENT, FG_DEBUG, "(tm_isdst = " << mt.tm_isdst << ")" );
- if ( daylight > 0 ) {
- daylight = 1;
- } else if ( daylight < 0 ) {
- fgPrintf( FG_EVENT, FG_WARN,
- "OOOPS, big time problem in fg_time.c, no daylight savings info.\n");
- }
+ timezone = fix_up_timezone( timezone );
- offset = -(timezone / 3600 - daylight);
+# if defined( TIMEZONE_OFFSET_WORKS )
+ FG_LOG( FG_EVENT, FG_DEBUG,
+ "start = " << start << ", timezone = " << timezone );
+ return( start - timezone );
+# else // ! defined( TIMEZONE_OFFSET_WORKS )
- fgPrintf( FG_EVENT, FG_DEBUG,
- " Raw time zone offset = %ld\n", timezone);
- fgPrintf( FG_EVENT, FG_DEBUG,
- " Daylight Savings = %d\n", daylight);
- fgPrintf( FG_EVENT, FG_DEBUG,
- " Local hours from GMT = %ld\n", offset);
+ daylight = mt.tm_isdst;
+ if ( daylight > 0 ) {
+ daylight = 1;
+ } else if ( daylight < 0 ) {
+ FG_LOG( FG_EVENT, FG_WARN,
+ "OOOPS, problem in fg_time.cxx, no daylight savings info." );
+ }
- start_gmt = start - timezone + (daylight * 3600);
+ long int offset = -(timezone / 3600 - daylight);
- fgPrintf( FG_EVENT, FG_DEBUG, " March 21 noon (CST) = %ld\n", start);
- }
+ FG_LOG( FG_EVENT, FG_DEBUG,
+ " Raw time zone offset = " << timezone );
+ FG_LOG( FG_EVENT, FG_DEBUG,
+ " Daylight Savings = " << daylight );
+ FG_LOG( FG_EVENT, FG_DEBUG,
+ " Local hours from GMT = " << offset);
+
+ long int start_gmt = start - timezone + (daylight * 3600);
+
+ FG_LOG( FG_EVENT, FG_DEBUG, " March 21 noon (CST) = " << start );
+
+ return ( start_gmt );
+# endif // ! defined( TIMEZONE_OFFSET_WORKS )
+# endif // ! defined ( MK_TIME_IS_GMT )
+}
+
+
+// return a courser but cheaper estimate of sidereal time
+double sidereal_course(fgTIME *t, double lng) {
+ struct tm *gmt;
+ time_t start_gmt, now;
+ double diff, part, days, hours, lst;
+
+ gmt = t->gmt;
+ now = t->cur_time;
+ start_gmt = get_start_gmt(gmt->tm_year);
- fgPrintf( FG_EVENT, FG_DEBUG, " March 21 noon (GMT) = %ld\n", start_gmt);
+ FG_LOG( FG_EVENT, FG_DEBUG,
+ " COURSE: GMT = %d/%d/%2d %d:%02d:%02d\n"
+ << gmt->tm_mon << "/" << gmt->tm_mday << "/" << gmt->tm_year
+ << " "
+ << gmt->tm_hour << ":" << gmt->tm_min << ":" << gmt->tm_sec );
+
+ FG_LOG( FG_EVENT, FG_DEBUG, " March 21 noon (GMT) = " << start_gmt);
diff = (now - start_gmt) / (3600.0 * 24.0);
- fgPrintf( FG_EVENT, FG_DEBUG,
- " Time since 3/21/%2d GMT = %.2f\n", gmt->tm_year, diff);
+ FG_LOG( FG_EVENT, FG_DEBUG,
+ " Time since 3/21/" << gmt->tm_year << " GMT = " << diff );
part = fmod(diff, 1.0);
days = diff - part;
lst += 24.0;
}
- fgPrintf( FG_EVENT, FG_DEBUG,
- " days = %.1f hours = %.2f lon = %.2f lst = %.2f\n",
- days, hours, lng, lst);
+ FG_LOG( FG_EVENT, FG_DEBUG,
+ " days = " << days << " hours = " << hours << " lon = "
+ << lng << " lst = " << lst );
return(lst);
}
void fgTimeUpdate(fgFLIGHT *f, fgTIME *t) {
double gst_precise, gst_course;
- fgPrintf( FG_EVENT, FG_BULK, "Updating time\n");
+ FG_LOG( FG_EVENT, FG_BULK, "Updating time" );
// get current Unix calendar time (in seconds)
t->warp += t->warp_delta;
t->cur_time = time(NULL) + t->warp;
- fgPrintf( FG_EVENT, FG_BULK,
- " Current Unix calendar time = %ld warp = %ld delta = %ld\n",
- t->cur_time, t->warp, t->warp_delta);
+ FG_LOG( FG_EVENT, FG_BULK,
+ " Current Unix calendar time = " << t->cur_time
+ << " warp = " << t->warp << " delta = " << t->warp_delta );
+
+ if ( t->warp_delta ) {
+ // time is changing so force an update
+ local_update_sky_and_lighting_params();
+ }
// get GMT break down for current time
t->gmt = gmtime(&t->cur_time);
- fgPrintf( FG_EVENT, FG_BULK,
- " Current GMT = %d/%d/%2d %d:%02d:%02d\n",
- t->gmt->tm_mon+1, t->gmt->tm_mday, t->gmt->tm_year,
- t->gmt->tm_hour, t->gmt->tm_min, t->gmt->tm_sec);
+ FG_LOG( FG_EVENT, FG_BULK,
+ " Current GMT = " << t->gmt->tm_mon+1 << "/"
+ << t->gmt->tm_mday << "/" << t->gmt->tm_year << " "
+ << t->gmt->tm_hour << ":" << t->gmt->tm_min << ":"
+ << t->gmt->tm_sec );
// calculate modified Julian date
t->mjd = cal_mjd ((int)(t->gmt->tm_mon+1), (double)t->gmt->tm_mday,
// convert "back" to Julian date + partial day (as a fraction of one)
t->jd = t->mjd + MJD0;
- fgPrintf( FG_EVENT, FG_BULK, " Current Julian Date = %.5f\n", t->jd);
+ FG_LOG( FG_EVENT, FG_BULK, " Current Julian Date = " << t->jd );
// printf(" Current Longitude = %.3f\n", FG_Longitude * RAD_TO_DEG);
if ( t->gst_diff < -100.0 ) {
// first time through do the expensive calculation & cheap
// calculation to get the difference.
- fgPrintf( FG_EVENT, FG_INFO, " First time, doing precise gst\n");
+ FG_LOG( FG_EVENT, FG_INFO, " First time, doing precise gst" );
t->gst = gst_precise = sidereal_precise(t->mjd, 0.00);
- gst_course = sidereal_course(t->gmt, t->cur_time, 0.00);
+ gst_course = sidereal_course(t, 0.00);
t->gst_diff = gst_precise - gst_course;
- t->lst =
- sidereal_course(t->gmt, t->cur_time, -(FG_Longitude * RAD_TO_DEG))
- + t->gst_diff;
+ t->lst = sidereal_course(t, -(FG_Longitude * RAD_TO_DEG)) + t->gst_diff;
} else {
// course + difference should drift off very slowly
- t->gst =
- sidereal_course(t->gmt, t->cur_time, 0.00) + t->gst_diff;
- t->lst =
- sidereal_course(t->gmt, t->cur_time, -(FG_Longitude * RAD_TO_DEG))
- + t->gst_diff;
+ t->gst = sidereal_course(t, 0.00) + t->gst_diff;
+ t->lst = sidereal_course(t, -(FG_Longitude * RAD_TO_DEG)) + t->gst_diff;
}
- fgPrintf( FG_EVENT, FG_DEBUG,
- " Current lon=0.00 Sidereal Time = %.3f\n", t->gst);
- fgPrintf( FG_EVENT, FG_DEBUG,
- " Current LOCAL Sidereal Time = %.3f (%.3f) (diff = %.3f)\n",
- t->lst, sidereal_precise(t->mjd, -(FG_Longitude * RAD_TO_DEG)),
- t->gst_diff);
+ FG_LOG( FG_EVENT, FG_DEBUG,
+ " Current lon=0.00 Sidereal Time = " << t->gst );
+ FG_LOG( FG_EVENT, FG_DEBUG,
+ " Current LOCAL Sidereal Time = " << t->lst << " ("
+ << sidereal_precise(t->mjd, -(FG_Longitude * RAD_TO_DEG))
+ << ") (diff = " << t->gst_diff << ")" );
}
// $Log$
+// Revision 1.21 1998/11/06 21:18:26 curt
+// Converted to new logstream debugging facility. This allows release
+// builds with no messages at all (and no performance impact) by using
+// the -DFG_NDEBUG flag.
+//
+// Revision 1.20 1998/11/02 18:25:38 curt
+// Check for __CYGWIN__ (b20) as well as __CYGWIN32__ (pre b20 compilers)
+// Other misc. tweaks.
+//
+// Revision 1.19 1998/10/17 01:34:29 curt
+// C++ ifying ...
+//
+// Revision 1.18 1998/10/02 21:36:09 curt
+// Fixes to try to break through the win95/98 18.3 fps barrier.
+//
+// Revision 1.17 1998/09/15 04:27:49 curt
+// Changes for new astro code.
+//
+// Revision 1.16 1998/08/29 13:11:32 curt
+// Bernie Bright writes:
+// I've created some new classes to enable pointers-to-functions and
+// pointers-to-class-methods to be treated like objects. These objects
+// can be registered with fgEVENT_MGR.
+//
+// File "Include/fg_callback.hxx" contains the callback class defns.
+//
+// Modified fgEVENT and fgEVENT_MGR to use the callback classes. Also
+// some minor tweaks to STL usage.
+//
+// Added file "Include/fg_stl_config.h" to deal with STL portability
+// issues. I've added an initial config for egcs (and probably gcc-2.8.x).
+// I don't have access to Visual C++ so I've left that for someone else.
+// This file is influenced by the stl_config.h file delivered with egcs.
+//
+// Added "Include/auto_ptr.hxx" which contains an implementation of the
+// STL auto_ptr class which is not provided in all STL implementations
+// and is needed to use the callback classes.
+//
+// Deleted fgLightUpdate() which was just a wrapper to call
+// fgLIGHT::Update().
+//
+// Modified fg_init.cxx to register two method callbacks in place of the
+// old wrapper functions.
+//
+// Revision 1.15 1998/08/24 20:12:16 curt
+// Rewrote sidereal_course with simpler parameters.
+//
+// Revision 1.14 1998/08/05 00:20:07 curt
+// Added a local routine to update lighting params every frame when time is
+// accelerated.
+//
+// Revision 1.13 1998/07/30 23:48:55 curt
+// Sgi build tweaks.
+// Pause support.
+//
+// Revision 1.12 1998/07/27 18:42:22 curt
+// Added a pause option.
+//
+// Revision 1.11 1998/07/22 21:45:37 curt
+// fg_time.cxx: Removed call to ctime() in a printf() which should be harmless
+// but seems to be triggering a bug.
+// light.cxx: Added code to adjust fog color based on sunrise/sunset effects
+// and view orientation. This is an attempt to match the fog color to the
+// sky color in the center of the screen. You see discrepancies at the
+// edges, but what else can be done?
+// sunpos.cxx: Caculate local direction to sun here. (what compass direction
+// do we need to face to point directly at sun)
+//
+// Revision 1.10 1998/07/13 21:02:07 curt
+// Wrote access functions for current fgOPTIONS.
+//
+// Revision 1.9 1998/06/12 00:59:53 curt
+// Build only static libraries.
+// Declare memmove/memset for Sloaris.
+// Rewrote fg_time.c routine to get LST start seconds to better handle
+// Solaris, and be easier to port, and understand the GMT vs. local
+// timezone issues.
+//
// Revision 1.8 1998/06/05 18:18:13 curt
// Incorporated some automake conditionals to try to support mktime() correctly
// on a wider variety of platforms.