|
|
|
@ -105,8 +105,6 @@ ring_buffer_r rx_buffer = { { 0 }, 0, 0 };
|
|
|
|
|
|
|
|
|
|
#if ENABLED(EMERGENCY_PARSER)
|
|
|
|
|
|
|
|
|
|
#include "../../module/stepper.h"
|
|
|
|
|
|
|
|
|
|
// Currently looking for: M108, M112, M410
|
|
|
|
|
// If you alter the parser please don't forget to update the capabilities in Conditionals_post.h
|
|
|
|
|
|
|
|
|
@ -115,80 +113,80 @@ ring_buffer_r rx_buffer = { { 0 }, 0, 0 };
|
|
|
|
|
static e_parser_state state = state_RESET;
|
|
|
|
|
|
|
|
|
|
switch (state) {
|
|
|
|
|
case state_RESET:
|
|
|
|
|
switch (c) {
|
|
|
|
|
case ' ': break;
|
|
|
|
|
case 'N': state = state_N; break;
|
|
|
|
|
case 'M': state = state_M; break;
|
|
|
|
|
default: state = state_IGNORE;
|
|
|
|
|
}
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case state_N:
|
|
|
|
|
switch (c) {
|
|
|
|
|
case '0': case '1': case '2':
|
|
|
|
|
case '3': case '4': case '5':
|
|
|
|
|
case '6': case '7': case '8':
|
|
|
|
|
case '9': case '-': case ' ': break;
|
|
|
|
|
case 'M': state = state_M; break;
|
|
|
|
|
default: state = state_IGNORE;
|
|
|
|
|
}
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case state_M:
|
|
|
|
|
switch (c) {
|
|
|
|
|
case ' ': break;
|
|
|
|
|
case '1': state = state_M1; break;
|
|
|
|
|
case '4': state = state_M4; break;
|
|
|
|
|
default: state = state_IGNORE;
|
|
|
|
|
}
|
|
|
|
|
break;
|
|
|
|
|
case state_RESET:
|
|
|
|
|
switch (c) {
|
|
|
|
|
case ' ': break;
|
|
|
|
|
case 'N': state = state_N; break;
|
|
|
|
|
case 'M': state = state_M; break;
|
|
|
|
|
default: state = state_IGNORE;
|
|
|
|
|
}
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case state_N:
|
|
|
|
|
switch (c) {
|
|
|
|
|
case '0': case '1': case '2':
|
|
|
|
|
case '3': case '4': case '5':
|
|
|
|
|
case '6': case '7': case '8':
|
|
|
|
|
case '9': case '-': case ' ': break;
|
|
|
|
|
case 'M': state = state_M; break;
|
|
|
|
|
default: state = state_IGNORE;
|
|
|
|
|
}
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case state_M:
|
|
|
|
|
switch (c) {
|
|
|
|
|
case ' ': break;
|
|
|
|
|
case '1': state = state_M1; break;
|
|
|
|
|
case '4': state = state_M4; break;
|
|
|
|
|
default: state = state_IGNORE;
|
|
|
|
|
}
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case state_M1:
|
|
|
|
|
switch (c) {
|
|
|
|
|
case '0': state = state_M10; break;
|
|
|
|
|
case '1': state = state_M11; break;
|
|
|
|
|
default: state = state_IGNORE;
|
|
|
|
|
}
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case state_M10:
|
|
|
|
|
state = (c == '8') ? state_M108 : state_IGNORE;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case state_M11:
|
|
|
|
|
state = (c == '2') ? state_M112 : state_IGNORE;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case state_M4:
|
|
|
|
|
state = (c == '1') ? state_M41 : state_IGNORE;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case state_M41:
|
|
|
|
|
state = (c == '0') ? state_M410 : state_IGNORE;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case state_IGNORE:
|
|
|
|
|
if (c == '\n') state = state_RESET;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
default:
|
|
|
|
|
if (c == '\n') {
|
|
|
|
|
switch (state) {
|
|
|
|
|
case state_M108:
|
|
|
|
|
wait_for_user = wait_for_heatup = false;
|
|
|
|
|
break;
|
|
|
|
|
case state_M112:
|
|
|
|
|
kill(PSTR(MSG_KILLED));
|
|
|
|
|
break;
|
|
|
|
|
case state_M410:
|
|
|
|
|
quickstop_stepper();
|
|
|
|
|
break;
|
|
|
|
|
default:
|
|
|
|
|
break;
|
|
|
|
|
case state_M1:
|
|
|
|
|
switch (c) {
|
|
|
|
|
case '0': state = state_M10; break;
|
|
|
|
|
case '1': state = state_M11; break;
|
|
|
|
|
default: state = state_IGNORE;
|
|
|
|
|
}
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case state_M10:
|
|
|
|
|
state = (c == '8') ? state_M108 : state_IGNORE;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case state_M11:
|
|
|
|
|
state = (c == '2') ? state_M112 : state_IGNORE;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case state_M4:
|
|
|
|
|
state = (c == '1') ? state_M41 : state_IGNORE;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case state_M41:
|
|
|
|
|
state = (c == '0') ? state_M410 : state_IGNORE;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case state_IGNORE:
|
|
|
|
|
if (c == '\n') state = state_RESET;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
default:
|
|
|
|
|
if (c == '\n') {
|
|
|
|
|
switch (state) {
|
|
|
|
|
case state_M108:
|
|
|
|
|
wait_for_user = wait_for_heatup = false;
|
|
|
|
|
break;
|
|
|
|
|
case state_M112:
|
|
|
|
|
kill(PSTR(MSG_KILLED));
|
|
|
|
|
break;
|
|
|
|
|
case state_M410:
|
|
|
|
|
quickstop_stepper();
|
|
|
|
|
break;
|
|
|
|
|
default:
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
state = state_RESET;
|
|
|
|
|
}
|
|
|
|
|
state = state_RESET;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
@ -213,61 +211,61 @@ FORCE_INLINE void store_rxd_char() {
|
|
|
|
|
else if (!++rx_dropped_bytes) ++rx_dropped_bytes;
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
#if ENABLED(SERIAL_STATS_MAX_RX_QUEUED)
|
|
|
|
|
// calculate count of bytes stored into the RX buffer
|
|
|
|
|
ring_buffer_pos_t rx_count = (ring_buffer_pos_t)(rx_buffer.head - rx_buffer.tail) & (ring_buffer_pos_t)(RX_BUFFER_SIZE - 1);
|
|
|
|
|
// Keep track of the maximum count of enqueued bytes
|
|
|
|
|
NOLESS(rx_max_enqueued, rx_count);
|
|
|
|
|
#endif
|
|
|
|
|
#if ENABLED(SERIAL_STATS_MAX_RX_QUEUED)
|
|
|
|
|
// calculate count of bytes stored into the RX buffer
|
|
|
|
|
ring_buffer_pos_t rx_count = (ring_buffer_pos_t)(rx_buffer.head - rx_buffer.tail) & (ring_buffer_pos_t)(RX_BUFFER_SIZE - 1);
|
|
|
|
|
// Keep track of the maximum count of enqueued bytes
|
|
|
|
|
NOLESS(rx_max_enqueued, rx_count);
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
#if ENABLED(SERIAL_XON_XOFF)
|
|
|
|
|
#if ENABLED(SERIAL_XON_XOFF)
|
|
|
|
|
|
|
|
|
|
// for high speed transfers, we can use XON/XOFF protocol to do
|
|
|
|
|
// software handshake and avoid overruns.
|
|
|
|
|
if ((xon_xoff_state & XON_XOFF_CHAR_MASK) == XON_CHAR) {
|
|
|
|
|
// for high speed transfers, we can use XON/XOFF protocol to do
|
|
|
|
|
// software handshake and avoid overruns.
|
|
|
|
|
if ((xon_xoff_state & XON_XOFF_CHAR_MASK) == XON_CHAR) {
|
|
|
|
|
|
|
|
|
|
// calculate count of bytes stored into the RX buffer
|
|
|
|
|
ring_buffer_pos_t rx_count = (ring_buffer_pos_t)(rx_buffer.head - rx_buffer.tail) & (ring_buffer_pos_t)(RX_BUFFER_SIZE - 1);
|
|
|
|
|
// calculate count of bytes stored into the RX buffer
|
|
|
|
|
ring_buffer_pos_t rx_count = (ring_buffer_pos_t)(rx_buffer.head - rx_buffer.tail) & (ring_buffer_pos_t)(RX_BUFFER_SIZE - 1);
|
|
|
|
|
|
|
|
|
|
// if we are above 12.5% of RX buffer capacity, send XOFF before
|
|
|
|
|
// we run out of RX buffer space .. We need 325 bytes @ 250kbits/s to
|
|
|
|
|
// let the host react and stop sending bytes. This translates to 13mS
|
|
|
|
|
// propagation time.
|
|
|
|
|
if (rx_count >= (RX_BUFFER_SIZE) / 8) {
|
|
|
|
|
// If TX interrupts are disabled and data register is empty,
|
|
|
|
|
// just write the byte to the data register and be done. This
|
|
|
|
|
// shortcut helps significantly improve the effective datarate
|
|
|
|
|
// at high (>500kbit/s) bitrates, where interrupt overhead
|
|
|
|
|
// becomes a slowdown.
|
|
|
|
|
if (!(HWUART->UART_IMR & UART_IMR_TXRDY) && (HWUART->UART_SR & UART_SR_TXRDY)) {
|
|
|
|
|
// Send an XOFF character
|
|
|
|
|
HWUART->UART_THR = XOFF_CHAR;
|
|
|
|
|
|
|
|
|
|
// And remember it was sent
|
|
|
|
|
xon_xoff_state = XOFF_CHAR | XON_XOFF_CHAR_SENT;
|
|
|
|
|
}
|
|
|
|
|
else {
|
|
|
|
|
// TX interrupts disabled, but buffer still not empty ... or
|
|
|
|
|
// TX interrupts enabled. Reenable TX ints and schedule XOFF
|
|
|
|
|
// character to be sent
|
|
|
|
|
#if TX_BUFFER_SIZE > 0
|
|
|
|
|
HWUART->UART_IER = UART_IER_TXRDY;
|
|
|
|
|
xon_xoff_state = XOFF_CHAR;
|
|
|
|
|
#else
|
|
|
|
|
// We are not using TX interrupts, we will have to send this manually
|
|
|
|
|
while (!(HWUART->UART_SR & UART_SR_TXRDY)) { sw_barrier(); };
|
|
|
|
|
// if we are above 12.5% of RX buffer capacity, send XOFF before
|
|
|
|
|
// we run out of RX buffer space .. We need 325 bytes @ 250kbits/s to
|
|
|
|
|
// let the host react and stop sending bytes. This translates to 13mS
|
|
|
|
|
// propagation time.
|
|
|
|
|
if (rx_count >= (RX_BUFFER_SIZE) / 8) {
|
|
|
|
|
// If TX interrupts are disabled and data register is empty,
|
|
|
|
|
// just write the byte to the data register and be done. This
|
|
|
|
|
// shortcut helps significantly improve the effective datarate
|
|
|
|
|
// at high (>500kbit/s) bitrates, where interrupt overhead
|
|
|
|
|
// becomes a slowdown.
|
|
|
|
|
if (!(HWUART->UART_IMR & UART_IMR_TXRDY) && (HWUART->UART_SR & UART_SR_TXRDY)) {
|
|
|
|
|
// Send an XOFF character
|
|
|
|
|
HWUART->UART_THR = XOFF_CHAR;
|
|
|
|
|
// And remember we already sent it
|
|
|
|
|
|
|
|
|
|
// And remember it was sent
|
|
|
|
|
xon_xoff_state = XOFF_CHAR | XON_XOFF_CHAR_SENT;
|
|
|
|
|
#endif
|
|
|
|
|
}
|
|
|
|
|
else {
|
|
|
|
|
// TX interrupts disabled, but buffer still not empty ... or
|
|
|
|
|
// TX interrupts enabled. Reenable TX ints and schedule XOFF
|
|
|
|
|
// character to be sent
|
|
|
|
|
#if TX_BUFFER_SIZE > 0
|
|
|
|
|
HWUART->UART_IER = UART_IER_TXRDY;
|
|
|
|
|
xon_xoff_state = XOFF_CHAR;
|
|
|
|
|
#else
|
|
|
|
|
// We are not using TX interrupts, we will have to send this manually
|
|
|
|
|
while (!(HWUART->UART_SR & UART_SR_TXRDY)) { sw_barrier(); };
|
|
|
|
|
HWUART->UART_THR = XOFF_CHAR;
|
|
|
|
|
// And remember we already sent it
|
|
|
|
|
xon_xoff_state = XOFF_CHAR | XON_XOFF_CHAR_SENT;
|
|
|
|
|
#endif
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
#endif // SERIAL_XON_XOFF
|
|
|
|
|
#endif // SERIAL_XON_XOFF
|
|
|
|
|
|
|
|
|
|
#if ENABLED(EMERGENCY_PARSER)
|
|
|
|
|
emergency_parser(c);
|
|
|
|
|
#endif
|
|
|
|
|
#if ENABLED(EMERGENCY_PARSER)
|
|
|
|
|
emergency_parser(c);
|
|
|
|
|
#endif
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
#if TX_BUFFER_SIZE > 0
|
|
|
|
@ -296,7 +294,7 @@ FORCE_INLINE void store_rxd_char() {
|
|
|
|
|
HWUART->UART_IDR = UART_IDR_TXRDY;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
#endif // TX_BUFFER_SIZE
|
|
|
|
|
#endif // TX_BUFFER_SIZE > 0
|
|
|
|
|
|
|
|
|
|
static void UART_ISR(void) {
|
|
|
|
|
uint32_t status = HWUART->UART_SR;
|
|
|
|
@ -393,20 +391,20 @@ int MarlinSerial::read(void) {
|
|
|
|
|
v = rx_buffer.buffer[t];
|
|
|
|
|
rx_buffer.tail = (ring_buffer_pos_t)(t + 1) & (RX_BUFFER_SIZE - 1);
|
|
|
|
|
|
|
|
|
|
#if ENABLED(SERIAL_XON_XOFF)
|
|
|
|
|
if ((xon_xoff_state & XON_XOFF_CHAR_MASK) == XOFF_CHAR) {
|
|
|
|
|
// Get count of bytes in the RX buffer
|
|
|
|
|
ring_buffer_pos_t rx_count = (ring_buffer_pos_t)(rx_buffer.head - rx_buffer.tail) & (ring_buffer_pos_t)(RX_BUFFER_SIZE - 1);
|
|
|
|
|
// When below 10% of RX buffer capacity, send XON before
|
|
|
|
|
// running out of RX buffer bytes
|
|
|
|
|
if (rx_count < (RX_BUFFER_SIZE) / 10) {
|
|
|
|
|
xon_xoff_state = XON_CHAR | XON_XOFF_CHAR_SENT;
|
|
|
|
|
CRITICAL_SECTION_END; // End critical section before returning!
|
|
|
|
|
writeNoHandshake(XON_CHAR);
|
|
|
|
|
return v;
|
|
|
|
|
#if ENABLED(SERIAL_XON_XOFF)
|
|
|
|
|
if ((xon_xoff_state & XON_XOFF_CHAR_MASK) == XOFF_CHAR) {
|
|
|
|
|
// Get count of bytes in the RX buffer
|
|
|
|
|
ring_buffer_pos_t rx_count = (ring_buffer_pos_t)(rx_buffer.head - rx_buffer.tail) & (ring_buffer_pos_t)(RX_BUFFER_SIZE - 1);
|
|
|
|
|
// When below 10% of RX buffer capacity, send XON before
|
|
|
|
|
// running out of RX buffer bytes
|
|
|
|
|
if (rx_count < (RX_BUFFER_SIZE) / 10) {
|
|
|
|
|
xon_xoff_state = XON_CHAR | XON_XOFF_CHAR_SENT;
|
|
|
|
|
CRITICAL_SECTION_END; // End critical section before returning!
|
|
|
|
|
writeNoHandshake(XON_CHAR);
|
|
|
|
|
return v;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
#endif
|
|
|
|
|
#endif
|
|
|
|
|
}
|
|
|
|
|
CRITICAL_SECTION_END;
|
|
|
|
|
return v;
|
|
|
|
@ -427,15 +425,16 @@ void MarlinSerial::flush(void) {
|
|
|
|
|
rx_buffer.head = rx_buffer.tail;
|
|
|
|
|
CRITICAL_SECTION_END;
|
|
|
|
|
|
|
|
|
|
#if ENABLED(SERIAL_XON_XOFF)
|
|
|
|
|
if ((xon_xoff_state & XON_XOFF_CHAR_MASK) == XOFF_CHAR) {
|
|
|
|
|
xon_xoff_state = XON_CHAR | XON_XOFF_CHAR_SENT;
|
|
|
|
|
writeNoHandshake(XON_CHAR);
|
|
|
|
|
}
|
|
|
|
|
#endif
|
|
|
|
|
#if ENABLED(SERIAL_XON_XOFF)
|
|
|
|
|
if ((xon_xoff_state & XON_XOFF_CHAR_MASK) == XOFF_CHAR) {
|
|
|
|
|
xon_xoff_state = XON_CHAR | XON_XOFF_CHAR_SENT;
|
|
|
|
|
writeNoHandshake(XON_CHAR);
|
|
|
|
|
}
|
|
|
|
|
#endif
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
#if TX_BUFFER_SIZE > 0
|
|
|
|
|
|
|
|
|
|
uint8_t MarlinSerial::availableForWrite(void) {
|
|
|
|
|
CRITICAL_SECTION_START;
|
|
|
|
|
const uint8_t h = tx_buffer.head, t = tx_buffer.tail;
|
|
|
|
|