Subversion Repositories NaviCtrl

Rev

Rev 835 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
41 ingob 1
/*#######################################################################################*/
2
/* !!! THIS IS NOT FREE SOFTWARE !!!                                                     */
3
/*#######################################################################################*/
4
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
5
// + www.MikroKopter.com
6
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
360 holgerb 7
// + Software Nutzungsbedingungen (english version: see below)
8
// + der Fa. HiSystems GmbH, Flachsmeerstrasse 2, 26802 Moormerland - nachfolgend Lizenzgeber genannt -
9
// + Der Lizenzgeber räumt dem Kunden ein nicht-ausschließliches, zeitlich und räumlich* unbeschränktes Recht ein, die im den
515 killagreg 10
// + Mikrocontroller verwendete Firmware für die Hardware Flight-Ctrl, Navi-Ctrl, BL-Ctrl, MK3Mag & PC-Programm MikroKopter-Tool
360 holgerb 11
// + - nachfolgend Software genannt - nur für private Zwecke zu nutzen.
12
// + Der Einsatz dieser Software ist nur auf oder mit Produkten des Lizenzgebers zulässig.
41 ingob 13
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
360 holgerb 14
// + Die vom Lizenzgeber gelieferte Software ist urheberrechtlich geschützt. Alle Rechte an der Software sowie an sonstigen im
15
// + Rahmen der Vertragsanbahnung und Vertragsdurchführung überlassenen Unterlagen stehen im Verhältnis der Vertragspartner ausschließlich dem Lizenzgeber zu.
16
// + Die in der Software enthaltenen Copyright-Vermerke, Markenzeichen, andere Rechtsvorbehalte, Seriennummern sowie
17
// + sonstige der Programmidentifikation dienenden Merkmale dürfen vom Kunden nicht verändert oder unkenntlich gemacht werden.
18
// + Der Kunde trifft angemessene Vorkehrungen für den sicheren Einsatz der Software. Er wird die Software gründlich auf deren
19
// + Verwendbarkeit zu dem von ihm beabsichtigten Zweck testen, bevor er diese operativ einsetzt.
20
// + Die Haftung des Lizenzgebers wird - soweit gesetzlich zulässig - begrenzt in Höhe des typischen und vorhersehbaren
515 killagreg 21
// + Schadens. Die gesetzliche Haftung bei Personenschäden und nach dem Produkthaftungsgesetz bleibt unberührt. Dem Lizenzgeber steht jedoch der Einwand
360 holgerb 22
// + des Mitverschuldens offen.
23
// + Der Kunde trifft angemessene Vorkehrungen für den Fall, dass die Software ganz oder teilweise nicht ordnungsgemäß arbeitet.
24
// + Er wird die Software gründlich auf deren Verwendbarkeit zu dem von ihm beabsichtigten Zweck testen, bevor er diese operativ einsetzt.
25
// + Der Kunde wird er seine Daten vor Einsatz der Software nach dem Stand der Technik sichern.
26
// + Der Kunde ist darüber unterrichtet, dass der Lizenzgeber seine Daten im zur Vertragsdurchführung erforderlichen Umfang
27
// + und auf Grundlage der Datenschutzvorschriften erhebt, speichert, verarbeitet und, sofern notwendig, an Dritte übermittelt.
28
// + *) Die räumliche Nutzung bezieht sich nur auf den Einsatzort, nicht auf die Reichweite der programmierten Software.
29
// + #### ENDE DER NUTZUNGSBEDINGUNGEN ####'
30
// +  Hinweis: Informationen über erweiterte Nutzungsrechte (wie z.B. Nutzung für nicht-private Zwecke) sind auf Anfrage per Email an info(@)hisystems.de verfügbar.
41 ingob 31
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
360 holgerb 32
// + Software LICENSING TERMS
41 ingob 33
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
360 holgerb 34
// + of HiSystems GmbH, Flachsmeerstrasse 2, 26802 Moormerland, Germany - the Licensor -
515 killagreg 35
// + The Licensor grants the customer a non-exclusive license to use the microcontroller firmware of the Flight-Ctrl, Navi-Ctrl, BL-Ctrl, and MK3Mag hardware
360 holgerb 36
// + (the Software) exclusively for private purposes. The License is unrestricted with respect to time and territory*.
37
// + The Software may only be used with the Licensor's products.
38
// + The Software provided by the Licensor is protected by copyright. With respect to the relationship between the parties to this
39
// + agreement, all rights pertaining to the Software and other documents provided during the preparation and execution of this
40
// + agreement shall be the property of the Licensor.
41
// + The information contained in the Software copyright notices, trademarks, other legal reservations, serial numbers and other
42
// + features that can be used to identify the program may not be altered or defaced by the customer.
43
// + The customer shall be responsible for taking reasonable precautions
44
// + for the safe use of the Software. The customer shall test the Software thoroughly regarding its suitability for the
45
// + intended purpose before implementing it for actual operation. The Licensor's liability shall be limited to the extent of typical and
46
// + foreseeable damage to the extent permitted by law, notwithstanding statutory liability for bodily injury and product
47
// + liability. However, the Licensor shall be entitled to the defense of contributory negligence.
48
// + The customer will take adequate precautions in the case, that the software is not working properly. The customer will test
49
// + the software for his purpose before any operational usage. The customer will backup his data before using the software.
50
// + The customer understands that the Licensor collects, stores and processes, and, where required, forwards, customer data
51
// + to third parties to the extent necessary for executing the agreement, subject to applicable data protection and privacy regulations.
52
// + *) The territory aspect only refers to the place where the Software is used, not its programmed range.
53
// + #### END OF LICENSING TERMS ####
54
// + Note: For information on license extensions (e.g. commercial use), please contact us at info(@)hisystems.de.
41 ingob 55
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
263 killagreg 56
#include <string.h>
41 ingob 57
#include "91x_lib.h"
700 holgerb 58
#include "uart0.h"
41 ingob 59
#include "uart1.h"
881 holgerb 60
#include "uart2.h"
41 ingob 61
#include "ubx.h"
645 holgerb 62
#include "main.h"
41 ingob 63
#include "led.h"
119 killagreg 64
#include "timer1.h"
561 holgerb 65
#include "GPS.h"
41 ingob 66
 
