Andrew SaLoutos / mbed-dev-STM-lean

From Ben Katz mbed-dev library. Removed unnecessary target files to reduce the overall size by a factor of 10 to make it easier to import into the online IDE.

Dependents:   motor_driver motor_driver_screaming_fix

targets/TARGET_STM/TARGET_STM32F4/analogin_api.c@0:083111ae2a11, 2020-11-26 (annotated)

Committer:
saloutos
Date:
Thu Nov 26 04:08:56 2020 +0000
Revision:
0:083111ae2a11
first commit of leaned mbed dev lib

Who changed what in which revision?

UserRevisionLine numberNew contents of line
saloutos 0:083111ae2a11 1 /* mbed Microcontroller Library
saloutos 0:083111ae2a11 2 * Copyright (c) 2016, STMicroelectronics
saloutos 0:083111ae2a11 3 * All rights reserved.
saloutos 0:083111ae2a11 4 *
saloutos 0:083111ae2a11 5 * Redistribution and use in source and binary forms, with or without
saloutos 0:083111ae2a11 6 * modification, are permitted provided that the following conditions are met:
saloutos 0:083111ae2a11 7 *
saloutos 0:083111ae2a11 8 * 1. Redistributions of source code must retain the above copyright notice,
saloutos 0:083111ae2a11 9 * this list of conditions and the following disclaimer.
saloutos 0:083111ae2a11 10 * 2. Redistributions in binary form must reproduce the above copyright notice,
saloutos 0:083111ae2a11 11 * this list of conditions and the following disclaimer in the documentation
saloutos 0:083111ae2a11 12 * and/or other materials provided with the distribution.
saloutos 0:083111ae2a11 13 * 3. Neither the name of STMicroelectronics nor the names of its contributors
saloutos 0:083111ae2a11 14 * may be used to endorse or promote products derived from this software
saloutos 0:083111ae2a11 15 * without specific prior written permission.
saloutos 0:083111ae2a11 16 *
saloutos 0:083111ae2a11 17 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
saloutos 0:083111ae2a11 18 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
saloutos 0:083111ae2a11 19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
saloutos 0:083111ae2a11 20 * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
saloutos 0:083111ae2a11 21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
saloutos 0:083111ae2a11 22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
saloutos 0:083111ae2a11 23 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
saloutos 0:083111ae2a11 24 * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
saloutos 0:083111ae2a11 25 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
saloutos 0:083111ae2a11 26 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
saloutos 0:083111ae2a11 27 */
saloutos 0:083111ae2a11 28 #include "mbed_assert.h"
saloutos 0:083111ae2a11 29 #include "analogin_api.h"
saloutos 0:083111ae2a11 30
saloutos 0:083111ae2a11 31 #if DEVICE_ANALOGIN
saloutos 0:083111ae2a11 32
saloutos 0:083111ae2a11 33 #include "mbed_wait_api.h"
saloutos 0:083111ae2a11 34 #include "cmsis.h"
saloutos 0:083111ae2a11 35 #include "pinmap.h"
saloutos 0:083111ae2a11 36 #include "mbed_error.h"
saloutos 0:083111ae2a11 37 #include "PeripheralPins.h"
saloutos 0:083111ae2a11 38
saloutos 0:083111ae2a11 39 void analogin_init(analogin_t *obj, PinName pin)
saloutos 0:083111ae2a11 40 {
saloutos 0:083111ae2a11 41 uint32_t function = (uint32_t)NC;
saloutos 0:083111ae2a11 42
saloutos 0:083111ae2a11 43 #if defined(ADC1)
saloutos 0:083111ae2a11 44 static int adc1_inited = 0;
saloutos 0:083111ae2a11 45 #endif
saloutos 0:083111ae2a11 46 #if defined(ADC2)
saloutos 0:083111ae2a11 47 static int adc2_inited = 0;
saloutos 0:083111ae2a11 48 #endif
saloutos 0:083111ae2a11 49 #if defined(ADC3)
saloutos 0:083111ae2a11 50 static int adc3_inited = 0;
saloutos 0:083111ae2a11 51 #endif
saloutos 0:083111ae2a11 52 // ADC Internal Channels "pins" (Temperature, Vref, Vbat, ...)
saloutos 0:083111ae2a11 53 // are described in PinNames.h and PeripheralPins.c
saloutos 0:083111ae2a11 54 // Pin value must be between 0xF0 and 0xFF
saloutos 0:083111ae2a11 55 if ((pin < 0xF0) || (pin >= 0x100)) {
saloutos 0:083111ae2a11 56 // Normal channels
saloutos 0:083111ae2a11 57 // Get the peripheral name from the pin and assign it to the object
saloutos 0:083111ae2a11 58 obj->handle.Instance = (ADC_TypeDef *) pinmap_peripheral(pin, PinMap_ADC);
saloutos 0:083111ae2a11 59 // Get the functions (adc channel) from the pin and assign it to the object
saloutos 0:083111ae2a11 60 function = pinmap_function(pin, PinMap_ADC);
saloutos 0:083111ae2a11 61 // Configure GPIO
saloutos 0:083111ae2a11 62 pinmap_pinout(pin, PinMap_ADC);
saloutos 0:083111ae2a11 63 } else {
saloutos 0:083111ae2a11 64 // Internal channels
saloutos 0:083111ae2a11 65 obj->handle.Instance = (ADC_TypeDef *) pinmap_peripheral(pin, PinMap_ADC_Internal);
saloutos 0:083111ae2a11 66 function = pinmap_function(pin, PinMap_ADC_Internal);
saloutos 0:083111ae2a11 67 // No GPIO configuration for internal channels
saloutos 0:083111ae2a11 68 }
saloutos 0:083111ae2a11 69 MBED_ASSERT(obj->handle.Instance != (ADC_TypeDef *)NC);
saloutos 0:083111ae2a11 70 MBED_ASSERT(function != (uint32_t)NC);
saloutos 0:083111ae2a11 71
saloutos 0:083111ae2a11 72 obj->channel = STM_PIN_CHANNEL(function);
saloutos 0:083111ae2a11 73
saloutos 0:083111ae2a11 74 // Save pin number for the read function
saloutos 0:083111ae2a11 75 obj->pin = pin;
saloutos 0:083111ae2a11 76
saloutos 0:083111ae2a11 77 // Check if ADC is already initialized
saloutos 0:083111ae2a11 78 // Enable ADC clock
saloutos 0:083111ae2a11 79 #if defined(ADC1)
saloutos 0:083111ae2a11 80 if (((ADCName)obj->handle.Instance == ADC_1) && adc1_inited) return;
saloutos 0:083111ae2a11 81 if ((ADCName)obj->handle.Instance == ADC_1) {
saloutos 0:083111ae2a11 82 __HAL_RCC_ADC1_CLK_ENABLE();
saloutos 0:083111ae2a11 83 adc1_inited = 1;
saloutos 0:083111ae2a11 84 }
saloutos 0:083111ae2a11 85 #endif
saloutos 0:083111ae2a11 86 #if defined(ADC2)
saloutos 0:083111ae2a11 87 if (((ADCName)obj->handle.Instance == ADC_2) && adc2_inited) return;
saloutos 0:083111ae2a11 88 if ((ADCName)obj->handle.Instance == ADC_2) {
saloutos 0:083111ae2a11 89 __HAL_RCC_ADC2_CLK_ENABLE();
saloutos 0:083111ae2a11 90 adc2_inited = 1;
saloutos 0:083111ae2a11 91 }
saloutos 0:083111ae2a11 92 #endif
saloutos 0:083111ae2a11 93 #if defined(ADC3)
saloutos 0:083111ae2a11 94 if (((ADCName)obj->handle.Instance == ADC_3) && adc3_inited) return;
saloutos 0:083111ae2a11 95 if ((ADCName)obj->handle.Instance == ADC_3) {
saloutos 0:083111ae2a11 96 __HAL_RCC_ADC3_CLK_ENABLE();
saloutos 0:083111ae2a11 97 adc3_inited = 1;
saloutos 0:083111ae2a11 98 }
saloutos 0:083111ae2a11 99 #endif
saloutos 0:083111ae2a11 100 // Configure ADC
saloutos 0:083111ae2a11 101 obj->handle.State = HAL_ADC_STATE_RESET;
saloutos 0:083111ae2a11 102 obj->handle.Init.ClockPrescaler = ADC_CLOCK_SYNC_PCLK_DIV2;
saloutos 0:083111ae2a11 103 obj->handle.Init.Resolution = ADC_RESOLUTION_12B;
saloutos 0:083111ae2a11 104 obj->handle.Init.ScanConvMode = DISABLE;
saloutos 0:083111ae2a11 105 obj->handle.Init.ContinuousConvMode = DISABLE;
saloutos 0:083111ae2a11 106 obj->handle.Init.DiscontinuousConvMode = DISABLE;
saloutos 0:083111ae2a11 107 obj->handle.Init.NbrOfDiscConversion = 0;
saloutos 0:083111ae2a11 108 obj->handle.Init.ExternalTrigConvEdge = ADC_EXTERNALTRIGCONVEDGE_NONE;
saloutos 0:083111ae2a11 109 obj->handle.Init.ExternalTrigConv = ADC_EXTERNALTRIGCONV_T1_CC1;
saloutos 0:083111ae2a11 110 obj->handle.Init.DataAlign = ADC_DATAALIGN_RIGHT;
saloutos 0:083111ae2a11 111 obj->handle.Init.NbrOfConversion = 1;
saloutos 0:083111ae2a11 112 obj->handle.Init.DMAContinuousRequests = DISABLE;
saloutos 0:083111ae2a11 113 obj->handle.Init.EOCSelection = DISABLE;
saloutos 0:083111ae2a11 114
saloutos 0:083111ae2a11 115 if (HAL_ADC_Init(&obj->handle) != HAL_OK) {
saloutos 0:083111ae2a11 116 error("Cannot initialize ADC\n");
saloutos 0:083111ae2a11 117 }
saloutos 0:083111ae2a11 118 }
saloutos 0:083111ae2a11 119
saloutos 0:083111ae2a11 120 static inline uint16_t adc_read(analogin_t *obj)
saloutos 0:083111ae2a11 121 {
saloutos 0:083111ae2a11 122 ADC_ChannelConfTypeDef sConfig = {0};
saloutos 0:083111ae2a11 123
saloutos 0:083111ae2a11 124 // Configure ADC channel
saloutos 0:083111ae2a11 125 sConfig.Rank = 1;
saloutos 0:083111ae2a11 126 sConfig.SamplingTime = ADC_SAMPLETIME_15CYCLES;
saloutos 0:083111ae2a11 127 sConfig.Offset = 0;
saloutos 0:083111ae2a11 128
saloutos 0:083111ae2a11 129 switch (obj->channel) {
saloutos 0:083111ae2a11 130 case 0:
saloutos 0:083111ae2a11 131 sConfig.Channel = ADC_CHANNEL_0;
saloutos 0:083111ae2a11 132 break;
saloutos 0:083111ae2a11 133 case 1:
saloutos 0:083111ae2a11 134 sConfig.Channel = ADC_CHANNEL_1;
saloutos 0:083111ae2a11 135 break;
saloutos 0:083111ae2a11 136 case 2:
saloutos 0:083111ae2a11 137 sConfig.Channel = ADC_CHANNEL_2;
saloutos 0:083111ae2a11 138 break;
saloutos 0:083111ae2a11 139 case 3:
saloutos 0:083111ae2a11 140 sConfig.Channel = ADC_CHANNEL_3;
saloutos 0:083111ae2a11 141 break;
saloutos 0:083111ae2a11 142 case 4:
saloutos 0:083111ae2a11 143 sConfig.Channel = ADC_CHANNEL_4;
saloutos 0:083111ae2a11 144 break;
saloutos 0:083111ae2a11 145 case 5:
saloutos 0:083111ae2a11 146 sConfig.Channel = ADC_CHANNEL_5;
saloutos 0:083111ae2a11 147 break;
saloutos 0:083111ae2a11 148 case 6:
saloutos 0:083111ae2a11 149 sConfig.Channel = ADC_CHANNEL_6;
saloutos 0:083111ae2a11 150 break;
saloutos 0:083111ae2a11 151 case 7:
saloutos 0:083111ae2a11 152 sConfig.Channel = ADC_CHANNEL_7;
saloutos 0:083111ae2a11 153 break;
saloutos 0:083111ae2a11 154 case 8:
saloutos 0:083111ae2a11 155 sConfig.Channel = ADC_CHANNEL_8;
saloutos 0:083111ae2a11 156 break;
saloutos 0:083111ae2a11 157 case 9:
saloutos 0:083111ae2a11 158 sConfig.Channel = ADC_CHANNEL_9;
saloutos 0:083111ae2a11 159 break;
saloutos 0:083111ae2a11 160 case 10:
saloutos 0:083111ae2a11 161 sConfig.Channel = ADC_CHANNEL_10;
saloutos 0:083111ae2a11 162 break;
saloutos 0:083111ae2a11 163 case 11:
saloutos 0:083111ae2a11 164 sConfig.Channel = ADC_CHANNEL_11;
saloutos 0:083111ae2a11 165 break;
saloutos 0:083111ae2a11 166 case 12:
saloutos 0:083111ae2a11 167 sConfig.Channel = ADC_CHANNEL_12;
saloutos 0:083111ae2a11 168 break;
saloutos 0:083111ae2a11 169 case 13:
saloutos 0:083111ae2a11 170 sConfig.Channel = ADC_CHANNEL_13;
saloutos 0:083111ae2a11 171 break;
saloutos 0:083111ae2a11 172 case 14:
saloutos 0:083111ae2a11 173 sConfig.Channel = ADC_CHANNEL_14;
saloutos 0:083111ae2a11 174 break;
saloutos 0:083111ae2a11 175 case 15:
saloutos 0:083111ae2a11 176 sConfig.Channel = ADC_CHANNEL_15;
saloutos 0:083111ae2a11 177 break;
saloutos 0:083111ae2a11 178 case 16:
saloutos 0:083111ae2a11 179 sConfig.Channel = ADC_CHANNEL_TEMPSENSOR;
saloutos 0:083111ae2a11 180 break;
saloutos 0:083111ae2a11 181 case 17:
saloutos 0:083111ae2a11 182 sConfig.Channel = ADC_CHANNEL_VREFINT;
saloutos 0:083111ae2a11 183 /* From experiment, measurement needs max sampling time to be valid */
saloutos 0:083111ae2a11 184 sConfig.SamplingTime = ADC_SAMPLETIME_480CYCLES;
saloutos 0:083111ae2a11 185 break;
saloutos 0:083111ae2a11 186 case 18:
saloutos 0:083111ae2a11 187 sConfig.Channel = ADC_CHANNEL_VBAT;
saloutos 0:083111ae2a11 188 /* From experiment, measurement needs max sampling time to be valid */
saloutos 0:083111ae2a11 189 sConfig.SamplingTime = ADC_SAMPLETIME_480CYCLES;
saloutos 0:083111ae2a11 190 break;
saloutos 0:083111ae2a11 191 default:
saloutos 0:083111ae2a11 192 return 0;
saloutos 0:083111ae2a11 193 }
saloutos 0:083111ae2a11 194
saloutos 0:083111ae2a11 195 // Measuring VBAT sets the ADC_CCR_VBATE bit in ADC->CCR, and there is not
saloutos 0:083111ae2a11 196 // possibility with the ST HAL driver to clear it. If it isn't cleared,
saloutos 0:083111ae2a11 197 // VBAT remains connected to the ADC channel in preference to temperature,
saloutos 0:083111ae2a11 198 // so VBAT readings are returned in place of temperature.
saloutos 0:083111ae2a11 199 ADC->CCR &= ~(ADC_CCR_VBATE | ADC_CCR_TSVREFE);
saloutos 0:083111ae2a11 200
saloutos 0:083111ae2a11 201 HAL_ADC_ConfigChannel(&obj->handle, &sConfig);
saloutos 0:083111ae2a11 202
saloutos 0:083111ae2a11 203 HAL_ADC_Start(&obj->handle); // Start conversion
saloutos 0:083111ae2a11 204
saloutos 0:083111ae2a11 205 // Wait end of conversion and get value
saloutos 0:083111ae2a11 206 if (HAL_ADC_PollForConversion(&obj->handle, 10) == HAL_OK) {
saloutos 0:083111ae2a11 207 return (uint16_t)HAL_ADC_GetValue(&obj->handle);
saloutos 0:083111ae2a11 208 } else {
saloutos 0:083111ae2a11 209 return 0;
saloutos 0:083111ae2a11 210 }
saloutos 0:083111ae2a11 211 }
saloutos 0:083111ae2a11 212
saloutos 0:083111ae2a11 213 uint16_t analogin_read_u16(analogin_t *obj)
saloutos 0:083111ae2a11 214 {
saloutos 0:083111ae2a11 215 uint16_t value = adc_read(obj);
saloutos 0:083111ae2a11 216 // 12-bit to 16-bit conversion
saloutos 0:083111ae2a11 217 value = ((value << 4) & (uint16_t)0xFFF0) | ((value >> 8) & (uint16_t)0x000F);
saloutos 0:083111ae2a11 218 return value;
saloutos 0:083111ae2a11 219 }
saloutos 0:083111ae2a11 220
saloutos 0:083111ae2a11 221 float analogin_read(analogin_t *obj)
saloutos 0:083111ae2a11 222 {
saloutos 0:083111ae2a11 223 uint16_t value = adc_read(obj);
saloutos 0:083111ae2a11 224 return (float)value * (1.0f / (float)0xFFF); // 12 bits range
saloutos 0:083111ae2a11 225 }
saloutos 0:083111ae2a11 226
saloutos 0:083111ae2a11 227 #endif