faa24474de50feaee06b02277ed653a21300dd33
[fw/altos] / aoview / aoview_monitor.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 "aoview.h"
19
20 static struct aoview_serial *monitor_serial;
21
22 #define MONITOR_LEN     1024
23
24 static char     monitor_line[MONITOR_LEN + 1];
25 static int      monitor_pos;
26
27 void
28 aoview_monitor_disconnect(void)
29 {
30         if (monitor_serial) {
31                 aoview_serial_close(monitor_serial);
32                 monitor_serial = NULL;
33         }
34         aoview_table_clear();
35         aoview_log_new();
36 }
37
38 static void
39 aoview_parse_string(char *target, int len, char *source)
40 {
41         strncpy(target, source, len-1);
42         target[len-1] = '\0';
43 }
44
45 static void
46 aoview_parse_int(int *target, char *source)
47 {
48         *target = strtol(source, NULL, 0);
49 }
50
51 static void
52 aoview_parse_pos(double *target, char *source)
53 {
54         int     deg;
55         double  min;
56         char    dir;
57         double  r;
58
59         if (sscanf(source, "%d°%lf'%c", &deg, &min, &dir) != 3) {
60                 *target = 0;
61                 return;
62         }
63         r = deg + min / 60.0;
64         if (dir == 'S' || dir == 'W')
65                 r = -r;
66         *target = r;
67 }
68
69 static struct aostate   state;
70
71 gboolean
72 aoview_monitor_parse(char *line)
73 {
74         char *saveptr;
75         char *words[64];
76         int nword;
77
78         for (nword = 0; nword < 64; nword++) {
79                 words[nword] = strtok_r(line, " \t\n", &saveptr);
80                 line = NULL;
81                 if (words[nword] == NULL)
82                         break;
83         }
84         if (nword < 36)
85                 return FALSE;
86         if (strcmp(words[0], "CALL") != 0)
87                 return FALSE;
88         aoview_parse_string(state.callsign, sizeof (state.callsign), words[1]);
89         aoview_parse_int(&state.serial, words[3]);
90
91         aoview_parse_int(&state.rssi, words[5]);
92         aoview_parse_string(state.state, sizeof (state.state), words[9]);
93         aoview_parse_int(&state.tick, words[10]);
94         aoview_parse_int(&state.accel, words[12]);
95         aoview_parse_int(&state.pres, words[14]);
96         aoview_parse_int(&state.temp, words[16]);
97         aoview_parse_int(&state.batt, words[18]);
98         aoview_parse_int(&state.drogue, words[20]);
99         aoview_parse_int(&state.main, words[22]);
100         aoview_parse_int(&state.flight_accel, words[24]);
101         aoview_parse_int(&state.ground_accel, words[26]);
102         aoview_parse_int(&state.flight_vel, words[28]);
103         aoview_parse_int(&state.flight_pres, words[30]);
104         aoview_parse_int(&state.ground_pres, words[32]);
105         aoview_parse_int(&state.nsat, words[34]);
106         if (strcmp (words[36], "unlocked") != 0 && nword >= 40) {
107                 state.locked = 1;
108                 sscanf(words[36], "%d:%d:%d", &state.gps_time.hour, &state.gps_time.minute, &state.gps_time.second);
109                 aoview_parse_pos(&state.lat, words[37]);
110                 aoview_parse_pos(&state.lon, words[38]);
111                 sscanf(words[39], "%dm", &state.alt);
112         } else {
113                 state.locked = 0;
114                 state.gps_time.hour = state.gps_time.minute = state.gps_time.second = 0;
115                 state.lat = state.lon = 0;
116                 state.alt = 0;
117         }
118         if (nword >= 46) {
119                 sscanf(words[40], "%lfm/s", &state.ground_speed);
120                 sscanf(words[41], "%d", &state.course);
121                 sscanf(words[42], "%lfm/s", &state.climb_rate);
122                 sscanf(words[43], "%lf", &state.hdop);
123                 sscanf(words[44], "%d", &state.h_error);
124                 sscanf(words[45], "%d", &state.v_error);
125         } else {
126                 state.ground_speed = 0;
127                 state.course = 0;
128                 state.climb_rate = 0;
129                 state.hdop = 0;
130                 state.h_error = 0;
131                 state.v_error = 0;
132         }
133         aoview_state_notify(&state);
134         return TRUE;
135 }
136
137 static void
138 aoview_monitor_callback(gpointer user_data,
139                         struct aoview_serial *serial,
140                         gint revents)
141 {
142         int     c;
143
144         if (revents & (G_IO_HUP|G_IO_ERR)) {
145                 aoview_monitor_disconnect();
146                 return;
147         }
148         if (revents & G_IO_IN) {
149                 for (;;) {
150                         c = aoview_serial_getc(serial);
151                         if (c == -1)
152                                 break;
153                         if (c == '\r')
154                                 continue;
155                         if (c == '\n') {
156                                 monitor_line[monitor_pos] = '\0';
157                                 if (monitor_pos) {
158                                         if (aoview_monitor_parse(monitor_line)) {
159                                                 aoview_log_set_serial(state.serial);
160                                                 if (aoview_log_get_serial())
161                                                         aoview_log_printf ("%s\n", monitor_line);
162                                         }
163                                 }
164                                 monitor_pos = 0;
165                         } else if (monitor_pos < MONITOR_LEN)
166                                 monitor_line[monitor_pos++] = c;
167                 }
168         }
169 }
170
171 gboolean
172 aoview_monitor_connect(char *tty)
173 {
174         aoview_monitor_disconnect();
175         monitor_serial = aoview_serial_open(tty);
176         if (!monitor_serial)
177                 return FALSE;
178         aoview_serial_set_callback(monitor_serial,
179                                    aoview_monitor_callback,
180                                    monitor_serial,
181                                    NULL);
182         return TRUE;
183 }