improve test procedures for TeleMega
[fw/altos] / src / kernel / ao_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 "ao.h"
19 #include "ao_telem.h"
20 #include "ao_flight.h"
21
22 #if !HAS_MONITOR
23 #error Must define HAS_MONITOR to 1
24 #endif
25
26 #ifndef LEGACY_MONITOR
27 #error Must define LEGACY_MONITOR
28 #endif
29
30 #ifndef HAS_MONITOR_PUT
31 #define HAS_MONITOR_PUT 1
32 #endif
33
34 #ifndef AO_MONITOR_LED
35 #error Must define AO_MONITOR_LED
36 #endif
37
38 __data uint8_t ao_monitoring;
39 static __data uint8_t ao_monitor_disabled;
40 static __data uint8_t ao_internal_monitoring;
41 static __data uint8_t ao_external_monitoring;
42
43 __xdata union ao_monitor ao_monitor_ring[AO_MONITOR_RING];
44
45 __data uint8_t  ao_monitor_head;
46
47 static void
48 _ao_monitor_adjust(void)
49 {
50         if (ao_monitoring)
51                 ao_radio_recv_abort();
52         if (ao_monitor_disabled)
53                 ao_monitoring = 0;
54         else {
55                 if (ao_external_monitoring)
56                         ao_monitoring = ao_external_monitoring;
57                 else
58                         ao_monitoring = ao_internal_monitoring;
59         }
60         ao_wakeup(DATA_TO_XDATA(&ao_monitoring));
61 }
62
63 void
64 ao_monitor_get(void)
65 {
66         uint8_t size;
67
68         for (;;) {
69                 switch (ao_monitoring) {
70                 case 0:
71                         ao_sleep(DATA_TO_XDATA(&ao_monitoring));
72                         continue;
73 #if LEGACY_MONITOR
74                 case AO_MONITORING_ORIG:
75                         size = sizeof (struct ao_telemetry_orig_recv);
76                         break;
77 #endif
78                 default:
79                         if (ao_monitoring > AO_MAX_TELEMETRY)
80                                 ao_monitoring = AO_MAX_TELEMETRY;
81                         size = ao_monitoring;
82                         break;
83                 }
84                 if (!ao_radio_recv(&ao_monitor_ring[ao_monitor_head], size + 2, 0))
85                         continue;
86                 ao_monitor_head = ao_monitor_ring_next(ao_monitor_head);
87                 ao_wakeup(DATA_TO_XDATA(&ao_monitor_head));
88         }
89 }
90
91 #if AO_MONITOR_LED
92 __xdata struct ao_task ao_monitor_blink_task;
93
94 void
95 ao_monitor_blink(void)
96 {
97         for (;;) {
98                 ao_sleep(DATA_TO_XDATA(&ao_monitor_head));
99                 ao_led_for(AO_MONITOR_LED, AO_MS_TO_TICKS(100));
100         }
101 }
102 #endif
103
104 #if HAS_MONITOR_PUT
105
106 static const char xdigit[16] = {
107         '0', '1', '2', '3', '4', '5', '6', '7',
108         '8', '9', 'a', 'b', 'c', 'd', 'e', 'f'
109 };
110
111 #define hex(c) do { putchar(xdigit[(c) >> 4]); putchar(xdigit[(c)&0xf]); } while (0)
112
113 void
114 ao_monitor_put(void)
115 {
116 #if LEGACY_MONITOR
117         __xdata char callsign[AO_MAX_CALLSIGN+1];
118 #endif
119 #if LEGACY_MONITOR || HAS_RSSI
120         int16_t rssi;
121 #endif
122         uint8_t ao_monitor_tail;
123         uint8_t state;
124         uint8_t sum, byte;
125         __xdata union ao_monitor        *m;
126
127 #define recv_raw        ((m->raw))
128 #define recv_orig       ((m->orig))
129 #define recv_tiny       ((m->tiny))
130
131         ao_monitor_tail = ao_monitor_head;
132         for (;;) {
133                 while (!ao_external_monitoring)
134                         ao_sleep(DATA_TO_XDATA(&ao_external_monitoring));
135                 while (ao_monitor_tail == ao_monitor_head && ao_external_monitoring)
136                         ao_sleep(DATA_TO_XDATA(&ao_monitor_head));
137                 if (!ao_external_monitoring)
138                         continue;
139                 m = &ao_monitor_ring[ao_monitor_tail];
140                 ao_monitor_tail = ao_monitor_ring_next(ao_monitor_tail);
141                 switch (ao_monitoring) {
142                 case 0:
143                         break;
144 #if LEGACY_MONITOR
145                 case AO_MONITORING_ORIG:
146                         state = recv_orig.telemetry_orig.flight_state;
147
148                         rssi = (int16_t) AO_RSSI_FROM_RADIO(recv_orig.rssi);
149                         ao_xmemcpy(callsign, recv_orig.telemetry_orig.callsign, AO_MAX_CALLSIGN);
150                         if (state > ao_flight_invalid)
151                                 state = ao_flight_invalid;
152                         if (recv_orig.status & PKT_APPEND_STATUS_1_CRC_OK) {
153
154                                 /* General header fields */
155                                 printf(AO_TELEM_VERSION " %d "
156                                        AO_TELEM_CALL " %s "
157                                        AO_TELEM_SERIAL " %d "
158                                        AO_TELEM_FLIGHT " %d "
159                                        AO_TELEM_RSSI " %d "
160                                        AO_TELEM_STATE " %s "
161                                        AO_TELEM_TICK " %d ",
162                                        AO_TELEMETRY_VERSION,
163                                        callsign,
164                                        recv_orig.telemetry_orig.serial,
165                                        recv_orig.telemetry_orig.flight,
166                                        rssi,
167                                        ao_state_names[state],
168                                        recv_orig.telemetry_orig.adc.tick);
169
170                                 /* Raw sensor values */
171                                 printf(AO_TELEM_RAW_ACCEL " %d "
172                                        AO_TELEM_RAW_BARO " %d "
173                                        AO_TELEM_RAW_THERMO " %d "
174                                        AO_TELEM_RAW_BATT " %d "
175                                        AO_TELEM_RAW_DROGUE " %d "
176                                        AO_TELEM_RAW_MAIN " %d ",
177                                        recv_orig.telemetry_orig.adc.accel,
178                                        recv_orig.telemetry_orig.adc.pres,
179                                        recv_orig.telemetry_orig.adc.temp,
180                                        recv_orig.telemetry_orig.adc.v_batt,
181                                        recv_orig.telemetry_orig.adc.sense_d,
182                                        recv_orig.telemetry_orig.adc.sense_m);
183
184                                 /* Sensor calibration values */
185                                 printf(AO_TELEM_CAL_ACCEL_GROUND " %d "
186                                        AO_TELEM_CAL_BARO_GROUND " %d "
187                                        AO_TELEM_CAL_ACCEL_PLUS " %d "
188                                        AO_TELEM_CAL_ACCEL_MINUS " %d ",
189                                        recv_orig.telemetry_orig.ground_accel,
190                                        recv_orig.telemetry_orig.ground_pres,
191                                        recv_orig.telemetry_orig.accel_plus_g,
192                                        recv_orig.telemetry_orig.accel_minus_g);
193
194                                 if (recv_orig.telemetry_orig.u.k.unused == 0x8000) {
195                                         /* Kalman state values */
196                                         printf(AO_TELEM_KALMAN_HEIGHT " %d "
197                                                AO_TELEM_KALMAN_SPEED " %d "
198                                                AO_TELEM_KALMAN_ACCEL " %d ",
199                                                recv_orig.telemetry_orig.height,
200                                                recv_orig.telemetry_orig.u.k.speed,
201                                                recv_orig.telemetry_orig.accel);
202                                 } else {
203                                         /* Ad-hoc flight values */
204                                         printf(AO_TELEM_ADHOC_ACCEL " %d "
205                                                AO_TELEM_ADHOC_SPEED " %ld "
206                                                AO_TELEM_ADHOC_BARO " %d ",
207                                                recv_orig.telemetry_orig.accel,
208                                                recv_orig.telemetry_orig.u.flight_vel,
209                                                recv_orig.telemetry_orig.height);
210                                 }
211                                 ao_gps_print(&recv_orig.telemetry_orig.gps);
212                                 ao_gps_tracking_print(&recv_orig.telemetry_orig.gps_tracking);
213                                 putchar('\n');
214 #if HAS_RSSI
215                                 ao_rssi_set(rssi);
216 #endif
217                         } else {
218                                 printf("CRC INVALID RSSI %3d\n", rssi);
219                         }
220                         break;
221 #endif /* LEGACY_MONITOR */
222                 default:
223 #if AO_PROFILE
224                 {
225                         extern uint32_t ao_rx_start_tick, ao_rx_packet_tick, ao_rx_done_tick, ao_rx_last_done_tick;
226                         extern uint32_t ao_fec_decode_start, ao_fec_decode_end;
227
228                         printf ("between packet: %d\n", ao_rx_start_tick - ao_rx_last_done_tick);
229                         printf ("receive start delay: %d\n", ao_rx_packet_tick - ao_rx_start_tick);
230                         printf ("decode time: %d\n", ao_fec_decode_end - ao_fec_decode_start);
231                         printf ("rx cleanup: %d\n", ao_rx_done_tick - ao_fec_decode_end);
232                 }
233 #endif
234                         printf("TELEM ");
235                         hex((uint8_t) (ao_monitoring + 2));
236                         sum = 0x5a;
237                         for (state = 0; state < ao_monitoring + 2; state++) {
238                                 byte = recv_raw.packet[state];
239                                 sum += byte;
240                                 hex(byte);
241                         }
242                         hex(sum);
243                         putchar ('\n');
244 #if HAS_RSSI
245                         if (recv_raw.packet[ao_monitoring + 1] & AO_RADIO_STATUS_CRC_OK) {
246                                 rssi = AO_RSSI_FROM_RADIO(recv_raw.packet[ao_monitoring]);
247                                 ao_rssi_set(rssi);
248                         }
249 #endif
250                         break;
251                 }
252                 ao_usb_flush();
253         }
254 }
255
256 __xdata struct ao_task ao_monitor_put_task;
257 #endif
258
259 __xdata struct ao_task ao_monitor_get_task;
260
261 void
262 ao_monitor_set(uint8_t monitoring)
263 {
264         ao_internal_monitoring = monitoring;
265         _ao_monitor_adjust();
266 }
267
268 void
269 ao_monitor_disable(void)
270 {
271         ++ao_monitor_disabled;
272         _ao_monitor_adjust();
273 }
274
275 void
276 ao_monitor_enable(void)
277 {
278         --ao_monitor_disabled;
279         _ao_monitor_adjust();
280 }
281
282 #if HAS_MONITOR_PUT
283 static void
284 set_monitor(void)
285 {
286         ao_cmd_hex();
287         ao_external_monitoring = ao_cmd_lex_i;
288         ao_wakeup(DATA_TO_XDATA(&ao_external_monitoring));
289         ao_wakeup(DATA_TO_XDATA(&ao_monitor_head));
290         _ao_monitor_adjust();
291 }
292
293 __code struct ao_cmds ao_monitor_cmds[] = {
294         { set_monitor,  "m <0 off, 1 old, 20 std>\0Set radio monitoring" },
295         { 0,    NULL },
296 };
297 #endif
298
299 void
300 ao_monitor_init(void) __reentrant
301 {
302 #if HAS_MONITOR_PUT
303         ao_cmd_register(&ao_monitor_cmds[0]);
304         ao_add_task(&ao_monitor_put_task, ao_monitor_put, "monitor_put");
305 #endif
306         ao_add_task(&ao_monitor_get_task, ao_monitor_get, "monitor_get");
307 #if AO_MONITOR_LED
308         ao_add_task(&ao_monitor_blink_task, ao_monitor_blink, "monitor_blink");
309 #endif
310 }