X-Git-Url: https://git.mxchange.org/?a=blobdiff_plain;f=src%2FTime%2Fsunpos.cxx;h=0b1e03f595c496fb517912640dbc63b74bd5f25e;hb=fbd21c499f126c60dc764cb8ddbe48961c1adeb2;hp=07d943ca8fde4732dab89cac9eaa51ab0bed29cc;hpb=cc26bb7fe73be1fa23b5e1c3b88f71e0d361a4c2;p=flightgear.git

diff --git a/src/Time/sunpos.cxx b/src/Time/sunpos.cxx
index 07d943ca8..0b1e03f59 100644
--- a/src/Time/sunpos.cxx
+++ b/src/Time/sunpos.cxx
@@ -40,10 +40,13 @@
 
 #include <simgear/compiler.h>
 
-#ifdef FG_HAVE_STD_INCLUDES
+#ifdef SG_HAVE_STD_INCLUDES
 #  include <cmath>
 #  include <cstdio>
 #  include <ctime>
+#  ifdef macintosh
+     SG_USING_STD(time_t);
+#  endif
 #else
 #  include <math.h>
 #  include <stdio.h>
@@ -52,22 +55,22 @@
 
 #include <simgear/constants.h>
 #include <simgear/debug/logstream.hxx>
-#include <simgear/math/fg_geodesy.hxx>
+#include <simgear/ephemeris/ephemeris.hxx>
 #include <simgear/math/point3d.hxx>
 #include <simgear/math/polar3d.hxx>
+#include <simgear/math/sg_geodesy.hxx>
 #include <simgear/math/vector.hxx>
+#include <simgear/timing/sg_time.hxx>
 
-#include <Astro/solarsystem.hxx>
-#include <Main/views.hxx>
+#include <Main/globals.hxx>
+#include <Main/viewer.hxx>
 #include <Scenery/scenery.hxx>
+#include <Time/light.hxx>
 
-#include "fg_time.hxx"
 #include "sunpos.hxx"
 
-extern SolarSystem *solarSystem;
-
-#undef E
-#define MeanObliquity (23.440592*(FG_2PI/360))
+// #undef E // should no longer be needed
+#define MeanObliquity (23.440592*(SGD_2PI/360))
 
 static void   ecliptic_to_equatorial(double, double, double *, double *);
 static double julian_date(int, int, int);
