FreeCalypso > hg > freecalypso-sw
view target-utils/libcommon/serio.S @ 159:3c42e6e5fc04
gsm-fw/bsp/rtc: initial import from Leonardo TCS211 semi-src
author | Michael Spacefalcon <msokolov@ivan.Harhan.ORG> |
---|---|
date | Sun, 17 Nov 2013 22:10:10 +0000 |
parents | 40f607bb0a2c |
children | d7591faa1258 |
line wrap: on
line source
#include "ns16550.h" @ this module implements the elementary serial I/O operations .text .code 32 .global serial_out serial_out: ldr r1, =uart_base ldr r2, [r1] 1: ldrb r3, [r2, #NS16550_LSR] tst r3, #NS16550_LSR_THRE beq 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 mvneq r0, #1 bxeq lr ldrb r0, [r2, #NS16550_RBR] bx lr