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