3adf9b2e70277526e252770c7071dec7a400d0b1
[fw/altos] / src / ao_adc.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 #include "ao_pins.h"
20
21 volatile __xdata struct ao_adc  ao_adc_ring[AO_ADC_RING];
22 #if HAS_ACCEL_REF
23 volatile __xdata uint16_t       ao_accel_ref[AO_ADC_RING];
24 #endif
25 volatile __data uint8_t         ao_adc_head;
26
27 void
28 ao_adc_poll(void)
29 {
30 #if HAS_ACCEL_REF
31         ADCCON3 = ADCCON3_EREF_VDD | ADCCON3_EDIV_512 | 2;
32 #else
33         ADCCON3 = ADCCON3_EREF_VDD | ADCCON3_EDIV_512 | 0;
34 #endif
35 }
36
37 void
38 ao_adc_get(__xdata struct ao_adc *packet)
39 {
40         uint8_t i = ao_adc_ring_prev(ao_flight_adc);
41         memcpy(packet, &ao_adc_ring[i], sizeof (struct ao_adc));
42 }
43
44 void
45 ao_adc_isr(void) __interrupt 1
46 {
47         uint8_t sequence;
48         uint8_t __xdata *a;
49
50         sequence = (ADCCON2 & ADCCON2_SCH_MASK) >> ADCCON2_SCH_SHIFT;
51 #if HAS_ACCEL_REF
52         if (sequence == 2) {
53                 a = (uint8_t __xdata *) (&ao_accel_ref[ao_adc_head]);
54                 sequence = 0;
55         } else
56 #endif
57         {
58                 if (sequence == ADCCON3_ECH_TEMP)
59                         sequence = 2;
60                 a = (uint8_t __xdata *) (&ao_adc_ring[ao_adc_head].accel + sequence);
61                 sequence++;
62         }
63         a[0] = ADCL;
64         a[1] = ADCH;
65         if (sequence < 6) {
66 #if HAS_EXTERNAL_TEMP == 0
67                 /* start next channel conversion */
68                 /* v0.2 replaces external temp sensor with internal one */
69                 if (sequence == 2)
70                         ADCCON3 = ADCCON3_EREF_1_25 | ADCCON3_EDIV_512 | ADCCON3_ECH_TEMP;
71                 else
72 #endif
73                         ADCCON3 = ADCCON3_EREF_VDD | ADCCON3_EDIV_512 | sequence;
74         } else {
75                 /* record this conversion series */
76                 ao_adc_ring[ao_adc_head].tick = ao_time();
77                 ao_adc_head = ao_adc_ring_next(ao_adc_head);
78                 ao_wakeup(DATA_TO_XDATA(&ao_adc_head));
79         }
80 }
81
82 static void
83 ao_adc_dump(void) __reentrant
84 {
85         static __xdata struct ao_adc    packet;
86         ao_adc_get(&packet);
87         printf("tick: %5u accel: %5d pres: %5d temp: %5d batt: %5d drogue: %5d main: %5d\n",
88                packet.tick, packet.accel, packet.pres, packet.temp,
89                packet.v_batt, packet.sense_d, packet.sense_m);
90 }
91
92 __code struct ao_cmds ao_adc_cmds[] = {
93         { 'a',  ao_adc_dump,    "a                                  Display current ADC values" },
94         { 0,    ao_adc_dump, NULL },
95 };
96
97 void
98 ao_adc_init(void)
99 {
100         ADCCFG = ((1 << 0) |    /* acceleration */
101                   (1 << 1) |    /* pressure */
102 #if HAS_EXTERNAL_TEMP
103                   (1 << 2) |    /* v0.1 temperature */
104 #endif
105                   (1 << 3) |    /* battery voltage */
106                   (1 << 4) |    /* drogue sense */
107                   (1 << 5));    /* main sense */
108
109         /* enable interrupts */
110         ADCIF = 0;
111         IEN0 |= IEN0_ADCIE;
112         ao_cmd_register(&ao_adc_cmds[0]);
113 }