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; either version 2 of the License, or
7 * (at your option) any later version.
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.
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.
22 #include <ao_seven_segment.h>
23 #include <ao_quadrature.h>
24 #include <ao_lco_func.h>
25 #include <ao_radio_cmac.h>
30 static uint8_t ao_lco_debug;
31 #define PRINTD(...) do { if (!ao_lco_debug) break; printf ("\r%5u %s: ", ao_tick_count, __func__); printf(__VA_ARGS__); flush(); } while(0)
36 #define AO_LCO_PAD_DIGIT 0
37 #define AO_LCO_BOX_DIGIT_1 1
38 #define AO_LCO_BOX_DIGIT_10 2
40 static uint8_t ao_lco_min_box, ao_lco_max_box;
41 static uint8_t ao_lco_mutex;
42 static uint8_t ao_lco_pad;
43 static uint8_t ao_lco_box;
44 static uint8_t ao_lco_armed;
45 static uint8_t ao_lco_firing;
46 static uint8_t ao_lco_valid;
47 static uint8_t ao_lco_got_channels;
48 static uint16_t ao_lco_tick_offset;
50 static struct ao_pad_query ao_pad_query;
55 ao_seven_segment_set(AO_LCO_PAD_DIGIT, ao_lco_pad + 1);
61 ao_seven_segment_set(AO_LCO_BOX_DIGIT_1, ao_lco_box % 10);
62 ao_seven_segment_set(AO_LCO_BOX_DIGIT_10, ao_lco_box / 10);
65 #define MASK_SIZE(n) (((n) + 7) >> 3)
66 #define MASK_ID(n) ((n) >> 3)
67 #define MASK_SHIFT(n) ((n) & 7)
69 static uint8_t ao_lco_box_mask[MASK_SIZE(AO_PAD_MAX_BOXES)];
72 ao_lco_box_present(uint8_t box)
74 if (box >= AO_PAD_MAX_BOXES)
76 return (ao_lco_box_mask[MASK_ID(box)] >> MASK_SHIFT(box)) & 1;
80 ao_lco_pad_present(uint8_t pad)
82 if (!ao_lco_got_channels || !ao_pad_query.channels)
84 if (pad >= AO_PAD_MAX_CHANNELS)
86 return (ao_pad_query.channels >> pad) & 1;
90 ao_lco_pad_first(void)
94 for (pad = 0; pad < AO_PAD_MAX_CHANNELS; pad++)
95 if (ao_lco_pad_present(pad))
103 static struct ao_event event;
104 int8_t dir, new_box, new_pad;
106 ao_beep_for(AO_BEEP_MID, AO_MS_TO_TICKS(200));
110 ao_event_get(&event);
111 PRINTD("event type %d unit %d value %d\n",
112 event.type, event.unit, event.value);
113 switch (event.type) {
114 case AO_EVENT_QUADRATURE:
115 switch (event.unit) {
116 case AO_QUADRATURE_PAD:
118 if (event.value == ao_lco_pad)
120 dir = ((int8_t) event.value - (int8_t) ao_lco_pad) > 0 ? 1 : -1;
121 new_pad = event.value;
122 while (!ao_lco_pad_present(new_pad)) {
124 if (new_pad > AO_PAD_MAX_CHANNELS)
126 else if (new_pad < 0)
127 new_pad = AO_PAD_MAX_CHANNELS - 1;
128 if (new_pad == ao_lco_pad)
131 if (new_pad != ao_lco_pad) {
132 ao_lco_pad = new_pad;
133 ao_quadrature_count[AO_QUADRATURE_PAD] = ao_lco_pad;
138 case AO_QUADRATURE_BOX:
140 if (event.value == ao_lco_box)
142 dir = ((int8_t) event.value - (int8_t) ao_lco_box) > 0 ? 1 : -1;
143 new_box = event.value;
144 while (!ao_lco_box_present(new_box)) {
146 if (new_box > ao_lco_max_box)
147 new_box = ao_lco_min_box;
148 else if (new_box < ao_lco_min_box)
149 new_box = ao_lco_min_box;
150 if (new_box == ao_lco_box)
153 ao_quadrature_count[AO_QUADRATURE_PAD] = new_box;
154 if (ao_lco_box != new_box) {
155 ao_lco_box = new_box;
156 ao_lco_got_channels = 0;
163 case AO_EVENT_BUTTON:
164 switch (event.unit) {
166 ao_lco_armed = event.value;
167 PRINTD("Armed %d\n", ao_lco_armed);
168 ao_wakeup(&ao_lco_armed);
172 ao_lco_firing = event.value;
173 PRINTD("Firing %d\n", ao_lco_firing);
174 ao_wakeup(&ao_lco_armed);
183 static AO_LED_TYPE continuity_led[AO_LED_CONTINUITY_NUM] = {
184 #ifdef AO_LED_CONTINUITY_0
187 #ifdef AO_LED_CONTINUITY_1
190 #ifdef AO_LED_CONTINUITY_2
193 #ifdef AO_LED_CONTINUITY_3
196 #ifdef AO_LED_CONTINUITY_4
199 #ifdef AO_LED_CONTINUITY_5
202 #ifdef AO_LED_CONTINUITY_6
205 #ifdef AO_LED_CONTINUITY_7
216 r = ao_lco_query(ao_lco_box, &ao_pad_query, &ao_lco_tick_offset);
217 if (r == AO_RADIO_CMAC_OK) {
218 c = ao_lco_got_channels;
219 ao_lco_got_channels = 1;
222 ao_lco_pad = ao_lco_pad_first();
229 PRINTD("lco_query success arm_status %d i0 %d i1 %d i2 %d i3 %d\n",
231 query.igniter_status[0],
232 query.igniter_status[1],
233 query.igniter_status[2],
234 query.igniter_status[3]);
237 ao_wakeup(&ao_pad_query);
241 ao_lco_box_set_present(uint8_t box)
243 if (box >= AO_PAD_MAX_BOXES)
245 ao_lco_box_mask[MASK_ID(box)] |= 1 << MASK_SHIFT(box);
251 uint16_t tick_offset;
254 ao_lco_min_box = 0xff;
255 ao_lco_max_box = 0x00;
256 for (ao_lco_box = 0; ao_lco_box < AO_PAD_MAX_BOXES; ao_lco_box++) {
257 if ((ao_lco_box % 10) == 0)
259 r = ao_lco_query(ao_lco_box, &ao_pad_query, &ao_lco_tick_offset);
260 if (r == AO_RADIO_CMAC_OK) {
261 if (ao_lco_box < ao_lco_min_box)
262 ao_lco_min_box = ao_lco_box;
263 if (ao_lco_box > ao_lco_max_box)
264 ao_lco_max_box = ao_lco_box;
265 ao_lco_box_set_present(ao_lco_box);
268 if (ao_lco_min_box <= ao_lco_max_box)
269 ao_lco_box = ao_lco_min_box;
271 ao_lco_min_box = ao_lco_max_box = ao_lco_box = 0;
273 ao_lco_got_channels = 0;
278 ao_lco_igniter_status(void)
284 ao_sleep(&ao_pad_query);
286 ao_led_on(AO_LED_RED);
287 ao_led_off(AO_LED_GREEN);
290 PRINTD("RSSI %d\n", ao_radio_cmac_rssi);
291 if (ao_radio_cmac_rssi < -90)
292 ao_led_on(AO_LED_RED|AO_LED_GREEN);
294 ao_led_on(AO_LED_GREEN);
295 ao_led_off(AO_LED_RED);
297 if (ao_pad_query.arm_status)
298 ao_led_on(AO_LED_REMOTE_ARM);
300 ao_led_off(AO_LED_REMOTE_ARM);
301 for (c = 0; c < AO_LED_CONTINUITY_NUM; c++) {
304 if (ao_pad_query.channels & (1 << c))
305 status = ao_pad_query.igniter_status[c];
307 status = AO_PAD_IGNITER_STATUS_NO_IGNITER_RELAY_OPEN;
308 if (status == AO_PAD_IGNITER_STATUS_GOOD_IGNITER_RELAY_OPEN)
309 ao_led_on(continuity_led[c]);
311 ao_led_off(continuity_led[c]);
317 ao_lco_arm_warn(void)
320 while (!ao_lco_armed)
321 ao_sleep(&ao_lco_armed);
322 ao_beep_for(AO_BEEP_MID, AO_MS_TO_TICKS(200));
323 ao_delay(AO_MS_TO_TICKS(200));
327 static struct ao_task ao_lco_input_task;
328 static struct ao_task ao_lco_monitor_task;
329 static struct ao_task ao_lco_arm_warn_task;
330 static struct ao_task ao_lco_igniter_status_task;
338 ao_add_task(&ao_lco_input_task, ao_lco_input, "lco input");
339 ao_add_task(&ao_lco_arm_warn_task, ao_lco_arm_warn, "lco arm warn");
340 ao_add_task(&ao_lco_igniter_status_task, ao_lco_igniter_status, "lco igniter status");
342 PRINTD("monitor armed %d firing %d offset %d\n",
343 ao_lco_armed, ao_lco_firing, ao_lco_tick_offset);
345 if (ao_lco_armed && ao_lco_firing) {
346 PRINTD("Firing box %d pad %d: valid %d\n",
347 ao_lco_box, ao_lco_pad, ao_lco_valid);
351 ao_lco_ignite(ao_lco_box, 1 << ao_lco_pad, ao_lco_tick_offset);
352 } else if (ao_lco_armed) {
353 PRINTD("Arming box %d pad %d\n",
354 ao_lco_box, ao_lco_pad);
357 ao_lco_arm(ao_lco_box, 1 << ao_lco_pad, ao_lco_tick_offset);
362 if (ao_lco_armed && ao_lco_firing)
363 delay = AO_MS_TO_TICKS(100);
365 delay = AO_SEC_TO_TICKS(1);
366 ao_sleep_for(&ao_lco_armed, delay);
372 ao_lco_set_debug(void)
375 if (ao_cmd_status == ao_cmd_success)
376 ao_lco_debug = ao_cmd_lex_i != 0;
379 __code struct ao_cmds ao_lco_cmds[] = {
380 { ao_lco_set_debug, "D <0 off, 1 on>\0Debug" },
388 ao_add_task(&ao_lco_monitor_task, ao_lco_monitor, "lco monitor");
390 ao_cmd_register(&ao_lco_cmds[0]);