8e8affc60c131f03469b39e386744e73b2f307c0
[aversive.git] / projects / microb2010 / cobboard / state.c
1 /*  
2  *  Copyright Droids Corporation (2009)
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,
10  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
11  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  *  GNU General Public License for more details.
13  *
14  *  You should have received a copy of the GNU General Public License
15  *  along with this program; if not, write to the Free Software
16  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
17  *
18  *  Revision : $Id: state.c,v 1.5 2009-11-08 17:25:00 zer0 Exp $
19  *
20  */
21
22 #include <math.h>
23 #include <string.h>
24
25 #include <aversive.h>
26 #include <aversive/wait.h>
27 #include <aversive/error.h>
28
29 #include <ax12.h>
30 #include <uart.h>
31 #include <spi.h>
32 #include <encoders_spi.h>
33 #include <pwm_ng.h>
34 #include <timer.h>
35 #include <scheduler.h>
36 #include <clock_time.h>
37
38 #include <pid.h>
39 #include <quadramp.h>
40 #include <control_system_manager.h>
41 #include <blocking_detection_manager.h>
42
43 #include <rdline.h>
44 #include <vt100.h>
45
46 #include "../common/i2c_commands.h"
47 #include "main.h"
48 #include "cmdline.h"
49 #include "sensor.h"
50 #include "actuator.h"
51 #include "spickle.h"
52 #include "shovel.h"
53 #include "state.h"
54
55 #define STMCH_DEBUG(args...) DEBUG(E_USER_ST_MACH, args)
56 #define STMCH_NOTICE(args...) NOTICE(E_USER_ST_MACH, args)
57 #define STMCH_ERROR(args...) ERROR(E_USER_ST_MACH, args)
58
59 static struct vt100 local_vt100;
60 static volatile uint8_t state_mode;
61 static uint8_t cob_count;
62
63 /* short aliases */
64 #define L_DEPLOY(mode)   (!!((mode) & I2C_COBBOARD_MODE_L_DEPLOY))
65 #define R_DEPLOY(mode)   (!!((mode) & I2C_COBBOARD_MODE_R_DEPLOY))
66 #define DEPLOY(side, mode) ((side) == I2C_LEFT_SIDE ? L_DEPLOY(mode) : R_DEPLOY(mode))
67 #define L_HARVEST(mode)  (!!((mode) & I2C_COBBOARD_MODE_L_HARVEST))
68 #define R_HARVEST(mode)  (!!((mode) & I2C_COBBOARD_MODE_R_HARVEST))
69 #define HARVEST(side, mode) ((side) == I2C_LEFT_SIDE ? L_HARVEST(mode) : R_HARVEST(mode))
70 #define EJECT(mode)      (!!((mode) & I2C_COBBOARD_MODE_EJECT))
71 #define INIT(mode)       (!!((mode) & I2C_COBBOARD_MODE_INIT))
72
73 uint8_t state_debug = 0;
74
75 #if 0
76 static void state_dump_sensors(void)
77 {
78         STMCH_DEBUG("TODO\n");
79 }
80 #endif
81
82 uint8_t state_get_cob_count(void)
83 {
84         return cob_count;
85 }
86
87 static void state_debug_wait_key_pressed(void)
88 {
89         if (!state_debug)
90                 return;
91         printf_P(PSTR("press a key\r\n"));
92         while(!cmdline_keypressed());
93 }
94
95 /* return true if cob is present */
96 static uint8_t state_cob_present(uint8_t side)
97 {
98         if (side == I2C_LEFT_SIDE)
99                 return sensor_get(S_LCOB);
100         else
101                 /* XXX */
102                 //              return sensor_get(S_LCOB);
103                 return 0;
104 }
105
106 /* return the detected color of the cob (only valid if present) */
107 static uint8_t state_cob_color(uint8_t side)
108 {
109         if (side == I2C_LEFT_SIDE)
110                 return I2C_COB_WHITE;
111         else
112                 /* XXX */
113                 //              return sensor_get(S_LCOB);
114                 return 0;
115 }
116
117 /* set a new state, return 0 on success */
118 int8_t state_set_mode(uint8_t mode)
119 {
120         state_mode = mode;
121
122 /*      STMCH_DEBUG("%s(): l_deploy=%d l_harvest=%d " */
123 /*                  "r_deploy=%d r_harvest=%d eject=%d", */
124 /*                  __FUNCTION__, L_DEPLOY(mode), L_HARVEST(mode), */
125 /*                  R_DEPLOY(mode), R_HARVEST(mode), EJECT(mode)); */
126
127         return 0;
128 }
129
130 /* check that state is the one in parameter and that state did not
131  * changed */
132 static uint8_t state_want_exit(void)
133 {
134         int16_t c;
135
136         /* force quit when CTRL-C is typed */
137         c = cmdline_getchar();
138         if (c == -1)
139                 return 0;
140         if (vt100_parser(&local_vt100, c) == KEY_CTRL_C)
141                 return 1;
142         return 0;
143 }
144
145 uint8_t state_get_mode(void)
146 {
147         return state_mode;
148 }
149
150 /* harvest cobs from area */
151 static void state_do_harvest(uint8_t side)
152 {
153         uint16_t delay;
154
155         /* if there is no cob, return */
156         if (state_cob_present(side))
157                 return;
158                 
159         /* if it is black, nothing to do */
160         if (state_cob_color(side) == I2C_COB_BLACK)
161                 return;
162
163         /* eat the cob */
164         spickle_pack(side);
165         state_debug_wait_key_pressed();
166         delay = spickle_get_pack_delay(side);
167         time_wait_ms(delay);
168
169         /* redeploy the spickle */
170         spickle_deploy(side);
171         state_debug_wait_key_pressed();
172
173         cob_count ++;
174
175         /* store it */
176         shovel_up();
177         wait_ms(200);
178         state_debug_wait_key_pressed();
179         shovel_down();
180         state_debug_wait_key_pressed();
181 }
182
183 /* eject cobs */
184 static void state_do_eject(void)
185 {
186         cob_count = 0;
187         shovel_mid();
188         servo_door_open();
189         time_wait_ms(2000);
190         shovel_down();
191         servo_door_close();
192 }
193
194 /* main state machine */
195 void state_machine(void)
196 {
197         while (state_want_exit() == 0) {
198
199                 /* init */
200                 if (INIT(state_mode)) {
201                         state_mode &= (~I2C_COBBOARD_MODE_INIT);
202                         state_init();
203                 }
204
205                 /* pack/deply spickles, enable/disable roller */
206                 if (L_DEPLOY(state_mode)) {
207                         spickle_deploy(I2C_LEFT_SIDE);
208                         left_cobroller_on();
209                 }
210                 else {
211                         spickle_pack(I2C_LEFT_SIDE);
212                         left_cobroller_off();
213                 }
214                 if (R_DEPLOY(state_mode)) {
215                         spickle_deploy(I2C_RIGHT_SIDE);
216                         right_cobroller_on();
217                 }
218                 else {
219                         spickle_pack(I2C_RIGHT_SIDE);
220                         right_cobroller_off();
221                 }
222
223                 /* harvest */
224                 if (L_DEPLOY(state_mode) && L_HARVEST(state_mode))
225                         state_do_harvest(I2C_LEFT_SIDE);
226                 if (R_DEPLOY(state_mode) && R_HARVEST(state_mode))
227                         state_do_harvest(I2C_RIGHT_SIDE);
228
229                 /* eject */
230                 if (EJECT(state_mode)) {
231                         state_mode &= (~I2C_COBBOARD_MODE_EJECT);
232                         state_do_eject();
233                 }
234         }
235 }
236
237 void state_init(void)
238 {
239         vt100_init(&local_vt100);
240         shovel_down();
241         servo_door_close();
242         spickle_pack(I2C_LEFT_SIDE);
243         spickle_pack(I2C_RIGHT_SIDE);
244         state_mode = 0;
245         cob_count = 0;
246 }