Merge remote-tracking branch 'uniarch/master' into multiarch
[fw/altos] / src / cc1111 / 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 # ifdef TELENANO_V_0_1
34         ADCCON3 = ADCCON3_EREF_VDD | ADCCON3_EDIV_512 | 1;
35 # else
36         ADCCON3 = ADCCON3_EREF_VDD | ADCCON3_EDIV_512 | 0;
37 # endif
38 #endif
39 }
40
41 void
42 ao_adc_get(__xdata struct ao_adc *packet)
43 {
44 #if HAS_FLIGHT
45         uint8_t i = ao_adc_ring_prev(ao_sample_adc);
46 #else
47         uint8_t i = ao_adc_ring_prev(ao_adc_head);
48 #endif
49         memcpy(packet, &ao_adc_ring[i], sizeof (struct ao_adc));
50 }
51
52 void
53 ao_adc_isr(void) __interrupt 1
54 {
55         uint8_t sequence;
56         uint8_t __xdata *a;
57
58         sequence = (ADCCON2 & ADCCON2_SCH_MASK) >> ADCCON2_SCH_SHIFT;
59 #if IGNITE_ON_P2
60         /* TeleMetrum readings */
61 #if HAS_ACCEL_REF
62         if (sequence == 2) {
63                 a = (uint8_t __xdata *) (&ao_accel_ref[ao_adc_head]);
64                 sequence = 0;
65         } else
66 #endif
67         {
68                 if (sequence == ADCCON3_ECH_TEMP)
69                         sequence = 2;
70                 a = (uint8_t __xdata *) (&ao_adc_ring[ao_adc_head].accel + sequence);
71                 sequence++;
72         }
73 #define GOT_ADC
74         a[0] = ADCL;
75         a[1] = ADCH;
76         if (sequence < 6) {
77 #if HAS_EXTERNAL_TEMP == 0
78                 /* start next channel conversion */
79                 /* v0.2 replaces external temp sensor with internal one */
80                 if (sequence == 2)
81                         ADCCON3 = ADCCON3_EREF_1_25 | ADCCON3_EDIV_512 | ADCCON3_ECH_TEMP;
82                 else
83 #endif
84                         ADCCON3 = ADCCON3_EREF_VDD | ADCCON3_EDIV_512 | sequence;
85         }
86 #endif
87
88 #if IGNITE_ON_P0
89         /* TeleMini readings */
90         a = (uint8_t __xdata *) (&ao_adc_ring[ao_adc_head].pres);
91 #ifdef TELEMINI_V_1_0
92         switch (sequence) {
93         case 0:
94                 /* pressure */
95                 a += 0;
96                 sequence = ADCCON3_EREF_VDD | ADCCON3_EDIV_512 | 1;
97                 break;
98         case 1:
99                 /* drogue sense */
100                 a += 6;
101                 sequence = ADCCON3_EREF_VDD | ADCCON3_EDIV_512 | 2;
102                 break;
103         case 2:
104                 /* main sense */
105                 a += 8;
106                 sequence = ADCCON3_EREF_VDD | ADCCON3_EDIV_512 | 3;
107                 break;
108         case 3:
109                 /* battery */
110                 a += 4;
111                 sequence = ADCCON3_EREF_1_25 | ADCCON3_EDIV_512 | ADCCON3_ECH_TEMP;
112                 break;
113         case ADCCON3_ECH_TEMP:
114                 a += 2;
115                 sequence = 0;
116                 break;
117         }
118 #define GOT_ADC
119 #endif
120 #ifdef TELENANO_V_0_1
121         switch (sequence) {
122         case 1:
123                 /* pressure */
124                 a += 0;
125                 sequence = ADCCON3_EREF_VDD | ADCCON3_EDIV_512 | 3;
126                 break;
127         case 3:
128                 /* battery */
129                 a += 4;
130                 sequence = ADCCON3_EREF_1_25 | ADCCON3_EDIV_512 | ADCCON3_ECH_TEMP;
131                 break;
132         case ADCCON3_ECH_TEMP:
133                 a += 2;
134                 sequence = 0;
135                 break;
136         }
137 #define GOT_ADC
138 #endif
139         a[0] = ADCL;
140         a[1] = ADCH;
141         if (sequence) {
142                 /* Start next conversion */
143                 ADCCON3 = sequence;
144         }
145 #endif
146 #ifndef GOT_ADC
147 #error No known ADC configuration set
148 #endif
149
150         else {
151                 /* record this conversion series */
152                 ao_adc_ring[ao_adc_head].tick = ao_time();
153                 ao_adc_head = ao_adc_ring_next(ao_adc_head);
154                 ao_wakeup(DATA_TO_XDATA(&ao_adc_head));
155         }
156 }
157
158 static void
159 ao_adc_dump(void) __reentrant
160 {
161         static __xdata struct ao_adc    packet;
162         ao_adc_get(&packet);
163         printf("tick: %5u accel: %5d pres: %5d temp: %5d batt: %5d drogue: %5d main: %5d\n",
164                packet.tick, packet.accel, packet.pres, packet.temp,
165                packet.v_batt, packet.sense_d, packet.sense_m);
166 }
167
168 __code struct ao_cmds ao_adc_cmds[] = {
169         { ao_adc_dump,  "a\0Current ADC" },
170         { 0, NULL },
171 };
172
173 void
174 ao_adc_init(void)
175 {
176 #if IGNITE_ON_P2
177         /* TeleMetrum configuration */
178         ADCCFG = ((1 << 0) |    /* acceleration */
179                   (1 << 1) |    /* pressure */
180 #if HAS_EXTERNAL_TEMP
181                   (1 << 2) |    /* v0.1 temperature */
182 #endif
183                   (1 << 3) |    /* battery voltage */
184                   (1 << 4) |    /* drogue sense */
185                   (1 << 5));    /* main sense */
186 #endif
187
188 #if IGNITE_ON_P0
189         /* TeleMini configuration */
190         ADCCFG = ((1 << 0) |    /* pressure */
191                   (1 << 1) |    /* drogue sense */
192                   (1 << 2) |    /* main sense */
193                   (1 << 3));    /* battery voltage */
194 #endif
195
196         /* enable interrupts */
197         ADCIF = 0;
198         IEN0 |= IEN0_ADCIE;
199         ao_cmd_register(&ao_adc_cmds[0]);
200 }