67
// ------------------------------------------------------------------------------------------------
68
// defines
69
 
70
#define DAYS_FROM_JAN01YEAR0001_TO_JAN6_1980 722819 // the year 0 does not exist!
71
#define DAYS_PER_YEAR           365
72
#define DAYS_PER_LEAPYEAR       366
73
#define DAYS_PER_4YEARS         1461    //((3 * DAYS_PER_YEAR) + DAYS_PER_LEAPYEAR) // years dividable by 4 are leap years
74
#define DAYS_PER_100YEARS       36524   //((25 * DAYS_PER_4YEARS) - 1) // years dividable by 100 are no leap years
75
#define DAYS_PER_400YEARS       146097  //((4 * DAYS_PER_100YEARS) + 1L) // but years dividable by 400 are leap years
76
#define SECONDS_PER_MINUTE      60
77
#define MINUTES_PER_HOUR        60
78
#define HOURS_PER_DAY           24
79
#define DAYS_PER_WEEK           7
80
#define SECONDS_PER_HOUR        3600    //(SECONDS_PER_MINUTE * MINUTES_PER_HOUR)
81
#define SECONDS_PER_DAY         86400   //(SECONDS_PER_HOUR * HOURS_PER_DAY)
82
#define SECONDS_PER_WEEK        604800  //(SECONDS_PER_DAY * DAYS_PER_WEEK)
83
 
84
// days per month in normal and leap years
85
const u32       Leap[ 13 ]      = { 0,  31,  60,  91, 121, 152, 182, 213, 244, 274, 305, 335, 366 };
86
const u32 Normal[ 13 ]  = { 0,  31,  59,  90, 120, 151, 181, 212, 243, 273, 304, 334, 365 };
87
 
835 holgerb 88
#define LEAP_SECONDS_FROM_1980  18
41 ingob 89
 
90
// message sync bytes
91
#define UBX_SYNC1_CHAR  0xB5
92
#define UBX_SYNC2_CHAR  0x62
245 killagreg 93
// protocoll identifiers
94
// navigation class
41 ingob 95
#define UBX_CLASS_NAV   0x01
700 holgerb 96
#define UBX_CLASS_MON   0x0A
97
 
41 ingob 98
#define UBX_ID_POSLLH   0x02
99
#define UBX_ID_SOL              0x06
100
#define UBX_ID_VELNED   0x12
247 killagreg 101
 
700 holgerb 102
#define UBX_ID_MON_VER  0x04
103
 
41 ingob 104
// ------------------------------------------------------------------------------------------------
105
// typedefs
106
 
107
 
108
// ubx parser state
109
typedef enum
110
{
111
        UBXSTATE_IDLE,
112
        UBXSTATE_SYNC1,
113
        UBXSTATE_SYNC2,
114
        UBXSTATE_CLASS,
115
        UBXSTATE_LEN1,
116
        UBXSTATE_LEN2,
117
        UBXSTATE_DATA,
118
        UBXSTATE_CKA,
119
        UBXSTATE_CKB
120
} ubxState_t;
121
 
122
typedef struct
123
{
124
        u32                     itow;           // ms GPS Millisecond Time of Week
125
        s32                     frac;           // ns remainder of rounded ms above
126
        s16                     week;           // GPS week
127
        u8                      GPSfix;         // GPSfix Type, range 0..6
128
        u8                      Flags;          // Navigation Status Flags
129
        s32                     ECEF_X;         // cm ECEF X coordinate
130
        s32                     ECEF_Y;         // cm ECEF Y coordinate
131
        s32                     ECEF_Z;         // cm ECEF Z coordinate
132
        u32                     PAcc;           // cm 3D Position Accuracy Estimate
133
        s32                     ECEFVX;         // cm/s ECEF X velocity
134
        s32                     ECEFVY;         // cm/s ECEF Y velocity
135
        s32                     ECEFVZ;         // cm/s ECEF Z velocity
136
        u32                     SAcc;           // cm/s Speed Accuracy Estimate
137
        u16                     PDOP;           // 0.01 Position DOP
138
        u8                      res1;           // reserved
139
        u8                      numSV;          // Number of SVs used in navigation solution
140
        u32                     res2;           // reserved
52 killagreg 141
        u8                      Status;     // invalid/newdata/processed
41 ingob 142
} __attribute__((packed)) ubx_nav_sol_t;
143
 
