git.gag.com Git - fw/altos/blob - src/stm32f1/ao_adc_stm.c

   1 /*
   2  * Copyright © 2012 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; 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, but
  10  * WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License along
  15  * with this program; if not, write to the Free Software Foundation, Inc.,
  16  * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
  17  */
  18
  19 #include <ao.h>
  20 #include <ao_data.h>
  21
  22 static uint8_t                  ao_adc_ready;
  23
  24 #define AO_ADC_CR2_VAL(start)   ((HAS_ADC_TEMP << STM_ADC_CR2_TSVREFE) |\
  25                                  ((start) << STM_ADC_CR2_SWSTART) |     \
  26                                  (0 << STM_ADC_CR2_JWSTART) |           \
  27                                  (0 << STM_ADC_CR2_EXTTRIG) |           \
  28                                  (STM_ADC_CR2_EXTSEL_SWSTART << STM_ADC_CR2_EXTSEL) | \
  29                                  (0 << STM_ADC_CR2_JEXTTRIG) |          \
  30                                  (0 << STM_ADC_CR2_JEXTSEL) |           \
  31                                  (0 << STM_ADC_CR2_ALIGN) |             \
  32                                  (1 << STM_ADC_CR2_DMA) |               \
  33                                  (0 << STM_ADC_CR2_CONT) |              \
  34                                  (1 << STM_ADC_CR2_ADON))
  35
  36 /*
  37  * Callback from DMA ISR
  38  *
  39  * Mark time in ring, shut down DMA engine
  40  */
  41 static void ao_adc_done(int index)
  42 {
  43         (void) index;
  44         AO_DATA_PRESENT(AO_DATA_ADC);
  45         ao_dma_done_transfer(STM_DMA_INDEX(STM_DMA_CHANNEL_ADC1));
  46         ao_data_fill(ao_data_head);
  47         ao_adc_ready = 1;
  48 }
  49
  50 /*
  51  * Start the ADC sequence using the DMA engine
  52  */
  53 void
  54 ao_adc_poll(void)
  55 {
  56         if (!ao_adc_ready)
  57                 return;
  58         ao_adc_ready = 0;
  59         stm_adc1.sr = 0;
  60         ao_dma_set_transfer(STM_DMA_INDEX(STM_DMA_CHANNEL_ADC1),
  61                             &stm_adc1.dr,
  62                             (void *) (&ao_data_ring[ao_data_head].adc),
  63                             AO_NUM_ADC,
  64                             (0 << STM_DMA_CCR_MEM2MEM) |
  65                             (STM_DMA_CCR_PL_HIGH << STM_DMA_CCR_PL) |
  66                             (STM_DMA_CCR_MSIZE_16 << STM_DMA_CCR_MSIZE) |
  67                             (STM_DMA_CCR_PSIZE_16 << STM_DMA_CCR_PSIZE) |
  68                             (1 << STM_DMA_CCR_MINC) |
  69                             (0 << STM_DMA_CCR_PINC) |
  70                             (0 << STM_DMA_CCR_CIRC) |
  71                             (STM_DMA_CCR_DIR_PER_TO_MEM << STM_DMA_CCR_DIR));
  72         ao_dma_set_isr(STM_DMA_INDEX(STM_DMA_CHANNEL_ADC1), ao_adc_done);
  73         ao_dma_start(STM_DMA_INDEX(STM_DMA_CHANNEL_ADC1));
  74
  75         stm_adc1.cr2 = AO_ADC_CR2_VAL(0);
  76         stm_adc1.cr2 = AO_ADC_CR2_VAL(0);
  77         stm_adc1.cr2 = AO_ADC_CR2_VAL(1);
  78 }
  79
  80 #ifdef AO_ADC_SQ1_NAME
  81 static const char *ao_adc_name[AO_NUM_ADC] = {
  82         AO_ADC_SQ1_NAME,
  83 #ifdef AO_ADC_SQ2_NAME
  84         AO_ADC_SQ2_NAME,
  85 #endif
  86 #ifdef AO_ADC_SQ3_NAME
  87         AO_ADC_SQ3_NAME,
  88 #endif
  89 #ifdef AO_ADC_SQ4_NAME
  90         AO_ADC_SQ4_NAME,
  91 #endif
  92 #ifdef AO_ADC_SQ5_NAME
  93         AO_ADC_SQ5_NAME,
  94 #endif
  95 #ifdef AO_ADC_SQ6_NAME
  96         AO_ADC_SQ6_NAME,
  97 #endif
  98 #ifdef AO_ADC_SQ7_NAME
  99         AO_ADC_SQ7_NAME,
 100 #endif
 101 #ifdef AO_ADC_SQ8_NAME
 102         AO_ADC_SQ8_NAME,
 103 #endif
 104 #ifdef AO_ADC_SQ9_NAME
 105         AO_ADC_SQ9_NAME,
 106 #endif
 107 #ifdef AO_ADC_SQ10_NAME
 108         AO_ADC_SQ10_NAME,
 109 #endif
 110 #ifdef AO_ADC_SQ11_NAME
 111         AO_ADC_SQ11_NAME,
 112 #endif
 113 #ifdef AO_ADC_SQ12_NAME
 114         AO_ADC_SQ12_NAME,
 115 #endif
 116 #ifdef AO_ADC_SQ13_NAME
 117         AO_ADC_SQ13_NAME,
 118 #endif
 119 #ifdef AO_ADC_SQ14_NAME
 120         AO_ADC_SQ14_NAME,
 121 #endif
 122 #ifdef AO_ADC_SQ15_NAME
 123         AO_ADC_SQ15_NAME,
 124 #endif
 125 #ifdef AO_ADC_SQ16_NAME
 126         AO_ADC_SQ16_NAME,
 127 #endif
 128 #ifdef AO_ADC_SQ17_NAME
 129         AO_ADC_SQ17_NAME,
 130 #endif
 131 #ifdef AO_ADC_SQ18_NAME
 132         AO_ADC_SQ18_NAME,
 133 #endif
 134 #ifdef AO_ADC_SQ19_NAME
 135         AO_ADC_SQ19_NAME,
 136 #endif
 137 #ifdef AO_ADC_SQ20_NAME
 138         AO_ADC_SQ20_NAME,
 139 #endif
 140 #ifdef AO_ADC_SQ21_NAME
 141         #error "too many ADC names"
 142 #endif
 143 };
 144 #endif
 145
 146 static void
 147 ao_adc_dump(void)
 148 {
 149         struct ao_data  packet;
 150 #ifndef AO_ADC_DUMP
 151         uint8_t i;
 152         int16_t *d;
 153 #endif
 154
 155         ao_data_get(&packet);
 156 #ifdef AO_ADC_DUMP
 157         AO_ADC_DUMP(&packet);
 158 #else
 159         printf("tick: %5u",  packet.tick);
 160         d = (int16_t *) (&packet.adc);
 161         for (i = 0; i < AO_NUM_ADC; i++) {
 162 #ifdef AO_ADC_SQ1_NAME
 163                 if (ao_adc_name[i])
 164                         printf (" %s: %5d", ao_adc_name[i], d[i]);
 165                 else
 166 #endif
 167                         printf (" %2d: %5d", i, d[i]);
 168         }
 169         printf("\n");
 170 #endif
 171 }
 172
 173 const struct ao_cmds ao_adc_cmds[] = {
 174         { ao_adc_dump,  "a\0Display current ADC values" },
 175         { 0, NULL },
 176 };
 177
 178 static inline void
 179 adc_pin_set(struct stm_gpio *gpio, int pin)
 180 {
 181         ao_enable_port(gpio);
 182         stm_gpio_conf(gpio, pin,
 183                       STM_GPIO_CR_MODE_INPUT,
 184                       STM_GPIO_CR_CNF_INPUT_ANALOG);
 185 }
 186
 187 void
 188 ao_adc_init(void)
 189 {
 190 #ifdef AO_ADC_PIN0_PORT
 191         adc_pin_set(AO_ADC_PIN0_PORT, AO_ADC_PIN0_PIN);
 192 #endif
 193 #ifdef AO_ADC_PIN1_PORT
 194         adc_pin_set(AO_ADC_PIN1_PORT, AO_ADC_PIN1_PIN);
 195 #endif
 196 #ifdef AO_ADC_PIN2_PORT
 197         adc_pin_set(AO_ADC_PIN2_PORT, AO_ADC_PIN2_PIN);
 198 #endif
 199 #ifdef AO_ADC_PIN3_PORT
 200         adc_pin_set(AO_ADC_PIN3_PORT, AO_ADC_PIN3_PIN);
 201 #endif
 202 #ifdef AO_ADC_PIN4_PORT
 203         adc_pin_set(AO_ADC_PIN4_PORT, AO_ADC_PIN4_PIN);
 204 #endif
 205 #ifdef AO_ADC_PIN5_PORT
 206         adc_pin_set(AO_ADC_PIN5_PORT, AO_ADC_PIN5_PIN);
 207 #endif
 208 #ifdef AO_ADC_PIN6_PORT
 209         adc_pin_set(AO_ADC_PIN6_PORT, AO_ADC_PIN6_PIN);
 210 #endif
 211 #ifdef AO_ADC_PIN7_PORT
 212         adc_pin_set(AO_ADC_PIN7_PORT, AO_ADC_PIN7_PIN);
 213 #endif
 214 #ifdef AO_ADC_PIN8_PORT
 215         adc_pin_set(AO_ADC_PIN8_PORT, AO_ADC_PIN8_PIN);
 216 #endif
 217 #ifdef AO_ADC_PIN9_PORT
 218         adc_pin_set(AO_ADC_PIN9_PORT, AO_ADC_PIN9_PIN);
 219 #endif
 220 #ifdef AO_ADC_PIN10_PORT
 221         adc_pin_set(AO_ADC_PIN10_PORT, AO_ADC_PIN10_PIN);
 222 #endif
 223 #ifdef AO_ADC_PIN11_PORT
 224         adc_pin_set(AO_ADC_PIN11_PORT, AO_ADC_PIN11_PIN);
 225 #endif
 226 #ifdef AO_ADC_PIN12_PORT
 227         adc_pin_set(AO_ADC_PIN12_PORT, AO_ADC_PIN12_PIN);
 228 #endif
 229 #ifdef AO_ADC_PIN13_PORT
 230         adc_pin_set(AO_ADC_PIN13_PORT, AO_ADC_PIN13_PIN);
 231 #endif
 232 #ifdef AO_ADC_PIN14_PORT
 233         adc_pin_set(AO_ADC_PIN14_PORT, AO_ADC_PIN14_PIN);
 234 #endif
 235 #ifdef AO_ADC_PIN15_PORT
 236         adc_pin_set(AO_ADC_PIN15_PORT, AO_ADC_PIN15_PIN);
 237 #endif
 238 #ifdef AO_ADC_PIN16_PORT
 239         adc_pin_set(AO_ADC_PIN16_PORT, AO_ADC_PIN16_PIN);
 240 #endif
 241 #ifdef AO_ADC_PIN17_PORT
 242         adc_pin_set(AO_ADC_PIN17_PORT, AO_ADC_PIN17_PIN);
 243 #endif
 244 #ifdef AO_ADC_PIN18_PORT
 245         adc_pin_set(AO_ADC_PIN18_PORT, AO_ADC_PIN18_PIN);
 246 #endif
 247 #ifdef AO_ADC_PIN19_PORT
 248         adc_pin_set(AO_ADC_PIN19_PORT, AO_ADC_PIN19_PIN);
 249 #endif
 250 #ifdef AO_ADC_PIN20_PORT
 251         adc_pin_set(AO_ADC_PIN20_PORT, AO_ADC_PIN20_PIN);
 252 #endif
 253 #ifdef AO_ADC_PIN21_PORT
 254         adc_pin_set(AO_ADC_PIN21_PORT, AO_ADC_PIN21_PIN);
 255 #endif
 256 #ifdef AO_ADC_PIN22_PORT
 257         adc_pin_set(AO_ADC_PIN22_PORT, AO_ADC_PIN22_PIN);
 258 #endif
 259 #ifdef AO_ADC_PIN23_PORT
 260         adc_pin_set(AO_ADC_PIN23_PORT, AO_ADC_PIN23_PIN);
 261 #endif
 262 #ifdef AO_ADC_PIN24_PORT
 263         #error "Too many ADC ports"
 264 #endif
 265
 266         stm_rcc.apb2enr |= (1 << STM_RCC_APB2ENR_ADC1EN);
 267
 268         /* Turn off ADC during configuration */
 269         stm_adc1.cr2 = 0;
 270
 271         stm_adc1.cr1 = ((0 << STM_ADC_CR1_AWDEN ) |
 272                        (0 << STM_ADC_CR1_JAWDEN ) |
 273                        (STM_ADC_CR1_DUALMOD_INDEPENDENT << STM_ADC_CR1_DUALMOD ) |
 274                        (0 << STM_ADC_CR1_DISCNUM ) |
 275                        (0 << STM_ADC_CR1_JDISCEN ) |
 276                        (0 << STM_ADC_CR1_DISCEN ) |
 277                        (0 << STM_ADC_CR1_JAUTO ) |
 278                        (0 << STM_ADC_CR1_AWDSGL ) |
 279                        (1 << STM_ADC_CR1_SCAN ) |
 280                        (0 << STM_ADC_CR1_JEOCIE ) |
 281                        (0 << STM_ADC_CR1_AWDIE ) |
 282                        (0 << STM_ADC_CR1_EOCIE ) |
 283                        (0 << STM_ADC_CR1_AWDCH ));
 284
 285         /* 384 cycle sample time for everyone */
 286         stm_adc1.smpr1 = 0x3ffff;
 287         stm_adc1.smpr2 = 0x3fffffff;
 288
 289         stm_adc1.sqr1 = ((AO_NUM_ADC - 1) << 20);
 290 #if AO_NUM_ADC > 0
 291         stm_adc1.sqr3 |= (AO_ADC_SQ1 << 0);
 292 #endif
 293 #if AO_NUM_ADC > 1
 294         stm_adc1.sqr3 |= (AO_ADC_SQ2 << 5);
 295 #endif
 296 #if AO_NUM_ADC > 2
 297         stm_adc1.sqr3 |= (AO_ADC_SQ3 << 10);
 298 #endif
 299 #if AO_NUM_ADC > 3
 300         stm_adc1.sqr3 |= (AO_ADC_SQ4 << 15);
 301 #endif
 302 #if AO_NUM_ADC > 4
 303         stm_adc1.sqr3 |= (AO_ADC_SQ5 << 20);
 304 #endif
 305 #if AO_NUM_ADC > 5
 306         stm_adc1.sqr3 |= (AO_ADC_SQ6 << 25);
 307 #endif
 308 #if AO_NUM_ADC > 6
 309         stm_adc1.sqr2 |= (AO_ADC_SQ7 << 0);
 310 #endif
 311 #if AO_NUM_ADC > 7
 312         stm_adc1.sqr2 |= (AO_ADC_SQ8 << 5);
 313 #endif
 314 #if AO_NUM_ADC > 8
 315         stm_adc1.sqr2 |= (AO_ADC_SQ9 << 10);
 316 #endif
 317 #if AO_NUM_ADC > 9
 318         stm_adc1.sqr2 |= (AO_ADC_SQ10 << 15);
 319 #endif
 320 #if AO_NUM_ADC > 10
 321         stm_adc1.sqr2 |= (AO_ADC_SQ11 << 20);
 322 #endif
 323 #if AO_NUM_ADC > 11
 324         stm_adc1.sqr2 |= (AO_ADC_SQ12 << 25);
 325 #endif
 326 #if AO_NUM_ADC > 12
 327         stm_adc1.sqr1 |= (AO_ADC_SQ13 << 0);
 328 #endif
 329 #if AO_NUM_ADC > 13
 330         stm_adc1.sqr1 |= (AO_ADC_SQ14 << 5);
 331 #endif
 332 #if AO_NUM_ADC > 14
 333         stm_adc1.sqr1 |= (AO_ADC_SQ15 << 10);
 334 #endif
 335 #if AO_NUM_ADC > 15
 336         stm_adc1.sqr1 |= (AO_ADC_SQ16 << 15);
 337 #endif
 338 #if AO_NUM_ADC > 15
 339 #error "too many ADC channels"
 340 #endif
 341
 342 #ifndef HAS_ADC_TEMP
 343 #error Please define HAS_ADC_TEMP
 344 #endif
 345 #if HAS_ADC_TEMP
 346         stm_adc1.cr2 |= ((1 << STM_ADC_CR2_TSVREFE));
 347 #endif
 348
 349         /* Clear any stale status bits */
 350         stm_adc1.sr = 0;
 351
 352         ao_dma_alloc(STM_DMA_INDEX(STM_DMA_CHANNEL_ADC1));
 353
 354         ao_cmd_register(&ao_adc_cmds[0]);
 355
 356         ao_adc_ready = 1;
 357 }