1689ebef3b1b831b3b653bf5349c234e2cf1104d
[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
20 volatile __xdata struct ao_data ao_data_ring[AO_DATA_RING];
21 volatile __data uint8_t         ao_data_head;
22 #if (AO_DATA_ALL & ~(AO_DATA_ADC))
23 volatile __data uint8_t         ao_data_present;
24 #endif
25
26 #ifdef TELENANO_V_0_1
27 # define AO_ADC_FIRST_PIN       1
28 #endif
29
30 #if HAS_ACCEL_REF
31 # define AO_ADC_FIRST_PIN       2
32 #endif
33
34 #ifndef AO_ADC_FIRST_PIN
35 # define AO_ADC_FIRST_PIN       0
36 #endif
37
38 void
39 ao_adc_poll(void)
40 {
41         ADCCON3 = ADCCON3_EREF_VDD | ADCCON3_EDIV_512 | AO_ADC_FIRST_PIN;
42 }
43
44 void
45 ao_data_get(__xdata struct ao_data *packet)
46 {
47 #if HAS_FLIGHT
48         uint8_t i = ao_data_ring_prev(ao_sample_data);
49 #else
50         uint8_t i = ao_data_ring_prev(ao_data_head);
51 #endif
52         ao_xmemcpy(packet, (void __xdata *) &ao_data_ring[i], sizeof (struct ao_data));
53 }
54
55 void
56 ao_adc_isr(void) __interrupt 1
57 {
58         uint8_t sequence;
59         uint8_t __xdata *a;
60
61         sequence = (ADCCON2 & ADCCON2_SCH_MASK) >> ADCCON2_SCH_SHIFT;
62 #if TELEMETRUM_V_0_1 || TELEMETRUM_V_0_2 || TELEMETRUM_V_1_0 || TELEMETRUM_V_1_1 || TELEMETRUM_V_1_2 || TELELAUNCH_V_0_1 || TELEBALLOON_V_1_1
63         /* TeleMetrum readings */
64 #if HAS_ACCEL_REF
65         if (sequence == 2) {
66                 a = (uint8_t __xdata *) (&ao_data_ring[ao_data_head].adc.accel_ref);
67                 sequence = 0;
68         } else
69 #endif
70         {
71                 if (sequence == ADCCON3_ECH_TEMP)
72                         sequence = 2;
73                 a = (uint8_t __xdata *) (&ao_data_ring[ao_data_head].adc.accel + sequence);
74                 sequence++;
75         }
76 #define GOT_ADC
77         a[0] = ADCL;
78         a[1] = ADCH;
79         if (sequence < 6) {
80 #if HAS_EXTERNAL_TEMP == 0
81                 /* start next channel conversion */
82                 /* v0.2 replaces external temp sensor with internal one */
83                 if (sequence == 2)
84                         ADCCON3 = ADCCON3_EREF_1_25 | ADCCON3_EDIV_512 | ADCCON3_ECH_TEMP;
85                 else
86 #endif
87                         ADCCON3 = ADCCON3_EREF_VDD | ADCCON3_EDIV_512 | sequence;
88                 return;
89         }
90 #endif
91
92 #if TELEMINI_V_1_0 || TELENANO_V_0_1
93         /* TeleMini readings */
94         a = (uint8_t __xdata *) (&ao_data_ring[ao_data_head].adc.pres);
95 #if TELEMINI_V_1_0
96         switch (sequence) {
97         case 0:
98                 /* pressure */
99                 a += 0;
100                 sequence = ADCCON3_EREF_VDD | ADCCON3_EDIV_512 | 1;
101                 break;
102         case 1:
103                 /* drogue sense */
104                 a += 6;
105                 sequence = ADCCON3_EREF_VDD | ADCCON3_EDIV_512 | 2;
106                 break;
107         case 2:
108                 /* main sense */
109                 a += 8;
110                 sequence = ADCCON3_EREF_VDD | ADCCON3_EDIV_512 | 3;
111                 break;
112         case 3:
113                 /* battery */
114                 a += 4;
115                 sequence = ADCCON3_EREF_1_25 | ADCCON3_EDIV_512 | ADCCON3_ECH_TEMP;
116                 break;
117         case ADCCON3_ECH_TEMP:
118                 a += 2;
119                 sequence = 0;
120                 break;
121         }
122 #define GOT_ADC
123 #endif
124 #ifdef TELENANO_V_0_1
125         switch (sequence) {
126         case 1:
127                 /* pressure */
128                 a += 0;
129                 sequence = ADCCON3_EREF_VDD | ADCCON3_EDIV_512 | 3;
130                 break;
131         case 3:
132                 /* battery */
133                 a += 4;
134                 sequence = ADCCON3_EREF_1_25 | ADCCON3_EDIV_512 | ADCCON3_ECH_TEMP;
135                 break;
136         case ADCCON3_ECH_TEMP:
137                 a += 2;
138                 sequence = 0;
139                 break;
140         }
141 #define GOT_ADC
142 #endif
143         a[0] = ADCL;
144         a[1] = ADCH;
145         if (sequence) {
146                 /* Start next conversion */
147                 ADCCON3 = sequence;
148                 return;
149         }
150 #endif /* telemini || telenano */
151
152 #if defined(TELEFIRE_V_0_1) || defined(TELEFIRE_V_0_2)
153         a = (uint8_t __xdata *) (&ao_data_ring[ao_data_head].adc.sense[0] + sequence - AO_ADC_FIRST_PIN);
154         a[0] = ADCL;
155         a[1] = ADCH;
156         if (sequence < 5) {
157                 ADCCON3 = ADCCON3_EREF_VDD | ADCCON3_EDIV_512 | (sequence + 1);
158                 return;
159         }
160 #define GOT_ADC
161 #endif /* TELEFIRE_V_0_1 */
162
163 #ifdef TELEBT_V_1_0
164         a = (uint8_t __xdata *) (&ao_data_ring[ao_data_head].adc.batt);
165         a[0] = ADCL;
166         a[1] = ADCH;
167 #define GOT_ADC
168 #endif  
169
170 #ifdef FETCH_ADC
171         FETCH_ADC();
172 #define GOT_ADC
173 #endif
174
175 #ifndef GOT_ADC
176 #error No known ADC configuration set
177 #endif
178
179         /* record this conversion series */
180         ao_data_ring[ao_data_head].tick = ao_time();
181         ao_data_head = ao_data_ring_next(ao_data_head);
182         ao_wakeup(DATA_TO_XDATA(&ao_data_head));
183 }
184
185 static void
186 ao_adc_dump(void) __reentrant
187 {
188         static __xdata struct ao_data   packet;
189         ao_data_get(&packet);
190 #ifndef AO_ADC_DUMP
191         printf("tick: %5u accel: %5d pres: %5d temp: %5d batt: %5d drogue: %5d main: %5d\n",
192                packet.tick, packet.adc.accel, packet.adc.pres, packet.adc.temp,
193                packet.adc.v_batt, packet.adc.sense_d, packet.adc.sense_m);
194 #else
195         AO_ADC_DUMP(&packet);
196 #endif
197 }
198
199 __code struct ao_cmds ao_adc_cmds[] = {
200         { ao_adc_dump,  "a\0Current ADC" },
201         { 0, NULL },
202 };
203
204 void
205 ao_adc_init(void)
206 {
207 #ifdef AO_ADC_PINS
208         ADCCFG = AO_ADC_PINS;
209
210 #else
211
212 #if IGNITE_ON_P2
213         /* TeleMetrum configuration */
214         ADCCFG = ((1 << 0) |    /* acceleration */
215                   (1 << 1) |    /* pressure */
216 #if HAS_EXTERNAL_TEMP
217                   (1 << 2) |    /* v0.1 temperature */
218 #endif
219                   (1 << 3) |    /* battery voltage */
220                   (1 << 4) |    /* drogue sense */
221                   (1 << 5));    /* main sense */
222 #endif
223
224 #if IGNITE_ON_P0
225         /* TeleMini configuration */
226         ADCCFG = ((1 << 0) |    /* pressure */
227                   (1 << 1) |    /* drogue sense */
228                   (1 << 2) |    /* main sense */
229                   (1 << 3));    /* battery voltage */
230 #endif
231
232 #endif /* else AO_ADC_PINS */
233
234         /* enable interrupts */
235         ADCIF = 0;
236         IEN0 |= IEN0_ADCIE;
237         ao_cmd_register(&ao_adc_cmds[0]);
238 }