NetBSD-5.0.2/sys/arch/alpha/pci/irongate.c
/* $NetBSD: irongate.c,v 1.14 2008/04/28 20:23:11 martin Exp $ */
/*-
* Copyright (c) 2000, 2001 The NetBSD Foundation, Inc.
* All rights reserved.
*
* This code is derived from software contributed to The NetBSD Foundation
* by Jason R. Thorpe of Wasabi Systems, Inc.
*
* 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 NETBSD FOUNDATION, INC. 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 FOUNDATION 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.
*/
#include "opt_api_up1000.h"
#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: irongate.c,v 1.14 2008/04/28 20:23:11 martin Exp $");
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/device.h>
#include <sys/malloc.h>
#include <machine/autoconf.h>
#include <machine/rpb.h>
#include <machine/sysarch.h>
#include <dev/isa/isareg.h>
#include <dev/isa/isavar.h>
#include <dev/pci/pcireg.h>
#include <dev/pci/pcivar.h>
#include <dev/pci/agpvar.h>
#include <alpha/pci/irongatereg.h>
#include <alpha/pci/irongatevar.h>
#ifdef API_UP1000
#include <alpha/pci/pci_up1000.h>
#endif
int irongate_match(struct device *, struct cfdata *, void *);
void irongate_attach(struct device *, struct device *, void *);
CFATTACH_DECL(irongate, sizeof(struct irongate_softc),
irongate_match, irongate_attach, NULL, NULL);
extern struct cfdriver irongate_cd;
/* There can be only one. */
struct irongate_config irongate_configuration;
int irongate_found;
int irongate_bus_get_window(int, int,
struct alpha_bus_space_translation *);
/*
* Set up the chipset's function pointers.
*/
void
irongate_init(struct irongate_config *icp, int mallocsafe)
{
pcitag_t tag;
pcireg_t reg;
icp->ic_mallocsafe = mallocsafe;
/*
* Set up PCI configuration space; we can only read the
* revision info through configuration space.
*/
irongate_pci_init(&icp->ic_pc, icp);
alpha_pci_chipset = &icp->ic_pc;
tag = pci_make_tag(&icp->ic_pc, 0, IRONGATE_PCIHOST_DEV, 0);
/* Read the revision. */
reg = irongate_conf_read0(icp, tag, PCI_CLASS_REG);
icp->ic_rev = PCI_REVISION(reg);
if (icp->ic_initted == 0) {
/* Don't do these twice, since they set up extents. */
irongate_bus_io_init(&icp->ic_iot, icp);
irongate_bus_mem_init(&icp->ic_memt, icp);
/* Only one each PCI I/O and MEM window. */
alpha_bus_window_count[ALPHA_BUS_TYPE_PCI_IO] = 1;
alpha_bus_window_count[ALPHA_BUS_TYPE_PCI_MEM] = 1;
alpha_bus_get_window = irongate_bus_get_window;
}
icp->ic_initted = 1;
}
int
irongate_match(struct device *parent, struct cfdata *match, void *aux)
{
struct mainbus_attach_args *ma = aux;
/* Make sure we're looking for an Irongate. */
if (strcmp(ma->ma_name, irongate_cd.cd_name) != 0)
return (0);
if (irongate_found)
return (0);
return (1);
}
void
irongate_attach(struct device *parent, struct device *self, void *aux)
{
struct irongate_softc *sc = (void *) self;
struct irongate_config *icp;
struct pcibus_attach_args pba;
struct agpbus_attach_args apa;
pcitag_t tag;
/* Note that we've attached the chipset; can't have 2 Irongates. */
irongate_found = 1;
/*
* Set up the chipset's info; done once at console init time
* (maybe), but we must do it here as well to take care of things
* that need to use memory allocation.
*/
icp = sc->sc_icp = &irongate_configuration;
irongate_init(icp, 1);
printf(": AMD 751 Core Logic + AGP Chipset, rev. %d\n", icp->ic_rev);
irongate_dma_init(icp);
/*
* Do PCI memory initialization that needs to be deferred until
* malloc is safe.
*/
irongate_bus_mem_init2(&icp->ic_memt, icp);
switch (cputype) {
#ifdef API_UP1000
case ST_API_NAUTILUS:
pci_up1000_pickintr(icp);
break;
#endif
default:
panic("irongate_attach: shouldn't be here, really...");
}
tag = pci_make_tag(&icp->ic_pc, 0, IRONGATE_PCIHOST_DEV, 0);
pba.pba_iot = &icp->ic_iot;
pba.pba_memt = &icp->ic_memt;
pba.pba_dmat =
alphabus_dma_get_tag(&icp->ic_dmat_pci, ALPHA_BUS_PCI);
pba.pba_dmat64 = NULL;
pba.pba_pc = &icp->ic_pc;
pba.pba_bus = 0;
pba.pba_bridgetag = NULL;
pba.pba_flags = PCI_FLAGS_IO_ENABLED | PCI_FLAGS_MEM_ENABLED |
PCI_FLAGS_MRL_OKAY | PCI_FLAGS_MRM_OKAY | PCI_FLAGS_MWI_OKAY;
if (pci_get_capability(&icp->ic_pc, tag, PCI_CAP_AGP,
NULL, NULL) != 0) {
apa.apa_pci_args.pa_iot = pba.pba_iot;
apa.apa_pci_args.pa_memt = pba.pba_memt;
apa.apa_pci_args.pa_dmat = pba.pba_dmat;
apa.apa_pci_args.pa_pc = pba.pba_pc;
apa.apa_pci_args.pa_bus = pba.pba_bus;
apa.apa_pci_args.pa_device = IRONGATE_PCIHOST_DEV;
apa.apa_pci_args.pa_function = 0;
apa.apa_pci_args.pa_tag = tag;
apa.apa_pci_args.pa_id =
irongate_conf_read0(icp, tag, PCI_ID_REG);
apa.apa_pci_args.pa_class =
irongate_conf_read0(icp, tag, PCI_CLASS_REG);
apa.apa_pci_args.pa_flags = pba.pba_flags;
(void) config_found_ia(self, "agpbus", &apa, agpbusprint);
}
(void) config_found_ia(self, "pcibus", &pba, pcibusprint);
}
int
irongate_bus_get_window(int type, int window,
struct alpha_bus_space_translation *abst)
{
struct irongate_config *icp = &irongate_configuration;
bus_space_tag_t st;
int error;
switch (type) {
case ALPHA_BUS_TYPE_PCI_IO:
st = &icp->ic_iot;
break;
case ALPHA_BUS_TYPE_PCI_MEM:
st = &icp->ic_memt;
break;
default:
panic("irongate_bus_get_window");
}
error = alpha_bus_space_get_window(st, window, abst);
if (error)
return (error);
abst->abst_sys_start = IRONGATE_PHYSADDR(abst->abst_sys_start);
abst->abst_sys_end = IRONGATE_PHYSADDR(abst->abst_sys_end);
return (0);
}