1 // ExternalNet.hxx -- an net interface to an external flight dynamics model
3 // Written by Curtis Olson, started November 2001.
5 // Copyright (C) 2001 Curtis L. Olson - curt@flightgear.org
7 // This program is free software; you can redistribute it and/or
8 // modify it under the terms of the GNU General Public License as
9 // published by the Free Software Foundation; either version 2 of the
10 // License, or (at your option) any later version.
12 // This program is distributed in the hope that it will be useful, but
13 // WITHOUT ANY WARRANTY; without even the implied warranty of
14 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 // General Public License for more details.
17 // You should have received a copy of the GNU General Public License
18 // along with this program; if not, write to the Free Software
19 // Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
23 #include <simgear/debug/logstream.hxx>
24 #include <simgear/io/lowlevel.hxx> // endian tests
26 #include <Main/fg_props.hxx>
28 #include "ExternalNet.hxx"
31 // FreeBSD works better with this included last ... (?)
32 #if defined(WIN32) && !defined(__CYGWIN__)
35 # include <netinet/in.h> // htonl() ntohl()
39 // The function htond is defined this way due to the way some
40 // processors and OSes treat floating point values. Some will raise
41 // an exception whenever a "bad" floating point value is loaded into a
42 // floating point register. Solaris is notorious for this, but then
43 // so is LynxOS on the PowerPC. By translating the data in place,
44 // there is no need to load a FP register with the "corruped" floating
45 // point value. By doing the BIG_ENDIAN test, I can optimize the
46 // routine for big-endian processors so it can be as efficient as
48 static void htond (double &x)
50 if ( sgIsLittleEndian() ) {
54 Double_Overlay = (int *) &x;
55 Holding_Buffer = Double_Overlay [0];
57 Double_Overlay [0] = htonl (Double_Overlay [1]);
58 Double_Overlay [1] = htonl (Holding_Buffer);
65 static void global2raw( FGRawCtrls *raw ) {
69 SGPropertyNode * node = fgGetNode("/controls", true);
70 raw->version = FG_RAW_CTRLS_VERSION;
71 raw->aileron = node->getDoubleValue( "aileron" );
72 raw->elevator = node->getDoubleValue( "elevator" );
73 raw->elevator_trim = node->getDoubleValue( "elevator-trim" );
74 raw->rudder = node->getDoubleValue( "rudder" );
75 raw->flaps = node->getDoubleValue( "flaps" );
76 for ( i = 0; i < FGRawCtrls::FG_MAX_ENGINES; ++i ) {
77 raw->throttle[i] = node->getDoubleValue( "throttle", 0.0 );
78 raw->mixture[i] = node->getDoubleValue( "mixture", 0.0 );
79 raw->prop_advance[i] = node->getDoubleValue( "propeller-pitch", 0.0 );
80 raw->magnetos[i] = node->getIntValue( "magnetos", 0 );
82 // cout << "Magnetos -> " << node->getIntValue( "magnetos", 0 );
84 raw->starter[i] = node->getBoolValue( "starter", false );
86 // cout << " Starter -> " << node->getIntValue( "stater", false )
90 for ( i = 0; i < FGRawCtrls::FG_MAX_WHEELS; ++i ) {
91 raw->brake[i] = node->getDoubleValue( "brakes", 0.0 );
93 raw->hground = fgGetDouble( "/environment/ground-elevation-m" );
94 raw->magvar = fgGetDouble("/environment/magnetic-variation-deg");
95 raw->speedup = fgGetInt("/sim/speed-up");
97 // convert to network byte order
98 raw->version = htonl(raw->version);
100 htond(raw->elevator);
101 htond(raw->elevator_trim);
104 for ( i = 0; i < FGRawCtrls::FG_MAX_ENGINES; ++i ) {
105 htond(raw->throttle[i]);
106 htond(raw->mixture[i]);
107 htond(raw->prop_advance[i]);
108 htonl(raw->magnetos[i]);
109 htonl(raw->starter[i]);
111 for ( i = 0; i < FGRawCtrls::FG_MAX_WHEELS; ++i ) {
112 htond(raw->brake[i]);
116 raw->speedup = htonl(raw->speedup);
120 static void net2global( FGNetFDM *net ) {
123 // Convert to the net buffer from network format
124 net->version = ntohl(net->version);
126 htond(net->longitude);
127 htond(net->latitude);
128 htond(net->altitude);
134 htond(net->thetadot);
137 htond(net->climb_rate);
139 htond(net->A_X_pilot);
140 htond(net->A_Y_pilot);
141 htond(net->A_Z_pilot);
143 net->num_engines = htonl(net->num_engines);
144 for ( i = 0; i < net->num_engines; ++i ) {
145 htonl(net->eng_state[i]);
147 htond(net->fuel_flow[i]);
149 htond(net->oil_temp[i]);
150 htond(net->oil_px[i]);
153 net->num_tanks = htonl(net->num_tanks);
154 for ( i = 0; i < net->num_tanks; ++i ) {
155 htond(net->fuel_quantity[i]);
158 net->num_wheels = htonl(net->num_wheels);
159 // I don't need to convert the Wow flags, since they are one byte in size
160 htond(net->flap_deflection);
162 net->cur_time = ntohl(net->cur_time);
163 net->warp = ntohl(net->warp);
164 htond(net->visibility);
166 if ( net->version == FG_NET_FDM_VERSION ) {
167 // cout << "pos = " << net->longitude << " " << net->latitude << endl;
168 // cout << "sea level rad = " << cur_fdm_state->get_Sea_level_radius()
170 cur_fdm_state->_updateGeodeticPosition( net->latitude,
173 * SG_METER_TO_FEET );
174 cur_fdm_state->_set_Euler_Angles( net->phi,
177 cur_fdm_state->_set_Euler_Rates( net->phidot,
180 cur_fdm_state->_set_V_calibrated_kts( net->vcas );
181 cur_fdm_state->_set_Climb_Rate( net->climb_rate );
182 cur_fdm_state->_set_Accels_Pilot_Body( net->A_X_pilot,
186 for ( i = 0; i < net->num_engines; ++i ) {
187 SGPropertyNode *node = fgGetNode( "engines/engine", i, true );
189 // node->setBoolValue("running", t->isRunning());
190 // node->setBoolValue("cranking", t->isCranking());
192 // cout << net->eng_state[i] << endl;
193 if ( net->eng_state[i] == 0 ) {
194 node->setBoolValue( "cranking", false );
195 node->setBoolValue( "running", false );
196 } else if ( net->eng_state[i] == 1 ) {
197 node->setBoolValue( "cranking", true );
198 node->setBoolValue( "running", false );
199 } else if ( net->eng_state[i] == 2 ) {
200 node->setBoolValue( "cranking", false );
201 node->setBoolValue( "running", true );
204 node->setDoubleValue( "rpm", net->rpm[i] );
205 node->setDoubleValue( "fuel-flow-gph", net->fuel_flow[i] );
206 node->setDoubleValue( "egt-degf", net->EGT[i] );
207 node->setDoubleValue( "oil-temperature-degf", net->oil_temp[i] );
208 node->setDoubleValue( "oil-pressure-psi", net->oil_px[i] );
211 for (i = 0; i < net->num_tanks; ++i ) {
212 SGPropertyNode * node
213 = fgGetNode("/consumables/fuel/tank", i, true);
214 node->setDoubleValue("level-gal_us", net->fuel_quantity[i] );
217 for (i = 0; i < net->num_wheels; ++i ) {
218 SGPropertyNode * node
219 = fgGetNode("/gear/gear", i, true);
220 node->setDoubleValue("wow", net->wow[i] );
223 fgSetDouble("/surface-positions/flap-pos-norm", net->flap_deflection);
224 SGPropertyNode * node = fgGetNode("/controls", true);
225 fgSetDouble("/surface-positions/elevator-pos-norm",
226 node->getDoubleValue( "elevator" ));
227 fgSetDouble("/surface-positions/rudder-pos-norm",
228 node->getDoubleValue( "rudder" ));
229 fgSetDouble("/surface-positions/left-aileron-pos-norm",
230 node->getDoubleValue( "aileron" ));
231 fgSetDouble("/surface-positions/right-aileron-pos-norm",
232 -node->getDoubleValue( "aileron" ));
234 /* these are ignored for now ... */
236 if ( net->cur_time ) {
237 fgSetLong("/sim/time/cur-time-override", net->cur_time);
240 globals->set_warp( net->warp );
241 last_warp = net->warp;
244 SG_LOG( SG_IO, SG_ALERT, "Error: version mismatch in net2global()" );
245 SG_LOG( SG_IO, SG_ALERT,
246 "\tread " << net->version << " need " << FG_NET_FDM_VERSION );
247 SG_LOG( SG_IO, SG_ALERT,
248 "\tsomeone needs to upgrade net_fdm.hxx and recompile." );
253 FGExternalNet::FGExternalNet( double dt, string host, int dop, int dip, int cp )
255 // set_delta_t( dt );
264 /////////////////////////////////////////////////////////
265 // Setup client udp connection (sends data to remote fdm)
267 if ( ! data_client.open( false ) ) {
268 SG_LOG( SG_FLIGHT, SG_ALERT, "Error opening client data channel" );
273 data_client.setBlocking( false );
275 if ( data_client.connect( fdm_host.c_str(), data_out_port ) == -1 ) {
276 printf("error connecting to %s:%d\n", fdm_host.c_str(), data_out_port);
280 /////////////////////////////////////////////////////////
281 // Setup server udp connection (for receiving data)
283 if ( ! data_server.open( false ) ) {
284 SG_LOG( SG_FLIGHT, SG_ALERT, "Error opening client server channel" );
288 // we want to block for incoming data in order to syncronize frame
290 data_server.setBlocking( false /* don't block while testing */ );
291 // data_server.setBlocking( true /* don't block while testing */ );
293 // if we bind to fdm_host = "" then we accept messages from
295 if ( data_server.bind( fdm_host.c_str(), data_in_port ) == -1 ) {
296 printf("error binding to port %d\n", data_in_port);
302 FGExternalNet::~FGExternalNet() {
308 // Initialize the ExternalNet flight model, dt is the time increment
309 // for each subsequent iteration through the EOM
310 void FGExternalNet::init() {
311 // cout << "FGExternalNet::init()" << endl;
313 // Explicitly call the superclass's
314 // init method first.
317 double lon = fgGetDouble( "/position/longitude-deg" );
318 double lat = fgGetDouble( "/position/latitude-deg" );
319 double ground = fgGetDouble( "/environment/ground-elevation-m" );
320 double heading = fgGetDouble("/orientation/heading-deg");
324 sprintf( cmd, "/longitude-deg?value=%.8f", lon );
325 new HTTPClient( fdm_host.c_str(), cmd_port, cmd );
326 // cout << "before loop()" << endl;
328 // cout << "here" << endl;
330 sprintf( cmd, "/latitude-deg?value=%.8f", lat );
331 new HTTPClient( fdm_host.c_str(), cmd_port, cmd );
334 sprintf( cmd, "/ground-m?value=%.8f", ground );
335 new HTTPClient( fdm_host.c_str(), cmd_port, cmd );
338 sprintf( cmd, "/heading-deg?value=%.8f", heading );
339 new HTTPClient( fdm_host.c_str(), cmd_port, cmd );
342 sprintf( cmd, "/reset?value=ground" );
343 new HTTPClient( fdm_host.c_str(), cmd_port, cmd );
348 // Run an iteration of the EOM.
349 void FGExternalNet::update( double dt ) {
356 // Send control positions to remote fdm
357 length = sizeof(ctrls);
358 global2raw( &ctrls );
359 if ( data_client.send( (char *)(& ctrls), length, 0 ) != length ) {
360 SG_LOG( SG_IO, SG_ALERT, "Error writing data." );
363 // Read next set of FDM data (blocking enabled to maintain 'sync')
364 length = sizeof(fdm);
365 while ( (result = data_server.recv( (char *)(& fdm), length, 0)) >= 0 ) {
366 SG_LOG( SG_IO, SG_DEBUG, "Success reading data." );