// #################################################################################################
|
// #################################################################################################
|
// # << NEORV32: neorv32_uart.c - Universal Asynchronous Receiver/Transmitter (UART) HW Driver >> #
|
// # << NEORV32: neorv32_uart.c - Universal Asynchronous Receiver/Transmitter (UART) HW Driver >> #
|
// # ********************************************************************************************* #
|
// # ********************************************************************************************* #
|
// # BSD 3-Clause License #
|
// # BSD 3-Clause License #
|
// # #
|
// # #
|
// # Copyright (c) 2022, Stephan Nolting. All rights reserved. #
|
// # Copyright (c) 2022, Stephan Nolting. All rights reserved. #
|
// # #
|
// # #
|
// # Redistribution and use in source and binary forms, with or without modification, are #
|
// # Redistribution and use in source and binary forms, with or without modification, are #
|
// # permitted provided that the following conditions are met: #
|
// # permitted provided that the following conditions are met: #
|
// # #
|
// # #
|
// # 1. Redistributions of source code must retain the above copyright notice, this list of #
|
// # 1. Redistributions of source code must retain the above copyright notice, this list of #
|
// # conditions and the following disclaimer. #
|
// # conditions and the following disclaimer. #
|
// # #
|
// # #
|
// # 2. Redistributions in binary form must reproduce the above copyright notice, this list of #
|
// # 2. Redistributions in binary form must reproduce the above copyright notice, this list of #
|
// # conditions and the following disclaimer in the documentation and/or other materials #
|
// # conditions and the following disclaimer in the documentation and/or other materials #
|
// # provided with the distribution. #
|
// # provided with the distribution. #
|
// # #
|
// # #
|
// # 3. Neither the name of the copyright holder nor the names of its contributors may be used to #
|
// # 3. Neither the name of the copyright holder nor the names of its contributors may be used to #
|
// # endorse or promote products derived from this software without specific prior written #
|
// # endorse or promote products derived from this software without specific prior written #
|
// # permission. #
|
// # permission. #
|
// # #
|
// # #
|
// # THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS #
|
// # THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS #
|
// # OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF #
|
// # OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF #
|
// # MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE #
|
// # MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE #
|
// # COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, #
|
// # COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, #
|
// # EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE #
|
// # EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE #
|
// # GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED #
|
// # GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED #
|
// # AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING #
|
// # AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING #
|
// # NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED #
|
// # NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED #
|
// # OF THE POSSIBILITY OF SUCH DAMAGE. #
|
// # OF THE POSSIBILITY OF SUCH DAMAGE. #
|
// # ********************************************************************************************* #
|
// # ********************************************************************************************* #
|
// # The NEORV32 Processor - https://github.com/stnolting/neorv32 (c) Stephan Nolting #
|
// # The NEORV32 Processor - https://github.com/stnolting/neorv32 (c) Stephan Nolting #
|
// #################################################################################################
|
// #################################################################################################
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* @file neorv32_uart.c
|
* @file neorv32_uart.c
|
* @author Stephan Nolting
|
|
* @brief Universal asynchronous receiver/transmitter (UART0/UART1) HW driver source file.
|
* @brief Universal asynchronous receiver/transmitter (UART0/UART1) HW driver source file.
|
*
|
*
|
* @warning UART0 (primary UART) is used as default user console interface for all NEORV32 software framework/library functions.
|
* @warning UART0 (primary UART) is used as default user console interface for all NEORV32 software framework/library functions.
|
*
|
*
|
* @note These functions should only be used if the UART0/UART1 unit was synthesized (IO_UART0_EN = true / IO_UART1_EN = true).
|
* @note These functions should only be used if the UART0/UART1 unit was synthesized (IO_UART0_EN = true / IO_UART1_EN = true).
|
**************************************************************************/
|
**************************************************************************/
|
|
|
#include "neorv32.h"
|
#include "neorv32.h"
|
#include "neorv32_uart.h"
|
#include "neorv32_uart.h"
|
#include <string.h>
|
#include <string.h>
|
#include <stdarg.h>
|
#include <stdarg.h>
|
|
|
/// \cond
|
/// \cond
|
// Private functions
|
// Private functions
|
static void __neorv32_uart_itoa(uint32_t x, char *res) __attribute__((unused)); // GCC: do not output a warning when this variable is unused
|
static void __neorv32_uart_itoa(uint32_t x, char *res) __attribute__((unused)); // GCC: do not output a warning when this variable is unused
|
static void __neorv32_uart_tohex(uint32_t x, char *res) __attribute__((unused)); // GCC: do not output a warning when this variable is unused
|
static void __neorv32_uart_tohex(uint32_t x, char *res) __attribute__((unused)); // GCC: do not output a warning when this variable is unused
|
static void __neorv32_uart_touppercase(uint32_t len, char *ptr) __attribute__((unused)); // GCC: do not output a warning when this variable is unused
|
static void __neorv32_uart_touppercase(uint32_t len, char *ptr) __attribute__((unused)); // GCC: do not output a warning when this variable is unused
|
/// \endcond
|
/// \endcond
|
|
|
|
|
// #################################################################################################
|
// #################################################################################################
|
// Override default STDIO functions
|
// Override default STDIO functions
|
// #################################################################################################
|
// #################################################################################################
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Send char via UART0
|
* Send char via UART0
|
*
|
*
|
* @param[in] Char to be send.
|
* @param[in] Char to be send.
|
* @return Char that has been sent.
|
* @return Char that has been sent.
|
**************************************************************************/
|
**************************************************************************/
|
int putchar(int ch) {
|
int putchar(int ch) {
|
|
|
neorv32_uart0_putc((char)ch);
|
neorv32_uart0_putc((char)ch);
|
return ch;
|
return ch;
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Read char from UART0.
|
* Read char from UART0.
|
*
|
*
|
* @return Read char.
|
* @return Read char.
|
**************************************************************************/
|
**************************************************************************/
|
int getchar(void) {
|
int getchar(void) {
|
|
|
return (int)neorv32_uart0_getc();
|
return (int)neorv32_uart0_getc();
|
}
|
}
|
|
|
|
|
// #################################################################################################
|
// #################################################################################################
|
// Primary UART (UART0)
|
// Primary UART (UART0)
|
// #################################################################################################
|
// #################################################################################################
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Check if UART0 unit was synthesized.
|
* Check if UART0 unit was synthesized.
|
*
|
*
|
* @return 0 if UART0 was not synthesized, 1 if UART0 is available.
|
* @return 0 if UART0 was not synthesized, 1 if UART0 is available.
|
**************************************************************************/
|
**************************************************************************/
|
int neorv32_uart0_available(void) {
|
int neorv32_uart0_available(void) {
|
|
|
if (NEORV32_SYSINFO.SOC & (1 << SYSINFO_SOC_IO_UART0)) {
|
if (NEORV32_SYSINFO.SOC & (1 << SYSINFO_SOC_IO_UART0)) {
|
return 1;
|
return 1;
|
}
|
}
|
else {
|
else {
|
return 0;
|
return 0;
|
}
|
}
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Enable and configure primary UART (UART0).
|
* Enable and configure primary UART (UART0).
|
*
|
*
|
* @note The 'UART0_SIM_MODE' compiler flag will configure UART0 for simulation mode: all UART0 TX data will be redirected to simulation output. Use this for simulations only!
|
* @note The 'UART0_SIM_MODE' compiler flag will configure UART0 for simulation mode: all UART0 TX data will be redirected to simulation output. Use this for simulations only!
|
* @note To enable simulation mode add <USER_FLAGS+=-DUART0_SIM_MODE> when compiling.
|
* @note To enable simulation mode add <USER_FLAGS+=-DUART0_SIM_MODE> when compiling.
|
*
|
*
|
* @warning The baud rate is computed using INTEGER operations (truncation errors might occur).
|
* @warning The baud rate is computed using INTEGER operations (truncation errors might occur).
|
*
|
*
|
* @param[in] baudrate Targeted BAUD rate (e.g. 9600).
|
* @param[in] baudrate Targeted BAUD rate (e.g. 9600).
|
* @param[in] parity Parity configuration (00=off, 10=even, 11=odd), see #NEORV32_UART_PARITY_enum.
|
* @param[in] parity Parity configuration (00=off, 10=even, 11=odd), see #NEORV32_UART_PARITY_enum.
|
* @param[in] flow_con Hardware flow control configuration (00=off, 01=RTS, 10=CTS, 11=RTS/CTS), see #NEORV32_UART_FLOW_CONTROL_enum.
|
* @param[in] flow_con Hardware flow control configuration (00=off, 01=RTS, 10=CTS, 11=RTS/CTS), see #NEORV32_UART_FLOW_CONTROL_enum.
|
**************************************************************************/
|
**************************************************************************/
|
void neorv32_uart0_setup(uint32_t baudrate, uint8_t parity, uint8_t flow_con) {
|
void neorv32_uart0_setup(uint32_t baudrate, uint8_t parity, uint8_t flow_con) {
|
|
|
NEORV32_UART0.CTRL = 0; // reset
|
NEORV32_UART0.CTRL = 0; // reset
|
|
|
uint32_t clock = NEORV32_SYSINFO.CLK;
|
uint32_t clock = NEORV32_SYSINFO.CLK;
|
uint16_t i = 0; // BAUD rate divisor
|
uint16_t i = 0; // BAUD rate divisor
|
uint8_t p = 0; // initial prsc = CLK/2
|
uint8_t p = 0; // initial prsc = CLK/2
|
|
|
// raw clock prescaler
|
// raw clock prescaler
|
#ifndef make_bootloader
|
#ifndef make_bootloader
|
// use div instructions
|
// use div instructions
|
i = (uint16_t)(clock / (2*baudrate));
|
i = (uint16_t)(clock / (2*baudrate));
|
#else
|
#else
|
// division via repeated subtraction (minimal size, only for bootloader)
|
// division via repeated subtraction (minimal size, only for bootloader)
|
while (clock >= 2*baudrate) {
|
while (clock >= 2*baudrate) {
|
clock -= 2*baudrate;
|
clock -= 2*baudrate;
|
i++;
|
i++;
|
}
|
}
|
#endif
|
#endif
|
|
|
// find baud prescaler (12-bit wide))
|
// find baud prescaler (12-bit wide))
|
while (i >= 0x0fff) {
|
while (i >= 0x0fff) {
|
if ((p == 2) || (p == 4))
|
if ((p == 2) || (p == 4))
|
i >>= 3;
|
i >>= 3;
|
else
|
else
|
i >>= 1;
|
i >>= 1;
|
p++;
|
p++;
|
}
|
}
|
|
|
uint32_t clk_prsc = (uint32_t)p;
|
uint32_t clk_prsc = (uint32_t)p;
|
clk_prsc = clk_prsc << UART_CTRL_PRSC0;
|
clk_prsc = clk_prsc << UART_CTRL_PRSC0;
|
|
|
uint32_t baud_prsc = (uint32_t)i;
|
uint32_t baud_prsc = (uint32_t)i;
|
baud_prsc = baud_prsc - 1;
|
baud_prsc = baud_prsc - 1;
|
baud_prsc = baud_prsc << UART_CTRL_BAUD00;
|
baud_prsc = baud_prsc << UART_CTRL_BAUD00;
|
|
|
uint32_t uart_en = 1;
|
uint32_t uart_en = 1;
|
uart_en = uart_en << UART_CTRL_EN;
|
uart_en = uart_en << UART_CTRL_EN;
|
|
|
uint32_t parity_config = (uint32_t)(parity & 3);
|
uint32_t parity_config = (uint32_t)(parity & 3);
|
parity_config = parity_config << UART_CTRL_PMODE0;
|
parity_config = parity_config << UART_CTRL_PMODE0;
|
|
|
uint32_t flow_control = (uint32_t)(flow_con & 3);
|
uint32_t flow_control = (uint32_t)(flow_con & 3);
|
flow_control = flow_control << UART_CTRL_RTS_EN;
|
flow_control = flow_control << UART_CTRL_RTS_EN;
|
|
|
/* Enable UART0 for SIM mode. */
|
/* Enable UART0 for SIM mode. */
|
/* USE THIS ONLY FOR SIMULATION! */
|
/* USE THIS ONLY FOR SIMULATION! */
|
#ifdef UART_SIM_MODE
|
#ifdef UART_SIM_MODE
|
#warning <UART_SIM_MODE> is obsolete (but still supported for compatibility). Please consider using the new flag <UART0_SIM_MODE>.
|
#warning <UART_SIM_MODE> is obsolete (but still supported for compatibility). Please consider using the new flag <UART0_SIM_MODE>.
|
#endif
|
#endif
|
#if defined UART0_SIM_MODE || defined UART_SIM_MODE
|
#if defined UART0_SIM_MODE || defined UART_SIM_MODE
|
#warning UART0_SIM_MODE (primary UART) enabled! Sending all UART0.TX data to text.io simulation output instead of real UART0 transmitter. Use this for simulations only!
|
#warning UART0_SIM_MODE (primary UART) enabled! Sending all UART0.TX data to text.io simulation output instead of real UART0 transmitter. Use this for simulations only!
|
uint32_t sim_mode = 1 << UART_CTRL_SIM_MODE;
|
uint32_t sim_mode = 1 << UART_CTRL_SIM_MODE;
|
#else
|
#else
|
uint32_t sim_mode = 0;
|
uint32_t sim_mode = 0;
|
#endif
|
#endif
|
|
|
NEORV32_UART0.CTRL = clk_prsc | baud_prsc | uart_en | parity_config | sim_mode | flow_control;
|
NEORV32_UART0.CTRL = clk_prsc | baud_prsc | uart_en | parity_config | sim_mode | flow_control;
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Disable UART0.
|
* Disable UART0.
|
**************************************************************************/
|
**************************************************************************/
|
void neorv32_uart0_disable(void) {
|
void neorv32_uart0_disable(void) {
|
|
|
NEORV32_UART0.CTRL &= ~((uint32_t)(1 << UART_CTRL_EN));
|
NEORV32_UART0.CTRL &= ~((uint32_t)(1 << UART_CTRL_EN));
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Enable UART0.
|
* Enable UART0.
|
**************************************************************************/
|
**************************************************************************/
|
void neorv32_uart0_enable(void) {
|
void neorv32_uart0_enable(void) {
|
|
|
NEORV32_UART0.CTRL |= ((uint32_t)(1 << UART_CTRL_EN));
|
NEORV32_UART0.CTRL |= ((uint32_t)(1 << UART_CTRL_EN));
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Send single char via UART0.
|
* Send single char via UART0.
|
*
|
*
|
* @note This function is blocking.
|
* @note This function is blocking.
|
*
|
*
|
* @param[in] c Char to be send.
|
* @param[in] c Char to be send.
|
**************************************************************************/
|
**************************************************************************/
|
void neorv32_uart0_putc(char c) {
|
void neorv32_uart0_putc(char c) {
|
|
|
// wait for previous transfer to finish
|
// wait for previous transfer to finish
|
while ((NEORV32_UART0.CTRL & (1<<UART_CTRL_TX_FULL)) != 0); // wait for space in TX FIFO
|
while ((NEORV32_UART0.CTRL & (1<<UART_CTRL_TX_FULL)) != 0); // wait for space in TX FIFO
|
NEORV32_UART0.DATA = ((uint32_t)c) << UART_DATA_LSB;
|
NEORV32_UART0.DATA = ((uint32_t)c) << UART_DATA_LSB;
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Check if UART0 TX is busy (transmitter busy or data left in TX buffer).
|
* Check if UART0 TX is busy (transmitter busy or data left in TX buffer).
|
*
|
*
|
* @note This function is blocking.
|
* @note This function is blocking.
|
*
|
*
|
* @return 0 if idle, 1 if busy
|
* @return 0 if idle, 1 if busy
|
**************************************************************************/
|
**************************************************************************/
|
int neorv32_uart0_tx_busy(void) {
|
int neorv32_uart0_tx_busy(void) {
|
|
|
uint32_t ctrl = NEORV32_UART0.CTRL;
|
uint32_t ctrl = NEORV32_UART0.CTRL;
|
|
|
if (((ctrl & (1<<UART_CTRL_TX_BUSY)) != 0) || // TX engine busy
|
if (((ctrl & (1<<UART_CTRL_TX_BUSY)) != 0) || // TX engine busy
|
((ctrl & (1<<UART_CTRL_TX_EMPTY)) == 0)) { // TX buffer not empty
|
((ctrl & (1<<UART_CTRL_TX_EMPTY)) == 0)) { // TX buffer not empty
|
return 1;
|
return 1;
|
}
|
}
|
return 0;
|
return 0;
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Get char from UART0.
|
* Get char from UART0.
|
*
|
*
|
* @note This function is blocking and does not check for UART frame/parity errors.
|
* @note This function is blocking and does not check for UART frame/parity errors.
|
*
|
*
|
* @return Received char.
|
* @return Received char.
|
**************************************************************************/
|
**************************************************************************/
|
char neorv32_uart0_getc(void) {
|
char neorv32_uart0_getc(void) {
|
|
|
uint32_t d = 0;
|
uint32_t d = 0;
|
while (1) {
|
while (1) {
|
d = NEORV32_UART0.DATA;
|
d = NEORV32_UART0.DATA;
|
if ((d & (1<<UART_DATA_AVAIL)) != 0) { // char received?
|
if ((d & (1<<UART_DATA_AVAIL)) != 0) { // char received?
|
return (char)d;
|
return (char)d;
|
}
|
}
|
}
|
}
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Get char from UART0 (and check errors).
|
* Get char from UART0 (and check errors).
|
*
|
*
|
* @note This function is non-blocking and checks for frame and parity errors.
|
* @note This function is non-blocking and checks for frame and parity errors.
|
*
|
*
|
* @param[in,out] data Received char.
|
* @param[in,out] data Received char.
|
* @return Status code:
|
* @return Status code:
|
* 0 = char received without errors
|
* 0 = char received without errors
|
* -1 = nothing received
|
* -1 = nothing received
|
* -2 = char received with frame error
|
* -2 = char received with frame error
|
* -3 = char received with parity error
|
* -3 = char received with parity error
|
* -4 = char received with overrun error.
|
* -4 = char received with overrun error.
|
**************************************************************************/
|
**************************************************************************/
|
int neorv32_uart0_getc_safe(char *data) {
|
int neorv32_uart0_getc_safe(char *data) {
|
|
|
uint32_t uart_rx = NEORV32_UART0.DATA;
|
uint32_t uart_rx = NEORV32_UART0.DATA;
|
|
|
// get received byte (if there is any)
|
// get received byte (if there is any)
|
*data = (char)uart_rx;
|
*data = (char)uart_rx;
|
|
|
// check if no data available at all
|
// check if no data available at all
|
if ((uart_rx & (1<<UART_DATA_AVAIL)) == 0) {
|
if ((uart_rx & (1<<UART_DATA_AVAIL)) == 0) {
|
return -1;
|
return -1;
|
}
|
}
|
|
|
// check for frame error
|
// check for frame error
|
if (uart_rx & (1<<UART_DATA_FERR)) {
|
if (uart_rx & (1<<UART_DATA_FERR)) {
|
return -2;
|
return -2;
|
}
|
}
|
|
|
// check for parity error
|
// check for parity error
|
if (uart_rx & (1<<UART_DATA_PERR)) {
|
if (uart_rx & (1<<UART_DATA_PERR)) {
|
return -3;
|
return -3;
|
}
|
}
|
|
|
// check for overrun error
|
// check for overrun error
|
if (uart_rx & (1<<UART_DATA_OVERR)) {
|
if (uart_rx & (1<<UART_DATA_OVERR)) {
|
return -4;
|
return -4;
|
}
|
}
|
|
|
return 0; // all fine
|
return 0; // all fine
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Check if UART0 has received a char.
|
* Check if UART0 has received a char.
|
*
|
*
|
* @note This function is non-blocking.
|
* @note This function is non-blocking.
|
* @note Use neorv32_uart0_char_received_get(void) to get the char.
|
* @note Use neorv32_uart0_char_received_get(void) to get the char.
|
*
|
*
|
* @return =!0 when a char has been received.
|
* @return =!0 when a char has been received.
|
**************************************************************************/
|
**************************************************************************/
|
int neorv32_uart0_char_received(void) {
|
int neorv32_uart0_char_received(void) {
|
|
|
if ((NEORV32_UART0.DATA & (1<<UART_DATA_AVAIL)) != 0) {
|
if ((NEORV32_UART0.DATA & (1<<UART_DATA_AVAIL)) != 0) {
|
return 1;
|
return 1;
|
}
|
}
|
else {
|
else {
|
return 0;
|
return 0;
|
}
|
}
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Get a received char from UART0.
|
* Get a received char from UART0.
|
*
|
*
|
* @note This function is non-blocking.
|
* @note This function is non-blocking.
|
* @note Should only be used in combination with neorv32_uart_char_received(void).
|
* @note Should only be used in combination with neorv32_uart_char_received(void).
|
*
|
*
|
* @return Received char.
|
* @return Received char.
|
**************************************************************************/
|
**************************************************************************/
|
char neorv32_uart0_char_received_get(void) {
|
char neorv32_uart0_char_received_get(void) {
|
|
|
return (char)NEORV32_UART0.DATA;
|
return (char)NEORV32_UART0.DATA;
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Print string (zero-terminated) via UART0. Print full line break "\r\n" for every '\n'.
|
* Print string (zero-terminated) via UART0. Print full line break "\r\n" for every '\n'.
|
*
|
*
|
* @note This function is blocking.
|
* @note This function is blocking.
|
*
|
*
|
* @param[in] s Pointer to string.
|
* @param[in] s Pointer to string.
|
**************************************************************************/
|
**************************************************************************/
|
void neorv32_uart0_print(const char *s) {
|
void neorv32_uart0_print(const char *s) {
|
|
|
char c = 0;
|
char c = 0;
|
while ((c = *s++)) {
|
while ((c = *s++)) {
|
if (c == '\n') {
|
if (c == '\n') {
|
neorv32_uart0_putc('\r');
|
neorv32_uart0_putc('\r');
|
}
|
}
|
neorv32_uart0_putc(c);
|
neorv32_uart0_putc(c);
|
}
|
}
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Custom version of 'printf' function using UART0.
|
* Custom version of 'printf' function using UART0.
|
*
|
*
|
* @note This function is blocking.
|
* @note This function is blocking.
|
*
|
*
|
* @param[in] format Pointer to format string.
|
* @param[in] format Pointer to format string.
|
*
|
*
|
* <TABLE>
|
* <TABLE>
|
* <TR><TD>%s</TD><TD>String (array of chars, zero-terminated)</TD></TR>
|
* <TR><TD>%s</TD><TD>String (array of chars, zero-terminated)</TD></TR>
|
* <TR><TD>%c</TD><TD>Single char</TD></TR>
|
* <TR><TD>%c</TD><TD>Single char</TD></TR>
|
* <TR><TD>%d/%i</TD><TD>32-bit signed number, printed as decimal</TD></TR>
|
* <TR><TD>%d/%i</TD><TD>32-bit signed number, printed as decimal</TD></TR>
|
* <TR><TD>%u</TD><TD>32-bit unsigned number, printed as decimal</TD></TR>
|
* <TR><TD>%u</TD><TD>32-bit unsigned number, printed as decimal</TD></TR>
|
* <TR><TD>%x</TD><TD>32-bit number, printed as 8-char hexadecimal - lower-case</TD></TR>
|
* <TR><TD>%x</TD><TD>32-bit number, printed as 8-char hexadecimal - lower-case</TD></TR>
|
* <TR><TD>%X</TD><TD>32-bit number, printed as 8-char hexadecimal - upper-case</TD></TR>
|
* <TR><TD>%X</TD><TD>32-bit number, printed as 8-char hexadecimal - upper-case</TD></TR>
|
* <TR><TD>%p</TD><TD>32-bit pointer, printed as 8-char hexadecimal - lower-case</TD></TR>
|
* <TR><TD>%p</TD><TD>32-bit pointer, printed as 8-char hexadecimal - lower-case</TD></TR>
|
* </TABLE>
|
* </TABLE>
|
**************************************************************************/
|
**************************************************************************/
|
void neorv32_uart0_printf(const char *format, ...) {
|
void neorv32_uart0_printf(const char *format, ...) {
|
|
|
char c, string_buf[11];
|
char c, string_buf[11];
|
int32_t n;
|
int32_t n;
|
|
|
va_list a;
|
va_list a;
|
va_start(a, format);
|
va_start(a, format);
|
|
|
while ((c = *format++)) {
|
while ((c = *format++)) {
|
if (c == '%') {
|
if (c == '%') {
|
c = *format++;
|
c = *format++;
|
switch (c) {
|
switch (c) {
|
case 's': // string
|
case 's': // string
|
neorv32_uart0_print(va_arg(a, char*));
|
neorv32_uart0_print(va_arg(a, char*));
|
break;
|
break;
|
case 'c': // char
|
case 'c': // char
|
neorv32_uart0_putc((char)va_arg(a, int));
|
neorv32_uart0_putc((char)va_arg(a, int));
|
break;
|
break;
|
case 'i': // 32-bit signed
|
case 'i': // 32-bit signed
|
case 'd':
|
case 'd':
|
n = (int32_t)va_arg(a, int32_t);
|
n = (int32_t)va_arg(a, int32_t);
|
if (n < 0) {
|
if (n < 0) {
|
n = -n;
|
n = -n;
|
neorv32_uart0_putc('-');
|
neorv32_uart0_putc('-');
|
}
|
}
|
__neorv32_uart_itoa((uint32_t)n, string_buf);
|
__neorv32_uart_itoa((uint32_t)n, string_buf);
|
neorv32_uart0_print(string_buf);
|
neorv32_uart0_print(string_buf);
|
break;
|
break;
|
case 'u': // 32-bit unsigned
|
case 'u': // 32-bit unsigned
|
__neorv32_uart_itoa(va_arg(a, uint32_t), string_buf);
|
__neorv32_uart_itoa(va_arg(a, uint32_t), string_buf);
|
neorv32_uart0_print(string_buf);
|
neorv32_uart0_print(string_buf);
|
break;
|
break;
|
case 'x': // 32-bit hexadecimal
|
case 'x': // 32-bit hexadecimal
|
case 'p':
|
case 'p':
|
case 'X':
|
case 'X':
|
__neorv32_uart_tohex(va_arg(a, uint32_t), string_buf);
|
__neorv32_uart_tohex(va_arg(a, uint32_t), string_buf);
|
if (c == 'X') {
|
if (c == 'X') {
|
__neorv32_uart_touppercase(11, string_buf);
|
__neorv32_uart_touppercase(11, string_buf);
|
}
|
}
|
neorv32_uart0_print(string_buf);
|
neorv32_uart0_print(string_buf);
|
break;
|
break;
|
default: // unsupported format
|
default: // unsupported format
|
neorv32_uart0_putc('%');
|
neorv32_uart0_putc('%');
|
neorv32_uart0_putc(c);
|
neorv32_uart0_putc(c);
|
break;
|
break;
|
}
|
}
|
}
|
}
|
else {
|
else {
|
if (c == '\n') {
|
if (c == '\n') {
|
neorv32_uart0_putc('\r');
|
neorv32_uart0_putc('\r');
|
}
|
}
|
neorv32_uart0_putc(c);
|
neorv32_uart0_putc(c);
|
}
|
}
|
}
|
}
|
va_end(a);
|
va_end(a);
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Simplified custom version of 'scanf' function for UART0.
|
* Simplified custom version of 'scanf' function for UART0.
|
*
|
*
|
* @note This function is blocking.
|
* @note This function is blocking.
|
*
|
*
|
* @param[in,out] buffer Pointer to array of chars to store string.
|
* @param[in,out] buffer Pointer to array of chars to store string.
|
* @param[in] max_size Maximum number of chars to sample.
|
* @param[in] max_size Maximum number of chars to sample.
|
* @param[in] echo Echo UART input when 1.
|
* @param[in] echo Echo UART input when 1.
|
* @return Number of chars read.
|
* @return Number of chars read.
|
**************************************************************************/
|
**************************************************************************/
|
int neorv32_uart0_scan(char *buffer, int max_size, int echo) {
|
int neorv32_uart0_scan(char *buffer, int max_size, int echo) {
|
|
|
char c = 0;
|
char c = 0;
|
int length = 0;
|
int length = 0;
|
|
|
while (1) {
|
while (1) {
|
c = neorv32_uart0_getc();
|
c = neorv32_uart0_getc();
|
if (c == '\b') { // BACKSPACE
|
if (c == '\b') { // BACKSPACE
|
if (length != 0) {
|
if (length != 0) {
|
if (echo) {
|
if (echo) {
|
neorv32_uart0_print("\b \b"); // delete last char in console
|
neorv32_uart0_print("\b \b"); // delete last char in console
|
}
|
}
|
buffer--;
|
buffer--;
|
length--;
|
length--;
|
}
|
}
|
}
|
}
|
else if (c == '\r') // carriage return
|
else if (c == '\r') // carriage return
|
break;
|
break;
|
else if ((c >= ' ') && (c <= '~') && (length < (max_size-1))) {
|
else if ((c >= ' ') && (c <= '~') && (length < (max_size-1))) {
|
if (echo) {
|
if (echo) {
|
neorv32_uart0_putc(c); // echo
|
neorv32_uart0_putc(c); // echo
|
}
|
}
|
*buffer++ = c;
|
*buffer++ = c;
|
length++;
|
length++;
|
}
|
}
|
}
|
}
|
*buffer = '\0'; // terminate string
|
*buffer = '\0'; // terminate string
|
|
|
return length;
|
return length;
|
}
|
}
|
|
|
|
|
|
|
// #################################################################################################
|
// #################################################################################################
|
// Secondary UART (UART1)
|
// Secondary UART (UART1)
|
// #################################################################################################
|
// #################################################################################################
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Check if UART1 unit was synthesized.
|
* Check if UART1 unit was synthesized.
|
*
|
*
|
* @return 0 if UART1 was not synthesized, 1 if UART1 is available.
|
* @return 0 if UART1 was not synthesized, 1 if UART1 is available.
|
**************************************************************************/
|
**************************************************************************/
|
int neorv32_uart1_available(void) {
|
int neorv32_uart1_available(void) {
|
|
|
if (NEORV32_SYSINFO.SOC & (1 << SYSINFO_SOC_IO_UART1)) {
|
if (NEORV32_SYSINFO.SOC & (1 << SYSINFO_SOC_IO_UART1)) {
|
return 1;
|
return 1;
|
}
|
}
|
else {
|
else {
|
return 0;
|
return 0;
|
}
|
}
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Enable and configure secondary UART (UART1).
|
* Enable and configure secondary UART (UART1).
|
*
|
*
|
* @note The 'UART1_SIM_MODE' compiler flag will configure UART1 for simulation mode: all UART1 TX data will be redirected to simulation output. Use this for simulations only!
|
* @note The 'UART1_SIM_MODE' compiler flag will configure UART1 for simulation mode: all UART1 TX data will be redirected to simulation output. Use this for simulations only!
|
* @note To enable simulation mode add <USER_FLAGS+=-DUART1_SIM_MODE> when compiling.
|
* @note To enable simulation mode add <USER_FLAGS+=-DUART1_SIM_MODE> when compiling.
|
*
|
*
|
* @warning The baud rate is computed using INTEGER operations (truncation errors might occur).
|
* @warning The baud rate is computed using INTEGER operations (truncation errors might occur).
|
*
|
*
|
* @param[in] baudrate Targeted BAUD rate (e.g. 9600).
|
* @param[in] baudrate Targeted BAUD rate (e.g. 9600).
|
* @param[in] parity Parity configuration (00=off, 10=even, 11=odd), see #NEORV32_UART_PARITY_enum.
|
* @param[in] parity Parity configuration (00=off, 10=even, 11=odd), see #NEORV32_UART_PARITY_enum.
|
* @param[in] flow_con Hardware flow control configuration (00=off, 01=RTS, 10=CTS, 11=RTS/CTS), see #NEORV32_UART_FLOW_CONTROL_enum.
|
* @param[in] flow_con Hardware flow control configuration (00=off, 01=RTS, 10=CTS, 11=RTS/CTS), see #NEORV32_UART_FLOW_CONTROL_enum.
|
**************************************************************************/
|
**************************************************************************/
|
void neorv32_uart1_setup(uint32_t baudrate, uint8_t parity, uint8_t flow_con) {
|
void neorv32_uart1_setup(uint32_t baudrate, uint8_t parity, uint8_t flow_con) {
|
|
|
NEORV32_UART1.CTRL = 0; // reset
|
NEORV32_UART1.CTRL = 0; // reset
|
|
|
uint32_t clock = NEORV32_SYSINFO.CLK;
|
uint32_t clock = NEORV32_SYSINFO.CLK;
|
uint16_t i = 0; // BAUD rate divisor
|
uint16_t i = 0; // BAUD rate divisor
|
uint8_t p = 0; // initial prsc = CLK/2
|
uint8_t p = 0; // initial prsc = CLK/2
|
|
|
// raw clock prescaler
|
// raw clock prescaler
|
#ifndef make_bootloader
|
#ifndef make_bootloader
|
// use div instructions
|
// use div instructions
|
i = (uint16_t)(clock / (2*baudrate));
|
i = (uint16_t)(clock / (2*baudrate));
|
#else
|
#else
|
// division via repeated subtraction (minimal size, only for bootloader)
|
// division via repeated subtraction (minimal size, only for bootloader)
|
while (clock >= 2*baudrate) {
|
while (clock >= 2*baudrate) {
|
clock -= 2*baudrate;
|
clock -= 2*baudrate;
|
i++;
|
i++;
|
}
|
}
|
#endif
|
#endif
|
|
|
// find baud prescaler (12-bit wide))
|
// find baud prescaler (12-bit wide))
|
while (i >= 0x0fff) {
|
while (i >= 0x0fff) {
|
if ((p == 2) || (p == 4))
|
if ((p == 2) || (p == 4))
|
i >>= 3;
|
i >>= 3;
|
else
|
else
|
i >>= 1;
|
i >>= 1;
|
p++;
|
p++;
|
}
|
}
|
|
|
uint32_t clk_prsc = (uint32_t)p;
|
uint32_t clk_prsc = (uint32_t)p;
|
clk_prsc = clk_prsc << UART_CTRL_PRSC0;
|
clk_prsc = clk_prsc << UART_CTRL_PRSC0;
|
|
|
uint32_t baud_prsc = (uint32_t)i;
|
uint32_t baud_prsc = (uint32_t)i;
|
baud_prsc = baud_prsc - 1;
|
baud_prsc = baud_prsc - 1;
|
baud_prsc = baud_prsc << UART_CTRL_BAUD00;
|
baud_prsc = baud_prsc << UART_CTRL_BAUD00;
|
|
|
uint32_t uart_en = 1;
|
uint32_t uart_en = 1;
|
uart_en = uart_en << UART_CTRL_EN;
|
uart_en = uart_en << UART_CTRL_EN;
|
|
|
uint32_t parity_config = (uint32_t)(parity & 3);
|
uint32_t parity_config = (uint32_t)(parity & 3);
|
parity_config = parity_config << UART_CTRL_PMODE0;
|
parity_config = parity_config << UART_CTRL_PMODE0;
|
|
|
uint32_t flow_control = (uint32_t)(flow_con & 3);
|
uint32_t flow_control = (uint32_t)(flow_con & 3);
|
flow_control = flow_control << UART_CTRL_RTS_EN;
|
flow_control = flow_control << UART_CTRL_RTS_EN;
|
|
|
/* Enable UART1 for SIM mode. */
|
/* Enable UART1 for SIM mode. */
|
/* USE THIS ONLY FOR SIMULATION! */
|
/* USE THIS ONLY FOR SIMULATION! */
|
#ifdef UART1_SIM_MODE
|
#ifdef UART1_SIM_MODE
|
#warning UART1_SIM_MODE (secondary UART) enabled! Sending all UART1.TX data to text.io simulation output instead of real UART1 transmitter. Use this for simulations only!
|
#warning UART1_SIM_MODE (secondary UART) enabled! Sending all UART1.TX data to text.io simulation output instead of real UART1 transmitter. Use this for simulations only!
|
uint32_t sim_mode = 1 << UART_CTRL_SIM_MODE;
|
uint32_t sim_mode = 1 << UART_CTRL_SIM_MODE;
|
#else
|
#else
|
uint32_t sim_mode = 0;
|
uint32_t sim_mode = 0;
|
#endif
|
#endif
|
|
|
NEORV32_UART1.CTRL = clk_prsc | baud_prsc | uart_en | parity_config | sim_mode | flow_control;
|
NEORV32_UART1.CTRL = clk_prsc | baud_prsc | uart_en | parity_config | sim_mode | flow_control;
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Disable UART1.
|
* Disable UART1.
|
**************************************************************************/
|
**************************************************************************/
|
void neorv32_uart1_disable(void) {
|
void neorv32_uart1_disable(void) {
|
|
|
NEORV32_UART1.CTRL &= ~((uint32_t)(1 << UART_CTRL_EN));
|
NEORV32_UART1.CTRL &= ~((uint32_t)(1 << UART_CTRL_EN));
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Enable UART1.
|
* Enable UART1.
|
**************************************************************************/
|
**************************************************************************/
|
void neorv32_uart1_enable(void) {
|
void neorv32_uart1_enable(void) {
|
|
|
NEORV32_UART1.CTRL |= ((uint32_t)(1 << UART_CTRL_EN));
|
NEORV32_UART1.CTRL |= ((uint32_t)(1 << UART_CTRL_EN));
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Send single char via UART1.
|
* Send single char via UART1.
|
*
|
*
|
* @note This function is blocking.
|
* @note This function is blocking.
|
*
|
*
|
* @param[in] c Char to be send.
|
* @param[in] c Char to be send.
|
**************************************************************************/
|
**************************************************************************/
|
void neorv32_uart1_putc(char c) {
|
void neorv32_uart1_putc(char c) {
|
|
|
// wait for previous transfer to finish
|
// wait for previous transfer to finish
|
while ((NEORV32_UART1.CTRL & (1<<UART_CTRL_TX_FULL)) != 0); // wait for space in TX FIFO
|
while ((NEORV32_UART1.CTRL & (1<<UART_CTRL_TX_FULL)) != 0); // wait for space in TX FIFO
|
NEORV32_UART1.DATA = ((uint32_t)c) << UART_DATA_LSB;
|
NEORV32_UART1.DATA = ((uint32_t)c) << UART_DATA_LSB;
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Check if UART1 TX is busy (transmitter busy or data left in TX buffer).
|
* Check if UART1 TX is busy (transmitter busy or data left in TX buffer).
|
*
|
*
|
* @note This function is blocking.
|
* @note This function is blocking.
|
*
|
*
|
* @return 0 if idle, 1 if busy
|
* @return 0 if idle, 1 if busy
|
**************************************************************************/
|
**************************************************************************/
|
int neorv32_uart1_tx_busy(void) {
|
int neorv32_uart1_tx_busy(void) {
|
|
|
uint32_t ctrl = NEORV32_UART1.CTRL;
|
uint32_t ctrl = NEORV32_UART1.CTRL;
|
|
|
if (((ctrl & (1<<UART_CTRL_TX_BUSY)) != 0) || // TX engine busy
|
if (((ctrl & (1<<UART_CTRL_TX_BUSY)) != 0) || // TX engine busy
|
((ctrl & (1<<UART_CTRL_TX_EMPTY)) == 0)) { // TX buffer not empty
|
((ctrl & (1<<UART_CTRL_TX_EMPTY)) == 0)) { // TX buffer not empty
|
return 1;
|
return 1;
|
}
|
}
|
return 0;
|
return 0;
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Get char from UART1.
|
* Get char from UART1.
|
*
|
*
|
* @note This function is blocking and does not check for UART frame/parity errors.
|
* @note This function is blocking and does not check for UART frame/parity errors.
|
*
|
*
|
* @return Received char.
|
* @return Received char.
|
**************************************************************************/
|
**************************************************************************/
|
char neorv32_uart1_getc(void) {
|
char neorv32_uart1_getc(void) {
|
|
|
uint32_t d = 0;
|
uint32_t d = 0;
|
while (1) {
|
while (1) {
|
d = NEORV32_UART1.DATA;
|
d = NEORV32_UART1.DATA;
|
if ((d & (1<<UART_DATA_AVAIL)) != 0) { // char received?
|
if ((d & (1<<UART_DATA_AVAIL)) != 0) { // char received?
|
return (char)d;
|
return (char)d;
|
}
|
}
|
}
|
}
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Get char from UART1 (and check errors).
|
* Get char from UART1 (and check errors).
|
*
|
*
|
* @note This function is non-blocking and checks for frame and parity errors.
|
* @note This function is non-blocking and checks for frame and parity errors.
|
*
|
*
|
* @param[in,out] data Received char.
|
* @param[in,out] data Received char.
|
* @return Status code:
|
* @return Status code:
|
* 0 = char received without errors
|
* 0 = char received without errors
|
* -1 = nothing received
|
* -1 = nothing received
|
* -2 = char received with frame error
|
* -2 = char received with frame error
|
* -3 = char received with parity error
|
* -3 = char received with parity error
|
* -4 = char received with overrun error.
|
* -4 = char received with overrun error.
|
**************************************************************************/
|
**************************************************************************/
|
int neorv32_uart1_getc_safe(char *data) {
|
int neorv32_uart1_getc_safe(char *data) {
|
|
|
uint32_t uart_rx = NEORV32_UART1.DATA;
|
uint32_t uart_rx = NEORV32_UART1.DATA;
|
|
|
// get received byte (if there is any)
|
// get received byte (if there is any)
|
*data = (char)uart_rx;
|
*data = (char)uart_rx;
|
|
|
// check if no data available at all
|
// check if no data available at all
|
if ((uart_rx & (1<<UART_DATA_AVAIL)) == 0) {
|
if ((uart_rx & (1<<UART_DATA_AVAIL)) == 0) {
|
return -1;
|
return -1;
|
}
|
}
|
|
|
// check for frame error
|
// check for frame error
|
if (uart_rx & (1<<UART_DATA_FERR)) {
|
if (uart_rx & (1<<UART_DATA_FERR)) {
|
return -2;
|
return -2;
|
}
|
}
|
|
|
// check for parity error
|
// check for parity error
|
if (uart_rx & (1<<UART_DATA_PERR)) {
|
if (uart_rx & (1<<UART_DATA_PERR)) {
|
return -3;
|
return -3;
|
}
|
}
|
|
|
// check for overrun error
|
// check for overrun error
|
if (uart_rx & (1<<UART_DATA_OVERR)) {
|
if (uart_rx & (1<<UART_DATA_OVERR)) {
|
return -4;
|
return -4;
|
}
|
}
|
|
|
return 0; // all fine
|
return 0; // all fine
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Check if UART1 has received a char.
|
* Check if UART1 has received a char.
|
*
|
*
|
* @note This function is non-blocking.
|
* @note This function is non-blocking.
|
* @note Use neorv32_uart0_char_received_get(void) to get the char.
|
* @note Use neorv32_uart0_char_received_get(void) to get the char.
|
*
|
*
|
* @return =!0 when a char has been received.
|
* @return =!0 when a char has been received.
|
**************************************************************************/
|
**************************************************************************/
|
int neorv32_uart1_char_received(void) {
|
int neorv32_uart1_char_received(void) {
|
|
|
if ((NEORV32_UART1.DATA & (1<<UART_DATA_AVAIL)) != 0) {
|
if ((NEORV32_UART1.DATA & (1<<UART_DATA_AVAIL)) != 0) {
|
return 1;
|
return 1;
|
}
|
}
|
else {
|
else {
|
return 0;
|
return 0;
|
}
|
}
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Get a received char from UART1.
|
* Get a received char from UART1.
|
*
|
*
|
* @note This function is non-blocking.
|
* @note This function is non-blocking.
|
* @note Should only be used in combination with neorv32_uart_char_received(void).
|
* @note Should only be used in combination with neorv32_uart_char_received(void).
|
*
|
*
|
* @return Received char.
|
* @return Received char.
|
**************************************************************************/
|
**************************************************************************/
|
char neorv32_uart1_char_received_get(void) {
|
char neorv32_uart1_char_received_get(void) {
|
|
|
return (char)NEORV32_UART1.DATA;
|
return (char)NEORV32_UART1.DATA;
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Print string (zero-terminated) via UART1. Print full line break "\r\n" for every '\n'.
|
* Print string (zero-terminated) via UART1. Print full line break "\r\n" for every '\n'.
|
*
|
*
|
* @note This function is blocking.
|
* @note This function is blocking.
|
*
|
*
|
* @param[in] s Pointer to string.
|
* @param[in] s Pointer to string.
|
**************************************************************************/
|
**************************************************************************/
|
void neorv32_uart1_print(const char *s) {
|
void neorv32_uart1_print(const char *s) {
|
|
|
char c = 0;
|
char c = 0;
|
while ((c = *s++)) {
|
while ((c = *s++)) {
|
if (c == '\n') {
|
if (c == '\n') {
|
neorv32_uart1_putc('\r');
|
neorv32_uart1_putc('\r');
|
}
|
}
|
neorv32_uart1_putc(c);
|
neorv32_uart1_putc(c);
|
}
|
}
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Custom version of 'printf' function using UART1.
|
* Custom version of 'printf' function using UART1.
|
*
|
*
|
* @note This function is blocking.
|
* @note This function is blocking.
|
*
|
*
|
* @param[in] format Pointer to format string.
|
* @param[in] format Pointer to format string.
|
*
|
*
|
* <TABLE>
|
* <TABLE>
|
* <TR><TD>%s</TD><TD>String (array of chars, zero-terminated)</TD></TR>
|
* <TR><TD>%s</TD><TD>String (array of chars, zero-terminated)</TD></TR>
|
* <TR><TD>%c</TD><TD>Single char</TD></TR>
|
* <TR><TD>%c</TD><TD>Single char</TD></TR>
|
* <TR><TD>%d/%i</TD><TD>32-bit signed number, printed as decimal</TD></TR>
|
* <TR><TD>%d/%i</TD><TD>32-bit signed number, printed as decimal</TD></TR>
|
* <TR><TD>%u</TD><TD>32-bit unsigned number, printed as decimal</TD></TR>
|
* <TR><TD>%u</TD><TD>32-bit unsigned number, printed as decimal</TD></TR>
|
* <TR><TD>%x</TD><TD>32-bit number, printed as 8-char hexadecimal - lower-case</TD></TR>
|
* <TR><TD>%x</TD><TD>32-bit number, printed as 8-char hexadecimal - lower-case</TD></TR>
|
* <TR><TD>%X</TD><TD>32-bit number, printed as 8-char hexadecimal - upper-case</TD></TR>
|
* <TR><TD>%X</TD><TD>32-bit number, printed as 8-char hexadecimal - upper-case</TD></TR>
|
* <TR><TD>%p</TD><TD>32-bit pointer, printed as 8-char hexadecimal - lower-case</TD></TR>
|
* <TR><TD>%p</TD><TD>32-bit pointer, printed as 8-char hexadecimal - lower-case</TD></TR>
|
* </TABLE>
|
* </TABLE>
|
**************************************************************************/
|
**************************************************************************/
|
void neorv32_uart1_printf(const char *format, ...) {
|
void neorv32_uart1_printf(const char *format, ...) {
|
|
|
char c, string_buf[11];
|
char c, string_buf[11];
|
int32_t n;
|
int32_t n;
|
|
|
va_list a;
|
va_list a;
|
va_start(a, format);
|
va_start(a, format);
|
|
|
while ((c = *format++)) {
|
while ((c = *format++)) {
|
if (c == '%') {
|
if (c == '%') {
|
c = *format++;
|
c = *format++;
|
switch (c) {
|
switch (c) {
|
case 's': // string
|
case 's': // string
|
neorv32_uart1_print(va_arg(a, char*));
|
neorv32_uart1_print(va_arg(a, char*));
|
break;
|
break;
|
case 'c': // char
|
case 'c': // char
|
neorv32_uart1_putc((char)va_arg(a, int));
|
neorv32_uart1_putc((char)va_arg(a, int));
|
break;
|
break;
|
case 'i': // 32-bit signed
|
case 'i': // 32-bit signed
|
case 'd':
|
case 'd':
|
n = (int32_t)va_arg(a, int32_t);
|
n = (int32_t)va_arg(a, int32_t);
|
if (n < 0) {
|
if (n < 0) {
|
n = -n;
|
n = -n;
|
neorv32_uart1_putc('-');
|
neorv32_uart1_putc('-');
|
}
|
}
|
__neorv32_uart_itoa((uint32_t)n, string_buf);
|
__neorv32_uart_itoa((uint32_t)n, string_buf);
|
neorv32_uart1_print(string_buf);
|
neorv32_uart1_print(string_buf);
|
break;
|
break;
|
case 'u': // 32-bit unsigned
|
case 'u': // 32-bit unsigned
|
__neorv32_uart_itoa(va_arg(a, uint32_t), string_buf);
|
__neorv32_uart_itoa(va_arg(a, uint32_t), string_buf);
|
neorv32_uart1_print(string_buf);
|
neorv32_uart1_print(string_buf);
|
break;
|
break;
|
case 'x': // 32-bit hexadecimal
|
case 'x': // 32-bit hexadecimal
|
case 'p':
|
case 'p':
|
case 'X':
|
case 'X':
|
__neorv32_uart_tohex(va_arg(a, uint32_t), string_buf);
|
__neorv32_uart_tohex(va_arg(a, uint32_t), string_buf);
|
if (c == 'X') {
|
if (c == 'X') {
|
__neorv32_uart_touppercase(11, string_buf);
|
__neorv32_uart_touppercase(11, string_buf);
|
}
|
}
|
neorv32_uart1_print(string_buf);
|
neorv32_uart1_print(string_buf);
|
break;
|
break;
|
default: // unsupported format
|
default: // unsupported format
|
neorv32_uart1_putc('%');
|
neorv32_uart1_putc('%');
|
neorv32_uart1_putc(c);
|
neorv32_uart1_putc(c);
|
break;
|
break;
|
}
|
}
|
}
|
}
|
else {
|
else {
|
if (c == '\n') {
|
if (c == '\n') {
|
neorv32_uart1_putc('\r');
|
neorv32_uart1_putc('\r');
|
}
|
}
|
neorv32_uart1_putc(c);
|
neorv32_uart1_putc(c);
|
}
|
}
|
}
|
}
|
va_end(a);
|
va_end(a);
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Simplified custom version of 'scanf' function for UART1.
|
* Simplified custom version of 'scanf' function for UART1.
|
*
|
*
|
* @note This function is blocking.
|
* @note This function is blocking.
|
*
|
*
|
* @param[in,out] buffer Pointer to array of chars to store string.
|
* @param[in,out] buffer Pointer to array of chars to store string.
|
* @param[in] max_size Maximum number of chars to sample.
|
* @param[in] max_size Maximum number of chars to sample.
|
* @param[in] echo Echo UART input when 1.
|
* @param[in] echo Echo UART input when 1.
|
* @return Number of chars read.
|
* @return Number of chars read.
|
**************************************************************************/
|
**************************************************************************/
|
int neorv32_uart1_scan(char *buffer, int max_size, int echo) {
|
int neorv32_uart1_scan(char *buffer, int max_size, int echo) {
|
|
|
char c = 0;
|
char c = 0;
|
int length = 0;
|
int length = 0;
|
|
|
while (1) {
|
while (1) {
|
c = neorv32_uart1_getc();
|
c = neorv32_uart1_getc();
|
if (c == '\b') { // BACKSPACE
|
if (c == '\b') { // BACKSPACE
|
if (length != 0) {
|
if (length != 0) {
|
if (echo) {
|
if (echo) {
|
neorv32_uart1_print("\b \b"); // delete last char in console
|
neorv32_uart1_print("\b \b"); // delete last char in console
|
}
|
}
|
buffer--;
|
buffer--;
|
length--;
|
length--;
|
}
|
}
|
}
|
}
|
else if (c == '\r') // carriage return
|
else if (c == '\r') // carriage return
|
break;
|
break;
|
else if ((c >= ' ') && (c <= '~') && (length < (max_size-1))) {
|
else if ((c >= ' ') && (c <= '~') && (length < (max_size-1))) {
|
if (echo) {
|
if (echo) {
|
neorv32_uart1_putc(c); // echo
|
neorv32_uart1_putc(c); // echo
|
}
|
}
|
*buffer++ = c;
|
*buffer++ = c;
|
length++;
|
length++;
|
}
|
}
|
}
|
}
|
*buffer = '\0'; // terminate string
|
*buffer = '\0'; // terminate string
|
|
|
return length;
|
return length;
|
}
|
}
|
|
|
|
|
|
|
// #################################################################################################
|
// #################################################################################################
|
// Shared functions
|
// Shared functions
|
// #################################################################################################
|
// #################################################################################################
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Private function for 'neorv32_printf' to convert into decimal.
|
* Private function for 'neorv32_printf' to convert into decimal.
|
*
|
*
|
* @param[in] x Unsigned input number.
|
* @param[in] x Unsigned input number.
|
* @param[in,out] res Pointer for storing the reuslting number string (11 chars).
|
* @param[in,out] res Pointer for storing the reuslting number string (11 chars).
|
**************************************************************************/
|
**************************************************************************/
|
static void __neorv32_uart_itoa(uint32_t x, char *res) {
|
static void __neorv32_uart_itoa(uint32_t x, char *res) {
|
|
|
static const char numbers[] = "0123456789";
|
static const char numbers[] = "0123456789";
|
char buffer1[11];
|
char buffer1[11];
|
uint16_t i, j;
|
uint16_t i, j;
|
|
|
buffer1[10] = '\0';
|
buffer1[10] = '\0';
|
res[10] = '\0';
|
res[10] = '\0';
|
|
|
// convert
|
// convert
|
for (i=0; i<10; i++) {
|
for (i=0; i<10; i++) {
|
buffer1[i] = numbers[x%10];
|
buffer1[i] = numbers[x%10];
|
x /= 10;
|
x /= 10;
|
}
|
}
|
|
|
// delete 'leading' zeros
|
// delete 'leading' zeros
|
for (i=9; i!=0; i--) {
|
for (i=9; i!=0; i--) {
|
if (buffer1[i] == '0')
|
if (buffer1[i] == '0')
|
buffer1[i] = '\0';
|
buffer1[i] = '\0';
|
else
|
else
|
break;
|
break;
|
}
|
}
|
|
|
// reverse
|
// reverse
|
j = 0;
|
j = 0;
|
do {
|
do {
|
if (buffer1[i] != '\0')
|
if (buffer1[i] != '\0')
|
res[j++] = buffer1[i];
|
res[j++] = buffer1[i];
|
} while (i--);
|
} while (i--);
|
|
|
res[j] = '\0'; // terminate result string
|
res[j] = '\0'; // terminate result string
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Private function for 'neorv32_printf' to convert into hexadecimal.
|
* Private function for 'neorv32_printf' to convert into hexadecimal.
|
*
|
*
|
* @param[in] x Unsigned input number.
|
* @param[in] x Unsigned input number.
|
* @param[in,out] res Pointer for storing the resulting number string (9 chars).
|
* @param[in,out] res Pointer for storing the resulting number string (9 chars).
|
**************************************************************************/
|
**************************************************************************/
|
static void __neorv32_uart_tohex(uint32_t x, char *res) {
|
static void __neorv32_uart_tohex(uint32_t x, char *res) {
|
|
|
static const char symbols[] = "0123456789abcdef";
|
static const char symbols[] = "0123456789abcdef";
|
|
|
int i;
|
int i;
|
for (i=0; i<8; i++) { // nibble by nibble
|
for (i=0; i<8; i++) { // nibble by nibble
|
uint32_t num_tmp = x >> (4*i);
|
uint32_t num_tmp = x >> (4*i);
|
res[7-i] = (char)symbols[num_tmp & 0x0f];
|
res[7-i] = (char)symbols[num_tmp & 0x0f];
|
}
|
}
|
|
|
res[8] = '\0'; // terminate result string
|
res[8] = '\0'; // terminate result string
|
}
|
}
|
|
|
|
|
/**********************************************************************//**
|
/**********************************************************************//**
|
* Private function to cast a string to UPPERCASE.
|
* Private function to cast a string to UPPERCASE.
|
*
|
*
|
* @param[in] len Total length of input string.
|
* @param[in] len Total length of input string.
|
* @param[in,out] ptr Pointer for input/output string.
|
* @param[in,out] ptr Pointer for input/output string.
|
**************************************************************************/
|
**************************************************************************/
|
static void __neorv32_uart_touppercase(uint32_t len, char *ptr) {
|
static void __neorv32_uart_touppercase(uint32_t len, char *ptr) {
|
|
|
char tmp;
|
char tmp;
|
|
|
while (len > 0) {
|
while (len > 0) {
|
tmp = *ptr;
|
tmp = *ptr;
|
if ((tmp >= 'a') && (tmp <= 'z')) {
|
if ((tmp >= 'a') && (tmp <= 'z')) {
|
*ptr = tmp - 32;
|
*ptr = tmp - 32;
|
}
|
}
|
ptr++;
|
ptr++;
|
len--;
|
len--;
|
}
|
}
|
}
|
}
|
|
|