git.gag.com Git - fw/altos/blob - src/telelco-v3.0/ao_lco_v3.c

   1 /*
   2  * Copyright © 2012 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; either version 2 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful, but
  10  * WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License along
  15  * with this program; if not, write to the Free Software Foundation, Inc.,
  16  * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
  17  */
  18
  19 #include <ao.h>
  20 #include <ao_lco.h>
  21 #include <ao_event.h>
  22 #include <ao_quadrature.h>
  23 #include <ao_radio_cmac.h>
  24 #include <ao_st7565.h>
  25 #include <ao_adc_single.h>
  26 #include <ao_pwm.h>
  27
  28 #define WIDTH   AO_ST7565_WIDTH
  29 #define HEIGHT  AO_ST7565_HEIGHT
  30 #define STRIDE  AO_BITMAP_STRIDE(WIDTH)
  31
  32 static uint32_t image[STRIDE * HEIGHT];
  33
  34 static struct ao_bitmap fb = {
  35         .base = image,
  36         .stride = STRIDE,
  37         .width = WIDTH,
  38         .height = HEIGHT,
  39         .damage = AO_BOX_INIT,
  40 };
  41
  42 static const struct ao_transform logo_transform = {
  43         .x_scale = 48, .x_off = 2,
  44         .y_scale = 48, .y_off = 0,
  45 };
  46
  47 static const struct ao_transform show_transform = {
  48         .x_scale = 36, .x_off = 100,
  49         .y_scale = 36, .y_off = 0,
  50 };
  51
  52 #define BIG_FONT BitstreamVeraSans_Roman_58_font
  53 #define VOLT_FONT BitstreamVeraSans_Roman_58_font
  54 #define SMALL_FONT BitstreamVeraSans_Roman_12_font
  55 #define TINY_FONT BitstreamVeraSans_Roman_10_font
  56 #define LOGO_FONT BenguiatGothicStd_Bold_26_font
  57
  58 #define LABEL_Y         (int16_t) (SMALL_FONT.ascent)
  59 #define VALUE_Y         (int16_t) (LABEL_Y + BIG_FONT.ascent + 5)
  60 #define BOX_X           2
  61 #define PAD_X           90
  62 #define BOX_LABEL_X     26
  63 #define VALUE_LABEL_X   64
  64 #define RSSI_LABEL_X    15
  65 #define PAD_LABEL_X     95
  66 #define SEP_X           (PAD_X - 8)
  67 #define SCAN_X          (WIDTH - 100) / 2
  68 #define SCAN_Y          50
  69 #define SCAN_HEIGHT     3
  70 #define FOUND_Y         63
  71 #define FOUND_X         6
  72 #define FOUND_WIDTH     (WIDTH - 6)
  73 #define CONTRAST_LABEL_X        37
  74 #define CONTRAST_WIDTH  100
  75 #define CONTRAST_X      (WIDTH - CONTRAST_WIDTH) / 2
  76 #define CONTRAST_Y      20
  77 #define CONTRAST_HEIGHT 20
  78 #define CONTRAST_VALUE_X        64
  79 #define CONTRAST_VALUE_Y        (CONTRAST_Y + CONTRAST_HEIGHT + SMALL_FONT.ascent + 3)
  80 #define BACKLIGHT_LABEL_X       37
  81 #define BACKLIGHT_WIDTH 100
  82 #define BACKLIGHT_X     (WIDTH - BACKLIGHT_WIDTH) / 2
  83 #define BACKLIGHT_Y     20
  84 #define BACKLIGHT_HEIGHT        20
  85 #define BACKLIGHT_VALUE_X       64
  86 #define BACKLIGHT_VALUE_Y       (BACKLIGHT_Y + BACKLIGHT_HEIGHT + SMALL_FONT.ascent + 3)
  87 #define INFO_START_Y    ((int16_t) (SMALL_FONT.ascent + 2))
  88 #define INFO_STEP_Y     ((int16_t) (SMALL_FONT.ascent + 3))
  89
  90 #define AO_LCO_DRAG_RACE_START_TIME     AO_SEC_TO_TICKS(5)
  91 #define AO_LCO_DRAG_RACE_STOP_TIME      AO_SEC_TO_TICKS(2)
  92
  93 /* UI values */
  94 static uint8_t  ao_lco_select_mode;
  95 static uint8_t  ao_lco_event_debug;
  96
  97 #define PRINTE(...) do { if (!ao_lco_debug && !ao_lco_event_debug) break; printf ("\r%5lu %s: ", (unsigned long) ao_tick_count, __func__); printf(__VA_ARGS__); flush(); } while(0)
  98 #define AO_LCO_SELECT_PAD       0
  99 #define AO_LCO_SELECT_BOX       1
 100
 101 static uint8_t  ao_lco_display_mutex;
 102
 103 static void
 104 _ao_lco_show_pad(int8_t pad)
 105 {
 106         char    str[5];
 107
 108         snprintf(str, sizeof(str), "%d", pad);
 109         ao_text(&fb, &BIG_FONT, PAD_X, VALUE_Y, str, AO_BLACK, AO_COPY);
 110         ao_text(&fb, &SMALL_FONT, PAD_LABEL_X, LABEL_Y, "Pad", AO_BLACK, AO_COPY);
 111 }
 112
 113 static void
 114 _ao_lco_show_box(int16_t box)
 115 {
 116         char    str[7];
 117
 118         snprintf(str, sizeof(str), "%2d", box);
 119         ao_text(&fb, &BIG_FONT, BOX_X, VALUE_Y, str, AO_BLACK, AO_COPY);
 120         ao_text(&fb, &SMALL_FONT, BOX_LABEL_X, LABEL_Y, "Box", AO_BLACK, AO_COPY);
 121 }
 122
 123 static void
 124 _ao_lco_show_voltage(uint16_t decivolts, const char *label)
 125 {
 126         char    str[7];
 127         int16_t width;
 128
 129         PRINTD("voltage %d\n", decivolts);
 130         snprintf(str, sizeof(str), "%2d.%d", decivolts / 10, decivolts % 10);
 131         ao_text(&fb, &VOLT_FONT, BOX_X, VALUE_Y, str, AO_BLACK, AO_COPY);
 132         width = ao_text_width(&SMALL_FONT, label);
 133         ao_text(&fb, &SMALL_FONT, VALUE_LABEL_X - width/2, LABEL_Y, label, AO_BLACK, AO_COPY);
 134 }
 135
 136 static void
 137 _ao_lco_batt_voltage(void)
 138 {
 139         struct ao_adc   packet;
 140         int16_t         decivolt;
 141
 142         ao_adc_single_get(&packet);
 143         decivolt = ao_battery_decivolt(packet.v_batt);
 144         _ao_lco_show_voltage((uint16_t) decivolt, "LCO Battery");
 145         ao_st7565_update(&fb);
 146 }
 147
 148 static void
 149 _ao_lco_show_contrast(void)
 150 {
 151         char buf[8];
 152         uint8_t brightness = ao_st7565_get_brightness();
 153         int16_t contrast = (int16_t) (brightness * CONTRAST_WIDTH / AO_LCO_MAX_CONTRAST);
 154         int16_t width;
 155
 156         ao_text(&fb, &SMALL_FONT, CONTRAST_LABEL_X, LABEL_Y, "Contrast", AO_BLACK, AO_COPY);
 157         ao_rect(&fb, CONTRAST_X, CONTRAST_Y, contrast, CONTRAST_HEIGHT, AO_BLACK, AO_COPY);
 158         /* this "knows" that CONTRAST_WIDTH == 100 */
 159         snprintf(buf, sizeof(buf), "%d %%", contrast);
 160         width = ao_text_width(&SMALL_FONT, buf);
 161         ao_text(&fb, &SMALL_FONT, BACKLIGHT_VALUE_X - width / 2, BACKLIGHT_VALUE_Y, buf, AO_BLACK, AO_COPY);
 162 }
 163
 164 static void
 165 _ao_lco_show_backlight(void)
 166 {
 167         char buf[8];
 168         int32_t backlight = ao_lco_get_backlight();
 169         int16_t value = (int16_t) (backlight * BACKLIGHT_WIDTH / AO_LCO_MAX_BACKLIGHT);
 170         int16_t width;
 171
 172         ao_text(&fb, &SMALL_FONT, BACKLIGHT_LABEL_X, LABEL_Y, "Backlight", AO_BLACK, AO_COPY);
 173         ao_rect(&fb, BACKLIGHT_X, BACKLIGHT_Y, value, BACKLIGHT_HEIGHT, AO_BLACK, AO_COPY);
 174         /* this "knows" that BACKLIGHT_WIDTH == 100 */
 175         snprintf(buf, sizeof(buf), "%d %%", value);
 176         width = ao_text_width(&SMALL_FONT, buf);
 177         ao_text(&fb, &SMALL_FONT, BACKLIGHT_VALUE_X - width / 2, BACKLIGHT_VALUE_Y, buf, AO_BLACK, AO_COPY);
 178 }
 179
 180 static int16_t info_y;
 181
 182 static void
 183 _ao_lco_info(const char *format, ...)
 184 {
 185         va_list a;
 186         char    buf[20];
 187         va_start(a, format);
 188         vsnprintf(buf, sizeof(buf), format, a);
 189         va_end(a);
 190         ao_text(&fb, &SMALL_FONT, 0, info_y, buf, AO_BLACK, AO_COPY);
 191         info_y += INFO_STEP_Y;
 192 }
 193
 194 static void
 195 _ao_lco_show_info(void)
 196 {
 197         info_y = INFO_START_Y;
 198         ao_logo_poly(&fb, &show_transform, AO_BLACK, AO_COPY);
 199         _ao_lco_info("%s", ao_product);
 200         _ao_lco_info("Version: %s", ao_version);
 201         _ao_lco_info("Serial: %d", ao_serial_number);
 202         _ao_lco_info("Callsign: %s", ao_config.callsign);
 203         _ao_lco_info("Frequency: %ld.%03d",
 204                      ao_config.frequency / 1000,
 205                      (int) (ao_config.frequency % 1000));
 206 }
 207
 208 static void
 209 _ao_lco_show_rssi(void)
 210 {
 211         char label[20];
 212         int16_t width;
 213         snprintf(label, sizeof(label), "Box %d RSSI", ao_lco_box);
 214         width = ao_text_width(&SMALL_FONT, label);
 215         ao_text(&fb, &SMALL_FONT, VALUE_LABEL_X - width / 2, LABEL_Y, label, AO_BLACK, AO_COPY);
 216         if (!(ao_lco_valid[ao_lco_box] & AO_LCO_VALID_LAST))
 217                 strcpy(label, "---");
 218         else
 219                 snprintf(label, sizeof(label), "%d", ao_radio_cmac_rssi);
 220         width = ao_text_width(&VOLT_FONT, label);
 221         ao_text(&fb, &VOLT_FONT, VALUE_LABEL_X - width / 2, VALUE_Y, label, AO_BLACK, AO_COPY);
 222 }
 223
 224 static void
 225 _ao_lco_show_pad_battery(void)
 226 {
 227         char label[20];
 228         snprintf(label, sizeof(label), "Box %d Battery", ao_lco_box);
 229         _ao_lco_show_voltage(ao_pad_query.battery, label);
 230 }
 231
 232 void
 233 ao_lco_show(void)
 234 {
 235         ao_mutex_get(&ao_lco_display_mutex);
 236         ao_rect(&fb, 0, 0, WIDTH, HEIGHT, AO_WHITE, AO_COPY);
 237         switch (ao_lco_box) {
 238         case AO_LCO_LCO_VOLTAGE:
 239                 _ao_lco_batt_voltage();
 240                 break;
 241         case AO_LCO_CONTRAST:
 242                 _ao_lco_show_contrast();
 243                 break;
 244         case AO_LCO_BACKLIGHT:
 245                 _ao_lco_show_backlight();
 246                 break;
 247         case AO_LCO_INFO:
 248                 _ao_lco_show_info();
 249                 break;
 250         default:
 251                 switch (ao_lco_pad) {
 252                 case AO_LCO_PAD_RSSI:
 253                         _ao_lco_show_rssi();
 254                         break;
 255                 case AO_LCO_PAD_VOLTAGE:
 256                         _ao_lco_show_pad_battery();
 257                         break;
 258                 default:
 259                         _ao_lco_show_pad(ao_lco_pad);
 260                         _ao_lco_show_box(ao_lco_box);
 261                         ao_rect(&fb, SEP_X, 0, 2, HEIGHT, AO_BLACK, AO_COPY);
 262                 }
 263                 break;
 264         }
 265         ao_st7565_update(&fb);
 266         ao_mutex_put(&ao_lco_display_mutex);
 267 }
 268
 269 static void
 270 ao_lco_set_select(void)
 271 {
 272         if (ao_lco_armed) {
 273                 ao_led_off(AO_LED_PAD);
 274                 ao_led_off(AO_LED_BOX);
 275         } else {
 276                 switch (ao_lco_select_mode) {
 277                 case AO_LCO_SELECT_PAD:
 278                         ao_led_off(AO_LED_BOX);
 279                         ao_led_on(AO_LED_PAD);
 280                         break;
 281                 case AO_LCO_SELECT_BOX:
 282                         ao_led_off(AO_LED_PAD);
 283                         ao_led_on(AO_LED_BOX);
 284                         break;
 285                 default:
 286                         break;
 287                 }
 288         }
 289 }
 290
 291
 292 void
 293 ao_lco_set_contrast(int32_t contrast)
 294 {
 295         ao_st7565_set_brightness((uint8_t) contrast);
 296 }
 297
 298 int32_t
 299 ao_lco_get_contrast(void)
 300 {
 301         return (int32_t) ao_st7565_get_brightness();
 302 }
 303
 304 static uint16_t ao_backlight;
 305
 306 void
 307 ao_lco_set_backlight(int32_t backlight)
 308 {
 309         ao_backlight = (uint16_t) backlight;
 310         ao_pwm_set(AO_LCD_BL_PWM_CHAN, ao_backlight);
 311 }
 312
 313 int32_t
 314 ao_lco_get_backlight(void)
 315 {
 316         return (int32_t) ao_backlight;
 317 }
 318
 319 static struct ao_task   ao_lco_drag_task;
 320
 321 static void
 322 ao_lco_drag_monitor(void)
 323 {
 324         AO_TICK_TYPE    delay = ~0UL;
 325         AO_TICK_TYPE    now;
 326
 327         ao_beep_for(AO_BEEP_MID, AO_MS_TO_TICKS(200));
 328         for (;;) {
 329                 PRINTD("Drag monitor count %d delay %lu\n", ao_lco_drag_beep_count, (unsigned long) delay);
 330                 if (delay == (AO_TICK_TYPE) ~0)
 331                         ao_sleep(&ao_lco_drag_beep_count);
 332                 else
 333                         ao_sleep_for(&ao_lco_drag_beep_count, delay);
 334
 335                 delay = ~0UL;
 336                 now = ao_time();
 337                 delay = ao_lco_drag_warn_check(now, delay);
 338                 delay = ao_lco_drag_beep_check(now, delay);
 339         }
 340 }
 341
 342 static void
 343 ao_lco_input(void)
 344 {
 345         static struct ao_event  event;
 346
 347         for (;;) {
 348                 ao_event_get(&event);
 349                 PRINTE("event type %d unit %d value %ld\n",
 350                        event.type, event.unit, (long) event.value);
 351                 switch (event.type) {
 352                 case AO_EVENT_QUADRATURE:
 353                         switch (event.unit) {
 354                         case AO_QUADRATURE_SELECT:
 355                                 if (!ao_lco_armed) {
 356                                         switch (ao_lco_select_mode) {
 357                                         case AO_LCO_SELECT_PAD:
 358                                                 ao_lco_step_pad((int8_t) event.value);
 359                                                 break;
 360                                         case AO_LCO_SELECT_BOX:
 361                                                 ao_lco_step_box((int8_t) event.value);
 362                                                 break;
 363                                         default:
 364                                                 break;
 365                                         }
 366                                 }
 367                                 break;
 368                         }
 369                         break;
 370                 case AO_EVENT_BUTTON:
 371                         switch (event.unit) {
 372                         case AO_BUTTON_ARM:
 373                                 ao_lco_set_armed((uint8_t) event.value);
 374                                 ao_lco_set_select();
 375                                 break;
 376                         case AO_BUTTON_FIRE:
 377                                 if (ao_lco_armed)
 378                                         ao_lco_set_firing((uint8_t) event.value);
 379                                 break;
 380                         case AO_BUTTON_DRAG_SELECT:
 381                                 if (event.value)
 382                                         ao_lco_toggle_drag();
 383                                 break;
 384                         case AO_BUTTON_DRAG_MODE:
 385                                 if (event.value)
 386                                         ao_lco_drag_enable();
 387                                 else
 388                                         ao_lco_drag_disable();
 389                                 break;
 390                         case AO_BUTTON_ENCODER_SELECT:
 391                                 if (event.value) {
 392                                         if (!ao_lco_armed) {
 393                                                 ao_lco_select_mode = 1 - ao_lco_select_mode;
 394                                                 ao_lco_set_select();
 395                                         }
 396                                 }
 397                                 break;
 398                         }
 399                         break;
 400                 }
 401         }
 402 }
 403
 404 /*
 405  * Light up everything for a second at power on to let the user
 406  * visually inspect the system for correct operation
 407  */
 408 static void
 409 ao_lco_display_test(void)
 410 {
 411         ao_led_on(AO_LEDS_AVAILABLE);
 412         ao_rect(&fb, 0, 0, WIDTH, HEIGHT, AO_BLACK, AO_COPY);
 413         ao_st7565_update(&fb);
 414         ao_delay(AO_MS_TO_TICKS(250));
 415         ao_led_off(AO_LEDS_AVAILABLE);
 416 }
 417
 418 static struct ao_task ao_lco_input_task;
 419 static struct ao_task ao_lco_monitor_task;
 420 static struct ao_task ao_lco_arm_warn_task;
 421 static struct ao_task ao_lco_igniter_status_task;
 422
 423 static int16_t  found_x;
 424
 425 void
 426 ao_lco_search_start(void)
 427 {
 428         ao_rect(&fb, 0, 0, WIDTH, HEIGHT, AO_WHITE, AO_COPY);
 429         ao_logo(&fb, &logo_transform, &LOGO_FONT, AO_BLACK, AO_COPY);
 430         found_x = FOUND_X;
 431 }
 432
 433 void
 434 ao_lco_search_box_check(int16_t box)
 435 {
 436         if (box > 0)
 437                 ao_rect(&fb, SCAN_X, SCAN_Y, box, SCAN_HEIGHT, AO_BLACK, AO_COPY);
 438         ao_st7565_update(&fb);
 439 }
 440
 441 void
 442 ao_lco_search_box_present(int16_t box)
 443 {
 444         char    str[8];
 445         if (found_x < FOUND_WIDTH)
 446         {
 447                 snprintf(str, sizeof(str), "%s%02u", found_x ? ", " : "", box);
 448                 found_x = ao_text(&fb, &TINY_FONT, found_x, FOUND_Y, str, AO_BLACK, AO_COPY);
 449         }
 450 }
 451
 452 void
 453 ao_lco_search_done(void)
 454 {
 455         ao_st7565_update(&fb);
 456 }
 457
 458 static void
 459 ao_lco_main(void)
 460 {
 461         ao_lco_display_test();
 462         ao_lco_search();
 463         ao_add_task(&ao_lco_input_task, ao_lco_input, "lco input");
 464         ao_add_task(&ao_lco_arm_warn_task, ao_lco_arm_warn, "lco arm warn");
 465         ao_add_task(&ao_lco_igniter_status_task, ao_lco_igniter_status, "lco igniter status");
 466         ao_add_task(&ao_lco_drag_task, ao_lco_drag_monitor, "drag race");
 467         ao_lco_monitor();
 468 }
 469
 470 #if DEBUG
 471 static void
 472 ao_lco_set_debug(void)
 473 {
 474         uint32_t r = ao_cmd_decimal();
 475         if (ao_cmd_status == ao_cmd_success){
 476                 ao_lco_debug = r & 1;
 477                 ao_lco_event_debug = (r & 2) >> 1;
 478         }
 479 }
 480
 481 const struct ao_cmds ao_lco_cmds[] = {
 482         { ao_lco_set_debug,     "D <0 off, 1 on>\0Debug" },
 483         { ao_lco_search,        "s\0Search for pad boxes" },
 484         { ao_lco_pretend,       "p\0Pretend there are lots of pad boxes" },
 485         { 0, NULL }
 486 };
 487 #endif
 488
 489 void
 490 ao_lco_init(void)
 491 {
 492         ao_add_task(&ao_lco_monitor_task, ao_lco_main, "lco monitor");
 493 #if DEBUG
 494         ao_cmd_register(&ao_lco_cmds[0]);
 495 #endif
 496 }