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 #include <sys/rman.h>
  52 #include <sys/sysctl.h>
  53
  54 #include <dev/ofw/ofw_bus.h>
  55 #include <dev/ofw/openfirm.h>
  56
  57 #include <machine/bus.h>
  58 #include <machine/resource.h>
  59
  60 #include <dev/pci/pcireg.h>
  61 #include <dev/pci/pcivar.h>
  62 #include <dev/pci/pcib_private.h>
  63
  64 #include "pcib_if.h"
  65
  66 #include <sparc64/pci/ofw_pci.h>
  67 #include <sparc64/pci/ofw_pcib_subr.h>
  68
  69 /*
  70  * Bridge-specific data.
  71  */
  72 struct apb_softc {
  73         struct ofw_pcib_gen_softc       sc_bsc;
  74         uint8_t         sc_iomap;
  75         uint8_t         sc_memmap;
  76 };
  77
  78 static device_probe_t apb_probe;
  79 static device_attach_t apb_attach;
  80 static bus_alloc_resource_t apb_alloc_resource;
  81 static bus_adjust_resource_t apb_adjust_resource;
  82
  83 static device_method_t apb_methods[] = {
  84         /* Device interface */
  85         DEVMETHOD(device_probe,         apb_probe),
  86         DEVMETHOD(device_attach,        apb_attach),
  87
  88         /* Bus interface */
  89         DEVMETHOD(bus_alloc_resource,   apb_alloc_resource),
  90         DEVMETHOD(bus_adjust_resource,  apb_adjust_resource),
  91         DEVMETHOD(bus_release_resource, bus_generic_release_resource),
  92
  93         /* pcib interface */
  94         DEVMETHOD(pcib_route_interrupt, ofw_pcib_gen_route_interrupt),
  95
  96         /* ofw_bus interface */
  97         DEVMETHOD(ofw_bus_get_node,     ofw_pcib_gen_get_node),
  98
  99         DEVMETHOD_END
 100 };
 101
 102 static devclass_t pcib_devclass;
 103
 104 DEFINE_CLASS_1(pcib, apb_driver, apb_methods, sizeof(struct apb_softc),
 105     pcib_driver);
 106 EARLY_DRIVER_MODULE(apb, pci, apb_driver, pcib_devclass, 0, 0, BUS_PASS_BUS);
 107 MODULE_DEPEND(apb, pci, 1, 1, 1);
 108
 109 /* APB specific registers */
 110 #define APBR_IOMAP      0xde
 111 #define APBR_MEMMAP     0xdf
 112
 113 /* Definitions for the mapping registers */
 114 #define APB_IO_SCALE    0x200000
 115 #define APB_MEM_SCALE   0x20000000
 116
 117 /*
 118  * Generic device interface
 119  */
 120 static int
 121 apb_probe(device_t dev)
 122 {
 123
 124         if (pci_get_vendor(dev) == 0x108e &&    /* Sun */
 125             pci_get_device(dev) == 0x5000)  {   /* APB */
 126                 device_set_desc(dev, "APB PCI-PCI bridge");
 127                 return (0);
 128         }
 129         return (ENXIO);
 130 }
 131
 132 static void
 133 apb_map_print(uint8_t map, u_long scale)
 134 {
 135         int i, first;
 136
 137         for (first = 1, i = 0; i < 8; i++) {
 138                 if ((map & (1 << i)) != 0) {
 139                         printf("%s0x%lx-0x%lx", first ? "" : ", ",
 140                             i * scale, (i + 1) * scale - 1);
 141                         first = 0;
 142                 }
 143         }
 144 }
 145
 146 static int
 147 apb_checkrange(uint8_t map, u_long scale, u_long start, u_long end)
 148 {
 149         int i, ei;
 150
 151         i = start / scale;
 152         ei = end / scale;
 153         if (i > 7 || ei > 7)
 154                 return (0);
 155         for (; i <= ei; i++)
 156                 if ((map & (1 << i)) == 0)
 157                         return (0);
 158         return (1);
 159 }
 160
 161 static int
 162 apb_attach(device_t dev)
 163 {
 164         struct apb_softc *sc;
 165         struct sysctl_ctx_list *sctx;
 166         struct sysctl_oid *soid;
 167
 168         sc = device_get_softc(dev);
 169
 170         /*
 171          * Get current bridge configuration.
 172          */
 173         sc->sc_bsc.ops_pcib_sc.domain = pci_get_domain(dev);
 174         sc->sc_bsc.ops_pcib_sc.pribus = pci_get_bus(dev);
 175         pci_write_config(dev, PCIR_PRIBUS_1, sc->sc_bsc.ops_pcib_sc.pribus, 1);
 176         sc->sc_bsc.ops_pcib_sc.bus.sec =
 177             pci_read_config(dev, PCIR_SECBUS_1, 1);
 178         sc->sc_bsc.ops_pcib_sc.bus.sub =
 179             pci_read_config(dev, PCIR_SUBBUS_1, 1);
 180         sc->sc_bsc.ops_pcib_sc.bridgectl =
 181             pci_read_config(dev, PCIR_BRIDGECTL_1, 2);
 182         sc->sc_iomap = pci_read_config(dev, APBR_IOMAP, 1);
 183         sc->sc_memmap = pci_read_config(dev, APBR_MEMMAP, 1);
 184
 185         /*
 186          * Setup SYSCTL reporting nodes.
 187          */
 188         sctx = device_get_sysctl_ctx(dev);
 189         soid = device_get_sysctl_tree(dev);
 190         SYSCTL_ADD_UINT(sctx, SYSCTL_CHILDREN(soid), OID_AUTO, "domain",
 191             CTLFLAG_RD, &sc->sc_bsc.ops_pcib_sc.domain, 0,
 192             "Domain number");
 193         SYSCTL_ADD_UINT(sctx, SYSCTL_CHILDREN(soid), OID_AUTO, "pribus",
 194             CTLFLAG_RD, &sc->sc_bsc.ops_pcib_sc.pribus, 0,
 195             "Primary bus number");
 196         SYSCTL_ADD_UINT(sctx, SYSCTL_CHILDREN(soid), OID_AUTO, "secbus",
 197             CTLFLAG_RD, &sc->sc_bsc.ops_pcib_sc.bus.sec, 0,
 198             "Secondary bus number");
 199         SYSCTL_ADD_UINT(sctx, SYSCTL_CHILDREN(soid), OID_AUTO, "subbus",
 200             CTLFLAG_RD, &sc->sc_bsc.ops_pcib_sc.bus.sub, 0,
 201             "Subordinate bus number");
 202
 203         ofw_pcib_gen_setup(dev);
 204
 205         if (bootverbose) {
 206                 device_printf(dev, "  domain            %d\n",
 207                     sc->sc_bsc.ops_pcib_sc.domain);
 208                 device_printf(dev, "  secondary bus     %d\n",
 209                     sc->sc_bsc.ops_pcib_sc.bus.sec);
 210                 device_printf(dev, "  subordinate bus   %d\n",
 211                     sc->sc_bsc.ops_pcib_sc.bus.sub);
 212                 device_printf(dev, "  I/O decode        ");
 213                 apb_map_print(sc->sc_iomap, APB_IO_SCALE);
 214                 printf("\n");
 215                 device_printf(dev, "  memory decode     ");
 216                 apb_map_print(sc->sc_memmap, APB_MEM_SCALE);
 217                 printf("\n");
 218         }
 219
 220         device_add_child(dev, "pci", -1);
 221         return (bus_generic_attach(dev));
 222 }
 223
 224 /*
 225  * We have to trap resource allocation requests and ensure that the bridge
 226  * is set up to, or capable of handling them.
 227  */
 228 static struct resource *
 229 apb_alloc_resource(device_t dev, device_t child, int type, int *rid,
 230     u_long start, u_long end, u_long count, u_int flags)
 231 {
 232         struct apb_softc *sc;
 233
 234         sc = device_get_softc(dev);
 235
 236         /*
 237          * If this is a "default" allocation against this rid, we can't work
 238          * out where it's coming from (we should actually never see these) so
 239          * we just have to punt.
 240          */
 241         if (start == 0 && end == ~0) {
 242                 device_printf(dev, "can't decode default resource id %d for "
 243                     "%s, bypassing\n", *rid, device_get_nameunit(child));
 244                 goto passup;
 245         }
 246
 247         /*
 248          * Fail the allocation for this range if it's not supported.
 249          * XXX we should probably just fix up the bridge decode and
 250          * soldier on.
 251          */
 252         switch (type) {
 253         case SYS_RES_IOPORT:
 254                 if (!apb_checkrange(sc->sc_iomap, APB_IO_SCALE, start, end)) {
 255                         device_printf(dev, "device %s requested unsupported "
 256                             "I/O range 0x%lx-0x%lx\n",
 257                             device_get_nameunit(child), start, end);
 258                         return (NULL);
 259                 }
 260                 if (bootverbose)
 261                         device_printf(sc->sc_bsc.ops_pcib_sc.dev, "device "
 262                             "%s requested decoded I/O range 0x%lx-0x%lx\n",
 263                             device_get_nameunit(child), start, end);
 264                 break;
 265         case SYS_RES_MEMORY:
 266                 if (!apb_checkrange(sc->sc_memmap, APB_MEM_SCALE, start,
 267                     end)) {
 268                         device_printf(dev, "device %s requested unsupported "
 269                             "memory range 0x%lx-0x%lx\n",
 270                             device_get_nameunit(child), start, end);
 271                         return (NULL);
 272                 }
 273                 if (bootverbose)
 274                         device_printf(sc->sc_bsc.ops_pcib_sc.dev, "device "
 275                             "%s requested decoded memory range 0x%lx-0x%lx\n",
 276                             device_get_nameunit(child), start, end);
 277                 break;
 278         }
 279
 280  passup:
 281         /*
 282          * Bridge is OK decoding this resource, so pass it up.
 283          */
 284         return (bus_generic_alloc_resource(dev, child, type, rid, start, end,
 285             count, flags));
 286 }
 287
 288 static int
 289 apb_adjust_resource(device_t dev, device_t child, int type,
 290     struct resource *r, u_long start, u_long end)
 291 {
 292         struct apb_softc *sc;
 293
 294         sc = device_get_softc(dev);
 295         switch (type) {
 296         case SYS_RES_IOPORT:
 297                 if (!apb_checkrange(sc->sc_iomap, APB_IO_SCALE, start, end))
 298                         return (ENXIO);
 299                 break;
 300         case SYS_RES_MEMORY:
 301                 if (!apb_checkrange(sc->sc_memmap, APB_MEM_SCALE, start, end))
 302                         return (ENXIO);
 303                 break;
 304         }
 305         return (bus_generic_adjust_resource(dev, child, type, r, start, end));
 306 }