144
 
145
typedef struct
146
{
147
        u32                     itow;           // ms  GPS Millisecond Time of Week
148
        s32                     VEL_N;          // cm/s  NED north velocity
149
        s32                     VEL_E;          // cm/s  NED east velocity
150
        s32                     VEL_D;          // cm/s  NED down velocity
151
        u32                     Speed;          // cm/s  Speed (3-D)
152
        u32                     GSpeed;         // cm/s  Ground Speed (2-D)
153
        s32                     Heading;        // 1e-05 deg  Heading 2-D
154
        u32                     SAcc;           // cm/s  Speed Accuracy Estimate
155
        u32                     CAcc;           // deg  Course / Heading Accuracy Estimate
52 killagreg 156
        u8                      Status;         // invalid/newdata/processed
41 ingob 157
} __attribute__((packed)) ubx_nav_velned_t;
158
 
159
typedef struct
160
{
161
        u32                     itow;           // ms GPS Millisecond Time of Week
162
        s32                     LON;            // 1e-07 deg Longitude
163
        s32                     LAT;            // 1e-07 deg Latitude
164
        s32                     HEIGHT;         // mm Height above Ellipsoid
165
        s32                     HMSL;           // mm Height above mean sea level
166
        u32                     Hacc;           // mm Horizontal Accuracy Estimate
167
        u32                     Vacc;           // mm Vertical Accuracy Estimate
52 killagreg 168
        u8                      Status;         // invalid/newdata/processed
41 ingob 169
} __attribute__((packed)) ubx_nav_posllh_t;
170
 
171
//------------------------------------------------------------------------------------
172
// global variables
173
 
174
// local buffers for the incomming ubx messages
263 killagreg 175
ubx_nav_sol_t           UbxSol    = {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, INVALID};
176
ubx_nav_posllh_t        UbxPosLlh = {0,0,0,0,0,0,0, INVALID};
177
ubx_nav_velned_t        UbxVelNed = {0,0,0,0,0,0,0,0,0, INVALID};
178
ubxmsg_t                        UbxMsg;
41 ingob 179
 
180
// shared buffer
244 killagreg 181
gps_data_t              GPSData = {200,{0,0,0,INVALID},0,0,0,0,0,0,0, INVALID};
41 ingob 182
DateTime_t                      GPSDateTime = {0,0,0,0,0,0,0, INVALID};
183
 
146 killagreg 184
#define UBX_TIMEOUT 500 // 500 ms
185
u32 UBX_Timeout = 0;
41 ingob 186
 
187
//------------------------------------------------------------------------------------
188
// functions
189
 
190
u8 IsLeapYear(u16 year)
191
{
192
        if((year%400 == 0) || ( (year%4 == 0) && (year%100 != 0) ) ) return 1;
193
        else return 0;
194
}
195
/********************************************************/
196
/*  Calculates the UTC Time from the GPS week and tow   */
197
/********************************************************/
198
void SetGPSTime(DateTime_t * pTimeStruct)
199
{
200
        u32 Days, Seconds, Week;
201
        u16 YearPart;
202
        u32 * MonthDayTab = 0;
203
        u8 i;
204
 
205
 
206
        // if GPS data show valid time data
207
        if((UbxSol.Status != INVALID) && (UbxSol.Flags & FLAG_WKNSET) && (UbxSol.Flags & FLAG_TOWSET) )
208
        {
209
                Seconds = UbxSol.itow / 1000L;
210
                Week = (u32)UbxSol.week;
211
                // correct leap seconds since 1980
212
                if(Seconds < LEAP_SECONDS_FROM_1980)
213
                {
214
                        Week--;
215
                        Seconds = SECONDS_PER_WEEK - LEAP_SECONDS_FROM_1980 + Seconds;
216
                }
217
                else Seconds -= LEAP_SECONDS_FROM_1980;
218
 
515 killagreg 219
                Days = DAYS_FROM_JAN01YEAR0001_TO_JAN6_1980;
41 ingob 220
                Days += (Week * DAYS_PER_WEEK);
221
                Days += Seconds / SECONDS_PER_DAY; // seperate days from GPS seconds of week
222
 
223
                pTimeStruct->Year = 1;
224
                YearPart = (u16)(Days / DAYS_PER_400YEARS);
225
                pTimeStruct->Year += YearPart * 400;
226
                Days = Days % DAYS_PER_400YEARS;
227
                YearPart = (u16)(Days / DAYS_PER_100YEARS);
228
                pTimeStruct->Year += YearPart * 100;
229
                Days = Days % DAYS_PER_100YEARS;
230
                YearPart = (u16)(Days / DAYS_PER_4YEARS);
231
                pTimeStruct->Year += YearPart * 4;
232
                Days = Days % DAYS_PER_4YEARS;
233
                if(Days < (3* DAYS_PER_YEAR)) YearPart = (u16)(Days / DAYS_PER_YEAR);
234
                else YearPart = 3;
235
                pTimeStruct->Year += YearPart;
236
                // calculate remaining days of year
237
                Days -= (u32)(YearPart *  DAYS_PER_YEAR);
238
                Days += 1;
239
                // check if current year is a leap year
240
                if(IsLeapYear(pTimeStruct->Year)) MonthDayTab = (u32*)Leap;
241
                else MonthDayTab = (u32*)Normal;
515 killagreg 242
                // seperate month and day from days of year
41 ingob 243
                for ( i = 0; i < 12; i++ )
244
                {
245
                        if ( (MonthDayTab[i]< Days) && (Days <= MonthDayTab[i+1]) )
246
                        {
247
                                pTimeStruct->Month = i+1;
248
                                pTimeStruct->Day = Days - MonthDayTab[i];
249
                                i = 12;
250
                        }
251
                }
252
                Seconds = Seconds % SECONDS_PER_DAY; // remaining seconds of current day
253
                pTimeStruct->Hour = (u8)(Seconds / SECONDS_PER_HOUR);
254
                Seconds = Seconds % SECONDS_PER_HOUR; // remaining seconds of current hour
255
                pTimeStruct->Min = (u8)(Seconds / SECONDS_PER_MINUTE);
256
                Seconds = Seconds % SECONDS_PER_MINUTE; // remaining seconds of current minute
257
                pTimeStruct->Sec = (u8)(Seconds);
258
                pTimeStruct->mSec  = (u16)(UbxSol.itow % 1000L);
259
                pTimeStruct->Valid = 1;
260
        }
261
        else
262
        {
263
                pTimeStruct->Valid = 0;
264
        }
265
}
266
 
