2 * Copyright © 2012 Keith Packard <keithp@keithp.com>
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.
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.
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.
21 #include <ao_seven_segment.h>
22 #include <ao_quadrature.h>
23 #include <ao_lco_func.h>
24 #include <ao_radio_cmac.h>
29 static uint8_t ao_lco_debug;
30 #define PRINTD(...) do { if (!ao_lco_debug) break; printf ("\r%5u %s: ", ao_tick_count, __func__); printf(__VA_ARGS__); flush(); } while(0)
35 #define AO_LCO_PAD_DIGIT 0
36 #define AO_LCO_BOX_DIGIT_1 1
37 #define AO_LCO_BOX_DIGIT_10 2
39 static uint8_t ao_lco_min_box, ao_lco_max_box;
40 static uint8_t ao_lco_pad;
41 static uint8_t ao_lco_box;
42 static uint8_t ao_lco_armed;
43 static uint8_t ao_lco_firing;
44 static uint8_t ao_lco_valid;
45 static uint8_t ao_lco_got_channels;
46 static uint16_t ao_lco_tick_offset;
47 static uint8_t ao_lco_show_voltage;
49 static struct ao_pad_query ao_pad_query;
52 ao_lco_set_pad(uint8_t pad)
54 ao_seven_segment_set(AO_LCO_PAD_DIGIT, pad + 1);
58 ao_lco_set_box(uint8_t box)
60 ao_seven_segment_set(AO_LCO_BOX_DIGIT_1, box % 10);
61 ao_seven_segment_set(AO_LCO_BOX_DIGIT_10, box / 10);
65 ao_lco_set_voltage(uint16_t decivolts)
67 uint8_t tens, ones, tenths;
69 tenths = decivolts % 10;
70 ones = (decivolts / 10) % 10;
71 tens = (decivolts / 100) % 10;
72 ao_seven_segment_set(AO_LCO_PAD_DIGIT, tenths);
73 ao_seven_segment_set(AO_LCO_BOX_DIGIT_1, ones | 0x10);
74 ao_seven_segment_set(AO_LCO_BOX_DIGIT_10, tens);
77 #define MASK_SIZE(n) (((n) + 7) >> 3)
78 #define MASK_ID(n) ((n) >> 3)
79 #define MASK_SHIFT(n) ((n) & 7)
81 static uint8_t ao_lco_box_mask[MASK_SIZE(AO_PAD_MAX_BOXES)];
84 ao_lco_box_present(uint8_t box)
86 if (box >= AO_PAD_MAX_BOXES)
88 return (ao_lco_box_mask[MASK_ID(box)] >> MASK_SHIFT(box)) & 1;
92 ao_lco_pad_present(uint8_t pad)
94 if (!ao_lco_got_channels || !ao_pad_query.channels)
96 if (pad >= AO_PAD_MAX_CHANNELS)
98 return (ao_pad_query.channels >> pad) & 1;
102 ao_lco_pad_first(void)
106 for (pad = 0; pad < AO_PAD_MAX_CHANNELS; pad++)
107 if (ao_lco_pad_present(pad))
115 static struct ao_event event;
116 int8_t dir, new_box, new_pad;
118 ao_beep_for(AO_BEEP_MID, AO_MS_TO_TICKS(200));
120 ao_event_get(&event);
121 PRINTD("event type %d unit %d value %d\n",
122 event.type, event.unit, event.value);
123 switch (event.type) {
124 case AO_EVENT_QUADRATURE:
125 switch (event.unit) {
126 case AO_QUADRATURE_PAD:
128 dir = (int8_t) event.value;
129 new_pad = ao_lco_pad;
132 if (new_pad > AO_PAD_MAX_CHANNELS)
134 else if (new_pad < 0)
135 new_pad = AO_PAD_MAX_CHANNELS - 1;
136 if (new_pad == ao_lco_pad)
138 } while (!ao_lco_pad_present(new_pad));
139 if (new_pad != ao_lco_pad) {
140 ao_lco_pad = new_pad;
141 ao_lco_set_box(ao_lco_box);
142 ao_lco_set_pad(ao_lco_pad);
146 case AO_QUADRATURE_BOX:
148 dir = (int8_t) event.value;
149 new_box = ao_lco_box;
152 if (new_box > ao_lco_max_box)
153 new_box = ao_lco_min_box;
154 else if (new_box < ao_lco_min_box)
155 new_box = ao_lco_max_box;
156 if (new_box == ao_lco_box)
158 } while (!ao_lco_box_present(new_box));
159 if (ao_lco_box != new_box) {
160 ao_lco_box = new_box;
161 ao_lco_got_channels = 0;
162 ao_lco_set_box(ao_lco_box);
163 ao_lco_set_pad(ao_lco_pad);
169 case AO_EVENT_BUTTON:
170 switch (event.unit) {
172 ao_lco_armed = event.value;
173 PRINTD("Armed %d\n", ao_lco_armed);
174 ao_wakeup(&ao_lco_armed);
178 ao_lco_firing = event.value;
179 ao_lco_show_voltage = 0;
180 PRINTD("Firing %d\n", ao_lco_firing);
181 ao_wakeup(&ao_lco_armed);
184 if (ao_lco_got_channels)
185 ao_lco_set_voltage(ao_pad_query.battery);
187 ao_lco_set_box(ao_lco_box);
188 ao_lco_set_pad(ao_lco_pad);
190 ao_lco_show_voltage = event.value;
199 static AO_LED_TYPE continuity_led[AO_LED_CONTINUITY_NUM] = {
200 #ifdef AO_LED_CONTINUITY_0
203 #ifdef AO_LED_CONTINUITY_1
206 #ifdef AO_LED_CONTINUITY_2
209 #ifdef AO_LED_CONTINUITY_3
212 #ifdef AO_LED_CONTINUITY_4
215 #ifdef AO_LED_CONTINUITY_5
218 #ifdef AO_LED_CONTINUITY_6
221 #ifdef AO_LED_CONTINUITY_7
232 r = ao_lco_query(ao_lco_box, &ao_pad_query, &ao_lco_tick_offset);
233 if (r == AO_RADIO_CMAC_OK) {
234 c = ao_lco_got_channels;
235 ao_lco_got_channels = 1;
238 ao_lco_pad = ao_lco_pad_first();
239 if (!ao_lco_show_voltage)
240 ao_lco_set_pad(ao_lco_pad);
242 if (ao_lco_show_voltage)
243 ao_lco_set_voltage(ao_pad_query.battery);
248 PRINTD("lco_query success arm_status %d i0 %d i1 %d i2 %d i3 %d\n",
250 query.igniter_status[0],
251 query.igniter_status[1],
252 query.igniter_status[2],
253 query.igniter_status[3]);
255 PRINTD("ao_lco_update valid %d\n", ao_lco_valid);
256 ao_wakeup(&ao_pad_query);
260 ao_lco_box_reset_present(void)
262 ao_lco_min_box = 0xff;
263 ao_lco_max_box = 0x00;
264 memset(ao_lco_box_mask, 0, sizeof (ao_lco_box_mask));
268 ao_lco_box_set_present(uint8_t box)
270 if (box < ao_lco_min_box)
271 ao_lco_min_box = box;
272 if (box > ao_lco_max_box)
273 ao_lco_max_box = box;
274 if (box >= AO_PAD_MAX_BOXES)
276 ao_lco_box_mask[MASK_ID(box)] |= 1 << MASK_SHIFT(box);
282 uint16_t tick_offset;
288 ao_lco_box_reset_present();
290 for (box = 0; box < AO_PAD_MAX_BOXES; box++) {
293 for (try = 0; try < 3; try++) {
295 r = ao_lco_query(box, &ao_pad_query, &tick_offset);
296 PRINTD("box %d result %d\n", box, r);
297 if (r == AO_RADIO_CMAC_OK) {
299 ao_lco_box_set_present(box);
300 ao_lco_set_pad((boxes % 10) - 1);
301 ao_delay(AO_MS_TO_TICKS(30));
306 if (ao_lco_min_box <= ao_lco_max_box)
307 ao_lco_box = ao_lco_min_box;
309 ao_lco_min_box = ao_lco_max_box = ao_lco_box = 0;
311 ao_lco_got_channels = 0;
313 ao_lco_set_pad(ao_lco_pad);
314 ao_lco_set_box(ao_lco_box);
318 ao_lco_igniter_status(void)
323 ao_sleep(&ao_pad_query);
324 PRINTD("RSSI %d VALID %d\n", ao_radio_cmac_rssi, ao_lco_valid);
326 ao_led_on(AO_LED_RED);
327 ao_led_off(AO_LED_GREEN|AO_LED_AMBER);
330 if (ao_radio_cmac_rssi < -90) {
331 ao_led_on(AO_LED_AMBER);
332 ao_led_off(AO_LED_RED|AO_LED_GREEN);
334 ao_led_on(AO_LED_GREEN);
335 ao_led_off(AO_LED_RED|AO_LED_AMBER);
337 if (ao_pad_query.arm_status)
338 ao_led_on(AO_LED_REMOTE_ARM);
340 ao_led_off(AO_LED_REMOTE_ARM);
341 for (c = 0; c < AO_LED_CONTINUITY_NUM; c++) {
344 if (ao_pad_query.channels & (1 << c))
345 status = ao_pad_query.igniter_status[c];
347 status = AO_PAD_IGNITER_STATUS_NO_IGNITER_RELAY_OPEN;
348 if (status == AO_PAD_IGNITER_STATUS_GOOD_IGNITER_RELAY_OPEN)
349 ao_led_on(continuity_led[c]);
351 ao_led_off(continuity_led[c]);
357 ao_lco_arm_warn(void)
360 while (!ao_lco_armed)
361 ao_sleep(&ao_lco_armed);
362 ao_beep_for(AO_BEEP_MID, AO_MS_TO_TICKS(200));
363 ao_delay(AO_MS_TO_TICKS(200));
367 static struct ao_task ao_lco_input_task;
368 static struct ao_task ao_lco_monitor_task;
369 static struct ao_task ao_lco_arm_warn_task;
370 static struct ao_task ao_lco_igniter_status_task;
378 ao_add_task(&ao_lco_input_task, ao_lco_input, "lco input");
379 ao_add_task(&ao_lco_arm_warn_task, ao_lco_arm_warn, "lco arm warn");
380 ao_add_task(&ao_lco_igniter_status_task, ao_lco_igniter_status, "lco igniter status");
382 PRINTD("monitor armed %d firing %d offset %d\n",
383 ao_lco_armed, ao_lco_firing, ao_lco_tick_offset);
385 if (ao_lco_armed && ao_lco_firing) {
386 PRINTD("Firing box %d pad %d: valid %d\n",
387 ao_lco_box, ao_lco_pad, ao_lco_valid);
391 ao_lco_ignite(ao_lco_box, 1 << ao_lco_pad, ao_lco_tick_offset);
392 } else if (ao_lco_armed) {
393 PRINTD("Arming box %d pad %d\n",
394 ao_lco_box, ao_lco_pad);
397 ao_lco_arm(ao_lco_box, 1 << ao_lco_pad, ao_lco_tick_offset);
398 ao_delay(AO_MS_TO_TICKS(30));
403 if (ao_lco_armed && ao_lco_firing)
404 delay = AO_MS_TO_TICKS(100);
406 delay = AO_SEC_TO_TICKS(1);
407 ao_sleep_for(&ao_lco_armed, delay);
413 ao_lco_set_debug(void)
416 if (ao_cmd_status == ao_cmd_success)
417 ao_lco_debug = ao_cmd_lex_i != 0;
420 __code struct ao_cmds ao_lco_cmds[] = {
421 { ao_lco_set_debug, "D <0 off, 1 on>\0Debug" },
422 { ao_lco_search, "s\0Search for pad boxes" },
430 ao_add_task(&ao_lco_monitor_task, ao_lco_monitor, "lco monitor");
432 ao_cmd_register(&ao_lco_cmds[0]);