pcihost_fdt.c revision 1.12 1 1.12 jmcneill /* $NetBSD: pcihost_fdt.c,v 1.12 2019/12/28 17:19:43 jmcneill Exp $ */
2 1.1 jmcneill
3 1.1 jmcneill /*-
4 1.1 jmcneill * Copyright (c) 2018 Jared D. McNeill <jmcneill (at) invisible.ca>
5 1.1 jmcneill * All rights reserved.
6 1.1 jmcneill *
7 1.1 jmcneill * Redistribution and use in source and binary forms, with or without
8 1.1 jmcneill * modification, are permitted provided that the following conditions
9 1.1 jmcneill * are met:
10 1.1 jmcneill * 1. Redistributions of source code must retain the above copyright
11 1.1 jmcneill * notice, this list of conditions and the following disclaimer.
12 1.1 jmcneill * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 jmcneill * notice, this list of conditions and the following disclaimer in the
14 1.1 jmcneill * documentation and/or other materials provided with the distribution.
15 1.1 jmcneill *
16 1.1 jmcneill * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17 1.1 jmcneill * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18 1.1 jmcneill * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19 1.1 jmcneill * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20 1.1 jmcneill * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
21 1.1 jmcneill * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
22 1.1 jmcneill * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
23 1.1 jmcneill * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
24 1.1 jmcneill * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25 1.1 jmcneill * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26 1.1 jmcneill * SUCH DAMAGE.
27 1.1 jmcneill */
28 1.1 jmcneill
29 1.1 jmcneill #include <sys/cdefs.h>
30 1.12 jmcneill __KERNEL_RCSID(0, "$NetBSD: pcihost_fdt.c,v 1.12 2019/12/28 17:19:43 jmcneill Exp $");
31 1.1 jmcneill
32 1.1 jmcneill #include <sys/param.h>
33 1.1 jmcneill #include <sys/bus.h>
34 1.1 jmcneill #include <sys/device.h>
35 1.1 jmcneill #include <sys/intr.h>
36 1.1 jmcneill #include <sys/systm.h>
37 1.1 jmcneill #include <sys/kernel.h>
38 1.1 jmcneill #include <sys/extent.h>
39 1.1 jmcneill #include <sys/queue.h>
40 1.1 jmcneill #include <sys/mutex.h>
41 1.1 jmcneill #include <sys/kmem.h>
42 1.1 jmcneill
43 1.1 jmcneill #include <machine/cpu.h>
44 1.1 jmcneill
45 1.1 jmcneill #include <arm/cpufunc.h>
46 1.1 jmcneill
47 1.1 jmcneill #include <dev/pci/pcireg.h>
48 1.1 jmcneill #include <dev/pci/pcivar.h>
49 1.1 jmcneill #include <dev/pci/pciconf.h>
50 1.1 jmcneill
51 1.1 jmcneill #include <dev/fdt/fdtvar.h>
52 1.1 jmcneill
53 1.3 jmcneill #include <arm/pci/pci_msi_machdep.h>
54 1.8 jakllsch #include <arm/fdt/pcihost_fdtvar.h>
55 1.3 jmcneill
56 1.1 jmcneill #define PCIHOST_DEFAULT_BUS_MIN 0
57 1.1 jmcneill #define PCIHOST_DEFAULT_BUS_MAX 255
58 1.1 jmcneill
59 1.1 jmcneill #define PCIHOST_CACHELINE_SIZE arm_dcache_align
60 1.1 jmcneill
61 1.8 jakllsch int pcihost_segment = 0;
62 1.1 jmcneill
63 1.1 jmcneill static int pcihost_match(device_t, cfdata_t, void *);
64 1.1 jmcneill static void pcihost_attach(device_t, device_t, void *);
65 1.1 jmcneill
66 1.1 jmcneill static int pcihost_config(struct pcihost_softc *);
67 1.1 jmcneill
68 1.1 jmcneill static void pcihost_attach_hook(device_t, device_t,
69 1.1 jmcneill struct pcibus_attach_args *);
70 1.1 jmcneill static int pcihost_bus_maxdevs(void *, int);
71 1.1 jmcneill static pcitag_t pcihost_make_tag(void *, int, int, int);
72 1.1 jmcneill static void pcihost_decompose_tag(void *, pcitag_t, int *, int *, int *);
73 1.3 jmcneill static u_int pcihost_get_segment(void *);
74 1.1 jmcneill static pcireg_t pcihost_conf_read(void *, pcitag_t, int);
75 1.1 jmcneill static void pcihost_conf_write(void *, pcitag_t, int, pcireg_t);
76 1.1 jmcneill static int pcihost_conf_hook(void *, int, int, int, pcireg_t);
77 1.1 jmcneill static void pcihost_conf_interrupt(void *, int, int, int, int, int *);
78 1.1 jmcneill
79 1.1 jmcneill static int pcihost_intr_map(const struct pci_attach_args *,
80 1.1 jmcneill pci_intr_handle_t *);
81 1.1 jmcneill static const char *pcihost_intr_string(void *, pci_intr_handle_t,
82 1.1 jmcneill char *, size_t);
83 1.5 jakllsch static const struct evcnt *pcihost_intr_evcnt(void *, pci_intr_handle_t);
84 1.1 jmcneill static int pcihost_intr_setattr(void *, pci_intr_handle_t *, int,
85 1.1 jmcneill uint64_t);
86 1.1 jmcneill static void * pcihost_intr_establish(void *, pci_intr_handle_t,
87 1.4 jmcneill int, int (*)(void *), void *,
88 1.4 jmcneill const char *);
89 1.1 jmcneill static void pcihost_intr_disestablish(void *, void *);
90 1.1 jmcneill
91 1.7 jakllsch static int pcihost_bus_space_map(void *, bus_addr_t, bus_size_t,
92 1.7 jakllsch int, bus_space_handle_t *);
93 1.7 jakllsch
94 1.1 jmcneill CFATTACH_DECL_NEW(pcihost_fdt, sizeof(struct pcihost_softc),
95 1.1 jmcneill pcihost_match, pcihost_attach, NULL, NULL);
96 1.1 jmcneill
97 1.1 jmcneill static const struct of_compat_data compat_data[] = {
98 1.1 jmcneill { "pci-host-cam-generic", PCIHOST_CAM },
99 1.1 jmcneill { "pci-host-ecam-generic", PCIHOST_ECAM },
100 1.1 jmcneill { NULL, 0 }
101 1.1 jmcneill };
102 1.1 jmcneill
103 1.1 jmcneill static int
104 1.1 jmcneill pcihost_match(device_t parent, cfdata_t cf, void *aux)
105 1.1 jmcneill {
106 1.1 jmcneill struct fdt_attach_args * const faa = aux;
107 1.1 jmcneill
108 1.1 jmcneill return of_match_compat_data(faa->faa_phandle, compat_data);
109 1.1 jmcneill }
110 1.1 jmcneill
111 1.1 jmcneill static void
112 1.1 jmcneill pcihost_attach(device_t parent, device_t self, void *aux)
113 1.1 jmcneill {
114 1.1 jmcneill struct pcihost_softc * const sc = device_private(self);
115 1.1 jmcneill struct fdt_attach_args * const faa = aux;
116 1.1 jmcneill bus_addr_t cs_addr;
117 1.1 jmcneill bus_size_t cs_size;
118 1.8 jakllsch int error;
119 1.1 jmcneill
120 1.1 jmcneill if (fdtbus_get_reg(faa->faa_phandle, 0, &cs_addr, &cs_size) != 0) {
121 1.1 jmcneill aprint_error(": couldn't get registers\n");
122 1.1 jmcneill return;
123 1.1 jmcneill }
124 1.1 jmcneill
125 1.1 jmcneill sc->sc_dev = self;
126 1.1 jmcneill sc->sc_dmat = faa->faa_dmat;
127 1.1 jmcneill sc->sc_bst = faa->faa_bst;
128 1.1 jmcneill sc->sc_phandle = faa->faa_phandle;
129 1.12 jmcneill error = bus_space_map(sc->sc_bst, cs_addr, cs_size,
130 1.12 jmcneill _ARM_BUS_SPACE_MAP_STRONGLY_ORDERED, &sc->sc_bsh);
131 1.1 jmcneill if (error) {
132 1.1 jmcneill aprint_error(": couldn't map registers: %d\n", error);
133 1.1 jmcneill return;
134 1.1 jmcneill }
135 1.1 jmcneill sc->sc_type = of_search_compatible(sc->sc_phandle, compat_data)->data;
136 1.1 jmcneill
137 1.9 jmcneill #ifdef __HAVE_PCI_MSI_MSIX
138 1.9 jmcneill if (sc->sc_type == PCIHOST_ECAM) {
139 1.9 jmcneill sc->sc_pci_flags |= PCI_FLAGS_MSI_OKAY;
140 1.9 jmcneill sc->sc_pci_flags |= PCI_FLAGS_MSIX_OKAY;
141 1.9 jmcneill }
142 1.9 jmcneill #endif
143 1.9 jmcneill
144 1.1 jmcneill aprint_naive("\n");
145 1.1 jmcneill aprint_normal(": Generic PCI host controller\n");
146 1.1 jmcneill
147 1.8 jakllsch pcihost_init(&sc->sc_pc, sc);
148 1.8 jakllsch pcihost_init2(sc);
149 1.8 jakllsch }
150 1.8 jakllsch
151 1.8 jakllsch void
152 1.8 jakllsch pcihost_init2(struct pcihost_softc *sc)
153 1.8 jakllsch {
154 1.8 jakllsch struct pcibus_attach_args pba;
155 1.8 jakllsch const u_int *data;
156 1.8 jakllsch int len;
157 1.8 jakllsch
158 1.1 jmcneill if ((data = fdtbus_get_prop(sc->sc_phandle, "bus-range", &len)) != NULL) {
159 1.1 jmcneill if (len != 8) {
160 1.8 jakllsch aprint_error_dev(sc->sc_dev, "malformed 'bus-range' property\n");
161 1.1 jmcneill return;
162 1.1 jmcneill }
163 1.1 jmcneill sc->sc_bus_min = be32toh(data[0]);
164 1.1 jmcneill sc->sc_bus_max = be32toh(data[1]);
165 1.1 jmcneill } else {
166 1.1 jmcneill sc->sc_bus_min = PCIHOST_DEFAULT_BUS_MIN;
167 1.1 jmcneill sc->sc_bus_max = PCIHOST_DEFAULT_BUS_MAX;
168 1.1 jmcneill }
169 1.1 jmcneill
170 1.3 jmcneill /*
171 1.3 jmcneill * Assign a fixed PCI segment ("domain") number. If the property is not
172 1.3 jmcneill * present, assign one. The binding spec says if this property is used to
173 1.3 jmcneill * assign static segment numbers, all host bridges should have segments
174 1.3 jmcneill * astatic assigned to prevent overlaps.
175 1.3 jmcneill */
176 1.3 jmcneill if (of_getprop_uint32(sc->sc_phandle, "linux,pci-domain", &sc->sc_seg))
177 1.3 jmcneill sc->sc_seg = pcihost_segment++;
178 1.3 jmcneill
179 1.1 jmcneill if (pcihost_config(sc) != 0)
180 1.1 jmcneill return;
181 1.1 jmcneill
182 1.1 jmcneill memset(&pba, 0, sizeof(pba));
183 1.1 jmcneill pba.pba_flags = PCI_FLAGS_MRL_OKAY |
184 1.1 jmcneill PCI_FLAGS_MRM_OKAY |
185 1.1 jmcneill PCI_FLAGS_MWI_OKAY |
186 1.9 jmcneill sc->sc_pci_flags;
187 1.7 jakllsch pba.pba_iot = &sc->sc_io.bst;
188 1.7 jakllsch pba.pba_memt = &sc->sc_mem.bst;
189 1.1 jmcneill pba.pba_dmat = sc->sc_dmat;
190 1.1 jmcneill #ifdef _PCI_HAVE_DMA64
191 1.1 jmcneill pba.pba_dmat64 = sc->sc_dmat;
192 1.1 jmcneill #endif
193 1.1 jmcneill pba.pba_pc = &sc->sc_pc;
194 1.3 jmcneill pba.pba_bus = sc->sc_bus_min;
195 1.1 jmcneill
196 1.8 jakllsch config_found_ia(sc->sc_dev, "pcibus", &pba, pcibusprint);
197 1.1 jmcneill }
198 1.1 jmcneill
199 1.8 jakllsch void
200 1.1 jmcneill pcihost_init(pci_chipset_tag_t pc, void *priv)
201 1.1 jmcneill {
202 1.1 jmcneill pc->pc_conf_v = priv;
203 1.1 jmcneill pc->pc_attach_hook = pcihost_attach_hook;
204 1.1 jmcneill pc->pc_bus_maxdevs = pcihost_bus_maxdevs;
205 1.1 jmcneill pc->pc_make_tag = pcihost_make_tag;
206 1.1 jmcneill pc->pc_decompose_tag = pcihost_decompose_tag;
207 1.3 jmcneill pc->pc_get_segment = pcihost_get_segment;
208 1.1 jmcneill pc->pc_conf_read = pcihost_conf_read;
209 1.1 jmcneill pc->pc_conf_write = pcihost_conf_write;
210 1.1 jmcneill pc->pc_conf_hook = pcihost_conf_hook;
211 1.1 jmcneill pc->pc_conf_interrupt = pcihost_conf_interrupt;
212 1.1 jmcneill
213 1.1 jmcneill pc->pc_intr_v = priv;
214 1.1 jmcneill pc->pc_intr_map = pcihost_intr_map;
215 1.1 jmcneill pc->pc_intr_string = pcihost_intr_string;
216 1.1 jmcneill pc->pc_intr_evcnt = pcihost_intr_evcnt;
217 1.1 jmcneill pc->pc_intr_setattr = pcihost_intr_setattr;
218 1.1 jmcneill pc->pc_intr_establish = pcihost_intr_establish;
219 1.1 jmcneill pc->pc_intr_disestablish = pcihost_intr_disestablish;
220 1.1 jmcneill }
221 1.1 jmcneill
222 1.1 jmcneill static int
223 1.1 jmcneill pcihost_config(struct pcihost_softc *sc)
224 1.1 jmcneill {
225 1.1 jmcneill struct extent *ioext = NULL, *memext = NULL, *pmemext = NULL;
226 1.1 jmcneill const u_int *ranges;
227 1.3 jmcneill u_int probe_only;
228 1.1 jmcneill int error, len;
229 1.9 jmcneill bool swap;
230 1.1 jmcneill
231 1.7 jakllsch struct pcih_bus_space * const pibs = &sc->sc_io;
232 1.7 jakllsch pibs->bst = *sc->sc_bst;
233 1.7 jakllsch pibs->bst.bs_cookie = pibs;
234 1.7 jakllsch pibs->map = pibs->bst.bs_map;
235 1.12 jmcneill pibs->flags = PCI_FLAGS_IO_OKAY;
236 1.7 jakllsch pibs->bst.bs_map = pcihost_bus_space_map;
237 1.7 jakllsch
238 1.7 jakllsch struct pcih_bus_space * const pmbs = &sc->sc_mem;
239 1.7 jakllsch pmbs->bst = *sc->sc_bst;
240 1.7 jakllsch pmbs->bst.bs_cookie = pmbs;
241 1.7 jakllsch pmbs->map = pmbs->bst.bs_map;
242 1.12 jmcneill pmbs->flags = PCI_FLAGS_MEM_OKAY;
243 1.7 jakllsch pmbs->bst.bs_map = pcihost_bus_space_map;
244 1.7 jakllsch
245 1.3 jmcneill /*
246 1.3 jmcneill * If this flag is set, skip configuration of the PCI bus and use existing config.
247 1.3 jmcneill */
248 1.3 jmcneill if (of_getprop_uint32(sc->sc_phandle, "linux,pci-probe-only", &probe_only))
249 1.3 jmcneill probe_only = 0;
250 1.3 jmcneill if (probe_only)
251 1.3 jmcneill return 0;
252 1.3 jmcneill
253 1.9 jmcneill if (sc->sc_pci_ranges != NULL) {
254 1.9 jmcneill ranges = sc->sc_pci_ranges;
255 1.9 jmcneill len = sc->sc_pci_ranges_cells * 4;
256 1.9 jmcneill swap = false;
257 1.9 jmcneill } else {
258 1.9 jmcneill ranges = fdtbus_get_prop(sc->sc_phandle, "ranges", &len);
259 1.9 jmcneill if (ranges == NULL) {
260 1.9 jmcneill aprint_error_dev(sc->sc_dev, "missing 'ranges' property\n");
261 1.9 jmcneill return EINVAL;
262 1.9 jmcneill }
263 1.9 jmcneill swap = true;
264 1.1 jmcneill }
265 1.1 jmcneill
266 1.1 jmcneill /*
267 1.1 jmcneill * Each entry in the ranges table contains:
268 1.1 jmcneill * - bus address (3 cells)
269 1.1 jmcneill * - cpu physical address (2 cells)
270 1.1 jmcneill * - size (2 cells)
271 1.1 jmcneill * Total size for each entry is 28 bytes (7 cells).
272 1.1 jmcneill */
273 1.1 jmcneill while (len >= 28) {
274 1.9 jmcneill #define DECODE32(x,o) (swap ? be32dec(&(x)[o]) : (x)[o])
275 1.9 jmcneill #define DECODE64(x,o) (swap ? be64dec(&(x)[o]) : (((uint64_t)((x)[(o)+0]) << 32) + (x)[(o)+1]))
276 1.9 jmcneill const uint32_t phys_hi = DECODE32(ranges, 0);
277 1.9 jmcneill const uint64_t bus_phys = DECODE64(ranges, 1);
278 1.9 jmcneill const uint64_t cpu_phys = DECODE64(ranges, 3);
279 1.9 jmcneill const uint64_t size = DECODE64(ranges, 5);
280 1.9 jmcneill #undef DECODE32
281 1.9 jmcneill #undef DECODE64
282 1.1 jmcneill
283 1.7 jakllsch len -= 28;
284 1.7 jakllsch ranges += 7;
285 1.7 jakllsch
286 1.7 jakllsch const bool is64 = (__SHIFTOUT(phys_hi, PHYS_HI_SPACE) ==
287 1.7 jakllsch PHYS_HI_SPACE_MEM64) ? true : false;
288 1.1 jmcneill switch (__SHIFTOUT(phys_hi, PHYS_HI_SPACE)) {
289 1.1 jmcneill case PHYS_HI_SPACE_IO:
290 1.7 jakllsch if (pibs->nranges + 1 >= __arraycount(pibs->ranges)) {
291 1.7 jakllsch aprint_error_dev(sc->sc_dev, "too many IO ranges\n");
292 1.7 jakllsch continue;
293 1.7 jakllsch }
294 1.7 jakllsch pibs->ranges[pibs->nranges].bpci = bus_phys;
295 1.7 jakllsch pibs->ranges[pibs->nranges].bbus = cpu_phys;
296 1.7 jakllsch pibs->ranges[pibs->nranges].size = size;
297 1.7 jakllsch ++pibs->nranges;
298 1.1 jmcneill if (ioext != NULL) {
299 1.1 jmcneill aprint_error_dev(sc->sc_dev, "ignoring duplicate IO space range\n");
300 1.1 jmcneill continue;
301 1.1 jmcneill }
302 1.7 jakllsch ioext = extent_create("pciio", bus_phys, bus_phys + size - 1, NULL, 0, EX_NOWAIT);
303 1.1 jmcneill aprint_verbose_dev(sc->sc_dev,
304 1.7 jakllsch "IO: 0x%" PRIx64 "+0x%" PRIx64 "@0x%" PRIx64 "\n",
305 1.7 jakllsch bus_phys, size, cpu_phys);
306 1.7 jakllsch /* reserve a PC-like legacy IO ports range, perhaps for access to VGA registers */
307 1.7 jakllsch if (bus_phys == 0 && size >= 0x10000)
308 1.7 jakllsch extent_alloc_region(ioext, 0, 0x1000, EX_WAITOK);
309 1.9 jmcneill sc->sc_pci_flags |= PCI_FLAGS_IO_OKAY;
310 1.1 jmcneill break;
311 1.7 jakllsch case PHYS_HI_SPACE_MEM64:
312 1.7 jakllsch /* FALLTHROUGH */
313 1.1 jmcneill case PHYS_HI_SPACE_MEM32:
314 1.7 jakllsch if (pmbs->nranges + 1 >= __arraycount(pmbs->ranges)) {
315 1.7 jakllsch aprint_error_dev(sc->sc_dev, "too many mem ranges\n");
316 1.7 jakllsch continue;
317 1.7 jakllsch }
318 1.7 jakllsch /* both pmem and mem spaces are in the same tag */
319 1.7 jakllsch pmbs->ranges[pmbs->nranges].bpci = bus_phys;
320 1.7 jakllsch pmbs->ranges[pmbs->nranges].bbus = cpu_phys;
321 1.7 jakllsch pmbs->ranges[pmbs->nranges].size = size;
322 1.7 jakllsch ++pmbs->nranges;
323 1.7 jakllsch if ((phys_hi & PHYS_HI_PREFETCH) != 0 ||
324 1.7 jakllsch __SHIFTOUT(phys_hi, PHYS_HI_SPACE) == PHYS_HI_SPACE_MEM64) {
325 1.1 jmcneill if (pmemext != NULL) {
326 1.1 jmcneill aprint_error_dev(sc->sc_dev, "ignoring duplicate mem (prefetchable) range\n");
327 1.1 jmcneill continue;
328 1.1 jmcneill }
329 1.7 jakllsch pmemext = extent_create("pcipmem", bus_phys, bus_phys + size - 1, NULL, 0, EX_NOWAIT);
330 1.1 jmcneill aprint_verbose_dev(sc->sc_dev,
331 1.7 jakllsch "MMIO (%d-bit prefetchable): 0x%" PRIx64 "+0x%" PRIx64 "@0x%" PRIx64 "\n",
332 1.7 jakllsch is64 ? 64 : 32, bus_phys, size, cpu_phys);
333 1.1 jmcneill } else {
334 1.1 jmcneill if (memext != NULL) {
335 1.1 jmcneill aprint_error_dev(sc->sc_dev, "ignoring duplicate mem (non-prefetchable) range\n");
336 1.1 jmcneill continue;
337 1.1 jmcneill }
338 1.7 jakllsch memext = extent_create("pcimem", bus_phys, bus_phys + size - 1, NULL, 0, EX_NOWAIT);
339 1.1 jmcneill aprint_verbose_dev(sc->sc_dev,
340 1.7 jakllsch "MMIO (%d-bit non-prefetchable): 0x%" PRIx64 "+0x%" PRIx64 "@0x%" PRIx64 "\n",
341 1.7 jakllsch is64 ? 64 : 32, bus_phys, size, cpu_phys);
342 1.1 jmcneill }
343 1.9 jmcneill sc->sc_pci_flags |= PCI_FLAGS_MEM_OKAY;
344 1.1 jmcneill break;
345 1.1 jmcneill default:
346 1.1 jmcneill break;
347 1.1 jmcneill }
348 1.1 jmcneill }
349 1.1 jmcneill
350 1.10 jmcneill if (memext == NULL && pmemext != NULL) {
351 1.10 jmcneill memext = pmemext;
352 1.10 jmcneill pmemext = NULL;
353 1.10 jmcneill }
354 1.10 jmcneill
355 1.1 jmcneill error = pci_configure_bus(&sc->sc_pc, ioext, memext, pmemext, sc->sc_bus_min, PCIHOST_CACHELINE_SIZE);
356 1.1 jmcneill
357 1.1 jmcneill if (ioext)
358 1.1 jmcneill extent_destroy(ioext);
359 1.1 jmcneill if (memext)
360 1.1 jmcneill extent_destroy(memext);
361 1.1 jmcneill if (pmemext)
362 1.1 jmcneill extent_destroy(pmemext);
363 1.1 jmcneill
364 1.1 jmcneill if (error) {
365 1.1 jmcneill aprint_error_dev(sc->sc_dev, "configuration failed: %d\n", error);
366 1.1 jmcneill return error;
367 1.1 jmcneill }
368 1.1 jmcneill
369 1.1 jmcneill return 0;
370 1.1 jmcneill }
371 1.1 jmcneill
372 1.1 jmcneill static void
373 1.1 jmcneill pcihost_attach_hook(device_t parent, device_t self,
374 1.1 jmcneill struct pcibus_attach_args *pba)
375 1.1 jmcneill {
376 1.1 jmcneill }
377 1.1 jmcneill
378 1.1 jmcneill static int
379 1.1 jmcneill pcihost_bus_maxdevs(void *v, int busno)
380 1.1 jmcneill {
381 1.1 jmcneill return 32;
382 1.1 jmcneill }
383 1.1 jmcneill
384 1.1 jmcneill static pcitag_t
385 1.1 jmcneill pcihost_make_tag(void *v, int b, int d, int f)
386 1.1 jmcneill {
387 1.1 jmcneill return (b << 16) | (d << 11) | (f << 8);
388 1.1 jmcneill }
389 1.1 jmcneill
390 1.1 jmcneill static void
391 1.1 jmcneill pcihost_decompose_tag(void *v, pcitag_t tag, int *bp, int *dp, int *fp)
392 1.1 jmcneill {
393 1.1 jmcneill if (bp)
394 1.1 jmcneill *bp = (tag >> 16) & 0xff;
395 1.1 jmcneill if (dp)
396 1.1 jmcneill *dp = (tag >> 11) & 0x1f;
397 1.1 jmcneill if (fp)
398 1.1 jmcneill *fp = (tag >> 8) & 0x7;
399 1.1 jmcneill }
400 1.1 jmcneill
401 1.3 jmcneill static u_int
402 1.3 jmcneill pcihost_get_segment(void *v)
403 1.3 jmcneill {
404 1.3 jmcneill struct pcihost_softc *sc = v;
405 1.3 jmcneill
406 1.3 jmcneill return sc->sc_seg;
407 1.3 jmcneill }
408 1.3 jmcneill
409 1.1 jmcneill static pcireg_t
410 1.1 jmcneill pcihost_conf_read(void *v, pcitag_t tag, int offset)
411 1.1 jmcneill {
412 1.1 jmcneill struct pcihost_softc *sc = v;
413 1.1 jmcneill int b, d, f;
414 1.1 jmcneill u_int reg;
415 1.1 jmcneill
416 1.1 jmcneill pcihost_decompose_tag(v, tag, &b, &d, &f);
417 1.1 jmcneill
418 1.1 jmcneill if (b < sc->sc_bus_min || b > sc->sc_bus_max)
419 1.1 jmcneill return (pcireg_t) -1;
420 1.1 jmcneill
421 1.1 jmcneill if (sc->sc_type == PCIHOST_CAM) {
422 1.1 jmcneill if (offset & ~0xff)
423 1.1 jmcneill return (pcireg_t) -1;
424 1.1 jmcneill reg = (b << 16) | (d << 11) | (f << 8) | offset;
425 1.1 jmcneill } else if (sc->sc_type == PCIHOST_ECAM) {
426 1.1 jmcneill if (offset & ~0xfff)
427 1.1 jmcneill return (pcireg_t) -1;
428 1.1 jmcneill reg = (b << 20) | (d << 15) | (f << 12) | offset;
429 1.1 jmcneill } else {
430 1.1 jmcneill return (pcireg_t) -1;
431 1.1 jmcneill }
432 1.1 jmcneill
433 1.1 jmcneill return bus_space_read_4(sc->sc_bst, sc->sc_bsh, reg);
434 1.1 jmcneill }
435 1.1 jmcneill
436 1.1 jmcneill static void
437 1.1 jmcneill pcihost_conf_write(void *v, pcitag_t tag, int offset, pcireg_t val)
438 1.1 jmcneill {
439 1.1 jmcneill struct pcihost_softc *sc = v;
440 1.1 jmcneill int b, d, f;
441 1.1 jmcneill u_int reg;
442 1.1 jmcneill
443 1.1 jmcneill pcihost_decompose_tag(v, tag, &b, &d, &f);
444 1.1 jmcneill
445 1.1 jmcneill if (b < sc->sc_bus_min || b > sc->sc_bus_max)
446 1.1 jmcneill return;
447 1.1 jmcneill
448 1.1 jmcneill if (sc->sc_type == PCIHOST_CAM) {
449 1.1 jmcneill if (offset & ~0xff)
450 1.1 jmcneill return;
451 1.1 jmcneill reg = (b << 16) | (d << 11) | (f << 8) | offset;
452 1.1 jmcneill } else if (sc->sc_type == PCIHOST_ECAM) {
453 1.1 jmcneill if (offset & ~0xfff)
454 1.1 jmcneill return;
455 1.1 jmcneill reg = (b << 20) | (d << 15) | (f << 12) | offset;
456 1.1 jmcneill } else {
457 1.1 jmcneill return;
458 1.1 jmcneill }
459 1.1 jmcneill
460 1.1 jmcneill bus_space_write_4(sc->sc_bst, sc->sc_bsh, reg, val);
461 1.1 jmcneill }
462 1.1 jmcneill
463 1.1 jmcneill static int
464 1.1 jmcneill pcihost_conf_hook(void *v, int b, int d, int f, pcireg_t id)
465 1.1 jmcneill {
466 1.1 jmcneill return PCI_CONF_DEFAULT;
467 1.1 jmcneill }
468 1.1 jmcneill
469 1.1 jmcneill static void
470 1.1 jmcneill pcihost_conf_interrupt(void *v, int bus, int dev, int ipin, int swiz, int *ilinep)
471 1.1 jmcneill {
472 1.1 jmcneill }
473 1.1 jmcneill
474 1.1 jmcneill static int
475 1.1 jmcneill pcihost_intr_map(const struct pci_attach_args *pa, pci_intr_handle_t *ih)
476 1.1 jmcneill {
477 1.2 jmcneill struct pcihost_softc *sc = pa->pa_pc->pc_intr_v;
478 1.2 jmcneill u_int addr_cells, interrupt_cells;
479 1.2 jmcneill const u_int *imap, *imask;
480 1.2 jmcneill int imaplen, imasklen;
481 1.2 jmcneill u_int match[4];
482 1.2 jmcneill int index;
483 1.2 jmcneill
484 1.1 jmcneill if (pa->pa_intrpin == 0)
485 1.1 jmcneill return EINVAL;
486 1.2 jmcneill
487 1.2 jmcneill imap = fdtbus_get_prop(sc->sc_phandle, "interrupt-map", &imaplen);
488 1.2 jmcneill imask = fdtbus_get_prop(sc->sc_phandle, "interrupt-map-mask", &imasklen);
489 1.2 jmcneill if (imap == NULL || imask == NULL || imasklen != 16)
490 1.2 jmcneill return EINVAL;
491 1.2 jmcneill
492 1.2 jmcneill /* Convert attach args to specifier */
493 1.2 jmcneill match[0] = htobe32(
494 1.2 jmcneill __SHIFTIN(pa->pa_bus, PHYS_HI_BUS) |
495 1.2 jmcneill __SHIFTIN(pa->pa_device, PHYS_HI_DEVICE) |
496 1.2 jmcneill __SHIFTIN(pa->pa_function, PHYS_HI_FUNCTION)
497 1.2 jmcneill ) & imask[0];
498 1.2 jmcneill match[1] = htobe32(0) & imask[1];
499 1.2 jmcneill match[2] = htobe32(0) & imask[2];
500 1.2 jmcneill match[3] = htobe32(pa->pa_intrpin) & imask[3];
501 1.2 jmcneill
502 1.2 jmcneill index = 0;
503 1.2 jmcneill while (imaplen >= 20) {
504 1.2 jmcneill const int map_ihandle = fdtbus_get_phandle_from_native(be32toh(imap[4]));
505 1.2 jmcneill if (of_getprop_uint32(map_ihandle, "#address-cells", &addr_cells))
506 1.2 jmcneill addr_cells = 2;
507 1.2 jmcneill if (of_getprop_uint32(map_ihandle, "#interrupt-cells", &interrupt_cells))
508 1.2 jmcneill interrupt_cells = 0;
509 1.2 jmcneill if (imaplen < (addr_cells + interrupt_cells) * 4)
510 1.2 jmcneill return ENXIO;
511 1.2 jmcneill
512 1.2 jmcneill if ((imap[0] & imask[0]) == match[0] &&
513 1.2 jmcneill (imap[1] & imask[1]) == match[1] &&
514 1.2 jmcneill (imap[2] & imask[2]) == match[2] &&
515 1.2 jmcneill (imap[3] & imask[3]) == match[3]) {
516 1.2 jmcneill *ih = index;
517 1.2 jmcneill return 0;
518 1.2 jmcneill }
519 1.2 jmcneill
520 1.2 jmcneill imap += (5 + addr_cells + interrupt_cells);
521 1.2 jmcneill imaplen -= (5 + addr_cells + interrupt_cells) * 4;
522 1.2 jmcneill index++;
523 1.2 jmcneill }
524 1.2 jmcneill
525 1.2 jmcneill return EINVAL;
526 1.1 jmcneill }
527 1.1 jmcneill
528 1.1 jmcneill static const u_int *
529 1.2 jmcneill pcihost_find_intr(struct pcihost_softc *sc, pci_intr_handle_t ih, int *pihandle)
530 1.1 jmcneill {
531 1.1 jmcneill u_int addr_cells, interrupt_cells;
532 1.2 jmcneill int imaplen, index;
533 1.1 jmcneill const u_int *imap;
534 1.1 jmcneill
535 1.1 jmcneill imap = fdtbus_get_prop(sc->sc_phandle, "interrupt-map", &imaplen);
536 1.2 jmcneill KASSERT(imap != NULL);
537 1.1 jmcneill
538 1.2 jmcneill index = 0;
539 1.1 jmcneill while (imaplen >= 20) {
540 1.1 jmcneill const int map_ihandle = fdtbus_get_phandle_from_native(be32toh(imap[4]));
541 1.1 jmcneill if (of_getprop_uint32(map_ihandle, "#address-cells", &addr_cells))
542 1.1 jmcneill addr_cells = 2;
543 1.1 jmcneill if (of_getprop_uint32(map_ihandle, "#interrupt-cells", &interrupt_cells))
544 1.1 jmcneill interrupt_cells = 0;
545 1.1 jmcneill if (imaplen < (addr_cells + interrupt_cells) * 4)
546 1.1 jmcneill return NULL;
547 1.1 jmcneill
548 1.2 jmcneill if (index == ih) {
549 1.1 jmcneill *pihandle = map_ihandle;
550 1.1 jmcneill return imap + 5 + addr_cells;
551 1.1 jmcneill }
552 1.1 jmcneill
553 1.2 jmcneill imap += (5 + addr_cells + interrupt_cells);
554 1.2 jmcneill imaplen -= (5 + addr_cells + interrupt_cells) * 4;
555 1.2 jmcneill index++;
556 1.1 jmcneill }
557 1.1 jmcneill
558 1.1 jmcneill return NULL;
559 1.1 jmcneill }
560 1.1 jmcneill
561 1.1 jmcneill static const char *
562 1.1 jmcneill pcihost_intr_string(void *v, pci_intr_handle_t ih, char *buf, size_t len)
563 1.1 jmcneill {
564 1.3 jmcneill const int irq = __SHIFTOUT(ih, ARM_PCI_INTR_IRQ);
565 1.3 jmcneill const int vec = __SHIFTOUT(ih, ARM_PCI_INTR_MSI_VEC);
566 1.1 jmcneill struct pcihost_softc *sc = v;
567 1.1 jmcneill const u_int *specifier;
568 1.1 jmcneill int ihandle;
569 1.1 jmcneill
570 1.3 jmcneill if (ih & ARM_PCI_INTR_MSIX) {
571 1.3 jmcneill snprintf(buf, len, "irq %d (MSI-X vec %d)", irq, vec);
572 1.3 jmcneill } else if (ih & ARM_PCI_INTR_MSI) {
573 1.3 jmcneill snprintf(buf, len, "irq %d (MSI vec %d)", irq, vec);
574 1.3 jmcneill } else {
575 1.11 jmcneill specifier = pcihost_find_intr(sc, ih & ARM_PCI_INTR_IRQ, &ihandle);
576 1.3 jmcneill if (specifier == NULL)
577 1.3 jmcneill return NULL;
578 1.1 jmcneill
579 1.3 jmcneill if (!fdtbus_intr_str_raw(ihandle, specifier, buf, len))
580 1.3 jmcneill return NULL;
581 1.3 jmcneill }
582 1.1 jmcneill
583 1.1 jmcneill return buf;
584 1.1 jmcneill }
585 1.1 jmcneill
586 1.1 jmcneill const struct evcnt *
587 1.1 jmcneill pcihost_intr_evcnt(void *v, pci_intr_handle_t ih)
588 1.1 jmcneill {
589 1.1 jmcneill return NULL;
590 1.1 jmcneill }
591 1.1 jmcneill
592 1.1 jmcneill static int
593 1.1 jmcneill pcihost_intr_setattr(void *v, pci_intr_handle_t *ih, int attr, uint64_t data)
594 1.1 jmcneill {
595 1.1 jmcneill switch (attr) {
596 1.1 jmcneill case PCI_INTR_MPSAFE:
597 1.1 jmcneill if (data)
598 1.11 jmcneill *ih |= ARM_PCI_INTR_MPSAFE;
599 1.1 jmcneill else
600 1.11 jmcneill *ih &= ~ARM_PCI_INTR_MPSAFE;
601 1.1 jmcneill return 0;
602 1.1 jmcneill default:
603 1.1 jmcneill return ENODEV;
604 1.1 jmcneill }
605 1.1 jmcneill }
606 1.1 jmcneill
607 1.1 jmcneill static void *
608 1.1 jmcneill pcihost_intr_establish(void *v, pci_intr_handle_t ih, int ipl,
609 1.4 jmcneill int (*callback)(void *), void *arg, const char *xname)
610 1.1 jmcneill {
611 1.1 jmcneill struct pcihost_softc *sc = v;
612 1.11 jmcneill const int flags = (ih & ARM_PCI_INTR_MPSAFE) ? FDT_INTR_MPSAFE : 0;
613 1.1 jmcneill const u_int *specifier;
614 1.1 jmcneill int ihandle;
615 1.1 jmcneill
616 1.3 jmcneill if ((ih & (ARM_PCI_INTR_MSI | ARM_PCI_INTR_MSIX)) != 0)
617 1.4 jmcneill return arm_pci_msi_intr_establish(&sc->sc_pc, ih, ipl, callback, arg, xname);
618 1.3 jmcneill
619 1.11 jmcneill specifier = pcihost_find_intr(sc, ih & ARM_PCI_INTR_IRQ, &ihandle);
620 1.1 jmcneill if (specifier == NULL)
621 1.1 jmcneill return NULL;
622 1.1 jmcneill
623 1.1 jmcneill return fdtbus_intr_establish_raw(ihandle, specifier, ipl, flags, callback, arg);
624 1.1 jmcneill }
625 1.1 jmcneill
626 1.1 jmcneill static void
627 1.1 jmcneill pcihost_intr_disestablish(void *v, void *vih)
628 1.1 jmcneill {
629 1.1 jmcneill struct pcihost_softc *sc = v;
630 1.1 jmcneill
631 1.1 jmcneill fdtbus_intr_disestablish(sc->sc_phandle, vih);
632 1.1 jmcneill }
633 1.7 jakllsch
634 1.7 jakllsch static int
635 1.7 jakllsch pcihost_bus_space_map(void *t, bus_addr_t bpa, bus_size_t size, int flag,
636 1.7 jakllsch bus_space_handle_t *bshp)
637 1.7 jakllsch {
638 1.7 jakllsch struct pcih_bus_space * const pbs = t;
639 1.7 jakllsch
640 1.12 jmcneill if ((pbs->flags & PCI_FLAGS_IO_OKAY) != 0) {
641 1.12 jmcneill /* Force strongly ordered mapping for all I/O space */
642 1.12 jmcneill flag = _ARM_BUS_SPACE_MAP_STRONGLY_ORDERED;
643 1.12 jmcneill }
644 1.12 jmcneill
645 1.7 jakllsch for (size_t i = 0; i < pbs->nranges; i++) {
646 1.7 jakllsch const bus_addr_t rmin = pbs->ranges[i].bpci;
647 1.7 jakllsch const bus_addr_t rmax = pbs->ranges[i].bpci - 1 + pbs->ranges[i].size;
648 1.7 jakllsch if ((bpa >= rmin) && ((bpa - 1 + size) <= rmax)) {
649 1.7 jakllsch return pbs->map(t, bpa - pbs->ranges[i].bpci + pbs->ranges[i].bbus, size, flag, bshp);
650 1.7 jakllsch }
651 1.7 jakllsch }
652 1.7 jakllsch
653 1.7 jakllsch return ERANGE;
654 1.7 jakllsch }
655