URL
https://opencores.org/ocsvn/or1k_old/or1k_old/trunk
Subversion Repositories or1k_old
[/] [or1k_old/] [trunk/] [newlib/] [libgloss/] [m32r/] [m32r-lib.c] - Rev 56
Go to most recent revision | Compare with Previous | Blame | View Log
/* Stand-alone library for M32R-EVA board. * * Copyright (c) 1996, 1998 Cygnus Support * * The authors hereby grant permission to use, copy, modify, distribute, * and license this software and its documentation for any purpose, provided * that existing copyright notices are retained in all copies and that this * notice is included verbatim in any distributions. No written agreement, * license, or royalty fee is required for any of the authorized uses. * Modifications to this software may be copyrighted by their authors * and need not follow the licensing terms described here, provided that * the new terms are clearly indicated on the first page of each file where * they apply. */ /* #define REVC to enable handling of the original RevC board, which is no longer the default, nor is it supported. */ #ifndef REVC /* Serial I/O routines for MSA2000G01 board */ #define UART_INCHAR_ADDR 0xff004009 #define UART_OUTCHR_ADDR 0xff004007 #define UART_STATUS_ADDR 0xff004002 #else /* Serial I/O routines for M32R-EVA board */ #define UART_INCHAR_ADDR 0xff102013 #define UART_OUTCHR_ADDR 0xff10200f #define UART_STATUS_ADDR 0xff102006 #endif #define UART_INPUT_EMPTY 0x4 #define UART_OUTPUT_EMPTY 0x1 static volatile char *rx_port = (unsigned char *) UART_INCHAR_ADDR; static volatile char *tx_port = (char *) UART_OUTCHR_ADDR; static volatile short *rx_status = (short *) UART_STATUS_ADDR; static volatile short *tx_status = (short *) UART_STATUS_ADDR; static int rx_rdy() { #ifndef REVC return (*rx_status & UART_INPUT_EMPTY); #else return !(*rx_status & UART_INPUT_EMPTY); #endif } static int tx_rdy() { return (*tx_status & UART_OUTPUT_EMPTY); } static unsigned char rx_uchar() { return *rx_port; } void tx_char(char c) { *tx_port = c; } int getDebugChar() { while (!rx_rdy()) ; return rx_uchar(); } void putDebugChar(int c) { while (!tx_rdy()) ; tx_char(c); } void mesg(char *p) { while (*p) { if (*p == '\n') putDebugChar('\r'); putDebugChar(*p++); } } void phex(long x) { char buf[9]; int i; buf[8] = '\0'; for (i = 7; i >= 0; i--) { char c = x & 0x0f; buf[i] = c < 10 ? c + '0' : c - 10 + 'A'; x >>= 4; } mesg(buf); } /* Setup trap TT to go to ROUTINE. */ void exceptionHandler (int tt, unsigned long routine) { #ifndef REVC unsigned long *tb = (unsigned long *) 0x40; /* Trap vector base address */ tb[tt] = ((routine >> 2) | 0xff000000) - tt - (0x40 >> 2); #else unsigned long *tb = 0; /* Trap vector base address */ tb[tt] = ((routine >> 2) | 0xff000000) - tt; #endif } /* Return the address of trap TT handler */ unsigned long getExceptionHandler (int tt) { #ifndef REVC unsigned long *tb = (unsigned long *) 0x40; /* Trap vector base address */ return ((tb[tt] + tt + (0x40 >> 2)) | 0xff000000) << 2; #else unsigned long *tb = 0; /* Trap vector base address */ return ((tb[tt] + tt) | 0xff000000) << 2; #endif }
Go to most recent revision | Compare with Previous | Blame | View Log