267
 
268
 
269
/********************************************************/
270
/*                  Initialize UBX Parser               */
271
/********************************************************/
272
void UBX_Init(void)
273
{
274
        // mark msg buffers invalid
275
        UbxSol.Status = INVALID;
276
        UbxPosLlh.Status = INVALID;
277
        UbxVelNed.Status = INVALID;
247 killagreg 278
        UbxMsg.Status = INVALID;
41 ingob 279
        GPSData.Status = INVALID;
806 holgerb 280
        UBX_Timeout = SetDelay(5000);
41 ingob 281
}
282
 
283
/********************************************************/
284
/*            Upate GPS data stcructure                 */
285
/********************************************************/
263 killagreg 286
void Update_GPSData(void)
41 ingob 287
{
263 killagreg 288
        static u32 last_itow = 0;
569 holgerb 289
        static u32 milliseconds = 0;
41 ingob 290
 
291
        // if a new set of ubx messages was collected
263 killagreg 292
        if((UbxSol.Status == NEWDATA) && (UbxPosLlh.Status == NEWDATA) && (UbxVelNed.Status == NEWDATA))
293
        {       // and the itow is equal (same time base)
515 killagreg 294
                UART_VersionInfo.Flags |= NC_VERSION_FLAG_GPS_PRESENT;
263 killagreg 295
                if((UbxSol.itow == UbxPosLlh.itow) && (UbxPosLlh.itow == UbxVelNed.itow))
41 ingob 296
                {
146 killagreg 297
                        UBX_Timeout = SetDelay(UBX_TIMEOUT);
700 holgerb 298
                        DebugOut.Analog[9]++;  
263 killagreg 299
                        // update GPS data only if the status is INVALID or PROCESSED
515 killagreg 300
                        if(GPSData.Status != NEWDATA)
41 ingob 301
                        { // wait for new data at all neccesary ubx messages
659 holgerb 302
                                CountNewGpsDataIn5Sec++;
41 ingob 303
                                GPSData.Status = INVALID;
244 killagreg 304
                                // update message cycle time
264 killagreg 305
                                GPSData.MsgCycleTime = (u16)(UbxSol.itow-last_itow);
569 holgerb 306
                                milliseconds += GPSData.MsgCycleTime;
264 killagreg 307
                                last_itow = UbxSol.itow; // update last itow
41 ingob 308
                                // NAV SOL
322 holgerb 309
                                GPSData.Flags =         (GPSData.Flags & 0xf0) | (UbxSol.Flags & 0x0f); // we take only the lower bits
41 ingob 310
                                GPSData.NumOfSats =                     UbxSol.numSV;
311
                                GPSData.SatFix =                                UbxSol.GPSfix;
645 holgerb 312
//if(Parameter.User3 > 100) { GPSData.NumOfSats = 0; GPSData.SatFix = 0;}
313
//if(Parameter.User3 > 100) { GPSData.SatFix = 0;}
780 holgerb 314
//DebugOut.Analog[] = UbxPosLlh.Hacc;
315
//DebugOut.Analog[] = UbxPosLlh.Vacc;
492 killagreg 316
                                GPSData.Position_Accuracy =             UbxSol.PAcc;    // in steps of 1cm
317
                                GPSData.Speed_Accuracy =                UbxSol.SAcc;    // in steps of 1cm/s
41 ingob 318
                                SetGPSTime(&SystemTime); // update system time
319
                                // NAV VELNED
492 killagreg 320
                                GPSData.Speed_East =                    UbxVelNed.VEL_E;        // in steps of 1cm/s
321
                                GPSData.Speed_North =                   UbxVelNed.VEL_N;    // in steps of 1cm/s
322
                                GPSData.Speed_Top       =                       -UbxVelNed.VEL_D;   // in steps of 1cm/s
323
                                GPSData.Speed_Ground =                  UbxVelNed.GSpeed;       // in steps of 1cm/s
324
                                GPSData.Heading =                               UbxVelNed.Heading; //in steps of 1E-5 deg
569 holgerb 325
                                // NAV POSLLH
326
                                GPSData.Position.Status =               INVALID;
327
                                if(!(SimulationFlags & SIMULATION_ACTIVE))
328
                                {
881 holgerb 329
if((Parameter.User3 > 100) && (NMEA_Position.Status != INVALID))
330
 {
331
                                        GPSData.Position.Longitude = NMEA_Position.Longitude;
332
                                        GPSData.Position.Latitude  = NMEA_Position.Latitude;
333
                                        GPSData.Position.Altitude  = NMEA_Position.Altitude;
334
                                        if(CheckAscii(NMEA_In_Fix_Txt[3]))
335
                                           GPSData.NumOfSats = 10 * AsciiToNum(NMEA_In_Fix_Txt[2]) + AsciiToNum(NMEA_In_Fix_Txt[3]);
336
                                         else
337
                                        if(CheckAscii(NMEA_In_Fix_Txt[2])) GPSData.NumOfSats = AsciiToNum(NMEA_In_Fix_Txt[2]); // nur eine Ziffer? (weiss nicht, ob das vorkommt..)
338
                                         else GPSData.NumOfSats = 0;
339
 }                                       
340
 else
341
 {
342
 
569 holgerb 343
                                        GPSData.Position.Longitude =    UbxPosLlh.LON;  // in steps of 1E-7 deg
344
                                        GPSData.Position.Latitude =     UbxPosLlh.LAT;  // in steps of 1E-7 deg
345
                                        GPSData.Position.Altitude =     UbxPosLlh.HMSL; // in steps of 1 mm
881 holgerb 346
 }
569 holgerb 347
                                }
348
                                else // simulation active
349
                                {
574 holgerb 350
                                 if(GPSData.SatFix != SATFIX_3D || GPSData.NumOfSats < 6)  // simulate satfix
569 holgerb 351
                                 {
645 holgerb 352
                                   GPSData.SatFix = SATFIX_3D;          // Simulation
353
                                   GPSData.Flags |= FLAG_GPSFIXOK;      // Simulation
354
                                   GPSData.NumOfSats = 8;                       // Simulation
569 holgerb 355
                                   if(!SystemTime.Valid)
356
                                   {
357
                                        UbxSol.Status = 1;
358
                                        UbxSol.Flags |= FLAG_WKNSET;
359
                                        UbxSol.Flags |= FLAG_TOWSET;
360
                                        UbxSol.week = 1043;      // starts in year 2000
361
                                        UbxSol.itow = milliseconds;
362
                                        SetGPSTime(&SystemTime); // update system time
363
                                        SystemTime.Valid = 1; // use the time that is given by the GPS-Module
364
                                   }
365
                                 }
366
                                }
367
                                GPSData.Position.Status =               NEWDATA;
515 killagreg 368
 
41 ingob 369
                                GPSData.Status = NEWDATA; // new data available
370
                        } // EOF if(GPSData.Status != NEWDATA)
263 killagreg 371
                        // set state to collect new data
372
                        UbxSol.Status =                                 PROCESSED;      // ready for new data
373
                        UbxPosLlh.Status =                              PROCESSED;      // ready for new data
374
                        UbxVelNed.Status =                              PROCESSED;      // ready for new data
375
                } // EOF all itow are equal
376
        } // EOF all ubx messages received
503 holgerb 377
 
378
 
379
//++++++++++++++++++++++++++++++++
380
// Please do not delete
515 killagreg 381
// This helps me for testing
503 holgerb 382
//++++++++++++++++++++++++++++++++
383
//GPSData.Position.Longitude = 1517409123L;  // Hamilton, Australia
384
//GPSData.Position.Latitude = -329294773L;       // Hamilton, Australia
385
//++++++++
386
//GPSData.Position.Longitude =-1556010020L;  // Alaska
387
//GPSData.Position.Latitude = 629581270L;        // Alaska
388
//++++++++
389
//GPSData.Position.Longitude =-584343419L;   // Buenos aires
390
//GPSData.Position.Latitude = -345464421L;   // Buenos aires
391
//++++++++
392
//GPSData.Position.Longitude =1683362691L;   // Neuseeland
393
//GPSData.Position.Latitude = -465945926L;   // Neuseeland
504 holgerb 394
//++++++++
507 holgerb 395
//GPSData.Position.Longitude = 194140605L;   // Afrika
396
//GPSData.Position.Latitude = -345384656L;   // Afrika
397
//++++++++
504 holgerb 398
//GPSData.Position.Longitude =-740443840L;  // Liberty Staue davor
515 killagreg 399
//GPSData.Position.Latitude = 406888880L;        // Liberty Staue
504 holgerb 400
 
401
//GPSData.Position.Longitude =-740451660L;  // Liberty Staue daneben
515 killagreg 402
//GPSData.Position.Latitude = 406891880L;        // Liberty Staue
504 holgerb 403
 
404
//GPSData.Position.Longitude =-740446540L;  // Liberty Staue direkt
405
//GPSData.Position.Latitude = 406891590L;        // Liberty Staue 1
406
 
514 holgerb 407
//GPSData.Position.Longitude =-1142878694L;  // Flori
515 killagreg 408
//GPSData.Position.Latitude = 483712102L;        //
514 holgerb 409
 
410
//GPSData.Position.Longitude =1251674613L;  // Bubble
515 killagreg 411
//GPSData.Position.Latitude = 466058365L;        //
412
 
41 ingob 413
}
414
 
