mbed library sources. Supersedes mbed-src.

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

Committer:
AnnaBridge
Date:
Wed Feb 20 22:31:08 2019 +0000
Revision:
189:f392fc9709a3
Parent:
187:0387e8f68319
mbed library release version 165

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