altos: Light pyro charges simultaneously if so configured
[fw/altos] / src / core / ao_pyro.c
index aac8fda51c7219d6895fce2655ec922b01bf4b9f..84f949dc3872fc71a5ca7d1fdf54f2331f5d571f 100644 (file)
  * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
  */
 
+#ifndef AO_FLIGHT_TEST
 #include <ao.h>
-#include <ao_pyro.h>
 #include <ao_sample.h>
 #include <ao_flight.h>
+#endif
+#include <ao_pyro.h>
 
 #if IS_COMPANION
 #include <ao_companion.h>
@@ -31,6 +33,8 @@
 
 #define ao_lowbit(x)   ((x) & (-x))
 
+uint16_t       ao_pyro_fired;
+
 /*
  * Given a pyro structure, figure out
  * if the current flight state satisfies all
@@ -130,107 +134,109 @@ ao_pyro_ready(struct ao_pyro *pyro)
        return TRUE;
 }
 
-#define ao_pyro_fire_port(port, bit, pin) do { \
-               ao_gpio_set(port, bit, pin, 1); \
-               ao_delay(AO_MS_TO_TICKS(50));   \
-               ao_gpio_set(port, bit, pin, 0); \
-       } while (0)
-
-
+#ifndef AO_FLIGHT_TEST
 static void
-ao_pyro_fire(uint8_t p)
+ao_pyro_pin_set(uint8_t p, uint8_t v)
 {
        switch (p) {
 #if AO_PYRO_NUM > 0
-       case 0: ao_pyro_fire_port(AO_PYRO_PORT_0, AO_PYRO_PIN_0, AO_PYRO_0); break;
+       case 0: ao_gpio_set(AO_PYRO_PORT_0, AO_PYRO_PIN_0, AO_PYRO_0, v); break;
 #endif
 #if AO_PYRO_NUM > 1
-       case 1: ao_pyro_fire_port(AO_PYRO_PORT_1, AO_PYRO_PIN_1, AO_PYRO_1); break;
+       case 1: ao_gpio_set(AO_PYRO_PORT_1, AO_PYRO_PIN_1, AO_PYRO_1, v); break;
 #endif
 #if AO_PYRO_NUM > 2
-       case 2: ao_pyro_fire_port(AO_PYRO_PORT_2, AO_PYRO_PIN_2, AO_PYRO_2); break;
+       case 2: ao_gpio_set(AO_PYRO_PORT_2, AO_PYRO_PIN_2, AO_PYRO_2, v); break;
 #endif
 #if AO_PYRO_NUM > 3
-       case 3: ao_pyro_fire_port(AO_PYRO_PORT_3, AO_PYRO_PIN_3, AO_PYRO_3); break;
+       case 3: ao_gpio_set(AO_PYRO_PORT_3, AO_PYRO_PIN_3, AO_PYRO_3, v); break;
 #endif
 #if AO_PYRO_NUM > 4
-       case 4: ao_pyro_fire_port(AO_PYRO_PORT_4, AO_PYRO_PIN_4, AO_PYRO_4); break;
+       case 4: ao_gpio_set(AO_PYRO_PORT_4, AO_PYRO_PIN_4, AO_PYRO_4, v); break;
 #endif
 #if AO_PYRO_NUM > 5
-       case 5: ao_pyro_fire_port(AO_PYRO_PORT_5, AO_PYRO_PIN_5, AO_PYRO_5); break;
+       case 5: ao_gpio_set(AO_PYRO_PORT_5, AO_PYRO_PIN_5, AO_PYRO_5, v); break;
 #endif
 #if AO_PYRO_NUM > 6
-       case 6: ao_pyro_fire_port(AO_PYRO_PORT_6, AO_PYRO_PIN_6, AO_PYRO_6); break;
+       case 6: ao_gpio_set(AO_PYRO_PORT_6, AO_PYRO_PIN_6, AO_PYRO_6, v); break;
 #endif
 #if AO_PYRO_NUM > 7
-       case 7: ao_pyro_fire_port(AO_PYRO_PORT_7, AO_PYRO_PIN_7, AO_PYRO_7); break;
+       case 7: ao_gpio_set(AO_PYRO_PORT_7, AO_PYRO_PIN_7, AO_PYRO_7, v); break;
 #endif
        default: break;
        }
-       ao_delay(AO_MS_TO_TICKS(50));
 }
+#endif
 
 uint8_t        ao_pyro_wakeup;
 
-static void
-ao_pyro(void)
+static uint8_t
+ao_pyro_check(void)
 {
-       uint8_t         p, any_waiting;
        struct ao_pyro  *pyro;
+       uint8_t         p, any_waiting;
+       uint16_t        fire = 0;
+       
+       any_waiting = 0;
+       for (p = 0; p < AO_PYRO_NUM; p++) {
+               pyro = &ao_config.pyro[p];
 
-       ao_config_get();
-       while (ao_flight_state < ao_flight_boost)
-               ao_sleep(&ao_flight_state);
+               /* Ignore igniters which have already fired
+                */
+               if (pyro->fired)
+                       continue;
 
