Fix all stdio reading functions to be __critical
[fw/altos] / src / ao_config.c
1 /*
2  * Copyright © 2009 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; version 2 of the License.
7  *
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.
12  *
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.
16  */
17
18 #include "ao.h"
19
20 __xdata struct ao_config ao_config;
21 __xdata uint8_t ao_config_loaded;
22 __xdata uint8_t ao_config_dirty;
23 __xdata uint8_t ao_config_mutex;
24
25 #define AO_CONFIG_DEFAULT_MAIN_DEPLOY   250
26 #define AO_CONFIG_DEFAULT_RADIO_CHANNEL 0
27 #define AO_CONFIG_DEFAULT_CALLSIGN      "N0CALL"
28 #define AO_CONFIG_DEFAULT_ACCEL_ZERO_G  16000
29 #define AO_CONFIG_DEFAULT_APOGEE_DELAY  0
30 /*
31  * For 434.550MHz, the frequency value is:
32  *
33  * 434.550e6 / (24e6 / 2**16) = 1186611.2
34  *
35  * This value is stored in a const variable so that
36  * ao-load can change it during programming for
37  * devices that have no eeprom for config data.
38  */
39 const uint32_t ao_radio_cal = 1186611;
40
41 #if HAS_EEPROM
42 static void
43 _ao_config_put(void)
44 {
45         ao_ee_write_config((uint8_t *) &ao_config, sizeof (ao_config));
46 }
47 #endif
48
49 static void
50 _ao_config_get(void)
51 {
52         if (ao_config_loaded)
53                 return;
54 #if HAS_EEPROM
55         ao_ee_read_config((uint8_t *) &ao_config, sizeof (ao_config));
56 #endif
57         if (ao_config.major != AO_CONFIG_MAJOR) {
58                 ao_config.major = AO_CONFIG_MAJOR;
59                 ao_config.minor = AO_CONFIG_MINOR;
60                 ao_config.main_deploy = AO_CONFIG_DEFAULT_MAIN_DEPLOY;
61                 ao_config.radio_channel = AO_CONFIG_DEFAULT_RADIO_CHANNEL;
62                 ao_config.accel_plus_g = 0;
63                 ao_config.accel_minus_g = 0;
64                 memset(&ao_config.callsign, '\0', sizeof (ao_config.callsign));
65                 memcpy(&ao_config.callsign, AO_CONFIG_DEFAULT_CALLSIGN,
66                        sizeof(AO_CONFIG_DEFAULT_CALLSIGN) - 1);
67                 ao_config.apogee_delay = AO_CONFIG_DEFAULT_APOGEE_DELAY;
68                 ao_config.radio_cal = ao_radio_cal;
69                 ao_config_dirty = 1;
70         }
71         if (ao_config.minor < AO_CONFIG_MINOR) {
72                 /* Fixups for minor version 1 */
73                 if (ao_config.minor < 1)
74                         ao_config.apogee_delay = AO_CONFIG_DEFAULT_APOGEE_DELAY;
75                 /* Fixups for minor version 2 */
76                 if (ao_config.minor < 2) {
77                         ao_config.accel_plus_g = 0;
78                         ao_config.accel_minus_g = 0;
79                 }
80                 /* Fixups for minor version 3 */
81                 if (ao_config.minor < 3)
82                         ao_config.radio_cal = ao_radio_cal;
83                 ao_config.minor = AO_CONFIG_MINOR;
84                 ao_config_dirty = 1;
85         }
86         ao_config_loaded = 1;
87 }
88
89 void
90 ao_config_get(void)
91 {
92         ao_mutex_get(&ao_config_mutex);
93         _ao_config_get();
94         ao_mutex_put(&ao_config_mutex);
95 }
96
97 void
98 ao_config_callsign_show(void)
99 {
100         printf ("Callsign: \"%s\"\n", ao_config.callsign);
101 }
102
103 void
104 ao_config_callsign_set(void) __reentrant
105 {
106         uint8_t c;
107         char callsign[AO_MAX_CALLSIGN + 1];
108
109         ao_cmd_white();
110         c = 0;
111         while (ao_cmd_lex_c != '\n') {
112                 if (c < AO_MAX_CALLSIGN)
113                         callsign[c++] = ao_cmd_lex_c;
114                 else
115                         ao_cmd_status = ao_cmd_lex_error;
116                 ao_cmd_lex();
117         }
118         if (ao_cmd_status != ao_cmd_success)
119                 return;
120         ao_mutex_get(&ao_config_mutex);
121         _ao_config_get();
122         while (c < AO_MAX_CALLSIGN + 1)
123                 callsign[c++] = '\0';
124         memcpy(&ao_config.callsign, &callsign,
125                AO_MAX_CALLSIGN + 1);
126         ao_config_dirty = 1;
127         ao_mutex_put(&ao_config_mutex);
128         ao_config_callsign_show();
129 }
130
131 void
132 ao_config_radio_channel_show(void) __reentrant
133 {
134         uint32_t        freq = 434550L + ao_config.radio_channel * 100L;
135         uint16_t        mhz = freq / 1000L;
136         uint16_t        khz = freq % 1000L;
137
138         printf("Radio channel: %d (%d.%03dMHz)\n",
139                ao_config.radio_channel, mhz, khz);
140 }
141
142 void
143 ao_config_radio_channel_set(void) __reentrant
144 {
145         ao_cmd_decimal();
146         if (ao_cmd_status != ao_cmd_success)
147                 return;
148         ao_mutex_get(&ao_config_mutex);
149         _ao_config_get();
150         ao_config.radio_channel = ao_cmd_lex_i;
151         ao_config_dirty = 1;
152         ao_mutex_put(&ao_config_mutex);
153         ao_config_radio_channel_show();
154 }
155
156 #if HAS_ADC
157
158 void
159 ao_config_main_deploy_show(void) __reentrant
160 {
161         printf("Main deploy: %d meters (%d feet)\n",
162                ao_config.main_deploy,
163                (int16_t) ((int32_t) ao_config.main_deploy * 328 / 100));
164 }
165
166 void
167 ao_config_main_deploy_set(void) __reentrant
168 {
169         ao_cmd_decimal();
170         if (ao_cmd_status != ao_cmd_success)
171                 return;
172         ao_mutex_get(&ao_config_mutex);
173         _ao_config_get();
174         ao_config.main_deploy = ao_cmd_lex_i;
175         ao_config_dirty = 1;
176         ao_mutex_put(&ao_config_mutex);
177         ao_config_main_deploy_show();
178 }
179
180 void
181 ao_config_accel_calibrate_show(void) __reentrant
182 {
183         printf("Accel cal +1g: %d -1g: %d\n",
184                ao_config.accel_plus_g, ao_config.accel_minus_g);
185 }
186
187 #define ACCEL_CALIBRATE_SAMPLES 1024
188 #define ACCEL_CALIBRATE_SHIFT   10
189
190 static int16_t
191 ao_config_accel_calibrate_auto(char *orientation) __reentrant
192 {
193         uint16_t        i;
194         int32_t         accel_total;
195         uint8_t         cal_adc_ring;
196
197         printf("Orient %s and press a key...", orientation);
198         flush();
199         (void) getchar();
200         puts("\r\n"); flush();
201         puts("Calibrating..."); flush();
202         i = ACCEL_CALIBRATE_SAMPLES;
203         accel_total = 0;
204         cal_adc_ring = ao_adc_head;
205         while (i) {
206                 ao_sleep(&ao_adc_ring);
207                 while (i && cal_adc_ring != ao_adc_head) {
208                         accel_total += (int32_t) ao_adc_ring[cal_adc_ring].accel;
209                         cal_adc_ring = ao_adc_ring_next(cal_adc_ring);
210                         i--;
211                 }
212         }
213         return accel_total >> ACCEL_CALIBRATE_SHIFT;
214 }
215
216 void
217 ao_config_accel_calibrate_set(void) __reentrant
218 {
219         int16_t up, down;
220         ao_cmd_decimal();
221         if (ao_cmd_status != ao_cmd_success)
222                 return;
223         if (ao_cmd_lex_i == 0) {
224                 up = ao_config_accel_calibrate_auto("antenna up");
225                 down = ao_config_accel_calibrate_auto("antenna down");
226         } else {
227                 up = ao_cmd_lex_i;
228                 ao_cmd_decimal();
229                 if (ao_cmd_status != ao_cmd_success)
230                         return;
231                 down = ao_cmd_lex_i;
232         }
233         if (up >= down) {
234                 printf("Invalid accel calibration: antenna up (%d) should be less than antenna down (%d)\n",
235                        up, down);
236                 return;
237         }
238         ao_mutex_get(&ao_config_mutex);
239         _ao_config_get();
240         ao_config.accel_plus_g = up;
241         ao_config.accel_minus_g = down;
242         ao_config_dirty = 1;
243         ao_mutex_put(&ao_config_mutex);
244         ao_config_accel_calibrate_show();
245 }
246
247 void
248 ao_config_apogee_delay_show(void) __reentrant
249 {
250         printf("Apogee delay: %d seconds\n",
251                ao_config.apogee_delay);
252 }
253
254 void
255 ao_config_apogee_delay_set(void) __reentrant
256 {
257         ao_cmd_decimal();
258         if (ao_cmd_status != ao_cmd_success)
259                 return;
260         ao_mutex_get(&ao_config_mutex);
261         _ao_config_get();
262         ao_config.apogee_delay = ao_cmd_lex_i;
263         ao_config_dirty = 1;
264         ao_mutex_put(&ao_config_mutex);
265         ao_config_apogee_delay_show();
266 }
267
268 #endif /* HAS_ADC */
269
270 void
271 ao_config_radio_cal_show(void) __reentrant
272 {
273         printf("Radio cal: %ld\n", ao_config.radio_cal);
274 }
275
276 void
277 ao_config_radio_cal_set(void) __reentrant
278 {
279         ao_cmd_decimal();
280         if (ao_cmd_status != ao_cmd_success)
281                 return;
282         ao_mutex_get(&ao_config_mutex);
283         _ao_config_get();
284         ao_config.radio_cal = ao_cmd_lex_u32;
285         ao_config_dirty = 1;
286         ao_mutex_put(&ao_config_mutex);
287         ao_config_radio_cal_show();
288 }
289
290 struct ao_config_var {
291         char            cmd;
292         void            (*set)(void) __reentrant;
293         void            (*show)(void) __reentrant;
294         const char      *help;
295 };
296
297 void
298 ao_config_help(void) __reentrant;
299
300 void
301 ao_config_show(void) __reentrant;
302
303 void
304 ao_config_write(void) __reentrant;
305
306 __code struct ao_config_var ao_config_vars[] = {
307 #if HAS_ADC
308         { 'm',  ao_config_main_deploy_set,      ao_config_main_deploy_show,
309                 "m <meters>  Set height above launch for main deploy (in meters)" },
310         { 'd',  ao_config_apogee_delay_set,     ao_config_apogee_delay_show,
311                 "d <delay>   Set apogee igniter delay (in seconds)" },
312 #endif /* HAS_ADC */
313         { 'r',  ao_config_radio_channel_set,    ao_config_radio_channel_show,
314                 "r <channel> Set radio channel (freq = 434.550 + channel * .1)" },
315         { 'c',  ao_config_callsign_set,         ao_config_callsign_show,
316                 "c <call>    Set callsign broadcast in each packet (8 char max)" },
317 #if HAS_ADC
318         { 'a',  ao_config_accel_calibrate_set,  ao_config_accel_calibrate_show,
319                 "a <+g> <-g> Set accelerometer calibration (0 for auto)" },
320 #endif /* HAS_ADC */
321         { 'f',  ao_config_radio_cal_set,        ao_config_radio_cal_show,
322                 "f <cal>     Set radio calibration value (cal = rf/(xtal/2^16))" },
323         { 's',  ao_config_show,                 ao_config_show,
324                 "s           Show current config values" },
325 #if HAS_EEPROM
326         { 'w',  ao_config_write,                ao_config_write,
327                 "w           Write current values to eeprom" },
328 #endif
329         { '?',  ao_config_help,                 ao_config_help,
330                 "?           Show available config variables" },
331         { 0,    ao_config_help, ao_config_help,
332                 NULL },
333 };
334
335 void
336 ao_config_set(void)
337 {
338         char    c;
339         uint8_t cmd;
340         void (*__xdata func)(void) __reentrant;
341
342         ao_cmd_white();
343         c = ao_cmd_lex_c;
344         ao_cmd_lex();
345         func = 0;
346         for (cmd = 0; ao_config_vars[cmd].cmd != '\0'; cmd++)
347                 if (ao_config_vars[cmd].cmd == c) {
348                         func = ao_config_vars[cmd].set;
349                         break;
350                 }
351         if (func)
352                 (*func)();
353         else
354                 ao_cmd_status = ao_cmd_syntax_error;
355 }
356
357 void
358 ao_config_help(void) __reentrant
359 {
360         uint8_t cmd;
361         for (cmd = 0; ao_config_vars[cmd].cmd != '\0'; cmd++)
362                 puts (ao_config_vars[cmd].help);
363 }
364
365 void
366 ao_config_show(void) __reentrant
367 {
368         uint8_t cmd;
369         printf("Config version: %d.%d\n",
370                ao_config.major, ao_config.minor);
371         for (cmd = 0; ao_config_vars[cmd].cmd != '\0'; cmd++)
372                 if (ao_config_vars[cmd].show != ao_config_vars[cmd].set)
373                         (*ao_config_vars[cmd].show)();
374 }
375
376 #if HAS_EEPROM
377 void
378 ao_config_write(void) __reentrant
379 {
380         uint8_t saved = 0;
381         ao_mutex_get(&ao_config_mutex);
382         if (ao_config_dirty) {
383                 _ao_config_put();
384                 ao_config_dirty = 0;
385                 saved = 1;
386         }
387         ao_mutex_put(&ao_config_mutex);
388         if (saved)
389                 puts("Saved");
390         else
391                 puts("Nothing to save");
392 }
393 #endif
394
395 __code struct ao_cmds ao_config_cmds[] = {
396         { 'c',  ao_config_set,  "c <var> <value>                    Set config variable (? for help, s to show)" },
397         { '\0', ao_config_set, NULL },
398 };
399
400 void
401 ao_config_init(void)
402 {
403         ao_cmd_register(&ao_config_cmds[0]);
404 }