mbed os with nrf51 internal bandgap enabled to read battery level

Dependents:   BLE_file_test BLE_Blink ExternalEncoder

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 *******************************************************************************
elessair 0:f269e3021894 3 * Copyright (c) 2015, STMicroelectronics
elessair 0:f269e3021894 4 * All rights reserved.
elessair 0:f269e3021894 5 *
elessair 0:f269e3021894 6 * Redistribution and use in source and binary forms, with or without
elessair 0:f269e3021894 7 * modification, are permitted provided that the following conditions are met:
elessair 0:f269e3021894 8 *
elessair 0:f269e3021894 9 * 1. Redistributions of source code must retain the above copyright notice,
elessair 0:f269e3021894 10 * this list of conditions and the following disclaimer.
elessair 0:f269e3021894 11 * 2. Redistributions in binary form must reproduce the above copyright notice,
elessair 0:f269e3021894 12 * this list of conditions and the following disclaimer in the documentation
elessair 0:f269e3021894 13 * and/or other materials provided with the distribution.
elessair 0:f269e3021894 14 * 3. Neither the name of STMicroelectronics nor the names of its contributors
elessair 0:f269e3021894 15 * may be used to endorse or promote products derived from this software
elessair 0:f269e3021894 16 * without specific prior written permission.
elessair 0:f269e3021894 17 *
elessair 0:f269e3021894 18 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
elessair 0:f269e3021894 19 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
elessair 0:f269e3021894 20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
elessair 0:f269e3021894 21 * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
elessair 0:f269e3021894 22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
elessair 0:f269e3021894 23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
elessair 0:f269e3021894 24 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
elessair 0:f269e3021894 25 * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
elessair 0:f269e3021894 26 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
elessair 0:f269e3021894 27 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
elessair 0:f269e3021894 28 *******************************************************************************
elessair 0:f269e3021894 29 */
elessair 0:f269e3021894 30 #include "mbed_assert.h"
elessair 0:f269e3021894 31 #include "serial_api.h"
elessair 0:f269e3021894 32
elessair 0:f269e3021894 33 #if DEVICE_SERIAL
elessair 0:f269e3021894 34
elessair 0:f269e3021894 35 #include "cmsis.h"
elessair 0:f269e3021894 36 #include "pinmap.h"
elessair 0:f269e3021894 37 #include "mbed_error.h"
elessair 0:f269e3021894 38 #include <string.h>
elessair 0:f269e3021894 39 #include "PeripheralPins.h"
elessair 0:f269e3021894 40
elessair 0:f269e3021894 41 #define UART_NUM (6)
elessair 0:f269e3021894 42
elessair 0:f269e3021894 43 static uint32_t serial_irq_ids[UART_NUM] = {0};
elessair 0:f269e3021894 44 static UART_HandleTypeDef uart_handlers[UART_NUM];
elessair 0:f269e3021894 45
elessair 0:f269e3021894 46 static uart_irq_handler irq_handler;
elessair 0:f269e3021894 47
elessair 0:f269e3021894 48 int stdio_uart_inited = 0;
elessair 0:f269e3021894 49 serial_t stdio_uart;
elessair 0:f269e3021894 50
elessair 0:f269e3021894 51 #if DEVICE_SERIAL_ASYNCH
elessair 0:f269e3021894 52 #define SERIAL_S(obj) (&((obj)->serial))
elessair 0:f269e3021894 53 #else
elessair 0:f269e3021894 54 #define SERIAL_S(obj) (obj)
elessair 0:f269e3021894 55 #endif
elessair 0:f269e3021894 56
elessair 0:f269e3021894 57 static void init_uart(serial_t *obj)
elessair 0:f269e3021894 58 {
elessair 0:f269e3021894 59 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 60 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
elessair 0:f269e3021894 61 huart->Instance = (USART_TypeDef *)(obj_s->uart);
elessair 0:f269e3021894 62
elessair 0:f269e3021894 63 huart->Init.BaudRate = obj_s->baudrate;
elessair 0:f269e3021894 64 huart->Init.WordLength = obj_s->databits;
elessair 0:f269e3021894 65 huart->Init.StopBits = obj_s->stopbits;
elessair 0:f269e3021894 66 huart->Init.Parity = obj_s->parity;
elessair 0:f269e3021894 67 #if DEVICE_SERIAL_FC
elessair 0:f269e3021894 68 huart->Init.HwFlowCtl = obj_s->hw_flow_ctl;
elessair 0:f269e3021894 69 #else
elessair 0:f269e3021894 70 huart->Init.HwFlowCtl = UART_HWCONTROL_NONE;
elessair 0:f269e3021894 71 #endif
elessair 0:f269e3021894 72 huart->TxXferCount = 0;
elessair 0:f269e3021894 73 huart->TxXferSize = 0;
elessair 0:f269e3021894 74 huart->RxXferCount = 0;
elessair 0:f269e3021894 75 huart->RxXferSize = 0;
elessair 0:f269e3021894 76
elessair 0:f269e3021894 77 if (obj_s->pin_rx == NC) {
elessair 0:f269e3021894 78 huart->Init.Mode = UART_MODE_TX;
elessair 0:f269e3021894 79 } else if (obj_s->pin_tx == NC) {
elessair 0:f269e3021894 80 huart->Init.Mode = UART_MODE_RX;
elessair 0:f269e3021894 81 } else {
elessair 0:f269e3021894 82 huart->Init.Mode = UART_MODE_TX_RX;
elessair 0:f269e3021894 83 }
elessair 0:f269e3021894 84
elessair 0:f269e3021894 85 if (HAL_UART_Init(huart) != HAL_OK) {
elessair 0:f269e3021894 86 error("Cannot initialize UART\n");
elessair 0:f269e3021894 87 }
elessair 0:f269e3021894 88 }
elessair 0:f269e3021894 89
elessair 0:f269e3021894 90 void serial_init(serial_t *obj, PinName tx, PinName rx)
elessair 0:f269e3021894 91 {
elessair 0:f269e3021894 92 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 93
elessair 0:f269e3021894 94 // Determine the UART to use (UART_1, UART_2, ...)
elessair 0:f269e3021894 95 UARTName uart_tx = (UARTName)pinmap_peripheral(tx, PinMap_UART_TX);
elessair 0:f269e3021894 96 UARTName uart_rx = (UARTName)pinmap_peripheral(rx, PinMap_UART_RX);
elessair 0:f269e3021894 97
elessair 0:f269e3021894 98 // Get the peripheral name (UART_1, UART_2, ...) from the pin and assign it to the object
elessair 0:f269e3021894 99 obj_s->uart = (UARTName)pinmap_merge(uart_tx, uart_rx);
elessair 0:f269e3021894 100 MBED_ASSERT(obj_s->uart != (UARTName)NC);
elessair 0:f269e3021894 101
elessair 0:f269e3021894 102 // Enable USART clock
elessair 0:f269e3021894 103 if (obj_s->uart == UART_1) {
elessair 0:f269e3021894 104 __HAL_RCC_USART1_FORCE_RESET();
elessair 0:f269e3021894 105 __HAL_RCC_USART1_RELEASE_RESET();
elessair 0:f269e3021894 106 __HAL_RCC_USART1_CLK_ENABLE();
elessair 0:f269e3021894 107 obj_s->index = 0;
elessair 0:f269e3021894 108 }
elessair 0:f269e3021894 109 if (obj_s->uart == UART_2) {
elessair 0:f269e3021894 110 __HAL_RCC_USART2_FORCE_RESET();
elessair 0:f269e3021894 111 __HAL_RCC_USART2_RELEASE_RESET();
elessair 0:f269e3021894 112 __HAL_RCC_USART2_CLK_ENABLE();
elessair 0:f269e3021894 113 obj_s->index = 1;
elessair 0:f269e3021894 114 }
elessair 0:f269e3021894 115
elessair 0:f269e3021894 116 #if defined(USART3_BASE)
elessair 0:f269e3021894 117 if (obj_s->uart == UART_3) {
elessair 0:f269e3021894 118 __HAL_RCC_USART3_FORCE_RESET();
elessair 0:f269e3021894 119 __HAL_RCC_USART3_RELEASE_RESET();
elessair 0:f269e3021894 120 __HAL_RCC_USART3_CLK_ENABLE();
elessair 0:f269e3021894 121 obj_s->index = 2;
elessair 0:f269e3021894 122 }
elessair 0:f269e3021894 123 #endif
elessair 0:f269e3021894 124
elessair 0:f269e3021894 125 #if defined(UART4_BASE)
elessair 0:f269e3021894 126 if (obj_s->uart == UART_4) {
elessair 0:f269e3021894 127 __HAL_RCC_UART4_FORCE_RESET();
elessair 0:f269e3021894 128 __HAL_RCC_UART4_RELEASE_RESET();
elessair 0:f269e3021894 129 __HAL_RCC_UART4_CLK_ENABLE();
elessair 0:f269e3021894 130 obj_s->index = 3;
elessair 0:f269e3021894 131 }
elessair 0:f269e3021894 132 #endif
elessair 0:f269e3021894 133
elessair 0:f269e3021894 134 #if defined(UART5_BASE)
elessair 0:f269e3021894 135 if (obj_s->uart == UART_5) {
elessair 0:f269e3021894 136 __HAL_RCC_UART5_FORCE_RESET();
elessair 0:f269e3021894 137 __HAL_RCC_UART5_RELEASE_RESET();
elessair 0:f269e3021894 138 __HAL_RCC_UART5_CLK_ENABLE();
elessair 0:f269e3021894 139 obj_s->index = 4;
elessair 0:f269e3021894 140 }
elessair 0:f269e3021894 141 #endif
elessair 0:f269e3021894 142
elessair 0:f269e3021894 143 #if defined(LPUART1_BASE)
elessair 0:f269e3021894 144 if (obj_s->uart == LPUART_1) {
elessair 0:f269e3021894 145 __HAL_RCC_LPUART1_FORCE_RESET();
elessair 0:f269e3021894 146 __HAL_RCC_LPUART1_RELEASE_RESET();
elessair 0:f269e3021894 147 __HAL_RCC_LPUART1_CLK_ENABLE();
elessair 0:f269e3021894 148 obj_s->index = 5;
elessair 0:f269e3021894 149 }
elessair 0:f269e3021894 150 #endif
elessair 0:f269e3021894 151
elessair 0:f269e3021894 152 // Configure UART pins
elessair 0:f269e3021894 153 pinmap_pinout(tx, PinMap_UART_TX);
elessair 0:f269e3021894 154 pinmap_pinout(rx, PinMap_UART_RX);
elessair 0:f269e3021894 155
elessair 0:f269e3021894 156 if (tx != NC) {
elessair 0:f269e3021894 157 pin_mode(tx, PullUp);
elessair 0:f269e3021894 158 }
elessair 0:f269e3021894 159 if (rx != NC) {
elessair 0:f269e3021894 160 pin_mode(rx, PullUp);
elessair 0:f269e3021894 161 }
elessair 0:f269e3021894 162
elessair 0:f269e3021894 163 // Configure UART
elessair 0:f269e3021894 164 obj_s->baudrate = 9600;
elessair 0:f269e3021894 165 obj_s->databits = UART_WORDLENGTH_8B;
elessair 0:f269e3021894 166 obj_s->stopbits = UART_STOPBITS_1;
elessair 0:f269e3021894 167 obj_s->parity = UART_PARITY_NONE;
elessair 0:f269e3021894 168
elessair 0:f269e3021894 169 #if DEVICE_SERIAL_FC
elessair 0:f269e3021894 170 obj_s->hw_flow_ctl = UART_HWCONTROL_NONE;
elessair 0:f269e3021894 171 #endif
elessair 0:f269e3021894 172
elessair 0:f269e3021894 173 obj_s->pin_tx = tx;
elessair 0:f269e3021894 174 obj_s->pin_rx = rx;
elessair 0:f269e3021894 175
elessair 0:f269e3021894 176 init_uart(obj);
elessair 0:f269e3021894 177
elessair 0:f269e3021894 178 // For stdio management
elessair 0:f269e3021894 179 if (obj_s->uart == STDIO_UART) {
elessair 0:f269e3021894 180 stdio_uart_inited = 1;
elessair 0:f269e3021894 181 memcpy(&stdio_uart, obj, sizeof(serial_t));
elessair 0:f269e3021894 182 }
elessair 0:f269e3021894 183 }
elessair 0:f269e3021894 184
elessair 0:f269e3021894 185 void serial_free(serial_t *obj)
elessair 0:f269e3021894 186 {
elessair 0:f269e3021894 187 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 188
elessair 0:f269e3021894 189 // Reset UART and disable clock
elessair 0:f269e3021894 190 if (obj_s->uart == UART_1) {
elessair 0:f269e3021894 191 __HAL_RCC_USART1_FORCE_RESET();
elessair 0:f269e3021894 192 __HAL_RCC_USART1_RELEASE_RESET();
elessair 0:f269e3021894 193 __HAL_RCC_USART1_CLK_DISABLE();
elessair 0:f269e3021894 194 }
elessair 0:f269e3021894 195
elessair 0:f269e3021894 196 if (obj_s->uart == UART_2) {
elessair 0:f269e3021894 197 __HAL_RCC_USART2_FORCE_RESET();
elessair 0:f269e3021894 198 __HAL_RCC_USART2_RELEASE_RESET();
elessair 0:f269e3021894 199 __HAL_RCC_USART2_CLK_DISABLE();
elessair 0:f269e3021894 200 }
elessair 0:f269e3021894 201
elessair 0:f269e3021894 202 #if defined(USART3_BASE)
elessair 0:f269e3021894 203 if (obj_s->uart == UART_3) {
elessair 0:f269e3021894 204 __HAL_RCC_USART3_FORCE_RESET();
elessair 0:f269e3021894 205 __HAL_RCC_USART3_RELEASE_RESET();
elessair 0:f269e3021894 206 __HAL_RCC_USART3_CLK_DISABLE();
elessair 0:f269e3021894 207 }
elessair 0:f269e3021894 208 #endif
elessair 0:f269e3021894 209
elessair 0:f269e3021894 210 #if defined(UART4_BASE)
elessair 0:f269e3021894 211 if (obj_s->uart == UART_4) {
elessair 0:f269e3021894 212 __HAL_RCC_UART4_FORCE_RESET();
elessair 0:f269e3021894 213 __HAL_RCC_UART4_RELEASE_RESET();
elessair 0:f269e3021894 214 __HAL_RCC_UART4_CLK_DISABLE();
elessair 0:f269e3021894 215 }
elessair 0:f269e3021894 216 #endif
elessair 0:f269e3021894 217
elessair 0:f269e3021894 218 #if defined(UART5_BASE)
elessair 0:f269e3021894 219 if (obj_s->uart == UART_5) {
elessair 0:f269e3021894 220 __HAL_RCC_UART5_FORCE_RESET();
elessair 0:f269e3021894 221 __HAL_RCC_UART5_RELEASE_RESET();
elessair 0:f269e3021894 222 __HAL_RCC_UART5_CLK_DISABLE();
elessair 0:f269e3021894 223 }
elessair 0:f269e3021894 224 #endif
elessair 0:f269e3021894 225
elessair 0:f269e3021894 226 #if defined(LPUART1_BASE)
elessair 0:f269e3021894 227 if (obj_s->uart == LPUART_1) {
elessair 0:f269e3021894 228 __HAL_RCC_LPUART1_FORCE_RESET();
elessair 0:f269e3021894 229 __HAL_RCC_LPUART1_RELEASE_RESET();
elessair 0:f269e3021894 230 __HAL_RCC_LPUART1_CLK_DISABLE();
elessair 0:f269e3021894 231 }
elessair 0:f269e3021894 232 #endif
elessair 0:f269e3021894 233
elessair 0:f269e3021894 234 // Configure GPIOs
elessair 0:f269e3021894 235 pin_function(obj_s->pin_tx, STM_PIN_DATA(STM_MODE_INPUT, GPIO_NOPULL, 0));
elessair 0:f269e3021894 236 pin_function(obj_s->pin_rx, STM_PIN_DATA(STM_MODE_INPUT, GPIO_NOPULL, 0));
elessair 0:f269e3021894 237
elessair 0:f269e3021894 238 serial_irq_ids[obj_s->index] = 0;
elessair 0:f269e3021894 239 }
elessair 0:f269e3021894 240
elessair 0:f269e3021894 241 void serial_baud(serial_t *obj, int baudrate)
elessair 0:f269e3021894 242 {
elessair 0:f269e3021894 243 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 244
elessair 0:f269e3021894 245 obj_s->baudrate = baudrate;
elessair 0:f269e3021894 246 init_uart(obj);
elessair 0:f269e3021894 247 }
elessair 0:f269e3021894 248
elessair 0:f269e3021894 249 void serial_format(serial_t *obj, int data_bits, SerialParity parity, int stop_bits)
elessair 0:f269e3021894 250 {
elessair 0:f269e3021894 251 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 252
elessair 0:f269e3021894 253 if (data_bits == 9) {
elessair 0:f269e3021894 254 obj_s->databits = UART_WORDLENGTH_9B;
elessair 0:f269e3021894 255 } else {
elessair 0:f269e3021894 256 obj_s->databits = UART_WORDLENGTH_8B;
elessair 0:f269e3021894 257 }
elessair 0:f269e3021894 258
elessair 0:f269e3021894 259 switch (parity) {
elessair 0:f269e3021894 260 case ParityOdd:
elessair 0:f269e3021894 261 obj_s->parity = UART_PARITY_ODD;
elessair 0:f269e3021894 262 break;
elessair 0:f269e3021894 263 case ParityEven:
elessair 0:f269e3021894 264 obj_s->parity = UART_PARITY_EVEN;
elessair 0:f269e3021894 265 break;
elessair 0:f269e3021894 266 default: // ParityNone
elessair 0:f269e3021894 267 case ParityForced0: // unsupported!
elessair 0:f269e3021894 268 case ParityForced1: // unsupported!
elessair 0:f269e3021894 269 obj_s->parity = UART_PARITY_NONE;
elessair 0:f269e3021894 270 break;
elessair 0:f269e3021894 271 }
elessair 0:f269e3021894 272
elessair 0:f269e3021894 273 if (stop_bits == 2) {
elessair 0:f269e3021894 274 obj_s->stopbits = UART_STOPBITS_2;
elessair 0:f269e3021894 275 } else {
elessair 0:f269e3021894 276 obj_s->stopbits = UART_STOPBITS_1;
elessair 0:f269e3021894 277 }
elessair 0:f269e3021894 278
elessair 0:f269e3021894 279 init_uart(obj);
elessair 0:f269e3021894 280 }
elessair 0:f269e3021894 281
elessair 0:f269e3021894 282 /******************************************************************************
elessair 0:f269e3021894 283 * INTERRUPTS HANDLING
elessair 0:f269e3021894 284 ******************************************************************************/
elessair 0:f269e3021894 285
elessair 0:f269e3021894 286 static void uart_irq(int id)
elessair 0:f269e3021894 287 {
elessair 0:f269e3021894 288 UART_HandleTypeDef * huart = &uart_handlers[id];
elessair 0:f269e3021894 289
elessair 0:f269e3021894 290 if (serial_irq_ids[id] != 0) {
elessair 0:f269e3021894 291 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_TC) != RESET) {
elessair 0:f269e3021894 292 if (__HAL_UART_GET_IT_SOURCE(huart, UART_IT_TC) != RESET) {
elessair 0:f269e3021894 293 irq_handler(serial_irq_ids[id], TxIrq);
elessair 0:f269e3021894 294 __HAL_UART_CLEAR_FLAG(huart, UART_FLAG_TC);
elessair 0:f269e3021894 295 }
elessair 0:f269e3021894 296 }
elessair 0:f269e3021894 297 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_RXNE) != RESET) {
elessair 0:f269e3021894 298 if (__HAL_UART_GET_IT_SOURCE(huart, UART_IT_RXNE) != RESET) {
elessair 0:f269e3021894 299 irq_handler(serial_irq_ids[id], RxIrq);
elessair 0:f269e3021894 300 __HAL_UART_CLEAR_FLAG(huart, UART_FLAG_RXNE);
elessair 0:f269e3021894 301 }
elessair 0:f269e3021894 302 }
elessair 0:f269e3021894 303 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_ORE) != RESET) {
elessair 0:f269e3021894 304 if (__HAL_UART_GET_IT_SOURCE(huart, UART_IT_ERR) != RESET) {
elessair 0:f269e3021894 305 volatile uint32_t tmpval = huart->Instance->RDR; // Clear ORE flag
elessair 0:f269e3021894 306 }
elessair 0:f269e3021894 307 }
elessair 0:f269e3021894 308 }
elessair 0:f269e3021894 309 }
elessair 0:f269e3021894 310
elessair 0:f269e3021894 311 static void uart1_irq(void)
elessair 0:f269e3021894 312 {
elessair 0:f269e3021894 313 uart_irq(0);
elessair 0:f269e3021894 314 }
elessair 0:f269e3021894 315
elessair 0:f269e3021894 316 static void uart2_irq(void)
elessair 0:f269e3021894 317 {
elessair 0:f269e3021894 318 uart_irq(1);
elessair 0:f269e3021894 319 }
elessair 0:f269e3021894 320
elessair 0:f269e3021894 321 #if defined(USART3_BASE)
elessair 0:f269e3021894 322 static void uart3_irq(void)
elessair 0:f269e3021894 323 {
elessair 0:f269e3021894 324 uart_irq(2);
elessair 0:f269e3021894 325 }
elessair 0:f269e3021894 326 #endif
elessair 0:f269e3021894 327
elessair 0:f269e3021894 328 #if defined(UART4_BASE)
elessair 0:f269e3021894 329 static void uart4_irq(void)
elessair 0:f269e3021894 330 {
elessair 0:f269e3021894 331 uart_irq(3);
elessair 0:f269e3021894 332 }
elessair 0:f269e3021894 333 #endif
elessair 0:f269e3021894 334
elessair 0:f269e3021894 335 #if defined(UART5_BASE)
elessair 0:f269e3021894 336 static void uart5_irq(void)
elessair 0:f269e3021894 337 {
elessair 0:f269e3021894 338 uart_irq(4);
elessair 0:f269e3021894 339 }
elessair 0:f269e3021894 340 #endif
elessair 0:f269e3021894 341
elessair 0:f269e3021894 342 #if defined(LPUART1_BASE)
elessair 0:f269e3021894 343 static void lpuart1_irq(void)
elessair 0:f269e3021894 344 {
elessair 0:f269e3021894 345 uart_irq(5);
elessair 0:f269e3021894 346 }
elessair 0:f269e3021894 347 #endif
elessair 0:f269e3021894 348
elessair 0:f269e3021894 349 void serial_irq_handler(serial_t *obj, uart_irq_handler handler, uint32_t id)
elessair 0:f269e3021894 350 {
elessair 0:f269e3021894 351 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 352
elessair 0:f269e3021894 353 irq_handler = handler;
elessair 0:f269e3021894 354 serial_irq_ids[obj_s->index] = id;
elessair 0:f269e3021894 355 }
elessair 0:f269e3021894 356
elessair 0:f269e3021894 357 void serial_irq_set(serial_t *obj, SerialIrq irq, uint32_t enable)
elessair 0:f269e3021894 358 {
elessair 0:f269e3021894 359 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 360 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
elessair 0:f269e3021894 361 IRQn_Type irq_n = (IRQn_Type)0;
elessair 0:f269e3021894 362 uint32_t vector = 0;
elessair 0:f269e3021894 363
elessair 0:f269e3021894 364 if (obj_s->uart == UART_1) {
elessair 0:f269e3021894 365 irq_n = USART1_IRQn;
elessair 0:f269e3021894 366 vector = (uint32_t)&uart1_irq;
elessair 0:f269e3021894 367 }
elessair 0:f269e3021894 368
elessair 0:f269e3021894 369 if (obj_s->uart == UART_2) {
elessair 0:f269e3021894 370 irq_n = USART2_IRQn;
elessair 0:f269e3021894 371 vector = (uint32_t)&uart2_irq;
elessair 0:f269e3021894 372 }
elessair 0:f269e3021894 373 #if defined(USART3_BASE)
elessair 0:f269e3021894 374 if (obj_s->uart == UART_3) {
elessair 0:f269e3021894 375 irq_n = USART3_IRQn;
elessair 0:f269e3021894 376 vector = (uint32_t)&uart3_irq;
elessair 0:f269e3021894 377 }
elessair 0:f269e3021894 378 #endif
elessair 0:f269e3021894 379 #if defined(UART4_BASE)
elessair 0:f269e3021894 380 if (obj_s->uart == UART_4) {
elessair 0:f269e3021894 381 irq_n = UART4_IRQn;
elessair 0:f269e3021894 382 vector = (uint32_t)&uart4_irq;
elessair 0:f269e3021894 383 }
elessair 0:f269e3021894 384 #endif
elessair 0:f269e3021894 385
elessair 0:f269e3021894 386 #if defined(UART5_BASE)
elessair 0:f269e3021894 387 if (obj_s->uart == UART_5) {
elessair 0:f269e3021894 388 irq_n = UART5_IRQn;
elessair 0:f269e3021894 389 vector = (uint32_t)&uart5_irq;
elessair 0:f269e3021894 390 }
elessair 0:f269e3021894 391 #endif
elessair 0:f269e3021894 392
elessair 0:f269e3021894 393 #if defined(LPUART1_BASE)
elessair 0:f269e3021894 394 if (obj_s->uart == LPUART_1) {
elessair 0:f269e3021894 395 irq_n = LPUART1_IRQn;
elessair 0:f269e3021894 396 vector = (uint32_t)&lpuart1_irq;
elessair 0:f269e3021894 397 }
elessair 0:f269e3021894 398 #endif
elessair 0:f269e3021894 399
elessair 0:f269e3021894 400 if (enable) {
elessair 0:f269e3021894 401 if (irq == RxIrq) {
elessair 0:f269e3021894 402 __HAL_UART_ENABLE_IT(huart, UART_IT_RXNE);
elessair 0:f269e3021894 403 } else { // TxIrq
elessair 0:f269e3021894 404 __HAL_UART_ENABLE_IT(huart, UART_IT_TC);
elessair 0:f269e3021894 405 }
elessair 0:f269e3021894 406 NVIC_SetVector(irq_n, vector);
elessair 0:f269e3021894 407 NVIC_EnableIRQ(irq_n);
elessair 0:f269e3021894 408
elessair 0:f269e3021894 409 } else { // disable
elessair 0:f269e3021894 410 int all_disabled = 0;
elessair 0:f269e3021894 411 if (irq == RxIrq) {
elessair 0:f269e3021894 412 __HAL_UART_DISABLE_IT(huart, UART_IT_RXNE);
elessair 0:f269e3021894 413 // Check if TxIrq is disabled too
elessair 0:f269e3021894 414 if ((huart->Instance->CR1 & USART_CR1_TXEIE) == 0) {
elessair 0:f269e3021894 415 all_disabled = 1;
elessair 0:f269e3021894 416 }
elessair 0:f269e3021894 417 } else { // TxIrq
elessair 0:f269e3021894 418 __HAL_UART_DISABLE_IT(huart, UART_IT_TC);
elessair 0:f269e3021894 419 // Check if RxIrq is disabled too
elessair 0:f269e3021894 420 if ((huart->Instance->CR1 & USART_CR1_RXNEIE) == 0) {
elessair 0:f269e3021894 421 all_disabled = 1;
elessair 0:f269e3021894 422 }
elessair 0:f269e3021894 423 }
elessair 0:f269e3021894 424
elessair 0:f269e3021894 425 if (all_disabled) {
elessair 0:f269e3021894 426 NVIC_DisableIRQ(irq_n);
elessair 0:f269e3021894 427 }
elessair 0:f269e3021894 428 }
elessair 0:f269e3021894 429 }
elessair 0:f269e3021894 430
elessair 0:f269e3021894 431 /******************************************************************************
elessair 0:f269e3021894 432 * READ/WRITE
elessair 0:f269e3021894 433 ******************************************************************************/
elessair 0:f269e3021894 434
elessair 0:f269e3021894 435 int serial_getc(serial_t *obj)
elessair 0:f269e3021894 436 {
elessair 0:f269e3021894 437 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 438 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
elessair 0:f269e3021894 439
elessair 0:f269e3021894 440 while (!serial_readable(obj));
elessair 0:f269e3021894 441 if (obj_s->databits == UART_WORDLENGTH_8B) {
elessair 0:f269e3021894 442 return (int)(huart->Instance->RDR & (uint8_t)0xFF);
elessair 0:f269e3021894 443 } else {
elessair 0:f269e3021894 444 return (int)(huart->Instance->RDR & (uint16_t)0x1FF);
elessair 0:f269e3021894 445 }
elessair 0:f269e3021894 446 }
elessair 0:f269e3021894 447
elessair 0:f269e3021894 448 void serial_putc(serial_t *obj, int c)
elessair 0:f269e3021894 449 {
elessair 0:f269e3021894 450 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 451 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
elessair 0:f269e3021894 452
elessair 0:f269e3021894 453 while (!serial_writable(obj));
elessair 0:f269e3021894 454 if (obj_s->databits == UART_WORDLENGTH_8B) {
elessair 0:f269e3021894 455 huart->Instance->TDR = (uint8_t)(c & (uint8_t)0xFF);
elessair 0:f269e3021894 456 } else {
elessair 0:f269e3021894 457 huart->Instance->TDR = (uint16_t)(c & (uint16_t)0x1FF);
elessair 0:f269e3021894 458 }
elessair 0:f269e3021894 459 }
elessair 0:f269e3021894 460
elessair 0:f269e3021894 461 int serial_readable(serial_t *obj)
elessair 0:f269e3021894 462 {
elessair 0:f269e3021894 463 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 464 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
elessair 0:f269e3021894 465
elessair 0:f269e3021894 466 // Check if data is received
elessair 0:f269e3021894 467 return (__HAL_UART_GET_FLAG(huart, UART_FLAG_RXNE) != RESET) ? 1 : 0;
elessair 0:f269e3021894 468 }
elessair 0:f269e3021894 469
elessair 0:f269e3021894 470 int serial_writable(serial_t *obj)
elessair 0:f269e3021894 471 {
elessair 0:f269e3021894 472 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 473 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
elessair 0:f269e3021894 474
elessair 0:f269e3021894 475 // Check if data is transmitted
elessair 0:f269e3021894 476 return (__HAL_UART_GET_FLAG(huart, UART_FLAG_TXE) != RESET) ? 1 : 0;
elessair 0:f269e3021894 477 }
elessair 0:f269e3021894 478
elessair 0:f269e3021894 479 void serial_clear(serial_t *obj)
elessair 0:f269e3021894 480 {
elessair 0:f269e3021894 481 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 482 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
elessair 0:f269e3021894 483
elessair 0:f269e3021894 484 huart->TxXferCount = 0;
elessair 0:f269e3021894 485 huart->RxXferCount = 0;
elessair 0:f269e3021894 486 }
elessair 0:f269e3021894 487
elessair 0:f269e3021894 488 void serial_pinout_tx(PinName tx)
elessair 0:f269e3021894 489 {
elessair 0:f269e3021894 490 pinmap_pinout(tx, PinMap_UART_TX);
elessair 0:f269e3021894 491 }
elessair 0:f269e3021894 492
elessair 0:f269e3021894 493 void serial_break_set(serial_t *obj)
elessair 0:f269e3021894 494 {
elessair 0:f269e3021894 495 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 496 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
elessair 0:f269e3021894 497
elessair 0:f269e3021894 498 HAL_LIN_SendBreak(huart);
elessair 0:f269e3021894 499 }
elessair 0:f269e3021894 500
elessair 0:f269e3021894 501 void serial_break_clear(serial_t *obj)
elessair 0:f269e3021894 502 {
elessair 0:f269e3021894 503 (void)obj;
elessair 0:f269e3021894 504 }
elessair 0:f269e3021894 505
elessair 0:f269e3021894 506 #if DEVICE_SERIAL_ASYNCH
elessair 0:f269e3021894 507
elessair 0:f269e3021894 508 /******************************************************************************
elessair 0:f269e3021894 509 * LOCAL HELPER FUNCTIONS
elessair 0:f269e3021894 510 ******************************************************************************/
elessair 0:f269e3021894 511
elessair 0:f269e3021894 512 /**
elessair 0:f269e3021894 513 * Configure the TX buffer for an asynchronous write serial transaction
elessair 0:f269e3021894 514 *
elessair 0:f269e3021894 515 * @param obj The serial object.
elessair 0:f269e3021894 516 * @param tx The buffer for sending.
elessair 0:f269e3021894 517 * @param tx_length The number of words to transmit.
elessair 0:f269e3021894 518 */
elessair 0:f269e3021894 519 static void serial_tx_buffer_set(serial_t *obj, void *tx, int tx_length, uint8_t width)
elessair 0:f269e3021894 520 {
elessair 0:f269e3021894 521 (void)width;
elessair 0:f269e3021894 522
elessair 0:f269e3021894 523 // Exit if a transmit is already on-going
elessair 0:f269e3021894 524 if (serial_tx_active(obj)) {
elessair 0:f269e3021894 525 return;
elessair 0:f269e3021894 526 }
elessair 0:f269e3021894 527
elessair 0:f269e3021894 528 obj->tx_buff.buffer = tx;
elessair 0:f269e3021894 529 obj->tx_buff.length = tx_length;
elessair 0:f269e3021894 530 obj->tx_buff.pos = 0;
elessair 0:f269e3021894 531 }
elessair 0:f269e3021894 532
elessair 0:f269e3021894 533 /**
elessair 0:f269e3021894 534 * Configure the RX buffer for an asynchronous write serial transaction
elessair 0:f269e3021894 535 *
elessair 0:f269e3021894 536 * @param obj The serial object.
elessair 0:f269e3021894 537 * @param tx The buffer for sending.
elessair 0:f269e3021894 538 * @param tx_length The number of words to transmit.
elessair 0:f269e3021894 539 */
elessair 0:f269e3021894 540 static void serial_rx_buffer_set(serial_t *obj, void *rx, int rx_length, uint8_t width)
elessair 0:f269e3021894 541 {
elessair 0:f269e3021894 542 (void)width;
elessair 0:f269e3021894 543
elessair 0:f269e3021894 544 // Exit if a reception is already on-going
elessair 0:f269e3021894 545 if (serial_rx_active(obj)) {
elessair 0:f269e3021894 546 return;
elessair 0:f269e3021894 547 }
elessair 0:f269e3021894 548
elessair 0:f269e3021894 549 obj->rx_buff.buffer = rx;
elessair 0:f269e3021894 550 obj->rx_buff.length = rx_length;
elessair 0:f269e3021894 551 obj->rx_buff.pos = 0;
elessair 0:f269e3021894 552 }
elessair 0:f269e3021894 553
elessair 0:f269e3021894 554 /**
elessair 0:f269e3021894 555 * Configure events
elessair 0:f269e3021894 556 *
elessair 0:f269e3021894 557 * @param obj The serial object
elessair 0:f269e3021894 558 * @param event The logical OR of the events to configure
elessair 0:f269e3021894 559 * @param enable Set to non-zero to enable events, or zero to disable them
elessair 0:f269e3021894 560 */
elessair 0:f269e3021894 561 static void serial_enable_event(serial_t *obj, int event, uint8_t enable)
elessair 0:f269e3021894 562 {
elessair 0:f269e3021894 563 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 564
elessair 0:f269e3021894 565 // Shouldn't have to enable interrupt here, just need to keep track of the requested events.
elessair 0:f269e3021894 566 if (enable) {
elessair 0:f269e3021894 567 obj_s->events |= event;
elessair 0:f269e3021894 568 } else {
elessair 0:f269e3021894 569 obj_s->events &= ~event;
elessair 0:f269e3021894 570 }
elessair 0:f269e3021894 571 }
elessair 0:f269e3021894 572
elessair 0:f269e3021894 573
elessair 0:f269e3021894 574 /**
elessair 0:f269e3021894 575 * Get index of serial object TX IRQ, relating it to the physical peripheral.
elessair 0:f269e3021894 576 *
elessair 0:f269e3021894 577 * @param obj pointer to serial object
elessair 0:f269e3021894 578 * @return internal NVIC TX IRQ index of U(S)ART peripheral
elessair 0:f269e3021894 579 */
elessair 0:f269e3021894 580 static IRQn_Type serial_get_irq_n(serial_t *obj)
elessair 0:f269e3021894 581 {
elessair 0:f269e3021894 582 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 583 IRQn_Type irq_n;
elessair 0:f269e3021894 584
elessair 0:f269e3021894 585 switch (obj_s->index) {
elessair 0:f269e3021894 586 case 0:
elessair 0:f269e3021894 587 irq_n = USART1_IRQn;
elessair 0:f269e3021894 588 break;
elessair 0:f269e3021894 589
elessair 0:f269e3021894 590 case 1:
elessair 0:f269e3021894 591 irq_n = USART2_IRQn;
elessair 0:f269e3021894 592 break;
elessair 0:f269e3021894 593
elessair 0:f269e3021894 594 case 2:
elessair 0:f269e3021894 595 irq_n = USART3_IRQn;
elessair 0:f269e3021894 596 break;
elessair 0:f269e3021894 597 #if defined(UART4_BASE)
elessair 0:f269e3021894 598 case 3:
elessair 0:f269e3021894 599 irq_n = UART4_IRQn;
elessair 0:f269e3021894 600 break;
elessair 0:f269e3021894 601 #endif
elessair 0:f269e3021894 602 #if defined(UART5_BASE)
elessair 0:f269e3021894 603 case 4:
elessair 0:f269e3021894 604 irq_n = UART5_IRQn;
elessair 0:f269e3021894 605 break;
elessair 0:f269e3021894 606 #endif
elessair 0:f269e3021894 607 #if defined(LPUART1_BASE)
elessair 0:f269e3021894 608 case 5:
elessair 0:f269e3021894 609 irq_n = LPUART1_IRQn;
elessair 0:f269e3021894 610 break;
elessair 0:f269e3021894 611 #endif
elessair 0:f269e3021894 612
elessair 0:f269e3021894 613 default:
elessair 0:f269e3021894 614 irq_n = (IRQn_Type)0;
elessair 0:f269e3021894 615 }
elessair 0:f269e3021894 616
elessair 0:f269e3021894 617 return irq_n;
elessair 0:f269e3021894 618 }
elessair 0:f269e3021894 619
elessair 0:f269e3021894 620 /******************************************************************************
elessair 0:f269e3021894 621 * MBED API FUNCTIONS
elessair 0:f269e3021894 622 ******************************************************************************/
elessair 0:f269e3021894 623
elessair 0:f269e3021894 624 /**
elessair 0:f269e3021894 625 * Begin asynchronous TX transfer. The used buffer is specified in the serial
elessair 0:f269e3021894 626 * object, tx_buff
elessair 0:f269e3021894 627 *
elessair 0:f269e3021894 628 * @param obj The serial object
elessair 0:f269e3021894 629 * @param tx The buffer for sending
elessair 0:f269e3021894 630 * @param tx_length The number of words to transmit
elessair 0:f269e3021894 631 * @param tx_width The bit width of buffer word
elessair 0:f269e3021894 632 * @param handler The serial handler
elessair 0:f269e3021894 633 * @param event The logical OR of events to be registered
elessair 0:f269e3021894 634 * @param hint A suggestion for how to use DMA with this transfer
elessair 0:f269e3021894 635 * @return Returns number of data transfered, or 0 otherwise
elessair 0:f269e3021894 636 */
elessair 0:f269e3021894 637 int serial_tx_asynch(serial_t *obj, const void *tx, size_t tx_length, uint8_t tx_width, uint32_t handler, uint32_t event, DMAUsage hint)
elessair 0:f269e3021894 638 {
elessair 0:f269e3021894 639 // TODO: DMA usage is currently ignored
elessair 0:f269e3021894 640 (void) hint;
elessair 0:f269e3021894 641
elessair 0:f269e3021894 642 // Check buffer is ok
elessair 0:f269e3021894 643 MBED_ASSERT(tx != (void*)0);
elessair 0:f269e3021894 644 MBED_ASSERT(tx_width == 8); // support only 8b width
elessair 0:f269e3021894 645
elessair 0:f269e3021894 646 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 647 UART_HandleTypeDef * huart = &uart_handlers[obj_s->index];
elessair 0:f269e3021894 648
elessair 0:f269e3021894 649 if (tx_length == 0) {
elessair 0:f269e3021894 650 return 0;
elessair 0:f269e3021894 651 }
elessair 0:f269e3021894 652
elessair 0:f269e3021894 653 // Set up buffer
elessair 0:f269e3021894 654 serial_tx_buffer_set(obj, (void *)tx, tx_length, tx_width);
elessair 0:f269e3021894 655
elessair 0:f269e3021894 656 // Set up events
elessair 0:f269e3021894 657 serial_enable_event(obj, SERIAL_EVENT_TX_ALL, 0); // Clear all events
elessair 0:f269e3021894 658 serial_enable_event(obj, event, 1); // Set only the wanted events
elessair 0:f269e3021894 659
elessair 0:f269e3021894 660 // Enable interrupt
elessair 0:f269e3021894 661 IRQn_Type irq_n = serial_get_irq_n(obj);
elessair 0:f269e3021894 662 NVIC_ClearPendingIRQ(irq_n);
elessair 0:f269e3021894 663 NVIC_DisableIRQ(irq_n);
elessair 0:f269e3021894 664 NVIC_SetPriority(irq_n, 1);
elessair 0:f269e3021894 665 NVIC_SetVector(irq_n, (uint32_t)handler);
elessair 0:f269e3021894 666 NVIC_EnableIRQ(irq_n);
elessair 0:f269e3021894 667
elessair 0:f269e3021894 668 // the following function will enable UART_IT_TXE and error interrupts
elessair 0:f269e3021894 669 if (HAL_UART_Transmit_IT(huart, (uint8_t*)tx, tx_length) != HAL_OK) {
elessair 0:f269e3021894 670 return 0;
elessair 0:f269e3021894 671 }
elessair 0:f269e3021894 672
elessair 0:f269e3021894 673 return tx_length;
elessair 0:f269e3021894 674 }
elessair 0:f269e3021894 675
elessair 0:f269e3021894 676 /**
elessair 0:f269e3021894 677 * Begin asynchronous RX transfer (enable interrupt for data collecting)
elessair 0:f269e3021894 678 * The used buffer is specified in the serial object, rx_buff
elessair 0:f269e3021894 679 *
elessair 0:f269e3021894 680 * @param obj The serial object
elessair 0:f269e3021894 681 * @param rx The buffer for sending
elessair 0:f269e3021894 682 * @param rx_length The number of words to transmit
elessair 0:f269e3021894 683 * @param rx_width The bit width of buffer word
elessair 0:f269e3021894 684 * @param handler The serial handler
elessair 0:f269e3021894 685 * @param event The logical OR of events to be registered
elessair 0:f269e3021894 686 * @param handler The serial handler
elessair 0:f269e3021894 687 * @param char_match A character in range 0-254 to be matched
elessair 0:f269e3021894 688 * @param hint A suggestion for how to use DMA with this transfer
elessair 0:f269e3021894 689 */
elessair 0:f269e3021894 690 void serial_rx_asynch(serial_t *obj, void *rx, size_t rx_length, uint8_t rx_width, uint32_t handler, uint32_t event, uint8_t char_match, DMAUsage hint)
elessair 0:f269e3021894 691 {
elessair 0:f269e3021894 692 // TODO: DMA usage is currently ignored
elessair 0:f269e3021894 693 (void) hint;
elessair 0:f269e3021894 694
elessair 0:f269e3021894 695 /* Sanity check arguments */
elessair 0:f269e3021894 696 MBED_ASSERT(obj);
elessair 0:f269e3021894 697 MBED_ASSERT(rx != (void*)0);
elessair 0:f269e3021894 698 MBED_ASSERT(rx_width == 8); // support only 8b width
elessair 0:f269e3021894 699
elessair 0:f269e3021894 700 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 701 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
elessair 0:f269e3021894 702
elessair 0:f269e3021894 703 serial_enable_event(obj, SERIAL_EVENT_RX_ALL, 0);
elessair 0:f269e3021894 704 serial_enable_event(obj, event, 1);
elessair 0:f269e3021894 705
elessair 0:f269e3021894 706 // set CharMatch
elessair 0:f269e3021894 707 obj->char_match = char_match;
elessair 0:f269e3021894 708
elessair 0:f269e3021894 709 serial_rx_buffer_set(obj, rx, rx_length, rx_width);
elessair 0:f269e3021894 710
elessair 0:f269e3021894 711 IRQn_Type irq_n = serial_get_irq_n(obj);
elessair 0:f269e3021894 712 NVIC_ClearPendingIRQ(irq_n);
elessair 0:f269e3021894 713 NVIC_DisableIRQ(irq_n);
elessair 0:f269e3021894 714 NVIC_SetPriority(irq_n, 0);
elessair 0:f269e3021894 715 NVIC_SetVector(irq_n, (uint32_t)handler);
elessair 0:f269e3021894 716 NVIC_EnableIRQ(irq_n);
elessair 0:f269e3021894 717
elessair 0:f269e3021894 718 // following HAL function will enable the RXNE interrupt + error interrupts
elessair 0:f269e3021894 719 HAL_UART_Receive_IT(huart, (uint8_t*)rx, rx_length);
elessair 0:f269e3021894 720 }
elessair 0:f269e3021894 721
elessair 0:f269e3021894 722 /**
elessair 0:f269e3021894 723 * Attempts to determine if the serial peripheral is already in use for TX
elessair 0:f269e3021894 724 *
elessair 0:f269e3021894 725 * @param obj The serial object
elessair 0:f269e3021894 726 * @return Non-zero if the TX transaction is ongoing, 0 otherwise
elessair 0:f269e3021894 727 */
elessair 0:f269e3021894 728 uint8_t serial_tx_active(serial_t *obj)
elessair 0:f269e3021894 729 {
elessair 0:f269e3021894 730 MBED_ASSERT(obj);
elessair 0:f269e3021894 731
elessair 0:f269e3021894 732 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 733 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
elessair 0:f269e3021894 734
elessair 0:f269e3021894 735 return ((HAL_UART_GetState(huart) == HAL_UART_STATE_BUSY_TX) ? 1 : 0);
elessair 0:f269e3021894 736 }
elessair 0:f269e3021894 737
elessair 0:f269e3021894 738 /**
elessair 0:f269e3021894 739 * Attempts to determine if the serial peripheral is already in use for RX
elessair 0:f269e3021894 740 *
elessair 0:f269e3021894 741 * @param obj The serial object
elessair 0:f269e3021894 742 * @return Non-zero if the RX transaction is ongoing, 0 otherwise
elessair 0:f269e3021894 743 */
elessair 0:f269e3021894 744 uint8_t serial_rx_active(serial_t *obj)
elessair 0:f269e3021894 745 {
elessair 0:f269e3021894 746 MBED_ASSERT(obj);
elessair 0:f269e3021894 747
elessair 0:f269e3021894 748 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 749 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
elessair 0:f269e3021894 750
elessair 0:f269e3021894 751 return ((HAL_UART_GetState(huart) == HAL_UART_STATE_BUSY_RX) ? 1 : 0);
elessair 0:f269e3021894 752 }
elessair 0:f269e3021894 753
elessair 0:f269e3021894 754 void HAL_UART_TxCpltCallback(UART_HandleTypeDef *huart) {
elessair 0:f269e3021894 755 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_TC) != RESET) {
elessair 0:f269e3021894 756 __HAL_UART_CLEAR_FLAG(huart, UART_FLAG_TC);
elessair 0:f269e3021894 757 }
elessair 0:f269e3021894 758 }
elessair 0:f269e3021894 759
elessair 0:f269e3021894 760 void HAL_UART_ErrorCallback(UART_HandleTypeDef *huart) {
elessair 0:f269e3021894 761 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_PE) != RESET) {
elessair 0:f269e3021894 762 volatile uint32_t tmpval = huart->Instance->RDR; // Clear PE flag
elessair 0:f269e3021894 763 } else if (__HAL_UART_GET_FLAG(huart, UART_FLAG_FE) != RESET) {
elessair 0:f269e3021894 764 volatile uint32_t tmpval = huart->Instance->RDR; // Clear FE flag
elessair 0:f269e3021894 765 } else if (__HAL_UART_GET_FLAG(huart, UART_FLAG_NE) != RESET) {
elessair 0:f269e3021894 766 volatile uint32_t tmpval = huart->Instance->RDR; // Clear NE flag
elessair 0:f269e3021894 767 } else if (__HAL_UART_GET_FLAG(huart, UART_FLAG_ORE) != RESET) {
elessair 0:f269e3021894 768 volatile uint32_t tmpval = huart->Instance->RDR; // Clear ORE flag
elessair 0:f269e3021894 769 }
elessair 0:f269e3021894 770 }
elessair 0:f269e3021894 771
elessair 0:f269e3021894 772 /**
elessair 0:f269e3021894 773 * The asynchronous TX and RX handler.
elessair 0:f269e3021894 774 *
elessair 0:f269e3021894 775 * @param obj The serial object
elessair 0:f269e3021894 776 * @return Returns event flags if a TX/RX transfer termination condition was met or 0 otherwise
elessair 0:f269e3021894 777 */
elessair 0:f269e3021894 778 int serial_irq_handler_asynch(serial_t *obj)
elessair 0:f269e3021894 779 {
elessair 0:f269e3021894 780 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 781 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
elessair 0:f269e3021894 782
elessair 0:f269e3021894 783 volatile int return_event = 0;
elessair 0:f269e3021894 784 uint8_t *buf = (uint8_t*)(obj->rx_buff.buffer);
elessair 0:f269e3021894 785 uint8_t i = 0;
elessair 0:f269e3021894 786
elessair 0:f269e3021894 787 // TX PART:
elessair 0:f269e3021894 788 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_TC) != RESET) {
elessair 0:f269e3021894 789 if (__HAL_UART_GET_IT_SOURCE(huart, UART_IT_TC) != RESET) {
elessair 0:f269e3021894 790 // Return event SERIAL_EVENT_TX_COMPLETE if requested
elessair 0:f269e3021894 791 if ((obj_s->events & SERIAL_EVENT_TX_COMPLETE ) != 0) {
elessair 0:f269e3021894 792 return_event |= (SERIAL_EVENT_TX_COMPLETE & obj_s->events);
elessair 0:f269e3021894 793 }
elessair 0:f269e3021894 794 }
elessair 0:f269e3021894 795 }
elessair 0:f269e3021894 796
elessair 0:f269e3021894 797 // Handle error events
elessair 0:f269e3021894 798 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_PE) != RESET) {
elessair 0:f269e3021894 799 if (__HAL_UART_GET_IT_SOURCE(huart, USART_IT_ERR) != RESET) {
elessair 0:f269e3021894 800 return_event |= (SERIAL_EVENT_RX_PARITY_ERROR & obj_s->events);
elessair 0:f269e3021894 801 }
elessair 0:f269e3021894 802 }
elessair 0:f269e3021894 803
elessair 0:f269e3021894 804 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_FE) != RESET) {
elessair 0:f269e3021894 805 if (__HAL_UART_GET_IT_SOURCE(huart, USART_IT_ERR) != RESET) {
elessair 0:f269e3021894 806 return_event |= (SERIAL_EVENT_RX_FRAMING_ERROR & obj_s->events);
elessair 0:f269e3021894 807 }
elessair 0:f269e3021894 808 }
elessair 0:f269e3021894 809
elessair 0:f269e3021894 810 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_ORE) != RESET) {
elessair 0:f269e3021894 811 if (__HAL_UART_GET_IT_SOURCE(huart, USART_IT_ERR) != RESET) {
elessair 0:f269e3021894 812 return_event |= (SERIAL_EVENT_RX_OVERRUN_ERROR & obj_s->events);
elessair 0:f269e3021894 813 }
elessair 0:f269e3021894 814 }
elessair 0:f269e3021894 815
elessair 0:f269e3021894 816 HAL_UART_IRQHandler(huart);
elessair 0:f269e3021894 817
elessair 0:f269e3021894 818 // Abort if an error occurs
elessair 0:f269e3021894 819 if (return_event & SERIAL_EVENT_RX_PARITY_ERROR ||
elessair 0:f269e3021894 820 return_event & SERIAL_EVENT_RX_FRAMING_ERROR ||
elessair 0:f269e3021894 821 return_event & SERIAL_EVENT_RX_OVERRUN_ERROR) {
elessair 0:f269e3021894 822 return return_event;
elessair 0:f269e3021894 823 }
elessair 0:f269e3021894 824
elessair 0:f269e3021894 825 //RX PART
elessair 0:f269e3021894 826 if (huart->RxXferSize != 0) {
elessair 0:f269e3021894 827 obj->rx_buff.pos = huart->RxXferSize - huart->RxXferCount;
elessair 0:f269e3021894 828 }
elessair 0:f269e3021894 829 if ((huart->RxXferCount == 0) && (obj->rx_buff.pos >= (obj->rx_buff.length - 1))) {
elessair 0:f269e3021894 830 return_event |= (SERIAL_EVENT_RX_COMPLETE & obj_s->events);
elessair 0:f269e3021894 831 }
elessair 0:f269e3021894 832
elessair 0:f269e3021894 833 // Check if char_match is present
elessair 0:f269e3021894 834 if (obj_s->events & SERIAL_EVENT_RX_CHARACTER_MATCH) {
elessair 0:f269e3021894 835 if (buf != NULL) {
elessair 0:f269e3021894 836 for (i = 0; i < obj->rx_buff.pos; i++) {
elessair 0:f269e3021894 837 if (buf[i] == obj->char_match) {
elessair 0:f269e3021894 838 obj->rx_buff.pos = i;
elessair 0:f269e3021894 839 return_event |= (SERIAL_EVENT_RX_CHARACTER_MATCH & obj_s->events);
elessair 0:f269e3021894 840 serial_rx_abort_asynch(obj);
elessair 0:f269e3021894 841 break;
elessair 0:f269e3021894 842 }
elessair 0:f269e3021894 843 }
elessair 0:f269e3021894 844 }
elessair 0:f269e3021894 845 }
elessair 0:f269e3021894 846
elessair 0:f269e3021894 847 return return_event;
elessair 0:f269e3021894 848 }
elessair 0:f269e3021894 849
elessair 0:f269e3021894 850 /**
elessair 0:f269e3021894 851 * Abort the ongoing TX transaction. It disables the enabled interupt for TX and
elessair 0:f269e3021894 852 * flush TX hardware buffer if TX FIFO is used
elessair 0:f269e3021894 853 *
elessair 0:f269e3021894 854 * @param obj The serial object
elessair 0:f269e3021894 855 */
elessair 0:f269e3021894 856 void serial_tx_abort_asynch(serial_t *obj)
elessair 0:f269e3021894 857 {
elessair 0:f269e3021894 858 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 859 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
elessair 0:f269e3021894 860
elessair 0:f269e3021894 861 __HAL_UART_DISABLE_IT(huart, UART_IT_TC);
elessair 0:f269e3021894 862 __HAL_UART_DISABLE_IT(huart, UART_IT_TXE);
elessair 0:f269e3021894 863
elessair 0:f269e3021894 864 // clear flags
elessair 0:f269e3021894 865 __HAL_UART_CLEAR_FLAG(huart, UART_FLAG_TC);
elessair 0:f269e3021894 866
elessair 0:f269e3021894 867 // reset states
elessair 0:f269e3021894 868 huart->TxXferCount = 0;
elessair 0:f269e3021894 869 // update handle state
elessair 0:f269e3021894 870 if(huart->gState == HAL_UART_STATE_BUSY_TX_RX) {
elessair 0:f269e3021894 871 huart->gState = HAL_UART_STATE_BUSY_RX;
elessair 0:f269e3021894 872 } else {
elessair 0:f269e3021894 873 huart->gState = HAL_UART_STATE_READY;
elessair 0:f269e3021894 874 }
elessair 0:f269e3021894 875 }
elessair 0:f269e3021894 876
elessair 0:f269e3021894 877 /**
elessair 0:f269e3021894 878 * Abort the ongoing RX transaction It disables the enabled interrupt for RX and
elessair 0:f269e3021894 879 * flush RX hardware buffer if RX FIFO is used
elessair 0:f269e3021894 880 *
elessair 0:f269e3021894 881 * @param obj The serial object
elessair 0:f269e3021894 882 */
elessair 0:f269e3021894 883 void serial_rx_abort_asynch(serial_t *obj)
elessair 0:f269e3021894 884 {
elessair 0:f269e3021894 885 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 886 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
elessair 0:f269e3021894 887
elessair 0:f269e3021894 888 // disable interrupts
elessair 0:f269e3021894 889 __HAL_UART_DISABLE_IT(huart, UART_IT_RXNE);
elessair 0:f269e3021894 890 __HAL_UART_DISABLE_IT(huart, UART_IT_PE);
elessair 0:f269e3021894 891 __HAL_UART_DISABLE_IT(huart, UART_IT_ERR);
elessair 0:f269e3021894 892
elessair 0:f269e3021894 893 // clear flags
elessair 0:f269e3021894 894 __HAL_UART_CLEAR_FLAG(huart, UART_FLAG_RXNE);
elessair 0:f269e3021894 895 volatile uint32_t tmpval = huart->Instance->RDR; // Clear errors flag
elessair 0:f269e3021894 896
elessair 0:f269e3021894 897 // reset states
elessair 0:f269e3021894 898 huart->RxXferCount = 0;
elessair 0:f269e3021894 899 // update handle state
elessair 0:f269e3021894 900 if(huart->RxState == HAL_UART_STATE_BUSY_TX_RX) {
elessair 0:f269e3021894 901 huart->RxState = HAL_UART_STATE_BUSY_TX;
elessair 0:f269e3021894 902 } else {
elessair 0:f269e3021894 903 huart->RxState = HAL_UART_STATE_READY;
elessair 0:f269e3021894 904 }
elessair 0:f269e3021894 905 }
elessair 0:f269e3021894 906
elessair 0:f269e3021894 907 #endif
elessair 0:f269e3021894 908
elessair 0:f269e3021894 909 #if DEVICE_SERIAL_FC
elessair 0:f269e3021894 910
elessair 0:f269e3021894 911 /**
elessair 0:f269e3021894 912 * Set HW Control Flow
elessair 0:f269e3021894 913 * @param obj The serial object
elessair 0:f269e3021894 914 * @param type The Control Flow type (FlowControlNone, FlowControlRTS, FlowControlCTS, FlowControlRTSCTS)
elessair 0:f269e3021894 915 * @param rxflow Pin for the rxflow
elessair 0:f269e3021894 916 * @param txflow Pin for the txflow
elessair 0:f269e3021894 917 */
elessair 0:f269e3021894 918 void serial_set_flow_control(serial_t *obj, FlowControl type, PinName rxflow, PinName txflow)
elessair 0:f269e3021894 919 {
elessair 0:f269e3021894 920 struct serial_s *obj_s = SERIAL_S(obj);
elessair 0:f269e3021894 921
elessair 0:f269e3021894 922 // Determine the UART to use (UART_1, UART_2, ...)
elessair 0:f269e3021894 923 UARTName uart_rts = (UARTName)pinmap_peripheral(rxflow, PinMap_UART_RTS);
elessair 0:f269e3021894 924 UARTName uart_cts = (UARTName)pinmap_peripheral(txflow, PinMap_UART_CTS);
elessair 0:f269e3021894 925
elessair 0:f269e3021894 926 // Get the peripheral name (UART_1, UART_2, ...) from the pin and assign it to the object
elessair 0:f269e3021894 927 obj_s->uart = (UARTName)pinmap_merge(uart_cts, uart_rts);
elessair 0:f269e3021894 928 MBED_ASSERT(obj_s->uart != (UARTName)NC);
elessair 0:f269e3021894 929
elessair 0:f269e3021894 930 if(type == FlowControlNone) {
elessair 0:f269e3021894 931 // Disable hardware flow control
elessair 0:f269e3021894 932 obj_s->hw_flow_ctl = UART_HWCONTROL_NONE;
elessair 0:f269e3021894 933 }
elessair 0:f269e3021894 934 if (type == FlowControlRTS) {
elessair 0:f269e3021894 935 // Enable RTS
elessair 0:f269e3021894 936 MBED_ASSERT(uart_rts != (UARTName)NC);
elessair 0:f269e3021894 937 obj_s->hw_flow_ctl = UART_HWCONTROL_RTS;
elessair 0:f269e3021894 938 obj_s->pin_rts = rxflow;
elessair 0:f269e3021894 939 // Enable the pin for RTS function
elessair 0:f269e3021894 940 pinmap_pinout(rxflow, PinMap_UART_RTS);
elessair 0:f269e3021894 941 }
elessair 0:f269e3021894 942 if (type == FlowControlCTS) {
elessair 0:f269e3021894 943 // Enable CTS
elessair 0:f269e3021894 944 MBED_ASSERT(uart_cts != (UARTName)NC);
elessair 0:f269e3021894 945 obj_s->hw_flow_ctl = UART_HWCONTROL_CTS;
elessair 0:f269e3021894 946 obj_s->pin_cts = txflow;
elessair 0:f269e3021894 947 // Enable the pin for CTS function
elessair 0:f269e3021894 948 pinmap_pinout(txflow, PinMap_UART_CTS);
elessair 0:f269e3021894 949 }
elessair 0:f269e3021894 950 if (type == FlowControlRTSCTS) {
elessair 0:f269e3021894 951 // Enable CTS & RTS
elessair 0:f269e3021894 952 MBED_ASSERT(uart_rts != (UARTName)NC);
elessair 0:f269e3021894 953 MBED_ASSERT(uart_cts != (UARTName)NC);
elessair 0:f269e3021894 954 obj_s->hw_flow_ctl = UART_HWCONTROL_RTS_CTS;
elessair 0:f269e3021894 955 obj_s->pin_rts = rxflow;
elessair 0:f269e3021894 956 obj_s->pin_cts = txflow;
elessair 0:f269e3021894 957 // Enable the pin for CTS function
elessair 0:f269e3021894 958 pinmap_pinout(txflow, PinMap_UART_CTS);
elessair 0:f269e3021894 959 // Enable the pin for RTS function
elessair 0:f269e3021894 960 pinmap_pinout(rxflow, PinMap_UART_RTS);
elessair 0:f269e3021894 961 }
elessair 0:f269e3021894 962
elessair 0:f269e3021894 963 init_uart(obj);
elessair 0:f269e3021894 964 }
elessair 0:f269e3021894 965
elessair 0:f269e3021894 966 #endif
elessair 0:f269e3021894 967
elessair 0:f269e3021894 968 #endif