700 holgerb 415
u8 UbxVersionParser(void)
416
{
417
                        // HW:00000040: Antaris
418
                        // HW:00040001: Antaris-4
419
                        // HW:80040001: Antaris-4
803 holgerb 420
                        // HW:00040005: u-blox 5 (nicht von uns verbaut)
700 holgerb 421
                        // HW:00040006: u-blox 6
422
                        // HW:00040007: u-blox 6
803 holgerb 423
                        // HW:00070000: u-blox 7 (nicht von uns verbaut)
700 holgerb 424
                        // HW:00080000: u-blox M8
41 ingob 425
 
803 holgerb 426
           // MKGPS V10 -> 1500 -> LEA-4H-0-000 -> ubxsw == 5.00 HW:00040001 
427
           // MKGPS V20 -> 2602 -> LEA-6S-0-000 -> ubxsw == 6.02 HW:00040007 
428
           // MKGPS V20 -> 2703 -> LEA-6S-0-001 -> ubxsw == 7.03 HW:00040007
429
                   // MKGPS V30 -> 3101 -> NEO-M8N-0-01 -> ubxsw == 2.01 HW:00080000 (Flash- Variante) kann nur 5Hz bei MAX-Sat:15
430
                   // MKGPS V31 -> 3201 -> NEO-M8Q-0-00 -> ubxsw == 2.01 HW:00080000 (ROM Variante)
431
                   // MKGPS V40 -> 4301 -> NEO-M8Q-0-10 -> ubxsw == 3.01 HW:00080000 (Message:"ROM CORE 3.01 (107888))
432
 
700 holgerb 433
u8 retval = 0xFF;
434
          if(UbxMsg.Data[33] == '4' && UbxMsg.Data[37] == '1') // LEA-4 
435
           {
436
        GPS_Version = 1000 + (UbxMsg.Data[0] - '0') * 100 + (UbxMsg.Data[2] - '0')  * 10 + (UbxMsg.Data[3] - '0');
437
                retval = 10; // MKGPS V1
438
           }
439
           else
440
          if(UbxMsg.Data[33] == '4' && UbxMsg.Data[37] == '7') // LEA-6 
441
           {
442
        GPS_Version = 2000 + (UbxMsg.Data[0] - '0') * 100 + (UbxMsg.Data[2] - '0')  * 10 + (UbxMsg.Data[3] - '0');
443
                retval = 20; // MKGPS V2
444
           }
445
           else
446
          if(UbxMsg.Data[33] == '8' && UbxMsg.Data[37] == '0') // NEO-8 
447
           {
448
                retval = 30; // MKGPS V3
803 holgerb 449
                if(UbxMsg.Data[100]     == 'F') // Message[100]:"FIS 0xEF4015 (73171)" bei der Flash-Variante
450
                 {
451
           GPS_Version = 3000 - 100 + (UbxMsg.Data[0] - '0') * 100 + (UbxMsg.Data[2] - '0')  * 10 + (UbxMsg.Data[3] - '0');
452
                   retval = 30; // MKGPS V3     Flash
453
                 }
454
                 else
455
                if(UbxMsg.Data[0] >= '0' && UbxMsg.Data[0] <= '9') // Steht da gleich zu Anfang eine Zahl?
456
                 {
457
           GPS_Version = 3000 + (UbxMsg.Data[0] - '0') * 100 + (UbxMsg.Data[2] - '0')  * 10 + (UbxMsg.Data[3] - '0');
458
                   retval = 31; // MKGPS V3     ROM
459
                 }
460
                 else
461
                if(UbxMsg.Data[9] >= '0' && UbxMsg.Data[9] <= '9') // Message:"ROM CORE 3.01 (107888)" 
462
                 {
463
           GPS_Version = 4000 + (UbxMsg.Data[9] - '0') * 100 + (UbxMsg.Data[11] - '0')  * 10 + (UbxMsg.Data[12] - '0');
464
               retval = 40; // MKGPS V4 (Galileo)
465
                 }
700 holgerb 466
           }
467
return(retval);
468
}
469
 
