freebsd-skq/sys/pci/pci_compat.c
1999-04-24 19:55:41 +00:00

260 lines
6.1 KiB
C

/*
* Copyright (c) 1997, Stefan Esser <se@freebsd.org>
* 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 unmodified, 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 ``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 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: pci_compat.c,v 1.23 1999/04/17 08:36:07 peter Exp $
*
*/
#include "opt_bus.h"
#include "pci.h"
#if NPCI > 0
/* for compatibility to FreeBSD-2.2 version of PCI code */
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/malloc.h>
#include <vm/vm.h>
#include <vm/pmap.h>
#include <sys/interrupt.h>
#include <sys/bus.h>
#include <machine/bus.h>
#include <sys/rman.h>
#include <machine/resource.h>
#include <pci/pcireg.h>
#include <pci/pcivar.h>
#ifdef RESOURCE_CHECK
#include <sys/drvresource.h>
#endif
#ifdef APIC_IO
#include <machine/smp.h>
#endif
#ifdef PCI_COMPAT
/* ------------------------------------------------------------------------- */
u_long
pci_conf_read(pcici_t cfg, u_long reg)
{
return (pci_read_config(cfg->dev, reg, 4));
}
void
pci_conf_write(pcici_t cfg, u_long reg, u_long data)
{
pci_write_config(cfg->dev, reg, data, 4);
}
int pci_map_port(pcici_t cfg, u_long reg, pci_port_t* pa)
{
int rid;
struct resource *res;
rid = reg;
res = bus_alloc_resource(cfg->dev, SYS_RES_IOPORT, &rid,
0, ~0, 1, RF_ACTIVE);
if (res) {
*pa = rman_get_start(res);
return (1);
}
return (0);
}
int pci_map_mem(pcici_t cfg, u_long reg, vm_offset_t* va, vm_offset_t* pa)
{
int rid;
struct resource *res;
rid = reg;
res = bus_alloc_resource(cfg->dev, SYS_RES_MEMORY, &rid,
0, ~0, 1, RF_ACTIVE);
if (res) {
*pa = rman_get_start(res);
*va = (vm_offset_t) rman_get_virtual(res);
return (1);
}
return (0);
}
int
pci_map_dense(pcici_t cfg, u_long reg, vm_offset_t* va, vm_offset_t* pa)
{
if (pci_map_mem(cfg, reg, va, pa)){
#ifdef __alpha__
vm_offset_t dense;
if(dense = pci_cvt_to_dense(*pa)){
*pa = dense;
*va = ALPHA_PHYS_TO_K0SEG(*pa);
return (1);
}
#endif
#ifdef __i386__
return(1);
#endif
}
return (0);
}
int
pci_map_bwx(pcici_t cfg, u_long reg, vm_offset_t* va, vm_offset_t* pa)
{
if (pci_map_mem(cfg, reg, va, pa)){
#ifdef __alpha__
vm_offset_t bwx;
if(bwx = pci_cvt_to_bwx(*pa)){
*pa = bwx;
*va = ALPHA_PHYS_TO_K0SEG(*pa);
return (1);
}
#endif
#ifdef __i386__
return(1);
#endif
}
return (0);
}
int
pci_map_int(pcici_t cfg, pci_inthand_t *handler, void *arg, intrmask_t *maskptr)
{
return (pci_map_int_right(cfg, handler, arg, maskptr, 0));
}
int
pci_map_int_right(pcici_t cfg, pci_inthand_t *handler, void *arg,
intrmask_t *maskptr, u_int flags)
{
int error;
#ifdef APIC_IO
int nextpin, muxcnt;
#endif
if (cfg->intpin != 0) {
int irq = cfg->intline;
driver_t *driver = device_get_driver(cfg->dev);
int rid = 0;
struct resource *res;
void *ih;
res = bus_alloc_resource(cfg->dev, SYS_RES_IRQ, &rid,
irq, irq, 1, RF_SHAREABLE|RF_ACTIVE);
if (!res) {
printf("pci_map_int: can't allocate interrupt\n");
return 0;
}
/*
* This is ugly. Translate the mask into a driver type.
*/
if (maskptr == &tty_imask)
driver->type |= DRIVER_TYPE_TTY;
else if (maskptr == &bio_imask)
driver->type |= DRIVER_TYPE_BIO;
else if (maskptr == &net_imask)
driver->type |= DRIVER_TYPE_NET;
else if (maskptr == &cam_imask)
driver->type |= DRIVER_TYPE_CAM;
error = BUS_SETUP_INTR(device_get_parent(cfg->dev), cfg->dev,
res, handler, arg, &ih);
if (error != 0)
return 0;
#ifdef NEW_BUS_PCI
/*
* XXX this apic stuff looks totally busted. It should
* move to the nexus code which actually registers the
* interrupt.
*/
#endif
#ifdef APIC_IO
nextpin = next_apic_irq(irq);
if (nextpin < 0)
return 1;
/*
* Attempt handling of some broken mp tables.
*
* It's OK to yell (since the mp tables are broken).
*
* Hanging in the boot is not OK
*/
muxcnt = 2;
nextpin = next_apic_irq(nextpin);
while (muxcnt < 5 && nextpin >= 0) {
muxcnt++;
nextpin = next_apic_irq(nextpin);
}
if (muxcnt >= 5) {
printf("bogus MP table, more than 4 IO APIC pins connected to the same PCI device or ISA/EISA interrupt\n");
return 0;
}
printf("bogus MP table, %d IO APIC pins connected to the same PCI device or ISA/EISA interrupt\n", muxcnt);
nextpin = next_apic_irq(irq);
while (nextpin >= 0) {
rid = 0;
res = bus_alloc_resource(cfg->dev, SYS_RES_IRQ, &rid,
nextpin, nextpin, 1,
RF_SHAREABLE|RF_ACTIVE);
if (!res) {
printf("pci_map_int: can't allocate extra interrupt\n");
return 0;
}
error = BUS_SETUP_INTR(device_get_parent(cfg->dev),
cfg->dev, res, handler, arg,
&ih);
if (error != 0) {
printf("pci_map_int: BUS_SETUP_INTR failed\n");
return 0;
}
printf("Registered extra interrupt handler for int %d (in addition to int %d)\n", nextpin, irq);
nextpin = next_apic_irq(nextpin);
}
#endif
}
return (1);
}
int
pci_unmap_int(pcici_t cfg)
{
return (0); /* not supported, yet, since cfg doesn't know about idesc */
}
#endif /* PCI_COMPAT */
#endif /* NPCI > 0 */