a6ac0313b03f173c49cf75859e0b05c9f3740f1b
[fw/altos] / ao-tools / lib / cc-telem.c
1 /*
2  * Copyright © 2009 Keith Packard <keithp@keithp.com>
3  *
4  * This program is free software; you can redistribute it and/or modify
5  * it under the terms of the GNU General Public License as published by
6  * the Free Software Foundation; version 2 of the License.
7  *
8  * This program is distributed in the hope that it will be useful, but
9  * WITHOUT ANY WARRANTY; without even the implied warranty of
10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
11  * General Public License for more details.
12  *
13  * You should have received a copy of the GNU General Public License along
14  * with this program; if not, write to the Free Software Foundation, Inc.,
15  * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
16  */
17
18 #include "cc.h"
19 #include <string.h>
20 #include <stdlib.h>
21
22 static void
23 cc_parse_string(char *target, int len, char *source)
24 {
25         strncpy(target, source, len-1);
26         target[len-1] = '\0';
27 }
28
29 static void
30 cc_parse_int(int *target, char *source)
31 {
32         *target = strtol(source, NULL, 0);
33 }
34
35 static void
36 cc_parse_hex(int *target, char *source)
37 {
38         *target = strtol(source, NULL, 16);
39 }
40
41 static void
42 cc_parse_pos(double *target, char *source)
43 {
44         int     deg;
45         double  min;
46         char    dir;
47         double  r;
48
49         if (sscanf(source, "%d°%lf'%c", &deg, &min, &dir) != 3) {
50                 *target = 0;
51                 return;
52         }
53         r = deg + min / 60.0;
54         if (dir == 'S' || dir == 'W')
55                 r = -r;
56         *target = r;
57 }
58
59 #define PARSE_MAX_WORDS 512
60
61 int
62 cc_telem_parse(const char *input_line, struct cc_telem *telem)
63 {
64         char *saveptr;
65         char *words[PARSE_MAX_WORDS];
66         int nword;
67         char line_buf[8192], *line;
68         int     tracking_pos;
69
70         /* avoid smashing our input parameter */
71         strncpy (line_buf, input_line, sizeof (line_buf)-1);
72         line_buf[sizeof(line_buf) - 1] = '\0';
73         line = line_buf;
74         for (nword = 0; nword < PARSE_MAX_WORDS; nword++) {
75                 words[nword] = strtok_r(line, " \t\n", &saveptr);
76                 line = NULL;
77                 if (words[nword] == NULL)
78                         break;
79         }
80         if (nword < 36)
81                 return FALSE;
82         if (strcmp(words[0], "CALL") != 0)
83                 return FALSE;
84         cc_parse_string(telem->callsign, sizeof (telem->callsign), words[1]);
85         cc_parse_int(&telem->serial, words[3]);
86
87         cc_parse_int(&telem->rssi, words[5]);
88         cc_parse_string(telem->state, sizeof (telem->state), words[9]);
89         cc_parse_int(&telem->tick, words[10]);
90         cc_parse_int(&telem->accel, words[12]);
91         cc_parse_int(&telem->pres, words[14]);
92         cc_parse_int(&telem->temp, words[16]);
93         cc_parse_int(&telem->batt, words[18]);
94         cc_parse_int(&telem->drogue, words[20]);
95         cc_parse_int(&telem->main, words[22]);
96         cc_parse_int(&telem->flight_accel, words[24]);
97         cc_parse_int(&telem->ground_accel, words[26]);
98         cc_parse_int(&telem->flight_vel, words[28]);
99         cc_parse_int(&telem->flight_pres, words[30]);
100         cc_parse_int(&telem->ground_pres, words[32]);
101         cc_parse_int(&telem->gps.nsat, words[34]);
102         if (strcmp (words[36], "unlocked") == 0) {
103                 telem->gps.gps_connected = 1;
104                 telem->gps.gps_locked = 0;
105                 telem->gps.gps_time.hour = telem->gps.gps_time.minute = telem->gps.gps_time.second = 0;
106                 telem->gps.lat = telem->gps.lon = 0;
107                 telem->gps.alt = 0;
108                 tracking_pos = 37;
109         } else if (nword >= 40) {
110                 telem->gps.gps_locked = 1;
111                 telem->gps.gps_connected = 1;
112                 sscanf(words[36], "%d:%d:%d", &telem->gps.gps_time.hour, &telem->gps.gps_time.minute, &telem->gps.gps_time.second);
113                 cc_parse_pos(&telem->gps.lat, words[37]);
114                 cc_parse_pos(&telem->gps.lon, words[38]);
115                 sscanf(words[39], "%dm", &telem->gps.alt);
116                 tracking_pos = 46;
117         } else {
118                 telem->gps.gps_connected = 0;
119                 telem->gps.gps_locked = 0;
120                 telem->gps.gps_time.hour = telem->gps.gps_time.minute = telem->gps.gps_time.second = 0;
121                 telem->gps.lat = telem->gps.lon = 0;
122                 telem->gps.alt = 0;
123                 tracking_pos = -1;
124         }
125         if (nword >= 46) {
126                 telem->gps.gps_extended = 1;
127                 sscanf(words[40], "%lfm/s", &telem->gps.ground_speed);
128                 sscanf(words[41], "%d", &telem->gps.course);
129                 sscanf(words[42], "%lfm/s", &telem->gps.climb_rate);
130                 sscanf(words[43], "%lf", &telem->gps.hdop);
131                 sscanf(words[44], "%d", &telem->gps.h_error);
132                 sscanf(words[45], "%d", &telem->gps.v_error);
133         } else {
134                 telem->gps.gps_extended = 0;
135                 telem->gps.ground_speed = 0;
136                 telem->gps.course = 0;
137                 telem->gps.climb_rate = 0;
138                 telem->gps.hdop = 0;
139                 telem->gps.h_error = 0;
140                 telem->gps.v_error = 0;
141         }
142         if (tracking_pos >= 0 && nword >= tracking_pos + 2 && strcmp(words[tracking_pos], "SAT") == 0) {
143                 int     c, n, pos;
144                 cc_parse_int(&n, words[tracking_pos + 1]);
145                 pos = tracking_pos + 2;
146                 if (nword >= pos + n * 3) {
147                         telem->gps_tracking.channels = n;
148                         for (c = 0; c < n; c++) {
149                                 cc_parse_int(&telem->gps_tracking.sats[c].svid,
150                                                  words[pos + 0]);
151                                 cc_parse_hex(&telem->gps_tracking.sats[c].state,
152                                                  words[pos + 1]);
153                                 cc_parse_int(&telem->gps_tracking.sats[c].c_n0,
154                                                  words[pos + 2]);
155                                 pos += 3;
156                         }
157                 } else {
158                         telem->gps_tracking.channels = 0;
159                 }
160         } else {
161                 telem->gps_tracking.channels = 0;
162         }
163         return TRUE;
164 }