41 ingob 470
/********************************************************/
471
/*                   UBX Parser                         */
472
/********************************************************/
245 killagreg 473
void UBX_RxParser(u8 c)
41 ingob 474
{
475
        static ubxState_t ubxState = UBXSTATE_IDLE;
263 killagreg 476
        static ubxmsghdr_t RxHdr;
477
        static u8 RxData[UBX_MSG_DATA_SIZE];
478
        static u16 RxBytes = 0;
41 ingob 479
        static u8 cka, ckb;
480
 
481
 
482
        //state machine
483
        switch (ubxState)       // ubx message parser
484
        {
485
                case UBXSTATE_IDLE: // check 1st sync byte
486
                        if (c == UBX_SYNC1_CHAR) ubxState = UBXSTATE_SYNC1;
487
                        else ubxState = UBXSTATE_IDLE; // out of synchronization
488
                        break;
489
 
490
                case UBXSTATE_SYNC1: // check 2nd sync byte
491
                        if (c == UBX_SYNC2_CHAR) ubxState = UBXSTATE_SYNC2;
492
                        else ubxState = UBXSTATE_IDLE; // out of synchronization
493
                        break;
494
 
495
                case UBXSTATE_SYNC2: // check msg class to be NAV
263 killagreg 496
                        RxHdr.Class = c;
245 killagreg 497
                        ubxState = UBXSTATE_CLASS;
41 ingob 498
                        break;
499
 
500
                case UBXSTATE_CLASS: // check message identifier
263 killagreg 501
                        RxHdr.Id = c;
247 killagreg 502
                        ubxState = UBXSTATE_LEN1;
263 killagreg 503
                        cka = RxHdr.Class + RxHdr.Id;
504
                        ckb = RxHdr.Class + cka;
247 killagreg 505
                        break;
506
 
507
                case UBXSTATE_LEN1: // 1st message length byte
263 killagreg 508
                        RxHdr.Length = (u16)c; // lowbyte first
247 killagreg 509
                        cka += c;
510
                        ckb += cka;
511
                        ubxState = UBXSTATE_LEN2;
512
                        break;
513
 
514
                case UBXSTATE_LEN2: // 2nd message length byte
263 killagreg 515
                        RxHdr.Length += ((u16)c)<<8; // high byte last
516
                        if (RxHdr.Length >= UBX_MSG_DATA_SIZE)
41 ingob 517
                        {
515 killagreg 518
                                ubxState = UBXSTATE_IDLE;
41 ingob 519
                        }
263 killagreg 520
                        else
41 ingob 521
                        {
263 killagreg 522
                                cka += c;
523
                                ckb += cka;
524
                                RxBytes = 0;    // reset data byte counter
525
                                ubxState = UBXSTATE_DATA;
41 ingob 526
                        }
527
                        break;
528
 
529
                case UBXSTATE_DATA: // collecting data
263 killagreg 530
                        if (RxBytes < UBX_MSG_DATA_SIZE)
41 ingob 531
                        {
263 killagreg 532
                                RxData[RxBytes++] = c; // copy curent data byte if any space is left
41 ingob 533
                                cka += c;
534
                                ckb += cka;
263 killagreg 535
                                if (RxBytes >= RxHdr.Length) ubxState = UBXSTATE_CKA; // switch to next state if all data have been received
41 ingob 536
                        }
537
                        else // rx buffer overrun
538
                        {
539
                                ubxState = UBXSTATE_IDLE;
540
                        }
541
                        break;
542
 
543
                case UBXSTATE_CKA:
544
                        if (c == cka) ubxState = UBXSTATE_CKB;
545
                        else
546
                        {
547
                                ubxState = UBXSTATE_IDLE;
548
                        }
549
                        break;
550
 
551
                case UBXSTATE_CKB:
552
                        if (c == ckb)
263 killagreg 553
                        {       // checksum is ok
554
 
555
                                switch(RxHdr.Class)
556
                                {
557
                                        case UBX_CLASS_NAV:
558
                                                switch(RxHdr.Id)
559
                                                {
560
                                                        case UBX_ID_POSLLH: // geodetic position
561
                                                                memcpy((u8*)&UbxPosLlh, RxData, RxHdr.Length);
562
                                                                UbxPosLlh.Status = NEWDATA;
563
                                                                break;
564
 
515 killagreg 565
                                                        case UBX_ID_VELNED: // velocity vector in tangent plane
263 killagreg 566
                                                                memcpy((u8*)&UbxVelNed, RxData, RxHdr.Length);
567
                                                                UbxVelNed.Status = NEWDATA;
568
                                                                break;
569
 
570
                                                        case UBX_ID_SOL: // navigation solution
571
                                                                memcpy((u8*)&UbxSol, RxData, RxHdr.Length);
572
                                                                UbxSol.Status = NEWDATA;
573
                                                                break;
574
 
575
                                                        default:
576
                                                                break;
577
                                                } // EOF switch(Id)
578
                                                Update_GPSData();
579
                                                break;
700 holgerb 580
                                        case UBX_CLASS_MON: // version
581
                                                switch(RxHdr.Id)
582
                                                {
583
                                                 case UBX_ID_MON_VER:
584
                                                        if(UbxMsg.Hdr.Length <= UBX_MSG_DATA_SIZE) memcpy(UbxMsg.Data, RxData, RxHdr.Length);
585
                                                        UbxVersionParser();
586
                                                        break;
515 killagreg 587
 
700 holgerb 588
                                                        default:
589
                                                                break;
590
                                                }
263 killagreg 591
                                        default:
592
                                                break;
593
                                } // EOF switch(class)
594
 
515 killagreg 595
                                // check generic msg filter
263 killagreg 596
                                if(UbxMsg.Status != NEWDATA)
597
                                {       // msg buffer is free
598
                                        if(((UbxMsg.Hdr.Class&UbxMsg.ClassMask) == (RxHdr.Class&UbxMsg.ClassMask)) && ((UbxMsg.Hdr.Id&UbxMsg.IdMask) == (RxHdr.Id&UbxMsg.IdMask)))
599
                                        {       // msg matches to the filter criteria
600
                                                UbxMsg.Status = INVALID;
601
                                                UbxMsg.Hdr.Class = RxHdr.Class;
602
                                                UbxMsg.Hdr.Id = RxHdr.Id;
603
                                                UbxMsg.Hdr.Length = RxHdr.Length;
604
                                                if(UbxMsg.Hdr.Length <= UBX_MSG_DATA_SIZE)
605
                                                {       // copy data block
606
                                                        memcpy(UbxMsg.Data, RxData, RxHdr.Length);
607
                                                        UbxMsg.Status = NEWDATA;
515 killagreg 608
                                                }
263 killagreg 609
                                        } // EOF filter matches
610
                                } // EOF != INVALID
611
                        }// EOF crc ok
792 holgerb 612
//                      else DebugOut.Analog[13]++; // CRC Error -> since 2.10e (6.2015) -> removed 11.2016 (V2.16)
41 ingob 613
                        ubxState = UBXSTATE_IDLE; // ready to parse new data
614
                        break;
615
 
616
                default: // unknown ubx state
617
                        ubxState = UBXSTATE_IDLE;
618
                        break;
619
 
620
        }
621
}
245 killagreg 622
 
