2008-03-14 01:04:24 +00:00
|
|
|
/*
|
|
|
|
* QEMU ETRAX Interrupt Controller.
|
|
|
|
*
|
|
|
|
* Copyright (c) 2008 Edgar E. Iglesias, Axis Communications AB.
|
|
|
|
*
|
|
|
|
* Permission is hereby granted, free of charge, to any person obtaining a copy
|
|
|
|
* of this software and associated documentation files (the "Software"), to deal
|
|
|
|
* in the Software without restriction, including without limitation the rights
|
|
|
|
* to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
|
|
|
* copies of the Software, and to permit persons to whom the Software is
|
|
|
|
* furnished to do so, subject to the following conditions:
|
|
|
|
*
|
|
|
|
* The above copyright notice and this permission notice shall be included in
|
|
|
|
* all copies or substantial portions of the Software.
|
|
|
|
*
|
|
|
|
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
|
|
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
|
|
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
|
|
|
|
* THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
|
|
|
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
|
|
|
* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
|
|
|
* THE SOFTWARE.
|
|
|
|
*/
|
|
|
|
|
2009-05-18 20:24:22 +00:00
|
|
|
#include "sysbus.h"
|
2008-03-14 01:04:24 +00:00
|
|
|
#include "hw.h"
|
2009-05-19 15:17:58 +00:00
|
|
|
//#include "pc.h"
|
|
|
|
//#include "etraxfs.h"
|
2008-03-14 01:04:24 +00:00
|
|
|
|
|
|
|
#define D(x)
|
|
|
|
|
2009-05-16 10:28:33 +00:00
|
|
|
#define R_RW_MASK 0
|
|
|
|
#define R_R_VECT 1
|
|
|
|
#define R_R_MASKED_VECT 2
|
|
|
|
#define R_R_NMI 3
|
|
|
|
#define R_R_GURU 4
|
|
|
|
#define R_MAX 5
|
2009-05-05 10:38:39 +00:00
|
|
|
|
2009-05-18 20:24:22 +00:00
|
|
|
struct etrax_pic
|
2008-03-14 01:04:24 +00:00
|
|
|
{
|
2009-05-18 20:24:22 +00:00
|
|
|
SysBusDevice busdev;
|
2009-08-03 15:35:24 +00:00
|
|
|
void *interrupt_vector;
|
2009-05-18 20:24:22 +00:00
|
|
|
qemu_irq parent_irq;
|
|
|
|
qemu_irq parent_nmi;
|
2009-05-16 10:28:33 +00:00
|
|
|
uint32_t regs[R_MAX];
|
2008-03-14 01:04:24 +00:00
|
|
|
};
|
|
|
|
|
2009-05-18 20:24:22 +00:00
|
|
|
static void pic_update(struct etrax_pic *fs)
|
2009-05-16 10:28:33 +00:00
|
|
|
{
|
|
|
|
uint32_t vector = 0;
|
|
|
|
int i;
|
|
|
|
|
|
|
|
fs->regs[R_R_MASKED_VECT] = fs->regs[R_R_VECT] & fs->regs[R_RW_MASK];
|
|
|
|
|
|
|
|
/* The ETRAX interrupt controller signals interrupts to teh core
|
|
|
|
through an interrupt request wire and an irq vector bus. If
|
|
|
|
multiple interrupts are simultaneously active it chooses vector
|
|
|
|
0x30 and lets the sw choose the priorities. */
|
|
|
|
if (fs->regs[R_R_MASKED_VECT]) {
|
|
|
|
uint32_t mv = fs->regs[R_R_MASKED_VECT];
|
|
|
|
for (i = 0; i < 31; i++) {
|
|
|
|
if (mv & 1) {
|
|
|
|
vector = 0x31 + i;
|
|
|
|
/* Check for multiple interrupts. */
|
|
|
|
if (mv > 1)
|
|
|
|
vector = 0x30;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
mv >>= 1;
|
|
|
|
}
|
|
|
|
}
|
2009-05-18 20:24:22 +00:00
|
|
|
|
|
|
|
if (fs->interrupt_vector) {
|
2009-08-03 15:35:24 +00:00
|
|
|
/* hack alert: ptr property */
|
|
|
|
*(uint32_t*)(fs->interrupt_vector) = vector;
|
2009-05-18 20:24:22 +00:00
|
|
|
}
|
|
|
|
qemu_set_irq(fs->parent_irq, !!vector);
|
2008-03-14 01:04:24 +00:00
|
|
|
}
|
|
|
|
|
2009-10-01 21:12:16 +00:00
|
|
|
static uint32_t pic_readl (void *opaque, target_phys_addr_t addr)
|
2008-03-14 01:04:24 +00:00
|
|
|
{
|
2009-05-18 20:24:22 +00:00
|
|
|
struct etrax_pic *fs = opaque;
|
2009-05-16 10:28:33 +00:00
|
|
|
uint32_t rval;
|
2008-03-14 01:04:24 +00:00
|
|
|
|
2009-05-16 10:28:33 +00:00
|
|
|
rval = fs->regs[addr >> 2];
|
|
|
|
D(printf("%s %x=%x\n", __func__, addr, rval));
|
|
|
|
return rval;
|
2008-03-14 01:04:24 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
static void
|
2009-10-01 21:12:16 +00:00
|
|
|
pic_writel (void *opaque, target_phys_addr_t addr, uint32_t value)
|
2008-03-14 01:04:24 +00:00
|
|
|
{
|
2009-05-18 20:24:22 +00:00
|
|
|
struct etrax_pic *fs = opaque;
|
2009-05-16 10:28:33 +00:00
|
|
|
D(printf("%s addr=%x val=%x\n", __func__, addr, value));
|
2009-05-05 10:38:39 +00:00
|
|
|
|
2009-05-16 10:28:33 +00:00
|
|
|
if (addr == R_RW_MASK) {
|
|
|
|
fs->regs[R_RW_MASK] = value;
|
|
|
|
pic_update(fs);
|
|
|
|
}
|
2008-03-14 01:04:24 +00:00
|
|
|
}
|
|
|
|
|
2009-08-25 18:29:31 +00:00
|
|
|
static CPUReadMemoryFunc * const pic_read[] = {
|
2009-05-16 10:28:33 +00:00
|
|
|
NULL, NULL,
|
|
|
|
&pic_readl,
|
2008-03-14 01:04:24 +00:00
|
|
|
};
|
|
|
|
|
2009-08-25 18:29:31 +00:00
|
|
|
static CPUWriteMemoryFunc * const pic_write[] = {
|
2009-05-16 10:28:33 +00:00
|
|
|
NULL, NULL,
|
|
|
|
&pic_writel,
|
2008-03-14 01:04:24 +00:00
|
|
|
};
|
|
|
|
|
2008-06-09 23:33:30 +00:00
|
|
|
static void nmi_handler(void *opaque, int irq, int level)
|
2009-05-16 10:28:33 +00:00
|
|
|
{
|
2009-05-18 20:24:22 +00:00
|
|
|
struct etrax_pic *fs = (void *)opaque;
|
2009-05-16 10:28:33 +00:00
|
|
|
uint32_t mask;
|
|
|
|
|
|
|
|
mask = 1 << irq;
|
|
|
|
if (level)
|
|
|
|
fs->regs[R_R_NMI] |= mask;
|
|
|
|
else
|
|
|
|
fs->regs[R_R_NMI] &= ~mask;
|
|
|
|
|
2009-05-18 20:24:22 +00:00
|
|
|
qemu_set_irq(fs->parent_nmi, !!fs->regs[R_R_NMI]);
|
2008-06-09 23:33:30 +00:00
|
|
|
}
|
|
|
|
|
2009-05-15 22:23:15 +00:00
|
|
|
static void irq_handler(void *opaque, int irq, int level)
|
2009-05-16 10:28:33 +00:00
|
|
|
{
|
2009-05-18 20:24:22 +00:00
|
|
|
struct etrax_pic *fs = (void *)opaque;
|
2009-05-15 22:23:15 +00:00
|
|
|
|
2009-05-16 10:28:33 +00:00
|
|
|
if (irq >= 30)
|
|
|
|
return nmi_handler(opaque, irq, level);
|
2009-05-15 22:23:15 +00:00
|
|
|
|
2009-05-16 10:28:33 +00:00
|
|
|
irq -= 1;
|
|
|
|
fs->regs[R_R_VECT] &= ~(1 << irq);
|
|
|
|
fs->regs[R_R_VECT] |= (!!level << irq);
|
|
|
|
pic_update(fs);
|
2008-06-09 23:33:30 +00:00
|
|
|
}
|
|
|
|
|
2009-08-14 08:36:05 +00:00
|
|
|
static int etraxfs_pic_init(SysBusDevice *dev)
|
2008-03-14 01:04:24 +00:00
|
|
|
{
|
2009-05-18 20:24:22 +00:00
|
|
|
struct etrax_pic *s = FROM_SYSBUS(typeof (*s), dev);
|
2009-05-16 10:28:33 +00:00
|
|
|
int intr_vect_regs;
|
2008-03-14 01:04:24 +00:00
|
|
|
|
2009-05-26 13:56:11 +00:00
|
|
|
qdev_init_gpio_in(&dev->qdev, irq_handler, 32);
|
2009-05-18 20:24:22 +00:00
|
|
|
sysbus_init_irq(dev, &s->parent_irq);
|
|
|
|
sysbus_init_irq(dev, &s->parent_nmi);
|
2008-03-14 01:04:24 +00:00
|
|
|
|
2009-06-14 08:38:51 +00:00
|
|
|
intr_vect_regs = cpu_register_io_memory(pic_read, pic_write, s);
|
2009-05-18 20:24:22 +00:00
|
|
|
sysbus_init_mmio(dev, R_MAX * 4, intr_vect_regs);
|
2009-08-14 08:36:05 +00:00
|
|
|
return 0;
|
2008-03-14 01:04:24 +00:00
|
|
|
}
|
2009-05-18 20:24:22 +00:00
|
|
|
|
2009-07-15 11:43:31 +00:00
|
|
|
static SysBusDeviceInfo etraxfs_pic_info = {
|
|
|
|
.init = etraxfs_pic_init,
|
|
|
|
.qdev.name = "etraxfs,pic",
|
|
|
|
.qdev.size = sizeof(struct etrax_pic),
|
|
|
|
.qdev.props = (Property[]) {
|
2009-08-03 15:35:24 +00:00
|
|
|
DEFINE_PROP_PTR("interrupt_vector", struct etrax_pic, interrupt_vector),
|
|
|
|
DEFINE_PROP_END_OF_LIST(),
|
2009-07-15 11:43:31 +00:00
|
|
|
}
|
|
|
|
};
|
|
|
|
|
2009-05-18 20:24:22 +00:00
|
|
|
static void etraxfs_pic_register(void)
|
|
|
|
{
|
2009-07-15 11:43:31 +00:00
|
|
|
sysbus_register_withprop(&etraxfs_pic_info);
|
2009-05-18 20:24:22 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
device_init(etraxfs_pic_register)
|