@@ -107,7 +110,7 @@ static double julian_date(int y, int m, int d) {
 
     /* lazy test to ensure gregorian calendar */
     if (y < 1583) {
-	FG_LOG( FG_EVENT, FG_ALERT, 
+	SG_LOG( SG_EVENT, SG_ALERT, 
 		"WHOOPS! Julian dates only valid for 1582 oct 15 or later" );
     }
 
@@ -188,15 +191,15 @@ void fgSunPosition(time_t ssue, double *lon, double *lat) {
      * every ten minutes. (Comment added by Durk Talsma).
      ************************************************************************/
 
-    ecliptic_to_equatorial( SolarSystem::theSolarSystem->getSun()->getLon(),
+    ecliptic_to_equatorial( globals->get_ephem()->get_sun()->getLon(),
 			    0.0, &alpha, &delta );
-    tmp = alpha - (FG_2PI/24)*GST(ssue);
-    if (tmp < -FG_PI) {
-	do tmp += FG_2PI;
-	while (tmp < -FG_PI);
-    } else if (tmp > FG_PI) {
-	do tmp -= FG_2PI;
-	while (tmp < -FG_PI);
+    tmp = alpha - (SGD_2PI/24)*GST(ssue);
+    if (tmp < -SGD_PI) {
+	do tmp += SGD_2PI;
+	while (tmp < -SGD_PI);
+    } else if (tmp > SGD_PI) {
+	do tmp -= SGD_2PI;
+	while (tmp < -SGD_PI);
     }
 
     *lon = tmp;
@@ -208,7 +211,7 @@ void fgSunPosition(time_t ssue, double *lon, double *lat) {
  * meridian (GST), compute position on the earth (lat, lon) such that
  * sun is directly overhead.  (lat, lon are reported in radians */
 
-static void fgSunPositionGST(double gst, double *lon, double *lat) {
+void fgSunPositionGST(double gst, double *lon, double *lat) {
     /* time_t  ssue;           seconds since unix epoch */
     /* double *lat;            (return) latitude        */
     /* double *lon;            (return) longitude       */
@@ -220,18 +223,18 @@ static void fgSunPositionGST(double gst, double *lon, double *lat) {
     /* lambda = sun_ecliptic_longitude(ssue); */
     /* ecliptic_to_equatorial(lambda, 0.0, &alpha, &delta); */
     //ecliptic_to_equatorial (solarPosition.lonSun, 0.0, &alpha, &delta);
-    ecliptic_to_equatorial( SolarSystem::theSolarSystem->getSun()->getLon(),
-			    SolarSystem::theSolarSystem->getSun()->getLat(),
-			    &alpha,  &delta );
-
-//    tmp = alpha - (FG_2PI/24)*GST(ssue);
-    tmp = alpha - (FG_2PI/24)*gst;	
-    if (tmp < -FG_PI) {
-	do tmp += FG_2PI;
-	while (tmp < -FG_PI);
-    } else if (tmp > FG_PI) {
-	do tmp -= FG_2PI;
-	while (tmp < -FG_PI);
+    ecliptic_to_equatorial( globals->get_ephem()->get_sun()->getLon(),
+			    globals->get_ephem()->get_sun()->getLat(),
+			    &alpha, &delta );
+
+    // tmp = alpha - (SGD_2PI/24)*GST(ssue);
+    tmp = alpha - (SGD_2PI/24)*gst;	
+    if (tmp < -SGD_PI) {
+	do tmp += SGD_2PI;
+	while (tmp < -SGD_PI);
+    } else if (tmp > SGD_PI) {
+	do tmp -= SGD_2PI;
+	while (tmp < -SGD_PI);
     }
 
     *lon = tmp;
@@ -241,47 +244,56 @@ static void fgSunPositionGST(double gst, double *lon, double *lat) {
 
 // update the cur_time_params structure with the current sun position
 void fgUpdateSunPos( void ) {
-    fgLIGHT *l;
-    FGTime *t;
-    FGView *v;
-    sgVec3 nup, nsun, v0, surface_to_sun;
-    Point3D p, rel_sunpos;
+    sgVec3 nup, nsun;
+    Point3D rel_sunpos;
     double dot, east_dot;
     double sun_gd_lat, sl_radius;
 
-    l = &cur_light_params;
-    t = FGTime::cur_time_params;
-    v = &current_view;
+    // vector in cartesian coordinates from current position to the
+    // postion on the earth's surface the sun is directly over
+    sgVec3 to_sun;
+
+    // surface direction to go to head towards sun
+    sgVec3 surface_to_sun;
 
-    FG_LOG( FG_EVENT, FG_INFO, "  Updating Sun position" );
+    FGLight *l = (FGLight *)(globals->get_subsystem("lighting"));
+    SGTime *t = globals->get_time_params();
+    FGViewer *v = globals->get_current_view();
 
-    fgSunPositionGST(t->getGst(), &l->sun_lon, &sun_gd_lat);
+    SG_LOG( SG_EVENT, SG_INFO, "  Updating Sun position" );
+    SG_LOG( SG_EVENT, SG_INFO, "  Gst = " << t->getGst() );
 
-    fgGeodToGeoc(sun_gd_lat, 0.0, &sl_radius, &l->sun_gc_lat);
+    double sun_l;
+    fgSunPositionGST(t->getGst(), &sun_l, &sun_gd_lat);
+    l->set_sun_lon(sun_l);
 
-    p = Point3D( l->sun_lon, l->sun_gc_lat, sl_radius );
-    l->fg_sunpos = fgPolarToCart3d(p);
+    sgGeodToGeoc(sun_gd_lat, 0.0, &sl_radius, &sun_l);
+    l->set_sun_gc_lat(sun_l);
 
-    FG_LOG( FG_EVENT, FG_INFO, "    t->cur_time = " << t->get_cur_time() );
-    FG_LOG( FG_EVENT, FG_INFO, 
+    Point3D p = Point3D( l->get_sun_lon(), l->get_sun_gc_lat(), sl_radius );
+    l->set_sunpos( sgPolarToCart3d(p) );
+
+    SG_LOG( SG_EVENT, SG_INFO, "    t->cur_time = " << t->get_cur_time() );
+    SG_LOG( SG_EVENT, SG_INFO, 
 	    "    Sun Geodetic lat = " << sun_gd_lat
-	    << " Geocentric lat = " << l->sun_gc_lat );
+	    << " Geocentric lat = " << l->get_sun_gc_lat() );
 
     // update the sun light vector
-    sgSetVec4( l->sun_vec, 
-	       l->fg_sunpos.x(), l->fg_sunpos.y(), l->fg_sunpos.z(), 0.0 );
-    sgNormalizeVec4( l->sun_vec );
-    sgCopyVec4( l->sun_vec_inv, l->sun_vec );
-    sgNegateVec4( l->sun_vec_inv );
+    sgSetVec4( l->sun_vec(), l->get_sunpos().x(),
+	       l->get_sunpos().y(), l->get_sunpos().z(), 0.0 );
+    sgNormalizeVec4( l->sun_vec() );
+    sgCopyVec4( l->sun_vec_inv(), l->sun_vec() );
+    sgNegateVec4( l->sun_vec_inv() );
 
     // make sure these are directional light sources only
-    l->sun_vec[3] = l->sun_vec_inv[3] = 0.0;
+    l->sun_vec()[3] = l->sun_vec_inv()[3] = 0.0;
     // cout << "  l->sun_vec = " << l->sun_vec[0] << "," << l->sun_vec[1]
     //      << ","<< l->sun_vec[2] << endl;
 
     // calculate the sun's relative angle to local up
-    sgCopyVec3( nup, v->get_local_up() );
-    sgSetVec3( nsun, l->fg_sunpos.x(), l->fg_sunpos.y(), l->fg_sunpos.z() );
+    sgCopyVec3( nup, v->get_world_up() );
+    sgSetVec3( nsun, l->get_sunpos().x(),
+               l->get_sunpos().y(), l->get_sunpos().z() );
     sgNormalizeVec3(nup);
     sgNormalizeVec3(nsun);
     // cout << "nup = " << nup[0] << "," << nup[1] << "," 
@@ -289,28 +301,26 @@ void fgUpdateSunPos( void ) {
     // cout << "nsun = " << nsun[0] << "," << nsun[1] << "," 
     //      << nsun[2] << endl;
 
-    l->sun_angle = acos( sgScalarProductVec3 ( nup, nsun ) );
-    cout << "sun angle relative to current location = " << l->sun_angle << endl;
+    l->set_sun_angle( acos( sgScalarProductVec3 ( nup, nsun ) ) );
+    SG_LOG( SG_EVENT, SG_INFO, "sun angle relative to current location = "
+	    << l->get_sun_angle() );
     
     // calculate vector to sun's position on the earth's surface
-    rel_sunpos = l->fg_sunpos - (v->get_view_pos() + scenery.center);
-    v->set_to_sun( rel_sunpos.x(), rel_sunpos.y(), rel_sunpos.z() );
+    Point3D vp( v->get_view_pos()[0],
+		v->get_view_pos()[1],
+		v->get_view_pos()[2] );
+    rel_sunpos = l->get_sunpos() - (vp + globals->get_scenery()->get_center());
+    sgSetVec3( to_sun, rel_sunpos.x(), rel_sunpos.y(), rel_sunpos.z() );
     // printf( "Vector to sun = %.2f %.2f %.2f\n",
     //         v->to_sun[0], v->to_sun[1], v->to_sun[2]);
 
-    // make a vector to the current view position
-    Point3D view_pos = v->get_view_pos();
-    sgSetVec3( v0, view_pos.x(), view_pos.y(), view_pos.z() );
-
     // Given a vector from the view position to the point on the
     // earth's surface the sun is directly over, map into onto the
     // local plane representing "horizontal".
 
-    sgmap_vec_onto_cur_surface_plane( v->get_local_up(), v0, v->get_to_sun(), 
-				      surface_to_sun );
+    sgmap_vec_onto_cur_surface_plane( v->get_world_up(), v->get_view_pos(),
+				      to_sun, surface_to_sun );
     sgNormalizeVec3(surface_to_sun);
-    v->set_surface_to_sun( surface_to_sun[0], surface_to_sun[1], 
-			   surface_to_sun[2] );
     // cout << "(sg) Surface direction to sun is "
     //   << surface_to_sun[0] << "," 
     //   << surface_to_sun[1] << ","
@@ -318,9 +328,10 @@ void fgUpdateSunPos( void ) {
     // cout << "Should be close to zero = " 
     //   << sgScalarProductVec3(nup, surface_to_sun) << endl;
 
-    // calculate the angle between v->surface_to_sun and
-    // v->surface_east.  We do this so we can sort out the acos()
-    // ambiguity.  I wish I could think of a more efficient way ... :-(
+    // calculate the angle between surface_to_sun and
+    // v->get_surface_east().  We do this so we can sort out the
+    // acos() ambiguity.  I wish I could think of a more efficient
+    // way. :-(
     east_dot = sgScalarProductVec3( surface_to_sun, v->get_surface_east() );
     // cout << "  East dot product = " << east_dot << endl;
 
@@ -330,13 +341,19 @@ void fgUpdateSunPos( void ) {
     dot = sgScalarProductVec3( surface_to_sun, v->get_surface_south() );
     // cout << "  Dot product = " << dot << endl;
 
+    if (dot > 1) {
+        SG_LOG( SG_ASTRO, SG_WARN,
+                "Dot product  = " << dot << " is greater than 1.0" );
+        dot = 1.0;
+    }
+
     if ( east_dot >= 0 ) {
-	l->sun_rotation = acos(dot);
+	l->set_sun_rotation( acos(dot) );
     } else {
-	l->sun_rotation = -acos(dot);
+	l->set_sun_rotation( -acos(dot) );
     }
     // cout << "  Sky needs to rotate = " << angle << " rads = "
-    //      << angle * RAD_TO_DEG << " degrees." << endl;
+    //      << angle * SGD_RADIANS_TO_DEGREES << " degrees." << endl;
 }