-       for (;;) {
-               ao_alarm(AO_MS_TO_TICKS(100));
-               ao_sleep(&ao_pyro_wakeup);
-               ao_clear_alarm();
-               any_waiting = 0;
-               for (p = 0; p < AO_PYRO_NUM; p++) {
-                       pyro = &ao_config.pyro[p];
+               /* Ignore disabled igniters
+                */
+               if (!pyro->flags)
+                       continue;
 
-                       /* Ignore igniters which have already fired
-                        */
-                       if (pyro->fired)
+               any_waiting = 1;
+               /* Check pyro state to see if it should fire
+                */
+               if (!pyro->delay_done) {
+                       if (!ao_pyro_ready(pyro))
                                continue;
 
-                       /* Ignore disabled igniters
+                       /* If there's a delay set, then remember when
+                        * it expires
                         */
-                       if (!pyro->flags)
+                       if (pyro->flags & ao_pyro_delay) {
+                               pyro->delay_done = ao_time() + pyro->delay;
+                               if (!pyro->delay_done)
+                                       pyro->delay_done = 1;
+                       }
+               }
+
+               /* Check to see if we're just waiting for
+                * the delay to expire
+                */
+               if (pyro->delay_done) {
+                       if ((int16_t) (ao_time() - pyro->delay_done) < 0)
                                continue;
+               }
 
-                       any_waiting = 1;
-                       /* Check pyro state to see if it shoule fire
-                        */
-                       if (!pyro->delay_done) {
-                               if (!ao_pyro_ready(pyro))
-                                       continue;
-
-                               /* If there's a delay set, then remember when
-                                * it expires
-                                */
-                               if (pyro->flags & ao_pyro_delay)
-                                       pyro->delay_done = ao_time() + pyro->delay;
-                       }
+               fire |= (1 << p);
+       }
 
-                       /* Check to see if we're just waiting for
-                        * the delay to expire
-                        */
-                       if (pyro->delay_done) {
-                               if ((int16_t) (ao_time() - pyro->delay_done) < 0)
-                                       continue;
+       if (fire) {
+               for (p = 0; p < AO_PYRO_NUM; p++) {
+                       if (fire & (1 << p))
+                               ao_pyro_pin_set(p, 1);
+               }
+               ao_delay(AO_MS_TO_TICKS(50));
+               for (p = 0; p < AO_PYRO_NUM; p++) {
+                       if (fire & (1 << p)) {
+                               ao_pyro_pin_set(p, 0);
+                               ao_config.pyro[p].fired = 1;
+                               ao_pyro_fired |= (1 << p);
                        }
-
-                       ao_pyro_fire(p);
                }
-               if (!any_waiting)
-                       break;
+               ao_delay(AO_MS_TO_TICKS(50));
        }
-       ao_exit();
-}
 
-__xdata struct ao_task ao_pyro_task;
+       return any_waiting;
+}
 
 #define NO_VALUE       0xff
 
@@ -283,6 +289,34 @@ const struct {
        { "", ao_pyro_none,             NO_VALUE, HELP(NULL) },
 };
 
+#define NUM_PYRO_VALUES (sizeof ao_pyro_values / sizeof ao_pyro_values[0])
+
+#ifndef AO_FLIGHT_TEST
+static void
+ao_pyro(void)
+{
+       uint8_t         any_waiting;
+
+       ao_config_get();
+       while (ao_flight_state < ao_flight_boost)
+               ao_sleep(&ao_flight_state);
+
+       for (;;) {
+               ao_alarm(AO_MS_TO_TICKS(100));
+               ao_sleep(&ao_pyro_wakeup);
+               ao_clear_alarm();
+               if (ao_flight_state >= ao_flight_landed)
+                       break;
+               any_waiting = ao_pyro_check();
+               if (!any_waiting)
+                       break;
+       }
+       ao_exit();
+}
+
+__xdata struct ao_task ao_pyro_task;
+
+
 static void
 ao_pyro_print_name(uint8_t v)
 {
@@ -449,3 +483,4 @@ ao_pyro_init(void)
        ao_cmd_register(&ao_pyro_cmds[0]);
        ao_add_task(&ao_pyro_task, ao_pyro, "pyro");
 }
+#endif