1 /*-
2 * SPDX-License-Identifier: BSD-2-Clause
3 *
4 * Copyright (c) 2000 Michael Smith
5 * Copyright (c) 2000 BSDi
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 *
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * SUCH DAMAGE.
28 */
29
30 #include <sys/cdefs.h>
31 #include <sys/param.h>
32 #include <sys/systm.h>
33 #include <sys/module.h>
34 #include <sys/bus.h>
35 #include <sys/malloc.h>
36 #include <sys/kernel.h>
37
38 #include <dev/ofw/openfirm.h>
39 #include <dev/ofw/ofw_pci.h>
40 #include <dev/ofw/ofw_bus.h>
41 #include <dev/ofw/ofw_bus_subr.h>
42
43 #include <dev/pci/pcivar.h>
44 #include <dev/pci/pcireg.h>
45 #include <dev/pci/pcib_private.h>
46
47 #include <machine/intr_machdep.h>
48
49 #include "pcib_if.h"
50
51 static int ofw_pcib_pci_probe(device_t bus);
52 static int ofw_pcib_pci_attach(device_t bus);
53 static phandle_t ofw_pcib_pci_get_node(device_t bus, device_t dev);
54 static int ofw_pcib_pci_route_interrupt(device_t bridge, device_t dev,
55 int intpin);
56
57 static device_method_t ofw_pcib_pci_methods[] = {
58 /* Device interface */
59 DEVMETHOD(device_probe, ofw_pcib_pci_probe),
60 DEVMETHOD(device_attach, ofw_pcib_pci_attach),
61
62 /* pcib interface */
63 DEVMETHOD(pcib_route_interrupt, ofw_pcib_pci_route_interrupt),
64 DEVMETHOD(pcib_request_feature, pcib_request_feature_allow),
65
66 /* ofw_bus interface */
67 DEVMETHOD(ofw_bus_get_node, ofw_pcib_pci_get_node),
68
69 DEVMETHOD_END
70 };
71
72 struct ofw_pcib_softc {
73 /*
74 * This is here so that we can use pci bridge methods, too - the
75 * generic routines only need the dev, secbus and subbus members
76 * filled.
77 */
78 struct pcib_softc ops_pcib_sc;
79 phandle_t ops_node;
80 struct ofw_bus_iinfo ops_iinfo;
81 };
82
83 DEFINE_CLASS_1(pcib, ofw_pcib_pci_driver, ofw_pcib_pci_methods,
84 sizeof(struct ofw_pcib_softc), pcib_driver);
85 EARLY_DRIVER_MODULE(ofw_pcib, pci, ofw_pcib_pci_driver, 0, 0, BUS_PASS_BUS);
86
87 static int
ofw_pcib_pci_probe(device_t dev)88 ofw_pcib_pci_probe(device_t dev)
89 {
90
91 if ((pci_get_class(dev) != PCIC_BRIDGE) ||
92 (pci_get_subclass(dev) != PCIS_BRIDGE_PCI)) {
93 return (ENXIO);
94 }
95
96 if (ofw_bus_get_node(dev) == -1)
97 return (ENXIO);
98
99 device_set_desc(dev, "OFW PCI-PCI bridge");
100 return (0);
101 }
102
103 static int
ofw_pcib_pci_attach(device_t dev)104 ofw_pcib_pci_attach(device_t dev)
105 {
106 struct ofw_pcib_softc *sc;
107
108 sc = device_get_softc(dev);
109 sc->ops_pcib_sc.dev = dev;
110 sc->ops_node = ofw_bus_get_node(dev);
111
112 ofw_bus_setup_iinfo(sc->ops_node, &sc->ops_iinfo,
113 sizeof(cell_t));
114
115 pcib_attach_common(dev);
116 return (pcib_attach_child(dev));
117 }
118
119 static phandle_t
ofw_pcib_pci_get_node(device_t bridge,device_t dev)120 ofw_pcib_pci_get_node(device_t bridge, device_t dev)
121 {
122 /* We have only one child, the PCI bus, so pass it our node */
123
124 return (ofw_bus_get_node(bridge));
125 }
126
127 static int
ofw_pcib_pci_route_interrupt(device_t bridge,device_t dev,int intpin)128 ofw_pcib_pci_route_interrupt(device_t bridge, device_t dev, int intpin)
129 {
130 struct ofw_pcib_softc *sc;
131 struct ofw_bus_iinfo *ii;
132 struct ofw_pci_register reg;
133 cell_t pintr, mintr[2];
134 int intrcells;
135 phandle_t iparent;
136
137 sc = device_get_softc(bridge);
138 ii = &sc->ops_iinfo;
139 if (ii->opi_imapsz > 0) {
140 pintr = intpin;
141
142 /* Fabricate imap information if this isn't an OFW device */
143 bzero(®, sizeof(reg));
144 reg.phys_hi = (pci_get_bus(dev) << OFW_PCI_PHYS_HI_BUSSHIFT) |
145 (pci_get_slot(dev) << OFW_PCI_PHYS_HI_DEVICESHIFT) |
146 (pci_get_function(dev) << OFW_PCI_PHYS_HI_FUNCTIONSHIFT);
147
148 intrcells = ofw_bus_lookup_imap(ofw_bus_get_node(dev), ii, ®,
149 sizeof(reg), &pintr, sizeof(pintr), mintr, sizeof(mintr),
150 &iparent);
151 if (intrcells) {
152 /*
153 * If we've found a mapping, return it and don't map
154 * it again on higher levels - that causes problems
155 * in some cases, and never seems to be required.
156 */
157 mintr[0] = ofw_bus_map_intr(dev, iparent, intrcells,
158 mintr);
159 return (mintr[0]);
160 }
161 } else if (intpin >= 1 && intpin <= 4) {
162 /*
163 * When an interrupt map is missing, we need to do the
164 * standard PCI swizzle and continue mapping at the parent.
165 */
166 return (pcib_route_interrupt(bridge, dev, intpin));
167 }
168 return (PCIB_ROUTE_INTERRUPT(device_get_parent(device_get_parent(
169 bridge)), bridge, intpin));
170 }
171