mbed-os

Fork of mbed-os by erkin yucel

Committer:
elessair
Date:
Sun Oct 23 15:10:02 2016 +0000
Revision:
0:f269e3021894
Initial commit

Who changed what in which revision?

UserRevisionLine numberNew contents of line
elessair 0:f269e3021894 1 /* mbed Microcontroller Library
elessair 0:f269e3021894 2 * Copyright (c) 2016, STMicroelectronics
elessair 0:f269e3021894 3 * All rights reserved.
elessair 0:f269e3021894 4 *
elessair 0:f269e3021894 5 * Redistribution and use in source and binary forms, with or without
elessair 0:f269e3021894 6 * modification, are permitted provided that the following conditions are met:
elessair 0:f269e3021894 7 *
elessair 0:f269e3021894 8 * 1. Redistributions of source code must retain the above copyright notice,
elessair 0:f269e3021894 9 * this list of conditions and the following disclaimer.
elessair 0:f269e3021894 10 * 2. Redistributions in binary form must reproduce the above copyright notice,
elessair 0:f269e3021894 11 * this list of conditions and the following disclaimer in the documentation
elessair 0:f269e3021894 12 * and/or other materials provided with the distribution.
elessair 0:f269e3021894 13 * 3. Neither the name of STMicroelectronics nor the names of its contributors
elessair 0:f269e3021894 14 * may be used to endorse or promote products derived from this software
elessair 0:f269e3021894 15 * without specific prior written permission.
elessair 0:f269e3021894 16 *
elessair 0:f269e3021894 17 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
elessair 0:f269e3021894 18 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
elessair 0:f269e3021894 19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
elessair 0:f269e3021894 20 * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
elessair 0:f269e3021894 21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
elessair 0:f269e3021894 22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
elessair 0:f269e3021894 23 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
elessair 0:f269e3021894 24 * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
elessair 0:f269e3021894 25 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
elessair 0:f269e3021894 26 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
elessair 0:f269e3021894 27 */
elessair 0:f269e3021894 28 #include "mbed_assert.h"
elessair 0:f269e3021894 29 #include "analogin_api.h"
elessair 0:f269e3021894 30
elessair 0:f269e3021894 31 #if DEVICE_ANALOGIN
elessair 0:f269e3021894 32
elessair 0:f269e3021894 33 #include "wait_api.h"
elessair 0:f269e3021894 34 #include "cmsis.h"
elessair 0:f269e3021894 35 #include "pinmap.h"
elessair 0:f269e3021894 36 #include "mbed_error.h"
elessair 0:f269e3021894 37 #include "PeripheralPins.h"
elessair 0:f269e3021894 38
elessair 0:f269e3021894 39 ADC_HandleTypeDef AdcHandle;
elessair 0:f269e3021894 40
elessair 0:f269e3021894 41 int adc_inited = 0;
elessair 0:f269e3021894 42
elessair 0:f269e3021894 43 void analogin_init(analogin_t *obj, PinName pin)
elessair 0:f269e3021894 44 {
elessair 0:f269e3021894 45 RCC_OscInitTypeDef RCC_OscInitStruct;
elessair 0:f269e3021894 46
elessair 0:f269e3021894 47 // Get the peripheral name from the pin and assign it to the object
elessair 0:f269e3021894 48 obj->adc = (ADCName)pinmap_peripheral(pin, PinMap_ADC);
elessair 0:f269e3021894 49 MBED_ASSERT(obj->adc != (ADCName)NC);
elessair 0:f269e3021894 50
elessair 0:f269e3021894 51 // Get the pin function and assign the used channel to the object
elessair 0:f269e3021894 52 uint32_t function = pinmap_function(pin, PinMap_ADC);
elessair 0:f269e3021894 53 MBED_ASSERT(function != (uint32_t)NC);
elessair 0:f269e3021894 54 obj->channel = STM_PIN_CHANNEL(function);
elessair 0:f269e3021894 55
elessair 0:f269e3021894 56 // Configure GPIO excepted for internal channels (Temperature, Vref, Vbat, ...)
elessair 0:f269e3021894 57 // ADC Internal Channels "pins" are described in PinNames.h and must have a value >= 0xF0
elessair 0:f269e3021894 58 if (pin < 0xF0) {
elessair 0:f269e3021894 59 pinmap_pinout(pin, PinMap_ADC);
elessair 0:f269e3021894 60 }
elessair 0:f269e3021894 61
elessair 0:f269e3021894 62 // Save pin number for the read function
elessair 0:f269e3021894 63 obj->pin = pin;
elessair 0:f269e3021894 64
elessair 0:f269e3021894 65 // The ADC initialization is done once
elessair 0:f269e3021894 66 if (adc_inited == 0) {
elessair 0:f269e3021894 67 adc_inited = 1;
elessair 0:f269e3021894 68
elessair 0:f269e3021894 69 // Enable the HSI (to clock the ADC)
elessair 0:f269e3021894 70 RCC_OscInitStruct.OscillatorType = RCC_OSCILLATORTYPE_HSI;
elessair 0:f269e3021894 71 RCC_OscInitStruct.HSIState = RCC_HSI_ON;
elessair 0:f269e3021894 72 RCC_OscInitStruct.PLL.PLLState = RCC_PLL_NONE;
elessair 0:f269e3021894 73 HAL_RCC_OscConfig(&RCC_OscInitStruct);
elessair 0:f269e3021894 74
elessair 0:f269e3021894 75 AdcHandle.Instance = (ADC_TypeDef *)(obj->adc);
elessair 0:f269e3021894 76
elessair 0:f269e3021894 77 // Enable ADC clock
elessair 0:f269e3021894 78 __ADC1_CLK_ENABLE();
elessair 0:f269e3021894 79
elessair 0:f269e3021894 80 // Configure ADC
elessair 0:f269e3021894 81 AdcHandle.Init.ClockPrescaler = ADC_CLOCK_ASYNC_DIV4;
elessair 0:f269e3021894 82 AdcHandle.Init.Resolution = ADC_RESOLUTION12b;
elessair 0:f269e3021894 83 AdcHandle.Init.DataAlign = ADC_DATAALIGN_RIGHT;
elessair 0:f269e3021894 84 AdcHandle.Init.ScanConvMode = DISABLE; // Sequencer disabled (ADC conversion on only 1 channel: channel set on rank 1)
elessair 0:f269e3021894 85 AdcHandle.Init.EOCSelection = EOC_SINGLE_CONV; // On STM32L1xx ADC, overrun detection is enabled only if EOC selection is set to each conversion (or transfer by DMA enabled, this is not the case in this example).
elessair 0:f269e3021894 86 AdcHandle.Init.LowPowerAutoWait = ADC_AUTOWAIT_UNTIL_DATA_READ; // Enable the dynamic low power Auto Delay: new conversion start only when the previous conversion (for regular group) or previous sequence (for injected group) has been treated by user software.
elessair 0:f269e3021894 87 AdcHandle.Init.LowPowerAutoPowerOff = ADC_AUTOPOWEROFF_IDLE_PHASE; // Enable the auto-off mode: the ADC automatically powers-off after a conversion and automatically wakes-up when a new conversion is triggered (with startup time between trigger and start of sampling).
elessair 0:f269e3021894 88 AdcHandle.Init.ChannelsBank = ADC_CHANNELS_BANK_A;
elessair 0:f269e3021894 89 AdcHandle.Init.ContinuousConvMode = DISABLE; // Continuous mode disabled to have only 1 conversion at each conversion trig
elessair 0:f269e3021894 90 AdcHandle.Init.NbrOfConversion = 1; // Parameter discarded because sequencer is disabled
elessair 0:f269e3021894 91 AdcHandle.Init.DiscontinuousConvMode = DISABLE; // Parameter discarded because sequencer is disabled
elessair 0:f269e3021894 92 AdcHandle.Init.NbrOfDiscConversion = 1; // Parameter discarded because sequencer is disabled
elessair 0:f269e3021894 93 AdcHandle.Init.ExternalTrigConv = 0; // Not used
elessair 0:f269e3021894 94 AdcHandle.Init.ExternalTrigConvEdge = ADC_EXTERNALTRIGCONVEDGE_NONE;
elessair 0:f269e3021894 95 AdcHandle.Init.DMAContinuousRequests = DISABLE;
elessair 0:f269e3021894 96
elessair 0:f269e3021894 97 if (HAL_ADC_Init(&AdcHandle) != HAL_OK) {
elessair 0:f269e3021894 98 error("Cannot initialize ADC");
elessair 0:f269e3021894 99 }
elessair 0:f269e3021894 100 }
elessair 0:f269e3021894 101 }
elessair 0:f269e3021894 102
elessair 0:f269e3021894 103 static inline uint16_t adc_read(analogin_t *obj)
elessair 0:f269e3021894 104 {
elessair 0:f269e3021894 105 ADC_ChannelConfTypeDef sConfig = {0};
elessair 0:f269e3021894 106
elessair 0:f269e3021894 107 AdcHandle.Instance = (ADC_TypeDef *)(obj->adc);
elessair 0:f269e3021894 108
elessair 0:f269e3021894 109 // Configure ADC channel
elessair 0:f269e3021894 110 switch (obj->channel) {
elessair 0:f269e3021894 111 case 0:
elessair 0:f269e3021894 112 sConfig.Channel = ADC_CHANNEL_0;
elessair 0:f269e3021894 113 break;
elessair 0:f269e3021894 114 case 1:
elessair 0:f269e3021894 115 sConfig.Channel = ADC_CHANNEL_1;
elessair 0:f269e3021894 116 break;
elessair 0:f269e3021894 117 case 2:
elessair 0:f269e3021894 118 sConfig.Channel = ADC_CHANNEL_2;
elessair 0:f269e3021894 119 break;
elessair 0:f269e3021894 120 case 3:
elessair 0:f269e3021894 121 sConfig.Channel = ADC_CHANNEL_3;
elessair 0:f269e3021894 122 break;
elessair 0:f269e3021894 123 case 4:
elessair 0:f269e3021894 124 sConfig.Channel = ADC_CHANNEL_4;
elessair 0:f269e3021894 125 break;
elessair 0:f269e3021894 126 case 5:
elessair 0:f269e3021894 127 sConfig.Channel = ADC_CHANNEL_5;
elessair 0:f269e3021894 128 break;
elessair 0:f269e3021894 129 case 6:
elessair 0:f269e3021894 130 sConfig.Channel = ADC_CHANNEL_6;
elessair 0:f269e3021894 131 break;
elessair 0:f269e3021894 132 case 7:
elessair 0:f269e3021894 133 sConfig.Channel = ADC_CHANNEL_7;
elessair 0:f269e3021894 134 break;
elessair 0:f269e3021894 135 case 8:
elessair 0:f269e3021894 136 sConfig.Channel = ADC_CHANNEL_8;
elessair 0:f269e3021894 137 break;
elessair 0:f269e3021894 138 case 9:
elessair 0:f269e3021894 139 sConfig.Channel = ADC_CHANNEL_9;
elessair 0:f269e3021894 140 break;
elessair 0:f269e3021894 141 case 10:
elessair 0:f269e3021894 142 sConfig.Channel = ADC_CHANNEL_10;
elessair 0:f269e3021894 143 break;
elessair 0:f269e3021894 144 case 11:
elessair 0:f269e3021894 145 sConfig.Channel = ADC_CHANNEL_11;
elessair 0:f269e3021894 146 break;
elessair 0:f269e3021894 147 case 12:
elessair 0:f269e3021894 148 sConfig.Channel = ADC_CHANNEL_12;
elessair 0:f269e3021894 149 break;
elessair 0:f269e3021894 150 case 13:
elessair 0:f269e3021894 151 sConfig.Channel = ADC_CHANNEL_13;
elessair 0:f269e3021894 152 break;
elessair 0:f269e3021894 153 case 14:
elessair 0:f269e3021894 154 sConfig.Channel = ADC_CHANNEL_14;
elessair 0:f269e3021894 155 break;
elessair 0:f269e3021894 156 case 15:
elessair 0:f269e3021894 157 sConfig.Channel = ADC_CHANNEL_15;
elessair 0:f269e3021894 158 break;
elessair 0:f269e3021894 159 case 16:
elessair 0:f269e3021894 160 sConfig.Channel = ADC_CHANNEL_TEMPSENSOR;
elessair 0:f269e3021894 161 break;
elessair 0:f269e3021894 162 case 17:
elessair 0:f269e3021894 163 sConfig.Channel = ADC_CHANNEL_VREFINT;
elessair 0:f269e3021894 164 break;
elessair 0:f269e3021894 165 case 18:
elessair 0:f269e3021894 166 sConfig.Channel = ADC_CHANNEL_18;
elessair 0:f269e3021894 167 break;
elessair 0:f269e3021894 168 case 19:
elessair 0:f269e3021894 169 sConfig.Channel = ADC_CHANNEL_19;
elessair 0:f269e3021894 170 break;
elessair 0:f269e3021894 171 case 20:
elessair 0:f269e3021894 172 sConfig.Channel = ADC_CHANNEL_20;
elessair 0:f269e3021894 173 break;
elessair 0:f269e3021894 174 case 21:
elessair 0:f269e3021894 175 sConfig.Channel = ADC_CHANNEL_21;
elessair 0:f269e3021894 176 break;
elessair 0:f269e3021894 177 case 22:
elessair 0:f269e3021894 178 sConfig.Channel = ADC_CHANNEL_22;
elessair 0:f269e3021894 179 break;
elessair 0:f269e3021894 180 case 23:
elessair 0:f269e3021894 181 sConfig.Channel = ADC_CHANNEL_23;
elessair 0:f269e3021894 182 break;
elessair 0:f269e3021894 183 case 24:
elessair 0:f269e3021894 184 sConfig.Channel = ADC_CHANNEL_24;
elessair 0:f269e3021894 185 break;
elessair 0:f269e3021894 186 case 25:
elessair 0:f269e3021894 187 sConfig.Channel = ADC_CHANNEL_25;
elessair 0:f269e3021894 188 break;
elessair 0:f269e3021894 189 case 26:
elessair 0:f269e3021894 190 sConfig.Channel = ADC_CHANNEL_26;
elessair 0:f269e3021894 191 break;
elessair 0:f269e3021894 192 #ifdef ADC_CHANNEL_27
elessair 0:f269e3021894 193 case 27:
elessair 0:f269e3021894 194 sConfig.Channel = ADC_CHANNEL_27;
elessair 0:f269e3021894 195 break;
elessair 0:f269e3021894 196 #endif
elessair 0:f269e3021894 197 #ifdef ADC_CHANNEL_28
elessair 0:f269e3021894 198 case 28:
elessair 0:f269e3021894 199 sConfig.Channel = ADC_CHANNEL_28;
elessair 0:f269e3021894 200 break;
elessair 0:f269e3021894 201 #endif
elessair 0:f269e3021894 202 #ifdef ADC_CHANNEL_29
elessair 0:f269e3021894 203 case 29:
elessair 0:f269e3021894 204 sConfig.Channel = ADC_CHANNEL_29;
elessair 0:f269e3021894 205 break;
elessair 0:f269e3021894 206 #endif
elessair 0:f269e3021894 207 #ifdef ADC_CHANNEL_30
elessair 0:f269e3021894 208 case 30:
elessair 0:f269e3021894 209 sConfig.Channel = ADC_CHANNEL_30;
elessair 0:f269e3021894 210 break;
elessair 0:f269e3021894 211 #endif
elessair 0:f269e3021894 212 #ifdef ADC_CHANNEL_31
elessair 0:f269e3021894 213 case 31:
elessair 0:f269e3021894 214 sConfig.Channel = ADC_CHANNEL_31;
elessair 0:f269e3021894 215 break;
elessair 0:f269e3021894 216 #endif
elessair 0:f269e3021894 217 default:
elessair 0:f269e3021894 218 return 0;
elessair 0:f269e3021894 219 }
elessair 0:f269e3021894 220
elessair 0:f269e3021894 221 sConfig.Rank = ADC_REGULAR_RANK_1;
elessair 0:f269e3021894 222 sConfig.SamplingTime = ADC_SAMPLETIME_16CYCLES;
elessair 0:f269e3021894 223
elessair 0:f269e3021894 224 HAL_ADC_ConfigChannel(&AdcHandle, &sConfig);
elessair 0:f269e3021894 225
elessair 0:f269e3021894 226 HAL_ADC_Start(&AdcHandle); // Start conversion
elessair 0:f269e3021894 227
elessair 0:f269e3021894 228 // Wait end of conversion and get value
elessair 0:f269e3021894 229 if (HAL_ADC_PollForConversion(&AdcHandle, 10) == HAL_OK) {
elessair 0:f269e3021894 230 return (HAL_ADC_GetValue(&AdcHandle));
elessair 0:f269e3021894 231 } else {
elessair 0:f269e3021894 232 return 0;
elessair 0:f269e3021894 233 }
elessair 0:f269e3021894 234 }
elessair 0:f269e3021894 235
elessair 0:f269e3021894 236 uint16_t analogin_read_u16(analogin_t *obj)
elessair 0:f269e3021894 237 {
elessair 0:f269e3021894 238 uint16_t value = adc_read(obj);
elessair 0:f269e3021894 239 // 12-bit to 16-bit conversion
elessair 0:f269e3021894 240 value = ((value << 4) & (uint16_t)0xFFF0) | ((value >> 8) & (uint16_t)0x000F);
elessair 0:f269e3021894 241 return value;
elessair 0:f269e3021894 242 }
elessair 0:f269e3021894 243
elessair 0:f269e3021894 244 float analogin_read(analogin_t *obj)
elessair 0:f269e3021894 245 {
elessair 0:f269e3021894 246 uint16_t value = adc_read(obj);
elessair 0:f269e3021894 247 return (float)value * (1.0f / (float)0xFFF); // 12 bits range
elessair 0:f269e3021894 248 }
elessair 0:f269e3021894 249
elessair 0:f269e3021894 250 #endif