The Design and Implementation of the FreeBSD Operating System, Second Edition
Now available: The Design and Implementation of the FreeBSD Operating System (Second Edition)


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]

FreeBSD/Linux Kernel Cross Reference
sys/sparc64/pci/schizo.c

Version: -  FREEBSD  -  FREEBSD-13-STABLE  -  FREEBSD-13-0  -  FREEBSD-12-STABLE  -  FREEBSD-12-0  -  FREEBSD-11-STABLE  -  FREEBSD-11-0  -  FREEBSD-10-STABLE  -  FREEBSD-10-0  -  FREEBSD-9-STABLE  -  FREEBSD-9-0  -  FREEBSD-8-STABLE  -  FREEBSD-8-0  -  FREEBSD-7-STABLE  -  FREEBSD-7-0  -  FREEBSD-6-STABLE  -  FREEBSD-6-0  -  FREEBSD-5-STABLE  -  FREEBSD-5-0  -  FREEBSD-4-STABLE  -  FREEBSD-3-STABLE  -  FREEBSD22  -  l41  -  OPENBSD  -  linux-2.6  -  MK84  -  PLAN9  -  xnu-8792 
SearchContext: -  none  -  3  -  10 

    1 /*-
    2  * Copyright (c) 1999, 2000 Matthew R. Green
    3  * Copyright (c) 2001 - 2003 by Thomas Moestl <tmm@FreeBSD.org>
    4  * Copyright (c) 2005, 2007, 2008 by Marius Strobl <marius@FreeBSD.org>
    5  * All rights reserved.
    6  *
    7  * Redistribution and use in source and binary forms, with or without
    8  * modification, are permitted provided that the following conditions
    9  * are met:
   10  * 1. Redistributions of source code must retain the above copyright
   11  *    notice, this list of conditions and the following disclaimer.
   12  * 2. Redistributions in binary form must reproduce the above copyright
   13  *    notice, this list of conditions and the following disclaimer in the
   14  *    documentation and/or other materials provided with the distribution.
   15  * 3. The name of the author may not be used to endorse or promote products
   16  *    derived from this software without specific prior written permission.
   17  *
   18  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
   19  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
   20  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
   21  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
   22  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
   23  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
   24  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
   25  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
   26  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
   27  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
   28  * SUCH DAMAGE.
   29  *
   30  *      from: NetBSD: psycho.c,v 1.39 2001/10/07 20:30:41 eeh Exp
   31  *      from: FreeBSD: psycho.c 183152 2008-09-18 19:45:22Z marius
   32  */
   33 
   34 #include <sys/cdefs.h>
   35 __FBSDID("$FreeBSD: releng/8.0/sys/sparc64/pci/schizo.c 190108 2009-03-19 20:48:47Z marius $");
   36 
   37 /*
   38  * Driver for `Schizo' Fireplane/Safari to PCI 2.1 and `Tomatillo' JBus to
   39  * PCI 2.2 bridges
   40  */
   41 
   42 #include "opt_ofw_pci.h"
   43 #include "opt_schizo.h"
   44 
   45 #include <sys/param.h>
   46 #include <sys/systm.h>
   47 #include <sys/bus.h>
   48 #include <sys/kernel.h>
   49 #include <sys/lock.h>
   50 #include <sys/malloc.h>
   51 #include <sys/module.h>
   52 #include <sys/mutex.h>
   53 #include <sys/pcpu.h>
   54 #include <sys/rman.h>
   55 #include <sys/time.h>
   56 #include <sys/timetc.h>
   57 
   58 #include <dev/ofw/ofw_bus.h>
   59 #include <dev/ofw/ofw_pci.h>
   60 #include <dev/ofw/openfirm.h>
   61 
   62 #include <machine/bus.h>
   63 #include <machine/bus_common.h>
   64 #include <machine/bus_private.h>
   65 #include <machine/fsr.h>
   66 #include <machine/iommureg.h>
   67 #include <machine/iommuvar.h>
   68 #include <machine/resource.h>
   69 
   70 #include <dev/pci/pcireg.h>
   71 #include <dev/pci/pcivar.h>
   72 
   73 #include <sparc64/pci/ofw_pci.h>
   74 #include <sparc64/pci/schizoreg.h>
   75 #include <sparc64/pci/schizovar.h>
   76 
   77 #include "pcib_if.h"
   78 
   79 static const struct schizo_desc *schizo_get_desc(device_t);
   80 static void schizo_set_intr(struct schizo_softc *, u_int, u_int,
   81     driver_filter_t);
   82 static driver_filter_t schizo_dma_sync_stub;
   83 static driver_filter_t ichip_dma_sync_stub;
   84 static void schizo_intr_enable(void *);
   85 static void schizo_intr_disable(void *);
   86 static void schizo_intr_assign(void *);
   87 static void schizo_intr_clear(void *);
   88 static int schizo_intr_register(struct schizo_softc *sc, u_int ino);
   89 static int schizo_get_intrmap(struct schizo_softc *, u_int,
   90     bus_addr_t *, bus_addr_t *);
   91 static bus_space_tag_t schizo_alloc_bus_tag(struct schizo_softc *, int);
   92 static timecounter_get_t schizo_get_timecount;
   93 
   94 /* Interrupt handlers */
   95 static driver_filter_t schizo_pci_bus;
   96 static driver_filter_t schizo_ue;
   97 static driver_filter_t schizo_ce;
   98 static driver_filter_t schizo_host_bus;
   99 static driver_filter_t schizo_cdma;
  100 
  101 /* IOMMU support */
  102 static void schizo_iommu_init(struct schizo_softc *, int, uint32_t);
  103 
  104 /*
  105  * Methods
  106  */
  107 static device_probe_t schizo_probe;
  108 static device_attach_t schizo_attach;
  109 static bus_read_ivar_t schizo_read_ivar;
  110 static bus_setup_intr_t schizo_setup_intr;
  111 static bus_teardown_intr_t schizo_teardown_intr;
  112 static bus_alloc_resource_t schizo_alloc_resource;
  113 static bus_activate_resource_t schizo_activate_resource;
  114 static bus_deactivate_resource_t schizo_deactivate_resource;
  115 static bus_release_resource_t schizo_release_resource;
  116 static bus_get_dma_tag_t schizo_get_dma_tag;
  117 static pcib_maxslots_t schizo_maxslots;
  118 static pcib_read_config_t schizo_read_config;
  119 static pcib_write_config_t schizo_write_config;
  120 static pcib_route_interrupt_t schizo_route_interrupt;
  121 static ofw_bus_get_node_t schizo_get_node;
  122 
  123 static device_method_t schizo_methods[] = {
  124         /* Device interface */
  125         DEVMETHOD(device_probe,         schizo_probe),
  126         DEVMETHOD(device_attach,        schizo_attach),
  127         DEVMETHOD(device_shutdown,      bus_generic_shutdown),
  128         DEVMETHOD(device_suspend,       bus_generic_suspend),
  129         DEVMETHOD(device_resume,        bus_generic_resume),
  130 
  131         /* Bus interface */
  132         DEVMETHOD(bus_print_child,      bus_generic_print_child),
  133         DEVMETHOD(bus_read_ivar,        schizo_read_ivar),
  134         DEVMETHOD(bus_setup_intr,       schizo_setup_intr),
  135         DEVMETHOD(bus_teardown_intr,    schizo_teardown_intr),
  136         DEVMETHOD(bus_alloc_resource,   schizo_alloc_resource),
  137         DEVMETHOD(bus_activate_resource,        schizo_activate_resource),
  138         DEVMETHOD(bus_deactivate_resource,      schizo_deactivate_resource),
  139         DEVMETHOD(bus_release_resource, schizo_release_resource),
  140         DEVMETHOD(bus_get_dma_tag,      schizo_get_dma_tag),
  141 
  142         /* pcib interface */
  143         DEVMETHOD(pcib_maxslots,        schizo_maxslots),
  144         DEVMETHOD(pcib_read_config,     schizo_read_config),
  145         DEVMETHOD(pcib_write_config,    schizo_write_config),
  146         DEVMETHOD(pcib_route_interrupt, schizo_route_interrupt),
  147 
  148         /* ofw_bus interface */
  149         DEVMETHOD(ofw_bus_get_node,     schizo_get_node),
  150 
  151         KOBJMETHOD_END
  152 };
  153 
  154 static devclass_t schizo_devclass;
  155 
  156 DEFINE_CLASS_0(pcib, schizo_driver, schizo_methods,
  157     sizeof(struct schizo_softc));
  158 DRIVER_MODULE(schizo, nexus, schizo_driver, schizo_devclass, 0, 0);
  159 
  160 static SLIST_HEAD(, schizo_softc) schizo_softcs =
  161     SLIST_HEAD_INITIALIZER(schizo_softcs);
  162 
  163 static const struct intr_controller schizo_ic = {
  164         schizo_intr_enable,
  165         schizo_intr_disable,
  166         schizo_intr_assign,
  167         schizo_intr_clear
  168 };
  169 
  170 struct schizo_icarg {
  171         struct schizo_softc     *sica_sc;
  172         bus_addr_t              sica_map;
  173         bus_addr_t              sica_clr;
  174 };
  175 
  176 struct schizo_dma_sync {
  177         struct schizo_softc     *sds_sc;
  178         driver_filter_t         *sds_handler;
  179         void                    *sds_arg;
  180         void                    *sds_cookie;
  181         uint64_t                sds_syncval;
  182         device_t                sds_ppb;        /* farest PCI-PCI bridge */
  183         uint8_t                 sds_bus;        /* bus of farest PCI device */
  184         uint8_t                 sds_slot;       /* slot of farest PCI device */
  185         uint8_t                 sds_func;       /* func. of farest PCI device */
  186 };
  187 
  188 #define SCHIZO_PERF_CNT_QLTY    100
  189 
  190 #define SCHIZO_SPC_READ_8(spc, sc, offs) \
  191         bus_read_8((sc)->sc_mem_res[(spc)], (offs))
  192 #define SCHIZO_SPC_WRITE_8(spc, sc, offs, v) \
  193         bus_write_8((sc)->sc_mem_res[(spc)], (offs), (v))
  194 
  195 #define SCHIZO_PCI_READ_8(sc, offs) \
  196         SCHIZO_SPC_READ_8(STX_PCI, (sc), (offs))
  197 #define SCHIZO_PCI_WRITE_8(sc, offs, v) \
  198         SCHIZO_SPC_WRITE_8(STX_PCI, (sc), (offs), (v))
  199 #define SCHIZO_CTRL_READ_8(sc, offs) \
  200         SCHIZO_SPC_READ_8(STX_CTRL, (sc), (offs))
  201 #define SCHIZO_CTRL_WRITE_8(sc, offs, v) \
  202         SCHIZO_SPC_WRITE_8(STX_CTRL, (sc), (offs), (v))
  203 #define SCHIZO_PCICFG_READ_8(sc, offs) \
  204         SCHIZO_SPC_READ_8(STX_PCICFG, (sc), (offs))
  205 #define SCHIZO_PCICFG_WRITE_8(sc, offs, v) \
  206         SCHIZO_SPC_WRITE_8(STX_PCICFG, (sc), (offs), (v))
  207 #define SCHIZO_ICON_READ_8(sc, offs) \
  208         SCHIZO_SPC_READ_8(STX_ICON, (sc), (offs))
  209 #define SCHIZO_ICON_WRITE_8(sc, offs, v) \
  210         SCHIZO_SPC_WRITE_8(STX_ICON, (sc), (offs), (v))
  211 
  212 #define OFW_PCI_TYPE            "pci"
  213 
  214 struct schizo_desc {
  215         const char      *sd_string;
  216         int             sd_mode;
  217         const char      *sd_name;
  218 };
  219 
  220 static const struct schizo_desc const schizo_compats[] = {
  221         { "pci108e,8001",       SCHIZO_MODE_SCZ,        "Schizo" },
  222         { "pci108e,a801",       SCHIZO_MODE_TOM,        "Tomatillo" },
  223         { NULL,                 0,                      NULL }
  224 };
  225 
  226 static const struct schizo_desc *
  227 schizo_get_desc(device_t dev)
  228 {
  229         const struct schizo_desc *desc;
  230         const char *compat;
  231 
  232         compat = ofw_bus_get_compat(dev);
  233         if (compat == NULL)
  234                 return (NULL);
  235         for (desc = schizo_compats; desc->sd_string != NULL; desc++)
  236                 if (strcmp(desc->sd_string, compat) == 0)
  237                         return (desc);
  238         return (NULL);
  239 }
  240 
  241 static int
  242 schizo_probe(device_t dev)
  243 {
  244         const char *dtype;
  245 
  246         dtype = ofw_bus_get_type(dev);
  247         if (dtype != NULL && strcmp(dtype, OFW_PCI_TYPE) == 0 &&
  248             schizo_get_desc(dev) != NULL) {
  249                 device_set_desc(dev, "Sun Host-PCI bridge");
  250                 return (0);
  251         }
  252         return (ENXIO);
  253 }
  254 
  255 static int
  256 schizo_attach(device_t dev)
  257 {
  258         struct ofw_pci_ranges *range;
  259         const struct schizo_desc *desc;
  260         struct schizo_softc *asc, *sc, *osc;
  261         struct timecounter *tc;
  262         uint64_t ino_bitmap, reg;
  263         phandle_t node;
  264         uint32_t prop, prop_array[2];
  265         int i, mode, n, nrange, rid, tsbsize;
  266 
  267         sc = device_get_softc(dev);
  268         node = ofw_bus_get_node(dev);
  269         desc = schizo_get_desc(dev);
  270         mode = desc->sd_mode;
  271 
  272         sc->sc_dev = dev;
  273         sc->sc_node = node;
  274         sc->sc_mode = mode;
  275         sc->sc_flags = 0;
  276 
  277         /*
  278          * The Schizo has three register banks:
  279          * (0) per-PBM PCI configuration and status registers, but for bus B
  280          *     shared with the UPA64s interrupt mapping register banks
  281          * (1) shared Schizo controller configuration and status registers
  282          * (2) per-PBM PCI configuration space
  283          *
  284          * The Tomatillo has four register banks:
  285          * (0) per-PBM PCI configuration and status registers
  286          * (1) per-PBM Tomatillo controller configuration registers, but on
  287          *     machines having the `jbusppm' device shared with its Estar
  288          *     register bank for bus A
  289          * (2) per-PBM PCI configuration space
  290          * (3) per-PBM interrupt concentrator registers
  291          */
  292         sc->sc_half = (bus_get_resource_start(dev, SYS_RES_MEMORY, STX_PCI) >>
  293             20) & 1;
  294         for (n = 0; n < (mode == SCHIZO_MODE_SCZ ? SCZ_NREG : TOM_NREG);
  295             n++) {
  296                 rid = n;
  297                 sc->sc_mem_res[n] = bus_alloc_resource_any(dev,
  298                     SYS_RES_MEMORY, &rid,
  299                     (((mode == SCHIZO_MODE_SCZ && ((sc->sc_half == 1 &&
  300                     n == STX_PCI) || n == STX_CTRL)) ||
  301                     (mode == SCHIZO_MODE_TOM && sc->sc_half == 0 &&
  302                     n == STX_CTRL)) ? RF_SHAREABLE : 0) | RF_ACTIVE);
  303                 if (sc->sc_mem_res[n] == NULL)
  304                         panic("%s: could not allocate register bank %d",
  305                             __func__, n);
  306         }
  307 
  308         /*
  309          * Match other Schizos that are already configured against
  310          * the controller base physical address.  This will be the
  311          * same for a pair of devices that share register space.
  312          */
  313         osc = NULL;
  314         SLIST_FOREACH(asc, &schizo_softcs, sc_link) {
  315                 if (rman_get_start(asc->sc_mem_res[STX_CTRL]) ==
  316                     rman_get_start(sc->sc_mem_res[STX_CTRL])) {
  317                         /* Found partner. */
  318                         osc = asc;
  319                         break;
  320                 }
  321         }
  322         if (osc == NULL) {
  323                 sc->sc_mtx = malloc(sizeof(*sc->sc_mtx), M_DEVBUF,
  324                     M_NOWAIT | M_ZERO);
  325                 if (sc->sc_mtx == NULL)
  326                         panic("%s: could not malloc mutex", __func__);
  327                 mtx_init(sc->sc_mtx, "pcib_mtx", NULL, MTX_SPIN);
  328         } else {
  329                 if (sc->sc_mode != SCHIZO_MODE_SCZ)
  330                         panic("%s: no partner expected", __func__);
  331                 if (mtx_initialized(osc->sc_mtx) == 0)
  332                         panic("%s: mutex not initialized", __func__);
  333                 sc->sc_mtx = osc->sc_mtx;
  334         }
  335 
  336         if (OF_getprop(node, "portid", &sc->sc_ign, sizeof(sc->sc_ign)) == -1)
  337                 panic("%s: could not determine IGN", __func__);
  338         if (OF_getprop(node, "version#", &sc->sc_ver, sizeof(sc->sc_ver)) == -1)
  339                 panic("%s: could not determine version", __func__);
  340         if (OF_getprop(node, "clock-frequency", &prop, sizeof(prop)) == -1)
  341                 prop = 33000000;
  342 
  343         device_printf(dev, "%s, version %d, IGN %#x, bus %c, %dMHz\n",
  344             desc->sd_name, sc->sc_ver, sc->sc_ign, 'A' + sc->sc_half,
  345             prop / 1000 / 1000);
  346 
  347         /* Set up the PCI interrupt retry timer. */
  348 #ifdef SCHIZO_DEBUG
  349         device_printf(dev, "PCI IRT 0x%016llx\n", (unsigned long long)
  350             SCHIZO_PCI_READ_8(sc, STX_PCI_INTR_RETRY_TIM));
  351 #endif
  352         SCHIZO_PCI_WRITE_8(sc, STX_PCI_INTR_RETRY_TIM, 5);
  353 
  354         /* Set up the PCI control register. */
  355         reg = SCHIZO_PCI_READ_8(sc, STX_PCI_CTRL);
  356         reg |= STX_PCI_CTRL_MMU_IEN | STX_PCI_CTRL_SBH_IEN |
  357             STX_PCI_CTRL_ERR_IEN | STX_PCI_CTRL_ARB_MASK;
  358         reg &= ~(TOM_PCI_CTRL_DTO_IEN | STX_PCI_CTRL_ARB_PARK);
  359         if (OF_getproplen(node, "no-bus-parking") < 0)
  360                 reg |= STX_PCI_CTRL_ARB_PARK;
  361         if (mode == SCHIZO_MODE_TOM) {
  362                 reg |= TOM_PCI_CTRL_PRM | TOM_PCI_CTRL_PRO | TOM_PCI_CTRL_PRL;
  363                 if (sc->sc_ver <= 1)    /* revision <= 2.0 */
  364                         reg |= TOM_PCI_CTRL_DTO_IEN;
  365                 else
  366                         reg |= STX_PCI_CTRL_PTO;
  367         }
  368 #ifdef SCHIZO_DEBUG
  369         device_printf(dev, "PCI CSR 0x%016llx -> 0x%016llx\n",
  370             (unsigned long long)SCHIZO_PCI_READ_8(sc, STX_PCI_CTRL),
  371             (unsigned long long)reg);
  372 #endif
  373         SCHIZO_PCI_WRITE_8(sc, STX_PCI_CTRL, reg);
  374 
  375         /* Set up the PCI diagnostic register. */
  376         reg = SCHIZO_PCI_READ_8(sc, STX_PCI_DIAG);
  377         reg &= ~(SCZ_PCI_DIAG_RTRYARB_DIS | STX_PCI_DIAG_RETRY_DIS |
  378             STX_PCI_DIAG_INTRSYNC_DIS);
  379 #ifdef SCHIZO_DEBUG
  380         device_printf(dev, "PCI DR 0x%016llx -> 0x%016llx\n",
  381             (unsigned long long)SCHIZO_PCI_READ_8(sc, STX_PCI_DIAG),
  382             (unsigned long long)reg);
  383 #endif
  384         SCHIZO_PCI_WRITE_8(sc, STX_PCI_DIAG, reg);
  385 
  386         /*
  387          * On Tomatillo clear the I/O prefetch lengths (workaround for a
  388          * Jalapeno bug).
  389          */
  390         if (mode == SCHIZO_MODE_TOM)
  391                 SCHIZO_PCI_WRITE_8(sc, TOM_PCI_IOC_CSR, TOM_PCI_IOC_PW |
  392                     (1 << TOM_PCI_IOC_PREF_OFF_SHIFT) | TOM_PCI_IOC_CPRM |
  393                     TOM_PCI_IOC_CPRO | TOM_PCI_IOC_CPRL);
  394 
  395         /*
  396          * Hunt through all the interrupt mapping regs and register
  397          * the interrupt controller for our interrupt vectors.  We do
  398          * this early in order to be able to catch stray interrupts.
  399          * This is complicated by the fact that a pair of Schizo PBMs
  400          * shares one IGN.
  401          */
  402         n = OF_getprop(node, "ino-bitmap", (void *)prop_array,
  403             sizeof(prop_array));
  404         if (n == -1)
  405                 panic("%s: could not get ino-bitmap", __func__);
  406         ino_bitmap = ((uint64_t)prop_array[1] << 32) | prop_array[0];
  407         for (n = 0; n <= STX_MAX_INO; n++) {
  408                 if ((ino_bitmap & (1ULL << n)) == 0)
  409                         continue;
  410                 if (n == STX_FB0_INO || n == STX_FB1_INO)
  411                         /* Leave for upa(4). */
  412                         continue;
  413                 i = schizo_intr_register(sc, n);
  414                 if (i != 0)
  415                         device_printf(dev, "could not register interrupt "
  416                             "controller for INO %d (%d)\n", n, i);
  417         }
  418 
  419         /*
  420          * Setup Safari/JBus performance counter 0 in bus cycle counting
  421          * mode as timecounter.  Unfortunately, this is broken with at
  422          * least the version 4 Tomatillos found in Fire V120 and Blade
  423          * 1500, which apparently actually count some different event at
  424          * ~0.5 and 3MHz respectively instead (also when running in full
  425          * power mode).  Besides, one counter seems to be shared by a
  426          * "pair" of Tomatillos, too.
  427          */
  428         if (sc->sc_half == 0) {
  429                 SCHIZO_CTRL_WRITE_8(sc, STX_CTRL_PERF,
  430                     (STX_CTRL_PERF_DIS << STX_CTRL_PERF_CNT1_SHIFT) |
  431                     (STX_CTRL_PERF_BUSCYC << STX_CTRL_PERF_CNT0_SHIFT));
  432                 tc = malloc(sizeof(*tc), M_DEVBUF, M_NOWAIT | M_ZERO);
  433                 if (tc == NULL)
  434                         panic("%s: could not malloc timecounter", __func__);
  435                 tc->tc_get_timecount = schizo_get_timecount;
  436                 tc->tc_poll_pps = NULL;
  437                 tc->tc_counter_mask = STX_CTRL_PERF_CNT_MASK;
  438                 if (OF_getprop(OF_peer(0), "clock-frequency", &prop,
  439                     sizeof(prop)) == -1)
  440                         panic("%s: could not determine clock frequency",
  441                             __func__);
  442                 tc->tc_frequency = prop;
  443                 tc->tc_name = strdup(device_get_nameunit(dev), M_DEVBUF);
  444                 if (mode == SCHIZO_MODE_SCZ)
  445                         tc->tc_quality = SCHIZO_PERF_CNT_QLTY;
  446                 else
  447                         tc->tc_quality = -SCHIZO_PERF_CNT_QLTY;
  448                 tc->tc_priv = sc;
  449                 tc_init(tc);
  450         }
  451 
  452         /*
  453          * Set up the IOMMU.  Schizo, Tomatillo and XMITS all have
  454          * one per PBM.  Schizo and XMITS additionally have a streaming
  455          * buffer, in Schizo version < 5 (i.e. revision < 2.3) it's
  456          * affected by several errata and basically unusable though.
  457          */
  458         sc->sc_is.is_pmaxaddr = IOMMU_MAXADDR(STX_IOMMU_BITS);
  459         sc->sc_is.is_sb[0] = sc->sc_is.is_sb[1] = 0;
  460         if (OF_getproplen(node, "no-streaming-cache") < 0 &&
  461             !(sc->sc_mode == SCHIZO_MODE_SCZ && sc->sc_ver < 5))
  462                 sc->sc_is.is_sb[0] = STX_PCI_STRBUF;
  463 
  464 #define TSBCASE(x)                                                      \
  465         case (IOTSB_BASESZ << (x)) << (IO_PAGE_SHIFT - IOTTE_SHIFT):    \
  466                 tsbsize = (x);                                          \
  467                 break;                                                  \
  468 
  469         n = OF_getprop(node, "virtual-dma", (void *)prop_array,
  470             sizeof(prop_array));
  471         if (n == -1 || n != sizeof(prop_array))
  472                 schizo_iommu_init(sc, 7, -1);
  473         else {
  474                 switch (prop_array[1]) {
  475                 TSBCASE(1);
  476                 TSBCASE(2);
  477                 TSBCASE(3);
  478                 TSBCASE(4);
  479                 TSBCASE(5);
  480                 TSBCASE(6);
  481                 TSBCASE(7);
  482                 TSBCASE(8);
  483                 default:
  484                         panic("%s: unsupported DVMA size 0x%x",
  485                             __func__, prop_array[1]);
  486                         /* NOTREACHED */
  487                 }
  488                 schizo_iommu_init(sc, tsbsize, prop_array[0]);
  489         }
  490 
  491 #undef TSBCASE
  492 
  493         /* Initialize memory and I/O rmans. */
  494         sc->sc_pci_io_rman.rm_type = RMAN_ARRAY;
  495         sc->sc_pci_io_rman.rm_descr = "Schizo PCI I/O Ports";
  496         if (rman_init(&sc->sc_pci_io_rman) != 0 ||
  497             rman_manage_region(&sc->sc_pci_io_rman, 0, STX_IO_SIZE) != 0)
  498                 panic("%s: failed to set up I/O rman", __func__);
  499         sc->sc_pci_mem_rman.rm_type = RMAN_ARRAY;
  500         sc->sc_pci_mem_rman.rm_descr = "Schizo PCI Memory";
  501         if (rman_init(&sc->sc_pci_mem_rman) != 0 ||
  502             rman_manage_region(&sc->sc_pci_mem_rman, 0, STX_MEM_SIZE) != 0)
  503                 panic("%s: failed to set up memory rman", __func__);
  504 
  505         nrange = OF_getprop_alloc(node, "ranges", sizeof(*range),
  506             (void **)&range);
  507         /*
  508          * Make sure that the expected ranges are present.  The
  509          * OFW_PCI_CS_MEM64 one is not currently used though.
  510          */
  511         if (nrange != STX_NRANGE)
  512                 panic("%s: unsupported number of ranges", __func__);
  513         /*
  514          * Find the addresses of the various bus spaces.
  515          * There should not be multiple ones of one kind.
  516          * The physical start addresses of the ranges are the configuration,
  517          * memory and I/O handles.
  518          */
  519         for (n = 0; n < STX_NRANGE; n++) {
  520                 i = OFW_PCI_RANGE_CS(&range[n]);
  521                 if (sc->sc_pci_bh[i] != 0)
  522                         panic("%s: duplicate range for space %d", __func__, i);
  523                 sc->sc_pci_bh[i] = OFW_PCI_RANGE_PHYS(&range[n]);
  524         }
  525         free(range, M_OFWPROP);
  526 
  527         /* Register the softc, this is needed for paired Schizos. */
  528         SLIST_INSERT_HEAD(&schizo_softcs, sc, sc_link);
  529 
  530         /* Allocate our tags. */
  531         sc->sc_pci_memt = schizo_alloc_bus_tag(sc, PCI_MEMORY_BUS_SPACE);
  532         sc->sc_pci_iot = schizo_alloc_bus_tag(sc, PCI_IO_BUS_SPACE);
  533         sc->sc_pci_cfgt = schizo_alloc_bus_tag(sc, PCI_CONFIG_BUS_SPACE);
  534         if (bus_dma_tag_create(bus_get_dma_tag(dev), 8, 0,
  535             sc->sc_is.is_pmaxaddr, ~0, NULL, NULL, sc->sc_is.is_pmaxaddr,
  536             0xff, 0xffffffff, 0, NULL, NULL, &sc->sc_pci_dmat) != 0)
  537                 panic("%s: bus_dma_tag_create failed", __func__);
  538         /* Customize the tag. */
  539         sc->sc_pci_dmat->dt_cookie = &sc->sc_is;
  540         sc->sc_pci_dmat->dt_mt = &iommu_dma_methods;
  541 
  542         /*
  543          * Get the bus range from the firmware.
  544          * NB: Tomatillos don't support PCI bus reenumeration.
  545          */
  546         n = OF_getprop(node, "bus-range", (void *)prop_array,
  547             sizeof(prop_array));
  548         if (n == -1)
  549                 panic("%s: could not get bus-range", __func__);
  550         if (n != sizeof(prop_array))
  551                 panic("%s: broken bus-range (%d)", __func__, n);
  552         if (bootverbose)
  553                 device_printf(dev, "bus range %u to %u; PCI bus %d\n",
  554                     prop_array[0], prop_array[1], prop_array[0]);
  555         sc->sc_pci_secbus = prop_array[0];
  556 
  557         /* Clear any pending PCI error bits. */
  558         PCIB_WRITE_CONFIG(dev, sc->sc_pci_secbus, STX_CS_DEVICE, STX_CS_FUNC,
  559             PCIR_STATUS, PCIB_READ_CONFIG(dev, sc->sc_pci_secbus,
  560             STX_CS_DEVICE, STX_CS_FUNC, PCIR_STATUS, 2), 2);
  561         SCHIZO_PCI_WRITE_8(sc, STX_PCI_CTRL,
  562             SCHIZO_PCI_READ_8(sc, STX_PCI_CTRL));
  563         SCHIZO_PCI_WRITE_8(sc, STX_PCI_AFSR,
  564             SCHIZO_PCI_READ_8(sc, STX_PCI_AFSR));
  565 
  566         /*
  567          * Establish handlers for interesting interrupts...
  568          * Someone at Sun clearly was smoking crack; with Schizos PCI
  569          * bus error interrupts for one PBM can be routed to the other
  570          * PBM though we obviously need to use the softc of the former
  571          * as the argument for the interrupt handler and the softc of
  572          * the latter as the argument for the interrupt controller.
  573          */
  574         if (sc->sc_half == 0) {
  575                 if ((ino_bitmap & (1ULL << STX_PCIERR_A_INO)) != 0 ||
  576                     (osc != NULL && ((struct schizo_icarg *)intr_vectors[
  577                     INTMAP_VEC(sc->sc_ign, STX_PCIERR_A_INO)].iv_icarg)->
  578                     sica_sc == osc))
  579                         /*
  580                          * We are the driver for PBM A and either also
  581                          * registered the interrupt controller for us or
  582                          * the driver for PBM B has probed first and
  583                          * registered it for us.
  584                          */
  585                         schizo_set_intr(sc, 0, STX_PCIERR_A_INO,
  586                             schizo_pci_bus);
  587                 if ((ino_bitmap & (1ULL << STX_PCIERR_B_INO)) != 0 &&
  588                     osc != NULL)
  589                         /*
  590                          * We are the driver for PBM A but registered
  591                          * the interrupt controller for PBM B, i.e. the
  592                          * driver for PBM B attached first but couldn't
  593                          * set up a handler for PBM B.
  594                          */
  595                         schizo_set_intr(osc, 0, STX_PCIERR_B_INO,
  596                             schizo_pci_bus);
  597         } else {
  598                 if ((ino_bitmap & (1ULL << STX_PCIERR_B_INO)) != 0 ||
  599                     (osc != NULL && ((struct schizo_icarg *)intr_vectors[
  600                     INTMAP_VEC(sc->sc_ign, STX_PCIERR_B_INO)].iv_icarg)->
  601                     sica_sc == osc))
  602                         /*
  603                          * We are the driver for PBM B and either also
  604                          * registered the interrupt controller for us or
  605                          * the driver for PBM A has probed first and
  606                          * registered it for us.
  607                          */
  608                         schizo_set_intr(sc, 0, STX_PCIERR_B_INO,
  609                             schizo_pci_bus);
  610                 if ((ino_bitmap & (1ULL << STX_PCIERR_A_INO)) != 0 &&
  611                     osc != NULL)
  612                         /*
  613                          * We are the driver for PBM B but registered
  614                          * the interrupt controller for PBM A, i.e. the
  615                          * driver for PBM A attached first but couldn't
  616                          * set up a handler for PBM A.
  617                          */
  618                         schizo_set_intr(osc, 0, STX_PCIERR_A_INO,
  619                             schizo_pci_bus);
  620         }
  621         if ((ino_bitmap & (1ULL << STX_UE_INO)) != 0)
  622                 schizo_set_intr(sc, 1, STX_UE_INO, schizo_ue);
  623         if ((ino_bitmap & (1ULL << STX_CE_INO)) != 0)
  624                 schizo_set_intr(sc, 2, STX_CE_INO, schizo_ce);
  625         if ((ino_bitmap & (1ULL << STX_BUS_INO)) != 0)
  626                 schizo_set_intr(sc, 3, STX_BUS_INO, schizo_host_bus);
  627 
  628         /*
  629          * According to the Schizo Errata I-13, consistent DMA flushing/
  630          * syncing is FUBAR in version < 5 (i.e. revision < 2.3) bridges,
  631          * so we can't use it and need to live with the consequences.
  632          * With Schizo version >= 5, CDMA flushing/syncing is usable
  633          * but requires the the workaround described in Schizo Errata
  634          * I-23.  With Tomatillo and XMITS, CDMA flushing/syncing works
  635          * as expected, Tomatillo version <= 4 (i.e. revision <= 2.3)
  636          * bridges additionally require a block store after a write to
  637          * TOMXMS_PCI_DMA_SYNC_PEND though.
  638          */
  639         if ((sc->sc_mode == SCHIZO_MODE_SCZ && sc->sc_ver >= 5) ||
  640             sc->sc_mode == SCHIZO_MODE_TOM || sc->sc_mode == SCHIZO_MODE_XMS) {
  641                 sc->sc_flags |= SCHIZO_FLAGS_CDMA;
  642                 if (sc->sc_mode == SCHIZO_MODE_SCZ) {
  643                         n = STX_CDMA_A_INO + sc->sc_half;
  644                         if (bus_set_resource(dev, SYS_RES_IRQ, 5,
  645                             INTMAP_VEC(sc->sc_ign, n), 1) != 0)
  646                                 panic("%s: failed to add CDMA interrupt",
  647                                     __func__);
  648                         i = schizo_intr_register(sc, n);
  649                         if (i != 0)
  650                                 panic("%s: could not register interrupt "
  651                                     "controller for CDMA (%d)", __func__, i);
  652                         (void)schizo_get_intrmap(sc, n, NULL,
  653                            &sc->sc_cdma_clr);
  654                         sc->sc_cdma_state = SCHIZO_CDMA_STATE_DONE;
  655                         schizo_set_intr(sc, 5, n, schizo_cdma);
  656                 }
  657                 if (sc->sc_mode == SCHIZO_MODE_TOM && sc->sc_ver <= 4)
  658                         sc->sc_flags |= SCHIZO_FLAGS_BSWAR;
  659         }
  660 
  661         /*
  662          * Set the latency timer register as this isn't always done by the
  663          * firmware.
  664          */
  665         PCIB_WRITE_CONFIG(dev, sc->sc_pci_secbus, STX_CS_DEVICE, STX_CS_FUNC,
  666             PCIR_LATTIMER, OFW_PCI_LATENCY, 1);
  667 
  668         ofw_bus_setup_iinfo(node, &sc->sc_pci_iinfo, sizeof(ofw_pci_intr_t));
  669 
  670         device_add_child(dev, "pci", -1);
  671         return (bus_generic_attach(dev));
  672 }
  673 
  674 static void
  675 schizo_set_intr(struct schizo_softc *sc, u_int index, u_int ino,
  676     driver_filter_t handler)
  677 {
  678         u_long vec;
  679         int rid;
  680 
  681         rid = index;
  682         sc->sc_irq_res[index] = bus_alloc_resource_any(sc->sc_dev, SYS_RES_IRQ,
  683             &rid, RF_ACTIVE);
  684         if (sc->sc_irq_res[index] == NULL ||
  685             INTIGN(vec = rman_get_start(sc->sc_irq_res[index])) != sc->sc_ign ||
  686             INTINO(vec) != ino ||
  687             intr_vectors[vec].iv_ic != &schizo_ic ||
  688             bus_setup_intr(sc->sc_dev, sc->sc_irq_res[index],
  689             INTR_TYPE_MISC | INTR_FAST, handler, NULL, sc,
  690             &sc->sc_ihand[index]) != 0)
  691                 panic("%s: failed to set up interrupt %d", __func__, index);
  692 }
  693 
  694 static int
  695 schizo_intr_register(struct schizo_softc *sc, u_int ino)
  696 {
  697         struct schizo_icarg *sica;
  698         bus_addr_t intrclr, intrmap;
  699         int error;
  700 
  701         if (schizo_get_intrmap(sc, ino, &intrmap, &intrclr) == 0)
  702                 return (ENXIO);
  703         sica = malloc(sizeof(*sica), M_DEVBUF, M_NOWAIT);
  704         if (sica == NULL)
  705                 return (ENOMEM);
  706         sica->sica_sc = sc;
  707         sica->sica_map = intrmap;
  708         sica->sica_clr = intrclr;
  709 #ifdef SCHIZO_DEBUG
  710         device_printf(sc->sc_dev, "intr map (INO %d) %#lx: %#lx, clr: %#lx\n",
  711             ino, (u_long)intrmap, (u_long)SCHIZO_PCI_READ_8(sc, intrmap),
  712             (u_long)intrclr);
  713 #endif
  714         error = (intr_controller_register(INTMAP_VEC(sc->sc_ign, ino),
  715             &schizo_ic, sica));
  716         if (error != 0)
  717                 free(sica, M_DEVBUF);
  718         return (error);
  719 }
  720 
  721 static int
  722 schizo_get_intrmap(struct schizo_softc *sc, u_int ino, bus_addr_t *intrmapptr,
  723     bus_addr_t *intrclrptr)
  724 {
  725         bus_addr_t intrclr, intrmap;
  726         uint64_t mr;
  727 
  728         /*
  729          * XXX we only look for INOs rather than INRs since the firmware
  730          * may not provide the IGN and the IGN is constant for all devices
  731          * on that PCI controller.
  732          */
  733 
  734         if (ino > STX_MAX_INO) {
  735                 device_printf(sc->sc_dev, "out of range INO %d requested\n",
  736                     ino);
  737                 return (0);
  738         }
  739 
  740         intrmap = STX_PCI_IMAP_BASE + (ino << 3);
  741         intrclr = STX_PCI_ICLR_BASE + (ino << 3);
  742         mr = SCHIZO_PCI_READ_8(sc, intrmap);
  743         if (INTINO(mr) != ino) {
  744                 device_printf(sc->sc_dev,
  745                     "interrupt map entry does not match INO (%d != %d)\n",
  746                     (int)INTINO(mr), ino);
  747                 return (0);
  748         }
  749 
  750         if (intrmapptr != NULL)
  751                 *intrmapptr = intrmap;
  752         if (intrclrptr != NULL)
  753                 *intrclrptr = intrclr;
  754         return (1);
  755 }
  756 
  757 /*
  758  * Interrupt handlers
  759  */
  760 static int
  761 schizo_pci_bus(void *arg)
  762 {
  763         struct schizo_softc *sc = arg;
  764         uint64_t afar, afsr, csr, iommu;
  765         uint32_t status;
  766 
  767         afar = SCHIZO_PCI_READ_8(sc, STX_PCI_AFAR);
  768         afsr = SCHIZO_PCI_READ_8(sc, STX_PCI_AFSR);
  769         csr = SCHIZO_PCI_READ_8(sc, STX_PCI_CTRL);
  770         iommu = SCHIZO_PCI_READ_8(sc, STX_PCI_IOMMU);
  771         status = PCIB_READ_CONFIG(sc->sc_dev, sc->sc_pci_secbus,
  772             STX_CS_DEVICE, STX_CS_FUNC, PCIR_STATUS, 2);
  773         if ((csr & STX_PCI_CTRL_MMU_ERR) != 0) {
  774                 if ((iommu & TOM_PCI_IOMMU_ERR) == 0)
  775                         goto clear_error;
  776 
  777                 /* These are non-fatal if target abort was signaled. */
  778                 if ((status & PCIM_STATUS_STABORT) != 0 &&
  779                     ((iommu & TOM_PCI_IOMMU_ERRMASK) ==
  780                     TOM_PCI_IOMMU_INVALID_ERR ||
  781                     (iommu & TOM_PCI_IOMMU_ERR_ILLTSBTBW) != 0 ||
  782                     (iommu & TOM_PCI_IOMMU_ERR_BAD_VA) != 0)) {
  783                         SCHIZO_PCI_WRITE_8(sc, STX_PCI_IOMMU, iommu);
  784                         goto clear_error;
  785                 }
  786         }
  787 
  788         panic("%s: PCI bus %c error AFAR %#llx AFSR %#llx PCI CSR %#llx "
  789             "IOMMU %#llx STATUS %#llx", device_get_name(sc->sc_dev),
  790             'A' + sc->sc_half, (unsigned long long)afar,
  791             (unsigned long long)afsr, (unsigned long long)csr,
  792             (unsigned long long)iommu, (unsigned long long)status);
  793 
  794  clear_error:
  795         if (bootverbose)
  796                 device_printf(sc->sc_dev,
  797                     "PCI bus %c error AFAR %#llx AFSR %#llx PCI CSR %#llx "
  798                     "STATUS %#llx", 'A' + sc->sc_half,
  799                     (unsigned long long)afar, (unsigned long long)afsr,
  800                     (unsigned long long)csr, (unsigned long long)status);
  801         /* Clear the error bits that we caught. */
  802         PCIB_WRITE_CONFIG(sc->sc_dev, sc->sc_pci_secbus, STX_CS_DEVICE,
  803             STX_CS_FUNC, PCIR_STATUS, status, 2);
  804         SCHIZO_PCI_WRITE_8(sc, STX_PCI_CTRL, csr);
  805         SCHIZO_PCI_WRITE_8(sc, STX_PCI_AFSR, afsr);
  806         return (FILTER_HANDLED);
  807 }
  808 
  809 static int
  810 schizo_ue(void *arg)
  811 {
  812         struct schizo_softc *sc = arg;
  813         uint64_t afar, afsr;
  814         int i;
  815 
  816         mtx_lock_spin(sc->sc_mtx);
  817         afar = SCHIZO_CTRL_READ_8(sc, STX_CTRL_UE_AFAR);
  818         for (i = 0; i < 1000; i++)
  819                 if (((afsr = SCHIZO_CTRL_READ_8(sc, STX_CTRL_UE_AFSR)) &
  820                     STX_CTRL_CE_AFSR_ERRPNDG) == 0)
  821                         break;
  822         mtx_unlock_spin(sc->sc_mtx);
  823         panic("%s: uncorrectable DMA error AFAR %#llx AFSR %#llx",
  824             device_get_name(sc->sc_dev), (unsigned long long)afar,
  825             (unsigned long long)afsr);
  826         return (FILTER_HANDLED);
  827 }
  828 
  829 static int
  830 schizo_ce(void *arg)
  831 {
  832         struct schizo_softc *sc = arg;
  833         uint64_t afar, afsr;
  834         int i;
  835 
  836         mtx_lock_spin(sc->sc_mtx);
  837         afar = SCHIZO_CTRL_READ_8(sc, STX_CTRL_CE_AFAR);
  838         for (i = 0; i < 1000; i++)
  839                 if (((afsr = SCHIZO_CTRL_READ_8(sc, STX_CTRL_UE_AFSR)) &
  840                     STX_CTRL_CE_AFSR_ERRPNDG) == 0)
  841                         break;
  842         device_printf(sc->sc_dev,
  843             "correctable DMA error AFAR %#llx AFSR %#llx\n",
  844             (unsigned long long)afar, (unsigned long long)afsr);
  845         /* Clear the error bits that we caught. */
  846         SCHIZO_CTRL_WRITE_8(sc, STX_CTRL_UE_AFSR, afsr);
  847         mtx_unlock_spin(sc->sc_mtx);
  848         return (FILTER_HANDLED);
  849 }
  850 
  851 static int
  852 schizo_host_bus(void *arg)
  853 {
  854         struct schizo_softc *sc = arg;
  855         uint64_t errlog;
  856 
  857         errlog = SCHIZO_CTRL_READ_8(sc, STX_CTRL_BUS_ERRLOG);
  858         panic("%s: %s error %#llx", device_get_name(sc->sc_dev),
  859             sc->sc_mode == SCHIZO_MODE_TOM ? "JBus" : "Safari",
  860             (unsigned long long)errlog);
  861         return (FILTER_HANDLED);
  862 }
  863 
  864 static int
  865 schizo_cdma(void *arg)
  866 {
  867         struct schizo_softc *sc = arg;
  868 
  869         atomic_store_rel_32(&sc->sc_cdma_state, SCHIZO_CDMA_STATE_DONE);
  870         return (FILTER_HANDLED);
  871 }
  872 
  873 static void
  874 schizo_iommu_init(struct schizo_softc *sc, int tsbsize, uint32_t dvmabase)
  875 {
  876 
  877         /* Punch in our copies. */
  878         sc->sc_is.is_bustag = rman_get_bustag(sc->sc_mem_res[STX_PCI]);
  879         sc->sc_is.is_bushandle = rman_get_bushandle(sc->sc_mem_res[STX_PCI]);
  880         sc->sc_is.is_iommu = STX_PCI_IOMMU;
  881         sc->sc_is.is_dtag = STX_PCI_IOMMU_TLB_TAG_DIAG;
  882         sc->sc_is.is_ddram = STX_PCI_IOMMU_TLB_DATA_DIAG;
  883         sc->sc_is.is_dqueue = STX_PCI_IOMMU_QUEUE_DIAG;
  884         sc->sc_is.is_dva = STX_PCI_IOMMU_SVADIAG;
  885         sc->sc_is.is_dtcmp = STX_PCI_IOMMU_TLB_CMP_DIAG;
  886 
  887         iommu_init(device_get_nameunit(sc->sc_dev), &sc->sc_is, tsbsize,
  888             dvmabase, 0);
  889 }
  890 
  891 static int
  892 schizo_maxslots(device_t dev)
  893 {
  894         struct schizo_softc *sc;
  895 
  896         sc = device_get_softc(dev);
  897         if (sc->sc_mode == SCHIZO_MODE_SCZ)
  898                 return (sc->sc_half == 0 ? 4 : 6);
  899 
  900         /* XXX: is this correct? */
  901         return (PCI_SLOTMAX);
  902 }
  903 
  904 static uint32_t
  905 schizo_read_config(device_t dev, u_int bus, u_int slot, u_int func, u_int reg,
  906     int width)
  907 {
  908         struct schizo_softc *sc;
  909         bus_space_handle_t bh;
  910         u_long offset = 0;
  911         uint32_t r, wrd;
  912         int i;
  913         uint16_t shrt;
  914         uint8_t byte;
  915 
  916         sc = device_get_softc(dev);
  917 
  918         /*
  919          * The Schizo bridges contain a dupe of their header at 0x80.
  920          */
  921         if (sc->sc_mode == SCHIZO_MODE_SCZ && bus == sc->sc_pci_secbus &&
  922             slot == STX_CS_DEVICE && func == STX_CS_FUNC &&
  923             reg + width > 0x80)
  924                 return (0);
  925 
  926         offset = STX_CONF_OFF(bus, slot, func, reg);
  927         bh = sc->sc_pci_bh[OFW_PCI_CS_CONFIG];
  928         switch (width) {
  929         case 1:
  930                 i = bus_space_peek_1(sc->sc_pci_cfgt, bh, offset, &byte);
  931                 r = byte;
  932                 break;
  933         case 2:
  934                 i = bus_space_peek_2(sc->sc_pci_cfgt, bh, offset, &shrt);
  935                 r = shrt;
  936                 break;
  937         case 4:
  938                 i = bus_space_peek_4(sc->sc_pci_cfgt, bh, offset, &wrd);
  939                 r = wrd;
  940                 break;
  941         default:
  942                 panic("%s: bad width", __func__);
  943                 /* NOTREACHED */
  944         }
  945 
  946         if (i) {
  947 #ifdef SCHIZO_DEBUG
  948                 printf("%s: read data error reading: %d.%d.%d: 0x%x\n",
  949                     __func__, bus, slot, func, reg);
  950 #endif
  951                 r = -1;
  952         }
  953         return (r);
  954 }
  955 
  956 static void
  957 schizo_write_config(device_t dev, u_int bus, u_int slot, u_int func, u_int reg,
  958     uint32_t val, int width)
  959 {
  960         struct schizo_softc *sc;
  961         bus_space_handle_t bh;
  962         u_long offset = 0;
  963 
  964         sc = device_get_softc(dev);
  965         offset = STX_CONF_OFF(bus, slot, func, reg);
  966         bh = sc->sc_pci_bh[OFW_PCI_CS_CONFIG];
  967         switch (width) {
  968         case 1:
  969                 bus_space_write_1(sc->sc_pci_cfgt, bh, offset, val);
  970                 break;
  971         case 2:
  972                 bus_space_write_2(sc->sc_pci_cfgt, bh, offset, val);
  973                 break;
  974         case 4:
  975                 bus_space_write_4(sc->sc_pci_cfgt, bh, offset, val);
  976                 break;
  977         default:
  978                 panic("%s: bad width", __func__);
  979                 /* NOTREACHED */
  980         }
  981 }
  982 
  983 static int
  984 schizo_route_interrupt(device_t bridge, device_t dev, int pin)
  985 {
  986         struct schizo_softc *sc;
  987         struct ofw_pci_register reg;
  988         ofw_pci_intr_t pintr, mintr;
  989         uint8_t maskbuf[sizeof(reg) + sizeof(pintr)];
  990 
  991         sc = device_get_softc(bridge);
  992         pintr = pin;
  993         if (ofw_bus_lookup_imap(ofw_bus_get_node(dev), &sc->sc_pci_iinfo, &reg,
  994             sizeof(reg), &pintr, sizeof(pintr), &mintr, sizeof(mintr), maskbuf))
  995                 return (mintr);
  996 
  997         device_printf(bridge, "could not route pin %d for device %d.%d\n",
  998             pin, pci_get_slot(dev), pci_get_function(dev));
  999         return (PCI_INVALID_IRQ);
 1000 }
 1001 
 1002 static int
 1003 schizo_read_ivar(device_t dev, device_t child, int which, uintptr_t *result)
 1004 {
 1005         struct schizo_softc *sc;
 1006 
 1007         sc = device_get_softc(dev);
 1008         switch (which) {
 1009         case PCIB_IVAR_DOMAIN:
 1010                 *result = device_get_unit(dev);
 1011                 return (0);
 1012         case PCIB_IVAR_BUS:
 1013                 *result = sc->sc_pci_secbus;
 1014                 return (0);
 1015         }
 1016         return (ENOENT);
 1017 }
 1018 
 1019 static int
 1020 schizo_dma_sync_stub(void *arg)
 1021 {
 1022         struct timeval cur, end;
 1023         struct schizo_dma_sync *sds = arg;
 1024         struct schizo_softc *sc = sds->sds_sc;
 1025         uint32_t state;
 1026 
 1027         (void)PCIB_READ_CONFIG(sds->sds_ppb, sds->sds_bus, sds->sds_slot,
 1028             sds->sds_func, PCIR_VENDOR, 2);
 1029         for (; atomic_cmpset_acq_32(&sc->sc_cdma_state, SCHIZO_CDMA_STATE_DONE,
 1030             SCHIZO_CDMA_STATE_PENDING) == 0;)
 1031                 ;
 1032         SCHIZO_PCI_WRITE_8(sc, sc->sc_cdma_clr, 1);
 1033         microuptime(&cur);
 1034         end.tv_sec = 1;
 1035         end.tv_usec = 0;
 1036         timevaladd(&end, &cur);
 1037         for (; (state = atomic_load_32(&sc->sc_cdma_state)) !=
 1038             SCHIZO_CDMA_STATE_DONE && timevalcmp(&cur, &end, <=);)
 1039                 microuptime(&cur);
 1040         if (state != SCHIZO_CDMA_STATE_DONE)
 1041                 panic("%s: DMA does not sync", __func__);
 1042         return (sds->sds_handler(sds->sds_arg));
 1043 }
 1044 
 1045 #define VIS_BLOCKSIZE   64
 1046 
 1047 static int
 1048 ichip_dma_sync_stub(void *arg)
 1049 {
 1050         static u_char buf[VIS_BLOCKSIZE] __aligned(VIS_BLOCKSIZE);
 1051         struct timeval cur, end;
 1052         struct schizo_dma_sync *sds = arg;
 1053         struct schizo_softc *sc = sds->sds_sc;
 1054         register_t reg, s;
 1055 
 1056         (void)PCIB_READ_CONFIG(sds->sds_ppb, sds->sds_bus, sds->sds_slot,
 1057             sds->sds_func, PCIR_VENDOR, 2);
 1058         SCHIZO_PCI_WRITE_8(sc, TOMXMS_PCI_DMA_SYNC_PEND, sds->sds_syncval);
 1059         microuptime(&cur);
 1060         end.tv_sec = 1;
 1061         end.tv_usec = 0;
 1062         timevaladd(&end, &cur);
 1063         for (; ((reg = SCHIZO_PCI_READ_8(sc, TOMXMS_PCI_DMA_SYNC_PEND)) &
 1064             sds->sds_syncval) != 0 && timevalcmp(&cur, &end, <=);)
 1065                 microuptime(&cur);
 1066         if ((reg & sds->sds_syncval) != 0)
 1067                 panic("%s: DMA does not sync", __func__);
 1068 
 1069         if ((sc->sc_flags & SCHIZO_FLAGS_BSWAR) != 0) {
 1070                 s = intr_disable();
 1071                 reg = rd(fprs);
 1072                 wr(fprs, reg | FPRS_FEF, 0);
 1073                 __asm __volatile("stda %%f0, [%0] %1"
 1074                     : : "r" (buf), "n" (ASI_BLK_COMMIT_S));
 1075                 membar(Sync);
 1076                 wr(fprs, reg, 0);
 1077                 intr_restore(s);
 1078         }
 1079         return (sds->sds_handler(sds->sds_arg));
 1080 }
 1081 
 1082 static void
 1083 schizo_intr_enable(void *arg)
 1084 {
 1085         struct intr_vector *iv = arg;
 1086         struct schizo_icarg *sica = iv->iv_icarg;
 1087 
 1088         SCHIZO_PCI_WRITE_8(sica->sica_sc, sica->sica_map,
 1089             INTMAP_ENABLE(iv->iv_vec, iv->iv_mid));
 1090 }
 1091 
 1092 static void
 1093 schizo_intr_disable(void *arg)
 1094 {
 1095         struct intr_vector *iv = arg;
 1096         struct schizo_icarg *sica = iv->iv_icarg;
 1097 
 1098         SCHIZO_PCI_WRITE_8(sica->sica_sc, sica->sica_map, iv->iv_vec);
 1099 }
 1100 
 1101 static void
 1102 schizo_intr_assign(void *arg)
 1103 {
 1104         struct intr_vector *iv = arg;
 1105         struct schizo_icarg *sica = iv->iv_icarg;
 1106 
 1107         SCHIZO_PCI_WRITE_8(sica->sica_sc, sica->sica_map, INTMAP_TID(
 1108             SCHIZO_PCI_READ_8(sica->sica_sc, sica->sica_map), iv->iv_mid));
 1109 }
 1110 
 1111 static void
 1112 schizo_intr_clear(void *arg)
 1113 {
 1114         struct intr_vector *iv = arg;
 1115         struct schizo_icarg *sica = iv->iv_icarg;
 1116 
 1117         SCHIZO_PCI_WRITE_8(sica->sica_sc, sica->sica_clr, 0);
 1118 }
 1119 
 1120 static int
 1121 schizo_setup_intr(device_t dev, device_t child, struct resource *ires,
 1122     int flags, driver_filter_t *filt, driver_intr_t *intr, void *arg,
 1123     void **cookiep)
 1124 {
 1125         devclass_t pci_devclass;
 1126         device_t cdev, pdev, pcidev;
 1127         struct schizo_dma_sync *sds;
 1128         struct schizo_softc *sc;
 1129         u_long vec;
 1130         int error, found;
 1131 
 1132         sc = device_get_softc(dev);
 1133         /*
 1134          * Make sure the vector is fully specified.
 1135          */
 1136         vec = rman_get_start(ires);
 1137         if (INTIGN(vec) != sc->sc_ign) {
 1138                 device_printf(dev, "invalid interrupt vector 0x%lx\n", vec);
 1139                 return (EINVAL);
 1140         }
 1141 
 1142         if (intr_vectors[vec].iv_ic == &schizo_ic) {
 1143                 /*
 1144                  * Ensure we use the right softc in case the interrupt
 1145                  * is routed to our companion PBM for some odd reason.
 1146                  */
 1147                 sc = ((struct schizo_icarg *)intr_vectors[vec].iv_icarg)->
 1148                     sica_sc;
 1149         } else if (intr_vectors[vec].iv_ic == NULL) {
 1150                 /*
 1151                  * Work around broken firmware which misses entries in
 1152                  * the ino-bitmap.
 1153                  */
 1154                 error = schizo_intr_register(sc, INTINO(vec));
 1155                 if (error != 0) {
 1156                         device_printf(dev, "could not register interrupt "
 1157                             "controller for vector 0x%lx (%d)\n", vec, error);
 1158                         return (error);
 1159                 }
 1160                 if (bootverbose)
 1161                         device_printf(dev, "belatedly registered as "
 1162                             "interrupt controller for vector 0x%lx\n", vec);
 1163         } else {
 1164                 device_printf(dev,
 1165                     "invalid interrupt controller for vector 0x%lx\n", vec);
 1166                 return (EINVAL);
 1167         }
 1168 
 1169         /*
 1170          * Install a a wrapper for CDMA flushing/syncing for devices
 1171          * behind PCI-PCI bridges if possible.
 1172          */
 1173         pcidev = NULL;
 1174         found = 0;
 1175         pci_devclass = devclass_find("pci");
 1176         for (cdev = child; cdev != dev; cdev = pdev) {
 1177                 pdev = device_get_parent(cdev);
 1178                 if (pcidev == NULL) {
 1179                         if (device_get_devclass(pdev) != pci_devclass)
 1180                                 continue;
 1181                         pcidev = cdev;
 1182                         continue;
 1183                 }
 1184                 if (pci_get_class(cdev) == PCIC_BRIDGE &&
 1185                     pci_get_subclass(cdev) == PCIS_BRIDGE_PCI)
 1186                         found = 1;
 1187         }
 1188         if ((sc->sc_flags & SCHIZO_FLAGS_CDMA) != 0) {
 1189                 sds = malloc(sizeof(*sds), M_DEVBUF, M_NOWAIT | M_ZERO);
 1190                 if (sds == NULL)
 1191                         return (ENOMEM);
 1192                 if (found != 0 && pcidev != NULL) {
 1193                         sds->sds_sc = sc;
 1194                         sds->sds_arg = arg;
 1195                         sds->sds_ppb =
 1196                             device_get_parent(device_get_parent(pcidev));
 1197                         sds->sds_bus = pci_get_bus(pcidev);
 1198                         sds->sds_slot = pci_get_slot(pcidev);
 1199                         sds->sds_func = pci_get_function(pcidev);
 1200                         sds->sds_syncval = 1ULL << INTINO(vec);
 1201                         if (bootverbose)
 1202                                 device_printf(dev, "installed DMA sync "
 1203                                     "wrapper for device %d.%d on bus %d\n",
 1204                                     sds->sds_slot, sds->sds_func,
 1205                                     sds->sds_bus);
 1206 
 1207 #define DMA_SYNC_STUB                                                   \
 1208         (sc->sc_mode == SCHIZO_MODE_SCZ ? schizo_dma_sync_stub :        \
 1209         ichip_dma_sync_stub)
 1210 
 1211                         if (intr == NULL) {
 1212                                 sds->sds_handler = filt;
 1213                                 error = bus_generic_setup_intr(dev, child,
 1214                                     ires, flags, DMA_SYNC_STUB, intr, sds,
 1215                                     cookiep);
 1216                         } else {
 1217                                 sds->sds_handler = (driver_filter_t *)intr;
 1218                                 error = bus_generic_setup_intr(dev, child,
 1219                                     ires, flags, filt, (driver_intr_t *)
 1220                                     DMA_SYNC_STUB, sds, cookiep);
 1221                         }
 1222 
 1223 #undef DMA_SYNC_STUB
 1224 
 1225                 } else
 1226                         error = bus_generic_setup_intr(dev, child, ires,
 1227                             flags, filt, intr, arg, cookiep);
 1228                 if (error != 0) {
 1229                         free(sds, M_DEVBUF);
 1230                         return (error);
 1231                 }
 1232                 sds->sds_cookie = *cookiep;
 1233                 *cookiep = sds;
 1234                 return (error);
 1235         } else if (found != 0)
 1236                 device_printf(dev, "WARNING: using devices behind PCI-PCI "
 1237                     "bridges may cause data corruption\n");
 1238         return (bus_generic_setup_intr(dev, child, ires, flags, filt, intr,
 1239             arg, cookiep));
 1240 }
 1241 
 1242 static int
 1243 schizo_teardown_intr(device_t dev, device_t child, struct resource *vec,
 1244     void *cookie)
 1245 {
 1246         struct schizo_dma_sync *sds;
 1247         struct schizo_softc *sc;
 1248         int error;
 1249 
 1250         sc = device_get_softc(dev);
 1251         if ((sc->sc_flags & SCHIZO_FLAGS_CDMA) != 0) {
 1252                 sds = cookie;
 1253                 error = bus_generic_teardown_intr(dev, child, vec,
 1254                     sds->sds_cookie);
 1255                 if (error == 0)
 1256                         free(sds, M_DEVBUF);
 1257                 return (error);
 1258         }
 1259         return (bus_generic_teardown_intr(dev, child, vec, cookie));
 1260 }
 1261 
 1262 static struct resource *
 1263 schizo_alloc_resource(device_t bus, device_t child, int type, int *rid,
 1264     u_long start, u_long end, u_long count, u_int flags)
 1265 {
 1266         struct schizo_softc *sc;
 1267         struct resource *rv;
 1268         struct rman *rm;
 1269         bus_space_tag_t bt;
 1270         bus_space_handle_t bh;
 1271         int needactivate = flags & RF_ACTIVE;
 1272 
 1273         flags &= ~RF_ACTIVE;
 1274 
 1275         sc = device_get_softc(bus);
 1276         if (type == SYS_RES_IRQ) {
 1277                 /*
 1278                  * XXX: Don't accept blank ranges for now, only single
 1279                  * interrupts.  The other case should not happen with
 1280                  * the MI PCI code...
 1281                  * XXX: This may return a resource that is out of the
 1282                  * range that was specified.  Is this correct...?
 1283                  */
 1284                 if (start != end)
 1285                         panic("%s: XXX: interrupt range", __func__);
 1286                 start = end = INTMAP_VEC(sc->sc_ign, end);
 1287                 return (BUS_ALLOC_RESOURCE(device_get_parent(bus), child, type,
 1288                     rid, start, end, count, flags));
 1289         }
 1290         switch (type) {
 1291         case SYS_RES_MEMORY:
 1292                 rm = &sc->sc_pci_mem_rman;
 1293                 bt = sc->sc_pci_memt;
 1294                 bh = sc->sc_pci_bh[OFW_PCI_CS_MEM32];
 1295                 break;
 1296         case SYS_RES_IOPORT:
 1297                 rm = &sc->sc_pci_io_rman;
 1298                 bt = sc->sc_pci_iot;
 1299                 bh = sc->sc_pci_bh[OFW_PCI_CS_IO];
 1300                 break;
 1301         default:
 1302                 return (NULL);
 1303                 /* NOTREACHED */
 1304         }
 1305 
 1306         rv = rman_reserve_resource(rm, start, end, count, flags, child);
 1307         if (rv == NULL)
 1308                 return (NULL);
 1309         rman_set_rid(rv, *rid);
 1310         bh += rman_get_start(rv);
 1311         rman_set_bustag(rv, bt);
 1312         rman_set_bushandle(rv, bh);
 1313 
 1314         if (needactivate) {
 1315                 if (bus_activate_resource(child, type, *rid, rv)) {
 1316                         rman_release_resource(rv);
 1317                         return (NULL);
 1318                 }
 1319         }
 1320         return (rv);
 1321 }
 1322 
 1323 static int
 1324 schizo_activate_resource(device_t bus, device_t child, int type, int rid,
 1325     struct resource *r)
 1326 {
 1327         void *p;
 1328         int error;
 1329 
 1330         if (type == SYS_RES_IRQ)
 1331                 return (BUS_ACTIVATE_RESOURCE(device_get_parent(bus), child,
 1332                     type, rid, r));
 1333         if (type == SYS_RES_MEMORY) {
 1334                 /*
 1335                  * Need to memory-map the device space, as some drivers
 1336                  * depend on the virtual address being set and usable.
 1337                  */
 1338                 error = sparc64_bus_mem_map(rman_get_bustag(r),
 1339                     rman_get_bushandle(r), rman_get_size(r), 0, 0, &p);
 1340                 if (error != 0)
 1341                         return (error);
 1342                 rman_set_virtual(r, p);
 1343         }
 1344         return (rman_activate_resource(r));
 1345 }
 1346 
 1347 static int
 1348 schizo_deactivate_resource(device_t bus, device_t child, int type, int rid,
 1349     struct resource *r)
 1350 {
 1351 
 1352         if (type == SYS_RES_IRQ)
 1353                 return (BUS_DEACTIVATE_RESOURCE(device_get_parent(bus), child,
 1354                     type, rid, r));
 1355         if (type == SYS_RES_MEMORY) {
 1356                 sparc64_bus_mem_unmap(rman_get_virtual(r), rman_get_size(r));
 1357                 rman_set_virtual(r, NULL);
 1358         }
 1359         return (rman_deactivate_resource(r));
 1360 }
 1361 
 1362 static int
 1363 schizo_release_resource(device_t bus, device_t child, int type, int rid,
 1364     struct resource *r)
 1365 {
 1366         int error;
 1367 
 1368         if (type == SYS_RES_IRQ)
 1369                 return (BUS_RELEASE_RESOURCE(device_get_parent(bus), child,
 1370                     type, rid, r));
 1371         if (rman_get_flags(r) & RF_ACTIVE) {
 1372                 error = bus_deactivate_resource(child, type, rid, r);
 1373                 if (error)
 1374                         return (error);
 1375         }
 1376         return (rman_release_resource(r));
 1377 }
 1378 
 1379 static bus_dma_tag_t
 1380 schizo_get_dma_tag(device_t bus, device_t child)
 1381 {
 1382         struct schizo_softc *sc;
 1383 
 1384         sc = device_get_softc(bus);
 1385         return (sc->sc_pci_dmat);
 1386 }
 1387 
 1388 static phandle_t
 1389 schizo_get_node(device_t bus, device_t dev)
 1390 {
 1391         struct schizo_softc *sc;
 1392 
 1393         sc = device_get_softc(bus);
 1394         /* We only have one child, the PCI bus, which needs our own node. */
 1395         return (sc->sc_node);
 1396 }
 1397 
 1398 static bus_space_tag_t
 1399 schizo_alloc_bus_tag(struct schizo_softc *sc, int type)
 1400 {
 1401         bus_space_tag_t bt;
 1402 
 1403         bt = (bus_space_tag_t)malloc(sizeof(struct bus_space_tag), M_DEVBUF,
 1404             M_NOWAIT | M_ZERO);
 1405         if (bt == NULL)
 1406                 panic("%s: out of memory", __func__);
 1407 
 1408         bt->bst_cookie = sc;
 1409         bt->bst_parent = rman_get_bustag(sc->sc_mem_res[STX_PCI]);
 1410         bt->bst_type = type;
 1411         return (bt);
 1412 }
 1413 
 1414 static u_int
 1415 schizo_get_timecount(struct timecounter *tc)
 1416 {
 1417         struct schizo_softc *sc;
 1418 
 1419         sc = tc->tc_priv;
 1420         return (SCHIZO_CTRL_READ_8(sc, STX_CTRL_PERF_CNT) &
 1421             (STX_CTRL_PERF_CNT_MASK << STX_CTRL_PERF_CNT_CNT0_SHIFT));
 1422 }

Cache object: 380790b5497aef230ff0617c60ee483b


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]


This page is part of the FreeBSD/Linux Linux Kernel Cross-Reference, and was automatically generated using a modified version of the LXR engine.