-// moonpos.cxx (basically, this is a slightly modified version of the 'sunpos.cxx' file, adapted from XEarth)
-
+// moonpos.cxx (basically, this is a slightly modified version of the
+// 'sunpos.cxx' file, adapted from XEarth)
+//
// kirk johnson
// july 1993
//
#include <simgear/compiler.h>
-#ifdef FG_HAVE_STD_INCLUDES
+#ifdef SG_HAVE_STD_INCLUDES
# include <cmath>
# include <cstdio>
# include <ctime>
#include <simgear/math/polar3d.hxx>
#include <simgear/math/sg_geodesy.hxx>
#include <simgear/math/vector.hxx>
+#include <simgear/timing/sg_time.hxx>
#include <Main/globals.hxx>
-#include <Main/views.hxx>
+#include <Main/viewer.hxx>
#include <Scenery/scenery.hxx>
+#include <Time/light.hxx>
#include "moonpos.hxx"
/*
* assuming the apparent orbit of the moon about the earth is circular,
* the rate at which the orbit progresses is given by RadsPerDay --
- * FG_2PI radians per orbit divided by 365.242191 days per year:
+ * SG_2PI radians per orbit divided by 365.242191 days per year:
*/
-#define RadsPerDay (FG_2PI/365.242191)
+#define RadsPerDay (SG_2PI/365.242191)
/*
* details of moon's apparent orbit at epoch 1990.0 (after
* Eccentricity (eccentricity of orbit) 0.016713
*/
-#define Epsilon_g (279.403303*(FG_2PI/360))
-#define OmegaBar_g (282.768422*(FG_2PI/360))
+#define Epsilon_g (279.403303*(SGD_2PI/360))
+#define OmegaBar_g (282.768422*(SGD_2PI/360))
#define Eccentricity (0.016713)
/*
* 1990.0 (computed as 23.440592 degrees according to the method given
* in duffett-smith, section 27)
*/
-#define MeanObliquity (23.440592*(FG_2PI/360))
+#define MeanObliquity (23.440592*(SGD_2PI/360))
/* static double solve_keplers_equation(double); */
/* static double moon_ecliptic_longitude(time_t); */
D = DaysSinceEpoch(ssue);
N = RadsPerDay * D;
- N = fmod(N, FG_2PI);
- if (N < 0) N += FG_2PI;
+ N = fmod(N, SG_2PI);
+ if (N < 0) N += SG_2PI;
M_moon = N + Epsilon_g - OmegaBar_g;
- if (M_moon < 0) M_moon += FG_2PI;
+ if (M_moon < 0) M_moon += SG_2PI;
E = solve_keplers_equation(M_moon);
v = 2 * atan(sqrt((1+Eccentricity)/(1-Eccentricity)) * tan(E/2));
/* 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" );
}
ecliptic_to_equatorial( globals->get_ephem()->get_moon()->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;
globals->get_ephem()->get_moon()->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);
+// tmp = alpha - (SG_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;
// update the cur_time_params structure with the current moon position
void fgUpdateMoonPos( void ) {
- fgLIGHT *l;
- FGView *v;
- sgVec3 nup, nmoon, v0, surface_to_moon;
- Point3D p, rel_moonpos;
+ sgVec3 nup, nmoon;
+ Point3D rel_moonpos;
double dot, east_dot;
double moon_gd_lat, sl_radius;
- l = &cur_light_params;
+ // vector in cartesian coordinates from current position to the
+ // postion on the earth's surface the moon is directly over
+ sgVec3 to_moon;
+
+ // surface direction to go to head towards moon
+ sgVec3 surface_to_moon;
+
+ FGLight *l = (FGLight *)(globals->get_subsystem("lighting"));
SGTime *t = globals->get_time_params();
- v = ¤t_view;
+ FGViewer *v = globals->get_current_view();
- FG_LOG( FG_EVENT, FG_INFO, " Updating Moon position" );
+ SG_LOG( SG_EVENT, SG_INFO, " Updating Moon position" );
- // (not sure why there was two)
- // fgMoonPosition(t->cur_time, &l->moon_lon, &moon_gd_lat);
- fgMoonPositionGST(t->getGst(), &l->moon_lon, &moon_gd_lat);
+ double moon_l;
+ fgMoonPositionGST(t->getGst(), &moon_l, &moon_gd_lat);
+ l->set_moon_lon(moon_l);
- sgGeodToGeoc(moon_gd_lat, 0.0, &sl_radius, &l->moon_gc_lat);
+ sgGeodToGeoc(moon_gd_lat, 0.0, &sl_radius, &moon_l);
+ l->set_moon_gc_lat(moon_l);
- p = Point3D( l->moon_lon, l->moon_gc_lat, sl_radius );
- l->fg_moonpos = sgPolarToCart3d(p);
+ Point3D p = Point3D( l->get_moon_lon(), l->get_moon_gc_lat(), sl_radius );
+ l->set_moonpos( sgPolarToCart3d(p) );
- FG_LOG( FG_EVENT, FG_INFO, " t->cur_time = " << t->get_cur_time() );
- FG_LOG( FG_EVENT, FG_INFO,
+ SG_LOG( SG_EVENT, SG_INFO, " t->cur_time = " << t->get_cur_time() );
+ SG_LOG( SG_EVENT, SG_INFO,
" Moon Geodetic lat = " << moon_gd_lat
- << " Geocentric lat = " << l->moon_gc_lat );
+ << " Geocentric lat = " << l->get_moon_gc_lat() );
// update the sun light vector
- sgSetVec4( l->moon_vec,
- l->fg_moonpos.x(), l->fg_moonpos.y(), l->fg_moonpos.z(), 0.0 );
- sgNormalizeVec4( l->moon_vec );
- sgCopyVec4( l->moon_vec_inv, l->moon_vec );
- sgNegateVec4( l->moon_vec_inv );
+ sgSetVec4( l->moon_vec(), l->get_moonpos().x(),
+ l->get_moonpos().y(), l->get_moonpos().z(), 0.0 );
+ sgNormalizeVec4( l->moon_vec() );
+ sgCopyVec4( l->moon_vec_inv(), l->moon_vec() );
+ sgNegateVec4( l->moon_vec_inv() );
// make sure these are directional light sources only
- l->moon_vec[3] = l->moon_vec_inv[3] = 0.0;
+ l->moon_vec()[3] = l->moon_vec_inv()[3] = 0.0;
// cout << " l->moon_vec = " << l->moon_vec[0] << "," << l->moon_vec[1]
// << ","<< l->moon_vec[2] << endl;
// calculate the moon's relative angle to local up
- sgCopyVec3( nup, v->get_local_up() );
- sgSetVec3( nmoon, l->fg_moonpos.x(), l->fg_moonpos.y(), l->fg_moonpos.z() );
+ sgCopyVec3( nup, v->get_world_up() );
+ sgSetVec3( nmoon, l->get_moonpos().x(),
+ l->get_moonpos().y(), l->get_moonpos().z() );
sgNormalizeVec3(nup);
sgNormalizeVec3(nmoon);
// cout << "nup = " << nup[0] << "," << nup[1] << ","
// cout << "nmoon = " << nmoon[0] << "," << nmoon[1] << ","
// << nmoon[2] << endl;
- l->moon_angle = acos( sgScalarProductVec3( nup, nmoon ) );
- cout << "moon angle relative to current location = "
- << l->moon_angle << endl;
+ l->set_moon_angle( acos( sgScalarProductVec3( nup, nmoon ) ) );
+ SG_LOG( SG_EVENT, SG_INFO, "moon angle relative to current location = "
+ << l->get_moon_angle() );
// calculate vector to moon's position on the earth's surface
- rel_moonpos = l->fg_moonpos - (v->get_view_pos() + scenery.center);
- v->set_to_moon( rel_moonpos.x(), rel_moonpos.y(), rel_moonpos.z() );
+ Point3D vp( v->get_view_pos()[0],
+ v->get_view_pos()[1],
+ v->get_view_pos()[2] );
+ rel_moonpos = l->get_moonpos()-(vp + globals->get_scenery()->get_center());
+ sgSetVec3( to_moon, rel_moonpos.x(), rel_moonpos.y(), rel_moonpos.z() );
// printf( "Vector to moon = %.2f %.2f %.2f\n",
- // v->to_moon[0], v->to_moon[1], v->to_moon[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() );
+ // to_moon[0], to_moon[1], to_moon[2]);
// Given a vector from the view position to the point on the
// earth's surface the moon 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_moon(), surface_to_moon );
+ sgmap_vec_onto_cur_surface_plane( v->get_world_up(), v->get_view_pos(),
+ to_moon, surface_to_moon );
sgNormalizeVec3(surface_to_moon);
- v->set_surface_to_moon( surface_to_moon[0], surface_to_moon[1],
- surface_to_moon[2] );
// cout << "(sg) Surface direction to moon is "
// << surface_to_moon[0] << ","
// << surface_to_moon[1] << ","
// v->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_moon, v->get_surface_east() );
- // cout << " East dot product = " << east_dot << endl;
+ // cout << " East dot product = " << east_dot << endl;
// calculate the angle between v->surface_to_moon and
// v->surface_south. this is how much we have to rotate the sky
// cout << " Dot product = " << dot << endl;
if ( east_dot >= 0 ) {
- l->moon_rotation = acos(dot);
+ l->set_moon_rotation( acos(dot) );
} else {
- l->moon_rotation = -acos(dot);
+ l->set_moon_rotation( -acos(dot) );
}
// cout << " Sky needs to rotate = " << angle << " rads = "
- // << angle * RAD_TO_DEG << " degrees." << endl;
+ // << angle * SGD_RADIANS_TO_DEGREES << " degrees." << endl;
}