247 killagreg 623
u8 UBX_CreateMsg(Buffer_t* pBuff, u8* pData, u16 Len)
245 killagreg 624
{
625
        u16 i;
626
        u8 cka = 0, ckb = 0;
627
        // check if buffer is available
628
        if(pBuff->Locked == TRUE) return(0);
629
        // check if buffer size is sufficient
630
        if(pBuff->Size < 8 + Len) return(0);
631
        // lock the buffer
632
        pBuff->Locked = TRUE;
515 killagreg 633
        // start at begin
245 killagreg 634
        pBuff->Position = 0;
635
        pBuff->pData[pBuff->Position++] = UBX_SYNC1_CHAR;
636
        pBuff->pData[pBuff->Position++] = UBX_SYNC2_CHAR;
247 killagreg 637
        for(i=0;i<Len;i++)
638
        {
639
                pBuff->pData[pBuff->Position++] = pData[i];
640
        }
245 killagreg 641
        // calculate checksum
642
        for(i=2;i<pBuff->Position;i++)
643
        {
515 killagreg 644
                cka += pBuff->pData[i];
245 killagreg 645
                ckb += cka;
646
        }
647
        pBuff->pData[pBuff->Position++] = cka;
648
        pBuff->pData[pBuff->Position++] = ckb;
649
        pBuff->DataBytes = pBuff->Position;
650
        pBuff->Position = 0;  // reset buffer position for transmision
651
        return(1);
652
}
263 killagreg 653
/*
654
switch(ubxclass)
655
                        {
656
                                case UBX_CLASS_NAV:
657
                                        switch(ubxid)
658
                                        {
659
                                                case UBX_ID_POSLLH: // geodetic position
660
                                                        ubxSp =  (u8 *)&UbxPosLlh; // data start pointer
661
                                                        ubxEp = (u8 *)(&UbxPosLlh + 1); // data end pointer
662
                                                        ubxStP = (u8 *)&UbxPosLlh.Status; // status pointer
663
                                                        break;
515 killagreg 664
 
263 killagreg 665
                                                case UBX_ID_SOL: // navigation solution
666
                                                        ubxSp =  (u8 *)&UbxSol; // data start pointer
667
                                                        ubxEp = (u8 *)(&UbxSol + 1); // data end pointer
668
                                                        ubxStP = (u8 *)&UbxSol.Status; // status pointer
669
                                                        break;
515 killagreg 670
 
263 killagreg 671
                                                case UBX_ID_VELNED: // velocity vector in tangent plane
672
                                                        ubxSp =  (u8 *)&UbxVelNed; // data start pointer
673
                                                        ubxEp = (u8 *)(&UbxVelNed + 1); // data end pointer
674
                                                        ubxStP = (u8 *)&UbxVelNed.Status; // status pointer
675
                                                        break;
515 killagreg 676
 
263 killagreg 677
                                                default:                        // unsupported identifier
678
                                                        ubxState = UBXSTATE_IDLE;
679
                                                        return;
680
                                        }
681
                                        break;
682
 
683
                                default: // other  classes
684
                                        if(UbxMsg.Status == NEWDATA) ubxState = UBXSTATE_IDLE;
685
                                        else if(((UbxMsg.Hdr.Class&UbxMsg.ClassMask) == (ubxclass&UbxMsg.ClassMask)) && ((UbxMsg.Hdr.Id&UbxMsg.IdMask) == (ubxid&UbxMsg.IdMask)))
686
                                        {       // buffer is free and message matches to filter criteria
687
                                                UbxMsg.Status = INVALID;
688
                                                UbxMsg.Hdr.Class = ubxclass;
689
                                                UbxMsg.Hdr.Id = ubxid;
690
                                                UbxMsg.Hdr.Length = msglen;
691
                                                ubxSp =  (u8 *)&(UbxMsg.Data);   // data start pointer
692
                                                ubxEp = (u8 *)(&UbxMsg + 1);    // data end pointer
515 killagreg 693
                                                ubxStP = (u8 *)&UbxMsg.Status;  // status pointer
263 killagreg 694
                                        }
515 killagreg 695
                                        else ubxState = UBXSTATE_IDLE;
263 killagreg 696
                                        break;
697
                        }
698
*/
699