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