rp2/machine_uart: Use read/write mutex to prevent char duplication.

Duplication of characters is caused by re-entrant calls from separate cores
of uart_fill_tx_fifo().  This patch uses a mutex to ensure that a
re-entrant execution of the function returns without affecting the UART
FIFO.

Fixes issues #8344 and #8360.
This commit is contained in:
Peter Hinch
2022-03-02 09:19:45 +00:00
committed by Damien George
parent 9d7c168bf5
commit d242a9b7f7

View File

@@ -34,6 +34,7 @@
#include "hardware/irq.h" #include "hardware/irq.h"
#include "hardware/uart.h" #include "hardware/uart.h"
#include "hardware/regs/uart.h" #include "hardware/regs/uart.h"
#include "pico/mutex.h"
#define DEFAULT_UART_BAUDRATE (115200) #define DEFAULT_UART_BAUDRATE (115200)
#define DEFAULT_UART_BITS (8) #define DEFAULT_UART_BITS (8)
@@ -72,6 +73,16 @@
#define UART_HWCONTROL_CTS (1) #define UART_HWCONTROL_CTS (1)
#define UART_HWCONTROL_RTS (2) #define UART_HWCONTROL_RTS (2)
STATIC mutex_t write_mutex_0;
STATIC mutex_t write_mutex_1;
STATIC mutex_t read_mutex_0;
STATIC mutex_t read_mutex_1;
auto_init_mutex(write_mutex_0);
auto_init_mutex(write_mutex_1);
auto_init_mutex(read_mutex_0);
auto_init_mutex(read_mutex_1);
typedef struct _machine_uart_obj_t { typedef struct _machine_uart_obj_t {
mp_obj_base_t base; mp_obj_base_t base;
uart_inst_t *const uart; uart_inst_t *const uart;
@@ -89,18 +100,18 @@ typedef struct _machine_uart_obj_t {
uint8_t invert; uint8_t invert;
uint8_t flow; uint8_t flow;
ringbuf_t read_buffer; ringbuf_t read_buffer;
bool read_lock; mutex_t *read_mutex;
ringbuf_t write_buffer; ringbuf_t write_buffer;
bool write_lock; mutex_t *write_mutex;
} machine_uart_obj_t; } machine_uart_obj_t;
STATIC machine_uart_obj_t machine_uart_obj[] = { STATIC machine_uart_obj_t machine_uart_obj[] = {
{{&machine_uart_type}, uart0, 0, 0, DEFAULT_UART_BITS, UART_PARITY_NONE, DEFAULT_UART_STOP, {{&machine_uart_type}, uart0, 0, 0, DEFAULT_UART_BITS, UART_PARITY_NONE, DEFAULT_UART_STOP,
MICROPY_HW_UART0_TX, MICROPY_HW_UART0_RX, MICROPY_HW_UART0_CTS, MICROPY_HW_UART0_RTS, MICROPY_HW_UART0_TX, MICROPY_HW_UART0_RX, MICROPY_HW_UART0_CTS, MICROPY_HW_UART0_RTS,
0, 0, 0, 0, {NULL, 1, 0, 0}, 0, {NULL, 1, 0, 0}, 0}, 0, 0, 0, 0, {NULL, 1, 0, 0}, &read_mutex_0, {NULL, 1, 0, 0}, &write_mutex_0},
{{&machine_uart_type}, uart1, 1, 0, DEFAULT_UART_BITS, UART_PARITY_NONE, DEFAULT_UART_STOP, {{&machine_uart_type}, uart1, 1, 0, DEFAULT_UART_BITS, UART_PARITY_NONE, DEFAULT_UART_STOP,
MICROPY_HW_UART1_TX, MICROPY_HW_UART1_RX, MICROPY_HW_UART1_CTS, MICROPY_HW_UART1_RTS, MICROPY_HW_UART1_TX, MICROPY_HW_UART1_RX, MICROPY_HW_UART1_CTS, MICROPY_HW_UART1_RTS,
0, 0, 0, 0, {NULL, 1, 0, 0}, 0, {NULL, 1, 0, 0}, 0}, 0, 0, 0, 0, {NULL, 1, 0, 0}, &read_mutex_1, {NULL, 1, 0, 0}, &write_mutex_1},
}; };
STATIC const char *_parity_name[] = {"None", "0", "1"}; STATIC const char *_parity_name[] = {"None", "0", "1"};
@@ -109,19 +120,42 @@ STATIC const char *_invert_name[] = {"None", "INV_TX", "INV_RX", "INV_TX|INV_RX"
/******************************************************************************/ /******************************************************************************/
// IRQ and buffer handling // IRQ and buffer handling
static inline bool write_mutex_try_lock(machine_uart_obj_t *u) {
return mutex_enter_timeout_ms(u->write_mutex, 0);
}
static inline void write_mutex_unlock(machine_uart_obj_t *u) {
mutex_exit(u->write_mutex);
}
static inline bool read_mutex_try_lock(machine_uart_obj_t *u) {
return mutex_enter_timeout_ms(u->read_mutex, 0);
}
static inline void read_mutex_unlock(machine_uart_obj_t *u) {
mutex_exit(u->read_mutex);
}
// take all bytes from the fifo and store them in the buffer // take all bytes from the fifo and store them in the buffer
STATIC void uart_drain_rx_fifo(machine_uart_obj_t *self) { STATIC void uart_drain_rx_fifo(machine_uart_obj_t *self) {
while (uart_is_readable(self->uart) && ringbuf_free(&self->read_buffer) > 0) { if (read_mutex_try_lock(self)) {
// get a byte from uart and put into the buffer while (uart_is_readable(self->uart) && ringbuf_free(&self->read_buffer) > 0) {
ringbuf_put(&(self->read_buffer), uart_get_hw(self->uart)->dr); // get a byte from uart and put into the buffer
ringbuf_put(&(self->read_buffer), uart_get_hw(self->uart)->dr);
}
read_mutex_unlock(self);
} }
} }
// take bytes from the buffer and put them into the UART FIFO // take bytes from the buffer and put them into the UART FIFO
// Re-entrancy: quit if an instance already running
STATIC void uart_fill_tx_fifo(machine_uart_obj_t *self) { STATIC void uart_fill_tx_fifo(machine_uart_obj_t *self) {
while (uart_is_writable(self->uart) && ringbuf_avail(&self->write_buffer) > 0) { if (write_mutex_try_lock(self)) {
// get a byte from the buffer and put it into the uart while (uart_is_writable(self->uart) && ringbuf_avail(&self->write_buffer) > 0) {
uart_get_hw(self->uart)->dr = ringbuf_get(&(self->write_buffer)); // get a byte from the buffer and put it into the uart
uart_get_hw(self->uart)->dr = ringbuf_get(&(self->write_buffer));
}
write_mutex_unlock(self);
} }
} }
@@ -129,16 +163,12 @@ STATIC inline void uart_service_interrupt(machine_uart_obj_t *self) {
if (uart_get_hw(self->uart)->mis & (UART_UARTMIS_RXMIS_BITS | UART_UARTMIS_RTMIS_BITS)) { // rx interrupt? if (uart_get_hw(self->uart)->mis & (UART_UARTMIS_RXMIS_BITS | UART_UARTMIS_RTMIS_BITS)) { // rx interrupt?
// clear all interrupt bits but tx // clear all interrupt bits but tx
uart_get_hw(self->uart)->icr = UART_UARTICR_BITS & (~UART_UARTICR_TXIC_BITS); uart_get_hw(self->uart)->icr = UART_UARTICR_BITS & (~UART_UARTICR_TXIC_BITS);
if (!self->read_lock) { uart_drain_rx_fifo(self);
uart_drain_rx_fifo(self);
}
} }
if (uart_get_hw(self->uart)->mis & UART_UARTMIS_TXMIS_BITS) { // tx interrupt? if (uart_get_hw(self->uart)->mis & UART_UARTMIS_TXMIS_BITS) { // tx interrupt?
// clear all interrupt bits but rx // clear all interrupt bits but rx
uart_get_hw(self->uart)->icr = UART_UARTICR_BITS & (~UART_UARTICR_RXIC_BITS); uart_get_hw(self->uart)->icr = UART_UARTICR_BITS & (~UART_UARTICR_RXIC_BITS);
if (!self->write_lock) { uart_fill_tx_fifo(self);
uart_fill_tx_fifo(self);
}
} }
} }
@@ -270,8 +300,6 @@ STATIC void machine_uart_init_helper(machine_uart_obj_t *self, size_t n_args, co
self->flow = args[ARG_flow].u_int; self->flow = args[ARG_flow].u_int;
} }
self->read_lock = false;
// Set the RX buffer size if configured. // Set the RX buffer size if configured.
size_t rxbuf_len = DEFAULT_BUFFER_SIZE; size_t rxbuf_len = DEFAULT_BUFFER_SIZE;
if (args[ARG_rxbuf].u_int > 0) { if (args[ARG_rxbuf].u_int > 0) {
@@ -393,9 +421,7 @@ STATIC MP_DEFINE_CONST_FUN_OBJ_1(machine_uart_deinit_obj, machine_uart_deinit);
STATIC mp_obj_t machine_uart_any(mp_obj_t self_in) { STATIC mp_obj_t machine_uart_any(mp_obj_t self_in) {
machine_uart_obj_t *self = MP_OBJ_TO_PTR(self_in); machine_uart_obj_t *self = MP_OBJ_TO_PTR(self_in);
// get all bytes from the fifo first // get all bytes from the fifo first
self->read_lock = true;
uart_drain_rx_fifo(self); uart_drain_rx_fifo(self);
self->read_lock = false;
return MP_OBJ_NEW_SMALL_INT(ringbuf_avail(&self->read_buffer)); return MP_OBJ_NEW_SMALL_INT(ringbuf_avail(&self->read_buffer));
} }
STATIC MP_DEFINE_CONST_FUN_OBJ_1(machine_uart_any_obj, machine_uart_any); STATIC MP_DEFINE_CONST_FUN_OBJ_1(machine_uart_any_obj, machine_uart_any);
@@ -441,9 +467,7 @@ STATIC mp_uint_t machine_uart_read(mp_obj_t self_in, void *buf_in, mp_uint_t siz
while (ringbuf_avail(&self->read_buffer) == 0) { while (ringbuf_avail(&self->read_buffer) == 0) {
if (uart_is_readable(self->uart)) { if (uart_is_readable(self->uart)) {
// Force a few incoming bytes to the buffer // Force a few incoming bytes to the buffer
self->read_lock = true;
uart_drain_rx_fifo(self); uart_drain_rx_fifo(self);
self->read_lock = false;
break; break;
} }
if (time_us_64() > t) { // timed out if (time_us_64() > t) { // timed out
@@ -476,9 +500,7 @@ STATIC mp_uint_t machine_uart_write(mp_obj_t self_in, const void *buf_in, mp_uin
} }
// Kickstart the UART transmit. // Kickstart the UART transmit.
self->write_lock = true;
uart_fill_tx_fifo(self); uart_fill_tx_fifo(self);
self->write_lock = false;
// Send the next characters while busy waiting. // Send the next characters while busy waiting.
while (i < size) { while (i < size) {
@@ -497,9 +519,7 @@ STATIC mp_uint_t machine_uart_write(mp_obj_t self_in, const void *buf_in, mp_uin
ringbuf_put(&(self->write_buffer), *src++); ringbuf_put(&(self->write_buffer), *src++);
++i; ++i;
t = time_us_64() + timeout_char_us; t = time_us_64() + timeout_char_us;
self->write_lock = true;
uart_fill_tx_fifo(self); uart_fill_tx_fifo(self);
self->write_lock = false;
} }
// Just in case the fifo was drained during refill of the ringbuf. // Just in case the fifo was drained during refill of the ringbuf.