adbadeedc1
* Support for AlphaStation 200, 250, 255, 400 * Untested support for UDB, Multia, AXPpci33 (Noname) * Support for Personal Workstation 433a/433au, 500a/500au, 600a/600au (Miata) * Some minor fixes and improvements to interrupt handling. Submitted by: Andrew Gallatin <gallatin@cs.duke.edu> (AS200, Miata) Obtained from: NetBSD (some code for AS200, Miata, Noname)
331 lines
7.3 KiB
C
331 lines
7.3 KiB
C
/*-
|
|
* Copyright (c) 1998 Doug Rabson
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. 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.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR 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 THE AUTHOR OR CONTRIBUTORS 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.
|
|
*
|
|
* $Id: isa.c,v 1.2 1998/07/27 09:38:26 dfr Exp $
|
|
*/
|
|
|
|
#include <sys/param.h>
|
|
#include <sys/systm.h>
|
|
#include <sys/kernel.h>
|
|
#include <sys/module.h>
|
|
#include <sys/bus.h>
|
|
#include <sys/malloc.h>
|
|
|
|
#include <isa/isareg.h>
|
|
#include <isa/isavar.h>
|
|
#include <machine/intr.h>
|
|
|
|
/*
|
|
* The structure used to attach devices to the Isa.
|
|
*/
|
|
struct isa_device {
|
|
int id_port;
|
|
int id_portsize;
|
|
int id_flags;
|
|
int id_irq;
|
|
};
|
|
|
|
#define DEVTOISA(dev) ((struct isa_device*) device_get_ivars(dev))
|
|
|
|
static devclass_t isa_devclass;
|
|
|
|
/*
|
|
* Device methods
|
|
*/
|
|
static int isa_probe(device_t dev);
|
|
static int isa_attach(device_t dev);
|
|
static void isa_print_child(device_t dev, device_t child);
|
|
static int isa_read_ivar(device_t dev, device_t child, int which, u_long *result);
|
|
static int isa_write_ivar(device_t dev, device_t child, int which, u_long result);
|
|
static void *isa_create_intr(device_t dev, device_t child, int irq,
|
|
driver_intr_t *intr, void *arg);
|
|
static int isa_connect_intr(device_t dev, void *ih);
|
|
|
|
static device_method_t isa_methods[] = {
|
|
/* Device interface */
|
|
DEVMETHOD(device_probe, isa_probe),
|
|
DEVMETHOD(device_attach, isa_attach),
|
|
DEVMETHOD(device_detach, bus_generic_detach),
|
|
DEVMETHOD(device_shutdown, bus_generic_shutdown),
|
|
|
|
/* Bus interface */
|
|
DEVMETHOD(bus_print_child, isa_print_child),
|
|
DEVMETHOD(bus_read_ivar, isa_read_ivar),
|
|
DEVMETHOD(bus_write_ivar, isa_write_ivar),
|
|
DEVMETHOD(bus_create_intr, isa_create_intr),
|
|
DEVMETHOD(bus_connect_intr, isa_connect_intr),
|
|
|
|
{ 0, 0 }
|
|
};
|
|
|
|
static driver_t isa_driver = {
|
|
"isa",
|
|
isa_methods,
|
|
DRIVER_TYPE_MISC,
|
|
1, /* no softc */
|
|
};
|
|
|
|
static void
|
|
isa_add_device(device_t dev, const char *name, int unit)
|
|
{
|
|
struct isa_device *idev;
|
|
device_t child;
|
|
int t;
|
|
|
|
idev = malloc(sizeof(struct isa_device), M_DEVBUF, M_NOWAIT);
|
|
if (!idev)
|
|
return;
|
|
|
|
if (resource_int_value(name, unit, "port", &t) == 0)
|
|
idev->id_port = t;
|
|
else
|
|
idev->id_port = 0;
|
|
if (resource_int_value(name, unit, "portsize", &t) == 0)
|
|
idev->id_portsize = t;
|
|
else
|
|
idev->id_portsize = 0;
|
|
if (resource_int_value(name, unit, "flags", &t) == 0)
|
|
idev->id_flags = t;
|
|
else
|
|
idev->id_flags = 0;
|
|
if (resource_int_value(name, unit, "irq", &t) == 0)
|
|
idev->id_irq = t;
|
|
else
|
|
idev->id_irq = -1;
|
|
|
|
child = device_add_child(dev, name, unit, idev);
|
|
if (!child)
|
|
return;
|
|
|
|
if (resource_int_value(name, unit, "disabled", &t) == 0 && t != 0)
|
|
device_disable(child);
|
|
}
|
|
|
|
static void
|
|
isa_intr_enable(int irq)
|
|
{
|
|
int s = splhigh();
|
|
if (irq < 8)
|
|
outb(IO_ICU1+1, inb(IO_ICU1+1) & ~(1 << irq));
|
|
else
|
|
outb(IO_ICU2+1, inb(IO_ICU2+1) & ~(1 << irq));
|
|
splx(s);
|
|
}
|
|
|
|
static void
|
|
isa_intr_disable(int irq)
|
|
{
|
|
int s = splhigh();
|
|
if (irq < 8)
|
|
outb(IO_ICU1+1, inb(IO_ICU1+1) | (1 << irq));
|
|
else
|
|
outb(IO_ICU2+1, inb(IO_ICU2+1) | (1 << irq));
|
|
splx(s);
|
|
}
|
|
|
|
int
|
|
isa_irq_pending(void)
|
|
{
|
|
u_char irr1;
|
|
u_char irr2;
|
|
|
|
irr1 = inb(IO_ICU1);
|
|
irr2 = inb(IO_ICU2);
|
|
return ((irr2 << 8) | irr1);
|
|
}
|
|
|
|
int
|
|
isa_irq_mask(void)
|
|
{
|
|
u_char irr1;
|
|
u_char irr2;
|
|
|
|
irr1 = inb(IO_ICU1+1);
|
|
irr2 = inb(IO_ICU2+1);
|
|
return ((irr2 << 8) | irr1);
|
|
}
|
|
|
|
/*
|
|
* At 'probe' time, we add all the devices which we know about to the
|
|
* bus. The generic attach routine will probe and attach them if they
|
|
* are alive.
|
|
*/
|
|
static int
|
|
isa_probe(device_t dev)
|
|
{
|
|
int i;
|
|
|
|
/*
|
|
* Add all devices configured to be attached to isa0.
|
|
*/
|
|
for (i = resource_query_string(-1, "at", "isa0");
|
|
i != -1;
|
|
i = resource_query_string(i, "at", "isa0")) {
|
|
isa_add_device(dev, resource_query_name(i),
|
|
resource_query_unit(i));
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
extern device_t isa_bus_device;
|
|
|
|
static int
|
|
isa_attach(device_t dev)
|
|
{
|
|
/* make sure chaining irq is enabled */
|
|
isa_intr_enable(2);
|
|
|
|
/*
|
|
* Arrange for bus_generic_attach(dev) to be called later.
|
|
*/
|
|
isa_bus_device = dev;
|
|
return 0;
|
|
}
|
|
|
|
static void
|
|
isa_print_child(device_t bus, device_t dev)
|
|
{
|
|
struct isa_device* idev = DEVTOISA(dev);
|
|
|
|
printf(" at");
|
|
if (idev->id_port)
|
|
printf(" 0x%x", idev->id_port);
|
|
if (idev->id_portsize > 0)
|
|
printf("-0x%x", idev->id_port + idev->id_portsize - 1);
|
|
if (idev->id_irq >= 0)
|
|
printf(" irq %d", idev->id_irq);
|
|
printf(" on %s%d",
|
|
device_get_name(bus), device_get_unit(bus));
|
|
}
|
|
|
|
static int
|
|
isa_read_ivar(device_t bus, device_t dev,
|
|
int index, u_long* result)
|
|
{
|
|
struct isa_device* idev = DEVTOISA(dev);
|
|
|
|
switch (index) {
|
|
case ISA_IVAR_PORT:
|
|
*result = idev->id_port;
|
|
break;
|
|
case ISA_IVAR_PORTSIZE:
|
|
*result = idev->id_portsize;
|
|
break;
|
|
case ISA_IVAR_FLAGS:
|
|
*result = idev->id_flags;
|
|
break;
|
|
case ISA_IVAR_IRQ:
|
|
*result = idev->id_irq;
|
|
break;
|
|
}
|
|
return ENOENT;
|
|
}
|
|
|
|
static int
|
|
isa_write_ivar(device_t bus, device_t dev,
|
|
int index, u_long value)
|
|
{
|
|
struct isa_device* idev = DEVTOISA(dev);
|
|
|
|
switch (index) {
|
|
case ISA_IVAR_PORT:
|
|
idev->id_port = value;
|
|
break;
|
|
case ISA_IVAR_PORTSIZE:
|
|
idev->id_portsize = value;
|
|
break;
|
|
case ISA_IVAR_FLAGS:
|
|
idev->id_flags = value;
|
|
break;
|
|
case ISA_IVAR_IRQ:
|
|
idev->id_irq = value;
|
|
break;
|
|
}
|
|
return ENOENT;
|
|
}
|
|
|
|
struct isa_intr {
|
|
void *ih;
|
|
driver_intr_t *intr;
|
|
void *arg;
|
|
int irq;
|
|
};
|
|
|
|
/*
|
|
* Wrap ISA interrupt routines so that we can feed non-specific
|
|
* EOI to the PICs.
|
|
*/
|
|
|
|
static void
|
|
isa_handle_intr(void *arg)
|
|
{
|
|
struct isa_intr *ii = arg;
|
|
int irq = ii->irq;
|
|
|
|
ii->intr(ii->arg);
|
|
|
|
if (ii->irq > 7)
|
|
outb(IO_ICU2, 0x20 | (irq & 7));
|
|
outb(IO_ICU1, 0x20 | (irq > 7 ? 2 : irq));
|
|
}
|
|
|
|
static void *
|
|
isa_create_intr(device_t dev, device_t child, int irq,
|
|
driver_intr_t *intr, void *arg)
|
|
{
|
|
struct isa_intr *ii;
|
|
|
|
if (irq == 2) irq = 9;
|
|
ii = malloc(sizeof(struct isa_intr), M_DEVBUF, M_NOWAIT);
|
|
if (!ii)
|
|
return NULL;
|
|
ii->intr = intr;
|
|
ii->arg = arg;
|
|
ii->irq = irq;
|
|
ii->ih = alpha_create_intr(0x800 + (irq << 4), isa_handle_intr, ii);
|
|
|
|
if (!ii->ih) {
|
|
free(ii, M_DEVBUF);
|
|
return NULL;
|
|
}
|
|
|
|
return ii;
|
|
}
|
|
|
|
static int
|
|
isa_connect_intr(device_t dev, void *ih)
|
|
{
|
|
struct isa_intr *ii = ih;
|
|
struct alpha_intr *i = ii->ih;
|
|
|
|
isa_intr_enable(ii->irq);
|
|
return alpha_connect_intr(i);
|
|
}
|
|
|
|
DRIVER_MODULE(isa, cia, isa_driver, isa_devclass, 0, 0);
|
|
DRIVER_MODULE(isa, apecs, isa_driver, isa_devclass, 0, 0);
|
|
DRIVER_MODULE(isa, lca, isa_driver, isa_devclass, 0, 0);
|