Rev 8 | Rev 10 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
2 | mjames | 1 | /* |
2 | * serial.c |
||
3 | * |
||
4 | * Created on: 4 Jan 2016 |
||
5 | * Author: Mike |
||
6 | * |
||
7 | * This (ab)uses the STMCubeMX HAL declarations to implement a generic STM32F1xx |
||
8 | * USART driver layer |
||
9 | mjames | 9 | * |
10 | * Note - this requires the UART interrupt to be globally enabled in STM32CubeMX, |
||
11 | * but not to generate IRQ handler or HAL driver for the UART. |
||
12 | * |
||
13 | * |
||
2 | mjames | 14 | */ |
15 | #include "libSerial/serial.h" |
||
16 | |||
17 | /* workspaces for the USARTS being used */ |
||
18 | #if defined SERIAL_UART1 |
||
19 | usart_ctl uc1; |
||
20 | #endif |
||
21 | #if defined SERIAL_UART2 |
||
22 | usart_ctl uc2; |
||
23 | #endif |
||
24 | #if defined SERIAL_UART3 |
||
25 | usart_ctl uc3; |
||
26 | #endif |
||
7 | mjames | 27 | #if defined SERIAL_UART4 |
28 | usart_ctl uc4; |
||
29 | #endif |
||
30 | #if defined SERIAL_UART5 |
||
31 | usart_ctl uc5; |
||
32 | #endif |
||
2 | mjames | 33 | |
34 | /* returns the number of characters received by the Rx USART */ |
||
35 | uint16_t |
||
8 | mjames | 36 | SerialCharsReceived(usart_ctl *instance) |
2 | mjames | 37 | { |
8 | mjames | 38 | uint16_t result = 0; // assume no characters received yet |
9 | mjames | 39 | |
8 | mjames | 40 | __HAL_UART_DISABLE_IT(instance->Handle, UART_IT_RXNE); |
2 | mjames | 41 | |
42 | if (instance->rx_usart_buffer_full) |
||
8 | mjames | 43 | { // buffer is full... |
44 | result = RX_USART_BUFF_SIZ; |
||
45 | } |
||
2 | mjames | 46 | else if (instance->rx_usart_in_Ptr >= instance->rx_usart_out_Ptr) |
8 | mjames | 47 | { // buffer has not wrapped... |
48 | result = instance->rx_usart_in_Ptr - instance->rx_usart_out_Ptr; |
||
49 | } |
||
2 | mjames | 50 | else |
8 | mjames | 51 | { // buffer has possibly wrapped... |
52 | result = RX_USART_BUFF_SIZ - instance->rx_usart_out_Ptr + instance->rx_usart_in_Ptr; |
||
53 | } |
||
54 | __HAL_UART_ENABLE_IT(instance->Handle, UART_IT_RXNE); |
||
2 | mjames | 55 | |
56 | return result; |
||
57 | } |
||
58 | |||
8 | mjames | 59 | uint16_t SerialTransmitSpace(usart_ctl *instance) |
7 | mjames | 60 | { |
8 | mjames | 61 | return TX_USART_BUFF_SIZ - instance->tx_usart_count; |
7 | mjames | 62 | } |
63 | |||
2 | mjames | 64 | inline uint8_t |
8 | mjames | 65 | PollSerial(usart_ctl *instance) |
2 | mjames | 66 | { |
67 | uint8_t rc; |
||
8 | mjames | 68 | __HAL_UART_DISABLE_IT(instance->Handle, UART_IT_RXNE); |
69 | rc = (instance->rx_usart_buffer_full || (instance->rx_usart_in_Ptr != instance->rx_usart_out_Ptr)); |
||
70 | __HAL_UART_ENABLE_IT(instance->Handle, UART_IT_RXNE); |
||
2 | mjames | 71 | |
72 | return rc; |
||
73 | } |
||
74 | |||
75 | /***! |
||
76 | * @brief return the next character in the Serial input buffer |
||
77 | * This function will wait until a character arrives. |
||
78 | */ |
||
3 | mjames | 79 | inline uint8_t |
8 | mjames | 80 | GetCharSerial(usart_ctl *instance) |
2 | mjames | 81 | { |
82 | uint8_t c; |
||
8 | mjames | 83 | __HAL_UART_DISABLE_IT(instance->Handle, UART_IT_RXNE); |
84 | while (!instance->rx_usart_buffer_full && (instance->rx_usart_in_Ptr == instance->rx_usart_out_Ptr)) |
||
85 | { |
||
86 | __HAL_UART_ENABLE_IT(instance->Handle, UART_IT_RXNE); |
||
87 | __WFI(); /* wait for something */ |
||
88 | __HAL_UART_DISABLE_IT(instance->Handle, UART_IT_RXNE); |
||
89 | } |
||
2 | mjames | 90 | |
91 | c = instance->rx_usart_buff[instance->rx_usart_out_Ptr]; |
||
92 | instance->rx_usart_buffer_full = 0; /* removed character */ |
||
93 | instance->rx_usart_out_Ptr++; |
||
94 | if (instance->rx_usart_out_Ptr >= RX_USART_BUFF_SIZ) |
||
8 | mjames | 95 | { |
96 | instance->rx_usart_out_Ptr = 0; |
||
97 | } |
||
98 | __HAL_UART_ENABLE_IT(instance->Handle, UART_IT_RXNE); |
||
2 | mjames | 99 | return c; |
100 | } |
||
101 | |||
102 | /* |
||
103 | * \brief |
||
104 | * void EnableSerialRxInterrupt(void) - this function is used from the interrupt handler and the main scheduler loop |
||
105 | * to enable the serial rx interrupt after resetting the serial rx buffer... |
||
106 | */ |
||
107 | inline void |
||
8 | mjames | 108 | EnableSerialRxInterrupt(usart_ctl *instance) |
2 | mjames | 109 | { |
110 | /* cheat here - this is a macro and I have the same Instance member as the HAL handle, with the same meaning */ |
||
8 | mjames | 111 | __HAL_UART_ENABLE_IT(instance->Handle, UART_IT_RXNE); |
2 | mjames | 112 | } |
113 | |||
114 | /****! |
||
115 | * @brief send a character to the serial USART via placing it in the serial buffer |
||
116 | * |
||
117 | */ |
||
118 | |||
119 | static void |
||
8 | mjames | 120 | PutCharSerialFIFO(usart_ctl *instance, uint8_t c) |
2 | mjames | 121 | { |
8 | mjames | 122 | __HAL_UART_DISABLE_IT(instance->Handle, UART_IT_TXE); |
2 | mjames | 123 | |
124 | instance->tx_usart_buff[instance->tx_usart_in_Ptr++] = c; |
||
125 | instance->tx_usart_count += 1; |
||
126 | if (instance->tx_usart_in_Ptr >= TX_USART_BUFF_SIZ) |
||
8 | mjames | 127 | { |
128 | instance->tx_usart_in_Ptr = 0; |
||
129 | } |
||
2 | mjames | 130 | /* Handle overrun by losing oldest characters */ |
131 | if (instance->tx_usart_in_Ptr == instance->tx_usart_out_Ptr) |
||
8 | mjames | 132 | { |
133 | instance->tx_usart_out_Ptr++; |
||
134 | if (instance->tx_usart_out_Ptr >= TX_USART_BUFF_SIZ) |
||
2 | mjames | 135 | { |
8 | mjames | 136 | instance->tx_usart_out_Ptr = 0; |
2 | mjames | 137 | } |
8 | mjames | 138 | } |
2 | mjames | 139 | |
140 | instance->tx_usart_running = 1; |
||
8 | mjames | 141 | __HAL_UART_ENABLE_IT(instance->Handle, UART_IT_TXE); |
2 | mjames | 142 | } |
143 | |||
8 | mjames | 144 | void UART_IRQHandler(usart_ctl *instance) |
2 | mjames | 145 | { |
146 | |||
8 | mjames | 147 | __disable_irq(); |
148 | uint32_t rxStatus; // status from USART receiver |
||
2 | mjames | 149 | |
8 | mjames | 150 | rxStatus = instance->Handle->Instance->SR; // read the status bits - this resets all the hardware signalling flags |
2 | mjames | 151 | |
6 | mjames | 152 | if ((rxStatus & USART_SR_LBD)) |
8 | mjames | 153 | __HAL_UART_CLEAR_FLAG(instance->Handle, USART_SR_LBD); |
6 | mjames | 154 | |
8 | mjames | 155 | if ((rxStatus & USART_SR_RXNE) != RESET) |
156 | { |
||
157 | // no error has occurred... |
||
158 | uint8_t rxChar = (uint8_t)(instance->Handle->Instance->DR & 0xff); // read the bottom 8-bits only |
||
159 | |||
160 | if (!instance->rx_usart_buffer_full) |
||
2 | mjames | 161 | { |
8 | mjames | 162 | instance->rx_usart_buff[instance->rx_usart_in_Ptr++] = rxChar; |
2 | mjames | 163 | |
8 | mjames | 164 | if (instance->rx_usart_in_Ptr >= RX_USART_BUFF_SIZ) |
165 | { |
||
166 | instance->rx_usart_in_Ptr = 0; |
||
167 | } |
||
168 | if (instance->rx_usart_in_Ptr == instance->rx_usart_out_Ptr) |
||
169 | { |
||
170 | instance->rx_usart_buffer_full = 1; /* buffer overrun */ |
||
171 | } |
||
2 | mjames | 172 | } |
8 | mjames | 173 | } |
2 | mjames | 174 | /* check for transmitter interrupt : this code is used */ |
6 | mjames | 175 | if ((rxStatus & USART_SR_TXE) != RESET) |
8 | mjames | 176 | { |
177 | |||
178 | /* Only enable the transmitter when baud detect has completed or check expired. |
||
179 | * and the software is ready for it to be enabled as programming mode is wanting |
||
180 | * to receive a response and that can get blocked if we're streaming a lot of debug messages*/ |
||
181 | if (instance->tx_usart_in_Ptr != instance->tx_usart_out_Ptr) |
||
2 | mjames | 182 | { |
183 | |||
8 | mjames | 184 | instance->Handle->Instance->DR = |
185 | instance->tx_usart_buff[instance->tx_usart_out_Ptr++]; |
||
186 | if (instance->tx_usart_count != 0) |
||
187 | instance->tx_usart_count -= 1; |
||
6 | mjames | 188 | |
8 | mjames | 189 | if (instance->tx_usart_out_Ptr >= TX_USART_BUFF_SIZ) |
190 | { |
||
191 | instance->tx_usart_out_Ptr = 0; |
||
192 | } |
||
2 | mjames | 193 | } |
8 | mjames | 194 | if (instance->tx_usart_count == 0) |
195 | { |
||
196 | __HAL_UART_DISABLE_IT(instance->Handle, UART_IT_TXE); |
||
197 | instance->tx_usart_running = 0; |
||
198 | } |
||
199 | } |
||
200 | __enable_irq(); |
||
2 | mjames | 201 | } |
202 | |||
8 | mjames | 203 | void PutCharSerial(usart_ctl *instance, uint8_t c) |
2 | mjames | 204 | { |
205 | // Put character in Crayon/Pen interface |
||
8 | mjames | 206 | PutCharSerialFIFO(instance, c); |
2 | mjames | 207 | } |
208 | |||
209 | /* |
||
210 | * \brief |
||
211 | * ResetTxBuffer(void) - resets the serial transmitter buffer |
||
212 | */ |
||
8 | mjames | 213 | void ResetTxBuffer(usart_ctl *instance) |
2 | mjames | 214 | { |
215 | |||
216 | instance->tx_usart_out_Ptr = 0; |
||
217 | instance->tx_usart_running = 0; |
||
218 | instance->tx_usart_in_Ptr = 0; /* setup in pointer last to drop any chars come in */ |
||
219 | instance->tx_usart_count = 0; |
||
220 | } |
||
221 | |||
222 | /* |
||
223 | * \brief |
||
224 | * void ResetRxBuffer(void) - resets the serial receiver buffer |
||
225 | */ |
||
8 | mjames | 226 | void ResetRxBuffer(usart_ctl *instance) |
2 | mjames | 227 | { |
228 | |||
229 | instance->rx_usart_out_Ptr = 0; |
||
230 | instance->rx_usart_buffer_full = 0; |
||
231 | instance->rx_usart_in_Ptr = 0; /* setup in pointer last to drop any chars come in */ |
||
232 | } |
||
233 | |||
234 | /***! |
||
235 | * @brief Flush Serial input and output buffers |
||
236 | */ |
||
8 | mjames | 237 | void FlushSerial(usart_ctl *instance) |
2 | mjames | 238 | { |
8 | mjames | 239 | ResetRxBuffer(instance); |
240 | ResetTxBuffer(instance); |
||
2 | mjames | 241 | } |
242 | |||
243 | /***! |
||
244 | * @brief check if tx buffer is empty... |
||
245 | */ |
||
246 | uint8_t |
||
8 | mjames | 247 | TxBufferEmpty(usart_ctl *instance) |
2 | mjames | 248 | { |
8 | mjames | 249 | return (0 == instance->tx_usart_count); |
2 | mjames | 250 | } |
251 | |||
4 | mjames | 252 | /***! |
253 | * @brief wait for transmission to finish |
||
254 | */ |
||
255 | |||
256 | void TxWaitEmpty(usart_ctl *instance) |
||
257 | { |
||
258 | while (instance->tx_usart_count || |
||
8 | mjames | 259 | (instance->Handle->Instance->SR & USART_SR_TC) != RESET) |
260 | { |
||
261 | }; |
||
4 | mjames | 262 | } |
263 | |||
2 | mjames | 264 | /**** |
265 | * @brief Initialise control structure |
||
266 | */ |
||
8 | mjames | 267 | void init_usart_ctl(usart_ctl *instance, UART_HandleTypeDef *handle) |
2 | mjames | 268 | { |
269 | |||
5 | mjames | 270 | instance->Handle = handle; |
4 | mjames | 271 | |
272 | /* cheat here - this is a macro and I have the same Instance member as the HAL handle, with the same meaning */ |
||
8 | mjames | 273 | __HAL_UART_DISABLE_IT(instance->Handle, UART_IT_TXE); |
274 | __HAL_UART_DISABLE_IT(instance->Handle, UART_IT_RXNE); |
||
4 | mjames | 275 | |
2 | mjames | 276 | instance->tx_usart_in_Ptr = 0; |
277 | instance->tx_usart_out_Ptr = 0; |
||
278 | instance->tx_usart_running = 0; |
||
279 | instance->tx_usart_count = 0; |
||
280 | |||
281 | instance->rx_usart_in_Ptr = 0; |
||
282 | instance->rx_usart_out_Ptr = 0; |
||
283 | instance->rx_usart_buffer_full = 0; |
||
284 | } |
||
285 | |||
8 | mjames | 286 | void setBaud(usart_ctl *ctl, uint32_t baud) |
5 | mjames | 287 | { |
288 | ctl->Handle->Init.BaudRate = baud; |
||
8 | mjames | 289 | __disable_irq(); |
290 | HAL_UART_Init(ctl->Handle); |
||
291 | __enable_irq(); |
||
5 | mjames | 292 | } |
293 | |||
8 | mjames | 294 | |
295 | |||
296 | void sendString(usart_ctl *ctl, char const * string , int length) |
||
7 | mjames | 297 | { |
8 | mjames | 298 | for (int i = 0; i < length; i++) |
7 | mjames | 299 | PutCharSerial(ctl, string[i]); |
300 | } |
||
5 | mjames | 301 | |
2 | mjames | 302 | ///////////////////////////////////////////////////////// |
303 | /// Moved from generated code to avoid crappy HAL handler |
||
304 | #if defined SERIAL_UART1 |
||
305 | void USART1_IRQHandler(void) |
||
306 | { |
||
8 | mjames | 307 | UART_IRQHandler(&uc1); |
2 | mjames | 308 | } |
309 | #endif |
||
310 | #if defined SERIAL_UART2 |
||
311 | void USART2_IRQHandler(void) |
||
312 | { |
||
8 | mjames | 313 | UART_IRQHandler(&uc2); |
2 | mjames | 314 | } |
315 | #endif |
||
316 | #if defined SERIAL_UART3 |
||
317 | void USART3_IRQHandler(void) |
||
318 | { |
||
8 | mjames | 319 | UART_IRQHandler(&uc3); |
2 | mjames | 320 | } |
321 | #endif |
||
7 | mjames | 322 | #if defined SERIAL_UART4 |
323 | void UART4_IRQHandler(void) |
||
324 | { |
||
8 | mjames | 325 | UART_IRQHandler(&uc4); |
7 | mjames | 326 | } |
327 | #endif |
||
328 | #if defined SERIAL_UART5 |
||
329 | void UART5_IRQHandler(void) |
||
330 | { |
||
8 | mjames | 331 | UART_IRQHandler(&uc5); |
7 | mjames | 332 | } |
333 | #endif |