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