altos: Bring up basic TeleTerra v0.2 UI
[fw/altos] / src / product / ao_terraui.c
index 3885db4e69e4b37961303358edc0a0d7ffd29b5f..cfbfb1fb8b3b8ad461927bc6232d96bd6a52caca 100644 (file)
  */
 
 #include "ao.h"
+#include <math.h>
+
+static __xdata struct ao_telemetry_sensor              ao_tel_sensor;
+static __xdata struct ao_telemetry_location            ao_tel_location;
+static __xdata struct ao_telemetry_configuration       ao_tel_config;
+static __xdata int16_t                                         ao_tel_max_speed;
+static __xdata int16_t                                 ao_tel_max_height;
+static int8_t ao_tel_rssi;
+
+static __xdata char ao_lcd_line[17];
+static __xdata char ao_state_name[] = "SIPBFCDMLI";
+
+static void
+ao_terraui_line(uint8_t addr)
+{
+       ao_lcd_goto(addr);
+       ao_lcd_putstring(ao_lcd_line);
+}
+
+#define ao_terraui_state()     (ao_state_name[ao_tel_sensor.state])
+
+static char
+ao_terraui_igniter(int16_t sense)
+{
+       if (sense < AO_IGNITER_OPEN)
+               return '-';
+       if (sense > AO_IGNITER_CLOSED)
+               return '+';
+       return '?';
+}
+
+static char
+ao_terraui_battery(void)
+{
+       if (ao_tel_sensor.v_batt > 25558)
+               return '+';
+       return '-';
+}
+
+static char
+ao_terraui_gps(void)
+{
+       if (ao_tel_location.flags & (1 << 4)) {
+               if ((ao_tel_location.flags & 0xf) >= 4)
+                       return '+';
+       }
+       return '-';
+}
+
+static char
+ao_terraui_local_gps(void)
+{
+       if (ao_gps_data.flags & (1 << 4)) {
+               if ((ao_gps_data.flags & 0xf) >= 4)
+                       return '+';
+       }
+       return '-';
+}
+
+static char
+ao_terraui_logging(void)
+{
+       if (ao_tel_config.flight != 0)
+               return '+';
+       return '-';
+}
+
+static __code char ao_progress[4] = { '\011', '\012', '\014', '\013' };
+
+static uint8_t ao_telem_progress;
+static uint8_t ao_gps_progress;
+
+static void
+ao_terraui_info(void)
+{
+       sprintf(ao_lcd_line, "S %4d %7.7s %c",
+               ao_tel_sensor.serial,
+               ao_tel_config.callsign,
+               ao_terraui_state());
+       ao_terraui_line(AO_LCD_ADDR(0,0));
+       sprintf(ao_lcd_line, "F %4d RSSI%4d%c",
+               ao_tel_config.flight,
+               ao_tel_rssi,
+               ao_progress[ao_telem_progress]);
+       ao_terraui_line(AO_LCD_ADDR(1,0));
+}
+
+static void
+ao_terraui_pad(void)
+{
+       sprintf(ao_lcd_line, "B%c A%c M%c L%c G%c %c",
+               ao_terraui_battery(),
+               ao_terraui_igniter(ao_tel_sensor.sense_d),
+               ao_terraui_igniter(ao_tel_sensor.sense_m),
+               ao_terraui_logging(),
+               ao_terraui_gps(),
+               ao_terraui_state());
+       ao_terraui_line(AO_LCD_ADDR(0,0));
+       sprintf(ao_lcd_line, "SAT %2d RSSI%4d%c",
+               ao_tel_location.flags & 0xf,
+               ao_tel_rssi,
+               ao_progress[ao_telem_progress]);
+       ao_terraui_line(AO_LCD_ADDR(1,0));
+}
+
+static void
+ao_terraui_ascent(void)
+{
+       sprintf(ao_lcd_line, "S %5d S\011%5d%c",
+               ao_tel_sensor.speed >> 4,
+               ao_tel_max_speed >> 4,
+               ao_terraui_state());
+       ao_terraui_line(AO_LCD_ADDR(0,0));
+       sprintf(ao_lcd_line, "H %5d H\011%5d%c",
+               ao_tel_sensor.height >> 4,
+               ao_tel_max_height >> 4,
+               ao_progress[ao_telem_progress]);
+       ao_terraui_line(AO_LCD_ADDR(1,0));
+}
+
+static int16_t mag(int32_t d)
+{
+       if (d < 0)
+               d = -d;
+       if (d > 0x7fff)
+               d = 0x7fff;
+       return d;
+}
+
+static uint32_t
+dist(int32_t d)
+{
+       int32_t m;
+
+       if (d < 0)
+               d = -d;
+
+       m = 1000000;
+       while (d >= (2147483647 / 111198)) {
+               d /= 10;
+               m /= 10;
+       }
+       return (d * 111198) / m;
+}
+
+static __code uint8_t cos_table[] = {
+   0, /*  0 */
+   0, /*  1 */
+   0, /*  2 */
+ 255, /*  3 */
+ 254, /*  4 */
+ 253, /*  5 */
+ 252, /*  6 */
+ 251, /*  7 */
+ 249, /*  8 */
+ 247, /*  9 */
+ 245, /* 10 */
+ 243, /* 11 */
+ 240, /* 12 */
+ 238, /* 13 */
+ 235, /* 14 */
+ 232, /* 15 */
+ 228, /* 16 */
+ 225, /* 17 */
+ 221, /* 18 */
+ 217, /* 19 */
+ 213, /* 20 */
+ 209, /* 21 */
+ 205, /* 22 */
+ 200, /* 23 */
+ 195, /* 24 */
+ 190, /* 25 */
+ 185, /* 26 */
+ 180, /* 27 */
+ 175, /* 28 */
+ 169, /* 29 */
+ 163, /* 30 */
+ 158, /* 31 */
+ 152, /* 32 */
+ 145, /* 33 */
+ 139, /* 34 */
+ 133, /* 35 */
+ 126, /* 36 */
+ 120, /* 37 */
+ 113, /* 38 */
+ 106, /* 39 */
+ 100, /* 40 */
+  93, /* 41 */
+  86, /* 42 */
+  79, /* 43 */
+  71, /* 44 */
+  64, /* 45 */
+  57, /* 46 */
+  49, /* 47 */
+  42, /* 48 */
+  35, /* 49 */
+  27, /* 50 */
+  20, /* 51 */
+  12, /* 52 */
+   5, /* 53 */
+   1, /* 54 */
+};
+
+static __code uint8_t tan_table[] = {
+    0, /*  0 */
+    4, /*  1 */
+    9, /*  2 */
+   13, /*  3 */
+   18, /*  4 */
+   22, /*  5 */
+   27, /*  6 */
+   31, /*  7 */
+   36, /*  8 */
+   41, /*  9 */
+   45, /* 10 */
+   50, /* 11 */
+   54, /* 12 */
+   59, /* 13 */
+   64, /* 14 */
+   69, /* 15 */
+   73, /* 16 */
+   78, /* 17 */
+   83, /* 18 */
+   88, /* 19 */
+   93, /* 20 */
+   98, /* 21 */
+  103, /* 22 */
+  109, /* 23 */
+  114, /* 24 */
+  119, /* 25 */
+  125, /* 26 */
+  130, /* 27 */
+  136, /* 28 */
+  142, /* 29 */
+  148, /* 30 */
+  154, /* 31 */
+  160, /* 32 */
+  166, /* 33 */
+  173, /* 34 */
+  179, /* 35 */
+  186, /* 36 */
+  193, /* 37 */
+  200, /* 38 */
+  207, /* 39 */
+  215, /* 40 */
+  223, /* 41 */
+  231, /* 42 */
+  239, /* 43 */
+  247, /* 44 */
+};
+       
+int16_t ao_atan2(int32_t dy, int32_t dx) __reentrant
+{
+       int8_t  m = 1;
+       int16_t a = 0;
+       uint8_t r;
+       int8_t  t;
+
+       if (dx == 0) {
+               if (dy > 0)
+                       return 90;
+               if (dy < 0)
+                       return -90;
+               return 0;
+       }
+
+       if (dx < 0) {
+               a = 180;
+               m = -m;
+               dx = -dx;
+       }
+
+       if (dy < 0) {
+               m = -m;
+               a = -a;
+               dy = -dy;
+       }
+
+       if (dy > dx) {
+               int     t;
+
+               t = dy; dy = dx; dx = t;
+               a = a + m * 90;
+               m = -m;
+       }
+
+       r = ((dy << 8) + (dx >> 1)) / dx;
+       for (t = 0; t < 44; t++)
+               if (tan_table[t] >= r)
+                       break;
+       return t * m + a;
+}
+
+static __pdata uint32_t        lon_dist, lat_dist;
+static __pdata uint32_t        ground_dist, range;
+static __pdata int16_t bearing, elevation;
+
+static void
+ao_terraui_lat_dist(void)
+{
+       lat_dist = dist (ao_tel_location.latitude - ao_gps_data.latitude);
+}
+
+static void
+ao_terraui_lon_dist(void)
+{
+       uint8_t c = cos_table[ao_gps_data.latitude >> 24];
+       lon_dist = dist(ao_tel_location.longitude - ao_gps_data.longitude);
+       if (c)
+               lon_dist = ((uint32_t) lon_dist * c) >> 8;
+}
+
+static void
+ao_terraui_compute(void)
+{
+       ao_terraui_lat_dist();
+       ao_terraui_lon_dist();
+       ground_dist = ao_sqrt (lat_dist * lat_dist + lon_dist * lon_dist);
+       range = ao_sqrt(ground_dist * ground_dist + ao_tel_sensor.height * ao_tel_sensor.height);
+       bearing = ao_atan2(lat_dist, lon_dist);
+       elevation = ao_atan2(ao_tel_sensor.height, ground_dist);
+}
+
+static void
+ao_terraui_descent(void)
+{
+       ao_terraui_compute();
+       sprintf(ao_lcd_line, "\007 %4d  \005 %3d  %c",
+               bearing, elevation,
+               ao_terraui_state());
+       ao_terraui_line(AO_LCD_ADDR(0,0));
+       sprintf(ao_lcd_line, "H:%5d S:%5d%c",
+               ao_tel_sensor.height, ao_tel_sensor.speed >> 4,
+               ao_progress[ao_telem_progress]);
+       ao_terraui_line(AO_LCD_ADDR(1,0));
+}
+
+static void
+ao_terraui_coord(int32_t c, char plus, char minus, char extra) __reentrant
+{
+       uint16_t        d;
+       uint8_t         m;
+       uint16_t        f;
+
+       if (c < 0) {
+               plus = minus;
+               c = -c;
+       }
+       d = c / 10000000;
+       c = c % 10000000;
+       c = c * 60;
+       m = c / 10000000;
+       c = c % 10000000;
+       f = (c + 500) / 1000;
+       sprintf(ao_lcd_line, "%c %3d\362 %2d.%04d\"%c",
+               plus, d, m, f, extra);
+}
+
+static void
+ao_terraui_remote(void)
+{
+       ao_terraui_coord(ao_tel_location.latitude, 'N', 'S', ao_terraui_state());
+       ao_terraui_line(AO_LCD_ADDR(0,0));
+       ao_terraui_coord(ao_tel_location.longitude, 'E', 'W', ao_progress[ao_telem_progress]);
+       ao_terraui_line(AO_LCD_ADDR(1,0));
+}
+
+static void
+ao_terraui_local(void) __reentrant
+{
+       ao_terraui_coord(ao_gps_data.latitude, 'n', 's',
+                        ao_terraui_local_gps());
+       ao_terraui_line(AO_LCD_ADDR(0,0));
+       ao_terraui_coord(ao_gps_data.longitude, 'e', 'w', ao_progress[ao_gps_progress]);
+       ao_terraui_line(AO_LCD_ADDR(1,0));
+}
+
+static void
+ao_terraui_config(void)
+{
+       
+}
+
+enum ao_page {
+       ao_page_info,
+       ao_page_pad,
+       ao_page_ascent,
+       ao_page_descent,
+       ao_page_remote,
+       ao_page_local,
+};
 
 static void
 ao_terraui(void)
 {
+       enum ao_page    cur_page = ao_page_info;
+
+       ao_lcd_start();
        for (;;) {
-               char    b = ao_button_get();
+               char    b;
+               switch (cur_page) {
+               case ao_page_info:
+                       ao_terraui_info();
+                       break;
+               case ao_page_pad:
+                       ao_terraui_pad();
+                       break;
+               case ao_page_ascent:
+                       ao_terraui_ascent();
+                       break;
+               case ao_page_descent:
+                       ao_terraui_descent();
+                       break;
+               case ao_page_remote:
+                       ao_terraui_remote();
+                       break;
+               case ao_page_local:
+                       ao_terraui_local();
+                       break;
+               }
+
+               ao_alarm(AO_SEC_TO_TICKS(1));
+               b = ao_button_get();
+               ao_clear_alarm();
+
                switch (b) {
+               case 0:
+                       break;
                case 1:
-                       ao_beep_for(AO_BEEP_LOW, AO_MS_TO_TICKS(200));
+                       if (cur_page == ao_page_local)
+                               cur_page = ao_page_info;
+                       else
+                               cur_page++;
+                       ao_beep_for(AO_BEEP_HIGH, AO_MS_TO_TICKS(50));
                        break;
                case 2:
-                       ao_beep_for(AO_BEEP_MID, AO_MS_TO_TICKS(200));
+                       ao_beep_for(AO_BEEP_LOW, AO_MS_TO_TICKS(200));
                        break;
                case 3:
-                       ao_beep_for(AO_BEEP_HIGH, AO_MS_TO_TICKS(200));
+                       if (cur_page == ao_page_info)
+                               cur_page = ao_page_local;
+                       else
+                               cur_page--;
+                       ao_beep_for(AO_BEEP_MID, AO_MS_TO_TICKS(50));
                        break;
                }
        }
@@ -38,8 +467,68 @@ ao_terraui(void)
 
 __xdata static struct ao_task ao_terraui_task;
 
+static void
+ao_terramonitor(void)
+{
+       uint8_t monitor;
+
+       monitor = ao_monitor_head;
+       for (monitor = ao_monitor_head;;
+            monitor = ao_monitor_ring_next(monitor))
+       {
+               while (monitor == ao_monitor_head)
+                       ao_sleep(DATA_TO_XDATA(&ao_monitor_head));
+               if (ao_monitoring != sizeof (union ao_telemetry_all))
+                       continue;
+               if (!(ao_monitor_ring[monitor].all.status & PKT_APPEND_STATUS_1_CRC_OK))
+                       continue;
+               ao_tel_rssi = (ao_monitor_ring[monitor].all.rssi >> 1) - 74;
+               switch (ao_monitor_ring[monitor].all.telemetry.generic.type) {
+               case AO_TELEMETRY_SENSOR_TELEMETRUM:
+               case AO_TELEMETRY_SENSOR_TELEMINI:
+               case AO_TELEMETRY_SENSOR_TELENANO:
+                       ao_xmemcpy(&ao_tel_sensor, &ao_monitor_ring[monitor], sizeof (ao_tel_sensor));
+                       if (ao_tel_sensor.state < ao_flight_boost) {
+                               ao_tel_max_speed = 0;
+                               ao_tel_max_height = 0;
+                       } else {
+                               if (ao_tel_sensor.speed > ao_tel_max_speed)
+                                       ao_tel_max_speed = ao_tel_sensor.speed;
+                               if (ao_tel_sensor.height > ao_tel_max_height)
+                                       ao_tel_max_height = ao_tel_sensor.height;
+                       }
+                       ao_telem_progress = (ao_telem_progress + 1) & 0x3;
+                       break;
+               case AO_TELEMETRY_LOCATION:
+                       ao_xmemcpy(&ao_tel_location, &ao_monitor_ring[monitor], sizeof (ao_tel_location));
+                       break;
+               case AO_TELEMETRY_CONFIGURATION:
+                       ao_xmemcpy(&ao_tel_config, &ao_monitor_ring[monitor], sizeof (ao_tel_config));
+               }
+       }
+}
+
+__xdata static struct ao_task ao_terramonitor_task;
+
+static void
+ao_terragps(void)
+{
+       uint16_t        gps_tick = ao_gps_progress;
+
+       for (;;) {
+               while (ao_gps_tick == gps_tick)
+                       ao_sleep(&ao_gps_data);
+               gps_tick = ao_gps_tick;
+               ao_gps_progress = (ao_gps_progress + 1) & 3;
+       }
+}
+
+__xdata static struct ao_task ao_terragps_task;
+
 void
 ao_terraui_init(void)
 {
        ao_add_task(&ao_terraui_task, ao_terraui, "ui");
+       ao_add_task(&ao_terramonitor_task, ao_terramonitor, "monitor");
+       ao_add_task(&ao_terragps_task, ao_terragps, "gps");
 }