Important changes to repositories hosted on mbed.com
Mbed hosted mercurial repositories are deprecated and are due to be permanently deleted in July 2026.
To keep a copy of this software download the repository Zip archive or clone locally using Mercurial.
It is also possible to export all your personal repositories from the account settings page.
Fork of mbed-dev by
targets/TARGET_STM/TARGET_STM32F0/serial_device.c@186:707f6e361f3e, 2018-06-22 (annotated)
- Committer:
- Anna Bridge
- Date:
- Fri Jun 22 16:45:37 2018 +0100
- Revision:
- 186:707f6e361f3e
- Parent:
- 181:57724642e740
- Child:
- 187:0387e8f68319
mbed-dev library. Release version 162
Who changed what in which revision?
User | Revision | Line number | New 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 |
Anna Bridge |
186:707f6e361f3e | 51 | extern 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 */ |