source: ntrip/trunk/BNS/bns.cpp@ 1318

Last change on this file since 1318 was 1262, checked in by weber, 16 years ago

* empty log message *

File size: 13.9 KB
Line 
1/* -------------------------------------------------------------------------
2 * BKG NTRIP Server
3 * -------------------------------------------------------------------------
4 *
5 * Class: bns
6 *
7 * Purpose: This class implements the main application behaviour
8 *
9 * Author: L. Mervart
10 *
11 * Created: 29-Mar-2008
12 *
13 * Changes:
14 *
15 * -----------------------------------------------------------------------*/
16
17#include <math.h>
18#include <iostream>
19#include <newmatio.h>
20
21#include "bns.h"
22#include "bnsutils.h"
23#include "bnsrinex.h"
24#include "bnssp3.h"
25
26using namespace std;
27
28// Constructor
29////////////////////////////////////////////////////////////////////////////
30t_bns::t_bns(QObject* parent) : QThread(parent) {
31
32 this->setTerminationEnabled(true);
33
34 connect(this, SIGNAL(moveSocket(QThread*)),
35 this, SLOT(slotMoveSocket(QThread*)));
36
37 QSettings settings;
38
39 // Set Proxy (application-wide)
40 // ----------------------------
41 QString proxyHost = settings.value("proxyHost").toString();
42 int proxyPort = settings.value("proxyPort").toInt();
43
44 QNetworkProxy proxy;
45 if (proxyHost.isEmpty()) {
46 proxy.setType(QNetworkProxy::NoProxy);
47 }
48 else {
49 proxy.setType(QNetworkProxy::Socks5Proxy);
50 proxy.setHostName(proxyHost);
51 proxy.setPort(proxyPort);
52 }
53 QNetworkProxy::setApplicationProxy(proxy);
54
55 // Thread that handles broadcast ephemeris
56 // ---------------------------------------
57 _bnseph = new t_bnseph(parent);
58
59 connect(_bnseph, SIGNAL(newEph(t_eph*, int)),
60 this, SLOT(slotNewEph(t_eph*, int)));
61 connect(_bnseph, SIGNAL(newMessage(QByteArray)),
62 this, SLOT(slotMessage(const QByteArray)));
63 connect(_bnseph, SIGNAL(error(QByteArray)),
64 this, SLOT(slotError(const QByteArray)));
65
66 // Server listening for rtnet results
67 // ----------------------------------
68 _clkSocket = 0;
69 _clkServer = new QTcpServer;
70 _clkServer->listen(QHostAddress::Any, settings.value("clkPort").toInt());
71 connect(_clkServer, SIGNAL(newConnection()),this, SLOT(slotNewConnection()));
72
73 // Socket and file for outputting the results
74 // -------------------------------------------
75 for (int ic = 1; ic <= 2; ic++) {
76
77 QString mountpoint = settings.value(QString("mountpoint_%1").arg(ic)).toString();
78 QString outFileName = settings.value(QString("outFile_%1").arg(ic)).toString();
79 if (!mountpoint.isEmpty() || !outFileName.isEmpty()) {
80 QString refSys = settings.value(QString("refSys_%1").arg(ic)).toString();
81
82 _caster.push_back(new t_bnscaster(mountpoint, outFileName, refSys, ic));
83 connect(_caster.back(), SIGNAL(error(const QByteArray)),
84 this, SLOT(slotError(const QByteArray)));
85 connect(_caster.back(), SIGNAL(newMessage(const QByteArray)),
86 this, SLOT(slotMessage(const QByteArray)));
87 }
88 }
89
90 // Log File
91 // --------
92 QIODevice::OpenMode oMode;
93 if (Qt::CheckState(settings.value("fileAppend").toInt()) == Qt::Checked) {
94 oMode = QIODevice::WriteOnly | QIODevice::Unbuffered | QIODevice::Append;
95 }
96 else {
97 oMode = QIODevice::WriteOnly | QIODevice::Unbuffered;
98 }
99
100 QString logFileName = settings.value("logFile").toString();
101 if (logFileName.isEmpty()) {
102 _logFile = 0;
103 _logStream = 0;
104 }
105 else {
106 _logFile = new QFile(logFileName);
107 if (_logFile->open(oMode)) {
108 _logStream = new QTextStream(_logFile);
109 }
110 else {
111 _logStream = 0;
112 }
113 }
114
115 // Echo input from RTNet into a file
116 // ---------------------------------
117 QString echoFileName = settings.value("inpEcho").toString();
118 if (echoFileName.isEmpty()) {
119 _echoFile = 0;
120 _echoStream = 0;
121 }
122 else {
123 _echoFile = new QFile(echoFileName);
124 if (_echoFile->open(oMode)) {
125 _echoStream = new QTextStream(_echoFile);
126 }
127 else {
128 _echoStream = 0;
129 }
130 }
131
132 // RINEX writer
133 // ------------
134 if ( settings.value("rnxPath").toString().isEmpty() ) {
135 _rnx = 0;
136 }
137 else {
138 QString prep = "BNS";
139 QString ext = ".clk";
140 QString path = settings.value("rnxPath").toString();
141 QString intr = settings.value("rnxIntr").toString();
142 int sampl = settings.value("rnxSampl").toInt();
143 _rnx = new bnsRinex(prep, ext, path, intr, sampl);
144 }
145
146 // SP3 writer
147 // ----------
148 if ( settings.value("sp3Path").toString().isEmpty() ) {
149 _sp3 = 0;
150 }
151 else {
152 QString prep = "BNS";
153 QString ext = ".sp3";
154 QString path = settings.value("sp3Path").toString();
155 QString intr = settings.value("sp3Intr").toString();
156 int sampl = settings.value("sp3Sampl").toInt();
157 _sp3 = new bnsSP3(prep, ext, path, intr, sampl);
158 }
159}
160
161// Destructor
162////////////////////////////////////////////////////////////////////////////
163t_bns::~t_bns() {
164 deleteBnsEph();
165 delete _clkServer;
166 delete _clkSocket;
167 for (int ic = 0; ic < _caster.size(); ic++) {
168 delete _caster.at(ic);
169 }
170 delete _logStream;
171 delete _logFile;
172 delete _echoStream;
173 delete _echoFile;
174 QMapIterator<QString, t_ephPair*> it(_ephList);
175 while (it.hasNext()) {
176 it.next();
177 delete it.value();
178 }
179 delete _rnx;
180 delete _sp3;
181}
182
183// Delete bns thread
184////////////////////////////////////////////////////////////////////////////
185void t_bns::deleteBnsEph() {
186 if (_bnseph) {
187 _bnseph->terminate();
188 _bnseph->wait(100);
189 delete _bnseph;
190 _bnseph = 0;
191 }
192}
193
194// Write a Program Message
195////////////////////////////////////////////////////////////////////////////
196void t_bns::slotMessage(const QByteArray msg) {
197 if (_logStream) {
198 QString txt = QDateTime::currentDateTime().toUTC().toString("yy-MM-dd hh:mm:ss ");
199 *_logStream << txt << msg << endl;
200 _logStream->flush();
201 }
202 emit(newMessage(msg));
203}
204
205// Write a Program Message
206////////////////////////////////////////////////////////////////////////////
207void t_bns::slotError(const QByteArray msg) {
208 if (_logStream) {
209 *_logStream << msg << endl;
210 _logStream->flush();
211 }
212 deleteBnsEph();
213 emit(error(msg));
214}
215
216// New Connection
217////////////////////////////////////////////////////////////////////////////
218void t_bns::slotNewConnection() {
219//slotMessage("t_bns::slotNewConnection");
220 slotMessage("Clocks & orbits port: Waiting for client to connect"); // weber
221 delete _clkSocket;
222 _clkSocket = _clkServer->nextPendingConnection();
223}
224
225//
226////////////////////////////////////////////////////////////////////////////
227void t_bns::slotNewEph(t_eph* ep, int nBytes) {
228
229 QMutexLocker locker(&_mutex);
230
231 emit(newEphBytes(nBytes));
232
233 t_ephPair* pair;
234 if ( !_ephList.contains(ep->prn()) ) {
235 pair = new t_ephPair();
236 _ephList.insert(ep->prn(), pair);
237 }
238 else {
239 pair = _ephList[ep->prn()];
240 }
241
242 if (pair->eph == 0) {
243 pair->eph = ep;
244 }
245 else {
246 if (ep->isNewerThan(pair->eph)) {
247 delete pair->oldEph;
248 pair->oldEph = pair->eph;
249 pair->eph = ep;
250 }
251 else {
252 delete ep;
253 }
254 }
255}
256
257// Start
258////////////////////////////////////////////////////////////////////////////
259void t_bns::run() {
260
261 slotMessage("============ Start BNS ============");
262
263 // Start Thread that retrieves broadcast Ephemeris
264 // -----------------------------------------------
265 _bnseph->start();
266
267 // Endless loop
268 // ------------
269 while (true) {
270
271 if (_clkSocket && _clkSocket->thread() != currentThread()) {
272 emit(moveSocket(currentThread()));
273 }
274
275 if (_clkSocket && _clkSocket->state() == QAbstractSocket::ConnectedState) {
276 if ( _clkSocket->canReadLine()) {
277 readEpoch();
278 }
279 else {
280 _clkSocket->waitForReadyRead(10);
281 }
282 }
283 else {
284 msleep(10);
285 }
286 }
287}
288
289//
290////////////////////////////////////////////////////////////////////////////
291void t_bns::readEpoch() {
292
293 // Read the first line (if not already read)
294 // -----------------------------------------
295 if (_clkLine.indexOf('*') == -1) {
296 _clkLine = _clkSocket->readLine();
297 if (_echoStream) {
298 *_echoStream << _clkLine;
299 _echoStream->flush();
300 }
301 emit(newClkBytes(_clkLine.length()));
302 }
303
304 if (_clkLine.indexOf('*') == -1) {
305 return;
306 }
307
308 QTextStream in(_clkLine);
309
310 QString hlp;
311 int year, month, day, hour, min;
312 double sec;
313 in >> hlp >> year >> month >> day >> hour >> min >> sec;
314
315 int GPSweek;
316 double GPSweeks;
317
318 GPSweekFromYMDhms(year, month, day, hour, min, sec, GPSweek, GPSweeks);
319
320 QStringList prns;
321
322 // Loop over all satellites
323 // ------------------------
324 QStringList lines;
325 for (;;) {
326 if (!_clkSocket->canReadLine()) {
327 break;
328 }
329 _clkLine = _clkSocket->readLine();
330 if (_echoStream) {
331 *_echoStream << _clkLine;
332 _echoStream->flush();
333 }
334 if (_clkLine[0] == '*') {
335 return;
336 }
337 if (_clkLine[0] == 'P') {
338 _clkLine.remove(0,1);
339 lines.push_back(_clkLine);
340 }
341 }
342
343 if (lines.size() > 0) {
344
345 QStringList prns;
346
347 for (int ic = 0; ic < _caster.size(); ic++) {
348 _caster.at(ic)->open();
349
350 for (int oldEph = 0; oldEph <= 0; oldEph++) { // TODO: handle old ephemeris
351
352 struct ClockOrbit co;
353 memset(&co, 0, sizeof(co));
354 co.GPSEpochTime = (int)GPSweeks;
355 co.GLONASSEpochTime = (int)fmod(GPSweeks, 86400.0);
356 co.ClockDataSupplied = 1;
357 co.OrbitDataSupplied = 1;
358 co.SatRefPoint = POINT_CENTER;
359 co.SatRefDatum = DATUM_ITRF;
360
361 for (int ii = 0; ii < lines.size(); ii++) {
362
363 QString prn;
364 ColumnVector xx(5);
365 t_eph* ep = 0;
366
367 if (oldEph == 0 && ic == 0) {
368 QTextStream in(lines[ii].toAscii());
369 in >> prn;
370 prns << prn;
371 if ( _ephList.contains(prn) ) {
372 in >> xx(1) >> xx(2) >> xx(3) >> xx(4);
373 xx(1) *= 1e3;
374 xx(2) *= 1e3;
375 xx(3) *= 1e3;
376 xx(4) *= 1e-6;
377
378 t_ephPair* pair = _ephList[prn];
379 pair->xx = xx;
380 ep = pair->eph;
381 }
382 }
383 else {
384 prn = prns[ii];
385 if ( _ephList.contains(prn) ) {
386 t_ephPair* pair = _ephList[prn];
387 prn = pair->eph->prn();
388 xx = pair->xx;
389 if (oldEph) {
390 ep = pair->oldEph;
391 }
392 else {
393 ep = pair->eph;
394 }
395 }
396 }
397
398 if (ep != 0) {
399 struct ClockOrbit::SatData* sd = 0;
400 if (prn[0] == 'G') {
401 sd = co.Sat + co.NumberOfGPSSat;
402 ++co.NumberOfGPSSat;
403 }
404 else if (prn[0] == 'R') {
405 sd = co.Sat + CLOCKORBIT_NUMGPS + co.NumberOfGLONASSSat;
406 ++co.NumberOfGLONASSSat;
407 }
408 if (sd) {
409 QString outLine;
410 processSatellite(oldEph, ic, _caster.at(ic)->crdTrafo(), ep,
411 GPSweek, GPSweeks, prn, xx, sd, outLine);
412 _caster.at(ic)->printAscii(outLine);
413 }
414 }
415 }
416
417 if ( _caster.at(ic)->usedSocket() &&
418 (co.NumberOfGPSSat > 0 || co.NumberOfGLONASSSat > 0) ) {
419 char obuffer[CLOCKORBIT_BUFFERSIZE];
420 int len = MakeClockOrbit(&co, COTYPE_AUTO, 0, obuffer, sizeof(obuffer));
421 if (len > 0) {
422 if (_caster.at(ic)->ic() == 1) { emit(newOutBytes1(len));}
423 if (_caster.at(ic)->ic() == 2) { emit(newOutBytes2(len));}
424 _caster.at(ic)->write(obuffer, len);
425 }
426 }
427 }
428 }
429 }
430}
431
432//
433////////////////////////////////////////////////////////////////////////////
434void t_bns::processSatellite(int oldEph, int iCaster, bool trafo, t_eph* ep,
435 int GPSweek, double GPSweeks, const QString& prn,
436 const ColumnVector& xx,
437 struct ClockOrbit::SatData* sd,
438 QString& outLine) {
439
440 ColumnVector xB(4);
441 ColumnVector vv(3);
442
443 ep->position(GPSweek, GPSweeks, xB, vv);
444
445 ColumnVector xyz = xx.Rows(1,3);
446 if (trafo) {
447 crdTrafo(GPSweek, xyz);
448 }
449
450 ColumnVector dx = xyz - xB.Rows(1,3);
451
452 double dClk = (xx(4) - xB(4)) * 299792458.0;
453 ColumnVector rsw(3);
454
455 XYZ_to_RSW(xB.Rows(1,3), vv, dx, rsw);
456
457 if (sd) {
458 sd->ID = prn.mid(1).toInt();
459 sd->IOD = ep->IOD();
460 sd->Clock.DeltaA0 = dClk;
461 sd->Orbit.DeltaRadial = rsw(1);
462 sd->Orbit.DeltaAlongTrack = rsw(2);
463 sd->Orbit.DeltaCrossTrack = rsw(3);
464 }
465
466 char oldCh = (oldEph ? '!' : ' ');
467 outLine.sprintf("%c %d %.1f %s %3d %10.3f %8.3f %8.3f %8.3f\n",
468 oldCh, GPSweek, GPSweeks, ep->prn().toAscii().data(),
469 ep->IOD(), dClk, rsw(1), rsw(2), rsw(3));
470
471 if (!oldEph && iCaster == 0) {
472 if (_rnx) {
473 _rnx->write(GPSweek, GPSweeks, prn, xx);
474 }
475 if (_sp3) {
476 _sp3->write(GPSweek, GPSweeks, prn, xx);
477 }
478 }
479}
480
481//
482////////////////////////////////////////////////////////////////////////////
483void t_bns::slotMoveSocket(QThread* tt) {
484 _clkSocket->setParent(0);
485 _clkSocket->moveToThread(tt);
486//slotMessage("bns::slotMoveSocket");
487 slotMessage("Clocks & orbits port: Socket moved to thread"); // weber
488}
489
490// Transform Coordinates IGS -> ETRF
491////////////////////////////////////////////////////////////////////////////
492void t_bns::crdTrafo(int GPSWeek, ColumnVector& xyz) {
493
494 // Current epoch minus 2000.0 in years
495 // ------------------------------------
496 double dt = (GPSWeek - (1042.0+6.0/7.0)) / 365.2422 * 7.0;
497
498 ColumnVector dx(3);
499 dx(1) = 0.0541 - dt * 0.0002;
500 dx(2) = 0.0502 + dt * 0.0001;
501 dx(3) = -0.0538 - dt * 0.0018;
502
503 static const double arcSec = 180.0 * 3600.0 / M_PI;
504 double ox = ( 0.000891 + dt * 0.000081) / arcSec;
505 double oy = ( 0.005390 + dt * 0.000490) / arcSec;
506 double oz = (-0.008712 - dt * 0.000792) / arcSec;
507
508 double sc = 1.0 + 0.4e-9 + dt * 0.08e-9;
509
510 Matrix rMat(3,3);
511 rMat(1,1) = 1.0;
512 rMat(1,2) = -oz;
513 rMat(1,3) = oy;
514 rMat(2,1) = oz;
515 rMat(2,2) = 1.0;
516 rMat(2,3) = -ox;
517 rMat(3,1) = -oy;
518 rMat(3,2) = ox;
519 rMat(3,3) = 1.0;
520
521
522 xyz = sc * rMat * xyz + dx;
523}
Note: See TracBrowser for help on using the repository browser.