Add preliminary aoview code
[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 }
35
36 static void
37 aoview_parse_string(char *target, int len, char *source)
38 {
39         strncpy(target, source, len-1);
40         target[len-1] = '\0';
41 }
42
43 static void
44 aoview_parse_int(int *target, char *source)
45 {
46         *target = strtol(source, NULL, 0);
47 }
48
49 static void
50 aoview_parse_pos(double *target, char *source)
51 {
52         int     deg;
53         double  min;
54         char    dir;
55         double  r;
56
57         if (sscanf(source, "%d°%lf'%c", &deg, &min, &dir) != 3) {
58                 *target = 0;
59                 return;
60         }
61         r = deg + min / 60.0;
62         if (dir == 'S' || dir == 'W')
63                 r = -r;
64         *target = r;
65 }
66
67 static void
68 aoview_monitor_parse(char *line)
69 {
70         char *saveptr;
71         char *words[64];
72         int nword;
73         struct aostate  state;
74
75         printf ("%s\n", line);
76         for (nword = 0; nword < 64; nword++) {
77                 words[nword] = strtok_r(line, " \t\n", &saveptr);
78                 line = NULL;
79                 if (words[nword] == NULL)
80                         break;
81         }
82         if (nword < 26)
83                 return;
84         if (strcmp(words[0], "CALL") != 0)
85                 return;
86         aoview_parse_string(state.callsign, sizeof (state.callsign), words[1]);
87         aoview_parse_int(&state.serial, words[3]);
88         aoview_parse_int(&state.rssi, words[5]);
89         aoview_parse_string(state.state, sizeof (state.state), words[9]);
90         aoview_parse_int(&state.tick, words[10]);
91         aoview_parse_int(&state.accel, words[12]);
92         aoview_parse_int(&state.pres, words[14]);
93         aoview_parse_int(&state.temp, words[16]);
94         aoview_parse_int(&state.batt, words[18]);
95         aoview_parse_int(&state.drogue, words[20]);
96         aoview_parse_int(&state.main, words[22]);
97         if (strcmp (words[26], "unlocked") != 0 && nword >= 29) {
98                 sscanf(words[26], "%d:%d:%d", &state.gps_time.hour, &state.gps_time.minute, &state.gps_time.second);
99                 aoview_parse_pos(&state.lat, words[27]);
100                 aoview_parse_pos(&state.lon, words[28]);
101                 sscanf(words[29], "%dm", &state.alt);
102         } else {
103                 state.gps_time.hour = state.gps_time.minute = state.gps_time.second = 0;
104                 state.lat = state.lon = 0;
105                 state.alt = 0;
106         }
107         aoview_state_notify(&state);
108 }
109
110 static gboolean
111 aoview_monitor_callback(void *user_data)
112 {
113         int     c;
114
115         if (!monitor_serial)
116                 return FALSE;
117
118         for (;;) {
119                 c = aoview_serial_getc(monitor_serial);
120                 if (c == -1)
121                         break;
122                 if (c == '\r')
123                         continue;
124                 if (c == '\n') {
125                         monitor_line[monitor_pos] = '\0';
126                         if (monitor_pos)
127                         aoview_monitor_parse(monitor_line);
128                         monitor_pos = 0;
129                 } else if (monitor_pos < MONITOR_LEN)
130                         monitor_line[monitor_pos++] = c;
131         }
132         return TRUE;
133 }
134
135 void
136 aoview_monitor_connect(char *tty)
137 {
138         aoview_monitor_disconnect();
139         monitor_serial = aoview_serial_open(tty);
140         aoview_serial_set_callback(monitor_serial,
141                                    aoview_monitor_callback,
142                                    monitor_serial,
143                                    NULL);
144 }