Home | History | Annotate | Line # | Download | only in pci
pci_machdep.c revision 1.22
      1  1.22      matt /*	$NetBSD: pci_machdep.c,v 1.22 2007/02/22 04:58:26 matt Exp $	*/
      2   1.1      fvdl 
      3   1.1      fvdl /*-
      4   1.1      fvdl  * Copyright (c) 1997, 1998 The NetBSD Foundation, Inc.
      5   1.1      fvdl  * All rights reserved.
      6   1.1      fvdl  *
      7   1.1      fvdl  * This code is derived from software contributed to The NetBSD Foundation
      8   1.1      fvdl  * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
      9   1.1      fvdl  * NASA Ames Research Center.
     10   1.1      fvdl  *
     11   1.1      fvdl  * Redistribution and use in source and binary forms, with or without
     12   1.1      fvdl  * modification, are permitted provided that the following conditions
     13   1.1      fvdl  * are met:
     14   1.1      fvdl  * 1. Redistributions of source code must retain the above copyright
     15   1.1      fvdl  *    notice, this list of conditions and the following disclaimer.
     16   1.1      fvdl  * 2. Redistributions in binary form must reproduce the above copyright
     17   1.1      fvdl  *    notice, this list of conditions and the following disclaimer in the
     18   1.1      fvdl  *    documentation and/or other materials provided with the distribution.
     19   1.1      fvdl  * 3. All advertising materials mentioning features or use of this software
     20   1.1      fvdl  *    must display the following acknowledgement:
     21   1.1      fvdl  *	This product includes software developed by the NetBSD
     22   1.1      fvdl  *	Foundation, Inc. and its contributors.
     23   1.1      fvdl  * 4. Neither the name of The NetBSD Foundation nor the names of its
     24   1.1      fvdl  *    contributors may be used to endorse or promote products derived
     25   1.1      fvdl  *    from this software without specific prior written permission.
     26   1.1      fvdl  *
     27   1.1      fvdl  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     28   1.1      fvdl  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     29   1.1      fvdl  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     30   1.1      fvdl  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     31   1.1      fvdl  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     32   1.1      fvdl  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     33   1.1      fvdl  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     34   1.1      fvdl  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     35   1.1      fvdl  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     36   1.1      fvdl  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     37   1.1      fvdl  * POSSIBILITY OF SUCH DAMAGE.
     38   1.1      fvdl  */
     39   1.1      fvdl 
     40   1.1      fvdl /*
     41   1.1      fvdl  * Copyright (c) 1996 Christopher G. Demetriou.  All rights reserved.
     42   1.1      fvdl  * Copyright (c) 1994 Charles M. Hannum.  All rights reserved.
     43   1.1      fvdl  *
     44   1.1      fvdl  * Redistribution and use in source and binary forms, with or without
     45   1.1      fvdl  * modification, are permitted provided that the following conditions
     46   1.1      fvdl  * are met:
     47   1.1      fvdl  * 1. Redistributions of source code must retain the above copyright
     48   1.1      fvdl  *    notice, this list of conditions and the following disclaimer.
     49   1.1      fvdl  * 2. Redistributions in binary form must reproduce the above copyright
     50   1.1      fvdl  *    notice, this list of conditions and the following disclaimer in the
     51   1.1      fvdl  *    documentation and/or other materials provided with the distribution.
     52   1.1      fvdl  * 3. All advertising materials mentioning features or use of this software
     53   1.1      fvdl  *    must display the following acknowledgement:
     54   1.1      fvdl  *	This product includes software developed by Charles M. Hannum.
     55   1.1      fvdl  * 4. The name of the author may not be used to endorse or promote products
     56   1.1      fvdl  *    derived from this software without specific prior written permission.
     57   1.1      fvdl  *
     58   1.1      fvdl  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     59   1.1      fvdl  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     60   1.1      fvdl  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     61   1.1      fvdl  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     62   1.1      fvdl  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     63   1.1      fvdl  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     64   1.1      fvdl  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     65   1.1      fvdl  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     66   1.1      fvdl  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     67   1.1      fvdl  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     68   1.1      fvdl  */
     69   1.1      fvdl 
     70   1.1      fvdl /*
     71   1.1      fvdl  * Machine-specific functions for PCI autoconfiguration.
     72   1.1      fvdl  *
     73   1.1      fvdl  * On PCs, there are two methods of generating PCI configuration cycles.
     74   1.1      fvdl  * We try to detect the appropriate mechanism for this machine and set
     75   1.1      fvdl  * up a few function pointers to access the correct method directly.
     76   1.1      fvdl  *
     77   1.1      fvdl  * The configuration method can be hard-coded in the config file by
     78   1.1      fvdl  * using `options PCI_CONF_MODE=N', where `N' is the configuration mode
     79   1.1      fvdl  * as defined section 3.6.4.1, `Generating Configuration Cycles'.
     80   1.1      fvdl  */
     81   1.1      fvdl 
     82   1.1      fvdl #include <sys/cdefs.h>
     83  1.22      matt __KERNEL_RCSID(0, "$NetBSD: pci_machdep.c,v 1.22 2007/02/22 04:58:26 matt Exp $");
     84   1.1      fvdl 
     85   1.1      fvdl #include <sys/types.h>
     86   1.1      fvdl #include <sys/param.h>
     87   1.1      fvdl #include <sys/time.h>
     88   1.1      fvdl #include <sys/systm.h>
     89   1.1      fvdl #include <sys/errno.h>
     90   1.1      fvdl #include <sys/device.h>
     91   1.1      fvdl #include <sys/lock.h>
     92   1.1      fvdl 
     93   1.1      fvdl #include <uvm/uvm_extern.h>
     94   1.1      fvdl 
     95   1.1      fvdl #include <machine/bus.h>
     96  1.10      yamt #include <machine/bus_private.h>
     97   1.1      fvdl 
     98   1.1      fvdl #include <machine/pio.h>
     99   1.1      fvdl 
    100   1.3      fvdl #include <dev/isa/isareg.h>
    101   1.1      fvdl #include <dev/isa/isavar.h>
    102   1.1      fvdl #include <dev/pci/pcivar.h>
    103   1.1      fvdl #include <dev/pci/pcireg.h>
    104   1.1      fvdl #include <dev/pci/pcidevs.h>
    105   1.1      fvdl 
    106  1.16  christos #include "acpi.h"
    107  1.14    bouyer #include "opt_mpbios.h"
    108  1.16  christos #include "opt_acpi.h"
    109  1.14    bouyer 
    110  1.14    bouyer #ifdef MPBIOS
    111  1.14    bouyer #include <machine/mpbiosvar.h>
    112  1.14    bouyer #endif
    113  1.14    bouyer 
    114  1.16  christos #if NACPI > 0
    115  1.14    bouyer #include <machine/mpacpi.h>
    116  1.14    bouyer #endif
    117  1.14    bouyer 
    118  1.16  christos #include <machine/mpconfig.h>
    119  1.16  christos 
    120   1.1      fvdl #include "opt_pci_conf_mode.h"
    121   1.1      fvdl 
    122  1.19  jmcneill #ifdef __i386__
    123  1.19  jmcneill #include "opt_xbox.h"
    124  1.19  jmcneill #ifdef XBOX
    125  1.19  jmcneill #include <machine/xbox.h>
    126  1.19  jmcneill #endif
    127  1.19  jmcneill #endif
    128  1.19  jmcneill 
    129   1.1      fvdl int pci_mode = -1;
    130   1.1      fvdl 
    131  1.11    sekiya static void pci_bridge_hook(pci_chipset_tag_t, pcitag_t, void *);
    132  1.11    sekiya struct pci_bridge_hook_arg {
    133  1.11    sekiya 	void (*func)(pci_chipset_tag_t, pcitag_t, void *);
    134  1.11    sekiya 	void *arg;
    135  1.11    sekiya };
    136  1.11    sekiya 
    137  1.11    sekiya 
    138   1.1      fvdl struct simplelock pci_conf_slock = SIMPLELOCK_INITIALIZER;
    139   1.1      fvdl 
    140   1.1      fvdl #define	PCI_CONF_LOCK(s)						\
    141   1.1      fvdl do {									\
    142   1.1      fvdl 	(s) = splhigh();						\
    143   1.1      fvdl 	simple_lock(&pci_conf_slock);					\
    144   1.1      fvdl } while (0)
    145   1.1      fvdl 
    146   1.1      fvdl #define	PCI_CONF_UNLOCK(s)						\
    147   1.1      fvdl do {									\
    148   1.1      fvdl 	simple_unlock(&pci_conf_slock);					\
    149   1.1      fvdl 	splx((s));							\
    150   1.1      fvdl } while (0)
    151   1.1      fvdl 
    152   1.1      fvdl #define	PCI_MODE1_ENABLE	0x80000000UL
    153   1.1      fvdl #define	PCI_MODE1_ADDRESS_REG	0x0cf8
    154   1.1      fvdl #define	PCI_MODE1_DATA_REG	0x0cfc
    155   1.1      fvdl 
    156   1.1      fvdl #define	PCI_MODE2_ENABLE_REG	0x0cf8
    157   1.1      fvdl #define	PCI_MODE2_FORWARD_REG	0x0cfa
    158   1.1      fvdl 
    159   1.1      fvdl #define _m1tag(b, d, f) \
    160   1.1      fvdl 	(PCI_MODE1_ENABLE | ((b) << 16) | ((d) << 11) | ((f) << 8))
    161   1.1      fvdl #define _qe(bus, dev, fcn, vend, prod) \
    162   1.1      fvdl 	{_m1tag(bus, dev, fcn), PCI_ID_CODE(vend, prod)}
    163   1.1      fvdl struct {
    164   1.1      fvdl 	u_int32_t tag;
    165   1.1      fvdl 	pcireg_t id;
    166   1.1      fvdl } pcim1_quirk_tbl[] = {
    167   1.1      fvdl 	_qe(0, 0, 0, PCI_VENDOR_COMPAQ, PCI_PRODUCT_COMPAQ_TRIFLEX1),
    168   1.1      fvdl 	/* XXX Triflex2 not tested */
    169   1.1      fvdl 	_qe(0, 0, 0, PCI_VENDOR_COMPAQ, PCI_PRODUCT_COMPAQ_TRIFLEX2),
    170   1.1      fvdl 	_qe(0, 0, 0, PCI_VENDOR_COMPAQ, PCI_PRODUCT_COMPAQ_TRIFLEX4),
    171   1.1      fvdl 	/* Triton needed for Connectix Virtual PC */
    172   1.1      fvdl 	_qe(0, 0, 0, PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82437FX),
    173   1.1      fvdl 	/* Connectix Virtual PC 5 has a 440BX */
    174   1.1      fvdl 	_qe(0, 0, 0, PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82443BX_NOAGP),
    175  1.15     soren 	/* Parallels Desktop for Mac */
    176  1.15     soren 	_qe(0, 2, 0, PCI_VENDOR_PARALLELS, PCI_PRODUCT_PARALLELS_VIDEO),
    177  1.15     soren 	_qe(0, 3, 0, PCI_VENDOR_PARALLELS, PCI_PRODUCT_PARALLELS_TOOLS),
    178  1.12  christos 	/* SIS 741 */
    179  1.12  christos 	_qe(0, 0, 0, PCI_VENDOR_SIS, PCI_PRODUCT_SIS_741),
    180   1.1      fvdl 	{0, 0xffffffff} /* patchable */
    181   1.1      fvdl };
    182   1.1      fvdl #undef _m1tag
    183   1.1      fvdl #undef _id
    184   1.1      fvdl #undef _qe
    185   1.1      fvdl 
    186   1.1      fvdl /*
    187   1.1      fvdl  * PCI doesn't have any special needs; just use the generic versions
    188   1.1      fvdl  * of these functions.
    189   1.1      fvdl  */
    190   1.1      fvdl struct x86_bus_dma_tag pci_bus_dma_tag = {
    191  1.21       mrg 	0,				/* tag_needs_free */
    192   1.3      fvdl #if defined(_LP64) || defined(PAE)
    193   1.3      fvdl 	PCI32_DMA_BOUNCE_THRESHOLD,	/* bounce_thresh */
    194   1.3      fvdl 	ISA_DMA_BOUNCE_THRESHOLD,	/* bounce_alloclo */
    195   1.3      fvdl 	PCI32_DMA_BOUNCE_THRESHOLD,	/* bounce_allochi */
    196   1.3      fvdl #else
    197   1.3      fvdl 	0,
    198   1.3      fvdl 	0,
    199   1.3      fvdl 	0,
    200   1.3      fvdl #endif
    201   1.3      fvdl 	NULL,			/* _may_bounce */
    202   1.1      fvdl 	_bus_dmamap_create,
    203   1.1      fvdl 	_bus_dmamap_destroy,
    204   1.1      fvdl 	_bus_dmamap_load,
    205   1.1      fvdl 	_bus_dmamap_load_mbuf,
    206   1.1      fvdl 	_bus_dmamap_load_uio,
    207   1.1      fvdl 	_bus_dmamap_load_raw,
    208   1.1      fvdl 	_bus_dmamap_unload,
    209   1.3      fvdl 	_bus_dmamap_sync,
    210   1.1      fvdl 	_bus_dmamem_alloc,
    211   1.1      fvdl 	_bus_dmamem_free,
    212   1.1      fvdl 	_bus_dmamem_map,
    213   1.1      fvdl 	_bus_dmamem_unmap,
    214   1.1      fvdl 	_bus_dmamem_mmap,
    215  1.21       mrg 	_bus_dmatag_subregion,
    216  1.21       mrg 	_bus_dmatag_destroy,
    217   1.1      fvdl };
    218   1.5      fvdl 
    219   1.5      fvdl #ifdef _LP64
    220   1.5      fvdl struct x86_bus_dma_tag pci_bus_dma64_tag = {
    221  1.22      matt 	0,				/* tag_needs_free */
    222   1.5      fvdl 	0,
    223   1.5      fvdl 	0,
    224   1.5      fvdl 	0,
    225   1.5      fvdl 	NULL,			/* _may_bounce */
    226   1.5      fvdl 	_bus_dmamap_create,
    227   1.5      fvdl 	_bus_dmamap_destroy,
    228   1.5      fvdl 	_bus_dmamap_load,
    229   1.5      fvdl 	_bus_dmamap_load_mbuf,
    230   1.5      fvdl 	_bus_dmamap_load_uio,
    231   1.5      fvdl 	_bus_dmamap_load_raw,
    232   1.5      fvdl 	_bus_dmamap_unload,
    233   1.5      fvdl 	NULL,
    234   1.5      fvdl 	_bus_dmamem_alloc,
    235   1.5      fvdl 	_bus_dmamem_free,
    236   1.5      fvdl 	_bus_dmamem_map,
    237   1.5      fvdl 	_bus_dmamem_unmap,
    238   1.5      fvdl 	_bus_dmamem_mmap,
    239  1.21       mrg 	_bus_dmatag_subregion,
    240  1.21       mrg 	_bus_dmatag_destroy,
    241   1.5      fvdl };
    242   1.5      fvdl #endif
    243   1.1      fvdl 
    244   1.1      fvdl void
    245  1.18  christos pci_attach_hook(struct device *parent, struct device *self,
    246  1.17  christos     struct pcibus_attach_args *pba)
    247   1.1      fvdl {
    248   1.1      fvdl 
    249   1.1      fvdl 	if (pba->pba_bus == 0)
    250   1.1      fvdl 		printf(": configuration mode %d", pci_mode);
    251   1.4      fvdl #ifdef MPBIOS
    252   1.4      fvdl 	mpbios_pci_attach_hook(parent, self, pba);
    253   1.4      fvdl #endif
    254  1.16  christos #if NACPI > 0
    255   1.4      fvdl 	mpacpi_pci_attach_hook(parent, self, pba);
    256   1.4      fvdl #endif
    257   1.1      fvdl }
    258   1.1      fvdl 
    259   1.1      fvdl int
    260  1.18  christos pci_bus_maxdevs(pci_chipset_tag_t pc, int busno)
    261   1.1      fvdl {
    262   1.1      fvdl 
    263  1.19  jmcneill #if defined(__i386__) && defined(XBOX)
    264  1.19  jmcneill 	/*
    265  1.19  jmcneill 	 * Scanning above the first device is fatal on the Microsoft Xbox.
    266  1.19  jmcneill 	 * If busno=1, only allow for one device.
    267  1.19  jmcneill 	 */
    268  1.19  jmcneill 	if (arch_i386_is_xbox) {
    269  1.19  jmcneill 		if (busno == 1)
    270  1.19  jmcneill 			return 1;
    271  1.19  jmcneill 		else if (busno > 1)
    272  1.19  jmcneill 			return 0;
    273  1.19  jmcneill 	}
    274  1.19  jmcneill #endif
    275  1.19  jmcneill 
    276   1.1      fvdl 	/*
    277   1.1      fvdl 	 * Bus number is irrelevant.  If Configuration Mechanism 2 is in
    278   1.1      fvdl 	 * use, can only have devices 0-15 on any bus.  If Configuration
    279   1.1      fvdl 	 * Mechanism 1 is in use, can have devices 0-32 (i.e. the `normal'
    280   1.1      fvdl 	 * range).
    281   1.1      fvdl 	 */
    282   1.1      fvdl 	if (pci_mode == 2)
    283   1.1      fvdl 		return (16);
    284   1.1      fvdl 	else
    285   1.1      fvdl 		return (32);
    286   1.1      fvdl }
    287   1.1      fvdl 
    288   1.1      fvdl pcitag_t
    289  1.18  christos pci_make_tag(pci_chipset_tag_t pc, int bus, int device, int function)
    290   1.1      fvdl {
    291   1.1      fvdl 	pcitag_t tag;
    292   1.1      fvdl 
    293   1.1      fvdl #ifndef PCI_CONF_MODE
    294   1.1      fvdl 	switch (pci_mode) {
    295   1.1      fvdl 	case 1:
    296   1.1      fvdl 		goto mode1;
    297   1.1      fvdl 	case 2:
    298   1.1      fvdl 		goto mode2;
    299   1.1      fvdl 	default:
    300   1.1      fvdl 		panic("pci_make_tag: mode not configured");
    301   1.1      fvdl 	}
    302   1.1      fvdl #endif
    303   1.1      fvdl 
    304   1.1      fvdl #if !defined(PCI_CONF_MODE) || (PCI_CONF_MODE == 1)
    305   1.1      fvdl #ifndef PCI_CONF_MODE
    306   1.1      fvdl mode1:
    307   1.1      fvdl #endif
    308   1.1      fvdl 	if (bus >= 256 || device >= 32 || function >= 8)
    309   1.1      fvdl 		panic("pci_make_tag: bad request");
    310   1.1      fvdl 
    311   1.1      fvdl 	tag.mode1 = PCI_MODE1_ENABLE |
    312   1.1      fvdl 		    (bus << 16) | (device << 11) | (function << 8);
    313   1.1      fvdl 	return tag;
    314   1.1      fvdl #endif
    315   1.1      fvdl 
    316   1.1      fvdl #if !defined(PCI_CONF_MODE) || (PCI_CONF_MODE == 2)
    317   1.1      fvdl #ifndef PCI_CONF_MODE
    318   1.1      fvdl mode2:
    319   1.1      fvdl #endif
    320   1.1      fvdl 	if (bus >= 256 || device >= 16 || function >= 8)
    321   1.1      fvdl 		panic("pci_make_tag: bad request");
    322   1.1      fvdl 
    323   1.1      fvdl 	tag.mode2.port = 0xc000 | (device << 8);
    324   1.1      fvdl 	tag.mode2.enable = 0xf0 | (function << 1);
    325   1.1      fvdl 	tag.mode2.forward = bus;
    326   1.1      fvdl 	return tag;
    327   1.1      fvdl #endif
    328   1.1      fvdl }
    329   1.1      fvdl 
    330   1.1      fvdl void
    331  1.18  christos pci_decompose_tag(pci_chipset_tag_t pc, pcitag_t tag,
    332  1.17  christos     int *bp, int *dp, int *fp)
    333   1.1      fvdl {
    334   1.1      fvdl 
    335   1.1      fvdl #ifndef PCI_CONF_MODE
    336   1.1      fvdl 	switch (pci_mode) {
    337   1.1      fvdl 	case 1:
    338   1.1      fvdl 		goto mode1;
    339   1.1      fvdl 	case 2:
    340   1.1      fvdl 		goto mode2;
    341   1.1      fvdl 	default:
    342   1.1      fvdl 		panic("pci_decompose_tag: mode not configured");
    343   1.1      fvdl 	}
    344   1.1      fvdl #endif
    345   1.1      fvdl 
    346   1.1      fvdl #if !defined(PCI_CONF_MODE) || (PCI_CONF_MODE == 1)
    347   1.1      fvdl #ifndef PCI_CONF_MODE
    348   1.1      fvdl mode1:
    349   1.1      fvdl #endif
    350   1.1      fvdl 	if (bp != NULL)
    351   1.1      fvdl 		*bp = (tag.mode1 >> 16) & 0xff;
    352   1.1      fvdl 	if (dp != NULL)
    353   1.1      fvdl 		*dp = (tag.mode1 >> 11) & 0x1f;
    354   1.1      fvdl 	if (fp != NULL)
    355   1.1      fvdl 		*fp = (tag.mode1 >> 8) & 0x7;
    356   1.1      fvdl 	return;
    357   1.1      fvdl #endif
    358   1.1      fvdl 
    359   1.1      fvdl #if !defined(PCI_CONF_MODE) || (PCI_CONF_MODE == 2)
    360   1.1      fvdl #ifndef PCI_CONF_MODE
    361   1.1      fvdl mode2:
    362   1.1      fvdl #endif
    363   1.1      fvdl 	if (bp != NULL)
    364   1.1      fvdl 		*bp = tag.mode2.forward & 0xff;
    365   1.1      fvdl 	if (dp != NULL)
    366   1.1      fvdl 		*dp = (tag.mode2.port >> 8) & 0xf;
    367   1.1      fvdl 	if (fp != NULL)
    368   1.1      fvdl 		*fp = (tag.mode2.enable >> 1) & 0x7;
    369   1.1      fvdl #endif
    370   1.1      fvdl }
    371   1.1      fvdl 
    372   1.1      fvdl pcireg_t
    373  1.18  christos pci_conf_read( pci_chipset_tag_t pc, pcitag_t tag,
    374  1.18  christos     int reg)
    375   1.1      fvdl {
    376   1.1      fvdl 	pcireg_t data;
    377   1.1      fvdl 	int s;
    378   1.1      fvdl 
    379  1.20  jmcneill #if defined(__i386__) && defined(XBOX)
    380  1.20  jmcneill 	if (arch_i386_is_xbox) {
    381  1.20  jmcneill 		int bus, dev, fn;
    382  1.20  jmcneill 		pci_decompose_tag(pc, tag, &bus, &dev, &fn);
    383  1.20  jmcneill 		if (bus == 0 && dev == 0 && (fn == 1 || fn == 2))
    384  1.20  jmcneill 			return (pcireg_t)-1;
    385  1.20  jmcneill 	}
    386  1.20  jmcneill #endif
    387  1.20  jmcneill 
    388   1.1      fvdl #ifndef PCI_CONF_MODE
    389   1.1      fvdl 	switch (pci_mode) {
    390   1.1      fvdl 	case 1:
    391   1.1      fvdl 		goto mode1;
    392   1.1      fvdl 	case 2:
    393   1.1      fvdl 		goto mode2;
    394   1.1      fvdl 	default:
    395   1.1      fvdl 		panic("pci_conf_read: mode not configured");
    396   1.1      fvdl 	}
    397   1.1      fvdl #endif
    398   1.1      fvdl 
    399   1.1      fvdl #if !defined(PCI_CONF_MODE) || (PCI_CONF_MODE == 1)
    400   1.1      fvdl #ifndef PCI_CONF_MODE
    401   1.1      fvdl mode1:
    402   1.1      fvdl #endif
    403   1.1      fvdl 	PCI_CONF_LOCK(s);
    404   1.1      fvdl 	outl(PCI_MODE1_ADDRESS_REG, tag.mode1 | reg);
    405   1.1      fvdl 	data = inl(PCI_MODE1_DATA_REG);
    406   1.1      fvdl 	outl(PCI_MODE1_ADDRESS_REG, 0);
    407   1.1      fvdl 	PCI_CONF_UNLOCK(s);
    408   1.1      fvdl 	return data;
    409   1.1      fvdl #endif
    410   1.1      fvdl 
    411   1.1      fvdl #if !defined(PCI_CONF_MODE) || (PCI_CONF_MODE == 2)
    412   1.1      fvdl #ifndef PCI_CONF_MODE
    413   1.1      fvdl mode2:
    414   1.1      fvdl #endif
    415   1.1      fvdl 	PCI_CONF_LOCK(s);
    416   1.1      fvdl 	outb(PCI_MODE2_ENABLE_REG, tag.mode2.enable);
    417   1.1      fvdl 	outb(PCI_MODE2_FORWARD_REG, tag.mode2.forward);
    418   1.1      fvdl 	data = inl(tag.mode2.port | reg);
    419   1.1      fvdl 	outb(PCI_MODE2_ENABLE_REG, 0);
    420   1.1      fvdl 	PCI_CONF_UNLOCK(s);
    421   1.1      fvdl 	return data;
    422   1.1      fvdl #endif
    423   1.1      fvdl }
    424   1.1      fvdl 
    425   1.1      fvdl void
    426  1.18  christos pci_conf_write(pci_chipset_tag_t pc, pcitag_t tag, int reg,
    427  1.17  christos     pcireg_t data)
    428   1.1      fvdl {
    429   1.1      fvdl 	int s;
    430   1.1      fvdl 
    431  1.20  jmcneill #if defined(__i386__) && defined(XBOX)
    432  1.20  jmcneill 	if (arch_i386_is_xbox) {
    433  1.20  jmcneill 		int bus, dev, fn;
    434  1.20  jmcneill 		pci_decompose_tag(pc, tag, &bus, &dev, &fn);
    435  1.20  jmcneill 		if (bus == 0 && dev == 0 && (fn == 1 || fn == 2))
    436  1.20  jmcneill 			return;
    437  1.20  jmcneill 	}
    438  1.20  jmcneill #endif
    439  1.20  jmcneill 
    440   1.1      fvdl #ifndef PCI_CONF_MODE
    441   1.1      fvdl 	switch (pci_mode) {
    442   1.1      fvdl 	case 1:
    443   1.1      fvdl 		goto mode1;
    444   1.1      fvdl 	case 2:
    445   1.1      fvdl 		goto mode2;
    446   1.1      fvdl 	default:
    447   1.1      fvdl 		panic("pci_conf_write: mode not configured");
    448   1.1      fvdl 	}
    449   1.1      fvdl #endif
    450   1.1      fvdl 
    451   1.1      fvdl #if !defined(PCI_CONF_MODE) || (PCI_CONF_MODE == 1)
    452   1.1      fvdl #ifndef PCI_CONF_MODE
    453   1.1      fvdl mode1:
    454   1.1      fvdl #endif
    455   1.1      fvdl 	PCI_CONF_LOCK(s);
    456   1.1      fvdl 	outl(PCI_MODE1_ADDRESS_REG, tag.mode1 | reg);
    457   1.1      fvdl 	outl(PCI_MODE1_DATA_REG, data);
    458   1.1      fvdl 	outl(PCI_MODE1_ADDRESS_REG, 0);
    459   1.1      fvdl 	PCI_CONF_UNLOCK(s);
    460   1.1      fvdl 	return;
    461   1.1      fvdl #endif
    462   1.1      fvdl 
    463   1.1      fvdl #if !defined(PCI_CONF_MODE) || (PCI_CONF_MODE == 2)
    464   1.1      fvdl #ifndef PCI_CONF_MODE
    465   1.1      fvdl mode2:
    466   1.1      fvdl #endif
    467   1.1      fvdl 	PCI_CONF_LOCK(s);
    468   1.1      fvdl 	outb(PCI_MODE2_ENABLE_REG, tag.mode2.enable);
    469   1.1      fvdl 	outb(PCI_MODE2_FORWARD_REG, tag.mode2.forward);
    470   1.1      fvdl 	outl(tag.mode2.port | reg, data);
    471   1.1      fvdl 	outb(PCI_MODE2_ENABLE_REG, 0);
    472   1.1      fvdl 	PCI_CONF_UNLOCK(s);
    473   1.1      fvdl #endif
    474   1.1      fvdl }
    475   1.1      fvdl 
    476   1.1      fvdl int
    477   1.1      fvdl pci_mode_detect()
    478   1.1      fvdl {
    479   1.1      fvdl 
    480   1.1      fvdl #ifdef PCI_CONF_MODE
    481   1.1      fvdl #if (PCI_CONF_MODE == 1) || (PCI_CONF_MODE == 2)
    482   1.1      fvdl 	return (pci_mode = PCI_CONF_MODE);
    483   1.1      fvdl #else
    484   1.1      fvdl #error Invalid PCI configuration mode.
    485   1.1      fvdl #endif
    486   1.1      fvdl #else
    487   1.1      fvdl 	u_int32_t sav, val;
    488   1.1      fvdl 	int i;
    489   1.1      fvdl 	pcireg_t idreg;
    490   1.1      fvdl 
    491   1.1      fvdl 	if (pci_mode != -1)
    492   1.1      fvdl 		return pci_mode;
    493   1.1      fvdl 
    494   1.1      fvdl 	/*
    495   1.1      fvdl 	 * We try to divine which configuration mode the host bridge wants.
    496   1.1      fvdl 	 */
    497   1.1      fvdl 
    498   1.1      fvdl 	sav = inl(PCI_MODE1_ADDRESS_REG);
    499   1.1      fvdl 
    500   1.1      fvdl 	pci_mode = 1; /* assume this for now */
    501   1.1      fvdl 	/*
    502   1.1      fvdl 	 * catch some known buggy implementations of mode 1
    503   1.1      fvdl 	 */
    504   1.1      fvdl 	for (i = 0; i < sizeof(pcim1_quirk_tbl) / sizeof(pcim1_quirk_tbl[0]);
    505   1.1      fvdl 	     i++) {
    506   1.1      fvdl 		pcitag_t t;
    507   1.1      fvdl 
    508   1.1      fvdl 		if (!pcim1_quirk_tbl[i].tag)
    509   1.1      fvdl 			break;
    510   1.1      fvdl 		t.mode1 = pcim1_quirk_tbl[i].tag;
    511   1.1      fvdl 		idreg = pci_conf_read(0, t, PCI_ID_REG); /* needs "pci_mode" */
    512   1.1      fvdl 		if (idreg == pcim1_quirk_tbl[i].id) {
    513   1.1      fvdl #ifdef DEBUG
    514   1.1      fvdl 			printf("known mode 1 PCI chipset (%08x)\n",
    515   1.1      fvdl 			       idreg);
    516   1.1      fvdl #endif
    517   1.1      fvdl 			return (pci_mode);
    518   1.1      fvdl 		}
    519   1.1      fvdl 	}
    520   1.1      fvdl 
    521   1.1      fvdl 	/*
    522   1.1      fvdl 	 * Strong check for standard compliant mode 1:
    523   1.1      fvdl 	 * 1. bit 31 ("enable") can be set
    524   1.1      fvdl 	 * 2. byte/word access does not affect register
    525   1.1      fvdl 	 */
    526   1.1      fvdl 	outl(PCI_MODE1_ADDRESS_REG, PCI_MODE1_ENABLE);
    527   1.1      fvdl 	outb(PCI_MODE1_ADDRESS_REG + 3, 0);
    528   1.1      fvdl 	outw(PCI_MODE1_ADDRESS_REG + 2, 0);
    529   1.1      fvdl 	val = inl(PCI_MODE1_ADDRESS_REG);
    530   1.1      fvdl 	if ((val & 0x80fffffc) != PCI_MODE1_ENABLE) {
    531   1.1      fvdl #ifdef DEBUG
    532   1.1      fvdl 		printf("pci_mode_detect: mode 1 enable failed (%x)\n",
    533   1.1      fvdl 		       val);
    534   1.1      fvdl #endif
    535   1.1      fvdl 		goto not1;
    536   1.1      fvdl 	}
    537   1.1      fvdl 	outl(PCI_MODE1_ADDRESS_REG, 0);
    538   1.1      fvdl 	val = inl(PCI_MODE1_ADDRESS_REG);
    539   1.1      fvdl 	if ((val & 0x80fffffc) != 0)
    540   1.1      fvdl 		goto not1;
    541   1.1      fvdl 	return (pci_mode);
    542   1.1      fvdl not1:
    543   1.1      fvdl 	outl(PCI_MODE1_ADDRESS_REG, sav);
    544   1.1      fvdl 
    545   1.1      fvdl 	/*
    546   1.1      fvdl 	 * This mode 2 check is quite weak (and known to give false
    547   1.1      fvdl 	 * positives on some Compaq machines).
    548   1.1      fvdl 	 * However, this doesn't matter, because this is the
    549   1.1      fvdl 	 * last test, and simply no PCI devices will be found if
    550   1.1      fvdl 	 * this happens.
    551   1.1      fvdl 	 */
    552   1.1      fvdl 	outb(PCI_MODE2_ENABLE_REG, 0);
    553   1.1      fvdl 	outb(PCI_MODE2_FORWARD_REG, 0);
    554   1.1      fvdl 	if (inb(PCI_MODE2_ENABLE_REG) != 0 ||
    555   1.1      fvdl 	    inb(PCI_MODE2_FORWARD_REG) != 0)
    556   1.1      fvdl 		goto not2;
    557   1.1      fvdl 	return (pci_mode = 2);
    558   1.1      fvdl not2:
    559   1.1      fvdl 
    560   1.1      fvdl 	return (pci_mode = 0);
    561   1.1      fvdl #endif
    562   1.1      fvdl }
    563   1.1      fvdl 
    564   1.1      fvdl /*
    565   1.1      fvdl  * Determine which flags should be passed to the primary PCI bus's
    566   1.1      fvdl  * autoconfiguration node.  We use this to detect broken chipsets
    567   1.1      fvdl  * which cannot safely use memory-mapped device access.
    568   1.1      fvdl  */
    569   1.1      fvdl int
    570   1.1      fvdl pci_bus_flags()
    571   1.1      fvdl {
    572   1.1      fvdl 	int rval = PCI_FLAGS_IO_ENABLED | PCI_FLAGS_MEM_ENABLED |
    573   1.1      fvdl 	    PCI_FLAGS_MRL_OKAY | PCI_FLAGS_MRM_OKAY | PCI_FLAGS_MWI_OKAY;
    574   1.1      fvdl 	int device, maxndevs;
    575   1.1      fvdl 	pcitag_t tag;
    576   1.1      fvdl 	pcireg_t id;
    577   1.1      fvdl 
    578   1.1      fvdl 	maxndevs = pci_bus_maxdevs(NULL, 0);
    579   1.1      fvdl 
    580   1.1      fvdl 	for (device = 0; device < maxndevs; device++) {
    581   1.1      fvdl 		tag = pci_make_tag(NULL, 0, device, 0);
    582   1.1      fvdl 		id = pci_conf_read(NULL, tag, PCI_ID_REG);
    583   1.1      fvdl 
    584   1.1      fvdl 		/* Invalid vendor ID value? */
    585   1.1      fvdl 		if (PCI_VENDOR(id) == PCI_VENDOR_INVALID)
    586   1.1      fvdl 			continue;
    587   1.1      fvdl 		/* XXX Not invalid, but we've done this ~forever. */
    588   1.1      fvdl 		if (PCI_VENDOR(id) == 0)
    589   1.1      fvdl 			continue;
    590   1.1      fvdl 
    591   1.1      fvdl 		switch (PCI_VENDOR(id)) {
    592   1.1      fvdl 		case PCI_VENDOR_SIS:
    593   1.1      fvdl 			switch (PCI_PRODUCT(id)) {
    594   1.1      fvdl 			case PCI_PRODUCT_SIS_85C496:
    595   1.1      fvdl 				goto disable_mem;
    596   1.1      fvdl 			}
    597   1.1      fvdl 			break;
    598   1.1      fvdl 		}
    599   1.1      fvdl 	}
    600   1.1      fvdl 
    601   1.1      fvdl 	return (rval);
    602   1.1      fvdl 
    603   1.1      fvdl  disable_mem:
    604   1.1      fvdl 	printf("Warning: broken PCI-Host bridge detected; "
    605   1.1      fvdl 	    "disabling memory-mapped access\n");
    606   1.1      fvdl 	rval &= ~(PCI_FLAGS_MEM_ENABLED|PCI_FLAGS_MRL_OKAY|PCI_FLAGS_MRM_OKAY|
    607   1.1      fvdl 	    PCI_FLAGS_MWI_OKAY);
    608   1.1      fvdl 	return (rval);
    609   1.1      fvdl }
    610  1.11    sekiya 
    611  1.11    sekiya void
    612  1.11    sekiya pci_device_foreach(pci_chipset_tag_t pc, int maxbus,
    613  1.11    sekiya 	void (*func)(pci_chipset_tag_t, pcitag_t, void *), void *context)
    614  1.11    sekiya {
    615  1.11    sekiya 	pci_device_foreach_min(pc, 0, maxbus, func, context);
    616  1.11    sekiya }
    617  1.11    sekiya 
    618  1.11    sekiya void
    619  1.11    sekiya pci_device_foreach_min(pci_chipset_tag_t pc, int minbus, int maxbus,
    620  1.11    sekiya 	void (*func)(pci_chipset_tag_t, pcitag_t, void *), void *context)
    621  1.11    sekiya {
    622  1.11    sekiya 	const struct pci_quirkdata *qd;
    623  1.11    sekiya 	int bus, device, function, maxdevs, nfuncs;
    624  1.11    sekiya 	pcireg_t id, bhlcr;
    625  1.11    sekiya 	pcitag_t tag;
    626  1.11    sekiya 
    627  1.11    sekiya 	for (bus = minbus; bus <= maxbus; bus++) {
    628  1.11    sekiya 		maxdevs = pci_bus_maxdevs(pc, bus);
    629  1.11    sekiya 		for (device = 0; device < maxdevs; device++) {
    630  1.11    sekiya 			tag = pci_make_tag(pc, bus, device, 0);
    631  1.11    sekiya 			id = pci_conf_read(pc, tag, PCI_ID_REG);
    632  1.11    sekiya 
    633  1.11    sekiya 			/* Invalid vendor ID value? */
    634  1.11    sekiya 			if (PCI_VENDOR(id) == PCI_VENDOR_INVALID)
    635  1.11    sekiya 				continue;
    636  1.11    sekiya 			/* XXX Not invalid, but we've done this ~forever. */
    637  1.11    sekiya 			if (PCI_VENDOR(id) == 0)
    638  1.11    sekiya 				continue;
    639  1.11    sekiya 
    640  1.11    sekiya 			qd = pci_lookup_quirkdata(PCI_VENDOR(id),
    641  1.11    sekiya 				PCI_PRODUCT(id));
    642  1.11    sekiya 
    643  1.11    sekiya 			bhlcr = pci_conf_read(pc, tag, PCI_BHLC_REG);
    644  1.11    sekiya 			if (PCI_HDRTYPE_MULTIFN(bhlcr) ||
    645  1.11    sekiya 			     (qd != NULL &&
    646  1.11    sekiya 		  	     (qd->quirks & PCI_QUIRK_MULTIFUNCTION) != 0))
    647  1.11    sekiya 				nfuncs = 8;
    648  1.11    sekiya 			else
    649  1.11    sekiya 				nfuncs = 1;
    650  1.11    sekiya 
    651  1.11    sekiya 			for (function = 0; function < nfuncs; function++) {
    652  1.11    sekiya 				tag = pci_make_tag(pc, bus, device, function);
    653  1.11    sekiya 				id = pci_conf_read(pc, tag, PCI_ID_REG);
    654  1.11    sekiya 
    655  1.11    sekiya 				/* Invalid vendor ID value? */
    656  1.11    sekiya 				if (PCI_VENDOR(id) == PCI_VENDOR_INVALID)
    657  1.11    sekiya 					continue;
    658  1.11    sekiya 				/*
    659  1.11    sekiya 				 * XXX Not invalid, but we've done this
    660  1.11    sekiya 				 * ~forever.
    661  1.11    sekiya 				 */
    662  1.11    sekiya 				if (PCI_VENDOR(id) == 0)
    663  1.11    sekiya 					continue;
    664  1.11    sekiya 				(*func)(pc, tag, context);
    665  1.11    sekiya 			}
    666  1.11    sekiya 		}
    667  1.11    sekiya 	}
    668  1.11    sekiya }
    669  1.11    sekiya 
    670  1.11    sekiya void
    671  1.11    sekiya pci_bridge_foreach(pci_chipset_tag_t pc, int minbus, int maxbus,
    672  1.11    sekiya 	void (*func)(pci_chipset_tag_t, pcitag_t, void *), void *ctx)
    673  1.11    sekiya {
    674  1.11    sekiya 	struct pci_bridge_hook_arg bridge_hook;
    675  1.11    sekiya 
    676  1.11    sekiya 	bridge_hook.func = func;
    677  1.11    sekiya 	bridge_hook.arg = ctx;
    678  1.11    sekiya 
    679  1.11    sekiya 	pci_device_foreach_min(pc, minbus, maxbus, pci_bridge_hook,
    680  1.11    sekiya 		&bridge_hook);
    681  1.11    sekiya }
    682  1.11    sekiya 
    683  1.11    sekiya static void
    684  1.11    sekiya pci_bridge_hook(pci_chipset_tag_t pc, pcitag_t tag, void *ctx)
    685  1.11    sekiya {
    686  1.11    sekiya 	struct pci_bridge_hook_arg *bridge_hook = (void *)ctx;
    687  1.11    sekiya 	pcireg_t reg;
    688  1.11    sekiya 
    689  1.11    sekiya 	reg = pci_conf_read(pc, tag, PCI_CLASS_REG);
    690  1.11    sekiya 	if (PCI_CLASS(reg) == PCI_CLASS_BRIDGE &&
    691  1.11    sekiya  	     (PCI_SUBCLASS(reg) == PCI_SUBCLASS_BRIDGE_PCI ||
    692  1.11    sekiya 		PCI_SUBCLASS(reg) == PCI_SUBCLASS_BRIDGE_CARDBUS)) {
    693  1.11    sekiya 		(*bridge_hook->func)(pc, tag, bridge_hook->arg);
    694  1.11    sekiya 	}
    695  1.11    sekiya }
    696