mbed library sources. Supersedes mbed-src.

Dependents:   Nucleo_Hello_Encoder BLE_iBeaconScan AM1805_DEMO DISCO-F429ZI_ExportTemplate1 ... more

Committer:
AnnaBridge
Date:
Fri Feb 16 16:09:33 2018 +0000
Revision:
181:57724642e740
Parent:
180:96ed750bd169
Child:
186:707f6e361f3e
mbed-dev library. Release version 159.

Who changed what in which revision?

UserRevisionLine numberNew contents of line
AnnaBridge 167:e84263d55307 1 /* mbed Microcontroller Library
AnnaBridge 167:e84263d55307 2 *******************************************************************************
Anna Bridge 180:96ed750bd169 3 * Copyright (c) 2017, STMicroelectronics
AnnaBridge 167:e84263d55307 4 * All rights reserved.
AnnaBridge 167:e84263d55307 5 *
AnnaBridge 167:e84263d55307 6 * Redistribution and use in source and binary forms, with or without
AnnaBridge 167:e84263d55307 7 * modification, are permitted provided that the following conditions are met:
AnnaBridge 167:e84263d55307 8 *
AnnaBridge 167:e84263d55307 9 * 1. Redistributions of source code must retain the above copyright notice,
AnnaBridge 167:e84263d55307 10 * this list of conditions and the following disclaimer.
AnnaBridge 167:e84263d55307 11 * 2. Redistributions in binary form must reproduce the above copyright notice,
AnnaBridge 167:e84263d55307 12 * this list of conditions and the following disclaimer in the documentation
AnnaBridge 167:e84263d55307 13 * and/or other materials provided with the distribution.
AnnaBridge 167:e84263d55307 14 * 3. Neither the name of STMicroelectronics nor the names of its contributors
AnnaBridge 167:e84263d55307 15 * may be used to endorse or promote products derived from this software
AnnaBridge 167:e84263d55307 16 * without specific prior written permission.
AnnaBridge 167:e84263d55307 17 *
AnnaBridge 167:e84263d55307 18 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
AnnaBridge 167:e84263d55307 19 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
AnnaBridge 167:e84263d55307 20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
AnnaBridge 167:e84263d55307 21 * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
AnnaBridge 167:e84263d55307 22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
AnnaBridge 167:e84263d55307 23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
AnnaBridge 167:e84263d55307 24 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
AnnaBridge 167:e84263d55307 25 * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
AnnaBridge 167:e84263d55307 26 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
AnnaBridge 167:e84263d55307 27 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
AnnaBridge 167:e84263d55307 28 *******************************************************************************
AnnaBridge 167:e84263d55307 29 */
AnnaBridge 167:e84263d55307 30
AnnaBridge 167:e84263d55307 31 #if DEVICE_SERIAL
AnnaBridge 167:e84263d55307 32
Anna Bridge 180:96ed750bd169 33 #include "serial_api_hal.h"
AnnaBridge 167:e84263d55307 34
Anna Bridge 180:96ed750bd169 35 #if defined (TARGET_STM32F031K6)
Anna Bridge 180:96ed750bd169 36 #define UART_NUM (1)
AnnaBridge 167:e84263d55307 37 #elif defined (TARGET_STM32F030R8) || defined (TARGET_STM32F051R8) || defined (TARGET_STM32F042K6)
AnnaBridge 167:e84263d55307 38 #define UART_NUM (2)
Anna Bridge 180:96ed750bd169 39 #elif defined (TARGET_STM32F070RB) || defined (TARGET_STM32F072RB)
Anna Bridge 180:96ed750bd169 40 #define UART_NUM (4)
AnnaBridge 167:e84263d55307 41 #else
Anna Bridge 180:96ed750bd169 42 #define UART_NUM (8) // max value (TARGET_STM32F091RC)
AnnaBridge 167:e84263d55307 43 #endif
AnnaBridge 167:e84263d55307 44
Anna Bridge 180:96ed750bd169 45 uint32_t serial_irq_ids[UART_NUM] = {0};
AnnaBridge 167:e84263d55307 46 UART_HandleTypeDef uart_handlers[UART_NUM];
AnnaBridge 167:e84263d55307 47
AnnaBridge 167:e84263d55307 48 static uart_irq_handler irq_handler;
AnnaBridge 167:e84263d55307 49
AnnaBridge 181:57724642e740 50 // Defined in serial_api.c
AnnaBridge 181:57724642e740 51 inline int8_t get_uart_index(UARTName uart_name);
AnnaBridge 181:57724642e740 52
AnnaBridge 167:e84263d55307 53 /******************************************************************************
AnnaBridge 167:e84263d55307 54 * INTERRUPTS HANDLING
AnnaBridge 167:e84263d55307 55 ******************************************************************************/
AnnaBridge 167:e84263d55307 56
AnnaBridge 181:57724642e740 57 static void uart_irq(UARTName uart_name)
AnnaBridge 167:e84263d55307 58 {
AnnaBridge 181:57724642e740 59 int8_t id = get_uart_index(uart_name);
AnnaBridge 181:57724642e740 60
AnnaBridge 181:57724642e740 61 if (id >= 0) {
AnnaBridge 181:57724642e740 62 UART_HandleTypeDef * huart = &uart_handlers[id];
AnnaBridge 181:57724642e740 63 if (serial_irq_ids[id] != 0) {
AnnaBridge 181:57724642e740 64 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_TXE) != RESET) {
AnnaBridge 181:57724642e740 65 if (__HAL_UART_GET_IT(huart, UART_IT_TXE) != RESET) {
AnnaBridge 181:57724642e740 66 irq_handler(serial_irq_ids[id], TxIrq);
AnnaBridge 181:57724642e740 67 }
AnnaBridge 167:e84263d55307 68 }
AnnaBridge 181:57724642e740 69 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_RXNE) != RESET) {
AnnaBridge 181:57724642e740 70 if (__HAL_UART_GET_IT(huart, UART_IT_RXNE) != RESET) {
AnnaBridge 181:57724642e740 71 irq_handler(serial_irq_ids[id], RxIrq);
AnnaBridge 181:57724642e740 72 /* Flag has been cleared when reading the content */
AnnaBridge 181:57724642e740 73 }
AnnaBridge 167:e84263d55307 74 }
AnnaBridge 181:57724642e740 75 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_ORE) != RESET) {
AnnaBridge 181:57724642e740 76 if (__HAL_UART_GET_IT(huart, UART_IT_ORE) != RESET) {
AnnaBridge 181:57724642e740 77 __HAL_UART_CLEAR_FLAG(huart, UART_CLEAR_OREF);
AnnaBridge 181:57724642e740 78 }
AnnaBridge 167:e84263d55307 79 }
AnnaBridge 167:e84263d55307 80 }
AnnaBridge 167:e84263d55307 81 }
AnnaBridge 167:e84263d55307 82 }
AnnaBridge 167:e84263d55307 83
AnnaBridge 181:57724642e740 84 #if defined(USART1_BASE)
AnnaBridge 167:e84263d55307 85 static void uart1_irq(void)
AnnaBridge 167:e84263d55307 86 {
AnnaBridge 181:57724642e740 87 uart_irq(UART_1);
AnnaBridge 167:e84263d55307 88 }
AnnaBridge 181:57724642e740 89 #endif
AnnaBridge 167:e84263d55307 90
AnnaBridge 167:e84263d55307 91 #if defined(USART2_BASE)
AnnaBridge 167:e84263d55307 92 static void uart2_irq(void)
AnnaBridge 167:e84263d55307 93 {
AnnaBridge 181:57724642e740 94 uart_irq(UART_2);
AnnaBridge 167:e84263d55307 95 }
AnnaBridge 167:e84263d55307 96 #endif
AnnaBridge 167:e84263d55307 97
AnnaBridge 181:57724642e740 98 // Used for both USART3_4_IRQn and USART3_8_IRQn
AnnaBridge 181:57724642e740 99 static void uart3_8_irq(void)
AnnaBridge 167:e84263d55307 100 {
AnnaBridge 181:57724642e740 101 #if defined(TARGET_STM32F091RC)
AnnaBridge 181:57724642e740 102 #if defined(USART3_BASE)
AnnaBridge 181:57724642e740 103 if (__HAL_GET_PENDING_IT(HAL_ITLINE_USART3) != RESET) {
AnnaBridge 181:57724642e740 104 uart_irq(UART_3);
AnnaBridge 181:57724642e740 105 }
AnnaBridge 167:e84263d55307 106 #endif
AnnaBridge 181:57724642e740 107 #if defined(USART4_BASE)
AnnaBridge 181:57724642e740 108 if (__HAL_GET_PENDING_IT(HAL_ITLINE_USART4) != RESET) {
AnnaBridge 181:57724642e740 109 uart_irq(UART_4);
AnnaBridge 181:57724642e740 110 }
AnnaBridge 181:57724642e740 111 #endif
AnnaBridge 181:57724642e740 112 #if defined(USART5_BASE)
AnnaBridge 181:57724642e740 113 if (__HAL_GET_PENDING_IT(HAL_ITLINE_USART5) != RESET) {
AnnaBridge 181:57724642e740 114 uart_irq(UART_5);
AnnaBridge 181:57724642e740 115 }
AnnaBridge 181:57724642e740 116 #endif
AnnaBridge 181:57724642e740 117 #if defined(USART6_BASE)
AnnaBridge 181:57724642e740 118 if (__HAL_GET_PENDING_IT(HAL_ITLINE_USART6) != RESET) {
AnnaBridge 181:57724642e740 119 uart_irq(UART_6);
AnnaBridge 181:57724642e740 120 }
AnnaBridge 167:e84263d55307 121 #endif
AnnaBridge 181:57724642e740 122 #if defined(USART7_BASE)
AnnaBridge 181:57724642e740 123 if (__HAL_GET_PENDING_IT(HAL_ITLINE_USART7) != RESET) {
AnnaBridge 181:57724642e740 124 uart_irq(UART_7);
AnnaBridge 181:57724642e740 125 }
AnnaBridge 181:57724642e740 126 #endif
AnnaBridge 181:57724642e740 127 #if defined(USART8_BASE)
AnnaBridge 181:57724642e740 128 if (__HAL_GET_PENDING_IT(HAL_ITLINE_USART8) != RESET) {
AnnaBridge 181:57724642e740 129 uart_irq(UART_8);
AnnaBridge 181:57724642e740 130 }
AnnaBridge 167:e84263d55307 131 #endif
AnnaBridge 181:57724642e740 132 #else // TARGET_STM32F070RB, TARGET_STM32F072RB
AnnaBridge 181:57724642e740 133 #if defined(USART3_BASE)
AnnaBridge 181:57724642e740 134 if (USART3->ISR & (UART_FLAG_TXE | UART_FLAG_RXNE | UART_FLAG_ORE)) {
AnnaBridge 181:57724642e740 135 uart_irq(UART_3);
AnnaBridge 181:57724642e740 136 }
AnnaBridge 181:57724642e740 137 #endif
AnnaBridge 181:57724642e740 138 #if defined(USART4_BASE)
AnnaBridge 181:57724642e740 139 if (USART4->ISR & (UART_FLAG_TXE | UART_FLAG_RXNE | UART_FLAG_ORE)) {
AnnaBridge 181:57724642e740 140 uart_irq(UART_4);
AnnaBridge 181:57724642e740 141 }
AnnaBridge 181:57724642e740 142 #endif
AnnaBridge 181:57724642e740 143 #endif
AnnaBridge 167:e84263d55307 144 }
AnnaBridge 167:e84263d55307 145
AnnaBridge 167:e84263d55307 146 void serial_irq_handler(serial_t *obj, uart_irq_handler handler, uint32_t id)
AnnaBridge 167:e84263d55307 147 {
AnnaBridge 167:e84263d55307 148 struct serial_s *obj_s = SERIAL_S(obj);
AnnaBridge 167:e84263d55307 149
AnnaBridge 167:e84263d55307 150 irq_handler = handler;
AnnaBridge 167:e84263d55307 151 serial_irq_ids[obj_s->index] = id;
AnnaBridge 167:e84263d55307 152 }
AnnaBridge 167:e84263d55307 153
AnnaBridge 167:e84263d55307 154 void serial_irq_set(serial_t *obj, SerialIrq irq, uint32_t enable)
AnnaBridge 167:e84263d55307 155 {
AnnaBridge 167:e84263d55307 156 struct serial_s *obj_s = SERIAL_S(obj);
AnnaBridge 167:e84263d55307 157 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
AnnaBridge 167:e84263d55307 158 IRQn_Type irq_n = (IRQn_Type)0;
AnnaBridge 167:e84263d55307 159 uint32_t vector = 0;
AnnaBridge 167:e84263d55307 160
AnnaBridge 181:57724642e740 161 #if defined(USART1_BASE)
AnnaBridge 167:e84263d55307 162 if (obj_s->uart == UART_1) {
AnnaBridge 167:e84263d55307 163 irq_n = USART1_IRQn;
AnnaBridge 167:e84263d55307 164 vector = (uint32_t)&uart1_irq;
AnnaBridge 167:e84263d55307 165 }
AnnaBridge 181:57724642e740 166 #endif
AnnaBridge 167:e84263d55307 167
AnnaBridge 167:e84263d55307 168 #if defined(USART2_BASE)
AnnaBridge 167:e84263d55307 169 if (obj_s->uart == UART_2) {
AnnaBridge 167:e84263d55307 170 irq_n = USART2_IRQn;
AnnaBridge 167:e84263d55307 171 vector = (uint32_t)&uart2_irq;
AnnaBridge 167:e84263d55307 172 }
AnnaBridge 167:e84263d55307 173 #endif
AnnaBridge 167:e84263d55307 174
AnnaBridge 167:e84263d55307 175 #if defined(USART3_BASE)
AnnaBridge 167:e84263d55307 176 if (obj_s->uart == UART_3) {
AnnaBridge 181:57724642e740 177 #if defined(TARGET_STM32F091RC)
AnnaBridge 181:57724642e740 178 irq_n = USART3_8_IRQn;
AnnaBridge 181:57724642e740 179 #else
AnnaBridge 167:e84263d55307 180 irq_n = USART3_4_IRQn;
AnnaBridge 181:57724642e740 181 #endif
AnnaBridge 181:57724642e740 182 vector = (uint32_t)&uart3_8_irq;
AnnaBridge 167:e84263d55307 183 }
AnnaBridge 167:e84263d55307 184 #endif
AnnaBridge 167:e84263d55307 185
AnnaBridge 167:e84263d55307 186 #if defined(USART4_BASE)
AnnaBridge 167:e84263d55307 187 if (obj_s->uart == UART_4) {
AnnaBridge 181:57724642e740 188 #if defined(TARGET_STM32F091RC)
AnnaBridge 181:57724642e740 189 irq_n = USART3_8_IRQn;
AnnaBridge 181:57724642e740 190 #else
AnnaBridge 167:e84263d55307 191 irq_n = USART3_4_IRQn;
AnnaBridge 181:57724642e740 192 #endif
AnnaBridge 181:57724642e740 193 vector = (uint32_t)&uart3_8_irq;
AnnaBridge 181:57724642e740 194 }
AnnaBridge 181:57724642e740 195 #endif
AnnaBridge 181:57724642e740 196
AnnaBridge 181:57724642e740 197 // Below usart are available only on TARGET_STM32F091RC
AnnaBridge 181:57724642e740 198 #if defined(USART5_BASE)
AnnaBridge 181:57724642e740 199 if (obj_s->uart == UART_5) {
AnnaBridge 181:57724642e740 200 irq_n = USART3_8_IRQn;
AnnaBridge 181:57724642e740 201 vector = (uint32_t)&uart3_8_irq;
AnnaBridge 167:e84263d55307 202 }
AnnaBridge 167:e84263d55307 203 #endif
AnnaBridge 181:57724642e740 204
AnnaBridge 181:57724642e740 205 #if defined(USART6_BASE)
AnnaBridge 181:57724642e740 206 if (obj_s->uart == UART_6) {
AnnaBridge 181:57724642e740 207 irq_n = USART3_8_IRQn;
AnnaBridge 181:57724642e740 208 vector = (uint32_t)&uart3_8_irq;
AnnaBridge 181:57724642e740 209 }
AnnaBridge 181:57724642e740 210 #endif
AnnaBridge 181:57724642e740 211
AnnaBridge 181:57724642e740 212 #if defined(USART7_BASE)
AnnaBridge 181:57724642e740 213 if (obj_s->uart == UART_7) {
AnnaBridge 181:57724642e740 214 irq_n = USART3_8_IRQn;
AnnaBridge 181:57724642e740 215 vector = (uint32_t)&uart3_8_irq;
AnnaBridge 181:57724642e740 216 }
AnnaBridge 181:57724642e740 217 #endif
AnnaBridge 181:57724642e740 218
AnnaBridge 181:57724642e740 219 #if defined(USART8_BASE)
AnnaBridge 181:57724642e740 220 if (obj_s->uart == UART_8) {
AnnaBridge 181:57724642e740 221 irq_n = USART3_8_IRQn;
AnnaBridge 181:57724642e740 222 vector = (uint32_t)&uart3_8_irq;
AnnaBridge 181:57724642e740 223 }
AnnaBridge 167:e84263d55307 224 #endif
AnnaBridge 167:e84263d55307 225
AnnaBridge 167:e84263d55307 226 if (enable) {
AnnaBridge 167:e84263d55307 227 if (irq == RxIrq) {
AnnaBridge 167:e84263d55307 228 __HAL_UART_ENABLE_IT(huart, UART_IT_RXNE);
AnnaBridge 167:e84263d55307 229 } else { // TxIrq
Kojto 170:19eb464bc2be 230 __HAL_UART_ENABLE_IT(huart, UART_IT_TXE);
AnnaBridge 167:e84263d55307 231 }
AnnaBridge 167:e84263d55307 232 NVIC_SetVector(irq_n, vector);
AnnaBridge 167:e84263d55307 233 NVIC_EnableIRQ(irq_n);
AnnaBridge 167:e84263d55307 234
AnnaBridge 167:e84263d55307 235 } else { // disable
AnnaBridge 167:e84263d55307 236 int all_disabled = 0;
AnnaBridge 167:e84263d55307 237 if (irq == RxIrq) {
AnnaBridge 167:e84263d55307 238 __HAL_UART_DISABLE_IT(huart, UART_IT_RXNE);
AnnaBridge 167:e84263d55307 239 // Check if TxIrq is disabled too
AnnaBridge 167:e84263d55307 240 if ((huart->Instance->CR1 & USART_CR1_TXEIE) == 0) {
AnnaBridge 167:e84263d55307 241 all_disabled = 1;
AnnaBridge 167:e84263d55307 242 }
AnnaBridge 167:e84263d55307 243 } else { // TxIrq
Kojto 170:19eb464bc2be 244 __HAL_UART_DISABLE_IT(huart, UART_IT_TXE);
AnnaBridge 167:e84263d55307 245 // Check if RxIrq is disabled too
AnnaBridge 167:e84263d55307 246 if ((huart->Instance->CR1 & USART_CR1_RXNEIE) == 0) {
AnnaBridge 167:e84263d55307 247 all_disabled = 1;
AnnaBridge 167:e84263d55307 248 }
AnnaBridge 167:e84263d55307 249 }
AnnaBridge 167:e84263d55307 250
AnnaBridge 167:e84263d55307 251 if (all_disabled) {
AnnaBridge 181:57724642e740 252 NVIC_DisableIRQ(irq_n);
AnnaBridge 167:e84263d55307 253 }
AnnaBridge 167:e84263d55307 254 }
AnnaBridge 167:e84263d55307 255 }
AnnaBridge 167:e84263d55307 256
AnnaBridge 167:e84263d55307 257 /******************************************************************************
AnnaBridge 167:e84263d55307 258 * READ/WRITE
AnnaBridge 167:e84263d55307 259 ******************************************************************************/
AnnaBridge 167:e84263d55307 260
AnnaBridge 167:e84263d55307 261 int serial_getc(serial_t *obj)
AnnaBridge 167:e84263d55307 262 {
AnnaBridge 167:e84263d55307 263 struct serial_s *obj_s = SERIAL_S(obj);
AnnaBridge 167:e84263d55307 264 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
AnnaBridge 167:e84263d55307 265
AnnaBridge 167:e84263d55307 266 while (!serial_readable(obj));
AnnaBridge 167:e84263d55307 267 return (int)(huart->Instance->RDR & (uint16_t)0xFF);
AnnaBridge 167:e84263d55307 268 }
AnnaBridge 167:e84263d55307 269
AnnaBridge 167:e84263d55307 270 void serial_putc(serial_t *obj, int c)
AnnaBridge 167:e84263d55307 271 {
AnnaBridge 167:e84263d55307 272 struct serial_s *obj_s = SERIAL_S(obj);
AnnaBridge 167:e84263d55307 273 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
AnnaBridge 167:e84263d55307 274
AnnaBridge 167:e84263d55307 275 while (!serial_writable(obj));
AnnaBridge 167:e84263d55307 276 huart->Instance->TDR = (uint32_t)(c & (uint16_t)0xFF);
AnnaBridge 167:e84263d55307 277 }
AnnaBridge 167:e84263d55307 278
AnnaBridge 167:e84263d55307 279 void serial_clear(serial_t *obj)
AnnaBridge 167:e84263d55307 280 {
AnnaBridge 167:e84263d55307 281 struct serial_s *obj_s = SERIAL_S(obj);
AnnaBridge 167:e84263d55307 282 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
AnnaBridge 167:e84263d55307 283
AnnaBridge 167:e84263d55307 284 huart->TxXferCount = 0;
AnnaBridge 167:e84263d55307 285 huart->RxXferCount = 0;
AnnaBridge 167:e84263d55307 286 }
AnnaBridge 167:e84263d55307 287
AnnaBridge 167:e84263d55307 288 void serial_break_set(serial_t *obj)
AnnaBridge 167:e84263d55307 289 {
AnnaBridge 167:e84263d55307 290 struct serial_s *obj_s = SERIAL_S(obj);
AnnaBridge 177:d650f5d4c87a 291 UART_HandleTypeDef *huart __attribute__((unused)) = &uart_handlers[obj_s->index];
AnnaBridge 167:e84263d55307 292 }
AnnaBridge 167:e84263d55307 293
AnnaBridge 167:e84263d55307 294 #if DEVICE_SERIAL_ASYNCH
AnnaBridge 167:e84263d55307 295
AnnaBridge 167:e84263d55307 296 /******************************************************************************
AnnaBridge 167:e84263d55307 297 * LOCAL HELPER FUNCTIONS
AnnaBridge 167:e84263d55307 298 ******************************************************************************/
AnnaBridge 167:e84263d55307 299
AnnaBridge 167:e84263d55307 300 /**
AnnaBridge 167:e84263d55307 301 * Configure the TX buffer for an asynchronous write serial transaction
AnnaBridge 167:e84263d55307 302 *
AnnaBridge 167:e84263d55307 303 * @param obj The serial object.
AnnaBridge 167:e84263d55307 304 * @param tx The buffer for sending.
AnnaBridge 167:e84263d55307 305 * @param tx_length The number of words to transmit.
AnnaBridge 167:e84263d55307 306 */
AnnaBridge 167:e84263d55307 307 static void serial_tx_buffer_set(serial_t *obj, void *tx, int tx_length, uint8_t width)
AnnaBridge 167:e84263d55307 308 {
AnnaBridge 167:e84263d55307 309 (void)width;
AnnaBridge 167:e84263d55307 310
AnnaBridge 167:e84263d55307 311 // Exit if a transmit is already on-going
AnnaBridge 167:e84263d55307 312 if (serial_tx_active(obj)) {
AnnaBridge 167:e84263d55307 313 return;
AnnaBridge 167:e84263d55307 314 }
AnnaBridge 167:e84263d55307 315
AnnaBridge 167:e84263d55307 316 obj->tx_buff.buffer = tx;
AnnaBridge 167:e84263d55307 317 obj->tx_buff.length = tx_length;
AnnaBridge 167:e84263d55307 318 obj->tx_buff.pos = 0;
AnnaBridge 167:e84263d55307 319 }
AnnaBridge 167:e84263d55307 320
AnnaBridge 167:e84263d55307 321 /**
AnnaBridge 167:e84263d55307 322 * Configure the RX buffer for an asynchronous write serial transaction
AnnaBridge 167:e84263d55307 323 *
AnnaBridge 167:e84263d55307 324 * @param obj The serial object.
AnnaBridge 167:e84263d55307 325 * @param tx The buffer for sending.
AnnaBridge 167:e84263d55307 326 * @param tx_length The number of words to transmit.
AnnaBridge 167:e84263d55307 327 */
AnnaBridge 167:e84263d55307 328 static void serial_rx_buffer_set(serial_t *obj, void *rx, int rx_length, uint8_t width)
AnnaBridge 167:e84263d55307 329 {
AnnaBridge 167:e84263d55307 330 (void)width;
AnnaBridge 167:e84263d55307 331
AnnaBridge 167:e84263d55307 332 // Exit if a reception is already on-going
AnnaBridge 167:e84263d55307 333 if (serial_rx_active(obj)) {
AnnaBridge 167:e84263d55307 334 return;
AnnaBridge 167:e84263d55307 335 }
AnnaBridge 167:e84263d55307 336
AnnaBridge 167:e84263d55307 337 obj->rx_buff.buffer = rx;
AnnaBridge 167:e84263d55307 338 obj->rx_buff.length = rx_length;
AnnaBridge 167:e84263d55307 339 obj->rx_buff.pos = 0;
AnnaBridge 167:e84263d55307 340 }
AnnaBridge 167:e84263d55307 341
AnnaBridge 167:e84263d55307 342 /**
AnnaBridge 167:e84263d55307 343 * Configure events
AnnaBridge 167:e84263d55307 344 *
AnnaBridge 167:e84263d55307 345 * @param obj The serial object
AnnaBridge 167:e84263d55307 346 * @param event The logical OR of the events to configure
AnnaBridge 167:e84263d55307 347 * @param enable Set to non-zero to enable events, or zero to disable them
AnnaBridge 167:e84263d55307 348 */
AnnaBridge 167:e84263d55307 349 static void serial_enable_event(serial_t *obj, int event, uint8_t enable)
AnnaBridge 167:e84263d55307 350 {
AnnaBridge 167:e84263d55307 351 struct serial_s *obj_s = SERIAL_S(obj);
AnnaBridge 167:e84263d55307 352
AnnaBridge 167:e84263d55307 353 // Shouldn't have to enable interrupt here, just need to keep track of the requested events.
AnnaBridge 167:e84263d55307 354 if (enable) {
AnnaBridge 167:e84263d55307 355 obj_s->events |= event;
AnnaBridge 167:e84263d55307 356 } else {
AnnaBridge 167:e84263d55307 357 obj_s->events &= ~event;
AnnaBridge 167:e84263d55307 358 }
AnnaBridge 167:e84263d55307 359 }
AnnaBridge 167:e84263d55307 360
AnnaBridge 167:e84263d55307 361
AnnaBridge 167:e84263d55307 362 /**
AnnaBridge 167:e84263d55307 363 * Get index of serial object TX IRQ, relating it to the physical peripheral.
AnnaBridge 167:e84263d55307 364 *
AnnaBridge 181:57724642e740 365 * @param uart_name i.e. UART_1, UART_2, ...
AnnaBridge 167:e84263d55307 366 * @return internal NVIC TX IRQ index of U(S)ART peripheral
AnnaBridge 167:e84263d55307 367 */
AnnaBridge 181:57724642e740 368 static IRQn_Type serial_get_irq_n(UARTName uart_name)
AnnaBridge 167:e84263d55307 369 {
AnnaBridge 167:e84263d55307 370 IRQn_Type irq_n;
AnnaBridge 167:e84263d55307 371
AnnaBridge 181:57724642e740 372 switch (uart_name) {
AnnaBridge 181:57724642e740 373
AnnaBridge 167:e84263d55307 374 #if defined(USART1_BASE)
AnnaBridge 181:57724642e740 375 case UART_1:
AnnaBridge 167:e84263d55307 376 irq_n = USART1_IRQn;
AnnaBridge 167:e84263d55307 377 break;
AnnaBridge 167:e84263d55307 378 #endif
AnnaBridge 181:57724642e740 379
AnnaBridge 167:e84263d55307 380 #if defined(USART2_BASE)
AnnaBridge 181:57724642e740 381 case UART_2:
AnnaBridge 167:e84263d55307 382 irq_n = USART2_IRQn;
AnnaBridge 167:e84263d55307 383 break;
AnnaBridge 167:e84263d55307 384 #endif
AnnaBridge 181:57724642e740 385
AnnaBridge 181:57724642e740 386 #if defined(USART3_BASE)
AnnaBridge 181:57724642e740 387 case UART_3:
AnnaBridge 167:e84263d55307 388 #if defined (TARGET_STM32F091RC)
AnnaBridge 181:57724642e740 389 irq_n = USART3_8_IRQn;
AnnaBridge 181:57724642e740 390 #else
AnnaBridge 181:57724642e740 391 irq_n = USART3_4_IRQn;
AnnaBridge 181:57724642e740 392 #endif
AnnaBridge 181:57724642e740 393 break;
AnnaBridge 181:57724642e740 394 #endif
AnnaBridge 181:57724642e740 395
AnnaBridge 181:57724642e740 396 #if defined(USART4_BASE)
AnnaBridge 181:57724642e740 397 case UART_4:
AnnaBridge 181:57724642e740 398 #if defined (TARGET_STM32F091RC)
AnnaBridge 181:57724642e740 399 irq_n = USART3_8_IRQn;
AnnaBridge 181:57724642e740 400 #else
AnnaBridge 181:57724642e740 401 irq_n = USART3_4_IRQn;
AnnaBridge 181:57724642e740 402 #endif
AnnaBridge 181:57724642e740 403 break;
AnnaBridge 181:57724642e740 404 #endif
AnnaBridge 181:57724642e740 405
AnnaBridge 181:57724642e740 406 #if defined(USART5_BASE)
AnnaBridge 181:57724642e740 407 case UART_5:
AnnaBridge 167:e84263d55307 408 irq_n = USART3_8_IRQn;
AnnaBridge 167:e84263d55307 409 break;
AnnaBridge 181:57724642e740 410 #endif
AnnaBridge 181:57724642e740 411
AnnaBridge 181:57724642e740 412 #if defined(USART6_BASE)
AnnaBridge 181:57724642e740 413 case UART_6:
AnnaBridge 181:57724642e740 414 irq_n = USART3_8_IRQn;
AnnaBridge 167:e84263d55307 415 break;
AnnaBridge 167:e84263d55307 416 #endif
AnnaBridge 181:57724642e740 417
AnnaBridge 181:57724642e740 418 #if defined(USART7_BASE)
AnnaBridge 181:57724642e740 419 case UART_7:
AnnaBridge 181:57724642e740 420 irq_n = USART3_8_IRQn;
AnnaBridge 181:57724642e740 421 break;
AnnaBridge 181:57724642e740 422 #endif
AnnaBridge 181:57724642e740 423
AnnaBridge 181:57724642e740 424 #if defined(USART8_BASE)
AnnaBridge 181:57724642e740 425 case UART_8:
AnnaBridge 181:57724642e740 426 irq_n = USART3_8_IRQn;
AnnaBridge 181:57724642e740 427 break;
AnnaBridge 181:57724642e740 428 #endif
AnnaBridge 181:57724642e740 429
AnnaBridge 167:e84263d55307 430 default:
AnnaBridge 167:e84263d55307 431 irq_n = (IRQn_Type)0;
AnnaBridge 167:e84263d55307 432 }
AnnaBridge 181:57724642e740 433
AnnaBridge 167:e84263d55307 434 return irq_n;
AnnaBridge 167:e84263d55307 435 }
AnnaBridge 167:e84263d55307 436
AnnaBridge 167:e84263d55307 437
AnnaBridge 167:e84263d55307 438 /******************************************************************************
AnnaBridge 167:e84263d55307 439 * MBED API FUNCTIONS
AnnaBridge 167:e84263d55307 440 ******************************************************************************/
AnnaBridge 167:e84263d55307 441
AnnaBridge 167:e84263d55307 442 /**
AnnaBridge 167:e84263d55307 443 * Begin asynchronous TX transfer. The used buffer is specified in the serial
AnnaBridge 167:e84263d55307 444 * object, tx_buff
AnnaBridge 167:e84263d55307 445 *
AnnaBridge 167:e84263d55307 446 * @param obj The serial object
AnnaBridge 167:e84263d55307 447 * @param tx The buffer for sending
AnnaBridge 167:e84263d55307 448 * @param tx_length The number of words to transmit
AnnaBridge 167:e84263d55307 449 * @param tx_width The bit width of buffer word
AnnaBridge 167:e84263d55307 450 * @param handler The serial handler
AnnaBridge 167:e84263d55307 451 * @param event The logical OR of events to be registered
AnnaBridge 167:e84263d55307 452 * @param hint A suggestion for how to use DMA with this transfer
AnnaBridge 167:e84263d55307 453 * @return Returns number of data transfered, or 0 otherwise
AnnaBridge 167:e84263d55307 454 */
AnnaBridge 167:e84263d55307 455 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)
AnnaBridge 167:e84263d55307 456 {
AnnaBridge 167:e84263d55307 457 // TODO: DMA usage is currently ignored
AnnaBridge 167:e84263d55307 458 (void) hint;
AnnaBridge 167:e84263d55307 459
AnnaBridge 167:e84263d55307 460 // Check buffer is ok
AnnaBridge 167:e84263d55307 461 MBED_ASSERT(tx != (void*)0);
AnnaBridge 167:e84263d55307 462 MBED_ASSERT(tx_width == 8); // support only 8b width
AnnaBridge 167:e84263d55307 463
AnnaBridge 167:e84263d55307 464 struct serial_s *obj_s = SERIAL_S(obj);
AnnaBridge 167:e84263d55307 465 UART_HandleTypeDef * huart = &uart_handlers[obj_s->index];
AnnaBridge 167:e84263d55307 466
AnnaBridge 167:e84263d55307 467 if (tx_length == 0) {
AnnaBridge 167:e84263d55307 468 return 0;
AnnaBridge 167:e84263d55307 469 }
AnnaBridge 167:e84263d55307 470
AnnaBridge 167:e84263d55307 471 // Set up buffer
AnnaBridge 167:e84263d55307 472 serial_tx_buffer_set(obj, (void *)tx, tx_length, tx_width);
AnnaBridge 167:e84263d55307 473
AnnaBridge 167:e84263d55307 474 // Set up events
AnnaBridge 167:e84263d55307 475 serial_enable_event(obj, SERIAL_EVENT_TX_ALL, 0); // Clear all events
AnnaBridge 167:e84263d55307 476 serial_enable_event(obj, event, 1); // Set only the wanted events
AnnaBridge 167:e84263d55307 477
AnnaBridge 167:e84263d55307 478 // Enable interrupt
AnnaBridge 181:57724642e740 479 IRQn_Type irq_n = serial_get_irq_n(obj_s->uart);
AnnaBridge 167:e84263d55307 480 NVIC_ClearPendingIRQ(irq_n);
AnnaBridge 167:e84263d55307 481 NVIC_DisableIRQ(irq_n);
AnnaBridge 167:e84263d55307 482 NVIC_SetPriority(irq_n, 1);
AnnaBridge 167:e84263d55307 483 NVIC_SetVector(irq_n, (uint32_t)handler);
AnnaBridge 167:e84263d55307 484 NVIC_EnableIRQ(irq_n);
AnnaBridge 167:e84263d55307 485
AnnaBridge 167:e84263d55307 486 // the following function will enable UART_IT_TXE and error interrupts
AnnaBridge 167:e84263d55307 487 if (HAL_UART_Transmit_IT(huart, (uint8_t*)tx, tx_length) != HAL_OK) {
AnnaBridge 167:e84263d55307 488 return 0;
AnnaBridge 167:e84263d55307 489 }
AnnaBridge 167:e84263d55307 490
AnnaBridge 167:e84263d55307 491 return tx_length;
AnnaBridge 167:e84263d55307 492 }
AnnaBridge 167:e84263d55307 493
AnnaBridge 167:e84263d55307 494 /**
AnnaBridge 167:e84263d55307 495 * Begin asynchronous RX transfer (enable interrupt for data collecting)
AnnaBridge 167:e84263d55307 496 * The used buffer is specified in the serial object, rx_buff
AnnaBridge 167:e84263d55307 497 *
AnnaBridge 167:e84263d55307 498 * @param obj The serial object
AnnaBridge 167:e84263d55307 499 * @param rx The buffer for sending
AnnaBridge 167:e84263d55307 500 * @param rx_length The number of words to transmit
AnnaBridge 167:e84263d55307 501 * @param rx_width The bit width of buffer word
AnnaBridge 167:e84263d55307 502 * @param handler The serial handler
AnnaBridge 167:e84263d55307 503 * @param event The logical OR of events to be registered
AnnaBridge 167:e84263d55307 504 * @param handler The serial handler
AnnaBridge 167:e84263d55307 505 * @param char_match A character in range 0-254 to be matched
AnnaBridge 167:e84263d55307 506 * @param hint A suggestion for how to use DMA with this transfer
AnnaBridge 167:e84263d55307 507 */
AnnaBridge 167:e84263d55307 508 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)
AnnaBridge 167:e84263d55307 509 {
AnnaBridge 167:e84263d55307 510 // TODO: DMA usage is currently ignored
AnnaBridge 167:e84263d55307 511 (void) hint;
AnnaBridge 167:e84263d55307 512
AnnaBridge 167:e84263d55307 513 /* Sanity check arguments */
AnnaBridge 167:e84263d55307 514 MBED_ASSERT(obj);
AnnaBridge 167:e84263d55307 515 MBED_ASSERT(rx != (void*)0);
AnnaBridge 167:e84263d55307 516 MBED_ASSERT(rx_width == 8); // support only 8b width
AnnaBridge 167:e84263d55307 517
AnnaBridge 167:e84263d55307 518 struct serial_s *obj_s = SERIAL_S(obj);
AnnaBridge 167:e84263d55307 519 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
AnnaBridge 167:e84263d55307 520
AnnaBridge 167:e84263d55307 521 serial_enable_event(obj, SERIAL_EVENT_RX_ALL, 0);
AnnaBridge 167:e84263d55307 522 serial_enable_event(obj, event, 1);
AnnaBridge 167:e84263d55307 523
AnnaBridge 167:e84263d55307 524 // set CharMatch
AnnaBridge 167:e84263d55307 525 obj->char_match = char_match;
AnnaBridge 167:e84263d55307 526
AnnaBridge 167:e84263d55307 527 serial_rx_buffer_set(obj, rx, rx_length, rx_width);
AnnaBridge 167:e84263d55307 528
AnnaBridge 181:57724642e740 529 IRQn_Type irq_n = serial_get_irq_n(obj_s->uart);
AnnaBridge 167:e84263d55307 530 NVIC_ClearPendingIRQ(irq_n);
AnnaBridge 167:e84263d55307 531 NVIC_DisableIRQ(irq_n);
AnnaBridge 167:e84263d55307 532 NVIC_SetPriority(irq_n, 0);
AnnaBridge 167:e84263d55307 533 NVIC_SetVector(irq_n, (uint32_t)handler);
AnnaBridge 167:e84263d55307 534 NVIC_EnableIRQ(irq_n);
AnnaBridge 167:e84263d55307 535
AnnaBridge 167:e84263d55307 536 // following HAL function will enable the RXNE interrupt + error interrupts
AnnaBridge 167:e84263d55307 537 HAL_UART_Receive_IT(huart, (uint8_t*)rx, rx_length);
AnnaBridge 167:e84263d55307 538 }
AnnaBridge 167:e84263d55307 539
AnnaBridge 167:e84263d55307 540 /**
AnnaBridge 167:e84263d55307 541 * Attempts to determine if the serial peripheral is already in use for TX
AnnaBridge 167:e84263d55307 542 *
AnnaBridge 167:e84263d55307 543 * @param obj The serial object
AnnaBridge 167:e84263d55307 544 * @return Non-zero if the TX transaction is ongoing, 0 otherwise
AnnaBridge 167:e84263d55307 545 */
AnnaBridge 167:e84263d55307 546 uint8_t serial_tx_active(serial_t *obj)
AnnaBridge 167:e84263d55307 547 {
AnnaBridge 167:e84263d55307 548 MBED_ASSERT(obj);
AnnaBridge 167:e84263d55307 549
AnnaBridge 167:e84263d55307 550 struct serial_s *obj_s = SERIAL_S(obj);
AnnaBridge 167:e84263d55307 551 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
AnnaBridge 167:e84263d55307 552
AnnaBridge 167:e84263d55307 553 return ((HAL_UART_GetState(huart) == HAL_UART_STATE_BUSY_TX) ? 1 : 0);
AnnaBridge 167:e84263d55307 554 }
AnnaBridge 167:e84263d55307 555
AnnaBridge 167:e84263d55307 556 /**
AnnaBridge 167:e84263d55307 557 * Attempts to determine if the serial peripheral is already in use for RX
AnnaBridge 167:e84263d55307 558 *
AnnaBridge 167:e84263d55307 559 * @param obj The serial object
AnnaBridge 167:e84263d55307 560 * @return Non-zero if the RX transaction is ongoing, 0 otherwise
AnnaBridge 167:e84263d55307 561 */
AnnaBridge 167:e84263d55307 562 uint8_t serial_rx_active(serial_t *obj)
AnnaBridge 167:e84263d55307 563 {
AnnaBridge 167:e84263d55307 564 MBED_ASSERT(obj);
AnnaBridge 167:e84263d55307 565
AnnaBridge 167:e84263d55307 566 struct serial_s *obj_s = SERIAL_S(obj);
AnnaBridge 167:e84263d55307 567 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
AnnaBridge 167:e84263d55307 568
AnnaBridge 167:e84263d55307 569 return ((HAL_UART_GetState(huart) == HAL_UART_STATE_BUSY_RX) ? 1 : 0);
AnnaBridge 167:e84263d55307 570 }
AnnaBridge 167:e84263d55307 571
AnnaBridge 167:e84263d55307 572 void HAL_UART_TxCpltCallback(UART_HandleTypeDef *huart) {
AnnaBridge 167:e84263d55307 573 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_TC) != RESET) {
AnnaBridge 167:e84263d55307 574 __HAL_UART_CLEAR_FLAG(huart, UART_CLEAR_TCF);
AnnaBridge 167:e84263d55307 575 }
AnnaBridge 167:e84263d55307 576 }
AnnaBridge 167:e84263d55307 577
AnnaBridge 167:e84263d55307 578 void HAL_UART_ErrorCallback(UART_HandleTypeDef *huart) {
AnnaBridge 167:e84263d55307 579 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_PE) != RESET) {
AnnaBridge 167:e84263d55307 580 __HAL_UART_CLEAR_FLAG(huart, UART_CLEAR_PEF);
AnnaBridge 167:e84263d55307 581 }
AnnaBridge 167:e84263d55307 582 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_FE) != RESET) {
AnnaBridge 167:e84263d55307 583 __HAL_UART_CLEAR_FLAG(huart, UART_CLEAR_FEF);
AnnaBridge 167:e84263d55307 584 }
AnnaBridge 167:e84263d55307 585 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_NE) != RESET) {
AnnaBridge 167:e84263d55307 586 __HAL_UART_CLEAR_FLAG(huart, UART_CLEAR_NEF);
AnnaBridge 167:e84263d55307 587 }
AnnaBridge 167:e84263d55307 588 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_ORE) != RESET) {
AnnaBridge 167:e84263d55307 589 __HAL_UART_CLEAR_FLAG(huart, UART_CLEAR_OREF);
AnnaBridge 167:e84263d55307 590 }
AnnaBridge 167:e84263d55307 591 }
AnnaBridge 167:e84263d55307 592
AnnaBridge 167:e84263d55307 593 /**
AnnaBridge 167:e84263d55307 594 * The asynchronous TX and RX handler.
AnnaBridge 167:e84263d55307 595 *
AnnaBridge 167:e84263d55307 596 * @param obj The serial object
AnnaBridge 167:e84263d55307 597 * @return Returns event flags if a TX/RX transfer termination condition was met or 0 otherwise
AnnaBridge 167:e84263d55307 598 */
AnnaBridge 167:e84263d55307 599 int serial_irq_handler_asynch(serial_t *obj)
AnnaBridge 167:e84263d55307 600 {
AnnaBridge 167:e84263d55307 601 struct serial_s *obj_s = SERIAL_S(obj);
AnnaBridge 167:e84263d55307 602 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
AnnaBridge 167:e84263d55307 603
AnnaBridge 167:e84263d55307 604 volatile int return_event = 0;
AnnaBridge 167:e84263d55307 605 uint8_t *buf = (uint8_t*)(obj->rx_buff.buffer);
AnnaBridge 167:e84263d55307 606 uint8_t i = 0;
AnnaBridge 167:e84263d55307 607
AnnaBridge 167:e84263d55307 608 // TX PART:
AnnaBridge 167:e84263d55307 609 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_TC) != RESET) {
AnnaBridge 167:e84263d55307 610 if (__HAL_UART_GET_IT_SOURCE(huart, UART_IT_TC) != RESET) {
AnnaBridge 167:e84263d55307 611 // Return event SERIAL_EVENT_TX_COMPLETE if requested
AnnaBridge 167:e84263d55307 612 if ((obj_s->events & SERIAL_EVENT_TX_COMPLETE ) != 0) {
AnnaBridge 167:e84263d55307 613 return_event |= (SERIAL_EVENT_TX_COMPLETE & obj_s->events);
AnnaBridge 167:e84263d55307 614 }
AnnaBridge 167:e84263d55307 615 }
AnnaBridge 167:e84263d55307 616 }
AnnaBridge 167:e84263d55307 617
AnnaBridge 167:e84263d55307 618 // Handle error events
AnnaBridge 167:e84263d55307 619 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_PE) != RESET) {
Kojto 169:e3b6fe271b81 620 if (__HAL_UART_GET_IT(huart, UART_IT_PE) != RESET) {
AnnaBridge 167:e84263d55307 621 return_event |= (SERIAL_EVENT_RX_PARITY_ERROR & obj_s->events);
AnnaBridge 167:e84263d55307 622 }
AnnaBridge 167:e84263d55307 623 }
AnnaBridge 167:e84263d55307 624
AnnaBridge 167:e84263d55307 625 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_FE) != RESET) {
Kojto 169:e3b6fe271b81 626 if (__HAL_UART_GET_IT(huart, UART_IT_FE) != RESET) {
AnnaBridge 167:e84263d55307 627 return_event |= (SERIAL_EVENT_RX_FRAMING_ERROR & obj_s->events);
AnnaBridge 167:e84263d55307 628 }
AnnaBridge 167:e84263d55307 629 }
AnnaBridge 167:e84263d55307 630
AnnaBridge 167:e84263d55307 631 if (__HAL_UART_GET_FLAG(huart, UART_FLAG_ORE) != RESET) {
Kojto 169:e3b6fe271b81 632 if (__HAL_UART_GET_IT(huart, UART_IT_ORE) != RESET) {
AnnaBridge 167:e84263d55307 633 return_event |= (SERIAL_EVENT_RX_OVERRUN_ERROR & obj_s->events);
AnnaBridge 167:e84263d55307 634 }
AnnaBridge 167:e84263d55307 635 }
AnnaBridge 167:e84263d55307 636
AnnaBridge 167:e84263d55307 637 HAL_UART_IRQHandler(huart);
AnnaBridge 167:e84263d55307 638
AnnaBridge 167:e84263d55307 639 // Abort if an error occurs
AnnaBridge 177:d650f5d4c87a 640 if ((return_event & SERIAL_EVENT_RX_PARITY_ERROR) ||
AnnaBridge 177:d650f5d4c87a 641 (return_event & SERIAL_EVENT_RX_FRAMING_ERROR) ||
AnnaBridge 177:d650f5d4c87a 642 (return_event & SERIAL_EVENT_RX_OVERRUN_ERROR)) {
AnnaBridge 167:e84263d55307 643 return return_event;
AnnaBridge 167:e84263d55307 644 }
AnnaBridge 167:e84263d55307 645
AnnaBridge 167:e84263d55307 646 //RX PART
AnnaBridge 167:e84263d55307 647 if (huart->RxXferSize != 0) {
AnnaBridge 167:e84263d55307 648 obj->rx_buff.pos = huart->RxXferSize - huart->RxXferCount;
AnnaBridge 167:e84263d55307 649 }
AnnaBridge 167:e84263d55307 650 if ((huart->RxXferCount == 0) && (obj->rx_buff.pos >= (obj->rx_buff.length - 1))) {
AnnaBridge 167:e84263d55307 651 return_event |= (SERIAL_EVENT_RX_COMPLETE & obj_s->events);
AnnaBridge 167:e84263d55307 652 }
AnnaBridge 167:e84263d55307 653
AnnaBridge 167:e84263d55307 654 // Check if char_match is present
AnnaBridge 167:e84263d55307 655 if (obj_s->events & SERIAL_EVENT_RX_CHARACTER_MATCH) {
AnnaBridge 167:e84263d55307 656 if (buf != NULL) {
AnnaBridge 167:e84263d55307 657 for (i = 0; i < obj->rx_buff.pos; i++) {
AnnaBridge 167:e84263d55307 658 if (buf[i] == obj->char_match) {
AnnaBridge 167:e84263d55307 659 obj->rx_buff.pos = i;
AnnaBridge 167:e84263d55307 660 return_event |= (SERIAL_EVENT_RX_CHARACTER_MATCH & obj_s->events);
AnnaBridge 167:e84263d55307 661 serial_rx_abort_asynch(obj);
AnnaBridge 167:e84263d55307 662 break;
AnnaBridge 167:e84263d55307 663 }
AnnaBridge 167:e84263d55307 664 }
AnnaBridge 167:e84263d55307 665 }
AnnaBridge 167:e84263d55307 666 }
AnnaBridge 167:e84263d55307 667
AnnaBridge 167:e84263d55307 668 return return_event;
AnnaBridge 167:e84263d55307 669 }
AnnaBridge 167:e84263d55307 670
AnnaBridge 167:e84263d55307 671 /**
AnnaBridge 167:e84263d55307 672 * Abort the ongoing TX transaction. It disables the enabled interupt for TX and
AnnaBridge 167:e84263d55307 673 * flush TX hardware buffer if TX FIFO is used
AnnaBridge 167:e84263d55307 674 *
AnnaBridge 167:e84263d55307 675 * @param obj The serial object
AnnaBridge 167:e84263d55307 676 */
AnnaBridge 167:e84263d55307 677 void serial_tx_abort_asynch(serial_t *obj)
AnnaBridge 167:e84263d55307 678 {
AnnaBridge 167:e84263d55307 679 struct serial_s *obj_s = SERIAL_S(obj);
AnnaBridge 167:e84263d55307 680 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
AnnaBridge 167:e84263d55307 681
AnnaBridge 167:e84263d55307 682 __HAL_UART_DISABLE_IT(huart, UART_IT_TC);
AnnaBridge 167:e84263d55307 683 __HAL_UART_DISABLE_IT(huart, UART_IT_TXE);
AnnaBridge 167:e84263d55307 684
AnnaBridge 167:e84263d55307 685 // clear flags
AnnaBridge 167:e84263d55307 686 __HAL_UART_CLEAR_FLAG(huart, UART_CLEAR_TCF);
AnnaBridge 181:57724642e740 687
AnnaBridge 167:e84263d55307 688 // reset states
AnnaBridge 167:e84263d55307 689 huart->TxXferCount = 0;
AnnaBridge 167:e84263d55307 690 // update handle state
AnnaBridge 167:e84263d55307 691 if(huart->gState == HAL_UART_STATE_BUSY_TX_RX) {
AnnaBridge 167:e84263d55307 692 huart->gState = HAL_UART_STATE_BUSY_RX;
AnnaBridge 167:e84263d55307 693 } else {
AnnaBridge 167:e84263d55307 694 huart->gState = HAL_UART_STATE_READY;
AnnaBridge 167:e84263d55307 695 }
AnnaBridge 167:e84263d55307 696 }
AnnaBridge 167:e84263d55307 697
AnnaBridge 167:e84263d55307 698 /**
AnnaBridge 167:e84263d55307 699 * Abort the ongoing RX transaction It disables the enabled interrupt for RX and
AnnaBridge 167:e84263d55307 700 * flush RX hardware buffer if RX FIFO is used
AnnaBridge 167:e84263d55307 701 *
AnnaBridge 167:e84263d55307 702 * @param obj The serial object
AnnaBridge 167:e84263d55307 703 */
AnnaBridge 167:e84263d55307 704 void serial_rx_abort_asynch(serial_t *obj)
AnnaBridge 167:e84263d55307 705 {
AnnaBridge 167:e84263d55307 706 struct serial_s *obj_s = SERIAL_S(obj);
AnnaBridge 167:e84263d55307 707 UART_HandleTypeDef *huart = &uart_handlers[obj_s->index];
AnnaBridge 167:e84263d55307 708
AnnaBridge 167:e84263d55307 709 // disable interrupts
AnnaBridge 167:e84263d55307 710 __HAL_UART_DISABLE_IT(huart, UART_IT_RXNE);
AnnaBridge 167:e84263d55307 711 __HAL_UART_DISABLE_IT(huart, UART_IT_PE);
AnnaBridge 167:e84263d55307 712 __HAL_UART_DISABLE_IT(huart, UART_IT_ERR);
AnnaBridge 167:e84263d55307 713
AnnaBridge 167:e84263d55307 714 // clear flags
AnnaBridge 167:e84263d55307 715 __HAL_UART_CLEAR_FLAG(huart, UART_CLEAR_PEF | UART_CLEAR_FEF | UART_CLEAR_OREF);
AnnaBridge 177:d650f5d4c87a 716 volatile uint32_t tmpval __attribute__((unused)) = huart->Instance->RDR; // Clear RXNE flag
AnnaBridge 167:e84263d55307 717
AnnaBridge 167:e84263d55307 718 // reset states
AnnaBridge 167:e84263d55307 719 huart->RxXferCount = 0;
AnnaBridge 167:e84263d55307 720 // update handle state
AnnaBridge 167:e84263d55307 721 if(huart->RxState == HAL_UART_STATE_BUSY_TX_RX) {
AnnaBridge 167:e84263d55307 722 huart->RxState = HAL_UART_STATE_BUSY_TX;
AnnaBridge 167:e84263d55307 723 } else {
AnnaBridge 167:e84263d55307 724 huart->RxState = HAL_UART_STATE_READY;
AnnaBridge 167:e84263d55307 725 }
AnnaBridge 167:e84263d55307 726 }
AnnaBridge 167:e84263d55307 727
Anna Bridge 180:96ed750bd169 728 #endif /* DEVICE_SERIAL_ASYNCH */
AnnaBridge 167:e84263d55307 729
AnnaBridge 167:e84263d55307 730 #if DEVICE_SERIAL_FC
AnnaBridge 167:e84263d55307 731
AnnaBridge 167:e84263d55307 732 /**
AnnaBridge 167:e84263d55307 733 * Set HW Control Flow
AnnaBridge 167:e84263d55307 734 * @param obj The serial object
AnnaBridge 167:e84263d55307 735 * @param type The Control Flow type (FlowControlNone, FlowControlRTS, FlowControlCTS, FlowControlRTSCTS)
AnnaBridge 167:e84263d55307 736 * @param rxflow Pin for the rxflow
AnnaBridge 167:e84263d55307 737 * @param txflow Pin for the txflow
AnnaBridge 167:e84263d55307 738 */
AnnaBridge 167:e84263d55307 739 void serial_set_flow_control(serial_t *obj, FlowControl type, PinName rxflow, PinName txflow)
AnnaBridge 167:e84263d55307 740 {
AnnaBridge 167:e84263d55307 741 struct serial_s *obj_s = SERIAL_S(obj);
AnnaBridge 167:e84263d55307 742
AnnaBridge 167:e84263d55307 743 // Determine the UART to use (UART_1, UART_2, ...)
AnnaBridge 167:e84263d55307 744 UARTName uart_rts = (UARTName)pinmap_peripheral(rxflow, PinMap_UART_RTS);
AnnaBridge 167:e84263d55307 745 UARTName uart_cts = (UARTName)pinmap_peripheral(txflow, PinMap_UART_CTS);
AnnaBridge 167:e84263d55307 746
AnnaBridge 167:e84263d55307 747 // Get the peripheral name (UART_1, UART_2, ...) from the pin and assign it to the object
AnnaBridge 167:e84263d55307 748 obj_s->uart = (UARTName)pinmap_merge(uart_cts, uart_rts);
AnnaBridge 167:e84263d55307 749 MBED_ASSERT(obj_s->uart != (UARTName)NC);
AnnaBridge 167:e84263d55307 750
AnnaBridge 167:e84263d55307 751 if(type == FlowControlNone) {
AnnaBridge 167:e84263d55307 752 // Disable hardware flow control
AnnaBridge 167:e84263d55307 753 obj_s->hw_flow_ctl = UART_HWCONTROL_NONE;
AnnaBridge 167:e84263d55307 754 }
AnnaBridge 167:e84263d55307 755 if (type == FlowControlRTS) {
AnnaBridge 167:e84263d55307 756 // Enable RTS
AnnaBridge 167:e84263d55307 757 MBED_ASSERT(uart_rts != (UARTName)NC);
AnnaBridge 167:e84263d55307 758 obj_s->hw_flow_ctl = UART_HWCONTROL_RTS;
AnnaBridge 167:e84263d55307 759 obj_s->pin_rts = rxflow;
AnnaBridge 167:e84263d55307 760 // Enable the pin for RTS function
AnnaBridge 167:e84263d55307 761 pinmap_pinout(rxflow, PinMap_UART_RTS);
AnnaBridge 167:e84263d55307 762 }
AnnaBridge 167:e84263d55307 763 if (type == FlowControlCTS) {
AnnaBridge 167:e84263d55307 764 // Enable CTS
AnnaBridge 167:e84263d55307 765 MBED_ASSERT(uart_cts != (UARTName)NC);
AnnaBridge 167:e84263d55307 766 obj_s->hw_flow_ctl = UART_HWCONTROL_CTS;
AnnaBridge 167:e84263d55307 767 obj_s->pin_cts = txflow;
AnnaBridge 167:e84263d55307 768 // Enable the pin for CTS function
AnnaBridge 167:e84263d55307 769 pinmap_pinout(txflow, PinMap_UART_CTS);
AnnaBridge 167:e84263d55307 770 }
AnnaBridge 167:e84263d55307 771 if (type == FlowControlRTSCTS) {
AnnaBridge 167:e84263d55307 772 // Enable CTS & RTS
AnnaBridge 167:e84263d55307 773 MBED_ASSERT(uart_rts != (UARTName)NC);
AnnaBridge 167:e84263d55307 774 MBED_ASSERT(uart_cts != (UARTName)NC);
AnnaBridge 167:e84263d55307 775 obj_s->hw_flow_ctl = UART_HWCONTROL_RTS_CTS;
AnnaBridge 167:e84263d55307 776 obj_s->pin_rts = rxflow;
AnnaBridge 167:e84263d55307 777 obj_s->pin_cts = txflow;
AnnaBridge 167:e84263d55307 778 // Enable the pin for CTS function
AnnaBridge 167:e84263d55307 779 pinmap_pinout(txflow, PinMap_UART_CTS);
AnnaBridge 167:e84263d55307 780 // Enable the pin for RTS function
AnnaBridge 167:e84263d55307 781 pinmap_pinout(rxflow, PinMap_UART_RTS);
AnnaBridge 167:e84263d55307 782 }
AnnaBridge 167:e84263d55307 783
AnnaBridge 167:e84263d55307 784 init_uart(obj);
AnnaBridge 167:e84263d55307 785 }
AnnaBridge 167:e84263d55307 786
Anna Bridge 180:96ed750bd169 787 #endif /* DEVICE_SERIAL_FC */
AnnaBridge 167:e84263d55307 788
Anna Bridge 180:96ed750bd169 789 #endif /* DEVICE_SERIAL */