diff options
Diffstat (limited to 'libgloss/rl78/write.c')
-rw-r--r-- | libgloss/rl78/write.c | 107 |
1 files changed, 107 insertions, 0 deletions
diff --git a/libgloss/rl78/write.c b/libgloss/rl78/write.c new file mode 100644 index 000000000..2adeb94f1 --- /dev/null +++ b/libgloss/rl78/write.c @@ -0,0 +1,107 @@ +/* + +Copyright (c) 2010 Red Hat Incorporated. +All rights reserved. + +Redistribution and use in source and binary forms, with or without +modification, are permitted provided that the following conditions are met: + + Redistributions of source code must retain the above copyright + notice, this list of conditions and the following disclaimer. + + 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 provided with the distribution. + + The name of Red Hat Incorporated may not be used to endorse + or promote products derived from this software without specific + prior written permission. + +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 MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE +DISCLAIMED. IN NO EVENT SHALL RED HAT INCORPORATED BE LIABLE FOR ANY +DIRECT, INDIRECT, INCIDENTAL, SPECIAL, 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 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 OF THE POSSIBILITY OF SUCH DAMAGE. + +*/ + +/* These definitions are for the RL78/G13, which the simulator + simulates. */ + +typedef unsigned char UQI __attribute__((mode(QI))); +typedef unsigned int UHI __attribute__((mode(HI))); + +#define s8(x) (*(volatile UQI *)(x)) +#define s16(x) (*(volatile UHI *)(x)) + +#define P(x) s8(0xfff00+(x)) +#define PM(x) s8(0xfff20+(x)) + +#define PER0 s8(0xf00f0) + +#define SSR00 s16(0xf0100) +#define SMR00 s16(0xf0110) +#define SCR00 s16(0xf0118) +#define SS0 s16(0xf0122) +#define SPS0 s16(0xf0126) +#define SO0 s16(0xf0128) +#define SOE0 s16(0xf012a) +#define SOL0 s16(0xf0134) + +#define SDR00 s16(0xfff10) + +static int initted = 0; + +static void +init_uart0 () +{ + initted = 1; + + PER0 = 0xff; + SPS0 = 0x0011; /* 16 MHz */ + SMR00 = 0x0022; /* uart mode */ + SCR00 = 0x8097; /* 8-N-1 */ + SDR00 = 0x8a00; /* baud in MSB - 115200 */ + SOL0 = 0x0000; /* not inverted */ + SO0 = 0x000f; /* initial value */ + SOE0 = 0x0001; /* enable TxD0 */ + P(1) |= 0b00000100; + PM(1) &= 0b11111011; + SS0 = 0x0001; +} + +static void +tputc (char c) +{ + /* Wait for transmit buffer to be empty. */ + while (SSR00 & 0x0020) + asm(""); + /* Transmit that byte. */ + SDR00 = c; +} + +int +_write(int fd, char *ptr, int len) +{ + int rv = len; + + if (!initted) + init_uart0 (); + + while (len != 0) + { + if (*ptr == '\n') + tputc ('\r'); + tputc (*ptr); + ptr ++; + len --; + } + return rv; +} + +char * write (int) __attribute__((weak, alias ("_write"))); |