sys/sparc64/pci/apb.c

   1 /*-
   2  * Copyright (c) 1994,1995 Stefan Esser, Wolfgang StanglMeier
   3  * Copyright (c) 2000 Michael Smith <msmith@freebsd.org>
   4  * Copyright (c) 2000 BSDi
   5  * Copyright (c) 2001, 2003 Thomas Moestl <tmm@FreeBSD.org>
   6  * All rights reserved.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted provided that the following conditions
  10  * are met:
  11  * 1. Redistributions of source code must retain the above copyright
  12  *    notice, this list of conditions and the following disclaimer.
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *    notice, this list of conditions and the following disclaimer in the
  15  *    documentation and/or other materials provided with the distribution.
  16  * 3. The name of the author may not be used to endorse or promote products
  17  *    derived from this software without specific prior written permission.
  18  *
  19  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  29  * SUCH DAMAGE.
  30  *
  31  *      from: FreeBSD: src/sys/dev/pci/pci_pci.c,v 1.3 2000/12/13
  32  */
  33
  34 #include <sys/cdefs.h>
  35 __FBSDID("$FreeBSD$");
  36
  37 /*
  38  * Support for the Sun APB (Advanced PCI Bridge) PCI-PCI bridge.
  39  * This bridge does not fully comply to the PCI bridge specification, and is
  40  * therefore not supported by the generic driver.
  41  * We can use some of the pcib methods anyway.
  42  */
  43
  44 #include "opt_ofw_pci.h"
  45
  46 #include <sys/param.h>
  47 #include <sys/systm.h>
  48 #include <sys/kernel.h>
  49 #include <sys/module.h>
  50 #include <sys/bus.h>
  51
  52 #include <dev/ofw/ofw_bus.h>
  53 #include <dev/ofw/openfirm.h>
  54
  55 #include <machine/bus.h>
  56 #include <machine/resource.h>
  57
  58 #include <dev/pci/pcireg.h>
  59 #include <dev/pci/pcivar.h>
  60 #include <dev/pci/pcib_private.h>
  61
  62 #include "pcib_if.h"
  63
  64 #include <sparc64/pci/ofw_pci.h>
  65 #include <sparc64/pci/ofw_pcib_subr.h>
  66
  67 /*
  68  * Bridge-specific data.
  69  */
  70 struct apb_softc {
  71         struct ofw_pcib_gen_softc       sc_bsc;
  72         uint8_t         sc_iomap;
  73         uint8_t         sc_memmap;
  74 };
  75
  76 static device_probe_t apb_probe;
  77 static device_attach_t apb_attach;
  78 static bus_alloc_resource_t apb_alloc_resource;
  79
  80 static device_method_t apb_methods[] = {
  81         /* Device interface */
  82         DEVMETHOD(device_probe,         apb_probe),
  83         DEVMETHOD(device_attach,        apb_attach),
  84         DEVMETHOD(device_shutdown,      bus_generic_shutdown),
  85         DEVMETHOD(device_suspend,       bus_generic_suspend),
  86         DEVMETHOD(device_resume,        bus_generic_resume),
  87
  88         /* Bus interface */
  89         DEVMETHOD(bus_print_child,      bus_generic_print_child),
  90         DEVMETHOD(bus_read_ivar,        pcib_read_ivar),
  91         DEVMETHOD(bus_write_ivar,       pcib_write_ivar),
  92         DEVMETHOD(bus_alloc_resource,   apb_alloc_resource),
  93         DEVMETHOD(bus_activate_resource, bus_generic_activate_resource),
  94         DEVMETHOD(bus_deactivate_resource, bus_generic_deactivate_resource),
  95         DEVMETHOD(bus_release_resource, bus_generic_release_resource),
  96         DEVMETHOD(bus_setup_intr,       bus_generic_setup_intr),
  97         DEVMETHOD(bus_teardown_intr,    bus_generic_teardown_intr),
  98
  99         /* pcib interface */
 100         DEVMETHOD(pcib_maxslots,        pcib_maxslots),
 101         DEVMETHOD(pcib_read_config,     pcib_read_config),
 102         DEVMETHOD(pcib_write_config,    pcib_write_config),
 103         DEVMETHOD(pcib_route_interrupt, ofw_pcib_gen_route_interrupt),
 104
 105         /* ofw_bus interface */
 106         DEVMETHOD(ofw_bus_get_node,     ofw_pcib_gen_get_node),
 107
 108         KOBJMETHOD_END
 109 };
 110
 111 static devclass_t pcib_devclass;
 112
 113 DEFINE_CLASS_0(pcib, apb_driver, apb_methods, sizeof(struct apb_softc));
 114 EARLY_DRIVER_MODULE(apb, pci, apb_driver, pcib_devclass, 0, 0, BUS_PASS_BUS);
 115 MODULE_DEPEND(apb, pci, 1, 1, 1);
 116
 117 /* APB specific registers */
 118 #define APBR_IOMAP      0xde
 119 #define APBR_MEMMAP     0xdf
 120
 121 /* Definitions for the mapping registers */
 122 #define APB_IO_SCALE    0x200000
 123 #define APB_MEM_SCALE   0x20000000
 124
 125 /*
 126  * Generic device interface
 127  */
 128 static int
 129 apb_probe(device_t dev)
 130 {
 131
 132         if (pci_get_vendor(dev) == 0x108e &&    /* Sun */
 133             pci_get_device(dev) == 0x5000)  {   /* APB */
 134                 device_set_desc(dev, "APB PCI-PCI bridge");
 135                 return (0);
 136         }
 137         return (ENXIO);
 138 }
 139
 140 static void
 141 apb_map_print(uint8_t map, u_long scale)
 142 {
 143         int i, first;
 144
 145         for (first = 1, i = 0; i < 8; i++) {
 146                 if ((map & (1 << i)) != 0) {
 147                         printf("%s0x%lx-0x%lx", first ? "" : ", ",
 148                             i * scale, (i + 1) * scale - 1);
 149                         first = 0;
 150                 }
 151         }
 152 }
 153
 154 static int
 155 apb_checkrange(uint8_t map, u_long scale, u_long start, u_long end)
 156 {
 157         int i, ei;
 158
 159         i = start / scale;
 160         ei = end / scale;
 161         if (i > 7 || ei > 7)
 162                 return (0);
 163         for (; i <= ei; i++)
 164                 if ((map & (1 << i)) == 0)
 165                         return (0);
 166         return (1);
 167 }
 168
 169 static int
 170 apb_attach(device_t dev)
 171 {
 172         struct apb_softc *sc;
 173
 174         sc = device_get_softc(dev);
 175
 176         /*
 177          * Get current bridge configuration.
 178          */
 179         sc->sc_bsc.ops_pcib_sc.domain = pci_get_domain(dev);
 180         sc->sc_bsc.ops_pcib_sc.secbus =
 181             pci_read_config(dev, PCIR_SECBUS_1, 1);
 182         sc->sc_bsc.ops_pcib_sc.subbus =
 183             pci_read_config(dev, PCIR_SUBBUS_1, 1);
 184         sc->sc_iomap = pci_read_config(dev, APBR_IOMAP, 1);
 185         sc->sc_memmap = pci_read_config(dev, APBR_MEMMAP, 1);
 186         ofw_pcib_gen_setup(dev);
 187
 188         if (bootverbose) {
 189                 device_printf(dev, "  domain            %d\n",
 190                     sc->sc_bsc.ops_pcib_sc.domain);
 191                 device_printf(dev, "  secondary bus     %d\n",
 192                     sc->sc_bsc.ops_pcib_sc.secbus);
 193                 device_printf(dev, "  subordinate bus   %d\n",
 194                     sc->sc_bsc.ops_pcib_sc.subbus);
 195                 device_printf(dev, "  I/O decode        ");
 196                 apb_map_print(sc->sc_iomap, APB_IO_SCALE);
 197                 printf("\n");
 198                 device_printf(dev, "  memory decode     ");
 199                 apb_map_print(sc->sc_memmap, APB_MEM_SCALE);
 200                 printf("\n");
 201         }
 202
 203         device_add_child(dev, "pci", -1);
 204         return (bus_generic_attach(dev));
 205 }
 206
 207 /*
 208  * We have to trap resource allocation requests and ensure that the bridge
 209  * is set up to, or capable of handling them.
 210  */
 211 static struct resource *
 212 apb_alloc_resource(device_t dev, device_t child, int type, int *rid,
 213     u_long start, u_long end, u_long count, u_int flags)
 214 {
 215         struct apb_softc *sc;
 216
 217         sc = device_get_softc(dev);
 218
 219         /*
 220          * If this is a "default" allocation against this rid, we can't work
 221          * out where it's coming from (we should actually never see these) so
 222          * we just have to punt.
 223          */
 224         if (start == 0 && end == ~0) {
 225                 device_printf(dev, "can't decode default resource id %d for "
 226                     "%s, bypassing\n", *rid, device_get_nameunit(child));
 227                 goto passup;
 228         }
 229
 230         /*
 231          * Fail the allocation for this range if it's not supported.
 232          * XXX we should probably just fix up the bridge decode and
 233          * soldier on.
 234          */
 235         switch (type) {
 236         case SYS_RES_IOPORT:
 237                 if (!apb_checkrange(sc->sc_iomap, APB_IO_SCALE, start, end)) {
 238                         device_printf(dev, "device %s requested unsupported "
 239                             "I/O range 0x%lx-0x%lx\n",
 240                             device_get_nameunit(child), start, end);
 241                         return (NULL);
 242                 }
 243                 if (bootverbose)
 244                         device_printf(sc->sc_bsc.ops_pcib_sc.dev, "device "
 245                             "%s requested decoded I/O range 0x%lx-0x%lx\n",
 246                             device_get_nameunit(child), start, end);
 247                 break;
 248
 249         case SYS_RES_MEMORY:
 250                 if (!apb_checkrange(sc->sc_memmap, APB_MEM_SCALE, start, end)) {
 251                         device_printf(dev, "device %s requested unsupported "
 252                             "memory range 0x%lx-0x%lx\n",
 253                             device_get_nameunit(child), start, end);
 254                         return (NULL);
 255                 }
 256                 if (bootverbose)
 257                         device_printf(sc->sc_bsc.ops_pcib_sc.dev, "device "
 258                             "%s requested decoded memory range 0x%lx-0x%lx\n",
 259                             device_get_nameunit(child), start, end);
 260                 break;
 261
 262         default:
 263                 break;
 264         }
 265
 266  passup:
 267         /*
 268          * Bridge is OK decoding this resource, so pass it up.
 269          */
 270         return (bus_generic_alloc_resource(dev, child, type, rid, start, end,
 271             count, flags));
 272 }