FreeCalypso > hg > freecalypso-tools
view target-utils/libbase/serio.S @ 945:4c601097d23f
rvinterf: retire libg23 to old subdir
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Wed, 24 May 2023 07:22:32 +0000 |
parents | da6df2c626cf |
children |
line wrap: on
line source
#include "ns16550.h" @ this module implements the elementary serial I/O operations .comm uart_base,4,4 .text .code 32 .global serial_out serial_out: ldr r1, =uart_base ldr r2, [r1] 1: ldrb r3, [r2, #0x11] @ Calypso UART non-std register SSR tst r3, #0x01 @ Tx FIFO full flag bne 1b strb r0, [r2, #NS16550_THR] bx lr .global serial_in_poll serial_in_poll: ldr r1, =uart_base ldr r2, [r1] ldrb r3, [r2, #NS16550_LSR] tst r3, #NS16550_LSR_DR ldrneb r0, [r2, #NS16550_RBR] mvneq r0, #0 bx lr .global serial_flush serial_flush: ldr r1, =uart_base ldr r2, [r1] 1: ldrb r3, [r2, #NS16550_LSR] tst r3, #NS16550_LSR_TEMP beq 1b bx lr