John Karatka / mbed

mbed

Fork of mbed-dev by mbed official

targets/TARGET_STM/TARGET_STM32F4/serial_device.c@181:96ed750bd169, 2018-01-17 (annotated)

Committer:
Anna Bridge
Date:
Wed Jan 17 15:23:54 2018 +0000
Revision:
181:96ed750bd169
Parent:
178:d650f5d4c87a
Child:
182:57724642e740
mbed-dev libray. Release version 158

Who changed what in which revision?

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