blob: a19776ad69d7af0c8e86b4fa95b3209b936f7d43 [file] [log] [blame]
/*
* Copyright (c) 2021-2023, Stephan Gerhold <stephan@gerhold.net>
*
* Based on aarch32/skeleton_console.S:
* Copyright (c) 2016-2020, ARM Limited and Contributors. All rights reserved.
*
* SPDX-License-Identifier: BSD-3-Clause
*/
#include <asm_macros.S>
#include <console_macros.S>
/* UART DM registers */
#define UART_DM_DMEN 0x03c /* DMA / data packing */
#define UART_DM_SR 0x0a4 /* status register */
#define UART_DM_CR 0x0a8 /* command register */
#define UART_DM_TF 0x100 /* transmit FIFO */
#define UART_DM_DMEN_TX_SC BIT_32(4) /* TX single character mode */
#define UART_DM_SR_TXRDY BIT_32(2) /* TX FIFO has space */
#define UART_DM_SR_TXEMT BIT_32(3) /* TX FIFO is empty */
#define UART_DM_CR_RESET_RX (U(0x01) << 4) /* reset receiver */
#define UART_DM_CR_RESET_TX (U(0x02) << 4) /* reset transmitter */
#define UART_DM_CR_TX_ENABLE BIT_32(2) /* enable transmitter */
.globl console_uartdm_register
.globl console_uartdm_core_init
.globl console_uartdm_putc
.globl console_uartdm_core_putc
.globl console_uartdm_flush
.globl console_uartdm_core_flush
/* -----------------------------------------------------------
* int console_uartdm_register(console_t *console,
* uintptr_t base_addr)
* Function to initialize and register the console. The caller
* needs to pass an empty console_t structure in which *MUST*
* be allocated in persistent memory (e.g. a global or static
* local variable, *NOT* on the stack).
* In : r0 - pointer to empty console_t structure
* r1 - base address
* Out: r0 - 1 on success, 0 on error
* Clobber list : r0 - r7
* -----------------------------------------------------------
*/
func console_uartdm_register
str r1, [r0, #CONSOLE_T_BASE]
mov r7, lr
bl console_uartdm_core_init
mov lr, r7
/* Register the new console */
finish_console_register uartdm putc=1, flush=1
endfunc console_uartdm_register
/* -----------------------------------------------------------
* void console_uartdm_core_init(unused, uintptr_t base_addr)
* Function to initialize the console.
* In : r0 - unused
* r1 - base address
* Out: void
* Clobber list : r1, r2, r3
* -----------------------------------------------------------
*/
func console_uartdm_core_init
/*
* Try to flush remaining characters from the TX FIFO before resetting
* the transmitter. Unfortunately there is no good way to check if
* the transmitter is actually enabled (and will finish eventually),
* so use a timeout to avoid looping forever.
*/
mov r2, #65536
1:
ldr r3, [r1, #UART_DM_SR]
tst r3, #UART_DM_SR_TXEMT
bne 2f
subs r2, r2, #1
bne 1b
/* Timeout */
2: /* Reset receiver */
mov r3, #UART_DM_CR_RESET_RX
str r3, [r1, #UART_DM_CR]
/* Reset transmitter */
mov r3, #UART_DM_CR_RESET_TX
str r3, [r1, #UART_DM_CR]
/*
* Disable BAM/DMA modes but enable single-character mode for TX.
* The single character mode allows simplifying the putc implementation
* since characters can be written directly to the FIFO instead of
* having to initiate a new transfer and waiting for its completion.
*/
mov r3, #UART_DM_DMEN_TX_SC
str r3, [r1, #UART_DM_DMEN]
/* Enable transmitter */
mov r3, #UART_DM_CR_TX_ENABLE
str r3, [r1, #UART_DM_CR]
bx lr
endfunc console_uartdm_core_init
/* -----------------------------------------------------------
* int console_uartdm_putc(int c, console_t *console)
* Function to output a character over the console.
* In : r0 - character to be printed
* r1 - pointer to console_t struct
* Out: r0 - printed character on success, < 0 on error.
* Clobber list : r0, r1, r2
* -----------------------------------------------------------
*/
func console_uartdm_putc
ldr r1, [r1, #CONSOLE_T_BASE]
b console_uartdm_core_putc
endfunc console_uartdm_putc
/* -----------------------------------------------------------
* int console_uartdm_core_putc(int c, uintptr_t base_addr)
* Function to output a character over the console.
* In : r0 - character to be printed
* r1 - base address
* Out: r0 - printed character on success, < 0 on error.
* Clobber list : r2
* -----------------------------------------------------------
*/
func console_uartdm_core_putc
cmp r0, #'\n'
bne 2f
1: /* Loop until TX FIFO has space */
ldr r2, [r1, #UART_DM_SR]
tst r2, #UART_DM_SR_TXRDY
beq 1b
/* Prepend '\r' to '\n' */
mov r2, #'\r'
str r2, [r1, #UART_DM_TF]
2: /* Loop until TX FIFO has space */
ldr r2, [r1, #UART_DM_SR]
tst r2, #UART_DM_SR_TXRDY
beq 2b
/* Write character to FIFO */
str r0, [r1, #UART_DM_TF]
bx lr
endfunc console_uartdm_core_putc
/* -----------------------------------------------------------
* void console_uartdm_flush(console_t *console)
* Function to force a write of all buffered data
* that has not been output.
* In : r0 - pointer to console_t struct
* Out: void
* Clobber list : r0, r1, r2, r3, r4, r5
* -----------------------------------------------------------
*/
func console_uartdm_flush
ldr r1, [r0, #CONSOLE_T_BASE]
b console_uartdm_core_flush
endfunc console_uartdm_flush
/* -----------------------------------------------------------
* void console_uartdm_core_flush(unused, uintptr_t base_addr)
* Function to force a write of all buffered data
* that has not been output.
* In : r0 - unused
* r1 - base address
* Out: void
* Clobber list : r2
* -----------------------------------------------------------
*/
func console_uartdm_core_flush
1: /* Loop until TX FIFO is empty */
ldr r2, [r1, #UART_DM_SR]
tst r2, #UART_DM_SR_TXEMT
beq 1b
bx lr
endfunc console_uartdm_core_flush