struct resource *
ata_pci_alloc_resource(device_t dev, device_t child, int type, int *rid,
u_long start, u_long end, u_long count, u_int flags, int cpuid)
{
struct ata_pci_controller *controller = device_get_softc(dev);
int unit = ((struct ata_channel *)device_get_softc(child))->unit;
struct resource *res = NULL;
int myrid;
if (type == SYS_RES_IOPORT) {
switch (*rid) {
case ATA_IOADDR_RID:
if (controller->legacy) {
start = (unit ? ATA_SECONDARY : ATA_PRIMARY);
count = ATA_IOSIZE;
end = start + count - 1;
}
myrid = PCIR_BAR(0) + (unit << 3);
res = BUS_ALLOC_RESOURCE(device_get_parent(dev), dev,
SYS_RES_IOPORT, &myrid,
start, end, count, flags, cpuid);
break;
case ATA_CTLADDR_RID:
if (controller->legacy) {
start = (unit ? ATA_SECONDARY : ATA_PRIMARY) + ATA_CTLOFFSET;
count = ATA_CTLIOSIZE;
end = start + count - 1;
}
myrid = PCIR_BAR(1) + (unit << 3);
res = BUS_ALLOC_RESOURCE(device_get_parent(dev), dev,
SYS_RES_IOPORT, &myrid,
start, end, count, flags, cpuid);
break;
}
}
if (type == SYS_RES_IRQ && *rid == ATA_IRQ_RID) {
if (controller->legacy) {
int irq = (unit == 0 ? 14 : 15);
cpuid = machintr_legacy_intr_cpuid(irq);
res = BUS_ALLOC_RESOURCE(device_get_parent(dev), child,
SYS_RES_IRQ, rid, irq, irq, 1, flags,
cpuid);
}
else
res = controller->r_irq;
}
return res;
}
static void
isahint_add_device(device_t parent, const char *name, int unit)
{
device_t child;
int sensitive, start, count, t;
int order;
/* device-specific flag overrides any wildcard */
sensitive = 0;
if (resource_int_value(name, unit, "sensitive", &sensitive) != 0)
resource_int_value(name, -1, "sensitive", &sensitive);
if (sensitive)
order = ISA_ORDER_SENSITIVE;
else
order = ISA_ORDER_SPECULATIVE;
child = BUS_ADD_CHILD(parent, parent, order, name, unit);
if (child == 0)
return;
start = 0;
count = 0;
resource_int_value(name, unit, "port", &start);
resource_int_value(name, unit, "portsize", &count);
if (start > 0 || count > 0)
bus_set_resource(child, SYS_RES_IOPORT, 0, start, count, -1);
start = 0;
count = 0;
resource_int_value(name, unit, "maddr", &start);
resource_int_value(name, unit, "msize", &count);
if (start > 0 || count > 0)
bus_set_resource(child, SYS_RES_MEMORY, 0, start, count, -1);
if (resource_int_value(name, unit, "irq", &start) == 0 && start > 0) {
bus_set_resource(child, SYS_RES_IRQ, 0, start, 1,
machintr_legacy_intr_cpuid(start));
}
if (resource_int_value(name, unit, "drq", &start) == 0 && start >= 0)
bus_set_resource(child, SYS_RES_DRQ, 0, start, 1, -1);
if (resource_int_value(name, unit, "flags", &t) == 0)
device_set_flags(child, t);
if (resource_int_value(name, unit, "disabled", &t) == 0 && t != 0)
device_disable(child);
}
/*
* This implementation simply passes the request up to the parent
* bus, which in our case is the special i386 nexus, substituting any
* configured values if the caller defaulted. We can get away with
* this because there is no special mapping for ISA resources on an Intel
* platform. When porting this code to another architecture, it may be
* necessary to interpose a mapping layer here.
*/
struct resource *
isa_alloc_resource(device_t bus, device_t child, int type, int *rid,
u_long start, u_long end, u_long count, u_int flags, int cpuid)
{
/*
* Consider adding a resource definition. We allow rid 0-1 for
* irq and drq, 0-3 for memory and 0-7 for ports which is
* sufficient for isapnp.
*/
int passthrough = (device_get_parent(child) != bus);
int isdefault = (start == 0UL && end == ~0UL);
struct isa_device* idev = DEVTOISA(child);
struct resource_list *rl = &idev->id_resources;
struct resource_list_entry *rle;
if (!passthrough && !isdefault) {
rle = resource_list_find(rl, type, *rid);
if (!rle) {
if (*rid < 0)
return 0;
switch (type) {
case SYS_RES_IRQ:
if (*rid >= ISA_NIRQ)
return 0;
cpuid = machintr_legacy_intr_cpuid(start);
break;
case SYS_RES_DRQ:
if (*rid >= ISA_NDRQ)
return 0;
break;
case SYS_RES_MEMORY:
if (*rid >= ISA_NMEM)
return 0;
break;
case SYS_RES_IOPORT:
if (*rid >= ISA_NPORT)
return 0;
break;
default:
return 0;
}
resource_list_add(rl, type, *rid, start, end,
count, cpuid);
}
}
return resource_list_alloc(rl, bus, child, type, rid,
start, end, count, flags, cpuid);
}
static void
acpi_res_set_ext_irq(device_t dev, void *context, u_int32_t *irq, int count,
int trig, int pol)
{
struct acpi_res_context *cp = (struct acpi_res_context *)context;
if (cp == NULL || irq == NULL)
return;
/* This implements no resource relocation. */
if (count != 1)
return;
bus_set_resource(dev, SYS_RES_IRQ, cp->ar_nirq++, *irq, 1,
machintr_legacy_intr_cpuid(*irq));
}
/*
* Check if the device can be found at the port given
* and if so, set it up ready for further work
* as an argument, takes the isa_device structure from
* autoconf.c
*/
static int
bt_isa_probe(device_t dev)
{
/*
* find unit and check we have that many defined
*/
int port_index;
int max_port_index;
/* No pnp support */
if (isa_get_vendorid(dev))
return (ENXIO);
port_index = 0;
max_port_index = BT_NUM_ISAPORTS - 1;
/*
* Bound our board search if the user has
* specified an exact port.
*/
bt_find_probe_range(isa_get_port(dev), &port_index, &max_port_index);
if (port_index < 0)
return (ENXIO);
/* Attempt to find an adapter */
for (;port_index <= max_port_index; port_index++) {
struct bt_probe_info info;
u_int ioport;
ioport = bt_iop_from_bio(port_index);
/*
* Ensure this port has not already been claimed already
* by a PCI, EISA or ISA adapter.
*/
if (bt_check_probed_iop(ioport) != 0)
continue;
/* Initialise the softc for use during probing */
if (bt_isa_alloc_resources(dev, ioport,
ioport + BT_NREGS -1) != 0)
continue;
/* We're going to attempt to probe it now, so mark it probed */
bt_mark_probed_bio(port_index);
if (bt_port_probe(dev, &info) != 0) {
if (bootverbose)
kprintf("bt_isa_probe: Probe failed at 0x%x\n",
ioport);
bt_isa_release_resources(dev);
continue;
}
bt_isa_release_resources(dev);
bus_set_resource(dev, SYS_RES_DRQ, 0, info.drq, 1, -1);
bus_set_resource(dev, SYS_RES_IRQ, 0, info.irq, 1,
machintr_legacy_intr_cpuid(info.irq));
return (0);
}
return (ENXIO);
}
static int
intsmb_attach(device_t dev)
{
struct intsmb_softc *sc = device_get_softc(dev);
int error, rid, value;
int intr;
char *str;
sc->dev = dev;
lockinit(&sc->lock, "intsmb", 0, LK_CANRECURSE);
sc->cfg_irq9 = 0;
#ifndef NO_CHANGE_PCICONF
switch (pci_get_devid(dev)) {
case 0x71138086: /* Intel 82371AB */
case 0x719b8086: /* Intel 82443MX */
/* Changing configuration is allowed. */
sc->cfg_irq9 = 1;
break;
}
#endif
rid = PCI_BASE_ADDR_SMB;
sc->io_res = bus_alloc_resource_any(dev, SYS_RES_IOPORT, &rid,
RF_ACTIVE);
if (sc->io_res == NULL) {
device_printf(dev, "Could not allocate I/O space\n");
error = ENXIO;
goto fail;
}
if (sc->cfg_irq9) {
pci_write_config(dev, PCIR_INTLINE, 0x9, 1);
pci_write_config(dev, PCI_HST_CFG_SMB,
PCI_INTR_SMB_IRQ9 | PCI_INTR_SMB_ENABLE, 1);
}
value = pci_read_config(dev, PCI_HST_CFG_SMB, 1);
sc->poll = (value & PCI_INTR_SMB_ENABLE) == 0;
intr = value & PCI_INTR_SMB_MASK;
switch (intr) {
case PCI_INTR_SMB_SMI:
str = "SMI";
break;
case PCI_INTR_SMB_IRQ9:
str = "IRQ 9";
break;
case PCI_INTR_SMB_IRQ_PCI:
str = "PCI IRQ";
break;
default:
str = "BOGUS";
}
device_printf(dev, "intr %s %s ", str,
sc->poll == 0 ? "enabled" : "disabled");
kprintf("revision %d\n", pci_read_config(dev, PCI_REVID_SMB, 1));
if (!sc->poll && intr == PCI_INTR_SMB_SMI) {
device_printf(dev,
"using polling mode when configured interrupt is SMI\n");
sc->poll = 1;
}
if (sc->poll)
goto no_intr;
if (intr != PCI_INTR_SMB_IRQ9 && intr != PCI_INTR_SMB_IRQ_PCI) {
device_printf(dev, "Unsupported interrupt mode\n");
error = ENXIO;
goto fail;
}
/* Force IRQ 9. */
rid = 0;
if (sc->cfg_irq9) {
bus_set_resource(dev, SYS_RES_IRQ, rid, 9, 1,
machintr_legacy_intr_cpuid(9));
}
sc->irq_res = bus_alloc_resource_any(dev, SYS_RES_IRQ, &rid,
RF_SHAREABLE | RF_ACTIVE);
if (sc->irq_res == NULL) {
device_printf(dev, "Could not allocate irq\n");
error = ENXIO;
goto fail;
}
error = bus_setup_intr(dev, sc->irq_res, 0,
intsmb_rawintr, sc, &sc->irq_hand, NULL);
if (error) {
device_printf(dev, "Failed to map intr\n");
goto fail;
}
no_intr:
sc->isbusy = 0;
sc->smbus = device_add_child(dev, "smbus", -1);
if (sc->smbus == NULL) {
error = ENXIO;
goto fail;
}
error = device_probe_and_attach(sc->smbus);
if (error)
goto fail;
#ifdef ENABLE_ALART
/* Enable Arart */
bus_write_1(sc->io_res, PIIX4_SMBSLVCNT, PIIX4_SMBSLVCNT_ALTEN);
#endif
return (0);
fail:
intsmb_detach(dev);
return (error);
}
ACPI_STATUS
AcpiOsInstallInterruptHandler(UINT32 InterruptNumber,
ACPI_OSD_HANDLER ServiceRoutine, void *Context)
{
struct acpi_softc *sc;
u_int flags;
ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
if ((sc = devclass_get_softc(devclass_find("acpi"), 0)) == NULL)
panic("can't find ACPI device to register interrupt");
if (sc->acpi_dev == NULL)
panic("acpi softc has invalid device");
/*
* Configure SCI mode
*/
acpi_sci_config();
/*
* This could happen:
* - SCI is disabled by user
* - No suitable interrupt mode for SCI
*/
if (!acpi_sci_enabled())
return_ACPI_STATUS (AE_OK);
if (InterruptNumber < 0 || InterruptNumber > 255)
return_ACPI_STATUS (AE_BAD_PARAMETER);
if (ServiceRoutine == NULL)
return_ACPI_STATUS (AE_BAD_PARAMETER);
if (InterruptHandler != NULL) {
device_printf(sc->acpi_dev, "interrupt handler already installed\n");
return_ACPI_STATUS (AE_ALREADY_EXISTS);
}
InterruptHandler = ServiceRoutine;
flags = RF_ACTIVE;
if (acpi_sci_pci_shareable())
flags |= RF_SHAREABLE;
/* Set up the interrupt resource. */
sc->acpi_irq_rid = 0;
bus_set_resource(sc->acpi_dev, SYS_RES_IRQ, 0, InterruptNumber, 1,
machintr_legacy_intr_cpuid(InterruptNumber));
sc->acpi_irq = bus_alloc_resource_any(sc->acpi_dev, SYS_RES_IRQ,
&sc->acpi_irq_rid, flags);
if (sc->acpi_irq == NULL) {
device_printf(sc->acpi_dev, "could not allocate interrupt\n");
goto error;
}
if (bus_setup_intr(sc->acpi_dev, sc->acpi_irq, 0,
InterruptWrapper, Context, &sc->acpi_irq_handle, NULL)) {
device_printf(sc->acpi_dev, "could not set up interrupt\n");
goto error;
}
return_ACPI_STATUS (AE_OK);
error:
if (sc->acpi_irq_handle)
bus_teardown_intr(sc->acpi_dev, sc->acpi_irq, sc->acpi_irq_handle);
sc->acpi_irq_handle = NULL;
if (sc->acpi_irq)
bus_release_resource(sc->acpi_dev, SYS_RES_IRQ, 0, sc->acpi_irq);
sc->acpi_irq = NULL;
bus_delete_resource(sc->acpi_dev, SYS_RES_IRQ, 0);
InterruptHandler = NULL;
return_ACPI_STATUS (AE_ALREADY_EXISTS);
}
static int
fe_probe_jli(device_t dev)
{
struct fe_softc *sc = device_get_softc(dev);
int i, n, error, xirq;
u_long iobase, irq;
u_char eeprom [JLI_EEPROM_SIZE];
u_short const * irqmap;
static u_short const baseaddr [8] =
{ 0x260, 0x280, 0x2A0, 0x240, 0x340, 0x320, 0x380, 0x300 };
static struct fe_simple_probe_struct const probe_table [] = {
{ FE_DLCR1, 0x20, 0x00 },
{ FE_DLCR2, 0x50, 0x00 },
{ FE_DLCR4, 0x08, 0x00 },
{ FE_DLCR5, 0x80, 0x00 },
#if 0
{ FE_BMPR16, 0x1B, 0x00 },
{ FE_BMPR17, 0x7F, 0x00 },
#endif
{ 0 }
};
/*
* See if the specified address is possible for MB86965A JLI mode.
*/
if (bus_get_resource(dev, SYS_RES_IOPORT, 0, &iobase, NULL) != 0)
return ENXIO;
for (i = 0; i < 8; i++) {
if (baseaddr[i] == iobase)
break;
}
if (i == 8)
return ENXIO;
/* 86965 JLI occupies 32 I/O addresses. */
if (fe_alloc_port(dev, 32))
return ENXIO;
/* Fill the softc struct with reasonable default. */
fe_softc_defaults(sc);
/*
* We should test if MB86965A is on the base address now.
* Unfortunately, it is very hard to probe it reliably, since
* we have no way to reset the chip under software control.
* On cold boot, we could check the "signature" bit patterns
* described in the Fujitsu document. On warm boot, however,
* we can predict almost nothing about register values.
*/
if (!fe_simple_probe(sc, probe_table))
return ENXIO;
/* Check if our I/O address matches config info on 86965. */
n = (fe_inb(sc, FE_BMPR19) & FE_B19_ADDR) >> FE_B19_ADDR_SHIFT;
if (baseaddr[n] != iobase)
return ENXIO;
/*
* We are now almost sure we have an MB86965 at the given
* address. So, read EEPROM through it. We have to write
* into LSI registers to read from EEPROM. I want to avoid it
* at this stage, but I cannot test the presence of the chip
* any further without reading EEPROM. FIXME.
*/
fe_read_eeprom_jli(sc, eeprom);
/* Make sure that config info in EEPROM and 86965 agree. */
if (eeprom[FE_EEPROM_CONF] != fe_inb(sc, FE_BMPR19))
return ENXIO;
/* Use 86965 media selection scheme, unless othewise
specified. It is "AUTO always" and "select with BMPR13."
This behaviour covers most of the 86965 based board (as
minimum requirements.) It is backward compatible with
previous versions, also. */
sc->mbitmap = MB_HA;
sc->defmedia = MB_HA;
sc->msel = fe_msel_965;
/* Perform board-specific probe, one by one. Note that the
order of probe is important and should not be changed
arbitrarily. */
if ((irqmap = fe_probe_jli_ati(sc, eeprom)) == NULL
&& (irqmap = fe_probe_jli_rex(sc, eeprom)) == NULL
&& (irqmap = fe_probe_jli_icl(sc, eeprom)) == NULL
&& (irqmap = fe_probe_jli_unk(sc, eeprom)) == NULL)
return ENXIO;
/* Find the IRQ read from EEPROM. */
n = (fe_inb(sc, FE_BMPR19) & FE_B19_IRQ) >> FE_B19_IRQ_SHIFT;
xirq = irqmap[n];
/* Try to determine IRQ setting. */
error = bus_get_resource(dev, SYS_RES_IRQ, 0, &irq, NULL);
if (error && xirq == NO_IRQ) {
/* The device must be configured with an explicit IRQ. */
device_printf(dev, "IRQ auto-detection does not work\n");
return ENXIO;
} else if (error && xirq != NO_IRQ) {
/* Just use the probed IRQ value. */
bus_set_resource(dev, SYS_RES_IRQ, 0, xirq, 1,
machintr_legacy_intr_cpuid(xirq));
} else if (!error && xirq == NO_IRQ) {
/* No problem. Go ahead. */
} else if (irq == xirq) {
/* Good. Go ahead. */
} else {
/* User must be warned in this case. */
sc->stability |= UNSTABLE_IRQ;
}
/* Setup a hook, which resets te 86965 when the driver is being
initialized. This may solve a nasty bug. FIXME. */
sc->init = fe_init_jli;
return 0;
}
static int
fe_probe_fmv(device_t dev)
{
struct fe_softc *sc = device_get_softc(dev);
int n;
u_long iobase, irq;
static u_short const irqmap [ 4 ] = { 3, 7, 10, 15 };
static struct fe_simple_probe_struct const probe_table [] = {
{ FE_DLCR2, 0x71, 0x00 },
{ FE_DLCR4, 0x08, 0x00 },
{ FE_FMV0, 0x78, 0x50 }, /* ERRDY+PRRDY */
{ FE_FMV1, 0xB0, 0x00 }, /* FMV-183/4 has 0x48 bits. */
{ FE_FMV3, 0x7F, 0x00 },
{ 0 }
};
/* Board subtypes; it lists known FMV-180 variants. */
struct subtype {
u_short mcode;
u_short mbitmap;
u_short defmedia;
char const * str;
};
static struct subtype const typelist [] = {
{ 0x0005, MB_HA|MB_HT|MB_H5, MB_HA, "FMV-181" },
{ 0x0105, MB_HA|MB_HT|MB_H5, MB_HA, "FMV-181A" },
{ 0x0003, MB_HM, MB_HM, "FMV-182" },
{ 0x0103, MB_HM, MB_HM, "FMV-182A" },
{ 0x0804, MB_HT, MB_HT, "FMV-183" },
{ 0x0C04, MB_HT, MB_HT, "FMV-183 (on-board)" },
{ 0x0803, MB_H2|MB_H5, MB_H2, "FMV-184" },
{ 0, MB_HA, MB_HA, "unknown FMV-180 (?)" },
};
struct subtype const * type;
/* Media indicator and "Hardware revision ID" */
u_short mcode;
/* See if the specified address is possible for FMV-180
series. 220, 240, 260, 280, 2A0, 2C0, 300, and 340 are
allowed for all boards, and 200, 2E0, 320, 360, 380, 3A0,
3C0, and 3E0 for PnP boards. */
if (bus_get_resource(dev, SYS_RES_IOPORT, 0, &iobase, NULL) != 0)
return ENXIO;
if ((iobase & ~0x1E0) != 0x200)
return ENXIO;
/* FMV-180 occupies 32 I/O addresses. */
if (fe_alloc_port(dev, 32))
return ENXIO;
/* Setup an I/O address mapping table and some others. */
fe_softc_defaults(sc);
/* Simple probe. */
if (!fe_simple_probe(sc, probe_table))
return ENXIO;
/* Get our station address from EEPROM, and make sure it is
Fujitsu's. */
fe_inblk(sc, FE_FMV4, sc->sc_enaddr, ETHER_ADDR_LEN);
if (!valid_Ether_p(sc->sc_enaddr, 0x00000E))
return ENXIO;
/* Find the supported media and "hardware revision" to know
the model identification. */
mcode = (fe_inb(sc, FE_FMV0) & FE_FMV0_MEDIA)
| ((fe_inb(sc, FE_FMV1) & FE_FMV1_REV) << 8);
/* Determine the card type. */
for (type = typelist; type->mcode != 0; type++) {
if (type->mcode == mcode)
break;
}
if (type->mcode == 0) {
/* Unknown card type... Hope the driver works. */
sc->stability |= UNSTABLE_TYPE;
if (bootverbose) {
device_printf(dev, "unknown config: %x-%x-%x-%x\n",
fe_inb(sc, FE_FMV0),
fe_inb(sc, FE_FMV1),
fe_inb(sc, FE_FMV2),
fe_inb(sc, FE_FMV3));
}
}
/* Setup the board type and media information. */
sc->type = FE_TYPE_FMV;
sc->typestr = type->str;
sc->mbitmap = type->mbitmap;
sc->defmedia = type->defmedia;
sc->msel = fe_msel_965;
if (type->mbitmap == (MB_H2 | MB_H5)) {
/* FMV184 requires a special media selection procedure. */
sc->msel = fe_msel_fmv184;
}
/*
* An FMV-180 has been probed.
* Determine which IRQ to be used.
*
* In this version, we give a priority to the kernel config file.
* If the EEPROM and config don't match, say it to the user for
* an attention.
*/
n = (fe_inb(sc, FE_FMV2) & FE_FMV2_IRS) >> FE_FMV2_IRS_SHIFT;
irq = 0;
bus_get_resource(dev, SYS_RES_IRQ, 0, &irq, NULL);
if (irq == NO_IRQ) {
int intr = irqmap[n];
/* Just use the probed value. */
bus_set_resource(dev, SYS_RES_IRQ, 0, intr, 1,
machintr_legacy_intr_cpuid(intr));
} else if (irq != irqmap[n]) {
/* Don't match. */
sc->stability |= UNSTABLE_IRQ;
}
/* We need an init hook to initialize ASIC before we start. */
sc->init = fe_init_fmv;
return 0;
}
