mirror of
https://github.com/darlinghq/darling-gdb.git
synced 2024-11-25 13:09:48 +00:00
414 lines
11 KiB
C
414 lines
11 KiB
C
/* This file is part of the program GDB, the GNU debugger.
|
|
|
|
Copyright (C) 1998 Free Software Foundation, Inc.
|
|
Contributed by Cygnus Solutions.
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 2 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, write to the Free Software
|
|
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
|
|
*/
|
|
|
|
|
|
#include "sim-main.h"
|
|
#include "hw-main.h"
|
|
|
|
|
|
/* DEVICE
|
|
|
|
|
|
tx3904irc - tx3904 interrupt controller
|
|
|
|
|
|
DESCRIPTION
|
|
|
|
|
|
Implements the tx3904 interrupt controller described in the tx3904
|
|
user guide. It does not include the interrupt detection circuit
|
|
that preprocesses the eight external interrupts, so assumes that
|
|
each event on an input interrupt port signals a new interrupt.
|
|
That is, it implements edge- rather than level-triggered
|
|
interrupts.
|
|
|
|
This implementation does not support multiple concurrent
|
|
interrupts.
|
|
|
|
|
|
PROPERTIES
|
|
|
|
|
|
reg <base> <length>
|
|
|
|
Base of IRC control register bank. <length> must equal 0x20.
|
|
Registers offsets: 0: ISR: interrupt status register
|
|
4: IMR: interrupt mask register
|
|
16: ILR0: interrupt level register 3..0
|
|
20: ILR1: interrupt level register 7..4
|
|
24: ILR2: interrupt level register 11..8
|
|
28: ILR3: interrupt level register 15..12
|
|
|
|
|
|
|
|
PORTS
|
|
|
|
|
|
ip (output)
|
|
|
|
Interrupt priority port. An event is generated when an interrupt
|
|
of a sufficient priority is passed through the IRC. The value
|
|
associated with the event is the interrupt level (16-31), as given
|
|
for bits IP[5:0] in the book TMPR3904F Rev. 2.0, pg. 11-3. Note
|
|
that even though INT[0] is tied externally to IP[5], we simulate
|
|
it as passing through the controller.
|
|
|
|
An output level of zero signals the clearing of a level interrupt.
|
|
|
|
|
|
int0-7 (input)
|
|
|
|
External interrupts. Level = 0 -> level interrupt cleared.
|
|
|
|
|
|
dmac0-3 (input)
|
|
|
|
DMA internal interrupts, correspond to DMA channels 0-3. Level = 0 -> level interrupt cleared.
|
|
|
|
|
|
sio0-1 (input)
|
|
|
|
SIO internal interrupts. Level = 0 -> level interrupt cleared.
|
|
|
|
|
|
tmr0-2 (input)
|
|
|
|
Timer internal interrupts. Level = 0 -> level interrupt cleared.
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
|
|
/* register numbers; each is one word long */
|
|
enum
|
|
{
|
|
ISR_REG = 0,
|
|
IMR_REG = 1,
|
|
ILR0_REG = 4,
|
|
ILR1_REG = 5,
|
|
ILR2_REG = 6,
|
|
ILR3_REG = 7,
|
|
};
|
|
|
|
|
|
/* port ID's */
|
|
|
|
enum
|
|
{
|
|
/* inputs, ordered to correspond to interrupt sources 0..15 */
|
|
INT1_PORT = 0, INT2_PORT, INT3_PORT, INT4_PORT, INT5_PORT, INT6_PORT, INT7_PORT,
|
|
DMAC3_PORT, DMAC2_PORT, DMAC1_PORT, DMAC0_PORT, SIO0_PORT, SIO1_PORT,
|
|
TMR0_PORT, TMR1_PORT, TMR2_PORT,
|
|
|
|
/* special INT[0] port */
|
|
INT0_PORT,
|
|
|
|
/* reset */
|
|
RESET_PORT,
|
|
|
|
/* output */
|
|
IP_PORT
|
|
};
|
|
|
|
|
|
static const struct hw_port_descriptor tx3904irc_ports[] = {
|
|
|
|
/* interrupt output */
|
|
|
|
{ "ip", IP_PORT, 0, output_port, },
|
|
|
|
/* interrupt inputs (as names) */
|
|
/* in increasing order of level number */
|
|
|
|
{ "int1", INT1_PORT, 0, input_port, },
|
|
{ "int2", INT2_PORT, 0, input_port, },
|
|
{ "int3", INT3_PORT, 0, input_port, },
|
|
{ "int4", INT4_PORT, 0, input_port, },
|
|
{ "int5", INT5_PORT, 0, input_port, },
|
|
{ "int6", INT6_PORT, 0, input_port, },
|
|
{ "int7", INT7_PORT, 0, input_port, },
|
|
|
|
{ "dmac3", DMAC3_PORT, 0, input_port, },
|
|
{ "dmac2", DMAC2_PORT, 0, input_port, },
|
|
{ "dmac1", DMAC1_PORT, 0, input_port, },
|
|
{ "dmac0", DMAC0_PORT, 0, input_port, },
|
|
|
|
{ "sio0", SIO0_PORT, 0, input_port, },
|
|
{ "sio1", SIO1_PORT, 0, input_port, },
|
|
|
|
{ "tmr0", TMR0_PORT, 0, input_port, },
|
|
{ "tmr1", TMR1_PORT, 0, input_port, },
|
|
{ "tmr2", TMR2_PORT, 0, input_port, },
|
|
|
|
{ "reset", RESET_PORT, 0, input_port, },
|
|
{ "int0", INT0_PORT, 0, input_port, },
|
|
|
|
{ NULL, },
|
|
};
|
|
|
|
|
|
#define NR_SOURCES (TMR3_PORT - INT1_PORT + 1) /* 16: number of interrupt sources */
|
|
|
|
|
|
/* The interrupt controller register internal state. Note that we
|
|
store state using the control register images, in host endian
|
|
order. */
|
|
|
|
struct tx3904irc {
|
|
address_word base_address; /* control register base */
|
|
unsigned_4 isr;
|
|
#define ISR_SET(c,s) ((c)->isr &= ~ (1 << (s)))
|
|
unsigned_4 imr;
|
|
#define IMR_GET(c) ((c)->imr)
|
|
unsigned_4 ilr[4];
|
|
#define ILR_GET(c,s) LSEXTRACTED32((c)->ilr[(s)/4], (s) % 4 * 8 + 2, (s) % 4 * 8)
|
|
};
|
|
|
|
|
|
|
|
/* Finish off the partially created hw device. Attach our local
|
|
callbacks. Wire up our port names etc */
|
|
|
|
static hw_io_read_buffer_method tx3904irc_io_read_buffer;
|
|
static hw_io_write_buffer_method tx3904irc_io_write_buffer;
|
|
static hw_port_event_method tx3904irc_port_event;
|
|
|
|
static void
|
|
attach_tx3904irc_regs (struct hw *me,
|
|
struct tx3904irc *controller)
|
|
{
|
|
unsigned_word attach_address;
|
|
int attach_space;
|
|
unsigned attach_size;
|
|
reg_property_spec reg;
|
|
|
|
if (hw_find_property (me, "reg") == NULL)
|
|
hw_abort (me, "Missing \"reg\" property");
|
|
|
|
if (!hw_find_reg_array_property (me, "reg", 0, ®))
|
|
hw_abort (me, "\"reg\" property must contain one addr/size entry");
|
|
|
|
hw_unit_address_to_attach_address (hw_parent (me),
|
|
®.address,
|
|
&attach_space,
|
|
&attach_address,
|
|
me);
|
|
hw_unit_size_to_attach_size (hw_parent (me),
|
|
®.size,
|
|
&attach_size, me);
|
|
|
|
hw_attach_address (hw_parent (me), 0,
|
|
attach_space, attach_address, attach_size,
|
|
me);
|
|
|
|
controller->base_address = attach_address;
|
|
}
|
|
|
|
|
|
static void
|
|
tx3904irc_finish (struct hw *me)
|
|
{
|
|
struct tx3904irc *controller;
|
|
|
|
controller = HW_ZALLOC (me, struct tx3904irc);
|
|
set_hw_data (me, controller);
|
|
set_hw_io_read_buffer (me, tx3904irc_io_read_buffer);
|
|
set_hw_io_write_buffer (me, tx3904irc_io_write_buffer);
|
|
set_hw_ports (me, tx3904irc_ports);
|
|
set_hw_port_event (me, tx3904irc_port_event);
|
|
|
|
/* Attach ourself to our parent bus */
|
|
attach_tx3904irc_regs (me, controller);
|
|
|
|
/* Initialize to reset state */
|
|
controller->isr = 0x0000ffff;
|
|
controller->imr = 0;
|
|
controller->ilr[0] =
|
|
controller->ilr[1] =
|
|
controller->ilr[2] =
|
|
controller->ilr[3] = 0;
|
|
}
|
|
|
|
|
|
|
|
/* An event arrives on an interrupt port */
|
|
|
|
static void
|
|
tx3904irc_port_event (struct hw *me,
|
|
int my_port,
|
|
struct hw *source_dev,
|
|
int source_port,
|
|
int level)
|
|
{
|
|
struct tx3904irc *controller = hw_data (me);
|
|
|
|
/* handle deactivated interrupt */
|
|
if(level == 0)
|
|
{
|
|
HW_TRACE ((me, "interrupt cleared on port %d", my_port));
|
|
hw_port_event(me, IP_PORT, 0);
|
|
return;
|
|
}
|
|
|
|
switch (my_port)
|
|
{
|
|
case INT0_PORT:
|
|
{
|
|
int ip_number = 32; /* compute IP[5:0] */
|
|
HW_TRACE ((me, "port-event INT[0]"));
|
|
hw_port_event(me, IP_PORT, ip_number);
|
|
break;
|
|
}
|
|
|
|
case INT1_PORT: case INT2_PORT: case INT3_PORT: case INT4_PORT:
|
|
case INT5_PORT: case INT6_PORT: case INT7_PORT: case DMAC3_PORT:
|
|
case DMAC2_PORT: case DMAC1_PORT: case DMAC0_PORT: case SIO0_PORT:
|
|
case SIO1_PORT: case TMR0_PORT: case TMR1_PORT: case TMR2_PORT:
|
|
{
|
|
int source = my_port - INT1_PORT;
|
|
|
|
HW_TRACE ((me, "interrupt asserted on port %d", source));
|
|
ISR_SET(controller, source);
|
|
if(ILR_GET(controller, source) > IMR_GET(controller))
|
|
{
|
|
int ip_number = 16 + source; /* compute IP[4:0] */
|
|
HW_TRACE ((me, "interrupt level %d", ILR_GET(controller,source)));
|
|
hw_port_event(me, IP_PORT, ip_number);
|
|
}
|
|
break;
|
|
}
|
|
|
|
case RESET_PORT:
|
|
{
|
|
HW_TRACE ((me, "reset"));
|
|
controller->isr = 0x0000ffff;
|
|
controller->imr = 0;
|
|
controller->ilr[0] =
|
|
controller->ilr[1] =
|
|
controller->ilr[2] =
|
|
controller->ilr[3] = 0;
|
|
break;
|
|
}
|
|
|
|
case IP_PORT:
|
|
hw_abort (me, "Event on output port %d", my_port);
|
|
break;
|
|
|
|
default:
|
|
hw_abort (me, "Event on unknown port %d", my_port);
|
|
break;
|
|
}
|
|
}
|
|
|
|
|
|
/* generic read/write */
|
|
|
|
static unsigned
|
|
tx3904irc_io_read_buffer (struct hw *me,
|
|
void *dest,
|
|
int space,
|
|
unsigned_word base,
|
|
unsigned nr_bytes)
|
|
{
|
|
struct tx3904irc *controller = hw_data (me);
|
|
unsigned byte;
|
|
|
|
HW_TRACE ((me, "read 0x%08lx %d", (long) base, (int) nr_bytes));
|
|
for (byte = 0; byte < nr_bytes; byte++)
|
|
{
|
|
address_word address = base + byte;
|
|
int reg_number = (address - controller->base_address) / 4;
|
|
int reg_offset = (address - controller->base_address) % 4;
|
|
unsigned_4 register_value; /* in target byte order */
|
|
|
|
/* fill in entire register_value word */
|
|
switch (reg_number)
|
|
{
|
|
case ISR_REG: register_value = controller->isr; break;
|
|
case IMR_REG: register_value = controller->imr; break;
|
|
case ILR0_REG: register_value = controller->ilr[0]; break;
|
|
case ILR1_REG: register_value = controller->ilr[1]; break;
|
|
case ILR2_REG: register_value = controller->ilr[2]; break;
|
|
case ILR3_REG: register_value = controller->ilr[3]; break;
|
|
default: register_value = 0;
|
|
}
|
|
|
|
/* write requested byte out */
|
|
register_value = H2T_4(register_value);
|
|
memcpy ((char*) dest + byte, ((char*)& register_value)+reg_offset, 1);
|
|
}
|
|
|
|
return nr_bytes;
|
|
}
|
|
|
|
|
|
|
|
static unsigned
|
|
tx3904irc_io_write_buffer (struct hw *me,
|
|
const void *source,
|
|
int space,
|
|
unsigned_word base,
|
|
unsigned nr_bytes)
|
|
{
|
|
struct tx3904irc *controller = hw_data (me);
|
|
unsigned byte;
|
|
|
|
HW_TRACE ((me, "write 0x%08lx %d", (long) base, (int) nr_bytes));
|
|
for (byte = 0; byte < nr_bytes; byte++)
|
|
{
|
|
address_word address = base + byte;
|
|
int reg_number = (address - controller->base_address) / 4;
|
|
int reg_offset = (address - controller->base_address) % 4;
|
|
unsigned_4* register_ptr;
|
|
unsigned_4 register_value;
|
|
|
|
/* fill in entire register_value word */
|
|
switch (reg_number)
|
|
{
|
|
case ISR_REG: register_ptr = & controller->isr; break;
|
|
case IMR_REG: register_ptr = & controller->imr; break;
|
|
case ILR0_REG: register_ptr = & controller->ilr[0]; break;
|
|
case ILR1_REG: register_ptr = & controller->ilr[1]; break;
|
|
case ILR2_REG: register_ptr = & controller->ilr[2]; break;
|
|
case ILR3_REG: register_ptr = & controller->ilr[3]; break;
|
|
default: register_ptr = & register_value; /* used as a dummy */
|
|
}
|
|
|
|
/* HW_TRACE ((me, "reg %d pre: %08lx", reg_number, (long) *register_ptr)); */
|
|
|
|
/* overwrite requested byte */
|
|
register_value = H2T_4(* register_ptr);
|
|
memcpy (((char*)®ister_value)+reg_offset, (const char*)source + byte, 1);
|
|
* register_ptr = T2H_4(register_value);
|
|
|
|
/* HW_TRACE ((me, "post: %08lx", (long) *register_ptr)); */
|
|
}
|
|
return nr_bytes;
|
|
}
|
|
|
|
|
|
const struct hw_descriptor dv_tx3904irc_descriptor[] = {
|
|
{ "tx3904irc", tx3904irc_finish, },
|
|
{ NULL },
|
|
};
|